]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
re PR pch/14400 ([pch] Cannot compile qt-x11-free-3.3.0)
authorIan Lance Taylor <ian@airs.com>
Tue, 2 Aug 2005 19:03:45 +0000 (19:03 +0000)
committerIan Lance Taylor <ian@gcc.gnu.org>
Tue, 2 Aug 2005 19:03:45 +0000 (19:03 +0000)
./ PR pch/14400
Backport from mainline:

2005-08-01  Ian Lance Taylor  <ian@airs.com>

* config/host-linux.c (linux_gt_pch_get_address): Add new name
randomize_va_space for virtual address randomization control.

2005-02-15  James A. Morrison  <phython@gcc.gnu.org>

PR pch/14940
PR target/19300
* config/host-linux.c (linux_gt_pch_use_address): Copy from
config/pa/pa-host.c:pa_gt_pch_use_address.

2004-11-09  James A. Morrison  <phython@gcc.gnu.org>

PR pch/14940
* config/host-linux.c (TRY_EMPTY_VM_SPACE): Add __sparc__
definitions.

2004-10-15  Jon Grimm <jgrimm2@us.ibm.com>

* config/host-linux.c (TRY_EMPTY_VM_SPACE): Add __powerpc__
definition.

2004-04-24  Ulrich Weigand  <uweigand@de.ibm.com>

* config/host-linux.c (TRY_EMPTY_VM_SPACE): Define for __s390__
and __s390x__ hosts.

2004-04-08  Ian Lance Taylor  <ian@wasabisystems.com>

* config/rs6000/host-darwin.c (darwin_rs6000_gt_pch_use_address):
Return 1 if file was successfully mapped.

2004-03-15  Ian Lance Taylor  <ian@wasabisystems.com>

* config/rs6000/host-darwin.c (darwin_rs6000_gt_pch_use_address):
Fix the check for abort and only do the mmap if we can.

2004-03-12  Andrew Pinski  <apinski@apple.com>

* config/rs6000/host-darwin.c (darwin_rs6000_gt_pch_use_address):
Use ret instead of result. Use addr instead of base.

2004-03-10  Richard Henderson  <rth@redhat.com>

* c-pch.c (c_common_no_more_pch): Update for gt_pch_use_address
extra arguments.
* config.host (*-*-solaris2*, *-*-linux*): Add out_host_hook_obj
and host_xmake_file fragments.
* ggc-common.c (gt_pch_save): Update for gt_pch_get_address change.
(gt_pch_restore): Similarly for gt_pch_use_address.
(default_gt_pch_get_address): New.
(mmap_gt_pch_get_address): Split out of gt_pch_save.
(default_gt_pch_use_address): Split out of gt_pch_restore.
(mmap_gt_pch_use_address): Likewise.
* hooks.c (hook_voidp_size_t_null): Remove.
(hook_bool_voidp_size_t_false): Remove.
* hooks.h: Likewise.
* hosthooks-def.h (HOST_HOOKS_GT_PCH_GET_ADDRESS): Use one of the
default_ or mmap_ definitions.
(HOST_HOOKS_GT_PCH_USE_ADDRESS): Likewise.
* hosthooks.h (struct host_hooks): Update gt_pch_get_address
and gt_pch_use_address.
* config/host-linux.c, config/host-solaris.c: New files.
* config/x-linux, config/x-solaris: New files.
* config/rs6000/host-darwin.c darwin_rs6000_gt_pch_get_address):
Update for changed definition.
(darwin_rs6000_gt_pch_use_address): Likewise.
* doc/hostconfig.texi: Update docs.
testsuite/
PR pch/14400
Backport from mainline:

2004-04-07  Ian Lance Taylor  <ian@wasabisystems.com>

* gcc.dg/pch/pch.exp: Add largefile test.

From-SVN: r102664

16 files changed:
gcc/ChangeLog
gcc/c-pch.c
gcc/config.host
gcc/config/host-linux.c
gcc/config/host-solaris.c
gcc/config/rs6000/host-darwin.c
gcc/config/x-linux
gcc/config/x-solaris
gcc/doc/hostconfig.texi
gcc/ggc-common.c
gcc/hooks.c
gcc/hooks.h
gcc/hosthooks-def.h
gcc/hosthooks.h
gcc/testsuite/ChangeLog
gcc/testsuite/gcc.dg/pch/pch.exp

