@shhhum/xftp-web 0.1.0

package/dist/protocol/description.js

@@ -0,0 +1,317 @@
+// XFTP file description encoding/decoding -- Simplex.FileTransfer.Description
+//
+// Handles YAML-encoded file descriptions matching Haskell Data.Yaml output format.
+// Base64url encoding matches Haskell Data.ByteString.Base64.URL.encode (with padding).
+// -- Base64url (RFC 4648 section 5) with '=' padding
+const B64URL = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-_";
+const B64_DECODE = new Uint8Array(128);
+B64_DECODE.fill(0xff);
+for (let i = 0; i < 64; i++)
+    B64_DECODE[B64URL.charCodeAt(i)] = i;
+export function base64urlEncode(data) {
+    let result = "";
+    const len = data.length;
+    let i = 0;
+    for (; i + 2 < len; i += 3) {
+        const b0 = data[i], b1 = data[i + 1], b2 = data[i + 2];
+        result += B64URL[b0 >>> 2];
+        result += B64URL[((b0 & 3) << 4) | (b1 >>> 4)];
+        result += B64URL[((b1 & 15) << 2) | (b2 >>> 6)];
+        result += B64URL[b2 & 63];
+    }
+    if (i < len) {
+        const b0 = data[i];
+        result += B64URL[b0 >>> 2];
+        if (i + 1 < len) {
+            const b1 = data[i + 1];
+            result += B64URL[((b0 & 3) << 4) | (b1 >>> 4)];
+            result += B64URL[(b1 & 15) << 2];
+            result += "=";
+        }
+        else {
+            result += B64URL[(b0 & 3) << 4];
+            result += "==";
+        }
+    }
+    return result;
+}
+export function base64urlDecode(s) {
+    let end = s.length;
+    while (end > 0 && s.charCodeAt(end - 1) === 0x3d)
+        end--; // strip '='
+    const n = end;
+    const out = new Uint8Array((n * 3) >>> 2);
+    let j = 0, i = 0;
+    for (; i + 3 < n; i += 4) {
+        const a = B64_DECODE[s.charCodeAt(i)], b = B64_DECODE[s.charCodeAt(i + 1)];
+        const c = B64_DECODE[s.charCodeAt(i + 2)], d = B64_DECODE[s.charCodeAt(i + 3)];
+        out[j++] = (a << 2) | (b >>> 4);
+        out[j++] = ((b & 15) << 4) | (c >>> 2);
+        out[j++] = ((c & 3) << 6) | d;
+    }
+    if (n - i >= 2) {
+        const a = B64_DECODE[s.charCodeAt(i)], b = B64_DECODE[s.charCodeAt(i + 1)];
+        out[j++] = (a << 2) | (b >>> 4);
+        if (n - i >= 3) {
+            const c = B64_DECODE[s.charCodeAt(i + 2)];
+            out[j++] = ((b & 15) << 4) | (c >>> 2);
+        }
+    }
+    return out;
+}
+// -- FileSize encoding/decoding
+export const kb = (n) => n * 1024;
+export const mb = (n) => n * 1048576;
+export const gb = (n) => n * 1073741824;
+export function encodeFileSize(bytes) {
+    const ks = Math.floor(bytes / 1024);
+    if (bytes % 1024 !== 0)
+        return String(bytes);
+    const ms = Math.floor(ks / 1024);
+    if (ks % 1024 !== 0)
+        return ks + "kb";
+    const gs = Math.floor(ms / 1024);
+    if (ms % 1024 !== 0)
+        return ms + "mb";
+    return gs + "gb";
+}
+export function decodeFileSize(s) {
+    if (s.endsWith("gb"))
+        return parseInt(s) * 1073741824;
+    if (s.endsWith("mb"))
+        return parseInt(s) * 1048576;
+    if (s.endsWith("kb"))
+        return parseInt(s) * 1024;
+    return parseInt(s);
+}
+// -- Server replica colon-separated format
+function encodeServerReplica(r) {
+    let s = r.chunkNo + ":" + base64urlEncode(r.replicaId) + ":" + base64urlEncode(r.replicaKey);
+    if (r.digest !== null)
+        s += ":" + base64urlEncode(r.digest);
+    if (r.chunkSize !== null)
+        s += ":" + encodeFileSize(r.chunkSize);
+    return s;
+}
+function decodeServerReplica(server, s) {
+    const parts = s.split(":");
+    if (parts.length < 3)
+        throw new Error("invalid server replica: " + s);
+    return {
+        chunkNo: parseInt(parts[0]),
+        server,
+        replicaId: base64urlDecode(parts[1]),
+        replicaKey: base64urlDecode(parts[2]),
+        digest: parts.length >= 4 ? base64urlDecode(parts[3]) : null,
+        chunkSize: parts.length >= 5 ? decodeFileSize(parts[4]) : null
+    };
+}
+// -- Unfold chunks to flat replicas
+function unfoldChunksToReplicas(defChunkSize, chunks) {
+    const result = [];
+    for (const c of chunks) {
+        c.replicas.forEach((r, idx) => {
+            result.push({
+                chunkNo: c.chunkNo,
+                server: r.server,
+                replicaId: r.replicaId,
+                replicaKey: r.replicaKey,
+                digest: idx === 0 ? c.digest : null,
+                chunkSize: c.chunkSize !== defChunkSize && idx === 0 ? c.chunkSize : null
+            });
+        });
+    }
+    return result;
+}
+// -- Group replicas by server (for YAML encoding)
+function encodeFileReplicas(defChunkSize, chunks) {
+    const flat = unfoldChunksToReplicas(defChunkSize, chunks);
+    // Sort by server URI string (matches Haskell Ord for ProtocolServer when
+    // all servers share the same scheme and keyHash -- true for typical use).
+    flat.sort((a, b) => a.server < b.server ? -1 : a.server > b.server ? 1 : 0);
+    const groups = [];
+    for (const r of flat) {
+        if (groups.length === 0 || groups[groups.length - 1].server !== r.server) {
+            groups.push({ server: r.server, chunks: [encodeServerReplica(r)] });
+        }
+        else {
+            groups[groups.length - 1].chunks.push(encodeServerReplica(r));
+        }
+    }
+    return groups;
+}
+// -- Fold flat replicas back into FileChunks
+function bytesEqual(a, b) {
+    if (a.length !== b.length)
+        return false;
+    for (let i = 0; i < a.length; i++)
+        if (a[i] !== b[i])
+            return false;
+    return true;
+}
+function foldReplicasToChunks(defChunkSize, replicas) {
+    const sizes = new Map();
+    const digests = new Map();
+    for (const r of replicas) {
+        if (r.chunkSize !== null) {
+            const existing = sizes.get(r.chunkNo);
+            if (existing !== undefined && existing !== r.chunkSize)
+                throw new Error("different size in chunk replicas");
+            sizes.set(r.chunkNo, r.chunkSize);
+        }
+        if (r.digest !== null) {
+            const existing = digests.get(r.chunkNo);
+            if (existing !== undefined && !bytesEqual(existing, r.digest))
+                throw new Error("different digest in chunk replicas");
+            digests.set(r.chunkNo, r.digest);
+        }
+    }
+    const chunkMap = new Map();
+    for (const r of replicas) {
+        const existing = chunkMap.get(r.chunkNo);
+        if (existing) {
+            existing.replicas.push({ server: r.server, replicaId: r.replicaId, replicaKey: r.replicaKey });
+        }
+        else {
+            const digest = digests.get(r.chunkNo);
+            if (!digest)
+                throw new Error("no digest for chunk");
+            chunkMap.set(r.chunkNo, {
+                chunkNo: r.chunkNo,
+                chunkSize: sizes.get(r.chunkNo) ?? defChunkSize,
+                digest,
+                replicas: [{ server: r.server, replicaId: r.replicaId, replicaKey: r.replicaKey }]
+            });
+        }
+    }
+    return Array.from(chunkMap.values()).sort((a, b) => a.chunkNo - b.chunkNo);
+}
+// -- YAML encoding (matching Data.Yaml key ordering)
+export function encodeFileDescription(fd) {
+    const lines = [];
+    // Top-level keys in alphabetical order (matching Data.Yaml / libyaml)
+    lines.push("chunkSize: " + encodeFileSize(fd.chunkSize));
+    lines.push("digest: " + base64urlEncode(fd.digest));
+    lines.push("key: " + base64urlEncode(fd.key));
+    lines.push("nonce: " + base64urlEncode(fd.nonce));
+    lines.push("party: " + fd.party);
+    if (fd.redirect !== null) {
+        lines.push("redirect:");
+        lines.push("  digest: " + base64urlEncode(fd.redirect.digest));
+        lines.push("  size: " + fd.redirect.size);
+    }
+    const groups = encodeFileReplicas(fd.chunkSize, fd.chunks);
+    lines.push("replicas:");
+    for (const g of groups) {
+        lines.push("- chunks:");
+        for (const c of g.chunks) {
+            lines.push("  - " + c);
+        }
+        lines.push("  server: " + g.server);
+    }
+    lines.push("size: " + encodeFileSize(fd.size));
+    return lines.join("\n") + "\n";
+}
+// -- YAML decoding
+export function decodeFileDescription(yaml) {
+    const lines = yaml.split("\n");
+    const topLevel = {};
+    const replicaGroups = [];
+    let redirect = null;
+    let i = 0;
+    while (i < lines.length) {
+        const line = lines[i];
+        if (line.length === 0) {
+            i++;
+            continue;
+        }
+        if (line === "replicas:") {
+            i++;
+            while (i < lines.length && lines[i].startsWith("- ")) {
+                const group = { server: "", chunks: [] };
+                i = parseReplicaItem(lines, i, group);
+                replicaGroups.push(group);
+            }
+        }
+        else if (line === "redirect:") {
+            i++;
+            let digestStr = "", sizeStr = "";
+            while (i < lines.length && lines[i].startsWith("  ")) {
+                const kv = lines[i].substring(2);
+                const ci = kv.indexOf(": ");
+                if (ci >= 0) {
+                    const k = kv.substring(0, ci), v = kv.substring(ci + 2);
+                    if (k === "digest")
+                        digestStr = v;
+                    if (k === "size")
+                        sizeStr = v;
+                }
+                i++;
+            }
+            redirect = { size: parseInt(sizeStr), digest: base64urlDecode(digestStr) };
+        }
+        else {
+            const ci = line.indexOf(": ");
+            if (ci >= 0)
+                topLevel[line.substring(0, ci)] = line.substring(ci + 2);
+            i++;
+        }
+    }
+    const chunkSize = decodeFileSize(topLevel["chunkSize"]);
+    const serverReplicas = [];
+    for (const g of replicaGroups) {
+        for (const c of g.chunks)
+            serverReplicas.push(decodeServerReplica(g.server, c));
+    }
+    return {
+        party: topLevel["party"],
+        size: decodeFileSize(topLevel["size"]),
+        digest: base64urlDecode(topLevel["digest"]),
+        key: base64urlDecode(topLevel["key"]),
+        nonce: base64urlDecode(topLevel["nonce"]),
+        chunkSize,
+        chunks: foldReplicasToChunks(chunkSize, serverReplicas),
+        redirect
+    };
+}
+function parseReplicaItem(lines, startIdx, group) {
+    let i = startIdx;
+    const first = lines[i].substring(2); // strip "- " prefix
+    i = parseReplicaField(first, lines, i + 1, group);
+    while (i < lines.length && lines[i].startsWith("  ") && !lines[i].startsWith("- ")) {
+        i = parseReplicaField(lines[i].substring(2), lines, i + 1, group);
+    }
+    return i;
+}
+function parseReplicaField(entry, lines, nextIdx, group) {
+    if (entry === "chunks:" || entry.startsWith("chunks:")) {
+        let i = nextIdx;
+        while (i < lines.length && lines[i].startsWith("  - ")) {
+            group.chunks.push(lines[i].substring(4));
+            i++;
+        }
+        return i;
+    }
+    const ci = entry.indexOf(": ");
+    if (ci >= 0) {
+        const k = entry.substring(0, ci), v = entry.substring(ci + 2);
+        if (k === "server")
+            group.server = v;
+    }
+    return nextIdx;
+}
+// -- Validation
+export function validateFileDescription(fd) {
+    for (let i = 0; i < fd.chunks.length; i++) {
+        if (fd.chunks[i].chunkNo !== i + 1)
+            return "chunk numbers are not sequential";
+    }
+    let total = 0;
+    for (const c of fd.chunks)
+        total += c.chunkSize;
+    if (total !== fd.size)
+        return "chunks total size is different than file size";
+    return null;
+}
+export const fdSeparator = "################################\n";
+//# sourceMappingURL=description.js.map

