@primmel/primmel 1.3.2 → 1.4.0

package/dist/src/ser-des/config/form.js

@@ -2,6 +2,7 @@
 Object.defineProperty(exports, "__esModule", { value: true });
 exports.dumpForm = exports.parseForm = void 0;
 const tokenize_1 = require("../tokenize");
+const tokenize_2 = require("../tokenize");
 const field_parser_1 = require("./field-parser");
 const parseForm = function (id, data) {
     const result = {
@@ -11,6 +12,14 @@ const parseForm = function (id, data) {
         dataClassId: '',
         headerFormId: '',
         conformanceProcessId: '',
+        section: '',
+        requirements: [],
+        formNotes: [],
+        scope: '',
+        formReferences: [],
+        calculationContext: null,
+        formInstances: [],
+        formConstraints: [],
         applicability: [],
         fields: [],
         passFail: null,
@@ -18,47 +27,100 @@ const parseForm = function (id, data) {
         ref: [],
     };
     if (data !== '') {
-        const t = (0, tokenize_1.tokenizePackage)(data);
+        const t = (0, tokenize_2.tokenizePackage)(data);
         let i = 0;
         while (i < t.length) {
             const command = t[i++];
             if (i < t.length) {
                 if (command === 'name') {
-                    result.name = (0, tokenize_1.unwrapBlock)(t[i++]);
+                    result.name = (0, tokenize_2.stripWrapping)(t[i++]);
                 }
                 else if (command === 'description') {
-                    result.description = (0, tokenize_1.unwrapBlock)(t[i++]);
+                    result.description = (0, tokenize_2.stripWrapping)(t[i++]);
                 }
                 else if (command === 'data_class') {
-                    result.dataClassId = (0, tokenize_1.stripWrapping)(t[i++]);
+                    result.dataClassId = (0, tokenize_2.stripWrapping)(t[i++]);
                 }
                 else if (command === 'header') {
-                    result.headerFormId = (0, tokenize_1.stripWrapping)(t[i++]);
+                    result.headerFormId = (0, tokenize_2.stripWrapping)(t[i++]);
+                }
+                else if (command === 'section') {
+                    result.section = (0, tokenize_2.stripWrapping)(t[i++]);
+                }
+                else if (command === 'requirements') {
+                    result.requirements = (0, tokenize_2.tokenizePackage)(t[i++]).map(tokenize_2.stripWrapping);
+                }
+                else if (command === 'note') {
+                    result.formNotes.push((0, tokenize_2.stripWrapping)(t[i++]));
+                }
+                else if (command === 'scope') {
+                    result.scope = (0, tokenize_2.stripWrapping)(t[i++]);
+                }
+                else if (command === 'report_rows') {
+                    // report_rows { field examination_items item_key item }
+                    const rb = (0, tokenize_1.default)((0, tokenize_2.unwrapBlock)(t[i++]));
+                    const rr = {
+                        field: '',
+                        itemKey: '',
+                    };
+                    for (let k = 0; k + 1 < rb.length; k += 2) {
+                        if (rb[k] === 'field') {
+                            rr.field = (0, tokenize_2.stripWrapping)(rb[k + 1]);
+                        }
+                        else if (rb[k] === 'item_key') {
+                            rr.itemKey = (0, tokenize_2.stripWrapping)(rb[k + 1]);
+                        }
+                    }
+                    result.reportRows = rr;
+                }
+                else if (command === 'references') {
+                    result.formReferences = (0, field_parser_1.parseRoleReferences)((0, tokenize_2.unwrapBlock)(t[i++]));
+                }
+                else if (command === 'calculation_context') {
+                    result.calculationContext = parseCalculationContext((0, tokenize_2.unwrapBlock)(t[i++]));
+                }
+                else if (command === 'instances') {
+                    result.formInstances = parseFormInstances((0, tokenize_2.unwrapBlock)(t[i++]));
+                }
+                else if (command === 'constraints') {
+                    result.formConstraints = parseFormConstraints((0, tokenize_2.unwrapBlock)(t[i++]));
                 }
                 else if (command === 'conformance_process') {
-                    result.conformanceProcessId = (0, tokenize_1.stripWrapping)(t[i++]);
+                    const tok = t[i++];
+                    if (tok.startsWith('{')) {
+                        // conformance_process { id1 id2 } — multi-test form
+                        result.conformanceProcessIds = (0, tokenize_1.default)((0, tokenize_2.unwrapBlock)(tok)).map(tokenize_2.stripWrapping);
+                        result.conformanceProcessId = result.conformanceProcessIds[0] ?? '';
+                    }
+                    else {
+                        result.conformanceProcessId = (0, tokenize_2.stripWrapping)(tok);
+                    }
                 }
                 else if (command === 'applicability') {
-                    result.applicability = parseApplicability((0, tokenize_1.unwrapBlock)(t[i++]));
+                    result.applicability = (0, field_parser_1.parseApplicability)((0, tokenize_2.unwrapBlock)(t[i++]));
                 }
                 else if (command === 'field') {
-                    const fieldName = t[i++];
-                    if (i < t.length) {
-                        const fieldBlock = (0, tokenize_1.unwrapBlock)(t[i++]);
-                        result.fields.push((0, field_parser_1.parseFormField)(fieldName, fieldBlock));
+                    // field <name> [: <type>] { … } — typed heads included (W1a repair)
+                    const head = (0, field_parser_1.readFieldHead)(t, i);
+                    if (head) {
+                        result.fields.push((0, field_parser_1.parseFormField)(head.name, head.block, head.type || undefined));
+                        i = head.next;
+                    }
+                    else {
+                        i++; // not a field head — skip the token, keep scanning
                     }
                 }
                 else if (command === 'subform_ref') {
                     // subform_ref SubformID { parameters { ... } applicability { ... } }
                     const subformId = t[i++];
-                    const refBlock = i < t.length ? (0, tokenize_1.unwrapBlock)(t[i++]) : '';
+                    const refBlock = i < t.length ? (0, tokenize_2.unwrapBlock)(t[i++]) : '';
                     result.fields.push(makeSubformRefField(subformId, refBlock));
                 }
                 else if (command === 'pass_fail') {
-                    result.passFail = parsePassFail((0, tokenize_1.unwrapBlock)(t[i++]));
+                    result.passFail = parsePassFail((0, tokenize_2.unwrapBlock)(t[i++]));
                 }
                 else if (command === 'reference') {
-                    result.referenceIds = (0, tokenize_1.tokenizePackage)(t[i++]);
+                    result.referenceIds = (0, tokenize_2.tokenizePackage)(t[i++]).map(tokenize_2.stripWrapping);
                 }
                 else {
                     i++; // forward-compatible: skip unknown keyword value
@@ -75,70 +137,184 @@ const parseForm = function (id, data) {
     };
 };
 exports.parseForm = parseForm;
-function parseApplicability(block) {
-    const entries = [];
-    const t = (0, tokenize_1.tokenizePackage)(block);
+function parseCalculationContext(block) {
+    const ctx = {
+        header: '',
+        dimensions: false,
+        tables: [],
+    };
+    const t = (0, tokenize_1.default)(block);
     let i = 0;
     while (i < t.length) {
-        const dimension = t[i++];
+        const cmd = t[i++];
         if (i >= t.length) {
             break;
         }
-        if (t[i] === ':') {
-            i++;
+        if (cmd === 'header') {
+            ctx.header = (0, tokenize_2.stripWrapping)(t[i++]);
         }
-        if (i < t.length) {
-            const valueBlock = (0, tokenize_1.unwrapBlock)(t[i++]);
-            // valueBlock is `[A, B]` or `{ A: 5, B: 5 }`
-            const trimmed = valueBlock.trim();
-            if (trimmed.startsWith('[')) {
-                const inner = trimmed.slice(1, -1);
-                const values = inner.split(/[,\s]+/).filter(s => s.length > 0);
-                entries.push({ dimension, values, mapping: null });
+        else if (cmd === 'dimensions') {
+            ctx.dimensions = (0, tokenize_2.stripWrapping)(t[i++]) === 'true';
+        }
+        else if (cmd === 'tables') {
+            ctx.tables = (0, tokenize_1.default)((0, tokenize_2.stripWrapping)(t[i++]))
+                .map(tokenize_2.stripWrapping)
+                .filter(s => s.length > 0);
+        }
+        else {
+            (0, tokenize_2.unwrapBlock)(t[i++]);
+        }
+    }
+    return ctx;
+}
+function parseFormInstances(block) {
+    const out = [];
+    const t = (0, tokenize_1.default)(block);
+    let i = 0;
+    while (i < t.length) {
+        const cmd = t[i++];
+        if (cmd !== 'instance') {
+            if (i < t.length) {
+                (0, tokenize_2.unwrapBlock)(t[i - 1]);
             }
-            else if (trimmed.startsWith('{')) {
-                // Mapping form
-                const inner = trimmed.slice(1, -1);
-                const mapping = {};
-                for (const pair of inner
-                    .split(/[,\n]+/)
-                    .map(s => s.trim())
-                    .filter(s => s)) {
-                    const m = pair.match(/^(\w+)\s*:\s*(.+)$/);
-                    if (m) {
-                        mapping[m[1]] = m[2].trim();
-                    }
+            continue;
+        }
+        const inst = { id: (0, tokenize_2.stripWrapping)(t[i++]), name: '' };
+        if (i < t.length && t[i].startsWith('{')) {
+            const it = (0, tokenize_1.default)((0, tokenize_2.unwrapBlock)(t[i++]));
+            let j = 0;
+            while (j < it.length) {
+                const ic = it[j++];
+                if (j >= it.length) {
+                    break;
+                }
+                if (ic === 'name') {
+                    inst.name = (0, tokenize_2.stripWrapping)(it[j++]);
+                }
+                else {
+                    (0, tokenize_2.unwrapBlock)(it[j++]);
                 }
-                entries.push({ dimension, values: [], mapping });
             }
-            else {
-                // Single value
-                entries.push({ dimension, values: [trimmed], mapping: null });
+        }
+        out.push(inst);
+    }
+    return out;
+}
+function parseFormConstraints(block) {
+    const out = [];
+    const t = (0, tokenize_1.default)(block);
+    let i = 0;
+    while (i < t.length) {
+        const cmd = t[i++];
+        if (cmd !== 'constraint') {
+            if (i < t.length) {
+                (0, tokenize_2.unwrapBlock)(t[i - 1]);
             }
+            continue;
         }
+        const c = {
+            id: (0, tokenize_2.stripWrapping)(t[i++]),
+            rule: '',
+            onViolation: '',
+            notes: '',
+            source: null,
+        };
+        if (i < t.length && t[i].startsWith('{')) {
+            const ct = (0, tokenize_1.default)((0, tokenize_2.unwrapBlock)(t[i++]));
+            let j = 0;
+            while (j < ct.length) {
+                const cc = ct[j++];
+                if (j >= ct.length) {
+                    break;
+                }
+                if (cc === 'rule') {
+                    c.rule = (0, tokenize_2.stripWrapping)(ct[j++]);
+                }
+                else if (cc === 'on_violation') {
+                    c.onViolation = (0, tokenize_2.stripWrapping)(ct[j++]);
+                }
+                else if (cc === 'notes') {
+                    c.notes = (0, tokenize_2.stripWrapping)(ct[j++]);
+                }
+                else if (cc === 'source') {
+                    c.source = (0, field_parser_1.readSource)((0, tokenize_2.unwrapBlock)(ct[j++]));
+                }
+                else {
+                    (0, tokenize_2.unwrapBlock)(ct[j++]);
+                }
+            }
+        }
+        out.push(c);
     }
-    return entries;
+    return out;
 }
 function parsePassFail(block) {
-    const pf = { criteria: '', passIf: '' };
-    const t = (0, tokenize_1.tokenizePackage)(block);
+    const pf = { criteria: '', passIf: '', derivations: [] };
+    const t = (0, tokenize_1.default)(block);
     let i = 0;
     while (i < t.length) {
         const cmd = t[i++];
         if (i < t.length) {
             if (cmd === 'criteria') {
-                pf.criteria = (0, tokenize_1.unwrapBlock)(t[i++]);
+                pf.criteria = (0, tokenize_2.stripWrapping)(t[i++]);
             }
             else if (cmd === 'pass_if') {
-                pf.passIf = (0, tokenize_1.unwrapBlock)(t[i++]);
+                pf.passIf = (0, tokenize_2.stripWrapping)(t[i++]);
+            }
+            else if (cmd === 'derivation') {
+                pf.derivations = parsePassFailDerivations((0, tokenize_2.unwrapBlock)(t[i++]));
             }
             else {
-                (0, tokenize_1.unwrapBlock)(t[i++]);
+                (0, tokenize_2.unwrapBlock)(t[i++]);
             }
         }
     }
     return pf;
 }
+function parsePassFailDerivations(block) {
+    const out = [];
+    const t = (0, tokenize_1.default)(block);
+    let i = 0;
+    while (i < t.length) {
+        const cmd = t[i++];
+        if (cmd !== 'value') {
+            if (i < t.length) {
+                (0, tokenize_2.unwrapBlock)(t[i - 1]);
+            }
+            continue;
+        }
+        const d = {
+            name: (0, tokenize_2.stripWrapping)(t[i++]),
+            calculation: '',
+            forEach: '',
+            unit: '',
+        };
+        if (i < t.length && t[i].startsWith('{')) {
+            const dt = (0, tokenize_1.default)((0, tokenize_2.unwrapBlock)(t[i++]));
+            let j = 0;
+            while (j < dt.length) {
+                const dc = dt[j++];
+                if (j >= dt.length) {
+                    break;
+                }
+                if (dc === 'calculation') {
+                    d.calculation = (0, tokenize_2.stripWrapping)(dt[j++]);
+                }
+                else if (dc === 'for_each') {
+                    d.forEach = (0, tokenize_2.stripWrapping)(dt[j++]);
+                }
+                else if (dc === 'unit') {
+                    d.unit = (0, tokenize_2.stripWrapping)(dt[j++]);
+                }
+                else {
+                    (0, tokenize_2.unwrapBlock)(dt[j++]);
+                }
+            }
+        }
+        out.push(d);
+    }
+    return out;
+}
 function makeSubformRefField(subformId, block) {
     const field = {
         name: '', // caller wraps this in a named field
@@ -146,6 +322,12 @@ function makeSubformRefField(subformId, block) {
         label: '',
         definition: '',
         unit: '',
+        symbol: '',
+        verdict: '',
+        targets: [],
+        dimension: '',
+        enumRef: '',
+        pattern: '',
         required: false,
         measurementMethod: '',
         calculationId: null,
@@ -153,59 +335,27 @@ function makeSubformRefField(subformId, block) {
         derivation: '',
         evaluation: null,
         values: [],
+        trueLabel: '',
+        falseLabel: '',
+        enumValues: [],
         defaultValue: '',
         hasDefault: false,
         referenceIds: [],
+        fieldReferences: [],
+        specificationReference: '',
+        applicability: [],
+        sourceDiscrepancy: null,
         fields: [],
         itemsType: '',
-        subformRef: parseSubformRef(subformId, block),
+        subformRef: (0, field_parser_1.parseSubformRef)(subformId, block),
     };
     return field;
 }
-function parseSubformRef(subformId, block) {
-    const ref = {
-        subformId,
-        parameters: {},
-        applicability: [],
-    };
-    if (block && block.trim()) {
-        const t = (0, tokenize_1.tokenizePackage)(block);
-        let i = 0;
-        while (i < t.length) {
-            const cmd = t[i++];
-            if (i < t.length) {
-                if (cmd === 'parameters') {
-                    const pblock = (0, tokenize_1.unwrapBlock)(t[i++]);
-                    const pt = (0, tokenize_1.tokenizePackage)(pblock);
-                    let j = 0;
-                    while (j < pt.length) {
-                        const key = pt[j++];
-                        if (j < pt.length) {
-                            if (pt[j] === ':') {
-                                j++;
-                            }
-                            if (j < pt.length) {
-                                ref.parameters[key] = (0, tokenize_1.unwrapBlock)(pt[j++]);
-                            }
-                        }
-                    }
-                }
-                else if (cmd === 'applicability') {
-                    ref.applicability = parseApplicability((0, tokenize_1.unwrapBlock)(t[i++]));
-                }
-                else {
-                    (0, tokenize_1.unwrapBlock)(t[i++]);
-                }
-            }
-        }
-    }
-    return ref;
-}
 const dumpForm = function (f) {
     let out = 'form ' + f.id + ' {\n';
-    out += '  name "' + (0, tokenize_1.escapeString)(f.name) + '"\n';
+    out += '  name "' + (0, tokenize_2.escapeString)(f.name) + '"\n';
     if (f.description) {
-        out += '  description "' + (0, tokenize_1.escapeString)(f.description) + '"\n';
+        out += '  description "' + (0, tokenize_2.escapeString)(f.description) + '"\n';
     }
     if (f.dataClassId) {
         out += '  data_class ' + f.dataClassId + '\n';
@@ -213,63 +363,134 @@ const dumpForm = function (f) {
     if (f.headerFormId) {
         out += '  header ' + f.headerFormId + '\n';
     }
-    if (f.conformanceProcessId) {
-        out += '  conformance_process ' + f.conformanceProcessId + '\n';
+    if (f.section) {
+        out += '  section "' + (0, tokenize_2.escapeString)(f.section) + '"\n';
     }
-    if (f.applicability.length > 0) {
-        out += '  applicability {\n';
-        for (const a of f.applicability) {
-            if (a.mapping) {
-                out += '    ' + a.dimension + ': { ';
-                for (const [k, v] of Object.entries(a.mapping)) {
-                    out += k + ': ' + v + ' ';
-                }
-                out += '}\n';
-            }
-            else {
-                out += '    ' + a.dimension + ': [' + a.values.join(', ') + ']\n';
-            }
+    if (f.requirements.length > 0) {
+        out += '  requirements { ' + f.requirements.join(' ') + ' }\n';
+    }
+    for (const note of f.formNotes) {
+        out += '  note "' + (0, tokenize_2.escapeString)(note) + '"\n';
+    }
+    if (f.scope) {
+        out += '  scope ' + f.scope + '\n';
+    }
+    if (f.reportRows && (f.reportRows.field || f.reportRows.itemKey)) {
+        out +=
+            '  report_rows { field ' +
+                f.reportRows.field +
+                ' item_key ' +
+                f.reportRows.itemKey +
+                ' }\n';
+    }
+    if (f.formReferences.length > 0) {
+        out += '  references { ' + (0, field_parser_1.dumpRoleReferences)(f.formReferences) + ' }\n';
+    }
+    if (f.calculationContext) {
+        const cc = f.calculationContext;
+        let line = '  calculation_context { ';
+        if (cc.header) {
+            line += 'header ' + cc.header + ' ';
+        }
+        if (cc.dimensions) {
+            line += 'dimensions true ';
+        }
+        if (cc.tables.length > 0) {
+            line += 'tables { ' + cc.tables.join(' ') + ' } ';
+        }
+        out += line + '}\n';
+    }
+    if (f.formInstances.length > 0) {
+        out += '  instances {\n';
+        for (const inst of f.formInstances) {
+            out +=
+                '    instance ' +
+                    inst.id +
+                    ' { name "' +
+                    (0, tokenize_2.escapeString)(inst.name) +
+                    '" }\n';
         }
         out += '  }\n';
     }
-    for (const field of f.fields) {
-        if (field.subformRef) {
-            const sr = field.subformRef;
-            out += '  subform_ref ' + sr.subformId + ' { ';
-            const pkeys = Object.keys(sr.parameters);
-            if (pkeys.length > 0) {
-                out += 'parameters { ';
-                for (const k of pkeys) {
-                    out += k + ': ' + sr.parameters[k] + ' ';
-                }
-                out += '} ';
+    if (f.formConstraints.length > 0) {
+        out += '  constraints {\n';
+        for (const c of f.formConstraints) {
+            out += '    constraint ' + c.id + ' { ';
+            if (c.rule) {
+                out += 'rule "' + (0, tokenize_2.escapeString)(c.rule) + '" ';
             }
-            out += '}\n';
-        }
-        else {
-            out += '  field ' + field.name + ' { ';
-            if (field.label) {
-                out += 'label "' + (0, tokenize_1.escapeString)(field.label) + '" ';
+            if (c.onViolation) {
+                out += 'on_violation ' + c.onViolation + ' ';
             }
-            if (field.unit) {
-                out += 'unit "' + (0, tokenize_1.escapeString)(field.unit) + '" ';
+            if (c.notes) {
+                out += 'notes "' + (0, tokenize_2.escapeString)(c.notes) + '" ';
             }
-            if (field.required) {
-                out += 'required true ';
+            if (c.source && (c.source.doc || c.source.clause)) {
+                out +=
+                    'source { doc "' +
+                        (0, tokenize_2.escapeString)(c.source.doc) +
+                        '" clause "' +
+                        (0, tokenize_2.escapeString)(c.source.clause) +
+                        '"' +
+                        (c.source.fragment
+                            ? ' fragment "' + (0, tokenize_2.escapeString)(c.source.fragment) + '"'
+                            : '') +
+                        ' } ';
             }
             out += '}\n';
         }
+        out += '  }\n';
     }
-    if (f.passFail) {
+    if (f.conformanceProcessIds && f.conformanceProcessIds.length > 1) {
+        out +=
+            '  conformance_process { ' + f.conformanceProcessIds.join(' ') + ' }\n';
+    }
+    else if (f.conformanceProcessId) {
+        out += '  conformance_process ' + f.conformanceProcessId + '\n';
+    }
+    if (f.applicability.length > 0) {
         out +=
-            '  pass_fail { criteria "' +
-                (0, tokenize_1.escapeString)(f.passFail.criteria) +
-                '" pass_if "' +
-                (0, tokenize_1.escapeString)(f.passFail.passIf) +
-                '" }\n';
+            '  applicability {\n    ' +
+                (0, field_parser_1.dumpApplicabilityEntries)(f.applicability).trim() +
+                '\n  }\n';
+    }
+    for (const field of f.fields) {
+        out += (0, field_parser_1.dumpFormField)(field, '  ');
+    }
+    if (f.passFail) {
+        out += dumpPassFail(f.passFail);
     }
     out += '}\n';
     return out;
 };
 exports.dumpForm = dumpForm;
+function dumpPassFail(pf) {
+    if (pf.derivations.length === 0) {
+        return ('  pass_fail { criteria "' +
+            (0, tokenize_2.escapeString)(pf.criteria) +
+            '" pass_if "' +
+            (0, tokenize_2.escapeString)(pf.passIf) +
+            '" }\n');
+    }
+    let out = '  pass_fail {\n';
+    out += '    criteria "' + (0, tokenize_2.escapeString)(pf.criteria) + '"\n';
+    out += '    pass_if "' + (0, tokenize_2.escapeString)(pf.passIf) + '"\n';
+    out += '    derivation {\n';
+    for (const d of pf.derivations) {
+        let line = '      value ' + d.name + ' { ';
+        if (d.calculation) {
+            line += 'calculation "' + (0, tokenize_2.escapeString)(d.calculation) + '" ';
+        }
+        if (d.forEach) {
+            line += 'for_each ' + d.forEach + ' ';
+        }
+        if (d.unit) {
+            line += 'unit "' + (0, tokenize_2.escapeString)(d.unit) + '" ';
+        }
+        out += line + '}\n';
+    }
+    out += '    }\n';
+    out += '  }\n';
+    return out;
+}
 //# sourceMappingURL=form.js.map