@harborppm/cli 0.31.0 → 0.32.0

package/README.md

@@ -29,7 +29,7 @@ harbor             # name your harbor and its first project, and you're in
 1. **Today**: today's focus (`f` adds or takes off the task you're on, up to three) and your check-in (`c`); what's on you, late first; who's waiting on you; your risks and issues.
 2. **Inbox**: the same pings as the website: waiting on you, sign-offs, mentions. Enter opens one; it's marked read.
 3. **Projects**: every portfolio, program and project with its health. A project opens on its board (columns side by side; `f` and `p` show only someone's cards or one priority), its list, or its budget and spend ledger (`v`); `e` changes its details: lead, dates, budget, health by hand with a note.
-4. **Programs**: the review: programs worst first, with their lead, end date, late work and where they sit on the priority matrix; `m` writes a next move, `o` and `p` show someone's or one portfolio's. A program shows its projects and milestones side by side (`m` adds a milestone, space ticks one), its next move and health; `v` reads it project by project, each with its bar across the months, open tasks by status and worst risks. A portfolio opens as a board (programs, with risks, next milestones and money beside them); `v` reads it program by program.
+4. **Programs**: the review: programs worst first, with their lead, end date, late work and where they sit on the priority matrix; `m` writes a next move, `o` and `p` show someone's or one portfolio's. A program shows its projects and milestones side by side (`m` adds a milestone, space ticks one), its next move and health; `v` reads it project by project, each with its bar across the months, open tasks by status and worst risks. A portfolio opens as a board (programs, with risks, next milestones and money beside them); `v` reads it program by program. `e` on a program also names what's holding it back, what it waits on, its impact and its baseline, with its health history below, and `r` reads its status report. A milestone can wait on projects and need someone's sign-off (they approve it or ask for changes). A project's details set its plan by month and what it waits on; a portfolio's set the priority matrix's rules. `:` then "new portfolio" makes one.
 5. **Risks**: the register, worst first; `t`, `o` and `p` narrow it by kind, owner or portfolio, `a` adds closed ones. Enter changes one with every field the website has (status, owner, likelihood, impact, mitigation, contingency, resolution, updates); `n` logs a risk, issue or decision.
 6. **People**: open and late work and the next four weeks against each person's capacity; Enter changes their capacity, role, or the time they're promised to a program.
 7. **Roadmap**: a portfolio's programs and projects across the months, in their health's colour, ◆ for milestones.
@@ -125,6 +125,7 @@ harbor issue "TITLE" --project P|--program P [--impact 1-5] [--owner NAME]
 harbor decision "TITLE" --project P|--program P [--owner NAME] [--due DATE]
 harbor risks [words] [--kind risk,issue,decision] [--project P] [--closed]
 harbor brief [--portfolio P] [--say]        the weekly brief, ready to send
+harbor report PROGRAM                       a program's status report
 harbor premortem PROJECT ["WHAT WENT WRONG"] [--start]
 harbor voyage PROJECT ["YOUR LINE"]
 harbor limit PROJECT [COLUMN N|none]

package/dist/app.mjs

@@ -688,6 +688,39 @@ function startOfMonth(date, options) {
 	return _date;
 }
 
+//#endregion
+//#region node_modules/date-fns/getDaysInMonth.js
+/**
+* The {@link getDaysInMonth} function options.
+*/
+/**
+* @name getDaysInMonth
+* @category Month Helpers
+* @summary Get the number of days in a month of the given date.
+*
+* @description
+* Get the number of days in a month of the given date, considering the context if provided.
+*
+* @param date - The given date
+* @param options - An object with options
+*
+* @returns The number of days in a month
+*
+* @example
+* // How many days are in February 2000?
+* const result = getDaysInMonth(new Date(2000, 1))
+* //=> 29
+*/
+function getDaysInMonth(date, options) {
+	const _date = toDate(date, options?.in);
+	const year = _date.getFullYear();
+	const monthIndex = _date.getMonth();
+	const lastDayOfMonth = constructFrom(_date, 0);
+	lastDayOfMonth.setFullYear(year, monthIndex + 1, 0);
+	lastDayOfMonth.setHours(0, 0, 0, 0);
+	return lastDayOfMonth.getDate();
+}
+
 //#endregion
 //#region node_modules/date-fns/isBefore.js
 /**
@@ -963,6 +996,18 @@ const PRIORITY_LABEL = {
 	high: "High",
 	urgent: "Urgent"
 };
+const CONSTRAINT_KIND_LABEL = {
+	resource: "A person",
+	policy: "A policy",
+	external: "Outside the building",
+	collision: "A collision"
+};
+const CONSTRAINT_KIND_HINT = {
+	resource: "Someone whose calendar sets the date.",
+	policy: "A rule that creates the wait.",
+	external: "A vendor, a city, a review board.",
+	collision: "Two things sharing one window."
+};
 
 //#endregion
 //#region src/tui/create.ts
@@ -987,6 +1032,7 @@ function nextSwatch(used) {
 	return SWATCHES.find((s) => !used.includes(s)) ?? SWATCHES[0];
 }
 const CREATE_TITLE = {
+	portfolio: "New portfolio",
 	project: "New project",
 	program: "New program",
 	milestone: "New milestone",
@@ -1001,6 +1047,28 @@ function stepsFor(kind, data, ctx, me) {
 	}));
 	const meFirst = Math.max(0, people.findIndex((p) => p.value === me));
 	switch (kind) {
+		case "portfolio": return [
+			{
+				key: "name",
+				label: "Name",
+				kind: "text",
+				placeholder: "e.g. Outdoor gear"
+			},
+			{
+				key: "ownerId",
+				label: "Owner",
+				kind: "pick",
+				choices: people,
+				initial: meFirst
+			},
+			{
+				key: "theme",
+				label: "Theme",
+				kind: "text",
+				placeholder: "What it's for, in a line",
+				optional: true
+			}
+		];
 		case "project": return [
 			{
 				key: "name",
@@ -1158,6 +1226,14 @@ function commitCreate(store, kind, v, ctx, today) {
 	const s = store.getState();
 	const str = (k) => typeof v[k] === "string" ? v[k] : "";
 	switch (kind) {
+		case "portfolio": return s.addPortfolio({
+			name: str("name"),
+			description: "",
+			swatch: nextSwatch(s.portfolios.map((p) => p.swatch)),
+			ownerId: str("ownerId"),
+			budget: 0,
+			...str("theme") ? { theme: str("theme") } : {}
+		});
 		case "project": {
 			const programId = ctx.programId ?? str("programId");
 			const program = s.programs.find((p) => p.id === programId);
@@ -1569,7 +1645,7 @@ function cascadeSummary(counts, kind) {
 
 //#endregion
 //#region src/lib/forecast.ts
-const day$3 = (iso) => /* @__PURE__ */ new Date(`${iso}T12:00:00`);
+const day$4 = (iso) => /* @__PURE__ */ new Date(`${iso}T12:00:00`);
 /**
 * A straight-line estimate at completion from the burn so far: spend divided
 * by the share of the schedule elapsed. Null before anything is spent or
@@ -1578,8 +1654,8 @@ const day$3 = (iso) => /* @__PURE__ */ new Date(`${iso}T12:00:00`);
 */
 function forecastAtCompletion(item, now) {
 	if (item.spent <= 0) return null;
-	const total = differenceInCalendarDays(day$3(item.endDate), day$3(item.startDate)) + 1;
-	const gone = differenceInCalendarDays(now, day$3(item.startDate)) + 1;
+	const total = differenceInCalendarDays(day$4(item.endDate), day$4(item.startDate)) + 1;
+	const gone = differenceInCalendarDays(now, day$4(item.startDate)) + 1;
 	if (total <= 0 || gone <= 0) return null;
 	const elapsed = Math.min(1, gone / total);
 	const eac = Math.round(item.spent / elapsed);
@@ -1590,6 +1666,18 @@ function forecastAtCompletion(item, now) {
 		tone: item.budget <= 0 ? "over" : eac > item.budget * 1.05 ? "over" : eac > item.budget * .95 ? "tight" : "under"
 	};
 }
+/** Sum of the children's estimates, using spend where a child has no forecast yet. */
+function forecastRollup(items, budget, now) {
+	const eac = items.map((i) => forecastAtCompletion(i, now)?.eac ?? i.spent).reduce((a, b) => a + b, 0);
+	if (eac <= 0) return null;
+	const elapsed = Math.max(0, ...items.map((i) => forecastAtCompletion(i, now)?.elapsed ?? 0));
+	return {
+		eac,
+		variance: budget - eac,
+		elapsed,
+		tone: budget <= 0 ? "over" : eac > budget * 1.05 ? "over" : eac > budget * .95 ? "tight" : "under"
+	};
+}
 
 //#endregion
 //#region src/lib/tide.ts
@@ -1807,6 +1895,73 @@ function constraintIdle(data, constraint) {
 	return data.tasks.some((t) => t.assigneeId === constraint.ownerId && t.status === "doing" && !here.has(t.id));
 }
 
+//#endregion
+//#region src/lib/phasing.ts
+const day$3 = (iso) => /* @__PURE__ */ new Date(`${iso}T12:00:00`);
+function monthKey(iso) {
+	return iso.slice(0, 7);
+}
+function nextMonth(key) {
+	const [y, m] = key.split("-").map(Number);
+	return m === 12 ? `${y + 1}-01` : `${y}-${String(m + 1).padStart(2, "0")}`;
+}
+/** Every month from the one holding `from` to the one holding `to`, inclusive. Empty when `to` is earlier. */
+function monthsBetween(from, to) {
+	const last = monthKey(to);
+	const out = [];
+	for (let k = monthKey(from); k <= last && out.length < 240; k = nextMonth(k)) out.push(k);
+	return out;
+}
+function daysIn(key) {
+	return getDaysInMonth(day$3(`${key}-01`));
+}
+/** How many of the schedule's days fall in `key`. */
+function overlapDays(key, start, end) {
+	const first = `${key}-01`;
+	const lastDay = `${key}-${String(daysIn(key)).padStart(2, "0")}`;
+	const from = start > first ? start : first;
+	const to = end < lastDay ? end : lastDay;
+	return to < from ? 0 : differenceInCalendarDays(day$3(to), day$3(from)) + 1;
+}
+/**
+* The budget spread straight across the schedule: each month gets the share
+* of days it holds, in whole units, with the rounding left on the last month
+* so the months always add up to the budget.
+*/
+function evenPhasing(project) {
+	const end = project.endDate < project.startDate ? project.startDate : project.endDate;
+	const months = monthsBetween(project.startDate, end);
+	const total = differenceInCalendarDays(day$3(end), day$3(project.startDate)) + 1;
+	const out = {};
+	let placed = 0;
+	months.forEach((k, i) => {
+		const amount = i === months.length - 1 ? project.budget - placed : Math.round(project.budget * overlapDays(k, project.startDate, end) / total);
+		out[k] = amount;
+		placed += amount;
+	});
+	return out;
+}
+/** True when the project carries a plan someone typed, rather than the even spread. */
+function hasOwnPhasing(project) {
+	return Boolean(project.phasing && Object.keys(project.phasing).length > 0);
+}
+/** What the project plans to spend each month: its own phasing where set, else the even spread. */
+function plannedByMonth(project) {
+	if (!hasOwnPhasing(project)) return evenPhasing(project);
+	const out = {};
+	for (const [k, v] of Object.entries(project.phasing)) if (/^\d{4}-\d{2}$/.test(k) && Number.isFinite(v) && v >= 0) out[k] = v;
+	return out;
+}
+/** The plan with one month changed, starting from whatever the project plans now. Zero months are dropped. */
+function withMonth(project, key, amount) {
+	const next = {
+		...plannedByMonth(project),
+		[key]: Math.max(0, Math.round(amount))
+	};
+	for (const k of Object.keys(next)) if (next[k] === 0) delete next[k];
+	return next;
+}
+
 //#endregion
 //#region src/lib/spend.ts
 function spendEntriesOf(data, projectId) {
@@ -1892,6 +2047,13 @@ function withBaseline(projects, reset = false) {
 		baselineEnd: p.endDate
 	});
 }
