1998-09-01 16:31:49 +02:00
|
|
|
/* Machine-dependent ELF startup code. PowerPC version.
|
2004-12-22 21:10:10 +01:00
|
|
|
Copyright (C) 1995-2000, 2002, 2004 Free Software Foundation, Inc.
|
1998-09-01 16:31:49 +02:00
|
|
|
This file is part of the GNU C Library.
|
|
|
|
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
2001-07-06 06:58:11 +02:00
|
|
|
modify it under the terms of the GNU Lesser General Public
|
|
|
|
License as published by the Free Software Foundation; either
|
|
|
|
version 2.1 of the License, or (at your option) any later version.
|
1998-09-01 16:31:49 +02:00
|
|
|
|
|
|
|
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
|
2001-07-06 06:58:11 +02:00
|
|
|
Lesser General Public License for more details.
|
1998-09-01 16:31:49 +02:00
|
|
|
|
2001-07-06 06:58:11 +02:00
|
|
|
You should have received a copy of the GNU Lesser General Public
|
|
|
|
License along with the GNU C Library; if not, write to the Free
|
2004-12-22 21:10:10 +01:00
|
|
|
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
|
|
|
|
02111-1307 USA. */
|
1998-09-01 16:31:49 +02:00
|
|
|
|
|
|
|
#include <sysdep.h>
|
|
|
|
|
|
|
|
/* 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. */
|
|
|
|
ENTRY(_start)
|
|
|
|
/* We start with the following on the stack, from top:
|
|
|
|
argc (4 bytes);
|
|
|
|
arguments for program (terminated by NULL);
|
|
|
|
environment variables (terminated by NULL);
|
|
|
|
arguments for the program loader. */
|
|
|
|
|
|
|
|
/* Call _dl_start with one parameter pointing at argc */
|
1999-10-12 00:31:36 +02:00
|
|
|
mr r3,r1
|
1998-09-01 16:31:49 +02:00
|
|
|
/* (we have to frob the stack pointer a bit to allow room for
|
|
|
|
_dl_start to save the link register). */
|
1999-10-12 00:31:36 +02:00
|
|
|
li r4,0
|
|
|
|
addi r1,r1,-16
|
|
|
|
stw r4,0(r1)
|
1998-09-01 16:31:49 +02:00
|
|
|
bl _dl_start@local
|
|
|
|
|
2000-05-05 01:12:19 +02:00
|
|
|
/* FALLTHRU */
|
2004-12-22 21:10:10 +01:00
|
|
|
ENTRY(_dl_start_user)
|
1998-09-01 16:31:49 +02:00
|
|
|
/* Now, we do our main work of calling initialisation procedures.
|
|
|
|
The ELF ABI doesn't say anything about parameters for these,
|
|
|
|
so we just pass argc, argv, and the environment.
|
|
|
|
Changing these is strongly discouraged (not least because argc is
|
|
|
|
passed by value!). */
|
|
|
|
|
|
|
|
/* Put our GOT pointer in r31, */
|
2005-06-18 01:11:35 +02:00
|
|
|
#ifdef HAVE_ASM_PPC_REL16
|
|
|
|
bcl 20,31,1f
|
|
|
|
1: mflr r31
|
|
|
|
addis r31,r31,_GLOBAL_OFFSET_TABLE_-1b@ha
|
|
|
|
addi r31,r31,_GLOBAL_OFFSET_TABLE_-1b@l
|
|
|
|
#else
|
1998-09-01 16:31:49 +02:00
|
|
|
bl _GLOBAL_OFFSET_TABLE_-4@local
|
1999-10-12 00:31:36 +02:00
|
|
|
mflr r31
|
2005-06-18 01:11:35 +02:00
|
|
|
#endif
|
1998-09-01 16:31:49 +02:00
|
|
|
/* the address of _start in r30, */
|
1999-10-12 00:31:36 +02:00
|
|
|
mr r30,r3
|
2000-05-05 01:12:19 +02:00
|
|
|
/* &_dl_argc in 29, &_dl_argv in 27, and _dl_loaded in 28. */
|
2002-02-01 02:33:04 +01:00
|
|
|
lwz r28,_rtld_global@got(r31)
|
1999-10-12 00:31:36 +02:00
|
|
|
lwz r29,_dl_argc@got(r31)
|
|
|
|
lwz r27,_dl_argv@got(r31)
|
2000-05-05 01:12:19 +02:00
|
|
|
|
2000-06-12 09:13:22 +02:00
|
|
|
/* Call _dl_init (_dl_loaded, _dl_argc, _dl_argv, _dl_argv+_dl_argc+1). */
|
1999-10-12 00:31:36 +02:00
|
|
|
lwz r3,0(r28)
|
2000-05-05 01:12:19 +02:00
|
|
|
lwz r4,0(r29)
|
|
|
|
lwz r5,0(r27)
|
|
|
|
slwi r6,r4,2
|
|
|
|
add r6,r5,r6
|
|
|
|
addi r6,r6,4
|
Update.
Change ld.so to not use functions which are exported. One cannot
interpose them anyway. Use INT() to mark uses, INTDEF() to mark
definitions.
* include/libc-symbols.h: Define INT and INTDEF.
* sysdeps/generic/ldsodefs.h: Declare _dl_debug_printf_internal,
_dl_signal_error_internal, _dl_map_object_internal,
_dl_map_object_deps_internal, _dl_lookup_symbol_internal,
_dl_lookup_versioned_symbol_internal,
_dl_relocate_object_internal, _dl_debug_state_internal,
_dl_start_profile_internal, and _dl_unload_cache_internal.
* include/dlfcn.h: Declare _dl_catch_error_internal.
* elf/rtld.c: Use INT for calls to any of the *_internal functions
above. Add INTDEF to function definitions.
* elf/dl-debug.c: Likewise.
* elf/dl-deps.c: Likewise.
* elf/dl-dst.h: Likewise.
* elf/dl-error.c: Likewise.
* elf/dl-fini.c: Likewise.
* elf/dl-init.c: Likewise.
* elf/dl-load.c: Likewise.
* elf/dl-lookup.c: Likewise.
* elf/dl-misc.c: Likewise.
* elf/dl-open.c: Likewise.
* elf/dl-profile.c: Likewise.
* elf/dl-reloc.c: Likewise.
* elf/dl-runtime.c: Likewise.
* elf/dl-version.c: Likewise.
* elf/do-lookup.h: Likewise.
* sysdeps/generic/dl-cache.c: Likewise.
* sysdeps/generic/dl-sysdep.c: Likewise.
* sysdeps/alpha/dl-machine.h (RTLD_START): Call _dl_init_internal
instead of _dl_init.
* sysdeps/arm/dl-machine.h: Likewise.
* sysdeps/cris/dl-machine.h: Likewise.
* sysdeps/hppa/dl-machine.h: Likewise.
* sysdeps/i386/dl-machine.h: Likewise.
* sysdeps/ia64/dl-machine.h: Likewise.
* sysdeps/m68k/dl-machine.h: Likewise.
* sysdeps/mips/dl-machine.h: Likewise.
* sysdeps/mips/mips64/dl-machine.h: Likewise.
* sysdeps/s390/s390-32/dl-machine.h: Likewise.
* sysdeps/s390/s390-64/dl-machine.h: Likewise.
* sysdeps/sh/dl-machine.h: Likewise.
* sysdeps/sparc/sparc32/dl-machine.h: Likewise.
* sysdeps/sparc/sparc64/dl-machine.h: Likewise.
* sysdeps/x86_64/dl-machine.h: Likewise.
* sysdeps/powerpc/dl-start.S (_dl_start_user): Likewise.
* elf/Versions: Don't export _dl_check_all_versions, _dl_sysdep_start,
and _dl_debug_initialize.
2002-02-03 01:31:37 +01:00
|
|
|
bl _dl_init_internal@local
|
2000-06-03 10:16:58 +02:00
|
|
|
|
1998-09-01 16:31:49 +02:00
|
|
|
/* Now, to conform to the ELF ABI, we have to: */
|
|
|
|
/* Pass argc (actually _dl_argc) in r3; */
|
1999-10-12 00:31:36 +02:00
|
|
|
lwz r3,0(r29)
|
1998-09-01 16:31:49 +02:00
|
|
|
/* pass argv (actually _dl_argv) in r4; */
|
1999-10-12 00:31:36 +02:00
|
|
|
lwz r4,0(r27)
|
1998-09-01 16:31:49 +02:00
|
|
|
/* pass envp (actually _dl_argv+_dl_argc+1) in r5; */
|
1999-10-12 00:31:36 +02:00
|
|
|
slwi r5,r3,2
|
|
|
|
add r6,r4,r5
|
|
|
|
addi r5,r6,4
|
1998-09-01 16:31:49 +02:00
|
|
|
/* pass the auxilary vector in r6. This is passed to us just after _envp. */
|
1999-10-12 00:31:36 +02:00
|
|
|
2: lwzu r0,4(r6)
|
|
|
|
cmpwi r0,0
|
1998-09-01 16:31:49 +02:00
|
|
|
bne 2b
|
1999-10-12 00:31:36 +02:00
|
|
|
addi r6,r6,4
|
1998-09-01 16:31:49 +02:00
|
|
|
/* Pass a termination function pointer (in this case _dl_fini) in r7. */
|
1999-10-12 00:31:36 +02:00
|
|
|
lwz r7,_dl_fini@got(r31)
|
1998-09-01 16:31:49 +02:00
|
|
|
/* Now, call the start function in r30... */
|
1999-10-12 00:31:36 +02:00
|
|
|
mtctr r30
|
1998-09-01 16:31:49 +02:00
|
|
|
/* Pass the stack pointer in r1 (so far so good), pointing to a NULL value.
|
|
|
|
(This lets our startup code distinguish between a program linked statically,
|
|
|
|
which linux will call with argc on top of the stack which will hopefully
|
|
|
|
never be zero, and a dynamically linked program which will always have
|
|
|
|
a NULL on the top of the stack).
|
|
|
|
Take the opportunity to clear LR, so anyone who accidentally returns
|
|
|
|
from _start gets SEGV. Also clear the next few words of the stack. */
|
|
|
|
|
1999-10-12 00:31:36 +02:00
|
|
|
li r31,0
|
|
|
|
stw r31,0(r1)
|
|
|
|
mtlr r31
|
|
|
|
stw r31,4(r1)
|
|
|
|
stw r31,8(r1)
|
|
|
|
stw r31,12(r1)
|
1998-09-01 16:31:49 +02:00
|
|
|
/* Go do it! */
|
|
|
|
bctr
|
|
|
|
END(_start)
|