]> code.delx.au - gnu-emacs/blobdiff - src/unexsgi.c
(Fget_char_property): Update call to overlays_at.
[gnu-emacs] / src / unexsgi.c
index a79fb94e81c2c5c8b9dd95839b2ef6e792844e8a..cd0067f08d93942f38b23eee49cd3275df90f23c 100644 (file)
@@ -1,19 +1,22 @@
 /* Copyright (C) 1985, 1986, 1987, 1988, 1990, 1992
    Free Software Foundation, Inc.
 
-    This program is free software; you can redistribute it and/or modify
-    it under the terms of the GNU General Public License as published by
-    the Free Software Foundation; either version 2, or (at your option)
-    any later version.
+This file is part of GNU Emacs.
 
-    This program is distributed in the hope that it will be useful,
-    but WITHOUT ANY WARRANTY; without even the implied warranty of
-    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-    GNU General Public License for more details.
+GNU Emacs is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2, or (at your option)
+any later version.
 
-    You should have received a copy of the GNU General Public License
-    along with this program; if not, write to the Free Software
-    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+GNU Emacs is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with GNU Emacs; see the file COPYING.  If not, write to
+the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+Boston, MA 02111-1307, USA.
 
 In other words, you are welcome to use, share and improve this program.
 You are forbidden to forbid anyone else to use, share and improve
@@ -409,6 +412,7 @@ Filesz      Memsz       Flags       Align
 
  */
 \f
+#include <config.h>
 #include <sys/types.h>
 #include <stdio.h>
 #include <sys/stat.h>
@@ -755,15 +759,17 @@ unexec (new_name, old_name, data_start, bss_start, entry_address)
          NEW_SECTION_H (nn).sh_size = 0;
        }
       else
-       memcpy (&NEW_SECTION_H (nn), &OLD_SECTION_H (n), 
-               old_file_h->e_shentsize);
+       {
+         memcpy (&NEW_SECTION_H (nn), &OLD_SECTION_H (n), 
+                 old_file_h->e_shentsize);
 
-      /* Any section that was original placed AFTER the bss
-        section must now be adjusted by NEW_OFFSETS_SHIFT.  */
+         /* Any section that was original placed AFTER the bss
+            section must now be adjusted by NEW_OFFSETS_SHIFT.  */
+
+         if (NEW_SECTION_H (nn).sh_offset >= new_data2_offset)
+           NEW_SECTION_H (nn).sh_offset += new_offsets_shift;
+       }
 
-      if (NEW_SECTION_H (nn).sh_offset >= new_data2_offset)
-       NEW_SECTION_H (nn).sh_offset += new_offsets_shift;
-      
       /* If any section hdr refers to the section after the new .data
         section, make it refer to next one because we have inserted 
         a new section in between.  */
@@ -783,9 +789,18 @@ unexec (new_name, old_name, data_start, bss_start, entry_address)
       /* Write out the sections. .data and .data1 (and data2, called
         ".data" in the strings table) get copied from the current process
         instead of the old file.  */
-      if (!strcmp (old_section_names + NEW_SECTION_H (n).sh_name, ".data")
-         || !strcmp (old_section_names + NEW_SECTION_H (n).sh_name, ".data1")
-         || !strcmp (old_section_names + NEW_SECTION_H (n).sh_name, ".got"))
+      if (!strcmp (old_section_names + NEW_SECTION_H (nn).sh_name, ".data")
+         || !strcmp (old_section_names + NEW_SECTION_H (nn).sh_name, ".data1")
+#ifdef IRIX6_5
+         /* Under IRIX 6.5 gcc places objects with adresses relative to 
+            shared symbols in the section .rodata, which are adjusted at
+            startup time. Unfortunately they aren't adjusted after unexec,
+            so with this configuration we must get .rodata also from memory. 
+            Do any other configurations need this, too?
+            <Wolfgang.Glas@hfm.tu-graz.ac.at> 1999-06-08.  */
+         || !strcmp (old_section_names + NEW_SECTION_H (nn).sh_name, ".rodata")
+#endif
+         || !strcmp (old_section_names + NEW_SECTION_H (nn).sh_name, ".got"))
        src = (caddr_t) OLD_SECTION_H (n).sh_addr;
       else
        src = old_base + OLD_SECTION_H (n).sh_offset;
@@ -856,9 +871,9 @@ unexec (new_name, old_name, data_start, bss_start, entry_address)
                                           + new_base);
          for (; num--; sym++)
            {
+             /* don't patch special section indices. */
              if (sym->st_shndx == SHN_UNDEF
-                 || sym->st_shndx == SHN_ABS
-                 || sym->st_shndx == SHN_COMMON)
+                 || sym->st_shndx >= SHN_LORESERVE)
                continue;
        
              PATCH_INDEX (sym->st_shndx);