← Back to branch summary

~ubuntu-branches/ubuntu/utopic/binutils-arm64-cross/utopic

« back to all changes in this revision

Viewing changes to binutils-2.23.52.20130611/ld/emultempl/lnk960.em

  • Committer: Package Import Robot
  • Author(s): Matthias Klose
  • Date: 2013-06-20 17:38:09 UTC
  • Revision ID: package-import@ubuntu.com-20130620173809-app8lzgvymy5fg6c
Tags: 0.7
Build-depend on binutils-source (>= 2.23.52.20130620-1~).

Show diffs side-by-side

added added

removed removed

Lines of Context:
binutils-2.23.52.20130611/ld/emultempl/lnk960.em
 
1
# This shell script emits a C file. -*- C -*-
 
2
# It does some substitutions.
 
3
fragment <<EOF
 
4
/* intel coff loader emulation specific stuff
 
5
   Copyright 1991, 1992, 1994, 1995, 1996, 1999, 2000, 2001, 2002, 2003,
 
6
   2005, 2007, 2008 Free Software Foundation, Inc.
 
7
   Written by Steve Chamberlain steve@cygnus.com
 
8
 
 
9
   This file is part of the GNU Binutils.
 
10
 
 
11
   This program is free software; you can redistribute it and/or modify
 
12
   it under the terms of the GNU General Public License as published by
 
13
   the Free Software Foundation; either version 3 of the License, or
 
14
   (at your option) any later version.
 
15
 
 
16
   This program is distributed in the hope that it will be useful,
 
17
   but WITHOUT ANY WARRANTY; without even the implied warranty of
 
18
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
19
   GNU General Public License for more details.
 
20
 
 
21
   You should have received a copy of the GNU General Public License
 
22
   along with this program; if not, write to the Free Software
 
23
   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
 
24
   MA 02110-1301, USA.  */
 
25
 
 
26
#include "sysdep.h"
 
27
#include "libiberty.h"
 
28
#include "bfd.h"
 
29
#include "bfdlink.h"
 
30
 
 
31
/*#include "archures.h"*/
 
32
#include "ld.h"
 
33
#include "ldmain.h"
 
34
#include "ldmisc.h"
 
35
#include "ldexp.h"
 
36
#include "ldlang.h"
 
37
#include "ldfile.h"
 
38
#include "ldemul.h"
 
39
 
 
40
typedef struct lib_list {
 
41
  char *name;
 
42
  struct lib_list *next;
 
43
} lib_list_type;
 
44
 
 
45
static lib_list_type *hll_list;
 
46
static lib_list_type **hll_list_tail = &hll_list;
 
47
 
 
48
static lib_list_type *syslib_list;
 
49
static lib_list_type **syslib_list_tail = &syslib_list;
 
50
 
 
51
 
 
52
static void
 
53
append (lib_list_type ***list, char *name)
 
54
{
 
55
  lib_list_type *element = (lib_list_type *) xmalloc (sizeof (lib_list_type));
 
56
 
 
57
  element->name = name;
 
58
  element->next = (lib_list_type *) NULL;
 
59
  **list = element;
 
60
  *list = &element->next;
 
61
 
 
62
}
 
63
 
 
64
static bfd_boolean had_hll = FALSE;
 
65
static bfd_boolean had_hll_name = FALSE;
 
66
 
 
67
static void
 
68
lnk960_hll (char *name)
 
69
{
 
70
  had_hll = TRUE;
 
71
  if (name != (char *) NULL)
 
72
    {
 
73
      had_hll_name = TRUE;
 
74
      append (&hll_list_tail, name);
 
75
    }
 
76
}
 
77
 
 
78
static void
 
79
lnk960_syslib (char *name)
 
80
{
 
81
  append (&syslib_list_tail, name);
 
82
}
 
83
 
 
84
 
 
85
static void
 
86
lnk960_before_parse (void)
 
87
{
 
88
  char *name = getenv ("I960BASE");
 
89
 
 
90
  if (name == (char *) NULL)
 
91
    {
 
92
      name = getenv("G960BASE");
 
93
      if (name == (char *) NULL)
 
94
        einfo ("%P%F I960BASE and G960BASE not set\n");
 
95
    }
 
96
 
 
97
  ldfile_add_library_path (concat (name, "/lib", (const char *) NULL), FALSE);
 
98
  ldfile_output_architecture = bfd_arch_i960;
 
99
  ldfile_output_machine = bfd_mach_i960_core;
 
100
}
 
101
 
 
102
static void
 
103
add_on (lib_list_type *list, lang_input_file_enum_type search)
 
104
{
 
105
  while (list)
 
106
    {
 
107
      lang_add_input_file (list->name, search, (char *) NULL);
 
108
      list = list->next;
 
109
    }
 
110
}
 
111
 
 
112
static void
 
113
lnk960_after_parse (void)
 
