lib/csu/powerpc64/crt1_c.c

   1 /* LINTLIBRARY */
   2 /*-
   3  * SPDX-License-Identifier: BSD-4-Clause
   4  *
   5  * Copyright 2001 David E. O'Brien.
   6  * All rights reserved.
   7  * Copyright 1996-1998 John D. Polstra.
   8  * All rights reserved.
   9  * Copyright (c) 1997 Jason R. Thorpe.
  10  * Copyright (c) 1995 Christopher G. Demetriou
  11  * All rights reserved.
  12  *
  13  * Redistribution and use in source and binary forms, with or without
  14  * modification, are permitted provided that the following conditions
  15  * are met:
  16  * 1. Redistributions of source code must retain the above copyright
  17  *    notice, this list of conditions and the following disclaimer.
  18  * 2. Redistributions in binary form must reproduce the above copyright
  19  *    notice, this list of conditions and the following disclaimer in the
  20  *    documentation and/or other materials provided with the distribution.
  21  * 3. All advertising materials mentioning features or use of this software
  22  *    must display the following acknowledgement:
  23  *          This product includes software developed for the
  24  *          FreeBSD Project.  See https://www.freebsd.org/ for
  25  *          information about FreeBSD.
  26  *          This product includes software developed for the
  27  *          NetBSD Project.  See http://www.netbsd.org/ for
  28  *          information about NetBSD.
  29  * 4. The name of the author may not be used to endorse or promote products
  30  *    derived from this software without specific prior written permission
  31  *
  32  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  33  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  34  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  35  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  36  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  37  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  38  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  39  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  40  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  41  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  42  */
  43
  44 #include <sys/cdefs.h>
  45 __FBSDID("$FreeBSD$");
  46
  47 #include <stdlib.h>
  48 #include <stdint.h>
  49 #include <sys/elf.h>
  50
  51 static uint32_t cpu_features;
  52 static uint32_t cpu_features2;
  53
  54 #include "libc_private.h"
  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 static void
  73 init_cpu_features(char **env)
  74 {
  75         const Elf_Auxinfo *aux;
  76
  77         /* Find the auxiliary vector on the stack. */
  78         while (*env++ != 0)     /* Skip over environment, and NULL terminator */
  79                 ;
  80         aux = (const Elf_Auxinfo *)env;
  81
  82         /* Digest the auxiliary vector. */
  83         for (;  aux->a_type != AT_NULL; aux++) {
  84                 switch (aux->a_type) {
  85                 case AT_HWCAP:
  86                         cpu_features = (uint32_t)aux->a_un.a_val;
  87                         break;
  88                 case AT_HWCAP2:
  89                         cpu_features2 = (uint32_t)aux->a_un.a_val;
  90                         break;
  91                 }
  92         }
  93 }
  94
  95
  96 /* The entry function. */
  97 /*
  98  * First 5 arguments are specified by the PowerPC SVR4 ABI.
  99  * The last argument, ps_strings, is a BSD extension.
 100  */
 101 /* ARGSUSED */
 102 void
 103 _start(int argc, char **argv, char **env,
 104     const struct Struct_Obj_Entry *obj __unused, void (*cleanup)(void),
 105     struct ps_strings *ps_strings)
 106 {
 107
 108         handle_argv(argc, argv, env);
 109
 110         if (ps_strings != (struct ps_strings *)0)
 111                 __ps_strings = ps_strings;
 112
 113         if (&_DYNAMIC != NULL)
 114                 atexit(cleanup);
 115         else {
 116                 init_cpu_features(env);
 117                 process_irelocs();
 118                 _init_tls();
 119         }
 120
 121 #ifdef GCRT
 122         atexit(_mcleanup);
 123         monstartup(&eprol, &etext);
 124 #endif
 125
 126         handle_static_init(argc, argv, env);
 127         exit(main(argc, argv, env));
 128 }
 129
 130 #ifdef GCRT
 131 __asm__(".text");
 132 __asm__("eprol:");
 133 __asm__(".previous");
 134 #endif