f78c6ccfb4e6d1fba06a55a9b6abf5b14a9cc5dd
* Copyright (c) 1993 Paul Kranenburg
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by Paul Kranenburg.
* 4. The name of the author may not be used to endorse or promote products
* derived from this software withough specific prior written permission
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
* $Id: md.c,v 1.7 1994/01/03 18:35:35 davidg Exp $
* Get relocation addend corresponding to relocation record RP
struct relocation_info
*rp
;
switch (RELOC_TARGET_SIZE(rp
)) {
* Put RELOCATION at ADDR according to relocation record RP.
md_relocate(rp
, relocation
, addr
, relocatable_output
)
struct relocation_info
*rp
;
switch (RELOC_TARGET_SIZE(rp
)) {
put_byte(addr
, relocation
);
put_short(addr
, relocation
);
put_long(addr
, relocation
);
fatal("Unsupported relocation size: %x", RELOC_TARGET_SIZE(rp
));
* Initialize (output) exec header such that useful values are
* obtained from subsequent N_*() macro evaluations.
md_init_header(hp
, magic
, flags
)
if (!netzmagic
&& (magic
== ZMAGIC
)) {
N_SETMAGIC_NET((*hp
), magic
, MID_I386
, flags
);
N_SETMAGIC((*hp
), magic
, MID_I386
, flags
);
/* TEXT_START depends on the value of outheader.a_entry. */
if (!(link_mode
& SHAREABLE
)) /*WAS: if (entry_symbol) */
* Machine dependent part of claim_rrs_reloc().
* Set RRS relocation type.
md_make_reloc(rp
, r
, type
)
struct relocation_info
*rp
, *r
;
r
->r_length
= rp
->r_length
;
if (type
& RELTYPE_RELATIVE
)
* Set up a transfer from jmpslot at OFFSET (relative to the PLT table)
* to the binder slot (which is at offset 0 of the PLT).
md_make_jmpslot(sp
, offset
, index
)
* i386 PC-relative "fixed point" is located right after the
* instruction it pertains to.
u_long fudge
= - (sizeof(sp
->opcode
) + sizeof(sp
->addr
) + offset
);
sp
->addr
[0] = fudge
& 0xffff;
sp
->addr
[1] = fudge
>> 16;
* Set up a "direct" transfer (ie. not through the run-time binder) from
* jmpslot at OFFSET to ADDR. Used by `ld' when the SYMBOLIC flag is on,
* and by `ld.so' after resolving the symbol.
* On the i386, we use the JMP instruction which is PC relative, so no
* further RRS relocations will be necessary for such a jmpslot.
md_fix_jmpslot(sp
, offset
, addr
)
u_long fudge
= addr
- (sizeof(sp
->opcode
) + sizeof(sp
->addr
) + offset
);
sp
->addr
[0] = fudge
& 0xffff;
sp
->addr
[1] = fudge
>> 16;
* Update the relocation record for a RRS jmpslot.
md_make_jmpreloc(rp
, r
, type
)
struct relocation_info
*rp
, *r
;
* Fix relocation address to point to the correct
* location within this jmpslot.
r
->r_address
+= sizeof(sp
->opcode
);
/* Set relocation type */
if (type
& RELTYPE_RELATIVE
)
* Set relocation type for a RRS GOT relocation.
md_make_gotreloc(rp
, r
, type
)
struct relocation_info
*rp
, *r
;
if (type
& RELTYPE_RELATIVE
)
* Set relocation type for a RRS copy operation.
struct relocation_info
*rp
, *r
;
md_set_breakpoint(where
, savep
)
* Byte swap routines for cross-linking.
swap_longs((long *)h
+ skip
, sizeof(*h
)/sizeof(long) - skip
);
/* NetBSD: Always leave magic alone */
if (N_GETMAGIC(*h
) == OMAGIC
)
swap_longs((long *)h
+ skip
, sizeof(*h
)/sizeof(long) - skip
);
struct relocation_info
*r
;
r
->r_address
= md_swap_long(r
->r_address
);
r
->r_symbolnum
= md_swap_long(bits
& 0xffffff00);
r
->r_length
= ((bits
>> 1) & 3);
r
->r_extern
= ((bits
>> 3) & 1);
r
->r_baserel
= ((bits
>> 4) & 1);
r
->r_jmptable
= ((bits
>> 5) & 1);
r
->r_relative
= ((bits
>> 6) & 1);
r
->r_copy
= ((bits
>> 7) & 1);
struct relocation_info
*r
;
r
->r_address
= md_swap_long(r
->r_address
);
bits
= (md_swap_long(r
->r_symbolnum
) & 0xffffff00);
bits
|= (r
->r_pcrel
& 1);
bits
|= ((r
->r_length
<< 1) & 6);
bits
|= ((r
->r_extern
<< 3) & 8);
bits
|= ((r
->r_baserel
<< 4) & 0x10);
bits
|= ((r
->r_jmptable
<< 5) & 0x20);
bits
|= ((r
->r_relative
<< 6) & 0x40);
bits
|= ((r
->r_copy
<< 7) & 0x80);
j
->opcode
= md_swap_short(j
->opcode
);
j
->addr
[0] = md_swap_short(j
->addr
[0]);
j
->addr
[1] = md_swap_short(j
->addr
[1]);
j
->reloc_index
= md_swap_short(j
->reloc_index
);