diff --git a/core/acs_parser.js b/core/acs_parser.js new file mode 100644 index 00000000..c43b852b --- /dev/null +++ b/core/acs_parser.js @@ -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 + }; +})(); diff --git a/misc/acs_parser.pegjs b/misc/acs_parser.pegjs new file mode 100644 index 00000000..dae65a67 --- /dev/null +++ b/misc/acs_parser.pegjs @@ -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; } + \ No newline at end of file