Thu Oct 8 09:05:25 1992 Steve Chamberlain (sac@thepub.cygnus.com)
[external/binutils.git] / ld / ld-gld68k.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  * emulate the original gld running on a 68k system
25  *
26  *  Written by Steve Chamberlain steve@cygnus.com
27  */
28
29
30 #include "sysdep.h"
31 #include "bfd.h"
32
33 #include "ld.h"
34 #include "config.h"
35 #include "ld-emul.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 gld68k_before_parse()
51 {
52   ldfile_add_library_path("/lib");
53   ldfile_add_library_path("/usr/lib");
54   ldfile_add_library_path("/usr/local/lib/lib");
55   ldfile_output_architecture = bfd_arch_m68k;
56 }
57
58
59 static void 
60 gld68k_after_parse()
61 {
62
63 }
64
65 static void
66 gld68k_after_allocation()
67 {
68
69 }
70
71 static void
72 gld68k_before_allocation()
73 {
74
75 }
76
77
78 static void
79 gld68k_set_output_arch()
80 {
81   /* Set the output architecture and machine if possible */
82   unsigned long  machine = 0;
83   bfd_set_arch_mach(output_bfd, ldfile_output_architecture, machine);
84 }
85
86 static char *
87 gld68k_choose_target()
88 {
89   char *from_outside = getenv(TARGET_ENVIRON);
90   if (from_outside != (char *)NULL)
91     return from_outside;
92   return GLD68K_TARGET;
93 }
94
95 static void
96 gld68k_syslib()
97 {
98   info("%S SYSLIB ignored\n");
99 }
100
101 static void
102 gld68k_hll(ignore)
103 char  *ignore;
104 {
105   info("%S HLL ignored\n");
106 }
107
108 static char *gld68k_script  =  
109 #include "ld-gld68k.x"
110 ;
111
112 static char *gld68k_script_option_Ur  =  
113 #include "ld-gld68k-Ur.x"
114 ;
115 static char *gld68k_script_option_r  =  
116 #include "ld-gld68k-r.x"
117 ;                            
118 static char *gld68k_get_script()
119 {                            
120   extern ld_config_type config;
121   if (config.relocateable_output == true &&
122       config.build_constructors == true) {
123     return gld68k_script_option_Ur;
124   }
125   if (config.relocateable_output) {
126     return gld68k_script_option_r;
127   }
128         
129   return gld68k_script;
130 }
131 struct ld_emulation_xfer_struct ld_gld68k_emulation = 
132 {
133   gld68k_before_parse,
134   gld68k_syslib,
135   gld68k_hll,
136   gld68k_after_parse,
137   gld68k_after_allocation,
138   gld68k_set_output_arch,
139   gld68k_choose_target,
140   gld68k_before_allocation,
141   gld68k_get_script,
142 };
143