crt1.c revision 151072 
1280461Sdim/* LINTLIBRARY */
2280461Sdim/*-
3280461Sdim * Copyright 1996-1998 John D. Polstra.
4326947Sdim * 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 **, void (*)(void));
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
58/* The entry function. */
59void
60_start(char **ap, void (*cleanup)(void))
61{
62	int argc;
63	char **argv;
64	char **env;
65	const char *s;
66
67	argc = *(long *)(void *)ap;
68	argv = ap + 1;
69	env = ap + 2 + argc;
70	environ = env;
71	if (argc > 0 && argv[0] != NULL) {
72		__progname = argv[0];
73		for (s = __progname; *s != '\0'; s++)
74			if (*s == '/')
75				__progname = s + 1;
76	}
77
78	if (&_DYNAMIC != NULL)
79		atexit(cleanup);
80	else
81		_init_tls();
82
83#ifdef GCRT
84	atexit(_mcleanup);
85#endif
86	atexit(_fini);
87#ifdef GCRT
88	monstartup(&eprol, &etext);
89__asm__("eprol:");
90#endif
91	_init();
92	exit( main(argc, argv, env) );
93}
94
95__asm__(".ident\t\"$FreeBSD: head/lib/csu/amd64/crt1.c 151072 2005-10-07 22:13:17Z bde $\"");
96