index 12753f374724bdebbb9554041984898f1bf7610e..431a342353fbbe032794ae1cb1acd9393ef5aec5 100644 (file)
@@ -1,3 +1,78 @@
+2005-08-02  Ian Lance Taylor  <ian@airs.com>
+
+       PR pch/14400
+       Backport from mainline:
+
+       2005-08-01  Ian Lance Taylor  <ian@airs.com>
+
+       * config/host-linux.c (linux_gt_pch_get_address): Add new name
+       randomize_va_space for virtual address randomization control.
+
+       2005-02-15  James A. Morrison  <phython@gcc.gnu.org>
+
+       PR pch/14940
+       PR target/19300
+       * config/host-linux.c (linux_gt_pch_use_address): Copy from
+       config/pa/pa-host.c:pa_gt_pch_use_address.
+
+       2004-11-09  James A. Morrison  <phython@gcc.gnu.org>
+
+       PR pch/14940
+       * config/host-linux.c (TRY_EMPTY_VM_SPACE): Add __sparc__
+       definitions.
+
+       2004-10-15  Jon Grimm <jgrimm2@us.ibm.com>
+
+       * config/host-linux.c (TRY_EMPTY_VM_SPACE): Add __powerpc__
+       definition.
+
+       2004-04-24  Ulrich Weigand  <uweigand@de.ibm.com>
+
+       * config/host-linux.c (TRY_EMPTY_VM_SPACE): Define for __s390__
+       and __s390x__ hosts.
+
+       2004-04-08  Ian Lance Taylor  <ian@wasabisystems.com>
+
+       * config/rs6000/host-darwin.c (darwin_rs6000_gt_pch_use_address):
+       Return 1 if file was successfully mapped.
+
+       2004-03-15  Ian Lance Taylor  <ian@wasabisystems.com>
+
+       * config/rs6000/host-darwin.c (darwin_rs6000_gt_pch_use_address):
+       Fix the check for abort and only do the mmap if we can.
+
+       2004-03-12  Andrew Pinski  <apinski@apple.com>
+
+       * config/rs6000/host-darwin.c (darwin_rs6000_gt_pch_use_address):
+       Use ret instead of result. Use addr instead of base.
+
+       2004-03-10  Richard Henderson  <rth@redhat.com>
+
+       * c-pch.c (c_common_no_more_pch): Update for gt_pch_use_address
+       extra arguments.
+       * config.host (*-*-solaris2*, *-*-linux*): Add out_host_hook_obj
+       and host_xmake_file fragments.
+       * ggc-common.c (gt_pch_save): Update for gt_pch_get_address change.
+       (gt_pch_restore): Similarly for gt_pch_use_address.
+       (default_gt_pch_get_address): New.
+       (mmap_gt_pch_get_address): Split out of gt_pch_save.
+       (default_gt_pch_use_address): Split out of gt_pch_restore.
+       (mmap_gt_pch_use_address): Likewise.
+       * hooks.c (hook_voidp_size_t_null): Remove.
+       (hook_bool_voidp_size_t_false): Remove.
+       * hooks.h: Likewise.
+       * hosthooks-def.h (HOST_HOOKS_GT_PCH_GET_ADDRESS): Use one of the
+       default_ or mmap_ definitions.
+       (HOST_HOOKS_GT_PCH_USE_ADDRESS): Likewise.
+       * hosthooks.h (struct host_hooks): Update gt_pch_get_address
+       and gt_pch_use_address.
+       * config/host-linux.c, config/host-solaris.c: New files.
+       * config/x-linux, config/x-solaris: New files.
+       * config/rs6000/host-darwin.c darwin_rs6000_gt_pch_get_address): 
+       Update for changed definition.
+       (darwin_rs6000_gt_pch_use_address): Likewise.
+       * doc/hostconfig.texi: Update docs.
+
 2005-07-31  Richard Sandiford  <richard@codesourcery.com>
 
        PR target/20621
index 8e4b6024359246622df3a83cadeafe193564a090..45898642966543d27a343ae3c295970c86e13a34 100644 (file)
@@ -428,6 +428,6 @@ c_common_no_more_pch (void)
   if (cpp_get_callbacks (parse_in)->valid_pch)
     {
       cpp_get_callbacks (parse_in)->valid_pch = NULL;
-      host_hooks.gt_pch_use_address (NULL, 0);
+      host_hooks.gt_pch_use_address (NULL, 0, -1, 0);
     }
 }