package/dist/protocol/description.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"description.js","sourceRoot":"","sources":["../../src/protocol/description.ts"],"names":[],"mappings":"AAAA,8EAA8E;AAC9E,EAAE;AACF,mFAAmF;AACnF,uFAAuF;AAEvF,qDAAqD;AAErD,MAAM,MAAM,GAAG,kEAAkE,CAAA;AACjF,MAAM,UAAU,GAAG,IAAI,UAAU,CAAC,GAAG,CAAC,CAAA;AACtC,UAAU,CAAC,IAAI,CAAC,IAAI,CAAC,CAAA;AACrB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE;IAAE,UAAU,CAAC,MAAM,CAAC,UAAU,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAA;AAEjE,MAAM,UAAU,eAAe,CAAC,IAAgB;IAC9C,IAAI,MAAM,GAAG,EAAE,CAAA;IACf,MAAM,GAAG,GAAG,IAAI,CAAC,MAAM,CAAA;IACvB,IAAI,CAAC,GAAG,CAAC,CAAA;IACT,OAAO,CAAC,GAAG,CAAC,GAAG,GAAG,EAAE,CAAC,IAAI,CAAC,EAAE,CAAC;QAC3B,MAAM,EAAE,GAAG,IAAI,CAAC,CAAC,CAAC,EAAE,EAAE,GAAG,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,EAAE,EAAE,GAAG,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,CAAA;QACtD,MAAM,IAAI,MAAM,CAAC,EAAE,KAAK,CAAC,CAAC,CAAA;QAC1B,MAAM,IAAI,MAAM,CAAC,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,EAAE,KAAK,CAAC,CAAC,CAAC,CAAA;QAC9C,MAAM,IAAI,MAAM,CAAC,CAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,EAAE,KAAK,CAAC,CAAC,CAAC,CAAA;QAC/C,MAAM,IAAI,MAAM,CAAC,EAAE,GAAG,EAAE,CAAC,CAAA;IAC3B,CAAC;IACD,IAAI,CAAC,GAAG,GAAG,EAAE,CAAC;QACZ,MAAM,EAAE,GAAG,IAAI,CAAC,CAAC,CAAC,CAAA;QAClB,MAAM,IAAI,MAAM,CAAC,EAAE,KAAK,CAAC,CAAC,CAAA;QAC1B,IAAI,CAAC,GAAG,CAAC,GAAG,GAAG,EAAE,CAAC;YAChB,MAAM,EAAE,GAAG,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,CAAA;YACtB,MAAM,IAAI,MAAM,CAAC,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,EAAE,KAAK,CAAC,CAAC,CAAC,CAAA;YAC9C,MAAM,IAAI,MAAM,CAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC,CAAA;YAChC,MAAM,IAAI,GAAG,CAAA;QACf,CAAC;aAAM,CAAC;YACN,MAAM,IAAI,MAAM,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,CAAA;YAC/B,MAAM,IAAI,IAAI,CAAA;QAChB,CAAC;IACH,CAAC;IACD,OAAO,MAAM,CAAA;AACf,CAAC;AAED,MAAM,UAAU,eAAe,CAAC,CAAS;IACvC,IAAI,GAAG,GAAG,CAAC,CAAC,MAAM,CAAA;IAClB,OAAO,GAAG,GAAG,CAAC,IAAI,CAAC,CAAC,UAAU,CAAC,GAAG,GAAG,CAAC,CAAC,KAAK,IAAI;QAAE,GAAG,EAAE,CAAA,CAAC,YAAY;IACpE,MAAM,CAAC,GAAG,GAAG,CAAA;IACb,MAAM,GAAG,GAAG,IAAI,UAAU,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,CAAC,CAAC,CAAA;IACzC,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,CAAA;IAChB,OAAO,CAAC,GAAG,CAAC,GAAG,CAAC,EAAE,CAAC,IAAI,CAAC,EAAE,CAAC;QACzB,MAAM,CAAC,GAAG,UAAU,CAAC,CAAC,CAAC,UAAU,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,GAAG,UAAU,CAAC,CAAC,CAAC,UAAU,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAA;QAC1E,MAAM,CAAC,GAAG,UAAU,CAAC,CAAC,CAAC,UAAU,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,CAAC,GAAG,UAAU,CAAC,CAAC,CAAC,UAAU,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAA;QAC9E,GAAG,CAAC,CAAC,EAAE,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,CAAC,CAAC,CAAA;QAC/B,GAAG,CAAC,CAAC,EAAE,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,CAAC,CAAC,CAAA;QACtC,GAAG,CAAC,CAAC,EAAE,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAA;IAC/B,CAAC;IACD,IAAI,CAAC,GAAG,CAAC,IAAI,CAAC,EAAE,CAAC;QACf,MAAM,CAAC,GAAG,UAAU,CAAC,CAAC,CAAC,UAAU,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,GAAG,UAAU,CAAC,CAAC,CAAC,UAAU,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAA;QAC1E,GAAG,CAAC,CAAC,EAAE,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,CAAC,CAAC,CAAA;QAC/B,IAAI,CAAC,GAAG,CAAC,IAAI,CAAC,EAAE,CAAC;YACf,MAAM,CAAC,GAAG,UAAU,CAAC,CAAC,CAAC,UAAU,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAA;YACzC,GAAG,CAAC,CAAC,EAAE,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,CAAC,CAAC,CAAA;QACxC,CAAC;IACH,CAAC;IACD,OAAO,GAAG,CAAA;AACZ,CAAC;AAED,gCAAgC;AAEhC,MAAM,CAAC,MAAM,EAAE,GAAG,CAAC,CAAS,EAAU,EAAE,CAAC,CAAC,GAAG,IAAI,CAAA;AACjD,MAAM,CAAC,MAAM,EAAE,GAAG,CAAC,CAAS,EAAU,EAAE,CAAC,CAAC,GAAG,OAAO,CAAA;AACpD,MAAM,CAAC,MAAM,EAAE,GAAG,CAAC,CAAS,EAAU,EAAE,CAAC,CAAC,GAAG,UAAU,CAAA;AAEvD,MAAM,UAAU,cAAc,CAAC,KAAa;IAC1C,MAAM,EAAE,GAAG,IAAI,CAAC,KAAK,CAAC,KAAK,GAAG,IAAI,CAAC,CAAA;IACnC,IAAI,KAAK,GAAG,IAAI,KAAK,CAAC;QAAE,OAAO,MAAM,CAAC,KAAK,CAAC,CAAA;IAC5C,MAAM,EAAE,GAAG,IAAI,CAAC,KAAK,CAAC,EAAE,GAAG,IAAI,CAAC,CAAA;IAChC,IAAI,EAAE,GAAG,IAAI,KAAK,CAAC;QAAE,OAAO,EAAE,GAAG,IAAI,CAAA;IACrC,MAAM,EAAE,GAAG,IAAI,CAAC,KAAK,CAAC,EAAE,GAAG,IAAI,CAAC,CAAA;IAChC,IAAI,EAAE,GAAG,IAAI,KAAK,CAAC;QAAE,OAAO,EAAE,GAAG,IAAI,CAAA;IACrC,OAAO,EAAE,GAAG,IAAI,CAAA;AAClB,CAAC;AAED,MAAM,UAAU,cAAc,CAAC,CAAS;IACtC,IAAI,CAAC,CAAC,QAAQ,CAAC,IAAI,CAAC;QAAE,OAAO,QAAQ,CAAC,CAAC,CAAC,GAAG,UAAU,CAAA;IACrD,IAAI,CAAC,CAAC,QAAQ,CAAC,IAAI,CAAC;QAAE,OAAO,QAAQ,CAAC,CAAC,CAAC,GAAG,OAAO,CAAA;IAClD,IAAI,CAAC,CAAC,QAAQ,CAAC,IAAI,CAAC;QAAE,OAAO,QAAQ,CAAC,CAAC,CAAC,GAAG,IAAI,CAAA;IAC/C,OAAO,QAAQ,CAAC,CAAC,CAAC,CAAA;AACpB,CAAC;AA8CD,2CAA2C;AAE3C,SAAS,mBAAmB,CAAC,CAAoB;IAC/C,IAAI,CAAC,GAAG,CAAC,CAAC,OAAO,GAAG,GAAG,GAAG,eAAe,CAAC,CAAC,CAAC,SAAS,CAAC,GAAG,GAAG,GAAG,eAAe,CAAC,CAAC,CAAC,UAAU,CAAC,CAAA;IAC5F,IAAI,CAAC,CAAC,MAAM,KAAK,IAAI;QAAE,CAAC,IAAI,GAAG,GAAG,eAAe,CAAC,CAAC,CAAC,MAAM,CAAC,CAAA;IAC3D,IAAI,CAAC,CAAC,SAAS,KAAK,IAAI;QAAE,CAAC,IAAI,GAAG,GAAG,cAAc,CAAC,CAAC,CAAC,SAAS,CAAC,CAAA;IAChE,OAAO,CAAC,CAAA;AACV,CAAC;AAED,SAAS,mBAAmB,CAAC,MAAc,EAAE,CAAS;IACpD,MAAM,KAAK,GAAG,CAAC,CAAC,KAAK,CAAC,GAAG,CAAC,CAAA;IAC1B,IAAI,KAAK,CAAC,MAAM,GAAG,CAAC;QAAE,MAAM,IAAI,KAAK,CAAC,0BAA0B,GAAG,CAAC,CAAC,CAAA;IACrE,OAAO;QACL,OAAO,EAAE,QAAQ,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC;QAC3B,MAAM;QACN,SAAS,EAAE,eAAe,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC;QACpC,UAAU,EAAE,eAAe,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC;QACrC,MAAM,EAAE,KAAK,CAAC,MAAM,IAAI,CAAC,CAAC,CAAC,CAAC,eAAe,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI;QAC5D,SAAS,EAAE,KAAK,CAAC,MAAM,IAAI,CAAC,CAAC,CAAC,CAAC,cAAc,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI;KAC/D,CAAA;AACH,CAAC;AAED,oCAAoC;AAEpC,SAAS,sBAAsB,CAAC,YAAoB,EAAE,MAAmB;IACvE,MAAM,MAAM,GAAwB,EAAE,CAAA;IACtC,KAAK,MAAM,CAAC,IAAI,MAAM,EAAE,CAAC;QACvB,CAAC,CAAC,QAAQ,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,GAAG,EAAE,EAAE;YAC5B,MAAM,CAAC,IAAI,CAAC;gBACV,OAAO,EAAE,CAAC,CAAC,OAAO;gBAClB,MAAM,EAAE,CAAC,CAAC,MAAM;gBAChB,SAAS,EAAE,CAAC,CAAC,SAAS;gBACtB,UAAU,EAAE,CAAC,CAAC,UAAU;gBACxB,MAAM,EAAE,GAAG,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI;gBACnC,SAAS,EAAE,CAAC,CAAC,SAAS,KAAK,YAAY,IAAI,GAAG,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,IAAI;aAC1E,CAAC,CAAA;QACJ,CAAC,CAAC,CAAA;IACJ,CAAC;IACD,OAAO,MAAM,CAAA;AACf,CAAC;AAED,kDAAkD;AAElD,SAAS,kBAAkB,CACzB,YAAoB,EAAE,MAAmB;IAEzC,MAAM,IAAI,GAAG,sBAAsB,CAAC,YAAY,EAAE,MAAM,CAAC,CAAA;IACzD,yEAAyE;IACzE,0EAA0E;IAC1E,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,MAAM,GAAG,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,MAAM,GAAG,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAA;IAC3E,MAAM,MAAM,GAAyC,EAAE,CAAA;IACvD,KAAK,MAAM,CAAC,IAAI,IAAI,EAAE,CAAC;QACrB,IAAI,MAAM,CAAC,MAAM,KAAK,CAAC,IAAI,MAAM,CAAC,MAAM,CAAC,MAAM,GAAG,CAAC,CAAC,CAAC,MAAM,KAAK,CAAC,CAAC,MAAM,EAAE,CAAC;YACzE,MAAM,CAAC,IAAI,CAAC,EAAC,MAAM,EAAE,CAAC,CAAC,MAAM,EAAE,MAAM,EAAE,CAAC,mBAAmB,CAAC,CAAC,CAAC,CAAC,EAAC,CAAC,CAAA;QACnE,CAAC;aAAM,CAAC;YACN,MAAM,CAAC,MAAM,CAAC,MAAM,GAAG,CAAC,CAAC,CAAC,MAAM,CAAC,IAAI,CAAC,mBAAmB,CAAC,CAAC,CAAC,CAAC,CAAA;QAC/D,CAAC;IACH,CAAC;IACD,OAAO,MAAM,CAAA;AACf,CAAC;AAED,6CAA6C;AAE7C,SAAS,UAAU,CAAC,CAAa,EAAE,CAAa;IAC9C,IAAI,CAAC,CAAC,MAAM,KAAK,CAAC,CAAC,MAAM;QAAE,OAAO,KAAK,CAAA;IACvC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,CAAC,MAAM,EAAE,CAAC,EAAE;QAAE,IAAI,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC;YAAE,OAAO,KAAK,CAAA;IAClE,OAAO,IAAI,CAAA;AACb,CAAC;AAED,SAAS,oBAAoB,CAAC,YAAoB,EAAE,QAA6B;IAC/E,MAAM,KAAK,GAAG,IAAI,GAAG,EAAkB,CAAA;IACvC,MAAM,OAAO,GAAG,IAAI,GAAG,EAAsB,CAAA;IAC7C,KAAK,MAAM,CAAC,IAAI,QAAQ,EAAE,CAAC;QACzB,IAAI,CAAC,CAAC,SAAS,KAAK,IAAI,EAAE,CAAC;YACzB,MAAM,QAAQ,GAAG,KAAK,CAAC,GAAG,CAAC,CAAC,CAAC,OAAO,CAAC,CAAA;YACrC,IAAI,QAAQ,KAAK,SAAS,IAAI,QAAQ,KAAK,CAAC,CAAC,SAAS;gBACpD,MAAM,IAAI,KAAK,CAAC,kCAAkC,CAAC,CAAA;YACrD,KAAK,CAAC,GAAG,CAAC,CAAC,CAAC,OAAO,EAAE,CAAC,CAAC,SAAS,CAAC,CAAA;QACnC,CAAC;QACD,IAAI,CAAC,CAAC,MAAM,KAAK,IAAI,EAAE,CAAC;YACtB,MAAM,QAAQ,GAAG,OAAO,CAAC,GAAG,CAAC,CAAC,CAAC,OAAO,CAAC,CAAA;YACvC,IAAI,QAAQ,KAAK,SAAS,IAAI,CAAC,UAAU,CAAC,QAAQ,EAAE,CAAC,CAAC,MAAM,CAAC;gBAC3D,MAAM,IAAI,KAAK,CAAC,oCAAoC,CAAC,CAAA;YACvD,OAAO,CAAC,GAAG,CAAC,CAAC,CAAC,OAAO,EAAE,CAAC,CAAC,MAAM,CAAC,CAAA;QAClC,CAAC;IACH,CAAC;IACD,MAAM,QAAQ,GAAG,IAAI,GAAG,EAAqB,CAAA;IAC7C,KAAK,MAAM,CAAC,IAAI,QAAQ,EAAE,CAAC;QACzB,MAAM,QAAQ,GAAG,QAAQ,CAAC,GAAG,CAAC,CAAC,CAAC,OAAO,CAAC,CAAA;QACxC,IAAI,QAAQ,EAAE,CAAC;YACb,QAAQ,CAAC,QAAQ,CAAC,IAAI,CAAC,EAAC,MAAM,EAAE,CAAC,CAAC,MAAM,EAAE,SAAS,EAAE,CAAC,CAAC,SAAS,EAAE,UAAU,EAAE,CAAC,CAAC,UAAU,EAAC,CAAC,CAAA;QAC9F,CAAC;aAAM,CAAC;YACN,MAAM,MAAM,GAAG,OAAO,CAAC,GAAG,CAAC,CAAC,CAAC,OAAO,CAAC,CAAA;YACrC,IAAI,CAAC,MAAM;gBAAE,MAAM,IAAI,KAAK,CAAC,qBAAqB,CAAC,CAAA;YACnD,QAAQ,CAAC,GAAG,CAAC,CAAC,CAAC,OAAO,EAAE;gBACtB,OAAO,EAAE,CAAC,CAAC,OAAO;gBAClB,SAAS,EAAE,KAAK,CAAC,GAAG,CAAC,CAAC,CAAC,OAAO,CAAC,IAAI,YAAY;gBAC/C,MAAM;gBACN,QAAQ,EAAE,CAAC,EAAC,MAAM,EAAE,CAAC,CAAC,MAAM,EAAE,SAAS,EAAE,CAAC,CAAC,SAAS,EAAE,UAAU,EAAE,CAAC,CAAC,UAAU,EAAC,CAAC;aACjF,CAAC,CAAA;QACJ,CAAC;IACH,CAAC;IACD,OAAO,KAAK,CAAC,IAAI,CAAC,QAAQ,CAAC,MAAM,EAAE,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,OAAO,GAAG,CAAC,CAAC,OAAO,CAAC,CAAA;AAC5E,CAAC;AAED,qDAAqD;AAErD,MAAM,UAAU,qBAAqB,CAAC,EAAmB;IACvD,MAAM,KAAK,GAAa,EAAE,CAAA;IAC1B,sEAAsE;IACtE,KAAK,CAAC,IAAI,CAAC,aAAa,GAAG,cAAc,CAAC,EAAE,CAAC,SAAS,CAAC,CAAC,CAAA;IACxD,KAAK,CAAC,IAAI,CAAC,UAAU,GAAG,eAAe,CAAC,EAAE,CAAC,MAAM,CAAC,CAAC,CAAA;IACnD,KAAK,CAAC,IAAI,CAAC,OAAO,GAAG,eAAe,CAAC,EAAE,CAAC,GAAG,CAAC,CAAC,CAAA;IAC7C,KAAK,CAAC,IAAI,CAAC,SAAS,GAAG,eAAe,CAAC,EAAE,CAAC,KAAK,CAAC,CAAC,CAAA;IACjD,KAAK,CAAC,IAAI,CAAC,SAAS,GAAG,EAAE,CAAC,KAAK,CAAC,CAAA;IAChC,IAAI,EAAE,CAAC,QAAQ,KAAK,IAAI,EAAE,CAAC;QACzB,KAAK,CAAC,IAAI,CAAC,WAAW,CAAC,CAAA;QACvB,KAAK,CAAC,IAAI,CAAC,YAAY,GAAG,eAAe,CAAC,EAAE,CAAC,QAAQ,CAAC,MAAM,CAAC,CAAC,CAAA;QAC9D,KAAK,CAAC,IAAI,CAAC,UAAU,GAAG,EAAE,CAAC,QAAQ,CAAC,IAAI,CAAC,CAAA;IAC3C,CAAC;IACD,MAAM,MAAM,GAAG,kBAAkB,CAAC,EAAE,CAAC,SAAS,EAAE,EAAE,CAAC,MAAM,CAAC,CAAA;IAC1D,KAAK,CAAC,IAAI,CAAC,WAAW,CAAC,CAAA;IACvB,KAAK,MAAM,CAAC,IAAI,MAAM,EAAE,CAAC;QACvB,KAAK,CAAC,IAAI,CAAC,WAAW,CAAC,CAAA;QACvB,KAAK,MAAM,CAAC,IAAI,CAAC,CAAC,MAAM,EAAE,CAAC;YACzB,KAAK,CAAC,IAAI,CAAC,MAAM,GAAG,CAAC,CAAC,CAAA;QACxB,CAAC;QACD,KAAK,CAAC,IAAI,CAAC,YAAY,GAAG,CAAC,CAAC,MAAM,CAAC,CAAA;IACrC,CAAC;IACD,KAAK,CAAC,IAAI,CAAC,QAAQ,GAAG,cAAc,CAAC,EAAE,CAAC,IAAI,CAAC,CAAC,CAAA;IAC9C,OAAO,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,GAAG,IAAI,CAAA;AAChC,CAAC;AAED,mBAAmB;AAEnB,MAAM,UAAU,qBAAqB,CAAC,IAAY;IAChD,MAAM,KAAK,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,CAAA;IAC9B,MAAM,QAAQ,GAA2B,EAAE,CAAA;IAC3C,MAAM,aAAa,GAAyC,EAAE,CAAA;IAC9D,IAAI,QAAQ,GAA4B,IAAI,CAAA;IAC5C,IAAI,CAAC,GAAG,CAAC,CAAA;IACT,OAAO,CAAC,GAAG,KAAK,CAAC,MAAM,EAAE,CAAC;QACxB,MAAM,IAAI,GAAG,KAAK,CAAC,CAAC,CAAC,CAAA;QACrB,IAAI,IAAI,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;YAAC,CAAC,EAAE,CAAC;YAAC,SAAQ;QAAC,CAAC;QACxC,IAAI,IAAI,KAAK,WAAW,EAAE,CAAC;YACzB,CAAC,EAAE,CAAA;YACH,OAAO,CAAC,GAAG,KAAK,CAAC,MAAM,IAAI,KAAK,CAAC,CAAC,CAAC,CAAC,UAAU,CAAC,IAAI,CAAC,EAAE,CAAC;gBACrD,MAAM,KAAK,GAAG,EAAC,MAAM,EAAE,EAAE,EAAE,MAAM,EAAE,EAAc,EAAC,CAAA;gBAClD,CAAC,GAAG,gBAAgB,CAAC,KAAK,EAAE,CAAC,EAAE,KAAK,CAAC,CAAA;gBACrC,aAAa,CAAC,IAAI,CAAC,KAAK,CAAC,CAAA;YAC3B,CAAC;QACH,CAAC;aAAM,IAAI,IAAI,KAAK,WAAW,EAAE,CAAC;YAChC,CAAC,EAAE,CAAA;YACH,IAAI,SAAS,GAAG,EAAE,EAAE,OAAO,GAAG,EAAE,CAAA;YAChC,OAAO,CAAC,GAAG,KAAK,CAAC,MAAM,IAAI,KAAK,CAAC,CAAC,CAAC,CAAC,UAAU,CAAC,IAAI,CAAC,EAAE,CAAC;gBACrD,MAAM,EAAE,GAAG,KAAK,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,CAAA;gBAChC,MAAM,EAAE,GAAG,EAAE,CAAC,OAAO,CAAC,IAAI,CAAC,CAAA;gBAC3B,IAAI,EAAE,IAAI,CAAC,EAAE,CAAC;oBACZ,MAAM,CAAC,GAAG,EAAE,CAAC,SAAS,CAAC,CAAC,EAAE,EAAE,CAAC,EAAE,CAAC,GAAG,EAAE,CAAC,SAAS,CAAC,EAAE,GAAG,CAAC,CAAC,CAAA;oBACvD,IAAI,CAAC,KAAK,QAAQ;wBAAE,SAAS,GAAG,CAAC,CAAA;oBACjC,IAAI,CAAC,KAAK,MAAM;wBAAE,OAAO,GAAG,CAAC,CAAA;gBAC/B,CAAC;gBACD,CAAC,EAAE,CAAA;YACL,CAAC;YACD,QAAQ,GAAG,EAAC,IAAI,EAAE,QAAQ,CAAC,OAAO,CAAC,EAAE,MAAM,EAAE,eAAe,CAAC,SAAS,CAAC,EAAC,CAAA;QAC1E,CAAC;aAAM,CAAC;YACN,MAAM,EAAE,GAAG,IAAI,CAAC,OAAO,CAAC,IAAI,CAAC,CAAA;YAC7B,IAAI,EAAE,IAAI,CAAC;gBAAE,QAAQ,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,IAAI,CAAC,SAAS,CAAC,EAAE,GAAG,CAAC,CAAC,CAAA;YACrE,CAAC,EAAE,CAAA;QACL,CAAC;IACH,CAAC;IACD,MAAM,SAAS,GAAG,cAAc,CAAC,QAAQ,CAAC,WAAW,CAAC,CAAC,CAAA;IACvD,MAAM,cAAc,GAAwB,EAAE,CAAA;IAC9C,KAAK,MAAM,CAAC,IAAI,aAAa,EAAE,CAAC;QAC9B,KAAK,MAAM,CAAC,IAAI,CAAC,CAAC,MAAM;YAAE,cAAc,CAAC,IAAI,CAAC,mBAAmB,CAAC,CAAC,CAAC,MAAM,EAAE,CAAC,CAAC,CAAC,CAAA;IACjF,CAAC;IACD,OAAO;QACL,KAAK,EAAE,QAAQ,CAAC,OAAO,CAAc;QACrC,IAAI,EAAE,cAAc,CAAC,QAAQ,CAAC,MAAM,CAAC,CAAC;QACtC,MAAM,EAAE,eAAe,CAAC,QAAQ,CAAC,QAAQ,CAAC,CAAC;QAC3C,GAAG,EAAE,eAAe,CAAC,QAAQ,CAAC,KAAK,CAAC,CAAC;QACrC,KAAK,EAAE,eAAe,CAAC,QAAQ,CAAC,OAAO,CAAC,CAAC;QACzC,SAAS;QACT,MAAM,EAAE,oBAAoB,CAAC,SAAS,EAAE,cAAc,CAAC;QACvD,QAAQ;KACT,CAAA;AACH,CAAC;AAED,SAAS,gBAAgB,CACvB,KAAe,EAAE,QAAgB,EAAE,KAAyC;IAE5E,IAAI,CAAC,GAAG,QAAQ,CAAA;IAChB,MAAM,KAAK,GAAG,KAAK,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,CAAA,CAAC,oBAAoB;IACxD,CAAC,GAAG,iBAAiB,CAAC,KAAK,EAAE,KAAK,EAAE,CAAC,GAAG,CAAC,EAAE,KAAK,CAAC,CAAA;IACjD,OAAO,CAAC,GAAG,KAAK,CAAC,MAAM,IAAI,KAAK,CAAC,CAAC,CAAC,CAAC,UAAU,CAAC,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,UAAU,CAAC,IAAI,CAAC,EAAE,CAAC;QACnF,CAAC,GAAG,iBAAiB,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,EAAE,KAAK,EAAE,CAAC,GAAG,CAAC,EAAE,KAAK,CAAC,CAAA;IACnE,CAAC;IACD,OAAO,CAAC,CAAA;AACV,CAAC;AAED,SAAS,iBAAiB,CACxB,KAAa,EAAE,KAAe,EAAE,OAAe,EAC/C,KAAyC;IAEzC,IAAI,KAAK,KAAK,SAAS,IAAI,KAAK,CAAC,UAAU,CAAC,SAAS,CAAC,EAAE,CAAC;QACvD,IAAI,CAAC,GAAG,OAAO,CAAA;QACf,OAAO,CAAC,GAAG,KAAK,CAAC,MAAM,IAAI,KAAK,CAAC,CAAC,CAAC,CAAC,UAAU,CAAC,MAAM,CAAC,EAAE,CAAC;YACvD,KAAK,CAAC,MAAM,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,CAAC,CAAA;YACxC,CAAC,EAAE,CAAA;QACL,CAAC;QACD,OAAO,CAAC,CAAA;IACV,CAAC;IACD,MAAM,EAAE,GAAG,KAAK,CAAC,OAAO,CAAC,IAAI,CAAC,CAAA;IAC9B,IAAI,EAAE,IAAI,CAAC,EAAE,CAAC;QACZ,MAAM,CAAC,GAAG,KAAK,CAAC,SAAS,CAAC,CAAC,EAAE,EAAE,CAAC,EAAE,CAAC,GAAG,KAAK,CAAC,SAAS,CAAC,EAAE,GAAG,CAAC,CAAC,CAAA;QAC7D,IAAI,CAAC,KAAK,QAAQ;YAAE,KAAK,CAAC,MAAM,GAAG,CAAC,CAAA;IACtC,CAAC;IACD,OAAO,OAAO,CAAA;AAChB,CAAC;AAED,gBAAgB;AAEhB,MAAM,UAAU,uBAAuB,CAAC,EAAmB;IACzD,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,CAAC,MAAM,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;QAC1C,IAAI,EAAE,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,OAAO,KAAK,CAAC,GAAG,CAAC;YAAE,OAAO,kCAAkC,CAAA;IAC/E,CAAC;IACD,IAAI,KAAK,GAAG,CAAC,CAAA;IACb,KAAK,MAAM,CAAC,IAAI,EAAE,CAAC,MAAM;QAAE,KAAK,IAAI,CAAC,CAAC,SAAS,CAAA;IAC/C,IAAI,KAAK,KAAK,EAAE,CAAC,IAAI;QAAE,OAAO,+CAA+C,CAAA;IAC7E,OAAO,IAAI,CAAA;AACb,CAAC;AAED,MAAM,CAAC,MAAM,WAAW,GAAG,oCAAoC,CAAA"}

