@crombolo/schema 0.12.1 → 0.13.1

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@crombolo/schema",
-  "version": "0.12.1",
+  "version": "0.13.1",
   "description": "Schema-as-code for crombolo: TOML document, media and member type definitions.",
   "license": "MIT",
   "author": "Crombolo",
@@ -28,7 +28,7 @@
     "access": "public"
   },
   "dependencies": {
-    "@crombolo/core": "0.12.1",
-    "@crombolo/data": "0.12.1"
+    "@crombolo/core": "0.13.1",
+    "@crombolo/data": "0.13.1"
   }
 }

package/src/index.ts

@@ -15,5 +15,6 @@ export * from './validate.ts'
 export * from './validate-forms.ts'
 export * from './value-migrations.ts'
 export * from './version.ts'
+export * from './workflows.ts'
 export * from './write.ts'
 export * from './write-forms.ts'

package/src/load.ts

@@ -8,7 +8,7 @@
 import { createHash } from 'node:crypto'
 import { existsSync, readdirSync, readFileSync } from 'node:fs'
 import { join } from 'node:path'
-import type { FormTypes } from '@crombolo/core'
+import type { FormTypes, SchemaWorkflow } from '@crombolo/core'
 import type { SchemaForm } from './forms.ts'
 import type {
   SchemaContentType,
@@ -28,6 +28,7 @@ import {
   parseSchemaSettings,
 } from './parse.ts'
 import { parseForm } from './parse-forms.ts'
+import { parseWorkflow, writeWorkflow } from './workflows.ts'
 import {
   writeContentType,
   writeDataType,
@@ -124,6 +125,15 @@ export function loadSchemaDirectory(
       files.set(`form:${parsed.value.alias}`, file)
     }
   }
+  const workflows: SchemaWorkflow[] = []
+  for (const file of tomlFiles(join(schemaDir, 'workflows'))) {
+    const parsed = parseWorkflow(rel(file), readFileSync(file, 'utf8'))
+    problems.push(...parsed.problems)
+    if (parsed.value) {
+      workflows.push(parsed.value)
+      files.set(`workflow:${parsed.value.alias}`, file)
+    }
+  }
   const languagesFile = join(schemaDir, 'languages.toml')
   if (existsSync(languagesFile)) {
     const parsed = parseLanguages(rel(languagesFile), readFileSync(languagesFile, 'utf8'))
@@ -139,6 +149,7 @@ export function loadSchemaDirectory(
       dataTypes,
       languages,
       forms,
+      ...(workflows.length > 0 ? { workflows } : {}),
       ...(urls ? { urls } : {}),
     },
     problems,
@@ -158,6 +169,8 @@ export function hashSchemaSet(set: SchemaSet): string {
     ...set.dataTypes.map((d) => writeDataType(d)).sort(),
     writeLanguages([...set.languages].sort((a, b) => a.iso.localeCompare(b.iso))),
     ...(set.forms ?? []).map((f) => writeForm(f)).sort(),
+    // Absent from a set with none, so every hash taken before workflows stands.
+    ...(set.workflows ?? []).map((w) => writeWorkflow(w)).sort(),
   ]
   return createHash('sha256').update(parts.join('\n---\n')).digest('hex')
 }

package/src/model.ts

@@ -1,4 +1,4 @@
-import type { SchemaForm } from '@crombolo/core'
+import type { SchemaForm, SchemaWorkflow } from '@crombolo/core'
 
 /**
  * The schema-as-code model: what a site's `schema/*.toml` files describe.
@@ -114,6 +114,8 @@ export interface SchemaSet {
   forms?: SchemaForm[]
   /** `[urls]` in schema/schema.toml; Umbraco's defaults when absent. */
   urls?: SchemaUrls
+  /** `schema/workflows/*.toml` — approval workflows; see `docs/workflows.md`. */
+  workflows?: SchemaWorkflow[]
 }
 
 /** How URLs are built, as Umbraco's `Umbraco:CMS:Global` settings set it. */

package/src/sync.ts

