daily update
[binutils.git] / ld / ldemul.c
blobfad1f184d596dcc8794457386bf8bf6b372df6b8
1 /* ldemul.c -- clearing house for ld emulation states
2 Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000,
3 2001, 2002, 2003, 2005
4 Free Software Foundation, Inc.
6 This file is part of GLD, the Gnu Linker.
8 GLD is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2, or (at your option)
11 any later version.
13 GLD is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with GLD; see the file COPYING. If not, write to the Free
20 Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
21 02110-1301, USA. */
23 #include "config.h"
24 #include "bfd.h"
25 #include "sysdep.h"
26 #include "getopt.h"
27 #include "bfdlink.h"
29 #include "ld.h"
30 #include "ldmisc.h"
31 #include "ldexp.h"
32 #include "ldlang.h"
33 #include "ldfile.h"
34 #include "ldemul.h"
35 #include "ldmain.h"
36 #include "ldemul-list.h"
38 static ld_emulation_xfer_type *ld_emulation;
40 void
41 ldemul_hll (char *name)
43 ld_emulation->hll (name);
46 void
47 ldemul_syslib (char *name)
49 ld_emulation->syslib (name);
52 void
53 ldemul_after_parse (void)
55 ld_emulation->after_parse ();
58 void
59 ldemul_before_parse (void)
61 ld_emulation->before_parse ();
64 void
65 ldemul_after_open (void)
67 ld_emulation->after_open ();
70 void
71 ldemul_after_allocation (void)
73 ld_emulation->after_allocation ();
76 void
77 ldemul_before_allocation (void)
79 ld_emulation->before_allocation ();
82 void
83 ldemul_set_output_arch (void)
85 ld_emulation->set_output_arch ();
88 void
89 ldemul_finish (void)
91 ld_emulation->finish ();
94 void
95 ldemul_set_symbols (void)
97 if (ld_emulation->set_symbols)
98 ld_emulation->set_symbols ();
101 void
102 ldemul_create_output_section_statements (void)
104 if (ld_emulation->create_output_section_statements)
105 ld_emulation->create_output_section_statements ();
108 char *
109 ldemul_get_script (int *isfile)
111 return ld_emulation->get_script (isfile);
114 bfd_boolean
115 ldemul_open_dynamic_archive (const char *arch, search_dirs_type *search,
116 lang_input_statement_type *entry)
118 if (ld_emulation->open_dynamic_archive)
119 return (*ld_emulation->open_dynamic_archive) (arch, search, entry);
120 return FALSE;
123 bfd_boolean
124 ldemul_place_orphan (asection *s)
126 if (ld_emulation->place_orphan)
127 return (*ld_emulation->place_orphan) (s);
128 return FALSE;
131 void
132 ldemul_add_options (int ns, char **shortopts, int nl,
133 struct option **longopts, int nrl,
134 struct option **really_longopts)
136 if (ld_emulation->add_options)
137 (*ld_emulation->add_options) (ns, shortopts, nl, longopts,
138 nrl, really_longopts);
141 bfd_boolean
142 ldemul_handle_option (int optc)
144 if (ld_emulation->handle_option)
145 return (*ld_emulation->handle_option) (optc);
146 return FALSE;
149 bfd_boolean
150 ldemul_parse_args (int argc, char **argv)
152 /* Try and use the emulation parser if there is one. */
153 if (ld_emulation->parse_args)
154 return (*ld_emulation->parse_args) (argc, argv);
155 return FALSE;
158 /* Let the emulation code handle an unrecognized file. */
160 bfd_boolean
161 ldemul_unrecognized_file (lang_input_statement_type *entry)
163 if (ld_emulation->unrecognized_file)
164 return (*ld_emulation->unrecognized_file) (entry);
165 return FALSE;
168 /* Let the emulation code handle a recognized file. */
170 bfd_boolean
171 ldemul_recognized_file (lang_input_statement_type *entry)
173 if (ld_emulation->recognized_file)
174 return (*ld_emulation->recognized_file) (entry);
175 return FALSE;
178 char *
179 ldemul_choose_target (int argc, char **argv)
181 return ld_emulation->choose_target (argc, argv);
185 /* The default choose_target function. */
187 char *
188 ldemul_default_target (int argc ATTRIBUTE_UNUSED, char **argv ATTRIBUTE_UNUSED)
190 char *from_outside = getenv (TARGET_ENVIRON);
191 if (from_outside != (char *) NULL)
192 return from_outside;
193 return ld_emulation->target_name;
196 void
197 after_parse_default (void)
201 void
202 after_open_default (void)
206 void
207 after_allocation_default (void)
211 void
212 before_allocation_default (void)
214 if (!link_info.relocatable)
215 strip_excluded_output_sections ();
218 void
219 finish_default (void)
221 if (!link_info.relocatable)
222 _bfd_fix_excluded_sec_syms (output_bfd, &link_info);
225 void
226 set_output_arch_default (void)
228 /* Set the output architecture and machine if possible. */
229 bfd_set_arch_mach (output_bfd,
230 ldfile_output_architecture, ldfile_output_machine);
233 void
234 syslib_default (char *ignore ATTRIBUTE_UNUSED)
236 info_msg (_("%S SYSLIB ignored\n"));
239 void
240 hll_default (char *ignore ATTRIBUTE_UNUSED)
242 info_msg (_("%S HLL ignored\n"));
245 ld_emulation_xfer_type *ld_emulations[] = { EMULATION_LIST };
247 void
248 ldemul_choose_mode (char *target)
250 ld_emulation_xfer_type **eptr = ld_emulations;
251 /* Ignore "gld" prefix. */
252 if (target[0] == 'g' && target[1] == 'l' && target[2] == 'd')
253 target += 3;
254 for (; *eptr; eptr++)
256 if (strcmp (target, (*eptr)->emulation_name) == 0)
258 ld_emulation = *eptr;
259 return;
262 einfo (_("%P: unrecognised emulation mode: %s\n"), target);
263 einfo (_("Supported emulations: "));
264 ldemul_list_emulations (stderr);
265 einfo ("%F\n");
268 void
269 ldemul_list_emulations (FILE *f)
271 ld_emulation_xfer_type **eptr = ld_emulations;
272 bfd_boolean first = TRUE;
274 for (; *eptr; eptr++)
276 if (first)
277 first = FALSE;
278 else
279 fprintf (f, " ");
280 fprintf (f, "%s", (*eptr)->emulation_name);
284 void
285 ldemul_list_emulation_options (FILE *f)
287 ld_emulation_xfer_type **eptr;
288 int options_found = 0;
290 for (eptr = ld_emulations; *eptr; eptr++)
292 ld_emulation_xfer_type *emul = *eptr;
294 if (emul->list_options)
296 fprintf (f, "%s: \n", emul->emulation_name);
298 emul->list_options (f);
300 options_found = 1;
304 if (! options_found)
305 fprintf (f, _(" no emulation specific options.\n"));
309 ldemul_find_potential_libraries (char *name, lang_input_statement_type *entry)
311 if (ld_emulation->find_potential_libraries)
312 return ld_emulation->find_potential_libraries (name, entry);
314 return 0;
317 struct bfd_elf_version_expr *
318 ldemul_new_vers_pattern (struct bfd_elf_version_expr *entry)
320 if (ld_emulation->new_vers_pattern)
321 entry = (*ld_emulation->new_vers_pattern) (entry);
322 return entry;