move calls to application init functions after crt1 entry point
[musl] / src / env / __libc_start_main.c
1 #include <elf.h>
2 #include <poll.h>
3 #include <fcntl.h>
4 #include <signal.h>
5 #include "syscall.h"
6 #include "atomic.h"
7 #include "libc.h"
8
9 void __init_tls(size_t *);
10
11 #ifndef SHARED
12 static void dummy() {}
13 weak_alias(dummy, _init);
14 extern void (*const __init_array_start)() __attribute__((weak));
15 extern void (*const __init_array_end)() __attribute__((weak));
16 #endif
17
18 static void dummy1(void *p) {}
19 weak_alias(dummy1, __init_ssp);
20
21 #define AUX_CNT 38
22
23 #ifndef SHARED
24 static
25 #endif
26 void __init_libc(char **envp, char *pn)
27 {
28         size_t i, *auxv, aux[AUX_CNT] = { 0 };
29         __environ = envp;
30         for (i=0; envp[i]; i++);
31         libc.auxv = auxv = (void *)(envp+i+1);
32         for (i=0; auxv[i]; i+=2) if (auxv[i]<AUX_CNT) aux[auxv[i]] = auxv[i+1];
33         __hwcap = aux[AT_HWCAP];
34         __sysinfo = aux[AT_SYSINFO];
35         libc.page_size = aux[AT_PAGESZ];
36
37         if (pn) {
38                 __progname = __progname_full = pn;
39                 for (i=0; pn[i]; i++) if (pn[i]=='/') __progname = pn+i+1;
40         }
41
42         __init_tls(aux);
43         __init_ssp((void *)aux[AT_RANDOM]);
44
45         if (aux[AT_UID]==aux[AT_EUID] && aux[AT_GID]==aux[AT_EGID]
46                 && !aux[AT_SECURE]) return;
47
48         struct pollfd pfd[3] = { {.fd=0}, {.fd=1}, {.fd=2} };
49 #ifdef SYS_poll
50         __syscall(SYS_poll, pfd, 3, 0);
51 #else
52         __syscall(SYS_ppoll, pfd, 3, &(struct timespec){0}, 0, _NSIG/8);
53 #endif
54         for (i=0; i<3; i++) if (pfd[i].revents&POLLNVAL)
55                 if (__sys_open("/dev/null", O_RDWR)<0)
56                         a_crash();
57         libc.secure = 1;
58 }
59
60 int __libc_start_main(int (*main)(int,char **,char **), int argc, char **argv)
61 {
62         char **envp = argv+argc+1;
63
64 #ifndef SHARED
65         __init_libc(envp, argv[0]);
66         _init();
67         uintptr_t a = (uintptr_t)&__init_array_start;
68         for (; a<(uintptr_t)&__init_array_end; a+=sizeof(void(*)()))
69                 (*(void (**)())a)();
70 #else
71         void __libc_start_init(void);
72         __libc_start_init();
73 #endif
74
75         /* Pass control to the application */
76         exit(main(argc, argv, envp));
77         return 0;
78 }