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#include <sys/cdefs.h>
28__FBSDID("$FreeBSD$");
29
30#ifndef lint
31#ifndef __GNUC__
32#error "GCC is needed to compile this file"
33#endif
34#endif /* lint */
35
36#include <stdlib.h>
37
38#include "libc_private.h"
39#include "crtbrand.c"
40
41extern int _DYNAMIC;
42#pragma weak _DYNAMIC
43
44typedef void (*fptr)(void);
45
46extern void _fini(void);
47extern void _init(void);
48extern int main(int, char **, char **);
49
50#ifdef GCRT
51extern void _mcleanup(void);
52extern void monstartup(void *, void *);
53extern int eprol;
54extern int etext;
55#endif
56
57char **environ;
58const char *__progname = "";
59
60void _start(char **, void (*)(void));
61
62/* The entry function. */
63void
64_start(char **ap, void (*cleanup)(void))
65{
66	int argc;
67	char **argv;
68	char **env;
69	const char *s;
70
71	argc = *(long *)(void *)ap;
72	argv = ap + 1;
73	env = ap + 2 + argc;
74	if (environ == NULL)
75		environ = env;
76	if (argc > 0 && argv[0] != NULL) {
77		__progname = argv[0];
78		for (s = __progname; *s != '\0'; s++)
79			if (*s == '/')
80				__progname = s + 1;
81	}
82
83	if (&_DYNAMIC != NULL)
84		atexit(cleanup);
85	else
86		_init_tls();
87
88#ifdef GCRT
89	atexit(_mcleanup);
90#endif
91	atexit(_fini);
92#ifdef GCRT
93	monstartup(&eprol, &etext);
94__asm__("eprol:");
95#endif
96	_init();
97	exit( main(argc, argv, env) );
98}
99