nx_m4b_gate.nx source

1// nx_m4b_gate.nx -- end-to-end gate for M4B (MP4 audiobook) liberation into the omni .nmz (@kind=audio): 2// nx_m4b_fixture -> nishi_audio.m4b -> nx_m4b_book (MP4 atom descent moov/udta/meta/ilst) -> reader/<slug>/ 3// (audio.json + track0.m4b) -> nx_nmz_pack <slug> audio -> .nmz @kind=audio. 4// Asserts iTunes metadata parsed (©nam title, ©ART narrator), @kind=audio, and the M4B bytes (ftyp + embedded 5// NULs) round-trip BYTE-EXACT out of the binary-safe canon. expect_exit: 0 license_tier: ORIGINAL 6import "nx_syscalls.nx" 7import "nx_canon_bin.nx" 8import "nx_uxf_cid.nx" 9 10func gp(s: *u8) -> i64 { var n: i64=0; while s[n]!=(0 as u8){n=n+1} sys_write(1,s,n); return 0 } 11func gnum(v0: i64) -> i64 { var v: i64=v0; if v<0 { sys_write(1,"-" as *u8,1); v=0-v } let b: *u8=sys_mmap(24); var k: i64=0; if v==0 {b[0]=48 as u8;k=1} while v>0 {b[k]=(48+(v%10)) as u8; v=v/10; k=k+1} let o: *u8=sys_mmap(24); var j: i64=0; while j<k {o[j]=b[k-1-j];j=j+1} sys_write(1,o,k); return 0 } 12func gstreq(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 } 13func ghas(hay: *u8, hl: i64, needle: *u8) -> i64 { 14 var nl: i64=0; while needle[nl]!=(0 as u8){nl=nl+1} 15 if nl == 0 { return 0 } 16 var i: i64 = 0 17 while i + nl <= hl { var k: i64=0; var hit: i64=1; while k<nl { if hay[i+k]!=needle[k]{hit=0;k=nl}else{k=k+1} } if hit==1 {return 1} i=i+1 } 18 return 0 19} 20func rd(path: *u8, lenp: *i64) -> *u8 { lenp[0]=0; return sys_read_file(path, lenp) } 21func spawn(path: *u8, a0: *u8, a1: *u8, redir: *u8) -> i64 { 22 let pid: i64 = sys_fork() 23 if pid == 0 { 24 let fd: i64 = sys_openat_wr(redir, 420) 25 if fd >= 0 { sys_dup3(fd, 1, 0); sys_dup3(fd, 2, 0) } 26 let argv: *i64 = sys_mmap(64) as *i64 27 var n: i64 = 0 28 argv[0] = path as i64; n = 1 29 if (a0 as i64) != 0 { argv[n] = a0 as i64; n = n + 1 } 30 if (a1 as i64) != 0 { argv[n] = a1 as i64; n = n + 1 } 31 argv[n] = 0 32 let envp: *i64 = sys_mmap(16) as *i64 33 envp[0] = "PATH=/usr/bin:/bin\x00" as *u8 as i64; envp[1] = 0 34 sys_execve(path, argv, envp) 35 sys_exit(127) 36 } 37 let st: *i64 = sys_mmap(16) as *i64 38 sys_wait4(pid, st, 0) 39 return (st[0] >> 8) & 0xff 40} 41 42func main() -> i64 { 43 gp("=== nx_m4b_gate: M4B (MP4 audiobook) -> .nmz @kind=audio (MP4 ilst metadata + bytes byte-exact) ===\n" as *u8) 44 let RUNNER: *u8 = "_offc/nx_sov_build_run.elf\x00" as *u8 45 let SC: *u8 = "knowledge/status/m4b_gate_scratch.log\x00" as *u8 46 47 spawn(RUNNER, "nx_m4b_fixture\x00" as *u8, 0 as *u8, SC) 48 spawn(RUNNER, "nx_m4b_book\x00" as *u8, 0 as *u8, SC) 49 let rc_d: i64 = spawn("_offc/nx_m4b_book.elf\x00" as *u8, "knowledge/fixtures/nishi_audio.m4b\x00" as *u8, "nishi_m4b_fixture\x00" as *u8, SC) 50 spawn(RUNNER, "nx_nmz_pack\x00" as *u8, 0 as *u8, SC) 51 let rc_p: i64 = spawn("_offc/nx_nmz_pack.elf\x00" as *u8, "nishi_m4b_fixture\x00" as *u8, "audio\x00" as *u8, SC) 52 53 let la: *i64 = sys_mmap(8) as *i64; let aj: *u8 = rd("knowledge/staging/media/reader/nishi_m4b_fixture/audio.json\x00" as *u8, la); let an: i64 = la[0] 54 let lm: *i64 = sys_mmap(8) as *i64; let m: *u8 = rd("knowledge/staging/media/nmz/nishi_m4b_fixture.nmz\x00" as *u8, lm); let n: i64 = lm[0] 55 let kindb: *u8 = sys_mmap(64); var gk: i64 = 0-1 56 let trkb: *u8 = sys_mmap(4096); var gt: i64 = 0-1 57 let cid: *u8 = sys_mmap(96); cid[0]=0 as u8 58 if (m as i64)!=0 { 59 gk = canon_get_bin(m, n, "@kind\x00" as *u8, kindb, 64) 60 gt = canon_get_bin(m, n, "track0.m4b\x00" as *u8, trkb, 4096) 61 uxf_cid_profiled(UXF_ARCHIVE, m, n, cid) 62 } 63 64 gp(" rc_decode=" as *u8); gnum(rc_d); gp(" rc_pack=" as *u8); gnum(rc_p); gp(" audio.json=" as *u8); gnum(an); gp("B nmz=" as *u8); gnum(n); gp("B\n" as *u8) 65 gp(" @kind=" as *u8); if gk>0 { gp(kindb) } gp(" track0.m4b_len=" as *u8); gnum(gt); gp(" cid=" as *u8); gp(cid); gp("\n" as *u8) 66 67 var pass: i64 = 0; var fail: i64 = 0 68 if rc_d == 0 { pass=pass+1 } else { fail=fail+1; gp(" FAIL m4b_book-nonzero\n" as *u8) } 69 if rc_p == 0 { pass=pass+1 } else { fail=fail+1; gp(" FAIL nmz_pack-nonzero\n" as *u8) } 70 if (aj as i64)!=0 { if ghas(aj, an, "The Hobbit (Nishi M4B Fixture)" as *u8)==1 { pass=pass+1 } else { fail=fail+1; gp(" FAIL title-missing\n" as *u8) } } else { fail=fail+1; gp(" FAIL no-audio.json\n" as *u8) } 71 if (aj as i64)!=0 { if ghas(aj, an, "J.R.R. Tolkien" as *u8)==1 { pass=pass+1 } else { fail=fail+1; gp(" FAIL narrator-missing\n" as *u8) } } 72 if (aj as i64)!=0 { if ghas(aj, an, "\"container\":\"m4b\"" as *u8)==1 { pass=pass+1 } else { fail=fail+1; gp(" FAIL container!=m4b\n" as *u8) } } 73 if gk > 0 { if gstreq(kindb, "audio" as *u8)==1 { pass=pass+1 } else { fail=fail+1; gp(" FAIL kind!=audio\n" as *u8) } } else { fail=fail+1; gp(" FAIL no-@kind\n" as *u8) } 74 if gt == 224 { pass=pass+1 } else { fail=fail+1; gp(" FAIL track-len!=224\n" as *u8) } 75 // M4B byte 4..8 == "ftyp" 76 if gt >= 8 { if trkb[4]==(0x66 as u8) { if trkb[5]==(0x74 as u8) { if trkb[6]==(0x79 as u8) { if trkb[7]==(0x70 as u8) { pass=pass+1 } else { fail=fail+1; gp(" FAIL track-not-ftyp-p\n" as *u8) } } else { fail=fail+1; gp(" FAIL track-not-ftyp-y\n" as *u8) } } else { fail=fail+1; gp(" FAIL track-not-ftyp-t\n" as *u8) } } else { fail=fail+1; gp(" FAIL track-not-ftyp-f\n" as *u8) } } else { fail=fail+1; gp(" FAIL track-too-short\n" as *u8) } 77 if uxf_codec_of_cid(cid) == UXF_ARCHIVE { pass=pass+1 } else { fail=fail+1; gp(" FAIL cid-codec\n" as *u8) } 78 79 gp("M4B-GATE pass=" as *u8); gnum(pass); gp(" fail=" as *u8); gnum(fail) 80 if fail == 0 { gp(" verdict=GREEN (M4B MP4 audiobook -> .nmz @kind=audio; ilst metadata + bytes byte-exact; UXF_ARCHIVE CID)\n" as *u8); sys_exit(0); return 0 } 81 gp(" verdict=RED\n" as *u8); sys_exit(1); return 1 82}