lib/csu/arm/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 #ifndef lint
  43 #ifndef __GNUC__
  44 #error "GCC is needed to compile this file"
  45 #endif
  46 #endif /* lint */
  47
  48 #include <stdlib.h>
  49
  50 #include "libc_private.h"
  51 #include "crtbrand.c"
  52 #include <machine/asm.h>
  53
  54 struct Struct_Obj_Entry;
  55 struct ps_strings;
  56
  57 extern int _DYNAMIC;
  58 #pragma weak _DYNAMIC
  59
  60 extern void _fini(void);
  61 extern void _init(void);
  62 extern int main(int, char **, char **);
  63 extern void _start(int, char **, char **, const struct Struct_Obj_Entry *,
  64     void (*)(void), struct ps_strings *);
  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 /* The entry function. */
  78 __asm(" .text                   \n"
  79 "       .align  0               \n"
  80 "       .globl  _start          \n"
  81 "       _start:                 \n"
  82 "       mov     r5, r2          /* cleanup */           \n"
  83 "       mov     r4, r1          /* obj_main */          \n"
  84 "       mov     r3, r0          /* ps_strings */        \n"
  85 "       /* Get argc, argv, and envp from stack */       \n"
  86 "       ldr     r0, [sp, #0x0000]       \n"
  87 "       add     r1, sp, #0x0004         \n"
  88 "       add     r2, r1, r0, lsl #2      \n"
  89 "       add     r2, r2, #0x0004         \n"
  90 "       /* Ensure the stack is properly aligned before calling C code. */\n"
  91 "       bic     sp, sp, #7      \n"
  92 "       sub     sp, sp, #8      \n"
  93 "       str     r5, [sp, #4]    \n"
  94 "       str     r4, [sp, #0]    \n"
  95 "\n"
  96 "       b        __start  ");
  97 /* ARGSUSED */
  98 void
  99 __start(int argc, char **argv, char **env, struct ps_strings *ps_strings,
 100     const struct Struct_Obj_Entry *obj __unused, void (*cleanup)(void))
 101 {
 102         const char *s;
 103
 104         environ = env;
 105
 106         if (argc > 0 && argv[0] != NULL) {
 107                 __progname = argv[0];
 108                 for (s = __progname; *s != '\0'; s++)
 109                         if (*s == '/')
 110                                 __progname = s + 1;
 111         }
 112
 113         if (ps_strings != (struct ps_strings *)0)
 114                 __ps_strings = ps_strings;
 115
 116         if (&_DYNAMIC != NULL)
 117                 atexit(cleanup);
 118         else
 119                 _init_tls();
 120 #ifdef GCRT
 121         atexit(_mcleanup);
 122 #endif
 123         atexit(_fini);
 124 #ifdef GCRT
 125         monstartup(&eprol, &etext);
 126 #endif
 127         _init();
 128         exit( main(argc, argv, env) );
 129 }
 130
 131 #ifdef GCRT
 132 __asm__(".text");
 133 __asm__("eprol:");
 134 __asm__(".previous");
 135 #endif
 136
 137 __asm__(".ident\t\"$FreeBSD$\"");