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