Commit | Line | Data |
---|---|---|
c618de01 | 1 | /* BFD support for handling relocation entries. |
65cab589 | 2 | Copyright (C) 1990, 1991, 1992, 1993 Free Software Foundation, Inc. |
c618de01 SC |
3 | Written by Cygnus Support. |
4 | ||
5 | This file is part of BFD, the Binary File Descriptor library. | |
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 2 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., 675 Mass Ave, Cambridge, MA 02139, USA. */ | |
20 | ||
0cda46cf SC |
21 | /* |
22 | SECTION | |
23 | Relocations | |
985fca12 | 24 | |
c188b0be DM |
25 | BFD maintains relocations in much the same way it maintains |
26 | symbols: they are left alone until required, then read in | |
27 | en-mass and translated into an internal form. A common | |
28 | routine <<bfd_perform_relocation>> acts upon the | |
29 | canonical form to do the fixup. | |
985fca12 | 30 | |
c188b0be DM |
31 | Relocations are maintained on a per section basis, |
32 | while symbols are maintained on a per BFD basis. | |
985fca12 | 33 | |
c188b0be DM |
34 | All that a back end has to do to fit the BFD interface is to create |
35 | a <<struct reloc_cache_entry>> for each relocation | |
36 | in a particular section, and fill in the right bits of the structures. | |
985fca12 SC |
37 | |
38 | @menu | |
e98e6ec1 SC |
39 | @* typedef arelent:: |
40 | @* howto manager:: | |
985fca12 SC |
41 | @end menu |
42 | ||
43 | */ | |
0443af31 KR |
44 | |
45 | /* DO compile in the reloc_code name table from libbfd.h. */ | |
46 | #define _BFD_MAKE_TABLE_bfd_reloc_code_real | |
47 | ||
985fca12 | 48 | #include "bfd.h" |
0cda46cf | 49 | #include "sysdep.h" |
4c3721d5 | 50 | #include "bfdlink.h" |
985fca12 | 51 | #include "libbfd.h" |
c26d7d17 SC |
52 | /* |
53 | DOCDD | |
e98e6ec1 SC |
54 | INODE |
55 | typedef arelent, howto manager, Relocations, Relocations | |
985fca12 | 56 | |
0cda46cf SC |
57 | SUBSECTION |
58 | typedef arelent | |
985fca12 | 59 | |
e98e6ec1 | 60 | This is the structure of a relocation entry: |
985fca12 | 61 | |
e98e6ec1 SC |
62 | CODE_FRAGMENT |
63 | . | |
326e32d7 | 64 | .typedef enum bfd_reloc_status |
e98e6ec1 SC |
65 | .{ |
66 | . {* No errors detected *} | |
0cda46cf | 67 | . bfd_reloc_ok, |
e98e6ec1 SC |
68 | . |
69 | . {* The relocation was performed, but there was an overflow. *} | |
0cda46cf | 70 | . bfd_reloc_overflow, |
e98e6ec1 | 71 | . |
65cab589 | 72 | . {* The address to relocate was not within the section supplied. *} |
0cda46cf | 73 | . bfd_reloc_outofrange, |
e98e6ec1 SC |
74 | . |
75 | . {* Used by special functions *} | |
0cda46cf | 76 | . bfd_reloc_continue, |
e98e6ec1 | 77 | . |
c188b0be | 78 | . {* Unsupported relocation size requested. *} |
0cda46cf | 79 | . bfd_reloc_notsupported, |
e98e6ec1 | 80 | . |
c188b0be | 81 | . {* Unused *} |
0cda46cf | 82 | . bfd_reloc_other, |
e98e6ec1 | 83 | . |
65cab589 | 84 | . {* The symbol to relocate against was undefined. *} |
0cda46cf | 85 | . bfd_reloc_undefined, |
e98e6ec1 SC |
86 | . |
87 | . {* The relocation was performed, but may not be ok - presently | |
88 | . generated only when linking i960 coff files with i960 b.out | |
4c3721d5 ILT |
89 | . symbols. If this type is returned, the error_message argument |
90 | . to bfd_perform_relocation will be set. *} | |
0cda46cf | 91 | . bfd_reloc_dangerous |
e98e6ec1 | 92 | . } |
0cda46cf | 93 | . bfd_reloc_status_type; |
e98e6ec1 SC |
94 | . |
95 | . | |
326e32d7 | 96 | .typedef struct reloc_cache_entry |
0cda46cf | 97 | .{ |
e98e6ec1 SC |
98 | . {* A pointer into the canonical table of pointers *} |
99 | . struct symbol_cache_entry **sym_ptr_ptr; | |
100 | . | |
101 | . {* offset in section *} | |
65cab589 | 102 | . bfd_size_type address; |
e98e6ec1 SC |
103 | . |
104 | . {* addend for relocation value *} | |
326e32d7 | 105 | . bfd_vma addend; |
e98e6ec1 SC |
106 | . |
107 | . {* Pointer to how to perform the required relocation *} | |
4c3721d5 | 108 | . const struct reloc_howto_struct *howto; |
e98e6ec1 SC |
109 | . |
110 | .} arelent; | |
985fca12 | 111 | |
e98e6ec1 | 112 | */ |
985fca12 | 113 | |
e98e6ec1 SC |
114 | /* |
115 | DESCRIPTION | |
985fca12 | 116 | |
c188b0be | 117 | Here is a description of each of the fields within an <<arelent>>: |
985fca12 | 118 | |
c188b0be | 119 | o <<sym_ptr_ptr>> |
985fca12 | 120 | |
e98e6ec1 | 121 | The symbol table pointer points to a pointer to the symbol |
c188b0be DM |
122 | associated with the relocation request. It is |
123 | the pointer into the table returned by the back end's | |
124 | <<get_symtab>> action. @xref{Symbols}. The symbol is referenced | |
e98e6ec1 SC |
125 | through a pointer to a pointer so that tools like the linker |
126 | can fix up all the symbols of the same name by modifying only | |
127 | one pointer. The relocation routine looks in the symbol and | |
128 | uses the base of the section the symbol is attached to and the | |
129 | value of the symbol as the initial relocation offset. If the | |
130 | symbol pointer is zero, then the section provided is looked up. | |
985fca12 | 131 | |
c188b0be | 132 | o <<address>> |
985fca12 | 133 | |
c188b0be | 134 | The <<address>> field gives the offset in bytes from the base of |
e98e6ec1 SC |
135 | the section data which owns the relocation record to the first |
136 | byte of relocatable information. The actual data relocated | |
c188b0be | 137 | will be relative to this point; for example, a relocation |
e98e6ec1 SC |
138 | type which modifies the bottom two bytes of a four byte word |
139 | would not touch the first byte pointed to in a big endian | |
c26d7d17 SC |
140 | world. |
141 | ||
c188b0be | 142 | o <<addend>> |
c26d7d17 | 143 | |
c188b0be | 144 | The <<addend>> is a value provided by the back end to be added (!) |
c26d7d17 SC |
145 | to the relocation offset. Its interpretation is dependent upon |
146 | the howto. For example, on the 68k the code: | |
985fca12 | 147 | |
985fca12 | 148 | |
e98e6ec1 SC |
149 | | char foo[]; |
150 | | main() | |
151 | | { | |
152 | | return foo[0x12345678]; | |
153 | | } | |
985fca12 | 154 | |
e98e6ec1 | 155 | Could be compiled into: |
985fca12 | 156 | |
e98e6ec1 SC |
157 | | linkw fp,#-4 |
158 | | moveb @@#12345678,d0 | |
159 | | extbl d0 | |
160 | | unlk fp | |
161 | | rts | |
985fca12 | 162 | |
985fca12 | 163 | |
c188b0be DM |
164 | This could create a reloc pointing to <<foo>>, but leave the |
165 | offset in the data, something like: | |
0cda46cf | 166 | |
985fca12 | 167 | |
e98e6ec1 | 168 | |RELOCATION RECORDS FOR [.text]: |
326e32d7 | 169 | |offset type value |
e98e6ec1 SC |
170 | |00000006 32 _foo |
171 | | | |
172 | |00000000 4e56 fffc ; linkw fp,#-4 | |
173 | |00000004 1039 1234 5678 ; moveb @@#12345678,d0 | |
174 | |0000000a 49c0 ; extbl d0 | |
175 | |0000000c 4e5e ; unlk fp | |
176 | |0000000e 4e75 ; rts | |
0cda46cf | 177 | |
985fca12 | 178 | |
e98e6ec1 SC |
179 | Using coff and an 88k, some instructions don't have enough |
180 | space in them to represent the full address range, and | |
181 | pointers have to be loaded in two parts. So you'd get something like: | |
0cda46cf | 182 | |
985fca12 | 183 | |
e98e6ec1 SC |
184 | | or.u r13,r0,hi16(_foo+0x12345678) |
185 | | ld.b r2,r13,lo16(_foo+0x12345678) | |
186 | | jmp r1 | |
985fca12 | 187 | |
985fca12 | 188 | |
c188b0be | 189 | This should create two relocs, both pointing to <<_foo>>, and with |
e98e6ec1 | 190 | 0x12340000 in their addend field. The data would consist of: |
0cda46cf | 191 | |
985fca12 | 192 | |
e98e6ec1 | 193 | |RELOCATION RECORDS FOR [.text]: |
326e32d7 | 194 | |offset type value |
e98e6ec1 SC |
195 | |00000002 HVRT16 _foo+0x12340000 |
196 | |00000006 LVRT16 _foo+0x12340000 | |
4c3721d5 | 197 | | |
e98e6ec1 SC |
198 | |00000000 5da05678 ; or.u r13,r0,0x5678 |
199 | |00000004 1c4d5678 ; ld.b r2,r13,0x5678 | |
200 | |00000008 f400c001 ; jmp r1 | |
985fca12 | 201 | |
0cda46cf | 202 | |
e98e6ec1 | 203 | The relocation routine digs out the value from the data, adds |
c188b0be DM |
204 | it to the addend to get the original offset, and then adds the |
205 | value of <<_foo>>. Note that all 32 bits have to be kept around | |
e98e6ec1 | 206 | somewhere, to cope with carry from bit 15 to bit 16. |
985fca12 | 207 | |
65cab589 | 208 | One further example is the sparc and the a.out format. The |
e98e6ec1 SC |
209 | sparc has a similar problem to the 88k, in that some |
210 | instructions don't have room for an entire offset, but on the | |
c188b0be DM |
211 | sparc the parts are created in odd sized lumps. The designers of |
212 | the a.out format chose to not use the data within the section | |
e98e6ec1 | 213 | for storing part of the offset; all the offset is kept within |
326e32d7 | 214 | the reloc. Anything in the data should be ignored. |
0cda46cf | 215 | |
e98e6ec1 SC |
216 | | save %sp,-112,%sp |
217 | | sethi %hi(_foo+0x12345678),%g2 | |
218 | | ldsb [%g2+%lo(_foo+0x12345678)],%i0 | |
219 | | ret | |
220 | | restore | |
0cda46cf | 221 | |
4c3721d5 | 222 | Both relocs contain a pointer to <<foo>>, and the offsets |
e98e6ec1 | 223 | contain junk. |
985fca12 | 224 | |
0cda46cf | 225 | |
e98e6ec1 | 226 | |RELOCATION RECORDS FOR [.text]: |
326e32d7 | 227 | |offset type value |
e98e6ec1 SC |
228 | |00000004 HI22 _foo+0x12345678 |
229 | |00000008 LO10 _foo+0x12345678 | |
4c3721d5 | 230 | | |
e98e6ec1 SC |
231 | |00000000 9de3bf90 ; save %sp,-112,%sp |
232 | |00000004 05000000 ; sethi %hi(_foo+0),%g2 | |
233 | |00000008 f048a000 ; ldsb [%g2+%lo(_foo+0)],%i0 | |
234 | |0000000c 81c7e008 ; ret | |
235 | |00000010 81e80000 ; restore | |
236 | ||
0cda46cf | 237 | |
c188b0be | 238 | o <<howto>> |
e98e6ec1 | 239 | |
c188b0be DM |
240 | The <<howto>> field can be imagined as a |
241 | relocation instruction. It is a pointer to a structure which | |
242 | contains information on what to do with all of the other | |
e98e6ec1 SC |
243 | information in the reloc record and data section. A back end |
244 | would normally have a relocation instruction set and turn | |
245 | relocations into pointers to the correct structure on input - | |
246 | but it would be possible to create each howto field on demand. | |
326e32d7 | 247 | |
985fca12 SC |
248 | */ |
249 | ||
66a277ab ILT |
250 | /* |
251 | SUBSUBSECTION | |
252 | <<enum complain_overflow>> | |
253 | ||
254 | Indicates what sort of overflow checking should be done when | |
255 | performing a relocation. | |
256 | ||
257 | CODE_FRAGMENT | |
258 | . | |
259 | .enum complain_overflow | |
260 | .{ | |
261 | . {* Do not complain on overflow. *} | |
262 | . complain_overflow_dont, | |
263 | . | |
264 | . {* Complain if the bitfield overflows, whether it is considered | |
265 | . as signed or unsigned. *} | |
266 | . complain_overflow_bitfield, | |
267 | . | |
268 | . {* Complain if the value overflows when considered as signed | |
269 | . number. *} | |
270 | . complain_overflow_signed, | |
271 | . | |
272 | . {* Complain if the value overflows when considered as an | |
273 | . unsigned number. *} | |
274 | . complain_overflow_unsigned | |
275 | .}; | |
276 | ||
277 | */ | |
985fca12 | 278 | |
0cda46cf | 279 | /* |
326e32d7 | 280 | SUBSUBSECTION |
e98e6ec1 | 281 | <<reloc_howto_type>> |
985fca12 | 282 | |
e98e6ec1 | 283 | The <<reloc_howto_type>> is a structure which contains all the |
c188b0be | 284 | information that libbfd needs to know to tie up a back end's data. |
985fca12 | 285 | |
e98e6ec1 | 286 | CODE_FRAGMENT |
5022aea5 | 287 | .struct symbol_cache_entry; {* Forward declaration *} |
e98e6ec1 | 288 | . |
1fb83be6 | 289 | .typedef unsigned char bfd_byte; |
0443af31 | 290 | .typedef struct reloc_howto_struct reloc_howto_type; |
1fb83be6 KR |
291 | . |
292 | .struct reloc_howto_struct | |
326e32d7 | 293 | .{ |
e98e6ec1 | 294 | . {* The type field has mainly a documetary use - the back end can |
c188b0be DM |
295 | . do what it wants with it, though normally the back end's |
296 | . external idea of what a reloc number is stored | |
297 | . in this field. For example, a PC relative word relocation | |
298 | . in a coff environment has the type 023 - because that's | |
e98e6ec1 | 299 | . what the outside world calls a R_PCRWORD reloc. *} |
0cda46cf | 300 | . unsigned int type; |
e98e6ec1 SC |
301 | . |
302 | . {* The value the final relocation is shifted right by. This drops | |
303 | . unwanted data from the relocation. *} | |
0cda46cf | 304 | . unsigned int rightshift; |
e98e6ec1 | 305 | . |
fb32909a | 306 | . {* The size of the item to be relocated. This is *not* a |
4c3721d5 ILT |
307 | . power-of-two measure. To get the number of bytes operated |
308 | . on by a type of relocation, use bfd_get_reloc_size. *} | |
c26d7d17 | 309 | . int size; |
e98e6ec1 | 310 | . |
66a277ab ILT |
311 | . {* The number of bits in the item to be relocated. This is used |
312 | . when doing overflow checking. *} | |
0cda46cf | 313 | . unsigned int bitsize; |
e98e6ec1 SC |
314 | . |
315 | . {* Notes that the relocation is relative to the location in the | |
316 | . data section of the addend. The relocation function will | |
317 | . subtract from the relocation value the address of the location | |
318 | . being relocated. *} | |
0cda46cf | 319 | . boolean pc_relative; |
e98e6ec1 | 320 | . |
66a277ab ILT |
321 | . {* The bit position of the reloc value in the destination. |
322 | . The relocated value is left shifted by this amount. *} | |
0cda46cf | 323 | . unsigned int bitpos; |
e98e6ec1 | 324 | . |
66a277ab ILT |
325 | . {* What type of overflow error should be checked for when |
326 | . relocating. *} | |
327 | . enum complain_overflow complain_on_overflow; | |
e98e6ec1 SC |
328 | . |
329 | . {* If this field is non null, then the supplied function is | |
330 | . called rather than the normal function. This allows really | |
65cab589 | 331 | . strange relocation methods to be accomodated (e.g., i960 callj |
e98e6ec1 | 332 | . instructions). *} |
326e32d7 | 333 | . bfd_reloc_status_type (*special_function) |
fefb4b30 | 334 | . PARAMS ((bfd *abfd, |
5022aea5 SC |
335 | . arelent *reloc_entry, |
336 | . struct symbol_cache_entry *symbol, | |
337 | . PTR data, | |
326e32d7 | 338 | . asection *input_section, |
4c3721d5 ILT |
339 | . bfd *output_bfd, |
340 | . char **error_message)); | |
e98e6ec1 SC |
341 | . |
342 | . {* The textual name of the relocation type. *} | |
0cda46cf | 343 | . char *name; |
e98e6ec1 SC |
344 | . |
345 | . {* When performing a partial link, some formats must modify the | |
346 | . relocations rather than the data - this flag signals this.*} | |
0cda46cf | 347 | . boolean partial_inplace; |
e98e6ec1 | 348 | . |
c188b0be | 349 | . {* The src_mask selects which parts of the read in data |
65cab589 | 350 | . are to be used in the relocation sum. E.g., if this was an 8 bit |
e98e6ec1 SC |
351 | . bit of data which we read and relocated, this would be |
352 | . 0x000000ff. When we have relocs which have an addend, such as | |
353 | . sun4 extended relocs, the value in the offset part of a | |
354 | . relocating field is garbage so we never use it. In this case | |
355 | . the mask would be 0x00000000. *} | |
65cab589 | 356 | . bfd_vma src_mask; |
e98e6ec1 | 357 | . |
c188b0be | 358 | . {* The dst_mask selects which parts of the instruction are replaced |
e98e6ec1 SC |
359 | . into the instruction. In most cases src_mask == dst_mask, |
360 | . except in the above special case, where dst_mask would be | |
361 | . 0x000000ff, and src_mask would be 0x00000000. *} | |
326e32d7 | 362 | . bfd_vma dst_mask; |
e98e6ec1 SC |
363 | . |
364 | . {* When some formats create PC relative instructions, they leave | |
365 | . the value of the pc of the place being relocated in the offset | |
366 | . slot of the instruction, so that a PC relative relocation can | |
65cab589 | 367 | . be made just by adding in an ordinary offset (e.g., sun3 a.out). |
e98e6ec1 | 368 | . Some formats leave the displacement part of an instruction |
c188b0be | 369 | . empty (e.g., m88k bcs); this flag signals the fact.*} |
0cda46cf | 370 | . boolean pcrel_offset; |
e98e6ec1 | 371 | . |
1fb83be6 | 372 | .}; |
985fca12 | 373 | |
0cda46cf | 374 | */ |
985fca12 | 375 | |
0cda46cf SC |
376 | /* |
377 | FUNCTION | |
c188b0be | 378 | The HOWTO Macro |
e98e6ec1 | 379 | |
0cda46cf SC |
380 | DESCRIPTION |
381 | The HOWTO define is horrible and will go away. | |
382 | ||
383 | ||
66a277ab | 384 | .#define HOWTO(C, R,S,B, P, BI, O, SF, NAME, INPLACE, MASKSRC, MASKDST, PC) \ |
0443af31 | 385 | . {(unsigned)C,R,S,B, P, BI, O,SF,NAME,INPLACE,MASKSRC,MASKDST,PC} |
0cda46cf SC |
386 | |
387 | DESCRIPTION | |
388 | And will be replaced with the totally magic way. But for the | |
c188b0be | 389 | moment, we are compatible, so do it this way. |
0cda46cf SC |
390 | |
391 | ||
66a277ab | 392 | .#define NEWHOWTO( FUNCTION, NAME,SIZE,REL,IN) HOWTO(0,0,SIZE,0,REL,0,complain_overflow_dont,FUNCTION, NAME,false,0,0,IN) |
0cda46cf SC |
393 | . |
394 | DESCRIPTION | |
395 | Helper routine to turn a symbol into a relocation value. | |
396 | ||
e98e6ec1 SC |
397 | .#define HOWTO_PREPARE(relocation, symbol) \ |
398 | . { \ | |
399 | . if (symbol != (asymbol *)NULL) { \ | |
65cab589 | 400 | . if (bfd_is_com_section (symbol->section)) { \ |
e98e6ec1 SC |
401 | . relocation = 0; \ |
402 | . } \ | |
403 | . else { \ | |
404 | . relocation = symbol->value; \ | |
405 | . } \ | |
406 | . } \ | |
326e32d7 | 407 | .} |
985fca12 SC |
408 | |
409 | */ | |
410 | ||
4c3721d5 ILT |
411 | /* |
412 | FUNCTION | |
413 | bfd_get_reloc_size | |
414 | ||
415 | SYNOPSIS | |
416 | int bfd_get_reloc_size (const reloc_howto_type *); | |
417 | ||
418 | DESCRIPTION | |
419 | For a reloc_howto_type that operates on a fixed number of bytes, | |
420 | this returns the number of bytes operated on. | |
421 | */ | |
422 | ||
423 | int | |
424 | bfd_get_reloc_size (howto) | |
425 | const reloc_howto_type *howto; | |
426 | { | |
326e32d7 ILT |
427 | switch (howto->size) |
428 | { | |
429 | case 0: return 1; | |
430 | case 1: return 2; | |
431 | case 2: return 4; | |
432 | case 3: return 0; | |
433 | case 4: return 8; | |
434 | case -2: return 4; | |
435 | default: abort (); | |
436 | } | |
4c3721d5 ILT |
437 | } |
438 | ||
0cda46cf SC |
439 | /* |
440 | TYPEDEF | |
c188b0be | 441 | arelent_chain |
985fca12 | 442 | |
0cda46cf | 443 | DESCRIPTION |
985fca12 | 444 | |
c188b0be | 445 | How relocs are tied together in an <<asection>>: |
985fca12 | 446 | |
0cda46cf SC |
447 | .typedef struct relent_chain { |
448 | . arelent relent; | |
449 | . struct relent_chain *next; | |
450 | .} arelent_chain; | |
985fca12 SC |
451 | |
452 | */ | |
453 | ||
454 | ||
455 | ||
0cda46cf | 456 | /* |
326e32d7 | 457 | FUNCTION |
0cda46cf SC |
458 | bfd_perform_relocation |
459 | ||
e98e6ec1 SC |
460 | SYNOPSIS |
461 | bfd_reloc_status_type | |
462 | bfd_perform_relocation | |
c188b0be | 463 | (bfd *abfd, |
4c3721d5 ILT |
464 | arelent *reloc_entry, |
465 | PTR data, | |
466 | asection *input_section, | |
467 | bfd *output_bfd, | |
468 | char **error_message); | |
e98e6ec1 | 469 | |
0cda46cf | 470 | DESCRIPTION |
4c3721d5 ILT |
471 | If @var{output_bfd} is supplied to this function, the |
472 | generated image will be relocatable; the relocations are | |
473 | copied to the output file after they have been changed to | |
474 | reflect the new state of the world. There are two ways of | |
475 | reflecting the results of partial linkage in an output file: | |
476 | by modifying the output data in place, and by modifying the | |
477 | relocation record. Some native formats (e.g., basic a.out and | |
478 | basic coff) have no way of specifying an addend in the | |
479 | relocation type, so the addend has to go in the output data. | |
480 | This is no big deal since in these formats the output data | |
481 | slot will always be big enough for the addend. Complex reloc | |
482 | types with addends were invented to solve just this problem. | |
483 | The @var{error_message} argument is set to an error message if | |
484 | this return @code{bfd_reloc_dangerous}. | |
0cda46cf | 485 | |
985fca12 SC |
486 | */ |
487 | ||
488 | ||
0cda46cf | 489 | bfd_reloc_status_type |
4c3721d5 ILT |
490 | bfd_perform_relocation (abfd, reloc_entry, data, input_section, output_bfd, |
491 | error_message) | |
492 | bfd *abfd; | |
493 | arelent *reloc_entry; | |
494 | PTR data; | |
495 | asection *input_section; | |
496 | bfd *output_bfd; | |
497 | char **error_message; | |
985fca12 SC |
498 | { |
499 | bfd_vma relocation; | |
0cda46cf | 500 | bfd_reloc_status_type flag = bfd_reloc_ok; |
326e32d7 | 501 | bfd_size_type addr = reloc_entry->address; |
985fca12 | 502 | bfd_vma output_base = 0; |
4c3721d5 ILT |
503 | const reloc_howto_type *howto = reloc_entry->howto; |
504 | asection *reloc_target_output_section; | |
985fca12 SC |
505 | asymbol *symbol; |
506 | ||
4c3721d5 | 507 | symbol = *(reloc_entry->sym_ptr_ptr); |
1fb83be6 | 508 | if (bfd_is_abs_section (symbol->section) |
326e32d7 | 509 | && output_bfd != (bfd *) NULL) |
58acdbd7 KR |
510 | { |
511 | reloc_entry->address += input_section->output_offset; | |
512 | return bfd_reloc_ok; | |
513 | } | |
514 | ||
fb32909a KR |
515 | /* If we are not producing relocateable output, return an error if |
516 | the symbol is not defined. An undefined weak symbol is | |
517 | considered to have a value of zero (SVR4 ABI, p. 4-27). */ | |
1fb83be6 | 518 | if (bfd_is_und_section (symbol->section) |
fb32909a KR |
519 | && (symbol->flags & BSF_WEAK) == 0 |
520 | && output_bfd == (bfd *) NULL) | |
5022aea5 | 521 | flag = bfd_reloc_undefined; |
985fca12 | 522 | |
58acdbd7 KR |
523 | /* If there is a function supplied to handle this relocation type, |
524 | call it. It'll return `bfd_reloc_continue' if further processing | |
525 | can be done. */ | |
526 | if (howto->special_function) | |
527 | { | |
528 | bfd_reloc_status_type cont; | |
529 | cont = howto->special_function (abfd, reloc_entry, symbol, data, | |
4c3721d5 ILT |
530 | input_section, output_bfd, |
531 | error_message); | |
58acdbd7 KR |
532 | if (cont != bfd_reloc_continue) |
533 | return cont; | |
534 | } | |
985fca12 | 535 | |
58acdbd7 KR |
536 | /* Is the address of the relocation really within the section? */ |
537 | if (reloc_entry->address > input_section->_cooked_size) | |
538 | return bfd_reloc_outofrange; | |
985fca12 | 539 | |
58acdbd7 KR |
540 | /* Work out which section the relocation is targetted at and the |
541 | initial relocation command value. */ | |
542 | ||
543 | /* Get symbol value. (Common symbols are special.) */ | |
544 | if (bfd_is_com_section (symbol->section)) | |
5022aea5 | 545 | relocation = 0; |
58acdbd7 | 546 | else |
5022aea5 | 547 | relocation = symbol->value; |
985fca12 | 548 | |
985fca12 | 549 | |
e98e6ec1 | 550 | reloc_target_output_section = symbol->section->output_section; |
985fca12 | 551 | |
58acdbd7 | 552 | /* Convert input-section-relative symbol value to absolute. */ |
326e32d7 | 553 | if (output_bfd && howto->partial_inplace == false) |
5022aea5 | 554 | output_base = 0; |
58acdbd7 | 555 | else |
5022aea5 | 556 | output_base = reloc_target_output_section->vma; |
985fca12 | 557 | |
65cab589 | 558 | relocation += output_base + symbol->section->output_offset; |
985fca12 | 559 | |
58acdbd7 | 560 | /* Add in supplied addend. */ |
65cab589 | 561 | relocation += reloc_entry->addend; |
985fca12 | 562 | |
c188b0be DM |
563 | /* Here the variable relocation holds the final address of the |
564 | symbol we are relocating against, plus any addend. */ | |
565 | ||
985fca12 | 566 | if (howto->pc_relative == true) |
58acdbd7 | 567 | { |
c188b0be DM |
568 | /* This is a PC relative relocation. We want to set RELOCATION |
569 | to the distance between the address of the symbol and the | |
570 | location. RELOCATION is already the address of the symbol. | |
571 | ||
572 | We start by subtracting the address of the section containing | |
573 | the location. | |
574 | ||
575 | If pcrel_offset is set, we must further subtract the position | |
576 | of the location within the section. Some targets arrange for | |
577 | the addend to be the negative of the position of the location | |
578 | within the section; for example, i386-aout does this. For | |
579 | i386-aout, pcrel_offset is false. Some other targets do not | |
580 | include the position of the location; for example, m88kbcs, | |
581 | or ELF. For those targets, pcrel_offset is true. | |
582 | ||
583 | If we are producing relocateable output, then we must ensure | |
584 | that this reloc will be correctly computed when the final | |
585 | relocation is done. If pcrel_offset is false we want to wind | |
586 | up with the negative of the location within the section, | |
587 | which means we must adjust the existing addend by the change | |
588 | in the location within the section. If pcrel_offset is true | |
589 | we do not want to adjust the existing addend at all. | |
590 | ||
591 | FIXME: This seems logical to me, but for the case of | |
592 | producing relocateable output it is not what the code | |
593 | actually does. I don't want to change it, because it seems | |
594 | far too likely that something will break. */ | |
985fca12 | 595 | |
326e32d7 | 596 | relocation -= |
58acdbd7 KR |
597 | input_section->output_section->vma + input_section->output_offset; |
598 | ||
599 | if (howto->pcrel_offset == true) | |
600 | relocation -= reloc_entry->address; | |
5022aea5 | 601 | } |
e98e6ec1 | 602 | |
326e32d7 | 603 | if (output_bfd != (bfd *) NULL) |
5022aea5 | 604 | { |
326e32d7 | 605 | if (howto->partial_inplace == false) |
58acdbd7 KR |
606 | { |
607 | /* This is a partial relocation, and we want to apply the relocation | |
608 | to the reloc entry rather than the raw data. Modify the reloc | |
609 | inplace to reflect what we now know. */ | |
610 | reloc_entry->addend = relocation; | |
326e32d7 | 611 | reloc_entry->address += input_section->output_offset; |
58acdbd7 KR |
612 | return flag; |
613 | } | |
c26d7d17 | 614 | else |
58acdbd7 KR |
615 | { |
616 | /* This is a partial relocation, but inplace, so modify the | |
326e32d7 | 617 | reloc record a bit. |
58acdbd7 KR |
618 | |
619 | If we've relocated with a symbol with a section, change | |
620 | into a ref to the section belonging to the symbol. */ | |
621 | ||
622 | reloc_entry->address += input_section->output_offset; | |
623 | ||
624 | /* WTF?? */ | |
3d51f02f | 625 | if (abfd->xvec->flavour == bfd_target_coff_flavour |
1fb83be6 KR |
626 | && strcmp (abfd->xvec->name, "aixcoff-rs6000") != 0 |
627 | && strcmp (abfd->xvec->name, "coff-Intel-little") != 0 | |
628 | && strcmp (abfd->xvec->name, "coff-Intel-big") != 0) | |
58acdbd7 | 629 | { |
c188b0be DM |
630 | #if 1 |
631 | /* For m68k-coff, the addend was being subtracted twice during | |
632 | relocation with -r. Removing the line below this comment | |
633 | fixes that problem; see PR 2953. | |
634 | ||
635 | However, Ian wrote the following, regarding removing the line below, | |
636 | which explains why it is still enabled: --djm | |
637 | ||
638 | If you put a patch like that into BFD you need to check all the COFF | |
639 | linkers. I am fairly certain that patch will break coff-i386 (e.g., | |
640 | SCO); see coff_i386_reloc in coff-i386.c where I worked around the | |
641 | problem in a different way. There may very well be a reason that the | |
642 | code works as it does. | |
643 | ||
644 | Hmmm. The first obvious point is that bfd_perform_relocation should | |
645 | not have any tests that depend upon the flavour. It's seem like | |
646 | entirely the wrong place for such a thing. The second obvious point | |
647 | is that the current code ignores the reloc addend when producing | |
648 | relocateable output for COFF. That's peculiar. In fact, I really | |
649 | have no idea what the point of the line you want to remove is. | |
650 | ||
651 | A typical COFF reloc subtracts the old value of the symbol and adds in | |
652 | the new value to the location in the object file (if it's a pc | |
653 | relative reloc it adds the difference between the symbol value and the | |
654 | location). When relocating we need to preserve that property. | |
655 | ||
656 | BFD handles this by setting the addend to the negative of the old | |
657 | value of the symbol. Unfortunately it handles common symbols in a | |
658 | non-standard way (it doesn't subtract the old value) but that's a | |
659 | different story (we can't change it without losing backward | |
660 | compatibility with old object files) (coff-i386 does subtract the old | |
661 | value, to be compatible with existing coff-i386 targets, like SCO). | |
662 | ||
663 | So everything works fine when not producing relocateable output. When | |
664 | we are producing relocateable output, logically we should do exactly | |
665 | what we do when not producing relocateable output. Therefore, your | |
666 | patch is correct. In fact, it should probably always just set | |
667 | reloc_entry->addend to 0 for all cases, since it is, in fact, going to | |
668 | add the value into the object file. This won't hurt the COFF code, | |
669 | which doesn't use the addend; I'm not sure what it will do to other | |
670 | formats (the thing to check for would be whether any formats both use | |
671 | the addend and set partial_inplace). | |
672 | ||
673 | When I wanted to make coff-i386 produce relocateable output, I ran | |
674 | into the problem that you are running into: I wanted to remove that | |
675 | line. Rather than risk it, I made the coff-i386 relocs use a special | |
676 | function; it's coff_i386_reloc in coff-i386.c. The function | |
677 | specifically adds the addend field into the object file, knowing that | |
678 | bfd_perform_relocation is not going to. If you remove that line, then | |
679 | coff-i386.c will wind up adding the addend field in twice. It's | |
680 | trivial to fix; it just needs to be done. | |
681 | ||
682 | The problem with removing the line is just that it may break some | |
683 | working code. With BFD it's hard to be sure of anything. The right | |
684 | way to deal with this is simply to build and test at least all the | |
685 | supported COFF targets. It should be straightforward if time and disk | |
686 | space consuming. For each target: | |
687 | 1) build the linker | |
688 | 2) generate some executable, and link it using -r (I would | |
689 | probably use paranoia.o and link against newlib/libc.a, which | |
690 | for all the supported targets would be available in | |
691 | /usr/cygnus/progressive/H-host/target/lib/libc.a). | |
692 | 3) make the change to reloc.c | |
693 | 4) rebuild the linker | |
694 | 5) repeat step 2 | |
695 | 6) if the resulting object files are the same, you have at least | |
696 | made it no worse | |
697 | 7) if they are different you have to figure out which version is | |
698 | right | |
699 | */ | |
58acdbd7 | 700 | relocation -= reloc_entry->addend; |
c188b0be | 701 | #endif |
58acdbd7 KR |
702 | reloc_entry->addend = 0; |
703 | } | |
704 | else | |
705 | { | |
706 | reloc_entry->addend = relocation; | |
707 | } | |
708 | } | |
985fca12 | 709 | } |
326e32d7 | 710 | else |
58acdbd7 KR |
711 | { |
712 | reloc_entry->addend = 0; | |
713 | } | |
985fca12 | 714 | |
66a277ab ILT |
715 | /* FIXME: This overflow checking is incomplete, because the value |
716 | might have overflowed before we get here. For a correct check we | |
717 | need to compute the value in a size larger than bitsize, but we | |
718 | can't reasonably do that for a reloc the same size as a host | |
a49880c8 KR |
719 | machine word. |
720 | FIXME: We should also do overflow checking on the result after | |
721 | adding in the value contained in the object file. */ | |
109a640b | 722 | if (howto->complain_on_overflow != complain_overflow_dont) |
65cab589 | 723 | { |
109a640b KR |
724 | bfd_vma check; |
725 | ||
726 | /* Get the value that will be used for the relocation, but | |
727 | starting at bit position zero. */ | |
728 | if (howto->rightshift > howto->bitpos) | |
729 | check = relocation >> (howto->rightshift - howto->bitpos); | |
730 | else | |
731 | check = relocation << (howto->bitpos - howto->rightshift); | |
732 | switch (howto->complain_on_overflow) | |
733 | { | |
734 | case complain_overflow_signed: | |
735 | { | |
736 | /* Assumes two's complement. */ | |
737 | bfd_signed_vma reloc_signed_max = (1 << (howto->bitsize - 1)) - 1; | |
326e32d7 | 738 | bfd_signed_vma reloc_signed_min = ~reloc_signed_max; |
109a640b KR |
739 | |
740 | /* The above right shift is incorrect for a signed value. | |
741 | Fix it up by forcing on the upper bits. */ | |
742 | if (howto->rightshift > howto->bitpos | |
743 | && (bfd_signed_vma) relocation < 0) | |
326e32d7 ILT |
744 | check |= ((bfd_vma) - 1 |
745 | & ~((bfd_vma) - 1 | |
109a640b KR |
746 | >> (howto->rightshift - howto->bitpos))); |
747 | if ((bfd_signed_vma) check > reloc_signed_max | |
748 | || (bfd_signed_vma) check < reloc_signed_min) | |
749 | flag = bfd_reloc_overflow; | |
750 | } | |
751 | break; | |
752 | case complain_overflow_unsigned: | |
753 | { | |
754 | /* Assumes two's complement. This expression avoids | |
755 | overflow if howto->bitsize is the number of bits in | |
756 | bfd_vma. */ | |
757 | bfd_vma reloc_unsigned_max = | |
326e32d7 | 758 | (((1 << (howto->bitsize - 1)) - 1) << 1) | 1; |
109a640b KR |
759 | |
760 | if ((bfd_vma) check > reloc_unsigned_max) | |
761 | flag = bfd_reloc_overflow; | |
762 | } | |
763 | break; | |
764 | case complain_overflow_bitfield: | |
765 | { | |
766 | /* Assumes two's complement. This expression avoids | |
767 | overflow if howto->bitsize is the number of bits in | |
768 | bfd_vma. */ | |
769 | bfd_vma reloc_bits = (((1 << (howto->bitsize - 1)) - 1) << 1) | 1; | |
770 | ||
326e32d7 ILT |
771 | if (((bfd_vma) check & ~reloc_bits) != 0 |
772 | && ((bfd_vma) check & ~reloc_bits) != (-1 & ~reloc_bits)) | |
a49880c8 KR |
773 | { |
774 | /* The above right shift is incorrect for a signed | |
775 | value. See if turning on the upper bits fixes the | |
776 | overflow. */ | |
777 | if (howto->rightshift > howto->bitpos | |
778 | && (bfd_signed_vma) relocation < 0) | |
779 | { | |
326e32d7 ILT |
780 | check |= ((bfd_vma) - 1 |
781 | & ~((bfd_vma) - 1 | |
a49880c8 | 782 | >> (howto->rightshift - howto->bitpos))); |
326e32d7 | 783 | if (((bfd_vma) check & ~reloc_bits) != (-1 & ~reloc_bits)) |
a49880c8 KR |
784 | flag = bfd_reloc_overflow; |
785 | } | |
786 | else | |
787 | flag = bfd_reloc_overflow; | |
788 | } | |
109a640b KR |
789 | } |
790 | break; | |
791 | default: | |
792 | abort (); | |
793 | } | |
65cab589 | 794 | } |
326e32d7 ILT |
795 | |
796 | /* | |
985fca12 SC |
797 | Either we are relocating all the way, or we don't want to apply |
798 | the relocation to the reloc entry (probably because there isn't | |
799 | any room in the output format to describe addends to relocs) | |
800 | */ | |
c188b0be DM |
801 | |
802 | /* The cast to bfd_vma avoids a bug in the Alpha OSF/1 C compiler | |
803 | (OSF version 1.3, compiler version 3.11). It miscompiles the | |
804 | following program: | |
805 | ||
806 | struct str | |
807 | { | |
808 | unsigned int i0; | |
809 | } s = { 0 }; | |
810 | ||
811 | int | |
812 | main () | |
813 | { | |
814 | unsigned long x; | |
815 | ||
816 | x = 0x100000000; | |
817 | x <<= (unsigned long) s.i0; | |
818 | if (x == 0) | |
819 | printf ("failed\n"); | |
820 | else | |
821 | printf ("succeeded (%lx)\n", x); | |
822 | } | |
823 | */ | |
824 | ||
825 | relocation >>= (bfd_vma) howto->rightshift; | |
985fca12 SC |
826 | |
827 | /* Shift everything up to where it's going to be used */ | |
326e32d7 | 828 | |
c188b0be | 829 | relocation <<= (bfd_vma) howto->bitpos; |
985fca12 SC |
830 | |
831 | /* Wait for the day when all have the mask in them */ | |
832 | ||
833 | /* What we do: | |
834 | i instruction to be left alone | |
835 | o offset within instruction | |
836 | r relocation offset to apply | |
837 | S src mask | |
838 | D dst mask | |
839 | N ~dst mask | |
840 | A part 1 | |
841 | B part 2 | |
842 | R result | |
326e32d7 | 843 | |
985fca12 SC |
844 | Do this: |
845 | i i i i i o o o o o from bfd_get<size> | |
846 | and S S S S S to get the size offset we want | |
847 | + r r r r r r r r r r to get the final value to place | |
848 | and D D D D D to chop to right size | |
849 | ----------------------- | |
326e32d7 | 850 | A A A A A |
985fca12 SC |
851 | And this: |
852 | ... i i i i i o o o o o from bfd_get<size> | |
853 | and N N N N N get instruction | |
854 | ----------------------- | |
855 | ... B B B B B | |
326e32d7 ILT |
856 | |
857 | And then: | |
858 | B B B B B | |
859 | or A A A A A | |
985fca12 SC |
860 | ----------------------- |
861 | R R R R R R R R R R put into bfd_put<size> | |
862 | */ | |
863 | ||
864 | #define DOIT(x) \ | |
865 | x = ( (x & ~howto->dst_mask) | (((x & howto->src_mask) + relocation) & howto->dst_mask)) | |
866 | ||
326e32d7 ILT |
867 | switch (howto->size) |
868 | { | |
869 | case 0: | |
870 | { | |
871 | char x = bfd_get_8 (abfd, (char *) data + addr); | |
872 | DOIT (x); | |
873 | bfd_put_8 (abfd, x, (unsigned char *) data + addr); | |
874 | } | |
875 | break; | |
876 | ||
877 | case 1: | |
878 | if (relocation) | |
879 | { | |
880 | short x = bfd_get_16 (abfd, (bfd_byte *) data + addr); | |
881 | DOIT (x); | |
882 | bfd_put_16 (abfd, x, (unsigned char *) data + addr); | |
883 | } | |
884 | break; | |
885 | case 2: | |
886 | if (relocation) | |
887 | { | |
888 | long x = bfd_get_32 (abfd, (bfd_byte *) data + addr); | |
889 | DOIT (x); | |
890 | bfd_put_32 (abfd, x, (bfd_byte *) data + addr); | |
891 | } | |
892 | break; | |
893 | case -2: | |
894 | { | |
895 | long x = bfd_get_32 (abfd, (bfd_byte *) data + addr); | |
896 | relocation = -relocation; | |
897 | DOIT (x); | |
898 | bfd_put_32 (abfd, x, (bfd_byte *) data + addr); | |
899 | } | |
900 | break; | |
901 | ||
902 | case 3: | |
903 | /* Do nothing */ | |
904 | break; | |
905 | ||
906 | case 4: | |
109a640b | 907 | #ifdef BFD64 |
326e32d7 ILT |
908 | if (relocation) |
909 | { | |
910 | bfd_vma x = bfd_get_64 (abfd, (bfd_byte *) data + addr); | |
911 | DOIT (x); | |
912 | bfd_put_64 (abfd, x, (bfd_byte *) data + addr); | |
913 | } | |
109a640b | 914 | #else |
326e32d7 | 915 | abort (); |
109a640b | 916 | #endif |
326e32d7 ILT |
917 | break; |
918 | default: | |
919 | return bfd_reloc_other; | |
920 | } | |
985fca12 SC |
921 | |
922 | return flag; | |
923 | } | |
c618de01 | 924 | |
4c3721d5 ILT |
925 | /* This relocation routine is used by some of the backend linkers. |
926 | They do not construct asymbol or arelent structures, so there is no | |
927 | reason for them to use bfd_perform_relocation. Also, | |
928 | bfd_perform_relocation is so hacked up it is easier to write a new | |
929 | function than to try to deal with it. | |
930 | ||
931 | This routine does a final relocation. It should not be used when | |
932 | generating relocateable output. | |
933 | ||
934 | FIXME: This routine ignores any special_function in the HOWTO, | |
935 | since the existing special_function values have been written for | |
936 | bfd_perform_relocation. | |
937 | ||
938 | HOWTO is the reloc howto information. | |
939 | INPUT_BFD is the BFD which the reloc applies to. | |
940 | INPUT_SECTION is the section which the reloc applies to. | |
941 | CONTENTS is the contents of the section. | |
942 | ADDRESS is the address of the reloc within INPUT_SECTION. | |
943 | VALUE is the value of the symbol the reloc refers to. | |
944 | ADDEND is the addend of the reloc. */ | |
945 | ||
946 | bfd_reloc_status_type | |
947 | _bfd_final_link_relocate (howto, input_bfd, input_section, contents, address, | |
326e32d7 | 948 | value, addend) |
4c3721d5 ILT |
949 | const reloc_howto_type *howto; |
950 | bfd *input_bfd; | |
951 | asection *input_section; | |
952 | bfd_byte *contents; | |
953 | bfd_vma address; | |
954 | bfd_vma value; | |
955 | bfd_vma addend; | |
956 | { | |
957 | bfd_vma relocation; | |
c618de01 | 958 | |
4c3721d5 ILT |
959 | /* Sanity check the address. */ |
960 | if (address > input_section->_cooked_size) | |
961 | return bfd_reloc_outofrange; | |
962 | ||
963 | /* This function assumes that we are dealing with a basic relocation | |
964 | against a symbol. We want to compute the value of the symbol to | |
965 | relocate to. This is just VALUE, the value of the symbol, plus | |
966 | ADDEND, any addend associated with the reloc. */ | |
967 | relocation = value + addend; | |
968 | ||
969 | /* If the relocation is PC relative, we want to set RELOCATION to | |
970 | the distance between the symbol (currently in RELOCATION) and the | |
971 | location we are relocating. Some targets (e.g., i386-aout) | |
972 | arrange for the contents of the section to be the negative of the | |
973 | offset of the location within the section; for such targets | |
974 | pcrel_offset is false. Other targets (e.g., m88kbcs or ELF) | |
975 | simply leave the contents of the section as zero; for such | |
976 | targets pcrel_offset is true. If pcrel_offset is false we do not | |
977 | need to subtract out the offset of the location within the | |
978 | section (which is just ADDRESS). */ | |
979 | if (howto->pc_relative) | |
980 | { | |
981 | relocation -= (input_section->output_section->vma | |
982 | + input_section->output_offset); | |
983 | if (howto->pcrel_offset) | |
984 | relocation -= address; | |
985 | } | |
326e32d7 | 986 | |
4c3721d5 ILT |
987 | return _bfd_relocate_contents (howto, input_bfd, relocation, |
988 | contents + address); | |
989 | } | |
990 | ||
991 | /* Relocate a given location using a given value and howto. */ | |
992 | ||
993 | bfd_reloc_status_type | |
994 | _bfd_relocate_contents (howto, input_bfd, relocation, location) | |
995 | const reloc_howto_type *howto; | |
996 | bfd *input_bfd; | |
997 | bfd_vma relocation; | |
998 | bfd_byte *location; | |
999 | { | |
1000 | int size; | |
1001 | bfd_vma x; | |
1002 | boolean overflow; | |
1003 | ||
1004 | /* If the size is negative, negate RELOCATION. This isn't very | |
1005 | general. */ | |
1006 | if (howto->size < 0) | |
326e32d7 | 1007 | relocation = -relocation; |
4c3721d5 ILT |
1008 | |
1009 | /* Get the value we are going to relocate. */ | |
1010 | size = bfd_get_reloc_size (howto); | |
1011 | switch (size) | |
1012 | { | |
1013 | default: | |
1014 | case 0: | |
1015 | abort (); | |
1016 | case 1: | |
1017 | x = bfd_get_8 (input_bfd, location); | |
1018 | break; | |
1019 | case 2: | |
1020 | x = bfd_get_16 (input_bfd, location); | |
1021 | break; | |
1022 | case 4: | |
1023 | x = bfd_get_32 (input_bfd, location); | |
1024 | break; | |
1025 | case 8: | |
1026 | #ifdef BFD64 | |
1027 | x = bfd_get_64 (input_bfd, location); | |
1028 | #else | |
1029 | abort (); | |
1030 | #endif | |
1031 | break; | |
1032 | } | |
1033 | ||
1034 | /* Check for overflow. FIXME: We may drop bits during the addition | |
1035 | which we don't check for. We must either check at every single | |
1036 | operation, which would be tedious, or we must do the computations | |
1037 | in a type larger than bfd_vma, which would be inefficient. */ | |
1038 | overflow = false; | |
1039 | if (howto->complain_on_overflow != complain_overflow_dont) | |
1040 | { | |
1041 | bfd_vma check; | |
1042 | bfd_signed_vma signed_check; | |
1043 | bfd_vma add; | |
563eb766 | 1044 | bfd_signed_vma signed_add; |
4c3721d5 ILT |
1045 | |
1046 | if (howto->rightshift == 0) | |
1047 | { | |
1048 | check = relocation; | |
1049 | signed_check = (bfd_signed_vma) relocation; | |
1050 | } | |
1051 | else | |
1052 | { | |
1053 | /* Drop unwanted bits from the value we are relocating to. */ | |
1054 | check = relocation >> howto->rightshift; | |
1055 | ||
1056 | /* If this is a signed value, the rightshift just dropped | |
1057 | leading 1 bits (assuming twos complement). */ | |
1058 | if ((bfd_signed_vma) relocation >= 0) | |
1059 | signed_check = check; | |
1060 | else | |
1061 | signed_check = (check | |
326e32d7 ILT |
1062 | | ((bfd_vma) - 1 |
1063 | & ~((bfd_vma) - 1 >> howto->rightshift))); | |
4c3721d5 ILT |
1064 | } |
1065 | ||
3d51f02f | 1066 | /* Get the value from the object file. */ |
4c3721d5 | 1067 | add = x & howto->src_mask; |
3d51f02f ILT |
1068 | |
1069 | /* Get the value from the object file with an appropriate sign. | |
1070 | The expression involving howto->src_mask isolates the upper | |
1071 | bit of src_mask. If that bit is set in the value we are | |
1072 | adding, it is negative, and we subtract out that number times | |
1073 | two. If src_mask includes the highest possible bit, then we | |
1074 | can not get the upper bit, but that does not matter since | |
1075 | signed_add needs no adjustment to become negative in that | |
1076 | case. */ | |
1077 | signed_add = add; | |
326e32d7 ILT |
1078 | if ((add & (((~howto->src_mask) >> 1) & howto->src_mask)) != 0) |
1079 | signed_add -= (((~howto->src_mask) >> 1) & howto->src_mask) << 1; | |
3d51f02f ILT |
1080 | |
1081 | /* Add the value from the object file, shifted so that it is a | |
1082 | straight number. */ | |
4c3721d5 ILT |
1083 | if (howto->bitpos == 0) |
1084 | { | |
1085 | check += add; | |
563eb766 | 1086 | signed_check += signed_add; |
4c3721d5 ILT |
1087 | } |
1088 | else | |
1089 | { | |
563eb766 | 1090 | check += add >> howto->bitpos; |
3d51f02f ILT |
1091 | |
1092 | /* For the signed case we use ADD, rather than SIGNED_ADD, | |
1093 | to avoid warnings from SVR4 cc. This is OK since we | |
1094 | explictly handle the sign bits. */ | |
563eb766 | 1095 | if (signed_add >= 0) |
3d51f02f | 1096 | signed_check += add >> howto->bitpos; |
563eb766 | 1097 | else |
3d51f02f | 1098 | signed_check += ((add >> howto->bitpos) |
326e32d7 ILT |
1099 | | ((bfd_vma) - 1 |
1100 | & ~((bfd_vma) - 1 >> howto->bitpos))); | |
4c3721d5 ILT |
1101 | } |
1102 | ||
1103 | switch (howto->complain_on_overflow) | |
1104 | { | |
1105 | case complain_overflow_signed: | |
1106 | { | |
1107 | /* Assumes two's complement. */ | |
1108 | bfd_signed_vma reloc_signed_max = (1 << (howto->bitsize - 1)) - 1; | |
326e32d7 | 1109 | bfd_signed_vma reloc_signed_min = ~reloc_signed_max; |
4c3721d5 ILT |
1110 | |
1111 | if (signed_check > reloc_signed_max | |
1112 | || signed_check < reloc_signed_min) | |
1113 | overflow = true; | |
1114 | } | |
1115 | break; | |
1116 | case complain_overflow_unsigned: | |
1117 | { | |
1118 | /* Assumes two's complement. This expression avoids | |
1119 | overflow if howto->bitsize is the number of bits in | |
1120 | bfd_vma. */ | |
1121 | bfd_vma reloc_unsigned_max = | |
326e32d7 | 1122 | (((1 << (howto->bitsize - 1)) - 1) << 1) | 1; |
4c3721d5 ILT |
1123 | |
1124 | if (check > reloc_unsigned_max) | |
1125 | overflow = true; | |
1126 | } | |
1127 | break; | |
1128 | case complain_overflow_bitfield: | |
1129 | { | |
1130 | /* Assumes two's complement. This expression avoids | |
1131 | overflow if howto->bitsize is the number of bits in | |
1132 | bfd_vma. */ | |
1133 | bfd_vma reloc_bits = (((1 << (howto->bitsize - 1)) - 1) << 1) | 1; | |
1134 | ||
326e32d7 ILT |
1135 | if ((check & ~reloc_bits) != 0 |
1136 | && (((bfd_vma) signed_check & ~reloc_bits) | |
1137 | != (-1 & ~reloc_bits))) | |
4c3721d5 ILT |
1138 | overflow = true; |
1139 | } | |
1140 | break; | |
1141 | default: | |
1142 | abort (); | |
1143 | } | |
1144 | } | |
1145 | ||
1146 | /* Put RELOCATION in the right bits. */ | |
1147 | relocation >>= (bfd_vma) howto->rightshift; | |
1148 | relocation <<= (bfd_vma) howto->bitpos; | |
1149 | ||
1150 | /* Add RELOCATION to the right bits of X. */ | |
326e32d7 | 1151 | x = ((x & ~howto->dst_mask) |
4c3721d5 ILT |
1152 | | (((x & howto->src_mask) + relocation) & howto->dst_mask)); |
1153 | ||
1154 | /* Put the relocated value back in the object file. */ | |
1155 | switch (size) | |
1156 | { | |
1157 | default: | |
1158 | case 0: | |
1159 | abort (); | |
1160 | case 1: | |
1161 | bfd_put_8 (input_bfd, x, location); | |
1162 | break; | |
1163 | case 2: | |
1164 | bfd_put_16 (input_bfd, x, location); | |
1165 | break; | |
1166 | case 4: | |
1167 | bfd_put_32 (input_bfd, x, location); | |
1168 | break; | |
1169 | case 8: | |
1170 | #ifdef BFD64 | |
1171 | bfd_put_64 (input_bfd, x, location); | |
1172 | #else | |
1173 | abort (); | |
1174 | #endif | |
1175 | break; | |
1176 | } | |
1177 | ||
1178 | return overflow ? bfd_reloc_overflow : bfd_reloc_ok; | |
1179 | } | |
2cf44d7b | 1180 | |
0cda46cf | 1181 | /* |
c26d7d17 | 1182 | DOCDD |
e98e6ec1 SC |
1183 | INODE |
1184 | howto manager, , typedef arelent, Relocations | |
1185 | ||
0cda46cf | 1186 | SECTION |
326e32d7 | 1187 | The howto manager |
2cf44d7b | 1188 | |
0cda46cf SC |
1189 | When an application wants to create a relocation, but doesn't |
1190 | know what the target machine might call it, it can find out by | |
1191 | using this bit of code. | |
2cf44d7b | 1192 | |
0cda46cf | 1193 | */ |
2cf44d7b | 1194 | |
0cda46cf SC |
1195 | /* |
1196 | TYPEDEF | |
1197 | bfd_reloc_code_type | |
2cf44d7b | 1198 | |
0cda46cf | 1199 | DESCRIPTION |
fb32909a KR |
1200 | The insides of a reloc code. The idea is that, eventually, there |
1201 | will be one enumerator for every type of relocation we ever do. | |
1202 | Pass one of these values to <<bfd_reloc_type_lookup>>, and it'll | |
1203 | return a howto pointer. | |
1204 | ||
1205 | This does mean that the application must determine the correct | |
1206 | enumerator value; you can't get a howto pointer from a random set | |
1207 | of attributes. | |
0cda46cf | 1208 | |
0443af31 KR |
1209 | SENUM |
1210 | bfd_reloc_code_real | |
1211 | ||
1212 | ENUM | |
1213 | BFD_RELOC_64 | |
1214 | ENUMX | |
1215 | BFD_RELOC_32 | |
1216 | ENUMX | |
1217 | BFD_RELOC_26 | |
1218 | ENUMX | |
1219 | BFD_RELOC_16 | |
1220 | ENUMX | |
1221 | BFD_RELOC_14 | |
1222 | ENUMX | |
1223 | BFD_RELOC_8 | |
1224 | ENUMDOC | |
1225 | Basic absolute relocations of N bits. | |
1226 | ||
1227 | ENUM | |
1228 | BFD_RELOC_64_PCREL | |
1229 | ENUMX | |
1230 | BFD_RELOC_32_PCREL | |
1231 | ENUMX | |
1232 | BFD_RELOC_24_PCREL | |
1233 | ENUMX | |
1234 | BFD_RELOC_16_PCREL | |
1235 | ENUMX | |
1236 | BFD_RELOC_8_PCREL | |
1237 | ENUMDOC | |
1238 | PC-relative relocations. Sometimes these are relative to the address | |
1239 | of the relocation itself; sometimes they are relative to the start of | |
1240 | the section containing the relocation. It depends on the specific target. | |
1241 | ||
1242 | The 24-bit relocation is used in some Intel 960 configurations. | |
1243 | ||
1244 | ENUM | |
1245 | BFD_RELOC_32_BASEREL | |
1246 | ENUMX | |
1247 | BFD_RELOC_16_BASEREL | |
1248 | ENUMX | |
1249 | BFD_RELOC_8_BASEREL | |
1250 | ENUMDOC | |
1251 | Linkage-table relative. | |
1252 | ||
1253 | ENUM | |
1254 | BFD_RELOC_8_FFnn | |
1255 | ENUMDOC | |
1256 | Absolute 8-bit relocation, but used to form an address like 0xFFnn. | |
1257 | ||
1258 | ENUM | |
1259 | BFD_RELOC_32_PCREL_S2 | |
1260 | ENUMX | |
1261 | BFD_RELOC_16_PCREL_S2 | |
1262 | ENUMX | |
1263 | BFD_RELOC_23_PCREL_S2 | |
1264 | ENUMDOC | |
1265 | These PC-relative relocations are stored as word displacements -- i.e., | |
1266 | byte displacements shifted right two bits. The 30-bit word displacement | |
1267 | (<<32_PCREL_S2>> -- 32 bits, shifted 2) is used on the SPARC. The signed | |
1268 | 16-bit displacement is used on the MIPS, and the 23-bit displacement is | |
1269 | used on the Alpha. | |
1270 | ||
1271 | ENUM | |
1272 | BFD_RELOC_HI22 | |
1273 | ENUMX | |
1274 | BFD_RELOC_LO10 | |
1275 | ENUMDOC | |
1276 | High 22 bits and low 10 bits of 32-bit value, placed into lower bits of | |
1277 | the target word. These are used on the SPARC. | |
1278 | ||
1279 | ENUM | |
1280 | BFD_RELOC_GPREL16 | |
1281 | ENUMX | |
1282 | BFD_RELOC_GPREL32 | |
1283 | ENUMDOC | |
1284 | For systems that allocate a Global Pointer register, these are | |
1285 | displacements off that register. These relocation types are | |
1286 | handled specially, because the value the register will have is | |
1287 | decided relatively late. | |
1288 | ||
1289 | ||
1290 | ENUM | |
1291 | BFD_RELOC_I960_CALLJ | |
1292 | ENUMDOC | |
1293 | Reloc types used for i960/b.out. | |
1294 | ||
1295 | ENUM | |
1296 | BFD_RELOC_NONE | |
1297 | ENUMX | |
1298 | BFD_RELOC_SPARC_WDISP22 | |
1299 | ENUMX | |
1300 | BFD_RELOC_SPARC22 | |
1301 | ENUMX | |
1302 | BFD_RELOC_SPARC13 | |
1303 | ENUMX | |
1304 | BFD_RELOC_SPARC_GOT10 | |
1305 | ENUMX | |
1306 | BFD_RELOC_SPARC_GOT13 | |
1307 | ENUMX | |
1308 | BFD_RELOC_SPARC_GOT22 | |
1309 | ENUMX | |
1310 | BFD_RELOC_SPARC_PC10 | |
1311 | ENUMX | |
1312 | BFD_RELOC_SPARC_PC22 | |
1313 | ENUMX | |
1314 | BFD_RELOC_SPARC_WPLT30 | |
1315 | ENUMX | |
1316 | BFD_RELOC_SPARC_COPY | |
1317 | ENUMX | |
1318 | BFD_RELOC_SPARC_GLOB_DAT | |
1319 | ENUMX | |
1320 | BFD_RELOC_SPARC_JMP_SLOT | |
1321 | ENUMX | |
1322 | BFD_RELOC_SPARC_RELATIVE | |
1323 | ENUMX | |
1324 | BFD_RELOC_SPARC_UA32 | |
1325 | ENUMDOC | |
1326 | SPARC ELF relocations. There is probably some overlap with other | |
1327 | relocation types already defined. | |
1328 | ||
1329 | ENUM | |
1330 | BFD_RELOC_SPARC_BASE13 | |
1331 | ENUMX | |
1332 | BFD_RELOC_SPARC_BASE22 | |
1333 | ENUMDOC | |
1334 | I think these are specific to SPARC a.out (e.g., Sun 4). | |
1335 | ||
1336 | ENUMEQ | |
1337 | BFD_RELOC_SPARC_64 | |
1338 | BFD_RELOC_64 | |
1339 | ENUMX | |
1340 | BFD_RELOC_SPARC_10 | |
1341 | ENUMX | |
1342 | BFD_RELOC_SPARC_11 | |
1343 | ENUMX | |
1344 | BFD_RELOC_SPARC_OLO10 | |
1345 | ENUMX | |
1346 | BFD_RELOC_SPARC_HH22 | |
1347 | ENUMX | |
1348 | BFD_RELOC_SPARC_HM10 | |
1349 | ENUMX | |
1350 | BFD_RELOC_SPARC_LM22 | |
1351 | ENUMX | |
1352 | BFD_RELOC_SPARC_PC_HH22 | |
1353 | ENUMX | |
1354 | BFD_RELOC_SPARC_PC_HM10 | |
1355 | ENUMX | |
1356 | BFD_RELOC_SPARC_PC_LM22 | |
1357 | ENUMX | |
1358 | BFD_RELOC_SPARC_WDISP16 | |
1359 | ENUMX | |
1360 | BFD_RELOC_SPARC_WDISP19 | |
1361 | ENUMX | |
1362 | BFD_RELOC_SPARC_GLOB_JMP | |
1363 | ENUMX | |
1364 | BFD_RELOC_SPARC_LO7 | |
1365 | ENUMDOC | |
1366 | Some relocations we're using for SPARC V9 -- subject to change. | |
1367 | ||
1368 | ENUM | |
1369 | BFD_RELOC_ALPHA_GPDISP_HI16 | |
1370 | ENUMDOC | |
1371 | Alpha ECOFF relocations. Some of these treat the symbol or "addend" | |
1372 | in some special way. | |
1373 | For GPDISP_HI16 ("gpdisp") relocations, the symbol is ignored when | |
1374 | writing; when reading, it will be the absolute section symbol. The | |
1375 | addend is the displacement in bytes of the "lda" instruction from | |
1376 | the "ldah" instruction (which is at the address of this reloc). | |
1377 | ENUM | |
1378 | BFD_RELOC_ALPHA_GPDISP_LO16 | |
1379 | ENUMDOC | |
1380 | For GPDISP_LO16 ("ignore") relocations, the symbol is handled as | |
1381 | with GPDISP_HI16 relocs. The addend is ignored when writing the | |
1382 | relocations out, and is filled in with the file's GP value on | |
1383 | reading, for convenience. | |
1384 | ||
1385 | ENUM | |
1386 | BFD_RELOC_ALPHA_LITERAL | |
1387 | ENUMX | |
1388 | BFD_RELOC_ALPHA_LITUSE | |
1389 | ENUMDOC | |
1390 | The Alpha LITERAL/LITUSE relocs are produced by a symbol reference; | |
1391 | the assembler turns it into a LDQ instruction to load the address of | |
1392 | the symbol, and then fills in a register in the real instruction. | |
1393 | ||
1394 | The LITERAL reloc, at the LDQ instruction, refers to the .lita | |
1395 | section symbol. The addend is ignored when writing, but is filled | |
1396 | in with the file's GP value on reading, for convenience, as with the | |
1397 | GPDISP_LO16 reloc. | |
1398 | ||
1399 | The LITUSE reloc, on the instruction using the loaded address, gives | |
1400 | information to the linker that it might be able to use to optimize | |
1401 | away some literal section references. The symbol is ignored (read | |
1402 | as the absolute section symbol), and the "addend" indicates the type | |
1403 | of instruction using the register: | |
1404 | 1 - "memory" fmt insn | |
1405 | 2 - byte-manipulation (byte offset reg) | |
1406 | 3 - jsr (target of branch) | |
1407 | ||
1408 | The GNU linker currently doesn't do any of this optimizing. | |
1409 | ||
1410 | ENUM | |
1411 | BFD_RELOC_ALPHA_HINT | |
1412 | ENUMDOC | |
1413 | The HINT relocation indicates a value that should be filled into the | |
1414 | "hint" field of a jmp/jsr/ret instruction, for possible branch- | |
1415 | prediction logic which may be provided on some processors. | |
1416 | ||
1417 | ENUM | |
1418 | BFD_RELOC_MIPS_JMP | |
1419 | ENUMDOC | |
1420 | Bits 27..2 of the relocation address shifted right 2 bits; | |
1421 | simple reloc otherwise. | |
1422 | ||
1423 | ENUM | |
1424 | BFD_RELOC_HI16 | |
1425 | ENUMDOC | |
1426 | High 16 bits of 32-bit value; simple reloc. | |
1427 | ENUM | |
1428 | BFD_RELOC_HI16_S | |
1429 | ENUMDOC | |
1430 | High 16 bits of 32-bit value but the low 16 bits will be sign | |
1431 | extended and added to form the final result. If the low 16 | |
1432 | bits form a negative number, we need to add one to the high value | |
1433 | to compensate for the borrow when the low bits are added. | |
1434 | ENUM | |
1435 | BFD_RELOC_LO16 | |
1436 | ENUMDOC | |
1437 | Low 16 bits. | |
1438 | ENUM | |
1439 | BFD_RELOC_PCREL_HI16_S | |
1440 | ENUMDOC | |
1441 | Like BFD_RELOC_HI16_S, but PC relative. | |
1442 | ENUM | |
1443 | BFD_RELOC_PCREL_LO16 | |
1444 | ENUMDOC | |
1445 | Like BFD_RELOC_LO16, but PC relative. | |
1446 | ||
1447 | ENUMEQ | |
1448 | BFD_RELOC_MIPS_GPREL | |
1449 | BFD_RELOC_GPREL16 | |
1450 | ENUMDOC | |
1451 | Relocation relative to the global pointer. | |
1452 | ||
1453 | ENUM | |
1454 | BFD_RELOC_MIPS_LITERAL | |
1455 | ENUMDOC | |
1456 | Relocation against a MIPS literal section. | |
1457 | ||
1458 | ENUM | |
1459 | BFD_RELOC_MIPS_GOT16 | |
1460 | ENUMX | |
1461 | BFD_RELOC_MIPS_CALL16 | |
1462 | ENUMEQX | |
1463 | BFD_RELOC_MIPS_GPREL32 | |
1464 | BFD_RELOC_GPREL32 | |
1465 | ENUMDOC | |
1466 | MIPS ELF relocations. | |
1467 | ||
1468 | ENUM | |
1469 | BFD_RELOC_386_GOT32 | |
1470 | ENUMX | |
1471 | BFD_RELOC_386_PLT32 | |
1472 | ENUMX | |
1473 | BFD_RELOC_386_COPY | |
1474 | ENUMX | |
1475 | BFD_RELOC_386_GLOB_DAT | |
1476 | ENUMX | |
1477 | BFD_RELOC_386_JUMP_SLOT | |
1478 | ENUMX | |
1479 | BFD_RELOC_386_RELATIVE | |
1480 | ENUMX | |
1481 | BFD_RELOC_386_GOTOFF | |
1482 | ENUMX | |
1483 | BFD_RELOC_386_GOTPC | |
1484 | ENUMDOC | |
1485 | i386/elf relocations | |
1486 | ||
1487 | ENUM | |
1488 | BFD_RELOC_NS32K_IMM_8 | |
1489 | ENUMX | |
1490 | BFD_RELOC_NS32K_IMM_16 | |
1491 | ENUMX | |
1492 | BFD_RELOC_NS32K_IMM_32 | |
1493 | ENUMX | |
1494 | BFD_RELOC_NS32K_IMM_8_PCREL | |
1495 | ENUMX | |
1496 | BFD_RELOC_NS32K_IMM_16_PCREL | |
1497 | ENUMX | |
1498 | BFD_RELOC_NS32K_IMM_32_PCREL | |
1499 | ENUMX | |
1500 | BFD_RELOC_NS32K_DISP_8 | |
1501 | ENUMX | |
1502 | BFD_RELOC_NS32K_DISP_16 | |
1503 | ENUMX | |
1504 | BFD_RELOC_NS32K_DISP_32 | |
1505 | ENUMX | |
1506 | BFD_RELOC_NS32K_DISP_8_PCREL | |
1507 | ENUMX | |
1508 | BFD_RELOC_NS32K_DISP_16_PCREL | |
1509 | ENUMX | |
1510 | BFD_RELOC_NS32K_DISP_32_PCREL | |
1511 | ENUMDOC | |
1512 | ns32k relocations | |
1513 | ||
1514 | ENUM | |
1515 | BFD_RELOC_PPC_B26 | |
1516 | ENUMDOC | |
1517 | PowerPC/POWER (RS/6000) relocs. | |
1518 | 26 bit relative branch. Low two bits must be zero. High 24 | |
1519 | bits installed in bits 6 through 29 of instruction. | |
1520 | ENUM | |
1521 | BFD_RELOC_PPC_BA26 | |
1522 | ENUMDOC | |
1523 | 26 bit absolute branch, like BFD_RELOC_PPC_B26 but absolute. | |
1524 | ENUM | |
1525 | BFD_RELOC_PPC_TOC16 | |
1526 | ENUMDOC | |
1527 | 16 bit TOC relative reference. | |
1528 | ||
1529 | ENUM | |
1530 | BFD_RELOC_CTOR | |
1531 | ENUMDOC | |
1532 | The type of reloc used to build a contructor table - at the moment | |
1533 | probably a 32 bit wide absolute relocation, but the target can choose. | |
1534 | It generally does map to one of the other relocation types. | |
1535 | ||
1536 | ENDSENUM | |
1537 | BFD_RELOC_UNUSED | |
1538 | ||
e98e6ec1 SC |
1539 | CODE_FRAGMENT |
1540 | . | |
0443af31 | 1541 | .typedef enum bfd_reloc_code_real bfd_reloc_code_real_type; |
2cf44d7b SC |
1542 | */ |
1543 | ||
1544 | ||
0cda46cf | 1545 | /* |
c188b0be | 1546 | FUNCTION |
0cda46cf | 1547 | bfd_reloc_type_lookup |
2cf44d7b | 1548 | |
e98e6ec1 | 1549 | SYNOPSIS |
4c3721d5 | 1550 | const struct reloc_howto_struct * |
3860075f | 1551 | bfd_reloc_type_lookup (bfd *abfd, bfd_reloc_code_real_type code); |
e98e6ec1 | 1552 | |
0cda46cf | 1553 | DESCRIPTION |
4c3721d5 | 1554 | Return a pointer to a howto structure which, when |
c188b0be | 1555 | invoked, will perform the relocation @var{code} on data from the |
0cda46cf | 1556 | architecture noted. |
2cf44d7b | 1557 | |
2cf44d7b SC |
1558 | */ |
1559 | ||
1560 | ||
4c3721d5 | 1561 | const struct reloc_howto_struct * |
326e32d7 ILT |
1562 | bfd_reloc_type_lookup (abfd, code) |
1563 | bfd *abfd; | |
1564 | bfd_reloc_code_real_type code; | |
2cf44d7b | 1565 | { |
8070f29d | 1566 | return BFD_SEND (abfd, reloc_type_lookup, (abfd, code)); |
2cf44d7b SC |
1567 | } |
1568 | ||
0cda46cf | 1569 | static reloc_howto_type bfd_howto_32 = |
326e32d7 | 1570 | HOWTO (0, 00, 2, 32, false, 0, complain_overflow_bitfield, 0, "VRT32", false, 0xffffffff, 0xffffffff, true); |
2cf44d7b SC |
1571 | |
1572 | ||
0cda46cf | 1573 | /* |
e98e6ec1 | 1574 | INTERNAL_FUNCTION |
0cda46cf SC |
1575 | bfd_default_reloc_type_lookup |
1576 | ||
0cda46cf | 1577 | SYNOPSIS |
4c3721d5 | 1578 | const struct reloc_howto_struct *bfd_default_reloc_type_lookup |
326e32d7 | 1579 | (bfd *abfd, bfd_reloc_code_real_type code); |
0cda46cf | 1580 | |
e98e6ec1 | 1581 | DESCRIPTION |
65cab589 | 1582 | Provides a default relocation lookup routine for any architecture. |
e98e6ec1 SC |
1583 | |
1584 | ||
0cda46cf | 1585 | */ |
65cab589 | 1586 | |
4c3721d5 | 1587 | const struct reloc_howto_struct * |
326e32d7 ILT |
1588 | bfd_default_reloc_type_lookup (abfd, code) |
1589 | bfd *abfd; | |
1590 | bfd_reloc_code_real_type code; | |
0cda46cf | 1591 | { |
326e32d7 | 1592 | switch (code) |
0cda46cf | 1593 | { |
65cab589 DM |
1594 | case BFD_RELOC_CTOR: |
1595 | /* The type of reloc used in a ctor, which will be as wide as the | |
fb32909a | 1596 | address - so either a 64, 32, or 16 bitter. */ |
326e32d7 ILT |
1597 | switch (bfd_get_arch_info (abfd)->bits_per_address) |
1598 | { | |
1599 | case 64: | |
1600 | BFD_FAIL (); | |
1601 | case 32: | |
1602 | return &bfd_howto_32; | |
1603 | case 16: | |
1604 | BFD_FAIL (); | |
1605 | default: | |
1606 | BFD_FAIL (); | |
1607 | } | |
65cab589 | 1608 | default: |
326e32d7 | 1609 | BFD_FAIL (); |
0cda46cf | 1610 | } |
326e32d7 | 1611 | return (const struct reloc_howto_struct *) NULL; |
0cda46cf | 1612 | } |
e98e6ec1 | 1613 | |
0443af31 KR |
1614 | /* |
1615 | FUNCTION | |
1616 | bfd_get_reloc_code_name | |
1617 | ||
1618 | SYNOPSIS | |
1619 | const char *bfd_get_reloc_code_name (bfd_reloc_code_real_type code); | |
1620 | ||
1621 | DESCRIPTION | |
1622 | Provides a printable name for the supplied relocation code. | |
1623 | Useful mainly for printing error messages. | |
1624 | */ | |
1625 | ||
1626 | const char * | |
1627 | bfd_get_reloc_code_name (code) | |
1628 | bfd_reloc_code_real_type code; | |
1629 | { | |
1630 | if (code > BFD_RELOC_UNUSED) | |
1631 | return 0; | |
1632 | return bfd_reloc_code_real_names[(int)code]; | |
1633 | } | |
e98e6ec1 | 1634 | |
d58b7049 SC |
1635 | /* |
1636 | INTERNAL_FUNCTION | |
1637 | bfd_generic_relax_section | |
1638 | ||
1639 | SYNOPSIS | |
1640 | boolean bfd_generic_relax_section | |
1641 | (bfd *abfd, | |
1642 | asection *section, | |
4c3721d5 | 1643 | struct bfd_link_info *, |
326e32d7 | 1644 | boolean *); |
d58b7049 SC |
1645 | |
1646 | DESCRIPTION | |
1647 | Provides default handling for relaxing for back ends which | |
8070f29d | 1648 | don't do relaxing -- i.e., does nothing. |
d58b7049 SC |
1649 | */ |
1650 | ||
563eb766 | 1651 | /*ARGSUSED*/ |
d58b7049 | 1652 | boolean |
326e32d7 | 1653 | bfd_generic_relax_section (abfd, section, link_info, again) |
4c3721d5 ILT |
1654 | bfd *abfd; |
1655 | asection *section; | |
1656 | struct bfd_link_info *link_info; | |
326e32d7 | 1657 | boolean *again; |
d58b7049 | 1658 | { |
326e32d7 ILT |
1659 | *again = false; |
1660 | return true; | |
d58b7049 | 1661 | } |
326e32d7 | 1662 | |
e98e6ec1 SC |
1663 | /* |
1664 | INTERNAL_FUNCTION | |
1665 | bfd_generic_get_relocated_section_contents | |
1666 | ||
1667 | SYNOPSIS | |
1668 | bfd_byte * | |
65cab589 | 1669 | bfd_generic_get_relocated_section_contents (bfd *abfd, |
4c3721d5 ILT |
1670 | struct bfd_link_info *link_info, |
1671 | struct bfd_link_order *link_order, | |
65cab589 | 1672 | bfd_byte *data, |
4c3721d5 ILT |
1673 | boolean relocateable, |
1674 | asymbol **symbols); | |
e98e6ec1 SC |
1675 | |
1676 | DESCRIPTION | |
1677 | Provides default handling of relocation effort for back ends | |
1678 | which can't be bothered to do it efficiently. | |
1679 | ||
1680 | */ | |
1681 | ||
1682 | bfd_byte * | |
4c3721d5 ILT |
1683 | bfd_generic_get_relocated_section_contents (abfd, link_info, link_order, data, |
1684 | relocateable, symbols) | |
1685 | bfd *abfd; | |
1686 | struct bfd_link_info *link_info; | |
1687 | struct bfd_link_order *link_order; | |
1688 | bfd_byte *data; | |
1689 | boolean relocateable; | |
1690 | asymbol **symbols; | |
e98e6ec1 | 1691 | { |
e98e6ec1 | 1692 | /* Get enough memory to hold the stuff */ |
4c3721d5 ILT |
1693 | bfd *input_bfd = link_order->u.indirect.section->owner; |
1694 | asection *input_section = link_order->u.indirect.section; | |
e98e6ec1 | 1695 | |
326e32d7 | 1696 | long reloc_size = bfd_get_reloc_upper_bound (input_bfd, input_section); |
80425e6c | 1697 | arelent **reloc_vector = NULL; |
326e32d7 ILT |
1698 | long reloc_count; |
1699 | ||
1700 | if (reloc_size < 0) | |
1701 | goto error_return; | |
80425e6c JK |
1702 | |
1703 | reloc_vector = (arelent **) malloc (reloc_size); | |
326e32d7 | 1704 | if (reloc_vector == NULL && reloc_size != 0) |
80425e6c JK |
1705 | { |
1706 | bfd_set_error (bfd_error_no_memory); | |
1707 | goto error_return; | |
1708 | } | |
326e32d7 | 1709 | |
e98e6ec1 | 1710 | /* read in the section */ |
326e32d7 ILT |
1711 | if (!bfd_get_section_contents (input_bfd, |
1712 | input_section, | |
1713 | (PTR) data, | |
1714 | 0, | |
1715 | input_section->_raw_size)) | |
80425e6c JK |
1716 | goto error_return; |
1717 | ||
1718 | /* We're not relaxing the section, so just copy the size info */ | |
e98e6ec1 SC |
1719 | input_section->_cooked_size = input_section->_raw_size; |
1720 | input_section->reloc_done = true; | |
e98e6ec1 | 1721 | |
326e32d7 ILT |
1722 | reloc_count = bfd_canonicalize_reloc (input_bfd, |
1723 | input_section, | |
1724 | reloc_vector, | |
1725 | symbols); | |
1726 | if (reloc_count < 0) | |
80425e6c JK |
1727 | goto error_return; |
1728 | ||
326e32d7 ILT |
1729 | if (reloc_count > 0) |
1730 | { | |
1731 | arelent **parent; | |
1732 | for (parent = reloc_vector; *parent != (arelent *) NULL; | |
1733 | parent++) | |
65cab589 | 1734 | { |
326e32d7 ILT |
1735 | char *error_message = (char *) NULL; |
1736 | bfd_reloc_status_type r = | |
1737 | bfd_perform_relocation (input_bfd, | |
1738 | *parent, | |
1739 | (PTR) data, | |
1740 | input_section, | |
1741 | relocateable ? abfd : (bfd *) NULL, | |
1742 | &error_message); | |
1743 | ||
1744 | if (relocateable) | |
1745 | { | |
1746 | asection *os = input_section->output_section; | |
65cab589 | 1747 | |
326e32d7 ILT |
1748 | /* A partial link, so keep the relocs */ |
1749 | os->orelocation[os->reloc_count] = *parent; | |
1750 | os->reloc_count++; | |
1751 | } | |
e98e6ec1 | 1752 | |
326e32d7 ILT |
1753 | if (r != bfd_reloc_ok) |
1754 | { | |
1755 | switch (r) | |
1756 | { | |
1757 | case bfd_reloc_undefined: | |
1758 | if (!((*link_info->callbacks->undefined_symbol) | |
1759 | (link_info, bfd_asymbol_name (*(*parent)->sym_ptr_ptr), | |
1760 | input_bfd, input_section, (*parent)->address))) | |
1761 | goto error_return; | |
1762 | break; | |
1763 | case bfd_reloc_dangerous: | |
1764 | BFD_ASSERT (error_message != (char *) NULL); | |
1765 | if (!((*link_info->callbacks->reloc_dangerous) | |
1766 | (link_info, error_message, input_bfd, input_section, | |
1767 | (*parent)->address))) | |
1768 | goto error_return; | |
1769 | break; | |
1770 | case bfd_reloc_overflow: | |
1771 | if (!((*link_info->callbacks->reloc_overflow) | |
1772 | (link_info, bfd_asymbol_name (*(*parent)->sym_ptr_ptr), | |
1773 | (*parent)->howto->name, (*parent)->addend, | |
1774 | input_bfd, input_section, (*parent)->address))) | |
1775 | goto error_return; | |
1776 | break; | |
1777 | case bfd_reloc_outofrange: | |
1778 | default: | |
1779 | abort (); | |
1780 | break; | |
1781 | } | |
e98e6ec1 | 1782 | |
326e32d7 ILT |
1783 | } |
1784 | } | |
1785 | } | |
80425e6c JK |
1786 | if (reloc_vector != NULL) |
1787 | free (reloc_vector); | |
e98e6ec1 SC |
1788 | return data; |
1789 | ||
326e32d7 | 1790 | error_return: |
80425e6c JK |
1791 | if (reloc_vector != NULL) |
1792 | free (reloc_vector); | |
1793 | return NULL; | |
e98e6ec1 | 1794 | } |