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}