foldkit 0.32.0 → 0.33.0

package/dist/devtools/overlay.js

@@ -0,0 +1,632 @@
+import { clsx } from 'clsx';
+import { Array as Array_, Effect, HashSet, Match as M, Number as Number_, Option, Predicate, Record, Schema as S, Stream, String as String_, SubscriptionRef, pipe, } from 'effect';
+import { OptionExt } from '../effectExtensions';
+import { html } from '../html';
+import { m } from '../message';
+import { makeElement } from '../runtime/runtime';
+import { makeSubscriptions } from '../runtime/subscription';
+import { evo } from '../struct';
+import * as Tabs from '../ui/tabs';
+import { overlayStyles } from './overlay-styles';
+import { INIT_INDEX } from './store';
+// MODEL
+const DisplayEntry = S.Struct({
+    tag: S.String,
+    commandCount: S.Number,
+    timestamp: S.Number,
+    isModelChanged: S.Boolean,
+});
+const INSPECTOR_TABS_ID = 'dt-inspector';
+const InspectorTabsModel = S.Struct({
+    id: S.String,
+    activeIndex: S.Number,
+    focusedIndex: S.Number,
+    activationMode: S.Literal('Automatic', 'Manual'),
+});
+const Model = S.Struct({
+    isOpen: S.Boolean,
+    entries: S.Array(DisplayEntry),
+    startIndex: S.Number,
+    isPaused: S.Boolean,
+    pausedAtIndex: S.Number,
+    maybeSelectedIndex: S.OptionFromSelf(S.Number),
+    maybeInspectedModel: S.OptionFromSelf(S.Unknown),
+    maybeInspectedMessage: S.OptionFromSelf(S.Unknown),
+    expandedPaths: S.HashSetFromSelf(S.String),
+    changedPaths: S.HashSetFromSelf(S.String),
+    affectedPaths: S.HashSetFromSelf(S.String),
+    inspectorTabs: InspectorTabsModel,
+});
+// MESSAGE
+const ClickedToggle = m('ClickedToggle');
+const ClickedRow = m('ClickedRow', { index: S.Number });
+const ClickedResume = m('ClickedResume');
+const ClickedClear = m('ClickedClear');
+const CompletedJump = m('CompletedJump');
+const CompletedResume = m('CompletedResume');
+const ClickedFollowLatest = m('ClickedFollowLatest');
+const CompletedClear = m('CompletedClear');
+const CompletedScroll = m('CompletedScroll');
+const ReceivedInspectedState = m('ReceivedInspectedState', {
+    model: S.Unknown,
+    maybeMessage: S.OptionFromSelf(S.Unknown),
+    changedPaths: S.HashSetFromSelf(S.String),
+    affectedPaths: S.HashSetFromSelf(S.String),
+});
+const ToggledTreeNode = m('ToggledTreeNode', { path: S.String });
+const GotInspectorTabsMessage = m('GotInspectorTabsMessage', {
+    message: S.Unknown,
+});
+const ReceivedStoreUpdate = m('ReceivedStoreUpdate', {
+    entries: S.Array(DisplayEntry),
+    startIndex: S.Number,
+    isPaused: S.Boolean,
+    pausedAtIndex: S.Number,
+});
+const Message = S.Union(ClickedToggle, ClickedRow, ClickedResume, ClickedClear, ClickedFollowLatest, CompletedJump, CompletedResume, CompletedClear, CompletedScroll, ReceivedInspectedState, ToggledTreeNode, GotInspectorTabsMessage, ReceivedStoreUpdate);
+// HELPERS
+const MILLIS_PER_SECOND = 1000;
+const TREE_INDENT_PX = 12;
+const MAX_PREVIEW_KEYS = 3;
+const formatTimeDelta = (deltaMs) => M.value(deltaMs).pipe(M.when(0, () => '0ms'), M.when(Number_.lessThan(MILLIS_PER_SECOND), ms => `+${Math.round(ms)}ms`), M.orElse(ms => `+${(ms / MILLIS_PER_SECOND).toFixed(1)}s`));
+const MESSAGE_LIST_SELECTOR = '.message-list';
+const toDisplayEntries = ({ entries }) => Array_.map(entries, ({ tag, commandCount, timestamp, isModelChanged }) => ({
+    tag,
+    commandCount,
+    timestamp,
+    isModelChanged,
+}));
+const toDisplayState = (state) => ({
+    entries: toDisplayEntries(state),
+    startIndex: state.startIndex,
+    isPaused: state.isPaused,
+    pausedAtIndex: state.pausedAtIndex,
+});
+const isExpandable = (value) => Predicate.isNotNull(value) && typeof value === 'object';
+const Tagged = S.Struct({ _tag: S.String });
+const isTagged = S.is(Tagged);
+const objectPreview = (value) => pipe(value, Record.keys, Array_.filter(key => key !== '_tag'), Array_.match({
+    onEmpty: () => '{}',
+    onNonEmpty: keys => {
+        const preview = pipe(keys, Array_.take(MAX_PREVIEW_KEYS), Array_.join(', '));
+        return Array_.length(keys) > MAX_PREVIEW_KEYS
+            ? `{ ${preview}, … }`
+            : `{ ${preview} }`;
+    },
+}));
+const collapsedPreview = (value) => M.value(value).pipe(M.when(Array.isArray, array => `(${array.length})`), M.when(Predicate.isReadonlyRecord, objectPreview), M.orElse(() => ''));
+const emptyDiff = {
+    changedPaths: HashSet.empty(),
+    affectedPaths: HashSet.empty(),
+};
+const computeDiff = (previous, current) => {
+    const changed = new Set();
+    const walk = (prev, curr, path) => {
+        if (prev === curr) {
+            return;
+        }
+        if (!isExpandable(curr) || !isExpandable(prev)) {
+            changed.add(path);
+            return;
+        }
+        if (Array.isArray(curr) && Array.isArray(prev)) {
+            walkArray(prev, curr, path);
+        }
+        else if (Predicate.isReadonlyRecord(curr) &&
+            Predicate.isReadonlyRecord(prev)) {
+            walkObject(prev, curr, path);
+        }
+        else {
+            changed.add(path);
+        }
+    };
+    const walkObject = (prev, curr, path) => {
+        pipe(curr, Record.keys, Array_.forEach(key => {
+            const childPath = `${path}.${key}`;
+            if (Record.has(prev, key)) {
+                walk(prev[key], curr[key], childPath);
+            }
+            else {
+                changed.add(childPath);
+            }
+        }));
+    };
+    const walkArray = (prev, curr, path) => {
+        const prevRefToIndex = new Map(prev.map((item, index) => [item, index]));
+        curr.forEach((item, index) => {
+            const childPath = `${path}.${index}`;
+            const prevIndex = prevRefToIndex.get(item);
+            if (Predicate.isUndefined(prevIndex) || prevIndex !== index) {
+                changed.add(childPath);
+            }
+        });
+    };
+    walk(previous, current, 'root');
+    const affected = new Set(changed);
+    const addAncestors = (path) => {
+        pipe(path, String_.lastIndexOf('.'), Option.map(lastDot => path.substring(0, lastDot)), Option.filter(parent => !affected.has(parent)), Option.map(parent => {
+            affected.add(parent);
+            addAncestors(parent);
+        }));
+    };
+    changed.forEach(addAncestors);
+    return {
+        changedPaths: HashSet.fromIterable(changed),
+        affectedPaths: HashSet.fromIterable(affected),
+    };
+};
+// UPDATE
+const makeUpdate = (store, shadow, mode) => {
+    const jumpTo = (index) => Effect.gen(function* () {
+        yield* store.jumpTo(index);
+        return CompletedJump();
+    });
+    const inspectState = (index) => Effect.gen(function* () {
+        const model = yield* store.getModelAtIndex(index);
+        const maybeMessage = yield* store.getMessageAtIndex(index);
+        const diff = index === INIT_INDEX
+            ? emptyDiff
+            : yield* pipe(store.getModelAtIndex(index - 1), Effect.map(previousModel => computeDiff(previousModel, model)), Effect.catchAll(() => Effect.succeed(emptyDiff)));
+        return ReceivedInspectedState({ model, maybeMessage, ...diff });
+    });
+    const inspectLatest = Effect.gen(function* () {
+        const state = yield* SubscriptionRef.get(store.stateRef);
+        const latestIndex = Array_.isEmptyReadonlyArray(state.entries)
+            ? INIT_INDEX
+            : state.startIndex + state.entries.length - 1;
+        return yield* inspectState(latestIndex);
+    });
+    const resume = Effect.gen(function* () {
+        yield* store.resume;
+        return CompletedResume();
+    });
+    const clear = Effect.gen(function* () {
+        yield* store.clear;
+        return CompletedClear();
+    });
+    const scrollToTop = Effect.sync(() => {
+        const messageList = shadow.querySelector(MESSAGE_LIST_SELECTOR);
+        if (messageList instanceof HTMLElement) {
+            messageList.scrollTop = 0;
+        }
+        return CompletedScroll();
+    });
+    return (model, message) => M.value(message).pipe(M.withReturnType(), M.tags({
+        ClickedToggle: () => [
+            evo(model, {
+                isOpen: isOpen => !isOpen,
+            }),
+            [],
+        ],
+        ClickedRow: ({ index }) => M.value(mode).pipe(M.withReturnType(), M.when('TimeTravel', () => [
+            model,
+            [jumpTo(index), inspectState(index)],
+        ]), M.when('Inspect', () => [
+            evo(model, {
+                maybeSelectedIndex: () => Option.some(index),
+            }),
+            [inspectState(index)],
+        ]), M.exhaustive),
+        ClickedResume: () => [
+            evo(model, {
+                expandedPaths: () => HashSet.empty(),
+                changedPaths: () => HashSet.empty(),
+                affectedPaths: () => HashSet.empty(),
+            }),
+            [resume, inspectLatest],
+        ],
+        ClickedClear: () => [
+            evo(model, {
+                maybeSelectedIndex: () => Option.none(),
+                maybeInspectedModel: () => Option.none(),
+                maybeInspectedMessage: () => Option.none(),
+                expandedPaths: () => HashSet.empty(),
+                changedPaths: () => HashSet.empty(),
+                affectedPaths: () => HashSet.empty(),
+            }),
+            [clear],
+        ],
+        ClickedFollowLatest: () => [
+            evo(model, {
+                maybeSelectedIndex: () => Option.none(),
+                expandedPaths: () => HashSet.empty(),
+                changedPaths: () => HashSet.empty(),
+                affectedPaths: () => HashSet.empty(),
+            }),
+            [inspectLatest, scrollToTop],
+        ],
+        ReceivedInspectedState: ({ model: inspectedModel, maybeMessage, changedPaths, affectedPaths, }) => [
+            evo(model, {
+                maybeInspectedModel: () => Option.some(inspectedModel),
+                maybeInspectedMessage: () => maybeMessage,
+                changedPaths: () => changedPaths,
+                affectedPaths: () => affectedPaths,
+            }),
+            [],
+        ],
+        GotInspectorTabsMessage: ({ message: tabsMessage }) => {
+            const [nextTabsModel, tabsCommands] = Tabs.update(model.inspectorTabs, 
+            /* eslint-disable-next-line @typescript-eslint/consistent-type-assertions */
+            tabsMessage);
+            return [
+                evo(model, {
+                    inspectorTabs: () => nextTabsModel,
+                }),
+                tabsCommands.map(Effect.map(innerMessage => GotInspectorTabsMessage({ message: innerMessage }))),
+            ];
+        },
+        ToggledTreeNode: ({ path }) => [
+            evo(model, {
+                expandedPaths: paths => HashSet.toggle(paths, path),
+            }),
+            [],
+        ],
+        ReceivedStoreUpdate: ({ entries, startIndex, isPaused, pausedAtIndex, }) => {
+            const shouldFollowLatest = M.value(mode).pipe(M.when('TimeTravel', () => !isPaused), M.when('Inspect', () => Option.isNone(model.maybeSelectedIndex)), M.exhaustive);
+            return [
+                evo(model, {
+                    entries: () => entries,
+                    startIndex: () => startIndex,
+                    isPaused: () => isPaused,
+                    pausedAtIndex: () => pausedAtIndex,
+                }),
+                shouldFollowLatest ? [scrollToTop, inspectLatest] : [],
+            ];
+        },
+    }), M.tag('CompletedJump', 'CompletedResume', 'CompletedClear', 'CompletedScroll', () => [model, []]), M.exhaustive);
+};
+// SUBSCRIPTION
+const SubscriptionDeps = S.Struct({
+    storeUpdates: S.Null,
+});
+const makeOverlaySubscriptions = (store) => makeSubscriptions(SubscriptionDeps)({
+    storeUpdates: {
+        modelToDependencies: () => null,
+        depsToStream: () => Stream.concat(Stream.make(pipe(SubscriptionRef.get(store.stateRef), Effect.map(state => ReceivedStoreUpdate(toDisplayState(state))))), pipe(store.stateRef.changes, Stream.map(state => Effect.succeed(ReceivedStoreUpdate(toDisplayState(state)))))),
+    },
+});
+// VIEW
+const indexClass = 'text-2xs text-dt-muted font-mono min-w-5';
+const headerButtonClass = 'dt-header-button bg-transparent border-none text-dt-muted cursor-pointer text-base font-mono transition-colors';
+const ROW_BASE = 'dt-row flex items-center py-1 px-1 cursor-pointer gap-1.5 transition-colors border-l-3 border-b';
+const BADGE_POSITION_CLASS = {
+    BottomRight: 'dt-pos-br',
+    BottomLeft: 'dt-pos-bl',
+    TopRight: 'dt-pos-tr',
+    TopLeft: 'dt-pos-tl',
+};
+const PANEL_POSITION_CLASS = {
+    BottomRight: 'dt-panel-br',
+    BottomLeft: 'dt-panel-bl',
+    TopRight: 'dt-panel-tr',
+    TopLeft: 'dt-panel-tl',
+};
+const makeView = (position, mode, maybeMessage) => {
+    const { div, span, button, svg, path, Class, Style, OnClick, AriaHidden, Xmlns, Fill, ViewBox, StrokeWidth, Stroke, StrokeLinecap, StrokeLinejoin, D, } = html();
+    // JSON TREE
+    const leafValueView = (value) => M.value(value).pipe(M.when(Predicate.isNull, () => span([Class('json-null italic')], ['null'])), M.when(Predicate.isUndefined, () => span([Class('json-null italic')], ['undefined'])), M.when(Predicate.isString, stringValue => span([Class('json-string')], [`"${stringValue}"`])), M.when(Predicate.isNumber, numberValue => span([Class('json-number')], [String(numberValue)])), M.when(Predicate.isBoolean, booleanValue => span([Class('json-boolean')], [String(booleanValue)])), M.orElse(unknownValue => span([Class('json-null')], [String(unknownValue)])));
+    const keyView = (key) => span([Class('json-key')], [`${key}:\u00a0`]);
+    const CHEVRON_RIGHT = 'M8.25 4.5l7.5 7.5-7.5 7.5';
+    const CHEVRON_DOWN = 'M19.5 8.25l-7.5 7.5-7.5-7.5';
+    const arrowView = (isExpanded) => svg([
+        AriaHidden(true),
+        Class('json-arrow shrink-0'),
+        Xmlns('http://www.w3.org/2000/svg'),
+        Fill('none'),
+        ViewBox('0 0 24 24'),
+        StrokeWidth('2'),
+        Stroke('currentColor'),
+    ], [
+        path([
+            StrokeLinecap('round'),
+            StrokeLinejoin('round'),
+            D(isExpanded ? CHEVRON_DOWN : CHEVRON_RIGHT),
+        ], []),
+    ]);
+    const tagLabelView = (tag) => span([Class('json-tag')], [tag]);
+    const diffDotView = span([Class('diff-dot')], []);
+    const inlineDiffDotView = span([Class('diff-dot-inline')], []);
+    const flattenTree = (value, treePath, expandedPaths, changedPaths, affectedPaths, depth, maybeKey, accumulator, indentRootChildren) => {
+        const isRoot = treePath === 'root';
+        const nodeIsExpandable = isExpandable(value);
+        const isExpanded = nodeIsExpandable && (isRoot || HashSet.has(expandedPaths, treePath));
+        const maybeTag = pipe(value, Option.liftPredicate(isTagged), Option.map(({ _tag }) => _tag));
+        accumulator.push({
+            value,
+            treePath,
+            depth,
+            maybeKey,
+            isExpandable: nodeIsExpandable,
+            isExpanded,
+            isChanged: HashSet.has(changedPaths, treePath),
+            isAffected: HashSet.has(affectedPaths, treePath),
+            maybeTag,
+        });
+        if (!isExpanded) {
+            return;
+        }
+        const childDepth = isRoot && !indentRootChildren ? depth : depth + 1;
+        if (Array.isArray(value)) {
+            value.forEach((item, arrayIndex) => flattenTree(item, `${treePath}.${arrayIndex}`, expandedPaths, changedPaths, affectedPaths, childDepth, Option.some(String(arrayIndex)), accumulator, indentRootChildren));
+        }
+        else if (Predicate.isReadonlyRecord(value)) {
+            pipe(value, Record.toEntries, Array_.filter(([key]) => key !== '_tag'), Array_.forEach(([key, childValue]) => flattenTree(childValue, `${treePath}.${key}`, expandedPaths, changedPaths, affectedPaths, childDepth, Option.some(key), accumulator, indentRootChildren)));
+        }
+    };
+    const flatNodeView = (node) => {
+        const indent = Style({ paddingLeft: `${node.depth * TREE_INDENT_PX}px` });
+        const hasDiffDot = node.isChanged || node.isAffected;
+        if (!node.isExpandable) {
+            return div([
+                Class(clsx('tree-row flex items-center gap-px font-mono text-2xs', node.isChanged && 'diff-changed')),
+                indent,
+            ], [
+                ...(hasDiffDot ? [diffDotView] : []),
+                ...Array_.getSomes([Option.map(node.maybeKey, keyView)]),
+                leafValueView(node.value),
+            ]);
+        }
+        const isRoot = node.treePath === 'root';
+        const preview = node.isExpanded
+            ? Array.isArray(node.value)
+                ? `(${node.value.length})`
+                : ''
+            : collapsedPreview(node.value);
+        return div([
+            Class(clsx('tree-row flex items-center gap-px font-mono text-2xs', !isRoot && 'tree-row-expandable cursor-pointer', node.isChanged && 'diff-changed')),
+            indent,
+            ...(isRoot ? [] : [OnClick(ToggledTreeNode({ path: node.treePath }))]),
+        ], [
+            ...(isRoot ? [] : [arrowView(node.isExpanded)]),
+            ...(!isRoot && hasDiffDot ? [diffDotView] : []),
+            ...Array_.getSomes([
+                Option.map(node.maybeKey, keyView),
+                Option.map(node.maybeTag, tagLabelView),
+            ]),
+            span([Class('json-preview')], [preview]),
+        ]);
+    };
+    const treeView = (value, rootPath, expandedPaths, changedPaths, affectedPaths, maybeRootLabel, indentRootChildren) => {
+        const nodes = [];
+        flattenTree(value, rootPath, expandedPaths, changedPaths, affectedPaths, 0, maybeRootLabel, nodes, indentRootChildren);
+        return div([Class('inspector-tree flex-1 overflow-auto min-h-0 min-w-0')], nodes.map(flatNodeView));
+    };
+    const inspectedTimestamp = (model) => {
+        const lastIndex = Array_.isEmptyReadonlyArray(model.entries)
+            ? INIT_INDEX
+            : model.startIndex + model.entries.length - 1;
+        const selectedIndex = M.value(mode).pipe(M.when('TimeTravel', () => model.isPaused ? model.pausedAtIndex : lastIndex), M.when('Inspect', () => Option.getOrElse(model.maybeSelectedIndex, () => lastIndex)), M.exhaustive);
+        if (selectedIndex === INIT_INDEX) {
+            return '0ms';
+        }
+        const baseTimestamp = pipe(model.entries, Array_.head, Option.match({
+            onNone: () => 0,
+            onSome: ({ timestamp }) => timestamp,
+        }));
+        return pipe(Array_.get(model.entries, selectedIndex - model.startIndex), Option.map(entry => {
+            const delta = entry.timestamp - baseTimestamp;
+            const seconds = Math.floor(delta / MILLIS_PER_SECOND);
+            const remainingMs = delta % MILLIS_PER_SECOND;
+            return seconds > 0
+                ? `+${seconds}s ${remainingMs.toFixed(1)}ms`
+                : `+${remainingMs.toFixed(1)}ms`;
+        }), Option.getOrElse(() => ''));
+    };
+    const emptyInspectorView = div([
+        Class('flex-1 flex items-center justify-center text-dt-muted text-2xs font-mono min-w-0'),
+    ], ['Click a message to inspect']);
+    const INSPECTOR_TABS = ['Model', 'Message'];
+    const noMessageView = div([
+        Class('flex-1 flex items-center justify-center text-dt-muted text-2xs font-mono min-w-0'),
+    ], ['Init — no Message']);
+    const modelTabContent = (model, inspectedModel) => treeView(inspectedModel, 'root', model.expandedPaths, model.changedPaths, model.affectedPaths, Option.none(), true);
+    const messageTabContent = (model) => Option.match(model.maybeInspectedMessage, {
+        onNone: () => noMessageView,
+        onSome: message => div([Class('flex flex-col flex-1 min-h-0 min-w-0')], [
+            div([
+                Class('px-2 py-1 border-b text-2xs text-dt-muted font-mono shrink-0'),
+            ], [inspectedTimestamp(model)]),
+            div([Class('flex flex-col flex-1 min-h-0 min-w-0 pt-1 pl-1')], [
+                treeView(message, 'root', model.expandedPaths, HashSet.empty(), HashSet.empty(), Option.none(), false),
+            ]),
+        ]),
+    });
+    const inspectorTabContent = (model, tab, inspectedModel) => M.value(tab).pipe(M.when('Model', () => modelTabContent(model, inspectedModel)), M.when('Message', () => messageTabContent(model)), M.exhaustive);
+    const inspectorPaneView = (model) => div([Class('flex flex-col border-l min-w-0 flex-1 dt-inspector-pane')], [
+        Tabs.view({
+            model: model.inspectorTabs,
+            toMessage: tabsMessage => GotInspectorTabsMessage({ message: tabsMessage }),
+            tabs: INSPECTOR_TABS,
+            className: 'flex flex-col flex-1 min-h-0',
+            tabListClassName: 'flex border-b shrink-0',
+            tabToConfig: (tab, { isActive }) => ({
+                buttonClassName: clsx('dt-tab-button cursor-pointer text-base font-mono px-3 py-1', isActive ? 'text-dt dt-tab-active' : 'text-dt-muted'),
+                buttonContent: span([Class('dt-tab-label')], [
+                    ...(isActive ? [span([Class('dt-tab-arrow')], ['→'])] : []),
+                    tab,
+                ]),
+                panelClassName: 'flex flex-col flex-1 min-h-0 min-w-0',
+                panelContent: Option.match(model.maybeInspectedModel, {
+                    onNone: () => emptyInspectorView,
+                    onSome: inspectedModel => inspectorTabContent(model, tab, inspectedModel),
+                }),
+            }),
+        }),
+    ]);
+    // MESSAGE LIST
+    const badgeView = (model) => button([
+        Class(clsx('fixed bg-dt-bg text-dt cursor-pointer flex flex-col items-center justify-center font-mono outline-none dt-badge', BADGE_POSITION_CLASS[position], model.isPaused ? 'dt-badge-paused' : 'dt-badge-accent')),
+        Style({ width: '22px', height: '56px', fontSize: '10px' }),
+        OnClick(ClickedToggle()),
+    ], [
+        model.isOpen
+            ? svg([
+                AriaHidden(true),
+                Xmlns('http://www.w3.org/2000/svg'),
+                Fill('none'),
+                ViewBox('0 0 24 24'),
+                StrokeWidth('1.5'),
+                Stroke('currentColor'),
+                Style({ width: '12px', height: '12px' }),
+            ], [
+                path([
+                    StrokeLinecap('round'),
+                    StrokeLinejoin('round'),
+                    D('M6 18L18 6M6 6l12 12'),
+                ], []),
+            ])
+            : div([
+                Class('flex flex-col items-center gap-0.5 text-dt-muted font-semibold tracking-wider'),
+            ], [span([], ['D']), span([], ['E']), span([], ['V'])]),
+    ]);
+    const headerClass = 'flex items-center justify-between px-3 py-1.5 border-b shrink-0';
+    const liveHeaderView = div([Class(headerClass)], [
+        span([Class('text-base text-dt-live font-medium font-mono')], ['Live']),
+        button([Class(headerButtonClass), OnClick(ClickedClear())], ['Clear history']),
+    ]);
+    const pausedHeaderView = (model) => div([Class(headerClass)], [
+        button([
+            Class('dt-resume-button bg-transparent border-none text-dt-live cursor-pointer text-base font-mono font-medium'),
+            OnClick(ClickedResume()),
+        ], ['Resume →']),
+        span([Class('text-base text-dt-paused font-mono')], [
+            model.pausedAtIndex === INIT_INDEX
+                ? 'Paused (init)'
+                : `Paused (${model.pausedAtIndex + 1})`,
+        ]),
+        button([Class(headerButtonClass), OnClick(ClickedClear())], ['Clear history']),
+    ]);
+    const inspectingHeaderView = (selectedIndex) => div([Class(headerClass)], [
+        button([
+            Class('dt-resume-button bg-transparent border-none text-dt-live cursor-pointer text-base font-mono font-medium'),
+            OnClick(ClickedFollowLatest()),
+        ], ['Follow latest →']),
+        span([Class('text-base text-dt-accent font-mono')], [
+            selectedIndex === INIT_INDEX
+                ? 'Inspecting (init)'
+                : `Inspecting (${selectedIndex + 1})`,
+        ]),
+        button([Class(headerButtonClass), OnClick(ClickedClear())], ['Clear history']),
+    ]);
+    const headerView = (model) => M.value(mode).pipe(M.when('Inspect', () => Option.match(model.maybeSelectedIndex, {
+        onNone: () => liveHeaderView,
+        onSome: inspectingHeaderView,
+    })), M.when('TimeTravel', () => model.isPaused ? pausedHeaderView(model) : liveHeaderView), M.exhaustive);
+    const initRowView = (isSelected, isPausedHere) => div([
+        Class(clsx(ROW_BASE, isSelected && 'selected')),
+        OnClick(ClickedRow({ index: INIT_INDEX })),
+    ], [
+        span([Class('pause-column')], isPausedHere ? [pauseIconView] : []),
+        span([Class('dot-column')], []),
+        span([Class(indexClass)], []),
+        span([Class('text-base text-dt-muted font-mono')], ['Init']),
+    ]);
+    const pauseIconView = svg([
+        AriaHidden(true),
+        Class('dt-pause-icon'),
+        Xmlns('http://www.w3.org/2000/svg'),
+        Fill('none'),
+        ViewBox('0 0 24 24'),
+        StrokeWidth('2.5'),
+        Stroke('currentColor'),
+    ], [
+        path([
+            StrokeLinecap('round'),
+            StrokeLinejoin('round'),
+            D('M5.75 3v18M18.25 3v18'),
+        ], []),
+    ]);
+    const messageRowView = (tag, absoluteIndex, isSelected, isPausedHere, timeDelta, isModelChanged) => div([
+        Class(clsx(ROW_BASE, isSelected && 'selected')),
+        OnClick(ClickedRow({ index: absoluteIndex })),
+    ], [
+        span([Class('pause-column')], isPausedHere ? [pauseIconView] : []),
+        span([Class('dot-column')], isModelChanged ? [inlineDiffDotView] : []),
+        span([Class(indexClass)], [String(absoluteIndex + 1)]),
+        span([Class('text-base text-dt font-mono flex-1 truncate')], [tag]),
+        span([
+            Class('text-2xs text-dt-muted font-mono shrink-0 text-right min-w-5'),
+        ], [formatTimeDelta(timeDelta)]),
+    ]);
+    const messageListView = (model) => {
+        const baseTimestamp = pipe(model.entries, Array_.head, Option.match({
+            onNone: () => 0,
+            onSome: ({ timestamp }) => timestamp,
+        }));
+        const lastIndex = Array_.isEmptyReadonlyArray(model.entries)
+            ? INIT_INDEX
+            : model.startIndex + model.entries.length - 1;
+        const selectedIndex = M.value(mode).pipe(M.when('TimeTravel', () => model.isPaused ? model.pausedAtIndex : lastIndex), M.when('Inspect', () => Option.getOrElse(model.maybeSelectedIndex, () => lastIndex)), M.exhaustive);
+        const isInitSelected = selectedIndex === INIT_INDEX;
+        const messageRows = pipe(model.entries, Array_.map((entry, arrayIndex) => {
+            const absoluteIndex = model.startIndex + arrayIndex;
+            const isSelected = selectedIndex === absoluteIndex;
+            const isPausedHere = model.isPaused && model.pausedAtIndex === absoluteIndex;
+            return messageRowView(entry.tag, absoluteIndex, isSelected, isPausedHere, entry.timestamp - baseTimestamp, entry.isModelChanged);
+        }), Array_.reverse);
+        return div([Class('message-list flex-1 overflow-y-auto min-h-0')], [
+            ...messageRows,
+            initRowView(isInitSelected, model.isPaused && model.pausedAtIndex === INIT_INDEX),
+        ]);
+    };
+    // PANEL
+    const panelView = (model) => div([
+        Class(clsx('fixed dt-panel dt-panel-wide bg-dt-bg border rounded-lg flex flex-col overflow-hidden font-mono text-dt', PANEL_POSITION_CLASS[position])),
+    ], [
+        ...pipe(maybeMessage, Option.map(message => div([
+            Class('px-3 py-1.5 border-b text-sm text-dt-muted font-mono shrink-0 leading-snug'),
+        ], [message])), Option.toArray),
+        headerView(model),
+        div([Class('flex flex-1 min-h-0 dt-content')], [
+            div([Class('flex flex-col min-h-0 dt-message-pane')], [messageListView(model)]),
+            inspectorPaneView(model),
+        ]),
+    ]);
+    const interactionBlocker = div([Class('dt-interaction-blocker')], []);
+    return (model) => div([], [
+        ...pipe(OptionExt.when(model.isPaused && mode === 'TimeTravel', interactionBlocker), Option.toArray),
+        ...pipe(OptionExt.when(model.isOpen, panelView(model)), Option.toArray),
+        badgeView(model),
+    ]);
+};
+// CREATE
+export const createOverlay = (store, position, mode, maybeMessage) => Effect.gen(function* () {
+    const existingHost = document.getElementById('foldkit-devtools');
+    if (existingHost) {
+        existingHost.remove();
+    }
+    const host = document.createElement('div');
+    host.id = 'foldkit-devtools';
+    document.body.appendChild(host);
+    const shadow = host.attachShadow({ mode: 'open' });
+    const styleElement = document.createElement('style');
+    styleElement.textContent = overlayStyles;
+    shadow.appendChild(styleElement);
+    const container = document.createElement('div');
+    shadow.appendChild(container);
+    const currentState = yield* SubscriptionRef.get(store.stateRef);
+    const init = () => [
+        {
+            isOpen: false,
+            maybeSelectedIndex: Option.none(),
+            maybeInspectedModel: Option.none(),
+            maybeInspectedMessage: Option.none(),
+            expandedPaths: HashSet.empty(),
+            changedPaths: HashSet.empty(),
+            affectedPaths: HashSet.empty(),
+            inspectorTabs: Tabs.init({ id: INSPECTOR_TABS_ID }),
+            ...toDisplayState(currentState),
+        },
+        [],
+    ];
+    const overlayRuntime = makeElement({
+        Model,
+        init,
+        update: makeUpdate(store, shadow, mode),
+        view: makeView(position, mode, maybeMessage),
+        container,
+        subscriptions: makeOverlaySubscriptions(store),
+        devtools: { show: 'Never' },
+    });
+    yield* Effect.forkDaemon(overlayRuntime());
+});