@@ -28,8 +28,10 @@ import {
   SYSTEM_MEDIA_TYPES,
   SYSTEM_MEMBER_TYPE,
   sameUrlOptions,
+  syncWorkflows,
   type UrlOptions,
   updateSchemaStateHash,
+  type WorkflowSyncReport,
   writeUrlOptions,
 } from '@crombolo/data'
 import { BUILTIN_DATA_TYPES, storageTypeFor, systemPropertyKeys } from './builtin.ts'
@@ -43,6 +45,7 @@ import {
   typeFileKey,
 } from './model.ts'
 import { validateSchemaSet } from './validate.ts'
+import { workflowVersion } from './workflows.ts'
 
 export interface SyncNode extends NodeSchemaState {
   nodeId: string
@@ -97,6 +100,8 @@ export interface SyncReport {
   deferred: string[]
   /** Set when the sync changed how URLs are built, so the old ones can be redirected. */
   urls?: { before: UrlOptions; after: UrlOptions }
+  /** Set when a workflow changed, with what that did to requests in flight. */
+  workflows?: WorkflowSyncReport
 }
 
 export const emptySyncReport = (
@@ -286,6 +291,16 @@ export async function syncSchema(
           const urls = { hideTopLevel: set.urls?.hideTopLevel ?? DEFAULT_URL_OPTIONS.hideTopLevel }
           const before = await writeUrlOptions(tx, urls)
           if (!sameUrlOptions(before, urls)) report.urls = { before, after: urls }
+          // Approval workflows likewise: only a current sync changes the rules
+          // that pages are published under.
+          const workflows = await syncWorkflows(
+            tx,
+            (set.workflows ?? []).map((workflow) => ({
+              workflow,
+              version: workflowVersion(workflow),
+            })),
+          )
+          if (workflows.changed.length > 0) report.workflows = workflows
         }
 
         // ---- templates referenced by types must have a row

package/src/validate.ts

@@ -2,6 +2,7 @@
  * Whole-set validation. Every problem is reported, not just the first, because
  * a person fixing a schema wants the full list.
  */
+
 import { SYSTEM_MEDIA_TYPES, SYSTEM_MEMBER_TYPE } from '@crombolo/data'
 import {
   BUILTIN_DATA_TYPE_ALIASES,
@@ -18,6 +19,7 @@ import {
   TYPE_KIND_FILES,
 } from './model.ts'
 import { type ValidateFormsOptions, validateForms } from './validate-forms.ts'
+import { validateWorkflows } from './workflows.ts'
 
 export interface ValidateOptions extends ValidateFormsOptions {
   /** Template aliases that exist as view files; omit to skip template checks. */
@@ -220,6 +222,12 @@ export function validateSchemaSet(set: SchemaSet, options: ValidateOptions = {})
         options.contentTypeAliases ?? new Set(set.contentTypes.map((t) => t.alias)),
     }),
   )
+  problems.push(
+    ...validateWorkflows(
+      set.workflows ?? [],
+      options.contentTypeAliases ?? new Set(set.contentTypes.map((t) => t.alias)),
+    ),
+  )
   return problems
 }
 

package/src/workflows.ts