index fa6bced73dbef43c10057edea9f54aa7d8347032..19566518810f091e80c29b927f43ff8c7ab5b87d 100644 (file)
@@ -113,6 +113,8 @@ case ${host} in
     ;;
   i[34567]86-*-solaris2*)
     host_xm_defines="SMALL_ARG_MAX"
+    out_host_hook_obj=host-solaris.o
+    host_xmake_file=x-solaris
     ;;
   i[34567]86-*-sysv4*) # Intel 80386's running System V Release 4
     host_xm_defines="SMALL_ARG_MAX"
@@ -152,4 +154,12 @@ case ${host} in
     out_host_hook_obj=host-darwin.o
     host_xmake_file=rs6000/x-darwin
     ;;
+  *-*-solaris2*)
+    out_host_hook_obj=host-solaris.o
+    host_xmake_file=x-solaris
+    ;;
+  *-*-linux*)
+    out_host_hook_obj=host-linux.o
+    host_xmake_file=x-linux
+    ;;
 esac
index 795bb552234002cdbccec9ead739f73fe685537d..d5fea9d79b36b6b3167329508c8e38a42c6ee60d 100644 (file)
@@ -15,8 +15,8 @@
 
    You should have received a copy of the GNU General Public License
    along with GCC; see the file COPYING.  If not, write to the
-   Free Software Foundation, 51 Franklin Street, Fifth Floor, Boston,
-   MA 02110-1301, USA.  */
+   Free Software Foundation, 59 Temple Place - Suite 330, Boston,
+   MA 02111-1307, USA.  */
 
 #include "config.h"
 #include "system.h"
index df5f47391a7be85befeb15103dd22912b5d086a9..4fa7a5b1ad00d503164f4b69c2e81ea56f966f4e 100644 (file)
@@ -15,8 +15,8 @@
 
    You should have received a copy of the GNU General Public License
    along with GCC; see the file COPYING.  If not, write to the
-   Free Software Foundation, 51 Franklin Street, Fifth Floor, Boston,
-   MA 02110-1301, USA.  */
+   Free Software Foundation, 59 Temple Place - Suite 330, Boston,
+   MA 02111-1307, USA.  */
 
 #include "config.h"
 #include "system.h"
index 7e8055690e42dc5eb50b3fc06cf545fa41b230d4..d04270c3675bff88f3feee61bbc9df314143ae1f 100644 (file)
@@ -1,5 +1,5 @@
 /* Darwin/powerpc host-specific hook definitions.
-   Copyright (C) 2003 Free Software Foundation, Inc.
+   Copyright (C) 2003, 2004 Free Software Foundation, Inc.
 
    This file is part of GCC.
 
@@ -137,22 +137,18 @@ darwin_rs6000_extra_signals (void)
     fatal_error ("While setting up signal handler: %m");
 }
 \f
-static void * darwin_rs6000_gt_pch_get_address (size_t);
-static bool darwin_rs6000_gt_pch_use_address (void *, size_t);
-
 #undef HOST_HOOKS_GT_PCH_GET_ADDRESS
 #define HOST_HOOKS_GT_PCH_GET_ADDRESS darwin_rs6000_gt_pch_get_address
 #undef HOST_HOOKS_GT_PCH_USE_ADDRESS
 #define HOST_HOOKS_GT_PCH_USE_ADDRESS darwin_rs6000_gt_pch_use_address
 
-
 /* Yes, this is really supposed to work.  */
 static char pch_address_space[1024*1024*1024] __attribute__((aligned (4096)));
 
 /* Return the address of the PCH address space, if the PCH will fit in it.  */
 
 static void *