package/dist/protocol/encoding.d.ts

@@ -0,0 +1,34 @@
+export declare class Decoder {
+    readonly buf: Uint8Array;
+    private readonly view;
+    private pos;
+    constructor(buf: Uint8Array);
+    take(n: number): Uint8Array;
+    takeAll(): Uint8Array;
+    anyByte(): number;
+    remaining(): number;
+    offset(): number;
+}
+export declare function concatBytes(...arrays: Uint8Array[]): Uint8Array;
+export declare function encodeWord16(n: number): Uint8Array;
+export declare function decodeWord16(d: Decoder): number;
+export declare function encodeWord32(n: number): Uint8Array;
+export declare function decodeWord32(d: Decoder): number;
+export declare function encodeInt64(n: bigint): Uint8Array;
+export declare function decodeInt64(d: Decoder): bigint;
+export declare function encodeBytes(bs: Uint8Array): Uint8Array;
+export declare function decodeBytes(d: Decoder): Uint8Array;
+export declare function encodeLarge(bs: Uint8Array): Uint8Array;
+export declare function decodeLarge(d: Decoder): Uint8Array;
+export declare function encodeTail(bs: Uint8Array): Uint8Array;
+export declare function decodeTail(d: Decoder): Uint8Array;
+export declare function encodeBool(b: boolean): Uint8Array;
+export declare function decodeBool(d: Decoder): boolean;
+export declare function encodeString(s: string): Uint8Array;
+export declare function decodeString(d: Decoder): string;
+export declare function encodeMaybe<T>(encode: (v: T) => Uint8Array, v: T | null): Uint8Array;
+export declare function decodeMaybe<T>(decode: (d: Decoder) => T, d: Decoder): T | null;
+export declare function encodeNonEmpty<T>(encode: (v: T) => Uint8Array, xs: T[]): Uint8Array;
+export declare function decodeNonEmpty<T>(decode: (d: Decoder) => T, d: Decoder): T[];
+export declare function encodeList<T>(encode: (v: T) => Uint8Array, xs: T[]): Uint8Array;
+export declare function decodeList<T>(decode: (d: Decoder) => T, d: Decoder): T[];

