* Very early start on PEG.js based ACS grammar
This commit is contained in:
Bryan Ashby
parent
e023d0236e
commit
23025ca5bd
|
|
@ -0,0 +1,852 @@
|
||||||
|
module.exports = (function() {
|
||||||
|
"use strict";
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Generated by PEG.js 0.9.0.
|
||||||
|
*
|
||||||
|
* http://pegjs.org/
|
||||||
|
*/
|
||||||
|
|
||||||
|
function peg$subclass(child, parent) {
|
||||||
|
function ctor() { this.constructor = child; }
|
||||||
|
ctor.prototype = parent.prototype;
|
||||||
|
child.prototype = new ctor();
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$SyntaxError(message, expected, found, location) {
|
||||||
|
this.message = message;
|
||||||
|
this.expected = expected;
|
||||||
|
this.found = found;
|
||||||
|
this.location = location;
|
||||||
|
this.name = "SyntaxError";
|
||||||
|
|
||||||
|
if (typeof Error.captureStackTrace === "function") {
|
||||||
|
Error.captureStackTrace(this, peg$SyntaxError);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
peg$subclass(peg$SyntaxError, Error);
|
||||||
|
|
||||||
|
function peg$parse(input) {
|
||||||
|
var options = arguments.length > 1 ? arguments[1] : {},
|
||||||
|
parser = this,
|
||||||
|
|
||||||
|
peg$FAILED = {},
|
||||||
|
|
||||||
|
peg$startRuleFunctions = { start: peg$parsestart },
|
||||||
|
peg$startRuleFunction = peg$parsestart,
|
||||||
|
|
||||||
|
peg$c0 = "|",
|
||||||
|
peg$c1 = { type: "literal", value: "|", description: "\"|\"" },
|
||||||
|
peg$c2 = function(left, right) { return left || right; },
|
||||||
|
peg$c3 = "&",
|
||||||
|
peg$c4 = { type: "literal", value: "&", description: "\"&\"" },
|
||||||
|
peg$c5 = function(left, right) { return left && right; },
|
||||||
|
peg$c6 = "!",
|
||||||
|
peg$c7 = { type: "literal", value: "!", description: "\"!\"" },
|
||||||
|
peg$c8 = function(value) { return !value; },
|
||||||
|
peg$c9 = "(",
|
||||||
|
peg$c10 = { type: "literal", value: "(", description: "\"(\"" },
|
||||||
|
peg$c11 = ")",
|
||||||
|
peg$c12 = { type: "literal", value: ")", description: "\")\"" },
|
||||||
|
peg$c13 = function(value) { return value; },
|
||||||
|
peg$c14 = ",",
|
||||||
|
peg$c15 = { type: "literal", value: ",", description: "\",\"" },
|
||||||
|
peg$c16 = " ",
|
||||||
|
peg$c17 = { type: "literal", value: " ", description: "\" \"" },
|
||||||
|
peg$c18 = function(n, a) { return checkAcs(n, a); },
|
||||||
|
peg$c19 = /^[A-Z]/,
|
||||||
|
peg$c20 = { type: "class", value: "[A-Z]", description: "[A-Z]" },
|
||||||
|
peg$c21 = function(c) { return c.join(''); },
|
||||||
|
peg$c22 = /^[A-Za-z]/,
|
||||||
|
peg$c23 = { type: "class", value: "[A-Za-z]", description: "[A-Za-z]" },
|
||||||
|
peg$c24 = function(c) { return c.join('') },
|
||||||
|
peg$c25 = /^[A-Za-z0-9\-]/,
|
||||||
|
peg$c26 = { type: "class", value: "[A-Za-z0-9\\-]", description: "[A-Za-z0-9\\-]" },
|
||||||
|
peg$c27 = function(a) { return a.join('') },
|
||||||
|
peg$c28 = function(v) { return v; },
|
||||||
|
peg$c29 = function(start, last) { return start.concat(last); },
|
||||||
|
peg$c30 = "{",
|
||||||
|
peg$c31 = { type: "literal", value: "{", description: "\"{\"" },
|
||||||
|
peg$c32 = "}",
|
||||||
|
peg$c33 = { type: "literal", value: "}", description: "\"}\"" },
|
||||||
|
peg$c34 = function(l) { return l; },
|
||||||
|
peg$c35 = "[",
|
||||||
|
peg$c36 = { type: "literal", value: "[", description: "\"[\"" },
|
||||||
|
peg$c37 = "]",
|
||||||
|
peg$c38 = { type: "literal", value: "]", description: "\"]\"" },
|
||||||
|
peg$c39 = /^[0-9]/,
|
||||||
|
peg$c40 = { type: "class", value: "[0-9]", description: "[0-9]" },
|
||||||
|
peg$c41 = function(d) { return d ? parseInt(d.join(''), 10) : null; },
|
||||||
|
|
||||||
|
peg$currPos = 0,
|
||||||
|
peg$savedPos = 0,
|
||||||
|
peg$posDetailsCache = [{ line: 1, column: 1, seenCR: false }],
|
||||||
|
peg$maxFailPos = 0,
|
||||||
|
peg$maxFailExpected = [],
|
||||||
|
peg$silentFails = 0,
|
||||||
|
|
||||||
|
peg$result;
|
||||||
|
|
||||||
|
if ("startRule" in options) {
|
||||||
|
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 location() {
|
||||||
|
return peg$computeLocation(peg$savedPos, peg$currPos);
|
||||||
|
}
|
||||||
|
|
||||||
|
function expected(description) {
|
||||||
|
throw peg$buildException(
|
||||||
|
null,
|
||||||
|
[{ type: "other", description: description }],
|
||||||
|
input.substring(peg$savedPos, peg$currPos),
|
||||||
|
peg$computeLocation(peg$savedPos, peg$currPos)
|
||||||
|
);
|
||||||
|
}
|
||||||
|
|
||||||
|
function error(message) {
|
||||||
|
throw peg$buildException(
|
||||||
|
message,
|
||||||
|
null,
|
||||||
|
input.substring(peg$savedPos, peg$currPos),
|
||||||
|
peg$computeLocation(peg$savedPos, peg$currPos)
|
||||||
|
);
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$computePosDetails(pos) {
|
||||||
|
var details = peg$posDetailsCache[pos],
|
||||||
|
p, ch;
|
||||||
|
|
||||||
|
if (details) {
|
||||||
|
return details;
|
||||||
|
} else {
|
||||||
|
p = pos - 1;
|
||||||
|
while (!peg$posDetailsCache[p]) {
|
||||||
|
p--;
|
||||||
|
}
|
||||||
|
|
||||||
|
details = peg$posDetailsCache[p];
|
||||||
|
details = {
|
||||||
|
line: details.line,
|
||||||
|
column: details.column,
|
||||||
|
seenCR: details.seenCR
|
||||||
|
};
|
||||||
|
|
||||||
|
while (p < pos) {
|
||||||
|
ch = input.charAt(p);
|
||||||
|
if (ch === "\n") {
|
||||||
|
if (!details.seenCR) { details.line++; }
|
||||||
|
details.column = 1;
|
||||||
|
details.seenCR = false;
|
||||||
|
} else if (ch === "\r" || ch === "\u2028" || ch === "\u2029") {
|
||||||
|
details.line++;
|
||||||
|
details.column = 1;
|
||||||
|
details.seenCR = true;
|
||||||
|
} else {
|
||||||
|
details.column++;
|
||||||
|
details.seenCR = false;
|
||||||
|
}
|
||||||
|
|
||||||
|
p++;
|
||||||
|
}
|
||||||
|
|
||||||
|
peg$posDetailsCache[pos] = details;
|
||||||
|
return details;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$computeLocation(startPos, endPos) {
|
||||||
|
var startPosDetails = peg$computePosDetails(startPos),
|
||||||
|
endPosDetails = peg$computePosDetails(endPos);
|
||||||
|
|
||||||
|
return {
|
||||||
|
start: {
|
||||||
|
offset: startPos,
|
||||||
|
line: startPosDetails.line,
|
||||||
|
column: startPosDetails.column
|
||||||
|
},
|
||||||
|
end: {
|
||||||
|
offset: endPos,
|
||||||
|
line: endPosDetails.line,
|
||||||
|
column: endPosDetails.column
|
||||||
|
}
|
||||||
|
};
|
||||||
|
}
|
||||||
|
|
||||||
|
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$buildException(message, expected, found, location) {
|
||||||
|
function cleanupExpected(expected) {
|
||||||
|
var i = 1;
|
||||||
|
|
||||||
|
expected.sort(function(a, b) {
|
||||||
|
if (a.description < b.description) {
|
||||||
|
return -1;
|
||||||
|
} else if (a.description > b.description) {
|
||||||
|
return 1;
|
||||||
|
} else {
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
});
|
||||||
|
|
||||||
|
while (i < expected.length) {
|
||||||
|
if (expected[i - 1] === expected[i]) {
|
||||||
|
expected.splice(i, 1);
|
||||||
|
} else {
|
||||||
|
i++;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
function buildMessage(expected, found) {
|
||||||
|
function stringEscape(s) {
|
||||||
|
function hex(ch) { return ch.charCodeAt(0).toString(16).toUpperCase(); }
|
||||||
|
|
||||||
|
return s
|
||||||
|
.replace(/\\/g, '\\\\')
|
||||||
|
.replace(/"/g, '\\"')
|
||||||
|
.replace(/\x08/g, '\\b')
|
||||||
|
.replace(/\t/g, '\\t')
|
||||||
|
.replace(/\n/g, '\\n')
|
||||||
|
.replace(/\f/g, '\\f')
|
||||||
|
.replace(/\r/g, '\\r')
|
||||||
|
.replace(/[\x00-\x07\x0B\x0E\x0F]/g, function(ch) { return '\\x0' + hex(ch); })
|
||||||
|
.replace(/[\x10-\x1F\x80-\xFF]/g, function(ch) { return '\\x' + hex(ch); })
|
||||||
|
.replace(/[\u0100-\u0FFF]/g, function(ch) { return '\\u0' + hex(ch); })
|
||||||
|
.replace(/[\u1000-\uFFFF]/g, function(ch) { return '\\u' + hex(ch); });
|
||||||
|
}
|
||||||
|
|
||||||
|
var expectedDescs = new Array(expected.length),
|
||||||
|
expectedDesc, foundDesc, i;
|
||||||
|
|
||||||
|
for (i = 0; i < expected.length; i++) {
|
||||||
|
expectedDescs[i] = expected[i].description;
|
||||||
|
}
|
||||||
|
|
||||||
|
expectedDesc = expected.length > 1
|
||||||
|
? expectedDescs.slice(0, -1).join(", ")
|
||||||
|
+ " or "
|
||||||
|
+ expectedDescs[expected.length - 1]
|
||||||
|
: expectedDescs[0];
|
||||||
|
|
||||||
|
foundDesc = found ? "\"" + stringEscape(found) + "\"" : "end of input";
|
||||||
|
|
||||||
|
return "Expected " + expectedDesc + " but " + foundDesc + " found.";
|
||||||
|
}
|
||||||
|
|
||||||
|
if (expected !== null) {
|
||||||
|
cleanupExpected(expected);
|
||||||
|
}
|
||||||
|
|
||||||
|
return new peg$SyntaxError(
|
||||||
|
message !== null ? message : buildMessage(expected, found),
|
||||||
|
expected,
|
||||||
|
found,
|
||||||
|
location
|
||||||
|
);
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parsestart() {
|
||||||
|
var s0;
|
||||||
|
|
||||||
|
s0 = peg$parseor_expr();
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parseor_expr() {
|
||||||
|
var s0, s1, s2, s3;
|
||||||
|
|
||||||
|
s0 = peg$currPos;
|
||||||
|
s1 = peg$parseand_expr();
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
if (input.charCodeAt(peg$currPos) === 124) {
|
||||||
|
s2 = peg$c0;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c1); }
|
||||||
|
}
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
s3 = peg$parseor_expr();
|
||||||
|
if (s3 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c2(s1, s3);
|
||||||
|
s0 = s1;
|
||||||
|
} 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$parseand_expr();
|
||||||
|
}
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parseand_expr() {
|
||||||
|
var s0, s1, s2, s3;
|
||||||
|
|
||||||
|
s0 = peg$currPos;
|
||||||
|
s1 = peg$parsenot_expr();
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
if (input.charCodeAt(peg$currPos) === 38) {
|
||||||
|
s2 = peg$c3;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c4); }
|
||||||
|
}
|
||||||
|
if (s2 === peg$FAILED) {
|
||||||
|
s2 = null;
|
||||||
|
}
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
s3 = peg$parseor_expr();
|
||||||
|
if (s3 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c5(s1, s3);
|
||||||
|
s0 = s1;
|
||||||
|
} 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$parsenot_expr();
|
||||||
|
}
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parsenot_expr() {
|
||||||
|
var s0, s1, s2;
|
||||||
|
|
||||||
|
s0 = peg$currPos;
|
||||||
|
if (input.charCodeAt(peg$currPos) === 33) {
|
||||||
|
s1 = peg$c6;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s1 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c7); }
|
||||||
|
}
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
s2 = peg$parseatom();
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c8(s2);
|
||||||
|
s0 = s1;
|
||||||
|
} else {
|
||||||
|
peg$currPos = s0;
|
||||||
|
s0 = peg$FAILED;
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
peg$currPos = s0;
|
||||||
|
s0 = peg$FAILED;
|
||||||
|
}
|
||||||
|
if (s0 === peg$FAILED) {
|
||||||
|
s0 = peg$parseatom();
|
||||||
|
}
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parseatom() {
|
||||||
|
var s0, s1, s2, s3;
|
||||||
|
|
||||||
|
s0 = peg$parseacs_check();
|
||||||
|
if (s0 === peg$FAILED) {
|
||||||
|
s0 = peg$currPos;
|
||||||
|
if (input.charCodeAt(peg$currPos) === 40) {
|
||||||
|
s1 = peg$c9;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s1 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c10); }
|
||||||
|
}
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
s2 = peg$parseor_expr();
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
if (input.charCodeAt(peg$currPos) === 41) {
|
||||||
|
s3 = peg$c11;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s3 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c12); }
|
||||||
|
}
|
||||||
|
if (s3 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c13(s2);
|
||||||
|
s0 = s1;
|
||||||
|
} 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$parsecomma() {
|
||||||
|
var s0;
|
||||||
|
|
||||||
|
if (input.charCodeAt(peg$currPos) === 44) {
|
||||||
|
s0 = peg$c14;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s0 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c15); }
|
||||||
|
}
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parsews() {
|
||||||
|
var s0;
|
||||||
|
|
||||||
|
if (input.charCodeAt(peg$currPos) === 32) {
|
||||||
|
s0 = peg$c16;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s0 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c17); }
|
||||||
|
}
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parseoptionalSpc() {
|
||||||
|
var s0, s1;
|
||||||
|
|
||||||
|
s0 = [];
|
||||||
|
s1 = peg$parsews();
|
||||||
|
while (s1 !== peg$FAILED) {
|
||||||
|
s0.push(s1);
|
||||||
|
s1 = peg$parsews();
|
||||||
|
}
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parseacs_check() {
|
||||||
|
var s0, s1, s2;
|
||||||
|
|
||||||
|
s0 = peg$currPos;
|
||||||
|
s1 = peg$parsename();
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
s2 = peg$parsearg();
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c18(s1, s2);
|
||||||
|
s0 = s1;
|
||||||
|
} else {
|
||||||
|
peg$currPos = s0;
|
||||||
|
s0 = peg$FAILED;
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
peg$currPos = s0;
|
||||||
|
s0 = peg$FAILED;
|
||||||
|
}
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parsename() {
|
||||||
|
var s0, s1, s2, s3;
|
||||||
|
|
||||||
|
s0 = peg$currPos;
|
||||||
|
s1 = peg$currPos;
|
||||||
|
if (peg$c19.test(input.charAt(peg$currPos))) {
|
||||||
|
s2 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c20); }
|
||||||
|
}
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
if (peg$c19.test(input.charAt(peg$currPos))) {
|
||||||
|
s3 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s3 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c20); }
|
||||||
|
}
|
||||||
|
if (s3 !== peg$FAILED) {
|
||||||
|
s2 = [s2, s3];
|
||||||
|
s1 = s2;
|
||||||
|
} else {
|
||||||
|
peg$currPos = s1;
|
||||||
|
s1 = peg$FAILED;
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
peg$currPos = s1;
|
||||||
|
s1 = peg$FAILED;
|
||||||
|
}
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c21(s1);
|
||||||
|
}
|
||||||
|
s0 = s1;
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parseargNum() {
|
||||||
|
var s0, s1, s2;
|
||||||
|
|
||||||
|
s0 = peg$currPos;
|
||||||
|
s1 = [];
|
||||||
|
if (peg$c22.test(input.charAt(peg$currPos))) {
|
||||||
|
s2 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c23); }
|
||||||
|
}
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
while (s2 !== peg$FAILED) {
|
||||||
|
s1.push(s2);
|
||||||
|
if (peg$c22.test(input.charAt(peg$currPos))) {
|
||||||
|
s2 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c23); }
|
||||||
|
}
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
s1 = peg$FAILED;
|
||||||
|
}
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c24(s1);
|
||||||
|
}
|
||||||
|
s0 = s1;
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parseargVar() {
|
||||||
|
var s0, s1, s2;
|
||||||
|
|
||||||
|
s0 = peg$currPos;
|
||||||
|
s1 = [];
|
||||||
|
if (peg$c25.test(input.charAt(peg$currPos))) {
|
||||||
|
s2 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c26); }
|
||||||
|
}
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
while (s2 !== peg$FAILED) {
|
||||||
|
s1.push(s2);
|
||||||
|
if (peg$c25.test(input.charAt(peg$currPos))) {
|
||||||
|
s2 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c26); }
|
||||||
|
}
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
s1 = peg$FAILED;
|
||||||
|
}
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c27(s1);
|
||||||
|
}
|
||||||
|
s0 = s1;
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parsecommaList() {
|
||||||
|
var s0, s1, s2, s3, s4;
|
||||||
|
|
||||||
|
s0 = peg$currPos;
|
||||||
|
s1 = [];
|
||||||
|
s2 = peg$currPos;
|
||||||
|
s3 = peg$parseargVar();
|
||||||
|
if (s3 !== peg$FAILED) {
|
||||||
|
s4 = peg$parsecomma();
|
||||||
|
if (s4 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s2;
|
||||||
|
s3 = peg$c28(s3);
|
||||||
|
s2 = s3;
|
||||||
|
} else {
|
||||||
|
peg$currPos = s2;
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
peg$currPos = s2;
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
}
|
||||||
|
while (s2 !== peg$FAILED) {
|
||||||
|
s1.push(s2);
|
||||||
|
s2 = peg$currPos;
|
||||||
|
s3 = peg$parseargVar();
|
||||||
|
if (s3 !== peg$FAILED) {
|
||||||
|
s4 = peg$parsecomma();
|
||||||
|
if (s4 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s2;
|
||||||
|
s3 = peg$c28(s3);
|
||||||
|
s2 = s3;
|
||||||
|
} else {
|
||||||
|
peg$currPos = s2;
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
peg$currPos = s2;
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
s2 = peg$parseargVar();
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c29(s1, s2);
|
||||||
|
s0 = s1;
|
||||||
|
} else {
|
||||||
|
peg$currPos = s0;
|
||||||
|
s0 = peg$FAILED;
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
peg$currPos = s0;
|
||||||
|
s0 = peg$FAILED;
|
||||||
|
}
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parseallList() {
|
||||||
|
var s0, s1, s2, s3;
|
||||||
|
|
||||||
|
s0 = peg$currPos;
|
||||||
|
if (input.charCodeAt(peg$currPos) === 123) {
|
||||||
|
s1 = peg$c30;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s1 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c31); }
|
||||||
|
}
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
s2 = peg$parsecommaList();
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
if (input.charCodeAt(peg$currPos) === 125) {
|
||||||
|
s3 = peg$c32;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s3 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c33); }
|
||||||
|
}
|
||||||
|
if (s3 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c34(s2);
|
||||||
|
s0 = s1;
|
||||||
|
} 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$parseanyList() {
|
||||||
|
var s0, s1, s2, s3;
|
||||||
|
|
||||||
|
s0 = peg$currPos;
|
||||||
|
if (input.charCodeAt(peg$currPos) === 91) {
|
||||||
|
s1 = peg$c35;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s1 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c36); }
|
||||||
|
}
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
s2 = peg$parsecommaList();
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
if (input.charCodeAt(peg$currPos) === 93) {
|
||||||
|
s3 = peg$c37;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s3 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c38); }
|
||||||
|
}
|
||||||
|
if (s3 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c34(s2);
|
||||||
|
s0 = s1;
|
||||||
|
} 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$parsearg() {
|
||||||
|
var s0, s1, s2;
|
||||||
|
|
||||||
|
s0 = peg$parseallList();
|
||||||
|
if (s0 === peg$FAILED) {
|
||||||
|
s0 = peg$parseanyList();
|
||||||
|
if (s0 === peg$FAILED) {
|
||||||
|
s0 = peg$currPos;
|
||||||
|
s1 = [];
|
||||||
|
if (peg$c22.test(input.charAt(peg$currPos))) {
|
||||||
|
s2 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c23); }
|
||||||
|
}
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
while (s2 !== peg$FAILED) {
|
||||||
|
s1.push(s2);
|
||||||
|
if (peg$c22.test(input.charAt(peg$currPos))) {
|
||||||
|
s2 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c23); }
|
||||||
|
}
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
s1 = peg$FAILED;
|
||||||
|
}
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c21(s1);
|
||||||
|
}
|
||||||
|
s0 = s1;
|
||||||
|
if (s0 === peg$FAILED) {
|
||||||
|
s0 = peg$currPos;
|
||||||
|
s1 = [];
|
||||||
|
if (peg$c39.test(input.charAt(peg$currPos))) {
|
||||||
|
s2 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c40); }
|
||||||
|
}
|
||||||
|
while (s2 !== peg$FAILED) {
|
||||||
|
s1.push(s2);
|
||||||
|
if (peg$c39.test(input.charAt(peg$currPos))) {
|
||||||
|
s2 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c40); }
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c41(s1);
|
||||||
|
}
|
||||||
|
s0 = s1;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
var user = options.user;
|
||||||
|
|
||||||
|
function checkAcs(name, value) {
|
||||||
|
return {
|
||||||
|
ID : function userId(value) {
|
||||||
|
return user.userId === value;
|
||||||
|
}
|
||||||
|
}[name](value) || false;
|
||||||
|
}
|
||||||
|
|
||||||
|
function check(name, value) {
|
||||||
|
// Dummy implementation: returns true when the name starts with 'A'
|
||||||
|
return name.charAt(0) == 'A';
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
peg$result = peg$startRuleFunction();
|
||||||
|
|
||||||
|
if (peg$result !== peg$FAILED && peg$currPos === input.length) {
|
||||||
|
return peg$result;
|
||||||
|
} else {
|
||||||
|
if (peg$result !== peg$FAILED && peg$currPos < input.length) {
|
||||||
|
peg$fail({ type: "end", description: "end of input" });
|
||||||
|
}
|
||||||
|
|
||||||
|
throw peg$buildException(
|
||||||
|
null,
|
||||||
|
peg$maxFailExpected,
|
||||||
|
peg$maxFailPos < input.length ? input.charAt(peg$maxFailPos) : null,
|
||||||
|
peg$maxFailPos < input.length
|
||||||
|
? peg$computeLocation(peg$maxFailPos, peg$maxFailPos + 1)
|
||||||
|
: peg$computeLocation(peg$maxFailPos, peg$maxFailPos)
|
||||||
|
);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return {
|
||||||
|
SyntaxError: peg$SyntaxError,
|
||||||
|
parse: peg$parse
|
||||||
|
};
|
||||||
|
})();
|
||||||
|
|
@ -0,0 +1,72 @@
|
||||||
|
|
||||||
|
{
|
||||||
|
var user = options.user;
|
||||||
|
|
||||||
|
function checkAcs(name, value) {
|
||||||
|
return {
|
||||||
|
ID : function userId(value) {
|
||||||
|
return user.userId === value;
|
||||||
|
}
|
||||||
|
}[name](value) || false;
|
||||||
|
}
|
||||||
|
|
||||||
|
function check(name, value) {
|
||||||
|
// Dummy implementation: returns true when the name starts with 'A'
|
||||||
|
return name.charAt(0) == 'A';
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
start
|
||||||
|
= expr
|
||||||
|
|
||||||
|
expr
|
||||||
|
= or_expr
|
||||||
|
|
||||||
|
or_expr
|
||||||
|
= left:and_expr '|' right:expr { return left || right; }
|
||||||
|
/ and_expr
|
||||||
|
|
||||||
|
and_expr
|
||||||
|
= left:not_expr '&'? right:expr { return left && right; }
|
||||||
|
/ not_expr
|
||||||
|
|
||||||
|
not_expr
|
||||||
|
= '!' value:atom { return !value; }
|
||||||
|
/ atom
|
||||||
|
|
||||||
|
atom
|
||||||
|
= acs_check
|
||||||
|
/ '(' value:expr ')' { return value; }
|
||||||
|
|
||||||
|
comma = ','
|
||||||
|
ws = ' '
|
||||||
|
|
||||||
|
optionalSpc = ws*
|
||||||
|
|
||||||
|
acs_check
|
||||||
|
= n:name a:arg { return checkAcs(n, a); }
|
||||||
|
|
||||||
|
name
|
||||||
|
= c:([A-Z][A-Z]) { return c.join(''); }
|
||||||
|
|
||||||
|
argNum
|
||||||
|
= c:[A-Za-z]+ { return c.join('') }
|
||||||
|
|
||||||
|
argVar
|
||||||
|
= a:[A-Za-z0-9\-]+ { return a.join('') }
|
||||||
|
|
||||||
|
commaList
|
||||||
|
= start:(v:argVar comma { return v; })* last:argVar { return start.concat(last); }
|
||||||
|
|
||||||
|
allList
|
||||||
|
= '{' l:commaList '}' { return l; }
|
||||||
|
|
||||||
|
anyList
|
||||||
|
= '[' l:commaList ']' { return l; }
|
||||||
|
|
||||||
|
arg
|
||||||
|
= allList
|
||||||
|
/ anyList
|
||||||
|
/ c:[A-Za-z]+ { return c.join(''); }
|
||||||
|
/ d:[0-9]* { return d ? parseInt(d.join(''), 10) : null; }
|
||||||
|
|
||||||
Loading…
Reference in New Issue