code wiki / (root) / nx_site_publish_prepare_lib_t256.nx

nx_site_publish_prepare_lib_t256.nx source

↩ module page · 804 lines · 44156 B

1// nx_site_publish_lib.nx -- ARTIFACT-PUBLISH, LIBRARY half (sp_main dispatcher) capability (closes the coverage BUILD-queue gap "artifact-publish"; 2// retires the ssh-cat content lane for pages). Places a NAS-local file into the live sites docroot the 3// SAFE way, composing the proven IO layer: 4// publish <src-file> <site> <relpath> -> sites/<site>/<relpath> 5// - ATOMIC placement via fsx_write (tmp+fsync+rename -- a browser never sees a torn page) 6// - PRIOR VERSION PRESERVED: an existing target is first copied to <relpath>.prev (rename-not-delete 7// doctrine; one-deep history -- generated artifacts, git holds sources) 8// - DENY BY CONSTRUCTION (fsx_write_denied: secrets/device-ns/allowlist) PLUS path-traversal refusal: 9// any ".." segment or absolute site/relpath is DENIED (an MCP caller must not escape the docroot) 10// The organ prints the live URL; verification is the SEPARATE browser-grade organ (composition, not a 11// built-in fallback): run nx_page_verify <url> from a WAN vantage (on-NAS bare-domain fetches hit DSM -- 12// the documented trap). The publish->verify recipe is the contract; this organ does the placement half. 13// - THE PUBLISH GATEWAY (F763 second half, wired 2026-07-30): for a site listed in 14// knowledge/pub_sites.conf, a <relpath> absent from that site's publishing REGISTRY -- or 15// carrying a non-publishable status (withdrawn/redirect/debris) -- is REFUSED. This is the 16// half that makes "random and arbitrary" impossible instead of merely visible: nx_pub_desk 17// stated the rule in 2026-07-19 and its own header recorded that enforcement inside the 18// publish organ was never wired, so anything could be dropped into any docroot and become 19// site truth. MEASURED before wiring: 54 pages served on nishifamily.com were in NO registry. 20// Sites NOT in the site table publish UNGATED (with a warning) -- onboarding is a config row, 21// and a control that refuses everything on day one is a control someone disables by lunchtime. 22// exit: 0 ok | 2 usage | 3 src absent | 4 io | 5 DENIED license_tier: ORIGINAL 23import "nx_fsops_lib.nx" // fsx_write (atomic + write-deny), vw_read, vw_slen, fsx_puts, fsx_putn 24import "nx_pub_lib.nx" // pl_site_lookup + pl_check -- the registry gateway 25import "nx_pub_release_prepare_candidate_t256.nx" 26import "nx_sha256.nx" 27import "nx_comparestale_lib.nx" 28import "nx_json.nx" 29import "json_emit.nx" 30 31const PB_ARG_VERB: i64 = 1 // argv: verb ("publish") 32const PB_RC_USAGE: i64 = 2 // exit: usage 33const PB_ARG_SRC: i64 = 2 // argv: source file (NAS-local) 34const PB_ARG_SITE: i64 = 3 // argv: site dir under sites/ 35const PB_ARG_REL: i64 = 4 // argv: page path under the site 36const PB_ARGC: i64 = 5 // publish src site relpath 37const PB_STAGE_ARGC: i64 = 6 // stage src site releases/<path> sha256 38const PB_GUARDED_ARGC: i64 = PB_STAGE_ARGC + 1 // adds expected live digest 39const PB_GUARDED_SIZED_ARGC: i64 = PB_GUARDED_ARGC + 1 // optional exact artifact extent 40const PB_PATH: i64 = 1024 // destination path buffer 41const PB_CONFCAP: i64 = 65536 // site-table read buffer (the gateway) 42const PB_SPANCAP: i64 = 128 // site-table span vector 43const PB_DOT: i64 = 46 // '.' 44const PB_SLASH: i64 = 47 // '/' 45 46// any ".." path segment, or a leading '/', or empty -> traversal refusal (1 = refuse) 47func pb_traversal(s: *u8) -> i64 { 48 if s[0] == (0 as u8) { return 1 } 49 if s[0] == (PB_SLASH as u8) { return 1 } 50 var i: i64 = 0 51 while s[i] != (0 as u8) { 52 if s[i] == (PB_DOT as u8) { if s[i+1] == (PB_DOT as u8) { return 1 } } 53 // Reject aliases before deriving the target lock: ./ and // could name the same file 54 // using different lock paths or conceal the reserved release namespace. 55 if s[i] == (PB_SLASH as u8) { 56 if s[i+1] == (PB_SLASH as u8) { return 1 } 57 if s[i+1] == (0 as u8) { return 1 } 58 } 59 var segment_start: i64 = 0 60 if i == 0 { segment_start = 1 } else { 61 if s[i-1] == (PB_SLASH as u8) { segment_start = 1 } 62 } 63 if segment_start == 1 { 64 if s[i] == (PB_DOT as u8) { 65 if (s[i+1] == (PB_SLASH as u8)) || (s[i+1] == (0 as u8)) { return 1 } 66 } 67 } 68 i = i + 1 69 } 70 return 0 71} 72// append NUL-terminated src to out at *op 73func pb_app(out: *u8, op: *i64, s: *u8) -> i64 { 74 var i: i64 = 0 75 var o: i64 = op[0] 76 while s[i] != (0 as u8) { out[o] = s[i]; o = o + 1; i = i + 1 } 77 out[o] = 0 as u8 78 op[0] = o 79 return 0 80} 81 82// Artifact equality is byte-counted: WASM and other binary assets contain NUL bytes. 83func pb_same_bytes(a: *u8, an: i64, b: *u8, bn: i64) -> i64 { 84 if an != bn { return 0 } 85 if an < 0 { return 0 } 86 var i: i64 = 0 87 while i < an { if a[i] != b[i] { return 0 }; i = i + 1 } 88 return 1 89} 90 91const PB_LOCK_EX_NB: i64 = 6 92const PB_RC_CONFLICT: i64 = 8 93const PB_RC_BUSY: i64 = 9 94const PB_SHA_BYTES: i64 = 32 95const PB_SHA_HEX: i64 = 64 96func pb_hash(body: *u8, n: i64, hex: *u8) -> i64 { 97 let raw: *u8 = sys_mmap(PB_SHA_BYTES) 98 sha256_digest(body,n,raw) 99 let digits: *u8 = "0123456789abcdef" as *u8 100 var i: i64 = 0 101 while i < PB_SHA_BYTES { 102 let c: i64 = raw[i] as i64 103 hex[i*2] = digits[c/16]; hex[i*2+1] = digits[c%16] 104 i = i+1 105 } 106 hex[PB_SHA_HEX] = 0 as u8 107 sys_munmap(raw,PB_SHA_BYTES) 108 return 0 109} 110 111const PB_SIZED_ARGC: i64 = 7 112const PB_I64_MAX: i64 = 9223372036854775807 113func pb_sized_bytes(s: *u8) -> i64 { 114 var value: i64=0 115 var i: i64=0 116 while s[i] != (0 as u8) { 117 let c: i64=s[i] as i64 118 if c < 48 || c > 57 { return 0-1 } 119 if value > (PB_I64_MAX/2-1-(c-48))/10 { return 0-1 } 120 value=value*10+c-48; i=i+1 121 } 122 if value <= 0 { return 0-1 } 123 return value 124} 125func pb_read_bounded(path: *u8,b: *u8,cap: i64) -> i64 { 126 let fd: i64=sys_openat_rd(path) 127 if fd < 0 { return fd } 128 var n: i64=0 129 var go: i64=1 130 while n < cap && go == 1 { 131 let got: i64=sys_read(fd,((b as i64)+n) as *u8,cap-n) 132 if got < 0 { sys_close(fd); return got } 133 if got == 0 { go=0 } else { n=n+got } 134 } 135 sys_close(fd) 136 return n 137} 138 139func pb_main_edge(argc: i64, argv: *i64, edge_rel: *u8, edge_sha: *u8) -> i64 { 140 if argc < PB_ARGC { return pb_publish_locked_edge(argc,argv,edge_rel,edge_sha) } 141 let verb: *u8 = argv[PB_ARG_VERB] as *u8 142 if fsx_seq(verb,"publish" as *u8) == 0 { 143 if fsx_seq(verb,"stage" as *u8) == 1 { 144 if argc != PB_STAGE_ARGC { return PB_RC_USAGE } 145 } else { 146 if fsx_seq(verb,"publish-guarded" as *u8) == 0 { if fsx_seq(verb,"stage-sized" as *u8) == 0 { return PB_RC_USAGE } } 147 if argc != PB_GUARDED_ARGC { 148 if fsx_seq(verb,"publish-guarded" as *u8) == 0 || argc != PB_GUARDED_SIZED_ARGC { return PB_RC_USAGE } 149 } 150 } 151 } 152 let site: *u8 = argv[PB_ARG_SITE] as *u8 153 let rel: *u8 = argv[PB_ARG_REL] as *u8 154 var si: i64 = 0 155 while site[si] != (0 as u8) { 156 if site[si] == (PB_SLASH as u8) { return FSX_RC_DENIED } 157 si = si + 1 158 } 159 if fsx_seq(verb,"stage" as *u8) == 1 || fsx_seq(verb,"stage-sized" as *u8) == 1 { 160 if pb_release_path(rel) == 0 { 161 fsx_puts("NX-PUBLISH DENIED stage requires releases/<candidate-path>; live URL is not a staging target\n" as *u8) 162 return FSX_RC_DENIED 163 } 164 } 165 if pb_traversal(site) == 1 { return FSX_RC_DENIED } 166 if pb_traversal(rel) == 1 { return FSX_RC_DENIED } 167 if vw_slen(site)+vw_slen(rel)+vw_slen("sites//.publish-lock" as *u8)+1 >= PB_PATH { return FSX_RC_DENIED } 168 let path: *u8 = sys_mmap(PB_PATH) 169 let pos: *i64 = sys_mmap(8) as *i64 170 pos[0] = 0 171 pb_app(path,pos,"sites/" as *u8);pb_app(path,pos,site) 172 pb_app(path,pos,"/" as *u8);pb_app(path,pos,rel) 173 if fsx_write_denied(path) == 1 { return FSX_RC_DENIED } 174 // Keep one stable inode per target; unlinking a lock lets contenders lock different inodes. 175 pb_app(path,pos,".publish-lock" as *u8) 176 let fd: i64 = sys_openat_wr(path,FSX_MODE_RW) 177 if fd < 0 { fsx_puts("NX-PUBLISH IO lock-parent-unavailable\n" as *u8);return FSX_RC_IO } 178 if sys_flock(fd,PB_LOCK_EX_NB) != 0 { 179 sys_close(fd) 180 fsx_puts("NX-PUBLISH BUSY target-owned retry-after-owner-completes\n" as *u8) 181 return PB_RC_BUSY 182 } 183 let rc: i64 = pb_publish_locked_edge(argc,argv,edge_rel,edge_sha) 184 sys_close(fd) 185 return rc 186} 187// Every publisher verb enforces this namespace, so a legacy publish cannot replace a tested candidate. 188// The site registry still authorizes each release path; staging does not bypass publication policy. 189func pb_release_path(rel: *u8) -> i64 { 190 let prefix: *u8 = "releases/" as *u8 191 var i: i64 = 0 192 while prefix[i] != (0 as u8) { 193 if rel[i] != prefix[i] { return 0 } 194 i = i + 1 195 } 196 return (rel[i] != (0 as u8)) as i64 197} 198func pb_publish_locked_edge(argc: i64, argv: *i64, edge_rel: *u8, edge_sha: *u8) -> i64 { 199 var okverb: i64 = 0 200 if argc >= PB_ARGC { if fsx_seq(argv[PB_ARG_VERB] as *u8, "publish" as *u8) == 1 { okverb = 1 } } 201 if argc == PB_GUARDED_ARGC || argc == PB_GUARDED_SIZED_ARGC { if fsx_seq(argv[PB_ARG_VERB] as *u8,"publish-guarded" as *u8) == 1 { okverb = 1 } } 202 if argc == PB_STAGE_ARGC { if fsx_seq(argv[PB_ARG_VERB] as *u8,"stage" as *u8) == 1 { okverb = 1 } } 203 if argc == PB_SIZED_ARGC { if fsx_seq(argv[PB_ARG_VERB] as *u8,"stage-sized" as *u8) == 1 { okverb = 1 } } 204 if okverb == 0 { 205 fsx_puts("usage: nx_site_publish publish <src-file> <site> <relpath> (-> sites/<site>/<relpath>; then verify: nx_page_verify <url>)\n" as *u8) 206 fsx_puts(" nx_site_publish publish-guarded <src-file> <site> <relpath> <sha256> <expected-live-sha256|absent> [exact-bytes]\n nx_site_publish stage <src-file> <site> releases/<candidate-path> <sha256>\nStaging verifies file identity only; browser and dependency acceptance are separate evidence.\n" as *u8) 207 return PB_RC_USAGE 208 } 209 let site: *u8 = argv[PB_ARG_SITE] as *u8 210 let rel: *u8 = argv[PB_ARG_REL] as *u8 211 if pb_traversal(site) == 1 { 212 fsx_puts("NX-PUBLISH DENIED: site escapes the docroot ('..'/absolute/empty)\n" as *u8) 213 return FSX_RC_DENIED 214 } 215 if pb_traversal(rel) == 1 { 216 fsx_puts("NX-PUBLISH DENIED: relpath escapes the docroot ('..'/absolute/empty)\n" as *u8) 217 return FSX_RC_DENIED 218 } 219 // ---- THE PUBLISH GATEWAY: the registry decides what may exist at this URL, not the caller ---- 220 let gw_conf: *u8 = sys_mmap(PB_CONFCAP) 221 let gw_spans: *i64 = sys_mmap(PB_SPANCAP) as *i64 222 var release_prefix: *u8 = 0 as *u8 223 var registry_checked: i64 = 0 224 if pl_site_lookup("knowledge/pub_sites.conf" as *u8, site, gw_conf, gw_spans) == 1 { 225 registry_checked = 1 226 let gw_pfx: *u8 = sys_mmap(PB_PATH) 227 pl_span_cstr(gw_conf, gw_spans[2], gw_spans[3], gw_pfx) 228 var row_status: i64 = 0 229 if pb_release_path(rel) == 1 { release_prefix = gw_pfx } else { row_status = pl_check(gw_pfx,rel) } 230 if row_status != 0 { 231 fsx_puts("NX-PUBLISH REFUSED: " as *u8); fsx_puts(rel) 232 fsx_puts(" is not a publishable row in this site's registry.\n" as *u8) 233 fsx_puts(" The registry -- not the caller -- decides what may exist at a URL. Either the path is\n" as *u8) 234 fsx_puts(" unregistered, or its status is withdrawn/redirect/debris.\n" as *u8) 235 fsx_puts(" Register it (id/title/owner/status/section/path/note, status=live|asset|draft) in " as *u8) 236 fsx_puts(gw_pfx); fsx_puts(" ,\n" as *u8) 237 fsx_puts(" or run: nx_pub_plane adopt " as *u8); fsx_puts(site) 238 fsx_puts(" to bring existing docroot entries in. Then re-run this publish.\n" as *u8) 239 return FSX_RC_DENIED 240 } 241 } else { 242 fsx_puts("NX-PUBLISH WARN: site '" as *u8); fsx_puts(site) 243 fsx_puts("' is not in knowledge/pub_sites.conf -- publishing UNGATED (add a row to gate it).\n" as *u8) 244 } 245 // stage-sized declares its exact artifact size; the read budget is that size plus one 246 // to distinguish complete bytes from truncation. Legacy verbs retain their existing cap. 247 var readcap: i64 = FSX_READ_CAP 248 var wanted: i64 = 0 249 var size_arg: i64 = 0 250 if fsx_seq(argv[PB_ARG_VERB] as *u8,"stage-sized" as *u8) == 1 { 251 size_arg=6 252 if (release_prefix as i64) == 0 { return FSX_RC_DENIED } 253 } 254 if argc == PB_GUARDED_SIZED_ARGC && fsx_seq(argv[PB_ARG_VERB] as *u8,"publish-guarded" as *u8) == 1 { 255 size_arg=7 256 if registry_checked != 1 { return FSX_RC_DENIED } 257 } 258 if size_arg > 0 { 259 wanted=pb_sized_bytes(argv[size_arg] as *u8) 260 if wanted < 0 { return PB_RC_USAGE } 261 readcap=wanted+1 262 } 263 let body: *u8 = sys_mmap(readcap + 1) 264 let n: i64 = pb_read_bounded(argv[PB_ARG_SRC] as *u8, body, readcap) 265 if wanted > 0 { if n != wanted { fsx_puts("NX-PUBLISH REFUSED source-size-mismatch\n" as *u8); return PB_RC_CONFLICT } } 266 if n <= 0 { 267 fsx_puts("NX-PUBLISH ABSENT: cannot read source " as *u8); fsx_puts(argv[PB_ARG_SRC] as *u8); fsx_puts("\n" as *u8) 268 return FSX_RC_ABSENT 269 } 270 if n == readcap { fsx_puts("NX-PUBLISH REFUSED: source at/over the 1MiB organ cap -- use the mgmt upload lane\n" as *u8); return FSX_RC_IO } 271 // The owned body is checked once here and later passed unchanged to fsx_write. 272 if (edge_rel as i64)>0 { 273 let edge_rc: i64=pe_check(body,n,argv,edge_rel,edge_sha) 274 if edge_rc!=0{return edge_rc} 275 } 276 // Every verb checks the registered content, including legacy publish without a caller hash. 277 if (release_prefix as i64) != 0 { 278 let release_hash: *u8 = sys_mmap(PB_SHA_HEX+1) 279 pb_hash(body,n,release_hash) 280 let registered: i64 = pr_check(release_prefix,rel,release_hash) 281 sys_munmap(release_hash,PB_SHA_HEX+1) 282 if registered != PR_OK { 283 fsx_puts("NX-PUBLISH REFUSED release-registration code=" as *u8); fsx_putn(registered) 284 fsx_puts(" path=" as *u8); fsx_puts(rel) 285 fsx_puts("; verify catalogue integrity and registered digest before retrying\n" as *u8) 286 if registered == PR_IO { return FSX_RC_IO } 287 return PB_RC_CONFLICT 288 } 289 } 290 // build dst = sites/<site>/<relpath> 291 let dst: *u8 = sys_mmap(PB_PATH) 292 let op: *i64 = sys_mmap(8) as *i64 293 op[0] = 0 294 pb_app(dst, op, "sites/" as *u8) 295 pb_app(dst, op, site) 296 pb_app(dst, op, "/" as *u8) 297 pb_app(dst, op, rel) 298 // preserve the prior version (one-deep; rename-not-delete doctrine) 299 // The predecessor has its own extent: a smaller incoming artifact must still retain it whole. 300 var priorcap: i64 = readcap 301 if wanted > 0 { 302 let priorfd: i64 = sys_openat_rd(dst) 303 if priorfd >= 0 { 304 let extent: i64 = sys_lseek(priorfd,0,FSX_SEEK_END) 305 let closed: i64 = sys_close(priorfd) 306 if extent < 0 || extent > PB_I64_MAX/2-1 || closed != 0 { 307 fsx_puts("NX-PUBLISH REFUSED prior-extent-unavailable-or-overflow\n" as *u8) 308 return FSX_RC_IO 309 } 310 if extent >= priorcap { priorcap=extent+1 } 311 } else { 312 if priorfd != (0-2) { fsx_puts("NX-PUBLISH REFUSED prior-open-error\n" as *u8);return FSX_RC_IO } 313 } 314 } 315 let old: *u8 = sys_mmap(priorcap + 1) 316 if (old as i64) <= 0 { fsx_puts("NX-PUBLISH REFUSED prior-allocation-failed\n" as *u8);return FSX_RC_IO } 317 let on: i64 = pb_read_bounded(dst, old, priorcap) 318 // A retry must retain the last DIFFERENT version, not replace it with the current one. 319 if fsx_write_denied(dst) == 1 { 320 fsx_puts("NX-PUBLISH DENIED: destination rejected before retry comparison\n" as *u8) 321 return FSX_RC_DENIED 322 } 323 if on >= priorcap { fsx_puts("NX-PUBLISH REFUSED prior-at-read-cap\n" as *u8);return FSX_RC_IO } 324 let staged: i64 = fsx_seq(argv[PB_ARG_VERB] as *u8,"stage" as *u8) | fsx_seq(argv[PB_ARG_VERB] as *u8,"stage-sized" as *u8) 325 if (fsx_seq(argv[PB_ARG_VERB] as *u8,"publish-guarded" as *u8) == 1) || (staged == 1) { 326 let incoming: *u8 = sys_mmap(PB_SHA_HEX+1) 327 pb_hash(body,n,incoming) 328 if fsx_seq(incoming,argv[5] as *u8) == 0 { 329 fsx_puts("NX-PUBLISH CONFLICT artifact-sha256-mismatch\n" as *u8) 330 return PB_RC_CONFLICT 331 } 332 // A retry with the same result succeeds after its predecessor has changed. 333 if (staged == 0) && (pb_same_bytes(body,n,old,on) == 0) { 334 let current: *u8 = sys_mmap(PB_SHA_HEX+1) 335 if on < 0 { 336 let stat: *u8 = sys_mmap(160) 337 if sys_fstatat(dst,stat) != (0-2) { return FSX_RC_IO } 338 if fsx_seq(argv[6] as *u8,"absent" as *u8) == 0 { return PB_RC_CONFLICT } 339 } else { 340 pb_hash(old,on,current) 341 if fsx_seq(current,argv[6] as *u8) == 0 { 342 fsx_puts("NX-PUBLISH CONFLICT live-sha256-mismatch\n" as *u8) 343 return PB_RC_CONFLICT 344 } 345 } 346 } 347 } 348 if (pb_release_path(rel) == 1) && (pb_same_bytes(body,n,old,on) == 0) { 349 // A failed read is not absence. Only kernel ENOENT permits a new release path. 350 let stat: *u8 = sys_mmap(160) 351 let observed: i64 = sys_fstatat(dst,stat) 352 if observed != (0-2) { 353 if observed == 0 { 354 fsx_puts("NX-PUBLISH CONFLICT immutable-release-path; retain tested bytes and stage a new candidate path\n" as *u8) 355 return PB_RC_CONFLICT 356 } 357 fsx_puts("NX-PUBLISH IO release-target-stat errno=" as *u8);fsx_putn(observed) 358 fsx_puts(" target=" as *u8);fsx_puts(dst);fsx_puts("; resolve target access before retry\n" as *u8) 359 return FSX_RC_IO 360 } 361 } 362 if pb_same_bytes(body, n, old, on) == 1 { 363 fsx_puts("NX-PUBLISH UNCHANGED bytes=" as *u8); fsx_putn(n) 364 fsx_puts(" -> " as *u8); fsx_puts(dst) 365 fsx_puts(" prior_version=retained writes=0\n" as *u8) 366 return 0 367 } 368 if on > 0 { 369 let prev: *u8 = sys_mmap(PB_PATH) 370 let pp: *i64 = sys_mmap(8) as *i64 371 pp[0] = 0 372 pb_app(prev, pp, dst) 373 pb_app(prev, pp, ".prev" as *u8) 374 let pw: i64 = fsx_write(prev, old, on) 375 if pw < 0 { fsx_puts("NX-PUBLISH IO: could not preserve .prev; refusing to overwrite\n" as *u8); return FSX_RC_IO } 376 } 377 // atomic placement through the IO layer (write-deny classes included by construction) 378 let w: i64 = fsx_write(dst, body, n) 379 if w < 0 { 380 // ⚠THE SILENT EXIT, FIXED (debt seq910). Every other failure path in sp_main prints 381 // a diagnostic; this one returned an error code and NOT ONE WORD. Measured 2026-07-25: 382 // `publish <src> nishifamily research/rt004.html` produced EMPTY output and published 383 // nothing, which reads exactly like success to a caller that only sees stdout. 384 // ROOT CAUSE (read, not guessed): fsx_write does NOT create parent directories -- 385 // sys_openat_wr fails and it returns -3 -- so any relpath containing a subdirectory 386 // fails here when sites/<site>/<subdir>/ is absent. Auto-creating docroot directories 387 // is a deliberate NON-goal (deny-by-construction), so the fix is to FAIL LOUD and name 388 // the cause rather than to start creating directories. 389 if w == 0 - (2 as i64) { 390 fsx_puts("NX-PUBLISH DENIED: the IO layer refused this destination -> " as *u8) 391 fsx_puts(dst); fsx_puts("\n" as *u8) 392 return FSX_RC_DENIED 393 } 394 fsx_puts("NX-PUBLISH IO-FAIL: NOTHING WAS PUBLISHED -> " as *u8); fsx_puts(dst); fsx_puts("\n" as *u8) 395 fsx_puts(" likely cause: the parent directory does not exist (this organ never creates docroot dirs).\n" as *u8) 396 fsx_puts(" if <relpath> contains a subdirectory, create it first or publish to a flat relpath.\n" as *u8) 397 return FSX_RC_IO 398 } 399 fsx_puts("NX-PUBLISH OK bytes=" as *u8); fsx_putn(w) 400 fsx_puts(" -> " as *u8); fsx_puts(dst) 401 fsx_puts("\nVERIFY (browser-grade, WAN vantage): nx_page_verify https://<site-domain>/" as *u8); fsx_puts(rel) 402 fsx_puts(" (site->domain map: surfaces.reg)\n" as *u8) 403 return 0 404} 405 406const PE_ARGC: i64=10 407// This lock coordinates only publishers honoring the immutable registered release contract. 408func pe_main(argc: i64,argv: *i64) -> i64 { 409 if argc!=PE_ARGC{return PB_RC_USAGE} 410 // Refuse a missing/nonwritable caller output before open can reuse descriptor1 for a lock. 411 if sys_write(1,"",0)!=0{return FSX_RC_IO} 412 let site: *u8=argv[3] as *u8;let rel: *u8=argv[8] as *u8 413 if pb_traversal(site)==1||pb_traversal(rel)==1||pr_path_ok(rel)==0||pr_hash_ok(argv[9] as *u8)==0{return FSX_RC_DENIED} 414 var i: i64=0;while site[i]!=0{if site[i]==47{return FSX_RC_DENIED};i=i+1} 415 if fsx_seq(rel,argv[4] as *u8)==1{return FSX_RC_DENIED} 416 if vw_slen(site)+vw_slen(rel)+vw_slen("sites//.publish-lock")+1>=PB_PATH{return FSX_RC_DENIED} 417 let lock: *u8=sys_mmap_shared(PB_PATH);let pos: *i64=sys_mmap_shared(8) as *i64 418 let normalized: *i64=sys_mmap_shared((PB_GUARDED_SIZED_ARGC+1)*8) as *i64 419 var rc: i64=FSX_RC_IO 420 if (lock as i64)>0&&(pos as i64)>0&&(normalized as i64)>0 { 421 pos[0]=0;pb_app(lock,pos,"sites/");pb_app(lock,pos,site);pb_app(lock,pos,"/");pb_app(lock,pos,rel) 422 if fsx_write_denied(lock)==0 { 423 pb_app(lock,pos,".publish-lock");let fd: i64=sys_openat_wr(lock,FSX_MODE_RW) 424 if fd>=0 { 425 if sys_flock(fd,PB_LOCK_EX_NB)==0 { 426 i=0;while i<PB_GUARDED_SIZED_ARGC{normalized[i]=argv[i];i=i+1};normalized[i]=0;normalized[1]="publish-guarded" as *u8 as i64 427 rc=pb_main_edge(PB_GUARDED_SIZED_ARGC,normalized,rel,argv[9] as *u8) 428 } else {rc=PB_RC_BUSY;fsx_puts("NX-PUBLISH BUSY selected-dependency-owned\n")} 429 if sys_close(fd)!=0{rc=FSX_RC_IO;fsx_puts("NX-PUBLISH IO dependency-lock-close; inspect placement outcome\n")} 430 } 431 } else {rc=FSX_RC_DENIED} 432 } 433 if (normalized as i64)>0{if sys_munmap(normalized as *u8,(PB_GUARDED_SIZED_ARGC+1)*8)!=0{rc=FSX_RC_IO}} 434 if (pos as i64)>0{if sys_munmap(pos as *u8,8)!=0{rc=FSX_RC_IO}} 435 if (lock as i64)>0{if sys_munmap(lock,PB_PATH)!=0{rc=FSX_RC_IO}} 436 return rc 437} 438func sp_main(argc: i64,argv: *i64) -> i64 { 439 if argc>1{if fsx_seq(argv[1] as *u8,"prepare-path")==1{ 440 if argc!=4{return PB_RC_USAGE} 441 let rc:i64=pb_prepare_path(argv[2] as *u8,argv[3] as *u8) 442 fsx_puts("NX-PUBLISH PREPARE rc=");fsx_putn(rc);fsx_puts(" registered-path-only=1 published=0\n") 443 return rc 444 }} 445 if argc>1{if fsx_seq(argv[1] as *u8,"prepare-release")==1{return rm_prepare_main(argc,argv)}} 446 if argc>1{if fsx_seq(argv[1] as *u8,"release-manifest")==1{return rm_main(argc,argv)}} 447 if argc>1{if fsx_seq(argv[1] as *u8,"publish-guarded-edge")==1{return pe_main(argc,argv)}} 448 return pb_main_edge(argc,argv,0 as *u8,0 as *u8) 449} 450func pe_check(body: *u8,n: i64,argv: *i64,rel: *u8,sha: *u8) -> i64 { 451 let conf: *u8=sys_mmap_shared(PB_CONFCAP);let spans: *i64=sys_mmap_shared(PB_SPANCAP) as *i64 452 let prefix: *u8=sys_mmap_shared(PB_PATH);let path: *u8=sys_mmap_shared(PB_PATH);let token: *u8=sys_mmap_shared(PB_PATH) 453 let av: *i64=sys_mmap_shared(8*8) as *i64;let pos: *i64=sys_mmap_shared(8) as *i64 454 var rc: i64=FSX_RC_IO 455 if (conf as i64)>0&&(spans as i64)>0&&(prefix as i64)>0&&(path as i64)>0&&(token as i64)>0&&(av as i64)>0&&(pos as i64)>0 { 456 if pl_site_lookup("knowledge/pub_sites.conf",argv[3] as *u8,conf,spans)==1 { 457 if spans[3]-spans[2]<PB_PATH { 458 pl_span_cstr(conf,spans[2],spans[3],prefix) 459 let registered: i64=pr_check(prefix,rel,sha) 460 if registered==PR_OK { 461 pos[0]=0;pb_app(path,pos,"sites/");pb_app(path,pos,argv[3] as *u8);pb_app(path,pos,"/");pb_app(path,pos,rel) 462 pos[0]=0;pb_app(token,pos,"/");pb_app(token,pos,rel) 463 av[0]="nx_comparestale" as *u8 as i64;av[1]="dependency-check" as *u8 as i64;av[2]=argv[2];av[3]=argv[5];av[4]=path as i64;av[5]=sha as i64;av[6]=token as i64;av[7]=0 464 let observed: i64=cd_buffer_command(7,av,body,n) 465 if observed==0{rc=0}else{if observed==1{rc=PB_RC_CONFLICT}else{rc=FSX_RC_IO}} 466 } else {if registered==PR_IO{rc=FSX_RC_IO}else{rc=PB_RC_CONFLICT};fsx_puts("NX-PUBLISH REFUSED selected-dependency-registration\n")} 467 } 468 } else {rc=FSX_RC_DENIED;fsx_puts("NX-PUBLISH DENIED selected-edge requires registered site\n")} 469 } 470 if (pos as i64)>0{if sys_munmap(pos as *u8,8)!=0{rc=FSX_RC_IO}} 471 if (av as i64)>0{if sys_munmap(av as *u8,64)!=0{rc=FSX_RC_IO}} 472 if (token as i64)>0{if sys_munmap(token,PB_PATH)!=0{rc=FSX_RC_IO}} 473 if (path as i64)>0{if sys_munmap(path,PB_PATH)!=0{rc=FSX_RC_IO}} 474 if (prefix as i64)>0{if sys_munmap(prefix,PB_PATH)!=0{rc=FSX_RC_IO}} 475 if (spans as i64)>0{if sys_munmap(spans as *u8,PB_SPANCAP)!=0{rc=FSX_RC_IO}} 476 if (conf as i64)>0{if sys_munmap(conf,PB_CONFCAP)!=0{rc=FSX_RC_IO}} 477 return rc 478} 479 480// Compatibility entry: callers retain the original two-argument API. 481func pb_publish_locked(argc: i64,argv: *i64) -> i64 {return pb_publish_locked_edge(argc,argv,0 as *u8,0 as *u8)} 482 483// One selected immutable dependency, matching the existing guarded-edge contract. 484// Registration is opt-in on this verb only; legacy publication authority is unchanged. 485const RM_FIELDS: i64=12 486const RM_VALUES_BYTES: i64=RM_FIELDS*8 487const RM_SCHEMA: *u8="site-release/v1" 488const RM_RECEIPT_ROOT: *u8="knowledge/gates/" 489func rm_key(k: *u8) -> i64 { 490 if fsx_seq(k,"schema")==1{return 0};if fsx_seq(k,"site")==1{return 1} 491 if fsx_seq(k,"consumer_source")==1{return 2};if fsx_seq(k,"consumer_path")==1{return 3} 492 if fsx_seq(k,"consumer_sha256")==1{return 4};if fsx_seq(k,"consumer_bytes")==1{return 5} 493 if fsx_seq(k,"expected_live")==1{return 6};if fsx_seq(k,"dependency_source")==1{return 7} 494 if fsx_seq(k,"dependency_path")==1{return 8};if fsx_seq(k,"dependency_sha256")==1{return 9} 495 if fsx_seq(k,"dependency_bytes")==1{return 10};if fsx_seq(k,"registration")==1{return 11} 496 return 0-1 497} 498// This path-oriented schema deliberately refuses escapes rather than interpreting them differently. 499func rm_string(t: *NxJsonTok) -> *u8 { 500 if nx_json_next(t)!=NX_JSON_STRING{return 0 as *u8} 501 let n: i64=t.tok_len-2 502 if n<=0||n>=PB_PATH{return 0 as *u8} 503 let v: *u8=sys_mmap(n+1);if (v as i64)<=0{return 0 as *u8} 504 var i: i64=0 505 while i<n{let c: i64=t.src[t.tok_off+1+i] as i64;if c==92||c<32{sys_munmap(v,n+1);return 0 as *u8};v[i]=c as u8;i=i+1} 506 v[n]=0;return v 507} 508func rm_parse_tokens(t: *NxJsonTok,v: *i64) -> i64 { 509 if nx_json_next(t)!=NX_JSON_LBRACE{return PB_RC_USAGE} 510 var count: i64=0 511 while count<RM_FIELDS { 512 let k: *u8=rm_string(t);if (k as i64)<=0{return PB_RC_USAGE} 513 let idx: i64=rm_key(k);sys_munmap(k,vw_slen(k)+1) 514 if idx<0{return PB_RC_USAGE};if v[idx]!=0{return PB_RC_USAGE} 515 if nx_json_next(t)!=NX_JSON_COLON{return PB_RC_USAGE} 516 let value: *u8=rm_string(t);if (value as i64)<=0{return PB_RC_USAGE} 517 v[idx]=value as i64;count=count+1 518 let separator: i64=nx_json_next(t) 519 if separator==NX_JSON_RBRACE{if count!=RM_FIELDS{return PB_RC_USAGE};if nx_json_next(t)!=NX_JSON_EOF{return PB_RC_USAGE};return 0} 520 if separator!=NX_JSON_COMMA{return PB_RC_USAGE} 521 } 522 return PB_RC_USAGE 523} 524func rm_parse(body: *u8,n: i64,v: *i64) -> i64 { 525 let t: *NxJsonTok=nx_json_new(body,n);if (t as i64)<=0{return FSX_RC_IO} 526 let rc: i64=rm_parse_tokens(t,v);sys_munmap(t as *u8,NX_JSONTOK_BYTES);return rc 527} 528 529func rm_num(out: *u8,pos: *i64,value: i64) -> i64 { 530 // Internal epoch/PID/exit values are bounded; digits use the caller-owned receipt buffer. 531 var n: i64=value 532 if n<0{pb_app(out,pos,"-");n=0-n} 533 let start: i64=pos[0] 534 if n==0{pb_app(out,pos,"0")}else{ 535 while n>0{out[pos[0]]=(48+n%10) as u8;pos[0]=pos[0]+1;n=n/10} 536 var left: i64=start;var right: i64=pos[0]-1 537 while left<right{let ch: u8=out[left];out[left]=out[right];out[right]=ch;left=left+1;right=right-1} 538 out[pos[0]]=0 539 } 540 return 0 541} 542 543func rm_receipt(path: *u8,digest: *u8,phase: *u8,state: *u8,rc: i64) -> i64 { 544 let b: *u8=sys_mmap(PB_PATH);let p: *i64=sys_mmap(8) as *i64 545 if (b as i64)<=0||(p as i64)<=0{return FSX_RC_IO} 546 p[0]=0;pb_app(b,p,"{\"schema\":\"site-release-phase/v1\",\"manifest_sha256\":\"");pb_app(b,p,digest) 547 pb_app(b,p,"\",\"epoch\":");rm_num(b,p,sys_now_realtime_sec()) 548 pb_app(b,p,",\"attempt_pid\":");rm_num(b,p,osp_selfpid()) 549 pb_app(b,p,",\"phase\":\"");pb_app(b,p,phase);pb_app(b,p,"\",\"state\":\"");pb_app(b,p,state) 550 pb_app(b,p,"\",\"rc\":");rm_num(b,p,rc);pb_app(b,p,"}\n") 551 fsx_puts(b) 552 let written: i64=fsx_append(path,b,p[0]);var result: i64=FSX_RC_IO 553 if written>=p[0]{result=rm_sync(path)} 554 sys_munmap(b,PB_PATH);sys_munmap(p as *u8,8) 555 if result!=0{fsx_puts("NX-RELEASE receipt-io; inspect last recorded phase and actual artifact identity; no further phase executed\n")} 556 return result 557} 558func rm_finish(receipt: *u8,digest: *u8,phase: *u8,rc: i64) -> i64 { 559 var state: *u8="complete" 560 if rc!=0{state="refused";if rc==PB_RC_BUSY{state="waiting-owner-retry-required"}} 561 if rm_receipt(receipt,digest,phase,state,rc)!=0{return FSX_RC_IO} 562 return rc 563} 564func rm_artifact(src: *u8,size: *u8,hash: *u8,out: *i64) -> i64 { 565 let n: i64=pb_sized_bytes(size);if n<0||pr_hash_ok(hash)!=1{return PB_RC_USAGE} 566 let b: *u8=sys_mmap(n+1);if (b as i64)<=0{return FSX_RC_IO} 567 let got: i64=pb_read_bounded(src,b,n+1) 568 if got!=n{sys_munmap(b,n+1);return PB_RC_CONFLICT} 569 let h: *u8=sys_mmap(PB_SHA_HEX+1);if (h as i64)<=0{sys_munmap(b,n+1);return FSX_RC_IO} 570 pb_hash(b,n,h);let same: i64=fsx_seq(h,hash);sys_munmap(h,PB_SHA_HEX+1) 571 if same!=1{sys_munmap(b,n+1);return PB_RC_CONFLICT} 572 out[0]=b as i64;out[1]=n;return 0 573} 574// CLI/job scope: early preflight refusals and incumbent publisher allocations are reclaimed at process exit. 575// This entry is not a memory-stable long-lived daemon API. 576func rm_preflight(v: *i64,prefix: *u8) -> i64 { 577 if fsx_seq(v[0] as *u8,RM_SCHEMA)!=1{return PB_RC_USAGE} 578 if fsx_seq(v[11] as *u8,"allow")!=1&&fsx_seq(v[11] as *u8,"existing-only")!=1{return PB_RC_USAGE} 579 if pr_hash_ok(v[6] as *u8)!=1&&fsx_seq(v[6] as *u8,"absent")!=1{return PB_RC_USAGE} 580 let site: *u8=v[1] as *u8;let target: *u8=v[3] as *u8;let dep: *u8=v[8] as *u8 581 if pb_traversal(site)!=0||pb_traversal(target)!=0||pr_path_ok(dep)!=1||pb_release_path(target)==1{return FSX_RC_DENIED} 582 var i: i64=0;while site[i]!=0{if site[i]==47{return FSX_RC_DENIED};i=i+1} 583 if vw_slen(site)+vw_slen(target)+vw_slen("sites//.publish-lock")+1>=PB_PATH{return FSX_RC_DENIED} 584 if vw_slen(site)+vw_slen(dep)+vw_slen("sites//.publish-lock")+1>=PB_PATH{return FSX_RC_DENIED} 585 let conf: *u8=sys_mmap(PB_CONFCAP);let spans: *i64=sys_mmap(PB_SPANCAP) as *i64 586 if (conf as i64)<=0||(spans as i64)<=0{return FSX_RC_IO} 587 if pl_site_lookup("knowledge/pub_sites.conf",site,conf,spans)!=1{return FSX_RC_DENIED} 588 if spans[3]-spans[2]>=PB_PATH{return FSX_RC_DENIED} 589 pl_span_cstr(conf,spans[2],spans[3],prefix) 590 if pl_check(prefix,target)!=0{return FSX_RC_DENIED} 591 sys_munmap(conf,PB_CONFCAP);sys_munmap(spans as *u8,PB_SPANCAP) 592 let artifact: *i64=sys_mmap(16) as *i64;let asset: *i64=sys_mmap(16) as *i64 593 if (artifact as i64)<=0||(asset as i64)<=0{return FSX_RC_IO} 594 let cr: i64=rm_artifact(v[2] as *u8,v[5] as *u8,v[4] as *u8,artifact);if cr!=0{return cr} 595 let dr: i64=rm_artifact(v[7] as *u8,v[10] as *u8,v[9] as *u8,asset);if dr!=0{return dr} 596 let args: *i64=sys_mmap(8*8) as *i64;let token: *u8=sys_mmap(PB_PATH);let pos: *i64=sys_mmap(8) as *i64 597 if (args as i64)<=0||(token as i64)<=0||(pos as i64)<=0{return FSX_RC_IO} 598 pos[0]=0;pb_app(token,pos,"/");pb_app(token,pos,dep) 599 args[0]="nx_comparestale" as *u8 as i64;args[1]="dependency-check" as *u8 as i64;args[2]=v[2];args[3]=v[4] 600 args[4]=v[7];args[5]=v[9];args[6]=token as i64;args[7]=0 601 let checked: i64=cd_buffer_command(7,args,artifact[0] as *u8,artifact[1]) 602 sys_munmap(artifact[0] as *u8,artifact[1]+1);sys_munmap(asset[0] as *u8,asset[1]+1) 603 sys_munmap(args as *u8,64);sys_munmap(token,PB_PATH);sys_munmap(pos as *u8,8) 604 sys_munmap(artifact as *u8,16);sys_munmap(asset as *u8,16) 605 if checked!=0{return PB_RC_CONFLICT};return 0 606} 607func rm_execute(v: *i64,prefix: *u8,receipt: *u8,digest: *u8) -> i64 { 608 if rm_receipt(receipt,digest,"preflight","started",0)!=0{return FSX_RC_IO} 609 var rc: i64=rm_preflight(v,prefix);rc=rm_finish(receipt,digest,"preflight",rc);if rc!=0{return rc} 610 if rm_receipt(receipt,digest,"registration","started",0)!=0{return FSX_RC_IO} 611 if fsx_seq(v[11] as *u8,"allow")==1{rc=pr_register(prefix,v[8] as *u8,v[9] as *u8);if rc==PR_CREATED{rc=0}}else{rc=pr_check(prefix,v[8] as *u8,v[9] as *u8)} 612 rc=rm_finish(receipt,digest,"registration",rc);if rc!=0{return rc} 613 let args: *i64=sys_mmap((PE_ARGC+1)*8) as *i64;if (args as i64)<=0{return FSX_RC_IO} 614 args[0]="nx_site_publish" as *u8 as i64;args[1]="stage-sized" as *u8 as i64;args[2]=v[7];args[3]=v[1] 615 args[4]=v[8];args[5]=v[9];args[6]=v[10];args[7]=0 616 if rm_receipt(receipt,digest,"stage","started",0)!=0{return FSX_RC_IO} 617 rc=pb_main_edge(PB_SIZED_ARGC,args,0 as *u8,0 as *u8);rc=rm_finish(receipt,digest,"stage",rc);if rc!=0{return rc} 618 // The staging lock has been released. pe_main owns dependency then consumer locks itself. 619 args[1]="publish-guarded-edge" as *u8 as i64;args[2]=v[2];args[3]=v[1];args[4]=v[3];args[5]=v[4] 620 args[6]=v[6];args[7]=v[5];args[8]=v[8];args[9]=v[9];args[10]=0 621 if rm_receipt(receipt,digest,"publish","started",0)!=0{return FSX_RC_IO} 622 rc=pe_main(PE_ARGC,args);rc=rm_finish(receipt,digest,"publish",rc);if rc!=0{return rc} 623 sys_munmap(args as *u8,(PE_ARGC+1)*8) 624 return rm_receipt(receipt,digest,"delivery","published-served-review-pending",0) 625} 626func rm_main(argc: i64,argv: *i64) -> i64 { 627 if argc!=4{return PB_RC_USAGE};if pr_hash_ok(argv[3] as *u8)!=1{return PB_RC_USAGE} 628 let body: *u8=sys_mmap(PB_CONFCAP+1);let digest: *u8=sys_mmap(PB_SHA_HEX+1) 629 let v: *i64=sys_mmap(RM_VALUES_BYTES) as *i64;let receipt: *u8=sys_mmap(PB_PATH) 630 let pos: *i64=sys_mmap(8) as *i64;let prefix: *u8=sys_mmap(PB_PATH) 631 if (body as i64)<=0||(digest as i64)<=0||(v as i64)<=0||(receipt as i64)<=0||(pos as i64)<=0||(prefix as i64)<=0{rm_cleanup(body,digest,v,receipt,pos,prefix);return FSX_RC_IO} 632 let n: i64=pb_read_bounded(argv[2] as *u8,body,PB_CONFCAP+1) 633 if n<=0||n>PB_CONFCAP{rm_cleanup(body,digest,v,receipt,pos,prefix);return PB_RC_USAGE} 634 pb_hash(body,n,digest);if fsx_seq(digest,argv[3] as *u8)!=1{rm_cleanup(body,digest,v,receipt,pos,prefix);return PB_RC_CONFLICT} 635 pos[0]=0;pb_app(receipt,pos,RM_RECEIPT_ROOT);pb_app(receipt,pos,"site-release-");pb_app(receipt,pos,digest);pb_app(receipt,pos,".jsonl") 636 var rc: i64=rm_parse(body,n,v) 637 if rc!=0{rc=rm_finish(receipt,digest,"manifest",rc);rm_cleanup(body,digest,v,receipt,pos,prefix);return rc} 638 fsx_puts("NX-RELEASE receipt=");fsx_puts(receipt);fsx_puts(" registration=");fsx_puts(v[11] as *u8);fsx_puts(" scope=one-selected-dependency no-build-no-render\n") 639 rc=rm_bank(body,n,digest) 640 if rc!=0{rc=rm_finish(receipt,digest,"manifest-bank",rc);rm_cleanup(body,digest,v,receipt,pos,prefix);return rc} 641 rc=rm_execute(v,prefix,receipt,digest) 642 rm_cleanup(body,digest,v,receipt,pos,prefix) 643 return rc 644} 645 646func rm_sync(path: *u8) -> i64 { 647 let fd: i64=sys_openat_rd(path);if fd<0{return FSX_RC_IO} 648 let sync: i64=sys_fsync(fd);let closed: i64=sys_close(fd) 649 if sync!=0||closed!=0{return FSX_RC_IO} 650 let dir: i64=sys_openat_rd(RM_RECEIPT_ROOT);if dir<0{return FSX_RC_IO} 651 let ds: i64=sys_fsync(dir);let dc: i64=sys_close(dir) 652 if ds!=0||dc!=0{return FSX_RC_IO};return 0 653} 654// The caller's authorization and original precondition remain available after temporary input expires. 655func rm_bank(body: *u8,n: i64,digest: *u8) -> i64 { 656 let path: *u8=sys_mmap(PB_PATH);let lock: *u8=sys_mmap(PB_PATH);let p: *i64=sys_mmap(8) as *i64 657 if (path as i64)<=0||(lock as i64)<=0||(p as i64)<=0{return FSX_RC_IO} 658 p[0]=0;pb_app(path,p,RM_RECEIPT_ROOT);pb_app(path,p,"site-release-");pb_app(path,p,digest);pb_app(path,p,".manifest.json") 659 p[0]=0;pb_app(lock,p,path);pb_app(lock,p,".lock") 660 if fsx_write_denied(path)==1||fsx_write_denied(lock)==1{return FSX_RC_DENIED} 661 let fd: i64=sys_openat_wr(lock,FSX_MODE_RW);if fd<0{return FSX_RC_IO} 662 if sys_flock(fd,PB_LOCK_EX_NB)!=0{sys_close(fd);return PB_RC_BUSY} 663 let old: *u8=sys_mmap(n+1);var rc: i64=FSX_RC_IO 664 if (old as i64)>0 { 665 let got: i64=pb_read_bounded(path,old,n+1) 666 if got==(0-2){if fsx_write(path,body,n)==n{rc=rm_sync(path)}}else{if pb_same_bytes(body,n,old,got)==1{rc=rm_sync(path)}else{if got>=0{rc=PB_RC_CONFLICT}}} 667 sys_munmap(old,n+1) 668 } 669 if sys_close(fd)!=0{rc=FSX_RC_IO} 670 sys_munmap(path,PB_PATH);sys_munmap(lock,PB_PATH);sys_munmap(p as *u8,8) 671 return rc 672} 673func rm_cleanup(body: *u8,digest: *u8,v: *i64,receipt: *u8,pos: *i64,prefix: *u8) -> i64 { 674 if (v as i64)>0{var i: i64=0;while i<RM_FIELDS{if v[i]!=0{sys_munmap(v[i] as *u8,vw_slen(v[i] as *u8)+1)};i=i+1};sys_munmap(v as *u8,RM_VALUES_BYTES)} 675 if (body as i64)>0{sys_munmap(body,PB_CONFCAP+1)};if (digest as i64)>0{sys_munmap(digest,PB_SHA_HEX+1)} 676 if (receipt as i64)>0{sys_munmap(receipt,PB_PATH)};if (pos as i64)>0{sys_munmap(pos as *u8,8)};if (prefix as i64)>0{sys_munmap(prefix,PB_PATH)} 677 return 0 678} 679 680 // Prepare only registered paths. Each directory is opened relative to a retained 681 // parent descriptor without following symlinks; file publication remains separate. 682func pb_prepare_path(site:*u8,rel:*u8)->i64 { 683 if pb_traversal(site)!=0||pb_traversal(rel)!=0{return FSX_RC_DENIED} 684 var i:i64=0 685 while site[i]!=0 {if site[i]==47{return FSX_RC_DENIED};i=i+1} 686 if i==0||vw_slen(rel)==0||vw_slen(rel)>=PB_PATH{return PB_RC_USAGE} 687 let conf:*u8=sys_mmap(PB_CONFCAP);let spans:*i64=sys_mmap(PB_SPANCAP) as *i64 688 let prefix:*u8=sys_mmap(PB_PATH);let component:*u8=sys_mmap(PB_PATH) 689 if (conf as i64)<=0||(spans as i64)<=0||(prefix as i64)<=0||(component as i64)<=0{return FSX_RC_IO} 690 var rc:i64=FSX_RC_DENIED 691 if pl_site_lookup("knowledge/pub_sites.conf",site,conf,spans)==1 { 692 if spans[3]-spans[2]<PB_PATH{ 693 pl_span_cstr(conf,spans[2],spans[3],prefix) 694 if pl_check(prefix,rel)==PL_OK{rc=0} 695 } 696 } 697 sys_munmap(conf,PB_CONFCAP);sys_munmap(spans as *u8,PB_SPANCAP);sys_munmap(prefix,PB_PATH) 698 if rc!=0{sys_munmap(component,PB_PATH);return rc} 699 // Validate every component before creating any directories. 700 i=0;var start:i64=0 701 while 1 { 702 if rel[i]==47||rel[i]==0{ 703 let n:i64=i-start 704 if n==0||(n==1&&rel[start]==46)||(n==2&&rel[start]==46&&rel[start+1]==46){sys_munmap(component,PB_PATH);return FSX_RC_DENIED} 705 if rel[i]==0{break};start=i+1 706 };i=i+1 707 } 708 var parent:i64=__syscall(SYS_OPENAT,AT_FDCWD,"sites" as *u8,O_RDONLY|O_DIRECTORY|O_NOFOLLOW|O_CLOEXEC,0,0,0) 709 if parent<0{sys_munmap(component,PB_PATH);return FSX_RC_IO} 710 let sitefd:i64=__syscall(SYS_OPENAT,parent,site,O_RDONLY|O_DIRECTORY|O_NOFOLLOW|O_CLOEXEC,0,0,0) 711 sys_close(parent) 712 if sitefd<0{sys_munmap(component,PB_PATH);return FSX_RC_IO} 713 parent=sitefd;i=0;start=0 714 while rel[i]!=0{ 715 if rel[i]==47{ 716 var j:i64=0;while start+j<i{component[j]=rel[start+j];j=j+1};component[j]=0 as u8 717 var child:i64=__syscall(SYS_OPENAT,parent,component,O_RDONLY|O_DIRECTORY|O_NOFOLLOW|O_CLOEXEC,0,0,0) 718 if child==(0-2){ 719 // Same Nishi mkdirat ABI as sys_mkdir; descriptor-relative variant. 720 let made:i64=__syscall(34,parent,component,0x1ed,0,0,0) 721 if made!=0&&made!=(0-17){rc=FSX_RC_IO;break} 722 if sys_fsync(parent)!=0{rc=FSX_RC_IO;break} 723 child=__syscall(SYS_OPENAT,parent,component,O_RDONLY|O_DIRECTORY|O_NOFOLLOW|O_CLOEXEC,0,0,0) 724 } 725 if child<0{rc=FSX_RC_IO;break} 726 sys_close(parent);parent=child;start=i+1 727 };i=i+1 728 } 729 if sys_close(parent)!=0{rc=FSX_RC_IO} 730 sys_munmap(component,PB_PATH) 731 return rc 732} 733 734 735// je_emit_string_raw owns RFC8259 escaping; retain this writer only for one output string. 736const RM_JSON_WRITER_BYTES:i64=__size_of(JsonWriter) 737func rm_put_escaped(s:*u8)->i64{ 738 let n:i64=vw_slen(s) 739 // A byte may expand to six ASCII bytes (backslash-u00XX), plus two quotes. 740 if n>(PB_I64_MAX-2)/6{return FSX_RC_IO} 741 let cap:i64=n*6+2 742 let b:*u8=sys_mmap_try(cap);let w:*JsonWriter=sys_mmap_try(RM_JSON_WRITER_BYTES) as *JsonWriter 743 var rc:i64=FSX_RC_IO 744 if (b as i64)>0&&(w as i64)>0{ 745 w.buf=b;w.pos=0;w.cap=cap;w.depth=0;w.prior=0 as *u8 746 if je_emit_string_raw(w,s,n)==0{ 747 let count:i64=w.pos-2 748 if sys_write(1,((b as i64)+1) as *u8,count)==count{rc=0} 749 } 750 } 751 if (w as i64)>0{if sys_munmap(w as *u8,RM_JSON_WRITER_BYTES)!=0{rc=FSX_RC_IO}} 752 if (b as i64)>0{if sys_munmap(b,cap)!=0{rc=FSX_RC_IO}} 753 return rc 754} 755func rm_prepare_emit(v:*i64,digest:*u8,observed:i64)->i64 { 756 var state:*u8="registration-conflict";var action:*u8="choose-new-immutable-dependency-path" 757 var planned:*u8="none";var rc:i64=PB_RC_CONFLICT 758 if observed==PR_OK{state="ready";action="execute-unchanged-manifest";planned="existing-only";rc=0} 759 if observed==PR_MISSING{ 760 state="registration-missing";action="explicit-registration-authorization-required";planned="allow" 761 if fsx_seq(v[11] as *u8,"allow")==1{state="ready-registration-required";action="execute-authorized-registration";rc=0} 762 } 763 if observed==PR_IO{state="registry-unavailable";action="repair-existing-registry";rc=FSX_RC_IO} 764 if observed==PR_INVALID{state="invalid-registration-identity";action="correct-manifest";rc=PB_RC_USAGE} 765 fsx_puts("{\"schema\":\"site-release-preparation/v1\",\"state\":\"");if rm_put_escaped(state)!=0{return FSX_RC_IO} 766 fsx_puts("\",\"next\":\"");if rm_put_escaped(action)!=0{return FSX_RC_IO};fsx_puts("\",\"registration_observed_code\":");fsx_putn(observed) 767 fsx_puts(",\"registration_requested\":\"");if rm_put_escaped(v[11] as *u8)!=0{return FSX_RC_IO} 768 fsx_puts("\",\"registration_needed\":\"");if rm_put_escaped(planned)!=0{return FSX_RC_IO} 769 fsx_puts("\",\"manifest_sha256\":\"");if rm_put_escaped(digest)!=0{return FSX_RC_IO} 770 fsx_puts("\",\"site\":\"");if rm_put_escaped(v[1] as *u8)!=0{return FSX_RC_IO} 771 fsx_puts("\",\"consumer_source\":\"");if rm_put_escaped(v[2] as *u8)!=0{return FSX_RC_IO} 772 fsx_puts("\",\"consumer_path\":\"");if rm_put_escaped(v[3] as *u8)!=0{return FSX_RC_IO} 773 fsx_puts("\",\"consumer_sha256\":\"");if rm_put_escaped(v[4] as *u8)!=0{return FSX_RC_IO} 774 fsx_puts("\",\"consumer_bytes\":");fsx_putn(pb_sized_bytes(v[5] as *u8)) 775 fsx_puts(",\"dependency_path\":\"");if rm_put_escaped(v[8] as *u8)!=0{return FSX_RC_IO} 776 fsx_puts("\",\"dependency_sha256\":\"");if rm_put_escaped(v[9] as *u8)!=0{return FSX_RC_IO} 777 fsx_puts("\",\"dependency_bytes\":");fsx_putn(pb_sized_bytes(v[10] as *u8)) 778 fsx_puts(",\"expected_live\":\"");if rm_put_escaped(v[6] as *u8)!=0{return FSX_RC_IO} 779 fsx_puts("\",\"source_identity\":\"verified-exact-bytes-and-sha256\",\"dependency_binding\":\"identity-and-literal-reference-only\",\"build_qualification\":null,\"served_identity\":null,\"live_precondition\":\"rechecked-by-locked-publish\",\"registry_recheck\":\"required-at-execution\",\"published\":false,\"registration_writes\":0,\"publication_writes\":0,\"rc\":");fsx_putn(rc);fsx_puts("}\n") 780 return rc 781} 782func rm_prepare_main(argc:i64,argv:*i64)->i64 { 783 if argc!=4{return PB_RC_USAGE};if pr_hash_ok(argv[3] as *u8)!=1{return PB_RC_USAGE} 784 let body:*u8=sys_mmap_try(PB_CONFCAP+1);let digest:*u8=sys_mmap_try(PB_SHA_HEX+1) 785 let v:*i64=sys_mmap_try(RM_VALUES_BYTES) as *i64;let prefix:*u8=sys_mmap_try(PB_PATH) 786 if (v as i64)>0{var i:i64=0;while i<RM_FIELDS{v[i]=0;i=i+1}} 787 var rc:i64=FSX_RC_IO 788 if (body as i64)>0&&(digest as i64)>0&&(v as i64)>0&&(prefix as i64)>0{ 789 let n:i64=pb_read_bounded(argv[2] as *u8,body,PB_CONFCAP+1) 790 if n>0&&n<=PB_CONFCAP{ 791 pb_hash(body,n,digest) 792 if fsx_seq(digest,argv[3] as *u8)==1{ 793 rc=rm_parse(body,n,v) 794 if rc==0{ 795 rc=rm_preflight(v,prefix) 796 if rc==0{rc=rm_prepare_emit(v,digest,pr_observe(prefix,v[8] as *u8,v[9] as *u8))} 797 else{fsx_puts("{\"schema\":\"site-release-preparation/v1\",\"state\":\"preflight-refused\",\"source_identity\":null,\"published\":false,\"rc\":");fsx_putn(rc);fsx_puts("}\n")} 798 } 799 }else{rc=PB_RC_CONFLICT;fsx_puts("{\"schema\":\"site-release-preparation/v1\",\"state\":\"manifest-hash-conflict\",\"published\":false}\n")} 800 }else{rc=PB_RC_USAGE} 801 } 802 rm_cleanup(body,digest,v,0 as *u8,0 as *i64,prefix) 803 return rc 804}