code wiki / _hdl_build / nx_ciq_field_omniforge.nx
nx_ciq_field_omniforge.nx source
↩ module page · 95 lines · 6150 B
1// nx_ciq_field_omniforge.nx -- CIQ field INGEST for the FABRICATION-BOOTSTRAP market (4th market). Sovereign
2// seg_store, namespace "omniforge", markets read-append. HONEST: Nishi's OmniForge is a hardware-up sovereign
3// fabrication chain (CAD/3D-print/PCB-CAM real but early, silicon ~M2 absent, robotics motion proven) -- early
4// EXECUTION but a RADICAL vision (sovereign no-float + never-brick-by-construction + doomsday bootstrap). vs
5// kicad (open EDA), fusion360 (commercial CAD/CAM), reprap (self-replicating printer), ose (Global Village
6// Construction Set = the civilization-bootstrap comparator). Incumbents=public facts; Nishi level-2 cite real
7// organs (nx_pcb_gerber, nx_omniforge_census). Expect Nishi=VISIONARY. license_tier: ORIGINAL expect_exit: 0
8import "nx_syscalls.nx"
9import "nx_canon_cid.nx"
10import "nx_seg_store.nx"
11import "nx_uxf_decode.nx"
12const FO_MAGIC_2048: i64 = 2048
13const FO_MAGIC_1024: i64 = 1024
14const FO_MAGIC_8192: i64 = 8192
15
16const FO_STORE: *u8 = "knowledge/store/ciq-"
17
18func ofw(fd: i64, s: *u8) -> i64 { var n: i64=0; while s[n]!=(0 as u8){n=n+1} sys_write(fd,s,n); return 0 }
19func fo_streq(a: *u8, b: *u8) -> i64 { var i: i64=0; while a[i]!=(0 as u8){ if a[i]!=b[i]{return 0} i=i+1 } if b[i]!=(0 as u8){return 0} return 1 }
20func fo_copy(src: *u8, dst: *u8) -> i64 { var i: i64=0; while src[i]!=(0 as u8){ dst[i]=src[i]; i=i+1 } dst[i]=0 as u8; return i }
21func fo_contains(hay: *u8, needle: *u8) -> i64 { var i: i64=0; while hay[i]!=(0 as u8){ var j: i64=0; var ok: i64=1; while needle[j]!=(0 as u8){ if hay[i+j]!=needle[j]{ ok=0; j=0; while needle[j]!=(0 as u8){j=j+1} } else { j=j+1 } } if ok==1 { return 1 } i=i+1 } return 0 }
22
23func fo_row(w: *i64, caps: *u8, coff: *i64, nm: *u8, axs: *u8, wts: *u8, cells: *u8) -> i64 {
24 let rk: *i64 = sys_mmap(8 * 8) as *i64
25 let rv: *i64 = sys_mmap(8 * 8) as *i64
26 rk[0] = "ax" as *u8 as i64; rv[0] = axs as i64
27 rk[1] = "wt" as *u8 as i64; rv[1] = wts as i64
28 rk[2] = "cells" as *u8 as i64; rv[2] = cells as i64
29 let recb: *u8 = sys_mmap(FO_MAGIC_2048)
30 let recl: i64 = canon_encode(rk, rv, 3, recb)
31 let kb: *u8 = sys_mmap(128); var ko: i64 = 0
32 ko = ss_cat(kb, ko, "ciq:omniforge:cap:" as *u8); ko = ss_cat(kb, ko, nm); kb[ko] = 0 as u8
33 ss_add(w, 1, kb, recb, recl)
34 var o: i64 = coff[0]; o = ss_cat(caps, o, nm); caps[o] = 44 as u8; coff[0] = o + 1
35 return 0
36}
37
38func fo_register(w: *i64, mkt: *u8) -> i64 {
39 let gp: *i64 = sys_mmap(8) as *i64; let gl: *i64 = sys_mmap(8) as *i64
40 let dk: *i64 = sys_mmap(8 * 16) as *i64; let dv: *i64 = sys_mmap(8 * 16) as *i64
41 let cur: *u8 = sys_mmap(FO_MAGIC_1024); cur[0] = 0 as u8
42 if ss_get(FO_STORE, "ciq:markets" as *u8, gp, gl) == 1 {
43 let mnf: i64 = canon_decode(gp[0] as *u8, gl[0], dk, dv, 16)
44 var f: i64 = 0; while f < mnf { if fo_streq(dk[f] as *u8, "list" as *u8) == 1 { fo_copy(dv[f] as *u8, cur) } f = f + 1 }
45 }
46 if fo_contains(cur, mkt) == 0 {
47 var ce: i64 = 0; while cur[ce] != (0 as u8) { ce = ce + 1 }
48 if ce > 0 { cur[ce] = 44 as u8; ce = ce + 1 }
49 var k: i64 = 0; while mkt[k] != (0 as u8) { cur[ce] = mkt[k]; ce = ce + 1; k = k + 1 }
50 cur[ce] = 0 as u8
51 }
52 let gk: *i64 = sys_mmap(8 * 2) as *i64; let gv: *i64 = sys_mmap(8 * 2) as *i64
53 gk[0] = "list" as *u8 as i64; gv[0] = cur as i64
54 let gb: *u8 = sys_mmap(FO_MAGIC_1024); let gl2: i64 = canon_encode(gk, gv, 1, gb)
55 ss_add(w, 1, "ciq:markets" as *u8, gb, gl2)
56 return 0
57}
58
59func main() -> i64 {
60 let w: *i64 = ss_begin()
61 let caps: *u8 = sys_mmap(FO_MAGIC_8192)
62 let coff: *i64 = sys_mmap(8) as *i64; coff[0] = 0
63
64 // name ax wt nishi;kicad;fusion360;reprap;ose
65 fo_row(w, caps, coff, "cad-geometry-modeling" as *u8, "E" as *u8, "3" as *u8, "1;0;2!public;0;1" as *u8)
66 fo_row(w, caps, coff, "pcb-eda-gerber" as *u8, "E" as *u8, "3" as *u8, "1;2!public;1;0;0" as *u8)
67 fo_row(w, caps, coff, "3d-print-toolpath" as *u8, "E" as *u8, "2" as *u8, "1;0;1;2!public;1" as *u8)
68 fo_row(w, caps, coff, "cam-machining-gcode" as *u8, "E" as *u8, "2" as *u8, "1;0;2!public;1;1" as *u8)
69 fo_row(w, caps, coff, "robotics-motion-control" as *u8, "E" as *u8, "2" as *u8, "1;0;0;1;1" as *u8)
70 fo_row(w, caps, coff, "manufacturing-maturity" as *u8, "E" as *u8, "3" as *u8, "0;2!public;2!public;1;1" as *u8)
71
72 fo_row(w, caps, coff, "sovereign-no-float-deterministic" as *u8, "V" as *u8, "3" as *u8, "2!nx_pcb_gerber;0;0;0;0" as *u8)
73 fo_row(w, caps, coff, "doomsday-bootstrap-from-nothing" as *u8, "V" as *u8, "3" as *u8, "1!nx_omniforge_census;0;0;1;2!public" as *u8)
74 fo_row(w, caps, coff, "self-replication-capability" as *u8, "V" as *u8, "2" as *u8, "1;0;0;2!public;1" as *u8)
75 fo_row(w, caps, coff, "open-source-hardware" as *u8, "V" as *u8, "2" as *u8, "2!sovereign;2!public;0;2!public;2!public" as *u8)
76 fo_row(w, caps, coff, "never-brick-by-construction" as *u8, "V" as *u8, "3" as *u8, "2!nx_omniforge_census;0;0;0;0" as *u8)
77 fo_row(w, caps, coff, "in-house-no-external-fab" as *u8, "V" as *u8, "2" as *u8, "1;0;0;1;1" as *u8)
78
79 caps[coff[0]] = 0 as u8
80
81 let mk: *i64 = sys_mmap(8 * 4) as *i64; let mv: *i64 = sys_mmap(8 * 4) as *i64
82 mk[0] = "entities" as *u8 as i64; mv[0] = "nishi,kicad,fusion360,reprap,ose" as *u8 as i64
83 mk[1] = "caps" as *u8 as i64; mv[1] = caps as i64
84 let mb: *u8 = sys_mmap(FO_MAGIC_8192); let ml: i64 = canon_encode(mk, mv, 2, mb)
85 ss_add(w, 1, "ciq:omniforge:meta" as *u8, mb, ml)
86 fo_register(w, "omniforge" as *u8)
87 ss_commit(FO_STORE, w, sys_now_ms())
88
89 let gp: *i64 = sys_mmap(8) as *i64; let gl: *i64 = sys_mmap(8) as *i64
90 var st: i64 = 1
91 if ss_get(FO_STORE, "ciq:omniforge:cap:never-brick-by-construction" as *u8, gp, gl) != 1 { st = 0 }
92 ofw(1, "CIQ-FIELD-OMNIFORGE stored=12 caps (sovereign seg_store) + markets read-append " as *u8)
93 if st == 1 { ofw(1, "selftest=OK verdict=GREEN\n" as *u8); sys_exit(0); return 0 }
94 ofw(1, "selftest=FAIL verdict=RED\n" as *u8); sys_exit(1); return 1
95}