@@ -0,0 +1,229 @@
+/**
+ * `schema/workflows/*.toml` — approval workflows (story 028). TOML in and out,
+ * strict as the type parser is, and canonical on the way out so the designer
+ * writes a file a person reads in a diff: `parseWorkflow(writeWorkflow(x))`
+ * equals `x`. The graph rules are `@crombolo/core`'s. `docs/workflows.md`.
+ */
+import {
+  type SchemaWorkflow,
+  SEND_BACK_TO_EDITOR,
+  type StageRequirement,
+  WORKFLOW_COMMENTS,
+  WORKFLOW_ON_CHANGE,
+  WORKFLOW_ON_EDIT,
+  WORKFLOW_SELF_APPROVAL,
+  type WorkflowStage,
+  workflowGraphProblems,
+} from '@crombolo/core'
+import type { SchemaProblem } from './model.ts'
+import { type ParseResult, Reader, type Toml, toml } from './reader.ts'
+
+const WORKFLOW_KEYS = [
+  'key',
+  'alias',
+  'name',
+  'applies-to',
+  'publishers-may-skip',
+  'on-edit',
+  'self-approval',
+  'comments',
+  'unpublish',
+  'on-change',
+] as const
+const APPLIES_KEYS = ['branches', 'content-types'] as const
+const STAGE_KEYS = [
+  'alias',
+  'name',
+  'approvers',
+  'required',
+  'next',
+  'send-back',
+  'position',
+] as const
+const POSITION_KEYS = ['x', 'y'] as const
+
+function choice<T extends string>(
+  r: Reader,
+  t: Toml,
+  key: string,
+  path: string,
+  allowed: readonly T[],
+  fallback: T,
+): T {
+  const value = r.str(t, key, path)
+  if (value === undefined) return fallback
+  if (!(allowed as readonly string[]).includes(value)) {
+    r.problem(`${path}.${key}`, `expected one of ${allowed.join(', ')}`)
+    return fallback
+  }
+  return value as T
+}
+
+function requirement(r: Reader, t: Toml, path: string): StageRequirement {
+  const value = t.required
+  if (value === undefined) return 'one'
+  if (typeof value === 'number') return value
+  if (value === 'one' || value === 'majority' || value === 'all') return value
+  r.problem(`${path}.required`, 'expected one, majority, all, or a number')
+  return 'one'
+}
+
+function stage(r: Reader, t: Toml, path: string): WorkflowStage {
+  r.unknown(t, STAGE_KEYS, path)
+  let position: WorkflowStage['position']
+  if (t.position !== undefined) {
+    const p = r.table(t.position, `${path}.position`)
+    if (p) {
+      r.unknown(p, POSITION_KEYS, `${path}.position`)
+      position = {
+        x: r.num(p, 'x', `${path}.position`) ?? 0,
+        y: r.num(p, 'y', `${path}.position`) ?? 0,
+      }
+    }
+  }
+  return {
+    alias: r.str(t, 'alias', path, true) ?? '',
+    ...(r.str(t, 'name', path) !== undefined ? { name: r.str(t, 'name', path) } : {}),
+    approvers: r.strs(t, 'approvers', path),
+    required: requirement(r, t, path),
+    next: r.strs(t, 'next', path),
+    sendBack: r.str(t, 'send-back', path) ?? SEND_BACK_TO_EDITOR,
+    ...(position ? { position } : {}),
+  }
+}
+
+export function parseWorkflow(file: string, source: string): ParseResult<SchemaWorkflow> {
+  const r = new Reader(file)
+  const root = toml(source, r)
+  if (!root) return { value: undefined, problems: r.problems }
+  r.unknown(root, ['workflow', 'stage'], '')
+  const t = r.table(root.workflow, 'workflow')
+  if (!t) {
+    r.problem('workflow', 'a [workflow] table is required')
+    return { value: undefined, problems: r.problems }
+  }
+  const path = 'workflow'
+  r.unknown(t, WORKFLOW_KEYS, path)
+  let appliesTo = { branches: [] as string[], contentTypes: [] as string[] }
+  if (t['applies-to'] !== undefined) {
+    const a = r.table(t['applies-to'], `${path}.applies-to`)
+    if (a) {
+      r.unknown(a, APPLIES_KEYS, `${path}.applies-to`)
+      appliesTo = {
+        branches: r.strs(a, 'branches', `${path}.applies-to`).map((k) => k.toLowerCase()),
+        contentTypes: r.strs(a, 'content-types', `${path}.applies-to`),
+      }
+    }
+  }
+  const value: SchemaWorkflow = {
+    ...(r.str(t, 'key', path) !== undefined ? { key: r.str(t, 'key', path) } : {}),
+    alias: r.str(t, 'alias', path, true) ?? '',
+    name: r.str(t, 'name', path, true) ?? '',
+    appliesTo,
+    publishersMaySkip: r.bool(t, 'publishers-may-skip', path, true),
+    onEdit: choice(r, t, 'on-edit', path, WORKFLOW_ON_EDIT, 'withdraw'),
+    selfApproval: choice(r, t, 'self-approval', path, WORKFLOW_SELF_APPROVAL, 'refused'),
+    comments: choice(r, t, 'comments', path, WORKFLOW_COMMENTS, 'optional'),
+    unpublish: r.bool(t, 'unpublish', path, false),
+    onChange: choice(r, t, 'on-change', path, WORKFLOW_ON_CHANGE, 'keep'),
+    stages: r.tables(root.stage, 'stage').map((s, i) => stage(r, s, `stage[${i}]`)),
+  }
+  if (r.problems.length === 0)
+    for (const problem of workflowGraphProblems(value)) r.problem(problem.path, problem.message)
+  return { value: r.problems.length === 0 ? value : undefined, problems: r.problems }
+}
+
+const str = (value: string) => JSON.stringify(value)
+const list = (values: readonly string[]) => `[${values.map(str).join(', ')}]`
+
+/** A workflow as canonical TOML: a fixed key order, defaults written out. */
+export function writeWorkflow(workflow: SchemaWorkflow): string {
+  const out = ['[workflow]']
+  if (workflow.key) out.push(`key = ${str(workflow.key)}`)
+  out.push(`alias = ${str(workflow.alias)}`, `name = ${str(workflow.name)}`)
+  out.push(
+    `applies-to = { branches = ${list(workflow.appliesTo.branches)}, content-types = ${list(workflow.appliesTo.contentTypes)} }`,
+    `publishers-may-skip = ${workflow.publishersMaySkip}`,
+    `on-edit = ${str(workflow.onEdit)}`,
+    `self-approval = ${str(workflow.selfApproval)}`,
+    `comments = ${str(workflow.comments)}`,
+    `unpublish = ${workflow.unpublish}`,
+    `on-change = ${str(workflow.onChange)}`,
+  )
+  for (const s of workflow.stages) {
+    out.push('', '[[stage]]', `alias = ${str(s.alias)}`)
+    if (s.name !== undefined) out.push(`name = ${str(s.name)}`)
+    out.push(
+      `approvers = ${list(s.approvers)}`,
+      `required = ${typeof s.required === 'number' ? s.required : str(s.required)}`,
+      `next = ${list(s.next)}`,
+      `send-back = ${str(s.sendBack)}`,
+    )
+    if (s.position) out.push(`position = { x = ${s.position.x}, y = ${s.position.y} }`)
+  }
+  return `${out.join('\n')}\n`
+}
+
+/**
+ * What the set of workflows gets wrong together: two with the same alias, or
+ * two claiming the same branch or content type, or naming a content type the
+ * schema does not have. Pure.
+ */
+export function validateWorkflows(
+  workflows: readonly SchemaWorkflow[],
+  contentTypeAliases: ReadonlySet<string>,
+): SchemaProblem[] {
+  const problems: SchemaProblem[] = []
+  const file = (w: SchemaWorkflow) => `schema/workflows/${w.alias}.toml`
+  const aliases = new Map<string, string>()
+  const branches = new Map<string, string>()
+  const types = new Map<string, string>()
+  for (const w of workflows) {
+    if (aliases.has(w.alias))
+      problems.push({
+        file: file(w),
+        path: 'workflow.alias',
+        message: `two workflows are called "${w.alias}"`,
+      })
+    aliases.set(w.alias, w.alias)
+    for (const branch of w.appliesTo.branches) {
+      const other = branches.get(branch)
+      if (other)
+        problems.push({
+          file: file(w),
+          path: 'workflow.applies-to.branches',
+          message: `the branch ${branch} is covered by "${other}" already`,
+        })
+      branches.set(branch, w.alias)
+    }
+    for (const type of w.appliesTo.contentTypes) {
+      const other = types.get(type)
+      if (other)
+        problems.push({
+          file: file(w),
+          path: 'workflow.applies-to.content-types',
+          message: `the content type "${type}" is covered by "${other}" already`,
+        })
+      types.set(type, w.alias)
+      if (!contentTypeAliases.has(type))
+        problems.push({
+          file: file(w),
+          path: 'workflow.applies-to.content-types',
+          message: `there is no content type "${type}"`,
+        })
+    }
+  }
+  return problems
+}
+
+/**
+ * A workflow's version: a hash of its canonical file, which a request remembers.
+ * Where the designer drew a stage is left out, so moving a box is not a change. Pure.
+ */
+export function workflowVersion(workflow: SchemaWorkflow): string {
+  const meaning = {
+    ...workflow,
+    stages: workflow.stages.map(({ position: _position, ...stage }) => stage),
+  }
+  return new Bun.CryptoHasher('sha256').update(writeWorkflow(meaning)).digest('hex').slice(0, 16)
+}