@agentshouse/mdruntime 0.1.0-cee9c8aa4cd86 → 0.1.0-cef76ea952695

package/dist/stored.js

@@ -1,28 +1,38 @@
-import { indexDocument, unindexAll, unindexDocuments } from './fulltext.js';
-import { derived } from './rows.js';
+import { instantKey, sql } from '@agentshouse/mdmodel';
+import { composedOf } from './collection.js';
+import { described, derived, heldOf } from './rows.js';
 export const REPLICA_TABLES = [
-    'CREATE TABLE replica_keys (key INTEGER PRIMARY KEY AUTOINCREMENT, locator TEXT NOT NULL, transfer TEXT NOT NULL, composition TEXT NOT NULL, rederiving INTEGER)',
-    'CREATE TABLE replica_rooms (locator TEXT PRIMARY KEY, key INTEGER NOT NULL, record TEXT NOT NULL) WITHOUT ROWID',
-    'CREATE TABLE replica_transfers (locator TEXT PRIMARY KEY, key INTEGER NOT NULL, record TEXT NOT NULL) WITHOUT ROWID',
-    'CREATE TABLE replica_entries (id INTEGER PRIMARY KEY, key INTEGER NOT NULL, layer INTEGER NOT NULL, path TEXT NOT NULL, visible INTEGER NOT NULL, present INTEGER NOT NULL, queried INTEGER NOT NULL, binary TEXT, revision TEXT, file_id TEXT, change TEXT, written TEXT, type TEXT, declared TEXT, folder TEXT NOT NULL, fields TEXT, content TEXT)',
+    'CREATE TABLE replica_keys (key INTEGER PRIMARY KEY AUTOINCREMENT, locator TEXT NOT NULL, transfer TEXT NOT NULL, fingerprint TEXT NOT NULL, rederiving INTEGER)',
+    'CREATE TABLE replica_rooms (locator TEXT PRIMARY KEY, key INTEGER NOT NULL, record TEXT NOT NULL, documents INTEGER NOT NULL DEFAULT 0) WITHOUT ROWID',
+    "CREATE INDEX replica_rooms_model ON replica_rooms (json_extract(record, '$.model.snapshot.identity'), json_extract(record, '$.model.snapshot.version'))",
+    'CREATE TABLE replica_models (identity TEXT NOT NULL, version TEXT NOT NULL, schema TEXT NOT NULL, PRIMARY KEY (identity, version)) WITHOUT ROWID',
+    "CREATE TABLE replica_entries (id INTEGER PRIMARY KEY, key INTEGER NOT NULL, layer INTEGER NOT NULL, path TEXT NOT NULL, visible INTEGER NOT NULL, present INTEGER NOT NULL, queried INTEGER NOT NULL, binary TEXT, revision TEXT, file_id TEXT, change TEXT, written TEXT, type TEXT, declared TEXT, folder TEXT NOT NULL, fields TEXT, links TEXT, part TEXT, created TEXT, created_instant TEXT, changed_instant TEXT, bytes INTEGER GENERATED ALWAYS AS (CASE WHEN binary IS NULL THEN length(CAST(content AS BLOB)) ELSE binary ->> '$.byteLength' END) STORED, content TEXT)",
     'CREATE UNIQUE INDEX replica_entries_path ON replica_entries (key, layer, path)',
-    'CREATE INDEX replica_entries_visible ON replica_entries (key, visible, path)',
+    'CREATE INDEX replica_entries_visible ON replica_entries (key, visible, present, path, binary)',
     'CREATE INDEX replica_entries_folder ON replica_entries (key, folder, path)',
-    'CREATE TABLE replica_values (doc INTEGER NOT NULL, key INTEGER NOT NULL, form TEXT NOT NULL, held INTEGER NOT NULL, item INTEGER NOT NULL, kind TEXT NOT NULL, value, size INTEGER, single INTEGER NOT NULL, PRIMARY KEY (doc, form, held, item)) WITHOUT ROWID',
-    'CREATE INDEX replica_values_lookup ON replica_values (key, form, kind, value)',
-    'CREATE TABLE replica_links (doc INTEGER NOT NULL, key INTEGER NOT NULL, kind TEXT NOT NULL, form TEXT NOT NULL, target TEXT NOT NULL, field TEXT NOT NULL, PRIMARY KEY (doc, kind, form, target)) WITHOUT ROWID',
-    'CREATE INDEX replica_links_target ON replica_links (key, target, kind, form)',
-    'CREATE TABLE replica_folders (key INTEGER NOT NULL, layer INTEGER NOT NULL, path TEXT NOT NULL, present INTEGER NOT NULL, PRIMARY KEY (key, layer, path)) WITHOUT ROWID',
+    'CREATE INDEX replica_entries_type ON replica_entries (key, type, visible, present, queried, folder)',
+    'CREATE INDEX replica_entries_key ON replica_entries (key)',
+    sql.VALUE_TABLE,
+    'CREATE TABLE replica_links (doc INTEGER NOT NULL, key INTEGER NOT NULL, kind TEXT NOT NULL, keys TEXT NOT NULL, places TEXT NOT NULL, target TEXT NOT NULL, field TEXT NOT NULL, PRIMARY KEY (doc, kind, keys, places, target)) WITHOUT ROWID',
+    'CREATE INDEX replica_links_target ON replica_links (key, target, kind, keys)',
+    'CREATE TABLE replica_folders (key INTEGER NOT NULL, layer INTEGER NOT NULL, path TEXT NOT NULL, present INTEGER NOT NULL, part TEXT, PRIMARY KEY (key, layer, path)) WITHOUT ROWID',
     'CREATE TABLE replica_erasing (key INTEGER PRIMARY KEY, locator TEXT NOT NULL)',
-    'CREATE TABLE replica_received (key TEXT PRIMARY KEY, head TEXT NOT NULL) WITHOUT ROWID',
-    'CREATE TABLE replica_received_parts (key TEXT NOT NULL, part INTEGER NOT NULL, value TEXT NOT NULL, PRIMARY KEY (key, part)) WITHOUT ROWID',
     'CREATE TABLE replica_facts (name TEXT PRIMARY KEY, value TEXT NOT NULL) WITHOUT ROWID',
     'CREATE TABLE replica_presentation (app TEXT PRIMARY KEY, value TEXT NOT NULL) WITHOUT ROWID',
 ];
 const CONFIRMED = 0;
 const OVERLAY = 1;
 const REFRESHED = 2;
