2001-10-30 16:20:14 +01:00
|
|
|
|
# This shell script emits a C file. -*- C -*-
|
2009-09-02 09:25:43 +02:00
|
|
|
|
# Copyright 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009
|
2008-02-15 04:35:53 +01:00
|
|
|
|
# Free Software Foundation, Inc.
|
2001-10-30 16:20:14 +01:00
|
|
|
|
#
|
2007-07-06 16:09:45 +02:00
|
|
|
|
# This file is part of the GNU Binutils.
|
2001-10-30 16:20:14 +01:00
|
|
|
|
#
|
|
|
|
|
# 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
|
2007-07-06 16:09:45 +02:00
|
|
|
|
# the Free Software Foundation; either version 3 of the License, or
|
2001-10-30 16:20:14 +01:00
|
|
|
|
# (at your option) any later version.
|
|
|
|
|
#
|
|
|
|
|
# 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.
|
|
|
|
|
#
|
|
|
|
|
# You should have received a copy of the GNU General Public License
|
|
|
|
|
# along with this program; if not, write to the Free Software
|
2007-07-06 16:09:45 +02:00
|
|
|
|
# Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
|
|
|
|
|
# MA 02110-1301, USA.
|
2001-10-30 16:20:14 +01:00
|
|
|
|
#
|
|
|
|
|
|
2006-06-21 04:53:43 +02:00
|
|
|
|
# This file is sourced from generic.em.
|
2001-10-30 16:20:14 +01:00
|
|
|
|
|
2007-07-19 21:56:10 +02:00
|
|
|
|
fragment <<EOF
|
2006-06-21 04:53:43 +02:00
|
|
|
|
/* Need to have this macro defined before mmix-elfnmmo, which uses the
|
|
|
|
|
name for the before_allocation function, defined in ldemul.c (for
|
|
|
|
|
the mmo "emulation") or in elf32.em (for the elf64mmix
|
|
|
|
|
"emulation"). */
|
2002-02-01 09:24:03 +01:00
|
|
|
|
#define gldmmo_before_allocation before_allocation_default
|
2006-06-20 04:22:16 +02:00
|
|
|
|
|
2006-06-21 04:53:43 +02:00
|
|
|
|
/* We include this header *not* because we expect to handle ELF here
|
|
|
|
|
but because we re-use the map_segments function in elf-generic.em,
|
|
|
|
|
a file which is rightly somewhat ELF-centric. But this is only to
|
|
|
|
|
get a weird testcase right; ld-mmix/bpo-22, forcing ELF to be
|
|
|
|
|
output from the mmo emulation: -m mmo --oformat elf64-mmix! */
|
2006-06-20 04:22:16 +02:00
|
|
|
|
#include "elf-bfd.h"
|
2009-08-10 09:50:56 +02:00
|
|
|
|
|
|
|
|
|
static void gld${EMULATION_NAME}_after_allocation (void);
|
2002-02-01 09:24:03 +01:00
|
|
|
|
EOF
|
|
|
|
|
|
2007-07-19 21:56:10 +02:00
|
|
|
|
source_em ${srcdir}/emultempl/elf-generic.em
|
|
|
|
|
source_em ${srcdir}/emultempl/mmix-elfnmmo.em
|
2001-10-30 16:20:14 +01:00
|
|
|
|
|
2007-07-19 21:56:10 +02:00
|
|
|
|
fragment <<EOF
|
2001-10-30 16:20:14 +01:00
|
|
|
|
|
|
|
|
|
/* Place an orphan section. We use this to put random SEC_CODE or
|
|
|
|
|
SEC_READONLY sections right after MMO_TEXT_SECTION_NAME. Much borrowed
|
|
|
|
|
from elf32.em. */
|
|
|
|
|
|
2008-10-20 14:14:29 +02:00
|
|
|
|
static lang_output_section_statement_type *
|
2008-10-04 08:08:59 +02:00
|
|
|
|
mmo_place_orphan (asection *s,
|
|
|
|
|
const char *secname,
|
|
|
|
|
int constraint ATTRIBUTE_UNUSED)
|
2001-10-30 16:20:14 +01:00
|
|
|
|
{
|
2004-10-14 14:54:47 +02:00
|
|
|
|
static struct orphan_save hold_text =
|
|
|
|
|
{
|
|
|
|
|
MMO_TEXT_SECTION_NAME,
|
|
|
|
|
SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_READONLY | SEC_CODE,
|
|
|
|
|
0, 0, 0, 0
|
|
|
|
|
};
|
2001-10-30 16:20:14 +01:00
|
|
|
|
struct orphan_save *place;
|
2004-10-14 14:54:47 +02:00
|
|
|
|
lang_output_section_statement_type *after;
|
2001-10-30 16:20:14 +01:00
|
|
|
|
lang_output_section_statement_type *os;
|
|
|
|
|
|
|
|
|
|
/* We have nothing to say for anything other than a final link. */
|
2003-06-25 08:40:27 +02:00
|
|
|
|
if (link_info.relocatable
|
2004-10-14 14:54:47 +02:00
|
|
|
|
|| (s->flags & (SEC_EXCLUDE | SEC_LOAD)) != SEC_LOAD)
|
2008-10-20 14:14:29 +02:00
|
|
|
|
return NULL;
|
2001-10-30 16:20:14 +01:00
|
|
|
|
|
|
|
|
|
/* Only care for sections we're going to load. */
|
2004-10-14 14:54:47 +02:00
|
|
|
|
os = lang_output_section_find (secname);
|
2001-10-30 16:20:14 +01:00
|
|
|
|
|
|
|
|
|
/* We have an output section by this name. Place the section inside it
|
|
|
|
|
(regardless of whether the linker script lists it as input). */
|
|
|
|
|
if (os != NULL)
|
|
|
|
|
{
|
2005-11-17 01:10:05 +01:00
|
|
|
|
lang_add_section (&os->children, s, os);
|
2008-10-20 14:14:29 +02:00
|
|
|
|
return os;
|
2001-10-30 16:20:14 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* If this section does not have .text-type section flags or there's no
|
|
|
|
|
MMO_TEXT_SECTION_NAME, we don't have anything to say. */
|
2004-10-14 14:54:47 +02:00
|
|
|
|
if ((s->flags & (SEC_CODE | SEC_READONLY)) == 0)
|
2008-10-20 14:14:29 +02:00
|
|
|
|
return NULL;
|
2001-10-30 16:20:14 +01:00
|
|
|
|
|
|
|
|
|
if (hold_text.os == NULL)
|
2004-10-14 14:54:47 +02:00
|
|
|
|
hold_text.os = lang_output_section_find (hold_text.name);
|
2001-10-30 16:20:14 +01:00
|
|
|
|
|
|
|
|
|
place = &hold_text;
|
2004-10-14 14:54:47 +02:00
|
|
|
|
if (hold_text.os != NULL)
|
|
|
|
|
after = hold_text.os;
|
|
|
|
|
else
|
|
|
|
|
after = &lang_output_section_statement.head->output_section_statement;
|
2001-10-30 16:20:14 +01:00
|
|
|
|
|
|
|
|
|
/* If there's an output section by this name, we'll use it, regardless
|
|
|
|
|
of section flags, in contrast to what's done in elf32.em. */
|
2008-10-04 08:08:59 +02:00
|
|
|
|
os = lang_insert_orphan (s, secname, 0, after, place, NULL, NULL);
|
2002-07-20 15:41:11 +02:00
|
|
|
|
|
2002-07-19 04:56:59 +02:00
|
|
|
|
/* We need an output section for .text as a root, so if there was none
|
|
|
|
|
(might happen with a peculiar linker script such as in "map
|
|
|
|
|
addresses", map-address.exp), we grab the output section created
|
|
|
|
|
above. */
|
|
|
|
|
if (hold_text.os == NULL)
|
2004-10-14 14:54:47 +02:00
|
|
|
|
hold_text.os = os;
|
2001-10-30 16:20:14 +01:00
|
|
|
|
|
2008-10-20 14:14:29 +02:00
|
|
|
|
return os;
|
2001-10-30 16:20:14 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Remove the spurious settings of SEC_RELOC that make it to the output at
|
|
|
|
|
link time. We are as confused as elflink.h:elf_bfd_final_link, and
|
|
|
|
|
paper over the bug similarly. */
|
|
|
|
|
|
|
|
|
|
static void
|
2003-06-27 02:38:25 +02:00
|
|
|
|
mmo_wipe_sec_reloc_flag (bfd *abfd, asection *sec, void *ptr ATTRIBUTE_UNUSED)
|
2001-10-30 16:20:14 +01:00
|
|
|
|
{
|
|
|
|
|
bfd_set_section_flags (abfd, sec,
|
|
|
|
|
bfd_get_section_flags (abfd, sec) & ~SEC_RELOC);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Iterate with bfd_map_over_sections over mmo_wipe_sec_reloc_flag... */
|
|
|
|
|
|
|
|
|
|
static void
|
2009-08-10 09:50:56 +02:00
|
|
|
|
gld${EMULATION_NAME}_after_allocation (void)
|
2001-10-30 16:20:14 +01:00
|
|
|
|
{
|
2008-02-15 04:35:53 +01:00
|
|
|
|
bfd_map_over_sections (link_info.output_bfd, mmo_wipe_sec_reloc_flag, NULL);
|
2006-06-20 04:22:16 +02:00
|
|
|
|
gld${EMULATION_NAME}_map_segments (FALSE);
|
2001-10-30 16:20:14 +01:00
|
|
|
|
}
|
2002-02-01 09:24:03 +01:00
|
|
|
|
|
|
|
|
|
/* To get on-demand global register allocation right, we need to parse the
|
|
|
|
|
relocs, like what happens when linking to ELF. It needs to be done
|
|
|
|
|
before all input sections are supposed to be present. When linking to
|
|
|
|
|
ELF, it's done when reading symbols. When linking to mmo, we do it
|
|
|
|
|
when all input files are seen, which is equivalent. */
|
2001-10-30 16:20:14 +01:00
|
|
|
|
|
2002-02-01 09:24:03 +01:00
|
|
|
|
static void
|
2003-06-27 02:38:25 +02:00
|
|
|
|
mmo_after_open (void)
|
2002-02-01 09:24:03 +01:00
|
|
|
|
{
|
2002-02-17 22:38:03 +01:00
|
|
|
|
/* When there's a mismatch between the output format and the emulation
|
|
|
|
|
(using weird combinations like "-m mmo --oformat elf64-mmix" for
|
|
|
|
|
example), we'd count relocs twice because they'd also be counted
|
|
|
|
|
along the usual route for ELF-only linking, which would lead to an
|
|
|
|
|
internal accounting error. */
|
2008-02-15 04:35:53 +01:00
|
|
|
|
if (bfd_get_flavour (link_info.output_bfd) != bfd_target_elf_flavour)
|
2002-02-01 09:24:03 +01:00
|
|
|
|
{
|
2002-02-17 22:38:03 +01:00
|
|
|
|
LANG_FOR_EACH_INPUT_STATEMENT (is)
|
|
|
|
|
{
|
|
|
|
|
if (bfd_get_flavour (is->the_bfd) == bfd_target_elf_flavour
|
|
|
|
|
&& !_bfd_mmix_check_all_relocs (is->the_bfd, &link_info))
|
|
|
|
|
einfo ("%X%P: Internal problems scanning %B after opening it",
|
|
|
|
|
is->the_bfd);
|
|
|
|
|
}
|
2002-02-01 09:24:03 +01:00
|
|
|
|
}
|
* ld.texinfo (Expression Section): Describe treatment of numbers
and absolute symbols.
* ldemul.c (after_open_default): Look up __ld_compatibility.
* ldexp.c (fold_name): Convert absolute symbols to numbers when
inside output section definitions, or when __ld_compatibility >= 221.
(exp_fold_tree_1): Convert numbers to absolute when not in output
section definition and __ld_compatibility < 221. Don't always
convert values outside an output section definition to absolute.
* ldexp.h (uses_defined): Comment.
* ldlang.c (ld_compatibility): New variable.
* ldlang.h (ld_compatibility): Declare.
* emultempl/aix.em, * emultempl/armcoff.em, * emultempl/beos.em,
* emultempl/elf32.em, * emultempl/genelf.em, * emultempl/lnk960.em,
* emultempl/m68kcoff.em, * emultempl/mmo.em, * emultempl/pe.em,
* emultempl/pep.em, * emultempl/sunos.em, * emultempl/z80.em: Call
after_open_default from after_open function.
2010-12-20 14:00:14 +01:00
|
|
|
|
after_open_default ();
|
2002-02-01 09:24:03 +01:00
|
|
|
|
}
|
2001-10-30 16:20:14 +01:00
|
|
|
|
EOF
|
|
|
|
|
|
|
|
|
|
LDEMUL_PLACE_ORPHAN=mmo_place_orphan
|
2002-02-01 09:24:03 +01:00
|
|
|
|
LDEMUL_AFTER_OPEN=mmo_after_open
|