-darwin_rs6000_gt_pch_get_address (size_t sz)
+darwin_rs6000_gt_pch_get_address (size_t sz, int fd ATTRIBUTE_UNUSED)
 {
   if (sz <= sizeof (pch_address_space))
     return pch_address_space;
@@ -163,18 +159,19 @@ darwin_rs6000_gt_pch_get_address (size_t sz)
 /* Check ADDR and SZ for validity, and deallocate (using munmap) that part of
    pch_address_space beyond SZ.  */
 
-static bool
-darwin_rs6000_gt_pch_use_address (void *addr, size_t sz)
+static int
+darwin_rs6000_gt_pch_use_address (void *addr, size_t sz, int fd, size_t off)
 {
   const size_t pagesize = getpagesize();
-  bool result;
+  void *mmap_result;
+  int ret;
 
   if ((size_t)pch_address_space % pagesize != 0
       || sizeof (pch_address_space) % pagesize != 0)
     abort ();
   
-  result = (addr == pch_address_space && sz <= sizeof (pch_address_space));
-  if (! result)
+  ret = (addr == pch_address_space && sz <= sizeof (pch_address_space));
+  if (! ret)
     sz = 0;
 
   /* Round the size to a whole page size.  Normally this is a no-op.  */
@@ -183,7 +180,22 @@ darwin_rs6000_gt_pch_use_address (void *addr, size_t sz)
   if (munmap (pch_address_space + sz, sizeof (pch_address_space) - sz) != 0)
     fatal_error ("couldn't unmap pch_address_space: %m\n");
 
-  return result;
+  if (ret)
+    {
+      mmap_result = mmap (addr, sz,
+                         PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_FIXED,
+                         fd, off);
+
+      /* The file might not be mmap-able.  */
+      ret = mmap_result != (void *) MAP_FAILED;
+
+      /* Sanity check for broken MAP_FIXED.  */
+      if (ret && mmap_result != addr)
+       abort ();
+    }
+
+  return ret;
 }
+\f
 
 const struct host_hooks host_hooks = HOST_HOOKS_INITIALIZER;
index e4aa040bcebb09781fbe3bc735fa9ecfd287ac1d..d14586b0b363306d5f00817769dfcf5c34e612a2 100644 (file)
@@ -1,4 +1,4 @@
 host-linux.o : $(srcdir)/config/host-linux.c $(CONFIG_H) $(SYSTEM_H) \
-  coretypes.h hosthooks.h hosthooks-def.h $(HOOKS_H)
+  coretypes.h hosthooks.h hosthooks-def.h
        $(CC) -c $(ALL_CFLAGS) $(ALL_CPPFLAGS) $(INCLUDES) \
                $(srcdir)/config/host-linux.c
index 59c7bf61f5c5f9e7eb6d7335211106c67e7c4eef..782f4a3680250bcd6bb5faf6c04ca69bfd8c870e 100644 (file)
@@ -1,4 +1,4 @@
 host-solaris.o : $(srcdir)/config/host-solaris.c $(CONFIG_H) $(SYSTEM_H) \
-  coretypes.h hosthooks.h hosthooks-def.h $(HOOKS_H)
+  coretypes.h hosthooks.h hosthooks-def.h
        $(CC) -c $(ALL_CFLAGS) $(ALL_CPPFLAGS) $(INCLUDES) \
                $(srcdir)/config/host-solaris.c
index 5c38313efd21e4cf2420862f33f3d68c67d6ef0f..8830c6b8ac1af74244b791a743f77877a52ceecd 100644 (file)
@@ -42,35 +42,31 @@ This host hook is used to set up handling for extra signals.  The most
 common thing to do in this hook is to detect stack overflow.
 @end deftypefn
 
-@deftypefn {Host Hook} void * HOST_HOOKS_GT_PCH_GET_ADDRESS (size_t @var{size})
-This host hook returns the address of some space in which a PCH may be
-loaded with @samp{HOST_HOOKS_PCH_LOAD_PCH}.  The space will need to
-have @var{size} bytes.  If insufficient space is available,
-@samp{NULL} may be returned; the PCH machinery will try to find a
-suitable address using a heuristic.
-
-The memory does not have to be available now.  In fact, usually
-@samp{HOST_HOOKS_PCH_LOAD_PCH} will already have been called.  The memory
-need only be available in future invocations of GCC.
+@deftypefn {Host Hook} void * HOST_HOOKS_GT_PCH_GET_ADDRESS (size_t @var{size}, int @var{fd})
+This host hook returns the address of some space that is likely to be
+free in some subsequent invocation of the compiler.  We intend to load
+the PCH data at this address such that the data need not be relocated.
+The area should be able to hold @var{size} bytes.  If the host uses
+@code{mmap}, @var{fd} is an open file descriptor that can be used for
+probing.
 @end deftypefn
 
-@deftypefn {Host Hook} bool HOST_HOOKS_GT_PCH_USE_ADDRESS (size_t @var{size}, void * @var{address})
-This host hook is called when a PCH file is about to be loaded.  If
-@var{address} is the address that would have been returned by
-@samp{HOST_HOOKS_PCH_MEMORY_ADDRESS}, and @var{size} is smaller than
-the maximum than @samp{HOST_HOOKS_PCH_MEMORY_ADDRESS} would have
-accepted, return true, otherwise return false.
+@deftypefn {Host Hook} int HOST_HOOKS_GT_PCH_USE_ADDRESS (void * @var{address}, size_t @var{size}, int @var{fd}, size_t @var{offset})
+This host hook is called when a PCH file is about to be loaded.
+We want to load @var{size} bytes from @var{fd} at @var{offset}
+into memory at @var{address}.  The given address will be the result of
+a previous invocation of @code{HOST_HOOKS_GT_PCH_GET_ADDRESS}.
+Return @minus{}1 if we couldn't allocate @var{size} bytes at @var{address}.
+Return 0 if the memory is allocated but the data is not loaded.  Return 1
+if the hook has performed everything.
 
-In addition, free any address space reserved that isn't needed to hold
-@var{size} bytes (whether or not true is returned).  The PCH machinery will
-use @samp{mmap} with @samp{MAP_FIXED} to load the PCH if @samp{HAVE_MMAP_FILE},
-or will use @samp{fread} otherwise.
-
-If no PCH will be loaded, this hook may be called with @var{size}
-zero, in which case all reserved address space should be freed.
+If the implementation uses reserved address space, free any reserved
+space beyond @var{size}, regardless of the return value.  If no PCH will
+be loaded, this hook may be called with @var{size} zero, in which case
+all reserved address space should be freed.
 
 Do not try to handle values of @var{address} that could not have been
-returned by this executable; just return false.  Such values usually
+returned by this executable; just return @minus{}1.  Such values usually
 indicate an out-of-date PCH file (built by some other GCC executable),
 and such a PCH file won't work.
 @end deftypefn
index ecd6624487c3b791ad92b0f501fcc50c44e029e1..583059173bea1ab67556d1162a9e0d2b7bf88569 100644 (file)
@@ -30,6 +30,7 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 #include "toplev.h"
 #include "params.h"
 #include "hosthooks.h"
+#include "hosthooks-def.h"
 
 #ifdef HAVE_SYS_RESOURCE_H
 # include <sys/resource.h>
@@ -458,21 +459,8 @@ gt_pch_save (FILE *f)
      and on the rest it's a lot of work to do better.  
      (The extra work goes in HOST_HOOKS_GT_PCH_GET_ADDRESS and
      HOST_HOOKS_GT_PCH_USE_ADDRESS.)  */
-  mmi.preferred_base = host_hooks.gt_pch_get_address (mmi.size);
+  mmi.preferred_base = host_hooks.gt_pch_get_address (mmi.size, fileno (f));
       
-#if HAVE_MMAP_FILE
-  if (mmi.preferred_base == NULL)
-    {
-      mmi.preferred_base = mmap (NULL, mmi.size,
-                                PROT_READ | PROT_WRITE, MAP_PRIVATE,
-                                fileno (state.f), 0);
-      if (mmi.preferred_base == (void *) MAP_FAILED)
-       mmi.preferred_base = NULL;
-      else
-       munmap (mmi.preferred_base, mmi.size);
-    }
-#endif /* HAVE_MMAP_FILE */
-
   ggc_pch_this_base (state.d, mmi.preferred_base);
 
   state.ptrs = xmalloc (state.count * sizeof (*state.ptrs));
@@ -526,7 +514,8 @@ gt_pch_save (FILE *f)
                                  state.ptrs[i]->note_ptr_cookie,
                                  relocate_ptrs, &state);
       ggc_pch_write_object (state.d, state.f, state.ptrs[i]->obj,
-                           state.ptrs[i]->new_addr, state.ptrs[i]->size, state.ptrs[i]->note_ptr_fn == gt_pch_p_S);
+                           state.ptrs[i]->new_addr, state.ptrs[i]->size,
+                           state.ptrs[i]->note_ptr_fn == gt_pch_p_S);
       if (state.ptrs[i]->note_ptr_fn != gt_pch_p_S)
        memcpy (state.ptrs[i]->obj, this_object, state.ptrs[i]->size);
     }
