aboutsummaryrefslogtreecommitdiff
path: root/ld/h8300hms.c
blob: 06e8a89977f3b68ba99d85bd5dce5f9cfdf72770 (plain)
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 h8300hms_before_parse()
{
  ldfile_output_architecture = bfd_arch_h8300;
}


static void 
h8300hms_after_parse()
{

}

static void
h8300hms_after_allocation()
{

}

static void
h8300hms_before_allocation()
{

}


static void
h8300hms_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 *
h8300hms_choose_target()
{
  char *from_outside = getenv(TARGET_ENVIRON);
  if (from_outside != (char *)NULL)
    return from_outside;
  return H8300HMS_TARGET;
}

static void
h8300hms_syslib()
{
  info("%S SYSLIB ignored\n");
}

static void
h8300hms_hll(ignore)
char  *ignore;
{
  info("%S HLL ignored\n");
}

static char *h8300hms_script =  
#include "h8300hms.x"
;
static char *h8300hms_script_option_Ur  =  
#include "h8300hms.x"
;
static char *h8300hms_script_option_r  =  
#include "h8300hms.x"
;

static char *h8300hms_get_script()
{			     
  extern ld_config_type config;
  if (config.relocateable_output == true &&
      config.build_constructors == true) {
    return h8300hms_script_option_Ur;
  }
  if (config.relocateable_output) {
    return h8300hms_script_option_r;
  }
	
  return h8300hms_script;
}
struct ld_emulation_xfer_struct ld_h8300hms_emulation = 
{
  h8300hms_before_parse,
  h8300hms_syslib,
  h8300hms_hll,
  h8300hms_after_parse,
  h8300hms_after_allocation,
  h8300hms_set_output_arch,
  h8300hms_choose_target,
  h8300hms_before_allocation,
  h8300hms_get_script,
};