lib/csu/powerpc/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
  66 #ifdef GCRT
  67 extern void _mcleanup(void);
  68 extern void monstartup(void *, void *);
  69 extern int eprol;
  70 extern int etext;
  71 #endif
  72
  73 char **environ;
  74 const char *__progname = "";
  75 struct ps_strings *__ps_strings;
  76
  77 void _start(int, char **, char **, const struct Struct_Obj_Entry *,
  78     void (*)(void), struct ps_strings *);
  79
  80 /* The entry function. */
  81 /*
  82  * First 5 arguments are specified by the PowerPC SVR4 ABI.
  83  * The last argument, ps_strings, is a BSD extension.
  84  */
  85 /* ARGSUSED */
  86 void
  87 _start(int argc, char **argv, char **env,
  88     const struct Struct_Obj_Entry *obj __unused, void (*cleanup)(void),
  89     struct ps_strings *ps_strings)
  90 {
  91         const char *s;
  92
  93         if (environ == NULL)
  94                 environ = env;
  95
  96         if (argc > 0 && argv[0] != NULL) {
  97                 __progname = argv[0];
  98                 for (s = __progname; *s != '\0'; s++)
  99                         if (*s == '/')
 100                                 __progname = s + 1;
 101         }
 102
 103         if (ps_strings != (struct ps_strings *)0)
 104                 __ps_strings = ps_strings;
 105
 106         if (&_DYNAMIC != NULL)
 107                 atexit(cleanup);
 108         else
 109                 _init_tls();
 110
 111 #ifdef GCRT
 112         atexit(_mcleanup);
 113 #endif
 114         atexit(_fini);
 115 #ifdef GCRT
 116         monstartup(&eprol, &etext);
 117 #endif
 118         _init();
 119         exit( main(argc, argv, env) );
 120 }
 121
 122 #ifdef GCRT
 123 __asm__(".text");
 124 __asm__("eprol:");
 125 __asm__(".previous");
 126 #endif