@@ -546,8 +535,7 @@ gt_pch_restore (FILE *f)
   const struct ggc_root_tab *rti;
   size_t i;
   struct mmap_info mmi;
-  void *addr;
-  bool needs_read;
+  int result;
 
   /* Delete any deletable objects.  This makes ggc_pch_read much
      faster, as it can be sure that no GCable objects remain other
@@ -580,110 +568,95 @@ gt_pch_restore (FILE *f)
   if (fread (&mmi, sizeof (mmi), 1, f) != 1)
     fatal_error ("can't read PCH file: %m");
 
-  if (host_hooks.gt_pch_use_address (mmi.preferred_base, mmi.size))
-    {
-#if HAVE_MMAP_FILE
-      void *mmap_result;
-
-      mmap_result = mmap (mmi.preferred_base, mmi.size,
-                         PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_FIXED,
-                         fileno (f), mmi.offset);
-
-      /* The file might not be mmap-able.  */
-      needs_read = mmap_result == (void *) MAP_FAILED;
-
-      /* Sanity check for broken MAP_FIXED.  */
-      if (! needs_read && mmap_result != mmi.preferred_base)
-       abort ();
-#else
-      needs_read = true;
-#endif
-      addr = mmi.preferred_base;
-    }
-  else
-    {
-#if HAVE_MMAP_FILE
-      addr = mmap (mmi.preferred_base, mmi.size,
-                  PROT_READ | PROT_WRITE, MAP_PRIVATE,
-                  fileno (f), mmi.offset);
-      
-#if HAVE_MINCORE
-      if (addr != mmi.preferred_base)
-       {
-         size_t page_size = getpagesize();
-         char one_byte;
-         
-         if (addr != (void *) MAP_FAILED)
-           munmap (addr, mmi.size);
-         
-         /* We really want to be mapped at mmi.preferred_base
-            so we're going to resort to MAP_FIXED.  But before,
-            make sure that we can do so without destroying a
-            previously mapped area, by looping over all pages
-            that would be affected by the fixed mapping.  */
-         errno = 0;
-         
-         for (i = 0; i < mmi.size; i+= page_size)
-           if (mincore ((char *)mmi.preferred_base + i, page_size, 
-                        (void *)&one_byte) == -1
-               && errno == ENOMEM)
-             continue; /* The page is not mapped.  */
-           else
-             break;
-         
-         if (i >= mmi.size)
-           addr = mmap (mmi.preferred_base, mmi.size, 
-                        PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_FIXED,
-                        fileno (f), mmi.offset);
-       }
-#endif /* HAVE_MINCORE */
-      
-      needs_read = addr == (void *) MAP_FAILED;
-
-#else /* HAVE_MMAP_FILE */
-      needs_read = true;
-#endif /* HAVE_MMAP_FILE */
-      if (needs_read)
-       addr = xmalloc (mmi.size);
-    }
-
-  if (needs_read)
+  result = host_hooks.gt_pch_use_address (mmi.preferred_base, mmi.size,
+                                         fileno (f), mmi.offset);
+  if (result < 0)
+    fatal_error ("had to relocate PCH");
+  if (result == 0)
     {
       if (fseek (f, mmi.offset, SEEK_SET) != 0
-         || fread (&mmi, mmi.size, 1, f) != 1)
+         || fread (mmi.preferred_base, mmi.size, 1, f) != 1)
        fatal_error ("can't read PCH file: %m");
     }
   else if (fseek (f, mmi.offset + mmi.size, SEEK_SET) != 0)
     fatal_error ("can't read PCH file: %m");
 
