Arbiter/core
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
2d27321b38105e3664f048e076d300795a3274ef
core/src/ast/parser/ExpressionParser.js
T

1615 lines
41 KiB
JavaScript
Raw Normal View History

initial commit: @arbiter/core authorization engine with js-rigor hardening
2026-07-31 13:44:06 -07:00
// @generated by Peggy 5.1.0.
//
// https://peggyjs.org/
class peg$SyntaxError extends SyntaxError {
constructor(message, expected, found, location) {
super(message);
this.expected = expected;
this.found = found;
this.location = location;
this.name = "SyntaxError";
}
format(sources) {
let str = "Error: " + this.message;
if (this.location) {
let src = null;
const st = sources.find(s => s.source === this.location.source);
if (st) {
src = st.text.split(/\r\n|\n|\r/g);
}
const s = this.location.start;
const offset_s = (this.location.source && (typeof this.location.source.offset === "function"))
? this.location.source.offset(s)
: s;
const loc = this.location.source + ":" + offset_s.line + ":" + offset_s.column;
if (src) {
const e = this.location.end;
const filler = "".padEnd(offset_s.line.toString().length, " ");
const line = src[s.line - 1];
const last = s.line === e.line ? e.column : line.length + 1;
const hatLen = (last - s.column) || 1;
str += "\n --> " + loc + "\n"
+ filler + " |\n"
+ offset_s.line + " | " + line + "\n"
+ filler + " | " + "".padEnd(s.column - 1, " ")
+ "".padEnd(hatLen, "^");
} else {
str += "\n at " + loc;
}
}
return str;
}
static buildMessage(expected, found) {
function hex(ch) {
return ch.codePointAt(0).toString(16).toUpperCase();
}
const nonPrintable = Object.prototype.hasOwnProperty.call(RegExp.prototype, "unicode")
? new RegExp("[\\p{C}\\p{Mn}\\p{Mc}]", "gu")
: null;
function unicodeEscape(s) {
if (nonPrintable) {
return s.replace(nonPrintable, ch => "\\u{" + hex(ch) + "}");
}
return s;
}
function literalEscape(s) {
return unicodeEscape(s
.replace(/\\/g, "\\\\")
.replace(/"/g, "\\\"")
.replace(/\0/g, "\\0")
.replace(/\t/g, "\\t")
.replace(/\n/g, "\\n")
.replace(/\r/g, "\\r")
.replace(/[\x00-\x0F]/g, ch => "\\x0" + hex(ch))
.replace(/[\x10-\x1F\x7F-\x9F]/g, ch => "\\x" + hex(ch)));
}
function classEscape(s) {
return unicodeEscape(s
.replace(/\\/g, "\\\\")
.replace(/\]/g, "\\]")
.replace(/\^/g, "\\^")
.replace(/-/g, "\\-")
.replace(/\0/g, "\\0")
.replace(/\t/g, "\\t")
.replace(/\n/g, "\\n")
.replace(/\r/g, "\\r")
.replace(/[\x00-\x0F]/g, ch => "\\x0" + hex(ch))
.replace(/[\x10-\x1F\x7F-\x9F]/g, ch => "\\x" + hex(ch)));
}
const DESCRIBE_EXPECTATION_FNS = {
literal(expectation) {
return "\"" + literalEscape(expectation.text) + "\"";
},
class(expectation) {
const escapedParts = expectation.parts.map(
part => (Array.isArray(part)
? classEscape(part[0]) + "-" + classEscape(part[1])
: classEscape(part))
);
return "[" + (expectation.inverted ? "^" : "") + escapedParts.join("") + "]" + (expectation.unicode ? "u" : "");
},
any() {
return "any character";
},
end() {
return "end of input";
},
other(expectation) {
return expectation.description;
},
};
function describeExpectation(expectation) {
return DESCRIBE_EXPECTATION_FNS[expectation.type](expectation);
}
function describeExpected(expected) {
const descriptions = expected.map(describeExpectation);
descriptions.sort();
if (descriptions.length > 0) {
let j = 1;
for (let i = 1; i < descriptions.length; i++) {
if (descriptions[i - 1] !== descriptions[i]) {
descriptions[j] = descriptions[i];
j++;
}
}
descriptions.length = j;
}
switch (descriptions.length) {
case 1:
return descriptions[0];
case 2:
return descriptions[0] + " or " + descriptions[1];
default:
return descriptions.slice(0, -1).join(", ")
+ ", or "
+ descriptions[descriptions.length - 1];
}
}
function describeFound(found) {
return found ? "\"" + literalEscape(found) + "\"" : "end of input";
}
return "Expected " + describeExpected(expected) + " but " + describeFound(found) + " found.";
}
}
function peg$parse(input, options) {
options = options !== undefined ? options : {};
const peg$FAILED = {};
const peg$source = options.grammarSource;
const peg$startRuleFunctions = {
Expression: peg$parseExpression,
};
let peg$startRuleFunction = peg$parseExpression;
const peg$c0 = "UNLESS";
const peg$c1 = "FUSION";
const peg$c2 = "{";
const peg$c3 = "}";
const peg$c4 = "max";
const peg$c5 = "min";
const peg$c6 = "majority";
const peg$c7 = "average";
const peg$c8 = "sum";
const peg$c9 = "sum_unbounded";
const peg$c10 = "median";
const peg$c11 = "optimistic";
const peg$c12 = "pessimistic";
const peg$c13 = "top2";
const peg$c14 = "top3";
const peg$c15 = "priority";
const peg$c16 = "*";
const peg$c17 = "(";
const peg$c18 = ")";
const peg$c19 = ",";
const peg$c20 = ":";
const peg$c21 = ".";
const peg$c22 = "::";
const peg$c23 = "\"";
const peg$c24 = "'";
const peg$c25 = "\\";
const peg$c26 = "//";
const peg$c27 = "/*";
const peg$c28 = "*/";
const peg$r0 = /^[^"\\]/;
const peg$r1 = /^[^'\\]/;
const peg$r2 = /^["'\\nrt]/;
const peg$r3 = /^[0-9]/;
const peg$r4 = /^[a-zA-Z_]/;
const peg$r5 = /^[a-zA-Z0-9_\-]/;
const peg$r6 = /^[ \t\n\r]/;
const peg$r7 = /^[^\n]/;
const peg$e0 = peg$literalExpectation("UNLESS", false);
const peg$e1 = peg$literalExpectation("FUSION", false);
const peg$e2 = peg$literalExpectation("{", false);
const peg$e3 = peg$literalExpectation("}", false);
const peg$e4 = peg$literalExpectation("max", false);
const peg$e5 = peg$literalExpectation("min", false);
const peg$e6 = peg$literalExpectation("majority", false);
const peg$e7 = peg$literalExpectation("average", false);
const peg$e8 = peg$literalExpectation("sum", false);
const peg$e9 = peg$literalExpectation("sum_unbounded", false);
const peg$e10 = peg$literalExpectation("median", false);
const peg$e11 = peg$literalExpectation("optimistic", false);
const peg$e12 = peg$literalExpectation("pessimistic", false);
const peg$e13 = peg$literalExpectation("top2", false);
const peg$e14 = peg$literalExpectation("top3", false);
const peg$e15 = peg$literalExpectation("priority", false);
const peg$e16 = peg$literalExpectation("*", false);
const peg$e17 = peg$literalExpectation("(", false);
const peg$e18 = peg$literalExpectation(")", false);
const peg$e19 = peg$literalExpectation(",", false);
const peg$e20 = peg$literalExpectation(":", false);
const peg$e21 = peg$literalExpectation(".", false);
const peg$e22 = peg$literalExpectation("::", false);
const peg$e23 = peg$literalExpectation("\"", false);
const peg$e24 = peg$classExpectation(["\"", "\\"], true, false, false);
const peg$e25 = peg$literalExpectation("'", false);
const peg$e26 = peg$classExpectation(["'", "\\"], true, false, false);
const peg$e27 = peg$literalExpectation("\\", false);
const peg$e28 = peg$classExpectation(["\"", "'", "\\", "n", "r", "t"], false, false, false);
const peg$e29 = peg$classExpectation([["0", "9"]], false, false, false);
const peg$e30 = peg$classExpectation([["a", "z"], ["A", "Z"], "_"], false, false, false);
const peg$e31 = peg$classExpectation([["a", "z"], ["A", "Z"], ["0", "9"], "_", "-"], false, false, false);
const peg$e32 = peg$classExpectation([" ", "\t", "\n", "\r"], false, false, false);
const peg$e33 = peg$literalExpectation("//", false);
const peg$e34 = peg$classExpectation(["\n"], true, false, false);
const peg$e35 = peg$literalExpectation("/*", false);
const peg$e36 = peg$literalExpectation("*/", false);
const peg$e37 = peg$anyExpectation();
function peg$f0(expr) { return expr; }
function peg$f1(primary, exception) {
return makeDefeasible(primary, exception);
}
function peg$f2(aggregator, expressions) {
return makeFusion(expressions, aggregator);
}
function peg$f3(head, tail) {
const exprs = [head];
for (const t of tail) {
exprs.push(t[1]);
}
return exprs;
}
function peg$f4(name, args) {
return makeChallengePredicate(name, args || []);
}
function peg$f5(name, args) {
return makePredicate(name, args || []);
}
function peg$f6(head, tail) {
const args = [head];
for (const t of tail) {
args.push(t[3]);
}
return args;
}
function peg$f7(name, path) {
return makeVariable(name, path.map(p => p[1]));
}
function peg$f8(refType, path) {
return { type: 'Reference', refType: refType, path: path };
}
function peg$f9(head, tail) {
const parts = [head];
for (const t of tail) {
parts.push(t[1]);
}
return parts;
}
function peg$f10(chars) {
return { type: 'Literal', value: chars.join(''), dataType: 'string' };
}
function peg$f11(chars) {
return { type: 'Literal', value: chars.join(''), dataType: 'string' };
}
function peg$f12(char) {
const escapes = { '"': '"', "'": "'", '\\': '\\', 'n': '\n', 'r': '\r', 't': '\t' };
return escapes[char] || char;
}
function peg$f13(digits) {
return { type: 'Literal', value: parseInt(digits.join(''), 10), dataType: 'number' };
}
function peg$f14(first, rest) {
return first + rest.join('');
}
let peg$currPos = options.peg$currPos | 0;
let peg$savedPos = peg$currPos;
const peg$posDetailsCache = [{ line: 1, column: 1 }];
let peg$maxFailPos = peg$currPos;
let peg$maxFailExpected = options.peg$maxFailExpected || [];
let peg$silentFails = options.peg$silentFails | 0;
let peg$result;
if (options.startRule) {
if (!(options.startRule in peg$startRuleFunctions)) {
throw new Error("Can't start parsing from rule \"" + options.startRule + "\".");
}
peg$startRuleFunction = peg$startRuleFunctions[options.startRule];
}
function text() {
return input.substring(peg$savedPos, peg$currPos);
}
function offset() {
return peg$savedPos;
}
function range() {
return {
source: peg$source,
start: peg$savedPos,
end: peg$currPos,
};
}
function location() {
return peg$computeLocation(peg$savedPos, peg$currPos);
}
function expected(description, location) {
location = location !== undefined
? location
: peg$computeLocation(peg$savedPos, peg$currPos);
throw peg$buildStructuredError(
[peg$otherExpectation(description)],
input.substring(peg$savedPos, peg$currPos),
location
);
}
function error(message, location) {
location = location !== undefined
? location
: peg$computeLocation(peg$savedPos, peg$currPos);
throw peg$buildSimpleError(message, location);
}
function peg$getUnicode(pos = peg$currPos) {
const cp = input.codePointAt(pos);
if (cp === undefined) {
return "";
}
return String.fromCodePoint(cp);
}
function peg$literalExpectation(text, ignoreCase) {
return { type: "literal", text, ignoreCase };
}
function peg$classExpectation(parts, inverted, ignoreCase, unicode) {
return { type: "class", parts, inverted, ignoreCase, unicode };
}
function peg$anyExpectation() {
return { type: "any" };
}
function peg$endExpectation() {
return { type: "end" };
}
function peg$otherExpectation(description) {
return { type: "other", description };
}
function peg$computePosDetails(pos) {
let details = peg$posDetailsCache[pos];
let p;
if (details) {
return details;
} else {
if (pos >= peg$posDetailsCache.length) {
p = peg$posDetailsCache.length - 1;
} else {
p = pos;
while (!peg$posDetailsCache[--p]) {}
}
details = peg$posDetailsCache[p];
details = {
line: details.line,
column: details.column,
};
while (p < pos) {
if (input.charCodeAt(p) === 10) {
details.line++;
details.column = 1;
} else {
details.column++;
}
p++;
}
peg$posDetailsCache[pos] = details;
return details;
}
}
function peg$computeLocation(startPos, endPos, offset) {
const startPosDetails = peg$computePosDetails(startPos);
const endPosDetails = peg$computePosDetails(endPos);
const res = {
source: peg$source,
start: {
offset: startPos,
line: startPosDetails.line,
column: startPosDetails.column,
},
end: {
offset: endPos,
line: endPosDetails.line,
column: endPosDetails.column,
},
};
if (offset && peg$source && (typeof peg$source.offset === "function")) {
res.start = peg$source.offset(res.start);
res.end = peg$source.offset(res.end);
}
return res;
}
function peg$fail(expected) {
if (peg$currPos < peg$maxFailPos) { return; }
if (peg$currPos > peg$maxFailPos) {
peg$maxFailPos = peg$currPos;
peg$maxFailExpected = [];
}
peg$maxFailExpected.push(expected);
}
function peg$buildSimpleError(message, location) {
return new peg$SyntaxError(message, null, null, location);
}
function peg$buildStructuredError(expected, found, location) {
return new peg$SyntaxError(
peg$SyntaxError.buildMessage(expected, found),
expected,
found,
location
);
}
function peg$parseExpression() {
let s0, s1, s2, s3;
s0 = peg$currPos;
s1 = peg$parse_();
s2 = peg$parseDefeasibleExpr();
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
peg$savedPos = s0;
s0 = peg$f0(s2);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseDefeasibleExpr() {
let s0, s1, s2, s3, s4, s5;
s0 = peg$currPos;
s1 = peg$parsePrimaryExpr();
if (s1 !== peg$FAILED) {
s2 = peg$parse_();
if (input.substr(peg$currPos, 6) === peg$c0) {
s3 = peg$c0;
peg$currPos += 6;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e0); }
}
if (s3 !== peg$FAILED) {
s4 = peg$parse_();
s5 = peg$parsePredicateCall();
if (s5 !== peg$FAILED) {
peg$savedPos = s0;
s0 = peg$f1(s1, s5);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
if (s0 === peg$FAILED) {
s0 = peg$parsePrimaryExpr();
}
return s0;
}
function peg$parsePrimaryExpr() {
let s0;
s0 = peg$parseFusionBlock();
if (s0 === peg$FAILED) {
s0 = peg$parseChallengePredicate();
if (s0 === peg$FAILED) {
s0 = peg$parsePredicateCall();
}
}
return s0;
}
function peg$parseFusionBlock() {
let s0, s1, s2, s3, s4, s5, s6, s7, s8, s9;
s0 = peg$currPos;
if (input.substr(peg$currPos, 6) === peg$c1) {
s1 = peg$c1;
peg$currPos += 6;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e1); }
}
if (s1 !== peg$FAILED) {
s2 = peg$parse_();
s3 = peg$parseAggregatorKeyword();
if (s3 !== peg$FAILED) {
s4 = peg$parse_();
if (input.charCodeAt(peg$currPos) === 123) {
s5 = peg$c2;
peg$currPos++;
} else {
s5 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e2); }
}
if (s5 !== peg$FAILED) {
s6 = peg$parse_();
s7 = peg$parseExpressionList();
if (s7 !== peg$FAILED) {
s8 = peg$parse_();
if (input.charCodeAt(peg$currPos) === 125) {
s9 = peg$c3;
peg$currPos++;
} else {
s9 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e3); }
}
if (s9 !== peg$FAILED) {
peg$savedPos = s0;
s0 = peg$f2(s3, s7);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseAggregatorKeyword() {
let s0;
if (input.substr(peg$currPos, 3) === peg$c4) {
s0 = peg$c4;
peg$currPos += 3;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e4); }
}
if (s0 === peg$FAILED) {
if (input.substr(peg$currPos, 3) === peg$c5) {
s0 = peg$c5;
peg$currPos += 3;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e5); }
}
if (s0 === peg$FAILED) {
if (input.substr(peg$currPos, 8) === peg$c6) {
s0 = peg$c6;
peg$currPos += 8;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e6); }
}
if (s0 === peg$FAILED) {
if (input.substr(peg$currPos, 7) === peg$c7) {
s0 = peg$c7;
peg$currPos += 7;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e7); }
}
if (s0 === peg$FAILED) {
if (input.substr(peg$currPos, 3) === peg$c8) {
s0 = peg$c8;
peg$currPos += 3;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e8); }
}
if (s0 === peg$FAILED) {
if (input.substr(peg$currPos, 13) === peg$c9) {
s0 = peg$c9;
peg$currPos += 13;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e9); }
}
if (s0 === peg$FAILED) {
if (input.substr(peg$currPos, 6) === peg$c10) {
s0 = peg$c10;
peg$currPos += 6;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e10); }
}
if (s0 === peg$FAILED) {
if (input.substr(peg$currPos, 10) === peg$c11) {
s0 = peg$c11;
peg$currPos += 10;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e11); }
}
if (s0 === peg$FAILED) {
if (input.substr(peg$currPos, 11) === peg$c12) {
s0 = peg$c12;
peg$currPos += 11;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e12); }
}
if (s0 === peg$FAILED) {
if (input.substr(peg$currPos, 4) === peg$c13) {
s0 = peg$c13;
peg$currPos += 4;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e13); }
}
if (s0 === peg$FAILED) {
if (input.substr(peg$currPos, 4) === peg$c14) {
s0 = peg$c14;
peg$currPos += 4;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e14); }
}
if (s0 === peg$FAILED) {
if (input.substr(peg$currPos, 8) === peg$c15) {
s0 = peg$c15;
peg$currPos += 8;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e15); }
}
}
}
}
}
}
}
}
}
}
}
}
return s0;
}
function peg$parseExpressionList() {
let s0, s1, s2, s3, s4, s5;
s0 = peg$currPos;
s1 = peg$parseExpression();
if (s1 !== peg$FAILED) {
s2 = [];
s3 = peg$currPos;
s4 = peg$parse_();
s5 = peg$parseExpression();
if (s5 !== peg$FAILED) {
s4 = [s4, s5];
s3 = s4;
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
while (s3 !== peg$FAILED) {
s2.push(s3);
s3 = peg$currPos;
s4 = peg$parse_();
s5 = peg$parseExpression();
if (s5 !== peg$FAILED) {
s4 = [s4, s5];
s3 = s4;
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
}
peg$savedPos = s0;
s0 = peg$f3(s1, s2);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseChallengePredicate() {
let s0, s1, s2, s3, s4, s5, s6, s7, s8;
s0 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 42) {
s1 = peg$c16;
peg$currPos++;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e16); }
}
if (s1 !== peg$FAILED) {
s2 = peg$parseIdentifier();
if (s2 !== peg$FAILED) {
s3 = peg$parse_();
if (input.charCodeAt(peg$currPos) === 40) {
s4 = peg$c17;
peg$currPos++;
} else {
s4 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e17); }
}
if (s4 !== peg$FAILED) {
s5 = peg$parse_();
s6 = peg$parseArgumentList();
if (s6 === peg$FAILED) {
s6 = null;
}
s7 = peg$parse_();
if (input.charCodeAt(peg$currPos) === 41) {
s8 = peg$c18;
peg$currPos++;
} else {
s8 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e18); }
}
if (s8 !== peg$FAILED) {
peg$savedPos = s0;
s0 = peg$f4(s2, s6);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parsePredicateCall() {
let s0, s1, s2, s3, s4, s5, s6, s7;
s0 = peg$currPos;
s1 = peg$parseIdentifier();
if (s1 !== peg$FAILED) {
s2 = peg$parse_();
if (input.charCodeAt(peg$currPos) === 40) {
s3 = peg$c17;
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e17); }
}
if (s3 !== peg$FAILED) {
s4 = peg$parse_();
s5 = peg$parseArgumentList();
if (s5 === peg$FAILED) {
s5 = null;
}
s6 = peg$parse_();
if (input.charCodeAt(peg$currPos) === 41) {
s7 = peg$c18;
peg$currPos++;
} else {
s7 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e18); }
}
if (s7 !== peg$FAILED) {
peg$savedPos = s0;
s0 = peg$f5(s1, s5);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseArgumentList() {
let s0, s1, s2, s3, s4, s5, s6, s7;
s0 = peg$currPos;
s1 = peg$parseArgument();
if (s1 !== peg$FAILED) {
s2 = [];
s3 = peg$currPos;
s4 = peg$parse_();
if (input.charCodeAt(peg$currPos) === 44) {
s5 = peg$c19;
peg$currPos++;
} else {
s5 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e19); }
}
if (s5 !== peg$FAILED) {
s6 = peg$parse_();
s7 = peg$parseArgument();
if (s7 !== peg$FAILED) {
s4 = [s4, s5, s6, s7];
s3 = s4;
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
while (s3 !== peg$FAILED) {
s2.push(s3);
s3 = peg$currPos;
s4 = peg$parse_();
if (input.charCodeAt(peg$currPos) === 44) {
s5 = peg$c19;
peg$currPos++;
} else {
s5 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e19); }
}
if (s5 !== peg$FAILED) {
s6 = peg$parse_();
s7 = peg$parseArgument();
if (s7 !== peg$FAILED) {
s4 = [s4, s5, s6, s7];
s3 = s4;
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
}
peg$savedPos = s0;
s0 = peg$f6(s1, s2);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseArgument() {
let s0;
s0 = peg$parseVariableBinding();
if (s0 === peg$FAILED) {
s0 = peg$parseLiteral();
if (s0 === peg$FAILED) {
s0 = peg$parseTypedReference();
}
}
return s0;
}
function peg$parseVariableBinding() {
let s0, s1, s2, s3, s4, s5, s6;
s0 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 58) {
s1 = peg$c20;
peg$currPos++;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e20); }
}
if (s1 !== peg$FAILED) {
s2 = peg$parseIdentifier();
if (s2 !== peg$FAILED) {
s3 = [];
s4 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 46) {
s5 = peg$c21;
peg$currPos++;
} else {
s5 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e21); }
}
if (s5 !== peg$FAILED) {
s6 = peg$parseIdentifier();
if (s6 !== peg$FAILED) {
s5 = [s5, s6];
s4 = s5;
} else {
peg$currPos = s4;
s4 = peg$FAILED;
}
} else {
peg$currPos = s4;
s4 = peg$FAILED;
}
while (s4 !== peg$FAILED) {
s3.push(s4);
s4 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 46) {
s5 = peg$c21;
peg$currPos++;
} else {
s5 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e21); }
}
if (s5 !== peg$FAILED) {
s6 = peg$parseIdentifier();
if (s6 !== peg$FAILED) {
s5 = [s5, s6];
s4 = s5;
} else {
peg$currPos = s4;
s4 = peg$FAILED;
}
} else {
peg$currPos = s4;
s4 = peg$FAILED;
}
}
peg$savedPos = s0;
s0 = peg$f7(s2, s3);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseTypedReference() {
let s0, s1, s2, s3;
s0 = peg$currPos;
s1 = peg$parseIdentifier();
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 2) === peg$c22) {
s2 = peg$c22;
peg$currPos += 2;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e22); }
}
if (s2 !== peg$FAILED) {
s3 = peg$parsePath();
if (s3 !== peg$FAILED) {
peg$savedPos = s0;
s0 = peg$f8(s1, s3);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parsePath() {
let s0, s1, s2, s3, s4, s5;
s0 = peg$currPos;
s1 = peg$parseIdentifier();
if (s1 !== peg$FAILED) {
s2 = [];
s3 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 46) {
s4 = peg$c21;
peg$currPos++;
} else {
s4 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e21); }
}
if (s4 !== peg$FAILED) {
s5 = peg$parseIdentifier();
if (s5 !== peg$FAILED) {
s4 = [s4, s5];
s3 = s4;
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
while (s3 !== peg$FAILED) {
s2.push(s3);
s3 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 46) {
s4 = peg$c21;
peg$currPos++;
} else {
s4 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e21); }
}
if (s4 !== peg$FAILED) {
s5 = peg$parseIdentifier();
if (s5 !== peg$FAILED) {
s4 = [s4, s5];
s3 = s4;
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
}
peg$savedPos = s0;
s0 = peg$f9(s1, s2);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseLiteral() {
let s0;
s0 = peg$parseStringLiteral();
if (s0 === peg$FAILED) {
s0 = peg$parseNumberLiteral();
}
return s0;
}
function peg$parseStringLiteral() {
let s0, s1, s2, s3;
s0 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 34) {
s1 = peg$c23;
peg$currPos++;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e23); }
}
if (s1 !== peg$FAILED) {
s2 = [];
s3 = input.charAt(peg$currPos);
if (peg$r0.test(s3)) {
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e24); }
}
if (s3 === peg$FAILED) {
s3 = peg$parseEscapeSequence();
}
while (s3 !== peg$FAILED) {
s2.push(s3);
s3 = input.charAt(peg$currPos);
if (peg$r0.test(s3)) {
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e24); }
}
if (s3 === peg$FAILED) {
s3 = peg$parseEscapeSequence();
}
}
if (input.charCodeAt(peg$currPos) === 34) {
s3 = peg$c23;
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e23); }
}
if (s3 !== peg$FAILED) {
peg$savedPos = s0;
s0 = peg$f10(s2);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
if (s0 === peg$FAILED) {
s0 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 39) {
s1 = peg$c24;
peg$currPos++;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e25); }
}
if (s1 !== peg$FAILED) {
s2 = [];
s3 = input.charAt(peg$currPos);
if (peg$r1.test(s3)) {
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e26); }
}
if (s3 === peg$FAILED) {
s3 = peg$parseEscapeSequence();
}
while (s3 !== peg$FAILED) {
s2.push(s3);
s3 = input.charAt(peg$currPos);
if (peg$r1.test(s3)) {
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e26); }
}
if (s3 === peg$FAILED) {
s3 = peg$parseEscapeSequence();
}
}
if (input.charCodeAt(peg$currPos) === 39) {
s3 = peg$c24;
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e25); }
}
if (s3 !== peg$FAILED) {
peg$savedPos = s0;
s0 = peg$f11(s2);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
}
return s0;
}
function peg$parseEscapeSequence() {
let s0, s1, s2;
s0 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 92) {
s1 = peg$c25;
peg$currPos++;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e27); }
}
if (s1 !== peg$FAILED) {
s2 = input.charAt(peg$currPos);
if (peg$r2.test(s2)) {
peg$currPos++;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e28); }
}
if (s2 !== peg$FAILED) {
peg$savedPos = s0;
s0 = peg$f12(s2);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseNumberLiteral() {
let s0, s1, s2;
s0 = peg$currPos;
s1 = [];
s2 = input.charAt(peg$currPos);
if (peg$r3.test(s2)) {
peg$currPos++;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e29); }
}
if (s2 !== peg$FAILED) {
while (s2 !== peg$FAILED) {
s1.push(s2);
s2 = input.charAt(peg$currPos);
if (peg$r3.test(s2)) {
peg$currPos++;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e29); }
}
}
} else {
s1 = peg$FAILED;
}
if (s1 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$f13(s1);
}
s0 = s1;
return s0;
}
function peg$parseIdentifier() {
let s0, s1, s2, s3;
s0 = peg$currPos;
s1 = input.charAt(peg$currPos);
if (peg$r4.test(s1)) {
peg$currPos++;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e30); }
}
if (s1 !== peg$FAILED) {
s2 = [];
s3 = input.charAt(peg$currPos);
if (peg$r5.test(s3)) {
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e31); }
}
while (s3 !== peg$FAILED) {
s2.push(s3);
s3 = input.charAt(peg$currPos);
if (peg$r5.test(s3)) {
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e31); }
}
}
peg$savedPos = s0;
s0 = peg$f14(s1, s2);
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parse_() {
let s0, s1;
peg$silentFails++;
s0 = [];
s1 = peg$parseWS();
if (s1 === peg$FAILED) {
s1 = peg$parseLineComment();
if (s1 === peg$FAILED) {
s1 = peg$parseBlockComment();
}
}
while (s1 !== peg$FAILED) {
s0.push(s1);
s1 = peg$parseWS();
if (s1 === peg$FAILED) {
s1 = peg$parseLineComment();
if (s1 === peg$FAILED) {
s1 = peg$parseBlockComment();
}
}
}
peg$silentFails--;
return s0;
}
function peg$parseWS() {
let s0, s1;
s0 = [];
s1 = input.charAt(peg$currPos);
if (peg$r6.test(s1)) {
peg$currPos++;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e32); }
}
if (s1 !== peg$FAILED) {
while (s1 !== peg$FAILED) {
s0.push(s1);
s1 = input.charAt(peg$currPos);
if (peg$r6.test(s1)) {
peg$currPos++;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e32); }
}
}
} else {
s0 = peg$FAILED;
}
return s0;
}
function peg$parseLineComment() {
let s0, s1, s2, s3;
s0 = peg$currPos;
if (input.substr(peg$currPos, 2) === peg$c26) {
s1 = peg$c26;
peg$currPos += 2;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e33); }
}
if (s1 !== peg$FAILED) {
s2 = [];
s3 = input.charAt(peg$currPos);
if (peg$r7.test(s3)) {
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e34); }
}
while (s3 !== peg$FAILED) {
s2.push(s3);
s3 = input.charAt(peg$currPos);
if (peg$r7.test(s3)) {
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e34); }
}
}
s1 = [s1, s2];
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
function peg$parseBlockComment() {
let s0, s1, s2, s3, s4, s5;
s0 = peg$currPos;
if (input.substr(peg$currPos, 2) === peg$c27) {
s1 = peg$c27;
peg$currPos += 2;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e35); }
}
if (s1 !== peg$FAILED) {
s2 = [];
s3 = peg$currPos;
s4 = peg$currPos;
peg$silentFails++;
if (input.substr(peg$currPos, 2) === peg$c28) {
s5 = peg$c28;
peg$currPos += 2;
} else {
s5 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e36); }
}
peg$silentFails--;
if (s5 === peg$FAILED) {
s4 = undefined;
} else {
peg$currPos = s4;
s4 = peg$FAILED;
}
if (s4 !== peg$FAILED) {
if (input.length > peg$currPos) {
s5 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s5 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e37); }
}
if (s5 !== peg$FAILED) {
s4 = [s4, s5];
s3 = s4;
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
while (s3 !== peg$FAILED) {
s2.push(s3);
s3 = peg$currPos;
s4 = peg$currPos;
peg$silentFails++;
if (input.substr(peg$currPos, 2) === peg$c28) {
s5 = peg$c28;
peg$currPos += 2;
} else {
s5 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e36); }
}
peg$silentFails--;
if (s5 === peg$FAILED) {
s4 = undefined;
} else {
peg$currPos = s4;
s4 = peg$FAILED;
}
if (s4 !== peg$FAILED) {
if (input.length > peg$currPos) {
s5 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s5 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e37); }
}
if (s5 !== peg$FAILED) {
s4 = [s4, s5];
s3 = s4;
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
}
if (input.substr(peg$currPos, 2) === peg$c28) {
s3 = peg$c28;
peg$currPos += 2;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$e36); }
}
if (s3 !== peg$FAILED) {
s1 = [s1, s2, s3];
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
return s0;
}
// Helper functions
function makeVariable(name, path) {
return { type: 'Variable', name, path: path || [] };
}
function makePredicate(name, args) {
return { type: 'Predicate', name, args: args || [] };
}
function makeChallengePredicate(name, args) {
return { type: 'Predicate', name, args: args || [], challenge: true };
}
function makeFusion(expressions, aggregator) {
return { type: 'Fusion', aggregator, expressions };
}
function makeDefeasible(primary, exception) {
return { type: 'Defeasible', primary, exception };
}
peg$result = peg$startRuleFunction();
const peg$success = (peg$result !== peg$FAILED && peg$currPos === input.length);
function peg$throw() {
if (peg$result !== peg$FAILED && peg$currPos < input.length) {
peg$fail(peg$endExpectation());
}
throw peg$buildStructuredError(
peg$maxFailExpected,
peg$maxFailPos < input.length ? peg$getUnicode(peg$maxFailPos) : null,
peg$maxFailPos < input.length
? peg$computeLocation(peg$maxFailPos, peg$maxFailPos + 1)
: peg$computeLocation(peg$maxFailPos, peg$maxFailPos)
);
}
if (options.peg$library) {
return /** @type {any} */ ({
peg$result,
peg$currPos,
peg$FAILED,
peg$maxFailExpected,
peg$maxFailPos,
peg$success,
peg$throw: peg$success ? undefined : peg$throw,
});
}
if (peg$success) {
return peg$result;
} else {
peg$throw();
}
}
const peg$allowedStartRules = [
"Expression"
];
export {
peg$allowedStartRules as StartRules,
peg$SyntaxError as SyntaxError,
peg$parse as parse
};
Reference in New Issue Copy Permalink