lib/csu/arm_elf/crt0.c

   1 /*      $NetBSD: crt0.c,v 1.6 2002/01/01 01:31:06 thorpej Exp $ */
   2
   3 /*
   4  * Copyright (C) 1997 Mark Brinicombe
   5  * Copyright (C) 1995 Wolfgang Solfrank.
   6  * Copyright (C) 1995 TooLs GmbH.
   7  * All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  * 3. All advertising materials mentioning features or use of this software
  18  *    must display the following acknowledgement:
  19  *      This product includes software developed by TooLs GmbH.
  20  * 4. The name of TooLs GmbH may not be used to endorse or promote products
  21  *    derived from this software without specific prior written permission.
  22  *
  23  * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
  24  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  25  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  26  * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  27  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  28  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
  29  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  30  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  31  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
  32  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  33  */
  34
  35 #include <sys/cdefs.h>
  36 #include <sys/param.h>
  37
  38 #include <machine/asm.h>
  39 #include <stdlib.h>
  40
  41 #include "common.h"
  42
  43 extern  void            _start(void);
  44         void            ___start(int, char *[], char *[], struct ps_strings *,
  45                                 const Obj_Entry *, void (*)(void));
  46
  47 __asm(" .text                   \n"
  48 "       .align  0               \n"
  49 "       .globl  _start          \n"
  50 "       .globl  __start         \n"
  51 "_start:                        \n"
  52 "__start:                       \n"
  53 "       mov     r5, r2          /* cleanup */           \n"
  54 "       mov     r4, r1          /* obj_main */          \n"
  55 "       mov     r3, r0          /* ps_strings */        \n"
  56 "       /* Get argc, argv, and envp from stack */       \n"
  57 "       ldr     r0, [sp, #0x0000]       \n"
  58 "       add     r1, sp, #0x0004         \n"
  59 "       add     r2, r1, r0, lsl #2      \n"
  60 "       add     r2, r2, #0x0004         \n"
  61 "\n"
  62 "       /* Ensure the stack is properly aligned before calling C code. */\n"
  63 "       bic     sp, sp, #" ___STRING(STACKALIGNBYTES) " \n"
  64 "       sub     sp, sp, #8      \n"
  65 "       str     r5, [sp, #4]    \n"
  66 "       str     r4, [sp, #0]    \n"
  67 "\n"
  68 "       b       " ___STRING(_C_LABEL(___start)) " ");
  69
  70 #if defined(LIBC_SCCS) && !defined(lint)
  71 __RCSID("$NetBSD: crt0.c,v 1.6 2002/01/01 01:31:06 thorpej Exp $");
  72 #endif /* LIBC_SCCS and not lint */
  73
  74 void
  75 ___start(int argc, char **argv, char **envp, struct ps_strings *ps_strings,
  76         const Obj_Entry *obj, void (*cleanup)(void))
  77 {
  78         char *ap;
  79
  80         environ = envp;
  81         __ps_strings = ps_strings;
  82
  83         if ((ap = argv[0])) {
  84                 if ((__progname = _strrchr(ap, '/')) == NULL)
  85                         __progname = ap;
  86                 else
  87                         ++__progname;
  88         }
  89
  90 #ifdef  DYNAMIC
  91         /* ld(1) convention: if DYNAMIC = 0 then statically linked */
  92         if (&_DYNAMIC)
  93                 _rtld_setup(cleanup, obj);
  94 #endif  /* DYNAMIC */
  95
  96 #ifdef MCRT0
  97         atexit(_mcleanup);
  98         monstartup((u_long)&_eprol, (u_long)&_etext);
  99 #endif  /* MCRT0 */
 100
 101         atexit(_fini);
 102         _init();
 103
 104 __asm("__callmain:");           /* Defined for the benefit of debuggers */
 105         exit(main(argc, argv, envp));
 106 }
 107
 108 #include "common.c"
 109