lib/csu/powerpc64/crt1.c

   1 /* LINTLIBRARY */
   2 /*-
   3  * Copyright 2001 David E. O'Brien.
   4  * All rights reserved.
   5  * Copyright 1996-1998 John D. Polstra.
   6  * All rights reserved.
   7  * Copyright (c) 1997 Jason R. Thorpe.
   8  * Copyright (c) 1995 Christopher G. Demetriou
   9  * All rights reserved.
  10  *
  11  * Redistribution and use in source and binary forms, with or without
  12  * modification, are permitted provided that the following conditions
  13  * are met:
  14  * 1. Redistributions of source code must retain the above copyright
  15  *    notice, this list of conditions and the following disclaimer.
  16  * 2. Redistributions in binary form must reproduce the above copyright
  17  *    notice, this list of conditions and the following disclaimer in the
  18  *    documentation and/or other materials provided with the distribution.
  19  * 3. All advertising materials mentioning features or use of this software
  20  *    must display the following acknowledgement:
  21  *          This product includes software developed for the
  22  *          FreeBSD Project.  See http://www.freebsd.org/ for
  23  *          information about FreeBSD.
  24  *          This product includes software developed for the
  25  *          NetBSD Project.  See http://www.netbsd.org/ for
  26  *          information about NetBSD.
  27  * 4. The name of the author may not be used to endorse or promote products
  28  *    derived from this software without specific prior written permission
  29  *
  30  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  31  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  32  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  33  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  34  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  35  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  36  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  37  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  38  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  39  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  40  */
  41
  42 #include <sys/cdefs.h>
  43 __FBSDID("$FreeBSD$");
  44
  45 #ifndef lint
  46 #ifndef __GNUC__
  47 #error "GCC is needed to compile this file"
  48 #endif
  49 #endif /* lint */
  50
  51 #include <stdlib.h>
  52
  53 #include "libc_private.h"
  54 #include "crtbrand.c"
  55
  56 struct Struct_Obj_Entry;
  57 struct ps_strings;
  58
  59 extern int _DYNAMIC;
  60 #pragma weak _DYNAMIC
  61
  62 extern void _fini(void);
  63 extern void _init(void);
  64 extern int main(int, char **, char **);
  65 extern void _start(int, char **, char **, const struct Struct_Obj_Entry *,
  66     void (*)(void), struct ps_strings *);
  67
  68 #ifdef GCRT
  69 extern void _mcleanup(void);
  70 extern void monstartup(void *, void *);
  71 extern int eprol;
  72 extern int etext;
  73 #endif
  74
  75 char **environ;
  76 const char *__progname = "";
  77 struct ps_strings *__ps_strings;
  78
  79 /* The entry function. */
  80 /*
  81  * First 5 arguments are specified by the PowerPC SVR4 ABI.
  82  * The last argument, ps_strings, is a BSD extension.
  83  */
  84 /* ARGSUSED */
  85 void
  86 _start(int argc, char **argv, char **env,
  87     const struct Struct_Obj_Entry *obj __unused, void (*cleanup)(void),
  88     struct ps_strings *ps_strings)
  89 {
  90         const char *s;
  91
  92         if (environ == NULL)
  93                 environ = env;
  94
  95         if (argc > 0 && argv[0] != NULL) {
  96                 __progname = argv[0];
  97                 for (s = __progname; *s != '\0'; s++)
  98                         if (*s == '/')
  99                                 __progname = s + 1;
 100         }
 101
 102         if (ps_strings != (struct ps_strings *)0)
 103                 __ps_strings = ps_strings;
 104
 105         if (&_DYNAMIC != NULL)
 106                 atexit(cleanup);
 107         else
 108                 _init_tls();
 109
 110 #ifdef GCRT
 111         atexit(_mcleanup);
 112 #endif
 113         atexit(_fini);
 114 #ifdef GCRT
 115         monstartup(&eprol, &etext);
 116 #endif
 117         _init();
 118         exit( main(argc, argv, env) );
 119 }
 120
 121 #ifdef GCRT
 122 __asm__(".text");
 123 __asm__("eprol:");
 124 __asm__(".previous");
 125 #endif