code wiki / _hdl_build / nx_meta_consumers.nx

nx_meta_consumers.nx source

↩ module page · 146 lines · 7499 B

1// nx_meta_consumers.nx -- X-CAP-006 (META-consumers-uniform). The four downstream apps -- 2// companion(elder-ai) / apparel-store / writer-ingest / media-mining -- consume a captured-being 3// record THROUGH THE SAME meta-layer shape: each receives the same wire bytes, parses via the 4// SHARED ms_parse, and reads via the SHARED ms_get (nx_meta_schema, X-CAP-001). No per-consumer 5// parser, no parallel substrate -- the modality-agnostic record is the ONE interface (rule 15 DRY). 6// "Uniform shape" PROVEN: the four consumers' CORE identity views (modality|cid|consent|license) 7// are byte-identical; each still PROJECTS its own modality attr through the same accessor. A rogue 8// reader using a DIFFERENT field shape DIVERGES (negative control = the test discriminates), and the 9// consent hard line (X-CAP-005, anti-deepfake) is enforced UNIFORMLY at every consumer. Built 10// sovereignly (nx_cc->nxasm_x86, no gcc). license_tier: ORIGINAL 11import "nx_syscalls.nx" 12import "nx_meta_schema.nx" 13const K_MAGIC_16384: i64 = 16384 14 15func mc_puts(s: *u8) -> i64 { var n: i64 = 0; while s[n] != (0 as u8) { n = n + 1 } sys_write(1, s, n); return 0 } 16func mc_putn(v: i64) -> i64 { let bb: *u8 = sys_mmap(28); var m: i64=v; if m<0 {m=0-m}; let t: *u8 = sys_mmap(28); var k: i64=0; if m==0 {t[0]=48;k=1}; while m>0 {t[k]=48+(m%10); 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 } 17 18// CORE identity view = the shared shape every consumer must agree on, built via the SHARED ms_get. 19func mc_core_view(keys: *i64, vals: *i64, n: i64, out: *u8) -> i64 { 20 var o: i64 = 0 21 o = ms_app(out, o, (ms_get(keys, vals, n, "modality" as *u8)) as *u8) 22 out[o] = 124 as u8; o = o + 1 23 o = ms_app(out, o, (ms_get(keys, vals, n, "cid" as *u8)) as *u8) 24 out[o] = 124 as u8; o = o + 1 25 o = ms_app(out, o, (ms_get(keys, vals, n, "consent" as *u8)) as *u8) 26 out[o] = 124 as u8; o = o + 1 27 o = ms_app(out, o, (ms_get(keys, vals, n, "license" as *u8)) as *u8) 28 out[o] = 0 as u8 29 return o 30} 31 32// NON-uniform reader: same fields, DIFFERENT shape (cid before modality) -> view must DIVERGE. 33func mc_rogue_view(keys: *i64, vals: *i64, n: i64, out: *u8) -> i64 { 34 var o: i64 = 0 35 o = ms_app(out, o, (ms_get(keys, vals, n, "cid" as *u8)) as *u8) 36 out[o] = 124 as u8; o = o + 1 37 o = ms_app(out, o, (ms_get(keys, vals, n, "modality" as *u8)) as *u8) 38 out[o] = 124 as u8; o = o + 1 39 o = ms_app(out, o, (ms_get(keys, vals, n, "consent" as *u8)) as *u8) 40 out[o] = 124 as u8; o = o + 1 41 o = ms_app(out, o, (ms_get(keys, vals, n, "license" as *u8)) as *u8) 42 out[o] = 0 as u8 43 return o 44} 45 46// A consumer: take the raw wire, make its OWN copy, parse via SHARED ms_parse, read core via SHARED 47// mc_core_view, and project ONE modality attr via SHARED ms_get. Returns the attr value ptr (0=absent). 48func consumer_read(wire: *u8, wlen: i64, attrkey: *u8, coreout: *u8) -> i64 { 49 let buf: *u8 = sys_mmap(K_MAGIC_16384) 50 var i: i64 = 0 51 while i < wlen { buf[i] = wire[i]; i = i + 1 } 52 let k: *i64 = sys_mmap(8 * 64) as *i64 53 let v: *i64 = sys_mmap(8 * 64) as *i64 54 let n: i64 = ms_parse(buf, wlen, k, v) 55 mc_core_view(k, v, n, coreout) 56 return ms_get(k, v, n, attrkey) 57} 58 59// A consumer's consent decision over its own parse of the wire (the hard line, applied per consumer). 60func consumer_valid(wire: *u8, wlen: i64) -> i64 { 61 let buf: *u8 = sys_mmap(K_MAGIC_16384) 62 var i: i64 = 0 63 while i < wlen { buf[i] = wire[i]; i = i + 1 } 64 let k: *i64 = sys_mmap(8 * 64) as *i64 65 let v: *i64 = sys_mmap(8 * 64) as *i64 66 let n: i64 = ms_parse(buf, wlen, k, v) 67 return ms_valid(k, v, n) 68} 69 70func main() -> i64 { 71 let keys: *i64 = sys_mmap(8 * 64) as *i64 72 let vals: *i64 = sys_mmap(8 * 64) as *i64 73 74 // captured-BEING record (X-CAP-001 BEING profile) -- the shared meta-layer datum 75 ms_set(keys, vals, 0, "modality" as *u8, "being" as *u8) 76 ms_set(keys, vals, 1, "cid" as *u8, "being-elara-001" as *u8) 77 ms_set(keys, vals, 2, "origin" as *u8, "ai-1p" as *u8) 78 ms_set(keys, vals, 3, "gen_modality" as *u8, "t2being" as *u8) 79 ms_set(keys, vals, 4, "source_model" as *u8, "sov-mpl-v1" as *u8) 80 ms_set(keys, vals, 5, "consent" as *u8, "fictional" as *u8) 81 ms_set(keys, vals, 6, "license" as *u8, "internal" as *u8) 82 ms_set(keys, vals, 7, "attr.outfit" as *u8, "red-dress" as *u8) 83 ms_set(keys, vals, 8, "attr.gait" as *u8, "graceful" as *u8) 84 ms_set(keys, vals, 9, "attr.voice" as *u8, "alto" as *u8) 85 86 let wire: *u8 = sys_mmap(K_MAGIC_16384) 87 let wlen: i64 = ms_emit(keys, vals, 10, wire) 88 89 // FOUR consumers each read the SAME wire through the SAME shape; each projects its own attr. 90 let c_comp: *u8 = sys_mmap(256) 91 let c_aprl: *u8 = sys_mmap(256) 92 let c_wrtr: *u8 = sys_mmap(256) 93 let c_mine: *u8 = sys_mmap(256) 94 let p_comp: i64 = consumer_read(wire, wlen, "attr.voice" as *u8, c_comp) 95 let p_aprl: i64 = consumer_read(wire, wlen, "attr.outfit" as *u8, c_aprl) 96 let p_wrtr: i64 = consumer_read(wire, wlen, "attr.gait" as *u8, c_wrtr) 97 let p_mine: i64 = consumer_read(wire, wlen, "origin" as *u8, c_mine) 98 99 // UNIFORM SHAPE: all four core identity views byte-identical (same accessor over same data). 100 var uniform_core: i64 = 1 101 if ms_streq(c_comp, c_aprl) != 1 { uniform_core = 0 } 102 if ms_streq(c_comp, c_wrtr) != 1 { uniform_core = 0 } 103 if ms_streq(c_comp, c_mine) != 1 { uniform_core = 0 } 104 105 // PROJECTION: each consumer's modality field is really present (not an ignored read). 106 var proj_ok: i64 = 0 107 if p_comp != 0 { proj_ok = proj_ok + 1 } 108 if p_aprl != 0 { proj_ok = proj_ok + 1 } 109 if p_wrtr != 0 { proj_ok = proj_ok + 1 } 110 if p_mine != 0 { proj_ok = proj_ok + 1 } 111 112 // NEGATIVE CONTROL: a non-uniform rogue reader DIVERGES -> uniformity check is discriminating. 113 let buf_r: *u8 = sys_mmap(K_MAGIC_16384) 114 var ri: i64 = 0 115 while ri < wlen { buf_r[ri] = wire[ri]; ri = ri + 1 } 116 let kr: *i64 = sys_mmap(8 * 64) as *i64 117 let vr: *i64 = sys_mmap(8 * 64) as *i64 118 let nr: i64 = ms_parse(buf_r, wlen, kr, vr) 119 let c_rogue: *u8 = sys_mmap(256) 120 mc_rogue_view(kr, vr, nr, c_rogue) 121 let discriminates: i64 = 1 - ms_streq(c_comp, c_rogue) 122 123 // CONSENT HARD LINE enforced UNIFORMLY: good record accepted by all 4, consent=NONE refused by all 4. 124 let sum_good: i64 = consumer_valid(wire, wlen) + consumer_valid(wire, wlen) + consumer_valid(wire, wlen) + consumer_valid(wire, wlen) 125 ms_set(keys, vals, 5, "consent" as *u8, "NONE" as *u8) 126 let wire_n: *u8 = sys_mmap(K_MAGIC_16384) 127 let wlen_n: i64 = ms_emit(keys, vals, 10, wire_n) 128 let sum_none: i64 = consumer_valid(wire_n, wlen_n) + consumer_valid(wire_n, wlen_n) + consumer_valid(wire_n, wlen_n) + consumer_valid(wire_n, wlen_n) 129 var consent_uniform: i64 = 0 130 if sum_good == 4 { if sum_none == 0 { consent_uniform = 1 } } 131 132 mc_puts("METACONSUMERS uniform_core=" as *u8); mc_putn(uniform_core) 133 mc_puts(" projections=" as *u8); mc_putn(proj_ok) 134 mc_puts(" discriminates=" as *u8); mc_putn(discriminates) 135 mc_puts(" consent_uniform=" as *u8); mc_putn(consent_uniform) 136 mc_puts(" core=" as *u8); mc_puts(c_comp) 137 138 var ok: i64 = 1 139 if uniform_core != 1 { ok = 0 } 140 if proj_ok != 4 { ok = 0 } 141 if discriminates != 1 { ok = 0 } 142 if consent_uniform != 1 { ok = 0 } 143 if ok == 1 { mc_puts(" verdict=GREEN\n" as *u8); return 0 } 144 mc_puts(" verdict=RED\n" as *u8) 145 return 1 146}