@wirecat/cli-core 0.576.0 → 0.578.0

package/dist/entities/mail-findings.d.ts

@@ -26,6 +26,10 @@ export declare const mailFindings: v.StrictObjectSchema<{
             readonly due_evidence: v.OptionalSchema<v.ArraySchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>, undefined>;
             readonly assignee: v.OptionalSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>;
             readonly assignee_evidence: v.OptionalSchema<v.ArraySchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>, undefined>;
+            /** `<service>:<id>` in the outside service the mail came from, such as `avito:4512345678`. */
+            readonly external_id: v.OptionalSchema<v.StringSchema<undefined>, undefined>;
+            /** The http or https page the task is about, such as the conversation the mail links to. */
+            readonly source_url: v.OptionalSchema<v.StringSchema<undefined>, undefined>;
         }, undefined>, v.StrictObjectSchema<{
             readonly id: v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.MinLengthAction<string, 1, undefined>]>;
             readonly evidence: v.ArraySchema<v.StrictObjectSchema<{
@@ -143,6 +147,8 @@ export declare const mailFindings: v.StrictObjectSchema<{
             readonly invoice: v.OptionalSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>;
             readonly payment: v.OptionalSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>;
             readonly project: v.OptionalSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>;
+            /** The order's page at the shop, http or https. */
+            readonly source_url: v.OptionalSchema<v.StringSchema<undefined>, undefined>;
             readonly reason: v.StringSchema<undefined>;
         }, undefined>, v.StrictObjectSchema<{
             readonly id: v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.MinLengthAction<string, 1, undefined>]>;

package/dist/entities/mail-findings.js

@@ -18,6 +18,10 @@ const finding = v.variant("kind", [
         due_evidence: v.optional(v.array(reference)),
         assignee: v.optional(reference),
         assignee_evidence: v.optional(v.array(reference)),
+        /** `<service>:<id>` in the outside service the mail came from, such as `avito:4512345678`. */
+        external_id: v.optional(text),
+        /** The http or https page the task is about, such as the conversation the mail links to. */
+        source_url: v.optional(text),
     }),
     v.strictObject({
         ...base,
@@ -96,6 +100,8 @@ const finding = v.variant("kind", [
         invoice: v.optional(reference),
         payment: v.optional(reference),
         project: v.optional(reference),
+        /** The order's page at the shop, http or https. */
+        source_url: v.optional(text),
         reason: text,
     }),
     v.strictObject({

package/dist/entities/task-results.d.ts

@@ -22,6 +22,10 @@ export declare const taskCard: v.StrictObjectSchema<{
     readonly revision: v.NumberSchema<undefined>;
     readonly parent: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>;
     readonly source: v.NullableSchema<v.StringSchema<undefined>, undefined>;
+    /** `<service>:<id>`, its id in an outside service, such as `avito:4512345678`. */
+    readonly external_id: v.NullableSchema<v.StringSchema<undefined>, undefined>;
+    /** The http or https page it is about, such as an Avito ad. */
+    readonly source_url: v.NullableSchema<v.StringSchema<undefined>, undefined>;
     readonly due_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
     readonly next_check_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
     readonly closed_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
@@ -136,6 +140,10 @@ export declare const taskCreated: v.StrictObjectSchema<{
         readonly revision: v.NumberSchema<undefined>;
         readonly parent: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>;
         readonly source: v.NullableSchema<v.StringSchema<undefined>, undefined>;
+        /** `<service>:<id>`, its id in an outside service, such as `avito:4512345678`. */
+        readonly external_id: v.NullableSchema<v.StringSchema<undefined>, undefined>;
+        /** The http or https page it is about, such as an Avito ad. */
+        readonly source_url: v.NullableSchema<v.StringSchema<undefined>, undefined>;
         readonly due_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
         readonly next_check_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
         readonly closed_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
@@ -251,6 +259,10 @@ export declare const taskLinks: v.UnionSchema<[v.StrictObjectSchema<{
     readonly revision: v.NumberSchema<undefined>;
     readonly parent: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>;
     readonly source: v.NullableSchema<v.StringSchema<undefined>, undefined>;
+    /** `<service>:<id>`, its id in an outside service, such as `avito:4512345678`. */
+    readonly external_id: v.NullableSchema<v.StringSchema<undefined>, undefined>;
+    /** The http or https page it is about, such as an Avito ad. */
+    readonly source_url: v.NullableSchema<v.StringSchema<undefined>, undefined>;
     readonly due_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
     readonly next_check_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
     readonly closed_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
@@ -394,6 +406,10 @@ export declare const taskMerge: v.StrictObjectSchema<{
         readonly revision: v.NumberSchema<undefined>;
         readonly parent: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>;
         readonly source: v.NullableSchema<v.StringSchema<undefined>, undefined>;
+        /** `<service>:<id>`, its id in an outside service, such as `avito:4512345678`. */
+        readonly external_id: v.NullableSchema<v.StringSchema<undefined>, undefined>;
+        /** The http or https page it is about, such as an Avito ad. */
+        readonly source_url: v.NullableSchema<v.StringSchema<undefined>, undefined>;
         readonly due_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
         readonly next_check_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
         readonly closed_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
@@ -502,6 +518,10 @@ export declare const taskUnmerge: v.StrictObjectSchema<{
         readonly revision: v.NumberSchema<undefined>;
         readonly parent: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>;
         readonly source: v.NullableSchema<v.StringSchema<undefined>, undefined>;
+        /** `<service>:<id>`, its id in an outside service, such as `avito:4512345678`. */
+        readonly external_id: v.NullableSchema<v.StringSchema<undefined>, undefined>;
+        /** The http or https page it is about, such as an Avito ad. */
+        readonly source_url: v.NullableSchema<v.StringSchema<undefined>, undefined>;
         readonly due_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
         readonly next_check_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;
         readonly closed_at: v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.IsoTimestampAction<string, "an ISO 8601 time in UTC">, v.EndsWithAction<string, "Z", "an ISO 8601 time in UTC, ending in `Z`">]>, undefined>;

package/dist/entities/task-results.js

@@ -39,6 +39,10 @@ export const taskCard = v.strictObject({
     revision: v.number(),
     parent: v.nullable(reference),
     source: v.nullable(text),
+    /** `<service>:<id>`, its id in an outside service, such as `avito:4512345678`. */
+    external_id: v.nullable(text),
+    /** The http or https page it is about, such as an Avito ad. */
+    source_url: v.nullable(text),
     due_at: nullableTime,
     next_check_at: nullableTime,
     closed_at: nullableTime,

package/dist/entities/task.d.ts

@@ -34,6 +34,10 @@ export declare const task: v.StrictObjectSchema<{
     readonly chat: v.OptionalSchema<v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>, undefined>;
     /** The message it came from. */
     readonly source_message: v.OptionalSchema<v.NullableSchema<v.SchemaWithPipe<readonly [v.StringSchema<undefined>, v.RegexAction<string, "a reference such as `note:42`">]>, undefined>, undefined>;
+    /** `<service>:<id>`, its id in an outside service, such as `avito:4512345678`. */
+    readonly external_id: v.OptionalSchema<v.NullableSchema<v.StringSchema<undefined>, undefined>, undefined>;
+    /** The http or https page it is about, such as an Avito ad. */
+    readonly source_url: v.OptionalSchema<v.NullableSchema<v.StringSchema<undefined>, undefined>, undefined>;
     /** 0 to 1, higher first; `priority_label` reads it as low, medium, high or critical. */
     readonly priority: v.OptionalSchema<v.NullableSchema<v.NumberSchema<undefined>, undefined>, undefined>;
     readonly priority_label: v.OptionalSchema<v.NullableSchema<v.PicklistSchema<readonly ["low", "medium", "high", "critical"], undefined>, undefined>, undefined>;

package/dist/entities/task.js

@@ -32,6 +32,10 @@ export const task = v.strictObject({
     chat: v.optional(v.nullable(reference)),
     /** The message it came from. */
     source_message: v.optional(v.nullable(reference)),
+    /** `<service>:<id>`, its id in an outside service, such as `avito:4512345678`. */
+    external_id: v.optional(v.nullable(text)),
+    /** The http or https page it is about, such as an Avito ad. */
+    source_url: v.optional(v.nullable(text)),
     /** 0 to 1, higher first; `priority_label` reads it as low, medium, high or critical. */
     priority: v.optional(v.nullable(v.number())),
     priority_label: v.optional(v.nullable(v.picklist(PRIORITY_LABELS))),

package/dist/errors/reasons.js

@@ -69,6 +69,8 @@ const OTHERS = [
     validation("file.locked", "another process holds the file's lock"),
     validation("mail.cursor-ahead", "an acknowledge cursor is past the newest stored email"),
     ["mail.holder-not-yours", "permission_error", "a run moves only the mark of the holder its schedule names"],
+    ["mail.no-mark", "not_found", "the holder has no mark in the mailbox yet; its first review starts it"],
+    ["mail.reset-owner-only", "permission_error", "only the owner moves a holder's mark back"],
     ["mail.source-failed", "provider_error", "the mail server refused or did not complete a request"],
     ["mail.search-refused", "provider_error", "the mail server refused to search a folder"],
     [
@@ -199,6 +201,7 @@ const OTHERS = [
     validation("money.quantity", "the quantity is not a decimal above 0"),
     validation("order.duplicate", "the shop's order with this number is already stored; change its status instead"),
     validation("order.field", "a field of the order is not valid"),
+    validation("order.source-url", "an order's source URL is not an http or https address"),
     ["order.not-found", "not_found", "no stored order of that shop has that number"],
     validation("order.ref", "the reference names no order, or a shop's number names more than one"),
     validation("order.status", "a rejected or deleted order's status does not change"),
@@ -246,6 +249,8 @@ const OTHERS = [
     validation("tag.invalid", "the tag is not valid"),
     ["reactions.list-hidden", "permission_error", "the chat does not let its members see who reacted"],
     ["reactions.broadcast", "permission_error", "a channel does not show who reacted to its posts"],
+    validation("task.external-id", "an external id is <service>:<id>, such as avito:4512345678"),
+    validation("task.source-url", "a task's source URL is not an http or https address"),
     validation("task.category-unknown", "the category is not in the task category list"),
     validation("task.claimed", "someone else holds the task"),
     validation("task.closed", "the task is already closed"),

package/dist/mail/cli/index.js

@@ -19,7 +19,7 @@ import { searchMailServer } from "../../mail/server-search.js";
 import { atDetail } from "../../output-detail.js";
 import { sourceKey } from "../../services/server-search.js";
 import { queryFilter, THREAD_COLUMNS } from "../../store/store.js";
-import { acknowledgeCommand } from "./marks.js";
+import { acknowledgeCommand, resetMarkCommand } from "./marks.js";
 import { mailReviewCommand } from "./review.js";
 export { bulkTriageOf, MAIL_BULK_SETTINGS } from "./bulk-settings.js";
 export { mailMark, markItem, markText } from "./marks.js";
@@ -254,6 +254,7 @@ const messagesCommand = (mail) => {
             : itemOf(shown.find((_, at) => emails[at]?.anchor) ?? shown[0], unread ? { meta: { complete: false, issues: [unread] } } : undefined), () => shownText(emails));
     });
     messages.addCommand(acknowledgeCommand(mail));
+    messages.addCommand(resetMarkCommand(mail));
     return messages;
 };
 const mailThread = v.strictObject({

package/dist/mail/cli/marks.d.ts

@@ -26,3 +26,9 @@ export declare const markText: (mark: MailMark) => string;
  * schedule names only: an email that talks its reader into acknowledging would otherwise silence another pipeline.
  */
 export declare const acknowledgeCommand: (mail: MailReads) => Command;
+/**
+ * `messages reset`: the owner moves a holder's mark back, so its next reviews give it that mail again — after its
+ * rules changed, say. An agent never does: a holder that could move its own mark back could be talked by an email
+ * into reading the whole mailbox again, so this is no proposal and the read-only lock refuses it.
+ */
+export declare const resetMarkCommand: (mail: MailReads) => Command;

package/dist/mail/cli/marks.js

@@ -8,7 +8,8 @@ import { environmentOf, outputFor } from "../../cli/context.js";
 import { LOCAL_WRITE, proposesOnly } from "../../cli/effects.js";
 import { itemOf, renderAnswer } from "../../cli/envelope.js";
 import { mailHolderVariable, readOnlyLockOf } from "../../ports/app.js";
-import { acknowledgeMark } from "../marks.js";
+import { momentOf } from "../../services/moment.js";
+import { acknowledgeMark, rewindMark } from "../marks.js";
 const iso = (ms) => (ms === null ? null : new Date(ms).toISOString());
 /** A holder's mark as `--json`, `mail status` and MCP show it. */
 export const mailMark = v.strictObject({
@@ -67,3 +68,70 @@ export const acknowledgeCommand = (mail) => answerEntity(proposesOnly(annotate(n
     const mark = await mail.read(this, (store, mailbox) => acknowledgeMark(store, mailbox, holder, cursor));
     renderAnswer(this, outputFor(this), itemOf(markItem(mark)), () => markText(mark));
 });
+const mailMarkReset = v.strictObject({
+    mark: mailMark,
+    /** Where the mark was before. */
+    from_id: v.number(),
+    /** Emails the holder reads whole again. */
+    again: v.number(),
+    /** Bulk emails it gets again as excerpts, unless they are surely newsletters. */
+    bulk: v.number(),
+    /** Emails between the two marks it skips again: drafts, envelopes, suspicious senders, partial mail. */
+    skipped: v.number(),
+    /** Nothing moved: `--dry-run` only counts. */
+    dry_run: v.boolean(),
+});
+const wholeNumber = (value) => {
+    const parsed = Number(value);
+    if (!Number.isSafeInteger(parsed) || parsed < 1)
+        throw new CliError("validation_error", `--last takes a whole number of emails, 1 or more — got ${value}`);
+    return parsed;
+};
+/**
+ * `messages reset`: the owner moves a holder's mark back, so its next reviews give it that mail again — after its
+ * rules changed, say. An agent never does: a holder that could move its own mark back could be talked by an email
+ * into reading the whole mailbox again, so this is no proposal and the read-only lock refuses it.
+ */
+export const resetMarkCommand = (mail) => answerEntity(annotate(new Command("reset"), {
+    effects: LOCAL_WRITE,
+    examples: [
+        `${mail.app.command} personal messages reset --holder mail-triage --last 8 --dry-run`,
+        `${mail.app.command} personal messages reset --holder mail-triage --since-time 2026-11-04T00:00:00Z`,
+    ],
+}), "mail_mark_reset", mailMarkReset)
+    .summary("move a holder's processing mark back, so it reads that mail again (owner only)")
+    .description("the owner moves a holder's mark back past the mail received since --since-time, or past the last --last " +
+    "emails it was given; its next reviews give that mail again. The answer says how many emails it reads " +
+    "again. An agent cannot: a holder only moves its own mark forward, with `messages acknowledge`")
+    .requiredOption("--holder <name>", "whose mark: lower-case letters, digits and dashes, such as mail-triage")
+    .option("--since-time <time>", "read again what was received since this ISO 8601 time, or 2d ago")
+    .option("--last <n>", "read again the last n emails the holder was given", wholeNumber)
+    .option("--dry-run", "count what would be read again, and move nothing")
+    .action(async function () {
+    const { holder, sinceTime, last, dryRun } = this.opts();
+    if ((sinceTime === undefined) === (last === undefined))
+        throw new CliError("validation_error", "give --since-time or --last, one of them");
+    const env = environmentOf(this).env ?? process.env;
+    if (env[mailHolderVariable(mail.app)]?.trim() || actorOf(this) !== "owner" || readOnlyLockOf(mail.app, env))
+        throw new CliError("permission_error", "only the owner moves a holder's mark back; an agent only acknowledges", {
+            reason: "mail.reset-owner-only",
+        });
+    const now = Date.now();
+    const to = last === undefined ? { since: momentOf(sinceTime, "--since-time", now) } : { last };
+    const reset = await mail.read(this, (store, mailbox) => rewindMark(store, mailbox, holder, to, { now, dry: dryRun === true }));
+    const item = {
+        mark: markItem(reset.mark),
+        from_id: reset.fromId,
+        again: reset.again,
+        bulk: reset.bulk,
+        skipped: reset.skipped,
+        dry_run: reset.dry,
+    };
+    renderAnswer(this, outputFor(this), itemOf(item), () => {
+        const mark = reset.mark.throughId === reset.fromId
+            ? `the mark stays at ${reset.fromId}`
+            : `the mark ${reset.dry ? "would move" : "moved"} from ${reset.fromId} to ${reset.mark.throughId}`;
+        return (`${holder} ${reset.dry ? "would read" : "reads"} ${reset.again} emails again, and ${reset.bulk} bulk ` +
+            `ones as excerpts unless they are newsletters; ${reset.skipped} are skipped again; ${mark}\n`);
+    });
+});

package/dist/mail/findings.d.ts

@@ -99,6 +99,8 @@ export interface MailOrderFinding extends Cited {
     invoice?: string;
     payment?: string;
     project?: string;
+    /** The order's page at the shop, http or https. */
+    sourceUrl?: string;
     reason: string;
 }
 /** A later mail about a stored order, found by its shop and number: shipped, delivered, cancelled, returned. */

package/dist/mail/findings.js

@@ -1,4 +1,5 @@
 import { CliError } from "@wirecat/cli-base";
+import { EXTERNAL_ID_CHARS, externalIdOf, SOURCE_URL_CHARS, sourceUrlOf } from "../domain/external-links.js";
 import { INVOICE_DIRECTIONS, MONEY_DIRECTIONS } from "../domain/finance.js";
 import { MEMORY_KINDS, MEMORY_SCOPES } from "../domain/knowledge.js";
 import { formatLocator, parseLocator } from "../domain/locator.js";
@@ -59,8 +60,19 @@ const optional = (key, value, read) => (value === undefined ? {} : { [key]: read
 const one = (raw, ids) => {
     if (!raw || typeof raw !== "object")
         return invalid("a finding is an object");
-    if (raw.kind === "task" || raw.kind === "fact")
+    if (raw.kind === "fact")
         return validateFinding(raw, RULES, ids);
+    if (raw.kind === "task") {
+        const { externalId, sourceUrl, ...task } = raw;
+        return {
+            ...validateFinding(task, RULES, ids),
+            ...optional("externalId", externalId, (value) => {
+                const { provider, id } = externalIdOf(findingText(value, EXTERNAL_ID_CHARS + 40));
+                return `${provider}:${id}`;
+            }),
+            ...optional("sourceUrl", sourceUrl, (value) => sourceUrlOf(findingText(value, SOURCE_URL_CHARS))),
+        };
+    }
     const id = findingId(raw.id, ids);
     const evidence = validEvidence(raw.evidence, RULES);
     const reference = (value, pattern, what) => {
@@ -247,6 +259,7 @@ const one = (raw, ids) => {
                 "invoice",
                 "payment",
                 "project",
+                "sourceUrl",
                 "reason",
                 "evidence",
             ], RULES.singular);
@@ -266,6 +279,7 @@ const one = (raw, ids) => {
                 ...optional("invoice", raw.invoice, (value) => reference(value, INVOICE, "an order's invoice")),
                 ...optional("payment", raw.payment, (value) => reference(value, PAYMENT, "an order's payment")),
                 ...optional("project", raw.project, (value) => reference(value, PROJECT, "a project")),
+                ...optional("sourceUrl", raw.sourceUrl, (value) => sourceUrlOf(findingText(value, SOURCE_URL_CHARS), "order.source-url")),
                 reason: findingText(raw.reason, 2000),
                 evidence,
             };

package/dist/mail/index.d.ts

@@ -9,7 +9,7 @@ export { dropMissing, type Gone, tooManyGone } from "./gone.js";
 export { type AuthVerdicts, HEADER_FIELDS, headersOf, type MailHeaders, mailHeadersOf } from "./headers.js";
 export { type MailIdsInput, mailIds } from "./ids.js";
 export { decodedLabelName, decodeMailboxName, labelName, systemLabel } from "./labels.js";
-export { acknowledgeMark, advancePastSkipped, type BulkExcerpt, cursorOf, HOLD_PARTIAL_MS, HOLDER, MARK_BATCH, type MailMark, type MailWaiting, type MarkRead, mailWaiting, markOf, marksOf, readPastMark, type SkipReason, } from "./marks.js";
+export { acknowledgeMark, advancePastSkipped, type BulkExcerpt, cursorOf, HOLD_PARTIAL_MS, HOLDER, MARK_BATCH, type MailMark, type MailWaiting, type MarkRead, type MarkRewind, mailWaiting, markOf, marksOf, type RewoundMark, readPastMark, rewindMark, type SkipReason, } from "./marks.js";
 export { BULK_TRIAGE_DEFAULTS, type BulkSorted, type BulkTriage, excerptOf, NEWSLETTER_DEFAULTS, NEWSLETTER_SENDERS, NEWSLETTER_WORDS, type NewsletterCues, newsletterSorter, ORDER_WORDS, } from "./newsletter.js";
 export { type MailTurn, mailTurn } from "./owed.js";
 export { type Address, htmlToText, looksLikeHtml, MAX_ATTACHMENTS, MAX_BODY_CHARS, type ParsedMail, parseMail, } from "./parse.js";

package/dist/mail/index.js

@@ -9,7 +9,7 @@ export { dropMissing, tooManyGone } from "./gone.js";
 export { HEADER_FIELDS, headersOf, mailHeadersOf } from "./headers.js";
 export { mailIds } from "./ids.js";
 export { decodedLabelName, decodeMailboxName, labelName, systemLabel } from "./labels.js";
-export { acknowledgeMark, advancePastSkipped, cursorOf, HOLD_PARTIAL_MS, HOLDER, MARK_BATCH, mailWaiting, markOf, marksOf, readPastMark, } from "./marks.js";
+export { acknowledgeMark, advancePastSkipped, cursorOf, HOLD_PARTIAL_MS, HOLDER, MARK_BATCH, mailWaiting, markOf, marksOf, readPastMark, rewindMark, } from "./marks.js";
 export { BULK_TRIAGE_DEFAULTS, excerptOf, NEWSLETTER_DEFAULTS, NEWSLETTER_SENDERS, NEWSLETTER_WORDS, newsletterSorter, ORDER_WORDS, } from "./newsletter.js";
 export { mailTurn } from "./owed.js";
 export { htmlToText, looksLikeHtml, MAX_ATTACHMENTS, MAX_BODY_CHARS, parseMail, } from "./parse.js";

package/dist/mail/marks.d.ts

@@ -89,3 +89,32 @@ export declare const advancePastSkipped: (store: MessageStore, holder: string, n
  * The same cursor twice changes nothing more.
  */
 export declare const acknowledgeMark: (store: MessageStore, mailbox: AccountKey, holder: string, cursor: string, now?: number) => Promise<MailMark>;
+/** Where the owner moves a holder's mark back to: the emails received since a time, or the last n it was given. */
+export type MarkRewind = {
+    since: number;
+} | {
+    last: number;
+};
+export interface RewoundMark {
+    mark: MailMark;
+    /** Where the mark was before. */
+    fromId: number;
+    /** The emails between the new mark and the old one the holder reads whole again. */
+    again: number;
+    /** Bulk emails between them: excerpts again, unless they are surely newsletters. */
+    bulk: number;
+    /** Emails between them the holder skips again: drafts, envelopes, suspicious senders, partial mail. */
+    skipped: number;
+    /** The mark is moved only when not dry. */
+    dry: boolean;
+}
+/**
+ * Moves the holder's mark back, so its next reviews give it that mail again: past every email received since
+ * `since`, or past the last `last` emails it was given. The owner's alone: a holder only ever moves its own mark
+ * forward. The id is the store's insert order, so an older email stored after the earliest one picked is read again too;
+ * the answer counts them all.
+ */
+export declare const rewindMark: (store: MessageStore, mailbox: AccountKey, holder: string, to: MarkRewind, { now, dry }?: {
+    now?: number;
+    dry?: boolean;
+}) => Promise<RewoundMark>;

package/dist/mail/marks.js

@@ -316,3 +316,89 @@ export const acknowledgeMark = async (store, mailbox, holder, cursor, now = Date
     await store.sync.setSyncState(mailbox, key, JSON.stringify(next));
     return { holder, ...next, updatedAt: now };
 };
+/**
+ * Moves the holder's mark back, so its next reviews give it that mail again: past every email received since
+ * `since`, or past the last `last` emails it was given. The owner's alone: a holder only ever moves its own mark
+ * forward. The id is the store's insert order, so an older email stored after the earliest one picked is read again too;
+ * the answer counts them all.
+ */
+export const rewindMark = async (store, mailbox, holder, to, { now = Date.now(), dry = false } = {}) => {
+    const key = keyOf(holder);
+    const account = await accountOf(store, mailbox);
+    if (!account)
+        throw new CliError("not_found", `no mail of ${mailbox.account} is stored`);
+    const mark = await markOf(store, mailbox, holder);
+    if (!mark)
+        throw new CliError("not_found", `${holder} has no mark in ${mailbox.account}: its first review starts it`, {
+            reason: "mail.no-mark",
+        });
+    if ("last" in to && (!Number.isSafeInteger(to.last) || to.last < 1))
+        throw new CliError("validation_error", "--last takes a whole number of emails, 1 or more");
+    if ("since" in to && !Number.isFinite(to.since))
+        throw new CliError("validation_error", "--since-time takes a time");
+    const given = (email) => {
+        const said = verdict(email, now);
+        return said === "read" || said === "held" || said === "bulk";
+    };
+    const between = [];
+    let through = mark.throughId;
+    let before = mark.throughId + 1;
+    for (let counted = 0;;) {
+        const page = await store.mail.emailsBefore(account.id, before, MARK_BATCH);
+        if (page.length === 0) {
+            if ("last" in to && between.length > 0)
+                through = 0;
+            break;
+        }
+        let done = false;
+        for (const email of page) {
+            if ("last" in to) {
+                between.push(email);
+                if (given(email))
+                    counted += 1;
+                if (counted === to.last) {
+                    through = email.id - 1;
+                    done = true;
+                    break;
+                }
+            }
+            else {
+                // An email is stored after it arrives, so once stored before the time, none further back arrived after it.
+                if (email.storedAt < to.since - CLOCK_SLACK_MS) {
+                    done = true;
+                    break;
+                }
+                between.push(email);
+                if ((email.at ?? email.storedAt) >= to.since)
+                    through = email.id - 1;
+            }
+        }
+        if (done)
+            break;
+        before = page.at(-1)?.id ?? 0;
+    }
+    const moved = between.filter((email) => email.id > through);
+    const count = (pick) => moved.filter((email) => pick(verdict(email, now))).length;
+    const answer = {
+        fromId: mark.throughId,
+        again: count((said) => said === "read" || said === "held"),
+        bulk: count((said) => said === "bulk"),
+        skipped: count((said) => said !== "read" && said !== "held" && said !== "bulk"),
+        dry,
+    };
+    if (through >= mark.throughId)
+        return { mark, ...answer };
+    const [last] = through > 0 ? await store.mail.emailsBefore(account.id, through + 1, 1) : [];
+    const at = last?.id === through ? last.at : null;
+    const next = {
+        throughId: through,
+        throughAt: at,
+        held: mark.held.filter((id) => id <= through),
+        suspicious: mark.suspicious.filter((id) => id <= through),
+        read: mark.read,
+        skipped: mark.skipped,
+    };
+    if (!dry)
+        await store.sync.setSyncState(mailbox, key, JSON.stringify(next));
+    return { mark: { holder, ...next, updatedAt: dry ? mark.updatedAt : now }, ...answer };
+};

package/dist/meetings/findings-rules.d.ts

@@ -39,6 +39,10 @@ export interface TaskFinding extends FindingBase {
     dueEvidence?: string[];
     assignee?: string;
     assigneeEvidence?: string[];
+    /** Mail only: `<service>:<id>` in the outside service the mail came from, such as `avito:4512345678`. */
+    externalId?: string;
+    /** Mail only: the http or https page the task is about, such as the conversation the mail links to. */
+    sourceUrl?: string;
 }
 export type Finding = FactFinding | TaskFinding | PaymentFinding;
 export interface FindingsInput {

package/dist/services/project-status/signals/index.js

@@ -1,7 +1,6 @@
 import { amounts } from "./amounts.js";
 import { children } from "./children.js";
 import { coverage } from "./coverage.js";
-import { lastMessage } from "./last-message.js";
 import { payments } from "./payments.js";
 import { promises } from "./promises.js";
 import { questions } from "./questions.js";
@@ -9,7 +8,6 @@ import { replyNext } from "./reply-next.js";
 import { topics } from "./topics.js";
 /** The registry; its order is the answer's order. A new signal is one file here and its row in the CLI. */
 export const STATUS_SIGNALS = [
-    lastMessage,
     replyNext,
     questions,
     promises,

package/dist/store/sqlite/email-activity.d.ts

@@ -67,6 +67,8 @@ export interface MailActivityStore {
      * processing mark reads next. The id is the store's insert order, so mail stored late is never behind the mark.
      */
     emailsAfter(accountId: number, afterId: number, limit: number, ids?: readonly number[]): Promise<MarkedEmail[]>;
+    /** The account's live emails stored before `beforeId`, newest first, at most `limit`: what a mark moved back reads. */
+    emailsBefore(accountId: number, beforeId: number, limit: number): Promise<MarkedEmail[]>;
     /** The account's newest store id; 0 with no mail. */
     newestEmailId(accountId: number): Promise<number>;
     /** Every `sync_cursors` value of the account whose key starts with `prefix`. */

package/dist/store/sqlite/email-activity.js

@@ -125,6 +125,10 @@ export const emailsAfter = (database, accountId, afterId, limit, ids = []) => {
 };
 export const mailActivity = (database) => ({
     emailsAfter: async (accountId, afterId, limit, ids) => emailsAfter(database, accountId, afterId, limit, ids),
+    emailsBefore: async (accountId, beforeId, limit) => database
+        .prepare(`${MARKED} WHERE e.id < ? AND e.account_id = ? AND e.deleted_at IS NULL ORDER BY e.id DESC LIMIT ?`)
+        .all(beforeId, accountId, limit)
+        .map(markedOf),
     newestEmailId: async (accountId) => Number(database.prepare("SELECT max(id) AS id FROM emails WHERE account_id = ?").get(accountId)?.id ?? 0),
     statesLike: async (accountId, prefix) => database
         .prepare("SELECT key, value, updated_at FROM sync_cursors WHERE account_id = ? AND substr(key, 1, ?) = ?")

package/dist/store/sqlite/findings-core.js

@@ -93,6 +93,8 @@ export const findingsCoreOver = (context, kind) => {
             type: finding.type,
             description: `${finding.commitment}: ${finding.reason}`,
             ...(finding.dueAt ? { dueAt: new Date(finding.dueAt) } : {}),
+            ...(finding.externalId ? { externalId: finding.externalId } : {}),
+            ...(finding.sourceUrl ? { sourceUrl: finding.sourceUrl } : {}),
         }, agent);
         const id = taskRowOf(database, task.id);
         if (id === undefined)

package/dist/store/sqlite/manifest.js

@@ -67,6 +67,7 @@ export const MANIFEST = [
     { name: "20261104232153_version-49-relation-amounts", version: 49, minCompatible: 34 },
     { name: "20261105125314_version-50-orders", version: 50, minCompatible: 34 },
     { name: "20261105125315_version-50-orders-rules", version: 50, minCompatible: 34 },
+    { name: "20261105144549_version-51-task-links", version: 51, minCompatible: 34 },
 ];
 export const generatedMigrations = (manifest = MANIFEST, generated = GENERATED) => {
     const migrations = [];

package/dist/store/sqlite/migrations.generated.js

@@ -974,5 +974,15 @@ export const GENERATED = [
             "-- The store's code checks these first and says why; the triggers keep a stray write from another build or a hand\n-- edit from storing an order with an unknown status or purpose, or an amount without its currency.\nCREATE TRIGGER orders_valid_bi BEFORE INSERT ON orders\n  WHEN new.customer_type NOT IN ('person', 'organization')\n    OR new.purpose NOT IN ('personal', 'business', 'client', 'other')\n    OR new.status NOT IN ('placed', 'shipped', 'delivered', 'cancelled', 'returned')\n    OR new.review NOT IN ('proposed', 'confirmed', 'rejected')\n    OR (new.total IS NULL) <> (new.currency IS NULL) OR new.total < 0 BEGIN\n  SELECT RAISE(ABORT, 'orders: a person or organization customer, a known purpose, status and review, an amount with its currency');\nEND;",
             "CREATE TRIGGER orders_valid_bu BEFORE UPDATE ON orders\n  WHEN new.customer_type NOT IN ('person', 'organization')\n    OR new.purpose NOT IN ('personal', 'business', 'client', 'other')\n    OR new.status NOT IN ('placed', 'shipped', 'delivered', 'cancelled', 'returned')\n    OR new.review NOT IN ('proposed', 'confirmed', 'rejected')\n    OR (new.total IS NULL) <> (new.currency IS NULL) OR new.total < 0 BEGIN\n  SELECT RAISE(ABORT, 'orders: a person or organization customer, a known purpose, status and review, an amount with its currency');\nEND;"
         ]
+    },
+    {
+        "name": "20261105144549_version-51-task-links",
+        "statements": [
+            "ALTER TABLE `orders` ADD `source_url` text;",
+            "ALTER TABLE `tasks` ADD `provider` text;",
+            "ALTER TABLE `tasks` ADD `external_id` text;",
+            "ALTER TABLE `tasks` ADD `source_url` text;",
+            "CREATE INDEX `tasks_by_provider_external_id` ON `tasks` (`provider`,`external_id`) WHERE external_id IS NOT NULL;"
+        ]
     }
 ];

package/dist/store/sqlite/orders.d.ts

@@ -26,6 +26,8 @@ export interface Order extends Reviewed {
     fulfilledDate: string | null;
     invoice: string | null;
     payment: string | null;
+    /** The order's page at the shop, http or https. */
+    sourceUrl: string | null;
 }
 export interface OrderInput extends Written {
     /** `person:` or `organization:`; the owner's own person when left out. */
@@ -43,6 +45,8 @@ export interface OrderInput extends Written {
     fulfilledDate?: string;
     invoice?: string;
     payment?: string;
+    /** The order's page at the shop: an http or https address. */
+    sourceUrl?: string;
 }
 export interface OrderFilter {
     status?: OrderStatus;

package/dist/store/sqlite/orders.js

@@ -1,4 +1,5 @@
 import { CliError } from "@wirecat/cli-base";
+import { sourceUrlOf } from "../../domain/external-links.js";
 import { FINANCE_REVIEWS } from "../../domain/finance.js";
 import { currencyOf, formatDecimal, minorUnits, scaleOf } from "../../domain/money.js";
 import { ORDER_PURPOSES, ORDER_STATUSES, orderTitle } from "../../domain/orders.js";
@@ -42,6 +43,7 @@ export const orderOperationsOver = (context) => {
             fulfilledDate: row.fulfilled_date == null ? null : String(row.fulfilled_date),
             invoice: row.invoice_id == null ? null : `invoice:${row.invoice_id}`,
             payment: row.payment_id == null ? null : `payment:${row.payment_id}`,
+            sourceUrl: row.source_url == null ? null : String(row.source_url),
             ...reviewedOf(row, "order"),
         };
     };
@@ -96,6 +98,7 @@ export const orderOperationsOver = (context) => {
                 refuse("an order's amount is 0 or more", "money.amount");
             const orderDate = isoDate(input.orderDate, "an order's date");
             const fulfilledDate = isoDate(input.fulfilledDate, "an order's delivery date");
+            const sourceUrl = input.sourceUrl === undefined ? null : sourceUrlOf(input.sourceUrl, "order.source-url");
             const id = write(database, () => {
                 if (number !== null && ordersOfShop(database, supplierName, number).length)
                     refuse(`order ${number} from ${supplierName} is already stored; change its status instead`, "order.duplicate");
@@ -108,9 +111,9 @@ export const orderOperationsOver = (context) => {
                 const made = Number(database
                     .prepare("INSERT INTO orders (customer_type, customer_id, purpose, supplier_type, supplier_id, supplier_name, number, " +
                     "currency, total, status, order_date, fulfilled_date, invoice_id, payment_id, project_id, review, " +
-                    "author_type, author_id, model, confirmed_by_type, confirmed_by_id, source, metadata, created_at, updated_at) " +
-                    "VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?) RETURNING id")
-                    .get(customer.type, customer.id, purpose, supplier?.type ?? null, supplier?.id ?? null, supplierName, number, currency, total, status, orderDate, fulfilledDate, invoice, payment, by.project, by.review, by.actor.type, by.actor.id, by.model, by.confirmedType, by.confirmedId, by.source, by.metadata, at, at)?.id);
+                    "author_type, author_id, model, confirmed_by_type, confirmed_by_id, source, metadata, created_at, updated_at, " +
+                    "source_url) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?) RETURNING id")
+                    .get(customer.type, customer.id, purpose, supplier?.type ?? null, supplier?.id ?? null, supplierName, number, currency, total, status, orderDate, fulfilledDate, invoice, payment, by.project, by.review, by.actor.type, by.actor.id, by.model, by.confirmedType, by.confirmedId, by.source, by.metadata, at, at, sourceUrl)?.id);
                 keepEvidence("order", made, by);
                 return made;
             });