Update year range in copyright notice of binutils files
[external/binutils.git] / ld / emultempl / m68kelf.em
1 # This shell script emits a C file. -*- C -*-
2 #   Copyright (C) 2000-2018 Free Software Foundation, Inc.
3 #   Written by Michael Sokolov <msokolov@ivan.Harhan.ORG>, based on armelf.em
4 #
5 # This file is part of the GNU Binutils.
6 #
7 # This program is free software; you can redistribute it and/or modify
8 # it under the terms of the GNU General Public License as published by
9 # the Free Software Foundation; either version 3 of the License, or
10 # (at your option) any later version.
11 #
12 # This program is distributed in the hope that it will be useful,
13 # but WITHOUT ANY WARRANTY; without even the implied warranty of
14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 # GNU General Public License for more details.
16 #
17 # You should have received a copy of the GNU General Public License
18 # along with this program; if not, write to the Free Software
19 # Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 # MA 02110-1301, USA.
21
22
23 # This file is sourced from elf32.em, and defines some extra routines for m68k
24 # embedded systems using ELF and for some other systems using m68k ELF.  While
25 # it is sourced from elf32.em for all m68k ELF configurations, here we include
26 # only the features we want depending on the configuration.
27
28 case ${target} in
29   m68*-*-elf)
30     echo "#define SUPPORT_EMBEDDED_RELOCS" >>e${EMULATION_NAME}.c
31     ;;
32 esac
33
34 case ${target} in
35   *-linux*)
36 # Don't use multi-GOT by default due to glibc linker's assumption
37 # that GOT pointer points to GOT[0].
38 #   got_handling_target_default=GOT_HANDLING_MULTIGOT
39     got_handling_target_default=GOT_HANDLING_SINGLE
40     ;;
41   *)
42     got_handling_target_default=GOT_HANDLING_SINGLE
43     ;;
44 esac
45
46 fragment <<EOF
47
48 #define GOT_HANDLING_SINGLE   (0)
49 #define GOT_HANDLING_NEGATIVE (1)
50 #define GOT_HANDLING_MULTIGOT (2)
51 #define GOT_HANDLING_TARGET_DEFAULT ${got_handling_target_default}
52
53 /* How to generate GOT.  */
54 static int got_handling = GOT_HANDLING_DEFAULT;
55
56 #ifdef SUPPORT_EMBEDDED_RELOCS
57 static void check_sections (bfd *, asection *, void *);
58 #endif
59
60 /* This function is run after all the input files have been opened.  */
61
62 static void
63 m68k_elf_after_open (void)
64 {
65   /* Call the standard elf routine.  */
66   gld${EMULATION_NAME}_after_open ();
67
68 #ifdef SUPPORT_EMBEDDED_RELOCS
69   if (command_line.embedded_relocs
70       && (!bfd_link_relocatable (&link_info)))
71     {
72       bfd *abfd;
73
74       /* In the embedded relocs mode we create a .emreloc section for each
75          input file with a nonzero .data section.  The BFD backend will fill in
76          these sections with magic numbers which can be used to relocate the
77          data section at run time.  */
78       for (abfd = link_info.input_bfds; abfd != NULL; abfd = abfd->link.next)
79         {
80           asection *datasec;
81
82           /* As first-order business, make sure that each input BFD is either
83              COFF or ELF.  We need to call a special BFD backend function to
84              generate the embedded relocs, and we have such functions only for
85              COFF and ELF.  */
86           if (bfd_get_flavour (abfd) != bfd_target_coff_flavour
87               && bfd_get_flavour (abfd) != bfd_target_elf_flavour)
88             einfo (_("%F%B: all input objects must be COFF or ELF "
89                      "for --embedded-relocs\n"));
90
91           datasec = bfd_get_section_by_name (abfd, ".data");
92
93           /* Note that we assume that the reloc_count field has already
94              been set up.  We could call bfd_get_reloc_upper_bound, but
95              that returns the size of a memory buffer rather than a reloc
96              count.  We do not want to call bfd_canonicalize_reloc,
97              because although it would always work it would force us to
98              read in the relocs into BFD canonical form, which would waste
99              a significant amount of time and memory.  */
100           if (datasec != NULL && datasec->reloc_count > 0)
101             {
102               asection *relsec;
103
104               relsec = bfd_make_section_with_flags (abfd, ".emreloc",
105                                                     (SEC_ALLOC
106                                                     | SEC_LOAD
107                                                     | SEC_HAS_CONTENTS
108                                                     | SEC_IN_MEMORY));
109               if (relsec == NULL
110                   || ! bfd_set_section_alignment (abfd, relsec, 2)
111                   || ! bfd_set_section_size (abfd, relsec,
112                                              datasec->reloc_count * 12))
113                 einfo (_("%F%B: can not create .emreloc section: %E\n"));
114             }
115
116           /* Double check that all other data sections are empty, as is
117              required for embedded PIC code.  */
118           bfd_map_over_sections (abfd, check_sections, datasec);
119         }
120     }
121 #endif /* SUPPORT_EMBEDDED_RELOCS */
122 }
123
124 #ifdef SUPPORT_EMBEDDED_RELOCS
125 /* Check that of the data sections, only the .data section has
126    relocs.  This is called via bfd_map_over_sections.  */
127
128 static void
129 check_sections (bfd *abfd, asection *sec, void *datasec)
130 {
131   if ((bfd_get_section_flags (abfd, sec) & SEC_DATA)
132       && sec != datasec
133       && sec->reloc_count != 0)
134     einfo (_("%B%X: section %s has relocs; can not use --embedded-relocs\n"),
135            abfd, bfd_get_section_name (abfd, sec));
136 }
137
138 #endif /* SUPPORT_EMBEDDED_RELOCS */
139
140 /* This function is called after the section sizes and offsets have
141    been set.  */
142
143 static void
144 m68k_elf_after_allocation (void)
145 {
146   /* Call the standard elf routine.  */
147   gld${EMULATION_NAME}_after_allocation ();
148
149 #ifdef SUPPORT_EMBEDDED_RELOCS
150   if (command_line.embedded_relocs
151       && (!bfd_link_relocatable (&link_info)))
152     {
153       bfd *abfd;
154
155       /* If we are generating embedded relocs, call a special BFD backend
156          routine to do the work.  */
157       for (abfd = link_info.input_bfds; abfd != NULL; abfd = abfd->link.next)
158         {
159           asection *datasec, *relsec;
160           char *errmsg;
161
162           datasec = bfd_get_section_by_name (abfd, ".data");
163
164           if (datasec == NULL || datasec->reloc_count == 0)
165             continue;
166
167           relsec = bfd_get_section_by_name (abfd, ".emreloc");
168           ASSERT (relsec != NULL);
169
170           if (bfd_get_flavour (abfd) == bfd_target_coff_flavour)
171             {
172               if (! bfd_m68k_coff_create_embedded_relocs (abfd, &link_info,
173                                                           datasec, relsec,
174                                                           &errmsg))
175                 {
176                   if (errmsg == NULL)
177                     einfo (_("%B%X: can not create "
178                              "runtime reloc information: %E\n"),
179                            abfd);
180                   else
181                     einfo (_("%X%B: can not create "
182                              "runtime reloc information: %s\n"),
183                            abfd, errmsg);
184                 }
185             }
186           else if (bfd_get_flavour (abfd) == bfd_target_elf_flavour)
187             {
188               if (! bfd_m68k_elf32_create_embedded_relocs (abfd, &link_info,
189                                                            datasec, relsec,
190                                                            &errmsg))
191                 {
192                   if (errmsg == NULL)
193                     einfo (_("%B%X: can not create "
194                              "runtime reloc information: %E\n"),
195                            abfd);
196                   else
197                     einfo (_("%X%B: can not create "
198                              "runtime reloc information: %s\n"),
199                            abfd, errmsg);
200                 }
201             }
202           else
203             abort ();
204         }
205     }
206 #endif /* SUPPORT_EMBEDDED_RELOCS */
207 }
208
209 /* This is a convenient point to tell BFD about target specific flags.
210    After the output has been created, but before inputs are read.  */
211
212 static void
213 elf_m68k_create_output_section_statements (void)
214 {
215   bfd_elf_m68k_set_target_options (&link_info, got_handling);
216 }
217
218 EOF
219
220 # Define some shell vars to insert bits of code into the standard elf
221 # parse_args and list_options functions.
222 #
223 PARSE_AND_LIST_PROLOGUE='
224 #define OPTION_GOT      301
225 '
226
227 PARSE_AND_LIST_LONGOPTS='
228   { "got", required_argument, NULL, OPTION_GOT},
229 '
230
231 PARSE_AND_LIST_OPTIONS='
232   fprintf (file, _("  --got=<type>                Specify GOT handling scheme\n"));
233 '
234
235 PARSE_AND_LIST_ARGS_CASES='
236     case OPTION_GOT:
237       if (strcmp (optarg, "target") == 0)
238         got_handling = GOT_HANDLING_TARGET_DEFAULT;
239       else if (strcmp (optarg, "single") == 0)
240         got_handling = 0;
241       else if (strcmp (optarg, "negative") == 0)
242         got_handling = 1;
243       else if (strcmp (optarg, "multigot") == 0)
244         got_handling = 2;
245       else
246         einfo (_("Unrecognized --got argument '\''%s'\''.\n"), optarg);
247       break;
248 '
249
250 # We have our own after_open and after_allocation functions, but they call
251 # the standard routines, so give them a different name.
252 LDEMUL_AFTER_OPEN=m68k_elf_after_open
253 LDEMUL_AFTER_ALLOCATION=m68k_elf_after_allocation
254 LDEMUL_CREATE_OUTPUT_SECTION_STATEMENTS=elf_m68k_create_output_section_statements