mirror of
https://sourceware.org/git/glibc.git
synced 2024-12-24 19:51:11 +00:00
92f1da4da0
1997-08-10 19:17 Philip Blundell <Philip.Blundell@pobox.com> * nss/nss_db/db-XXX.c: Include <db_185.h> not <db.h>. Somebody should update this to use the new db API. * nss/nss_db/db-netgrp.c: Likewise. * nss/nss_db/db-alias.c: Likewise. * db2/Makefile: Makefile for db-2.x in glibc. 1997-08-27 21:20 Ulrich Drepper <drepper@cygnus.com> * csu/Makefile (before-compile): New goal. Make sure abi-tag.h is generated. [$(elf)=yes] (asm-CPPFLAGS): Make sure abi-tag.h file can be found. * Makeconfig [$(build-omitfp)=yes] (CFLAGS-.o): Add -D__USE_STRING_INLINES. * string/string.f: Move strnlen optimization after inclusion of <bits/string.h>. Include <bits/string.h> only if __USE_STRING_INLINES is defined. * sysdeps/generic/memcpy.c: Undef memcpy to allow macro of this name in <bits/string.h>. * sysdeps/generic/memset.c: Likewise. * sysdeps/i386/string.h: i386 optimized string functions. * sysdeps/i386/i486string.h: i486+ optimized string functions. * Makefile (subdirs): Change db to db2. * shlib-versions: Bump libdb verion number to 3. * include/db.h: Include from db2 directory. * include/db_185.h: New file. * sysdeps/i386/Makefile [$(subdirs)=db2] (CPPFLAGS): Add macros to provide spinlock information for db2. * sysdeps/m68k/m68020/Makefile: New file. Likewise. * sysdeps/sparc/Makefile: New file. Likewise. * sysdeps/unix/sysv/linux/Makefile [$(subdirs)=db2] (CPPFLAGS): Add -DHAVE_LLSEEK. * db2/config.h: Hand-edited config file for db2 in glibc. * db2/compat.h: New file from db-2.3.4. * db2/db.h: Likewise. * db2/db_185.h: Likewise. * db2/db_int.h: Likewise. * db2/makedb.c: Likewise. * db2/btree/bt_close.c: Likewise. * db2/btree/bt_compare.c: Likewise. * db2/btree/bt_conv.c: Likewise. * db2/btree/bt_cursor.c: Likewise. * db2/btree/bt_delete.c: Likewise. * db2/btree/bt_open.c: Likewise. * db2/btree/bt_page.c: Likewise. * db2/btree/bt_put.c: Likewise. * db2/btree/bt_rec.c: Likewise. * db2/btree/bt_recno.c: Likewise. * db2/btree/btree_auto.c: Likewise. * db2/btree/bt_rsearch.c: Likewise. * db2/btree/bt_search.c: Likewise. * db2/btree/bt_split.c: Likewise. * db2/btree/bt_stat.c: Likewise. * db2/btree/btree.src: Likewise. * db2/common/db_appinit.c: Likewise. * db2/common/db_err.c: Likewise. * db2/common/db_byteorder.c: Likewise. * db2/common/db_apprec.c: Likewise. * db2/common/db_salloc.c: Likewise. * db2/common/db_log2.c: Likewise. * db2/common/db_region.c: Likewise. * db2/common/db_shash.c: Likewise. * db2/db/db.c: Likewise. * db2/db/db.src: Likewise. * db2/db/db_conv.c: Likewise. * db2/db/db_dispatch.c: Likewise. * db2/db/db_dup.c: Likewise. * db2/db/db_overflow.c: Likewise. * db2/db/db_pr.c: Likewise. * db2/db/db_rec.c: Likewise. * db2/db/db_ret.c: Likewise. * db2/db/db_thread.c: Likewise. * db2/db/db_auto.c: Likewise. * db2/db185/db185.c: Likewise. * db2/db185/db185_int.h: Likewise. * db2/dbm/dbm.c: Likewise. * db2/hash/hash.c: Likewise. * db2/hash/hash.src: Likewise. * db2/hash/hash_page.c: Likewise. * db2/hash/hash_conv.c: Likewise. * db2/hash/hash_debug.c: Likewise. * db2/hash/hash_stat.c: Likewise. * db2/hash/hash_rec.c: Likewise. * db2/hash/hash_dup.c: Likewise. * db2/hash/hash_func.c: Likewise. * db2/hash/hash_auto.c: Likewise. * db2/include/mp.h: Likewise. * db2/include/btree.h: Likewise. * db2/include/db.h.src: Likewise. * db2/include/db_int.h.src: Likewise. * db2/include/db_shash.h: Likewise. * db2/include/db_swap.h: Likewise. * db2/include/db_185.h.src: Likewise. * db2/include/txn.h: Likewise. * db2/include/db_am.h: Likewise. * db2/include/shqueue.h: Likewise. * db2/include/hash.h: Likewise. * db2/include/db_dispatch.h: Likewise. * db2/include/lock.h: Likewise. * db2/include/db_page.h: Likewise. * db2/include/log.h: Likewise. * db2/include/db_auto.h: Likewise. * db2/include/btree_auto.h: Likewise. * db2/include/hash_auto.h: Likewise. * db2/include/log_auto.h: Likewise. * db2/include/txn_auto.h: Likewise. * db2/include/db_ext.h: Likewise. * db2/include/btree_ext.h: Likewise. * db2/include/clib_ext.h: Likewise. * db2/include/common_ext.h: Likewise. * db2/include/hash_ext.h: Likewise. * db2/include/lock_ext.h: Likewise. * db2/include/log_ext.h: Likewise. * db2/include/mp_ext.h: Likewise. * db2/include/mutex_ext.h: Likewise. * db2/include/os_ext.h: Likewise. * db2/include/txn_ext.h: Likewise. * db2/include/cxx_int.h: Likewise. * db2/include/db_cxx.h: Likewise. * db2/include/queue.h: Likewise. * db2/lock/lock.c: Likewise. * db2/lock/lock_conflict.c: Likewise. * db2/lock/lock_util.c: Likewise. * db2/lock/lock_deadlock.c: Likewise. * db2/log/log.c: Likewise. * db2/log/log_get.c: Likewise. * db2/log/log.src: Likewise. * db2/log/log_compare.c: Likewise. * db2/log/log_put.c: Likewise. * db2/log/log_rec.c: Likewise. * db2/log/log_archive.c: Likewise. * db2/log/log_register.c: Likewise. * db2/log/log_auto.c: Likewise. * db2/log/log_findckp.c: Likewise. * db2/mp/mp_bh.c: Likewise. * db2/mp/mp_fget.c: Likewise. * db2/mp/mp_fopen.c: Likewise. * db2/mp/mp_fput.c: Likewise. * db2/mp/mp_fset.c: Likewise. * db2/mp/mp_open.c: Likewise. * db2/mp/mp_region.c: Likewise. * db2/mp/mp_pr.c: Likewise. * db2/mp/mp_sync.c: Likewise. * db2/mutex/68020.gcc: Likewise. * db2/mutex/mutex.c: Likewise. * db2/mutex/README: Likewise. * db2/mutex/x86.gcc: Likewise. * db2/mutex/sparc.gcc: Likewise. * db2/mutex/uts4.cc.s: Likewise. * db2/mutex/alpha.dec: Likewise. * db2/mutex/alpha.gcc: Likewise. * db2/mutex/parisc.gcc: Likewise. * db2/mutex/parisc.hp: Likewise. * db2/os/db_os_abs.c: Likewise. * db2/os/db_os_dir.c: Likewise. * db2/os/db_os_fid.c: Likewise. * db2/os/db_os_lseek.c: Likewise. * db2/os/db_os_mmap.c: Likewise. * db2/os/db_os_open.c: Likewise. * db2/os/db_os_rw.c: Likewise. * db2/os/db_os_sleep.c: Likewise. * db2/os/db_os_stat.c: Likewise. * db2/os/db_os_unlink.c: Likewise. * db2/txn/txn.c: Likewise. * db2/txn/txn.src: Likewise. * db2/txn/txn_rec.c: Likewise. * db2/txn/txn_auto.c: Likewise. * db2/clib/getlong.c: Likewise. * db2/progs/db_archive/db_archive.c: Likewise. * db2/progs/db_checkpoint/db_checkpoint.c: Likewise. * db2/progs/db_deadlock/db_deadlock.c: Likewise. * db2/progs/db_dump/db_dump.c: Likewise. * db2/progs/db_dump185/db_dump185.c: Likewise. * db2/progs/db_load/db_load.c: Likewise. * db2/progs/db_printlog/db_printlog.c: Likewise. * db2/progs/db_recover/db_recover.c: Likewise. * db2/progs/db_stat/db_stat.c: Likewise. * libio/stdio.h [__cplusplus] (__STDIO_INLINE): Define as inline. * po/de.po, po/sv.po: Update from 2.0.5 translations. * sysdeps/unix/sysv/linux/netinet/tcp.h: Pretty print. * sunrpc/rpc/xdr.h (XDR): Don't define argument of x_destroy callback as const. * sunrpc/xdr_mem.c (xdrmem_destroy): Don't define argument as const. * sunrpx/xdr_rec.c (xdrrec_destroy): Likewise. * sunrpx/xdr_stdio.c (xdrstdio_destroy): Likewise. 1997-08-27 18:47 Ulrich Drepper <drepper@cygnus.com> * sysdeps/unix/sysv/linux/if_index.c: Include <errno.h>. Reported by Benjamin Kosnik <bkoz@cygnus.com>. 1997-08-27 02:27 Roland McGrath <roland@baalperazim.frob.com> * abi-tags: New file. * csu/Makefile (distribute): Remove abi-tag.h. ($(objpfx)abi-tag.h): New target. * Makefile (distribute): Add abi-tags. * sysdeps/unix/sysv/linux/abi-tag.h: File removed. * sysdeps/mach/hurd/abi-tag.h: File removed. * sysdeps/stub/abi-tag.h: File removed. 1997-08-25 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de> * sysdeps/unix/make-syscalls.sh: Change output so that it generates compilation rules only for the currently selected object suffixes. 1997-08-25 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de> * sysdeps/m68k/dl-machine.h (RTLD_START): Switch back to previous section to avoid confusing the compiler. * sysdeps/alpha/dl-machine.h (RTLD_START): Likewise. * sysdeps/i386/dl-machine.h (RTLD_START): Likewise. * sysdeps/mips/dl-machine.h (RTLD_START): Likewise. * sysdeps/mips/mips64/dl-machine.h (RTLD_START): Likewise. * sysdeps/sparc/sparc32/dl-machine.h (RTLD_START): Likewise. * sysdeps/m68k/dl-machine.h (elf_machine_load_address): Use a GOT relocation instead of a constant to avoid text relocation. (ELF_MACHINE_BEFORE_RTLD_RELOC): Removed. (RTLD_START): Declare global labels as functions and add size directive. 1997-08-25 17:01 Ulrich Drepper <drepper@cygnus.com> * sysdeps/i386/bits/select.h: Correct assembler versions to work even for descriptors >= 32. * stdlib/alloca.h: Don't define alloca to __alloca since if gcc is used __alloca is not defined to __builtin_alloca and so might not be available. Reported by Uwe Ohse <uwe@ohse.de>. * sysdeps/unix/sysv/linux/sys/sysmacros.h: Define macros in a special way if gcc is not used and so dev_t is an array. Reported by Uwe Ohse <uwe@ohse.de>. 1997-08-23 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de> * manual/libc.texinfo: Reorder chapters to match logical order. 1997-08-25 12:22 Ulrich Drepper <drepper@cygnus.com> * sunrpc/rpc/xdr.h: Change name of parameters in prototypes of xdr_reference, xdrmem_create, and xdrstdio_create because of clash with g++ internal symbols. Patch by Sudish Joseph <sj@eng.mindspring.net>. * elf/dl-deps.c: Implement handling of DT_FILTER.
438 lines
13 KiB
C
438 lines
13 KiB
C
/* Machine-dependent ELF dynamic relocation inline functions. Alpha version.
|
|
Copyright (C) 1996, 1997 Free Software Foundation, Inc.
|
|
This file is part of the GNU C Library.
|
|
Contributed by Richard Henderson <rth@tamu.edu>.
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Library General Public License as
|
|
published by the Free Software Foundation; either version 2 of the
|
|
License, or (at your option) any later version.
|
|
|
|
The GNU C Library 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
|
|
Library General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Library General Public
|
|
License along with the GNU C Library; see the file COPYING.LIB. If not,
|
|
write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
Boston, MA 02111-1307, USA. */
|
|
|
|
/* This was written in the absence of an ABI -- don't expect
|
|
it to remain unchanged. */
|
|
|
|
#ifndef dl_machine_h
|
|
#define dl_machine_h 1
|
|
|
|
#define ELF_MACHINE_NAME "alpha"
|
|
|
|
#include <assert.h>
|
|
#include <string.h>
|
|
|
|
|
|
/* Return nonzero iff E_MACHINE is compatible with the running host. */
|
|
static inline int
|
|
elf_machine_matches_host (Elf64_Word e_machine)
|
|
{
|
|
return e_machine == EM_ALPHA;
|
|
}
|
|
|
|
/* Return the link-time address of _DYNAMIC. The multiple-got-capable
|
|
linker no longer allocates the first .got entry for this. But not to
|
|
worry, no special tricks are needed. */
|
|
static inline Elf64_Addr
|
|
elf_machine_dynamic (void)
|
|
{
|
|
#ifndef NO_AXP_MULTI_GOT_LD
|
|
return (Elf64_Addr) &_DYNAMIC;
|
|
#else
|
|
register Elf64_Addr *gp __asm__ ("$29");
|
|
return gp[-4096];
|
|
#endif
|
|
}
|
|
|
|
/* Return the run-time load address of the shared object. */
|
|
static inline Elf64_Addr
|
|
elf_machine_load_address (void)
|
|
{
|
|
/* NOTE: While it is generally unfriendly to put data in the text
|
|
segment, it is only slightly less so when the "data" is an
|
|
instruction. While we don't have to worry about GLD just yet, an
|
|
optimizing linker might decide that our "data" is an unreachable
|
|
instruction and throw it away -- with the right switches, DEC's
|
|
linker will do this. What ought to happen is we should add
|
|
something to GAS to allow us access to the new GPREL_HI32/LO32
|
|
relocation types stolen from OSF/1 3.0. */
|
|
/* This code relies on the fact that BRADDR relocations do not
|
|
appear in dynamic relocation tables. Not that that would be very
|
|
useful anyway -- br/bsr has a 4MB range and the shared libraries
|
|
are usually many many terabytes away. */
|
|
|
|
Elf64_Addr dot;
|
|
long zero_disp;
|
|
|
|
asm("br %0, 1f\n\t"
|
|
".weak __load_address_undefined\n\t"
|
|
"br $0, __load_address_undefined\n"
|
|
"1:"
|
|
: "=r"(dot));
|
|
|
|
zero_disp = *(int *)dot;
|
|
zero_disp = (zero_disp << 43) >> 41;
|
|
|
|
return dot + 4 + zero_disp;
|
|
}
|
|
|
|
/* Set up the loaded object described by L so its unrelocated PLT
|
|
entries will jump to the on-demand fixup code in dl-runtime.c. */
|
|
|
|
static inline int
|
|
elf_machine_runtime_setup (struct link_map *l, int lazy, int profile)
|
|
{
|
|
Elf64_Addr plt;
|
|
extern void _dl_runtime_resolve (void);
|
|
|
|
if (l->l_info[DT_JMPREL] && lazy)
|
|
{
|
|
/* The GOT entries for the functions in the PLT have not been
|
|
filled in yet. Their initial contents are directed to the
|
|
PLT which arranges for the dynamic linker to be called. */
|
|
plt = l->l_addr + l->l_info[DT_PLTGOT]->d_un.d_ptr;
|
|
|
|
/* This function will be called to perform the relocation. */
|
|
*(Elf64_Addr *)(plt + 16) = (Elf64_Addr) &_dl_runtime_resolve;
|
|
|
|
/* Identify this shared object */
|
|
*(Elf64_Addr *)(plt + 24) = (Elf64_Addr) l;
|
|
|
|
/* If the first instruction of the plt entry is not
|
|
"br $28, plt0", we cannot do lazy relocation. */
|
|
lazy = (*(unsigned *)(plt + 32) == 0xc39ffff7);
|
|
}
|
|
|
|
return lazy;
|
|
}
|
|
|
|
/* This code is used in dl-runtime.c to call the `fixup' function
|
|
and then redirect to the address it returns. */
|
|
#define ELF_MACHINE_RUNTIME_TRAMPOLINE asm ( \
|
|
"/* Trampoline for _dl_runtime_resolver */
|
|
.globl _dl_runtime_resolve
|
|
.ent _dl_runtime_resolve
|
|
_dl_runtime_resolve:
|
|
lda $sp, -168($sp)
|
|
.frame $sp, 168, $26
|
|
/* Preserve all registers that C normally doesn't. */
|
|
stq $26, 0($sp)
|
|
stq $0, 8($sp)
|
|
stq $1, 16($sp)
|
|
stq $2, 24($sp)
|
|
stq $3, 32($sp)
|
|
stq $4, 40($sp)
|
|
stq $5, 48($sp)
|
|
stq $6, 56($sp)
|
|
stq $7, 64($sp)
|
|
stq $8, 72($sp)
|
|
stq $16, 80($sp)
|
|
stq $17, 88($sp)
|
|
stq $18, 96($sp)
|
|
stq $19, 104($sp)
|
|
stq $20, 112($sp)
|
|
stq $21, 120($sp)
|
|
stq $22, 128($sp)
|
|
stq $23, 136($sp)
|
|
stq $24, 144($sp)
|
|
stq $25, 152($sp)
|
|
stq $29, 160($sp)
|
|
.mask 0x27ff01ff, -168
|
|
/* Set up our $gp */
|
|
br $gp, 0f
|
|
0: ldgp $gp, 0($gp)
|
|
.prologue 1
|
|
/* Set up the arguments for _dl_runtime_resolve. */
|
|
/* $16 = link_map out of plt0 */
|
|
/* $17 = offset of reloc entry = ($28 - $27 - 20) /12 * 24 */
|
|
subq $28, $27, $17
|
|
ldq $16, 8($27)
|
|
subq $17, 20, $17
|
|
addq $17, $17, $17
|
|
/* Do the fixup */
|
|
bsr $26, fixup..ng
|
|
/* Move the destination address into position. */
|
|
mov $0, $27
|
|
/* Restore program registers. */
|
|
ldq $26, 0($sp)
|
|
ldq $0, 8($sp)
|
|
ldq $1, 16($sp)
|
|
ldq $2, 24($sp)
|
|
ldq $3, 32($sp)
|
|
ldq $4, 40($sp)
|
|
ldq $5, 48($sp)
|
|
ldq $6, 56($sp)
|
|
ldq $7, 64($sp)
|
|
ldq $8, 72($sp)
|
|
ldq $16, 80($sp)
|
|
ldq $17, 88($sp)
|
|
ldq $18, 96($sp)
|
|
ldq $19, 104($sp)
|
|
ldq $20, 112($sp)
|
|
ldq $21, 120($sp)
|
|
ldq $22, 128($sp)
|
|
ldq $23, 136($sp)
|
|
ldq $24, 144($sp)
|
|
ldq $25, 152($sp)
|
|
ldq $29, 160($sp)
|
|
/* Flush the Icache after having modified the .plt code. */
|
|
imb
|
|
/* Clean up and turn control to the destination */
|
|
lda $sp, 168($sp)
|
|
jmp $31, ($27)
|
|
.end _dl_runtime_resolve");
|
|
|
|
/* The PLT uses Elf64_Rela relocs. */
|
|
#define elf_machine_relplt elf_machine_rela
|
|
|
|
/* Initial entry point code for the dynamic linker.
|
|
The C function `_dl_start' is the real entry point;
|
|
its return value is the user program's entry point. */
|
|
|
|
#define RTLD_START asm ("\
|
|
.text
|
|
.globl _start
|
|
.ent _start
|
|
_start:
|
|
br $gp, 0f
|
|
0: ldgp $gp, 0($gp)
|
|
/* Pass pointer to argument block to _dl_start. */
|
|
mov $sp, $16
|
|
bsr $26, _dl_start..ng
|
|
.end _start
|
|
/* FALLTHRU */
|
|
.globl _dl_start_user
|
|
.ent _dl_start_user
|
|
_dl_start_user:
|
|
/* Save the user entry point address in s0. */
|
|
mov $0, $9
|
|
/* See if we were run as a command with the executable file
|
|
name as an extra leading argument. If so, adjust the stack
|
|
pointer to skip _dl_skip_args words. */
|
|
ldl $1, _dl_skip_args
|
|
beq $1, 0f
|
|
ldq $2, 0($sp)
|
|
subq $2, $1, $2
|
|
s8addq $1, $sp, $sp
|
|
stq $2, 0($sp)
|
|
/* Load _dl_default_scope[2] into s1 to pass to _dl_init_next. */
|
|
0: ldq $10, _dl_default_scope+16
|
|
/* Call _dl_init_next to return the address of an initializer
|
|
function to run. */
|
|
1: mov $10, $16
|
|
jsr $26, _dl_init_next
|
|
ldgp $gp, 0($26)
|
|
beq $0, 2f
|
|
mov $0, $27
|
|
jsr $26, ($0)
|
|
ldgp $gp, 0($26)
|
|
br 1b
|
|
2: /* Clear the startup flag. */
|
|
.set at
|
|
stl $31, _dl_starting_up
|
|
.set noat
|
|
/* Pass our finalizer function to the user in $0. */
|
|
lda $0, _dl_fini
|
|
/* Jump to the user's entry point. */
|
|
mov $9, $27
|
|
jmp ($9)
|
|
.end _dl_start_user
|
|
.previous");
|
|
|
|
/* Nonzero iff TYPE describes relocation of a PLT entry, so
|
|
PLT entries should not be allowed to define the value. */
|
|
#define elf_machine_lookup_noplt_p(type) ((type) == R_ALPHA_JMP_SLOT)
|
|
|
|
/* Nonzero iff TYPE should not be allowed to resolve to one of
|
|
the main executable's symbols, as for a COPY reloc, which we don't use. */
|
|
#define elf_machine_lookup_noexec_p(type) (0)
|
|
|
|
/* A reloc type used for ld.so cmdline arg lookups to reject PLT entries. */
|
|
#define ELF_MACHINE_RELOC_NOPLT R_ALPHA_JMP_SLOT
|
|
|
|
/* The alpha never uses Elf64_Rel relocations. */
|
|
#define ELF_MACHINE_NO_REL 1
|
|
|
|
#endif /* !dl_machine_h */
|
|
|
|
#ifdef RESOLVE
|
|
|
|
/* Fix up the instructions of a PLT entry to invoke the function
|
|
rather than the dynamic linker. */
|
|
static inline void
|
|
elf_alpha_fix_plt(struct link_map *l,
|
|
const Elf64_Rela *reloc,
|
|
Elf64_Addr got_addr,
|
|
Elf64_Addr value)
|
|
{
|
|
const Elf64_Rela *rela_plt;
|
|
Elf64_Word *plte;
|
|
long edisp;
|
|
|
|
/* Recover the PLT entry address by calculating reloc's index into the
|
|
.rela.plt, and finding that entry in the .plt. */
|
|
|
|
rela_plt = (void *)(l->l_addr + l->l_info[DT_JMPREL]->d_un.d_ptr);
|
|
|
|
plte = (void *)(l->l_addr + l->l_info[DT_PLTGOT]->d_un.d_ptr + 32);
|
|
plte += 3 * (reloc - rela_plt);
|
|
|
|
/* Find the displacement from the plt entry to the function. */
|
|
|
|
edisp = (long)(value - (Elf64_Addr)&plte[3]) / 4;
|
|
|
|
if (edisp >= -0x100000 && edisp < 0x100000)
|
|
{
|
|
/* If we are in range, use br to perfect branch prediction and
|
|
elide the dependency on the address load. This case happens,
|
|
e.g., when a shared library call is resolved to the same library. */
|
|
|
|
int hi, lo;
|
|
hi = value - (Elf64_Addr)&plte[0];
|
|
lo = (short)hi;
|
|
hi = (hi - lo) >> 16;
|
|
|
|
/* Emit "lda $27,L($27)" */
|
|
plte[1] = 0x237b0000 | (lo & 0xffff);
|
|
|
|
/* Emit "br $31,function" */
|
|
plte[2] = 0xc3e00000 | (edisp & 0x1fffff);
|
|
|
|
/* Think about thread-safety -- the previous instructions must be
|
|
committed to memory before the first is overwritten. */
|
|
__asm__ __volatile__("wmb" : : : "memory");
|
|
|
|
/* Emit "ldah $27,H($27)" */
|
|
plte[0] = 0x277b0000 | (hi & 0xffff);
|
|
}
|
|
else
|
|
{
|
|
/* Don't bother with the hint since we already know the hint is
|
|
wrong. Eliding it prevents the wrong page from getting pulled
|
|
into the cache. */
|
|
|
|
int hi, lo;
|
|
hi = got_addr - (Elf64_Addr)&plte[0];
|
|
lo = (short)hi;
|
|
hi = (hi - lo) >> 16;
|
|
|
|
/* Emit "ldq $27,L($27)" */
|
|
plte[1] = 0xa77b0000 | (lo & 0xffff);
|
|
|
|
/* Emit "jmp $31,($27)" */
|
|
plte[2] = 0x6bfb0000;
|
|
|
|
/* Think about thread-safety -- the previous instructions must be
|
|
committed to memory before the first is overwritten. */
|
|
__asm__ __volatile__("wmb" : : : "memory");
|
|
|
|
/* Emit "ldah $27,H($27)" */
|
|
plte[0] = 0x277b0000 | (hi & 0xffff);
|
|
}
|
|
|
|
/* At this point, if we've been doing runtime resolution, Icache is dirty.
|
|
This will be taken care of in _dl_runtime_resolve. If instead we are
|
|
doing this as part of non-lazy startup relocation, that bit of code
|
|
hasn't made it into Icache yet, so there's nothing to clean up. */
|
|
}
|
|
|
|
/* Perform the relocation specified by RELOC and SYM (which is fully resolved).
|
|
MAP is the object containing the reloc. */
|
|
static inline void
|
|
elf_machine_rela (struct link_map *map,
|
|
const Elf64_Rela *reloc,
|
|
const Elf64_Sym *sym,
|
|
const struct r_found_version *version,
|
|
Elf64_Addr *const reloc_addr)
|
|
{
|
|
unsigned long const r_type = ELF64_R_TYPE (reloc->r_info);
|
|
|
|
#ifndef RTLD_BOOTSTRAP
|
|
/* This is defined in rtld.c, but nowhere in the static libc.a; make the
|
|
reference weak so static programs can still link. This declaration
|
|
cannot be done when compiling rtld.c (i.e. #ifdef RTLD_BOOTSTRAP)
|
|
because rtld.c contains the common defn for _dl_rtld_map, which is
|
|
incompatible with a weak decl in the same file. */
|
|
weak_extern (_dl_rtld_map);
|
|
#endif
|
|
|
|
/* We cannot use a switch here because we cannot locate the switch
|
|
jump table until we've self-relocated. */
|
|
|
|
if (r_type == R_ALPHA_RELATIVE)
|
|
{
|
|
#ifndef RTLD_BOOTSTRAP
|
|
/* Already done in dynamic linker. */
|
|
if (map != &_dl_rtld_map)
|
|
#endif
|
|
*reloc_addr += map->l_addr;
|
|
}
|
|
else if (r_type == R_ALPHA_NONE)
|
|
return;
|
|
else
|
|
{
|
|
Elf64_Addr loadbase, sym_value;
|
|
|
|
loadbase = RESOLVE (&sym, version, r_type);
|
|
sym_value = sym ? loadbase + sym->st_value : 0;
|
|
|
|
if (r_type == R_ALPHA_GLOB_DAT)
|
|
*reloc_addr = sym_value;
|
|
else if (r_type == R_ALPHA_JMP_SLOT)
|
|
{
|
|
*reloc_addr = sym_value;
|
|
elf_alpha_fix_plt (map, reloc, (Elf64_Addr) reloc_addr, sym_value);
|
|
}
|
|
else if (r_type == R_ALPHA_REFQUAD)
|
|
{
|
|
sym_value += *reloc_addr;
|
|
#ifndef RTLD_BOOTSTRAP
|
|
if (map == &_dl_rtld_map)
|
|
{
|
|
/* Undo the relocation done here during bootstrapping.
|
|
Now we will relocate anew, possibly using a binding
|
|
found in the user program or a loaded library rather
|
|
than the dynamic linker's built-in definitions used
|
|
while loading those libraries. */
|
|
const Elf64_Sym *const dlsymtab
|
|
= (void *)(map->l_addr + map->l_info[DT_SYMTAB]->d_un.d_ptr);
|
|
sym_value -= map->l_addr;
|
|
sym_value -= dlsymtab[ELF64_R_SYM(reloc->r_info)].st_value;
|
|
}
|
|
else
|
|
#endif
|
|
sym_value += reloc->r_addend;
|
|
*reloc_addr = sym_value;
|
|
}
|
|
else
|
|
assert (! "unexpected dynamic reloc type");
|
|
}
|
|
}
|
|
|
|
static inline void
|
|
elf_machine_lazy_rel (struct link_map *map, const Elf64_Rela *reloc)
|
|
{
|
|
Elf64_Addr * const reloc_addr = (void *)(map->l_addr + reloc->r_offset);
|
|
unsigned long const r_type = ELF64_R_TYPE (reloc->r_info);
|
|
|
|
if (r_type == R_ALPHA_JMP_SLOT)
|
|
{
|
|
/* Perform a RELATIVE reloc on the .got entry that transfers
|
|
to the .plt. */
|
|
*reloc_addr += map->l_addr;
|
|
}
|
|
else if (r_type == R_ALPHA_NONE)
|
|
return;
|
|
else
|
|
assert (! "unexpected PLT reloc type");
|
|
}
|
|
|
|
#endif /* RESOLVE */
|