@sasjs/lint 2.7.0 → 3.0.0

package/utils/headerMacros.js

@@ -0,0 +1,309 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.removeMacrosFromHeader = exports.addMacrosToHeader = exports.getHeaderMacros = void 0;
+const types_1 = require("../types");
+const LineEndings_1 = require("../types/LineEndings");
+const getHeaderLinesCount_1 = require("./getHeaderLinesCount");
+const splitText_1 = require("./splitText");
+const sasMacrosHeader = /<h4>\s*SAS Macros\s*<\/h4>/i;
+const otherMacrosHeader = /<h4>\s*Other Macros\s*<\/h4>/i;
+const anyHeader = /<h4>/i;
+const headerTag = '</h4>';
+const listItem = /^(\s*@li\s+)(.+?)(\s*)$/;
+/**
+ * Reads an `@li` entry, returning the macro name and the column at which it
+ * starts. The column is derived from the entry text rather than from a search
+ * for the name, so an entry such as `@li li.sas` reports the `li` after the
+ * tag, not the `li` inside it.
+ *
+ * @param {string} text - the line, or the tail of a line, to read.
+ * @param {number} offset - the 0-based column at which `text` starts in the
+ * line, so a trailing entry on a `<h4>` line still reports its real position.
+ */
+const parseListItem = (text, offset = 0) => {
+    const match = listItem.exec(text);
+    if (!match)
+        return null;
+    const entry = match[2];
+    const firstToken = entry.trim().split(/\s+/)[0] || '';
+    const normalised = firstToken.replace(/\\/g, '/');
+    const fileName = normalised.split('/').pop() || '';
+    const name = fileName.replace(/\.sas$/i, '');
+    if (!name)
+        return null;
+    const tokenOffset = entry.indexOf(firstToken);
+    const fileOffset = normalised.lastIndexOf('/') + 1;
+    const column = offset + match[1].length + tokenOffset + fileOffset + 1;
+    return { name, column };
+};
+/**
+ * Reads the `@li` entries of a section that starts at `sectionIndex`.
+ *
+ * A blank line ends the list unless the next non-blank line is another entry,
+ * so a list broken up by a stray blank line is still read in full - the
+ * formatter rewrites exactly the lines it read, and an entry it did not read
+ * would be left behind and duplicated.
+ *
+ * @returns the entries, and the index of the first line after the last one.
+ */
+const readSectionList = (lines, sectionIndex, limit) => {
+    const entries = [];
+    let end = sectionIndex + 1;
+    let index = sectionIndex + 1;
+    while (index < limit && index < lines.length) {
+        const line = lines[index];
+        if (line.trim() === '') {
+            let next = index;
+            while (next < limit && next < lines.length && lines[next].trim() === '') {
+                next++;
+            }
+            if (next < limit && next < lines.length && listItem.test(lines[next])) {
+                index = next;
+                continue;
+            }
+            break;
+        }
+        const parsed = parseListItem(line);
+        if (!parsed)
+            break;
+        entries.push({
+            name: parsed.name,
+            line,
+            lineNumber: index + 1,
+            column: parsed.column
+        });
+        index++;
+        end = index;
+    }
+    return { entries, end };
+};
+/**
+ * Reads the macros declared in the header of a file - both the
+ * `<h4> SAS Macros </h4>` and the `<h4> Other Macros </h4>` sections.
+ * @param {string} text - the text content of the file.
+ * @param {LintConfig} config - the lint configuration, used for line endings.
+ * @returns {HeaderMacro[]} the declared macros, in the order they appear.
+ */
+const getHeaderMacros = (text, config) => {
+    if (!text)
+        return [];
+    const cfg = config || new types_1.LintConfig();
+    const headerLinesCount = (0, getHeaderLinesCount_1.getHeaderLinesCount)(text, cfg);
+    if (!headerLinesCount)
+        return [];
+    const lines = (0, splitText_1.splitText)(text, cfg);
+    const macros = [];
+    for (let index = 0; index < headerLinesCount && index < lines.length; index++) {
+        const line = lines[index];
+        const section = sasMacrosHeader.test(line)
+            ? 'sasMacros'
+            : otherMacrosHeader.test(line)
+                ? 'otherMacros'
+                : null;
+        if (!section)
+            continue;
+        // An entry can share the line with the section tag.
+        const tagEnd = line.indexOf(headerTag) + headerTag.length;
+        const trailing = parseListItem(line.slice(tagEnd), tagEnd);
+        if (trailing) {
+            macros.push({
+                name: trailing.name,
+                lineNumber: index + 1,
+                startColumnNumber: trailing.column,
+                endColumnNumber: trailing.column + trailing.name.length,
+                section
+            });
+        }
+        readSectionList(lines, index, headerLinesCount).entries.forEach((entry) => {
+            macros.push({
+                name: entry.name,
+                lineNumber: entry.lineNumber,
+                startColumnNumber: entry.column,
+                endColumnNumber: entry.column + entry.name.length,
+                section
+            });
+        });
+    }
+    return macros;
+};
+exports.getHeaderMacros = getHeaderMacros;
+/**
+ * Derives the indentation used by the content lines of a header. Falls back to
+ * two spaces, which is the indentation of the default header.
+ */
+const getHeaderIndent = (lines, headerLinesCount) => {
+    for (let index = 1; index < headerLinesCount && index < lines.length; index++) {
+        const match = /^(\s+)\S/.exec(lines[index]);
+        if (match)
+            return match[1];
+    }
+    return '  ';
+};
+/**
+ * Ensures a blank line separates a header section from its neighbours. The
+ * section header sits at `sectionIndex` and `listEnd` is the index of the first
+ * line after the section's `@li` entries.
+ */
+const withSectionSpacing = (lines, sectionIndex, listEnd) => {
+    const result = [...lines];
+    if (listEnd < result.length && result[listEnd].trim() !== '') {
+        result.splice(listEnd, 0, '');
+    }
+    if (sectionIndex > 0 && result[sectionIndex - 1].trim() !== '') {
+        result.splice(sectionIndex, 0, '');
+    }
+    return result;
+};
+/**
+ * Locates the `<h4> SAS Macros </h4>` section of a header.
+ *
+ * Returns `null` when the section is absent, and `null` when it cannot be
+ * rewritten without disturbing the surrounding text: when the section shares a
+ * line with the header's closing `**`, or when an `@li` entry shares the line
+ * with the section tag. In those cases the caller leaves the file alone, so a
+ * warning that cannot be resolved is preferable to a corrupted header.
+ */
+const findSasMacrosSection = (lines, headerLinesCount) => {
+    let sectionIndex = -1;
+    for (let index = 0; index < headerLinesCount && index < lines.length; index++) {
+        if (sasMacrosHeader.test(lines[index])) {
+            sectionIndex = index;
+            break;
+        }
+    }
+    if (sectionIndex === -1)
+        return null;
+    if (sectionIndex === headerLinesCount - 1)
+        return null;
+    const tagEnd = lines[sectionIndex].indexOf(headerTag) + headerTag.length;
+    if (parseListItem(lines[sectionIndex].slice(tagEnd)))
+        return null;
+    const { entries, end } = readSectionList(lines, sectionIndex, headerLinesCount);
+    return { sectionIndex, entries, end };
+};
+/**
+ * Adds macro names to the `<h4> SAS Macros </h4>` section of a file header,
+ * merging them with the entries that are already listed, de-duplicating by
+ * name, and sorting the result alphabetically. A new section is added when the
+ * header has none.
+ *
+ * A blank line separates the section from the header content before it and from
+ * whatever follows the list, so the section reads as its own block.
+ *
+ * @param {string} text - the text content of the file.
+ * @param {LintConfig} config - the lint configuration, used for line endings.
+ * @param {string[]} macros - the macro names to add.
+ * @returns {string} the updated text content.
+ */
+const addMacrosToHeader = (text, config, macros) => {
+    if (!text || !macros.length)
+        return text;
+    const headerLinesCount = (0, getHeaderLinesCount_1.getHeaderLinesCount)(text, config);
+    if (!headerLinesCount)
+        return text;
+    const lines = (0, splitText_1.splitText)(text, config);
+    const lineEnding = config.lineEndings === LineEndings_1.LineEndings.CRLF ? '\r\n' : '\n';
+    const headerEndIndex = headerLinesCount - 1;
+    const section = findSasMacrosSection(lines, headerLinesCount);
+    if (!section) {
+        // No section, or one that cannot be rewritten. Only a genuinely absent
+        // section is safe to create, so check for the tag first.
+        const hasSection = lines
+            .slice(0, headerLinesCount)
+            .some((line) => sasMacrosHeader.test(line));
+        if (hasSection || headerEndIndex === 0)
+            return text;
+        const indent = getHeaderIndent(lines, headerLinesCount);
+        const sectionLines = [
+            `${indent}<h4> SAS Macros </h4>`,
+            ...macros.map((macro) => `${indent}@li ${macro}.sas`)
+        ];
+        const result = [
+            ...lines.slice(0, headerEndIndex),
+            ...sectionLines,
+            ...lines.slice(headerEndIndex)
+        ];
+        return withSectionSpacing(result, headerEndIndex, headerEndIndex + sectionLines.length).join(lineEnding);
+    }
+    const { sectionIndex, entries, end } = section;
+    const indent = lines[sectionIndex].match(/^\s*/)[0];
+    const byName = new Map();
+    entries.forEach((entry) => {
+        const key = entry.name.toLowerCase();
+        if (!byName.has(key))
+            byName.set(key, { name: entry.name, line: entry.line });
+    });
+    macros.forEach((macro) => {
+        const key = macro.toLowerCase();
+        if (byName.has(key))
+            return;
+        byName.set(key, { name: macro, line: `${indent}@li ${macro}.sas` });
+    });
+    const sortedLines = [...byName.values()]
+        .sort((a, b) => compareMacroNames(a.name, b.name))
+        .map((entry) => entry.line);
+    const result = [
+        ...lines.slice(0, sectionIndex + 1),
+        ...sortedLines,
+        ...lines.slice(end)
+    ];
+    return withSectionSpacing(result, sectionIndex, sectionIndex + 1 + sortedLines.length).join(lineEnding);
+};
+exports.addMacrosToHeader = addMacrosToHeader;
+/**
+ * Removes macro names from the `<h4> SAS Macros </h4>` section of a file
+ * header. The section header itself is kept, so an empty list remains a valid
+ * place for the formatter to add entries. The blank line before the section and
+ * after the list is preserved.
+ *
+ * The file is returned unchanged when it has no Doxygen header, when the header
+ * has no `SAS Macros` section, when the section cannot be rewritten safely, or
+ * when none of the named macros are listed.
+ *
+ * @param {string} text - the text content of the file.
+ * @param {LintConfig} config - the lint configuration, used for line endings.
+ * @param {string[]} macros - the macro names to remove.
+ * @returns {string} the updated text content.
+ */
+const removeMacrosFromHeader = (text, config, macros) => {
+    if (!text || !macros.length)
+        return text;
+    const headerLinesCount = (0, getHeaderLinesCount_1.getHeaderLinesCount)(text, config);
+    if (!headerLinesCount)
+        return text;
+    const lines = (0, splitText_1.splitText)(text, config);
+    const lineEnding = config.lineEndings === LineEndings_1.LineEndings.CRLF ? '\r\n' : '\n';
+    const section = findSasMacrosSection(lines, headerLinesCount);
+    if (!section)
+        return text;
+    const { sectionIndex, entries, end } = section;
+    const remove = new Set(macros.map((macro) => macro.toLowerCase()));
+    const kept = [];
+    const seen = new Set();
+    let changed = false;
+    entries.forEach((entry) => {
+        const key = entry.name.toLowerCase();
+        if (remove.has(key)) {
+            changed = true;
+            return;
+        }
+        if (seen.has(key)) {
+            // A duplicate entry for a macro that is kept.
+            changed = true;
+            return;
+        }
+        seen.add(key);
+        kept.push(entry.line);
+    });
+    if (!changed)
+        return text;
+    const result = [
+        ...lines.slice(0, sectionIndex + 1),
+        ...kept,
+        ...lines.slice(end)
+    ];
+    return withSectionSpacing(result, sectionIndex, sectionIndex + 1 + kept.length).join(lineEnding);
+};
+exports.removeMacrosFromHeader = removeMacrosFromHeader;
+const compareMacroNames = (a, b) => a.toLowerCase().localeCompare(b.toLowerCase());
+//# sourceMappingURL=headerMacros.js.map

