code wiki / _hdl_build / nx_iot_verify_gate.nx
nx_iot_verify_gate.nx source
↩ module page · 101 lines · 6123 B
1// nx_iot_verify_gate.nx -- SOVEREIGN live publish verifier for the /iot hub
2// control panel (no curl/wget). Does a real HTTPS GET of the just-published
3// https://nishifamily.com/iot.html through the Nishi TLS-1.3 client + real
4// Mozilla CA chain, and asserts: CA store loads, TLS session connects, HTTP
5// 200, and the served body carries this page's markers ("Nishi IoT Hub" +
6// the emitter signature "nx_iot_page"). The "fetch-verify" half of the
7// live-publish loop, done as a Nishi gate (verify via gates, not shell
8// tools). GREEN iff 6/6. Durable knowledge/status/iot_verify_gate.log.
9// license_tier: ORIGINAL (cloned from nx_aw_verify_gate, the reusable verifier)
10import "nx_syscalls.nx"
11import "nx_x509_trust_store.nx"
12import "nx_trust_store_load_from_certdata.nx"
13import "nx_tls13_client_validate_certificate.nx"
14import "nx_tls13_client_session_run.nx"
15import "nx_https_url_for_fetch.nx"
16import "nx_https_url_connect.nx"
17import "nx_https_get.nx"
18import "nx_https_get_complete.nx"
19import "nx_http_response_parse.nx"
20
21func vg_w(s: *u8) -> i64 { var n: i64=0; while s[n]!=(0 as u8){n=n+1} sys_write(1,s,n); return 0 }
22func vg_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 as u8);k=1}; while m>0{t[k]=((48+(m%10)) as u8);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 }
23func vg_strlen(s: *u8) -> i64 { var n: i64=0; while s[n]!=(0 as u8){n=n+1} return n }
24func vg_contains(buf: *u8, lo: i64, hi: i64, needle: *u8) -> i64 {
25 let nl: i64=vg_strlen(needle); if nl==0 { return 0 }
26 var i: i64=lo
27 while i+nl<=hi { var j: i64=0; var ok: i64=1; while j<nl { if buf[i+j]!=needle[j] { ok=0; j=nl } else { j=j+1 } } if ok==1 { return 1 } i=i+1 }
28 return 0
29}
30func vg_row(id: i64, ok: i64, what: *u8) -> i64 {
31 vg_w(" R" as *u8); vg_num(id); vg_w(" " as *u8); vg_w(what); vg_w(": " as *u8)
32 if ok==1 { vg_w("YES PASS\n" as *u8) } else { vg_w("NO FAIL\n" as *u8) }
33 return ok
34}
35
36func main() -> i64 {
37 vg_w("=== IOT LIVE VERIFY GATE (sovereign HTTPS GET of nishifamily.com/iot.html) ===\n" as *u8)
38 var pass: i64=0; let rows: i64=6
39
40 // R1: load the real Mozilla CA bundle from the repo (cwd-relative, no /tmp staging)
41 let r: i64 = nx_trust_store_load_from_certdata("data/mozilla_certdata.txt" as *u8, 300, 4194304)
42 var caok: i64=0; var nca: i64=0
43 if r > 0 { let store0: *TrustStore = r as *TrustStore; nca = trust_store_count(store0); if nca >= 50 { caok=1 } }
44 pass=pass+vg_row(1, caok, "Mozilla CA store loads (>=50 anchors)" as *u8)
45 if caok==0 { vg_w("IOT-VERIFY abort: no CA store\n" as *u8); sys_exit(1); return 1 }
46 let store: *TrustStore = r as *TrustStore
47
48 let url: *u8 = "https://nishifamily.com/iot.html" as *u8
49 let url_p: *NxUrl = nx_url_new()
50 let target: *NxHttpsTarget = sys_mmap(64) as *NxHttpsTarget
51 target.url = url_p
52 target.port = 0
53 var urlok: i64=0
54 if nx_https_url_for_fetch(url, target) == NX_HTTPS_URL_OK { urlok=1 }
55
56 let fd_p: *i64 = sys_mmap(16) as *i64
57 var conn: i64=0
58 if urlok==1 { if nx_https_url_connect(target, url, sys_now_realtime_sec(), fd_p) == NX_HTTPS_CONNECT_OK { conn=1 } }
59 let fd: i64 = fd_p[0]
60
61 let cr: *u8 = sys_mmap(32); var i: i64=0; while i<32 { cr[i]=(0xC0+i) as u8; i=i+1 }
62 let priv: *u8 = sys_mmap(32); i=0; while i<32 { priv[i]=(0xA0+i) as u8; i=i+1 }
63 let val_ctx: *TlsValidationContext = sys_mmap(64) as *TlsValidationContext
64 val_ctx.store = store
65 val_ctx.sni_host = ((url as i64) + target.url.host_off) as *u8
66 val_ctx.sni_host_len = target.url.host_len
67 val_ctx.now_epoch = sys_now_realtime_sec()
68
69 var sr: i64=0
70 if conn==1 { sr = nx_tls13_client_session_run(fd, ((url as i64)+target.url.host_off) as *u8, target.url.host_len, cr, priv, val_ctx) }
71 pass=pass+vg_row(2, (sr>0) as i64, "TLS-1.3 session connects + cert validates" as *u8)
72
73 var gc: i64=0
74 let buf: *u8 = sys_mmap(262144)
75 if sr>0 {
76 let session: *Tls13ClientSession = sr as *Tls13ClientSession
77 gc = nx_https_get_complete(session, fd, "/iot.html" as *u8, 9, ((url as i64)+target.url.host_off) as *u8, target.url.host_len, buf, 262144)
78 sys_close(fd)
79 }
80 pass=pass+vg_row(3, (gc>0) as i64, "HTTPS GET returns response bytes" as *u8)
81
82 var status: i64=0; var body_off: i64=0
83 if gc>0 { let pr: *i64 = sys_mmap(128) as *i64; if nx_http_response_parse(buf, gc, pr)==0 { status=pr[1]; body_off=pr[6] } }
84 pass=pass+vg_row(4, (status==200) as i64, "HTTP status 200" as *u8)
85
86 var m1: i64=0; var m2: i64=0
87 if gc>0 { if vg_contains(buf, body_off, gc, "Nishi IoT Hub" as *u8)==1 { m1=1 } if vg_contains(buf, body_off, gc, "nx_iot_page" as *u8)==1 { m2=1 } }
88 pass=pass+vg_row(5, m1, "served body has 'Nishi IoT Hub'" as *u8)
89 pass=pass+vg_row(6, m2, "served body carries emitter sig 'nx_iot_page'" as *u8)
90
91 vg_w("----\nIOT-VERIFY rows=" as *u8); vg_num(rows); vg_w(" pass=" as *u8); vg_num(pass); vg_w(" status=" as *u8); vg_num(status); vg_w(" bytes=" as *u8); vg_num(gc); vg_w("\n" as *u8)
92 let lg: i64=sys_openat_append("knowledge/status/iot_verify_gate.log" as *u8, 0x1a4)
93 if lg>=0 { vg_w("(logged)\n" as *u8)
94 let line: *u8=sys_mmap(256); var o: i64=0
95 var s: *u8="IOT-VERIFY iot.html pass=" as *u8; var z: i64=0; while s[z]!=(0 as u8){line[o]=s[z];o=o+1;z=z+1}
96 let t: *u8=sys_mmap(28); var mm: i64=pass; var k: i64=0; if mm==0{t[0]=48 as u8;k=1}; while mm>0{t[k]=(48+(mm%10)) as u8;mm=mm/10;k=k+1}; var q: i64=0; while q<k{line[o]=t[k-1-q];o=o+1;q=q+1}
97 if pass==rows { var g: *u8=" verdict=GREEN\n" as *u8; z=0; while g[z]!=(0 as u8){line[o]=g[z];o=o+1;z=z+1} } else { var rr: *u8=" verdict=RED\n" as *u8; z=0; while rr[z]!=(0 as u8){line[o]=rr[z];o=o+1;z=z+1} }
98 sys_write(lg, line, o); sys_close(lg) }
99 if pass==rows { vg_w("IOT-VERIFY GREEN -- nishifamily.com/iot.html is LIVE and correct\n" as *u8); sys_exit(0); return 0 }
100 vg_w("IOT-VERIFY RED -- not fully verified live\n" as *u8); sys_exit(1); return 1
101}