package/dist/protocol/encoding.js

@@ -0,0 +1,197 @@
+// Binary encoding/decoding matching Haskell Simplex.Messaging.Encoding module.
+// All multi-byte integers are big-endian (network byte order).
+// -- Decoder: sequential parser over a Uint8Array (equivalent to Attoparsec parser)
+export class Decoder {
+    buf;
+    view;
+    pos;
+    constructor(buf) {
+        this.buf = buf;
+        this.view = new DataView(buf.buffer, buf.byteOffset, buf.byteLength);
+        this.pos = 0;
+    }
+    take(n) {
+        if (this.pos + n > this.buf.length)
+            throw new Error("Decoder: unexpected end of input");
+        const slice = this.buf.subarray(this.pos, this.pos + n);
+        this.pos += n;
+        return slice;
+    }
+    takeAll() {
+        const slice = this.buf.subarray(this.pos);
+        this.pos = this.buf.length;
+        return slice;
+    }
+    anyByte() {
+        if (this.pos >= this.buf.length)
+            throw new Error("Decoder: unexpected end of input");
+        return this.buf[this.pos++];
+    }
+    remaining() {
+        return this.buf.length - this.pos;
+    }
+    offset() {
+        return this.pos;
+    }
+}
+// -- Utility
+export function concatBytes(...arrays) {
+    let totalLen = 0;
+    for (const a of arrays)
+        totalLen += a.length;
+    const result = new Uint8Array(totalLen);
+    let offset = 0;
+    for (const a of arrays) {
+        result.set(a, offset);
+        offset += a.length;
+    }
+    return result;
+}
+// -- Word16: 2-byte big-endian (Encoding.hs:70)
+export function encodeWord16(n) {
+    const buf = new Uint8Array(2);
+    const view = new DataView(buf.buffer);
+    view.setUint16(0, n, false);
+    return buf;
+}
+export function decodeWord16(d) {
+    const bytes = d.take(2);
+    const view = new DataView(bytes.buffer, bytes.byteOffset, bytes.byteLength);
+    return view.getUint16(0, false);
+}
+// -- Word32: 4-byte big-endian (Encoding.hs:76)
+export function encodeWord32(n) {
+    const buf = new Uint8Array(4);
+    const view = new DataView(buf.buffer);
+    view.setUint32(0, n, false);
+    return buf;
+}
+export function decodeWord32(d) {
+    const bytes = d.take(4);
+    const view = new DataView(bytes.buffer, bytes.byteOffset, bytes.byteLength);
+    return view.getUint32(0, false);
+}
+// -- Int64: two Word32s, high then low (Encoding.hs:82)
+// Uses BigInt because JS numbers lose precision beyond 2^53.
+export function encodeInt64(n) {
+    const high = Number((n >> 32n) & 0xffffffffn);
+    const low = Number(n & 0xffffffffn);
+    return concatBytes(encodeWord32(high), encodeWord32(low));
+}
+export function decodeInt64(d) {
+    const high = BigInt(decodeWord32(d));
+    const low = BigInt(decodeWord32(d));
+    const unsigned = (high << 32n) | low;
+    // Convert to signed Int64: if bit 63 is set, value is negative
+    return unsigned >= 0x8000000000000000n ? unsigned - 0x10000000000000000n : unsigned;
+}
+// -- ByteString: 1-byte length prefix + bytes (Encoding.hs:100)
+// Max 255 bytes.
+export function encodeBytes(bs) {
+    if (bs.length > 255)
+        throw new Error("encodeBytes: length exceeds 255");
+    const result = new Uint8Array(1 + bs.length);
+    result[0] = bs.length;
+    result.set(bs, 1);
+    return result;
+}
+export function decodeBytes(d) {
+    const len = d.anyByte();
+    return d.take(len);
+}
+// -- Large: 2-byte big-endian length prefix + bytes (Encoding.hs:133)
+// Max 65535 bytes.
+export function encodeLarge(bs) {
+    if (bs.length > 65535)
+        throw new Error("encodeLarge: length exceeds 65535");
+    return concatBytes(encodeWord16(bs.length), bs);
+}
+export function decodeLarge(d) {
+    const len = decodeWord16(d);
+    return d.take(len);
+}
+// -- Tail: raw bytes, no prefix (Encoding.hs:124)
+export function encodeTail(bs) {
+    return bs;
+}
+export function decodeTail(d) {
+    return d.takeAll();
+}
+// -- Bool: 'T' (0x54) or 'F' (0x46) (Encoding.hs:58)
+const CHAR_T = 0x54;
+const CHAR_F = 0x46;
+export function encodeBool(b) {
+    return new Uint8Array([b ? CHAR_T : CHAR_F]);
+}
+export function decodeBool(d) {
+    const byte = d.anyByte();
+    if (byte === CHAR_T)
+        return true;
+    if (byte === CHAR_F)
+        return false;
+    throw new Error("decodeBool: invalid tag " + byte);
+}
+// -- String/Text: encode as UTF-8 ByteString (Encoding.hs)
+// Matches Haskell's Encoding Text instance: encodeUtf8/decodeUtf8.
+const textEncoder = new TextEncoder();
+const textDecoder = new TextDecoder();
+export function encodeString(s) {
+    return encodeBytes(textEncoder.encode(s));
+}
+export function decodeString(d) {
+    return textDecoder.decode(decodeBytes(d));
+}
+// -- Maybe: '0' for Nothing, '1' + encoded value for Just (Encoding.hs:114)
+const CHAR_0 = 0x30;
+const CHAR_1 = 0x31;
+export function encodeMaybe(encode, v) {
+    if (v === null)
+        return new Uint8Array([CHAR_0]);
+    return concatBytes(new Uint8Array([CHAR_1]), encode(v));
+}
+export function decodeMaybe(decode, d) {
+    const tag = d.anyByte();
+    if (tag === CHAR_0)
+        return null;
+    if (tag === CHAR_1)
+        return decode(d);
+    throw new Error("decodeMaybe: invalid tag " + tag);
+}
+// -- NonEmpty: 1-byte length + encoded elements (Encoding.hs:165)
+// Fails on empty list (matches Haskell behavior).
+export function encodeNonEmpty(encode, xs) {
+    if (xs.length === 0)
+        throw new Error("encodeNonEmpty: empty list");
+    if (xs.length > 255)
+        throw new Error("encodeNonEmpty: length exceeds 255");
+    const parts = [new Uint8Array([xs.length])];
+    for (const x of xs)
+        parts.push(encode(x));
+    return concatBytes(...parts);
+}
+export function decodeNonEmpty(decode, d) {
+    const len = d.anyByte();
+    if (len === 0)
+        throw new Error("decodeNonEmpty: empty list");
+    const result = [];
+    for (let i = 0; i < len; i++)
+        result.push(decode(d));
+    return result;
+}
+// -- List encoding (smpEncodeList / smpListP, Encoding.hs:153)
+export function encodeList(encode, xs) {
+    if (xs.length > 255)
+        throw new Error("encodeList: length exceeds 255");
+    const parts = [new Uint8Array([xs.length])];
+    for (const x of xs)
+        parts.push(encode(x));
+    return concatBytes(...parts);
+}
+export function decodeList(decode, d) {
+    const len = d.anyByte();
+    const result = [];
+    for (let i = 0; i < len; i++)
+        result.push(decode(d));
+    return result;
+}
+//# sourceMappingURL=encoding.js.map

