w6a,w6l: char-literals for ELF/archive magic bytes (Wave-1)
byte-id-neutral: every magic-decimal sub is value-equivalent to its ASCII char-literal. 0x7F (ELF byte-0), ELFCLASS64=2, NUL sentinels, and hex/itoa radix arithmetic kept decimal (no char identity). Regenerated w6a/w6l main.combined.ww (the only two embedders).
This commit is contained in:
@@ -36,13 +36,13 @@ fn buildpath(dst: *u8, dir: *u8, name: *u8, ext: str) u64 = {
|
||||
let nn: u64 = cstrlen(name);
|
||||
let k: u64 = 0u64;
|
||||
for (k < dn) { dst[i] = dir[k]; i += 1u64; k += 1u64; };
|
||||
dst[i] = 47u8; // '/'
|
||||
dst[i] = '/';
|
||||
i += 1u64;
|
||||
dst[i] = 108u8; // 'l'
|
||||
dst[i] = 'l';
|
||||
i += 1u64;
|
||||
dst[i] = 105u8; // 'i'
|
||||
dst[i] = 'i';
|
||||
i += 1u64;
|
||||
dst[i] = 98u8; // 'b'
|
||||
dst[i] = 'b';
|
||||
i += 1u64;
|
||||
k = 0u64;
|
||||
for (k < nn) { dst[i] = name[k]; i += 1u64; k += 1u64; };
|
||||
@@ -86,13 +86,13 @@ fn buildpathv(dst: *u8, dir: *u8, name: *u8, v: u64) u64 = {
|
||||
let nn: u64 = cstrlen(name);
|
||||
let k: u64 = 0u64;
|
||||
for (k < dn) { dst[i] = dir[k]; i += 1u64; k += 1u64; };
|
||||
dst[i] = 47u8; i += 1u64;
|
||||
dst[i] = 108u8; i += 1u64;
|
||||
dst[i] = 105u8; i += 1u64;
|
||||
dst[i] = 98u8; i += 1u64;
|
||||
dst[i] = '/'; i += 1u64;
|
||||
dst[i] = 'l'; i += 1u64;
|
||||
dst[i] = 'i'; i += 1u64;
|
||||
dst[i] = 'b'; i += 1u64;
|
||||
k = 0u64;
|
||||
for (k < nn) { dst[i] = name[k]; i += 1u64; k += 1u64; };
|
||||
dst[i] = 46u8; i += 1u64; dst[i] = 115u8; i += 1u64; dst[i] = 111u8; i += 1u64; dst[i] = 46u8; i += 1u64;
|
||||
dst[i] = '.'; i += 1u64; dst[i] = 's'; i += 1u64; dst[i] = 'o'; i += 1u64; dst[i] = '.'; i += 1u64;
|
||||
i = appenddec(dst, i, v);
|
||||
dst[i] = 0u8;
|
||||
return i;
|
||||
@@ -108,18 +108,18 @@ fn islinkable(path: *u8) bool = {
|
||||
if (n < 4i64) { return false; };
|
||||
// archive: "!<arch>\n"
|
||||
if (n >= 8i64) {
|
||||
if (mp[0u64] == 33u8) { if (mp[1u64] == 60u8) {
|
||||
if (mp[2u64] == 97u8) { if (mp[3u64] == 114u8) {
|
||||
if (mp[4u64] == 99u8) { if (mp[5u64] == 104u8) {
|
||||
if (mp[6u64] == 62u8) { if (mp[7u64] == 10u8) {
|
||||
if (mp[0u64] == '!') { if (mp[1u64] == '<') {
|
||||
if (mp[2u64] == 'a') { if (mp[3u64] == 'r') {
|
||||
if (mp[4u64] == 'c') { if (mp[5u64] == 'h') {
|
||||
if (mp[6u64] == '>') { if (mp[7u64] == '\n') {
|
||||
return true;
|
||||
}; }; }; }; }; }; }; };
|
||||
};
|
||||
// ELF: "\x7fELF"
|
||||
if (mp[0u64] == 127u8) {
|
||||
if (mp[1u64] == 69u8) {
|
||||
if (mp[2u64] == 76u8) {
|
||||
if (mp[3u64] == 70u8) { return true; };
|
||||
if (mp[1u64] == 'E') {
|
||||
if (mp[2u64] == 'L') {
|
||||
if (mp[3u64] == 'F') { return true; };
|
||||
};
|
||||
};
|
||||
};
|
||||
@@ -177,9 +177,9 @@ fn isso(path: *u8) i32 = {
|
||||
os.close(fd);
|
||||
if (n < 20i64) { return 0; };
|
||||
if (mp[0u64] != 127u8) { return 0; };
|
||||
if (mp[1u64] != 69u8) { return 0; };
|
||||
if (mp[2u64] != 76u8) { return 0; };
|
||||
if (mp[3u64] != 70u8) { return 0; };
|
||||
if (mp[1u64] != 'E') { return 0; };
|
||||
if (mp[2u64] != 'L') { return 0; };
|
||||
if (mp[3u64] != 'F') { return 0; };
|
||||
// e_type at offset 16, u16 little-endian
|
||||
let t: u16 = (mp[16u64]: u16) | ((mp[17u64]: u16) << 8u16);
|
||||
if (t == 3u16) { return 1; };
|
||||
@@ -225,9 +225,9 @@ export fn main(argc: i32, argv: **u8) i32 = {
|
||||
};
|
||||
lflags[nlflags] = argv[i];
|
||||
nlflags += 1;
|
||||
} else { if (a[0u64] == 45u8) {
|
||||
} else { if (a[0u64] == '-') {
|
||||
// -L<dir> joined form.
|
||||
if (a[1u64] == 76u8) {
|
||||
if (a[1u64] == 'L') {
|
||||
if (a[2u64] != 0u8) {
|
||||
libdirs[nlibdirs] = a + 2u64;
|
||||
nlibdirs += 1;
|
||||
@@ -235,7 +235,7 @@ export fn main(argc: i32, argv: **u8) i32 = {
|
||||
os.write(2, "w6l: bare -L\n".ptr, 12u64);
|
||||
return 2;
|
||||
};
|
||||
} else { if (a[1u64] == 108u8) {
|
||||
} else { if (a[1u64] == 'l') {
|
||||
if (a[2u64] != 0u8) {
|
||||
lflags[nlflags] = a + 2u64;
|
||||
nlflags += 1;
|
||||
|
||||
Reference in New Issue
Block a user