package/dist/devtools/store.d.ts

@@ -0,0 +1,36 @@
+import { Effect, HashMap, Option, SubscriptionRef } from 'effect';
+export declare const INIT_INDEX = -1;
+export type HistoryEntry = Readonly<{
+    tag: string;
+    message: unknown;
+    commandCount: number;
+    timestamp: number;
+    isModelChanged: boolean;
+}>;
+export type StoreState = Readonly<{
+    entries: ReadonlyArray<HistoryEntry>;
+    keyframes: HashMap.HashMap<number, unknown>;
+    maybeInitModel: Option.Option<unknown>;
+    startIndex: number;
+    isPaused: boolean;
+    pausedAtIndex: number;
+}>;
+export type Bridge = Readonly<{
+    replay: (model: unknown, message: unknown) => unknown;
+    render: (model: unknown) => Effect.Effect<void>;
+    getCurrentModel: Effect.Effect<unknown>;
+}>;
+export declare const createDevtoolsStore: (bridge: Bridge, maxEntries?: number) => Effect.Effect<DevtoolsStore>;
+export type DevtoolsStore = Readonly<{
+    recordInit: (model: unknown) => Effect.Effect<void>;
+    recordMessage: (message: Readonly<{
+        _tag: string;
+    }>, modelAfterUpdate: unknown, commandCount: number, isModelChanged: boolean) => Effect.Effect<void>;
+    getModelAtIndex: (index: number) => Effect.Effect<unknown>;
+    getMessageAtIndex: (index: number) => Effect.Effect<Option.Option<unknown>>;
+    jumpTo: (index: number) => Effect.Effect<void>;
+    resume: Effect.Effect<void>;
+    clear: Effect.Effect<void>;
+    stateRef: SubscriptionRef.SubscriptionRef<StoreState>;
+}>;
+//# sourceMappingURL=store.d.ts.map