package/utils/headerMacros.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"headerMacros.js","sourceRoot":"","sources":["../../src/utils/headerMacros.ts"],"names":[],"mappings":";;;AAAA,oCAAqC;AACrC,sDAAkD;AAClD,+DAA2D;AAC3D,2CAAuC;AAuBvC,MAAM,eAAe,GAAG,6BAA6B,CAAA;AACrD,MAAM,iBAAiB,GAAG,+BAA+B,CAAA;AACzD,MAAM,SAAS,GAAG,OAAO,CAAA;AACzB,MAAM,SAAS,GAAG,OAAO,CAAA;AACzB,MAAM,QAAQ,GAAG,yBAAyB,CAAA;AAE1C;;;;;;;;;GASG;AACH,MAAM,aAAa,GAAG,CACpB,IAAY,EACZ,MAAM,GAAG,CAAC,EAC+B,EAAE;IAC3C,MAAM,KAAK,GAAG,QAAQ,CAAC,IAAI,CAAC,IAAI,CAAC,CAAA;IACjC,IAAI,CAAC,KAAK;QAAE,OAAO,IAAI,CAAA;IAEvB,MAAM,KAAK,GAAG,KAAK,CAAC,CAAC,CAAC,CAAA;IACtB,MAAM,UAAU,GAAG,KAAK,CAAC,IAAI,EAAE,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,IAAI,EAAE,CAAA;IAErD,MAAM,UAAU,GAAG,UAAU,CAAC,OAAO,CAAC,KAAK,EAAE,GAAG,CAAC,CAAA;IACjD,MAAM,QAAQ,GAAG,UAAU,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC,GAAG,EAAE,IAAI,EAAE,CAAA;IAClD,MAAM,IAAI,GAAG,QAAQ,CAAC,OAAO,CAAC,SAAS,EAAE,EAAE,CAAC,CAAA;IAC5C,IAAI,CAAC,IAAI;QAAE,OAAO,IAAI,CAAA;IAEtB,MAAM,WAAW,GAAG,KAAK,CAAC,OAAO,CAAC,UAAU,CAAC,CAAA;IAC7C,MAAM,UAAU,GAAG,UAAU,CAAC,WAAW,CAAC,GAAG,CAAC,GAAG,CAAC,CAAA;IAClD,MAAM,MAAM,GAAG,MAAM,GAAG,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,GAAG,WAAW,GAAG,UAAU,GAAG,CAAC,CAAA;IAEtE,OAAO,EAAE,IAAI,EAAE,MAAM,EAAE,CAAA;AACzB,CAAC,CAAA;AAED;;;;;;;;;GASG;AACH,MAAM,eAAe,GAAG,CACtB,KAAe,EACf,YAAoB,EACpB,KAAa,EAC4B,EAAE;IAC3C,MAAM,OAAO,GAAkB,EAAE,CAAA;IACjC,IAAI,GAAG,GAAG,YAAY,GAAG,CAAC,CAAA;IAC1B,IAAI,KAAK,GAAG,YAAY,GAAG,CAAC,CAAA;IAE5B,OAAO,KAAK,GAAG,KAAK,IAAI,KAAK,GAAG,KAAK,CAAC,MAAM,EAAE,CAAC;QAC7C,MAAM,IAAI,GAAG,KAAK,CAAC,KAAK,CAAC,CAAA;QAEzB,IAAI,IAAI,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC;YACvB,IAAI,IAAI,GAAG,KAAK,CAAA;YAChB,OAAO,IAAI,GAAG,KAAK,IAAI,IAAI,GAAG,KAAK,CAAC,MAAM,IAAI,KAAK,CAAC,IAAI,CAAC,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC;gBACxE,IAAI,EAAE,CAAA;YACR,CAAC;YACD,IAAI,IAAI,GAAG,KAAK,IAAI,IAAI,GAAG,KAAK,CAAC,MAAM,IAAI,QAAQ,CAAC,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,EAAE,CAAC;gBACtE,KAAK,GAAG,IAAI,CAAA;gBACZ,SAAQ;YACV,CAAC;YACD,MAAK;QACP,CAAC;QAED,MAAM,MAAM,GAAG,aAAa,CAAC,IAAI,CAAC,CAAA;QAClC,IAAI,CAAC,MAAM;YAAE,MAAK;QAElB,OAAO,CAAC,IAAI,CAAC;YACX,IAAI,EAAE,MAAM,CAAC,IAAI;YACjB,IAAI;YACJ,UAAU,EAAE,KAAK,GAAG,CAAC;YACrB,MAAM,EAAE,MAAM,CAAC,MAAM;SACtB,CAAC,CAAA;QACF,KAAK,EAAE,CAAA;QACP,GAAG,GAAG,KAAK,CAAA;IACb,CAAC;IAED,OAAO,EAAE,OAAO,EAAE,GAAG,EAAE,CAAA;AACzB,CAAC,CAAA;AAED;;;;;;GAMG;AACI,MAAM,eAAe,GAAG,CAC7B,IAAY,EACZ,MAAmB,EACJ,EAAE;IACjB,IAAI,CAAC,IAAI;QAAE,OAAO,EAAE,CAAA;IAEpB,MAAM,GAAG,GAAG,MAAM,IAAI,IAAI,kBAAU,EAAE,CAAA;IACtC,MAAM,gBAAgB,GAAG,IAAA,yCAAmB,EAAC,IAAI,EAAE,GAAG,CAAC,CAAA;IACvD,IAAI,CAAC,gBAAgB;QAAE,OAAO,EAAE,CAAA;IAEhC,MAAM,KAAK,GAAG,IAAA,qBAAS,EAAC,IAAI,EAAE,GAAG,CAAC,CAAA;IAClC,MAAM,MAAM,GAAkB,EAAE,CAAA;IAEhC,KACE,IAAI,KAAK,GAAG,CAAC,EACb,KAAK,GAAG,gBAAgB,IAAI,KAAK,GAAG,KAAK,CAAC,MAAM,EAChD,KAAK,EAAE,EACP,CAAC;QACD,MAAM,IAAI,GAAG,KAAK,CAAC,KAAK,CAAC,CAAA;QAEzB,MAAM,OAAO,GAAkC,eAAe,CAAC,IAAI,CAAC,IAAI,CAAC;YACvE,CAAC,CAAC,WAAW;YACb,CAAC,CAAC,iBAAiB,CAAC,IAAI,CAAC,IAAI,CAAC;gBAC5B,CAAC,CAAC,aAAa;gBACf,CAAC,CAAC,IAAI,CAAA;QAEV,IAAI,CAAC,OAAO;YAAE,SAAQ;QAEtB,oDAAoD;QACpD,MAAM,MAAM,GAAG,IAAI,CAAC,OAAO,CAAC,SAAS,CAAC,GAAG,SAAS,CAAC,MAAM,CAAA;QACzD,MAAM,QAAQ,GAAG,aAAa,CAAC,IAAI,CAAC,KAAK,CAAC,MAAM,CAAC,EAAE,MAAM,CAAC,CAAA;QAC1D,IAAI,QAAQ,EAAE,CAAC;YACb,MAAM,CAAC,IAAI,CAAC;gBACV,IAAI,EAAE,QAAQ,CAAC,IAAI;gBACnB,UAAU,EAAE,KAAK,GAAG,CAAC;gBACrB,iBAAiB,EAAE,QAAQ,CAAC,MAAM;gBAClC,eAAe,EAAE,QAAQ,CAAC,MAAM,GAAG,QAAQ,CAAC,IAAI,CAAC,MAAM;gBACvD,OAAO;aACR,CAAC,CAAA;QACJ,CAAC;QAED,eAAe,CAAC,KAAK,EAAE,KAAK,EAAE,gBAAgB,CAAC,CAAC,OAAO,CAAC,OAAO,CAAC,CAAC,KAAK,EAAE,EAAE;YACxE,MAAM,CAAC,IAAI,CAAC;gBACV,IAAI,EAAE,KAAK,CAAC,IAAI;gBAChB,UAAU,EAAE,KAAK,CAAC,UAAU;gBAC5B,iBAAiB,EAAE,KAAK,CAAC,MAAM;gBAC/B,eAAe,EAAE,KAAK,CAAC,MAAM,GAAG,KAAK,CAAC,IAAI,CAAC,MAAM;gBACjD,OAAO;aACR,CAAC,CAAA;QACJ,CAAC,CAAC,CAAA;IACJ,CAAC;IAED,OAAO,MAAM,CAAA;AACf,CAAC,CAAA;AArDY,QAAA,eAAe,mBAqD3B;AAED;;;GAGG;AACH,MAAM,eAAe,GAAG,CAAC,KAAe,EAAE,gBAAwB,EAAU,EAAE;IAC5E,KACE,IAAI,KAAK,GAAG,CAAC,EACb,KAAK,GAAG,gBAAgB,IAAI,KAAK,GAAG,KAAK,CAAC,MAAM,EAChD,KAAK,EAAE,EACP,CAAC;QACD,MAAM,KAAK,GAAG,UAAU,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,CAAA;QAC3C,IAAI,KAAK;YAAE,OAAO,KAAK,CAAC,CAAC,CAAC,CAAA;IAC5B,CAAC;IAED,OAAO,IAAI,CAAA;AACb,CAAC,CAAA;AAED;;;;GAIG;AACH,MAAM,kBAAkB,GAAG,CACzB,KAAe,EACf,YAAoB,EACpB,OAAe,EACL,EAAE;IACZ,MAAM,MAAM,GAAG,CAAC,GAAG,KAAK,CAAC,CAAA;IAEzB,IAAI,OAAO,GAAG,MAAM,CAAC,MAAM,IAAI,MAAM,CAAC,OAAO,CAAC,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC;QAC7D,MAAM,CAAC,MAAM,CAAC,OAAO,EAAE,CAAC,EAAE,EAAE,CAAC,CAAA;IAC/B,CAAC;IAED,IAAI,YAAY,GAAG,CAAC,IAAI,MAAM,CAAC,YAAY,GAAG,CAAC,CAAC,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC;QAC/D,MAAM,CAAC,MAAM,CAAC,YAAY,EAAE,CAAC,EAAE,EAAE,CAAC,CAAA;IACpC,CAAC;IAED,OAAO,MAAM,CAAA;AACf,CAAC,CAAA;AAED;;;;;;;;GAQG;AACH,MAAM,oBAAoB,GAAG,CAC3B,KAAe,EACf,gBAAwB,EAC8C,EAAE;IACxE,IAAI,YAAY,GAAG,CAAC,CAAC,CAAA;IACrB,KACE,IAAI,KAAK,GAAG,CAAC,EACb,KAAK,GAAG,gBAAgB,IAAI,KAAK,GAAG,KAAK,CAAC,MAAM,EAChD,KAAK,EAAE,EACP,CAAC;QACD,IAAI,eAAe,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,EAAE,CAAC;YACvC,YAAY,GAAG,KAAK,CAAA;YACpB,MAAK;QACP,CAAC;IACH,CAAC;IAED,IAAI,YAAY,KAAK,CAAC,CAAC;QAAE,OAAO,IAAI,CAAA;IACpC,IAAI,YAAY,KAAK,gBAAgB,GAAG,CAAC;QAAE,OAAO,IAAI,CAAA;IAEtD,MAAM,MAAM,GAAG,KAAK,CAAC,YAAY,CAAC,CAAC,OAAO,CAAC,SAAS,CAAC,GAAG,SAAS,CAAC,MAAM,CAAA;IACxE,IAAI,aAAa,CAAC,KAAK,CAAC,YAAY,CAAC,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC;QAAE,OAAO,IAAI,CAAA;IAEjE,MAAM,EAAE,OAAO,EAAE,GAAG,EAAE,GAAG,eAAe,CACtC,KAAK,EACL,YAAY,EACZ,gBAAgB,CACjB,CAAA;IAED,OAAO,EAAE,YAAY,EAAE,OAAO,EAAE,GAAG,EAAE,CAAA;AACvC,CAAC,CAAA;AAED;;;;;;;;;;;;;GAaG;AACI,MAAM,iBAAiB,GAAG,CAC/B,IAAY,EACZ,MAAkB,EAClB,MAAgB,EACR,EAAE;IACV,IAAI,CAAC,IAAI,IAAI,CAAC,MAAM,CAAC,MAAM;QAAE,OAAO,IAAI,CAAA;IAExC,MAAM,gBAAgB,GAAG,IAAA,yCAAmB,EAAC,IAAI,EAAE,MAAM,CAAC,CAAA;IAC1D,IAAI,CAAC,gBAAgB;QAAE,OAAO,IAAI,CAAA;IAElC,MAAM,KAAK,GAAG,IAAA,qBAAS,EAAC,IAAI,EAAE,MAAM,CAAC,CAAA;IACrC,MAAM,UAAU,GAAG,MAAM,CAAC,WAAW,KAAK,yBAAW,CAAC,IAAI,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,CAAA;IAC1E,MAAM,cAAc,GAAG,gBAAgB,GAAG,CAAC,CAAA;IAE3C,MAAM,OAAO,GAAG,oBAAoB,CAAC,KAAK,EAAE,gBAAgB,CAAC,CAAA;IAE7D,IAAI,CAAC,OAAO,EAAE,CAAC;QACb,uEAAuE;QACvE,yDAAyD;QACzD,MAAM,UAAU,GAAG,KAAK;aACrB,KAAK,CAAC,CAAC,EAAE,gBAAgB,CAAC;aAC1B,IAAI,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,eAAe,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAA;QAC7C,IAAI,UAAU,IAAI,cAAc,KAAK,CAAC;YAAE,OAAO,IAAI,CAAA;QAEnD,MAAM,MAAM,GAAG,eAAe,CAAC,KAAK,EAAE,gBAAgB,CAAC,CAAA;QACvD,MAAM,YAAY,GAAG;YACnB,GAAG,MAAM,uBAAuB;YAChC,GAAG,MAAM,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,GAAG,MAAM,OAAO,KAAK,MAAM,CAAC;SACtD,CAAA;QAED,MAAM,MAAM,GAAG;YACb,GAAG,KAAK,CAAC,KAAK,CAAC,CAAC,EAAE,cAAc,CAAC;YACjC,GAAG,YAAY;YACf,GAAG,KAAK,CAAC,KAAK,CAAC,cAAc,CAAC;SAC/B,CAAA;QAED,OAAO,kBAAkB,CACvB,MAAM,EACN,cAAc,EACd,cAAc,GAAG,YAAY,CAAC,MAAM,CACrC,CAAC,IAAI,CAAC,UAAU,CAAC,CAAA;IACpB,CAAC;IAED,MAAM,EAAE,YAAY,EAAE,OAAO,EAAE,GAAG,EAAE,GAAG,OAAO,CAAA;IAC9C,MAAM,MAAM,GAAI,KAAK,CAAC,YAAY,CAAC,CAAC,KAAK,CAAC,MAAM,CAAsB,CAAC,CAAC,CAAC,CAAA;IAEzE,MAAM,MAAM,GAAG,IAAI,GAAG,EAA0C,CAAA;IAChE,OAAO,CAAC,OAAO,CAAC,CAAC,KAAK,EAAE,EAAE;QACxB,MAAM,GAAG,GAAG,KAAK,CAAC,IAAI,CAAC,WAAW,EAAE,CAAA;QACpC,IAAI,CAAC,MAAM,CAAC,GAAG,CAAC,GAAG,CAAC;YAClB,MAAM,CAAC,GAAG,CAAC,GAAG,EAAE,EAAE,IAAI,EAAE,KAAK,CAAC,IAAI,EAAE,IAAI,EAAE,KAAK,CAAC,IAAI,EAAE,CAAC,CAAA;IAC3D,CAAC,CAAC,CAAA;IACF,MAAM,CAAC,OAAO,CAAC,CAAC,KAAK,EAAE,EAAE;QACvB,MAAM,GAAG,GAAG,KAAK,CAAC,WAAW,EAAE,CAAA;QAC/B,IAAI,MAAM,CAAC,GAAG,CAAC,GAAG,CAAC;YAAE,OAAM;QAC3B,MAAM,CAAC,GAAG,CAAC,GAAG,EAAE,EAAE,IAAI,EAAE,KAAK,EAAE,IAAI,EAAE,GAAG,MAAM,OAAO,KAAK,MAAM,EAAE,CAAC,CAAA;IACrE,CAAC,CAAC,CAAA;IAEF,MAAM,WAAW,GAAG,CAAC,GAAG,MAAM,CAAC,MAAM,EAAE,CAAC;SACrC,IAAI,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,iBAAiB,CAAC,CAAC,CAAC,IAAI,EAAE,CAAC,CAAC,IAAI,CAAC,CAAC;SACjD,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,CAAC,IAAI,CAAC,CAAA;IAE7B,MAAM,MAAM,GAAG;QACb,GAAG,KAAK,CAAC,KAAK,CAAC,CAAC,EAAE,YAAY,GAAG,CAAC,CAAC;QACnC,GAAG,WAAW;QACd,GAAG,KAAK,CAAC,KAAK,CAAC,GAAG,CAAC;KACpB,CAAA;IAED,OAAO,kBAAkB,CACvB,MAAM,EACN,YAAY,EACZ,YAAY,GAAG,CAAC,GAAG,WAAW,CAAC,MAAM,CACtC,CAAC,IAAI,CAAC,UAAU,CAAC,CAAA;AACpB,CAAC,CAAA;AAzEY,QAAA,iBAAiB,qBAyE7B;AAED;;;;;;;;;;;;;;GAcG;AACI,MAAM,sBAAsB,GAAG,CACpC,IAAY,EACZ,MAAkB,EAClB,MAAgB,EACR,EAAE;IACV,IAAI,CAAC,IAAI,IAAI,CAAC,MAAM,CAAC,MAAM;QAAE,OAAO,IAAI,CAAA;IAExC,MAAM,gBAAgB,GAAG,IAAA,yCAAmB,EAAC,IAAI,EAAE,MAAM,CAAC,CAAA;IAC1D,IAAI,CAAC,gBAAgB;QAAE,OAAO,IAAI,CAAA;IAElC,MAAM,KAAK,GAAG,IAAA,qBAAS,EAAC,IAAI,EAAE,MAAM,CAAC,CAAA;IACrC,MAAM,UAAU,GAAG,MAAM,CAAC,WAAW,KAAK,yBAAW,CAAC,IAAI,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,CAAA;IAE1E,MAAM,OAAO,GAAG,oBAAoB,CAAC,KAAK,EAAE,gBAAgB,CAAC,CAAA;IAC7D,IAAI,CAAC,OAAO;QAAE,OAAO,IAAI,CAAA;IAEzB,MAAM,EAAE,YAAY,EAAE,OAAO,EAAE,GAAG,EAAE,GAAG,OAAO,CAAA;IAC9C,MAAM,MAAM,GAAG,IAAI,GAAG,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,CAAC,WAAW,EAAE,CAAC,CAAC,CAAA;IAClE,MAAM,IAAI,GAAa,EAAE,CAAA;IACzB,MAAM,IAAI,GAAG,IAAI,GAAG,EAAU,CAAA;IAC9B,IAAI,OAAO,GAAG,KAAK,CAAA;IAEnB,OAAO,CAAC,OAAO,CAAC,CAAC,KAAK,EAAE,EAAE;QACxB,MAAM,GAAG,GAAG,KAAK,CAAC,IAAI,CAAC,WAAW,EAAE,CAAA;QACpC,IAAI,MAAM,CAAC,GAAG,CAAC,GAAG,CAAC,EAAE,CAAC;YACpB,OAAO,GAAG,IAAI,CAAA;YACd,OAAM;QACR,CAAC;QACD,IAAI,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC,EAAE,CAAC;YAClB,8CAA8C;YAC9C,OAAO,GAAG,IAAI,CAAA;YACd,OAAM;QACR,CAAC;QACD,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC,CAAA;QACb,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,CAAA;IACvB,CAAC,CAAC,CAAA;IAEF,IAAI,CAAC,OAAO;QAAE,OAAO,IAAI,CAAA;IAEzB,MAAM,MAAM,GAAG;QACb,GAAG,KAAK,CAAC,KAAK,CAAC,CAAC,EAAE,YAAY,GAAG,CAAC,CAAC;QACnC,GAAG,IAAI;QACP,GAAG,KAAK,CAAC,KAAK,CAAC,GAAG,CAAC;KACpB,CAAA;IAED,OAAO,kBAAkB,CACvB,MAAM,EACN,YAAY,EACZ,YAAY,GAAG,CAAC,GAAG,IAAI,CAAC,MAAM,CAC/B,CAAC,IAAI,CAAC,UAAU,CAAC,CAAA;AACpB,CAAC,CAAA;AAlDY,QAAA,sBAAsB,0BAkDlC;AAED,MAAM,iBAAiB,GAAG,CAAC,CAAS,EAAE,CAAS,EAAU,EAAE,CACzD,CAAC,CAAC,WAAW,EAAE,CAAC,aAAa,CAAC,CAAC,CAAC,WAAW,EAAE,CAAC,CAAA"}

