code wiki / _hdl_build / nx_uiq_sentinel_lib.nx
`nx_uiq_sentinel_lib.nx` source

↩ module page · 477 lines · 19281 B
1// nx_uiq_sentinel_lib.nx -- F106c: the zero-Claude experiential sentinel (console + atree composed).
2// baseline = bless the CURRENT docroot: copy each live page + record its console error/warning counts
3// and ARIA-tree node count into a manifest. check = re-audit every baselined page NOW and classify:
4//   MISSING            page gone from the docroot                       -> verdict REGRESSED
5//   CONSOLE-REGRESSED  console errors NOW > errors at baseline          -> verdict REGRESSED
6//   STRUCT-DRIFT       Zhang-Shasha TED(baseline, now) > 0              -> verdict DRIFT (review)
7//   NEW                page in docroot but not in the manifest          -> counted, note only
8// A cron can run `check` forever with zero sessions; a non-CLEAN verdict is the signal to look.
9// HONEST ENVELOPE: page cap 256 declared; TED refused (capped++) when a tree exceeds 512 nodes;
10// baseline read-failures counted loudly; detail rows capped at 40 with a capped flag.
11// license_tier: ORIGINAL  genealogy: F106c; composes nx_uiq_console_lib + nx_uiq_atree_lib
12import "nx_uiq_atree_lib.nx"
13const US_MAGIC_65536: i64 = 65536
14const US_MAGIC_1024: i64 = 1024
15
16const US_CAP_PAGES: i64 = 256
17const US_CAP_DETAIL: i64 = 40
18const US_ARENA: i64 = 32768
19
20func us_cat(dst: *u8, off: i64, src: *u8) -> i64 {
  var k: i64 = 0
  var o: i64 = off
  while src[k]!=(0 as u8) { dst[o]=src[k]; o=o+1; k=k+1 }
  dst[o]=(0 as u8)
  return o
26}
27
28func us_itoa(dst: *u8, off: i64, v: i64) -> i64 {
  if v==0 { dst[off]=(48 as u8); dst[off+1]=(0 as u8); return off+1 }
  var neg: i64 = 0
  var x: i64 = v
  if x<0 { neg=1; x=0-x }
  let tmp: *u8 = sys_mmap(32)
  var t: i64 = 0
  while x>0 { let dg: i64 = x % 10; tmp[t]=(dg+48) as u8; t=t+1; x=x/10 }
  var o: i64 = off
  if neg==1 { dst[o]=(45 as u8); o=o+1 }
  while t>0 { t=t-1; dst[o]=tmp[t]; o=o+1 }
  dst[o]=(0 as u8)
  return o
41}
42
43func us_atoi(buf: *u8, off: i64, out: *i64) -> i64 {
  var o: i64 = off
  var v: i64 = 0
  var d: i64 = 0
  while d==0 {
      let c: i64 = buf[o] as i64
      if c>=48 { if c<=57 { v=v*10+c-48; o=o+1 } else { d=1 } } else { d=1 }
  }
  out[0]=v
  return o
53}
54
55func us_ends(s: *u8, lit: *u8) -> i64 {
  let sl: i64 = cs_len(s)
  let ll: i64 = cs_len(lit)
  if ll>sl { return 0 }
  var k: i64 = 0
  while k<ll { let a: i64=s[sl-ll+k] as i64; let b: i64=lit[k] as i64; if a!=b { return 0 } k=k+1 }
  return 1
62}
63
64func us_has(s: *u8, lit: *u8) -> i64 {
  let sl: i64 = cs_len(s)
  let o: i64 = cs_find_from(s, sl, 0, lit)
  if o>=0 { return 1 }
  return 0
69}
70
71func us_write(path: *u8, buf: *u8, n: i64) -> i64 {
  let fd: i64 = sys_openat_wr(path, 420)
  if fd<0 { return 0 }
  var w: i64 = 0
  while w<n { let r: i64 = sys_write(fd, ((buf as i64)+w) as *u8, n-w); if r<=0 { sys_close(fd); return 0 } w=w+r }
  sys_close(fd)
  return 1
78}
79
80// scan a directory for live .html pages (skips .prev/.bak). names -> arena as cstrs, offs[i]=arena off.
81func us_scan_dir(dir: *u8, arena: *u8, offs: *i64, cap: i64) -> i64 {
  let fd: i64 = sys_openat_rd(dir)
  if fd<0 { return 0-1 }
  let db: *u8 = sys_mmap(US_MAGIC_65536)
  var cnt: i64 = 0
  var ao: i64 = 0
  var done: i64 = 0
  while done==0 {
      let nr: i64 = sys_getdents64(fd, db, US_MAGIC_65536)
      if nr<=0 { done=1 } else {
          var off: i64 = 0
          while off<nr {
              let rec: *u8 = ((db as i64)+off) as *u8
              let ty: i64 = dirent_type(rec)
              let nm: *u8 = dirent_name(rec)
              if ty==8 {
                  var keep: i64 = 0
                  if us_ends(nm, ".html" as *u8)==1 { keep=1 }
                  if keep==1 { if us_has(nm, ".prev" as *u8)==1 { keep=0 } }
                  if keep==1 { if us_has(nm, ".bak" as *u8)==1 { keep=0 } }
                  if keep==1 {
                      if cnt<cap {
                          if ao<US_ARENA-260 {
                              offs[cnt]=ao
                              ao = us_cat(arena, ao, nm)
                              ao=ao+1
                              cnt=cnt+1
                          }
                      }
                  }
              }
              let rl: i64 = dirent_reclen(rec)
              off=off+rl
          }
      }
  }
  sys_close(fd)
  return cnt
119}
120
121// read names from a list file (one per line) -> arena/offs
122func us_read_list(listfile: *u8, arena: *u8, offs: *i64, cap: i64) -> i64 {
  let lb: *u8 = sys_mmap(US_MAGIC_65536)
  let n: i64 = cs_slurp(listfile, lb, US_MAGIC_65536)
  if n<=0 { return 0-1 }
  var cnt: i64 = 0
  var ao: i64 = 0
  var i: i64 = 0
  while i<n {
      var e: i64 = i
      var d: i64 = 0
      while d==0 { if e>=n { d=1 } else { let c: i64=lb[e] as i64; if c==10 || c==13 { d=1 } else { e=e+1 } } }
      if e>i {
          if cnt<cap {
              offs[cnt]=ao
              var q: i64 = i
              while q<e { arena[ao]=lb[q]; ao=ao+1; q=q+1 }
              arena[ao]=(0 as u8)
              ao=ao+1
              cnt=cnt+1
          }
      }
      i=e+1
  }
  return cnt
146}
147
148// warnings from the console lib's last audit (g_cls filled by cs_audit_buf)
149func us_last_warns() -> i64 {
  let g: *i64 = g_cls
  return g[1]+g[4]+g[7]
152}
153
154// baseline: for each page, copy + manifest row `name\terrs\twarns\tnodes`. emit=1 prints JSON summary.
155// dirz = docroot dir; listfile 0 => scan dirz. Returns pages baselined.
156func us_baseline(dirz: *u8, prefix: *u8, listfile: *u8, emit: i64) -> i64 {
  let arena: *u8 = sys_mmap(US_ARENA)
  let offs: *i64 = sys_mmap(US_CAP_PAGES*8) as *i64
  var cnt: i64 = 0
  if (listfile as i64)!=0 { cnt = us_read_list(listfile, arena, offs, US_CAP_PAGES) } else { cnt = us_scan_dir(dirz, arena, offs, US_CAP_PAGES) }
  if cnt<0 { if emit==1 { uiq_w("{\"organ\":\"nx_uiq_sentinel\",\"verb\":\"baseline\",\"error\":\"cannot enumerate pages\"}\n" as *u8) } return 0-1 }
  let pg: *u8 = sys_mmap(CS_CAP_BUF)
  let pb: *u8 = sys_mmap(US_MAGIC_1024)
  let mf: *u8 = sys_mmap(US_MAGIC_65536)
  var mo: i64 = 0
  var okc: i64 = 0
  var fail: i64 = 0
  var i: i64 = 0
  while i<cnt {
      let no: i64 = offs[i]
      let nm: *u8 = ((arena as i64)+no) as *u8
      var po: i64 = 0
      po = us_cat(pb, 0, dirz)
      po = us_cat(pb, po, "/" as *u8)
      po = us_cat(pb, po, nm)
      let n: i64 = cs_slurp(pb, pg, CS_CAP_BUF)
      if n<=0 { fail=fail+1 } else {
          let errs: i64 = cs_audit_buf(pg, n, 0)
          let warns: i64 = us_last_warns()
          let t: *i64 = sys_mmap(AT_SLOTS*8) as *i64
          let nn: i64 = at_build(pg, n, t)
          var do2: i64 = 0
          do2 = us_cat(pb, 0, prefix)
          do2 = us_cat(pb, do2, nm)
          let wr: i64 = us_write(pb, pg, n)
          if wr==0 { fail=fail+1 } else {
              mo = us_cat(mf, mo, nm)
              mf[mo]=(9 as u8)
              mo=mo+1
              mo = us_itoa(mf, mo, errs)
              mf[mo]=(9 as u8)
              mo=mo+1
              mo = us_itoa(mf, mo, warns)
              mf[mo]=(9 as u8)
              mo=mo+1
              mo = us_itoa(mf, mo, nn-1)
              mf[mo]=(10 as u8)
              mo=mo+1
              okc=okc+1
          }
      }
      i=i+1
  }
  var mp: i64 = 0
  mp = us_cat(pb, 0, prefix)
  mp = us_cat(pb, mp, "manifest.txt" as *u8)
  let mw: i64 = us_write(pb, mf, mo)
  if emit==1 {
      uiq_w("{\"organ\":\"nx_uiq_sentinel\",\"verb\":\"baseline\",\"pages\":" as *u8)
      uiq_pn(okc)
      uiq_w(",\"readfail\":" as *u8)
      uiq_pn(fail)
      uiq_w(",\"manifest_write\":" as *u8)
      uiq_pn(mw)
      uiq_w(",\"env\":\"page-cap-256;html-only;prev-bak-skipped\"}\n" as *u8)
  }
  return okc
218}
219
220// check: classify every manifest row. out[0]=pages out[1]=missing out[2]=regressed out[3]=drift
221// out[4]=new(-1 = not scanned) out[5]=ted_capped. emit=1 prints JSON w/ detail. doscan=1 => NEW detection.
222func us_check(dirz: *u8, prefix: *u8, out: *i64, emit: i64, doscan: i64) -> i64 {
  let pb: *u8 = sys_mmap(US_MAGIC_1024)
  var mp: i64 = 0
  mp = us_cat(pb, 0, prefix)
  mp = us_cat(pb, mp, "manifest.txt" as *u8)
  let mf: *u8 = sys_mmap(US_MAGIC_65536)
  let mn: i64 = cs_slurp(pb, mf, US_MAGIC_65536)
  out[0]=0
  out[1]=0
  out[2]=0
  out[3]=0
  out[4]=0-1
  out[5]=0
  if mn<=0 { if emit==1 { uiq_w("{\"organ\":\"nx_uiq_sentinel\",\"verb\":\"check\",\"error\":\"no manifest\"}\n" as *u8) } return 0-1 }
  let cur: *u8 = sys_mmap(CS_CAP_BUF)
  let bas: *u8 = sys_mmap(CS_CAP_BUF)
  let nmb: *u8 = sys_mmap(512)
  let iv: *i64 = sys_mmap(32) as *i64
  var dn: i64 = 0
  var dcapped: i64 = 0
  if emit==1 { uiq_w("{\"organ\":\"nx_uiq_sentinel\",\"verb\":\"check\",\"detail\":[" as *u8) }
  var i: i64 = 0
  while i<mn {
      var e: i64 = i
      var d: i64 = 0
      while d==0 { if e>=mn { d=1 } else { let c: i64=mf[e] as i64; if c==9 { d=1 } else { e=e+1 } } }
      if e>=mn { i=mn } else {
          var q: i64 = i
          var no2: i64 = 0
          while q<e { nmb[no2]=mf[q]; no2=no2+1; q=q+1 }
          nmb[no2]=(0 as u8)
          var p2: i64 = e+1
          p2 = us_atoi(mf, p2, iv)
          let base_errs: i64 = iv[0]
          p2=p2+1
          p2 = us_atoi(mf, p2, iv)
          p2=p2+1
          p2 = us_atoi(mf, p2, iv)
          var d2: i64 = 0
          while d2==0 { if p2>=mn { d2=1 } else { let c2: i64=mf[p2] as i64; if c2==10 { d2=1 } else { p2=p2+1 } } }
          i=p2+1
          out[0]=out[0]+1
          var po: i64 = 0
          po = us_cat(pb, 0, dirz)
          po = us_cat(pb, po, "/" as *u8)
          po = us_cat(pb, po, nmb)
          let cn: i64 = cs_slurp(pb, cur, CS_CAP_BUF)
          if cn<=0 {
              out[1]=out[1]+1
              if emit==1 { if dn<US_CAP_DETAIL { if dn>0 { uiq_w("," as *u8) } uiq_w("{\"p\":\"" as *u8); uiq_w(nmb); uiq_w("\",\"k\":\"missing\"}" as *u8); dn=dn+1 } else { dcapped=1 } }
          } else {
              let errs_now: i64 = cs_audit_buf(cur, cn, 0)
              if errs_now>base_errs {
                  out[2]=out[2]+1
                  if emit==1 { if dn<US_CAP_DETAIL { if dn>0 { uiq_w("," as *u8) } uiq_w("{\"p\":\"" as *u8); uiq_w(nmb); uiq_w("\",\"k\":\"console-regressed\",\"was\":" as *u8); uiq_pn(base_errs); uiq_w(",\"now\":" as *u8); uiq_pn(errs_now); uiq_w("}" as *u8); dn=dn+1 } else { dcapped=1 } }
              }
              var bo: i64 = 0
              bo = us_cat(pb, 0, prefix)
              bo = us_cat(pb, bo, nmb)
              let bn: i64 = cs_slurp(pb, bas, CS_CAP_BUF)
              if bn<=0 {
                  out[1]=out[1]+1
                  if emit==1 { if dn<US_CAP_DETAIL { if dn>0 { uiq_w("," as *u8) } uiq_w("{\"p\":\"" as *u8); uiq_w(nmb); uiq_w("\",\"k\":\"baseline-unreadable\"}" as *u8); dn=dn+1 } else { dcapped=1 } }
              } else {
                  let ta: *i64 = sys_mmap(AT_SLOTS*8) as *i64
                  let tb: *i64 = sys_mmap(AT_SLOTS*8) as *i64
                  at_build(bas, bn, ta)
                  at_build(cur, cn, tb)
                  let td: i64 = at_ted(ta, tb)
                  if td<0 { out[5]=out[5]+1 } else {
                      if td>0 {
                          out[3]=out[3]+1
                          if emit==1 { if dn<US_CAP_DETAIL { if dn>0 { uiq_w("," as *u8) } uiq_w("{\"p\":\"" as *u8); uiq_w(nmb); uiq_w("\",\"k\":\"struct-drift\",\"ted\":" as *u8); uiq_pn(td); uiq_w("}" as *u8); dn=dn+1 } else { dcapped=1 } }
                      }
                  }
              }
          }
      }
  }
  if doscan==1 {
      let sarena: *u8 = sys_mmap(US_ARENA)
      let soffs: *i64 = sys_mmap(US_CAP_PAGES*8) as *i64
      let sc: i64 = us_scan_dir(dirz, sarena, soffs, US_CAP_PAGES)
      if sc>=0 {
          var nw: i64 = 0
          var s: i64 = 0
          while s<sc {
              let sno: i64 = soffs[s]
              let snm: *u8 = ((sarena as i64)+sno) as *u8
              let sl2: i64 = cs_len(snm)
              var fnd: i64 = 0
              var mi: i64 = 0
              while mi<mn {
                  var me: i64 = mi
                  var d3: i64 = 0
                  while d3==0 { if me>=mn { d3=1 } else { let c3: i64=mf[me] as i64; if c3==9 { d3=1 } else { me=me+1 } } }
                  if me>=mn { mi=mn } else {
                      var eq2: i64 = 0
                      if me-mi==sl2 {
                          var y: i64 = 0
                          eq2=1
                          while y<sl2 { let ca: i64=mf[mi+y] as i64; let cb: i64=snm[y] as i64; if ca!=cb { eq2=0; y=sl2 } else { y=y+1 } }
                      }
                      if eq2==1 { fnd=1; mi=mn } else {
                          var mnl: i64 = mi
                          var d4: i64 = 0
                          while d4==0 { if mnl>=mn { d4=1 } else { let c4: i64=mf[mnl] as i64; if c4==10 { d4=1 } else { mnl=mnl+1 } } }
                          mi=mnl+1
                      }
                  }
              }
              if fnd==0 { nw=nw+1 }
              s=s+1
          }
          out[4]=nw
      }
  }
  if emit==1 {
      uiq_w("],\"detail_capped\":" as *u8)
      uiq_pn(dcapped)
      uiq_w(",\"pages\":" as *u8)
      uiq_pn(out[0])
      uiq_w(",\"missing\":" as *u8)
      uiq_pn(out[1])
      uiq_w(",\"console_regressed\":" as *u8)
      uiq_pn(out[2])
      uiq_w(",\"struct_drift\":" as *u8)
      uiq_pn(out[3])
      uiq_w(",\"new_pages\":" as *u8)
      uiq_pn(out[4])
      uiq_w(",\"ted_capped\":" as *u8)
      uiq_pn(out[5])
      uiq_w(",\"verdict\":\"" as *u8)
      var bad: i64 = out[1]+out[2]
      if bad>0 { uiq_w("REGRESSED" as *u8) } else { if out[3]>0 { uiq_w("DRIFT" as *u8) } else { uiq_w("CLEAN" as *u8) } }
      uiq_w("\",\"env\":\"page-cap-256;detail-cap-40;ted-cap-512-counted;regressed=missing-or-console-errors-up;drift=ted-gt-0\"}\n" as *u8)
  }
  return 0
360}
361
362// cron entry: argless default check with bootstrap defaults (rule-17: args override via `check`),
363// appends ONE `verdict=`-anchored line to knowledge/status/uiq_sentinel.log (O_APPEND) + echoes it.
364// the one verdict-string resolver (DRY -- log line + JSON endpoint share it). r<0 => NO-MANIFEST.
365func us_verdict(d: *u8, o: i64, r: i64, out: *i64) -> i64 {
  var bad: i64 = out[1]+out[2]
  if r<0 { return us_cat(d, o, "NO-MANIFEST" as *u8) }
  if bad>0 { return us_cat(d, o, "REGRESSED" as *u8) }
  if out[3]>0 { return us_cat(d, o, "DRIFT" as *u8) }
  return us_cat(d, o, "CLEAN" as *u8)
371}
372
373// API SURFACE (2026-07-23): the sentinel's live verdict as a machine-readable GET endpoint, mirroring
374// the docroot health.json pattern -- consumable by any monitor/dashboard with NO MCP/cap. Written atomic
375// (truncating us_write) to the docroot on every cron run; served at https://nishifamily.com/experiential.json
376func us_emit_json(path: *u8, now: i64, r: i64, out: *i64) -> i64 {
  let jb: *u8 = sys_mmap(US_MAGIC_1024)
  var j: i64 = 0
  j = us_cat(jb, 0, "{\"organ\":\"nx_uiq_sentinel\",\"ts\":" as *u8)
  j = us_itoa(jb, j, now)
  j = us_cat(jb, j, ",\"pages\":" as *u8)
  j = us_itoa(jb, j, out[0])
  j = us_cat(jb, j, ",\"missing\":" as *u8)
  j = us_itoa(jb, j, out[1])
  j = us_cat(jb, j, ",\"regressed\":" as *u8)
  j = us_itoa(jb, j, out[2])
  j = us_cat(jb, j, ",\"drift\":" as *u8)
  j = us_itoa(jb, j, out[3])
  j = us_cat(jb, j, ",\"new\":" as *u8)
  j = us_itoa(jb, j, out[4])
  j = us_cat(jb, j, ",\"ted_capped\":" as *u8)
  j = us_itoa(jb, j, out[5])
  j = us_cat(jb, j, ",\"verdict\":\"" as *u8)
  j = us_verdict(jb, j, r, out)
  j = us_cat(jb, j, "\",\"env\":\"static-source-scan;console+atree composed;page-cap-256;ted-cap-512-refused\"}\n" as *u8)
  return us_write(path, jb, j)
397}
398
399func us_cron() -> i64 {
  let out: *i64 = sys_mmap(64) as *i64
  let r: i64 = us_check("sites/nishifamily" as *u8, "knowledge/uiqbase-" as *u8, out, 0, 1)
  let lb: *u8 = sys_mmap(512)
  var o: i64 = 0
  o = us_cat(lb, 0, "ts=" as *u8)
  let now: i64 = sys_now_realtime_sec()
  us_emit_json("sites/nishifamily/experiential.json" as *u8, now, r, out)
  o = us_itoa(lb, o, now)
  o = us_cat(lb, o, " pages=" as *u8)
  o = us_itoa(lb, o, out[0])
  o = us_cat(lb, o, " missing=" as *u8)
  o = us_itoa(lb, o, out[1])
  o = us_cat(lb, o, " regressed=" as *u8)
  o = us_itoa(lb, o, out[2])
  o = us_cat(lb, o, " drift=" as *u8)
  o = us_itoa(lb, o, out[3])
  o = us_cat(lb, o, " new=" as *u8)
  o = us_itoa(lb, o, out[4])
  o = us_cat(lb, o, " capped=" as *u8)
  o = us_itoa(lb, o, out[5])
  o = us_cat(lb, o, " verdict=" as *u8)
  o = us_verdict(lb, o, r, out)
  lb[o]=(10 as u8)
  o=o+1
  lb[o]=(0 as u8)
  let fd: i64 = sys_openat_append("knowledge/status/uiq_sentinel.log" as *u8, 420)
  if fd<0 { uiq_w("UIQ-SENTINEL log-open-fail\n" as *u8); return 3 }
  sys_write(fd, lb, o)
  sys_close(fd)
  uiq_w(lb)
  return 0
431}
432
433// selftest: full lifecycle on kat-prefixed CWD files. 0 = GREEN.
434func us_selftest() -> i64 {
  var f: i64 = 0
  let a0: *u8 = "<nav><a href=\"/x\">X</a></nav><main><h1 id=\"m\">T</h1></main>" as *u8
  let b0: *u8 = "<main id=\"q\"><h1>B</h1></main>" as *u8
  let a0l: i64 = cs_len(a0)
  let b0l: i64 = cs_len(b0)
  us_write("uiqsentkat_a.html" as *u8, a0, a0l)
  us_write("uiqsentkat_b.html" as *u8, b0, b0l)
  let lst: *u8 = "uiqsentkat_a.html\nuiqsentkat_b.html\n" as *u8
  let lstl: i64 = cs_len(lst)
  us_write("uiqsentkat_list.txt" as *u8, lst, lstl)
  let bl: i64 = us_baseline("." as *u8, "uiqsentkat-" as *u8, "uiqsentkat_list.txt" as *u8, 0)
  if bl!=2 { f=f+1 }
  let out: *i64 = sys_mmap(64) as *i64
  us_check("." as *u8, "uiqsentkat-" as *u8, out, 0, 0)
  if out[0]!=2 { f=f+1 }
  if out[1]!=0 { f=f+1 }
  if out[2]!=0 { f=f+1 }
  if out[3]!=0 { f=f+1 }
  let b1: *u8 = "<main id=\"q\"><h1 id=\"q\">B</h1></main>" as *u8
  let b1l: i64 = cs_len(b1)
  us_write("uiqsentkat_b.html" as *u8, b1, b1l)
  us_check("." as *u8, "uiqsentkat-" as *u8, out, 0, 0)
  if out[2]!=1 { f=f+1 }
  if out[3]!=0 { f=f+1 }
  let a1: *u8 = "<nav><a href=\"/x\">X</a></nav><main><h1 id=\"m\">T</h1></main><footer></footer>" as *u8
  let a1l: i64 = cs_len(a1)
  us_write("uiqsentkat_a.html" as *u8, a1, a1l)
  us_check("." as *u8, "uiqsentkat-" as *u8, out, 0, 0)
  if out[3]!=1 { f=f+1 }
  if out[2]!=1 { f=f+1 }
  let mf2: *u8 = sys_mmap(US_MAGIC_65536)
  let mn2: i64 = cs_slurp("uiqsentkat-manifest.txt" as *u8, mf2, US_MAGIC_65536)
  if mn2<=0 { f=f+1 } else {
      let gh: *u8 = "uiqsentkat_ghost.html\t0\t0\t1\n" as *u8
      var go: i64 = mn2
      var gk: i64 = 0
      while gh[gk]!=(0 as u8) { mf2[go]=gh[gk]; go=go+1; gk=gk+1 }
      us_write("uiqsentkat-manifest.txt" as *u8, mf2, go)
      us_check("." as *u8, "uiqsentkat-" as *u8, out, 0, 0)
      if out[1]!=1 { f=f+1 }
  }
  return f
477}
nx_uiq_sentinel_lib.nx source

`nx_uiq_sentinel_lib.nx` source
