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
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
|
/**
* D header file for Solaris.
*
* $(LINK2 http://src.illumos.org/source/xref/illumos-gate/usr/src/head/link.h, illumos link.h)
*/
module core.sys.solaris.link;
version (Solaris):
extern (C):
nothrow:
import core.stdc.stdint;
import core.sys.solaris.dlfcn;
import core.sys.solaris.libelf;
import core.sys.solaris.sys.elf;
import core.sys.solaris.sys.link;
uint ld_version(uint);
void ld_input_done(uint*);
void ld_start(const scope char*, const Elf32_Half, const scope char*);
void ld_atexit(int);
void ld_open(const scope char**, const scope char**, int*, int, Elf**, Elf*, size_t, const Elf_Kind);
void ld_file(const scope char*, const Elf_Kind, int, Elf*);
void ld_input_section(const scope char*, Elf32_Shdr**, Elf32_Word, Elf_Data*, Elf*, uint*);
void ld_section(const scope char*, Elf32_Shdr*, Elf32_Word, Elf_Data*, Elf*);
version (D_LP64)
{
void ld_start64(const scope char*, const Elf64_Half, const scope char*);
void ld_atexit64(int);
void ld_open64(const scope char**, const scope char**, int*, int, Elf**, Elf*, size_t, const Elf_Kind);
void ld_file64(const scope char*, const Elf_Kind, int, Elf*);
void ld_input_section64(const scope char*, Elf64_Shdr**, Elf64_Word, Elf_Data*, Elf*, uint*);
void ld_section64(const scope char*, Elf64_Shdr*, Elf64_Word, Elf_Data*, Elf*);
}
enum LD_SUP_VNONE = 0;
enum LD_SUP_VERSION1 = 1;
enum LD_SUP_VERSION2 = 2;
enum LD_SUP_VERSION3 = 3;
enum LD_SUP_VCURRENT = LD_SUP_VERSION3;
enum LD_SUP_DERIVED = 0x1;
enum LD_SUP_INHERITED = 0x2;
enum LD_SUP_EXTRACTED = 0x4;
enum LM_ID_BASE = 0x00;
enum LM_ID_LDSO = 0x01;
enum LM_ID_NUM = 2;
enum LM_ID_BRAND = 0xfd;
enum LM_ID_NONE = 0xfe;
enum LM_ID_NEWLM = 0xff;
enum LAV_NONE = 0;
enum LAV_VERSION1 = 1;
enum LAV_VERSION2 = 2;
enum LAV_VERSION3 = 3;
enum LAV_VERSION4 = 4;
enum LAV_VERSION5 = 5;
enum LAV_CURRENT = LAV_VERSION5;
enum LAV_NUM = 6;
enum LA_FLG_BINDTO = 0x0001;
enum LA_FLG_BINDFROM = 0x0002;
enum LA_SYMB_NOPLTENTER = 0x0001;
enum LA_SYMB_NOPLTEXIT = 0x0002;
enum LA_SYMB_STRUCTCALL = 0x0004;
enum LA_SYMB_DLSYM = 0x0008;
enum LA_SYMB_ALTVALUE = 0x0010;
enum LA_SER_ORIG = 0x001;
enum LA_SER_LIBPATH = 0x002;
enum LA_SER_RUNPATH = 0x004;
enum LA_SER_CONFIG = 0x008;
enum LA_SER_DEFAULT = 0x040;
enum LA_SER_SECURE = 0x080;
enum LA_SER_MASK = 0xfff;
enum LA_ACT_CONSISTENT = 0x00;
enum LA_ACT_ADD = 0x01;
enum LA_ACT_DELETE = 0x02;
enum LA_ACT_MAX = 3;
version (D_LP64)
alias long lagreg_t;
else
alias int lagreg_t;
struct _la_sparc_regs
{
lagreg_t lr_rego0;
lagreg_t lr_rego1;
lagreg_t lr_rego2;
lagreg_t lr_rego3;
lagreg_t lr_rego4;
lagreg_t lr_rego5;
lagreg_t lr_rego6;
lagreg_t lr_rego7;
}
version (D_LP64)
{
alias _la_sparc_regs La_sparcv9_regs;
struct La_amd64_regs
{
lagreg_t lr_rsp;
lagreg_t lr_rbp;
lagreg_t lr_rdi;
lagreg_t lr_rsi;
lagreg_t lr_rdx;
lagreg_t lr_rcx;
lagreg_t lr_r8;
lagreg_t lr_r9;
}
}
else
{
alias _la_sparc_regs La_sparcv8_regs;
struct La_i86_regs
{
lagreg_t lr_esp;
lagreg_t lr_ebp;
}
}
uint la_version(uint);
void la_activity(uintptr_t*, uint);
void la_preinit(uintptr_t*);
char* la_objsearch(const scope char*, uintptr_t*, uint);
uint la_objopen(Link_map*, Lmid_t, uintptr_t*);
uint la_objclose(uintptr_t*);
int la_objfilter(uintptr_t*, const scope char*, uintptr_t*, uint);
version (D_LP64)
{
uintptr_t la_amd64_pltenter(Elf64_Sym*, uint, uintptr_t*, uintptr_t*,
La_amd64_regs*, uint*, const scope char*);
uintptr_t la_symbind64(Elf64_Sym*, uint, uintptr_t*, uintptr_t*, uint*, const scope char*);
uintptr_t la_sparcv9_pltenter(Elf64_Sym*, uint, uintptr_t*, uintptr_t*,
La_sparcv9_regs*, uint*, const scope char*);
uintptr_t la_pltexit64(Elf64_Sym*, uint, uintptr_t*, uintptr_t*, uintptr_t, const scope char*);
}
else
{
uintptr_t la_symbind32(Elf32_Sym*, uint, uintptr_t*, uintptr_t*, uint*);
uintptr_t la_sparcv8_pltenter(Elf32_Sym*, uint, uintptr_t*, uintptr_t*,
La_sparcv8_regs*, uint*);
uintptr_t la_i86_pltenter(Elf32_Sym*, uint, uintptr_t*, uintptr_t*,
La_i86_regs*, uint*);
uintptr_t la_pltexit(Elf32_Sym*, uint, uintptr_t*, uintptr_t*, uintptr_t);
}
template ElfW(string type)
{
version (D_LP64)
mixin("alias Elf64_"~type~" ElfW;");
else
mixin("alias Elf32_"~type~" ElfW;");
}
struct dl_phdr_info
{
ElfW!"Addr" dlpi_addr;
char* dlpi_name;
ElfW!"Phdr"* dlpi_phdr;
ElfW!"Half" dlpi_phnum;
uint64_t dlpi_adds;
uint64_t dlpi_subs;
size_t dlpi_tls_modid; // since Solaris 11.5
void* dlpi_tls_data; // since Solaris 11.5
}
private alias extern(C) int function(dl_phdr_info*, size_t, void *) dl_iterate_phdr_cb;
private alias extern(C) int function(dl_phdr_info*, size_t, void *) @nogc dl_iterate_phdr_cb_ngc;
extern int dl_iterate_phdr(dl_iterate_phdr_cb __callback, void*__data);
extern int dl_iterate_phdr(dl_iterate_phdr_cb_ngc __callback, void*__data) @nogc;
|