package/dist/protocol/encoding.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"encoding.js","sourceRoot":"","sources":["../../src/protocol/encoding.ts"],"names":[],"mappings":"AAAA,+EAA+E;AAC/E,+DAA+D;AAE/D,oFAAoF;AAEpF,MAAM,OAAO,OAAO;IACT,GAAG,CAAY;IACP,IAAI,CAAU;IACvB,GAAG,CAAQ;IAEnB,YAAY,GAAe;QACzB,IAAI,CAAC,GAAG,GAAG,GAAG,CAAA;QACd,IAAI,CAAC,IAAI,GAAG,IAAI,QAAQ,CAAC,GAAG,CAAC,MAAM,EAAE,GAAG,CAAC,UAAU,EAAE,GAAG,CAAC,UAAU,CAAC,CAAA;QACpE,IAAI,CAAC,GAAG,GAAG,CAAC,CAAA;IACd,CAAC;IAED,IAAI,CAAC,CAAS;QACZ,IAAI,IAAI,CAAC,GAAG,GAAG,CAAC,GAAG,IAAI,CAAC,GAAG,CAAC,MAAM;YAAE,MAAM,IAAI,KAAK,CAAC,kCAAkC,CAAC,CAAA;QACvF,MAAM,KAAK,GAAG,IAAI,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,CAAC,GAAG,EAAE,IAAI,CAAC,GAAG,GAAG,CAAC,CAAC,CAAA;QACvD,IAAI,CAAC,GAAG,IAAI,CAAC,CAAA;QACb,OAAO,KAAK,CAAA;IACd,CAAC;IAED,OAAO;QACL,MAAM,KAAK,GAAG,IAAI,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,CAAC,GAAG,CAAC,CAAA;QACzC,IAAI,CAAC,GAAG,GAAG,IAAI,CAAC,GAAG,CAAC,MAAM,CAAA;QAC1B,OAAO,KAAK,CAAA;IACd,CAAC;IAED,OAAO;QACL,IAAI,IAAI,CAAC,GAAG,IAAI,IAAI,CAAC,GAAG,CAAC,MAAM;YAAE,MAAM,IAAI,KAAK,CAAC,kCAAkC,CAAC,CAAA;QACpF,OAAO,IAAI,CAAC,GAAG,CAAC,IAAI,CAAC,GAAG,EAAE,CAAC,CAAA;IAC7B,CAAC;IAED,SAAS;QACP,OAAO,IAAI,CAAC,GAAG,CAAC,MAAM,GAAG,IAAI,CAAC,GAAG,CAAA;IACnC,CAAC;IAED,MAAM;QACJ,OAAO,IAAI,CAAC,GAAG,CAAA;IACjB,CAAC;CACF;AAED,aAAa;AAEb,MAAM,UAAU,WAAW,CAAC,GAAG,MAAoB;IACjD,IAAI,QAAQ,GAAG,CAAC,CAAA;IAChB,KAAK,MAAM,CAAC,IAAI,MAAM;QAAE,QAAQ,IAAI,CAAC,CAAC,MAAM,CAAA;IAC5C,MAAM,MAAM,GAAG,IAAI,UAAU,CAAC,QAAQ,CAAC,CAAA;IACvC,IAAI,MAAM,GAAG,CAAC,CAAA;IACd,KAAK,MAAM,CAAC,IAAI,MAAM,EAAE,CAAC;QACvB,MAAM,CAAC,GAAG,CAAC,CAAC,EAAE,MAAM,CAAC,CAAA;QACrB,MAAM,IAAI,CAAC,CAAC,MAAM,CAAA;IACpB,CAAC;IACD,OAAO,MAAM,CAAA;AACf,CAAC;AAED,gDAAgD;AAEhD,MAAM,UAAU,YAAY,CAAC,CAAS;IACpC,MAAM,GAAG,GAAG,IAAI,UAAU,CAAC,CAAC,CAAC,CAAA;IAC7B,MAAM,IAAI,GAAG,IAAI,QAAQ,CAAC,GAAG,CAAC,MAAM,CAAC,CAAA;IACrC,IAAI,CAAC,SAAS,CAAC,CAAC,EAAE,CAAC,EAAE,KAAK,CAAC,CAAA;IAC3B,OAAO,GAAG,CAAA;AACZ,CAAC;AAED,MAAM,UAAU,YAAY,CAAC,CAAU;IACrC,MAAM,KAAK,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAA;IACvB,MAAM,IAAI,GAAG,IAAI,QAAQ,CAAC,KAAK,CAAC,MAAM,EAAE,KAAK,CAAC,UAAU,EAAE,KAAK,CAAC,UAAU,CAAC,CAAA;IAC3E,OAAO,IAAI,CAAC,SAAS,CAAC,CAAC,EAAE,KAAK,CAAC,CAAA;AACjC,CAAC;AAED,gDAAgD;AAEhD,MAAM,UAAU,YAAY,CAAC,CAAS;IACpC,MAAM,GAAG,GAAG,IAAI,UAAU,CAAC,CAAC,CAAC,CAAA;IAC7B,MAAM,IAAI,GAAG,IAAI,QAAQ,CAAC,GAAG,CAAC,MAAM,CAAC,CAAA;IACrC,IAAI,CAAC,SAAS,CAAC,CAAC,EAAE,CAAC,EAAE,KAAK,CAAC,CAAA;IAC3B,OAAO,GAAG,CAAA;AACZ,CAAC;AAED,MAAM,UAAU,YAAY,CAAC,CAAU;IACrC,MAAM,KAAK,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAA;IACvB,MAAM,IAAI,GAAG,IAAI,QAAQ,CAAC,KAAK,CAAC,MAAM,EAAE,KAAK,CAAC,UAAU,EAAE,KAAK,CAAC,UAAU,CAAC,CAAA;IAC3E,OAAO,IAAI,CAAC,SAAS,CAAC,CAAC,EAAE,KAAK,CAAC,CAAA;AACjC,CAAC;AAED,wDAAwD;AACxD,6DAA6D;AAE7D,MAAM,UAAU,WAAW,CAAC,CAAS;IACnC,MAAM,IAAI,GAAG,MAAM,CAAC,CAAC,CAAC,IAAI,GAAG,CAAC,GAAG,WAAW,CAAC,CAAA;IAC7C,MAAM,GAAG,GAAG,MAAM,CAAC,CAAC,GAAG,WAAW,CAAC,CAAA;IACnC,OAAO,WAAW,CAAC,YAAY,CAAC,IAAI,CAAC,EAAE,YAAY,CAAC,GAAG,CAAC,CAAC,CAAA;AAC3D,CAAC;AAED,MAAM,UAAU,WAAW,CAAC,CAAU;IACpC,MAAM,IAAI,GAAG,MAAM,CAAC,YAAY,CAAC,CAAC,CAAC,CAAC,CAAA;IACpC,MAAM,GAAG,GAAG,MAAM,CAAC,YAAY,CAAC,CAAC,CAAC,CAAC,CAAA;IACnC,MAAM,QAAQ,GAAG,CAAC,IAAI,IAAI,GAAG,CAAC,GAAG,GAAG,CAAA;IACpC,+DAA+D;IAC/D,OAAO,QAAQ,IAAI,mBAAmB,CAAC,CAAC,CAAC,QAAQ,GAAG,oBAAoB,CAAC,CAAC,CAAC,QAAQ,CAAA;AACrF,CAAC;AAED,gEAAgE;AAChE,iBAAiB;AAEjB,MAAM,UAAU,WAAW,CAAC,EAAc;IACxC,IAAI,EAAE,CAAC,MAAM,GAAG,GAAG;QAAE,MAAM,IAAI,KAAK,CAAC,iCAAiC,CAAC,CAAA;IACvE,MAAM,MAAM,GAAG,IAAI,UAAU,CAAC,CAAC,GAAG,EAAE,CAAC,MAAM,CAAC,CAAA;IAC5C,MAAM,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC,MAAM,CAAA;IACrB,MAAM,CAAC,GAAG,CAAC,EAAE,EAAE,CAAC,CAAC,CAAA;IACjB,OAAO,MAAM,CAAA;AACf,CAAC;AAED,MAAM,UAAU,WAAW,CAAC,CAAU;IACpC,MAAM,GAAG,GAAG,CAAC,CAAC,OAAO,EAAE,CAAA;IACvB,OAAO,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAA;AACpB,CAAC;AAED,sEAAsE;AACtE,mBAAmB;AAEnB,MAAM,UAAU,WAAW,CAAC,EAAc;IACxC,IAAI,EAAE,CAAC,MAAM,GAAG,KAAK;QAAE,MAAM,IAAI,KAAK,CAAC,mCAAmC,CAAC,CAAA;IAC3E,OAAO,WAAW,CAAC,YAAY,CAAC,EAAE,CAAC,MAAM,CAAC,EAAE,EAAE,CAAC,CAAA;AACjD,CAAC;AAED,MAAM,UAAU,WAAW,CAAC,CAAU;IACpC,MAAM,GAAG,GAAG,YAAY,CAAC,CAAC,CAAC,CAAA;IAC3B,OAAO,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAA;AACpB,CAAC;AAED,kDAAkD;AAElD,MAAM,UAAU,UAAU,CAAC,EAAc;IACvC,OAAO,EAAE,CAAA;AACX,CAAC;AAED,MAAM,UAAU,UAAU,CAAC,CAAU;IACnC,OAAO,CAAC,CAAC,OAAO,EAAE,CAAA;AACpB,CAAC;AAED,qDAAqD;AAErD,MAAM,MAAM,GAAG,IAAI,CAAA;AACnB,MAAM,MAAM,GAAG,IAAI,CAAA;AAEnB,MAAM,UAAU,UAAU,CAAC,CAAU;IACnC,OAAO,IAAI,UAAU,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAA;AAC9C,CAAC;AAED,MAAM,UAAU,UAAU,CAAC,CAAU;IACnC,MAAM,IAAI,GAAG,CAAC,CAAC,OAAO,EAAE,CAAA;IACxB,IAAI,IAAI,KAAK,MAAM;QAAE,OAAO,IAAI,CAAA;IAChC,IAAI,IAAI,KAAK,MAAM;QAAE,OAAO,KAAK,CAAA;IACjC,MAAM,IAAI,KAAK,CAAC,0BAA0B,GAAG,IAAI,CAAC,CAAA;AACpD,CAAC;AAED,2DAA2D;AAC3D,mEAAmE;AAEnE,MAAM,WAAW,GAAG,IAAI,WAAW,EAAE,CAAA;AACrC,MAAM,WAAW,GAAG,IAAI,WAAW,EAAE,CAAA;AAErC,MAAM,UAAU,YAAY,CAAC,CAAS;IACpC,OAAO,WAAW,CAAC,WAAW,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAA;AAC3C,CAAC;AAED,MAAM,UAAU,YAAY,CAAC,CAAU;IACrC,OAAO,WAAW,CAAC,MAAM,CAAC,WAAW,CAAC,CAAC,CAAC,CAAC,CAAA;AAC3C,CAAC;AAED,4EAA4E;AAE5E,MAAM,MAAM,GAAG,IAAI,CAAA;AACnB,MAAM,MAAM,GAAG,IAAI,CAAA;AAEnB,MAAM,UAAU,WAAW,CAAI,MAA4B,EAAE,CAAW;IACtE,IAAI,CAAC,KAAK,IAAI;QAAE,OAAO,IAAI,UAAU,CAAC,CAAC,MAAM,CAAC,CAAC,CAAA;IAC/C,OAAO,WAAW,CAAC,IAAI,UAAU,CAAC,CAAC,MAAM,CAAC,CAAC,EAAE,MAAM,CAAC,CAAC,CAAC,CAAC,CAAA;AACzD,CAAC;AAED,MAAM,UAAU,WAAW,CAAI,MAAyB,EAAE,CAAU;IAClE,MAAM,GAAG,GAAG,CAAC,CAAC,OAAO,EAAE,CAAA;IACvB,IAAI,GAAG,KAAK,MAAM;QAAE,OAAO,IAAI,CAAA;IAC/B,IAAI,GAAG,KAAK,MAAM;QAAE,OAAO,MAAM,CAAC,CAAC,CAAC,CAAA;IACpC,MAAM,IAAI,KAAK,CAAC,2BAA2B,GAAG,GAAG,CAAC,CAAA;AACpD,CAAC;AAED,kEAAkE;AAClE,kDAAkD;AAElD,MAAM,UAAU,cAAc,CAAI,MAA4B,EAAE,EAAO;IACrE,IAAI,EAAE,CAAC,MAAM,KAAK,CAAC;QAAE,MAAM,IAAI,KAAK,CAAC,4BAA4B,CAAC,CAAA;IAClE,IAAI,EAAE,CAAC,MAAM,GAAG,GAAG;QAAE,MAAM,IAAI,KAAK,CAAC,oCAAoC,CAAC,CAAA;IAC1E,MAAM,KAAK,GAAiB,CAAC,IAAI,UAAU,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,CAAC,CAAC,CAAA;IACzD,KAAK,MAAM,CAAC,IAAI,EAAE;QAAE,KAAK,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAA;IACzC,OAAO,WAAW,CAAC,GAAG,KAAK,CAAC,CAAA;AAC9B,CAAC;AAED,MAAM,UAAU,cAAc,CAAI,MAAyB,EAAE,CAAU;IACrE,MAAM,GAAG,GAAG,CAAC,CAAC,OAAO,EAAE,CAAA;IACvB,IAAI,GAAG,KAAK,CAAC;QAAE,MAAM,IAAI,KAAK,CAAC,4BAA4B,CAAC,CAAA;IAC5D,MAAM,MAAM,GAAQ,EAAE,CAAA;IACtB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,EAAE;QAAE,MAAM,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAA;IACpD,OAAO,MAAM,CAAA;AACf,CAAC;AAED,+DAA+D;AAE/D,MAAM,UAAU,UAAU,CAAI,MAA4B,EAAE,EAAO;IACjE,IAAI,EAAE,CAAC,MAAM,GAAG,GAAG;QAAE,MAAM,IAAI,KAAK,CAAC,gCAAgC,CAAC,CAAA;IACtE,MAAM,KAAK,GAAiB,CAAC,IAAI,UAAU,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,CAAC,CAAC,CAAA;IACzD,KAAK,MAAM,CAAC,IAAI,EAAE;QAAE,KAAK,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAA;IACzC,OAAO,WAAW,CAAC,GAAG,KAAK,CAAC,CAAA;AAC9B,CAAC;AAED,MAAM,UAAU,UAAU,CAAI,MAAyB,EAAE,CAAU;IACjE,MAAM,GAAG,GAAG,CAAC,CAAC,OAAO,EAAE,CAAA;IACvB,MAAM,MAAM,GAAQ,EAAE,CAAA;IACtB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,EAAE;QAAE,MAAM,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAA;IACpD,OAAO,MAAM,CAAA;AACf,CAAC"}

