2002-01-31 04:41:25 +01:00
|
|
|
/* Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
|
1998-03-06 18:21:43 +01: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-03-06 18:21:43 +01: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-03-06 18:21:43 +01: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
|
|
|
|
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
|
|
|
|
02111-1307 USA. */
|
1998-03-06 18:21:43 +01:00
|
|
|
|
1998-03-08 16:26:29 +01:00
|
|
|
#include <stdlib.h>
|
|
|
|
#include <unistd.h>
|
2000-03-23 21:31:46 +01:00
|
|
|
#include <ldsodefs.h>
|
2000-06-13 09:33:12 +02:00
|
|
|
#include <bp-start.h>
|
|
|
|
#include <bp-sym.h>
|
1998-03-08 16:26:29 +01:00
|
|
|
|
1998-03-18 15:42:25 +01:00
|
|
|
extern void __libc_init_first (int argc, char **argv, char **envp);
|
|
|
|
|
|
|
|
extern int _dl_starting_up;
|
|
|
|
weak_extern (_dl_starting_up)
|
|
|
|
extern int __libc_multiple_libcs;
|
2000-06-30 03:11:14 +02:00
|
|
|
extern void *__libc_stack_end;
|
1998-03-18 15:42:25 +01:00
|
|
|
|
2000-07-06 23:16:06 +02:00
|
|
|
#ifndef SHARED
|
|
|
|
extern void __pthread_initialize_minimal (void) __attribute__ ((weak));
|
|
|
|
#endif
|
|
|
|
|
2000-11-20 10:16:41 +01:00
|
|
|
|
|
|
|
extern int BP_SYM (__libc_start_main) (int (*main) (int, char **, char **),
|
|
|
|
int argc,
|
|
|
|
char *__unbounded *__unbounded ubp_av,
|
|
|
|
void (*init) (void),
|
|
|
|
void (*fini) (void),
|
|
|
|
void (*rtld_fini) (void),
|
|
|
|
void *__unbounded stack_end)
|
|
|
|
__attribute__ ((noreturn));
|
1999-07-09 18:18:17 +02:00
|
|
|
|
1998-03-06 18:21:43 +01:00
|
|
|
int
|
2000-06-13 09:33:12 +02:00
|
|
|
/* GKM FIXME: GCC: this should get __BP_ prefix by virtue of the
|
|
|
|
BPs in the arglist of startup_info.main and startup_info.init. */
|
|
|
|
BP_SYM (__libc_start_main) (int (*main) (int, char **, char **),
|
|
|
|
int argc, char *__unbounded *__unbounded ubp_av,
|
|
|
|
void (*init) (void), void (*fini) (void),
|
|
|
|
void (*rtld_fini) (void), void *__unbounded stack_end)
|
1998-03-06 18:21:43 +01:00
|
|
|
{
|
2000-06-13 09:33:12 +02:00
|
|
|
char *__unbounded *__unbounded ubp_ev = &ubp_av[argc + 1];
|
|
|
|
#if __BOUNDED_POINTERS__
|
|
|
|
char **argv;
|
|
|
|
#else
|
|
|
|
# define argv ubp_av
|
|
|
|
#endif
|
|
|
|
|
2000-03-31 07:50:02 +02:00
|
|
|
#ifndef SHARED
|
2001-01-07 03:00:21 +01:00
|
|
|
# ifdef HAVE_AUX_VECTOR
|
|
|
|
void *__unbounded *__unbounded auxvec;
|
|
|
|
# endif
|
|
|
|
|
1998-03-18 15:42:25 +01:00
|
|
|
/* The next variable is only here to work around a bug in gcc <= 2.7.2.2.
|
|
|
|
If the address would be taken inside the expression the optimizer
|
|
|
|
would try to be too smart and throws it away. Grrr. */
|
|
|
|
int *dummy_addr = &_dl_starting_up;
|
|
|
|
|
|
|
|
__libc_multiple_libcs = dummy_addr && !_dl_starting_up;
|
1998-06-09 18:02:40 +02:00
|
|
|
#endif
|
1998-06-07 16:06:56 +02:00
|
|
|
|
2000-06-13 09:33:12 +02:00
|
|
|
INIT_ARGV_and_ENVIRON;
|
|
|
|
|
1998-06-07 16:06:56 +02:00
|
|
|
/* Store the lowest stack address. */
|
|
|
|
__libc_stack_end = stack_end;
|
1998-03-18 15:42:25 +01:00
|
|
|
|
2000-05-25 07:02:35 +02:00
|
|
|
#ifndef SHARED
|
2002-07-24 01:12:01 +02:00
|
|
|
# ifdef HAVE_AUX_VECTOR
|
|
|
|
/* First process the auxiliary vector since we need to find the
|
|
|
|
program header to locate an eventually present PT_TLS entry. */
|
|
|
|
for (auxvec = (void *__unbounded *__unbounded) ubp_ev;
|
|
|
|
*auxvec != NULL; ++auxvec);
|
|
|
|
++auxvec;
|
|
|
|
_dl_aux_init ((ElfW(auxv_t) *) auxvec);
|
|
|
|
# endif
|
|
|
|
|
2000-07-06 23:16:06 +02:00
|
|
|
/* Initialize the thread library at least a bit since the libgcc
|
|
|
|
functions are using thread functions if these are available and
|
2002-07-24 01:12:01 +02:00
|
|
|
we need to setup errno. If there is no thread library and we
|
|
|
|
handle TLS the function is defined in the libc to initialized the
|
|
|
|
TLS handling. */
|
|
|
|
# ifndef TLS
|
2000-07-06 23:16:06 +02:00
|
|
|
if (__pthread_initialize_minimal)
|
2002-07-24 01:12:01 +02:00
|
|
|
# endif
|
2000-07-06 23:16:06 +02:00
|
|
|
__pthread_initialize_minimal ();
|
|
|
|
|
1999-07-09 18:18:17 +02:00
|
|
|
/* Some security at this point. Prevent starting a SUID binary where
|
2000-05-25 07:02:35 +02:00
|
|
|
the standard file descriptors are not opened. We have to do this
|
|
|
|
only for statically linked applications since otherwise the dynamic
|
|
|
|
loader did the work already. */
|
2000-04-03 05:51:04 +02:00
|
|
|
if (__builtin_expect (__libc_enable_secure, 0))
|
2000-05-25 07:02:35 +02:00
|
|
|
__libc_check_standard_fds ();
|
|
|
|
#endif
|
1999-07-09 18:18:17 +02:00
|
|
|
|
1998-03-08 16:26:29 +01:00
|
|
|
/* Register the destructor of the dynamic linker if there is any. */
|
2000-04-03 05:51:04 +02:00
|
|
|
if (__builtin_expect (rtld_fini != NULL, 1))
|
2001-02-26 18:53:15 +01:00
|
|
|
__cxa_atexit ((void (*) (void *)) rtld_fini, NULL, NULL);
|
1998-03-08 16:26:29 +01:00
|
|
|
|
2000-03-30 18:30:49 +02:00
|
|
|
/* Call the initializer of the libc. This is only needed here if we
|
|
|
|
are compiling for the static library in which case we haven't
|
|
|
|
run the constructors in `_dl_start_user'. */
|
2000-03-31 07:50:02 +02:00
|
|
|
#ifndef SHARED
|
1998-03-18 15:42:25 +01:00
|
|
|
__libc_init_first (argc, argv, __environ);
|
2000-03-30 18:30:49 +02:00
|
|
|
#endif
|
1998-03-18 15:42:25 +01:00
|
|
|
|
1998-04-06 21:08:46 +02:00
|
|
|
/* Register the destructor of the program, if any. */
|
|
|
|
if (fini)
|
2001-02-26 18:53:15 +01:00
|
|
|
__cxa_atexit ((void (*) (void *)) fini, NULL, NULL);
|
1998-04-06 21:08:46 +02:00
|
|
|
|
|
|
|
/* Call the initializer of the program, if any. */
|
2000-03-31 07:50:02 +02:00
|
|
|
#ifdef SHARED
|
2002-01-31 04:41:25 +01:00
|
|
|
if (__builtin_expect (GL(dl_debug_mask) & DL_DEBUG_IMPCALLS, 0))
|
2001-02-28 07:36:10 +01:00
|
|
|
_dl_debug_printf ("\ninitialize program: %s\n\n", argv[0]);
|
1998-03-18 15:42:25 +01:00
|
|
|
#endif
|
1998-04-06 21:08:46 +02:00
|
|
|
if (init)
|
|
|
|
(*init) ();
|
1998-03-08 16:26:29 +01:00
|
|
|
|
2000-03-31 07:50:02 +02:00
|
|
|
#ifdef SHARED
|
2002-01-31 04:41:25 +01:00
|
|
|
if (__builtin_expect (GL(dl_debug_mask) & DL_DEBUG_IMPCALLS, 0))
|
2001-02-28 07:36:10 +01:00
|
|
|
_dl_debug_printf ("\ntransferring control: %s\n\n", argv[0]);
|
1998-03-18 15:42:25 +01:00
|
|
|
#endif
|
|
|
|
|
|
|
|
exit ((*main) (argc, argv, __environ));
|
1998-03-06 18:21:43 +01:00
|
|
|
}
|