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 #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 #include "ignore_init.c"
  56
  57 struct Struct_Obj_Entry;
  58 struct ps_strings;
  59
  60 extern void _start(int, char **, char **, const struct Struct_Obj_Entry *,
  61     void (*)(void), struct ps_strings *);
  62
  63 #ifdef GCRT
  64 extern void _mcleanup(void);
  65 extern void monstartup(void *, void *);
  66 extern int eprol;
  67 extern int etext;
  68 #endif
  69
  70 struct ps_strings *__ps_strings;
  71
  72 void __start(int, char **, char **, struct ps_strings *,
  73     const struct Struct_Obj_Entry *, void (*)(void));
  74
  75 /* The entry function. */
  76 __asm(" .text                   \n"
  77 "       .align  0               \n"
  78 "       .globl  _start          \n"
  79 "       _start:                 \n"
  80 "       mov     r5, r2          /* cleanup */           \n"
  81 "       mov     r4, r1          /* obj_main */          \n"
  82 "       mov     r3, r0          /* ps_strings */        \n"
  83 "       /* Get argc, argv, and envp from stack */       \n"
  84 "       ldr     r0, [sp, #0x0000]       \n"
  85 "       add     r1, sp, #0x0004         \n"
  86 "       add     r2, r1, r0, lsl #2      \n"
  87 "       add     r2, r2, #0x0004         \n"
  88 "       /* Ensure the stack is properly aligned before calling C code. */\n"
  89 "       bic     sp, sp, #7      \n"
  90 "       sub     sp, sp, #8      \n"
  91 "       str     r5, [sp, #4]    \n"
  92 "       str     r4, [sp, #0]    \n"
  93 "\n"
  94 "       b        __start  ");
  95 /* ARGSUSED */
  96 void
  97 __start(int argc, char **argv, char **env, struct ps_strings *ps_strings,
  98     const struct Struct_Obj_Entry *obj __unused, void (*cleanup)(void))
  99 {
 100
 101         handle_argv(argc, argv, env);
 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 #ifdef GCRT
 111         atexit(_mcleanup);
 112         monstartup(&eprol, &etext);
 113 #endif
 114         handle_static_init(argc, argv, env);
 115         exit(main(argc, argv, env));
 116 }
 117
 118 static const struct {
 119         int32_t namesz;
 120         int32_t descsz;
 121         int32_t type;
 122         char    name[sizeof(NOTE_FREEBSD_VENDOR)];
 123         char    desc[sizeof(MACHINE_ARCH)];
 124 } archtag __attribute__ ((section (NOTE_SECTION), aligned(4))) __used = {
 125         .namesz = sizeof(NOTE_FREEBSD_VENDOR),
 126         .descsz = sizeof(int32_t),
 127         .type = ARCH_NOTETYPE,
 128         .name = NOTE_FREEBSD_VENDOR,
 129         .desc = MACHINE_ARCH
 130 };
 131
 132 #ifdef GCRT
 133 __asm__(".text");
 134 __asm__("eprol:");
 135 __asm__(".previous");
 136 #endif