package/dist/protocol/handshake.d.ts

@@ -0,0 +1,47 @@
+import { Decoder } from "./encoding.js";
+export interface VersionRange {
+    minVersion: number;
+    maxVersion: number;
+}
+export declare function encodeVersionRange(vr: VersionRange): Uint8Array;
+export declare function decodeVersionRange(d: Decoder): VersionRange;
+export declare function compatibleVRange(a: VersionRange, b: VersionRange): VersionRange | null;
+export interface XFTPClientHello {
+    webChallenge: Uint8Array | null;
+}
+export declare function encodeClientHello(hello: XFTPClientHello): Uint8Array;
+export interface XFTPClientHandshake {
+    xftpVersion: number;
+    keyHash: Uint8Array;
+}
+export declare function encodeClientHandshake(ch: XFTPClientHandshake): Uint8Array;
+export interface XFTPServerHandshake {
+    xftpVersionRange: VersionRange;
+    sessionId: Uint8Array;
+    certChainDer: Uint8Array[];
+    signedKeyDer: Uint8Array;
+    webIdentityProof: Uint8Array | null;
+}
+export declare function decodeServerHandshake(block: Uint8Array): XFTPServerHandshake;
+export type ChainCertificates = {
+    type: 'empty';
+} | {
+    type: 'self';
+    cert: Uint8Array;
+} | {
+    type: 'valid';
+    leafCert: Uint8Array;
+    idCert: Uint8Array;
+    caCert: Uint8Array;
+} | {
+    type: 'long';
+};
+export declare function chainIdCaCerts(certChainDer: Uint8Array[]): ChainCertificates;
+export declare function caFingerprint(certChainDer: Uint8Array[]): Uint8Array;
+export interface SignedKey {
+    objectDer: Uint8Array;
+    dhKey: Uint8Array;
+    algorithm: Uint8Array;
+    signature: Uint8Array;
+}
+export declare function extractSignedKey(signedDer: Uint8Array): SignedKey;