-  ggc_pch_read (f, addr);
+  ggc_pch_read (f, mmi.preferred_base);
 
-  if (addr != mmi.preferred_base)
-    {
-      for (rt = gt_ggc_rtab; *rt; rt++)
-       for (rti = *rt; rti->base != NULL; rti++)
-         for (i = 0; i < rti->nelt; i++)
-           {
-             char **ptr = (char **)((char *)rti->base + rti->stride * i);
-             if (*ptr != NULL)
-               *ptr += (size_t)addr - (size_t)mmi.preferred_base;
-           }
+  gt_pch_restore_stringpool ();
+}
 
-      for (rt = gt_pch_cache_rtab; *rt; rt++)
-       for (rti = *rt; rti->base != NULL; rti++)
-         for (i = 0; i < rti->nelt; i++)
-           {
-             char **ptr = (char **)((char *)rti->base + rti->stride * i);
-             if (*ptr != NULL)
-               *ptr += (size_t)addr - (size_t)mmi.preferred_base;
-           }
+/* Default version of HOST_HOOKS_GT_PCH_GET_ADDRESS when mmap is not present.
+   Select no address whatsoever, and let gt_pch_save choose what it will with
+   malloc, presumably.  */
 
-      sorry ("had to relocate PCH");
-    }
+void *
+default_gt_pch_get_address (size_t size ATTRIBUTE_UNUSED,
+                           int fd ATTRIBUTE_UNUSED)
+{
+  return NULL;
+}
 
