crt1_c.c revision 133754 
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	cleanup = get_rtld_cleanup();
82	argv = &ap;
83	argc = *(long *)(void *)(argv - 1);
84	env = argv + argc + 1;
85	environ = env;
86	if (argc > 0 && argv[0] != NULL) {
87		__progname = argv[0];
88		for (s = __progname; *s != '\0'; s++)
89			if (*s == '/')
90				__progname = s + 1;
91	}
92
93	if (&_DYNAMIC != NULL)
94		atexit(cleanup);
95	else
96		_init_tls();
97
98#ifdef GCRT
99	atexit(_mcleanup);
100#endif
101	atexit(_fini);
102#ifdef GCRT
103	monstartup(&eprol, &etext);
104#endif
105	_init();
106	exit( main(argc, argv, env) );
107}
108
109#ifdef GCRT
110__asm__(".text");
111__asm__("eprol:");
112__asm__(".previous");
113#endif
114
115__asm__(".ident\t\"$FreeBSD: head/lib/csu/i386-elf/crt1.c 133754 2004-08-15 16:18:52Z dfr $\"");
116