code wiki / _hdl_build / _inet_fetch_authored.nx
_inet_fetch_authored.nx source
↩ module page · 46 lines · 3207 B
1// AUTHORED BY THE NISHI BUILDER (nx_module_author inet-fetch template) -- sovereign DNS + HTTP fetch.
2// Composes PURE nx_dns (query/parse) + nx_syscalls UDP via nx_browse_text -- NOT x86_64-pinned
3// nx_dns_io_resolve_a (team raised its hand on the syscall clash; Claude tutored this compose).
4import "nx_dns.nx"
5import "nx_connect.nx" // bounded connect: a raw sys_connect hangs ~127s on a black-holed host
6import "nx_browse_text.nx"
7func _ifa_puts(s: *u8) -> i64 { var n: i64=0; while s[n]!=(0 as u8){n=n+1} sys_write(1,s,n); return 0 }
8func _ifa_num(v: i64) -> i64 { let bb: *u8=sys_mmap(28); var m: i64=v; if m<0{m=0-m;sys_write(1,"-" as *u8,1)}; let t: *u8=sys_mmap(28); var k: i64=0; if m==0{t[0]=48;k=1}; while m>0{t[k]=48+(m%10);m=m/10;k=k+1}; var i: i64=0; while i<k{bb[i]=t[k-1-i];i=i+1}; sys_write(1,bb,k); return 0 }
9func _ifa_resolve(hn: *u8, hl: i64, out4: *u8) -> i64 {
10 let sfd: i64 = sys_socket(2, 2, 0)
11 if sfd < 0 { return 0 - 1 }
12 let dst: *u8 = sys_mmap(16)
13 br_addr_ipv4(dst, 8, 8, 8, 8, 53)
14 if nx_connect_bounded(sfd, dst, 16, NX_CONN_DEFAULT_MS) < 0 { sys_close(sfd); return 0 - 2 }
15 let q: *u8 = sys_mmap(1024)
16 let qn: i64 = nx_dns_build_query(hn, hl, 1, 20056, q, 1024)
17 if qn < 0 { sys_close(sfd); return 0 - 3 }
18 if sys_sendto(sfd, q, qn, 0, 0 as *u8, 0) != qn { sys_close(sfd); return 0 - 4 }
19 let rb2: *u8 = sys_mmap(1024)
20 let rn: i64 = sys_recvfrom(sfd, rb2, 1024, 0, 0 as *u8, 0 as *i64)
21 sys_close(sfd)
22 if rn < 12 { return 0 - 5 }
23 let v: i64 = nx_dns_parse_response_a(rb2, rn, 20056, out4)
24 if v != 1 { return 0 - (100 + v) }
25 return 0
26}
27func main() -> i64 {
28 _ifa_puts("=== BUILDER-AUTHORED SOVEREIGN INET FETCH: nishi DNS resolve + nishi HTTP fetch ===\n" as *u8)
29 let ip: *u8 = sys_mmap(8)
30 let rv: i64 = _ifa_resolve("info.cern.ch" as *u8, 12, ip)
31 _ifa_puts(" sovereign DNS resolve: rv=" as *u8); _ifa_num(rv); _ifa_puts(" -> " as *u8)
32 _ifa_num(ip[0] as i64); _ifa_puts("." as *u8); _ifa_num(ip[1] as i64); _ifa_puts("." as *u8); _ifa_num(ip[2] as i64); _ifa_puts("." as *u8); _ifa_num(ip[3] as i64); _ifa_puts("\n" as *u8)
33 if rv != 0 { _ifa_puts(" RESOLVE FAILED -- the team raises its hand (DNS verdict above)\n" as *u8); sys_exit(1); return 1 }
34 let addr: *u8 = sys_mmap(32)
35 br_addr_ipv4(addr, ip[0] as i64, ip[1] as i64, ip[2] as i64, ip[3] as i64, 80)
36 let scratch: *u8 = sys_mmap(131072); let out: *u8 = sys_mmap(131072)
37 let status: *i64 = sys_mmap(8) as *i64; let verdict: *i64 = sys_mmap(8) as *i64
38 let n: i64 = nx_browse_text(addr, "/" as *u8, 1, "info.cern.ch" as *u8, 12, scratch, 131072, out, 131072, status, verdict)
39 _ifa_puts(" sovereign HTTP fetch: status=" as *u8); _ifa_num(status[0]); _ifa_puts(" rendered-bytes=" as *u8); _ifa_num(n); _ifa_puts("\n" as *u8)
40 if n > 0 { var show: i64 = n; if show > 400 { show = 400 } sys_write(1, out, show); _ifa_puts("\n" as *u8) }
41 if status[0] == 200 { if n > 50 {
42 _ifa_puts(" SOVEREIGN: resolved AND fetched the real internet with the team's OWN DNS + HTTP. No python3, no curl.\n" as *u8)
43 sys_exit(0); return 0
44 } }
45 _ifa_puts(" fetch below bar\n" as *u8); sys_exit(1); return 1
46}