package/utils/index.d.ts

@@ -8,3 +8,6 @@ export * from './splitText';
 export * from './getIndicesOf';
 export * from './getHeaderLinesCount';
 export * from './getDataSectionsDetail';
+export * from './headerMacros';
+export * from './parseMacroCalls';
+export * from './sasMacros';

package/utils/index.js

@@ -24,4 +24,7 @@ __exportStar(require("./splitText"), exports);
 __exportStar(require("./getIndicesOf"), exports);
 __exportStar(require("./getHeaderLinesCount"), exports);
 __exportStar(require("./getDataSectionsDetail"), exports);
+__exportStar(require("./headerMacros"), exports);
+__exportStar(require("./parseMacroCalls"), exports);
+__exportStar(require("./sasMacros"), exports);
 //# sourceMappingURL=index.js.map

package/utils/index.js.map

@@ -1 +1 @@
-{"version":3,"file":"index.js","sourceRoot":"","sources":["../../src/utils/index.ts"],"names":[],"mappings":";;;;;;;;;;;;;;;;AAAA,iDAA8B;AAC9B,kDAA+B;AAC/B,mDAAgC;AAChC,sDAAmC;AACnC,8CAA2B;AAC3B,iDAA8B;AAC9B,8CAA2B;AAC3B,iDAA8B;AAC9B,wDAAqC;AACrC,0DAAuC"}
+{"version":3,"file":"index.js","sourceRoot":"","sources":["../../src/utils/index.ts"],"names":[],"mappings":";;;;;;;;;;;;;;;;AAAA,iDAA8B;AAC9B,kDAA+B;AAC/B,mDAAgC;AAChC,sDAAmC;AACnC,8CAA2B;AAC3B,iDAA8B;AAC9B,8CAA2B;AAC3B,iDAA8B;AAC9B,wDAAqC;AACrC,0DAAuC;AACvC,iDAA8B;AAC9B,oDAAiC;AACjC,8CAA2B"}

