ld/emultempl/mmix-elfnmmo.em

   1 # This shell script emits a C file. -*- C -*-
   2 #   Copyright 2001 Free Software Foundation, Inc.
   3 #
   4 # This file is part of GLD, the Gnu Linker.
   5 #
   6 # This program is free software; you can redistribute it and/or modify
   7 # it under the terms of the GNU General Public License as published by
   8 # the Free Software Foundation; either version 2 of the License, or
   9 # (at your option) any later version.
  10 #
  11 # This program is distributed in the hope that it will be useful,
  12 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 # GNU General Public License for more details.
  15 #
  16 # You should have received a copy of the GNU General Public License
  17 # along with this program; if not, write to the Free Software
  18 # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  19 #
  20
  21 # This file is sourced from elf32.em and mmo.em, used to define
  22 # MMIX-specific things common to ELF and MMO.
  23
  24 cat >>e${EMULATION_NAME}.c <<EOF
  25 #include "elf/mmix.h"
  26
  27 static void mmix_set_reg_section_vma PARAMS ((void));
  28
  29 /* We need to set the VMA of the .MMIX.reg_contents section when it has
  30    been allocated.  */
  31
  32 static void
  33 mmix_set_reg_section_vma ()
  34 {
  35   asection *sec
  36     = bfd_get_section_by_name (output_bfd, MMIX_REG_CONTENTS_SECTION_NAME);
  37   bfd_vma regvma;
  38
  39   /* If there's no register section, we don't need to do anything.  */
  40   if (sec == NULL)
  41     return;
  42
  43   regvma = 256 * 8 - sec->_raw_size - 8;
  44
  45   /* If we start on a local register, we have too many global registers.  */
  46   if (regvma < 32 * 8)
  47     einfo ("%X%P: Too many global registers: %u, max 223\n",
  48            (unsigned) sec->_raw_size / 8);
  49
  50   /* Set vma to correspond to first such register number * 8.  */
  51   bfd_set_section_vma (output_bfd, sec, regvma);
  52
  53   /* ??? Why isn't the section size (_cooked_size) set?  Doesn't it get
  54      set regardless of presence of relocations?  */
  55   if (sec->_cooked_size == 0
  56       && ! bfd_set_section_size (output_bfd, sec, sec->_raw_size))
  57     {
  58       einfo ("%X%P: Can't set section %s size to %u\n",
  59              MMIX_REG_CONTENTS_SECTION_NAME, (unsigned) sec->_raw_size);
  60       return;
  61     }
  62
  63   /* Simplify symbol output for the register section (without contents;
  64      created for register symbols) by setting the output offset to 0.  */
  65   sec = bfd_get_section_by_name (output_bfd, MMIX_REG_SECTION_NAME);
  66   if (sec == NULL)
  67     return;
  68
  69   bfd_set_section_vma (abfd, sec, 0);
  70
  71 }
  72 EOF
  73
  74 LDEMUL_AFTER_ALLOCATION=mmix_set_reg_section_vma