+/** A caption for the timeline: "slipped 12 days", "12 days early", or null when on the baseline. */
+function slipLabel(p) {
+	const slip = slipDays(p);
+	if (slip == null || slip === 0) return null;
+	const n = Math.abs(slip);
+	return slip > 0 ? `slipped ${n} day${n === 1 ? "" : "s"}` : `${n} day${n === 1 ? "" : "s"} early`;
+}
 
 //#endregion
 //#region src/lib/roadmap.ts
@@ -2624,6 +2786,18 @@ function dueByDay(data) {
 		milestones
 	};
 }
+/**
+* A Markdown letter (the status report) as plain lines for the terminal:
+* headings become plain lines after a blank one, bold marks and the top
+* title go (the screen's heading says it), and "- " lists become bullets.
+*/
+function markdownToPlain(md) {
+	return md.split("\n").filter((line, i) => !(i === 0 && line.startsWith("# "))).map((line) => line.replace(/^#{1,6} /, "").replace(/^- /, "• ").replace(/\*\*([^*]+)\*\*/g, "$1")).join("\n").replace(/^\n+/, "").trimEnd();
+}
+/** A thing's health moves, newest first, as "Oct 12  At risk  (set by hand: note)". */
+function healthMoves(history, today, max = 3) {
+	return [...history ?? []].slice(-max).reverse().map((h) => `${shortDay(h.at.slice(0, 10), today).padEnd(7)} ${HEALTH_LABEL[h.health]}${h.override ? ` (set by hand${h.note ? `: ${h.note}` : ""})` : ""}`);
+}
 
 //#endregion
 //#region src/tui/theme.ts
@@ -2937,7 +3111,7 @@ function Editor({ label, edit, done }) {
 * adds the screen's own (d to delete, space to tick); `below` shows under
 * the fields.
 */
-function DetailPanel({ title, subtitle, fields, width, height, keys = {}, hints, below, active = true, onClose }) {
+function DetailPanel({ title, subtitle, fields, width, height, keys = {}, hints, below, belowRows = 0, active = true, onClose }) {
 	const [at, setAt] = useState(0);
 	const [editing, setEditing] = useState(null);
 	useInput((input, key) => {
@@ -2949,6 +3123,9 @@ function DetailPanel({ title, subtitle, fields, width, height, keys = {}, hints,
 		if (run) run();
 	}, { isActive: active && editing === null });
 	const field = editing != null ? fields[editing] : null;
+	const editorRows = field?.edit ? field.edit.kind === "pick" ? Math.min(10, field.edit.choices.length) + 4 : 5 : 1 + belowRows;
+	const room = Math.max(3, height - 2 - (subtitle ? 2 : 1) - 1 - editorRows);
+	const view = windowOf(fields, at, room);
 	const pad = Math.min(22, Math.max(12, ...fields.map((f) => f.label.length + 1)));
 	return /* @__PURE__ */ jsxs(Box, {
 		flexDirection: "column",
@@ -2968,7 +3145,8 @@ function DetailPanel({ title, subtitle, fields, width, height, keys = {}, hints,
 				children: subtitle
 			}) : null,
 			/* @__PURE__ */ jsx(Text, { children: " " }),
-			fields.map((f, i) => {
+			view.items.map((f, n) => {
+				const i = view.start + n;
 				const on = at === i;
 				return /* @__PURE__ */ jsxs(Text, {
 					wrap: "truncate-end",
@@ -2991,7 +3169,7 @@ function DetailPanel({ title, subtitle, fields, width, height, keys = {}, hints,
 					]
 				}, f.label);
 			}),
-			below,
+			field?.edit ? null : below,
 			/* @__PURE__ */ jsx(Box, { flexGrow: 1 }),
 			field?.edit ? /* @__PURE__ */ jsx(Editor, {
 				label: field.label,
@@ -3732,6 +3910,60 @@ function renderBriefText(brief, data, workspace = "Harbor") {
 	return composeBriefBodyFrom(brief, data, workspace);
 }
 
+//#endregion
+//#region src/tui/views/letter.tsx
+/**
+* A letter Harbor wrote (the brief, a status report) to read in the
+* terminal: wrapped to the width, ↑↓ and space to read on, and its section
+* headings (a line after a blank one) picked out. `keys` adds the page's own.
+*/
+function Letter({ title, text, hints, width, height, active, keys = {}, onClose }) {
+	const [top, setTop] = useState(0);
+	const lines = useMemo(() => wrapLines(text, width - 2), [text, width]);
+	const rows = Math.max(1, height - 2);
+	const last = Math.max(0, lines.length - rows);
+	const from = Math.min(top, last);
+	const scroll = (by) => setTop((t) => Math.max(0, Math.min(last, t + by)));
+	useInput((input, key) => {
+		if (key.escape && onClose) onClose();
+		else if (key.upArrow || input === "k") scroll(-1);
+		else if (key.downArrow || input === "j") scroll(1);
+		else if (key.pageDown || input === " ") scroll(rows - 1);
+		else if (key.pageUp) scroll(-(rows - 1));
+		else if (keys[input]) {
+			setTop(0);
+			keys[input]();
+		}
+	}, { isActive: active });
+	const right = [
+		lines.length > rows ? "↑↓ read on" : null,
+		hints,
+		onClose ? "Esc back" : null
+	].filter(Boolean).join(" · ");
+	return /* @__PURE__ */ jsxs(Box, {
+		flexDirection: "column",
+		width,
+		height,
+		paddingX: 1,
+		children: [
+			/* @__PURE__ */ jsx(Heading, {
+				right,
+				children: title
+			}),
+			/* @__PURE__ */ jsx(Text, { children: " " }),
+			lines.slice(from, from + rows).map((line, i) => {
+				const heading = line !== "" && !/^[ •]/.test(line) && lines[from + i - 1] === "";
+				return /* @__PURE__ */ jsx(Text, {
+					bold: heading,
+					color: heading ? theme.accent : void 0,
+					wrap: "truncate-end",
+					children: line || " "
+				}, i);
+			})
+		]
+	});
+}
+
 //#endregion
 //#region src/tui/views/brief.tsx
 /**
@@ -3752,7 +3984,6 @@ function BriefView({ active, width, height, go }) {
 	const checkIns = useHarbor((s) => s.checkIns);
 	const constraints = useHarbor((s) => s.constraints);
 	const [portfolio, setPortfolio] = useState(null);
-	const [top, setTop] = useState(0);
 	const day = today();
 	const brief = useMemo(() => {
 		const data = {
@@ -3788,48 +4019,20 @@ function BriefView({ active, width, height, go }) {
 		day,
 		harborName
 	]);
-	const lines = useMemo(() => wrapLines(brief.text.split("\n").slice(2).join("\n"), width - 2), [brief.text, width]);
-	const rows = Math.max(1, height - 2);
-	const last = Math.max(0, lines.length - rows);
-	const scroll = (by) => setTop((t) => Math.max(0, Math.min(last, t + by)));
-	useInput((input, key) => {
-		if (key.upArrow || input === "k") scroll(-1);
-		else if (key.downArrow || input === "j") scroll(1);
-		else if (key.pageDown || input === " ") scroll(rows - 1);
-		else if (key.pageUp) scroll(-(rows - 1));
-		else if (input === "p") go.pick("Brief for which portfolio?", [{
+	return /* @__PURE__ */ jsx(Letter, {
+		title: `Brief · ${brief.scope}`,
+		text: brief.text.split("\n").slice(2).join("\n"),
+		hints: "p portfolio",
+		width,
+		height,
+		active,
+		keys: { p: () => go.pick("Brief for which portfolio?", [{
 			label: "All portfolios",
 			value: null
 		}, ...portfolios.map((p) => ({
 			label: p.name,
 			value: p.id
-		}))], (v) => {
-			setPortfolio(v ?? null);
-			setTop(0);
-		});
-	}, { isActive: active });
-	const shown = lines.slice(Math.min(top, last), Math.min(top, last) + rows);
-	return /* @__PURE__ */ jsxs(Box, {
-		flexDirection: "column",
-		width,
-		height,
-		paddingX: 1,
-		children: [
-			/* @__PURE__ */ jsxs(Heading, {
-				right: `${lines.length > rows ? "↑↓ read on · " : ""}p portfolio`,
-				children: ["Brief · ", brief.scope]
-			}),
-			/* @__PURE__ */ jsx(Text, { children: " " }),
-			shown.map((line, i) => {
-				const heading = line !== "" && !/^[ •]/.test(line) && lines[Math.min(top, last) + i - 1] === "";
-				return /* @__PURE__ */ jsx(Text, {
-					bold: heading,
-					color: heading ? theme.accent : void 0,
-					wrap: "truncate-end",
-					children: line || " "
-				}, i);
-			})
-		]
+		}))], (v) => setPortfolio(v ?? null)) }
 	});
 }
 
@@ -5693,6 +5896,119 @@ function Palette({ width, base, open, onClose }) {
 	});
 }
 
+//#endregion
+//#region src/lib/deps.ts
+/** True when making `id` wait on `candidate` would close a loop (or is `id` itself). */
+function wouldCycle(id, candidate, items) {
+	const byId = new Map(items.map((n) => [n.id, n]));
+	const stack = [candidate];
+	const seen = /* @__PURE__ */ new Set();
+	while (stack.length) {
+		const cursor = stack.pop();
+		if (cursor === id) return true;
+		if (seen.has(cursor)) continue;
+		seen.add(cursor);
+		const node = byId.get(cursor);
+		if (node) stack.push(...blockerIds(node));
+	}
+	return false;
+}
+/**
+* Everything that waits on `id`, directly or through others: the items that
+* would close a loop if `id` waited on them. One walk backwards from `id`,
+* instead of a walk forwards from every candidate.
+*/
+function waitingOnChain(items, id) {
+	const waiters = /* @__PURE__ */ new Map();
+	for (const n of items) for (const b of blockerIds(n)) {
+		const list = waiters.get(b);
+		if (list) list.push(n.id);
+		else waiters.set(b, [n.id]);
+	}
+	const out = /* @__PURE__ */ new Set();
+	const stack = [...waiters.get(id) ?? []];
+	while (stack.length) {
+		const cursor = stack.pop();
+		if (out.has(cursor)) continue;
+		out.add(cursor);
+		stack.push(...waiters.get(cursor) ?? []);
+	}
+	return out;
+}
+/** The things `id` may wait on: everything except itself and anything already waiting on it, directly or through others. */
+function blockerOptions(items, id) {
+	const loops = waitingOnChain(items, id);
+	return items.filter((n) => n.id !== id && !loops.has(n.id));
+}
+
+//#endregion
+//#region src/lib/status-report.ts
+/**
+* A program's status report as Markdown: what a lead pastes into a Friday
+* update or an exec thread. Everything in it is already on the program page;
+* this is the one-page version.
+*/
+function composeStatusReport(data, program, now = /* @__PURE__ */ new Date()) {
+	const projects = projectsInProgram(data, program.id);
+	const tasks = tasksInProgramOf(data, program.id);
+	const done = tasks.filter((t) => t.status === "done").length;
+	const late = lateTasksOf(tasks, now);
+	const milestones = data.milestones.filter((m) => m.programId === program.id);
+	const lateMilestones = lateMilestonesOf(milestones, now);
+	const upcoming = milestones.filter((m) => !m.done && !lateMilestones.includes(m)).sort((a, b) => a.dueDate.localeCompare(b.dueDate)).slice(0, 3);
+	const spent = programSpent(data, program.id);
+	const allocated = programBudgetAllocated(data, program.id);
+	const forecast = forecastRollup(projects, program.budget, now);
+	const owner = data.people.find((p) => p.id === program.ownerId)?.name ?? "Unassigned";
+	const live = sortRaid(programRaidItems(data, program.id).filter((r) => r.kind !== "decision" && isActive(r)));
+	const lines = [];
+	lines.push(`# ${program.name} — status ${shortDate(todayISO(now))}`);
+	lines.push("");
+	lines.push(`**Health:** ${HEALTH_LABEL$1[program.health]}${program.healthNote ? ` — ${program.healthNote}` : ""}`);
+	lines.push(`**Owner:** ${owner} · **Dates:** ${shortDate(program.startDate)} – ${shortDate(program.endDate)}`);
+	lines.push(`**Progress:** ${done} of ${tasks.length} tasks done${late.length ? `, ${late.length} late` : ""}`);
+	if (program.nextMove) lines.push(`**Next move:** ${program.nextMove}`);
+	lines.push("");
+	lines.push("## Budget");
+	if (program.budget > 0 || spent > 0) {
+		lines.push(`- ${money(spent)} spent of ${money(program.budget)}${allocated > program.budget ? ` (projects allocate ${money(allocated)})` : ""}`);
+		if (forecast) {
+			const verdict = forecast.tone === "over" ? `over by ${money(-forecast.variance)}` : forecast.tone === "tight" ? "within 5% of budget" : `under by ${money(forecast.variance)}`;
+			lines.push(`- Forecast at completion ${money(forecast.eac)}, ${verdict}`);
+		}
+	} else lines.push("- No budget set");
+	lines.push("");
+	lines.push("## Milestones");
+	if (milestones.length === 0) lines.push("- None yet");
+	for (const m of lateMilestones) lines.push(`- **Late:** ${m.name}, due ${shortDate(m.dueDate)}`);
+	for (const m of upcoming) {
+		const risk = milestoneRisks(m, data)[0];
+		const note = !risk ? "" : risk.reason === "ends-after" ? ` — **at risk:** waits on ${risk.project.name}, which ends ${shortDate(risk.project.endDate)}` : ` — **at risk:** waits on ${risk.project.name}, which is off track`;
+		lines.push(`- ${m.name}, due ${shortDate(m.dueDate)}${note}`);
+	}
+	const doneCount = milestones.filter((m) => m.done).length;
+	if (doneCount) lines.push(`- ${doneCount} of ${milestones.length} reached`);
+	lines.push("");
+	lines.push("## Projects");
+	if (projects.length === 0) lines.push("- None yet");
+	for (const p of projects) {
+		const own = tasks.filter((t) => t.projectId === p.id);
+		const ownDone = own.filter((t) => t.status === "done").length;
+		lines.push(`- ${p.name}: ${HEALTH_LABEL$1[p.health]}, ${ownDone}/${own.length} done, ${shortDate(p.startDate)} – ${shortDate(p.endDate)}`);
+	}
+	lines.push("");
+	lines.push("## Risks and issues");
+	if (live.length === 0) lines.push("- Nothing open");
+	for (const r of live.slice(0, 8)) {
+		const score = scoreOf(r);
+		const band = score != null ? ` (${scoreBand(score)}, ${score})` : "";
+		const who = data.people.find((p) => p.id === r.ownerId)?.name;
+		lines.push(`- ${r.kind === "risk" ? "Risk" : "Issue"}: ${r.title}${band}${who ? ` — ${who}` : ""}`);
+	}
+	lines.push("");
+	return lines.join("\n");
+}
+
 //#endregion
 //#region src/tui/views/panels.tsx
 /**
@@ -5739,13 +6055,75 @@ function healthField(kind, item, go, set, clear, finished = false) {
 		}
 	};
 }
+/**
+* What a thing waits on, picked from `options`: Enter on one adds it or
+* takes it off, and one that already waits on this (a loop) is refused.
+*/
+function waitsField(label, self, options, go, save, loops = true) {
+	const on = blockerIds(self);
+	const names = options.filter((o) => on.includes(o.id)).map((o) => o.name);
+	const choices = options.filter((o) => o.id !== self.id).map((o) => ({
+		label: `${on.includes(o.id) ? "✓" : " "} ${o.name}`,
+		value: o.id,
+		hint: on.includes(o.id) ? "Enter stops waiting" : void 0
+	}));
+	return {
+		label,
+		value: names.length ? names.join(", ") : "Nothing",
+		edit: choices.length ? {
+			kind: "pick",
+			title: `${label}: Enter adds or takes off one`,
+			choices,
+			onPick: (v) => {
+				const picked = v;
+				if (on.includes(picked)) return save(blockersPatch(on.filter((x) => x !== picked)));
+				if (loops && wouldCycle(self.id, picked, options)) return go.notify("That one already waits on this, so it would go round in a loop.");
+				save(blockersPatch([...on, picked]));
+			}
+		} : void 0
+	};
+}
+/** The lines HealthMoves takes. */
+const movesRows = (history, today) => {
+	const n = healthMoves(history, today).length;
+	return n ? n + 2 : 0;
+};
+/** The last few moves of a thing's health, under its fields. */
+function HealthMoves({ history, today }) {
+	const moves = healthMoves(history, today);
+	if (!moves.length) return null;
+	return /* @__PURE__ */ jsxs(Fragment, { children: [
+		/* @__PURE__ */ jsx(Text, { children: " " }),
+		/* @__PURE__ */ jsxs(Text, {
+			color: theme.muted,
+			children: ["  ", "Health history"]
+		}),
+		moves.map((m, i) => /* @__PURE__ */ jsxs(Text, {
+			wrap: "truncate-end",
+			children: ["  ", m]
+		}, i))
+	] });
+}
+const CONSTRAINT_KINDS = Object.keys(CONSTRAINT_KIND_LABEL);
 function ProgramPanel({ id, width, height, go, active, onClose }) {
 	const { store, today } = useDeps();
 	const program = useHarbor((s) => s.programs.find((p) => p.id === id));
 	const people = useHarbor((s) => s.people);
 	const portfolios = useHarbor((s) => s.portfolios);
+	const programs = useHarbor((s) => s.programs);
+	const projects = useHarbor((s) => s.projects);
+	const constraint = useHarbor((s) => s.constraints.find((c) => c.programId === id && c.status === "active"));
 	if (!program) return null;
 	const s = store.getState();
+	const inProgram = projects.filter((p) => p.programId === id);
+	const baselined = inProgram.filter(hasBaseline);
+	const holding = (patch) => store.getState().setConstraint(id, {
+		title: constraint?.title ?? "",
+		kind: constraint?.kind ?? "resource",
+		ownerId: constraint?.ownerId ?? null,
+		note: constraint?.note ?? "",
+		...patch
+	});
 	const fields = [
 		{
 			label: "Name",
@@ -5808,6 +6186,79 @@ function ProgramPanel({ id, width, height, go, active, onClose }) {
 				onPick: (v) => store.getState().updateProgram(id, { portfolioId: v })
 			}
 		},
+		{
+			label: "Budget",
+			value: money(program.budget),
+			edit: {
+				kind: "number",
+				initial: program.budget,
+				min: 0,
+				onSave: (v) => store.getState().updateProgram(id, { budget: v ?? 0 })
+			}
+		},
+		{
+			label: "Impact",
+			value: `${program.impact ?? 5} of 10${program.impact == null ? " (not set)" : ""}`,
+			edit: {
+				kind: "number",
+				initial: program.impact ?? 5,
+				min: 1,
+				max: 10,
+				onSave: (v) => v != null && store.getState().updateProgram(id, { impact: Math.round(v) })
+			}
+		},
+		{
+			label: "Holding it back",
+			value: constraint ? `${constraint.title} (${CONSTRAINT_KIND_LABEL[constraint.kind].toLowerCase()})` : "Nothing named",
+			edit: {
+				kind: "text",
+				initial: constraint?.title ?? "",
+				placeholder: "The one thing that sets the pace; empty when it's cleared",
+				onSave: (v) => v.trim() ? holding({ title: v.trim() }) : constraint && store.getState().resolveConstraint(constraint.id)
+			}
+		},
+		...constraint ? [{
+			label: "What kind",
+			value: CONSTRAINT_KIND_LABEL[constraint.kind],
+			edit: {
+				kind: "pick",
+				choices: CONSTRAINT_KINDS.map((k) => ({
+					label: CONSTRAINT_KIND_LABEL[k],
+					value: k,
+					hint: CONSTRAINT_KIND_HINT[k]
+				})),
+				initial: CONSTRAINT_KINDS.indexOf(constraint.kind),
+				onPick: (v) => holding({ kind: v })
+			}
+		}, {
+			label: "Who clears it",
+			value: people.find((p) => p.id === constraint.ownerId)?.name ?? "Nobody yet",
+			edit: {
+				kind: "pick",
+				choices: peopleChoices(people, true),
+				initial: Math.max(0, people.findIndex((p) => p.id === constraint.ownerId) + 1),
+				onPick: (v) => holding({ ownerId: v })
+			}
+		}] : [],
+		waitsField("Waits on", program, programs, go, (patch) => store.getState().updateProgram(id, patch)),
+		{
+			label: "Baseline",
+			value: !inProgram.length ? "No projects yet" : baselined.length === inProgram.length ? "Set on every project" : baselined.length ? `Set on ${baselined.length} of ${inProgram.length} projects` : "Not set",
+			edit: inProgram.length ? {
+				kind: "pick",
+				title: "The plan to measure slips against",
+				choices: [...baselined.length < inProgram.length ? [{
+					label: "Set it where it's missing",
+					value: "set",
+					hint: "today's dates become the plan"
+				}] : [], ...baselined.length ? [{
+					label: "Reset every project to today's dates",
+					value: "reset",
+					hint: "slips start from zero"
+				}] : []],
+				onPick: (v) => store.getState().snapshotBaseline(id, v === "reset")
+			} : void 0
+		},
 		{
 			label: "About",
 			value: program.description.replace(/\s+/g, " "),
@@ -5827,23 +6278,33 @@ function ProgramPanel({ id, width, height, go, active, onClose }) {
 		fields,
 		width,
 		height,
-		hints: "d delete",
-		keys: { d: () => {
-			const what = deleteSummary(store.getState(), "program", id);
-			go.confirm(`Delete the program “${program.name}”${what ? ` and ${what}` : ""}? u undoes it.`, () => {
-				store.getState().deleteEntity("program", id);
-				onClose();
-			}, "Delete");
-		} },
+		hints: "r status report · d delete",
+		below: /* @__PURE__ */ jsx(HealthMoves, {
+			history: program.healthHistory,
+			today: today()
+		}),
+		belowRows: movesRows(program.healthHistory, today()),
+		keys: {
+			r: () => go.read(`Status report · ${program.name}`, markdownToPlain(composeStatusReport(store.getState(), program))),
+			d: () => {
+				const what = deleteSummary(store.getState(), "program", id);
+				go.confirm(`Delete the program “${program.name}”${what ? ` and ${what}` : ""}? u undoes it.`, () => {
+					store.getState().deleteEntity("program", id);
+					onClose();
+				}, "Delete");
+			}
+		},
 		active,
 		onClose
 	});
 }
 function PortfolioPanel({ id, width, height, go, active, onClose }) {
-	const { store } = useDeps();
+	const { store, today } = useDeps();
+	const stored = useHarbor((s) => s.priorityRules);
 	const portfolio = useHarbor((s) => s.portfolios.find((p) => p.id === id));
 	const people = useHarbor((s) => s.people);
 	if (!portfolio) return null;
+	const rules = normalizeRules(stored);
 	const fields = [
 		{
 			label: "Name",
@@ -5884,6 +6345,34 @@ function PortfolioPanel({ id, width, height, go, active, onClose }) {
 				min: 0,
 				onSave: (v) => store.getState().updatePortfolio(id, { budget: v ?? 0 })
 			}
+		},
+		{
+			label: "High impact from",
+			value: `${rules.impactThreshold} of 10${stored ? "" : " (the usual)"}`,
+			edit: {
+				kind: "number",
+				initial: rules.impactThreshold,
+				min: 1,
+				max: 10,
+				onSave: (v) => store.getState().setPriorityRules({
+					...rules,
+					impactThreshold: v ?? DEFAULT_RULES.impactThreshold
+				})
+			}
+		},
+		{
+			label: "High budget from",
+			value: `${Math.round(rules.budgetShare * 100)}% of the largest program's${stored ? "" : " (the usual)"}`,
+			edit: {
+				kind: "number",
+				initial: Math.round(rules.budgetShare * 100),
+				min: 5,
+				max: 100,
+				onSave: (v) => store.getState().setPriorityRules({
+					...rules,
+					budgetShare: (v ?? DEFAULT_RULES.budgetShare * 100) / 100
+				})
+			}
 		}
 	];
 	return /* @__PURE__ */ jsx(DetailPanel, {
@@ -5896,6 +6385,11 @@ function PortfolioPanel({ id, width, height, go, active, onClose }) {
 		width,
 		height,
 		hints: "d delete",
+		below: /* @__PURE__ */ jsx(HealthMoves, {
+			history: portfolio.healthHistory,
+			today: today()
+		}),
+		belowRows: movesRows(portfolio.healthHistory, today()),
 		keys: { d: () => {
 			const what = deleteSummary(store.getState(), "portfolio", id);
 			go.confirm(`Delete the portfolio “${portfolio.name}”${what ? ` and ${what}` : ""}? u undoes it.`, () => {
@@ -5913,8 +6407,14 @@ function ProjectPanel({ id, width, height, go, active, onClose }) {
 	const tasks = useHarbor((s) => s.tasks);
 	const people = useHarbor((s) => s.people);
 	const programs = useHarbor((s) => s.programs);
+	const projects = useHarbor((s) => s.projects);
 	if (!project) return null;
 	const up = (patch) => store.getState().updateProject(id, patch);
+	const planned = plannedByMonth(project);
+	const months = monthsBetween(project.startDate, project.endDate);
+	const monthName = (key) => format(parseIso(`${key}-01`), "MMM yyyy");
+	const waits = blockerIds(project);
+	const slip = slipLabel(project);
 	const fields = [
 		{
 			label: "Name",
@@ -5987,6 +6487,45 @@ function ProjectPanel({ id, width, height, go, active, onClose }) {
 				onPick: (v) => store.getState().moveProjects([id], v)
 			}
 		},
+		{
+			label: "Plan by month",
+			value: hasOwnPhasing(project) ? "Set by hand" : "Spread evenly",
+			edit: months.length ? {
+				kind: "pick",
+				title: "Pick a month to change what it plans to spend",
+				choices: [...months.map((k) => ({
+					label: `${monthName(k)}  ${money(planned[k] ?? 0)}`,
+					value: k
+				})), ...hasOwnPhasing(project) ? [{
+					label: "Back to an even spread",
+					value: null
+				}] : []],
+				onPick: (v) => v == null ? up({ phasing: null }) : go.ask(`Planned for ${monthName(v)}`, (text) => {
+					const n = Number(text.replace(/[$,\s]/g, ""));
+					if (!Number.isFinite(n) || n < 0) return go.notify(`“${text}” isn't an amount.`);
+					up({ phasing: withMonth(project, v, n) });
+				}, String(planned[v] ?? 0))
+			} : void 0
+		},
+		waitsField("Waits on", project, projects, go, (patch) => up({
+			...patch,
+			lagDays: patch.blockedByIds.length ? project.lagDays : null
+		})),
+		...waits.length ? [{
+			label: "Lag days",
+			value: project.lagDays ? `${project.lagDays} after they finish` : "None",
+			edit: {
+				kind: "number",
+				initial: project.lagDays ?? null,
+				min: 0,
+				onSave: (v) => up({ lagDays: v ? Math.round(v) : null })
+			}
+		}] : [],
+		{
+			label: "Baseline",
+			value: hasBaseline(project) ? `${shortDay(project.baselineStart, today())} to ${shortDay(project.baselineEnd, today())}${slip ? `, ${slip}` : ""}` : "Not set (set it on the program)",
+			color: slip?.startsWith("slipped") ? theme.bad : void 0
+		},
 		{
 			label: "Key",
 			value: project.key ?? ""
@@ -6011,6 +6550,11 @@ function ProjectPanel({ id, width, height, go, active, onClose }) {
 		width,
 		height,
 		hints: "d delete",
+		below: /* @__PURE__ */ jsx(HealthMoves, {
+			history: project.healthHistory,
+			today: today()
+		}),
+		belowRows: movesRows(project.healthHistory, today()),
 		keys: { d: () => {
 			const what = deleteSummary(store.getState(), "project", id);
 			go.confirm(`Delete the project “${project.name}”${what ? ` and ${what}` : ""}? u undoes it.`, () => {
@@ -6022,13 +6566,25 @@ function ProjectPanel({ id, width, height, go, active, onClose }) {
 		onClose
 	});
 }
+const SIGN_OFF = {
+	pending: "Waiting for sign-off",
+	approved: "Approved",
+	changes_requested: "Changes requested"
+};
 function MilestonePanel({ id, width, height, go, active, onClose }) {
 	const { store, today } = useDeps();
 	const milestone = useHarbor((s) => s.milestones.find((m) => m.id === id));
 	const people = useHarbor((s) => s.people);
+	const projects = useHarbor((s) => s.projects);
+	const me = useHarbor((s) => s.currentUserId);
 	if (!milestone) return null;
 	const up = (patch) => store.getState().updateMilestone(id, patch);
 	const late = !milestone.done && milestone.dueDate < today();
+	const gated = Boolean(milestone.approverId);
+	const approver = people.find((p) => p.id === milestone.approverId);
+	const status = milestone.approvalStatus ?? "pending";
+	const inProgram = projects.filter((p) => p.programId === milestone.programId);
+	const risks = milestoneRisks(milestone, store.getState());
 	const fields = [
 		{
 			label: "Name",
@@ -6051,8 +6607,8 @@ function MilestonePanel({ id, width, height, go, active, onClose }) {
 		},
 		{
 			label: "Done",
-			value: milestone.done ? "Yes" : "Not yet",
-			edit: {
+			value: milestone.done ? "Yes" : gated ? "Not yet (the sign-off ticks it)" : "Not yet",
+			edit: gated ? void 0 : {
 				kind: "pick",
 				choices: [{
 					label: "Not yet",
@@ -6067,14 +6623,49 @@ function MilestonePanel({ id, width, height, go, active, onClose }) {
 		},
 		{
 			label: "Signs off",
-			value: people.find((p) => p.id === milestone.approverId)?.name ?? "Nobody (no sign-off)",
+			value: approver?.name ?? "Nobody (no sign-off)",
 			edit: {
 				kind: "pick",
+				title: "Who signs it off? Nobody else can tick it done.",
 				choices: peopleChoices(people, true),
 				initial: Math.max(0, people.findIndex((p) => p.id === milestone.approverId) + 1),
-				onPick: (v) => up({ approverId: v })
+				onPick: (v) => v ? v !== milestone.approverId && up({
+					approverId: v,
+					approvalStatus: "pending",
+					done: false
+				}) : up({
+					approverId: null,
+					approvalStatus: null,
+					approvalNote: null
+				})
 			}
-		}
+		},
+		...gated ? [{
+			label: "Sign-off",
+			value: `${SIGN_OFF[status]}${status === "changes_requested" && milestone.approvalNote ? `: ${milestone.approvalNote}` : ""}`,
+			color: status === "approved" ? theme.good : status === "pending" ? void 0 : theme.bad,
+			edit: milestone.approverId === me && status !== "approved" ? {
+				kind: "pick",
+				title: "Your sign-off",
+				choices: [{
+					label: "Approve",
+					value: "approve",
+					hint: "ticks it done"
+				}, {
+					label: "Request changes",
+					value: "changes"
+				}],
+				onPick: (v) => v === "approve" ? up({
+					approvalStatus: "approved",
+					done: true
+				}) : go.ask("What needs changing?", (note) => up({
+					approvalStatus: "changes_requested",
+					approvalNote: note.trim() || null,
+					done: false
+				}))
+			} : void 0
+		}] : [],
+		waitsField("Waits on", milestone, inProgram, go, (patch) => up(patch), false)
 	];
 	return /* @__PURE__ */ jsx(DetailPanel, {
 		title: /* @__PURE__ */ jsx(Text, {
@@ -6085,14 +6676,25 @@ function MilestonePanel({ id, width, height, go, active, onClose }) {
 		fields,
 		width,
 		height,
-		hints: "space done · d delete",
+		hints: gated ? "d delete" : "space done · d delete",
 		keys: {
-			" ": () => store.getState().toggleMilestone(id),
+			" ": () => gated ? go.notify(`${approver?.name ?? "The approver"} ticks this off by signing it off.`) : store.getState().toggleMilestone(id),
 			d: () => go.confirm(`Delete the milestone “${milestone.name}”? u undoes it.`, () => {
 				store.getState().deleteMilestone(id);
 				onClose();
 			}, "Delete")
 		},
+		belowRows: risks.length ? risks.length + 1 : 0,
+		below: risks.length ? /* @__PURE__ */ jsxs(Fragment, { children: [/* @__PURE__ */ jsx(Text, { children: " " }), risks.map((r) => /* @__PURE__ */ jsxs(Text, {
+			color: theme.bad,
+			wrap: "truncate-end",
+			children: [
+				"  ",
+				"At risk:",
+				" ",
+				r.reason === "ends-after" ? `${r.project.name} ends ${shortDay(r.project.endDate, today())}` : `${r.project.name} is off track`
+			]
+		}, r.project.id))] }) : null,
 		active,
 		onClose
 	});
@@ -7709,36 +8311,6 @@ function RoadmapView({ active, width, height, go }) {
 	});
 }
 
-//#endregion
-//#region src/lib/deps.ts
-/**
-* Everything that waits on `id`, directly or through others: the items that
-* would close a loop if `id` waited on them. One walk backwards from `id`,
-* instead of a walk forwards from every candidate.
-*/
-function waitingOnChain(items, id) {
-	const waiters = /* @__PURE__ */ new Map();
-	for (const n of items) for (const b of blockerIds(n)) {
-		const list = waiters.get(b);
-		if (list) list.push(n.id);
-		else waiters.set(b, [n.id]);
-	}
-	const out = /* @__PURE__ */ new Set();
-	const stack = [...waiters.get(id) ?? []];
-	while (stack.length) {
-		const cursor = stack.pop();
-		if (out.has(cursor)) continue;
-		out.add(cursor);
-		stack.push(...waiters.get(cursor) ?? []);
-	}
-	return out;
-}
-/** The things `id` may wait on: everything except itself and anything already waiting on it, directly or through others. */
-function blockerOptions(items, id) {
-	const loops = waitingOnChain(items, id);
-	return items.filter((n) => n.id !== id && !loops.has(n.id));
-}
-
 //#endregion
 //#region src/lib/recurrence.ts
 const REPEAT_LABEL = {
@@ -8589,6 +9161,11 @@ function App({ ui }) {
 			choices,
 			then
 		}),
+		read: (title, text) => setOverlay({
+			kind: "read",
+			title,
+			text
+		}),
 		notify
 	};
 	const goScreen = (next) => {
@@ -8632,6 +9209,11 @@ function App({ ui }) {
 			hint: "make",
 			run: () => go.create("program")
 		},
+		{
+			label: "New portfolio",
+			hint: "make",
+			run: () => go.create("portfolio")
+		},
 		{
 			label: "Log a risk, issue or decision",
 			hint: "make",
@@ -8754,7 +9336,10 @@ function App({ ui }) {
 				close();
 				const id = commitCreate(store, what, values, ctx, today());
 				if (!id) return notify("There's nowhere to put that yet.");
-				if (what === "project") {
+				if (what === "portfolio") {
+					notify(`Made ${String(values.name)}.`);
+					go.openPortfolio(id);
+				} else if (what === "project") {
 					notify(`Made ${String(values.name)}.`);
 					go.openProject(id);
 				} else if (what === "program") {
@@ -8804,7 +9389,15 @@ function App({ ui }) {
 				}
 			})
 		});
-	} else if (overlay?.kind === "pick") {
+	} else if (overlay?.kind === "read") overlayNode = /* @__PURE__ */ jsx(Letter, {
+		title: overlay.title,
+		text: overlay.text,
+		width: mainWidth,
+		height: bodyHeight,
+		active: true,
+		onClose: close
+	});
+	else if (overlay?.kind === "pick") {
 		const { title, choices, then } = overlay;
 		overlayNode = /* @__PURE__ */ jsx(Box, {
 			width: mainWidth,

package/lib/cli.mjs

@@ -110,6 +110,7 @@ export const HELP = `harbor: Harbor from the terminal
   harbor brief [--portfolio P] [--say]        the weekly brief, ready to send;
                                               --say reads it aloud as a
                                               shipping forecast
+  harbor report PROGRAM                       a program's status report
   harbor premortem PROJECT ["WHAT WENT WRONG"] [--start]
                                               a project's pre-mortem: start,
                                               answer or read it
@@ -1266,6 +1267,12 @@ export async function run(argv, io = {}) {
         (r) => raidList(r, positionals.join(" ")),
       );
     }
+    case "report": {
+      const { positionals, harbor } = parse(spec([]));
+      const program = positionals.join(" ").trim();
+      if (!program) throw new HarborError('Give a program: harbor report "NAME".');
+      return call("status_report", { harbor, program }, (r) => r.markdown);
+    }
     case "premortem": {
       const { positionals, values, harbor } = parse(spec(["start"]));
       const [project, ...words] = positionals;

package/package.json

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