mirror of
https://sourceware.org/git/glibc.git
synced 2024-12-05 03:01:05 +00:00
112 lines
2.9 KiB
C
112 lines
2.9 KiB
C
/* Initialization code run first thing by the XCOFF startup code. AIX version.
|
|
Copyright (C) 2001 Free Software Foundation, Inc.
|
|
This file is part of the GNU C Library.
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
|
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.
|
|
|
|
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
|
|
Lesser General Public License for more details.
|
|
|
|
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. */
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <fcntl.h>
|
|
#include <unistd.h>
|
|
#include <sysdep.h>
|
|
#include <fpu_control.h>
|
|
#include <sys/param.h>
|
|
#include <sys/types.h>
|
|
#include <libc-internal.h>
|
|
|
|
#ifndef SHARED
|
|
# include <ldsodefs.h>
|
|
# include "dl-osinfo.h"
|
|
#endif
|
|
|
|
extern void __libc_init (int, char **, char **);
|
|
|
|
/* The function is called from assembly stubs the compiler can't see. */
|
|
static void init (int, char **, char **) __attribute__ ((unused));
|
|
|
|
extern int _dl_starting_up;
|
|
weak_extern (_dl_starting_up)
|
|
|
|
extern fpu_control_t _dl_fpu_control;
|
|
extern int _dl_fpu_control_set;
|
|
|
|
/* Set nonzero if we have to be prepared for more then one libc being
|
|
used in the process. Safe assumption if initializer never runs. */
|
|
int __libc_multiple_libcs = 1;
|
|
|
|
/* Remember the command line argument and enviroment contents for
|
|
later calls of initializers for dynamic libraries. */
|
|
int __libc_argc;
|
|
char **__libc_argv;
|
|
|
|
|
|
static void
|
|
init (int argc, char **argv, char **envp)
|
|
{
|
|
#ifdef USE_NONOPTION_FLAGS
|
|
extern void __getopt_clean_environment (char **);
|
|
#endif
|
|
/* 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. */
|
|
|
|
/* XXX disable dl for now
|
|
int *dummy_addr = &_dl_starting_up;
|
|
|
|
__libc_multiple_libcs = dummy_addr && !_dl_starting_up; */
|
|
|
|
/* Save the command-line arguments. */
|
|
__libc_argc = argc;
|
|
__libc_argv = argv;
|
|
__environ = envp;
|
|
|
|
#ifndef SHARED
|
|
__libc_init_secure ();
|
|
#endif
|
|
|
|
__libc_init (argc, argv, envp);
|
|
|
|
#ifdef USE_NONOPTION_FLAGS
|
|
/* This is a hack to make the special getopt in GNU libc working. */
|
|
__getopt_clean_environment (envp);
|
|
#endif
|
|
|
|
#ifdef SHARED
|
|
__libc_global_ctors ();
|
|
#endif
|
|
}
|
|
|
|
#ifdef SHARED
|
|
|
|
strong_alias (init, _init);
|
|
|
|
extern void __libc_init_first (void);
|
|
|
|
void
|
|
__libc_init_first (void)
|
|
{
|
|
}
|
|
|
|
#else
|
|
extern void __libc_init_first (int argc, char **argv, char **envp);
|
|
|
|
void
|
|
__libc_init_first (int argc, char **argv, char **envp)
|
|
{
|
|
init (argc, argv, envp);
|
|
}
|
|
#endif
|