tests/zerosize-ptr.h

   1 /* Return a pointer to a zero-size object in memory.
   2    Copyright (C) 2009 Free Software Foundation, Inc.
   3
   4    This program is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU General Public License as published by
   6    the Free Software Foundation; either version 3 of the License, or
   7    (at your option) any later version.
   8
   9    This program is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12    GNU General Public License for more details.
  13
  14    You should have received a copy of the GNU General Public License
  15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  16
  17 /* ISO C 99 does not allow memcmp(), memchr() etc. to be invoked with a NULL
  18    argument.  Therefore this file produces a non-NULL pointer which cannot
  19    be dereferenced, if possible.  */
  20
  21 #include <stdlib.h>
  22
  23 /* Test whether mmap() and mprotect() are available.
  24    We don't use HAVE_MMAP, because AC_FUNC_MMAP would not define it on HP-UX.
  25    HAVE_MPROTECT is not enough, because mingw does not have mmap() but has an
  26    mprotect() function in libgcc.a.  */
  27 #if HAVE_SYS_MMAN_H && HAVE_MPROTECT
  28 # include <fcntl.h>
  29 # include <unistd.h>
  30 # include <sys/types.h>
  31 # include <sys/mman.h>
  32 /* Define MAP_FILE when it isn't otherwise.  */
  33 # ifndef MAP_FILE
  34 #  define MAP_FILE 0
  35 # endif
  36 #endif
  37
  38 /* Return a pointer to a zero-size object in memory, if possible.
  39    Return NULL otherwise.  */
  40
  41 static void *
  42 zerosize_ptr (void)
  43 {
  44 /* Use mmap and mprotect when they exist.  Don't test HAVE_MMAP, because it is
  45    not defined on HP-UX 11 (since it does not support MAP_FIXED).  */
  46 #if HAVE_SYS_MMAN_H && HAVE_MPROTECT
  47 # if HAVE_MAP_ANONYMOUS
  48   const int flags = MAP_ANONYMOUS | MAP_PRIVATE;
  49   const int fd = -1;
  50 # else /* !HAVE_MAP_ANONYMOUS */
  51   const int flags = MAP_FILE | MAP_PRIVATE;
  52   int fd = open ("/dev/zero", O_RDONLY, 0666);
  53   if (fd >= 0)
  54 # endif
  55     {
  56       int pagesize = getpagesize ();
  57       char *two_pages =
  58         (char *) mmap (NULL, 2 * pagesize, PROT_READ | PROT_WRITE,
  59                        flags, fd, 0);
  60       if (two_pages != (char *)(-1)
  61           && mprotect (two_pages + pagesize, pagesize, PROT_NONE) == 0)
  62         return two_pages + pagesize;
  63     }
  64 #endif
  65   return NULL;
  66 }