selfhost/cmd/w6l: drop l_* prefix from exports + snake fields/helpers
This commit is contained in:
@@ -24,31 +24,31 @@ def TEXT_OFF: u64 = 4096u64; // 0x1000
|
||||
|
||||
// ---- little-endian byte writers ----------------------------------------
|
||||
|
||||
fn wr_u16(buf: *u8, off: u64, v: u16) void = {
|
||||
fn wru16(buf: *u8, off: u64, v: u16) void = {
|
||||
buf[off] = (v & 255u16): u8;
|
||||
buf[off + 1u64] = ((v >> 8u16) & 255u16): u8;
|
||||
};
|
||||
|
||||
fn wr_u32(buf: *u8, off: u64, v: u32) void = {
|
||||
fn wru32(buf: *u8, off: u64, v: u32) void = {
|
||||
buf[off] = (v & 255u32): u8;
|
||||
buf[off + 1u64] = ((v >> 8u32) & 255u32): u8;
|
||||
buf[off + 2u64] = ((v >> 16u32) & 255u32): u8;
|
||||
buf[off + 3u64] = ((v >> 24u32) & 255u32): u8;
|
||||
};
|
||||
|
||||
fn wr_u64(buf: *u8, off: u64, v: u64) void = {
|
||||
wr_u32(buf, off, (v & 4294967295u64): u32);
|
||||
wr_u32(buf, off + 4u64, ((v >> 32u64) & 4294967295u64): u32);
|
||||
fn wru64(buf: *u8, off: u64, v: u64) void = {
|
||||
wru32(buf, off, (v & 4294967295u64): u32);
|
||||
wru32(buf, off + 4u64, ((v >> 32u64) & 4294967295u64): u32);
|
||||
};
|
||||
|
||||
// ---- emit ---------------------------------------------------------------
|
||||
|
||||
export fn l_emit_elf(l: *lnk, fd: i32, base: u64, entry: u64) i32 = {
|
||||
export fn emitelf(l: *lnk, fd: i32, base: u64, entry: u64) i32 = {
|
||||
// Dispatch: any loaded shared object plus any dynamic ref means
|
||||
// we owe the loader a real PT_INTERP/PT_DYNAMIC binary.
|
||||
if (l.sos != nil) {
|
||||
if (l.dyn_n > 0) {
|
||||
return l_emit_dyn_elf(l, fd, base, entry);
|
||||
if (l.dynn > 0) {
|
||||
return emitdynelf(l, fd, base, entry);
|
||||
};
|
||||
};
|
||||
|
||||
@@ -65,29 +65,29 @@ export fn l_emit_elf(l: *lnk, fd: i32, base: u64, entry: u64) i32 = {
|
||||
hdr[4u64] = ELFCLASS64;
|
||||
hdr[5u64] = ELFDATA2LSB;
|
||||
hdr[6u64] = EV_CURRENT: u8;
|
||||
wr_u16(hdr, 16u64, ET_EXEC); // e_type
|
||||
wr_u16(hdr, 18u64, EM_X86_64_W); // e_machine
|
||||
wr_u32(hdr, 20u64, EV_CURRENT); // e_version
|
||||
wr_u64(hdr, 24u64, entry); // e_entry
|
||||
wr_u64(hdr, 32u64, 64u64); // e_phoff = sizeof(Ehdr)
|
||||
wr_u64(hdr, 40u64, 0u64); // e_shoff
|
||||
wr_u32(hdr, 48u64, 0u32); // e_flags
|
||||
wr_u16(hdr, 52u64, 64u16); // e_ehsize
|
||||
wr_u16(hdr, 54u64, 56u16); // e_phentsize
|
||||
wr_u16(hdr, 56u64, 1u16); // e_phnum
|
||||
wr_u16(hdr, 58u64, 0u16); // e_shentsize
|
||||
wr_u16(hdr, 60u64, 0u16); // e_shnum
|
||||
wr_u16(hdr, 62u64, 0u16); // e_shstrndx
|
||||
wru16(hdr, 16u64, ET_EXEC); // e_type
|
||||
wru16(hdr, 18u64, EM_X86_64_W); // e_machine
|
||||
wru32(hdr, 20u64, EV_CURRENT); // e_version
|
||||
wru64(hdr, 24u64, entry); // e_entry
|
||||
wru64(hdr, 32u64, 64u64); // e_phoff = sizeof(Ehdr)
|
||||
wru64(hdr, 40u64, 0u64); // e_shoff
|
||||
wru32(hdr, 48u64, 0u32); // e_flags
|
||||
wru16(hdr, 52u64, 64u16); // e_ehsize
|
||||
wru16(hdr, 54u64, 56u16); // e_phentsize
|
||||
wru16(hdr, 56u64, 1u16); // e_phnum
|
||||
wru16(hdr, 58u64, 0u16); // e_shentsize
|
||||
wru16(hdr, 60u64, 0u16); // e_shnum
|
||||
wru16(hdr, 62u64, 0u16); // e_shstrndx
|
||||
|
||||
// --- Phdr (56 bytes) at offset 64 ---
|
||||
wr_u32(hdr, 64u64, PT_LOAD); // p_type
|
||||
wr_u32(hdr, 68u64, PF_R | PF_X); // p_flags
|
||||
wr_u64(hdr, 72u64, 0u64); // p_offset
|
||||
wr_u64(hdr, 80u64, base); // p_vaddr
|
||||
wr_u64(hdr, 88u64, base); // p_paddr
|
||||
wr_u64(hdr, 96u64, filesz); // p_filesz
|
||||
wr_u64(hdr, 104u64, filesz); // p_memsz
|
||||
wr_u64(hdr, 112u64, TEXT_OFF); // p_align
|
||||
wru32(hdr, 64u64, PT_LOAD); // p_type
|
||||
wru32(hdr, 68u64, PF_R | PF_X); // p_flags
|
||||
wru64(hdr, 72u64, 0u64); // p_offset
|
||||
wru64(hdr, 80u64, base); // p_vaddr
|
||||
wru64(hdr, 88u64, base); // p_paddr
|
||||
wru64(hdr, 96u64, filesz); // p_filesz
|
||||
wru64(hdr, 104u64, filesz); // p_memsz
|
||||
wru64(hdr, 112u64, TEXT_OFF); // p_align
|
||||
|
||||
// Write [0..0x1000) then .text.
|
||||
let n1: i64 = os.writefull(fd, hdr, TEXT_OFF);
|
||||
|
||||
Reference in New Issue
Block a user