@wirecat/cli-core 0.544.0 → 0.546.0

package/dist/cli/messenger/stored.js

@@ -1,8 +1,10 @@
 import { CliError } from "@wirecat/cli-base";
+import { chatReferenceOf, ensureAccount } from "../../domain/ref-arguments.js";
 import { capability, throughWrapper, } from "../../ports/messenger.js";
 import { foldName, isId, pickPerson } from "../../resolve.js";
 import { codeOf } from "../../sends/guarded.js";
-import { chatIdIn } from "../../services/message-resolution.js";
+import { limitBatch } from "../../services/history-limits.js";
+import { chatIdIn, profilesOnAccount } from "../../services/message-resolution.js";
 const REKEY_PACING = { lockMs: 50, pauseMs: 25 };
 /**
  * The adapter, with what each read answers written to the store. **A failed write never fails the
@@ -12,8 +14,37 @@ const REKEY_PACING = { lockMs: 50, pauseMs: 25 };
  * would erase what `chats list` stored. Nor are `chat` and `contact`: a card's member list is not
  * known to be whole, and `saveMembers` replaces the list.
  */
-export const stored = (messenger, { account, store, warn, events, pending, announcing, deletedWithoutChat, profile, rekeyed, rekeyPacing = REKEY_PACING, closing, namesFromStore, recipientIds, countsUnread = false, }) => {
+export const stored = (messenger, { account, store, warn, events, pending, announcing, deletedWithoutChat, profile, rekeyed, rekeyPacing = REKEY_PACING, closing, namesFromStore, recipientIds, countsUnread = false, historyLimits, command = "cli", }) => {
     let warned = false;
+    let limitedNoted = false;
+    const limited = async (opened, batch) => {
+        if (!historyLimits || !batch.messages?.length)
+            return { batch, skipped: new Map() };
+        const shapes = await opened.chats.historyShapes(account, [...new Set(batch.messages.map((one) => one.chatId))]);
+        return limitBatch(batch, (chatId) => shapes.get(chatId), (chatId) => shapes.get(chatId)?.included === true, historyLimits);
+    };
+    const noteLimited = (skipped) => {
+        if (skipped.size === 0)
+            return;
+        const counts = {
+            chats: skipped.size,
+            messages: 0,
+            group_too_large: 0,
+            older_than_window: 0,
+        };
+        for (const skip of skipped.values()) {
+            counts.messages = (counts.messages ?? 0) + skip.messages;
+            counts[skip.reason] = (counts[skip.reason] ?? 0) + 1;
+        }
+        const warning = { event: "warning", code: "history_limited", operation: "history.save", counts };
+        events(warning);
+        if (limitedNoted)
+            return;
+        limitedNoted = true;
+        warn(`history limits left out ${counts.messages} pushed messages of ${skipped.size} chats (big groups, older ` +
+            `than the window) — \`${command} store status\` lists them; \`${command} messages sync <chat> --full-history\` ` +
+            "fetches one and keeps it in full", warning);
+    };
     let recorded = profile === undefined;
     const notWritten = (operation, error) => {
         const warning = { event: "warning", code: "store_not_written", operation };
@@ -155,7 +186,13 @@ export const stored = (messenger, { account, store, warn, events, pending, annou
             // A refused re-key leaves its chat split, never the others or the batch's history unsaved.
             const saving = previous.then(async () => {
                 await saveRekeys(rekeys, round);
-                return attempt(operation, (opened) => fill(opened, account, batch));
+                return attempt(operation, async (opened) => {
+                    const { batch: kept, skipped } = await limited(opened, batch);
+                    await fill(opened, account, kept);
+                    if (skipped.size > 0)
+                        await opened.chats.recordHistorySkips(account, skipped);
+                    noteLimited(skipped);
+                });
             });
             previous = saving;
             pending?.add(saving);
@@ -165,12 +202,12 @@ export const stored = (messenger, { account, store, warn, events, pending, annou
                 pending?.delete(saving);
                 rekeysOnly.delete(saving);
             });
-            void onBatch(batch);
+            void onBatch(batch, saving);
             return saving;
         };
     };
     // A method not listed here saves nothing and passes through; a lane that should save adds its line.
-    return throughWrapper(messenger, {
+    const wrapped = throughWrapper(messenger, {
         ...(messenger.forumState
             ? {
                 forumState: async (chatId) => {
@@ -429,6 +466,58 @@ export const stored = (messenger, { account, store, warn, events, pending, annou
             return sent;
         },
     });
+    const chatOf = async (typed) => {
+        const named = chatReferenceOf(typed, account.provider);
+        if (!named)
+            return typed;
+        let known;
+        try {
+            known = account.account;
+        }
+        catch { }
+        await ensureAccount(named, { account: known, ...(profile ? { profile: profile.name } : {}) }, async (other) => {
+            const opened = await store();
+            return opened && profilesOnAccount(opened, profile?.app, account.provider)(other);
+        });
+        return named.chat;
+    };
+    return withChatReferences(wrapped, chatOf);
+};
+/** The adapter methods whose first argument is a chat as typed: an id, a title, or a `chat:` or `msg:` reference. */
+const TYPED_CHAT = [
+    "resolve",
+    "chat",
+    "history",
+    "around",
+    "historyAfter",
+    "historyBefore",
+    "historyFrom",
+    "topics",
+    "topic",
+    "topicHistory",
+    "download",
+    "transcribe",
+    "scheduled",
+    "admins",
+    "chatEvents",
+    "leave",
+    "group",
+    "officialChatStats",
+];
+/**
+ * A reference is read here, not in each adapter: an adapter resolves a typed chat as an id or a title, and would take
+ * `chat:max/…` for a title. One of another account is refused before the messenger is asked.
+ */
+const withChatReferences = (adapter, chatOf) => {
+    const methods = adapter;
+    const own = Object.fromEntries(TYPED_CHAT.flatMap((name) => {
+        const method = methods[name];
+        if (typeof method !== "function")
+            return [];
+        const call = async (typed, ...rest) => method.call(adapter, await chatOf(typed), ...rest);
+        return [[name, call]];
+    }));
+    return throughWrapper(adapter, own);
 };
 /**
  * A write is saved under the chat the messenger answered, not the one typed: WhatsApp answers a re-keyed person's

package/dist/cli/messenger/topics-command.js

@@ -68,7 +68,7 @@ export const topicsCommand = (messenger) => {
         const done = await context.withServices((services) => services.topics.enable(chat, { upgrade: this.opts().upgrade === true }));
         renderAnswer(this, context, itemOf(snakeKeys(done)));
     });
-    annotate(topics.command("create"), { effects: REMOTE_WRITE })
+    annotate(topics.command("create"), { effects: REMOTE_WRITE, literal_after_dashes: true })
         .description("create a named topic in an existing forum; never enable or upgrade a group implicitly")
         .argument("<chat>", messenger.chatArgument)
         .argument("<title>", "the topic title, at most 128 UTF-8 bytes")

package/dist/cli/program.js

@@ -13,6 +13,7 @@ import { recorded, wasSettled } from "../runs/recording.js";
 import { runContextOf } from "../runs/run-context.js";
 import { processRun, useAsProcessRun } from "../runs/scope.js";
 import { AUTHORITY_KEY, BOT_API_KEY, isBotApi, keyForCommand } from "../sends/permissions.js";
+import { liftOptionsAfterDashes } from "./after-dashes.js";
 import { logParsedArgv, logVersion } from "./argv-log.js";
 import { commandAvailability } from "./command-availability.js";
 import { commandPathOf } from "./command-contract.js";
@@ -135,15 +136,16 @@ export const run = async (argv, definition, options = {}) => {
         useAsProcessRun(outer);
     }
 };
+const isMachine = (words) => words.some((word) => word === "--json" || word.startsWith("--json=") || word === "--jsonl");
 const runOnce = async (argv, definition, options) => {
     const streams = options.streams ?? processStreams;
     if (!options.streams)
         quietBrokenPipes();
     const delimiter = argv.indexOf("--");
     const flags = argv.slice(0, delimiter < 0 ? undefined : delimiter);
-    const machine = flags.some((word) => word === "--json" || word.startsWith("--json=") || word === "--jsonl");
-    const debug = flags.includes("--debug");
-    const reporting = machine ? { ...options, tty: false } : options;
+    let machine = isMachine(flags);
+    let debug = flags.includes("--debug");
+    let reporting = machine ? { ...options, tty: false } : options;
     const control = execution(streams, { maxOutputBytes: 0 });
     let restoreInput;
     let signalExit;
@@ -439,12 +441,21 @@ const runOnce = async (argv, definition, options) => {
     forEachCommand(program, (child) => child.exitOverride());
     // Before commander, not inside it: commander has no hook that runs before it decides which
     // subcommand it is looking at.
-    const { profile, rest: lifted } = liftProfile(argv, commandWords(program), valuedOptions(program));
+    const profiled = liftProfile(argv, commandWords(program), valuedOptions(program));
+    const { profile } = profiled;
+    // An agent's call builds its own argv, with its values after `--` on purpose: none of them may become an option.
+    const lifted = options.agent
+        ? profiled.rest
+        : liftOptionsAfterDashes(profiled.rest, (words) => commandAt(program, commandPath(program, words)));
+    const liftedEnd = lifted.indexOf("--");
+    const liftedFlags = lifted.slice(0, liftedEnd < 0 ? undefined : liftedEnd);
+    machine ||= isMachine(liftedFlags);
+    debug ||= liftedFlags.includes("--debug");
+    reporting = machine ? { ...options, tty: false } : options;
     // `wa 'chats list' --help` reads "chats list" as a profile and prints the root help with exit 0.
     try {
         // Only before `--`: what follows is a positional, an agent's text among them, never a command word.
-        const end = lifted.indexOf("--");
-        for (const words of [flags, end < 0 ? lifted : lifted.slice(0, end)])
+        for (const words of [flags, liftedFlags])
             refuseJoinedPath(program, words.filter((word) => !word.startsWith("-")), profile !== undefined && !/\s/.test(profile) ? [profile] : []);
     }
     catch (failure) {

package/dist/cli/schedule/schedule-command.js

@@ -110,6 +110,7 @@ export const scheduleCommandFor = ({ app, context: contextOf }) => {
         return { context, system, state, say, timer, environment, save };
     };
     withWhen(grantsAuthority(annotate(command.command("command"), {
+        literal_after_dashes: true,
         effects: LOCAL_WRITE,
         examples: [
             `${app.command} personal schedule command health --every 1h -- doctor`,

package/dist/cli/settings.d.ts

@@ -4,6 +4,7 @@ import { type AISettings } from "../analysis/settings.js";
 import { type AppIdentity } from "../ports/app.js";
 import type { RecordInput } from "../runs/run-context.js";
 import { type Level, type PermissionKey } from "../sends/permissions.js";
+import { type HistoryLimits } from "../services/history-limits.js";
 import { type ConfigIssue } from "./config-issues.js";
 import type { CommandPermissions } from "./permission-keys.js";
 export declare const plain: (rule: string) => (issue: v.BaseIssue<unknown>) => string;
@@ -94,6 +95,8 @@ export interface Settings extends AISettings {
     color: boolean | undefined;
     senderColors: boolean;
     searchCatchUp?: boolean;
+    /** How much pushed history the store keeps, by chat kind; a messenger that answers history on request ignores it. */
+    historyLimits?: HistoryLimits;
     /** Search and `images embed` read the pictures themselves, with a model on this machine. Off until set. */
     pictureSearch?: boolean;
     /** The reranker that orders `search messages --discover`'s first hits once it is downloaded, or `off`. */
@@ -300,6 +303,9 @@ export declare const settingsFor: <T extends object = Record<never, never>>(app:
             transcribe_with: v.OptionalSchema<v.PicklistSchema<["auto", "messenger", "local"], (issue: v.BaseIssue<unknown>) => string>, undefined>;
             speech_model: v.OptionalSchema<v.StringSchema<(issue: v.BaseIssue<unknown>) => string>, undefined>;
             search_catch_up: v.OptionalSchema<v.BooleanSchema<(issue: v.BaseIssue<unknown>) => string>, undefined>;
+            history_dialog_days: v.OptionalSchema<v.SchemaWithPipe<readonly [v.NumberSchema<(issue: v.BaseIssue<unknown>) => string>, v.IntegerAction<number, (issue: v.BaseIssue<unknown>) => string>, v.MinValueAction<number, 1, (issue: v.BaseIssue<unknown>) => string>, v.MaxValueAction<number, 1095, (issue: v.BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_days: v.OptionalSchema<v.SchemaWithPipe<readonly [v.NumberSchema<(issue: v.BaseIssue<unknown>) => string>, v.IntegerAction<number, (issue: v.BaseIssue<unknown>) => string>, v.MinValueAction<number, 1, (issue: v.BaseIssue<unknown>) => string>, v.MaxValueAction<number, 1095, (issue: v.BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_members_max: v.OptionalSchema<v.SchemaWithPipe<readonly [v.NumberSchema<(issue: v.BaseIssue<unknown>) => string>, v.IntegerAction<number, (issue: v.BaseIssue<unknown>) => string>, v.MinValueAction<number, 1, (issue: v.BaseIssue<unknown>) => string>]>, undefined>;
             picture_search: v.OptionalSchema<v.BooleanSchema<(issue: v.BaseIssue<unknown>) => string>, undefined>;
             search_reranker: v.OptionalSchema<v.PicklistSchema<[...string[], "off"], (issue: v.BaseIssue<unknown>) => string>, undefined>;
             update_check: v.OptionalSchema<v.BooleanSchema<(issue: v.BaseIssue<unknown>) => string>, undefined>;
@@ -376,6 +382,9 @@ export declare const settingsFor: <T extends object = Record<never, never>>(app:
             transcribe_with: v.OptionalSchema<v.PicklistSchema<["auto", "messenger", "local"], (issue: v.BaseIssue<unknown>) => string>, undefined>;
             speech_model: v.OptionalSchema<v.StringSchema<(issue: v.BaseIssue<unknown>) => string>, undefined>;
             search_catch_up: v.OptionalSchema<v.BooleanSchema<(issue: v.BaseIssue<unknown>) => string>, undefined>;
+            history_dialog_days: v.OptionalSchema<v.SchemaWithPipe<readonly [v.NumberSchema<(issue: v.BaseIssue<unknown>) => string>, v.IntegerAction<number, (issue: v.BaseIssue<unknown>) => string>, v.MinValueAction<number, 1, (issue: v.BaseIssue<unknown>) => string>, v.MaxValueAction<number, 1095, (issue: v.BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_days: v.OptionalSchema<v.SchemaWithPipe<readonly [v.NumberSchema<(issue: v.BaseIssue<unknown>) => string>, v.IntegerAction<number, (issue: v.BaseIssue<unknown>) => string>, v.MinValueAction<number, 1, (issue: v.BaseIssue<unknown>) => string>, v.MaxValueAction<number, 1095, (issue: v.BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_members_max: v.OptionalSchema<v.SchemaWithPipe<readonly [v.NumberSchema<(issue: v.BaseIssue<unknown>) => string>, v.IntegerAction<number, (issue: v.BaseIssue<unknown>) => string>, v.MinValueAction<number, 1, (issue: v.BaseIssue<unknown>) => string>]>, undefined>;
             picture_search: v.OptionalSchema<v.BooleanSchema<(issue: v.BaseIssue<unknown>) => string>, undefined>;
             search_reranker: v.OptionalSchema<v.PicklistSchema<[...string[], "off"], (issue: v.BaseIssue<unknown>) => string>, undefined>;
         }, (issue: v.StrictObjectIssue) => string>, "has to be an object of profiles, by name">, {}>;

package/dist/cli/settings.js

@@ -7,6 +7,7 @@ import { DEFAULT_RERANK_MODEL, RERANK_MODELS } from "../embeddings/models.js";
 import { envName, readOnlyLockOf } from "../ports/app.js";
 import { KEEP_SUCCESSFUL_RUNS_FOR_DAYS, RUNS_SIZE_LIMIT_MB } from "../runs/run.js";
 import { assertOverridesTighten, CEILING_KEY, COMMAND_PATH_KEY, LEVELS, layerPermissions, permissionOverrides, RESOURCE_KEY, RESOURCES, } from "../sends/permissions.js";
+import { DEFAULT_HISTORY_LIMITS, HISTORY_MAX_DAYS } from "../services/history-limits.js";
 import { storePath } from "../store/path.js";
 import { sharedConfigPath } from "../store/shared-config.js";
 import { checkConfigText, issueMessage, readConfigFile, readConfigText, savedPermissionKeys, schemaIssues, settingPathOf, withoutPath, } from "./config-issues.js";
@@ -34,6 +35,8 @@ export const count = v.pipe(v.number(wholeNumber), v.integer(wholeNumber), v.min
 const zeroOrMore = plain("has to be a whole number, 0 or more");
 const countOrZero = v.pipe(v.number(zeroOrMore), v.integer(zeroOrMore), v.minValue(0, zeroOrMore));
 export const flag = v.boolean(plain("has to be true or false"));
+const historyDaysMessage = plain(`has to be a whole number of days, 1 to ${HISTORY_MAX_DAYS}`);
+const historyDays = v.pipe(v.number(historyDaysMessage), v.integer(historyDaysMessage), v.minValue(1, historyDaysMessage), v.maxValue(HISTORY_MAX_DAYS, historyDaysMessage));
 /** `record_input`: true, false, or "failed" — the words typed kept only in a run that failed. */
 export const recordInputSetting = v.union([v.boolean(), v.literal("failed")], plain('has to be true, false or "failed"'));
 const wholeOrZero = (text, name) => {
@@ -71,6 +74,9 @@ const SHARED_PROFILE_ENTRIES = {
     transcribe_with: v.optional(v.picklist(["auto", "messenger", "local"], plain("has to be auto, messenger or local"))),
     speech_model: v.optional(v.string(plain("has to be a model id from `models list`, in quotes"))),
     search_catch_up: v.optional(flag),
+    history_dialog_days: v.optional(historyDays),
+    history_group_days: v.optional(historyDays),
+    history_group_members_max: v.optional(count),
     picture_search: v.optional(flag),
     search_reranker: v.optional(v.picklist([...RERANK_MODELS.map((model) => model.id), "off"], plain(`has to be off or a reranker id: ${RERANK_MODELS.map((model) => model.id).join(", ")}`))),
     ...AI_ENTRIES,
@@ -91,6 +97,9 @@ export const MESSENGER_ONLY_SETTINGS = [
     "sends_per_hour",
     "transcribe_with",
     "search_catch_up",
+    "history_dialog_days",
+    "history_group_days",
+    "history_group_members_max",
     "read_other_bots",
 ];
 /** One program, one version: whether to look for a newer one is not a per-profile matter. */
@@ -255,6 +264,9 @@ export const settingsFor = (app, extension = {}) => {
         const color = fromLayers("color", undefined);
         const senderColors = fromLayers("sender_colors", false);
         const searchCatchUp = fromLayers("search_catch_up", false);
+        const historyDialogDays = fromLayers("history_dialog_days", DEFAULT_HISTORY_LIMITS.dialogDays);
+        const historyGroupDays = fromLayers("history_group_days", DEFAULT_HISTORY_LIMITS.groupDays);
+        const historyGroupMembersMax = fromLayers("history_group_members_max", DEFAULT_HISTORY_LIMITS.groupMembersMax);
         const pictureSearch = fromLayers("picture_search", false);
         const searchReranker = fromLayers("search_reranker", DEFAULT_RERANK_MODEL);
         const recordInput = fromLayers("record_input", true);
@@ -306,6 +318,11 @@ export const settingsFor = (app, extension = {}) => {
             color: color.value,
             senderColors: senderColors.value,
             searchCatchUp: searchCatchUp.value,
+            historyLimits: {
+                dialogDays: historyDialogDays.value,
+                groupDays: historyGroupDays.value,
+                groupMembersMax: historyGroupMembersMax.value,
+            },
             pictureSearch: pictureSearch.value,
             searchReranker: searchReranker.value,
             limit: limit.value,
@@ -343,6 +360,9 @@ export const settingsFor = (app, extension = {}) => {
                 color: color.from,
                 senderColors: senderColors.from,
                 searchCatchUp: searchCatchUp.from,
+                historyDialogDays: historyDialogDays.from,
+                historyGroupDays: historyGroupDays.from,
+                historyGroupMembersMax: historyGroupMembersMax.from,
                 pictureSearch: pictureSearch.from,
                 searchReranker: searchReranker.from,
                 record: record.from,

package/dist/cli/shared-command-exports.d.ts

@@ -82,6 +82,9 @@ export declare const appDoctorCommand: (app: import("./entry.js").AppIdentity, c
             transcribe_with: import("valibot").OptionalSchema<import("valibot").PicklistSchema<["auto", "messenger", "local"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             speech_model: import("valibot").OptionalSchema<import("valibot").StringSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_catch_up: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
+            history_dialog_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_members_max: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
             picture_search: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_reranker: import("valibot").OptionalSchema<import("valibot").PicklistSchema<[...string[], "off"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             update_check: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
@@ -158,6 +161,9 @@ export declare const appDoctorCommand: (app: import("./entry.js").AppIdentity, c
             transcribe_with: import("valibot").OptionalSchema<import("valibot").PicklistSchema<["auto", "messenger", "local"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             speech_model: import("valibot").OptionalSchema<import("valibot").StringSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_catch_up: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
+            history_dialog_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_members_max: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
             picture_search: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_reranker: import("valibot").OptionalSchema<import("valibot").PicklistSchema<[...string[], "off"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
         }, (issue: import("valibot").StrictObjectIssue) => string>, "has to be an object of profiles, by name">, {}>;
@@ -256,6 +262,9 @@ export declare const appMcpCommand: (app: import("./entry.js").AppIdentity, conf
             transcribe_with: import("valibot").OptionalSchema<import("valibot").PicklistSchema<["auto", "messenger", "local"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             speech_model: import("valibot").OptionalSchema<import("valibot").StringSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_catch_up: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
+            history_dialog_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_members_max: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
             picture_search: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_reranker: import("valibot").OptionalSchema<import("valibot").PicklistSchema<[...string[], "off"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             update_check: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
@@ -332,6 +341,9 @@ export declare const appMcpCommand: (app: import("./entry.js").AppIdentity, conf
             transcribe_with: import("valibot").OptionalSchema<import("valibot").PicklistSchema<["auto", "messenger", "local"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             speech_model: import("valibot").OptionalSchema<import("valibot").StringSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_catch_up: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
+            history_dialog_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_members_max: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
             picture_search: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_reranker: import("valibot").OptionalSchema<import("valibot").PicklistSchema<[...string[], "off"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
         }, (issue: import("valibot").StrictObjectIssue) => string>, "has to be an object of profiles, by name">, {}>;
@@ -437,6 +449,9 @@ export declare const configCommand: (app: import("./entry.js").AppIdentity, conf
             transcribe_with: import("valibot").OptionalSchema<import("valibot").PicklistSchema<["auto", "messenger", "local"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             speech_model: import("valibot").OptionalSchema<import("valibot").StringSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_catch_up: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
+            history_dialog_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_members_max: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
             picture_search: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_reranker: import("valibot").OptionalSchema<import("valibot").PicklistSchema<[...string[], "off"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             update_check: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
@@ -513,6 +528,9 @@ export declare const configCommand: (app: import("./entry.js").AppIdentity, conf
             transcribe_with: import("valibot").OptionalSchema<import("valibot").PicklistSchema<["auto", "messenger", "local"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             speech_model: import("valibot").OptionalSchema<import("valibot").StringSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_catch_up: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
+            history_dialog_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_members_max: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
             picture_search: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_reranker: import("valibot").OptionalSchema<import("valibot").PicklistSchema<[...string[], "off"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
         }, (issue: import("valibot").StrictObjectIssue) => string>, "has to be an object of profiles, by name">, {}>;
@@ -646,6 +664,9 @@ export declare const completeCommand: (messenger: import("./index.js").Messenger
             transcribe_with: import("valibot").OptionalSchema<import("valibot").PicklistSchema<["auto", "messenger", "local"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             speech_model: import("valibot").OptionalSchema<import("valibot").StringSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_catch_up: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
+            history_dialog_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_members_max: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
             picture_search: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_reranker: import("valibot").OptionalSchema<import("valibot").PicklistSchema<[...string[], "off"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             update_check: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
@@ -722,6 +743,9 @@ export declare const completeCommand: (messenger: import("./index.js").Messenger
             transcribe_with: import("valibot").OptionalSchema<import("valibot").PicklistSchema<["auto", "messenger", "local"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             speech_model: import("valibot").OptionalSchema<import("valibot").StringSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_catch_up: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
+            history_dialog_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_days: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MaxValueAction<number, 1095, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
+            history_group_members_max: import("valibot").OptionalSchema<import("valibot").SchemaWithPipe<readonly [import("valibot").NumberSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").IntegerAction<number, (issue: import("valibot").BaseIssue<unknown>) => string>, import("valibot").MinValueAction<number, 1, (issue: import("valibot").BaseIssue<unknown>) => string>]>, undefined>;
             picture_search: import("valibot").OptionalSchema<import("valibot").BooleanSchema<(issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
             search_reranker: import("valibot").OptionalSchema<import("valibot").PicklistSchema<[...string[], "off"], (issue: import("valibot").BaseIssue<unknown>) => string>, undefined>;
         }, (issue: import("valibot").StrictObjectIssue) => string>, "has to be an object of profiles, by name">, {}>;

package/dist/cli/steps.js

@@ -16,6 +16,7 @@ export const STEPS = defineSteps([
             { name: "all", required: false },
             { name: "since_time", required: false },
             { name: "background", required: false },
+            { name: "full_history", required: false },
         ],
         why: "the local copy is missing messages; syncing brings them in",
     },

package/dist/domain/message-link.d.ts

@@ -24,13 +24,16 @@ export type MessageLink = MessagePermalink & {
     files?: FileLink[];
 };
 export declare const fileLinks: (attachments: readonly Attachment[]) => FileLink[];
+/** A chat and a message id, or one reference naming both; a reference's account is for the caller to check. */
 export declare const messageLinkTarget: (reference: string, message: string | undefined, provider: string) => {
     chat: string;
     message: string;
     account: string;
+    text: string;
 } | {
     chat: string;
     message: string;
     account: undefined;
+    text: string;
 };
 export declare const validatePermalink: (link: MessagePermalink) => MessagePermalink;

package/dist/domain/message-link.js

@@ -1,6 +1,6 @@
 import { CliError } from "@wirecat/cli-base";
 import { hitFiles } from "./attachments.js";
-import { isLocator, parseLocator } from "./locator.js";
+import { chatReferenceOf } from "./ref-arguments.js";
 export const fileLinks = (attachments) => hitFiles(attachments).map(({ position, kind, name }) => ({
     position,
     kind,
@@ -8,28 +8,23 @@ export const fileLinks = (attachments) => hitFiles(attachments).map(({ position,
     url: null,
     reason: "unsupported_provider",
 }));
+/** A chat and a message id, or one reference naming both; a reference's account is for the caller to check. */
 export const messageLinkTarget = (reference, message, provider) => {
-    if (isLocator(reference)) {
+    const named = chatReferenceOf(reference, provider, "message");
+    if (named?.message !== undefined) {
         if (message !== undefined)
             throw new CliError("validation_error", "a locator already names the message");
-        let target;
-        try {
-            target = parseLocator(reference);
-        }
-        catch {
-            throw new CliError("validation_error", "expected msg:<provider>/<account>/<chat>/<message>");
-        }
-        if (target.provider !== provider)
-            throw new CliError("validation_error", "that locator belongs to another messenger");
-        validMessageId(target.message);
-        return { chat: target.chat, message: target.message, account: target.account };
+        validMessageId(named.message);
+        return { chat: named.chat, message: named.message, account: named.account, text: named.text };
     }
     if (message === undefined)
         throw new CliError("validation_error", "which message? give its id after the chat");
     validMessageId(message);
+    if (named)
+        return { chat: named.chat, message, account: named.account, text: named.text };
     if (!reference.trim())
         throw new CliError("validation_error", "which chat? give its id or title");
-    return { chat: reference, message, account: undefined };
+    return { chat: reference, message, account: undefined, text: reference };
 };
 const validMessageId = (id) => {
     if (!id ||

package/dist/domain/money-words.d.ts

@@ -0,0 +1,11 @@
+import type { TaskCategory } from "./task-categories.js";
+/**
+ * Verb classes for reading money in a chat, matched by stem as task categories are. A stem cannot tell the imperative
+ * from the past tense (`оплати`, `оплатил` → `оплат`) or from a promise (`pagué`, `pagaré` → `pag`), so a stem that
+ * several classes share is listed once, under the request, and a word only counts where its stem is its own. The
+ * signal that reads these keeps the sender's side (owner or other) to decide the direction.
+ */
+export declare const MONEY_REQUEST = "money-request";
+export declare const MONEY_DONE = "money-done";
+export declare const PROMISE = "promise";
+export declare const MONEY_WORDS: readonly TaskCategory[];

package/dist/domain/money-words.js

@@ -0,0 +1,38 @@
+/**
+ * Verb classes for reading money in a chat, matched by stem as task categories are. A stem cannot tell the imperative
+ * from the past tense (`оплати`, `оплатил` → `оплат`) or from a promise (`pagué`, `pagaré` → `pag`), so a stem that
+ * several classes share is listed once, under the request, and a word only counts where its stem is its own. The
+ * signal that reads these keeps the sender's side (owner or other) to decide the direction.
+ */
+export const MONEY_REQUEST = "money-request";
+export const MONEY_DONE = "money-done";
+export const PROMISE = "promise";
+export const MONEY_WORDS = [
+    {
+        name: MONEY_REQUEST,
+        meaning: "asks for a payment or sends an invoice",
+        triggers: {
+            en: ["pay", "send", "transfer", "invoice", "owe", "refund", "remit"],
+            ru: ["переведи", "оплати", "заплати", "вышли", "отправь", "скинь", "верни", "счёт", "выстави", "должен"],
+            es: ["envía", "transfiere", "factura", "debes", "devuelve", "abona"],
+        },
+    },
+    {
+        name: MONEY_DONE,
+        meaning: "says a payment was made or received",
+        triggers: {
+            en: ["paid", "sent", "received", "settled"],
+            ru: ["перевёл", "перевела", "выслал", "вернул", "скинул", "получил", "получила"],
+            es: ["recibido"],
+        },
+    },
+    {
+        name: PROMISE,
+        meaning: "promises to pay or send later",
+        triggers: {
+            en: ["promise", "promised", "guarantee"],
+            ru: ["оплачу", "заплачу", "отправлю", "обещаю", "гарантирую"],
+            es: ["prometo", "transferiré", "devolveré"],
+        },
+    },
+];

package/dist/domain/providers.d.ts

@@ -11,6 +11,8 @@ export interface ProviderEntry {
 }
 /** The seed: what cli-core knows before any CLI has written its entry into the store. */
 export declare const PROVIDERS: readonly ProviderEntry[];
+/** How a text names a provider to a person: `MAX`, not `max`. */
+export declare const providerLabel: (provider: Provider) => string;
 /**
  * A notes folder is an `accounts` row of one of these providers; people call every one `notes`. `obsidian` is a vault,
  * `local` a plain folder (store version 32). `folder` is what they were before, and what Drive's stand-in folders and

package/dist/domain/providers.js

@@ -3,11 +3,11 @@ import { CliError } from "@wirecat/cli-base";
 export const KINDS = ["messages", "mail", "notes", "documents", "meetings", "events"];
 /** The seed: what cli-core knows before any CLI has written its entry into the store. */
 export const PROVIDERS = [
-    { name: "telegram", kind: "messages", aliases: ["tg"] },
+    { name: "telegram", kind: "messages", aliases: ["tg"], command: "tg" },
     { name: "telegram-bot", kind: "messages", aliases: ["tg-bot"] },
-    { name: "max", kind: "messages", aliases: [] },
+    { name: "max", kind: "messages", aliases: [], command: "max" },
     { name: "max-bot", kind: "messages", aliases: [] },
-    { name: "whatsapp", kind: "messages", aliases: ["wa"] },
+    { name: "whatsapp", kind: "messages", aliases: ["wa"], command: "wa" },
     { name: "whatsapp-bot", kind: "messages", aliases: ["wa-bot"] },
     { name: "email", kind: "mail", aliases: [] },
     { name: "notes", kind: "notes", aliases: [] },
@@ -15,6 +15,18 @@ export const PROVIDERS = [
     { name: "obsidian", kind: "notes", aliases: [] },
     { name: "zoom", kind: "meetings", aliases: [] },
 ];
+const LABELS = {
+    telegram: "Telegram",
+    "telegram-bot": "Telegram bot",
+    max: "MAX",
+    "max-bot": "MAX bot",
+    whatsapp: "WhatsApp",
+    "whatsapp-bot": "WhatsApp bot",
+    "google-drive": "Google Drive",
+    email: "mail",
+};
+/** How a text names a provider to a person: `MAX`, not `max`. */
+export const providerLabel = (provider) => LABELS[provider] ?? provider;
 /**
  * A notes folder is an `accounts` row of one of these providers; people call every one `notes`. `obsidian` is a vault,
  * `local` a plain folder (store version 32). `folder` is what they were before, and what Drive's stand-in folders and