@harborppm/cli 0.58.0 → 0.60.0

package/lib/cli.mjs

@@ -39,8 +39,10 @@ import {
   lifeboatsText,
   followedText,
   soundingsText,
+  ashoreText,
   voyageText,
   whyText,
+  barnaclesText,
   handoverText,
   fogText,
   agentWorkText,
@@ -96,6 +98,9 @@ export const HELP = `harbor: Harbor from the terminal
                                               changes without --apply
   harbor why PROJECT|TASK|MILESTONE           what's holding it up: the line of
                                               task waits that sets its date
+  harbor barnacles PROJECT                    work added since the plan was set:
+                                              by week, by who, and the days of
+                                              slip it explains
   harbor hill [--program P]                   where each project is on its hill
   harbor hill PROJECT --at 0-100|top|done     move it: up to 50 is figuring it
                                               out, past 50 is getting it done
@@ -213,12 +218,16 @@ export const HELP = `harbor: Harbor from the terminal
   harbor note PROJECT ["NOTE"] [--opens DATE|--milestone NAME|--off-track]
                                               a note for later: sealed until
                                               its day, milestone, or Off track
-  harbor sound TASK [DAYS] [--why TEXT] [--ask NAMES|crew] [--settle DAYS]
+  harbor sound TASK [--answer DAYS|--ask NAMES|--settle DAYS] [--why TEXT]
                                               a sounding: ask a few people how
                                               many days a task will take, give
                                               your answer, or read the spread
   harbor soundings [PROJECT]                  open tasks with a sounding, and
                                               the ones waiting on your answer
+  harbor ashore [--weeks N] [--country CODES|none] [--person NAME]
+                                              public holidays and time away
+                                              coming up, and whose holidays
+                                              the harbor (or someone) takes
   harbor handover PERSON [--to NAME] [--until DATE] [--note TEXT]
                          [--keep ID,ID] [--confirm]
                                               hand someone's work to the crew
@@ -449,6 +458,8 @@ const FLAG = {
   days: "the days",
   why: "--why",
   people: "--ask",
+  countries: "--country",
+  country: "--country",
 };
 
 /** Harbor's refusals are worded for agents; say them as the commands and flags that answer them. */
@@ -731,7 +742,8 @@ const DETAIL = {
     "  harbor sound TASK --ask crew           writes: asks you, its owner and whoever",
     "                                         has open work on its project",
     '  harbor sound TASK --ask "Sam,Priya"    writes: asks those people',
-    '  harbor sound TASK 4 [--why "TEXT"]     writes: your answer, in working days',
+    '  harbor sound TASK --answer 4 [--why "TEXT"]',
+    "                                         writes: your answer, in working days",
     "  harbor sound TASK --settle 6           writes: the days you agreed on after",
     "                                         talking a wide spread through",
     "",
@@ -739,6 +751,19 @@ const DETAIL = {
     "  everyone has. Close guesses give the task an estimate; far-apart ones",
     "  say talk first. The forecast draws on every answer.",
   ],
+  ashore: [
+    "  harbor ashore [--weeks N]              reads: holidays and time away in the",
+    "                                         next N weeks (8 unless you say)",
+    "  harbor ashore --country US,GB          writes: whose public holidays the",
+    "                                         harbor takes (none for no holidays)",
+    "  harbor ashore --person NAME --country GB",
+    "                                         writes: one person's own country",
+    "                                         (harbor to take the harbor's again)",
+    "",
+    "  The forecast, the weeks ahead, the timeline and calendar feeds count",
+    "  these as days nobody works. Countries: AU BR CA DE ES FR GB IE IT MX NL",
+    "  NZ US (national holidays only).",
+  ],
   soundings: [
     "  harbor soundings [PROJECT]             reads: open tasks with a sounding",
     "                                         (all projects when left out), and the",
@@ -852,9 +877,23 @@ const DETAIL = {
     "  Tasks have due dates, not lengths, so a task can finish on its due date",
     "  at the soonest, never before what it waits on, and never in the past.",
     "  Each link's slack is the days it can slip before it moves the next one",
-    "  (or the end); a negative one already does. PROJECT is a name, a key",
+    "  (or the end); a negative one already does. Open tasks with no due date",
+    "  can't hold a date, so they're left out and counted. In --json, endDate",
+    "  (dueDate for a task or milestone) is the date held and daysSpare the",
+    "  days before it (negative: that many over). PROJECT is a name, a key",
     "  like RR, or an id.",
   ],
+  barnacles: [
+    "  harbor barnacles PROJECT               reads how much the plan has grown",
+    "",
+    "  Counts the tasks made after the baseline was set (without a baseline",
+    "  time, after the project's first week of tasks), as a",
+    "  share of what was planned, by week and by who added them. At the",
+    "  crew's pace (tasks finished a week over the last six) it says how many",
+    "  days of work that is, and how much of the slip against the planned end",
+    "  it explains. The weekly brief names projects that grew a lot since",
+    "  their baseline.",
+  ],
   voyage: [
     "  harbor voyage PROJECT                  reads a Done project's voyage log",
     '  harbor voyage PROJECT "YOUR LINE"      writes: adds or changes your line in it',
@@ -2024,7 +2063,8 @@ export async function run(argv, io = {}) {
       );
       if (!values.project) throw new HarborError("Say which project: --project NAME.");
       // Several at once: one title a line on stdin, with no title (or -) after add.
-      const piped = positionals.length === 0 || (positionals.length === 1 && positionals[0] === "-");
+      const piped =
+        positionals.length === 0 || (positionals.length === 1 && positionals[0] === "-");
       const stdin = io.stdin ?? process.stdin;
       const titles =
         piped && (io.stdin || !process.stdin.isTTY)
@@ -2033,28 +2073,34 @@ export async function run(argv, io = {}) {
               .map((l) => l.trim())
               .filter(Boolean)
           : [text(positionals, "the task")];
-      if (titles.length === 0) throw new HarborError("Say the task, or give one title a line on stdin.");
-      if (titles.length > 100) throw new HarborError("That's more than 100 tasks; harbor import FILE takes a spreadsheet.");
+      if (titles.length === 0)
+        throw new HarborError("Say the task, or give one title a line on stdin.");
+      if (titles.length > 100)
+        throw new HarborError(
+          "That's more than 100 tasks; harbor import FILE takes a spreadsheet.",
+        );
       const added = [];
       for (const title of titles) {
-        const r = await client.call("create_task", {
-          harbor,
-          project: values.project,
-          title,
-          // Yours unless you say otherwise, as with n in the app.
-          assignee: values.assignee ?? "me",
-          due: duePilot(values.due) ? undefined : dueDate(values.due),
-          suggestedDue: duePilot(values.due),
-          priority: values.priority,
-          status: values.status === undefined ? undefined : statusWord(values.status),
-          overLimit: values["over-limit"] || undefined,
-        }).catch((err) => {
-          if (err instanceof HarborError) {
-            const done = added.length ? ` (added ${added.length} before it)` : "";
-            throw new HarborError(`${hint(err.message, values.project)}${done}`);
-          }
-          throw err;
-        });
+        const r = await client
+          .call("create_task", {
+            harbor,
+            project: values.project,
+            title,
+            // Yours unless you say otherwise, as with n in the app.
+            assignee: values.assignee ?? "me",
+            due: duePilot(values.due) ? undefined : dueDate(values.due),
+            suggestedDue: duePilot(values.due),
+            priority: values.priority,
+            status: values.status === undefined ? undefined : statusWord(values.status),
+            overLimit: values["over-limit"] || undefined,
+          })
+          .catch((err) => {
+            if (err instanceof HarborError) {
+              const done = added.length ? ` (added ${added.length} before it)` : "";
+              throw new HarborError(`${hint(err.message, values.project)}${done}`);
+            }
+            throw err;
+          });
         if (values.comment)
           r.comment = (
             await client.call("add_comment", {
@@ -2209,19 +2255,26 @@ export async function run(argv, io = {}) {
       const number = (v, name) => {
         if (v === undefined) return undefined;
         const n = Number(v);
-        if (!Number.isFinite(n) || n <= 0) throw new HarborError(`--${name} is a number of hours, like 2 or 1.5.`);
+        if (!Number.isFinite(n) || n <= 0)
+          throw new HarborError(`--${name} is a number of hours, like 2 or 1.5.`);
         return n;
       };
       const [task, day, ...extra] = positionals;
       if (extra.length) throw new HarborError("Give a task key and a day: harbor week RR-42 wed.");
       const dayHours = number(values["day-hours"], "day-hours");
-      const show = (r) => [r.done, weekText(r, { ...opts, review: Boolean(values.review) })].filter(Boolean).join("\n\n");
+      const show = (r) =>
+        [r.done, weekText(r, { ...opts, review: Boolean(values.review) })]
+          .filter(Boolean)
+          .join("\n\n");
       if (!task && dayHours === undefined) {
-        if (values.off || values.hours) throw new HarborError("Say which task: harbor week RR-42 wed --hours 3.");
+        if (values.off || values.hours)
+          throw new HarborError("Say which task: harbor week RR-42 wed --hours 3.");
         return call("get_week", { harbor, week }, show);
       }
       if (task && !day && !values.off)
-        throw new HarborError(`Say which day for ${task}: harbor week ${task} wed, or --off to take it off the week.`);
+        throw new HarborError(
+          `Say which day for ${task}: harbor week ${task} wed, or --off to take it off the week.`,
+        );
       return call(
         "plan_week",
         {
@@ -2485,9 +2538,14 @@ export async function run(argv, io = {}) {
       );
     }
     case "sound": {
-      const { positionals, values, harbor } = parse(spec([], ["why", "ask", "settle"]));
-      const [task, days, ...extra] = positionals;
+      const { positionals, values, harbor } = parse(spec([], ["answer", "why", "ask", "settle"]));
+      const [task, ...extra] = positionals;
       if (!task) throw new HarborError("Give a task's key, like harbor sound RR-4.");
+      // A bare number used to be the answer; it writes, so it now needs its flag.
+      if (extra.length === 1 && /^\d+(\.\d+)?(d|days?)?$/i.test(extra[0]))
+        throw new HarborError(
+          `To give your answer, say so: harbor sound ${task} --answer ${extra[0]}.`,
+        );
       if (extra.length) throw new HarborError(`Unexpected "${extra.join(" ")}".`);
       const number = (text) => {
         const n = Number(String(text).replace(/d(ays?)?$/i, ""));
@@ -2495,11 +2553,14 @@ export async function run(argv, io = {}) {
           throw new HarborError(`Give days as a number, like 3 or 2.5 (not "${text}").`);
         return n;
       };
+      const days = values.answer;
       const given = [days !== undefined, values.ask !== undefined, values.settle !== undefined];
       if (given.filter(Boolean).length > 1)
         throw new HarborError("Answer, ask or settle: one at a time.");
       if (values.why !== undefined && days === undefined)
-        throw new HarborError('--why goes with your answer: harbor sound TASK 4 --why "TEXT".');
+        throw new HarborError(
+          '--why goes with your answer: harbor sound TASK --answer 4 --why "TEXT".',
+        );
       if (values.ask !== undefined) {
         const crew = /^crew$/i.test(values.ask.trim())
           ? undefined
@@ -2507,11 +2568,10 @@ export async function run(argv, io = {}) {
               .split(",")
               .map((x) => x.trim())
               .filter(Boolean);
-        return call(
-          "take_sounding",
-          { harbor, task, ...(crew ? { people: crew } : {}) },
-          (r) =>
-            `Asked ${r.asked.people.join(", ")} how many days ${r.asked.key ?? r.asked.title} will take. The answers show together once everyone's in.`,
+        return call("take_sounding", { harbor, task, ...(crew ? { people: crew } : {}) }, (r) =>
+          !crew && r.asked.people.length === 1
+            ? `Only you are on this crew, so the sounding on ${r.asked.key ?? r.asked.title} is just your guess. Ask others by name: harbor sound ${task} --ask "Sam,Priya".`
+            : `Asked ${r.asked.people.join(", ")} how many days ${r.asked.key ?? r.asked.title} will take. The answers show together once everyone's in.`,
         );
       }
       if (values.settle !== undefined) {
@@ -2543,12 +2603,51 @@ export async function run(argv, io = {}) {
         soundingsText(r),
       );
     }
+    case "ashore": {
+      const { positionals, values, harbor } = parse(spec([], ["weeks", "country", "person"]));
+      none(positionals);
+      if (values.person && values.country === undefined)
+        throw new HarborError("Give their country too: --person NAME --country GB (or harbor).");
+      if (values.country !== undefined) {
+        if (values.person) {
+          return call(
+            "set_holidays",
+            { harbor, person: values.person, country: values.country },
+            (r) =>
+              r.country === "harbor"
+                ? `${r.person} takes the harbor's holidays.`
+                : `${r.person} takes ${r.country} holidays.`,
+          );
+        }
+        const countries = /^none$/i.test(values.country.trim())
+          ? []
+          : values.country
+              .split(",")
+              .map((c) => c.trim())
+              .filter(Boolean);
+        return call("set_holidays", { harbor, countries }, (r) =>
+          r.harbor.length
+            ? `The harbor takes public holidays from ${r.harbor.map((c) => c.name).join(", ")}.`
+            : "The harbor takes no public holidays now.",
+        );
+      }
+      const weeks = values.weeks === undefined ? 8 : Number(values.weeks);
+      if (!Number.isInteger(weeks) || weeks < 1 || weeks > 52)
+        throw new HarborError("--weeks is a whole number from 1 to 52.");
+      return call("time_ashore", { harbor, days: weeks * 7 }, (r) => ashoreText(r, weeks));
+    }
     case "why": {
       const { positionals, harbor } = parse(spec());
       const of = positionals.join(" ").trim();
       if (!of) throw new HarborError("Say what: a project, a task key like RR-42, or a milestone.");
       return call("long_pole", { harbor, of }, whyText);
     }
+    case "barnacles": {
+      const { positionals, harbor } = parse(spec());
+      const project = positionals.join(" ").trim();
+      if (!project) throw new HarborError("Say which project: harbor barnacles PROJECT.");
+      return call("scope_growth", { harbor, project }, barnaclesText);
+    }
     case "voyage": {
       const { positionals, harbor } = parse(spec());
       const [project, ...words] = positionals;

package/lib/format.mjs

@@ -571,7 +571,29 @@ export function whyText(r) {
           .join(", ")}.`,
       ]
     : [];
-  return [...head, "", ...via, ...lines, ...others].join("\n");
+  const note = r.note ? ["", r.note] : [];
+  return [...head, "", ...via, ...lines, ...others, ...note].join("\n");
+}
+
+/** A project's barnacles, as scope_growth answers it: the growth, its cost in days, by week and by who. */
+export function barnaclesText(r) {
+  const head = [`Barnacles · ${r.project}`];
+  if (!r.added) {
+    head.push(`Nothing added since the plan was set (${r.since.slice(0, 10)}): ${r.planned} task${r.planned === 1 ? "" : "s"}, as planned.`);
+    return head.join("\n");
+  }
+  head.push(`${r.headline} (${r.planned} planned, ${r.addedThisWeek} added this week).`);
+  if (r.daysLine) head.push(r.daysLine);
+  const top = Math.max(1, ...r.byWeek.map((w) => w.added));
+  const weeks = r.byWeek.map(
+    (w) => `  w/c ${w.weekOf}  ${"█".repeat(Math.max(1, Math.round((w.added / top) * 20)))} ${w.added}`,
+  );
+  const who = r.byWho.map((w) => `${w.who ?? "not recorded"} ${w.added}`).join(", ");
+  const from =
+    r.measuredFrom === "when the baseline was set"
+      ? `Counted from when the baseline was set, ${r.since.slice(0, 10)}.`
+      : `Counted from a week after its first task was made, ${r.since.slice(0, 10)}; setting a baseline counts from then instead.`;
+  return [...head, "", "Added by week:", ...weeks, "", `By who: ${who}`, "", from].join("\n");
 }
 
 /** A position on a 21-wide track, the top of the hill marked in the middle. */
@@ -752,7 +774,7 @@ export function soundingText(task, s, { answered = false } = {}) {
     for (const a of s.answers)
       lines.push(`  You said ${daysText(a.days)}${a.why ? ` · "${a.why}"` : ""}`);
     if (s.youWereAsked && !s.answers.length)
-      lines.push(`  Give yours: harbor sound ${task.key ?? task.id} DAYS`);
+      lines.push(`  Give yours: harbor sound ${task.key ?? task.id} --answer DAYS`);
     return lines.join("\n");
   }
   lines.push(`  ${spreadLine(s.answers)}`);
@@ -768,6 +790,26 @@ export function soundingText(task, s, { answered = false } = {}) {
   return lines.join("\n");
 }
 
+/** time_ashore: whose holidays count, then the days off coming up, soonest first. */
+export function ashoreText(r, weeks = 8) {
+  const lines = [];
+  const countries = r.countries ?? [];
+  lines.push(
+    countries.length
+      ? `Time ashore · holidays from ${countries.map((c) => c.name).join(", ")}`
+      : "Time ashore · no holiday country set (harbor ashore --country US)",
+  );
+  for (const p of r.people ?? []) lines.push(`  ${p.name} takes ${p.country} holidays`);
+  const rows = [
+    ...(r.holidays ?? []).map((h) => [h.date, h.name]),
+    ...(r.away ?? []).map((a) => [a.from, `${a.name} away, back ${a.back}`]),
+  ].sort((a, b) => a[0].localeCompare(b[0]));
+  lines.push("");
+  if (!rows.length) lines.push(`  Nothing in the next ${weeks} weeks.`);
+  for (const [day, what] of rows) lines.push(`  ${day}  ${what}`);
+  return lines.join("\n");
+}
+
 /** list_soundings: the ones waiting on you first, then the rest, wide ones flagged. */
 export function soundingsText(r) {
   const all = r.soundings ?? [];

package/lib/mcp.mjs

@@ -53,8 +53,15 @@ export function createClient({ creds, save, fetcher = fetch, now = Date.now }) {
       const msg = await res.json();
       if (msg.error) throw new HarborError(msg.error.message);
       const result = msg.result ?? {};
-      if (result.isError)
-        throw new HarborError(result.content?.map((c) => c.text).join("\n") || "Harbor said no.");
+      if (result.isError) {
+        const said = result.content?.map((c) => c.text).join("\n") || "Harbor said no.";
+        // A command newer than the site it talks to: the tool ships with the next deploy.
+        if (/^No tool named "/.test(said))
+          throw new HarborError(
+            `${new URL(current.server).host} doesn't have this yet. Try again after the next site update.`,
+          );
+        throw new HarborError(said);
+      }
       return result.structuredContent ?? JSON.parse(result.content?.[0]?.text ?? "{}");
     },
 

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@harborppm/cli",
-  "version": "0.58.0",
+  "version": "0.60.0",
   "description": "Harbor from the terminal: a full-screen app with everything, plus commands for scripts and agents.",
   "keywords": [
     "harbor",