-const compositions = new WeakMap();
+const DERIVED_ROWS = 64;
+const ENTRY_WEIGHT = 256;
+const ABSENT = {
+    type: null,
+    declared: null,
+    queried: false,
+    folder: '',
+    fields: null,
+    links: null,
+};
 function text(value) {
     return typeof value === 'string' ? value : null;
 }
@@ -38,55 +48,23 @@ function flag(value) {
 function paths(list) {
     return JSON.stringify(list);
 }
-function compositionOf(connection, key) {
-    let held = compositions.get(connection);
-    if (held === undefined) {
-        held = new Map();
-        compositions.set(connection, held);
-    }
-    const [row] = connection.rows('SELECT composition FROM replica_keys WHERE key = ?', [key]);
-    const textual = text(row?.composition) ?? 'null';
-    const known = held.get(textual);
-    if (known !== undefined)
-        return known;
-    const parsed = JSON.parse(textual) ?? {
-        model: { status: 'unavailable', reason: 'not-acquired' },
-        selection: null,
-    };
-    held.clear();
-    held.set(textual, parsed);
-    return parsed;
-}
-export function fingerprint(composition) {
-    const shape = (model) => model.status === 'unavailable' ? null : model.types;
-    return JSON.stringify({
-        model: shape(composition.model),
-        selection: composition.selection === null
-            ? null
-            : { roots: composition.selection.roots, model: shape(composition.selection.model) },
-    });
-}
 function dropDerived(connection, doc) {
     connection.run('DELETE FROM replica_values WHERE doc = ?', [doc]);
     connection.run('DELETE FROM replica_links WHERE doc = ?', [doc]);
 }
-function writeDerived(connection, doc, key, made) {
-    for (const value of made.values) {
-        connection.run('INSERT INTO replica_values (doc, key, form, held, item, kind, value, size, single) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?)', [
+function writeDerived(connection, doc, key, path, held, composition) {
+    const made = derived(path, held, composition);
+    if (made.values.length > 0) {
+        const inserted = sql.insertedValues(doc, made.values);
+        connection.run(inserted.sql, inserted.bind);
+    }
+    if (made.links.length > 0) {
+        connection.run('INSERT OR IGNORE INTO replica_links (doc, key, kind, keys, places, target, field) SELECT ?, ?, value ->> 0, value ->> 1, value ->> 2, value ->> 3, value ->> 4 FROM json_each(?)', [
             doc,
             key,
-            value.form,
-            value.held,
-            value.item,
-            value.kind,
-            value.value,
-            value.size,
-            flag(value.single),
+            JSON.stringify(made.links.map((link) => [link.kind, link.keys, link.places, link.target, link.field])),
         ]);
     }
-    for (const link of made.links) {
-        connection.run('INSERT OR IGNORE INTO replica_links (doc, key, kind, form, target, field) VALUES (?, ?, ?, ?, ?, ?)', [doc, key, link.kind, link.form, link.target, link.field]);
-    }
 }
 function entryId(connection, key, layer, path) {
     const [row] = connection.rows('SELECT id FROM replica_entries WHERE key = ? AND layer = ? AND path = ?', [key, layer, path]);
@@ -97,26 +75,10 @@ function removeEntry(connection, key, layer, path) {
     if (id === null)
         return;
     dropDerived(connection, id);
-    unindexDocuments(connection, [id]);
     connection.run('DELETE FROM replica_entries WHERE id = ?', [id]);
 }
-function heldIds(connection, sql, bind) {
-    return connection.rows(sql, bind).map((row) => number(row.id));
-}
-function putEntry(connection, key, layer, entry, present, composition, searched = true) {
-    removeEntry(connection, key, layer, entry.path);
-    const made = present
-        ? derived(entry.path, entry.binary === null ? entry.content : null, composition)
-        : {
-            type: null,
-            declared: null,
-            queried: false,
-            folder: '',
-            fields: null,
-            values: [],
-            links: [],
-        };
-    connection.run('INSERT INTO replica_entries (key, layer, path, visible, present, queried, content, binary, revision, file_id, change, written, type, declared, folder, fields) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)', [
+function insertEntry(connection, key, layer, entry, present, made, part = null) {
+    connection.run('INSERT INTO replica_entries (key, layer, path, visible, present, queried, content, binary, revision, file_id, created, created_instant, change, changed_instant, written, type, declared, folder, fields, links, part) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)', [
         key,
         layer,
         entry.path,
@@ -127,78 +89,143 @@ function putEntry(connection, key, layer, entry, present, composition, searched
         entry.binary === null ? null : JSON.stringify(entry.binary),
         entry.revision,
         entry.fileId,
+        entry.created,
+        instantKey(entry.created),
         entry.change === null ? null : JSON.stringify(entry.change),
+        instantKey(entry.change?.time),
         entry.written,
         made.type,
         made.declared,
         made.folder,
         made.fields,
+        made.links,
+        part,
     ]);
+}
+function textOf(entry) {
+    return entry.binary === null ? entry.content : null;
+}
+function putEntry(connection, key, layer, entry, present, composition) {
+    removeEntry(connection, key, layer, entry.path);
+    const content = textOf(entry);
+    insertEntry(connection, key, layer, entry, present, present ? described(entry.path, content, entry.facts) : ABSENT);
     if (!present)
         return;
     const id = entryId(connection, key, layer, entry.path);
-    writeDerived(connection, id, key, made);
-    if (searched && entry.binary === null && entry.content !== null && made.queried) {
-        indexDocument(connection, id, entry.path, entry.content);
-    }
+    writeDerived(connection, id, key, entry.path, heldOf(entry.path, content, entry.facts), composition);
+}
+function placeEntry(connection, key, entry, part) {
+    removeEntry(connection, key, CONFIRMED, entry.path);
+    insertEntry(connection, key, CONFIRMED, entry, true, described(entry.path, textOf(entry), entry.facts), part);
 }
 function revealed(connection, key, touched) {
     if (touched.length === 0)
         return;
     connection.run(`UPDATE replica_entries SET visible = CASE WHEN layer = ${OVERLAY} THEN present ELSE NOT EXISTS (SELECT 1 FROM replica_entries o WHERE o.key = replica_entries.key AND o.layer = ${OVERLAY} AND o.path = replica_entries.path) END WHERE key = ? AND layer IN (${CONFIRMED}, ${OVERLAY}) AND path IN (SELECT value FROM json_each(?))`, [key, paths(touched)]);
 }
-function newKey(connection, locator, transfer, composition) {
-    connection.run('INSERT INTO replica_keys (locator, transfer, composition, rederiving) VALUES (?, ?, ?, NULL)', [locator, transfer, JSON.stringify(composition)]);
+function newKey(connection, locator, transfer, fingerprint, built) {
+    const owed = built ? null : 0;
+    connection.run('INSERT INTO replica_keys (locator, transfer, fingerprint, rederiving) VALUES (?, ?, ?, ?)', [locator, transfer, fingerprint, owed]);
     const [row] = connection.rows('SELECT last_insert_rowid() AS key');
     return number(row.key);
 }
-function recomposed(connection, key, composition) {
-    const [row] = connection.rows('SELECT composition FROM replica_keys WHERE key = ?', [key]);
-    const before = json(row?.composition);
-    if (before !== null && fingerprint(before) === fingerprint(composition)) {
-        connection.run('UPDATE replica_keys SET composition = ? WHERE key = ?', [
-            JSON.stringify(composition),
-            key,
-        ]);
+function recomposed(connection, key, fingerprint) {
+    const [row] = connection.rows('SELECT fingerprint FROM replica_keys WHERE key = ?', [key]);
+    if (row === undefined || text(row.fingerprint) === fingerprint)
         return;
-    }
-    connection.run('UPDATE replica_keys SET composition = ?, rederiving = 0 WHERE key = ?', [
-        JSON.stringify(composition),
-        key,
-    ]);
+    const held = connection.rows('SELECT 1 FROM replica_entries WHERE key = ? LIMIT 1', [key]);
+    connection.run(`UPDATE replica_keys SET fingerprint = ?${held.length === 0 ? '' : ', rederiving = 0'} WHERE key = ?`, [fingerprint, key]);
 }
 export function entered(connection, locator, composition, rows) {
-    const key = newKey(connection, locator, '', composition);
+    const key = newKey(connection, locator, '', composedOf(composition).fingerprint, true);
     for (const entry of rows)
-        putEntry(connection, key, CONFIRMED, entry, true, composition, false);
+        putEntry(connection, key, CONFIRMED, entry, true, composition);
     return key;
 }
 export function stage(connection, request) {
-    const [held] = connection.rows('SELECT key FROM replica_transfers WHERE locator = ?', [
-        request.locator,
-    ]);
-    const key = request.key ??
-        (held === undefined
-            ? newKey(connection, request.locator, request.transfer, request.composition)
-            : number(held.key));
-    recomposed(connection, key, request.composition);
-    if (request.record !== null) {
-        connection.run('INSERT OR REPLACE INTO replica_transfers (locator, key, record) VALUES (?, ?, ?)', [request.locator, key, request.record]);
-    }
-    const composition = compositionOf(connection, key);
-    for (const entry of request.entries) {
-        putEntry(connection, key, CONFIRMED, entry, true, composition);
+    if (request.key === null) {
+        for (const row of connection.rows(STAGED_KEYS, [request.locator])) {
+            erasing(connection, number(row.key), request.locator);
+        }
     }
+    const key = request.key ??
+        newKey(connection, request.locator, request.transfer, request.fingerprint, false);
+    recomposed(connection, key, request.fingerprint);
+    owing(connection, key);
+    for (const entry of request.entries)
+        placeEntry(connection, key, entry, request.part);
     for (const path of request.folders) {
-        connection.run('INSERT OR REPLACE INTO replica_folders (key, layer, path, present) VALUES (?, ?, ?, 1)', [key, CONFIRMED, path]);
+        connection.run('INSERT OR REPLACE INTO replica_folders (key, layer, path, present, part) VALUES (?, ?, ?, 1, ?)', [key, CONFIRMED, path, request.part]);
     }
     return key;
 }
+function owing(connection, key) {
+    connection.run('UPDATE replica_keys SET rederiving = coalesce(rederiving, last) FROM (SELECT coalesce(max(id), 0) AS last FROM replica_entries) WHERE key = ?', [key]);
+}
+const STAGED_KEYS = `SELECT k.key, k.transfer FROM replica_keys k WHERE k.locator = ?
+  AND NOT EXISTS (SELECT 1 FROM replica_rooms r WHERE r.key = k.key)
+  AND NOT EXISTS (SELECT 1 FROM replica_erasing e WHERE e.key = k.key)
+  ORDER BY k.key DESC`;
+const UNPARTED = `EXISTS (SELECT 1 FROM replica_entries e WHERE e.key = k.key AND e.part IS NULL)
+  OR EXISTS (SELECT 1 FROM replica_folders f WHERE f.key = k.key AND f.part IS NULL)`;
+function partsOf(connection, key, layer) {
+    const scoped = layer === null ? '' : ` AND layer = ${layer}`;
+    return new Set(connection
+        .rows(`SELECT part FROM replica_entries WHERE key = ?${scoped} AND part IS NOT NULL UNION SELECT part FROM replica_folders WHERE key = ?${scoped} AND part IS NOT NULL`, [key, key])
+        .map((row) => text(row.part)));
+}
+function resumable(connection, locator) {
+    let kept = null;
+    for (const row of connection.rows(STAGED_KEYS, [locator])) {
+        const key = number(row.key);
+        const parted = kept === null &&
+            connection.rows(`SELECT 1 FROM replica_keys k WHERE k.key = ? AND NOT (${UNPARTED})`, [key])
+                .length > 0;
+        if (parted)
+            kept = { key, transfer: text(row.transfer) };
+        else
+            erasing(connection, key, locator);
+    }
+    return kept;
+}
+export function resume(connection, request) {
+    const wanted = new Set(request.parts);
+    const held = resumable(connection, request.locator);
+    const staged = held === null ? new Set() : partsOf(connection, held.key, null);
+    const dropped = [...staged].filter((part) => !wanted.has(part));
+    if (held !== null && dropped.length > 0) {
+        const named = JSON.stringify(dropped);
+        const rows = `SELECT id FROM replica_entries WHERE key = ? AND part IN (SELECT value FROM json_each(?))`;
+        for (const table of ['replica_values', 'replica_links']) {
+            connection.run(`DELETE FROM ${table} WHERE doc IN (${rows})`, [held.key, named]);
+        }
+        connection.run(`DELETE FROM replica_entries WHERE id IN (${rows})`, [held.key, named]);
+        connection.run('DELETE FROM replica_folders WHERE key = ? AND part IN (SELECT value FROM json_each(?))', [held.key, named]);
+    }
+    const kept = [...staged].filter((part) => wanted.has(part));
+    const publishedParts = request.published === null
+        ? new Set()
+        : partsOf(connection, request.published, CONFIRMED);
+    const copied = request.parts.filter((part) => !staged.has(part) && publishedParts.has(part));
+    if (held === null && copied.length === 0) {
+        return { key: null, transfer: request.transfer, staged: [] };
+    }
+    const key = held?.key ?? newKey(connection, request.locator, request.transfer, request.fingerprint, false);
+    recomposed(connection, key, request.fingerprint);
+    if (copied.length > 0) {
+        owing(connection, key);
+        const named = JSON.stringify(copied);
+        connection.run(`INSERT INTO replica_entries (key, layer, path, visible, present, queried, content, binary, revision, file_id, created, created_instant, change, changed_instant, written, type, declared, folder, fields, links, part) SELECT ?, ${CONFIRMED}, path, 1, 1, queried, content, binary, revision, file_id, created, created_instant, change, changed_instant, written, type, declared, folder, fields, links, part FROM replica_entries WHERE key = ? AND layer = ${CONFIRMED} AND present = 1 AND part IN (SELECT value FROM json_each(?)) ORDER BY path`, [key, request.published, named]);
+        connection.run(`INSERT OR REPLACE INTO replica_folders (key, layer, path, present, part) SELECT ?, ${CONFIRMED}, path, 1, part FROM replica_folders WHERE key = ? AND layer = ${CONFIRMED} AND present = 1 AND part IN (SELECT value FROM json_each(?))`, [key, request.published, named]);
+    }
+    return { key, transfer: held?.transfer ?? request.transfer, staged: [...kept, ...copied] };
+}
 export function refreshing(connection, request) {
-    const held = connection.rows('SELECT 1 FROM replica_rooms WHERE key = ? UNION ALL SELECT 1 FROM replica_transfers WHERE key = ?', [request.key, request.key]);
+    const held = connection.rows('SELECT 1 FROM replica_keys k WHERE k.key = ? AND NOT EXISTS (SELECT 1 FROM replica_erasing e WHERE e.key = k.key)', [request.key]);
     if (held.length === 0)
         return null;
-    const composition = compositionOf(connection, request.key);
+    recomposed(connection, request.key, request.composed.fingerprint);
+    const composition = request.composed.composition;
     for (const entry of request.entries) {
         putEntry(connection, request.key, REFRESHED, entry, true, composition);
     }
@@ -209,8 +236,10 @@ export function refreshing(connection, request) {
             binary: null,
             revision: null,
             fileId: null,
+            created: null,
             change: null,
             written: null,
+            facts: null,
         }, false, composition);
     }
     for (const [list, present] of [
@@ -224,7 +253,6 @@ export function refreshing(connection, request) {
     return null;
 }
 function dropLayer(connection, key, layer) {
-    unindexDocuments(connection, heldIds(connection, 'SELECT id FROM replica_entries WHERE key = ? AND layer = ?', [key, layer]));
     for (const table of ['replica_values', 'replica_links']) {
         connection.run(`DELETE FROM ${table} WHERE doc IN (SELECT id FROM replica_entries WHERE key = ? AND layer = ?)`, [key, layer]);
     }
@@ -243,7 +271,6 @@ function refreshedPaths(connection, key) {
 function applyRefresh(connection, key) {
     const touched = refreshedPaths(connection, key);
     const replaced = `SELECT c.id FROM replica_entries c JOIN replica_entries r ON r.key = c.key AND r.layer = ${REFRESHED} AND r.path = c.path WHERE c.key = ? AND c.layer = ${CONFIRMED}`;
-    unindexDocuments(connection, heldIds(connection, replaced, [key]));
     for (const table of ['replica_values', 'replica_links']) {
         connection.run(`DELETE FROM ${table} WHERE doc IN (${replaced})`, [key]);
     }
@@ -262,33 +289,33 @@ function applyRefresh(connection, key) {
     connection.run('DELETE FROM replica_folders WHERE key = ? AND layer = ?', [key, REFRESHED]);
     return touched;
 }
+function beneathRoots(path) {
+    return `EXISTS (SELECT 1 FROM json_each(?) r WHERE ${path} = r.value OR (${path} >= r.value || '/' AND ${path} < r.value || '0'))`;
+}
 function counted(connection, key, roots) {
-    const outside = roots.map(() => '(path = ? OR (path >= ? AND path < ?))').join(' OR ');
-    const bind = [key];
-    for (const root of roots)
-        bind.push(root, `${root}/`, `${root}0`);
-    const [row] = connection.rows(`SELECT count(*) AS held FROM replica_entries WHERE key = ? AND visible = 1 AND present = 1 AND (binary IS NOT NULL OR substr(path, -3) = '.md')${roots.length === 0 ? '' : ` AND NOT (${outside})`}`, bind);
+    const [row] = connection.rows(`SELECT count(*) AS held FROM replica_entries WHERE key = ? AND visible = 1 AND present = 1 AND (binary IS NOT NULL OR substr(path, -3) = '.md') AND NOT ${beneathRoots('replica_entries.path')}`, [key, JSON.stringify(roots)]);
     return number(row.held);
 }
-export function counts(connection, rooms) {
-    return rooms.map(({ key, roots }) => counted(connection, key, roots));
-}
 function erasing(connection, key, locator) {
     connection.run('INSERT OR REPLACE INTO replica_erasing (key, locator) VALUES (?, ?)', [
         key,
         locator,
     ]);
 }
+function saved(connection, key, entry, at) {
+    if (!entry.present || entry.created !== null)
+        return entry;
+    const [held] = connection.rows(`SELECT created FROM replica_entries WHERE key = ? AND layer = ${OVERLAY} AND path = ? AND present = 1`, [key, entry.path]);
+    return { ...entry, created: text(held?.created) ?? at };
+}
 function commitRoom(connection, room) {
     const touched = new Set();
-    if (room.composition !== undefined)
-        recomposed(connection, room.key, room.composition);
-    const composition = compositionOf(connection, room.key);
-    if (room.published !== undefined) {
-        if (room.published.from !== null && room.published.from !== room.key) {
-            erasing(connection, room.published.from, room.locator);
-        }
-        connection.run('DELETE FROM replica_transfers WHERE locator = ?', [room.locator]);
+    recomposed(connection, room.key, room.composed.fingerprint);
+    const composition = room.composed.composition;
+    if (room.published !== undefined &&
+        room.published.from !== null &&
+        room.published.from !== room.key) {
+        erasing(connection, room.published.from, room.locator);
     }
     if (room.refreshed === true) {
         for (const path of applyRefresh(connection, room.key))
@@ -302,8 +329,9 @@ function commitRoom(connection, room) {
         removeEntry(connection, room.key, CONFIRMED, path);
         touched.add(path);
     }
+    const savedAt = new Date().toISOString();
     for (const entry of room.overlay?.set ?? []) {
-        putEntry(connection, room.key, OVERLAY, entry, entry.present, composition);
+        putEntry(connection, room.key, OVERLAY, saved(connection, room.key, entry, savedAt), entry.present, composition);
         touched.add(entry.path);
     }
     for (const path of room.overlay?.cleared ?? []) {
@@ -313,27 +341,54 @@ function commitRoom(connection, room) {
     const changed = [...touched];
     revealed(connection, room.key, changed);
     if (room.record !== undefined) {
-        connection.run('INSERT OR REPLACE INTO replica_rooms (locator, key, record) VALUES (?, ?, ?)', [
-            room.locator,
-            room.key,
-            room.record,
-        ]);
+        const replaced = heldModel(connection, room.locator);
+        connection.run(KEEP_MODEL, [room.record, room.record, room.record, room.record]);
+        connection.run(`INSERT OR REPLACE INTO replica_rooms (locator, key, record) VALUES (?, ?, ${MODEL_LEFT})`, [room.locator, room.key, room.record, room.record, room.record]);
+        letGo(connection, replaced);
     }
     return room.published === undefined ? changed : null;
 }
+const SCHEMA = '$.model.snapshot.schema';
+const KEEP_MODEL = `INSERT OR IGNORE INTO replica_models (identity, version, schema)
+  SELECT json_extract(?, '$.model.snapshot.identity'), json_extract(?, '$.model.snapshot.version'),
+    json_extract(?, '${SCHEMA}')
+  WHERE json_type(?, '${SCHEMA}') = 'text'`;
+const MODEL_LEFT = `CASE WHEN json_type(?, '${SCHEMA}') = 'text' THEN json_set(?, '${SCHEMA}', json('null')) ELSE ? END`;
+const HELD_MODEL = `SELECT json_extract(record, '$.model.snapshot.identity') AS identity,
+    json_extract(record, '$.model.snapshot.version') AS version
+  FROM replica_rooms WHERE locator = ?`;
+const UNHELD_MODEL = `DELETE FROM replica_models WHERE identity = ? AND version = ? AND NOT EXISTS (
+  SELECT 1 FROM replica_rooms r
+  WHERE json_extract(r.record, '$.model.snapshot.identity') = replica_models.identity
+    AND json_extract(r.record, '$.model.snapshot.version') = replica_models.version
+)`;
+function heldModel(connection, locator) {
+    return connection.rows(HELD_MODEL, [locator])[0];
+}
+function letGo(connection, model) {
+    if (model !== undefined)
+        connection.run(UNHELD_MODEL, [model.identity, model.version]);
+}
+const HELD_RECORDS = `SELECT r.locator, r.key, CASE WHEN m.schema IS NULL THEN r.record
+    ELSE json_set(r.record, '${SCHEMA}', m.schema) END AS record
+  FROM replica_rooms r
+  LEFT JOIN replica_models m
+    ON m.identity = json_extract(r.record, '$.model.snapshot.identity')
+   AND m.version = json_extract(r.record, '$.model.snapshot.version')`;
 export function commit(connection, rooms) {
-    const counted = {};
     const changed = {};
-    const prepared = {};
+    const indexed = {};
     for (const room of rooms) {
         changed[room.locator] = commitRoom(connection, room);
-        counted[room.locator] = counts(connection, [
-            { key: room.key, roots: room.roots ?? rootsOf(connection, room.locator) },
-        ])[0];
+        connection.run('UPDATE replica_rooms SET documents = ? WHERE locator = ? AND key = ?', [
+            counted(connection, room.key, room.roots ?? rootsOf(connection, room.locator)),
+            room.locator,
+            room.key,
+        ]);
         const [held] = connection.rows('SELECT rederiving FROM replica_keys WHERE key = ?', [room.key]);
-        prepared[room.locator] = held !== undefined && held.rederiving === null;
+        indexed[room.locator] = held !== undefined && held.rederiving === null;
     }
-    return { counts: counted, changed, prepared };
+    return { changed, indexed };
 }
 function rootsOf(connection, locator) {
     const [row] = connection.rows('SELECT record FROM replica_rooms WHERE locator = ?', [locator]);
@@ -342,27 +397,26 @@ function rootsOf(connection, locator) {
 }
 export function fenceRooms(connection, locators) {
     for (const locator of locators) {
-        for (const row of connection.rows('SELECT key FROM replica_keys WHERE locator = ? UNION SELECT key FROM replica_rooms WHERE locator = ? UNION SELECT key FROM replica_transfers WHERE locator = ?', [locator, locator, locator])) {
+        for (const row of connection.rows('SELECT key FROM replica_keys WHERE locator = ? UNION SELECT key FROM replica_rooms WHERE locator = ?', [locator, locator])) {
             erasing(connection, number(row.key), locator);
         }
+        const replaced = heldModel(connection, locator);
         connection.run('DELETE FROM replica_rooms WHERE locator = ?', [locator]);
-        connection.run('DELETE FROM replica_transfers WHERE locator = ?', [locator]);
+        letGo(connection, replaced);
     }
     return null;
 }
-export function abandon(connection, locator, kept) {
-    const [held] = connection.rows('SELECT key FROM replica_transfers WHERE locator = ?', [locator]);
-    connection.run('DELETE FROM replica_transfers WHERE locator = ?', [locator]);
-    if (held === undefined)
-        return null;
-    if (!kept)
-        erasing(connection, number(held.key), locator);
-    return number(held.key);
+export function abandon(connection, locator) {
+    for (const row of connection.rows(`SELECT k.key FROM replica_keys k WHERE k.locator = ?
+       AND NOT EXISTS (SELECT 1 FROM replica_rooms r WHERE r.key = k.key)
+       AND NOT EXISTS (SELECT 1 FROM replica_erasing e WHERE e.key = k.key)`, [locator])) {
+        erasing(connection, number(row.key), locator);
+    }
+    return null;
 }
 export function release(connection, key) {
     const [held] = connection.rows(`SELECT k.locator FROM replica_keys k WHERE k.key = ?
-       AND NOT EXISTS (SELECT 1 FROM replica_rooms r WHERE r.key = k.key)
-       AND NOT EXISTS (SELECT 1 FROM replica_transfers t WHERE t.key = k.key)`, [key]);
+       AND NOT EXISTS (SELECT 1 FROM replica_rooms r WHERE r.key = k.key)`, [key]);
     if (held !== undefined)
         erasing(connection, key, text(held.locator));
     return null;
@@ -373,7 +427,6 @@ export function erase(connection, locator, limit) {
         return { remaining: false };
     const key = number(held.key);
     const batch = 'SELECT id FROM replica_entries WHERE key = ? ORDER BY id LIMIT ?';
-    unindexDocuments(connection, heldIds(connection, batch, [key, limit]));
     for (const table of ['replica_values', 'replica_links']) {
         connection.run(`DELETE FROM ${table} WHERE doc IN (${batch})`, [key, limit]);
     }
@@ -387,28 +440,46 @@ export function erase(connection, locator, limit) {
     const [more] = connection.rows(`SELECT 1 FROM replica_erasing${locator === null ? '' : ' WHERE locator = ?'} LIMIT 1`, locator === null ? [] : [locator]);
     return { remaining: more !== undefined };
 }
-export function rederive(connection, key, limit) {
+function cursor(value) {
+    return value === null || value === undefined ? null : number(value);
+}
+export function rederive(connection, key, composed, bytes, ms, floor) {
+    const started = performance.now();
+    recomposed(connection, key, composed.fingerprint);
     const [held] = connection.rows('SELECT rederiving FROM replica_keys WHERE key = ?', [key]);
-    if (held === undefined || held.rederiving === null)
-        return { done: true };
-    const after = number(held.rederiving);
-    const composition = compositionOf(connection, key);
-    const rows = connection.rows('SELECT id, path, content FROM replica_entries WHERE key = ? AND present = 1 AND id > ? ORDER BY id LIMIT ?', [key, after, limit]);
-    for (const row of rows) {
-        const id = number(row.id);
-        const path = text(row.path);
-        const made = derived(path, text(row.content), composition);
-        dropDerived(connection, id);
-        connection.run('UPDATE replica_entries SET type = ?, declared = ?, queried = ?, fields = ? WHERE id = ?', [made.type, made.declared, flag(made.queried), made.fields, id]);
-        writeDerived(connection, id, key, made);
+    const deriving = cursor(held?.rederiving);
+    if (deriving === null)
+        return { done: true, text: 0 };
+    const composition = composed.composition;
+    let last = deriving;
+    let spent = 0;
+    let built = 0;
+    let read = false;
+    reading: for (;;) {
+        const rows = connection.rows('SELECT id, path, type, fields, links, octet_length(content) AS size FROM replica_entries WHERE key = ? AND present = 1 AND id > ? ORDER BY id LIMIT ?', [key, last, DERIVED_ROWS]);
+        for (const row of rows) {
+            const id = number(row.id);
+            const path = text(row.path);
+            const size = row.size === null ? 0 : number(row.size);
+            dropDerived(connection, id);
+            writeDerived(connection, id, key, path, {
+                type: text(row.type),
+                fields: json(row.fields),
+                links: json(row.links) ?? [],
+            }, composition);
+            built += size;
+            last = id;
+            spent += ENTRY_WEIGHT + size;
+            if (spent >= bytes || (spent >= floor && performance.now() - started >= ms))
+                break reading;
+        }
+        if (rows.length < DERIVED_ROWS) {
+            read = true;
+            break;
+        }
     }
-    const last = rows.at(-1);
-    const done = rows.length < limit || last === undefined;
-    connection.run('UPDATE replica_keys SET rederiving = ? WHERE key = ?', [
-        done ? null : number(last.id),
-        key,
-    ]);
-    return { done };
+    connection.run('UPDATE replica_keys SET rederiving = ? WHERE key = ?', [read ? null : last, key]);
+    return { done: read, text: built };
 }
 function heldEntry(row) {
     return {
@@ -417,18 +488,33 @@ function heldEntry(row) {
         binary: json(row.binary),
         revision: text(row.revision),
         fileId: text(row.file_id),
+        created: text(row.created),
         change: json(row.change),
         written: text(row.written),
         type: text(row.type),
+        facts: factsHeld(row),
+    };
+}
+function factsHeld(row) {
+    const type = text(row.declared);
+    if (type === null)
+        return null;
+    return {
+        type,
+        fields: json(row.fields) ?? {},
+        links: json(row.links) ?? [],
     };
 }
-const ENTRY_COLUMNS = 'e.path, e.content, e.binary, e.revision, e.file_id, e.change, e.written, e.type';
+const ENTRY_COLUMNS = 'e.path, e.content, e.binary, e.revision, e.file_id, e.created, e.change, e.written, e.type, e.declared, e.fields, e.links';
+function unrefreshed(alias) {
+    return `NOT EXISTS (SELECT 1 FROM replica_entries r WHERE r.key = ${alias}.key AND r.layer = ${REFRESHED} AND r.path = ${alias}.path)`;
+}
 function viewed(view, alias) {
     if (view === 'visible')
         return `${alias}.visible = 1 AND ${alias}.present = 1`;
     if (view === 'confirmed')
         return `${alias}.layer = ${CONFIRMED}`;
-    return `${alias}.present = 1 AND (${alias}.layer = ${REFRESHED} OR (${alias}.layer = ${CONFIRMED} AND NOT EXISTS (SELECT 1 FROM replica_entries r WHERE r.key = ${alias}.key AND r.layer = ${REFRESHED} AND r.path = ${alias}.path)))`;
+    return `${alias}.present = 1 AND (${alias}.layer = ${REFRESHED} OR (${alias}.layer = ${CONFIRMED} AND ${unrefreshed(alias)}))`;
 }
 export function entries(connection, key, view, list) {
     if (list.length === 0)
@@ -448,91 +534,111 @@ export function typed(connection, key, view, list) {
         binary: number(row.binary) === 1,
     }));
 }
-export function referrers(connection, key, view, targets, kinds) {
+export function referrers(connection, key, view, targets) {
     if (targets.length === 0)
         return [];
     return connection
-        .rows(`SELECT DISTINCT e.path, l.target, l.kind FROM replica_links l JOIN replica_entries e ON e.id = l.doc WHERE l.key = ? AND l.target IN (SELECT value FROM json_each(?)) AND l.kind IN (SELECT value FROM json_each(?)) AND ${viewed(view, 'e')}`, [key, paths(targets), JSON.stringify(kinds)])
+        .rows(`SELECT DISTINCT e.path, l.target FROM replica_links l JOIN replica_entries e ON e.id = l.doc WHERE l.key = ? AND l.target IN (SELECT value FROM json_each(?)) AND ${viewed(view, 'e')}`, [key, paths(targets)])
+        .map((row) => ({ path: text(row.path), target: text(row.target) }));
+}
+export function folders(connection, key, list) {
+    return list.filter((path) => connection.rows(`SELECT 1 FROM replica_folders f WHERE f.key = ? AND f.layer = ${CONFIRMED} AND f.present = 1 AND f.path = ? UNION ALL SELECT 1 FROM replica_entries e WHERE e.key = ? AND ${viewed('visible', 'e')} AND e.path >= ? AND e.path < ? LIMIT 1`, [key, path, key, `${path}/`, `${path}0`]).length > 0);
+}
+export function typedWithin(connection, key, view, roots, within) {
+    return (connection.rows(`SELECT 1 FROM replica_entries e WHERE e.key = ? AND ${viewed(view, 'e')} AND e.declared IS NOT NULL AND e.declared <> 'any' AND ${within ? '' : 'NOT '}${beneathRoots('e.path')} LIMIT 1`, [key, JSON.stringify(roots)]).length > 0);
+}
+const ORPHANS = `SELECT k.key FROM replica_keys k
+  WHERE NOT EXISTS (SELECT 1 FROM replica_rooms r WHERE r.key = k.key)
+    AND NOT EXISTS (SELECT 1 FROM replica_erasing e WHERE e.key = k.key)
+    AND (${UNPARTED} OR NOT EXISTS (
+      SELECT 1 FROM replica_entries e WHERE e.key = k.key
+      UNION ALL SELECT 1 FROM replica_folders f WHERE f.key = k.key
+    ))`;
+const STAGED = `SELECT DISTINCT k.locator FROM replica_keys k
+  WHERE NOT EXISTS (SELECT 1 FROM replica_rooms r WHERE r.key = k.key)
+    AND NOT EXISTS (SELECT 1 FROM replica_erasing e WHERE e.key = k.key)
+    AND k.key NOT IN (${ORPHANS})`;
+export function opened(connection) {
+    return {
+        orphans: connection.rows(ORPHANS).map((row) => number(row.key)),
+        erasing: connection.rows('SELECT 1 FROM replica_erasing LIMIT 1').length > 0,
+    };
+}
+const ROOM_ROWS = `SELECT h.locator, h.key, h.record, r.documents, k.rederiving IS NULL AS indexed
+  FROM (${HELD_RECORDS}) h
+  JOIN replica_rooms r ON r.locator = h.locator
+  LEFT JOIN replica_keys k ON k.key = h.key`;
+function roomRow(row) {
+    return {
+        locator: text(row.locator),
+        key: number(row.key),
+        record: text(row.record),
+        indexed: number(row.indexed) === 1,
+        documents: number(row.documents),
+    };
+}
+export function heldRooms(connection, locators) {
+    return (locators === null
+        ? connection.rows(`${ROOM_ROWS} ORDER BY h.locator`)
+        : connection.rows(`${ROOM_ROWS} WHERE h.locator IN (SELECT value FROM json_each(?)) ORDER BY h.locator`, [JSON.stringify(locators)])).map(roomRow);
+}
+export function heldRoom(connection, locator) {
+    return heldRooms(connection, [locator])[0] ?? null;
+}
+export function overlaid(connection, key) {
+    return connection
+        .rows(`SELECT path FROM replica_entries WHERE key = ? AND layer = ${OVERLAY}`, [key])
+        .map((row) => text(row.path));
+}
+export function covering(connection) {
+    return connection
+        .rows(`SELECT r.locator, r.key, r.documents, json_extract(r.record, '$.transfer') AS transfer,
+         json_extract(r.record, '$.roomVersion') AS room_version,
+         coalesce(json_extract(r.record, '$.inventory.bytes'), 0) AS bytes,
+         json_extract(r.record, '$.replica.offline') AS offline,
+         k.rederiving IS NULL AS indexed
+       FROM replica_rooms r LEFT JOIN replica_keys k ON k.key = r.key ORDER BY r.locator`)
         .map((row) => ({
-        path: text(row.path),
-        target: text(row.target),
-        kind: text(row.kind),
+        locator: text(row.locator),
+        key: number(row.key),
+        transfer: text(row.transfer),
+        roomVersion: text(row.room_version),
+        indexed: number(row.indexed) === 1,
+        documents: number(row.documents),
+        bytes: number(row.bytes),
+        offline: text(row.offline),
     }));
 }
-export function walk(connection, key, view, after, bytes) {
-    const found = [];
-    let spent = 0;
-    let from = after;
-    for (;;) {
-        const rows = connection.rows(`SELECT ${ENTRY_COLUMNS} FROM replica_entries e WHERE e.key = ? AND ${viewed(view, 'e')}${from === null ? '' : ' AND e.path > ?'} ORDER BY e.path LIMIT 64`, from === null ? [key] : [key, from]);
-        for (const row of rows) {
-            const entry = heldEntry(row);
-            found.push(entry);
-            spent += 256 + (entry.content?.length ?? 0) * 2;
-            if (spent >= bytes)
-                return { entries: found, next: entry.path };
-        }
-        if (rows.length < 64)
-            return { entries: found, next: null };
-        from = found.at(-1).path;
-    }
+export function offlineMode(connection, locator) {
+    const [held] = connection.rows("SELECT json_extract(record, '$.replica.offline') AS offline FROM replica_rooms WHERE locator = ?", [locator]);
+    return text(held?.offline);
 }
-export function files(connection, key, view, after, limit) {
-    return connection
-        .rows(`SELECT e.path, e.revision FROM replica_entries e WHERE e.key = ? AND ${viewed(view, 'e')} AND e.content IS NOT NULL AND e.revision IS NOT NULL${after === null ? '' : ' AND e.path > ?'} ORDER BY e.path LIMIT ?`, after === null ? [key, limit] : [key, after, limit])
-        .map((row) => ({ path: text(row.path), revision: text(row.revision) }));
+export function stagedLocators(connection) {
+    return connection.rows(STAGED).map((row) => text(row.locator));
 }
-export function typedWithin(connection, key, view, roots, within) {
-    const inside = roots.map(() => '(e.path = ? OR (e.path >= ? AND e.path < ?))').join(' OR ');
-    const bind = [key];
-    for (const root of roots)
-        bind.push(root, `${root}/`, `${root}0`);
-    const placed = roots.length === 0 ? (within ? ' AND 0' : '') : ` AND ${within ? '' : 'NOT '}(${inside})`;
-    return (connection.rows(`SELECT 1 FROM replica_entries e WHERE e.key = ? AND ${viewed(view, 'e')} AND e.declared IS NOT NULL AND e.declared <> 'any'${placed} LIMIT 1`, bind).length > 0);
+export function heldLocators(connection) {
+    return connection
+        .rows(`SELECT locator FROM replica_rooms
+       UNION SELECT locator FROM authored_room_drafts
+       UNION SELECT locator FROM authored_queues
+       UNION ${STAGED}`)
+        .map((row) => text(row.locator));
+}
+export function demoted(connection) {
+    connection.run(`UPDATE replica_rooms SET record = json_set(record, '$.model.status', 'cached')
+     WHERE json_extract(record, '$.model.status') = 'current'`);
+    return null;
 }
-export function opened(connection) {
-    const facts = {};
+export function facts(connection) {
+    const held = {};
     for (const row of connection.rows('SELECT name, value FROM replica_facts')) {
-        facts[text(row.name)] = text(row.value);
+        held[text(row.name)] = text(row.value);
     }
-    return {
-        rooms: connection.rows('SELECT locator, key, record FROM replica_rooms').map((row) => ({
-            locator: text(row.locator),
-            key: number(row.key),
-            record: text(row.record),
-        })),
-        transfers: connection.rows('SELECT locator, key, record FROM replica_transfers').map((row) => ({
-            locator: text(row.locator),
-            key: number(row.key),
-            record: text(row.record),
-        })),
-        keys: connection
-            .rows('SELECT key, locator, transfer, rederiving FROM replica_keys')
-            .map((row) => ({
-            key: number(row.key),
-            locator: text(row.locator),
-            transfer: text(row.transfer),
-            rederiving: row.rederiving === null ? null : number(row.rederiving),
-        })),
-        facts,
-        presentation: connection.rows('SELECT app, value FROM replica_presentation').map((row) => ({
-            app: text(row.app),
-            value: text(row.value),
-        })),
-        overlaid: connection
-            .rows(`SELECT key, path FROM replica_entries WHERE layer = ${OVERLAY}`)
-            .map((row) => ({ key: number(row.key), path: text(row.path) })),
-        orphans: connection
-            .rows(`SELECT k.key FROM replica_keys k
-         WHERE NOT EXISTS (SELECT 1 FROM replica_rooms r WHERE r.key = k.key)
-           AND NOT EXISTS (SELECT 1 FROM replica_transfers t WHERE t.key = k.key)
-           AND NOT EXISTS (SELECT 1 FROM replica_erasing e WHERE e.key = k.key)`)
-            .map((row) => number(row.key)),
-        erasing: connection.rows('SELECT key, locator FROM replica_erasing').map((row) => ({
-            key: number(row.key),
-            locator: text(row.locator),
-        })),
-    };
+    return held;
+}
+export function presentation(connection, app) {
+    const [held] = connection.rows('SELECT value FROM replica_presentation WHERE app = ?', [app]);
+    return text(held?.value);
 }
 export function ended(connection) {
     for (const statement of REPLICA_TABLES) {
@@ -540,5 +646,4 @@ export function ended(connection) {
         if (table !== undefined)
             connection.run(`DELETE FROM ${table}`);
     }
-    unindexAll(connection);
 }