-  gt_pch_restore_stringpool ();
+/* Default version of HOST_HOOKS_GT_PCH_USE_ADDRESS when mmap is not present.
+   Allocate SIZE bytes with malloc.  Return 0 if the address we got is the
+   same as base, indicating that the memory has been allocated but needs to
+   be read in from the file.  Return -1 if the address differs, to relocation
+   of the PCH file would be required.  */
+
+int
+default_gt_pch_use_address (void *base, size_t size, int fd ATTRIBUTE_UNUSED,
+                           size_t offset ATTRIBUTE_UNUSED)
+{
+  void *addr = xmalloc (size);
+  return (addr == base) - 1;
 }
 
+#if HAVE_MMAP_FILE
+/* Default version of HOST_HOOKS_GT_PCH_GET_ADDRESS when mmap is present.
+   We temporarily allocate SIZE bytes, and let the kernel place the data
+   whereever it will.  If it worked, that's our spot, if not we're likely
+   to be in trouble.  */
+void *
+mmap_gt_pch_get_address (size_t size, int fd)
+{
+  void *ret;
+  ret = mmap (NULL, size, PROT_READ | PROT_WRITE, MAP_PRIVATE, fd, 0);
+  if (ret == (void *) MAP_FAILED)
+    ret = NULL;
+  else
+    munmap (ret, size);
+  return ret;
+}
+
+/* Default version of HOST_HOOKS_GT_PCH_USE_ADDRESS when mmap is present.
+   Map SIZE bytes of FD+OFFSET at BASE.  Return 1 if we succeeded at 
+   mapping the data at BASE, -1 if we couldn't.
+   This version assumes that the kernel honors the START operand of mmap
+   even without MAP_FIXED if START through START+SIZE are not currently
+   mapped with something.  */
+int
+mmap_gt_pch_use_address (void *base, size_t size, int fd, size_t offset)
+{
+  void *addr;
+  /* We're called with size == 0 if we're not planning to load a PCH
+     file at all.  This allows the hook to free any static space that
+     we might have allocated at link time.  */
+  if (size == 0)
+    return -1;
+  addr = mmap (base, size, PROT_READ | PROT_WRITE, MAP_PRIVATE,
+              fd, offset);
+
+  return addr == base ? 1 : -1;
+ }
+#endif /* HAVE_MMAP_FILE */
+
 /* Modify the bound based on rlimits.  Keep the smallest number found.  */
 static double
 ggc_rlimit_bound (double limit)
index 06a5732eae33b3817f1274a78e08f84b18b4b0d6..9179938fe3b10edf32169847e6ac9ac3b0b9ae9d 100644 (file)
@@ -213,21 +213,6 @@ hook_rtx_tree_int_null (tree a ATTRIBUTE_UNUSED, int b ATTRIBUTE_UNUSED)
   return NULL;
 }
 
-/* Generic hook that takes a size_t and returns NULL.  */
-void *
-hook_voidp_size_t_null (size_t a ATTRIBUTE_UNUSED)
-{
-  return NULL;
-}
-
-/* Generic hook that takes a size_t and a pointer and returns false.  */
-bool
-hook_bool_voidp_size_t_false (void * a ATTRIBUTE_UNUSED,
-                             size_t b ATTRIBUTE_UNUSED)
-{
-  return false;
-}
-
 /* Generic hook that takes a tree and returns a NULL string.  */
 const char *
 hook_constcharptr_tree_null (tree t ATTRIBUTE_UNUSED)
index 8f4c24f85bb2e20663cf2c5a4e27c0085ab44d27..4547e04bc4fbffdb8bec25a69f674a7f1c3a0f08 100644 (file)
@@ -58,7 +58,5 @@ extern bool hook_bool_tree_tree_false (tree, tree);
 extern rtx hook_rtx_rtx_identity (rtx);
 extern rtx hook_rtx_rtx_null (rtx);
 extern rtx hook_rtx_tree_int_null (tree, int);