package/utils/parseMacroCalls.d.ts

@@ -0,0 +1,28 @@
+import { LintConfig } from '../types';
+/**
+ * A macro invocation found in a file, with the position of its `%` character.
+ */
+export interface MacroCall {
+    name: string;
+    lineNumber: number;
+    startColumnNumber: number;
+    endColumnNumber: number;
+}
+/**
+ * Finds the macro invocations in a file.
+ *
+ * SAS resolves macro triggers inside double-quoted strings but not inside
+ * single-quoted strings, so a double-quoted string is scanned as code while a
+ * single-quoted string is opaque. Invocations inside block comments, macro
+ * comments, comment statements, masking functions (`%str` / `%nrstr`), data
+ * sections and embedded-language `submit` blocks are excluded.
+ *
+ * Every `%name` token is reported, including the macro language keywords and
+ * the macros that ship with SAS. Callers decide which names are interesting.
+ *
+ * @param {string} text - the text content to scan.
+ * @param {LintConfig} config - the lint configuration. It is accepted for
+ * symmetry with the other utilities and is not used by the scan.
+ * @returns {MacroCall[]} the invocations, in the order they appear.
+ */
+export declare const parseMacroCalls: (text: string, config?: LintConfig) => MacroCall[];

package/utils/parseMacroCalls.js

