aboutsummaryrefslogtreecommitdiff
path: root/ld/emultempl
diff options
context:
space:
mode:
authorNick Clifton <nickc@redhat.com>2001-10-30 15:20:14 +0000
committerNick Clifton <nickc@redhat.com>2001-10-30 15:20:14 +0000
commit3c3bdf30e42268e6193693acd1dc66d2d1792536 (patch)
tree8f6b2752d885c3e71d0bef5717e981faac396928 /ld/emultempl
parentf5ffc9190a633d0f8eb1632a64a28eda75206b55 (diff)
downloadgdb-3c3bdf30e42268e6193693acd1dc66d2d1792536.zip
gdb-3c3bdf30e42268e6193693acd1dc66d2d1792536.tar.gz
gdb-3c3bdf30e42268e6193693acd1dc66d2d1792536.tar.bz2
Add MMIX support
Diffstat (limited to 'ld/emultempl')
-rw-r--r--ld/emultempl/mmix-elfnmmo.em74
-rw-r--r--ld/emultempl/mmixelf.em46
-rw-r--r--ld/emultempl/mmo.em228
3 files changed, 348 insertions, 0 deletions
diff --git a/ld/emultempl/mmix-elfnmmo.em b/ld/emultempl/mmix-elfnmmo.em
new file mode 100644
index 0000000..d1058b1
--- /dev/null
+++ b/ld/emultempl/mmix-elfnmmo.em
@@ -0,0 +1,74 @@
+# This shell script emits a C file. -*- C -*-
+# Copyright 2001 Free Software Foundation, Inc.
+#
+# This file is part of GLD, the Gnu Linker.
+#
+# 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 of the License, or
+# (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
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+#
+
+# This file is sourced from elf32.em and mmo.em, used to define
+# MMIX-specific things common to ELF and MMO.
+
+cat >>e${EMULATION_NAME}.c <<EOF
+#include "elf/mmix.h"
+
+static void mmix_set_reg_section_vma PARAMS ((void));
+
+/* We need to set the VMA of the .MMIX.reg_contents section when it has
+ been allocated. */
+
+static void
+mmix_set_reg_section_vma ()
+{
+ asection *sec
+ = bfd_get_section_by_name (output_bfd, MMIX_REG_CONTENTS_SECTION_NAME);
+ bfd_vma regvma;
+
+ /* If there's no register section, we don't need to do anything. */
+ if (sec == NULL)
+ return;
+
+ regvma = 256 * 8 - sec->_raw_size - 8;
+
+ /* If we start on a local register, we have too many global registers. */
+ if (regvma < 32 * 8)
+ einfo ("%X%P: Too many global registers: %u, max 223\n",
+ (unsigned) sec->_raw_size / 8);
+
+ /* Set vma to correspond to first such register number * 8. */
+ bfd_set_section_vma (output_bfd, sec, regvma);
+
+ /* ??? Why isn't the section size (_cooked_size) set? Doesn't it get
+ set regardless of presence of relocations? */
+ if (sec->_cooked_size == 0
+ && ! bfd_set_section_size (output_bfd, sec, sec->_raw_size))
+ {
+ einfo ("%X%P: Can't set section %s size to %u\n",
+ MMIX_REG_CONTENTS_SECTION_NAME, (unsigned) sec->_raw_size);
+ return;
+ }
+
+ /* Simplify symbol output for the register section (without contents;
+ created for register symbols) by setting the output offset to 0. */
+ sec = bfd_get_section_by_name (output_bfd, MMIX_REG_SECTION_NAME);
+ if (sec == NULL)
+ return;
+
+ bfd_set_section_vma (abfd, sec, 0);
+
+}
+EOF
+
+LDEMUL_AFTER_ALLOCATION=mmix_set_reg_section_vma
diff --git a/ld/emultempl/mmixelf.em b/ld/emultempl/mmixelf.em
new file mode 100644
index 0000000..e84f0b7
--- /dev/null
+++ b/ld/emultempl/mmixelf.em
@@ -0,0 +1,46 @@
+# This shell script emits a C file. -*- C -*-
+# Copyright 2001 Free Software Foundation, Inc.
+#
+# This file is part of GLD, the Gnu Linker.
+#
+# 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 of the License, or
+# (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
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+#
+
+# This file is sourced from elf32.em and used to define MMIX and ELF
+# specific things. First include what we have in common with mmo.
+
+. ${srcdir}/emultempl/mmix-elfnmmo.em
+
+cat >>e${EMULATION_NAME}.c <<EOF
+#line 29 "${srcdir}/emultempl/elfmmix.em"
+
+static void elfmmix_before_parse PARAMS ((void));
+
+static void
+elfmmix_before_parse ()
+{
+ gld${EMULATION_NAME}_before_parse ();
+
+ /* Make sure we don't create a demand-paged executable. Unfortunately
+ this isn't changeable with a command-line option. It makes no
+ difference to mmo, but the sections in elf64mmix will be aligned to a
+ page in the linked file, which is non-intuitive. If there's ever a
+ full system with shared libraries and demand paging, you will want to
+ exclude this file. */
+ config.magic_demand_paged = false;
+}
+EOF
+
+LDEMUL_BEFORE_PARSE=elfmmix_before_parse
diff --git a/ld/emultempl/mmo.em b/ld/emultempl/mmo.em
new file mode 100644
index 0000000..eaf0cae
--- /dev/null
+++ b/ld/emultempl/mmo.em
@@ -0,0 +1,228 @@
+# This shell script emits a C file. -*- C -*-
+# Copyright 2001 Free Software Foundation, Inc.
+#
+# This file is part of GLD, the Gnu Linker.
+#
+# 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 of the License, or
+# (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
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+#
+
+# This file is sourced from elf32.em and mmo.em, used to define
+# linker MMIX-specifics common to ELF and MMO.
+
+. ${srcdir}/emultempl/mmix-elfnmmo.em
+
+cat >>e${EMULATION_NAME}.c <<EOF
+
+static boolean mmo_place_orphan
+ PARAMS ((lang_input_statement_type *, asection *));
+static asection *output_prev_sec_find
+ PARAMS ((lang_output_section_statement_type *));
+static void mmo_finish PARAMS ((void));
+static void mmo_wipe_sec_reloc_flag PARAMS ((bfd *, asection *, PTR));
+
+/* Find the last output section before given output statement.
+ Used by place_orphan. */
+
+static asection *
+output_prev_sec_find (os)
+ lang_output_section_statement_type *os;
+{
+ asection *s = (asection *) NULL;
+ lang_statement_union_type *u;
+ lang_output_section_statement_type *lookup;
+
+ for (u = lang_output_section_statement.head;
+ u != (lang_statement_union_type *) NULL;
+ u = lookup->next)
+ {
+ lookup = &u->output_section_statement;
+ if (lookup == os)
+ break;
+ if (lookup->bfd_section != NULL
+ && lookup->bfd_section != bfd_abs_section_ptr
+ && lookup->bfd_section != bfd_com_section_ptr
+ && lookup->bfd_section != bfd_und_section_ptr)
+ s = lookup->bfd_section;
+ }
+
+ if (u == NULL)
+ return NULL;
+
+ return s;
+}
+
+struct orphan_save {
+ lang_output_section_statement_type *os;
+ asection **section;
+ lang_statement_union_type **stmt;
+};
+
+#define HAVE_SECTION(hold, name) \
+(hold.os != NULL || (hold.os = lang_output_section_find (name)) != NULL)
+
+/* 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. */
+
+static boolean
+mmo_place_orphan (file, s)
+ lang_input_statement_type *file;
+ asection *s;
+{
+ static struct orphan_save hold_text;
+ struct orphan_save *place;
+ lang_output_section_statement_type *os;
+ lang_statement_list_type *old;
+ lang_statement_list_type add;
+ asection *snew, **pps, *bfd_section;
+
+ /* We have nothing to say for anything other than a final link. */
+ if (link_info.relocateable
+ || (bfd_get_section_flags (s->owner, s)
+ & (SEC_EXCLUDE | SEC_LOAD)) != SEC_LOAD)
+ return false;
+
+ /* Only care for sections we're going to load. */
+ os = lang_output_section_find (bfd_get_section_name (s->owner, s));
+
+ /* 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)
+ {
+ lang_add_section (&os->children, s, os, file);
+ return true;
+ }
+
+ /* 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. */
+ if ((bfd_get_section_flags (s->owner, s) & (SEC_CODE | SEC_READONLY)) == 0)
+ return false;
+
+ if (hold_text.os == NULL)
+ hold_text.os = lang_output_section_find (MMO_TEXT_SECTION_NAME);
+
+ place = &hold_text;
+
+ /* 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. */
+
+ /* Start building a list of statements for this section.
+ First save the current statement pointer. */
+ old = stat_ptr;
+
+ /* Add the output section statements for this orphan to our own private
+ list, inserting them later into the global statement list. */
+ stat_ptr = &add;
+ lang_list_init (stat_ptr);
+
+ os = lang_enter_output_section_statement (bfd_get_section_name (s->owner,
+ s),
+ NULL, 0,
+ (bfd_vma) 0,
+ (etree_type *) NULL,
+ (etree_type *) NULL,
+ (etree_type *) NULL);
+
+ lang_add_section (&os->children, s, os, file);
+
+ lang_leave_output_section_statement
+ ((bfd_vma) 0, "*default*",
+ (struct lang_output_section_phdr_list *) NULL, "*default*");
+
+ /* Restore the global list pointer. */
+ stat_ptr = old;
+
+ snew = os->bfd_section;
+ bfd_section = place->os->bfd_section;
+ if (place->section == NULL && bfd_section == NULL)
+ bfd_section = output_prev_sec_find (place->os);
+
+ if (place->section != NULL
+ || (bfd_section != NULL
+ && bfd_section != snew))
+ {
+ /* Shuffle the section to make the output file look neater. This is
+ really only cosmetic. */
+ if (place->section == NULL)
+ /* Put orphans after the first section on the list. */
+ place->section = &bfd_section->next;
+
+ /* Unlink the section. */
+ for (pps = &output_bfd->sections; *pps != snew; pps = &(*pps)->next)
+ ;
+ *pps = snew->next;
+
+ /* Now tack it on to the "place->os" section list. */
+ snew->next = *place->section;
+ *place->section = snew;
+ }
+ place->section = &snew->next; /* Save the end of this list. */
+
+ if (add.head != NULL)
+ {
+ /* We try to put the output statements in some sort of reasonable
+ order here, because they determine the final load addresses of
+ the orphan sections. */
+ if (place->stmt == NULL)
+ {
+ /* Put the new statement list right at the head. */
+ *add.tail = place->os->header.next;
+ place->os->header.next = add.head;
+ }
+ else
+ {
+ /* Put it after the last orphan statement we added. */
+ *add.tail = *place->stmt;
+ *place->stmt = add.head;
+ }
+
+ /* Fix the global list pointer if we happened to tack our new list
+ at the tail. */
+ if (*old->tail == add.head)
+ old->tail = add.tail;
+
+ /* Save the end of this list. */
+ place->stmt = add.tail;
+ }
+
+ return true;
+}
+
+/* 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
+mmo_wipe_sec_reloc_flag (abfd, sec, ptr)
+ bfd *abfd;
+ asection *sec;
+ PTR ptr ATTRIBUTE_UNUSED;
+{
+ 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
+mmo_finish ()
+{
+ bfd_map_over_sections (output_bfd, mmo_wipe_sec_reloc_flag, NULL);
+}
+
+EOF
+
+LDEMUL_PLACE_ORPHAN=mmo_place_orphan
+LDEMUL_FINISH=mmo_finish