File: group-no-gaps-1.c

package info (click to toggle)
gcc-arm-none-eabi 15%3A14.2.rel1-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 1,099,328 kB
  • sloc: cpp: 3,627,108; ansic: 2,571,498; ada: 834,230; f90: 235,082; makefile: 79,231; asm: 74,984; xml: 51,692; exp: 39,736; sh: 33,298; objc: 15,629; python: 15,069; fortran: 14,429; pascal: 7,003; awk: 5,070; perl: 3,106; ml: 285; lisp: 253; lex: 204; haskell: 135
file content (108 lines) | stat: -rw-r--r-- 2,903 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
/* { dg-require-effective-target mmap } */

#include <sys/mman.h>
#include <stdio.h>

#define COUNT 320
#define MMAP_SIZE 0x20000
#define ADDRESS1 0x1122000000
#define ADDRESS2 (ADDRESS1 + MMAP_SIZE * 16)
#define TYPE unsigned int

#ifndef MAP_ANONYMOUS
#define MAP_ANONYMOUS MAP_ANON
#endif

#define RHS0(B) b[B]
#define RHS1(B) RHS0(B) + b[(B) + 1]
#define RHS2(B) RHS1(B) + b[(B) + 2]
#define RHS3(B) RHS2(B) + b[(B) + 3]
#define RHS4(B) RHS3(B) + b[(B) + 4]
#define RHS5(B) RHS4(B) + b[(B) + 5]
#define RHS6(B) RHS5(B) + b[(B) + 6]
#define RHS7(B) RHS6(B) + b[(B) + 7]

#define LHS0(B) a[B]
#define LHS1(B) LHS0(B) = a[(B) + 1]
#define LHS2(B) LHS1(B) = a[(B) + 2]
#define LHS3(B) LHS2(B) = a[(B) + 3]
#define LHS4(B) LHS3(B) = a[(B) + 4]
#define LHS5(B) LHS4(B) = a[(B) + 5]
#define LHS6(B) LHS5(B) = a[(B) + 6]
#define LHS7(B) LHS6(B) = a[(B) + 7]

#define DEF_GROUP_SIZE(MULT, GAP, NO_GAP)			\
  void __attribute__((noinline, noclone))			\
  gap_load_##MULT (TYPE *__restrict a, TYPE *__restrict b)	\
  {								\
    for (int i = 0; i < COUNT; i++)				\
      a[i] = RHS##GAP (i * MULT);				\
  }								\
  void __attribute__((noinline, noclone))			\
  no_gap_load_##MULT (TYPE *__restrict a, TYPE *__restrict b)	\
  {								\
    for (int i = 0; i < COUNT; i++)				\
      a[i] = RHS##NO_GAP (i * MULT);				\
  }								\
  void __attribute__((noinline, noclone))			\
  gap_store_##MULT (TYPE *__restrict a, TYPE *__restrict b)	\
  {								\
    for (int i = 0; i < COUNT; i++)				\
      LHS##GAP (i * MULT) = b[i];				\
  }								\
  void __attribute__((noinline, noclone))			\
  no_gap_store_##MULT (TYPE *__restrict a, TYPE *__restrict b)	\
  {								\
    for (int i = 0; i < COUNT; i++)				\
      LHS##NO_GAP (i * MULT) = b[i];				\
  }

#define USE_GROUP_SIZE(MULT)					\
  gap_load_##MULT (end_x - COUNT, end_y - COUNT * MULT + 1);	\
  no_gap_load_##MULT (end_x - COUNT, end_y - COUNT * MULT);	\
  gap_store_##MULT (end_x - COUNT * MULT + 1, end_y - COUNT);	\
  no_gap_store_##MULT (end_x - COUNT * MULT, end_y - COUNT)

DEF_GROUP_SIZE (2, 0, 1)
DEF_GROUP_SIZE (3, 1, 2)
DEF_GROUP_SIZE (4, 2, 3)
DEF_GROUP_SIZE (5, 3, 4)
DEF_GROUP_SIZE (6, 4, 5)
DEF_GROUP_SIZE (7, 5, 6)
DEF_GROUP_SIZE (8, 6, 7)

int
main (void)
{
  void *x, *y;
  TYPE *end_x, *end_y;

  x = mmap ((void *) ADDRESS1, MMAP_SIZE, PROT_READ | PROT_WRITE,
	    MAP_PRIVATE | MAP_ANONYMOUS, -1, 0);
  if (x == MAP_FAILED)
    {
      perror ("mmap");
      return 1;
    }

  y = mmap ((void *) ADDRESS2, MMAP_SIZE, PROT_READ | PROT_WRITE,
	    MAP_PRIVATE | MAP_ANONYMOUS, -1, 0);
  if (y == MAP_FAILED)
    {
      perror ("mmap");
      return 1;
    }

  end_x = (TYPE *) ((char *) x + MMAP_SIZE);
  end_y = (TYPE *) ((char *) y + MMAP_SIZE);

  USE_GROUP_SIZE (2);
  USE_GROUP_SIZE (3);
  USE_GROUP_SIZE (4);
  USE_GROUP_SIZE (5);
  USE_GROUP_SIZE (6);
  USE_GROUP_SIZE (7);
  USE_GROUP_SIZE (8);

  return 0;
}