code wiki / _hdl_build / nx_vizsla_log_gate.nx

nx_vizsla_log_gate.nx source

↩ module page · 212 lines · 8632 B

1// nx_vizsla_log_gate.nx -- VIZSLA typed-interaction/timeline gate. Construction-known oracle. 2// log: mom call@06-10 "talked about her trip to Italy" ; mom meeting@05-01 "lunch downtown" ; 3// mom email@03-01 "sent vacation photos" ; alex coffee@06-05 "discussed the new role". 4// timeline mom => 3 interactions newest-first (06-10 call, 05-01 meeting, 03-01 email); 5// first=2026-03-01 last=2026-06-10 ; alex's coffee NOT in mom's timeline. 6// Rows: 7// 1 load 4 INT -> new=4 seg-A101 8// 2 idempotent new=0 dup_instore=4 (law 10) 9// 3 newest-first mom timeline: 06-10 line appears BEFORE 03-01 line (chronological desc sort) 10// 4 typed type=call + type=email present (typed, not generic touch) 11// 5 multiword-note note=lunch downtown preserved (rest-of-line content) 12// 6 verdict interactions=3 first=2026-03-01 last=2026-06-10 13// 7 isolation mom timeline has NONE of alex (no "discussed the new role") 14// 8 neg-no-file load missing -> exit 1 15// Evidence: VIZSLA-LOG-GATE -> stdout + knowledge/status/vizsla_gate.log; exit 0 iff 8/8. 16// license_tier: ORIGINAL 17import "nx_syscalls.nx" 18 19func og_slen(s: *u8) -> i64 { var n: i64 = 0; while s[n] != (0 as u8) { n = n + 1 } return n } 20func og_p(s: *u8) -> i64 { sys_write(1, s, og_slen(s)); return 0 } 21 22func og_cat(dst: *u8, off: i64, s: *u8) -> i64 { 23 var i: i64 = 0 24 while s[i] != (0 as u8) { dst[off + i] = s[i]; i = i + 1 } 25 return off + i 26} 27 28func og_catn(dst: *u8, off: i64, v: i64) -> i64 { 29 var o: i64 = off 30 var m: i64 = v 31 if m < 0 { dst[o] = 45 as u8; o = o + 1; m = 0 - m } 32 let t: *u8 = sys_mmap(28) 33 var k: i64 = 0 34 if m == 0 { t[0] = 48 as u8; k = 1 } 35 while m > 0 { t[k] = (48 + (m % 10)) as u8; m = m / 10; k = k + 1 } 36 var i: i64 = 0 37 while i < k { dst[o + i] = t[k - 1 - i]; i = i + 1 } 38 return o + k 39} 40 41func og_write(path: *u8, content: *u8) -> i64 { 42 let fd: i64 = sys_openat_wr(path, 0x1a4) 43 if fd < 0 { return 0 - 1 } 44 sys_write(fd, content, og_slen(content)) 45 sys_close(fd) 46 return 0 47} 48 49func og_readall(path: *u8, szout: *i64) -> *u8 { 50 let fd: i64 = sys_openat_rd(path) 51 if fd < 0 { szout[0] = 0 - 1; return 0 as *u8 } 52 let sz: i64 = sys_lseek(fd, 0, 2) 53 sys_lseek(fd, 0, 0) 54 let buf: *u8 = sys_mmap(sz + 64) 55 var got: i64 = 0 56 var n: i64 = 1 57 while n > 0 { n = sys_read(fd, (buf as i64 + got) as *u8, 65536); if n > 0 { got = got + n } } 58 sys_close(fd) 59 szout[0] = got 60 return buf 61} 62 63func og_runv(elf: *u8, args: *i64, outpath: *u8) -> i64 { 64 let pid: i64 = sys_fork() 65 if pid == 0 { 66 if (outpath as i64) != 0 { 67 let ofd: i64 = sys_openat_wr(outpath, 0x1a4) 68 if ofd >= 0 { sys_dup3(ofd, 1, 0); sys_dup3(ofd, 2, 0) } 69 } 70 let argv: *i64 = sys_mmap(128) as *i64 71 argv[0] = elf as i64 72 var i: i64 = 0 73 var go: i64 = 1 74 while go == 1 { if args[i] == 0 { go = 0 } else { argv[i + 1] = args[i]; i = i + 1 } } 75 argv[i + 1] = 0 76 let envp: *i64 = sys_mmap(16) as *i64 77 envp[0] = 0 78 sys_execve(elf, argv, envp) 79 sys_exit(127) 80 } 81 let st: *i64 = sys_mmap(16) as *i64 82 sys_wait4(pid, st, 0) 83 let sig: i64 = st[0] & 0x7f 84 if sig != 0 { return 128 + sig } 85 return (st[0] >> 8) & 0xff 86} 87 88// first index of needle in buf[0,sz), or -1 89func og_idx(buf: *u8, sz: i64, needle: *u8) -> i64 { 90 let n: i64 = og_slen(needle) 91 if n == 0 { return 0 - 1 } 92 var i: i64 = 0 93 while i + n <= sz { 94 var ok: i64 = 1 95 var j: i64 = 0 96 while j < n { if buf[i + j] != needle[j] { ok = 0; j = n } else { j = j + 1 } } 97 if ok == 1 { return i } 98 i = i + 1 99 } 100 return 0 - 1 101} 102 103func og_has(path: *u8, needle: *u8) -> i64 { 104 let szp: *i64 = sys_mmap(16) as *i64 105 let b: *u8 = og_readall(path, szp) 106 if og_idx(b, szp[0], needle) >= 0 { return 1 } 107 return 0 108} 109 110// a appears strictly before b (both present) ? 111func og_before(path: *u8, a: *u8, b: *u8) -> i64 { 112 let szp: *i64 = sys_mmap(16) as *i64 113 let buf: *u8 = og_readall(path, szp) 114 let sz: i64 = szp[0] 115 let ia: i64 = og_idx(buf, sz, a) 116 let ib: i64 = og_idx(buf, sz, b) 117 if ia < 0 { return 0 } 118 if ib < 0 { return 0 } 119 if ia < ib { return 1 } 120 return 0 121} 122 123func og_row(name: *u8, pass: i64) -> i64 { 124 og_p("ROW " as *u8); og_p(name) 125 if pass == 1 { og_p(" PASS\n" as *u8) } else { og_p(" FAIL\n" as *u8) } 126 return pass 127} 128 129func og_args(a1: *u8, a2: *u8, a3: *u8, a4: *u8, a5: *u8) -> *i64 { 130 let a: *i64 = sys_mmap(64) as *i64 131 a[0] = a1 as i64; a[1] = a2 as i64; a[2] = a3 as i64; a[3] = a4 as i64; a[4] = a5 as i64; a[5] = 0 132 return a 133} 134 135func main(argc: i64, argv: *i64) -> i64 { 136 og_p("=== VIZSLA LOG GATE: typed interactions + chronological timeline ===\n" as *u8) 137 var ob: *u8 = "/tmp/nx_vizsla_log.sov.elf" as *u8 138 if argc > 1 { ob = argv[1] as *u8 } 139 let pr: i64 = sys_openat_rd(ob) 140 if pr >= 0 { sys_close(pr) } 141 else { 142 og_p(" instrument missing -> rebuilding via durable runner\n" as *u8) 143 og_runv("_offc/nx_sov_build_run.elf" as *u8, og_args("nx_vizsla_log" as *u8, 0 as *u8, 0 as *u8, 0 as *u8, 0 as *u8), "/tmp/vll_rebuild.out" as *u8) 144 } 145 146 let pfx: *u8 = sys_mmap(128) 147 var po: i64 = 0 148 po = og_cat(pfx, po, "/tmp/vllG" as *u8); po = og_catn(pfx, po, sys_now_us()); po = og_cat(pfx, po, "-" as *u8) 149 pfx[po] = 0 as u8 150 151 og_write("/tmp/vll_log.txt" as *u8, "INT 2026-06-10 mom call talked about her trip to Italy\nINT 2026-05-01 mom meeting lunch downtown\nINT 2026-03-01 mom email sent vacation photos\nINT 2026-06-05 alex coffee discussed the new role\n" as *u8) 152 153 var pass: i64 = 0 154 var r: i64 = 0 155 156 let rc1: i64 = og_runv(ob, og_args("load" as *u8, "/tmp/vll_log.txt" as *u8, pfx, "1101" as *u8, 0 as *u8), "/tmp/vll_l1.txt" as *u8) 157 r = 0 158 if rc1 == 0 { if og_has("/tmp/vll_l1.txt" as *u8, "VIZSLA-LOG-LOAD scanned=4 new=4 dup_infile=0 dup_instore=0 segment=seg-1101" as *u8) == 1 { r = 1 } } 159 pass = pass + og_row("load" as *u8, r) 160 161 let rc2: i64 = og_runv(ob, og_args("load" as *u8, "/tmp/vll_log.txt" as *u8, pfx, "1109" as *u8, 0 as *u8), "/tmp/vll_l2.txt" as *u8) 162 r = 0 163 if rc2 == 0 { if og_has("/tmp/vll_l2.txt" as *u8, "VIZSLA-LOG-LOAD scanned=4 new=0 dup_infile=0 dup_instore=4 segment=none" as *u8) == 1 { r = 1 } } 164 pass = pass + og_row("idempotent-reload" as *u8, r) 165 166 og_runv(ob, og_args("timeline" as *u8, pfx, "mom" as *u8, 0 as *u8, 0 as *u8), "/tmp/vll_tm.txt" as *u8) 167 r = og_before("/tmp/vll_tm.txt" as *u8, "date=2026-06-10" as *u8, "date=2026-03-01" as *u8) 168 pass = pass + og_row("newest-first" as *u8, r) 169 170 r = 0 171 if og_has("/tmp/vll_tm.txt" as *u8, "type=call note=talked about her trip to Italy" as *u8) == 1 { if og_has("/tmp/vll_tm.txt" as *u8, "type=email note=sent vacation photos" as *u8) == 1 { r = 1 } } 172 pass = pass + og_row("typed-interactions" as *u8, r) 173 174 r = og_has("/tmp/vll_tm.txt" as *u8, "type=meeting note=lunch downtown" as *u8) 175 pass = pass + og_row("multiword-note" as *u8, r) 176 177 r = og_has("/tmp/vll_tm.txt" as *u8, "VIZSLA-LOG-TIMELINE contact=mom interactions=3 first=2026-03-01 last=2026-06-10" as *u8) 178 pass = pass + og_row("timeline-verdict" as *u8, r) 179 180 r = 0 181 if og_has("/tmp/vll_tm.txt" as *u8, "discussed the new role" as *u8) == 0 { r = 1 } 182 pass = pass + og_row("contact-isolation" as *u8, r) 183 184 let rc8: i64 = og_runv(ob, og_args("load" as *u8, "/tmp/vll_NOPE.txt" as *u8, "/tmp/vllNx-" as *u8, "1" as *u8, 0 as *u8), "/tmp/vll_8.txt" as *u8) 185 r = 0 186 if rc8 == 1 { r = 1 } 187 pass = pass + og_row("neg-no-file" as *u8, r) 188 189 let permil: i64 = (pass * 1000) / 8 190 let logfd: i64 = sys_openat_append("knowledge/status/vizsla_gate.log" as *u8, 0x1a4) 191 var fdi: i64 = 0 192 while fdi < 2 { 193 var fd: i64 = 1 194 if fdi == 1 { fd = logfd } 195 if fd > 0 { 196 let line: *u8 = sys_mmap(256) 197 var o: i64 = 0 198 o = og_cat(line, o, "VIZSLA-LOG-GATE epoch=" as *u8) 199 o = og_catn(line, o, sys_now_realtime_sec()) 200 o = og_cat(line, o, " rows=8 pass=" as *u8) 201 o = og_catn(line, o, pass) 202 o = og_cat(line, o, " permil=" as *u8) 203 o = og_catn(line, o, permil) 204 if pass == 8 { o = og_cat(line, o, " verdict=GREEN\n" as *u8) } else { o = og_cat(line, o, " verdict=RED\n" as *u8) } 205 sys_write(fd, line, o) 206 } 207 fdi = fdi + 1 208 } 209 if logfd > 0 { sys_close(logfd) } 210 if pass == 8 { return 0 } 211 return 1 212}