chadtmiller.com
An ATProto Lexicon validator for Gleam.
add browser-compatible JavaScript build
- exclude CLI functions from JS target with @target(erlang)
- add build-js.sh script to bundle with esbuild
- output single minified file at dist/honk.min.js (69kb)
- available via jsDelivr CDN without npm publishing
+1
.gitignore
+1
.gitignore
+15
build-js.sh
+15
build-js.sh
+4
dist/honk.min.js
+4
dist/honk.min.js
···
···
1
+
var v=class{withFields(t){let n=Object.keys(this).map(r=>r in t?t[r]:this[r]);return new this.constructor(...n)}},Q=class{static fromArray(t,n){let r=n||new y;for(let i=t.length-1;i>=0;--i)r=new Le(t[i],r);return r}[Symbol.iterator](){return new sr(this)}toArray(){return[...this]}atLeastLength(t){let n=this;for(;t-- >0&&n;)n=n.tail;return n!==void 0}hasLength(t){let n=this;for(;t-- >0&&n;)n=n.tail;return t===-1&&n instanceof y}countLength(){let t=this,n=0;for(;t;)t=t.tail,n++;return n-1}};function F(e,t){return new Le(e,t)}function x(e,t){return Q.fromArray(e,t)}var sr=class{#e;constructor(t){this.#e=t}next(){if(this.#e instanceof y)return{done:!0};{let{head:t,tail:n}=this.#e;return this.#e=n,{value:t,done:!1}}}},y=class extends Q{};var Le=class extends Q{constructor(t,n){super(),this.head=t,this.tail=n}};var ui=e=>e instanceof Le,fi=e=>e.head,ci=e=>e.tail,X=class{bitSize;byteSize;bitOffset;rawBuffer;constructor(t,n,r){if(!(t instanceof Uint8Array))throw globalThis.Error("BitArray can only be constructed from a Uint8Array");if(this.bitSize=n??t.length*8,this.byteSize=Math.trunc((this.bitSize+7)/8),this.bitOffset=r??0,this.bitSize<0)throw globalThis.Error(`BitArray bit size is invalid: ${this.bitSize}`);if(this.bitOffset<0||this.bitOffset>7)throw globalThis.Error(`BitArray bit offset is invalid: ${this.bitOffset}`);if(t.length!==Math.trunc((this.bitOffset+this.bitSize+7)/8))throw globalThis.Error("BitArray buffer length is invalid");this.rawBuffer=t}byteAt(t){if(!(t<0||t>=this.byteSize))return tt(this.rawBuffer,this.bitOffset,t)}equals(t){if(this.bitSize!==t.bitSize)return!1;let n=Math.trunc(this.bitSize/8);if(this.bitOffset===0&&t.bitOffset===0){for(let i=0;i<n;i++)if(this.rawBuffer[i]!==t.rawBuffer[i])return!1;let r=this.bitSize%8;if(r){let i=8-r;if(this.rawBuffer[n]>>i!==t.rawBuffer[n]>>i)return!1}}else{for(let i=0;i<n;i++){let s=tt(this.rawBuffer,this.bitOffset,i),l=tt(t.rawBuffer,t.bitOffset,i);if(s!==l)return!1}let r=this.bitSize%8;if(r){let i=tt(this.rawBuffer,this.bitOffset,n),s=tt(t.rawBuffer,t.bitOffset,n),l=8-r;if(i>>l!==s>>l)return!1}}return!0}get buffer(){if(oi("buffer","Use BitArray.byteAt() or BitArray.rawBuffer instead"),this.bitOffset!==0||this.bitSize%8!==0)throw new globalThis.Error("BitArray.buffer does not support unaligned bit arrays");return this.rawBuffer}get length(){if(oi("length","Use BitArray.bitSize or BitArray.byteSize instead"),this.bitOffset!==0||this.bitSize%8!==0)throw new globalThis.Error("BitArray.length does not support unaligned bit arrays");return this.rawBuffer.length}};function tt(e,t,n){if(t===0)return e[n]??0;{let r=e[n]<<t&255,i=e[n+1]>>8-t;return r|i}}var mn=class{constructor(t){this.value=t}},si={};function oi(e,t){si[e]||(console.warn(`Deprecated BitArray.${e} property used in JavaScript FFI code. ${t}.`),si[e]=!0)}function oe(e,t,n){if(n??=e.bitSize,Vs(e,t,n),t===n)return new X(new Uint8Array);if(t===0&&n===e.bitSize)return e;t+=e.bitOffset,n+=e.bitOffset;let r=Math.trunc(t/8),s=Math.trunc((n+7)/8)-r,l;return r===0&&s===e.rawBuffer.byteLength?l=e.rawBuffer:l=new Uint8Array(e.rawBuffer.buffer,e.rawBuffer.byteOffset+r,s),new X(l,n-t,t%8)}function hn(e){if(e.length===0)return new X(new Uint8Array);if(e.length===1){let l=e[0];return l instanceof X?l:l instanceof Uint8Array?new X(l):new X(new Uint8Array(e))}let t=0,n=!0;for(let l of e)l instanceof X?(t+=l.bitSize,n=!1):l instanceof Uint8Array?(t+=l.byteLength*8,n=!1):t+=8;if(n)return new X(new Uint8Array(e));let r=new Uint8Array(Math.trunc((t+7)/8)),i=0;for(let l of e){let a=i%8===0;if(l instanceof X)if(a&&l.bitOffset===0){r.set(l.rawBuffer,i/8),i+=l.bitSize;let f=l.bitSize%8;if(f!==0){let c=Math.trunc(i/8);r[c]>>=8-f,r[c]<<=8-f}}else s(l.rawBuffer,l.bitSize,l.bitOffset);else l instanceof Uint8Array?a?(r.set(l,i/8),i+=l.byteLength*8):s(l,l.byteLength*8,0):a?(r[i/8]=l,i+=8):s(new Uint8Array([l]),8,0)}function s(l,a,f){if(a===0)return;let c=Math.trunc(a+7/8),$=i%8,_=8-$,w=Math.trunc(i/8);for(let g=0;g<c;g++){let S=tt(l,f,g);a<8&&(S>>=8-a,S<<=8-a),r[w]|=S>>$;let E=a-Math.max(0,a-_);if(a-=E,i+=E,a===0)break;r[++w]=S<<_,E=a-Math.max(0,a-$),a-=E,i+=E}}return new X(r,t)}function Vs(e,t,n){if(t<0||t>e.bitSize||n<t||n>e.bitSize){let r=`Invalid bit array slice: start = ${t}, end = ${n}, bit size = ${e.bitSize}`;throw new globalThis.Error(r)}}var li;function di(e){return li??=new TextEncoder,li.encode(e)}var nt=class e extends v{static isResult(t){return t instanceof e}},o=class extends nt{constructor(t){super(),this[0]=t}isOk(){return!0}},pi=e=>new o(e);var u=class extends nt{constructor(t){super(),this[0]=t}isOk(){return!1}},$i=e=>new u(e);function D(e,t){let n=[e,t];for(;n.length;){let r=n.pop(),i=n.pop();if(r===i)continue;if(!ai(r)||!ai(i)||!Ys(r,i)||Ps(r,i)||Js(r,i)||Gs(r,i)||Zs(r,i)||Ws(r,i)||Hs(r,i))return!1;let l=Object.getPrototypeOf(r);if(l!==null&&typeof l.equals=="function")try{if(r.equals(i))continue;return!1}catch{}let[a,f]=Rs(r),c=a(r),$=a(i);if(c.length!==$.length)return!1;for(let _ of c)n.push(f(r,_),f(i,_))}return!0}function Rs(e){if(e instanceof Map)return[t=>t.keys(),(t,n)=>t.get(n)];{let t=e instanceof globalThis.Error?["message"]:[];return[n=>[...t,...Object.keys(n)],(n,r)=>n[r]]}}function Ps(e,t){return e instanceof Date&&(e>t||e<t)}function Js(e,t){return!(e instanceof X)&&e.buffer instanceof ArrayBuffer&&e.BYTES_PER_ELEMENT&&!(e.byteLength===t.byteLength&&e.every((n,r)=>n===t[r]))}function Gs(e,t){return Array.isArray(e)&&e.length!==t.length}function Zs(e,t){return e instanceof Map&&e.size!==t.size}function Ws(e,t){return e instanceof Set&&(e.size!=t.size||[...e].some(n=>!t.has(n)))}function Hs(e,t){return e instanceof RegExp&&(e.source!==t.source||e.flags!==t.flags)}function ai(e){return typeof e=="object"&&e!==null}function Ys(e,t){return typeof e!="object"&&typeof t!="object"&&(!e||!t)||[Promise,WeakSet,WeakMap,Function].some(r=>e instanceof r)?!1:e.constructor===t.constructor}function It(e,t){return t===0?0:e%t}function Nt(e,t){return Math.trunc(wn(e,t))}function wn(e,t){return t===0?0:e/t}var d=class extends v{constructor(t){super(),this[0]=t}};var A=class extends v{};var _i=new WeakMap,or=new DataView(new ArrayBuffer(8)),lr=0;function ar(e){let t=_i.get(e);if(t!==void 0)return t;let n=lr++;return lr===2147483647&&(lr=0),_i.set(e,n),n}function ur(e,t){return e^t+2654435769+(e<<6)+(e>>2)|0}function cr(e){let t=0,n=e.length;for(let r=0;r<n;r++)t=Math.imul(31,t)+e.charCodeAt(r)|0;return t}function hi(e){or.setFloat64(0,e);let t=or.getInt32(0),n=or.getInt32(4);return Math.imul(73244475,t>>16^t)^n}function Ks(e){return cr(e.toString())}function Xs(e){let t=Object.getPrototypeOf(e);if(t!==null&&typeof t.hashCode=="function")try{let r=e.hashCode(e);if(typeof r=="number")return r}catch{}if(e instanceof Promise||e instanceof WeakSet||e instanceof WeakMap)return ar(e);if(e instanceof Date)return hi(e.getTime());let n=0;if(e instanceof ArrayBuffer&&(e=new Uint8Array(e)),Array.isArray(e)||e instanceof Uint8Array)for(let r=0;r<e.length;r++)n=Math.imul(31,n)+pe(e[r])|0;else if(e instanceof Set)e.forEach(r=>{n=n+pe(r)|0});else if(e instanceof Map)e.forEach((r,i)=>{n=n+ur(pe(r),pe(i))|0});else{let r=Object.keys(e);for(let i=0;i<r.length;i++){let s=r[i],l=e[s];n=n+ur(pe(l),cr(s))|0}}return n}function pe(e){if(e===null)return 1108378658;if(e===void 0)return 1108378659;if(e===!0)return 1108378657;if(e===!1)return 1108378656;switch(typeof e){case"number":return hi(e);case"string":return cr(e);case"bigint":return Ks(e);case"object":return Xs(e);case"symbol":return ar(e);case"function":return ar(e);default:return 0}}var Ee=5,dr=Math.pow(2,Ee),Qs=dr-1,eo=dr/2,to=dr/4,ne=0,Se=1,le=2,He=3,pr={type:le,bitmap:0,array:[]};function qt(e,t){return e>>>t&Qs}function gn(e,t){return 1<<qt(e,t)}function no(e){return e-=e>>1&1431655765,e=(e&858993459)+(e>>2&858993459),e=e+(e>>4)&252645135,e+=e>>8,e+=e>>16,e&127}function $r(e,t){return no(e&t-1)}function $e(e,t,n){let r=e.length,i=new Array(r);for(let s=0;s<r;++s)i[s]=e[s];return i[t]=n,i}function ro(e,t,n){let r=e.length,i=new Array(r+1),s=0,l=0;for(;s<t;)i[l++]=e[s++];for(i[l++]=n;s<r;)i[l++]=e[s++];return i}function fr(e,t){let n=e.length,r=new Array(n-1),i=0,s=0;for(;i<t;)r[s++]=e[i++];for(++i;i<n;)r[s++]=e[i++];return r}function wi(e,t,n,r,i,s){let l=pe(t);if(l===r)return{type:He,hash:l,array:[{type:ne,k:t,v:n},{type:ne,k:i,v:s}]};let a={val:!1};return Ut(_r(pr,e,l,t,n,a),e,r,i,s,a)}function Ut(e,t,n,r,i,s){switch(e.type){case Se:return io(e,t,n,r,i,s);case le:return _r(e,t,n,r,i,s);case He:return so(e,t,n,r,i,s)}}function io(e,t,n,r,i,s){let l=qt(n,t),a=e.array[l];if(a===void 0)return s.val=!0,{type:Se,size:e.size+1,array:$e(e.array,l,{type:ne,k:r,v:i})};if(a.type===ne)return D(r,a.k)?i===a.v?e:{type:Se,size:e.size,array:$e(e.array,l,{type:ne,k:r,v:i})}:(s.val=!0,{type:Se,size:e.size,array:$e(e.array,l,wi(t+Ee,a.k,a.v,n,r,i))});let f=Ut(a,t+Ee,n,r,i,s);return f===a?e:{type:Se,size:e.size,array:$e(e.array,l,f)}}function _r(e,t,n,r,i,s){let l=gn(n,t),a=$r(e.bitmap,l);if((e.bitmap&l)!==0){let f=e.array[a];if(f.type!==ne){let $=Ut(f,t+Ee,n,r,i,s);return $===f?e:{type:le,bitmap:e.bitmap,array:$e(e.array,a,$)}}let c=f.k;return D(r,c)?i===f.v?e:{type:le,bitmap:e.bitmap,array:$e(e.array,a,{type:ne,k:r,v:i})}:(s.val=!0,{type:le,bitmap:e.bitmap,array:$e(e.array,a,wi(t+Ee,c,f.v,n,r,i))})}else{let f=e.array.length;if(f>=eo){let c=new Array(32),$=qt(n,t);c[$]=_r(pr,t+Ee,n,r,i,s);let _=0,w=e.bitmap;for(let g=0;g<32;g++){if((w&1)!==0){let S=e.array[_++];c[g]=S}w=w>>>1}return{type:Se,size:f+1,array:c}}else{let c=ro(e.array,a,{type:ne,k:r,v:i});return s.val=!0,{type:le,bitmap:e.bitmap|l,array:c}}}}function so(e,t,n,r,i,s){if(n===e.hash){let l=mr(e,r);if(l!==-1)return e.array[l].v===i?e:{type:He,hash:n,array:$e(e.array,l,{type:ne,k:r,v:i})};let a=e.array.length;return s.val=!0,{type:He,hash:n,array:$e(e.array,a,{type:ne,k:r,v:i})}}return Ut({type:le,bitmap:gn(e.hash,t),array:[e]},t,n,r,i,s)}function mr(e,t){let n=e.array.length;for(let r=0;r<n;r++)if(D(t,e.array[r].k))return r;return-1}function yn(e,t,n,r){switch(e.type){case Se:return oo(e,t,n,r);case le:return lo(e,t,n,r);case He:return ao(e,r)}}function oo(e,t,n,r){let i=qt(n,t),s=e.array[i];if(s!==void 0){if(s.type!==ne)return yn(s,t+Ee,n,r);if(D(r,s.k))return s}}function lo(e,t,n,r){let i=gn(n,t);if((e.bitmap&i)===0)return;let s=$r(e.bitmap,i),l=e.array[s];if(l.type!==ne)return yn(l,t+Ee,n,r);if(D(r,l.k))return l}function ao(e,t){let n=mr(e,t);if(!(n<0))return e.array[n]}function hr(e,t,n,r){switch(e.type){case Se:return uo(e,t,n,r);case le:return fo(e,t,n,r);case He:return co(e,r)}}function uo(e,t,n,r){let i=qt(n,t),s=e.array[i];if(s===void 0)return e;let l;if(s.type===ne){if(!D(s.k,r))return e}else if(l=hr(s,t+Ee,n,r),l===s)return e;if(l===void 0){if(e.size<=to){let a=e.array,f=new Array(e.size-1),c=0,$=0,_=0;for(;c<i;){let w=a[c];w!==void 0&&(f[$]=w,_|=1<<c,++$),++c}for(++c;c<a.length;){let w=a[c];w!==void 0&&(f[$]=w,_|=1<<c,++$),++c}return{type:le,bitmap:_,array:f}}return{type:Se,size:e.size-1,array:$e(e.array,i,l)}}return{type:Se,size:e.size,array:$e(e.array,i,l)}}function fo(e,t,n,r){let i=gn(n,t);if((e.bitmap&i)===0)return e;let s=$r(e.bitmap,i),l=e.array[s];if(l.type!==ne){let a=hr(l,t+Ee,n,r);return a===l?e:a!==void 0?{type:le,bitmap:e.bitmap,array:$e(e.array,s,a)}:e.bitmap===i?void 0:{type:le,bitmap:e.bitmap^i,array:fr(e.array,s)}}return D(r,l.k)?e.bitmap===i?void 0:{type:le,bitmap:e.bitmap^i,array:fr(e.array,s)}:e}function co(e,t){let n=mr(e,t);if(n<0)return e;if(e.array.length!==1)return{type:He,hash:e.hash,array:fr(e.array,n)}}function xi(e,t){if(e===void 0)return;let n=e.array,r=n.length;for(let i=0;i<r;i++){let s=n[i];if(s!==void 0){if(s.type===ne){t(s.v,s.k);continue}xi(s,t)}}}var ye=class e{static fromObject(t){let n=Object.keys(t),r=e.new();for(let i=0;i<n.length;i++){let s=n[i];r=r.set(s,t[s])}return r}static fromMap(t){let n=e.new();return t.forEach((r,i)=>{n=n.set(i,r)}),n}static new(){return new e(void 0,0)}constructor(t,n){this.root=t,this.size=n}get(t,n){if(this.root===void 0)return n;let r=yn(this.root,0,pe(t),t);return r===void 0?n:r.v}set(t,n){let r={val:!1},i=this.root===void 0?pr:this.root,s=Ut(i,0,pe(t),t,n,r);return s===this.root?this:new e(s,r.val?this.size+1:this.size)}delete(t){if(this.root===void 0)return this;let n=hr(this.root,0,pe(t),t);return n===this.root?this:n===void 0?e.new():new e(n,this.size-1)}has(t){return this.root===void 0?!1:yn(this.root,0,pe(t),t)!==void 0}entries(){if(this.root===void 0)return[];let t=[];return this.forEach((n,r)=>t.push([r,n])),t}forEach(t){xi(this.root,t)}hashCode(){let t=0;return this.forEach((n,r)=>{t=t+ur(pe(n),pe(r))|0}),t}equals(t){if(!(t instanceof e)||this.size!==t.size)return!1;try{return this.forEach((n,r)=>{if(!D(t.get(r,!n),n))throw mi}),!0}catch(n){if(n===mi)return!1;throw n}}},mi=Symbol();function wr(e){return jn(e)===0}function _e(e,t,n){return yi(t,n,e)}function po(e,t){for(;;){let n=e,r=t;if(n instanceof y)return r;{let i=n.tail,s=n.head[0],l=n.head[1];e=i,t=_e(r,s,l)}}}function bn(e){return po(e,ee())}function $o(e,t){for(;;){let n=e,r=t;if(n instanceof y)return r;{let i=n.head;e=n.tail,t=F(i,r)}}}function _o(e,t){for(;;){let n=e,r=t;if(n instanceof y)return $o(r,x([]));{let i=n.tail,s=n.head[0];e=i,t=F(s,r)}}}function vn(e){return _o(Ft(e),x([]))}function mo(e,t,n){for(;;){let r=e,i=t,s=n;if(r instanceof y)return i;{let l=r.tail,a=r.head[0],f=r.head[1];e=l,t=s(i,a,f),n=s}}}function me(e,t,n){return mo(Ft(e),t,n)}function ho(e,t){for(;;){let n=e,r=t;if(n instanceof y)return r;e=n.tail,t=r+1}}function he(e){return ho(e,0)}function wo(e,t){for(;;){let n=e,r=t;if(n instanceof y)return r;{let i=n.head;e=n.tail,t=F(i,r)}}}function be(e){return wo(e,x([]))}function Ye(e){return D(e,x([]))}function rt(e,t){for(;;){let n=e,r=t;if(n instanceof y)return!1;{let i=n.head;if(D(i,r))return!0;e=n.tail,t=r}}}function xo(e,t,n){for(;;){let r=e,i=t,s=n;if(r instanceof y)return be(s);{let l=r.head,a=r.tail,f;i(l)?f=F(l,s):f=s;let $=f;e=a,t=i,n=$}}}function kn(e,t){return xo(e,t,x([]))}function yo(e,t,n){for(;;){let r=e,i=t,s=n;if(r instanceof y)return be(s);{let l=r.head,a=r.tail,f,c=i(l);if(c instanceof o){let _=c[0];f=F(_,s)}else f=s;let $=f;e=a,t=i,n=$}}}function re(e,t){return yo(e,t,x([]))}function go(e,t,n){for(;;){let r=e,i=t,s=n;if(r instanceof y)return be(s);{let l=r.head;e=r.tail,t=i,n=F(i(l),s)}}}function Ne(e,t){return go(e,t,x([]))}function bo(e,t,n){for(;;){let r=e,i=t,s=n;if(r instanceof y)return new o(be(s));{let l=r.head,a=r.tail,f=i(l);if(f instanceof o){let c=f[0];e=a,t=i,n=F(c,s)}else return f}}}function it(e,t){return bo(e,t,x([]))}function vo(e,t){for(;;){let n=e,r=t;if(n instanceof y)return r;{let i=n.head;e=n.tail,t=F(i,r)}}}function bi(e,t){return vo(be(e),t)}function Sn(e,t,n){for(;;){let r=e,i=t,s=n;if(r instanceof y)return i;{let l=r.head;e=r.tail,t=s(i,l),n=s}}}function jo(e,t,n,r){for(;;){let i=e,s=t,l=n,a=r;if(i instanceof y)return s;{let f=i.head;e=i.tail,t=l(s,f,a),n=l,r=a+1}}}function st(e,t,n){return jo(e,t,n,0)}function K(e,t,n){for(;;){let r=e,i=t,s=n;if(r instanceof y)return new o(i);{let l=r.head,a=r.tail,f=s(i,l);if(f instanceof o){let c=f[0];e=a,t=c,n=s}else return f}}}function vi(e,t){for(;;){let n=e,r=t;if(n instanceof y)return new u(void 0);{let i=n.head,s=n.tail;if(r(i))return new o(i);e=s,t=r}}}function En(e,t){for(;;){let n=e,r=t;if(n instanceof y)return!1;{let i=n.head,s=n.tail,l=r(i);if(l)return l;e=s,t=r}}}function ji(e){for(;;){let t=e;if(t instanceof y)return new u(void 0);{let n=t.tail;if(n instanceof y){let r=t.head;return new o(r)}else e=n}}}var De=class extends v{constructor(t,n,r){super(),this.expected=t,this.found=n,this.path=r}};var we=class extends v{constructor(t){super(),this.function=t}};function j(e,t){let n=t.function(e),r,i;return r=n[0],i=n[1],i instanceof y?new o(r):new u(i)}function So(e){return[e,x([])]}function Eo(e,t){return new we(n=>{let r=e.function(n),i,s;return i=r[0],s=r[1],[t(i),s]})}function zo(e,t,n){for(;;){let r=e,i=t,s=n;if(s instanceof y)return i;{let l=s.head,a=s.tail,f=l.function(r),c,$;if(c=f,$=f[1],$ instanceof y)return c;e=r,t=i,n=a}}}function Ao(e,t){return new we(n=>{let r=e.function(n),i,s;return i=r,s=r[1],s instanceof y?i:zo(n,i,t)})}var ue=new we(So);function Ei(e,t){return x([new De(e,ge(t),x([]))])}function br(e,t,n){let r=n(e);return r instanceof o?[r[0],x([])]:[r[0],x([new De(t,ge(e),x([]))])]}function Oo(e){return D(!0,e)?[!0,x([])]:D(!1,e)?[!1,x([])]:[!1,Ei("Bool",e)]}function Co(e){return br(e,"Int",Mi)}function Bo(e){return br(e,"Float",Bi)}var zn=new we(Oo),qe=new we(Co),zi=new we(Bo);function Mo(e){return br(e,"String",Di)}var T=new we(Mo);function Do(e,t,n,r,i){let s=r(t),l=s[1];if(l instanceof y){let a=s[0],f=i(n),c=f[1];if(c instanceof y){let $=f[0];return[_e(e[0],a,$),e[1]]}else{let $=c;return ot([ee(),$],x(["values"]))}}else{let a=l;return ot([ee(),a],x(["keys"]))}}function Pt(e,t){return new we(n=>{let r=Ci(n);if(r instanceof o){let i=r[0];return me(i,[ee(),x([])],(s,l,a)=>s[1]instanceof y?Do(s,l,a,e.function,t.function):s)}else return[ee(),Ei("Dict",n)]})}function Jt(e){return new we(t=>Oi(t,e.function,(n,r)=>ot(n,x([r])),0,x([])))}function ot(e,t){let n=Ao(T,x([Eo(qe,B)])),r=Ne(t,s=>{let l=s,a=j(l,n);return a instanceof o?a[0]:"<"+ge(l)+">"}),i=Ne(e[1],s=>new De(s.expected,s.found,bi(r,s.path)));return[e[0],i]}function To(e,t,n,r,i){for(;;){let s=e,l=t,a=n,f=r,c=i;if(s instanceof y){let _=a(f);return ot(_,be(l))}else{let $=s.head,_=s.tail,w=Ai(f,$);if(w instanceof o){let g=w[0];if(g instanceof d){let S=g[0];e=_,t=F($,l),n=a,r=S,i=c}else return c(f,F($,l))}else{let g=w[0],S=a(f),E;E=S[0];let I=[E,x([new De(g,ge(f),x([]))])];return ot(I,be(l))}}}}function lt(e,t){return new we(n=>To(e,x([]),t.function,n,(r,i)=>{let s=t.function(r),l;l=s[0];let a=[l,x([new De("Field","Nothing",x([]))])];return ot(a,be(i))}))}var jr=void 0,Ti={};function Y(e){return e}function kr(e){return/^[-+]?(\d+)$/.test(e)?new o(parseInt(e)):new u(jr)}function B(e){return e.toString()}function G(e){if(e==="")return 0;let t=Sr(e);if(t){let n=0;for(let r of t)n++;return n}else return e.match(/./gsu).length}function Gt(e){let t=Sr(e);return t?Q.fromArray(Array.from(t).map(n=>n.segment)):Q.fromArray(e.match(/./gsu))}var Li;function Sr(e){if(globalThis.Intl&&Intl.Segmenter)return Li||=new Intl.Segmenter,Li.segment(e)[Symbol.iterator]()}function Er(e,t){return Q.fromArray(e.split(t))}function Ii(e,t,n){return e.slice(t,t+n)}function An(e,t,n){if(n<=0||t>=e.length)return"";let r=Sr(e);if(r){for(;t-- >0;)r.next();let i="";for(;n-- >0;){let s=r.next().value;if(s===void 0)break;i+=s.segment}return i}else return e.match(/./gsu).slice(t,t+n).join("")}function Ue(e,t){return e.indexOf(t)>=0}function Z(e,t){return e.startsWith(t)}function Oe(e,t){return e.endsWith(t)}var Ni=[" "," ",`
2
+
`,"\v","\f","\r","\x85","\u2028","\u2029"].join(""),vu=new RegExp(`^[${Ni}]*`),ju=new RegExp(`[${Ni}]*$`);function On(e){return hn([di(e)])}function Cn(e){return e.byteSize}function ee(){return ye.new()}function jn(e){return e.size}function Ft(e){return Q.fromArray(e.entries())}function ae(e,t){let n=e.get(t,Ti);return n===Ti?new u(jr):new o(n)}function yi(e,t,n){return n.set(e,t)}function qi(e){try{let t=atob(e),n=t.length,r=new Uint8Array(n);for(let i=0;i<n;i++)r[i]=t.charCodeAt(i);return new o(new X(r))}catch{return new u(jr)}}function ge(e){if(typeof e=="string")return"String";if(typeof e=="boolean")return"Bool";if(e instanceof nt)return"Result";if(e instanceof Q)return"List";if(e instanceof X)return"BitArray";if(e instanceof ye)return"Dict";if(Number.isInteger(e))return"Int";if(Array.isArray(e))return"Array";if(typeof e=="number")return"Float";if(e===null)return"Nil";if(e===void 0)return"Nil";{let t=typeof e;return t.charAt(0).toUpperCase()+t.slice(1)}}function Zt(e){return new TextEncoder().encode(e).length}function Ui(e){return new vr().inspect(e)}function Fi(e){let t=e.toString().replace("+","");if(t.indexOf(".")>=0)return t;{let n=t.indexOf("e");return n>=0?t.slice(0,n)+".0"+t.slice(n):t+".0"}}var vr=class{#e=new Set;inspect(t){let n=typeof t;if(t===!0)return"True";if(t===!1)return"False";if(t===null)return"//js(null)";if(t===void 0)return"Nil";if(n==="string")return this.#s(t);if(n==="bigint"||Number.isInteger(t))return t.toString();if(n==="number")return Fi(t);if(t instanceof mn)return this.#o(t);if(t instanceof X)return this.#l(t);if(t instanceof RegExp)return`//js(${t})`;if(t instanceof Date)return`//js(Date("${t.toISOString()}"))`;if(t instanceof globalThis.Error)return`//js(${t.toString()})`;if(t instanceof Function){let i=[];for(let s of Array(t.length).keys())i.push(String.fromCharCode(s+97));return`//fn(${i.join(", ")}) { ... }`}if(this.#e.size===this.#e.add(t).size)return"//js(circular reference)";let r;if(Array.isArray(t))r=`#(${t.map(i=>this.inspect(i)).join(", ")})`;else if(t instanceof Q)r=this.#i(t);else if(t instanceof v)r=this.#r(t);else if(t instanceof ye)r=this.#n(t);else{if(t instanceof Set)return`//js(Set(${[...t].map(i=>this.inspect(i)).join(", ")}))`;r=this.#t(t)}return this.#e.delete(t),r}#t(t){let n=Object.getPrototypeOf(t)?.constructor?.name||"Object",r=[];for(let l of Object.keys(t))r.push(`${this.inspect(l)}: ${this.inspect(t[l])}`);let i=r.length?" "+r.join(", ")+" ":"";return`//js(${n==="Object"?"":n+" "}{${i}})`}#n(t){let n="dict.from_list([",r=!0;return t.forEach((i,s)=>{r||(n=n+", "),n=n+"#("+this.inspect(s)+", "+this.inspect(i)+")",r=!1}),n+"])"}#r(t){let n=Object.keys(t).map(r=>{let i=this.inspect(t[r]);return isNaN(parseInt(r))?`${r}: ${i}`:i}).join(", ");return n?`${t.constructor.name}(${n})`:t.constructor.name}#i(t){if(t instanceof y)return"[]";let n='charlist.from_string("',r="[",i=t;for(;i instanceof Le;){let s=i.head;i=i.tail,r!=="["&&(r+=", "),r+=this.inspect(s),n&&(Number.isInteger(s)&&s>=32&&s<=126?n+=String.fromCharCode(s):n=null)}return n?n+'")':r+"]"}#s(t){let n='"';for(let r=0;r<t.length;r++){let i=t[r];switch(i){case`
3
+
`:n+="\\n";break;case"\r":n+="\\r";break;case" ":n+="\\t";break;case"\f":n+="\\f";break;case"\\":n+="\\\\";break;case'"':n+='\\"';break;default:i<" "||i>"~"&&i<"\xA0"?n+="\\u{"+i.charCodeAt(0).toString(16).toUpperCase().padStart(4,"0")+"}":n+=i}}return n+='"',n}#o(t){return`//utfcodepoint(${String.fromCodePoint(t.value)})`}#l(t){if(t.bitSize===0)return"<<>>";let n="<<";for(let r=0;r<t.byteSize-1;r++)n+=t.byteAt(r).toString(),n+=", ";if(t.byteSize*8===t.bitSize)n+=t.byteAt(t.byteSize-1).toString();else{let r=t.bitSize%8;n+=t.byteAt(t.byteSize-1)>>8-r,n+=`:size(${r})`}return n+=">>",n}};function Ai(e,t){if(e instanceof ye||e instanceof WeakMap||e instanceof Map){let r={},i=e.get(t,r);return i===r?new o(new A):new o(new d(i))}let n=Number.isInteger(t);if(n&&t>=0&&t<8&&e instanceof Q){let r=0;for(let i of e){if(r===t)return new o(new d(i));r++}return new u("Indexable")}return n&&Array.isArray(e)||e&&typeof e=="object"||e&&Object.getPrototypeOf(e)===Object.prototype?t in e?new o(new d(e[t])):new o(new A):new u(n?"Indexable":"Dict")}function Oi(e,t,n,r,i){if(!(e instanceof Q||Array.isArray(e))){let l=new De("List",ge(e),i);return[i,Q.fromArray([l])]}let s=[];for(let l of e){let a=t(l),[f,c]=a;if(c instanceof Le){let[$,_]=n(a,r.toString());return[i,_]}s.push(f),r++}return[Q.fromArray(s),i]}function Ci(e){if(e instanceof ye)return new o(e);if(e instanceof Map||e instanceof WeakMap)return new o(ye.fromMap(e));if(e==null)return new u("Dict");if(typeof e!="object")return new u("Dict");let t=Object.getPrototypeOf(e);return t===Object.prototype||t===null?new o(ye.fromObject(e)):new u("Dict")}function Bi(e){return typeof e=="number"?new o(e):new u(0)}function Mi(e){return Number.isInteger(e)?new o(e):new u(0)}function Di(e){return typeof e=="string"?new o(e):new u("")}function Ce(e){return e===""}function Wt(e,t,n){if(n<=0)return"";if(t<0){let s=G(e)+t;return s<0?"":An(e,s,n)}else return An(e,t,n)}function Vi(e,t){return t<=0?e:Wt(e,0,G(e)-t)}function Ar(e,t){return e+t}function Fo(e,t,n){for(;;){let r=e,i=t,s=n,l;r%2===0?l=s:l=s+i;let f=l,c=globalThis.Math.trunc(r/2);if(c<=0)return f;e=c,t=i+i,n=f}}function Ri(e,t){return t<=0?"":Fo(t,e,"")}function Vo(e,t,n){for(;;){let r=e,i=t,s=n;if(r instanceof y)return s;{let l=r.head;e=r.tail,t=i,n=s+i+l}}}function Fe(e,t){if(e instanceof y)return"";{let n=e.head,r=e.tail;return Vo(r,t,n)}}function fe(e,t){if(t==="")return Gt(e);{let r=e,i=Er(r,t);return Ne(i,Y)}}function Ht(e){let n=Ui(e);return n}function Ve(e,t){if(t<=0)return e;{let r=An(e,0,t),i=Zt(r);return Ii(e,i,Zt(e)-i)}}function Pi(e){let t,n=Cn(On(e))%4;return n===0?t=e:t=Ar(e,Ri("=",4-n)),qi(t)}function Ji(e){return e instanceof o}function Ke(e,t){if(e instanceof o)return e;{let n=e[0];return new u(t(n))}}function p(e,t){if(e instanceof o){let n=e[0];return t(n)}else return e}function Cr(e){return JSON.stringify(e)}function Gi(e){return Object.fromEntries(e)}function Zi(e){let t=[];for(;ui(e);)t.push(fi(e)),e=ci(e);return t}function Wi(){return null}function Hi(e){try{let t=JSON.parse(e);return pi(t)}catch(t){return $i(Po(t,e))}}function Po(e,t){return Jo(e)?Yi():Go(e,t)}function Jo(e){return/((unexpected (end|eof))|(end of data)|(unterminated string)|(json( parse error|\.parse)\: expected '(\:|\}|\])'))/i.test(e.message)}function Go(e,t){let n=[Zo,Wo,Yo,Ho];for(let r of n){let i=r(e,t);if(i)return i}return at("")}function Zo(e){let n=/unexpected token '(.)', ".+" is not valid JSON/i.exec(e.message);if(!n)return null;let r=Bn(n[1]);return at(r)}function Wo(e){let n=/unexpected token (.) in JSON at position (\d+)/i.exec(e.message);if(!n)return null;let r=Bn(n[1]);return at(r)}function Ho(e,t){let r=/(unexpected character|expected .*) at line (\d+) column (\d+)/i.exec(e.message);if(!r)return null;let i=Number(r[2]),s=Number(r[3]),l=Ko(i,s,t),a=Bn(t[l]);return at(a)}function Yo(e){let n=/unexpected (identifier|token) "(.)"/i.exec(e.message);if(!n)return null;let r=Bn(n[2]);return at(r)}function Bn(e){return"0x"+e.charCodeAt(0).toString(16).toUpperCase()}function Ko(e,t,n){if(e===1)return t-1;let r=1,i=0;return n.split("").find((s,l)=>(s===`
4
+
`&&(r+=1),r===e?(i=l+t,!0):!1)),i}var Br=class extends v{},Yi=()=>new Br;var Mr=class extends v{constructor(t){super(),this[0]=t}},at=e=>new Mr(e);var Dr=class extends v{constructor(t){super(),this[0]=t}};function Xo(e,t){return p(Hi(e),n=>{let r=j(n,t);return Ke(r,i=>new Dr(i))})}function Mn(e,t){return Xo(e,t)}function je(e){return Cr(e)}function Ki(e){return e}function Xi(e){return e}function Qi(e){return e}function es(e){return e}function ts(){return Wi()}function ns(e){return Gi(e)}function Qo(e){return Zi(e)}function rs(e,t){let r=Ne(e,t);return Qo(r)}var ft=class extends v{constructor(t){super(),this.collection=t}};var ct=class extends v{constructor(t){super(),this.message=t}};var Lr=class extends v{constructor(t){super(),this.message=t}};function Ir(e){return e instanceof ft?"Lexicon not found for collection: "+e.collection:e instanceof ct?"Invalid lexicon schema: "+e.message:"Data validation failed: "+e.message}function m(e){return new ct(e)}function h(e){return new Lr(e)}function Nr(e){return new ft(e)}function ce(e){let t=je(e),n=Mn(t,ue);return Ke(n,r=>"Failed to parse JSON")}function dt(e){return je(e)==="null"}function Re(e){let t=ce(e);if(t instanceof o){let n=t[0];return j(n,T)instanceof o}else return!1}function pt(e){let t=ce(e);if(t instanceof o){let n=t[0];return j(n,qe)instanceof o}else return!1}function $t(e){let t=ce(e);if(t instanceof o){let n=t[0];return j(n,zn)instanceof o}else return!1}function Yt(e){let t=ce(e);if(t instanceof o){let n=t[0];return j(n,Jt(ue))instanceof o}else return!1}function q(e){let t=ce(e);if(t instanceof o){let n=t[0];return j(n,Pt(T,ue))instanceof o}else return!1}function k(e,t){let n=ce(e);if(n instanceof o){let r=n[0],i=j(r,lt(x([t]),T));if(i instanceof o){let s=i[0];return new d(s)}else return new A}else return new A}function M(e,t){let n=ce(e);if(n instanceof o){let r=n[0],i=j(r,lt(x([t]),qe));if(i instanceof o){let s=i[0];return new d(s)}else return new A}else return new A}function Pe(e,t){let n=ce(e);if(n instanceof o){let r=n[0],i=j(r,lt(x([t]),zn));if(i instanceof o){let s=i[0];return new d(s)}else return new A}else return new A}function L(e,t){let n=ce(e);if(n instanceof o){let r=n[0],i=j(r,lt(x([t]),Jt(ue)));if(i instanceof o){let s=i[0];return new d(s)}else return new A}else return new A}function z(e){let t=ce(e);if(t instanceof o){let n=t[0],r=j(n,Pt(T,ue));if(r instanceof o){let i=r[0];return vn(i)}else return x([])}else return x([])}function qr(e){let t=ce(e);if(t instanceof o){let n=t[0],r=j(n,Jt(ue));if(r instanceof o){let i=r[0];return new d(i)}else return new A}else return new A}function is(e){return ge(e)==="Nil"}function ke(e){let t=ce(e);if(t instanceof o){let n=t[0],r=j(n,Pt(T,ue));return r instanceof o?r:new u(h("Failed to convert JSON to dictionary"))}else return new u(h("Failed to parse JSON as dynamic"))}function se(e){let t=ge(e);if(t==="Nil")return new o(ts());if(t==="String"){let n=j(e,T);if(n instanceof o){let r=n[0];return new o(Ki(r))}else return new u(h("Failed to decode string"))}else if(t==="Int"){let n=j(e,qe);if(n instanceof o){let r=n[0];return new o(Qi(r))}else return new u(h("Failed to decode int"))}else if(t==="Float"){let n=j(e,zi);if(n instanceof o){let r=n[0];return new o(es(r))}else return new u(h("Failed to decode float"))}else if(t==="Bool"){let n=j(e,zn);if(n instanceof o){let r=n[0];return new o(Xi(r))}else return new u(h("Failed to decode bool"))}else if(t==="List"){let n=j(e,Jt(ue));if(n instanceof o){let r=n[0],i=it(r,se);if(i instanceof o){let s=i[0];return new o(rs(s,l=>l))}else return i}else return new u(h("Failed to decode list"))}else if(t==="Dict"){let n=j(e,Pt(T,ue));if(n instanceof o){let r=n[0],i=Ft(r),s=it(i,l=>{let a,f;a=l[0],f=l[1];let c=se(f);if(c instanceof o){let $=c[0];return new o([a,$])}else return c});if(s instanceof o){let l=s[0];return new o(ns(l))}else return s}else return new u(h("Failed to decode dict"))}else{let n=t;return new u(h("Unsupported type for JSON conversion: "+n))}}function C(e,t){let n=ce(e);if(n instanceof o){let r=n[0],i=j(r,lt(x([t]),ue));if(i instanceof o){let s=i[0],l=se(s);if(l instanceof o){let a=l[0];return new d(a)}else return new A}else return new A}else return new A}function Dn(){return ee()}function Xe(e,t){return ae(e,t)instanceof o}function Tn(e,t,n){return me(e,t,n)}var Ln=class extends v{constructor(t,n){super(),this.id=t,this.defs=n}};var _t=class extends v{};var mt=class extends v{};var ht=class extends v{};var wt=class extends v{};var xt=class extends v{};var yt=class extends v{};var gt=class extends v{};var bt=class extends v{};var vt=class extends v{};var jt=class extends v{};var Ur=class extends v{};function Fr(e){return e==="datetime"?new o(new _t):e==="uri"?new o(new mt):e==="at-uri"?new o(new ht):e==="did"?new o(new wt):e==="handle"?new o(new xt):e==="at-identifier"?new o(new yt):e==="nsid"?new o(new gt):e==="cid"?new o(new bt):e==="language"?new o(new vt):e==="tid"?new o(new jt):e==="record-key"?new o(new Ur):new u(void 0)}function In(e){return e instanceof _t?"datetime":e instanceof mt?"uri":e instanceof ht?"at-uri":e instanceof wt?"did":e instanceof xt?"handle":e instanceof yt?"at-identifier":e instanceof gt?"nsid":e instanceof bt?"cid":e instanceof vt?"language":e instanceof jt?"tid":"record-key"}var qn=class extends v{constructor(t){super(),this.dict=t}};function Vr(){return new qn(ee())}function Rr(e,t){let n=e.dict,r=ae(n,t);return Ji(r)}var el=void 0;function Pr(e,t){return new qn(_e(e.dict,t,el))}function os(e,t){return e.lastIndex=0,e.test(t)}function ls(e,t){try{let n="gu";return t.case_insensitive&&(n+="i"),t.multi_line&&(n+="m"),new o(new RegExp(e,n))}catch(n){let r=(n.columnNumber||0)|0;return new u(new Un(n.message,r))}}var Un=class extends v{constructor(t,n){super(),this.error=t,this.byte_index=n}};var Jr=class extends v{constructor(t,n){super(),this.case_insensitive=t,this.multi_line=n}};function tl(e,t){return ls(e,t)}function Be(e){return tl(e,new Jr(!1,!1))}function Me(e,t){return os(e,t)}var Xt=class extends v{constructor(t,n){super(),this.seconds=t,this.nanoseconds=n}};function ll(e){let t=1e9,n=It(e.nanoseconds,t),r=e.nanoseconds-n,i=e.seconds+Nt(r,t);return n>=0?new Xt(i,n):new Xt(i-1,t+n)}function al(e){return e%4===0&&(e%100!==0||e%400===0)}function ul(e){if(e.bitSize>=8)if(e.byteAt(0)===43)if((e.bitSize-8)%8===0){let t=oe(e,8);return new o(["+",t])}else return new u(void 0);else if(e.byteAt(0)===45&&(e.bitSize-8)%8===0){let t=oe(e,8);return new o(["-",t])}else return new u(void 0);else return new u(void 0)}function Kt(e,t){if(e.bitSize>=8&&(e.bitSize-8)%8===0)if(e.byteAt(0)===t){let r=oe(e,8);return new o(r)}else return new u(void 0);else return new u(void 0)}function fl(e){return e.bitSize===0?new o(void 0):new u(void 0)}function cl(e,t,n){let r=globalThis.Math.trunc((14-t)/12),i=e+4800-r,s=t+12*r-3;return n+globalThis.Math.trunc((153*s+2)/5)+365*i+globalThis.Math.trunc(i/4)-globalThis.Math.trunc(i/100)+globalThis.Math.trunc(i/400)-32045}var dl=86400,fs=3600,cs=60;function pl(e,t,n){let r=t*fs+n*cs;return e==="-"?-r:r}function $l(e,t,n,r,i,s){return cl(e,t,n)*dl+r*fs+i*cs+s}var _l=1e9,Zr=58,us=45;function ml(e,t,n){for(;;){let r=e,i=t,s=n,l=globalThis.Math.trunc(s/10);if(r.bitSize>=8&&(r.bitSize-8)%8===0){let a=r.byteAt(0);if(48<=a&&a<=57&&l<1)e=oe(r,8),t=i,n=l;else{let f=r.byteAt(0);if(48<=f&&f<=57){let c=oe(r,8),$=f-48;e=c,t=i+$*l,n=l}else return new o([i,r])}}else return new o([i,r])}}function hl(e){if(e.bitSize>=8&&e.byteAt(0)===46)if(e.bitSize>=16&&(e.bitSize-16)%8===0){let t=e.byteAt(1);if(48<=t&&t<=57){let n=oe(e,16);return ml(hn([t,n]),0,_l)}else return(e.bitSize-8)%8===0?new u(void 0):new o([0,e])}else return(e.bitSize-8)%8===0?new u(void 0):new o([0,e]);else return new o([0,e])}function wl(e,t,n,r){for(;;){let i=e,s=t,l=n,a=r;if(a>=s)return new o([l,i]);if(i.bitSize>=8&&(i.bitSize-8)%8===0){let f=i.byteAt(0);if(48<=f&&f<=57)e=oe(i,8),t=s,n=l*10+(f-48),r=a+1;else return new u(void 0)}else return new u(void 0)}}function kt(e,t){return wl(e,t,0,0)}function xl(e){return kt(e,4)}function yl(e){return p(kt(e,2),t=>{let n,r;return n=t[0],r=t[1],1<=n&&n<=12?new o([n,r]):new u(void 0)})}function gl(e,t,n){return p(kt(e,2),r=>{let i,s;return i=r[0],s=r[1],p(n===1?new o(31):n===3?new o(31):n===5?new o(31):n===7?new o(31):n===8?new o(31):n===10?new o(31):n===12?new o(31):n===4?new o(30):n===6?new o(30):n===9?new o(30):n===11?new o(30):n===2?al(t)?new o(29):new o(28):new u(void 0),l=>1<=i&&i<=l?new o([i,s]):new u(void 0))})}function ds(e){return p(kt(e,2),t=>{let n,r;return n=t[0],r=t[1],0<=n&&n<=23?new o([n,r]):new u(void 0)})}function ps(e){return p(kt(e,2),t=>{let n,r;return n=t[0],r=t[1],0<=n&&n<=59?new o([n,r]):new u(void 0)})}function bl(e){return p(kt(e,2),t=>{let n,r;return n=t[0],r=t[1],0<=n&&n<=60?new o([n,r]):new u(void 0)})}function Gr(e){return p(ul(e),t=>{let n,r;return n=t[0],r=t[1],p(ds(r),i=>{let s,l;return s=i[0],l=i[1],p(Kt(l,Zr),a=>p(ps(a),f=>{let c,$;c=f[0],$=f[1];let _=pl(n,s,c);return new o([_,$])}))})})}function vl(e){if(e.bitSize>=8)if(e.byteAt(0)===90)if((e.bitSize-8)%8===0){let t=oe(e,8);return new o([0,t])}else return Gr(e);else if(e.byteAt(0)===122&&(e.bitSize-8)%8===0){let t=oe(e,8);return new o([0,t])}else return Gr(e);else return Gr(e)}function jl(e){if(e.bitSize>=8&&(e.bitSize-8)%8===0){let t=e.byteAt(0);if(t===84||t===116||t===32){let n=oe(e,8);return new o(n)}else return new u(void 0)}else return new u(void 0)}var kl=210866803200;function Sl(e,t,n,r,i,s,l,a){let c=$l(e,t,n,r,i,s)-kl,$=new Xt(c-a,l);return ll($)}function $s(e){let t=On(e);return p(xl(t),n=>{let r,i;return r=n[0],i=n[1],p(Kt(i,us),s=>p(yl(s),l=>{let a,f;return a=l[0],f=l[1],p(Kt(f,us),c=>p(gl(c,r,a),$=>{let _,w;return _=$[0],w=$[1],p(jl(w),g=>p(ds(g),S=>{let E,I;return E=S[0],I=S[1],p(Kt(I,Zr),xe=>p(ps(xe),H=>{let J,de;return J=H[0],de=H[1],p(Kt(de,Zr),Ze=>p(bl(Ze),Te=>{let ir,_n;return ir=Te[0],_n=Te[1],p(hl(_n),Tt=>{let Lt,We;return Lt=Tt[0],We=Tt[1],p(vl(We),ni=>{let ri,ii;return ri=ni[0],ii=ni[1],p(fl(ii),Ja=>new o(Sl(r,a,_,E,J,ir,Lt,ri)))})})}))}))}))}))}))})}function zl(e){let t=G(e);if(t===0||t>64)return!1;{let i=Be("^[0-9]{4}-[01][0-9]-[0-3][0-9]T[0-2][0-9]:[0-6][0-9]:[0-6][0-9](\\.[0-9]{1,20})?(Z|([+-][0-2][0-9]:[0-5][0-9]))$");if(i instanceof o){let s=i[0],l=Me(s,e);return l&&(Oe(e,"-00:00")?!1:$s(e)instanceof o)}else return!1}}function Al(e){let t=G(e);if(t===0||t>8192)return!1;{let i=Be("^[a-z][a-z.-]{0,80}:[!-~]+$");if(i instanceof o){let s=i[0];return Me(s,e)}else return!1}}function Qt(e){let t=G(e);if(t===0||t>2048)return!1;{let r=Z(e,"did:");if(r){let s=Be("^did:[a-z]+:[a-zA-Z0-9._:%-]*[a-zA-Z0-9._-]$");if(s instanceof o){let l=s[0];return Me(l,e)}else return!1}else return r}}function en(e){let t="^([a-zA-Z0-9]([a-zA-Z0-9-]{0,61}[a-zA-Z0-9])?\\.)+[a-zA-Z]([a-zA-Z0-9-]{0,61}[a-zA-Z0-9])?$",n=G(e)===0||G(e)>253,r=Be(t);if(n)return!1;if(r instanceof o){let i=r[0],s=Me(i,e);if(s){let l=fe(e,"."),a=ji(l);if(a instanceof o){let f=a[0];return f==="local"||f==="arpa"||f==="invalid"||f==="localhost"||f==="internal"||f==="example"||f==="onion"?!1:f!=="alt"}else return!1}else return s}else return n}function Ol(e){return Qt(e)||en(e)}function Qe(e){let n=Be("^[a-zA-Z]([a-zA-Z0-9-]{0,61}[a-zA-Z0-9])?(\\.[a-zA-Z]([a-zA-Z0-9-]{0,61}[a-zA-Z0-9])?)+$");if(n instanceof o){let r=n[0],i=Me(r,e);if(i){let s=fe(e,".");return he(s)>=3&&G(e)<=317}else return i}else return!1}function Fn(e){let t=G(e);if(t<8||t>256)return!1;if(Z(e,"Qmb"))return!1;{let s=Be("^[a-zA-Z0-9+=]{8,256}$");if(s instanceof o){let l=s[0];return Me(l,e)}else return!1}}function _s(e){let t=Fn(e);return t&&Z(e,"bafkrei")}function Cl(e){let t=G(e);if(t===0||t>128)return!1;{let i=Be("^(i|[a-z]{2,3})(-[a-zA-Z0-9]+)*$");if(i instanceof o){let s=i[0];return Me(s,e)}else return!1}}function ms(e){let t="^[234567abcdefghij][234567abcdefghijklmnopqrstuvwxyz]{12}$",n=G(e)===13,r=Be(t);if(n&&r instanceof o){let i=r[0];return Me(i,e)}else return!1}function hs(e){let t=G(e);if(e==="."||e==="..")return!1;{let r=t>=1&&t<=512;if(r){let i=ms(e);if(i)return i;{let l=Be("^[a-zA-Z0-9_~.:-]+$");if(l instanceof o){let a=l[0];return Me(a,e)}else return!1}}else return r}}function Bl(e){let t=G(e);if(t===0||t>8192)return!1;{let r=Z(e,"at://");if(r){let i=Ve(e,5),s=fe(i,"/");if(s instanceof y)return!1;{let l=s.tail;if(l instanceof y){let a=s.head;return Qt(a)||en(a)}else{let a=l.tail;if(a instanceof y){let f=s.head,c=l.head,$=Qt(f)||en(f);return $&&Qe(c)}else if(a.tail instanceof y){let c=s.head,$=l.head,_=a.head,w=Qt(c)||en(c);if(w){let g=Qe($);return g&&hs(_)}else return w}else return!1}}}else return r}}function Vn(e,t){return t instanceof _t?zl(e):t instanceof mt?Al(e):t instanceof ht?Bl(e):t instanceof wt?Qt(e):t instanceof xt?en(e):t instanceof yt?Ol(e):t instanceof gt?Qe(e):t instanceof bt?Fn(e):t instanceof vt?Cl(e):t instanceof jt?ms(e):hs(e)}var St=class extends v{constructor(t,n,r,i,s){super(),this.lexicons=t,this.path=n,this.current_lexicon_id=r,this.reference_stack=i,this.validator=s}};var Rn=class extends v{constructor(t,n){super(),this.lexicons=t,this.validator=n}};function Wr(){return new Rn(ee(),new A)}function Hr(e){let t,n=e.validator;n instanceof d?t=n[0]:t=(i,s,l)=>new o(void 0);let r=t;return new o(new St(e.lexicons,"",new A,Vr(),r))}function Pn(e,t){let n=ae(e.lexicons,t);if(n instanceof o){let r=n[0];return new d(r)}else return new A}function b(e){return e.path}function N(e,t){let n;e.path===""?n=t:n=e.path+"."+t;let i=n;return new St(e.lexicons,i,e.current_lexicon_id,e.reference_stack,e.validator)}function Et(e){return e.current_lexicon_id}function nn(e,t){return new St(e.lexicons,e.path,new d(t),e.reference_stack,e.validator)}function ws(e,t){return new St(e.lexicons,e.path,e.current_lexicon_id,Pr(e.reference_stack,t),e.validator)}function Yr(e,t){return Rr(e.reference_stack,t)}function xs(e,t){let n=fe(t,"#");if(n instanceof y)return new u(m("Invalid reference format: "+t));{let r=n.tail;if(r instanceof y){let i=n.head;return i!==""?new o([i,"main"]):new u(m("Invalid reference format: "+t))}else if(r.tail instanceof y){let s=n.head;if(s===""){let l=r.head,a=e.current_lexicon_id;if(a instanceof d){let f=a[0];return new o([f,l])}else return new u(m("Local reference '"+t+"' used without current lexicon context"))}else{let l=s,a=r.head;return l!==""&&a!==""?new o([l,a]):new u(m("Invalid reference format: "+t))}}else return new u(m("Invalid reference format: "+t))}}function Ml(e){let t,n=k(e,"id");if(n instanceof d){let i=n[0];t=new o(i)}else t=new u(m("Lexicon missing required 'id' field"));return p(t,i=>p(Qe(i)?new o(void 0):new u(m("Lexicon 'id' field is not a valid NSID: "+i)),s=>{let l,a=C(e,"defs");if(a instanceof d){let c=a[0];q(c)?l=new o(c):l=new u(m("Lexicon 'defs' must be an object at "+i))}else l=new u(m("Lexicon missing required 'defs' field at "+i));return p(l,c=>new o(new Ln(i,c)))}))}function Kr(e,t){return K(t,e,(n,r)=>{let i=Ml(r);if(i instanceof o){let s=i[0],l=_e(n.lexicons,s.id,s);return new o(new Rn(l,n.validator))}else return i})}function Xr(e,t,n,r,i){let s;if(n instanceof d){let a=n[0];t<a?s=new u(h(e+": "+i+" length "+B(t)+" is less than minLength "+B(a))):s=new o(void 0)}else s=new o(void 0);return p(s,a=>{if(r instanceof d){let f=r[0];return t>f?new u(h(e+": "+i+" length "+B(t)+" exceeds maxLength "+B(f))):new o(void 0)}else return new o(void 0)})}function et(e,t,n,r){if(t instanceof d&&n instanceof d){let i=t[0],s=n[0];return i>s?new u(m(e+": "+r+" minLength ("+B(i)+") cannot be greater than maxLength ("+B(s)+")")):new o(void 0)}else return new o(void 0)}function ys(e,t,n,r){let i;if(n instanceof d){let l=n[0];t<l?i=new u(h(e+": value "+B(t)+" is less than minimum "+B(l))):i=new o(void 0)}else i=new o(void 0);return p(i,l=>{if(r instanceof d){let a=r[0];return t>a?new u(h(e+": value "+B(t)+" exceeds maximum "+B(a))):new o(void 0)}else return new o(void 0)})}function gs(e,t,n){if(t instanceof d&&n instanceof d){let r=t[0],i=n[0];return r>i?new u(m(e+": minimum ("+B(r)+") cannot be greater than maximum ("+B(i)+")")):new o(void 0)}else return new o(void 0)}function Jn(e,t,n,r,i,s){return En(n,a=>s(t,a))?new o(void 0):new u(h(e+": "+r+" value '"+i(t)+"' is not in enum"))}function zt(e,t,n,r){return t&&n?new u(m(e+": "+r+" cannot have both 'const' and 'default'")):new o(void 0)}function O(e,t,n,r){let i=kn(t,s=>!rt(n,s));if(i instanceof y)return new o(void 0);{let s=i;return new u(m(e+": "+r+" has unknown fields: "+Fe(s,", ")+". Allowed fields: "+Fe(n,", ")))}}function At(e,t,n){let r=nn(t,n),i=xs(r,e);if(i instanceof o){let s=i[0][0],l=i[0][1],a=Pn(r,s);if(a instanceof d){let f=a[0],c=C(f.defs,l);if(c instanceof d){let $=c[0];return new o(new d($))}else return new u(m("Definition '"+l+"' not found in lexicon '"+s+"'"))}else return new u(m("Referenced lexicon not found: "+s))}else return i}function Gn(e,t,n){let r=b(n);return p((()=>{let i=k(t,"ref");if(i instanceof d){let s=i[0];return new o(s)}else return new u(h(r+": ref schema missing 'ref' field"))})(),i=>{if(Yr(n,i))return new u(h(r+": circular reference detected: "+i));{let l=ws(n,i);return p((()=>{let a=Et(l);if(a instanceof d){let f=a[0];return new o(f)}else return new u(h(r+": no current lexicon set for resolving reference"))})(),a=>p(At(i,l,a),f=>p((()=>{if(f instanceof d){let c=f[0];return new o(c)}else return new u(h(r+": reference not found: "+i))})(),c=>{let $=l.validator;return $(e,c,l)})))}})}function Dl(e,t){let n=fe(e,"#");if(n instanceof y)return new u(m(t+": global reference can only contain one # character"));{let r=n.tail;if(r instanceof y)return new u(m(t+": global reference can only contain one # character"));if(r.tail instanceof y){let s=n.head,l=r.head;return Ce(s)?new u(m(t+": NSID part of reference cannot be empty")):Ce(l)?new u(m(t+": definition name part of reference cannot be empty")):new o(void 0)}else return new u(m(t+": global reference can only contain one # character"))}}function Tl(e,t){if(Ce(e))return new u(m(t+": reference cannot be empty"));if(Z(e,"#")){let i=Ve(e,1);return Ce(i)?new u(m(t+": local reference must have a definition name after #")):new o(void 0)}else return Ue(e,"#")?Dl(e,t):new o(void 0)}var Ll=x(["type","ref","description"]);function rn(e,t){let n=b(t),r=z(e);return p(O(n,r,Ll,"ref"),i=>{let s,l=k(e,"ref");if(l instanceof d){let f=l[0];s=new o(f)}else s=new u(m(n+": ref missing required 'ref' field"));return p(s,f=>p(Tl(f,n),c=>{if(Z(f,"#"))return new o(void 0);{let _=Et(t);if(_ instanceof d){let w=_[0];return p(At(f,t,w),g=>g instanceof d?new o(void 0):new u(m(n+": reference not found: "+f)))}else return new o(void 0)}}))})}function Il(e,t,n){let r=re(e,i=>j(i,T));return K(r,void 0,(i,s)=>{let l=Et(t);if(l instanceof d){let a=l[0];return p(At(s,t,a),f=>f instanceof d?new o(void 0):new u(m(n+": reference not found: "+s)))}else return new o(void 0)})}function Nl(e,t,n,r){let i=Et(n);if(i instanceof d){let s=i[0];return p(At(t,n,s),l=>{if(l instanceof d){let a=l[0],f=n.validator;return f(e,a,n)}else return new u(h(r+": reference not found: "+t))})}else return new o(void 0)}function ql(e,t){let n=e===t;if(n)return n;if(Z(e,"#")){let i=Ve(e,1),s=t===i;return s||Oe(t,"#"+i)}else if(Oe(t,"#main")){let s=Vi(t,5);return e===s}else{if(Ue(t,"#"))return!1;{let l=t+"#main";return e===l}}}function Ul(e){return dt(e)?"null":$t(e)?"boolean":pt(e)?"number":Re(e)?"string":Yt(e)?"array":q(e)?"object":"unknown"}function Zn(e,t,n){let r=b(n);if(q(e)){let s,l=k(e,"$type");if(l instanceof d){let f=l[0];s=new o(f)}else s=new u(h(r+': union data must be an object which includes the "$type" property'));return p(s,f=>{let c,$=L(t,"refs");if($ instanceof d){let w=$[0];c=new o(w)}else c=new u(h(r+": union schema missing or invalid 'refs' field"));return p(c,w=>{if(Ye(w))return new u(h(r+": union schema has empty refs array"));{let S=re(w,I=>j(I,T)),E=vi(S,I=>ql(I,f));if(E instanceof o){let I=E[0];return Nl(e,I,n,r)}else{let I,xe=Pe(t,"closed");return xe instanceof d?I=xe[0]:I=!1,I?new u(h(r+": union data $type must be one of "+Fe(S,", ")+", found '"+f+"'")):new o(void 0)}}})})}else{let s=Ul(e);return new u(h(r+': union data must be an object which includes the "$type" property, found '+s))}}var Fl=x(["type","refs","closed","description"]);function Wn(e,t){let n=b(t),r=z(e);return p(O(n,r,Fl,"union"),i=>{let s,l=L(e,"refs");if(l instanceof d){let f=l[0];s=new o(f)}else s=new u(m(n+": union missing required 'refs' field"));return p(s,f=>p(st(f,new o(void 0),(c,$,_)=>p(c,w=>j($,T)instanceof o?new o(void 0):new u(m(n+": refs["+Ht(_)+"] must be a string")))),c=>p((()=>{let $=Pe(e,"closed");return $ instanceof d?$[0]&&Ye(f)?new u(m(n+": union cannot be closed with empty refs array")):new o(void 0):new o(void 0)})(),$=>p((()=>{if(Ye(f)){let w=Pe(e,"closed");return w instanceof d?w[0]?new u(m(n+": union cannot have empty refs array when closed=true")):new o(void 0):new o(void 0)}else return new o(void 0)})(),_=>Il(f,t,n)))))})}function vs(e,t,n){let r=b(n);if(Re(e)){let s=je(e),l;return Z(s,'"')&&Oe(s,'"')?l=Wt(s,1,G(s)-2):l=s,Ce(l)?new u(h(r+": token value cannot be empty string")):new o(void 0)}else return new u(h(r+": expected string for token data, got other type"))}var Vl=x(["type","description"]);function Yn(e,t){let n=b(t),r=z(e);return O(n,r,Vl,"token")}function sn(e,t,n){let r=b(n);if(q(e)){if(k(e,"$bytes")instanceof d)return new u(h(r+": unknown type cannot be a bytes object"));{let l=k(e,"$type");return l instanceof d?l[0]==="blob"?new u(h(r+": unknown type cannot be a blob object")):new o(void 0):new o(void 0)}}else return new u(h(r+": unknown type must be an object, not a primitive or array"))}var Rl=x(["type","description"]);function Ot(e,t){let n=b(t),r=z(e);return O(n,r,Rl,"unknown")}function Pl(e,t){let n=C(e,"ref");if(n instanceof d){let r=n[0];if(q(r)){let s=k(r,"$link");if(s instanceof d){let l=s[0];return _s(l)?new o(void 0):new u(h(t+": blob ref.$link must be a valid CID with raw multicodec (bafkrei prefix)"))}else return new u(h(t+": blob ref must have $link field"))}else return new u(h(t+": blob ref must be an object"))}else return new u(h(t+": blob missing required 'ref' field"))}function ks(e,t,n,r){return Ue(t,"*")?t==="*"?new o(void 0):new u(m(e+": blob MIME type '"+r+"' can only use '*' as a complete wildcard for "+n)):new o(void 0)}function Jl(e,t,n){if(Ce(t))return new u(m(e+": blob MIME type cannot be empty"));if(t==="*/*")return new o(void 0);if(Ue(t,"/")){let s=fe(t,"/");if(s instanceof y)return new u(m(e+": blob MIME type '"+t+"' must have exactly one '/' character"));{let l=s.tail;if(l instanceof y)return new u(m(e+": blob MIME type '"+t+"' must have exactly one '/' character"));if(l.tail instanceof y){let f=s.head,c=l.head;return p(ks(e,f,"type",t),$=>ks(e,c,"subtype",t))}else return new u(m(e+": blob MIME type '"+t+"' must have exactly one '/' character"))}}else return new u(m(e+": blob MIME type '"+t+"' must contain a '/' character"))}function Gl(e,t){return st(t,new o(void 0),(n,r,i)=>p(n,s=>{let l=j(r,T);if(l instanceof o){let a=l[0];return Jl(e,a,i)}else return new u(m(e+": blob accept["+B(i)+"] must be a string"))}))}function Zl(e,t){if(t==="*/*")return!0;{let n=fe(e,"/"),r=fe(t,"/");if(n instanceof y)return!1;if(r instanceof y)return!1;{let i=n.tail;if(i instanceof y)return!1;{let s=r.tail;if(s instanceof y)return!1;if(i.tail instanceof y)if(s.tail instanceof y){let f=n.head,c=r.head,$=i.head,_=s.head,w;c==="*"?w=!0:w=f===c;let g=w,S;return _==="*"?S=!0:S=$===_,g&&S}else return!1;else return!1}}}}function Wl(e,t,n){let r=re(n,s=>j(s,T));return En(r,s=>Zl(t,s))?new o(void 0):new u(h(e+": blob mimeType '"+t+"' not accepted. Allowed: "+Fe(r,", ")))}var Hl=x(["type","accept","maxSize","description"]);function Kn(e,t){let n=b(t),r=z(e);return p(O(n,r,Hl,"blob"),i=>p((()=>{let s=L(e,"accept");if(s instanceof d){let l=s[0];return Gl(n,l)}else return new o(void 0)})(),s=>{let l=M(e,"maxSize");return l instanceof d?l[0]>0?new o(void 0):new u(m(n+": blob maxSize must be greater than 0")):new o(void 0)}))}var Yl=x(["$type","ref","mimeType","size"]);function Kl(e,t){let n=kn(t,r=>!rt(Yl,r));if(n instanceof y)return new o(void 0);{let r=n.head;return new u(h(e+": blob has unexpected field '"+r+"'"))}}function Ss(e,t,n){let r=b(n);if(q(e)){let s=z(e);return p(Kl(r,s),l=>p((()=>{let a=k(e,"$type");if(a instanceof d){let f=a[0];if(f==="blob")return new o(void 0);{let c=f;return new u(h(r+": blob $type must be 'blob', got '"+c+"'"))}}else return new u(h(r+": blob missing required '$type' field"))})(),a=>p(Pl(e,r),f=>p((()=>{let c=k(e,"mimeType");if(c instanceof d){let $=c[0];return Ce($)?new u(h(r+": blob mimeType cannot be empty")):new o($)}else return new u(h(r+": blob missing required 'mimeType' field"))})(),c=>p((()=>{let $=M(e,"size");if($ instanceof d){let _=$[0];return _>=0?new o(_):new u(h(r+": blob size must be non-negative"))}else return new u(h(r+": blob missing or invalid 'size' field"))})(),$=>p((()=>{let _=L(t,"accept");if(_ instanceof d){let w=_[0];return Wl(r,c,w)}else return new o(void 0)})(),_=>{let w=M(t,"maxSize");if(w instanceof d){let g=w[0];return $<=g?new o(void 0):new u(h(r+": blob size "+B($)+" exceeds maxSize "+B(g)))}else return new o(void 0)}))))))}else return new u(h(r+": expected blob object"))}function ln(e,t,n){let r=b(n);if($t(e)){let s=je(e),l=s==="true";if(l||s==="false"){let c=l,$=Pe(t,"const");if($ instanceof d){let _=$[0];return _!==c?new u(h(r+": must be constant value "+(_?"true":"false"))):new o(void 0)}else return new o(void 0)}else return new u(h(r+": invalid boolean representation"))}else return new u(h(r+": expected boolean, got other type"))}var Xl=x(["type","const","default","description"]);function Ct(e,t){let n=b(t),r=z(e);return p(O(n,r,Xl,"boolean"),i=>{let s=!D(Pe(e,"const"),new A),l=!D(Pe(e,"default"),new A);return zt(n,s,l,"boolean")})}function zs(e,t,n){let r=b(n);if(q(e)){let s=z(e);return p(he(s)===1?new o(void 0):new u(h(r+": $bytes objects must have a single field")),l=>{let a=k(e,"$bytes");if(a instanceof d){let f=a[0],c=Pi(f);if(c instanceof o){let $=c[0],_=Cn($),w=M(t,"minLength"),g=M(t,"maxLength");return p((()=>{if(w instanceof d){let S=w[0];return _<S?new u(h(r+": bytes size out of bounds: "+Ht(_))):new o(void 0)}else return new o(void 0)})(),S=>p((()=>{if(g instanceof d){let E=g[0];return _>E?new u(h(r+": bytes size out of bounds: "+Ht(_))):new o(void 0)}else return new o(void 0)})(),E=>new o(void 0)))}else return new u(h(r+": decoding $bytes value: invalid base64 encoding"))}else return new u(h(r+": $bytes field missing or not a string"))})}else return new u(h(r+": expecting bytes"))}var Ql=x(["type","minLength","maxLength","description"]);function Xn(e,t){let n=b(t),r=z(e);return p(O(n,r,Ql,"bytes"),i=>{let s=M(e,"minLength"),l=M(e,"maxLength");return p(s instanceof d?s[0]<0?new u(m(n+": bytes schema minLength below zero")):new o(void 0):new o(void 0),a=>p(l instanceof d?l[0]<0?new u(m(n+": bytes schema maxLength below zero")):new o(void 0):new o(void 0),f=>et(n,s,l,"bytes")))})}function Os(e,t,n){let r=b(n);if(q(e)){let s=k(e,"$link");if(s instanceof d){let l=s[0];return Fn(l)?new o(void 0):new u(h(r+": invalid CID format in $link"))}else return new u(h(r+": CID link must have $link field"))}else return new u(h(r+": expected CID link object"))}var ea=x(["type","description"]);function Qn(e,t){let n=b(t),r=z(e);return O(n,r,ea,"cid-link")}function ta(e,t,n){return Jn(n,e,t,"integer",B,(r,i)=>r===i)}function un(e,t,n){let r=b(n);if(pt(e)){let s=je(e),l=kr(s);if(l instanceof o){let a=l[0],f=M(t,"const");if(f instanceof d){let c=f[0];return c!==a?new u(h(r+": must be constant value "+B(c)+", found "+B(a))):new o(void 0)}else return p((()=>{let c=L(t,"enum");if(c instanceof d){let $=c[0],_=re($,w=>j(w,qe));return ta(a,_,r)}else return new o(void 0)})(),c=>{let $=M(t,"minimum"),_=M(t,"maximum");return ys(r,a,$,_)})}else return new u(h(r+": failed to parse integer value"))}else return new u(h(r+": expected integer, got other type"))}var na=x(["type","minimum","maximum","enum","const","default","description"]);function Bt(e,t){let n=b(t),r=z(e);return p(O(n,r,na,"integer"),i=>{let s=M(e,"minimum"),l=M(e,"maximum");return p(gs(n,s,l),a=>p((()=>{let f=L(e,"enum");if(f instanceof d){let c=f[0];return K(c,void 0,($,_)=>j(_,qe)instanceof o?new o(void 0):new u(m(n+": enum values must be integers")))}else return new o(void 0)})(),f=>{let c=!D(M(e,"const"),new A),$=!D(M(e,"default"),new A);return zt(n,c,$,"integer")}))})}function Bs(e,t,n){let r=b(n);return dt(e)?new o(void 0):new u(h(r+": expected null, got other type"))}var ra=x(["type","description"]);function er(e,t){let n=b(t),r=z(e);return O(n,r,ra,"null")}function ia(e,t,n,r){let i=Zt(e);return Xr(r,i,t,n,"string")}function sa(e,t,n,r){let i,l=Gt(e);return i=he(l),Xr(r,i,t,n,"string (graphemes)")}function oa(e,t,n){if(Vn(e,t))return new o(void 0);{let i=In(t);return new u(h(n+": string does not match format '"+i+"'"))}}function la(e,t,n){return Jn(n,e,t,"string",r=>r,(r,i)=>r===i)}function cn(e,t,n){let r=b(n);if(Re(e)){let s=je(e),l;Z(s,'"')&&Oe(s,'"')?l=Wt(s,1,G(s)-2):l=s;let f=l,c=M(t,"minLength"),$=M(t,"maxLength");return p(ia(f,c,$,r),_=>{let w=M(t,"minGraphemes"),g=M(t,"maxGraphemes");return p(sa(f,w,g,r),S=>{let E,I=k(t,"format");if(I instanceof d){let H=I[0],J=Fr(H);if(J instanceof o){let de=J[0];E=oa(f,de,r)}else E=new o(void 0)}else E=new o(void 0);return p(E,H=>{let J=L(t,"enum");if(J instanceof d){let de=J[0],Ze=re(de,Te=>j(Te,T));return la(f,Ze,r)}else return new o(void 0)})})})}else return new u(h(r+": expected string, got other type"))}var aa=x(["type","format","minLength","maxLength","minGraphemes","maxGraphemes","enum","knownValues","const","default","description"]);function Mt(e,t){let n=b(t),r=z(e);return p(O(n,r,aa,"string"),i=>{let s,l=k(e,"format");if(l instanceof d){let _=l[0];Fr(_)instanceof o?s=new o(void 0):s=new u(m(n+": unknown format '"+_+"'. Valid formats: datetime, uri, at-uri, did, handle, at-identifier, nsid, cid, language, tid, record-key"))}else s=new o(void 0);let f=p(s,_=>{let w=M(e,"minLength"),g=M(e,"maxLength"),S=M(e,"minGraphemes"),E=M(e,"maxGraphemes");return p(w instanceof d?w[0]<0?new u(m(n+": string schema minLength below zero")):new o(void 0):new o(void 0),I=>p(g instanceof d?g[0]<0?new u(m(n+": string schema maxLength below zero")):new o(void 0):new o(void 0),xe=>p(S instanceof d?S[0]<0?new u(m(n+": string schema minGraphemes below zero")):new o(void 0):new o(void 0),H=>p(E instanceof d?E[0]<0?new u(m(n+": string schema maxGraphemes below zero")):new o(void 0):new o(void 0),J=>p(et(n,w,g,"string"),de=>et(n,S,E,"string (graphemes)"))))))}),c=p(f,_=>{let w=L(e,"enum");if(w instanceof d){let g=w[0];return K(g,void 0,(S,E)=>j(E,T)instanceof o?new o(void 0):new u(m(n+": enum values must be strings")))}else return new o(void 0)}),$=p(c,_=>{let w=L(e,"knownValues");if(w instanceof d){let g=w[0];return K(g,void 0,(S,E)=>j(E,T)instanceof o?new o(void 0):new u(m(n+": knownValues must be strings")))}else return new o(void 0)});return p($,_=>{let w=!D(k(e,"const"),new A),g=!D(k(e,"default"),new A);return zt(n,w,g,"string")})})}function ua(e,t,n){let r=re(t,i=>j(i,T));return p(he(r)===he(t)?new o(void 0):new u(m(e+": required fields must be strings")),i=>{if(n instanceof d){let s=n[0],l=ke(s);if(l instanceof o){let a=l[0];return K(r,void 0,(f,c)=>Xe(a,c)?new o(void 0):new u(m(e+": required field '"+c+"' not found in properties")))}else return new o(void 0)}else return Ye(r)?new o(void 0):new u(m(e+": required fields specified but no properties defined"))})}function fa(e,t,n){let r=re(t,i=>j(i,T));return p(he(r)===he(t)?new o(void 0):new u(m(e+": nullable fields must be strings")),i=>{if(n instanceof d){let s=n[0],l=ke(s);if(l instanceof o){let a=l[0];return K(r,void 0,(f,c)=>Xe(a,c)?new o(void 0):new u(m(e+": nullable field '"+c+"' not found in properties")))}else return new o(void 0)}else return Ye(r)?new o(void 0):new u(m(e+": nullable fields specified but no properties defined"))})}function ca(e,t,n){let r=re(t,i=>j(i,T));return K(r,void 0,(i,s)=>{if(C(n,s)instanceof d)return new o(void 0);{let a;e===""?a="required field '"+s+"' is missing":a=e+": required field '"+s+"' is missing";let f=a;return new u(h(f))}})}function Ds(e){return dt(e)?"null":$t(e)?"boolean":pt(e)?"number":Re(e)?"string":Yt(e)?"array":"object"}var da=x(["type","properties","required","nullable","description"]),pa=x(["type","items","minLength","maxLength","description"]);function $a(e,t,n){return ei(e,t,n)}function ei(e,t,n){let r=k(t,"type");if(r instanceof d){let i=r[0];if(i==="string")return cn(e,t,n);if(i==="integer")return un(e,t,n);if(i==="boolean")return ln(e,t,n);if(i==="bytes")return zs(e,t,n);if(i==="blob")return Ss(e,t,n);if(i==="cid-link")return Os(e,t,n);if(i==="null")return Bs(e,t,n);if(i==="object")return tr(e,t,n);if(i==="array")return nr(e,t,n);if(i==="union")return Zn(e,t,n);if(i==="ref")return Gn(e,t,n);if(i==="token")return vs(e,t,n);if(i==="unknown")return sn(e,t,n);{let s=i;return new u(h("Unknown schema type '"+s+"' at '"+b(n)+"'"))}}else return new u(h("Schema missing type field at '"+b(n)+"'"))}function tr(e,t,n){let r=b(n);if(q(e))return p((()=>{let s=L(t,"required");if(s instanceof d){let l=s[0];return ca(r,l,e)}else return new o(void 0)})(),s=>{let l,a=L(t,"nullable");if(a instanceof d){let $=a[0];l=re($,_=>j(_,T))}else l=x([]);let f=l,c=C(t,"properties");if(c instanceof d){let $=c[0];return _a(e,$,f,n)}else return new o(void 0)});{let s=Ds(e);return new u(h("Expected object at '"+r+"', found "+s))}}function _a(e,t,n,r){let i=ke(e);if(i instanceof o){let s=i[0],l=ke(t);if(l instanceof o){let a=l[0];return me(s,new o(void 0),(f,c,$)=>p(f,_=>{let w=ae(a,c);if(w instanceof o){let g=w[0],S=se(g);if(S instanceof o){let E=S[0],I=N(r,c);if(is($))return rt(n,c)?new o(void 0):new u(h("Field '"+c+"' at '"+b(r)+"' cannot be null"));{let H=se($);if(H instanceof o){let J=H[0];return $a(J,E,I)}else return H}}else return S}else return new o(void 0)}))}else return l}else return i}function ma(e,t,n){let r=se(e);return p(r,i=>{let s=k(t,"type");return s instanceof d&&s[0]==="ref"?Gn(i,t,n):ei(i,t,n)})}function nr(e,t,n){let r=b(n);if(Yt(e)){let s,l=qr(e);if(l instanceof d){let f=l[0];s=new o(f)}else s=new u(h(r+": failed to parse array"));return p(s,f=>{let c=he(f);return p((()=>{let $=M(t,"minLength");if($ instanceof d){let _=$[0];return c<_?new u(h(r+": array has length "+B(c)+" but minimum length is "+B(_))):new o(void 0)}else return new o(void 0)})(),$=>p((()=>{let _=M(t,"maxLength");if(_ instanceof d){let w=_[0];return c>w?new u(h(r+": array has length "+B(c)+" but maximum length is "+B(w))):new o(void 0)}else return new o(void 0)})(),_=>{let w=C(t,"items");if(w instanceof d){let g=w[0];return st(f,new o(void 0),(S,E,I)=>p(S,xe=>{let H=N(n,"["+B(I)+"]");return ma(E,g,H)}))}else return new o(void 0)}))})}else{let s=Ds(e);return new u(h(r+": expected array, found "+s))}}function ha(e,t){return ti(e,t)}function ti(e,t){let n=k(e,"type");if(n instanceof d){let r=n[0];if(r==="string")return Mt(e,t);if(r==="integer")return Bt(e,t);if(r==="boolean")return Ct(e,t);if(r==="bytes")return Xn(e,t);if(r==="blob")return Kn(e,t);if(r==="cid-link")return Qn(e,t);if(r==="null")return er(e,t);if(r==="object")return pn(e,t);if(r==="array")return $n(e,t);if(r==="union")return Wn(e,t);if(r==="ref")return rn(e,t);if(r==="token")return Yn(e,t);if(r==="unknown")return Ot(e,t);{let i=r;return new u(m(b(t)+": unknown type '"+i+"'"))}}else return new u(m(b(t)+": schema missing type field"))}function pn(e,t){let n=b(t),r=z(e);return p(O(n,r,da,"object"),i=>{let s;return L(e,"properties")instanceof d?s=new u(m(n+": properties must be an object, not an array")):q(e)?s=new o(new A):s=new o(new A),p(s,f=>{let c=C(e,"properties");return p((()=>{let $=L(e,"required");if($ instanceof d){let _=$[0];return ua(n,_,c)}else return new o(void 0)})(),$=>p((()=>{let _=L(e,"nullable");if(_ instanceof d){let w=_[0];return fa(n,w,c)}else return new o(void 0)})(),_=>{if(c instanceof d){let w=c[0];return q(w)?wa(w,t):new o(void 0)}else return new o(void 0)}))})})}function wa(e,t){let n=ke(e);if(n instanceof o){let r=n[0];return me(r,new o(void 0),(i,s,l)=>p(i,a=>{let f=se(l);if(f instanceof o){let c=f[0],$=N(t,"properties."+s);return ha(c,$)}else return f}))}else return n}function xa(e,t){let n=k(e,"type");return n instanceof d&&n[0]==="ref"?rn(e,t):ti(e,t)}function $n(e,t){let n=b(t),r=z(e);return p(O(n,r,pa,"array"),i=>{let s,l=C(e,"items");if(l instanceof d){let f=l[0];s=new o(f)}else s=new u(m(n+": array missing required 'items' field"));return p(s,f=>{let c=N(t,".items");return p(xa(f,c),$=>{let _=M(e,"minLength"),w=M(e,"maxLength");return p(et(n,_,w,"array"),g=>new o(void 0))})})})}function ya(e,t,n){if(t instanceof d){let r=t[0];return K(r,void 0,(i,s)=>{let l=j(s,T);if(l instanceof o){let a=l[0];return Xe(n,a)?new o(void 0):new u(m(e+": required field '"+a+"' not found in properties"))}else return new u(m(e+": required field must be a string"))})}else return new o(void 0)}function Je(e,t){let n=k(e,"type");if(n instanceof d){let r=n[0];if(r==="boolean")return Ct(e,t);if(r==="integer")return Bt(e,t);if(r==="string")return Mt(e,t);if(r==="unknown")return Ot(e,t);if(r==="array")return $n(e,t);{let i=r;return new u(m(b(t)+": unknown type '"+i+"'"))}}else return new u(m(b(t)+": schema missing type field"))}function ga(e,t,n,r){let i=e+".properties."+t,s=k(n,"type");if(s instanceof d){let l=s[0];if(l==="boolean"){let a=N(r,"properties."+t);return Je(n,a)}else if(l==="integer"){let a=N(r,"properties."+t);return Je(n,a)}else if(l==="string"){let a=N(r,"properties."+t);return Je(n,a)}else if(l==="unknown"){let a=N(r,"properties."+t);return Je(n,a)}else if(l==="array"){let a=C(n,"items");if(a instanceof d){let f=a[0],c=k(f,"type");if(c instanceof d){let $=c[0];if($==="boolean"){let _=N(r,"properties."+t);return Je(n,_)}else if($==="integer"){let _=N(r,"properties."+t);return Je(n,_)}else if($==="string"){let _=N(r,"properties."+t);return Je(n,_)}else if($==="unknown"){let _=N(r,"properties."+t);return Je(n,_)}else{let _=$;return new u(m(i+": params array items must be boolean, integer, string, or unknown, got '"+_+"'"))}}else return new u(m(i+": array items missing type field"))}else return new u(m(i+": array property missing items field"))}else{let a=l;return new u(m(i+": params properties must be boolean, integer, string, unknown, or arrays of these, got '"+a+"'"))}}else return new u(m(i+": property missing type field"))}function ba(e,t,n){return Tn(t,new o(void 0),(r,i,s)=>r instanceof o?p(i===""?new u(m(e+": empty property name not allowed")):new o(void 0),l=>p((()=>{let a=se(s);return a instanceof o?a:new u(m(e+": invalid property value for '"+i+"'"))})(),a=>ga(e,i,a,n))):r)}var va=x(["type","description","properties","required"]);function Ge(e,t){let n=b(t),r=z(e);return p(O(n,r,va,"params"),i=>p((()=>{let s=k(e,"type");if(s instanceof d){let l=s[0];if(l==="params")return new o(void 0);{let a=l;return new u(m(n+": expected type 'params', got '"+a+"'"))}}else return new u(m(n+": params missing type field"))})(),s=>{let l,a=C(e,"properties");if(a instanceof d){let w=a[0];l=ke(w)}else l=new o(Dn());let f=l,c,$=L(e,"required");$ instanceof d,c=$;let _=c;return p(f,w=>p(ya(n,_,w),g=>ba(n,w,t)))}))}function ja(e,t){let n=N(t,"parameters");return Ge(e,n)}function Ls(e,t,n){return k(t,"encoding")instanceof d?new o(void 0):new u(m(e+": procedure "+n+" missing encoding field"))}var ka=x(["type","parameters","input","output","errors","description"]);function Is(e,t){let n=b(t),r=z(e);return p(O(n,r,ka,"procedure"),i=>p((()=>{let s=C(e,"parameters");if(s instanceof d){let l=s[0];return ja(l,t)}else return new o(void 0)})(),s=>p((()=>{let l=C(e,"input");if(l instanceof d){let a=l[0];return Ls(n,a,"input")}else return new o(void 0)})(),l=>p((()=>{let a=C(e,"output");if(a instanceof d){let f=a[0];return Ls(n,f,"output")}else return new o(void 0)})(),a=>L(e,"errors")instanceof d?new o(void 0):new o(void 0)))))}function Ea(e,t){let n=N(t,"parameters");return Ge(e,n)}function za(e,t){return k(t,"encoding")instanceof d?new o(void 0):new u(m(e+": query output missing encoding field"))}var Aa=x(["type","parameters","output","errors","description"]);function Ns(e,t){let n=b(t),r=z(e);return p(O(n,r,Aa,"query"),i=>p((()=>{let s=C(e,"parameters");if(s instanceof d){let l=s[0];return Ea(l,t)}else return new o(void 0)})(),s=>p((()=>{let l=C(e,"output");if(l instanceof d){let a=l[0];return za(n,a)}else return new o(void 0)})(),l=>L(e,"errors")instanceof d?new o(void 0):new o(void 0))))}function qs(e,t,n){let r=b(n);if(q(e)){let s=C(t,"record");if(s instanceof d){let l=s[0];return tr(e,l,n)}else return new u(h(r+": record schema missing 'record' field"))}else return new u(h(r+": expected object for record"))}function Ca(e,t){return t==="tid"?new o(void 0):t==="any"?new o(void 0):t==="nsid"?new o(void 0):Z(t,"literal:")?new o(void 0):new u(m(e+": record has invalid key type '"+t+"'. Must be 'tid', 'any', 'nsid', or 'literal:*'"))}var Ba=x(["type","key","record","description"]),Ma=x(["type","properties","required","nullable","description"]);function Da(e,t){let n=k(t,"type");if(n instanceof d){let r=n[0];if(r==="object"){let i=z(t);return p(O(e,i,Ma,"record object"),s=>p((()=>{let l=C(t,"properties");if(l instanceof d){let a=l[0];return q(a)?new o(void 0):new u(m(e+": record properties must be an object"))}else return new o(void 0)})(),l=>L(t,"nullable")instanceof d?new o(void 0):C(t,"nullable")instanceof d?new u(m(e+": record nullable field must be an array")):new o(void 0)))}else{let i=r;return new u(m(e+": record field must be type 'object', got '"+i+"'"))}}else return new u(m(e+": record field missing type"))}function Us(e,t){let n=b(t),r=z(e);return p(O(n,r,Ba,"record"),i=>{let s,l=k(e,"key");if(l instanceof d){let f=l[0];s=new o(f)}else s=new u(m(n+": record missing required 'key' field"));return p(s,f=>p(Ca(n,f),c=>{let $,_=C(e,"record");if(_ instanceof d){let g=_[0];$=new o(g)}else $=new u(m(n+": record missing required 'record' field"));return p($,g=>p(Da(n,g),S=>{let E=N(t,".record");return pn(g,E)}))}))})}function La(e,t){let n=N(t,"parameters");return Ge(e,n)}function Ia(e,t){let n=C(t,"schema");if(n instanceof d){let r=n[0],i=k(r,"type");if(i instanceof d){let s=i[0];if(s==="union")return new o(void 0);{let l=s;return new u(m(e+": subscription message schema must be type 'union', got '"+l+"'"))}}else return new u(m(e+": subscription message schema missing type field"))}else return new u(m(e+": subscription message missing schema field"))}var Na=x(["type","parameters","message","errors","description"]);function Fs(e,t){let n=b(t),r=z(e);return p(O(n,r,Na,"subscription"),i=>p((()=>{let s=C(e,"parameters");if(s instanceof d){let l=s[0];return La(l,t)}else return new o(void 0)})(),s=>p((()=>{let l=C(e,"message");if(l instanceof d){let a=l[0];return Ia(n,a)}else return new o(void 0)})(),l=>L(e,"errors")instanceof d?new o(void 0):new o(void 0))))}function Ua(e,t){let n=k(e,"type");if(n instanceof d){let r=n[0];if(r==="record")return Us(e,t);if(r==="query")return Ns(e,t);if(r==="procedure")return Is(e,t);if(r==="subscription")return Fs(e,t);if(r==="params")return Ge(e,t);if(r==="object")return pn(e,t);if(r==="array")return $n(e,t);if(r==="union")return Wn(e,t);if(r==="string")return Mt(e,t);if(r==="integer")return Bt(e,t);if(r==="boolean")return Ct(e,t);if(r==="bytes")return Xn(e,t);if(r==="blob")return Kn(e,t);if(r==="cid-link")return Qn(e,t);if(r==="null")return er(e,t);if(r==="ref")return rn(e,t);if(r==="token")return Yn(e,t);if(r==="unknown")return Ot(e,t);{let i=r;return new u(m("Unknown type: "+i))}}else return new u(m("Definition missing type field"))}function Op(e){let t,n=Wr();t=Kr(n,e);let r=t;if(r instanceof o){let i=r[0],s=Hr(i);if(s instanceof o){let l=s[0],a=me(l.lexicons,ee(),(c,$,_)=>{let w=z(_.defs),g=nn(l,$);return Sn(w,c,(S,E)=>{let I=C(_.defs,E);if(I instanceof d){let xe=I[0],H=Ua(xe,g);if(H instanceof o)return S;{let J=H[0],de;J instanceof ft?de="Lexicon not found: "+J.collection:(J instanceof ct,de=J.message);let Ze=de,Te;Z(Ze,": ")?Te=Ve(Ze,2):Te=Ze;let _n=Te,Tt=$+"#"+E+": "+_n,Lt=ae(S,$);if(Lt instanceof o){let We=Lt[0];return _e(S,$,F(Tt,We))}else return _e(S,$,x([Tt]))}}else return S})});return wr(a)?new o(void 0):new u(a)}else{let l=s[0];return new u(bn(x([["builder",x([Ir(l)])]])))}}else{let i=r[0];return new u(bn(x([["builder",x([Ir(i)])]])))}}function Fa(e){let t,n=Wr();return t=Kr(n,e),p(t,i=>Hr(i))}function Va(e,t,n){let r=Pn(e,t);if(r instanceof d){let i=r[0],s=C(i.defs,"main");if(s instanceof d){let l=s[0],a=nn(e,t),f=N(a,"defs.main");return qs(n,l,f)}else return new u(m("Lexicon '"+t+"' has no main definition"))}else return new u(Nr(t))}function Cp(e,t,n){return p(Fa(e),r=>Va(r,t,n))}function Bp(e){return Qe(e)}function Mp(e,t){if(Vn(e,t))return new o(void 0);{let r=In(t);return new u("Value does not match format: "+r)}}function Ra(e){return se(e)}function Pa(e){return p((()=>{let t=Mn(e,ue);return Ke(t,n=>m("Failed to parse JSON string"))})(),t=>Ra(t))}function Dp(e){let n=it(e,Pa);return Ke(n,r=>m("Failed to parse JSON strings"))}export{Fa as build_validation_context,Ra as dynamic_to_json,Bp as is_valid_nsid,Pa as parse_json_string,Dp as parse_json_strings,Op as validate,Cp as validate_record,Va as validate_record_with_context,Mp as validate_string_format};
+12
src/honk.gleam
+12
src/honk.gleam
···
1
// Main public API for the ATProtocol lexicon validator
2
3
import argv
4
import gleam/dict.{type Dict}
5
import gleam/dynamic
6
import gleam/dynamic/decode
7
import gleam/int
8
import gleam/io
9
import gleam/json.{type Json}
10
import gleam/list
···
16
import honk/types
17
import honk/validation/context
18
import honk/validation/formats
19
import simplifile
20
21
// Import validators
···
281
})
282
}
283
284
/// CLI entry point for the honk lexicon validator
285
///
286
/// Usage:
···
297
}
298
}
299
300
/// Validate a path (auto-detects file or directory)
301
fn validate_path(path: String) -> Nil {
302
case simplifile.is_file(path) {
···
322
}
323
}
324
325
/// Validate a single lexicon file
326
fn validate_file(file_path: String) -> Nil {
327
case read_and_validate_file(file_path) {
···
337
}
338
}
339
340
/// Validate all .json files in a directory
341
fn validate_directory(dir_path: String) -> Nil {
342
case simplifile.get_files(dir_path) {
···
474
}
475
}
476
477
/// Read and parse a JSON file (without validation)
478
fn read_json_file(file_path: String) -> Result(Json, String) {
479
use content <- result.try(
···
490
|> result.map_error(fn(_) { "Failed to convert JSON" })
491
}
492
493
/// Read a file and validate it as a lexicon
494
fn read_and_validate_file(file_path: String) -> Result(Nil, String) {
495
use content <- result.try(
···
515
Ok(Nil)
516
}
517
518
/// Format validation errors from the error map
519
fn format_validation_errors(error_map: Dict(String, List(String))) -> String {
520
error_map
···
526
|> string.join("\n ")
527
}
528
529
/// Show help text
530
fn show_help() -> Nil {
531
io.println(
···
1
// Main public API for the ATProtocol lexicon validator
2
3
+
@target(erlang)
4
import argv
5
import gleam/dict.{type Dict}
6
import gleam/dynamic
7
import gleam/dynamic/decode
8
+
@target(erlang)
9
import gleam/int
10
+
@target(erlang)
11
import gleam/io
12
import gleam/json.{type Json}
13
import gleam/list
···
19
import honk/types
20
import honk/validation/context
21
import honk/validation/formats
22
+
@target(erlang)
23
import simplifile
24
25
// Import validators
···
285
})
286
}
287
288
+
@target(erlang)
289
/// CLI entry point for the honk lexicon validator
290
///
291
/// Usage:
···
302
}
303
}
304
305
+
@target(erlang)
306
/// Validate a path (auto-detects file or directory)
307
fn validate_path(path: String) -> Nil {
308
case simplifile.is_file(path) {
···
328
}
329
}
330
331
+
@target(erlang)
332
/// Validate a single lexicon file
333
fn validate_file(file_path: String) -> Nil {
334
case read_and_validate_file(file_path) {
···
344
}
345
}
346
347
+
@target(erlang)
348
/// Validate all .json files in a directory
349
fn validate_directory(dir_path: String) -> Nil {
350
case simplifile.get_files(dir_path) {
···
482
}
483
}
484
485
+
@target(erlang)
486
/// Read and parse a JSON file (without validation)
487
fn read_json_file(file_path: String) -> Result(Json, String) {
488
use content <- result.try(
···
499
|> result.map_error(fn(_) { "Failed to convert JSON" })
500
}
501
502
+
@target(erlang)
503
/// Read a file and validate it as a lexicon
504
fn read_and_validate_file(file_path: String) -> Result(Nil, String) {
505
use content <- result.try(
···
525
Ok(Nil)
526
}
527
528
+
@target(erlang)
529
/// Format validation errors from the error map
530
fn format_validation_errors(error_map: Dict(String, List(String))) -> String {
531
error_map
···
537
|> string.join("\n ")
538
}
539
540
+
@target(erlang)
541
/// Show help text
542
fn show_help() -> Nil {
543
io.println(