gcc/testsuite/gcc.c-torture/execute/loop-2f.c

   1 /* { dg-require-effective-target mmap } */
   2 /* { dg-skip-if "the executable is at the same position the test tries to remap" { m68k-*-linux* } } */
   3
   4 #include <limits.h>
   5
   6 #include <sys/types.h>
   7 #include <sys/mman.h>
   8 #include <sys/stat.h>
   9 #include <fcntl.h>
  10 #ifndef MAP_ANON
  11 #ifdef MAP_ANONYMOUS
  12 #define MAP_ANON MAP_ANONYMOUS
  13 #else
  14 #define MAP_ANON MAP_FILE
  15 #endif
  16 #endif
  17 #ifndef MAP_FILE
  18 #define MAP_FILE 0
  19 #endif
  20 #ifndef MAP_FIXED
  21 #define MAP_FIXED 0
  22 #endif
  23
  24 #define MAP_START (void *)0x7fff8000
  25 #define MAP_LEN 0x10000
  26
  27 #define OFFSET (MAP_LEN/2 - 2 * sizeof (char));
  28
  29 void
  30 f (int s, char *p)
  31 {
  32   int i;
  33   for (i = s; i >= 0 && &p[i] < &p[40]; i++)
  34     {
  35       p[i] = -2;
  36     }
  37 }
  38
  39 int
  40 main (void)
  41 {
  42 #ifdef MAP_ANON
  43   char *p;
  44   int dev_zero;
  45
  46   dev_zero = open ("/dev/zero", O_RDONLY);
  47   /* -1 is OK when we have MAP_ANON; else mmap will flag an error.  */
  48   if (INT_MAX != 0x7fffffffL || sizeof (char *) != sizeof (int))
  49     return 0;
  50   p = mmap (MAP_START, MAP_LEN, PROT_READ|PROT_WRITE,
  51             MAP_ANON|MAP_FIXED|MAP_PRIVATE, dev_zero, 0);
  52   if (p != (char *)-1)
  53     {
  54       p += OFFSET;
  55       p[39] = 0;
  56       f (0, p);
  57       if (p[39] != (char)-2)
  58         __builtin_abort ();
  59       p[39] = 0;
  60       f (-1, p);
  61       if (p[39] != 0)
  62         __builtin_abort ();
  63     }
  64 #endif
  65   return 0;
  66 }