diff options
author | Nick Clifton <nickc@redhat.com> | 2001-10-30 15:20:14 +0000 |
---|---|---|
committer | Nick Clifton <nickc@redhat.com> | 2001-10-30 15:20:14 +0000 |
commit | 3c3bdf30e42268e6193693acd1dc66d2d1792536 (patch) | |
tree | 8f6b2752d885c3e71d0bef5717e981faac396928 /ld/emultempl | |
parent | f5ffc9190a633d0f8eb1632a64a28eda75206b55 (diff) | |
download | gdb-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.em | 74 | ||||
-rw-r--r-- | ld/emultempl/mmixelf.em | 46 | ||||
-rw-r--r-- | ld/emultempl/mmo.em | 228 |
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 |