nx_vizsla_realm.nx source

1// nx_vizsla_realm.nx -- NISHI VIZSLA: three INTEGRATED relationship managers with SEPARATE FOCUSES. Operator 2// 2026-06-23: "an option to add to our personal / professional / business relationship manager like a prm crm 3// and crm for business all integrated but with seperate focuses." One person, one engine, three focused books: 4// personal (PRM) -- family / close / friend ; staying-in-touch, birthdays, thank-yous 5// professional (RM) -- mentor / colleague / network / recruiter ; keep-warm, the career channel 6// business (CRM) -- lead / prospect / customer / partner ; tighter follow-up (soon_days 7) 7// A realm maps to the tenant-id "<person>_<realm>" (underscore is a valid tid char) so it REUSES the proven, 8// fully-isolated tenant engine (nx_vizsla_tenant) -- integration via the shared <person> prefix, separation via 9// the per-realm book + per-realm TIER focus. Sovereign: composes _offc/nx_vizsla_tenant.elf, re-implements 10// nothing. The tiers are DATA written at provision (refine = edit, law 11). license_tier: ORIGINAL 11import "nx_syscalls.nx" 12const K_MAGIC_1024: i64 = 1024 13 14func vz_slen(s: *u8) -> i64 { var n: i64 = 0; while s[n] != (0 as u8) { n = n + 1 } return n } 15func vz_p(s: *u8) -> i64 { sys_write(1, s, vz_slen(s)); return 0 } 16 17func vz_eq(a: *u8, b: *u8) -> i64 { 18 var i: i64 = 0 19 var go: i64 = 1 20 while go == 1 { if a[i] != b[i] { return 0 } if a[i] == (0 as u8) { return 1 } i = i + 1 } 21 return 0 22} 23 24func vz_cat(dst: *u8, off: i64, s: *u8) -> i64 { 25 var i: i64 = 0 26 while s[i] != (0 as u8) { dst[off + i] = s[i]; i = i + 1 } 27 return off + i 28} 29 30func vz_exists(path: *u8) -> i64 { let fd: i64 = sys_openat_rd(path); if fd < 0 { return 0 } sys_close(fd); return 1 } 31 32func vz_writefile(path: *u8, content: *u8) -> i64 { 33 let fd: i64 = sys_openat_wr(path, 0x1a4) 34 if fd < 0 { return 0 - 1 } 35 sys_write(fd, content, vz_slen(content)) 36 sys_close(fd) 37 return 0 38} 39 40// the realm's CONF + TIER block (its focus), or 0 if not a known realm 41func vz_tiers(realm: *u8) -> *u8 { 42 if vz_eq(realm, "personal" as *u8) == 1 { return "CONF soon_days 14\nTIER family 7\nTIER close 21\nTIER friend 90\n" as *u8 } 43 if vz_eq(realm, "professional" as *u8) == 1 { return "CONF soon_days 14\nTIER mentor 30\nTIER colleague 45\nTIER network 120\nTIER recruiter 30\n" as *u8 } 44 if vz_eq(realm, "business" as *u8) == 1 { return "CONF soon_days 7\nTIER lead 7\nTIER prospect 21\nTIER customer 30\nTIER partner 60\n" as *u8 } 45 return 0 as *u8 46} 47 48// effective tenant-id = "<person>_<realm>" 49func vz_tid(person: *u8, realm: *u8, out: *u8) -> i64 { 50 var o: i64 = 0 51 o = vz_cat(out, o, person); out[o] = 95 as u8; o = o + 1; o = vz_cat(out, o, realm) 52 out[o] = 0 as u8 53 return o 54} 55 56// fork the blessed tenant engine: <cmd> <base> <tid> [a1..a4] (0-terminated early) 57func vz_run_tenant(cmd: *u8, base: *u8, tid: *u8, a1: *u8, a2: *u8, a3: *u8, a4: *u8) -> i64 { 58 let pid: i64 = sys_fork() 59 if pid == 0 { 60 let argv: *i64 = sys_mmap(80) as *i64 61 argv[0] = "_offc/nx_vizsla_tenant.elf" as *u8 as i64 62 argv[1] = cmd as i64 63 argv[2] = base as i64 64 argv[3] = tid as i64 65 var k: i64 = 4 66 if (a1 as i64) != 0 { argv[k] = a1 as i64; k = k + 1 } 67 if (a2 as i64) != 0 { argv[k] = a2 as i64; k = k + 1 } 68 if (a3 as i64) != 0 { argv[k] = a3 as i64; k = k + 1 } 69 if (a4 as i64) != 0 { argv[k] = a4 as i64; k = k + 1 } 70 argv[k] = 0 71 let envp: *i64 = sys_mmap(16) as *i64 72 envp[0] = 0 73 sys_execve("_offc/nx_vizsla_tenant.elf" as *u8, argv, envp) 74 sys_exit(127) 75 } 76 let st: *i64 = sys_mmap(16) as *i64 77 sys_wait4(pid, st, 0) 78 return (st[0] >> 8) & 0xff 79} 80 81func vz_cmd_provision(base: *u8, person: *u8, realm: *u8) -> i64 { 82 let tiers: *u8 = vz_tiers(realm) 83 if (tiers as i64) == 0 { vz_p("VIZSLA-REALM unknown realm (personal|professional|business) -- fail loud\n" as *u8); return 1 } 84 let tid: *u8 = sys_mmap(256); vz_tid(person, realm, tid) 85 let cpath: *u8 = sys_mmap(K_MAGIC_1024) 86 var co: i64 = 0; co = vz_cat(cpath, co, base); co = vz_cat(cpath, co, tid); co = vz_cat(cpath, co, ".contacts.txt" as *u8); cpath[co] = 0 as u8 87 let lpath: *u8 = sys_mmap(K_MAGIC_1024) 88 var lo: i64 = 0; lo = vz_cat(lpath, lo, base); lo = vz_cat(lpath, lo, tid); lo = vz_cat(lpath, lo, ".relate_log.txt" as *u8); lpath[lo] = 0 as u8 89 if vz_exists(cpath) == 0 { vz_writefile(cpath, tiers) } 90 if vz_exists(lpath) == 0 { vz_writefile(lpath, "# realm interaction journal\n" as *u8) } 91 vz_p("VIZSLA-REALM provisioned person=" as *u8); vz_p(person); vz_p(" realm=" as *u8); vz_p(realm); vz_p(" tid=" as *u8); vz_p(tid); vz_p("\n" as *u8) 92 return 0 93} 94 95func main(argc: i64, argv: *i64) -> i64 { 96 if argc < 5 { vz_p("VIZSLA-REALM usage: <provision|add-contact|touch|brief|ledger|cadence|thanks> <base> <person> <realm> [args] -- fail loud\n" as *u8); return 1 } 97 let cmd: *u8 = argv[1] as *u8 98 let base: *u8 = argv[2] as *u8 99 let person: *u8 = argv[3] as *u8 100 let realm: *u8 = argv[4] as *u8 101 if (vz_tiers(realm) as i64) == 0 { vz_p("VIZSLA-REALM unknown realm (personal|professional|business) -- fail loud\n" as *u8); return 1 } 102 103 if vz_eq(cmd, "provision" as *u8) == 1 { return vz_cmd_provision(base, person, realm) } 104 105 let tid: *u8 = sys_mmap(256); vz_tid(person, realm, tid) 106 107 if vz_eq(cmd, "brief" as *u8) == 1 { 108 if argc < 6 { vz_p("VIZSLA-REALM brief needs <today> -- fail loud\n" as *u8); return 1 } 109 return vz_run_tenant("brief" as *u8, base, tid, argv[5] as *u8, 0 as *u8, 0 as *u8, 0 as *u8) 110 } 111 if vz_eq(cmd, "cadence" as *u8) == 1 { 112 if argc < 6 { vz_p("VIZSLA-REALM cadence needs <today> -- fail loud\n" as *u8); return 1 } 113 return vz_run_tenant("cadence" as *u8, base, tid, argv[5] as *u8, 0 as *u8, 0 as *u8, 0 as *u8) 114 } 115 if vz_eq(cmd, "thanks" as *u8) == 1 { 116 if argc < 6 { vz_p("VIZSLA-REALM thanks needs <today> -- fail loud\n" as *u8); return 1 } 117 return vz_run_tenant("thanks" as *u8, base, tid, argv[5] as *u8, 0 as *u8, 0 as *u8, 0 as *u8) 118 } 119 if vz_eq(cmd, "ledger" as *u8) == 1 { 120 return vz_run_tenant("ledger" as *u8, base, tid, 0 as *u8, 0 as *u8, 0 as *u8, 0 as *u8) 121 } 122 if vz_eq(cmd, "add-contact" as *u8) == 1 { 123 if argc < 9 { vz_p("VIZSLA-REALM add-contact needs <id> <display> <tier> <bday MM-DD|-> -- fail loud\n" as *u8); return 1 } 124 return vz_run_tenant("add-contact" as *u8, base, tid, argv[5] as *u8, argv[6] as *u8, argv[7] as *u8, argv[8] as *u8) 125 } 126 if vz_eq(cmd, "touch" as *u8) == 1 { 127 if argc < 8 { vz_p("VIZSLA-REALM touch needs <date> <contact-id> <note> -- fail loud\n" as *u8); return 1 } 128 return vz_run_tenant("touch" as *u8, base, tid, argv[5] as *u8, argv[6] as *u8, argv[7] as *u8, 0 as *u8) 129 } 130 vz_p("VIZSLA-REALM unknown command -- fail loud\n" as *u8) 131 return 1 132}