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