blob: d53881ba115bcf47d84730bfc7636057b09ce3e0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
|
#include <errno.h>
#include <string.h>
#include <stdint.h>
#include <stdlib.h>
#include <bits/ensure.h>
#include <mlibc/elf/startup.h>
#include <mlibc/environment.hpp>
extern "C" size_t __init_array_start[];
extern "C" size_t __init_array_end[];
extern "C" size_t __preinit_array_start[];
extern "C" size_t __preinit_array_end[];
static int constructors_ran_already = 0;
struct global_constructor_guard {
global_constructor_guard() {
constructors_ran_already = 1;
}
};
static global_constructor_guard g;
void __mlibc_run_constructors() {
/*
if (!constructors_ran_already) {
size_t constructor_count = (size_t)__init_array_end - (size_t)__init_array_start;
constructor_count /= sizeof(void*);
for (size_t i = 0; i < constructor_count; i++) {
void (*ptr)(void) = (void(*)(void))(__init_array_start[i]);
ptr();
}
}
*/
}
namespace mlibc {
void parse_exec_stack(void *opaque_sp, exec_stack_data *data) {
auto sp = reinterpret_cast<uintptr_t *>(opaque_sp);
data->argc = *sp++;
data->argv = reinterpret_cast<char **>(sp);
sp += data->argc; // Skip all arguments.
__ensure(!*sp); // Skip the terminating null element.
sp++;
data->envp = reinterpret_cast<char **>(sp);
}
// TODO: This does not have to be here; we could also move it to options/internal.
void set_startup_data(int argc, char **argv, char **envp) {
if(argc) {
program_invocation_name = argv[0];
if(auto slash = strrchr(argv[0], '/'); slash) {
program_invocation_short_name = slash + 1;
}else{
program_invocation_short_name = argv[0];
}
}
// Initialize environ.
// TODO: Copy the arguments instead of pointing to them?
auto ev = envp;
while(*ev) {
auto fail = mlibc::putenv(*ev);
__ensure(!fail);
ev++;
}
}
} // namespace mlibc
|
