libffi/testsuite/libffi.call/ffitest.h

   1 #include <stdlib.h>
   2 #include <stdio.h>
   3 #include <string.h>
   4 #include <fcntl.h>
   5 #include <ffi.h>
   6 #include "fficonfig.h"
   7
   8 #define MAX_ARGS 256
   9
  10 #define CHECK(x) !(x) ? abort() : 0
  11
  12 /* Define our own long for easier handling on multilib targets.  */
  13 #if LONG_MAX == 2147483647
  14 #define ffi_type_mylong ffi_type_uint32
  15 #else
  16 #if LONG_MAX == 9223372036854775807
  17 #define ffi_type_mylong ffi_type_uint64
  18 #else
  19 #error "Error, size LONG not defined as expected"
  20 #endif
  21 #endif
  22
  23 /* Prefer MAP_ANON(YMOUS) to /dev/zero, since we don't need to keep a
  24    file open.  */
  25 #ifdef HAVE_MMAP_ANON
  26 # undef HAVE_MMAP_DEV_ZERO
  27
  28 # include <sys/mman.h>
  29 # ifndef MAP_FAILED
  30 #  define MAP_FAILED -1
  31 # endif
  32 # if !defined (MAP_ANONYMOUS) && defined (MAP_ANON)
  33 #  define MAP_ANONYMOUS MAP_ANON
  34 # endif
  35 # define USING_MMAP
  36
  37 #endif
  38
  39 #ifdef HAVE_MMAP_DEV_ZERO
  40
  41 # include <sys/mman.h>
  42 # ifndef MAP_FAILED
  43 #  define MAP_FAILED -1
  44 # endif
  45 # define USING_MMAP
  46
  47 #endif
  48
  49 #ifdef USING_MMAP
  50 static inline void *
  51 allocate_mmap (size_t size)
  52 {
  53   void *page;
  54 #if defined (HAVE_MMAP_DEV_ZERO)
  55   static int dev_zero_fd = -1;
  56 #endif
  57
  58 #ifdef HAVE_MMAP_DEV_ZERO
  59   if (dev_zero_fd == -1)
  60     {
  61       dev_zero_fd = open ("/dev/zero", O_RDONLY);
  62       if (dev_zero_fd == -1)
  63         {
  64           perror ("open /dev/zero: %m");
  65           exit (1);
  66         }
  67     }
  68 #endif
  69
  70
  71 #ifdef HAVE_MMAP_ANON
  72   page = mmap (NULL, size, PROT_READ | PROT_WRITE | PROT_EXEC,
  73                MAP_PRIVATE | MAP_ANONYMOUS, -1, 0);
  74 #endif
  75 #ifdef HAVE_MMAP_DEV_ZERO
  76   page = mmap (NULL, size, PROT_READ | PROT_WRITE | PROT_EXEC,
  77                MAP_PRIVATE, dev_zero_fd, 0);
  78 #endif
  79
  80   if (page == (void *) MAP_FAILED)
  81     {
  82       perror ("virtual memory exhausted");
  83       exit (1);
  84     }
  85
  86   return page;
  87 }
  88
  89 #endif