114
{
 
115
  /* If there has been no arch, default to -KB */
 
116
  if (ldfile_output_machine_name[0] == 0)
 
117
    ldfile_add_arch ("KB");
 
118
 
 
119
  /* if there has been no hll list then add our own */
 
120
 
 
121
  if (had_hll && !had_hll_name)
 
122
    {
 
123
      append (&hll_list_tail, "cg");
 
124
      if (ldfile_output_machine == bfd_mach_i960_ka_sa
 
125
          || ldfile_output_machine == bfd_mach_i960_ca)
 
126
        append (&hll_list_tail, "fpg");
 
127
    }
 
128
 
 
129
  add_on (hll_list, lang_input_file_is_l_enum);
 
130
  add_on (syslib_list, lang_input_file_is_search_file_enum);
 
131
}
 
132
 
 
133
/* Create a symbol with the given name with the value of the
 
134
   address of first byte of the section named.
 
135
 
 
136
   If the symbol already exists, then do nothing.  */
 
137
 
 
138
static void
 
139
symbol_at_beginning_of (const char *secname, const char *name)
 
140
{
 
141
  struct bfd_link_hash_entry *h;
 
142
 
 
143
  h = bfd_link_hash_lookup (link_info.hash, name, TRUE, TRUE, TRUE);
 
144
  if (h == NULL)
 
145
    einfo (_("%P%F: bfd_link_hash_lookup failed: %E\n"));
 
146
 
 
147
  if (h->type == bfd_link_hash_new
 
148
      || h->type == bfd_link_hash_undefined)
 
149
    {
 
150
      asection *sec;
 
151
 
 
152
      h->type = bfd_link_hash_defined;
 
153
 
 
154
      sec = bfd_get_section_by_name (link_info.output_bfd, secname);
 
155
      if (sec == NULL)
 
156
        sec = bfd_abs_section_ptr;
 
157
      h->u.def.value = 0;
 
158
      h->u.def.section = sec;
 
159
    }
 
160
}
 
161
 
 
162
/* Create a symbol with the given name with the value of the
 
163
   address of the first byte after the end of the section named.
 
164
 
 
165
   If the symbol already exists, then do nothing.  */
 
166
 
 
167
static void
 
168
symbol_at_end_of (const char *secname, const char *name)
 
169
{
 
170
  struct bfd_link_hash_entry *h;
 
171
 
 
172
  h = bfd_link_hash_lookup (link_info.hash, name, TRUE, TRUE, TRUE);
 
173
  if (h == NULL)
 
174
    einfo (_("%P%F: bfd_link_hash_lookup failed: %E\n"));
 
175
 
 
176
  if (h->type == bfd_link_hash_new
 
177
      || h->type == bfd_link_hash_undefined)
 
178
    {
 
179
      asection *sec;
 
180
 
 
181
      h->type = bfd_link_hash_defined;
 
182
 
 
183
      sec = bfd_get_section_by_name (link_info.output_bfd, secname);
 
184
      if (sec == NULL)
 
185
        sec = bfd_abs_section_ptr;
 
186
      h->u.def.value = sec->size;
 
187
      h->u.def.section = sec;
 
188
    }
 
189
}
 
190
 
 
191
static void
 
192
lnk960_after_allocation (void)
 
193
{
 
194
  if (!link_info.relocatable)
 
195
    {
 
196
      symbol_at_end_of (".text", "_etext");
 
197
      symbol_at_end_of (".data", "_edata");
 
198
      symbol_at_beginning_of (".bss", "_bss_start");
 
199
      symbol_at_end_of (".bss", "_end");
 
200
    }
 
201
}
 
202
 
 
203
 
 
204
static struct
 
205
 {
 
206
   unsigned  long number;
 
207
   char *name;
 
208
 }
 
209
machine_table[] =
 
210
{
 
211
  { bfd_mach_i960_core  ,"CORE" },
 
212
  { bfd_mach_i960_kb_sb ,"KB" },
 
213
  { bfd_mach_i960_kb_sb ,"SB" },
 
214
  { bfd_mach_i960_mc    ,"MC" },
 
215
  { bfd_mach_i960_xa    ,"XA" },
 
216
  { bfd_mach_i960_ca    ,"CA" },
 
217
  { bfd_mach_i960_ka_sa ,"KA" },
 
218
  { bfd_mach_i960_ka_sa ,"SA" },
 
219
  { bfd_mach_i960_jx    ,"JX" },
 
220
  { bfd_mach_i960_hx    ,"HX" },
 
221
 
 
222
  { bfd_mach_i960_core  ,"core" },
 
223
  { bfd_mach_i960_kb_sb ,"kb" },
 
224
  { bfd_mach_i960_kb_sb ,"sb" },
 
225
  { bfd_mach_i960_mc    ,"mc" },
 
226
  { bfd_mach_i960_xa    ,"xa" },
 
227
  { bfd_mach_i960_ca    ,"ca" },
 
228
  { bfd_mach_i960_ka_sa ,"ka" },
 
229
  { bfd_mach_i960_ka_sa ,"sa" },
 
230
  { bfd_mach_i960_jx    ,"jx" },
 
231
  { bfd_mach_i960_hx    ,"hx" },
 
232
 
 
233
  { 0, (char *) NULL }
 
234
};
 
