nx_mhtarget.nx source
↩ module page · 86 lines · 3863 B
1// nx_mhtarget.nx -- CLI: MakeHuman morph-target structural facts. nx_mhtarget probe|decode <f.target>
2// The CC0 licence-clean dialect beside nx_kkfacts and nx_bspfacts (/compare/koikatsu card-class
3// lane). Facts + the first rows' vertex offsets in MICRO units; whole-file decode totals printed,
4// rows shown capped so a 1675-row corpus is a summary, not a dump.
5// license_tier: ORIGINAL No hw writes (Rule 26). expect_exit: 0
6import "nx_syscalls.nx"
7import "nx_mhtarget_lib.nx"
8
9const MHC_CAP: i64 = 33554432 // targets measure KBs; 32MB refuse-beyond bound -- census abstains, never truncates silently
10const MHC_MAX_ROWS: i64 = 65536 // the base mesh has ~19k vertices; 64k is the refuse-beyond bound
11const MHC_SHOW: i64 = 6 // rows printed by decode; the totals carry the population
12
13func mc_slen(s: *u8) -> i64 { var n: i64 = 0; while s[n] != (0 as u8) { n = n + 1 } return n }
14func mc_w(s: *u8) -> i64 { sys_write(1, s, mc_slen(s)); return 0 }
15func mc_e(s: *u8) -> i64 { sys_write(2, s, mc_slen(s)); return 0 }
16func mc_num(v: i64) -> i64 {
17 if v == 0 { sys_write(1, "0" as *u8, 1); return 0 }
18 var m: i64 = v
19 if m < 0 { sys_write(1, "-" as *u8, 1); m = 0 - m }
20 let t: *u8 = sys_mmap(32)
21 var k: i64 = 0
22 while m > 0 { t[k] = (48 + (m % 10)) as u8; m = m / 10; k = k + 1 }
23 let o: *u8 = sys_mmap(32)
24 var i: i64 = 0
25 while i < k { o[i] = t[k - 1 - i]; i = i + 1 }
26 sys_write(1, o, k)
27 return 0
28}
29func mc_eq(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 }
30
31func main(argc: i64, argv: *i64) -> i64 {
32 if argc < 3 { mc_e("usage: nx_mhtarget probe|decode <f.target>\n" as *u8); sys_exit(2); return 2 }
33 let buf: *u8 = sys_mmap(MHC_CAP)
34 let fd: i64 = sys_openat_rd(argv[2] as *u8)
35 if fd < 0 { mc_e("ERROR: cannot open file\n" as *u8); sys_exit(1); return 1 }
36 let size: i64 = sys_lseek(fd, 0, 2)
37 sys_lseek(fd, 0, 0)
38 var want: i64 = size
39 if want > MHC_CAP { want = MHC_CAP }
40 var got: i64 = 0
41 var stop: i64 = 0
42 while stop == 0 {
43 if got >= want { stop = 1 } else {
44 let k: i64 = sys_read(fd, ((buf as i64) + got) as *u8, want - got)
45 if k <= 0 { stop = 1 } else { got = got + k }
46 }
47 }
48 sys_close(fd)
49 let facts: *i64 = sys_mmap(MHT_N_SLOTS * 8) as *i64
50 mht_probe(buf, got, size, facts)
51 mc_w("MHTFACT is_target=" as *u8); mc_num(facts[0])
52 if facts[0] == 1 {
53 mc_w(" rows=" as *u8); mc_num(facts[1])
54 mc_w(" comments=" as *u8); mc_num(facts[2])
55 mc_w(" blanks=" as *u8); mc_num(facts[3])
56 mc_w(" maxvert=" as *u8); mc_num(facts[4])
57 mc_w(" bad=" as *u8); mc_num(facts[5])
58 }
59 mc_w("\n" as *u8)
60 if facts[0] == 0 { sys_exit(4); return 4 }
61 if mc_eq(argv[1] as *u8, "decode" as *u8) == 1 {
62 let idxs: *i64 = sys_mmap(MHC_MAX_ROWS * 8) as *i64
63 let dxs: *i64 = sys_mmap(MHC_MAX_ROWS * 8) as *i64
64 let dys: *i64 = sys_mmap(MHC_MAX_ROWS * 8) as *i64
65 let dzs: *i64 = sys_mmap(MHC_MAX_ROWS * 8) as *i64
66 let meta: *i64 = sys_mmap(16) as *i64
67 let parsed: i64 = mht_decode(buf, got, idxs, dxs, dys, dzs, MHC_MAX_ROWS, meta)
68 mc_w("MHTDECODE declared=" as *u8); mc_num(meta[0])
69 mc_w(" parsed=" as *u8); mc_num(parsed)
70 var show: i64 = parsed
71 if show > MHC_SHOW { show = MHC_SHOW }
72 mc_w(" shown=" as *u8); mc_num(show)
73 mc_w(" micro:" as *u8)
74 var vi: i64 = 0
75 while vi < show {
76 mc_w(" " as *u8); mc_num(idxs[vi])
77 mc_w(":" as *u8); mc_num(dxs[vi])
78 mc_w("," as *u8); mc_num(dys[vi])
79 mc_w("," as *u8); mc_num(dzs[vi])
80 vi = vi + 1
81 }
82 mc_w("\n" as *u8)
83 }
84 sys_exit(0)
85 return 0
86}