ld/ldgldm88kbcs.c

   1 /* Copyright (C) 1991 Free Software Foundation, Inc.
   2
   3 This file is part of GLD, the Gnu Linker.
   4
   5 GLD is free software; you can redistribute it and/or modify
   6 it under the terms of the GNU General Public License as published by
   7 the Free Software Foundation; either version 1, or (at your option)
   8 any later version.
   9
  10 GLD is distributed in the hope that it will be useful,
  11 but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 GNU General Public License for more details.
  14
  15 You should have received a copy of the GNU General Public License
  16 along with GLD; see the file COPYING.  If not, write to
  17 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  18
  19 /*
  20  *  $Id$
  21  *
  22 */
  23
  24 /*
  25  *  Written by Steve Chamberlain steve@cygnus.com
  26  */
  27
  28
  29 #include "sysdep.h"
  30 #include "bfd.h"
  31
  32
  33 #include "ld.h"
  34 #include "config.h"
  35 #include "ldemul.h"
  36 #include "ldfile.h"
  37 #include "ldmisc.h"
  38
  39 extern  boolean lang_float_flag;
  40
  41
  42 extern enum bfd_architecture ldfile_output_architecture;
  43 extern unsigned long ldfile_output_machine;
  44 extern char *ldfile_output_machine_name;
  45
  46 extern bfd *output_bfd;
  47
  48
  49
  50 static void gldm88kbcs_before_parse()
  51 {
  52   extern char lprefix;
  53   lprefix = '@';
  54 }
  55
  56
  57 static void
  58 gldm88kbcs_after_parse()
  59 {
  60
  61 }
  62
  63 static void
  64 gldm88kbcs_after_allocation()
  65 {
  66
  67 }
  68
  69 static void
  70 gldm88kbcs_before_allocation()
  71 {
  72
  73 }
  74
  75
  76 static void
  77 gldm88kbcs_set_output_arch()
  78 {
  79   /* Set the output architecture and machine if possible */
  80   bfd_set_arch_mach(output_bfd, ldfile_output_architecture, ldfile_output_machine);
  81 }
  82
  83 static char *
  84 gldm88kbcs_choose_target()
  85 {
  86   char *from_outside = getenv(TARGET_ENVIRON);
  87   if (from_outside != (char *)NULL)
  88     return from_outside;
  89   return GLDM88KBCS_TARGET;
  90 }
  91
  92 static void
  93 gldm88kbcs_syslib()
  94 {
  95   info("%S SYSLIB ignored\n");
  96 }
  97
  98 static void
  99 gldm88kbcs_hll(ignore)
 100 char  *ignore;
 101 {
 102   info("%S HLL ignored\n");
 103 }
 104
 105 static char *gldm88kbcs_script =
 106 #include "ldgldm88kbcs.x"
 107 ;
 108
 109 static char *gldm88kbcs_script_option_Ur  =
 110 #include "ldgldm88kbcsUr.x"
 111 ;
 112
 113 static char *gldm88kbcs_script_option_r  =
 114 #include "ldgldm88kbcsr.x"
 115 ;
 116
 117 static char *gldm88kbcs_get_script()
 118 {
 119   extern ld_config_type config;
 120   if (config.relocateable_output == true &&
 121       config.build_constructors == true) {
 122     return gldm88kbcs_script_option_Ur;
 123   }
 124   if (config.relocateable_output) {
 125     return gldm88kbcs_script_option_r;
 126   }
 127
 128   return gldm88kbcs_script;
 129 }
 130 struct ld_emulation_xfer_struct ld_gldm88kbcs_emulation =
 131 {
 132   gldm88kbcs_before_parse,
 133   gldm88kbcs_syslib,
 134   gldm88kbcs_hll,
 135   gldm88kbcs_after_parse,
 136   gldm88kbcs_after_allocation,
 137   gldm88kbcs_set_output_arch,
 138   gldm88kbcs_choose_target,
 139   gldm88kbcs_before_allocation,
 140   gldm88kbcs_get_script,
 141 };
 142