lib/csu/x86_64/crt0.c

   1 /* $NetBSD: crt0.c,v 1.4 2004/08/26 21:23:06 thorpej Exp $ */
   2
   3 /*
   4  * Copyright (c) 1998 Christos Zoulas
   5  * Copyright (c) 1995 Christopher G. Demetriou
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  * 3. All advertising materials mentioning features or use of this software
  17  *    must display the following acknowledgement:
  18  *          This product includes software developed for the
  19  *          NetBSD Project.  See http://www.NetBSD.org/ for
  20  *          information about NetBSD.
  21  * 4. The name of the author may not be used to endorse or promote products
  22  *    derived from this software without specific prior written permission.
  23  *
  24  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  25  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  26  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  27  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  28  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  29  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  30  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  31  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  32  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  33  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  34  *
  35  * <<Id: LICENSE,v 1.2 2000/06/14 15:57:33 cgd Exp>>
  36  */
  37
  38 #include <sys/types.h>
  39 #include <machine/profile.h>
  40
  41 #include "common.h"
  42
  43 void ___start(int, char **, char **, void (*cleanup)(void),
  44     const Obj_Entry *, struct ps_strings *);
  45
  46 __asm(" .text                                           ; \
  47         .align  8                                       ; \
  48         .globl  __start                                 ; \
  49         .globl  _start                                  ; \
  50 _start:                                                 ; \
  51 __start:                                                ; \
  52         movq    %rbx,%r9                                ; \
  53         movq    %rcx,%r8                                ; \
  54         movq    %rdx,%rcx                               ; \
  55         movq    (%rsp),%rdi                             ; \
  56         leaq    16(%rsp,%rdi,8),%rdx                    ; \
  57         leaq    8(%rsp),%rsi                            ; \
  58         subq    $8,%rsp                                 ; \
  59         andq    $~15,%rsp                               ; \
  60         addq    $8,%rsp                                 ; \
  61         jmp     ___start                                ; ");
  62
  63 void
  64 ___start(int argc, char **argv, char **envp,
  65     void (*cleanup)(void),                      /* from shared loader */
  66     const Obj_Entry *obj,                       /* from shared loader */
  67     struct ps_strings *ps_strings)
  68 {
  69         environ = envp;
  70
  71         if ((__progname = argv[0]) != NULL) {   /* NULL ptr if argc = 0 */
  72                 if ((__progname = _strrchr(__progname, '/')) == NULL)
  73                         __progname = argv[0];
  74                 else
  75                         __progname++;
  76         }
  77
  78         if (ps_strings != (struct ps_strings *)0)
  79                 __ps_strings = ps_strings;
  80
  81 #ifdef DYNAMIC
  82         if (&_DYNAMIC != NULL)
  83                 _rtld_setup(cleanup, obj);
  84 #endif
  85
  86 #ifdef MCRT0
  87         atexit(_mcleanup);
  88         monstartup((u_long)&_eprol, (u_long)&_etext);
  89 #endif
  90
  91         atexit(_fini);
  92         _init();
  93
  94         exit(main(argc, argv, environ));
  95 }
  96
  97 /*
  98  * NOTE: Leave the RCS ID _after_ __start(), in case it gets placed in .text.
  99  */
 100 #if defined(LIBC_SCCS) && !defined(lint)
 101 __RCSID("$NetBSD: crt0.c,v 1.4 2004/08/26 21:23:06 thorpej Exp $");
 102 #endif /* LIBC_SCCS and not lint */
 103
 104 #include "common.c"