crt1_c.c revision 67811
1/*- 2 * Copyright 1996-1998 John D. Polstra. 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 15 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 16 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 17 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 18 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 19 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 20 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 21 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 22 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 23 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 24 * 25 * $FreeBSD: head/lib/csu/i386-elf/crt1.c 67811 2000-10-28 21:26:48Z obrien $ 26 */ 27 28#ifndef __GNUC__ 29#error "GCC is needed to compile this file" 30#endif 31 32#include <stddef.h> 33#include <stdlib.h> 34#include "crtbrand.c" 35 36typedef void (*fptr)(void); 37 38extern void _fini(void); 39extern void _init(void); 40extern int main(int, char **, char **); 41 42#ifdef GCRT 43extern void _mcleanup(void); 44extern void monstartup(void *, void *); 45extern int eprol; 46extern int etext; 47#endif 48 49extern int _DYNAMIC; 50#pragma weak _DYNAMIC 51 52#ifdef __i386__ 53#define get_rtld_cleanup() \ 54 ({ fptr __value; \ 55 __asm__("movl %%edx,%0" : "=rm"(__value)); \ 56 __value; }) 57#else 58#error "This file only supports the i386 architecture" 59#endif 60 61char **environ; 62char *__progname = ""; 63 64void 65_start(char *arguments, ...) 66{ 67 fptr rtld_cleanup; 68 int argc; 69 char **argv; 70 char **env; 71 72 rtld_cleanup = get_rtld_cleanup(); 73 argv = &arguments; 74 argc = * (int *) (argv - 1); 75 env = argv + argc + 1; 76 environ = env; 77 if(argc > 0 && argv[0] != NULL) { 78 char *s; 79 __progname = argv[0]; 80 for (s = __progname; *s != '\0'; s++) 81 if (*s == '/') 82 __progname = s + 1; 83 } 84 85 if(&_DYNAMIC != NULL) 86 atexit(rtld_cleanup); 87 88#ifdef GCRT 89 atexit(_mcleanup); 90#endif 91 atexit(_fini); 92#ifdef GCRT 93 monstartup(&eprol, &etext); 94#endif 95 _init(); 96 exit( main(argc, argv, env) ); 97} 98 99#ifdef GCRT 100__asm__(".text"); 101__asm__("eprol:"); 102__asm__(".previous"); 103#endif 104