@@ -0,0 +1,230 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.parseMacroCalls = void 0;
+/** Matches a macro invocation at the start of the supplied text. */
+const macroNameStart = /^%([a-z_][a-z0-9_]*)/i;
+/** Matches the statements that open a data section. */
+const dataSectionStart = /^(datalines4?|cards4?|parmcards4?)\s*;/i;
+/** Matches the functions whose argument is data rather than code. */
+const maskingFunctionStart = /^%(nrstr|str)\s*\(/i;
+/** Matches the procedures whose `submit` block holds another language. */
+const embeddedLanguageProc = /^proc\s+(lua|groovy)\b/i;
+/** Matches the statement that closes an embedded-language block. */
+const embeddedLanguageEnd = /^endsubmit\s*;/i;
+const embeddedLanguageEndSearch = /endsubmit/i;
+/**
+ * Finds the macro invocations in a file.
+ *
+ * SAS resolves macro triggers inside double-quoted strings but not inside
+ * single-quoted strings, so a double-quoted string is scanned as code while a
+ * single-quoted string is opaque. Invocations inside block comments, macro
+ * comments, comment statements, masking functions (`%str` / `%nrstr`), data
+ * sections and embedded-language `submit` blocks are excluded.
+ *
+ * Every `%name` token is reported, including the macro language keywords and
+ * the macros that ship with SAS. Callers decide which names are interesting.
+ *
+ * @param {string} text - the text content to scan.
+ * @param {LintConfig} config - the lint configuration. It is accepted for
+ * symmetry with the other utilities and is not used by the scan.
+ * @returns {MacroCall[]} the invocations, in the order they appear.
+ */
+const parseMacroCalls = (text, config) => {
+    const calls = [];
+    if (!text)
+        return calls;
+    const length = text.length;
+    let index = 0;
+    let lineNumber = 1;
+    let columnNumber = 1;
+    let atStatementStart = true;
+    let inDoubleQuote = false;
+    /**
+     * Advances the cursor to `target`, keeping the line and column counters in
+     * step. Every branch that consumes a non-code region moves through here.
+     */
+    const advanceTo = (target) => {
+        const limit = Math.min(target, length);
+        while (index < limit) {
+            if (text[index] === '\n') {
+                lineNumber++;
+                columnNumber = 1;
+            }
+            else {
+                columnNumber++;
+            }
+            index++;
+        }
+    };
+    while (index < length) {
+        const char = text[index];
+        if (char === '\n') {
+            lineNumber++;
+            columnNumber = 1;
+            inDoubleQuote = false;
+            index++;
+            continue;
+        }
+        if (char === '\r' || char === ' ' || char === '\t') {
+            columnNumber++;
+            index++;
+            continue;
+        }
+        // Single-quoted string - opaque. `''` is an escaped quote character. An
+        // apostrophe inside a double-quoted string is ordinary text.
+        if (char === "'") {
+            if (inDoubleQuote) {
+                columnNumber++;
+                index++;
+                continue;
+            }
+            let end = index + 1;
+            while (end < length) {
+                if (text[end] === "'") {
+                    if (text[end + 1] === "'") {
+                        end += 2;
+                        continue;
+                    }
+                    end++;
+                    break;
+                }
+                if (text[end] === '\n')
+                    break;
+                end++;
+            }
+            advanceTo(end);
+            continue;
+        }
+        // Double-quoted string - SAS resolves macro triggers inside it, so the
+        // scan continues until the closing quote.
+        if (char === '"') {
+            inDoubleQuote = !inDoubleQuote;
+            columnNumber++;
+            index++;
+            continue;
+        }
+        if (!inDoubleQuote) {
+            if (char === ';') {
+                atStatementStart = true;
+                columnNumber++;
+                index++;
+                continue;
+            }
+            // Block comment - /* ... */
+            if (char === '/' && text[index + 1] === '*') {
+                let end = index + 2;
+                while (end < length && !(text[end] === '*' && text[end + 1] === '/')) {
+                    end++;
+                }
+                advanceTo(Math.min(end + 2, length));
+                continue;
+            }
+        }
+        if (char === '%') {
+            // Macro comment - %* ... ;
+            if (text[index + 1] === '*') {
+                let end = index + 2;
+                while (end < length && text[end] !== ';')
+                    end++;
+                advanceTo(Math.min(end + 1, length));
+                continue;
+            }
+            // Masking functions - the argument is data, not code. `%(` and `%)` are
+            // the escapes for literal parentheses inside the argument, so they do
+            // not affect the nesting depth.
+            const maskingFunction = maskingFunctionStart.exec(text.slice(index));
+            if (maskingFunction) {
+                let depth = 0;
+                let end = index + maskingFunction[0].length - 1;
+                while (end < length) {
+                    if (text[end] === '%' &&
+                        (text[end + 1] === '(' || text[end + 1] === ')')) {
+                        end += 2;
+                        continue;
+                    }
+                    if (text[end] === '(')
+                        depth++;
+                    else if (text[end] === ')') {
+                        depth--;
+                        if (depth === 0) {
+                            end++;
+                            break;
+                        }
+                    }
+                    end++;
+                }
+                advanceTo(end);
+                atStatementStart = false;
+                continue;
+            }
+            const macroName = macroNameStart.exec(text.slice(index));
+            if (macroName) {
+                // A macro statement label - `%label:` - is not an invocation.
+                if (text[index + macroName[0].length] !== ':') {
+                    calls.push({
+                        name: macroName[1],
+                        lineNumber,
+                        startColumnNumber: columnNumber,
+                        endColumnNumber: columnNumber + 1 + macroName[1].length
+                    });
+                }
+                advanceTo(index + macroName[0].length);
+                atStatementStart = false;
+                continue;
+            }
+        }
+        if (atStatementStart && !inDoubleQuote) {
+            // A proc lua / proc groovy submit block holds another language, so its
+            // body is skipped. The block is only entered when an `endsubmit`
+            // statement closes it, so a stray `proc lua;` cannot swallow the rest
+            // of the file.
+            const embeddedProcStart = embeddedLanguageProc.exec(text.slice(index));
+            if (embeddedProcStart &&
+                embeddedLanguageEndSearch.test(text.slice(index))) {
+                const afterProc = index + embeddedProcStart[0].length;
+                const offset = text.slice(afterProc).search(embeddedLanguageEndSearch);
+                const endSubmit = embeddedLanguageEnd.exec(text.slice(afterProc + offset));
+                advanceTo(endSubmit ? afterProc + offset + endSubmit[0].length : length);
+                atStatementStart = true;
+                continue;
+            }
+            // A data section - everything up to its terminating line is data, not
+            // code. The terminator is a line containing only the `;` or `;;;;`.
+            const dataSection = dataSectionStart.exec(text.slice(index));
+            if (dataSection) {
+                const terminator = /4/.test(dataSection[1]) ? ';;;;' : ';';
+                let lineStart = index + dataSection[0].length;
+                let end = length;
+                while (lineStart <= length) {
+                    const lineEnd = text.indexOf('\n', lineStart);
+                    const actualEnd = lineEnd === -1 ? length : lineEnd;
+                    if (text.slice(lineStart, actualEnd).trim() === terminator) {
+                        end = actualEnd;
+                        break;
+                    }
+                    if (lineEnd === -1)
+                        break;
+                    lineStart = lineEnd + 1;
+                }
+                advanceTo(end);
+                atStatementStart = true;
+                continue;
+            }
+            // A comment statement - its body is opaque up to the terminating `;`.
+            if (char === '*') {
+                let end = index + 1;
+                while (end < length && text[end] !== ';')
+                    end++;
+                advanceTo(end + 1);
+                atStatementStart = true;
+                continue;
+            }
+        }
+        atStatementStart = false;
+        columnNumber++;
+        index++;
+    }
+    return calls;
+};
+exports.parseMacroCalls = parseMacroCalls;
+//# sourceMappingURL=parseMacroCalls.js.map

package/utils/parseMacroCalls.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"parseMacroCalls.js","sourceRoot":"","sources":["../../src/utils/parseMacroCalls.ts"],"names":[],"mappings":";;;AAYA,oEAAoE;AACpE,MAAM,cAAc,GAAG,uBAAuB,CAAA;AAE9C,uDAAuD;AACvD,MAAM,gBAAgB,GAAG,yCAAyC,CAAA;AAElE,qEAAqE;AACrE,MAAM,oBAAoB,GAAG,qBAAqB,CAAA;AAElD,0EAA0E;AAC1E,MAAM,oBAAoB,GAAG,yBAAyB,CAAA;AAEtD,oEAAoE;AACpE,MAAM,mBAAmB,GAAG,iBAAiB,CAAA;AAC7C,MAAM,yBAAyB,GAAG,YAAY,CAAA;AAE9C;;;;;;;;;;;;;;;;GAgBG;AACI,MAAM,eAAe,GAAG,CAC7B,IAAY,EACZ,MAAmB,EACN,EAAE;IACf,MAAM,KAAK,GAAgB,EAAE,CAAA;IAC7B,IAAI,CAAC,IAAI;QAAE,OAAO,KAAK,CAAA;IAEvB,MAAM,MAAM,GAAG,IAAI,CAAC,MAAM,CAAA;IAE1B,IAAI,KAAK,GAAG,CAAC,CAAA;IACb,IAAI,UAAU,GAAG,CAAC,CAAA;IAClB,IAAI,YAAY,GAAG,CAAC,CAAA;IACpB,IAAI,gBAAgB,GAAG,IAAI,CAAA;IAC3B,IAAI,aAAa,GAAG,KAAK,CAAA;IAEzB;;;OAGG;IACH,MAAM,SAAS,GAAG,CAAC,MAAc,EAAE,EAAE;QACnC,MAAM,KAAK,GAAG,IAAI,CAAC,GAAG,CAAC,MAAM,EAAE,MAAM,CAAC,CAAA;QACtC,OAAO,KAAK,GAAG,KAAK,EAAE,CAAC;YACrB,IAAI,IAAI,CAAC,KAAK,CAAC,KAAK,IAAI,EAAE,CAAC;gBACzB,UAAU,EAAE,CAAA;gBACZ,YAAY,GAAG,CAAC,CAAA;YAClB,CAAC;iBAAM,CAAC;gBACN,YAAY,EAAE,CAAA;YAChB,CAAC;YACD,KAAK,EAAE,CAAA;QACT,CAAC;IACH,CAAC,CAAA;IAED,OAAO,KAAK,GAAG,MAAM,EAAE,CAAC;QACtB,MAAM,IAAI,GAAG,IAAI,CAAC,KAAK,CAAC,CAAA;QAExB,IAAI,IAAI,KAAK,IAAI,EAAE,CAAC;YAClB,UAAU,EAAE,CAAA;YACZ,YAAY,GAAG,CAAC,CAAA;YAChB,aAAa,GAAG,KAAK,CAAA;YACrB,KAAK,EAAE,CAAA;YACP,SAAQ;QACV,CAAC;QAED,IAAI,IAAI,KAAK,IAAI,IAAI,IAAI,KAAK,GAAG,IAAI,IAAI,KAAK,IAAI,EAAE,CAAC;YACnD,YAAY,EAAE,CAAA;YACd,KAAK,EAAE,CAAA;YACP,SAAQ;QACV,CAAC;QAED,wEAAwE;QACxE,6DAA6D;QAC7D,IAAI,IAAI,KAAK,GAAG,EAAE,CAAC;YACjB,IAAI,aAAa,EAAE,CAAC;gBAClB,YAAY,EAAE,CAAA;gBACd,KAAK,EAAE,CAAA;gBACP,SAAQ;YACV,CAAC;YACD,IAAI,GAAG,GAAG,KAAK,GAAG,CAAC,CAAA;YACnB,OAAO,GAAG,GAAG,MAAM,EAAE,CAAC;gBACpB,IAAI,IAAI,CAAC,GAAG,CAAC,KAAK,GAAG,EAAE,CAAC;oBACtB,IAAI,IAAI,CAAC,GAAG,GAAG,CAAC,CAAC,KAAK,GAAG,EAAE,CAAC;wBAC1B,GAAG,IAAI,CAAC,CAAA;wBACR,SAAQ;oBACV,CAAC;oBACD,GAAG,EAAE,CAAA;oBACL,MAAK;gBACP,CAAC;gBACD,IAAI,IAAI,CAAC,GAAG,CAAC,KAAK,IAAI;oBAAE,MAAK;gBAC7B,GAAG,EAAE,CAAA;YACP,CAAC;YACD,SAAS,CAAC,GAAG,CAAC,CAAA;YACd,SAAQ;QACV,CAAC;QAED,uEAAuE;QACvE,0CAA0C;QAC1C,IAAI,IAAI,KAAK,GAAG,EAAE,CAAC;YACjB,aAAa,GAAG,CAAC,aAAa,CAAA;YAC9B,YAAY,EAAE,CAAA;YACd,KAAK,EAAE,CAAA;YACP,SAAQ;QACV,CAAC;QAED,IAAI,CAAC,aAAa,EAAE,CAAC;YACnB,IAAI,IAAI,KAAK,GAAG,EAAE,CAAC;gBACjB,gBAAgB,GAAG,IAAI,CAAA;gBACvB,YAAY,EAAE,CAAA;gBACd,KAAK,EAAE,CAAA;gBACP,SAAQ;YACV,CAAC;YAED,4BAA4B;YAC5B,IAAI,IAAI,KAAK,GAAG,IAAI,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC,KAAK,GAAG,EAAE,CAAC;gBAC5C,IAAI,GAAG,GAAG,KAAK,GAAG,CAAC,CAAA;gBACnB,OAAO,GAAG,GAAG,MAAM,IAAI,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,KAAK,GAAG,IAAI,IAAI,CAAC,GAAG,GAAG,CAAC,CAAC,KAAK,GAAG,CAAC,EAAE,CAAC;oBACrE,GAAG,EAAE,CAAA;gBACP,CAAC;gBACD,SAAS,CAAC,IAAI,CAAC,GAAG,CAAC,GAAG,GAAG,CAAC,EAAE,MAAM,CAAC,CAAC,CAAA;gBACpC,SAAQ;YACV,CAAC;QACH,CAAC;QAED,IAAI,IAAI,KAAK,GAAG,EAAE,CAAC;YACjB,2BAA2B;YAC3B,IAAI,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC,KAAK,GAAG,EAAE,CAAC;gBAC5B,IAAI,GAAG,GAAG,KAAK,GAAG,CAAC,CAAA;gBACnB,OAAO,GAAG,GAAG,MAAM,IAAI,IAAI,CAAC,GAAG,CAAC,KAAK,GAAG;oBAAE,GAAG,EAAE,CAAA;gBAC/C,SAAS,CAAC,IAAI,CAAC,GAAG,CAAC,GAAG,GAAG,CAAC,EAAE,MAAM,CAAC,CAAC,CAAA;gBACpC,SAAQ;YACV,CAAC;YAED,wEAAwE;YACxE,sEAAsE;YACtE,gCAAgC;YAChC,MAAM,eAAe,GAAG,oBAAoB,CAAC,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,CAAA;YACpE,IAAI,eAAe,EAAE,CAAC;gBACpB,IAAI,KAAK,GAAG,CAAC,CAAA;gBACb,IAAI,GAAG,GAAG,KAAK,GAAG,eAAe,CAAC,CAAC,CAAC,CAAC,MAAM,GAAG,CAAC,CAAA;gBAC/C,OAAO,GAAG,GAAG,MAAM,EAAE,CAAC;oBACpB,IACE,IAAI,CAAC,GAAG,CAAC,KAAK,GAAG;wBACjB,CAAC,IAAI,CAAC,GAAG,GAAG,CAAC,CAAC,KAAK,GAAG,IAAI,IAAI,CAAC,GAAG,GAAG,CAAC,CAAC,KAAK,GAAG,CAAC,EAChD,CAAC;wBACD,GAAG,IAAI,CAAC,CAAA;wBACR,SAAQ;oBACV,CAAC;oBACD,IAAI,IAAI,CAAC,GAAG,CAAC,KAAK,GAAG;wBAAE,KAAK,EAAE,CAAA;yBACzB,IAAI,IAAI,CAAC,GAAG,CAAC,KAAK,GAAG,EAAE,CAAC;wBAC3B,KAAK,EAAE,CAAA;wBACP,IAAI,KAAK,KAAK,CAAC,EAAE,CAAC;4BAChB,GAAG,EAAE,CAAA;4BACL,MAAK;wBACP,CAAC;oBACH,CAAC;oBACD,GAAG,EAAE,CAAA;gBACP,CAAC;gBACD,SAAS,CAAC,GAAG,CAAC,CAAA;gBACd,gBAAgB,GAAG,KAAK,CAAA;gBACxB,SAAQ;YACV,CAAC;YAED,MAAM,SAAS,GAAG,cAAc,CAAC,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,CAAA;YACxD,IAAI,SAAS,EAAE,CAAC;gBACd,8DAA8D;gBAC9D,IAAI,IAAI,CAAC,KAAK,GAAG,SAAS,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,KAAK,GAAG,EAAE,CAAC;oBAC9C,KAAK,CAAC,IAAI,CAAC;wBACT,IAAI,EAAE,SAAS,CAAC,CAAC,CAAC;wBAClB,UAAU;wBACV,iBAAiB,EAAE,YAAY;wBAC/B,eAAe,EAAE,YAAY,GAAG,CAAC,GAAG,SAAS,CAAC,CAAC,CAAC,CAAC,MAAM;qBACxD,CAAC,CAAA;gBACJ,CAAC;gBACD,SAAS,CAAC,KAAK,GAAG,SAAS,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAA;gBACtC,gBAAgB,GAAG,KAAK,CAAA;gBACxB,SAAQ;YACV,CAAC;QACH,CAAC;QAED,IAAI,gBAAgB,IAAI,CAAC,aAAa,EAAE,CAAC;YACvC,uEAAuE;YACvE,iEAAiE;YACjE,sEAAsE;YACtE,eAAe;YACf,MAAM,iBAAiB,GAAG,oBAAoB,CAAC,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,CAAA;YACtE,IACE,iBAAiB;gBACjB,yBAAyB,CAAC,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,EACjD,CAAC;gBACD,MAAM,SAAS,GAAG,KAAK,GAAG,iBAAiB,CAAC,CAAC,CAAC,CAAC,MAAM,CAAA;gBACrD,MAAM,MAAM,GAAG,IAAI,CAAC,KAAK,CAAC,SAAS,CAAC,CAAC,MAAM,CAAC,yBAAyB,CAAC,CAAA;gBACtE,MAAM,SAAS,GAAG,mBAAmB,CAAC,IAAI,CACxC,IAAI,CAAC,KAAK,CAAC,SAAS,GAAG,MAAM,CAAC,CAC/B,CAAA;gBACD,SAAS,CAAC,SAAS,CAAC,CAAC,CAAC,SAAS,GAAG,MAAM,GAAG,SAAS,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,MAAM,CAAC,CAAA;gBACxE,gBAAgB,GAAG,IAAI,CAAA;gBACvB,SAAQ;YACV,CAAC;YAED,sEAAsE;YACtE,oEAAoE;YACpE,MAAM,WAAW,GAAG,gBAAgB,CAAC,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,CAAA;YAC5D,IAAI,WAAW,EAAE,CAAC;gBAChB,MAAM,UAAU,GAAG,GAAG,CAAC,IAAI,CAAC,WAAW,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,GAAG,CAAA;gBAC1D,IAAI,SAAS,GAAG,KAAK,GAAG,WAAW,CAAC,CAAC,CAAC,CAAC,MAAM,CAAA;gBAC7C,IAAI,GAAG,GAAG,MAAM,CAAA;gBAChB,OAAO,SAAS,IAAI,MAAM,EAAE,CAAC;oBAC3B,MAAM,OAAO,GAAG,IAAI,CAAC,OAAO,CAAC,IAAI,EAAE,SAAS,CAAC,CAAA;oBAC7C,MAAM,SAAS,GAAG,OAAO,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,OAAO,CAAA;oBACnD,IAAI,IAAI,CAAC,KAAK,CAAC,SAAS,EAAE,SAAS,CAAC,CAAC,IAAI,EAAE,KAAK,UAAU,EAAE,CAAC;wBAC3D,GAAG,GAAG,SAAS,CAAA;wBACf,MAAK;oBACP,CAAC;oBACD,IAAI,OAAO,KAAK,CAAC,CAAC;wBAAE,MAAK;oBACzB,SAAS,GAAG,OAAO,GAAG,CAAC,CAAA;gBACzB,CAAC;gBACD,SAAS,CAAC,GAAG,CAAC,CAAA;gBACd,gBAAgB,GAAG,IAAI,CAAA;gBACvB,SAAQ;YACV,CAAC;YAED,sEAAsE;YACtE,IAAI,IAAI,KAAK,GAAG,EAAE,CAAC;gBACjB,IAAI,GAAG,GAAG,KAAK,GAAG,CAAC,CAAA;gBACnB,OAAO,GAAG,GAAG,MAAM,IAAI,IAAI,CAAC,GAAG,CAAC,KAAK,GAAG;oBAAE,GAAG,EAAE,CAAA;gBAC/C,SAAS,CAAC,GAAG,GAAG,CAAC,CAAC,CAAA;gBAClB,gBAAgB,GAAG,IAAI,CAAA;gBACvB,SAAQ;YACV,CAAC;QACH,CAAC;QAED,gBAAgB,GAAG,KAAK,CAAA;QACxB,YAAY,EAAE,CAAA;QACd,KAAK,EAAE,CAAA;IACT,CAAC;IAED,OAAO,KAAK,CAAA;AACd,CAAC,CAAA;AAxNY,QAAA,eAAe,mBAwN3B"}

package/utils/sasMacros.d.ts

@@ -0,0 +1,16 @@
+/**
+ * The set of macro names that ship with SAS, lower-cased for comparison.
+ *
+ * The names are generated from the macroStatements and macroFunctions groups of
+ * `@sasjs/sas-language`, which owns the SAS language data - see
+ * `scripts/generate-macro-names.mjs`. A macro matching one of these names is
+ * treated as declared, so it is never reported by `noUndeclaredMacros` and
+ * never written to a file header by the formatter.
+ */
+export declare const sasMacros: Set<string>;
+/**
+ * Reports whether a macro name is one of the macros that ship with SAS.
+ * @param {string} name - the macro name to test.
+ * @returns {boolean} true when the name belongs to a SAS-provided macro.
+ */
+export declare const isSasMacro: (name: string) => boolean;

package/utils/sasMacros.generated.d.ts

@@ -0,0 +1,6 @@
+/**
+ * The macro names that ship with SAS, lower-cased and without the leading
+ * `%`, as published in the macroStatements and macroFunctions groups of
+ * `@sasjs/sas-language`.
+ */
+export declare const sasMacros: readonly string[];