* elflink.c (enum action_discarded): New.

	(elf_section_complain_discarded): Delete.
	(elf_action_discarded): New function subsuming the above and also
	controlling reloc behaviour.
	(elf_link_input_bfd): Use it.

diff --git a/bfd/ChangeLog b/bfd/ChangeLog
index 558074e..79cdc79 100644 (file)
--- a/bfd/ChangeLog
+++ b/bfd/ChangeLog
@@ -1,3 +1,11 @@
+2004-10-12  Alan Modra  <amodra@bigpond.net.au>
+
+       * elflink.c (enum action_discarded): New.
+       (elf_section_complain_discarded): Delete.
+       (elf_action_discarded): New function subsuming the above and also
+       controlling reloc behaviour.
+       (elf_link_input_bfd): Use it.   
+
 2004-10-11  Jakub Jelinek  <jakub@redhat.com>
 
        * elf.c (bfd_section_from_shdr): Handle SHT_GNU_LIBLIST.

diff --git a/bfd/elflink.c b/bfd/elflink.c
index 834f09a..0687eca 100644 (file)
--- a/bfd/elflink.c
+++ b/bfd/elflink.c
@@ -6374,30 +6374,40 @@ elf_section_ignore_discarded_relocs (asection *sec)
   return FALSE;
 }
 
-/* Return TRUE if we should complain about a reloc in SEC against a
-   symbol defined in a discarded section.  */
-
-static bfd_boolean
-elf_section_complain_discarded (asection *sec)
+enum action_discarded
+  {
+    COMPLAIN = 1,
+    PRETEND = 2
+  };
+
+/* Return a mask saying how ld should treat relocations in SEC against
+   symbols defined in discarded sections.  If this function returns
+   COMPLAIN set, ld will issue a warning message.  If this function
+   returns PRETEND set, and the discarded section was link-once and the
+   same size as the kept link-once section, ld will pretend that the
+   symbol was actually defined in the kept section.  Otherwise ld will
+   zero the reloc (at least that is the intent, but some cooperation by
+   the target dependent code is needed, particularly for REL targets).  */
+
+static unsigned int
+elf_action_discarded (asection *sec)
 {
-  if (strncmp (".stab", sec->name, 5) == 0
-      && (!sec->name[5] ||
-         (sec->name[5] == '.' && ISDIGIT (sec->name[6]))))
-    return FALSE;
+  if (sec->flags & SEC_DEBUGGING)
+    return PRETEND;
 
   if (strcmp (".eh_frame", sec->name) == 0)
-    return FALSE;
+    return 0;
 
   if (strcmp (".gcc_except_table", sec->name) == 0)
-    return FALSE;
+    return 0;
 
   if (strcmp (".PARISC.unwind", sec->name) == 0)
-    return FALSE;
+    return 0;
 
   if (strcmp (".fixup", sec->name) == 0)
-    return FALSE;
+    return 0;
 
-  return TRUE;
+  return COMPLAIN | PRETEND;
 }
 
 /* Find a match between a section and a member of a section group.  */
@@ -6692,7 +6702,7 @@ elf_link_input_bfd (struct elf_final_link_info *finfo, bfd *input_bfd)
          if (!elf_section_ignore_discarded_relocs (o))
            {
              Elf_Internal_Rela *rel, *relend;
-             bfd_boolean complain = elf_section_complain_discarded (o);
+             unsigned int action = elf_action_discarded (o);
 
              rel = internal_relocs;
              relend = rel + o->reloc_count * bed->s->int_rels_per_ext_rel;
@@ -6736,7 +6746,7 @@ elf_link_input_bfd (struct elf_final_link_info *finfo, bfd *input_bfd)
                      asection *kept;
 
                      BFD_ASSERT (r_symndx != 0);
-                     if (complain && (o->flags & SEC_DEBUGGING) == 0)
+                     if (action & COMPLAIN)
                        {
                          (*_bfd_error_handler)
                            (_("`%s' referenced in section `%A' of %B: "
@@ -6756,9 +6766,7 @@ elf_link_input_bfd (struct elf_final_link_info *finfo, bfd *input_bfd)
                         debug sections tend to come after other
                         sections.  */
                      kept = sec->kept_section;
-                     if (kept != NULL
-                         && (complain
-                             || (o->flags & SEC_DEBUGGING) != 0))
+                     if (kept != NULL && (action & PRETEND))
                        {
                          if (elf_sec_group (sec) != NULL)
                            kept = match_group_member (sec, kept);