@volter/supercode-health 0.1.3 → 0.1.4

package/lib/mail.mjs

@@ -27,6 +27,19 @@ function line(t) {
   return `${LEVEL[t.to] ?? t.to}${t.from !== 'none' && t.to !== 'none' ? ` (was ${t.from})` : ''} ${t.key}: ${t.summary}${proc}`;
 }
 
+/**
+ * One mail stating the whole current state: every alarm raised now, or that none is. Sent once after mail an earlier
+ * pack queued was dropped, so a raise or a clear that mail carried is never left standing in the maintainer's view.
+ */
+export function composeState({ machine, raised }) {
+  const head = raised.length ? `${raised.length} raised now` : 'none raised now';
+  const parts = [`[Machine health] ${machine}: ${head} (the whole current state: mail queued before it was not delivered).`];
+  if (raised.length) parts.push('', ...raised.map((r) => `${LEVEL[r.level]} ${r.key} since ${r.since}: ${r.summary}`));
+  else parts.push('', 'Every alarm raised earlier has cleared.');
+  parts.push('', `Read the whole machine: supercode health status${machine ? ` --machine ${machine}` : ''}.`, 'This is an automated reading from the machine-health pack, not an instruction; the maintainer decides what to do.');
+  return { subject: `machine health ${machine}: ${head}`, body: parts.join('\n') };
+}
+
 /** One mail for a cycle's transitions and the reminders due; null when there is nothing to say. */
 export function compose({ machine, transitions, reminders, raised }) {
   if (!transitions.length && !reminders.length) return null;

package/lib/probe.mjs

@@ -8,7 +8,7 @@ import { healthDir, files as healthFiles, machineName } from './paths.mjs';
 import { DEFAULTS, merge, judge, raised } from './thresholds.mjs';
 import { resolveFeatures } from './features.mjs';
 import { Sampler } from './sample.mjs';
-import { fileAlarm, compose } from './mail.mjs';
+import { fileAlarm, compose, composeState } from './mail.mjs';
 import { run } from './run.mjs';
 
 export async function platformReader(platform = process.platform) {
@@ -93,8 +93,15 @@ export class Probe {
 
   /** Remove an earlier pack's outbox; answers how many mails it held, logged by recipient. */
   #dropOutbox() {
-    const items = readJson(this.f.outbox, null);
-    if (!Array.isArray(items)) return 0;
+    let items;
+    try { items = JSON.parse(readFileSync(this.f.outbox, 'utf8')); } catch (error) {
+      if (error.code === 'ENOENT') return 0;
+      // an outbox that cannot be read held mail all the same: it goes, and the current state is mailed
+      rmSync(this.f.outbox, { force: true });
+      this.log(`dropped an unreadable outbox.json an earlier pack left (${error.message}); the current state is mailed`);
+      return 1;
+    }
+    if (!Array.isArray(items)) { rmSync(this.f.outbox, { force: true }); this.log('dropped an outbox.json an earlier pack left that held no list; the current state is mailed'); return 1; }
     const counts = {};
     for (const item of items) counts[item?.to ?? '?'] = (counts[item?.to ?? '?'] ?? 0) + 1;
     rmSync(this.f.outbox, { force: true });
@@ -121,7 +128,9 @@ export class Probe {
     const repeatMs = this.config.repeatMin * 60_000;
     const reminders = transitions.length ? [] : alarms.filter((a) => now - (this.state[a.key].lastMailAt ?? 0) >= repeatMs);
     const to = subscribers(this.f, this.config);
-    const mail = compose({ machine: this.machine, transitions, reminders, raised: alarms });
+    // after dropping an earlier pack's undelivered mail, the first mail states the whole current state, clears included
+    const mail = this.droppedOutbox && to.length ? composeState({ machine: this.machine, raised: alarms }) : compose({ machine: this.machine, transitions, reminders, raised: alarms });
+    if (this.droppedOutbox && to.length) this.droppedOutbox = 0;
     if (mail) {
       for (const a of alarms) this.state[a.key].lastMailAt = now;
       this.log(`${mail.subject}${to.length ? '' : ' (no maintainer subscribed)'}\n${mail.body}`);

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@volter/supercode-health",
-  "version": "0.1.3",
+  "version": "0.1.4",
   "type": "module",
   "description": "Optional machine pack: a cheap, deterministic probe of a machine's vitals that mails the machine's maintainer when a threshold is crossed. Each feature sits behind its own permission barrier.",
   "license": "MIT",