package/dist/devtools/store.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"store.d.ts","sourceRoot":"","sources":["../../src/devtools/store.ts"],"names":[],"mappings":"AAAA,OAAO,EAAS,MAAM,EAAE,OAAO,EAAE,MAAM,EAAE,eAAe,EAAQ,MAAM,QAAQ,CAAA;AAE9E,eAAO,MAAM,UAAU,KAAK,CAAA;AAI5B,MAAM,MAAM,YAAY,GAAG,QAAQ,CAAC;IAClC,GAAG,EAAE,MAAM,CAAA;IACX,OAAO,EAAE,OAAO,CAAA;IAChB,YAAY,EAAE,MAAM,CAAA;IACpB,SAAS,EAAE,MAAM,CAAA;IACjB,cAAc,EAAE,OAAO,CAAA;CACxB,CAAC,CAAA;AAEF,MAAM,MAAM,UAAU,GAAG,QAAQ,CAAC;IAChC,OAAO,EAAE,aAAa,CAAC,YAAY,CAAC,CAAA;IACpC,SAAS,EAAE,OAAO,CAAC,OAAO,CAAC,MAAM,EAAE,OAAO,CAAC,CAAA;IAC3C,cAAc,EAAE,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,CAAA;IACtC,UAAU,EAAE,MAAM,CAAA;IAClB,QAAQ,EAAE,OAAO,CAAA;IACjB,aAAa,EAAE,MAAM,CAAA;CACtB,CAAC,CAAA;AAEF,MAAM,MAAM,MAAM,GAAG,QAAQ,CAAC;IAC5B,MAAM,EAAE,CAAC,KAAK,EAAE,OAAO,EAAE,OAAO,EAAE,OAAO,KAAK,OAAO,CAAA;IACrD,MAAM,EAAE,CAAC,KAAK,EAAE,OAAO,KAAK,MAAM,CAAC,MAAM,CAAC,IAAI,CAAC,CAAA;IAC/C,eAAe,EAAE,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,CAAA;CACxC,CAAC,CAAA;AAWF,eAAO,MAAM,mBAAmB,GAC9B,QAAQ,MAAM,EACd,mBAAgC,KAC/B,MAAM,CAAC,MAAM,CAAC,aAAa,CAmJ1B,CAAA;AAEJ,MAAM,MAAM,aAAa,GAAG,QAAQ,CAAC;IACnC,UAAU,EAAE,CAAC,KAAK,EAAE,OAAO,KAAK,MAAM,CAAC,MAAM,CAAC,IAAI,CAAC,CAAA;IACnD,aAAa,EAAE,CACb,OAAO,EAAE,QAAQ,CAAC;QAAE,IAAI,EAAE,MAAM,CAAA;KAAE,CAAC,EACnC,gBAAgB,EAAE,OAAO,EACzB,YAAY,EAAE,MAAM,EACpB,cAAc,EAAE,OAAO,KACpB,MAAM,CAAC,MAAM,CAAC,IAAI,CAAC,CAAA;IACxB,eAAe,EAAE,CAAC,KAAK,EAAE,MAAM,KAAK,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,CAAA;IAC1D,iBAAiB,EAAE,CAAC,KAAK,EAAE,MAAM,KAAK,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC,CAAA;IAC3E,MAAM,EAAE,CAAC,KAAK,EAAE,MAAM,KAAK,MAAM,CAAC,MAAM,CAAC,IAAI,CAAC,CAAA;IAC9C,MAAM,EAAE,MAAM,CAAC,MAAM,CAAC,IAAI,CAAC,CAAA;IAC3B,KAAK,EAAE,MAAM,CAAC,MAAM,CAAC,IAAI,CAAC,CAAA;IAC1B,QAAQ,EAAE,eAAe,CAAC,eAAe,CAAC,UAAU,CAAC,CAAA;CACtD,CAAC,CAAA"}