darlinghq/darling-gdb
1
0
Fork 0
mirror of https://github.com/darlinghq/darling-gdb.git synced 2025-02-03 15:42:52 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

* ldlang.c (lang_insert_orphan): Add __start_<section> symbol

Browse Source 
assignment inside output section statement.  Ensure only one
	set of symbols per output section.
	* emultempl/pe.em (gld_${EMULATION_NAME}_place_orphan): Add non-
	dollar sections before dollar sections.  Correct add_child
	list insertion.
	* emultempl/pep.em (gld_${EMULATION_NAME}_place_orphan): Likewise.
This commit is contained in:
Alan Modra 2009-05-14 02:21:45 +00:00
parent a8310e20c5
commit 011aa75f62
4 changed files with 62 additions and 85 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
ld/ChangeLog
View File

@ -1,3 +1,13 @@
2009-05-14 Alan Modra <amodra@bigpond.net.au>
* ldlang.c (lang_insert_orphan): Add __start_<section> symbol
assignment inside output section statement. Ensure only one
set of symbols per output section.
* emultempl/pe.em (gld_${EMULATION_NAME}_place_orphan): Add non-
dollar sections before dollar sections. Correct add_child
list insertion.
* emultempl/pep.em (gld_${EMULATION_NAME}_place_orphan): Likewise.
2009-05-05 Paul Brook <paul@codesourcery.com>
* emultempl/armelf.em (compare_output_sec_vma): New function.

57
ld/emultempl/pe.em
View File

@ -1771,6 +1771,7 @@ gld_${EMULATION_NAME}_place_orphan (asection *s,
char *dollar = NULL;
lang_output_section_statement_type *os;
lang_statement_list_type add_child;
lang_statement_union_type **pl;
/* Look through the script to see where to place this section. */
if (!link_info.relocatable
@ -1876,47 +1877,29 @@ gld_${EMULATION_NAME}_place_orphan (asection *s,
&add_child);
}
{
lang_statement_union_type **pl = &os->children.head;
/* If the section name has a '\$', sort it with the other '\$'
sections. */
for (pl = &os->children.head; *pl != NULL; pl = &(*pl)->header.next)
{
lang_input_section_type *ls;
const char *lname;
if (dollar != NULL)
{
bfd_boolean found_dollar;
if ((*pl)->header.type != lang_input_section_enum)
continue;
/* The section name has a '\$'. Sort it with the other '\$'
sections. */
found_dollar = FALSE;
for ( ; *pl != NULL; pl = &(*pl)->header.next)
{
lang_input_section_type *ls;
const char *lname;
ls = &(*pl)->input_section;
if ((*pl)->header.type != lang_input_section_enum)
continue;
lname = bfd_get_section_name (ls->section->owner, ls->section);
if (strchr (lname, '\$') != NULL
&& (dollar == NULL || strcmp (orig_secname, lname) < 0))
break;
}
ls = &(*pl)->input_section;
lname = bfd_get_section_name (ls->section->owner, ls->section);
if (strchr (lname, '\$') == NULL)
{
if (found_dollar)
break;
}
else
{
found_dollar = TRUE;
if (strcmp (orig_secname, lname) < 0)
break;
}
}
}
if (add_child.head != NULL)
{
add_child.head->header.next = *pl;
*pl = add_child.head;
}
}
if (add_child.head != NULL)
{
*add_child.tail = *pl;
*pl = add_child.head;
}
return os;
}

57
ld/emultempl/pep.em
View File

@ -1546,6 +1546,7 @@ gld_${EMULATION_NAME}_place_orphan (asection *s,
char *dollar = NULL;
lang_output_section_statement_type *os;
lang_statement_list_type add_child;
lang_statement_union_type **pl;
/* Look through the script to see where to place this section. */
if (!link_info.relocatable
@ -1651,47 +1652,29 @@ gld_${EMULATION_NAME}_place_orphan (asection *s,
&add_child);
}
{
lang_statement_union_type **pl = &os->children.head;
/* If the section name has a '\$', sort it with the other '\$'
sections. */
for (pl = &os->children.head; *pl != NULL; pl = &(*pl)->header.next)
{
lang_input_section_type *ls;
const char *lname;
if (dollar != NULL)
{
bfd_boolean found_dollar;
if ((*pl)->header.type != lang_input_section_enum)
continue;
/* The section name has a '\$'. Sort it with the other '\$'
sections. */
found_dollar = FALSE;
for ( ; *pl != NULL; pl = &(*pl)->header.next)
{
lang_input_section_type *ls;
const char *lname;
ls = &(*pl)->input_section;
if ((*pl)->header.type != lang_input_section_enum)
continue;
lname = bfd_get_section_name (ls->section->owner, ls->section);
if (strchr (lname, '\$') != NULL
&& (dollar == NULL || strcmp (orig_secname, lname) < 0))
break;
}
ls = &(*pl)->input_section;
lname = bfd_get_section_name (ls->section->owner, ls->section);
if (strchr (lname, '\$') == NULL)
{
if (found_dollar)
break;
}
else
{
found_dollar = TRUE;
if (strcmp (orig_secname, lname) < 0)
break;
}
}
}
if (add_child.head != NULL)
{
add_child.head->header.next = *pl;
*pl = add_child.head;
}
}
if (add_child.head != NULL)
{
*add_child.tail = *pl;
*pl = add_child.head;
}
return os;
}

23
ld/ldlang.c
View File

@ -1668,8 +1668,16 @@ lang_insert_orphan (asection *s,
push_stat_ptr (&add);
}
if (link_info.relocatable || (s->flags & (SEC_LOAD | SEC_ALLOC)) == 0)
address = exp_intop (0);
os_tail = ((lang_output_section_statement_type **)
lang_output_section_statement.tail);
os = lang_enter_output_section_statement (secname, address, 0, NULL, NULL,
NULL, constraint);
ps = NULL;
if (config.build_constructors)
if (config.build_constructors && *os_tail == os)
{
/* If the name of the section is representable in C, then create
symbols to mark the start and the end of the section. */
@ -1688,26 +1696,19 @@ lang_insert_orphan (asection *s,
exp_intop ((bfd_vma) 1 << s->alignment_power));
lang_add_assignment (exp_assop ('=', ".", e_align));
lang_add_assignment (exp_provide (symname,
exp_nameop (NAME, "."),
exp_unop (ABSOLUTE,
exp_nameop (NAME, ".")),
FALSE));
}
}
if (link_info.relocatable || (s->flags & (SEC_LOAD | SEC_ALLOC)) == 0)
address = exp_intop (0);
os_tail = ((lang_output_section_statement_type **)
lang_output_section_statement.tail);
os = lang_enter_output_section_statement (secname, address, 0, NULL, NULL,
NULL, constraint);
if (add_child == NULL)
add_child = &os->children;
lang_add_section (add_child, s, os);
lang_leave_output_section_statement (0, "*default*", NULL, NULL);
if (config.build_constructors && *ps == '\0')
if (ps != NULL && *ps == '\0')
{
char *symname;