Commit | Line | Data |
---|---|---|
252b5132 RH |
1 | # This shell script emits a C file. -*- C -*- |
2 | # It does some substitutions. | |
3 | cat >e${EMULATION_NAME}.c <<EOF | |
4 | /* This file is is generated by a shell script. DO NOT EDIT! */ | |
5 | ||
6 | /* emulate the original gld for the given ${EMULATION_NAME} | |
7 | Copyright (C) 1991, 93, 96, 97, 1998 Free Software Foundation, Inc. | |
8 | Written by Steve Chamberlain steve@cygnus.com | |
9 | ||
10 | This file is part of GLD, the Gnu Linker. | |
11 | ||
12 | This program is free software; you can redistribute it and/or modify | |
13 | it under the terms of the GNU General Public License as published by | |
14 | the Free Software Foundation; either version 2 of the License, or | |
15 | (at your option) any later version. | |
16 | ||
17 | This program is distributed in the hope that it will be useful, | |
18 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
19 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
20 | GNU General Public License for more details. | |
21 | ||
22 | You should have received a copy of the GNU General Public License | |
23 | along with this program; if not, write to the Free Software | |
24 | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ | |
25 | ||
26 | #define TARGET_IS_${EMULATION_NAME} | |
27 | ||
28 | #include "bfd.h" | |
29 | #include "sysdep.h" | |
30 | #include "bfdlink.h" | |
31 | #include "getopt.h" | |
32 | ||
33 | #include "ld.h" | |
34 | #include "ldmain.h" | |
35 | #include "ldemul.h" | |
36 | #include "ldfile.h" | |
37 | #include "ldmisc.h" | |
38 | ||
39 | #include "ldexp.h" | |
40 | #include "ldlang.h" | |
41 | ||
42 | static void gld${EMULATION_NAME}_before_parse PARAMS ((void)); | |
43 | static void gld${EMULATION_NAME}_before_allocation PARAMS ((void)); | |
44 | static char *gld${EMULATION_NAME}_get_script PARAMS ((int *isfile)); | |
45 | static int gld${EMULATION_NAME}_parse_args PARAMS((int, char **)); | |
229cf42b | 46 | static void gld${EMULATION_NAME}_list_options PARAMS ((FILE *)); |
252b5132 RH |
47 | |
48 | /* If true, then interworking stubs which support calls to old, non-interworking | |
49 | aware ARM code should be generated. */ | |
50 | ||
51 | static int support_old_code = 0; | |
52 | ||
53 | #define OPTION_SUPPORT_OLD_CODE 300 | |
54 | ||
55 | static struct option longopts[] = | |
56 | { | |
57 | {"support-old-code", no_argument, NULL, OPTION_SUPPORT_OLD_CODE}, | |
58 | {NULL, no_argument, NULL, 0} | |
59 | }; | |
60 | ||
61 | static void | |
62 | gld${EMULATION_NAME}_list_options (file) | |
63 | FILE * file; | |
64 | { | |
65 | fprintf (file, _(" --support-old-code Support interworking with old code\n")); | |
66 | } | |
67 | ||
68 | static int | |
69 | gld${EMULATION_NAME}_parse_args (argc, argv) | |
70 | int argc; | |
71 | char ** argv; | |
72 | { | |
73 | int longind; | |
74 | int optc; | |
75 | int prevoptind = optind; | |
76 | int prevopterr = opterr; | |
77 | int wanterror; | |
78 | static int lastoptind = -1; | |
79 | ||
80 | if (lastoptind != optind) | |
81 | opterr = 0; | |
82 | ||
83 | wanterror = opterr; | |
84 | lastoptind = optind; | |
85 | ||
86 | optc = getopt_long_only (argc, argv, "-", longopts, & longind); | |
87 | opterr = prevopterr; | |
88 | ||
89 | switch (optc) | |
90 | { | |
91 | default: | |
92 | if (wanterror) | |
93 | xexit (1); | |
94 | optind = prevoptind; | |
95 | return 0; | |
96 | ||
97 | case OPTION_SUPPORT_OLD_CODE: | |
98 | support_old_code = 1; | |
99 | break; | |
100 | } | |
101 | ||
102 | return 1; | |
103 | } | |
104 | \f | |
105 | static void | |
106 | gld${EMULATION_NAME}_before_parse () | |
107 | { | |
108 | #ifndef TARGET_ /* I.e., if not generic. */ | |
109 | ldfile_set_output_arch ("`echo ${ARCH}`"); | |
110 | #endif /* not TARGET_ */ | |
111 | } | |
112 | ||
113 | /* This is called after the sections have been attached to output | |
114 | sections, but before any sizes or addresses have been set. */ | |
115 | ||
116 | static void | |
117 | gld${EMULATION_NAME}_before_allocation () | |
118 | { | |
119 | /* we should be able to set the size of the interworking stub section */ | |
120 | ||
121 | /* Here we rummage through the found bfds to collect glue information */ | |
122 | /* FIXME: should this be based on a command line option? krk@cygnus.com */ | |
123 | { | |
124 | LANG_FOR_EACH_INPUT_STATEMENT (is) | |
125 | { | |
126 | if (! bfd_arm_process_before_allocation | |
127 | (is->the_bfd, & link_info, support_old_code)) | |
128 | { | |
129 | /* xgettext:c-format */ | |
130 | einfo (_("Errors encountered processing file %s"), is->filename); | |
131 | } | |
132 | } | |
133 | } | |
134 | ||
135 | /* We have seen it all. Allocate it, and carry on */ | |
136 | bfd_arm_allocate_interworking_sections (& link_info); | |
137 | } | |
138 | ||
139 | static void | |
140 | gld${EMULATION_NAME}_after_open () | |
141 | { | |
142 | LANG_FOR_EACH_INPUT_STATEMENT (is) | |
143 | { | |
144 | if (bfd_arm_get_bfd_for_interworking (is->the_bfd, & link_info)) | |
145 | break; | |
146 | } | |
147 | } | |
148 | ||
149 | static char * | |
150 | gld${EMULATION_NAME}_get_script (isfile) | |
151 | int *isfile; | |
152 | EOF | |
153 | ||
154 | if test -n "$COMPILE_IN" | |
155 | then | |
156 | # Scripts compiled in. | |
157 | ||
158 | # sed commands to quote an ld script as a C string. | |
159 | sc="-f ${srcdir}/emultempl/stringify.sed" | |
160 | ||
161 | cat >>e${EMULATION_NAME}.c <<EOF | |
162 | { | |
163 | *isfile = 0; | |
164 | ||
165 | if (link_info.relocateable == true && config.build_constructors == true) | |
166 | return | |
167 | EOF | |
168 | sed $sc ldscripts/${EMULATION_NAME}.xu >> e${EMULATION_NAME}.c | |
169 | echo ' ; else if (link_info.relocateable == true) return' >> e${EMULATION_NAME}.c | |
170 | sed $sc ldscripts/${EMULATION_NAME}.xr >> e${EMULATION_NAME}.c | |
171 | echo ' ; else if (!config.text_read_only) return' >> e${EMULATION_NAME}.c | |
172 | sed $sc ldscripts/${EMULATION_NAME}.xbn >> e${EMULATION_NAME}.c | |
173 | echo ' ; else if (!config.magic_demand_paged) return' >> e${EMULATION_NAME}.c | |
174 | sed $sc ldscripts/${EMULATION_NAME}.xn >> e${EMULATION_NAME}.c | |
175 | echo ' ; else return' >> e${EMULATION_NAME}.c | |
176 | sed $sc ldscripts/${EMULATION_NAME}.x >> e${EMULATION_NAME}.c | |
177 | echo '; }' >> e${EMULATION_NAME}.c | |
178 | ||
179 | else | |
180 | # Scripts read from the filesystem. | |
181 | ||
182 | cat >>e${EMULATION_NAME}.c <<EOF | |
183 | { | |
184 | *isfile = 1; | |
185 | ||
186 | if (link_info.relocateable == true && config.build_constructors == true) | |
187 | return "ldscripts/${EMULATION_NAME}.xu"; | |
188 | else if (link_info.relocateable == true) | |
189 | return "ldscripts/${EMULATION_NAME}.xr"; | |
190 | else if (!config.text_read_only) | |
191 | return "ldscripts/${EMULATION_NAME}.xbn"; | |
192 | else if (!config.magic_demand_paged) | |
193 | return "ldscripts/${EMULATION_NAME}.xn"; | |
194 | else | |
195 | return "ldscripts/${EMULATION_NAME}.x"; | |
196 | } | |
197 | EOF | |
198 | ||
199 | fi | |
200 | ||
201 | cat >>e${EMULATION_NAME}.c <<EOF | |
202 | ||
203 | struct ld_emulation_xfer_struct ld_${EMULATION_NAME}_emulation = | |
204 | { | |
205 | gld${EMULATION_NAME}_before_parse, | |
206 | syslib_default, | |
207 | hll_default, | |
208 | after_parse_default, | |
209 | gld${EMULATION_NAME}_after_open, | |
210 | after_allocation_default, | |
211 | set_output_arch_default, | |
212 | ldemul_default_target, | |
213 | gld${EMULATION_NAME}_before_allocation, | |
214 | gld${EMULATION_NAME}_get_script, | |
215 | "${EMULATION_NAME}", | |
216 | "${OUTPUT_FORMAT}", | |
217 | NULL, /* finish */ | |
218 | NULL, /* create output section statements */ | |
219 | NULL, /* open dynamic archive */ | |
220 | NULL, /* place orphan */ | |
221 | NULL, /* set_symbols */ | |
222 | gld${EMULATION_NAME}_parse_args, | |
223 | NULL, /* unrecognised file */ | |
224 | gld${EMULATION_NAME}_list_options | |
225 | }; | |
226 | EOF |