235
 
 
236
static void
 
237
lnk960_set_output_arch (void)
 
238
{
 
239
  /* Set the output architecture and machine if possible */
 
240
  unsigned int i;
 
241
  ldfile_output_machine = bfd_mach_i960_core;
 
242
  for (i= 0; machine_table[i].name != (char*) NULL; i++)
 
243
    {
 
244
      if (strcmp (ldfile_output_machine_name, machine_table[i].name) == 0)
 
245
        {
 
246
          ldfile_output_machine = machine_table[i].number;
 
247
          break;
 
248
        }
 
249
    }
 
250
  bfd_set_arch_mach (link_info.output_bfd, ldfile_output_architecture,
 
251
                     ldfile_output_machine);
 
252
}
 
253
 
 
254
static char *
 
255
lnk960_choose_target (int argc ATTRIBUTE_UNUSED, char **argv ATTRIBUTE_UNUSED)
 
256
{
 
257
  char *from_outside = getenv (TARGET_ENVIRON);
 
258
  if (from_outside != (char *) NULL)
 
259
    return from_outside;
 
260
#ifdef LNK960_LITTLE
 
261
  return "coff-Intel-little";
 
262
#else
 
263
  return "coff-Intel-big";
 
264
#endif
 
265
}
 
266
 
 
267
static char *
 
268
lnk960_get_script (int *isfile)
 
269
EOF
 
270
 
 
271
if test -n "$COMPILE_IN"
 
272
then
 
273
# Scripts compiled in.
 
274
 
 
275
# sed commands to quote an ld script as a C string.
 
276
sc="-f stringify.sed"
 
277
 
 
278
fragment <<EOF
 
279
{
 
280
  *isfile = 0;
 
281
 
 
282
  if (link_info.relocatable && config.build_constructors)
 
283
    return
 
284
EOF
 
285
sed $sc ldscripts/${EMULATION_NAME}.xu                 >> e${EMULATION_NAME}.c
 
286
echo '  ; else if (link_info.relocatable) return'     >> e${EMULATION_NAME}.c
 
287
sed $sc ldscripts/${EMULATION_NAME}.xr                 >> e${EMULATION_NAME}.c
 
288
echo '  ; else if (!config.text_read_only) return'     >> e${EMULATION_NAME}.c
 
289
sed $sc ldscripts/${EMULATION_NAME}.xbn                >> e${EMULATION_NAME}.c
 
290
echo '  ; else if (!config.magic_demand_paged) return' >> e${EMULATION_NAME}.c
 
291
sed $sc ldscripts/${EMULATION_NAME}.xn                 >> e${EMULATION_NAME}.c
 
292
echo '  ; else return'                                 >> e${EMULATION_NAME}.c
 
293
sed $sc ldscripts/${EMULATION_NAME}.x                  >> e${EMULATION_NAME}.c
 
294
echo '; }'                                             >> e${EMULATION_NAME}.c
 
295
 
 
296
else
 
297
# Scripts read from the filesystem.
 
298
 
 
299
fragment <<EOF
 
300
{
 
301
  *isfile = 1;
 
302
 
 
303
  if (link_info.relocatable && config.build_constructors)
 
304
    return "ldscripts/${EMULATION_NAME}.xu";
 
305
  else if (link_info.relocatable)
 
306
    return "ldscripts/${EMULATION_NAME}.xr";
 
307
  else if (!config.text_read_only)
 
308
    return "ldscripts/${EMULATION_NAME}.xbn";
 
309
  else if (!config.magic_demand_paged)
 
310
    return "ldscripts/${EMULATION_NAME}.xn";
 
311
  else
 
312
    return "ldscripts/${EMULATION_NAME}.x";
 
313
}
 
314
EOF
 
315
 
 
316
fi
 
317
 
 
318
fragment <<EOF
 
319
 
 
320
struct ld_emulation_xfer_struct ld_lnk960_emulation =
 
321
{
 
322
  lnk960_before_parse,
 
323
  lnk960_syslib,
 
324
  lnk960_hll,
 
325
  lnk960_after_parse,
 
326
  after_open_default,
 
327
  lnk960_after_allocation,
 
328
  lnk960_set_output_arch,
 
329
  lnk960_choose_target,
 
330
  before_allocation_default,
 
331
  lnk960_get_script,
 
332
  "lnk960",
 
333
  "",
 
334
  finish_default,
 
335
  NULL, /* create output section statements */
 
336
  NULL, /* open dynamic archive */
 
337
  NULL, /* place orphan */
 
338
  NULL, /* set symbols */
 
339
  NULL, /* parse args */
 
340
  NULL, /* add_options */
 
341
  NULL, /* handle_option */
 
342
  NULL, /* unrecognized file */
 
343
  NULL, /* list options */
 
344
  NULL, /* recognized file */
 
345
  NULL, /* find_potential_libraries */
 
346
  NULL  /* new_vers_pattern */
 
347
};
 
348
EOF