code wiki / (root) / nx_catalog_call_gate_20260909.nx

nx_catalog_call_gate_20260909.nx source

↩ module page · 30 lines · 2185 B

1// nx_catalog_call_gate_20260909.nx -- Verifies CATALOG-CALL fixtures and checks live journal entries for specific completion statuses. 2import "nx_catalog_lib.nx" 3func ccg_print(s: *u8) -> i64 { return sys_write(1, s, cl_slen(s)) } 4func main(argc: i64, argv: *i64) -> i64 { 5 var failures: i64 = 0 6 let f0: *u8 = "1789000000\tmcp\tnx_comparestale\tcall\tok\ttools/call lane=sync exit=0\n" 7 if cl_actlog_completed(f0, cl_slen(f0), "nx_comparestale") != 1 { failures = failures + 1 } 8 let f1: *u8 = "1789000000\tmcp\tnx_comparestale_extra\tcall\tok\tnote\n" 9 if cl_actlog_completed(f1, cl_slen(f1), "nx_comparestale") != 0 { failures = failures + 1 } 10 let f2: *u8 = "1789000000\tmcp\tnx_fs\tcall\tok\tnx_comparestale\n" 11 if cl_actlog_completed(f2, cl_slen(f2), "nx_comparestale") != 0 { failures = failures + 1 } 12 let f3: *u8 = "1789000000\tmcp\tnx_comparestale\tcall\tstarted\tnote\n" 13 if cl_actlog_completed(f3, cl_slen(f3), "nx_comparestale") != 0 { failures = failures + 1 } 14 let f4: *u8 = "1789000000\tmcp\tnx_comparestale\tcall\tharness-fail\tnote\n" 15 if cl_actlog_completed(f4, cl_slen(f4), "nx_comparestale") != 0 { failures = failures + 1 } 16 let f5: *u8 = "1789000000\tmcp\tnx_comparestale\tcall\tok\tnote" 17 if cl_actlog_completed(f5, cl_slen(f5), "nx_comparestale") != 0 { failures = failures + 1 } 18 let f6: *u8 = "bad\tmcp\tnx_comparestale\tcall\tok\tnote\n" 19 if cl_actlog_completed(f6, cl_slen(f6), "nx_comparestale") != 0 { failures = failures + 1 } 20 let f7: *u8 = "1789000000\tmanual\tnx_comparestale\tcall\tok\tnote\n" 21 if cl_actlog_completed(f7, cl_slen(f7), "nx_comparestale") != 0 { failures = failures + 1 } 22 if failures != 0 { ccg_print("CATALOG-CALL fixtures=FAIL\n"); return 1 } 23 ccg_print("CATALOG-CALL fixtures=8/8\n") 24 let lp: *i64 = sys_mmap(8) as *i64 25 let journal: *u8 = cl_slurp_tail("knowledge/status/actlog.jrnl", lp) 26 if (journal as i64) == 0 { ccg_print("LIVE-JOURNAL unreadable\n"); return 2 } 27 if cl_actlog_completed(journal, lp[0], "nx_fs") == 1 { ccg_print("LIVE-JOURNAL nx_fs exact_completed=1\n"); return 0 } 28 ccg_print("LIVE-JOURNAL nx_fs exact_completed=0\n") 29 return 2 30}