-extern void * hook_voidp_size_t_null (size_t);
-extern bool hook_bool_voidp_size_t_false (void *, size_t);
 extern const char *hook_constcharptr_tree_null (tree);
 #endif
index b1a41e7298892f75473684003942cd7563be40ab..537ac6f262432e5761ae70f4a7452fe534a44449 100644 (file)
@@ -24,8 +24,18 @@ Boston, MA 02111-1307, USA.  */
 #include "hooks.h"
 
 #define HOST_HOOKS_EXTRA_SIGNALS hook_void_void
-#define HOST_HOOKS_GT_PCH_GET_ADDRESS hook_voidp_size_t_null
-#define HOST_HOOKS_GT_PCH_USE_ADDRESS hook_bool_voidp_size_t_false
+#if HAVE_MMAP_FILE
+#define HOST_HOOKS_GT_PCH_GET_ADDRESS mmap_gt_pch_get_address
+#define HOST_HOOKS_GT_PCH_USE_ADDRESS mmap_gt_pch_use_address
+#else
+#define HOST_HOOKS_GT_PCH_GET_ADDRESS default_gt_pch_get_address
+#define HOST_HOOKS_GT_PCH_USE_ADDRESS default_gt_pch_use_address
+#endif
+
+extern void* default_gt_pch_get_address (size_t, int);
+extern int default_gt_pch_use_address (void *, size_t, int, size_t);
+extern void* mmap_gt_pch_get_address (size_t, int);
+extern int mmap_gt_pch_use_address (void *, size_t, int, size_t);
 
 /* The structure is defined in hosthooks.h.  */
 #define HOST_HOOKS_INITIALIZER {               \
index bbc28f69d4db4749ef4921ef10f025ed1582fd47..a3fc0c7c4307c1a0c27fa1be757b0147edaf5418 100644 (file)
@@ -25,8 +25,16 @@ struct host_hooks
 {
   void (*extra_signals) (void);
 
-  void * (*gt_pch_get_address) (size_t);
-  bool (*gt_pch_use_address) (void *, size_t);
+  /* Identify an address that's likely to be free in a subsequent invocation
+     of the compiler.  The area should be able to hold SIZE bytes.  FD is an
+     open file descriptor if the host would like to probe with mmap.  */
+  void * (*gt_pch_get_address) (size_t size, int fd);
+
+  /* ADDR is an address returned by gt_pch_get_address.  Attempt to allocate
+     SIZE bytes at the same address and load it with the data from FD at 
+     OFFSET.  Return -1 if we couldn't allocate memory at ADDR, return 0
+     if the memory is allocated but the data not loaded, return 1 if done.  */
+  int (*gt_pch_use_address) (void *addr, size_t size, int fd, size_t offset);
 
   /* Whenever you add entries here, make sure you adjust hosthooks-def.h.  */
 };
index 53396fba8c572f0494d52ca928f118731255657d..e5eb107e42f58d8b44bc8bd083ba50b37276bf3b 100644 (file)
@@ -1,3 +1,12 @@
+2005-08-02  Ian Lance Taylor  <ian@airs.com>
+
+       PR pch/14400
+       Backport from mainline:
+
+       2004-04-07  Ian Lance Taylor  <ian@wasabisystems.com>
+
+       * gcc.dg/pch/pch.exp: Add largefile test.
+
 2005-07-31  Richard Sandiford  <richard@codesourcery.com>
 
        PR target/20621
index 8ed26ba7ef7db0e20f2797fec2600d97eabbd177..79fd9e7713964dd224a04736b582896f00a0dd0d 100644 (file)
@@ -37,6 +37,21 @@ foreach test [lsort [glob -nocomplain $srcdir/$subdir/*.c]] {
     dg-pch $subdir $test [concat [list {-O0 -g}] $torture_without_loops] ".h"
 }
 
+set test "largefile.c"
+set testh "largefile.hs"
+set f [open $test w]
+set v 0
+for { set v 0 } { $v < 10000 } { incr v } {
+    puts $f "#define MACRO_${v} \"1234567890\" \"$v\""
+}
+puts $f "#include \"largefile.h\""
+close $f
+set f [open $testh w]
+close $f
+dg-pch $subdir $test [concat [list {-O0 -g}] $torture_without_loops] ".h"    
+file delete $test
+file delete $testh
+
 set dg-do-what-default "$old_dg_do_what_default"
 
 # All done.