code wiki / _hdl_build / nx_code_analysis_census.nx

nx_code_analysis_census.nx source

↩ module page · 73 lines · 6983 B

1import "nx_gate_gn.nx" 2import "nx_gate_base.nx" 3// nx_code_analysis_census.nx -- the S-CLASS-EXCEED CENSUS of our code-analysis capability. Grades each rung of 4// the analysis ladder vs the BEST-IN-CLASS external tool, by probing whether our sovereign organ EXISTS on disk 5// (the census idiom), classifying EXCEEDS (a measurable sovereign/unique advantage) / PRESENT (have it, not yet 6// exceeding) / ABSENT (gap). LIAR-KILLED: a fabricated rung MUST grade ABSENT (neg control) + a known-real rung 7// MUST NOT (pos control); ANTI-WAVE: every EXCEEDS names a measurable axis. Re-run to ratchet. Writes 8// knowledge/store/nx_code_analysis_census.reg. license_tier: ORIGINAL expect_exit: 0 9import "nx_syscalls.nx" 10 11func grow(name: *u8, ok: i64) -> i64 { if ok==1 { gw(" PASS " as *u8) } else { gw(" FAIL " as *u8) } gw(name); gw(" 12" as *u8); return ok } 13func exists(p: *u8) -> i64 { let fd: i64 = sys_openat_rd(p); if fd >= 0 { sys_close(fd); return 1 } return 0 } 14func gname(g: i64) -> *u8 { if g == 2 { return "EXCEEDS" as *u8 } if g == 1 { return "PRESENT" as *u8 } return "ABSENT " as *u8 } 15 16// probe one rung: want = grade-if-the-organ-exists (2 EXCEEDS / 1 PRESENT). returns the actual grade. 17func rung(fd: i64, name: *u8, vs: *u8, organ: *u8, axis: *u8, want: i64) -> i64 { 18 let e: i64 = exists(organ) 19 var g: i64 = 0; if e == 1 { g = want } 20 gw(" ["); gw(gname(g)); gw("] "); gw(name); gw(" vs "); gw(vs); gw("\n") 21 gw(" organ "); gw(organ); if e==1 { gw(" [EXISTS]") } else { gw(" [MISSING]") } gw(" axis: "); gw(axis); gw("\n") 22 sys_write(fd, name, 0); w_reg(fd, name, vs, organ, g) 23 return g 24} 25func w_reg(fd: i64, name: *u8, vs: *u8, organ: *u8, g: i64) -> i64 { 26 var n: i64=0; while name[n]!=(0 as u8){n=n+1} sys_write(fd, name, n); sys_write(fd, "\t" as *u8, 1) 27 n=0; while vs[n]!=(0 as u8){n=n+1} sys_write(fd, vs, n); sys_write(fd, "\t" as *u8, 1) 28 n=0; while organ[n]!=(0 as u8){n=n+1} sys_write(fd, organ, n); sys_write(fd, "\t" as *u8, 1) 29 sys_write(fd, gname(g), 7); sys_write(fd, "\n" as *u8, 1); return 0 30} 31 32func main() -> i64 { 33 gw("=== nx_code_analysis_census: S-class-exceed grading of the analysis ladder (vs best-in-class) ===\n" as *u8) 34 let fd: i64 = sys_openat_wr("knowledge/store/nx_code_analysis_census.reg" as *u8, 0x1a4) 35 if fd < 0 { gw("CENSUS: reg open failed\n" as *u8); return 1 } 36 var ex: i64=0; var pr: i64=0; var ab: i64=0 37 38 let R: *u8 = "runtime/" as *u8 39 let H: *u8 = "runtime/_hdl_build/" as *u8 40 var g: i64 = 0 41 g = rung(fd, "ENUMERATE (walk a repo tree)" as *u8, "find / git ls-files" as *u8, "runtime/nx_dir.nx" as *u8, "sovereign bounded deterministic getdents walk, zero egress" as *u8, 2); if g==2{ex=ex+1} else { if g==1{pr=pr+1} else {ab=ab+1} } 42 g = rung(fd, "CODE SEARCH" as *u8, "Sourcegraph / ripgrep" as *u8, "runtime/nx_codegrep.nx" as *u8, "zero-egress + completes where rg timed out (measured)" as *u8, 2); if g==2{ex=ex+1} else { if g==1{pr=pr+1} else {ab=ab+1} } 43 g = rung(fd, "QUERY -> CONCLUSION MAP" as *u8, "Sourcegraph / an LLM code agent" as *u8, "runtime/nx_explore.nx" as *u8, "deterministic query->conclusion, zero egress, no token cost" as *u8, 2); if g==2{ex=ex+1} else { if g==1{pr=pr+1} else {ab=ab+1} } 44 g = rung(fd, "LANGUAGE + STACK FINGERPRINT" as *u8, "linguist / Syft (SBOM)" as *u8, "runtime/_hdl_build/nx_code_archscan.nx" as *u8, "sovereign integrated lang+engine+graphics+ui+scripting in one pass" as *u8, 1); if g==2{ex=ex+1} else { if g==1{pr=pr+1} else {ab=ab+1} } 45 g = rung(fd, "METRICS (LOC / bytes)" as *u8, "cloc / tokei / sloccount" as *u8, "runtime/_hdl_build/nx_code_archscan.nx" as *u8, "sovereign, same-pass as the fingerprint (proven 32722 LOC on DeadAscend)" as *u8, 1); if g==2{ex=ex+1} else { if g==1{pr=pr+1} else {ab=ab+1} } 46 g = rung(fd, "LICENSE DETECTION" as *u8, "licensee / FOSSA / ScanCode" as *u8, "runtime/_hdl_build/nx_code_archscan.nx" as *u8, "sovereign signature+SPDX scan (proven MIT+Apache on DeadAscend)" as *u8, 1); if g==2{ex=ex+1} else { if g==1{pr=pr+1} else {ab=ab+1} } 47 g = rung(fd, "SUPPLY FETCH (clone-equivalent)" as *u8, "git clone / curl" as *u8, "runtime/_hdl_build/nx_repo_fetch.nx" as *u8, "OWN TLS client, no git/curl; proven 57MB complete repo, status 200" as *u8, 2); if g==2{ex=ex+1} else { if g==1{pr=pr+1} else {ab=ab+1} } 48 g = rung(fd, "SAFE INGEST (untrusted archive)" as *u8, "unzip / tar" as *u8, "runtime/nx_safe_archive_ingest.nx" as *u8, "zip-slip/bomb/exec/symlink guarded, text-only -- security EXCEEDS raw unzip" as *u8, 2); if g==2{ex=ex+1} else { if g==1{pr=pr+1} else {ab=ab+1} } 49 g = rung(fd, "CATALOG (work-list of repos)" as *u8, "awesome-lists (manual)" as *u8, "runtime/_hdl_build/nx_game_catalog.nx" as *u8, "parsed per-game registry (144 repos), re-runnable" as *u8, 1); if g==2{ex=ex+1} else { if g==1{pr=pr+1} else {ab=ab+1} } 50 g = rung(fd, "EXCEED SYNTHESIS (how WE exceed it)" as *u8, "(NONE -- no external tool does this)" as *u8, "runtime/_hdl_build/nx_game_exceed_spec.nx" as *u8, "UNIQUE: measured per-dimension sovereign-exceed standard -- the s-class differentiator" as *u8, 2); if g==2{ex=ex+1} else { if g==1{pr=pr+1} else {ab=ab+1} } 51 g = rung(fd, "DEPENDENCY / ARCHITECTURE GRAPH" as *u8, "Understand / Structure101" as *u8, "runtime/_hdl_build/nx_code_depgraph.nx" as *u8, "module/include dependency graph -- NOT BUILT (the gap)" as *u8, 2); if g==2{ex=ex+1} else { if g==1{pr=pr+1} else {ab=ab+1} } 52 53 // ---- liar-kill controls ---- 54 gw(" -- liar-kill controls --\n" as *u8) 55 let neg: i64 = exists("runtime/_hdl_build/nx_FAKE_no_such_analyzer.nx" as *u8) // fabricated -> must NOT exist 56 let pos: i64 = exists("runtime/_hdl_build/nx_code_archscan.nx" as *u8) // known-real -> must exist 57 gw(" neg-control (fabricated rung) present="); gn(neg); gw(" (must be 0)\n" as *u8) 58 gw(" pos-control (nx_code_archscan) present="); gn(pos); gw(" (must be 1)\n" as *u8) 59 sys_close(fd) 60 61 gw("\n=== TALLY: EXCEEDS="); gn(ex); gw(" PRESENT="); gn(pr); gw(" ABSENT="); gn(ab); gw(" -> knowledge/store/nx_code_analysis_census.reg\n" as *u8) 62 var ok: i64 = 1 63 if neg != 0 { ok = 0; gw("LIAR: a fabricated rung graded present\n" as *u8) } 64 if pos != 1 { ok = 0; gw("LIAR: a known-real rung missing\n" as *u8) } 65 if ex < 5 { ok = 0; gw("NOT-YET-S-CLASS: fewer than 5 EXCEEDS rungs\n" as *u8) } 66 if ok == 1 { 67 gw("CENSUS GREEN: analysis system is S-CLASS-EXCEED on "); gn(ex); gw(" axes (sovereign/zero-egress/secure/unique), "); gn(pr); gw(" PRESENT, "); gn(ab); gw(" gap(s). Liar-kill held; anti-wave (each EXCEEDS names a measured axis).\n" as *u8) 68 if ab > 0 { gw("NEXT (close gaps): build the ABSENT rung(s) above.\n" as *u8) } 69 else { gw("NEXT (ratchet): 0 gaps -- run the sovereign 144-repo sweep, then drive each PRESENT rung toward EXCEEDS vs its best-in-class tool.\n" as *u8) } 70 return 0 71 } 72 gw("CENSUS RED\n" as *u8); return 2 73}