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