node-red/editor/vendor/jsonata/worker-jsonata.js

4237 lines
143 KiB
JavaScript

"no use strict";
;(function(window) {
if (typeof window.window != "undefined" && window.document)
return;
if (window.require && window.define)
return;
if (!window.console) {
window.console = function() {
var msgs = Array.prototype.slice.call(arguments, 0);
postMessage({type: "log", data: msgs});
};
window.console.error =
window.console.warn =
window.console.log =
window.console.trace = window.console;
}
window.window = window;
window.ace = window;
window.onerror = function(message, file, line, col, err) {
postMessage({type: "error", data: {
message: message,
data: err.data,
file: file,
line: line,
col: col,
stack: err.stack
}});
};
window.normalizeModule = function(parentId, moduleName) {
// normalize plugin requires
if (moduleName.indexOf("!") !== -1) {
var chunks = moduleName.split("!");
return window.normalizeModule(parentId, chunks[0]) + "!" + window.normalizeModule(parentId, chunks[1]);
}
// normalize relative requires
if (moduleName.charAt(0) == ".") {
var base = parentId.split("/").slice(0, -1).join("/");
moduleName = (base ? base + "/" : "") + moduleName;
while (moduleName.indexOf(".") !== -1 && previous != moduleName) {
var previous = moduleName;
moduleName = moduleName.replace(/^\.\//, "").replace(/\/\.\//, "/").replace(/[^\/]+\/\.\.\//, "");
}
}
return moduleName;
};
window.require = function require(parentId, id) {
if (!id) {
id = parentId;
parentId = null;
}
if (!id.charAt)
throw new Error("worker.js require() accepts only (parentId, id) as arguments");
id = window.normalizeModule(parentId, id);
var module = window.require.modules[id];
if (module) {
if (!module.initialized) {
module.initialized = true;
module.exports = module.factory().exports;
}
return module.exports;
}
if (!window.require.tlns)
return console.log("unable to load " + id);
var path = resolveModuleId(id, window.require.tlns);
if (path.slice(-3) != ".js") path += ".js";
window.require.id = id;
window.require.modules[id] = {}; // prevent infinite loop on broken modules
importScripts(path);
return window.require(parentId, id);
};
function resolveModuleId(id, paths) {
var testPath = id, tail = "";
while (testPath) {
var alias = paths[testPath];
if (typeof alias == "string") {
return alias + tail;
} else if (alias) {
return alias.location.replace(/\/*$/, "/") + (tail || alias.main || alias.name);
} else if (alias === false) {
return "";
}
var i = testPath.lastIndexOf("/");
if (i === -1) break;
tail = testPath.substr(i) + tail;
testPath = testPath.slice(0, i);
}
return id;
}
window.require.modules = {};
window.require.tlns = {};
window.define = function(id, deps, factory) {
if (arguments.length == 2) {
factory = deps;
if (typeof id != "string") {
deps = id;
id = window.require.id;
}
} else if (arguments.length == 1) {
factory = id;
deps = [];
id = window.require.id;
}
if (typeof factory != "function") {
window.require.modules[id] = {
exports: factory,
initialized: true
};
return;
}
if (!deps.length)
// If there is no dependencies, we inject "require", "exports" and
// "module" as dependencies, to provide CommonJS compatibility.
deps = ["require", "exports", "module"];
var req = function(childId) {
return window.require(id, childId);
};
window.require.modules[id] = {
exports: {},
factory: function() {
var module = this;
var returnExports = factory.apply(this, deps.map(function(dep) {
switch (dep) {
// Because "require", "exports" and "module" aren't actual
// dependencies, we must handle them seperately.
case "require": return req;
case "exports": return module.exports;
case "module": return module;
// But for all other dependencies, we can just go ahead and
// require them.
default: return req(dep);
}
}));
if (returnExports)
module.exports = returnExports;
return module;
}
};
};
window.define.amd = {};
require.tlns = {};
window.initBaseUrls = function initBaseUrls(topLevelNamespaces) {
for (var i in topLevelNamespaces)
require.tlns[i] = topLevelNamespaces[i];
};
window.initSender = function initSender() {
var EventEmitter = window.require("ace/lib/event_emitter").EventEmitter;
var oop = window.require("ace/lib/oop");
var Sender = function() {};
(function() {
oop.implement(this, EventEmitter);
this.callback = function(data, callbackId) {
postMessage({
type: "call",
id: callbackId,
data: data
});
};
this.emit = function(name, data) {
postMessage({
type: "event",
name: name,
data: data
});
};
}).call(Sender.prototype);
return new Sender();
};
var main = window.main = null;
var sender = window.sender = null;
window.onmessage = function(e) {
var msg = e.data;
if (msg.event && sender) {
sender._signal(msg.event, msg.data);
}
else if (msg.command) {
if (main[msg.command])
main[msg.command].apply(main, msg.args);
else if (window[msg.command])
window[msg.command].apply(window, msg.args);
else
throw new Error("Unknown command:" + msg.command);
}
else if (msg.init) {
window.initBaseUrls(msg.tlns);
require("ace/lib/es5-shim");
sender = window.sender = window.initSender();
var clazz = require(msg.module)[msg.classname];
main = window.main = new clazz(sender);
}
};
})(this);
define("ace/lib/oop",["require","exports","module"], function(require, exports, module) {
"use strict";
exports.inherits = function(ctor, superCtor) {
ctor.super_ = superCtor;
ctor.prototype = Object.create(superCtor.prototype, {
constructor: {
value: ctor,
enumerable: false,
writable: true,
configurable: true
}
});
};
exports.mixin = function(obj, mixin) {
for (var key in mixin) {
obj[key] = mixin[key];
}
return obj;
};
exports.implement = function(proto, mixin) {
exports.mixin(proto, mixin);
};
});
define("ace/range",["require","exports","module"], function(require, exports, module) {
"use strict";
var comparePoints = function(p1, p2) {
return p1.row - p2.row || p1.column - p2.column;
};
var Range = function(startRow, startColumn, endRow, endColumn) {
this.start = {
row: startRow,
column: startColumn
};
this.end = {
row: endRow,
column: endColumn
};
};
(function() {
this.isEqual = function(range) {
return this.start.row === range.start.row &&
this.end.row === range.end.row &&
this.start.column === range.start.column &&
this.end.column === range.end.column;
};
this.toString = function() {
return ("Range: [" + this.start.row + "/" + this.start.column +
"] -> [" + this.end.row + "/" + this.end.column + "]");
};
this.contains = function(row, column) {
return this.compare(row, column) == 0;
};
this.compareRange = function(range) {
var cmp,
end = range.end,
start = range.start;
cmp = this.compare(end.row, end.column);
if (cmp == 1) {
cmp = this.compare(start.row, start.column);
if (cmp == 1) {
return 2;
} else if (cmp == 0) {
return 1;
} else {
return 0;
}
} else if (cmp == -1) {
return -2;
} else {
cmp = this.compare(start.row, start.column);
if (cmp == -1) {
return -1;
} else if (cmp == 1) {
return 42;
} else {
return 0;
}
}
};
this.comparePoint = function(p) {
return this.compare(p.row, p.column);
};
this.containsRange = function(range) {
return this.comparePoint(range.start) == 0 && this.comparePoint(range.end) == 0;
};
this.intersects = function(range) {
var cmp = this.compareRange(range);
return (cmp == -1 || cmp == 0 || cmp == 1);
};
this.isEnd = function(row, column) {
return this.end.row == row && this.end.column == column;
};
this.isStart = function(row, column) {
return this.start.row == row && this.start.column == column;
};
this.setStart = function(row, column) {
if (typeof row == "object") {
this.start.column = row.column;
this.start.row = row.row;
} else {
this.start.row = row;
this.start.column = column;
}
};
this.setEnd = function(row, column) {
if (typeof row == "object") {
this.end.column = row.column;
this.end.row = row.row;
} else {
this.end.row = row;
this.end.column = column;
}
};
this.inside = function(row, column) {
if (this.compare(row, column) == 0) {
if (this.isEnd(row, column) || this.isStart(row, column)) {
return false;
} else {
return true;
}
}
return false;
};
this.insideStart = function(row, column) {
if (this.compare(row, column) == 0) {
if (this.isEnd(row, column)) {
return false;
} else {
return true;
}
}
return false;
};
this.insideEnd = function(row, column) {
if (this.compare(row, column) == 0) {
if (this.isStart(row, column)) {
return false;
} else {
return true;
}
}
return false;
};
this.compare = function(row, column) {
if (!this.isMultiLine()) {
if (row === this.start.row) {
return column < this.start.column ? -1 : (column > this.end.column ? 1 : 0);
}
}
if (row < this.start.row)
return -1;
if (row > this.end.row)
return 1;
if (this.start.row === row)
return column >= this.start.column ? 0 : -1;
if (this.end.row === row)
return column <= this.end.column ? 0 : 1;
return 0;
};
this.compareStart = function(row, column) {
if (this.start.row == row && this.start.column == column) {
return -1;
} else {
return this.compare(row, column);
}
};
this.compareEnd = function(row, column) {
if (this.end.row == row && this.end.column == column) {
return 1;
} else {
return this.compare(row, column);
}
};
this.compareInside = function(row, column) {
if (this.end.row == row && this.end.column == column) {
return 1;
} else if (this.start.row == row && this.start.column == column) {
return -1;
} else {
return this.compare(row, column);
}
};
this.clipRows = function(firstRow, lastRow) {
if (this.end.row > lastRow)
var end = {row: lastRow + 1, column: 0};
else if (this.end.row < firstRow)
var end = {row: firstRow, column: 0};
if (this.start.row > lastRow)
var start = {row: lastRow + 1, column: 0};
else if (this.start.row < firstRow)
var start = {row: firstRow, column: 0};
return Range.fromPoints(start || this.start, end || this.end);
};
this.extend = function(row, column) {
var cmp = this.compare(row, column);
if (cmp == 0)
return this;
else if (cmp == -1)
var start = {row: row, column: column};
else
var end = {row: row, column: column};
return Range.fromPoints(start || this.start, end || this.end);
};
this.isEmpty = function() {
return (this.start.row === this.end.row && this.start.column === this.end.column);
};
this.isMultiLine = function() {
return (this.start.row !== this.end.row);
};
this.clone = function() {
return Range.fromPoints(this.start, this.end);
};
this.collapseRows = function() {
if (this.end.column == 0)
return new Range(this.start.row, 0, Math.max(this.start.row, this.end.row-1), 0)
else
return new Range(this.start.row, 0, this.end.row, 0)
};
this.toScreenRange = function(session) {
var screenPosStart = session.documentToScreenPosition(this.start);
var screenPosEnd = session.documentToScreenPosition(this.end);
return new Range(
screenPosStart.row, screenPosStart.column,
screenPosEnd.row, screenPosEnd.column
);
};
this.moveBy = function(row, column) {
this.start.row += row;
this.start.column += column;
this.end.row += row;
this.end.column += column;
};
}).call(Range.prototype);
Range.fromPoints = function(start, end) {
return new Range(start.row, start.column, end.row, end.column);
};
Range.comparePoints = comparePoints;
Range.comparePoints = function(p1, p2) {
return p1.row - p2.row || p1.column - p2.column;
};
exports.Range = Range;
});
define("ace/apply_delta",["require","exports","module"], function(require, exports, module) {
"use strict";
function throwDeltaError(delta, errorText){
console.log("Invalid Delta:", delta);
throw "Invalid Delta: " + errorText;
}
function positionInDocument(docLines, position) {
return position.row >= 0 && position.row < docLines.length &&
position.column >= 0 && position.column <= docLines[position.row].length;
}
function validateDelta(docLines, delta) {
if (delta.action != "insert" && delta.action != "remove")
throwDeltaError(delta, "delta.action must be 'insert' or 'remove'");
if (!(delta.lines instanceof Array))
throwDeltaError(delta, "delta.lines must be an Array");
if (!delta.start || !delta.end)
throwDeltaError(delta, "delta.start/end must be an present");
var start = delta.start;
if (!positionInDocument(docLines, delta.start))
throwDeltaError(delta, "delta.start must be contained in document");
var end = delta.end;
if (delta.action == "remove" && !positionInDocument(docLines, end))
throwDeltaError(delta, "delta.end must contained in document for 'remove' actions");
var numRangeRows = end.row - start.row;
var numRangeLastLineChars = (end.column - (numRangeRows == 0 ? start.column : 0));
if (numRangeRows != delta.lines.length - 1 || delta.lines[numRangeRows].length != numRangeLastLineChars)
throwDeltaError(delta, "delta.range must match delta lines");
}
exports.applyDelta = function(docLines, delta, doNotValidate) {
var row = delta.start.row;
var startColumn = delta.start.column;
var line = docLines[row] || "";
switch (delta.action) {
case "insert":
var lines = delta.lines;
if (lines.length === 1) {
docLines[row] = line.substring(0, startColumn) + delta.lines[0] + line.substring(startColumn);
} else {
var args = [row, 1].concat(delta.lines);
docLines.splice.apply(docLines, args);
docLines[row] = line.substring(0, startColumn) + docLines[row];
docLines[row + delta.lines.length - 1] += line.substring(startColumn);
}
break;
case "remove":
var endColumn = delta.end.column;
var endRow = delta.end.row;
if (row === endRow) {
docLines[row] = line.substring(0, startColumn) + line.substring(endColumn);
} else {
docLines.splice(
row, endRow - row + 1,
line.substring(0, startColumn) + docLines[endRow].substring(endColumn)
);
}
break;
}
}
});
define("ace/lib/event_emitter",["require","exports","module"], function(require, exports, module) {
"use strict";
var EventEmitter = {};
var stopPropagation = function() { this.propagationStopped = true; };
var preventDefault = function() { this.defaultPrevented = true; };
EventEmitter._emit =
EventEmitter._dispatchEvent = function(eventName, e) {
this._eventRegistry || (this._eventRegistry = {});
this._defaultHandlers || (this._defaultHandlers = {});
var listeners = this._eventRegistry[eventName] || [];
var defaultHandler = this._defaultHandlers[eventName];
if (!listeners.length && !defaultHandler)
return;
if (typeof e != "object" || !e)
e = {};
if (!e.type)
e.type = eventName;
if (!e.stopPropagation)
e.stopPropagation = stopPropagation;
if (!e.preventDefault)
e.preventDefault = preventDefault;
listeners = listeners.slice();
for (var i=0; i<listeners.length; i++) {
listeners[i](e, this);
if (e.propagationStopped)
break;
}
if (defaultHandler && !e.defaultPrevented)
return defaultHandler(e, this);
};
EventEmitter._signal = function(eventName, e) {
var listeners = (this._eventRegistry || {})[eventName];
if (!listeners)
return;
listeners = listeners.slice();
for (var i=0; i<listeners.length; i++)
listeners[i](e, this);
};
EventEmitter.once = function(eventName, callback) {
var _self = this;
callback && this.addEventListener(eventName, function newCallback() {
_self.removeEventListener(eventName, newCallback);
callback.apply(null, arguments);
});
};
EventEmitter.setDefaultHandler = function(eventName, callback) {
var handlers = this._defaultHandlers
if (!handlers)
handlers = this._defaultHandlers = {_disabled_: {}};
if (handlers[eventName]) {
var old = handlers[eventName];
var disabled = handlers._disabled_[eventName];
if (!disabled)
handlers._disabled_[eventName] = disabled = [];
disabled.push(old);
var i = disabled.indexOf(callback);
if (i != -1)
disabled.splice(i, 1);
}
handlers[eventName] = callback;
};
EventEmitter.removeDefaultHandler = function(eventName, callback) {
var handlers = this._defaultHandlers
if (!handlers)
return;
var disabled = handlers._disabled_[eventName];
if (handlers[eventName] == callback) {
var old = handlers[eventName];
if (disabled)
this.setDefaultHandler(eventName, disabled.pop());
} else if (disabled) {
var i = disabled.indexOf(callback);
if (i != -1)
disabled.splice(i, 1);
}
};
EventEmitter.on =
EventEmitter.addEventListener = function(eventName, callback, capturing) {
this._eventRegistry = this._eventRegistry || {};
var listeners = this._eventRegistry[eventName];
if (!listeners)
listeners = this._eventRegistry[eventName] = [];
if (listeners.indexOf(callback) == -1)
listeners[capturing ? "unshift" : "push"](callback);
return callback;
};
EventEmitter.off =
EventEmitter.removeListener =
EventEmitter.removeEventListener = function(eventName, callback) {
this._eventRegistry = this._eventRegistry || {};
var listeners = this._eventRegistry[eventName];
if (!listeners)
return;
var index = listeners.indexOf(callback);
if (index !== -1)
listeners.splice(index, 1);
};
EventEmitter.removeAllListeners = function(eventName) {
if (this._eventRegistry) this._eventRegistry[eventName] = [];
};
exports.EventEmitter = EventEmitter;
});
define("ace/anchor",["require","exports","module","ace/lib/oop","ace/lib/event_emitter"], function(require, exports, module) {
"use strict";
var oop = require("./lib/oop");
var EventEmitter = require("./lib/event_emitter").EventEmitter;
var Anchor = exports.Anchor = function(doc, row, column) {
this.$onChange = this.onChange.bind(this);
this.attach(doc);
if (typeof column == "undefined")
this.setPosition(row.row, row.column);
else
this.setPosition(row, column);
};
(function() {
oop.implement(this, EventEmitter);
this.getPosition = function() {
return this.$clipPositionToDocument(this.row, this.column);
};
this.getDocument = function() {
return this.document;
};
this.$insertRight = false;
this.onChange = function(delta) {
if (delta.start.row == delta.end.row && delta.start.row != this.row)
return;
if (delta.start.row > this.row)
return;
var point = $getTransformedPoint(delta, {row: this.row, column: this.column}, this.$insertRight);
this.setPosition(point.row, point.column, true);
};
function $pointsInOrder(point1, point2, equalPointsInOrder) {
var bColIsAfter = equalPointsInOrder ? point1.column <= point2.column : point1.column < point2.column;
return (point1.row < point2.row) || (point1.row == point2.row && bColIsAfter);
}
function $getTransformedPoint(delta, point, moveIfEqual) {
var deltaIsInsert = delta.action == "insert";
var deltaRowShift = (deltaIsInsert ? 1 : -1) * (delta.end.row - delta.start.row);
var deltaColShift = (deltaIsInsert ? 1 : -1) * (delta.end.column - delta.start.column);
var deltaStart = delta.start;
var deltaEnd = deltaIsInsert ? deltaStart : delta.end; // Collapse insert range.
if ($pointsInOrder(point, deltaStart, moveIfEqual)) {
return {
row: point.row,
column: point.column
};
}
if ($pointsInOrder(deltaEnd, point, !moveIfEqual)) {
return {
row: point.row + deltaRowShift,
column: point.column + (point.row == deltaEnd.row ? deltaColShift : 0)
};
}
return {
row: deltaStart.row,
column: deltaStart.column
};
}
this.setPosition = function(row, column, noClip) {
var pos;
if (noClip) {
pos = {
row: row,
column: column
};
} else {
pos = this.$clipPositionToDocument(row, column);
}
if (this.row == pos.row && this.column == pos.column)
return;
var old = {
row: this.row,
column: this.column
};
this.row = pos.row;
this.column = pos.column;
this._signal("change", {
old: old,
value: pos
});
};
this.detach = function() {
this.document.removeEventListener("change", this.$onChange);
};
this.attach = function(doc) {
this.document = doc || this.document;
this.document.on("change", this.$onChange);
};
this.$clipPositionToDocument = function(row, column) {
var pos = {};
if (row >= this.document.getLength()) {
pos.row = Math.max(0, this.document.getLength() - 1);
pos.column = this.document.getLine(pos.row).length;
}
else if (row < 0) {
pos.row = 0;
pos.column = 0;
}
else {
pos.row = row;
pos.column = Math.min(this.document.getLine(pos.row).length, Math.max(0, column));
}
if (column < 0)
pos.column = 0;
return pos;
};
}).call(Anchor.prototype);
});
define("ace/document",["require","exports","module","ace/lib/oop","ace/apply_delta","ace/lib/event_emitter","ace/range","ace/anchor"], function(require, exports, module) {
"use strict";
var oop = require("./lib/oop");
var applyDelta = require("./apply_delta").applyDelta;
var EventEmitter = require("./lib/event_emitter").EventEmitter;
var Range = require("./range").Range;
var Anchor = require("./anchor").Anchor;
var Document = function(textOrLines) {
this.$lines = [""];
if (textOrLines.length === 0) {
this.$lines = [""];
} else if (Array.isArray(textOrLines)) {
this.insertMergedLines({row: 0, column: 0}, textOrLines);
} else {
this.insert({row: 0, column:0}, textOrLines);
}
};
(function() {
oop.implement(this, EventEmitter);
this.setValue = function(text) {
var len = this.getLength() - 1;
this.remove(new Range(0, 0, len, this.getLine(len).length));
this.insert({row: 0, column: 0}, text);
};
this.getValue = function() {
return this.getAllLines().join(this.getNewLineCharacter());
};
this.createAnchor = function(row, column) {
return new Anchor(this, row, column);
};
if ("aaa".split(/a/).length === 0) {
this.$split = function(text) {
return text.replace(/\r\n|\r/g, "\n").split("\n");
};
} else {
this.$split = function(text) {
return text.split(/\r\n|\r|\n/);
};
}
this.$detectNewLine = function(text) {
var match = text.match(/^.*?(\r\n|\r|\n)/m);
this.$autoNewLine = match ? match[1] : "\n";
this._signal("changeNewLineMode");
};
this.getNewLineCharacter = function() {
switch (this.$newLineMode) {
case "windows":
return "\r\n";
case "unix":
return "\n";
default:
return this.$autoNewLine || "\n";
}
};
this.$autoNewLine = "";
this.$newLineMode = "auto";
this.setNewLineMode = function(newLineMode) {
if (this.$newLineMode === newLineMode)
return;
this.$newLineMode = newLineMode;
this._signal("changeNewLineMode");
};
this.getNewLineMode = function() {
return this.$newLineMode;
};
this.isNewLine = function(text) {
return (text == "\r\n" || text == "\r" || text == "\n");
};
this.getLine = function(row) {
return this.$lines[row] || "";
};
this.getLines = function(firstRow, lastRow) {
return this.$lines.slice(firstRow, lastRow + 1);
};
this.getAllLines = function() {
return this.getLines(0, this.getLength());
};
this.getLength = function() {
return this.$lines.length;
};
this.getTextRange = function(range) {
return this.getLinesForRange(range).join(this.getNewLineCharacter());
};
this.getLinesForRange = function(range) {
var lines;
if (range.start.row === range.end.row) {
lines = [this.getLine(range.start.row).substring(range.start.column, range.end.column)];
} else {
lines = this.getLines(range.start.row, range.end.row);
lines[0] = (lines[0] || "").substring(range.start.column);
var l = lines.length - 1;
if (range.end.row - range.start.row == l)
lines[l] = lines[l].substring(0, range.end.column);
}
return lines;
};
this.insertLines = function(row, lines) {
console.warn("Use of document.insertLines is deprecated. Use the insertFullLines method instead.");
return this.insertFullLines(row, lines);
};
this.removeLines = function(firstRow, lastRow) {
console.warn("Use of document.removeLines is deprecated. Use the removeFullLines method instead.");
return this.removeFullLines(firstRow, lastRow);
};
this.insertNewLine = function(position) {
console.warn("Use of document.insertNewLine is deprecated. Use insertMergedLines(position, ['', '']) instead.");
return this.insertMergedLines(position, ["", ""]);
};
this.insert = function(position, text) {
if (this.getLength() <= 1)
this.$detectNewLine(text);
return this.insertMergedLines(position, this.$split(text));
};
this.insertInLine = function(position, text) {
var start = this.clippedPos(position.row, position.column);
var end = this.pos(position.row, position.column + text.length);
this.applyDelta({
start: start,
end: end,
action: "insert",
lines: [text]
}, true);
return this.clonePos(end);
};
this.clippedPos = function(row, column) {
var length = this.getLength();
if (row === undefined) {
row = length;
} else if (row < 0) {
row = 0;
} else if (row >= length) {
row = length - 1;
column = undefined;
}
var line = this.getLine(row);
if (column == undefined)
column = line.length;
column = Math.min(Math.max(column, 0), line.length);
return {row: row, column: column};
};
this.clonePos = function(pos) {
return {row: pos.row, column: pos.column};
};
this.pos = function(row, column) {
return {row: row, column: column};
};
this.$clipPosition = function(position) {
var length = this.getLength();
if (position.row >= length) {
position.row = Math.max(0, length - 1);
position.column = this.getLine(length - 1).length;
} else {
position.row = Math.max(0, position.row);
position.column = Math.min(Math.max(position.column, 0), this.getLine(position.row).length);
}
return position;
};
this.insertFullLines = function(row, lines) {
row = Math.min(Math.max(row, 0), this.getLength());
var column = 0;
if (row < this.getLength()) {
lines = lines.concat([""]);
column = 0;
} else {
lines = [""].concat(lines);
row--;
column = this.$lines[row].length;
}
this.insertMergedLines({row: row, column: column}, lines);
};
this.insertMergedLines = function(position, lines) {
var start = this.clippedPos(position.row, position.column);
var end = {
row: start.row + lines.length - 1,
column: (lines.length == 1 ? start.column : 0) + lines[lines.length - 1].length
};
this.applyDelta({
start: start,
end: end,
action: "insert",
lines: lines
});
return this.clonePos(end);
};
this.remove = function(range) {
var start = this.clippedPos(range.start.row, range.start.column);
var end = this.clippedPos(range.end.row, range.end.column);
this.applyDelta({
start: start,
end: end,
action: "remove",
lines: this.getLinesForRange({start: start, end: end})
});
return this.clonePos(start);
};
this.removeInLine = function(row, startColumn, endColumn) {
var start = this.clippedPos(row, startColumn);
var end = this.clippedPos(row, endColumn);
this.applyDelta({
start: start,
end: end,
action: "remove",
lines: this.getLinesForRange({start: start, end: end})
}, true);
return this.clonePos(start);
};
this.removeFullLines = function(firstRow, lastRow) {
firstRow = Math.min(Math.max(0, firstRow), this.getLength() - 1);
lastRow = Math.min(Math.max(0, lastRow ), this.getLength() - 1);
var deleteFirstNewLine = lastRow == this.getLength() - 1 && firstRow > 0;
var deleteLastNewLine = lastRow < this.getLength() - 1;
var startRow = ( deleteFirstNewLine ? firstRow - 1 : firstRow );
var startCol = ( deleteFirstNewLine ? this.getLine(startRow).length : 0 );
var endRow = ( deleteLastNewLine ? lastRow + 1 : lastRow );
var endCol = ( deleteLastNewLine ? 0 : this.getLine(endRow).length );
var range = new Range(startRow, startCol, endRow, endCol);
var deletedLines = this.$lines.slice(firstRow, lastRow + 1);
this.applyDelta({
start: range.start,
end: range.end,
action: "remove",
lines: this.getLinesForRange(range)
});
return deletedLines;
};
this.removeNewLine = function(row) {
if (row < this.getLength() - 1 && row >= 0) {
this.applyDelta({
start: this.pos(row, this.getLine(row).length),
end: this.pos(row + 1, 0),
action: "remove",
lines: ["", ""]
});
}
};
this.replace = function(range, text) {
if (!(range instanceof Range))
range = Range.fromPoints(range.start, range.end);
if (text.length === 0 && range.isEmpty())
return range.start;
if (text == this.getTextRange(range))
return range.end;
this.remove(range);
var end;
if (text) {
end = this.insert(range.start, text);
}
else {
end = range.start;
}
return end;
};
this.applyDeltas = function(deltas) {
for (var i=0; i<deltas.length; i++) {
this.applyDelta(deltas[i]);
}
};
this.revertDeltas = function(deltas) {
for (var i=deltas.length-1; i>=0; i--) {
this.revertDelta(deltas[i]);
}
};
this.applyDelta = function(delta, doNotValidate) {
var isInsert = delta.action == "insert";
if (isInsert ? delta.lines.length <= 1 && !delta.lines[0]
: !Range.comparePoints(delta.start, delta.end)) {
return;
}
if (isInsert && delta.lines.length > 20000)
this.$splitAndapplyLargeDelta(delta, 20000);
applyDelta(this.$lines, delta, doNotValidate);
this._signal("change", delta);
};
this.$splitAndapplyLargeDelta = function(delta, MAX) {
var lines = delta.lines;
var l = lines.length;
var row = delta.start.row;
var column = delta.start.column;
var from = 0, to = 0;
do {
from = to;
to += MAX - 1;
var chunk = lines.slice(from, to);
if (to > l) {
delta.lines = chunk;
delta.start.row = row + from;
delta.start.column = column;
break;
}
chunk.push("");
this.applyDelta({
start: this.pos(row + from, column),
end: this.pos(row + to, column = 0),
action: delta.action,
lines: chunk
}, true);
} while(true);
};
this.revertDelta = function(delta) {
this.applyDelta({
start: this.clonePos(delta.start),
end: this.clonePos(delta.end),
action: (delta.action == "insert" ? "remove" : "insert"),
lines: delta.lines.slice()
});
};
this.indexToPosition = function(index, startRow) {
var lines = this.$lines || this.getAllLines();
var newlineLength = this.getNewLineCharacter().length;
for (var i = startRow || 0, l = lines.length; i < l; i++) {
index -= lines[i].length + newlineLength;
if (index < 0)
return {row: i, column: index + lines[i].length + newlineLength};
}
return {row: l-1, column: lines[l-1].length};
};
this.positionToIndex = function(pos, startRow) {
var lines = this.$lines || this.getAllLines();
var newlineLength = this.getNewLineCharacter().length;
var index = 0;
var row = Math.min(pos.row, lines.length);
for (var i = startRow || 0; i < row; ++i)
index += lines[i].length + newlineLength;
return index + pos.column;
};
}).call(Document.prototype);
exports.Document = Document;
});
define("ace/lib/lang",["require","exports","module"], function(require, exports, module) {
"use strict";
exports.last = function(a) {
return a[a.length - 1];
};
exports.stringReverse = function(string) {
return string.split("").reverse().join("");
};
exports.stringRepeat = function (string, count) {
var result = '';
while (count > 0) {
if (count & 1)
result += string;
if (count >>= 1)
string += string;
}
return result;
};
var trimBeginRegexp = /^\s\s*/;
var trimEndRegexp = /\s\s*$/;
exports.stringTrimLeft = function (string) {
return string.replace(trimBeginRegexp, '');
};
exports.stringTrimRight = function (string) {
return string.replace(trimEndRegexp, '');
};
exports.copyObject = function(obj) {
var copy = {};
for (var key in obj) {
copy[key] = obj[key];
}
return copy;
};
exports.copyArray = function(array){
var copy = [];
for (var i=0, l=array.length; i<l; i++) {
if (array[i] && typeof array[i] == "object")
copy[i] = this.copyObject(array[i]);
else
copy[i] = array[i];
}
return copy;
};
exports.deepCopy = function deepCopy(obj) {
if (typeof obj !== "object" || !obj)
return obj;
var copy;
if (Array.isArray(obj)) {
copy = [];
for (var key = 0; key < obj.length; key++) {
copy[key] = deepCopy(obj[key]);
}
return copy;
}
if (Object.prototype.toString.call(obj) !== "[object Object]")
return obj;
copy = {};
for (var key in obj)
copy[key] = deepCopy(obj[key]);
return copy;
};
exports.arrayToMap = function(arr) {
var map = {};
for (var i=0; i<arr.length; i++) {
map[arr[i]] = 1;
}
return map;
};
exports.createMap = function(props) {
var map = Object.create(null);
for (var i in props) {
map[i] = props[i];
}
return map;
};
exports.arrayRemove = function(array, value) {
for (var i = 0; i <= array.length; i++) {
if (value === array[i]) {
array.splice(i, 1);
}
}
};
exports.escapeRegExp = function(str) {
return str.replace(/([.*+?^${}()|[\]\/\\])/g, '\\$1');
};
exports.escapeHTML = function(str) {
return str.replace(/&/g, "&#38;").replace(/"/g, "&#34;").replace(/'/g, "&#39;").replace(/</g, "&#60;");
};
exports.getMatchOffsets = function(string, regExp) {
var matches = [];
string.replace(regExp, function(str) {
matches.push({
offset: arguments[arguments.length-2],
length: str.length
});
});
return matches;
};
exports.deferredCall = function(fcn) {
var timer = null;
var callback = function() {
timer = null;
fcn();
};
var deferred = function(timeout) {
deferred.cancel();
timer = setTimeout(callback, timeout || 0);
return deferred;
};
deferred.schedule = deferred;
deferred.call = function() {
this.cancel();
fcn();
return deferred;
};
deferred.cancel = function() {
clearTimeout(timer);
timer = null;
return deferred;
};
deferred.isPending = function() {
return timer;
};
return deferred;
};
exports.delayedCall = function(fcn, defaultTimeout) {
var timer = null;
var callback = function() {
timer = null;
fcn();
};
var _self = function(timeout) {
if (timer == null)
timer = setTimeout(callback, timeout || defaultTimeout);
};
_self.delay = function(timeout) {
timer && clearTimeout(timer);
timer = setTimeout(callback, timeout || defaultTimeout);
};
_self.schedule = _self;
_self.call = function() {
this.cancel();
fcn();
};
_self.cancel = function() {
timer && clearTimeout(timer);
timer = null;
};
_self.isPending = function() {
return timer;
};
return _self;
};
});
define("ace/worker/mirror",["require","exports","module","ace/range","ace/document","ace/lib/lang"], function(require, exports, module) {
"use strict";
var Range = require("../range").Range;
var Document = require("../document").Document;
var lang = require("../lib/lang");
var Mirror = exports.Mirror = function(sender) {
this.sender = sender;
var doc = this.doc = new Document("");
var deferredUpdate = this.deferredUpdate = lang.delayedCall(this.onUpdate.bind(this));
var _self = this;
sender.on("change", function(e) {
var data = e.data;
if (data[0].start) {
doc.applyDeltas(data);
} else {
for (var i = 0; i < data.length; i += 2) {
if (Array.isArray(data[i+1])) {
var d = {action: "insert", start: data[i], lines: data[i+1]};
} else {
var d = {action: "remove", start: data[i], end: data[i+1]};
}
doc.applyDelta(d, true);
}
}
if (_self.$timeout)
return deferredUpdate.schedule(_self.$timeout);
_self.onUpdate();
});
};
(function() {
this.$timeout = 500;
this.setTimeout = function(timeout) {
this.$timeout = timeout;
};
this.setValue = function(value) {
this.doc.setValue(value);
this.deferredUpdate.schedule(this.$timeout);
};
this.getValue = function(callbackId) {
this.sender.callback(this.doc.getValue(), callbackId);
};
this.onUpdate = function() {
};
this.isPending = function() {
return this.deferredUpdate.isPending();
};
}).call(Mirror.prototype);
});
define("ace/mode/jsonata_worker",["require","exports","module","ace/lib/oop","ace/worker/mirror"], function(require, exports, module) {
"use strict";
var jsonata = (function() {
var operators = {
'.': 75,
'[': 80,
']': 0,
'{': 70,
'}': 0,
'(': 80,
')': 0,
',': 0,
'@': 75,
'#': 70,
';': 80,
':': 80,
'?': 20,
'+': 50,
'-': 50,
'*': 60,
'/': 60,
'%': 60,
'|': 20,
'=': 40,
'<': 40,
'>': 40,
'`': 80,
'**': 60,
'..': 20,
':=': 10,
'!=': 40,
'<=': 40,
'>=': 40,
'and': 30,
'or': 25,
'in': 40,
'&': 50,
'!': 0 // not an operator, but needed as a stop character for name tokens
};
var escapes = { // JSON string escape sequences - see json.org
'"': '"',
'\\': '\\',
'/': '/',
'b': '\b',
'f': '\f',
'n': '\n',
'r': '\r',
't': '\t'
};
var tokenizer = function (path) {
var position = 0;
var length = path.length;
var create = function (type, value) {
var obj = {type: type, value: value, position: position};
return obj;
};
var next = function () {
if (position >= length) return null;
var currentChar = path.charAt(position);
while (position < length && ' \t\n\r\v'.indexOf(currentChar) > -1) {
position++;
currentChar = path.charAt(position);
}
if (currentChar === '.' && path.charAt(position + 1) === '.') {
position += 2;
return create('operator', '..');
}
if (currentChar === ':' && path.charAt(position + 1) === '=') {
position += 2;
return create('operator', ':=');
}
if (currentChar === '!' && path.charAt(position + 1) === '=') {
position += 2;
return create('operator', '!=');
}
if (currentChar === '>' && path.charAt(position + 1) === '=') {
position += 2;
return create('operator', '>=');
}
if (currentChar === '<' && path.charAt(position + 1) === '=') {
position += 2;
return create('operator', '<=');
}
if (currentChar === '*' && path.charAt(position + 1) === '*') {
position += 2;
return create('operator', '**');
}
if (operators.hasOwnProperty(currentChar)) {
position++;
return create('operator', currentChar);
}
if (currentChar === '"' || currentChar === "'") {
var quoteType = currentChar;
position++;
var qstr = "";
while (position < length) {
currentChar = path.charAt(position);
if (currentChar === '\\') { // escape sequence
position++;
currentChar = path.charAt(position);
if (escapes.hasOwnProperty(currentChar)) {
qstr += escapes[currentChar];
} else if (currentChar === 'u') {
var octets = path.substr(position + 1, 4);
if (/^[0-9a-fA-F]+$/.test(octets)) {
var codepoint = parseInt(octets, 16);
qstr += String.fromCharCode(codepoint);
position += 4;
} else {
throw {
message: "The escape sequence \\u must be followed by 4 hex digits at column " + position,
stack: (new Error()).stack,
position: position
};
}
} else {
throw {
message: 'unsupported escape sequence: \\' + currentChar + ' at column ' + position,
stack: (new Error()).stack,
position: position,
token: currentChar
};
}
} else if (currentChar === quoteType) {
position++;
return create('string', qstr);
} else {
qstr += currentChar;
}
position++;
}
throw {
message: 'no terminating quote found in string literal at column ' + position,
stack: (new Error()).stack,
position: position
};
}
var numregex = /^-?(0|([1-9][0-9]*))(\.[0-9]+)?([Ee][-+]?[0-9]+)?/;
var match = numregex.exec(path.substring(position));
if (match !== null) {
var num = parseFloat(match[0]);
if (!isNaN(num) && isFinite(num)) {
position += match[0].length;
return create('number', num);
} else {
throw {
message: 'Number out of range: ' + match[0] + ' at column ' + position,
stack: (new Error()).stack,
position: position,
token: match[0]
};
}
}
var i = position;
var ch;
var name;
for (;;) {
ch = path.charAt(i);
if (i == length || ' \t\n\r\v'.indexOf(ch) > -1 || operators.hasOwnProperty(ch)) {
if (path.charAt(position) === '$') {
name = path.substring(position + 1, i);
position = i;
return create('variable', name);
} else {
name = path.substring(position, i);
position = i;
switch (name) {
case 'and':
case 'or':
case 'in':
return create('operator', name);
case 'true':
return create('value', true);
case 'false':
return create('value', false);
case 'null':
return create('value', null);
default:
if (position == length && name === '') {
return null;
}
return create('name', name);
}
}
} else {
i++;
}
}
};
return next;
};
var parser = function (source) {
var node;
var lexer;
var symbol_table = {};
var base_symbol = {
nud: function () {
return this;
}
};
var symbol = function (id, bp) {
var s = symbol_table[id];
bp = bp || 0;
if (s) {
if (bp >= s.lbp) {
s.lbp = bp;
}
} else {
s = Object.create(base_symbol);
s.id = s.value = id;
s.lbp = bp;
symbol_table[id] = s;
}
return s;
};
var advance = function (id) {
if (id && node.id !== id) {
var msg;
if(node.id === '(end)') {
msg = "Syntax error: expected '" + id + "' before end of expression";
} else {
msg = "Syntax error: expected '" + id + "', got '" + node.id + "' at column " + node.position;
}
throw {
message: msg ,
stack: (new Error()).stack,
position: node.position,
token: node.id,
value: id
};
}
var next_token = lexer();
if (next_token === null) {
node = symbol_table["(end)"];
return node;
}
var value = next_token.value;
var type = next_token.type;
var symbol;
switch (type) {
case 'name':
case 'variable':
symbol = symbol_table["(name)"];
break;
case 'operator':
symbol = symbol_table[value];
if (!symbol) {
throw {
message: "Unknown operator: " + value + " at column " + next_token.position,
stack: (new Error()).stack,
position: next_token.position,
token: value
};
}
break;
case 'string':
case 'number':
case 'value':
type = "literal";
symbol = symbol_table["(literal)"];
break;
default:
throw {
message: "Unexpected token:" + value + " at column " + next_token.position,
stack: (new Error()).stack,
position: next_token.position,
token: value
};
}
node = Object.create(symbol);
node.value = value;
node.type = type;
node.position = next_token.position;
return node;
};
var expression = function (rbp) {
var left;
var t = node;
advance();
left = t.nud();
while (rbp < node.lbp) {
t = node;
advance();
left = t.led(left);
}
return left;
};
var infix = function (id, bp, led) {
var bindingPower = bp || operators[id];
var s = symbol(id, bindingPower);
s.led = led || function (left) {
this.lhs = left;
this.rhs = expression(bindingPower);
this.type = "binary";
return this;
};
return s;
};
var infixr = function (id, bp, led) {
var bindingPower = bp || operators[id];
var s = symbol(id, bindingPower);
s.led = led || function (left) {
this.lhs = left;
this.rhs = expression(bindingPower - 1); // subtract 1 from bindingPower for right associative operators
this.type = "binary";
return this;
};
return s;
};
var prefix = function (id, nud) {
var s = symbol(id);
s.nud = nud || function () {
this.expression = expression(70);
this.type = "unary";
return this;
};
return s;
};
symbol("(end)");
symbol("(name)");
symbol("(literal)");
symbol(":");
symbol(";");
symbol(",");
symbol(")");
symbol("]");
symbol("}");
symbol(".."); // range operator
infix("."); // field reference
infix("+"); // numeric addition
infix("-"); // numeric subtraction
infix("*"); // numeric multiplication
infix("/"); // numeric division
infix("%"); // numeric modulus
infix("="); // equality
infix("<"); // less than
infix(">"); // greater than
infix("!="); // not equal to
infix("<="); // less than or equal
infix(">="); // greater than or equal
infix("&"); // string concatenation
infix("and"); // Boolean AND
infix("or"); // Boolean OR
infix("in"); // is member of array
infixr(":="); // bind variable
prefix("-"); // unary numeric negation
prefix('*', function () {
this.type = "wildcard";
return this;
});
prefix('**', function () {
this.type = "descendant";
return this;
});
infix("(", operators['('], function (left) {
this.procedure = left;
this.type = 'function';
this.arguments = [];
if (node.id !== ')') {
for (;;) {
if (node.type === 'operator' && node.id === '?') {
this.type = 'partial';
this.arguments.push(node);
advance('?');
} else {
this.arguments.push(expression(0));
}
if (node.id !== ',') break;
advance(',');
}
}
advance(")");
if (left.type === 'name' && (left.value === 'function' || left.value === '\u03BB')) {
this.arguments.forEach(function (arg, index) {
if (arg.type !== 'variable') {
throw {
message: 'Parameter ' + (index + 1) + ' of function definition must be a variable name (start with $)',
stack: (new Error()).stack,
position: arg.position,
token: arg.value
};
}
});
this.type = 'lambda';
advance('{');
this.body = expression(0);
advance('}');
}
return this;
});
prefix("(", function () {
var expressions = [];
while (node.id !== ")") {
expressions.push(expression(0));
if (node.id !== ";") {
break;
}
advance(";");
}
advance(")");
this.type = 'block';
this.expressions = expressions;
return this;
});
prefix("{", function () {
var a = [];
if (node.id !== "}") {
for (;;) {
var n = expression(0);
advance(":");
var v = expression(0);
a.push([n, v]); // holds an array of name/value expression pairs
if (node.id !== ",") {
break;
}
advance(",");
}
}
advance("}");
this.lhs = a;
this.type = "unary";
return this;
});
prefix("[", function () {
var a = [];
if (node.id !== "]") {
for (;;) {
var item = expression(0);
if (node.id === "..") {
var range = {type: "binary", value: "..", position: node.position, lhs: item};
advance("..");
range.rhs = expression(0);
item = range;
}
a.push(item);
if (node.id !== ",") {
break;
}
advance(",");
}
}
advance("]");
this.lhs = a;
this.type = "unary";
return this;
});
infix("[", operators['['], function (left) {
this.lhs = left;
this.rhs = expression(operators[']']);
this.type = 'binary';
advance("]");
return this;
});
infix("{", operators['{'], function (left) {
this.lhs = left;
this.rhs = expression(operators['}']);
this.type = 'binary';
advance("}");
return this;
});
infix("?", operators['?'], function (left) {
this.type = 'condition';
this.condition = left;
this.then = expression(0);
if (node.id === ':') {
advance(":");
this.else = expression(0);
}
return this;
});
var tail_call_optimize = function(expr) {
var result;
if(expr.type === 'function') {
var thunk = {type: 'lambda', thunk: true, arguments: [], position: expr.position};
thunk.body = expr;
result = thunk;
} else if(expr.type === 'condition') {
expr.then = tail_call_optimize(expr.then);
expr.else = tail_call_optimize(expr.else);
result = expr;
} else if(expr.type === 'block') {
var length = expr.expressions.length;
if(length > 0) {
expr.expressions[length - 1] = tail_call_optimize(expr.expressions[length - 1]);
}
result = expr;
} else {
result = expr;
}
return result;
};
var post_parse = function (expr) {
var result = [];
switch (expr.type) {
case 'binary':
switch (expr.value) {
case '.':
var step = post_parse(expr.lhs);
if (Array.isArray(step)) {
Array.prototype.push.apply(result, step);
} else {
result.push(step);
}
var rest = [post_parse(expr.rhs)];
Array.prototype.push.apply(result, rest);
result.type = 'path';
break;
case '[':
result = post_parse(expr.lhs);
if (typeof result.aggregate !== 'undefined') {
throw {
message: 'A predicate cannot follow an aggregate in a step. Error at column: ' + expr.position,
stack: (new Error()).stack,
position: expr.position
};
}
if (typeof result.predicate === 'undefined') {
result.predicate = [];
}
result.predicate.push(post_parse(expr.rhs));
break;
case '{':
result = post_parse(expr.lhs);
if (typeof result.aggregate !== 'undefined') {
throw {
message: 'Each step can only have one aggregator. Error at column: ' + expr.position,
stack: (new Error()).stack,
position: expr.position
};
}
result.aggregate = post_parse(expr.rhs);
break;
default:
result = {type: expr.type, value: expr.value, position: expr.position};
result.lhs = post_parse(expr.lhs);
result.rhs = post_parse(expr.rhs);
}
break;
case 'unary':
result = {type: expr.type, value: expr.value, position: expr.position};
if (expr.value === '[') {
result.lhs = expr.lhs.map(function (item) {
return post_parse(item);
});
} else if (expr.value === '{') {
result.lhs = expr.lhs.map(function (pair) {
return [post_parse(pair[0]), post_parse(pair[1])];
});
} else {
result.expression = post_parse(expr.expression);
if (expr.value === '-' && result.expression.type === 'literal' && isNumeric(result.expression.value)) {
result = result.expression;
result.value = -result.value;
}
}
break;
case 'function':
case 'partial':
result = {type: expr.type, name: expr.name, value: expr.value, position: expr.position};
result.arguments = expr.arguments.map(function (arg) {
return post_parse(arg);
});
result.procedure = post_parse(expr.procedure);
break;
case 'lambda':
result = {type: expr.type, arguments: expr.arguments, position: expr.position};
var body = post_parse(expr.body);
result.body = tail_call_optimize(body);
break;
case 'condition':
result = {type: expr.type, position: expr.position};
result.condition = post_parse(expr.condition);
result.then = post_parse(expr.then);
if (typeof expr.else !== 'undefined') {
result.else = post_parse(expr.else);
}
break;
case 'block':
result = {type: expr.type, position: expr.position};
result.expressions = expr.expressions.map(function (item) {
return post_parse(item);
});
break;
case 'name':
case 'literal':
case 'wildcard':
case 'descendant':
case 'variable':
result = expr;
break;
case 'operator':
if (expr.value === 'and' || expr.value === 'or' || expr.value === 'in') {
expr.type = 'name';
result = post_parse(expr);
} else if (expr.value === '?') {
result = expr;
} else {
throw {
message: "Syntax error: " + expr.value + " at column " + expr.position,
stack: (new Error()).stack,
position: expr.position,
token: expr.value
};
}
break;
default:
var reason = "Unknown expression type: " + expr.value + " at column " + expr.position;
if (expr.id === '(end)') {
reason = "Syntax error: unexpected end of expression";
}
throw {
message: reason,
stack: (new Error()).stack,
position: expr.position,
token: expr.value
};
}
return result;
};
lexer = tokenizer(source);
advance();
var expr = expression(0);
if (node.id !== '(end)') {
throw {
message: "Syntax error: " + node.value + " at column " + node.position,
stack: (new Error()).stack,
position: node.position,
token: node.value
};
}
expr = post_parse(expr);
if (expr.type === 'name') {
expr = [expr];
expr.type = 'path';
}
return expr;
};
function isNumeric(n) {
var isNum = false;
if(typeof n === 'number') {
var num = parseFloat(n);
isNum = !isNaN(num);
if (isNum && !isFinite(num)) {
throw {
message: "Number out of range",
value: n,
stack: (new Error()).stack
};
}
}
return isNum;
}
function isArrayOfNumbers(arg) {
var result = false;
if(Array.isArray(arg)) {
result = (arg.filter(function(item){return !isNumeric(item);}).length == 0);
}
return result;
}
Number.isInteger = Number.isInteger || function(value) {
return typeof value === "number" &&
isFinite(value) &&
Math.floor(value) === value;
};
function evaluate(expr, input, environment) {
var result;
var entryCallback = environment.lookup('__evaluate_entry');
if(entryCallback) {
entryCallback(expr, input, environment);
}
switch (expr.type) {
case 'path':
result = evaluatePath(expr, input, environment);
break;
case 'binary':
result = evaluateBinary(expr, input, environment);
break;
case 'unary':
result = evaluateUnary(expr, input, environment);
break;
case 'name':
result = evaluateName(expr, input, environment);
break;
case 'literal':
result = evaluateLiteral(expr, input, environment);
break;
case 'wildcard':
result = evaluateWildcard(expr, input, environment);
break;
case 'descendant':
result = evaluateDescendants(expr, input, environment);
break;
case 'condition':
result = evaluateCondition(expr, input, environment);
break;
case 'block':
result = evaluateBlock(expr, input, environment);
break;
case 'function':
result = evaluateFunction(expr, input, environment);
break;
case 'variable':
result = evaluateVariable(expr, input, environment);
break;
case 'lambda':
result = evaluateLambda(expr, input, environment);
break;
case 'partial':
result = evaluatePartialApplication(expr, input, environment);
break;
}
if (expr.hasOwnProperty('predicate')) {
result = applyPredicates(expr.predicate, result, environment);
}
if (expr.hasOwnProperty('aggregate')) {
result = applyAggregate(expr.aggregate, result, environment);
}
var exitCallback = environment.lookup('__evaluate_exit');
if(exitCallback) {
exitCallback(expr, input, environment, result);
}
return result;
}
function evaluatePath(expr, input, environment) {
var result;
var inputSequence;
if (expr[0].type === 'variable') {
expr[0].absolute = true;
} else if(expr[0].type === 'unary' && expr[0].value === '[') {
input = [null];// dummy singleton sequence for first step
}
expr.forEach(function (step) {
var resultSequence = [];
result = undefined;
if (step.absolute === true) {
inputSequence = [input]; // dummy singleton sequence for first (absolute) step
} else if (Array.isArray(input)) {
inputSequence = input;
} else {
inputSequence = [input];
}
if (expr.length > 1 && step.type === 'literal') {
step.type = 'name';
}
if (step.value === '{') {
if(typeof input !== 'undefined') {
result = evaluateGroupExpression(step, inputSequence, environment);
}
} else {
inputSequence.forEach(function (item) {
var res = evaluate(step, item, environment);
if (typeof res !== 'undefined') {
if (Array.isArray(res)) {
res.forEach(function (innerRes) {
if (typeof innerRes !== 'undefined') {
resultSequence.push(innerRes);
}
});
} else {
resultSequence.push(res);
}
}
});
if (resultSequence.length == 1) {
result = resultSequence[0];
} else if (resultSequence.length > 1) {
result = resultSequence;
}
}
input = result;
});
return result;
}
function applyPredicates(predicates, input, environment) {
var result;
var inputSequence = input;
var results = [];
predicates.forEach(function (predicate) {
if (!Array.isArray(inputSequence)) {
inputSequence = [inputSequence];
}
results = [];
result = undefined;
if (predicate.type === 'literal' && isNumeric(predicate.value)) {
var index = predicate.value;
if (!Number.isInteger(index)) {
index = Math.floor(index);
}
if (index < 0) {
index = inputSequence.length + index;
}
result = inputSequence[index];
} else {
inputSequence.forEach(function (item, index) {
var res = evaluate(predicate, item, environment);
if (isNumeric(res)) {
res = [res];
}
if(isArrayOfNumbers(res)) {
res.forEach(function(ires) {
if (!Number.isInteger(ires)) {
ires = Math.floor(ires);
}
if (ires < 0) {
ires = inputSequence.length + ires;
}
if (ires == index) {
results.push(item);
}
});
} else if (functionBoolean(res)) { // truthy
results.push(item);
}
});
}
if (results.length == 1) {
result = results[0];
} else if (results.length > 1) {
result = results;
}
inputSequence = result;
});
return result;
}
function applyAggregate(expr, input, environment) {
var result = {};
if (Array.isArray(input)) {
var aggEnv = createFrame(environment);
aggEnv.bind('_', input[0]);
for (var index = 1; index < input.length; index++) {
var reduce = evaluate(expr, input[index], aggEnv);
aggEnv.bind('_', reduce);
}
result = aggEnv.lookup('_');
} else {
result = input;
}
return result;
}
function evaluateBinary(expr, input, environment) {
var result;
switch (expr.value) {
case '+':
case '-':
case '*':
case '/':
case '%':
result = evaluateNumericExpression(expr, input, environment);
break;
case '=':
case '!=':
case '<':
case '<=':
case '>':
case '>=':
result = evaluateComparisonExpression(expr, input, environment);
break;
case '&':
result = evaluateStringConcat(expr, input, environment);
break;
case 'and':
case 'or':
result = evaluateBooleanExpression(expr, input, environment);
break;
case '..':
result = evaluateRangeExpression(expr, input, environment);
break;
case ':=':
result = evaluateBindExpression(expr, input, environment);
break;
case 'in':
result = evaluateIncludesExpression(expr, input, environment);
break;
}
return result;
}
function evaluateUnary(expr, input, environment) {
var result;
switch (expr.value) {
case '-':
result = evaluate(expr.expression, input, environment);
if (isNumeric(result)) {
result = -result;
} else {
throw {
message: "Cannot negate a non-numeric value: " + result + " at column " + expr.position,
stack: (new Error()).stack,
position: expr.position,
token: expr.value,
value: result
};
}
break;
case '[':
result = [];
expr.lhs.forEach(function (item) {
var value = evaluate(item, input, environment);
if (typeof value !== 'undefined') {
if (item.value === '..') {
result = functionAppend(result, value);
} else {
result.push(value);
}
}
});
break;
case '{':
result = evaluateGroupExpression(expr, input, environment);
break;
}
return result;
}
function evaluateName(expr, input, environment) {
var result;
if (Array.isArray(input)) {
var results = [];
input.forEach(function (item) {
var res = evaluateName(expr, item, environment);
if (typeof res !== 'undefined') {
results.push(res);
}
});
if (results.length == 1) {
result = results[0];
} else if (results.length > 1) {
result = results;
}
} else if (input !== null && typeof input === 'object') {
result = input[expr.value];
}
return result;
}
function evaluateLiteral(expr) {
return expr.value;
}
function evaluateWildcard(expr, input) {
var result;
var results = [];
if (input !== null && typeof input === 'object') {
Object.keys(input).forEach(function (key) {
var value = input[key];
if(Array.isArray(value)) {
value = flatten(value);
results = functionAppend(results, value);
} else {
results.push(value);
}
});
}
if (results.length == 1) {
result = results[0];
} else if (results.length > 1) {
result = results;
}
return result;
}
function flatten(arg, flattened) {
if(typeof flattened === 'undefined') {
flattened = [];
}
if(Array.isArray(arg)) {
arg.forEach(function (item) {
flatten(item, flattened);
});
} else {
flattened.push(arg);
}
return flattened;
}
function evaluateDescendants(expr, input) {
var result;
var resultSequence = [];
if (typeof input !== 'undefined') {
recurseDescendants(input, resultSequence);
if (resultSequence.length == 1) {
result = resultSequence[0];
} else {
result = resultSequence;
}
}
return result;
}
function recurseDescendants(input, results) {
if (!Array.isArray(input)) {
results.push(input);
}
if (Array.isArray(input)) {
input.forEach(function (member) {
recurseDescendants(member, results);
});
} else if (input !== null && typeof input === 'object') {
Object.keys(input).forEach(function (key) {
recurseDescendants(input[key], results);
});
}
}
function evaluateNumericExpression(expr, input, environment) {
var result;
var lhs = evaluate(expr.lhs, input, environment);
var rhs = evaluate(expr.rhs, input, environment);
if (typeof lhs === 'undefined' || typeof rhs === 'undefined') {
return result;
}
if (!isNumeric(lhs)) {
throw {
message: 'LHS of ' + expr.value + ' operator must evaluate to a number at column ' + expr.position,
stack: (new Error()).stack,
position: expr.position,
token: expr.value,
value: lhs
};
}
if (!isNumeric(rhs)) {
throw {
message: 'RHS of ' + expr.value + ' operator must evaluate to a number at column ' + expr.position,
stack: (new Error()).stack,
position: expr.position,
token: expr.value,
value: rhs
};
}
switch (expr.value) {
case '+':
result = lhs + rhs;
break;
case '-':
result = lhs - rhs;
break;
case '*':
result = lhs * rhs;
break;
case '/':
result = lhs / rhs;
break;
case '%':
result = lhs % rhs;
break;
}
return result;
}
function evaluateComparisonExpression(expr, input, environment) {
var result;
var lhs = evaluate(expr.lhs, input, environment);
var rhs = evaluate(expr.rhs, input, environment);
if (typeof lhs === 'undefined' || typeof rhs === 'undefined') {
return false;
}
switch (expr.value) {
case '=':
result = lhs == rhs;
break;
case '!=':
result = (lhs != rhs);
break;
case '<':
result = lhs < rhs;
break;
case '<=':
result = lhs <= rhs;
break;
case '>':
result = lhs > rhs;
break;
case '>=':
result = lhs >= rhs;
break;
}
return result;
}
function evaluateIncludesExpression(expr, input, environment) {
var result = false;
var lhs = evaluate(expr.lhs, input, environment);
var rhs = evaluate(expr.rhs, input, environment);
if (typeof lhs === 'undefined' || typeof rhs === 'undefined') {
return false;
}
if(!Array.isArray(rhs)) {
rhs = [rhs];
}
for(var i = 0; i < rhs.length; i++) {
if(rhs[i] === lhs) {
result = true;
break;
}
}
return result;
}
function evaluateBooleanExpression(expr, input, environment) {
var result;
switch (expr.value) {
case 'and':
result = functionBoolean(evaluate(expr.lhs, input, environment)) &&
functionBoolean(evaluate(expr.rhs, input, environment));
break;
case 'or':
result = functionBoolean(evaluate(expr.lhs, input, environment)) ||
functionBoolean(evaluate(expr.rhs, input, environment));
break;
}
return result;
}
function evaluateStringConcat(expr, input, environment) {
var result;
var lhs = evaluate(expr.lhs, input, environment);
var rhs = evaluate(expr.rhs, input, environment);
var lstr = '';
var rstr = '';
if (typeof lhs !== 'undefined') {
lstr = functionString(lhs);
}
if (typeof rhs !== 'undefined') {
rstr = functionString(rhs);
}
result = lstr.concat(rstr);
return result;
}
function evaluateGroupExpression(expr, input, environment) {
var result = {};
var groups = {};
if (!Array.isArray(input)) {
input = [input];
}
input.forEach(function (item) {
expr.lhs.forEach(function (pair) {
var key = evaluate(pair[0], item, environment);
if (typeof key !== 'string') {
throw {
message: 'Key in object structure must evaluate to a string. Got: ' + key + ' at column ' + expr.position,
stack: (new Error()).stack,
position: expr.position,
value: key
};
}
var entry = {data: item, expr: pair[1]};
if (groups.hasOwnProperty(key)) {
groups[key].data = functionAppend(groups[key].data, item);
} else {
groups[key] = entry;
}
});
});
for (var key in groups) {
var entry = groups[key];
var value = evaluate(entry.expr, entry.data, environment);
result[key] = value;
}
return result;
}
function evaluateRangeExpression(expr, input, environment) {
var result;
var lhs = evaluate(expr.lhs, input, environment);
var rhs = evaluate(expr.rhs, input, environment);
if (typeof lhs === 'undefined' || typeof rhs === 'undefined') {
return result;
}
if (lhs > rhs) {
return result;
}
if (!Number.isInteger(lhs)) {
throw {
message: 'LHS of range operator (..) must evaluate to an integer at column ' + expr.position,
stack: (new Error()).stack,
position: expr.position,
token: expr.value,
value: lhs
};
}
if (!Number.isInteger(rhs)) {
throw {
message: 'RHS of range operator (..) must evaluate to an integer at column ' + expr.position,
stack: (new Error()).stack,
position: expr.position,
token: expr.value,
value: rhs
};
}
result = new Array(rhs - lhs + 1);
for (var item = lhs, index = 0; item <= rhs; item++, index++) {
result[index] = item;
}
return result;
}
function evaluateBindExpression(expr, input, environment) {
var value = evaluate(expr.rhs, input, environment);
if (expr.lhs.type !== 'variable') {
throw {
message: "Left hand side of := must be a variable name (start with $) at column " + expr.position,
stack: (new Error()).stack,
position: expr.position,
token: expr.value,
value: expr.lhs.value
};
}
environment.bind(expr.lhs.value, value);
return value;
}
function evaluateCondition(expr, input, environment) {
var result;
var condition = evaluate(expr.condition, input, environment);
if (functionBoolean(condition)) {
result = evaluate(expr.then, input, environment);
} else if (typeof expr.else !== 'undefined') {
result = evaluate(expr.else, input, environment);
}
return result;
}
function evaluateBlock(expr, input, environment) {
var result;
var frame = createFrame(environment);
expr.expressions.forEach(function (expression) {
result = evaluate(expression, input, frame);
});
return result;
}
function evaluateVariable(expr, input, environment) {
var result;
if (expr.value === '') {
result = input;
} else {
result = environment.lookup(expr.value);
}
return result;
}
function evaluateFunction(expr, input, environment) {
var result;
var evaluatedArgs = [];
expr.arguments.forEach(function (arg) {
evaluatedArgs.push(evaluate(arg, input, environment));
});
var proc = evaluate(expr.procedure, input, environment);
if (typeof proc === 'undefined' && expr.procedure.type === 'name' && environment.lookup(expr.procedure.value)) {
throw {
message: 'Attempted to invoke a non-function at column ' + expr.position + '. Did you mean \'$' + expr.procedure.value + '\'?',
stack: (new Error()).stack,
position: expr.position,
token: expr.procedure.value
};
}
try {
result = apply(proc, evaluatedArgs, environment, input);
while(typeof result === 'object' && result.lambda == true && result.thunk == true) {
var next = evaluate(result.body.procedure, result.input, result.environment);
evaluatedArgs = [];
result.body.arguments.forEach(function (arg) {
evaluatedArgs.push(evaluate(arg, result.input, result.environment));
});
result = apply(next, evaluatedArgs);
}
} catch (err) {
err.position = expr.position;
err.token = expr.procedure.value;
throw err;
}
return result;
}
function apply(proc, args, environment, self) {
var result;
if (proc && proc.lambda) {
result = applyProcedure(proc, args);
} else if (typeof proc === 'function') {
result = proc.apply(self, args);
} else {
throw {
message: 'Attempted to invoke a non-function',
stack: (new Error()).stack
};
}
return result;
}
function evaluateLambda(expr, input, environment) {
var procedure = {
lambda: true,
input: input,
environment: environment,
arguments: expr.arguments,
body: expr.body
};
if(expr.thunk == true) {
procedure.thunk = true;
}
return procedure;
}
function evaluatePartialApplication(expr, input, environment) {
var result;
var evaluatedArgs = [];
expr.arguments.forEach(function (arg) {
if (arg.type === 'operator' && arg.value === '?') {
evaluatedArgs.push(arg);
} else {
evaluatedArgs.push(evaluate(arg, input, environment));
}
});
var proc = evaluate(expr.procedure, input, environment);
if (typeof proc === 'undefined' && expr.procedure.type === 'name' && environment.lookup(expr.procedure.value)) {
throw {
message: 'Attempted to partially apply a non-function at column ' + expr.position + '. Did you mean \'$' + expr.procedure.value + '\'?',
stack: (new Error()).stack,
position: expr.position,
token: expr.procedure.value
};
}
if (proc && proc.lambda) {
result = partialApplyProcedure(proc, evaluatedArgs);
} else if (typeof proc === 'function') {
result = partialApplyNativeFunction(proc, evaluatedArgs);
} else {
throw {
message: 'Attempted to partially apply a non-function at column ' + expr.position,
stack: (new Error()).stack,
position: expr.position,
token: expr.procedure.value
};
}
return result;
}
function applyProcedure(proc, args) {
var result;
var env = createFrame(proc.environment);
proc.arguments.forEach(function (param, index) {
env.bind(param.value, args[index]);
});
if (typeof proc.body === 'function') {
result = applyNativeFunction(proc.body, env);
} else {
result = evaluate(proc.body, proc.input, env);
}
return result;
}
function partialApplyProcedure(proc, args) {
var env = createFrame(proc.environment);
var unboundArgs = [];
proc.arguments.forEach(function (param, index) {
var arg = args[index];
if (arg && arg.type === 'operator' && arg.value === '?') {
unboundArgs.push(param);
} else {
env.bind(param.value, arg);
}
});
var procedure = {
lambda: true,
input: proc.input,
environment: env,
arguments: unboundArgs,
body: proc.body
};
return procedure;
}
function partialApplyNativeFunction(native, args) {
var sigArgs = getNativeFunctionArguments(native);
sigArgs = sigArgs.map(function (sigArg) {
return '$' + sigArg.trim();
});
var body = 'function(' + sigArgs.join(', ') + '){ _ }';
var bodyAST = parser(body);
bodyAST.body = native;
var partial = partialApplyProcedure(bodyAST, args);
return partial;
}
function applyNativeFunction(proc, env) {
var sigArgs = getNativeFunctionArguments(proc);
var args = sigArgs.map(function (sigArg) {
return env.lookup(sigArg.trim());
});
var result = proc.apply(null, args);
return result;
}
function getNativeFunctionArguments(func) {
var signature = func.toString();
var sigParens = /\(([^\)]*)\)/.exec(signature)[1]; // the contents of the parens
var sigArgs = sigParens.split(',');
return sigArgs;
}
function isLambda(arg) {
var result = false;
if(arg && typeof arg === 'object' &&
arg.lambda === true &&
arg.hasOwnProperty('input') &&
arg.hasOwnProperty('arguments') &&
arg.hasOwnProperty('environment') &&
arg.hasOwnProperty('body')) {
result = true;
}
return result;
}
function functionSum(args) {
var total = 0;
if (arguments.length != 1) {
throw {
message: 'The sum function expects one argument',
stack: (new Error()).stack
};
}
if(typeof args === 'undefined') {
return undefined;
}
if(!Array.isArray(args)) {
args = [args];
}
var nonNumerics = args.filter(function(val) {return (typeof val !== 'number');});
if(nonNumerics.length > 0) {
throw {
message: 'Type error: argument of sum function must be an array of numbers',
stack: (new Error()).stack,
value: nonNumerics
};
}
args.forEach(function(num){total += num;});
return total;
}
function functionCount(args) {
if (arguments.length != 1) {
throw {
message: 'The count function expects one argument',
stack: (new Error()).stack
};
}
if(typeof args === 'undefined') {
return 0;
}
if(!Array.isArray(args)) {
args = [args];
}
return args.length;
}
function functionMax(args) {
var max;
if (arguments.length != 1) {
throw {
message: 'The max function expects one argument',
stack: (new Error()).stack
};
}
if(typeof args === 'undefined') {
return undefined;
}
if(!Array.isArray(args)) {
args = [args];
}
var nonNumerics = args.filter(function(val) {return (typeof val !== 'number');});
if(nonNumerics.length > 0) {
throw {
message: 'Type error: argument of max function must be an array of numbers',
stack: (new Error()).stack,
value: nonNumerics
};
}
max = Math.max.apply(Math, args);
return max;
}
function functionMin(args) {
var min;
if (arguments.length != 1) {
throw {
message: 'The min function expects one argument',
stack: (new Error()).stack
};
}
if(typeof args === 'undefined') {
return undefined;
}
if(!Array.isArray(args)) {
args = [args];
}
var nonNumerics = args.filter(function(val) {return (typeof val !== 'number');});
if(nonNumerics.length > 0) {
throw {
message: 'Type error: argument of min function must be an array of numbers',
stack: (new Error()).stack,
value: nonNumerics
};
}
min = Math.min.apply(Math, args);
return min;
}
function functionAverage(args) {
var total = 0;
if (arguments.length != 1) {
throw {
message: 'The average function expects one argument',
stack: (new Error()).stack
};
}
if(typeof args === 'undefined') {
return undefined;
}
if(!Array.isArray(args)) {
args = [args];
}
var nonNumerics = args.filter(function(val) {return (typeof val !== 'number');});
if(nonNumerics.length > 0) {
throw {
message: 'Type error: argument of average function must be an array of numbers',
stack: (new Error()).stack,
value: nonNumerics
};
}
args.forEach(function(num){total += num;});
return total/args.length;
}
function functionString(arg) {
var str;
if(arguments.length != 1) {
throw {
message: 'The string function expects one argument',
stack: (new Error()).stack
};
}
if(typeof arg === 'undefined') {
return undefined;
}
if (typeof arg === 'string') {
str = arg;
} else if(typeof arg === 'function' || isLambda(arg)) {
str = '';
} else if (typeof arg === 'number' && !isFinite(arg)) {
throw {
message: "Attempting to invoke string function on Infinity or NaN",
value: arg,
stack: (new Error()).stack
};
} else
str = JSON.stringify(arg, function (key, val) {
return (typeof val !== 'undefined' && val !== null && val.toPrecision && isNumeric(val)) ? Number(val.toPrecision(13)) :
(val && isLambda(val)) ? '' :
(typeof val === 'function') ? '' : val;
});
return str;
}
function functionSubstring(str, start, length) {
if(arguments.length != 2 && arguments.length != 3) {
throw {
message: 'The substring function expects two or three arguments',
stack: (new Error()).stack
};
}
if(typeof str === 'undefined') {
return undefined;
}
if(typeof str !== 'string') {
throw {
message: 'Type error: first argument of substring function must evaluate to a string',
stack: (new Error()).stack,
value: str
};
}
if(typeof start !== 'number') {
throw {
message: 'Type error: second argument of substring function must evaluate to a number',
stack: (new Error()).stack,
value: start
};
}
if(typeof length !== 'undefined' && typeof length !== 'number') {
throw {
message: 'Type error: third argument of substring function must evaluate to a number',
stack: (new Error()).stack,
value: length
};
}
return str.substr(start, length);
}
function functionSubstringBefore(str, chars) {
if(arguments.length != 2) {
throw {
message: 'The substringBefore function expects two arguments',
stack: (new Error()).stack
};
}
if(typeof str === 'undefined') {
return undefined;
}
if(typeof str !== 'string') {
throw {
message: 'Type error: first argument of substringBefore function must evaluate to a string',
stack: (new Error()).stack,
value: str
};
}
if(typeof chars !== 'string') {
throw {
message: 'Type error: second argument of substringBefore function must evaluate to a string',
stack: (new Error()).stack,
value: chars
};
}
var pos = str.indexOf(chars);
if (pos > -1) {
return str.substr(0, pos);
} else {
return str;
}
}
function functionSubstringAfter(str, chars) {
if(arguments.length != 2) {
throw {
message: 'The substringAfter function expects two arguments',
stack: (new Error()).stack
};
}
if(typeof str === 'undefined') {
return undefined;
}
if(typeof str !== 'string') {
throw {
message: 'Type error: first argument of substringAfter function must evaluate to a string',
stack: (new Error()).stack,
value: str
};
}
if(typeof chars !== 'string') {
throw {
message: 'Type error: second argument of substringAfter function must evaluate to a string',
stack: (new Error()).stack,
value: chars
};
}
var pos = str.indexOf(chars);
if (pos > -1) {
return str.substr(pos + chars.length);
} else {
return str;
}
}
function functionLowercase(str) {
if(arguments.length != 1) {
throw {
message: 'The lowercase function expects one argument',
stack: (new Error()).stack
};
}
if(typeof str === 'undefined') {
return undefined;
}
if(typeof str !== 'string') {
throw {
message: 'Type error: argument of lowercase function must evaluate to a string',
stack: (new Error()).stack,
value: str
};
}
return str.toLowerCase();
}
function functionUppercase(str) {
if(arguments.length != 1) {
throw {
message: 'The uppercase function expects one argument',
stack: (new Error()).stack
};
}
if(typeof str === 'undefined') {
return undefined;
}
if(typeof str !== 'string') {
throw {
message: 'Type error: argument of uppercase function must evaluate to a string',
stack: (new Error()).stack,
value: str
};
}
return str.toUpperCase();
}
function functionLength(str) {
if(arguments.length != 1) {
throw {
message: 'The length function expects one argument',
stack: (new Error()).stack
};
}
if(typeof str === 'undefined') {
return undefined;
}
if(typeof str !== 'string') {
throw {
message: 'Type error: argument of length function must evaluate to a string',
stack: (new Error()).stack,
value: str
};
}
return str.length;
}
function functionSplit(str, separator, limit) {
if(arguments.length != 2 && arguments.length != 3) {
throw {
message: 'The split function expects two or three arguments',
stack: (new Error()).stack
};
}
if(typeof str === 'undefined') {
return undefined;
}
if(typeof str !== 'string') {
throw {
message: 'Type error: first argument of split function must evaluate to a string',
stack: (new Error()).stack,
value: str
};
}
if(typeof separator !== 'string') {
throw {
message: 'Type error: second argument of split function must evaluate to a string',
stack: (new Error()).stack,
value: separator
};
}
if(typeof limit !== 'undefined' && (typeof limit !== 'number' || limit < 0)) {
throw {
message: 'Type error: third argument of split function must evaluate to a positive number',
stack: (new Error()).stack,
value: limit
};
}
return str.split(separator, limit);
}
function functionJoin(strs, separator) {
if(arguments.length != 1 && arguments.length != 2) {
throw {
message: 'The join function expects one or two arguments',
stack: (new Error()).stack
};
}
if(typeof strs === 'undefined') {
return undefined;
}
if(!Array.isArray(strs)) {
strs = [strs];
}
var nonStrings = strs.filter(function(val) {return (typeof val !== 'string');});
if(nonStrings.length > 0) {
throw {
message: 'Type error: first argument of join function must be an array of strings',
stack: (new Error()).stack,
value: nonStrings
};
}
if(typeof separator === 'undefined') {
separator = "";
}
if(typeof separator !== 'string') {
throw {
message: 'Type error: second argument of split function must evaluate to a string',
stack: (new Error()).stack,
value: separator
};
}
return strs.join(separator);
}
function functionNumber(arg) {
var result;
if(arguments.length != 1) {
throw {
message: 'The number function expects one argument',
stack: (new Error()).stack
};
}
if(typeof arg === 'undefined') {
return undefined;
}
if (typeof arg === 'number') {
result = arg;
} else if(typeof arg === 'string' && /^-?(0|([1-9][0-9]*))(\.[0-9]+)?([Ee][-+]?[0-9]+)?$/.test(arg) && !isNaN(parseFloat(arg)) && isFinite(arg)) {
result = parseFloat(arg);
} else {
throw {
message: "Unable to cast value to a number",
value: arg,
stack: (new Error()).stack
};
}
return result;
}
function functionBoolean(arg) {
if(arguments.length != 1) {
throw {
message: 'The boolean function expects one argument',
stack: (new Error()).stack
};
}
if(typeof arg === 'undefined') {
return undefined;
}
var result = false;
if (Array.isArray(arg)) {
if (arg.length == 1) {
result = functionBoolean(arg[0]);
} else if (arg.length > 1) {
var trues = arg.filter(function(val) {return functionBoolean(val);});
result = trues.length > 0;
}
} else if (typeof arg === 'string') {
if (arg.length > 0) {
result = true;
}
} else if (isNumeric(arg)) {
if (arg != 0) {
result = true;
}
} else if (arg != null && typeof arg === 'object') {
if (Object.keys(arg).length > 0) {
if (!(isLambda(arg))) {
result = true;
}
}
} else if (typeof arg === 'boolean' && arg == true) {
result = true;
}
return result;
}
function functionNot(arg) {
return !functionBoolean(arg);
}
function functionMap(func) {
var varargs = arguments;
var result = [];
var args = [];
for (var ii = 1; ii < varargs.length; ii++) {
if (Array.isArray(varargs[ii])) {
args.push(varargs[ii]);
} else {
args.push([varargs[ii]]);
}
}
if (args.length > 0) {
for (var i = 0; i < args[0].length; i++) {
var func_args = [];
for (var j = 0; j < func.arguments.length; j++) {
func_args.push(args[j][i]);
}
result.push(apply(func, func_args, null, null));
}
}
return result;
}
function functionFoldLeft(func, sequence, init) {
var result;
if (!(func.length == 2 || func.arguments.length == 2)) {
throw {
message: 'The first argument of the reduce function must be a function of arity 2',
stack: (new Error()).stack
};
}
if (!Array.isArray(sequence)) {
sequence = [sequence];
}
var index;
if (typeof init === 'undefined' && sequence.length > 0) {
result = sequence[0];
index = 1;
} else {
result = init;
index = 0;
}
while (index < sequence.length) {
result = apply(func, [result, sequence[index]], null, null);
index++;
}
return result;
}
function functionKeys(arg) {
var result = [];
if(Array.isArray(arg)) {
var merge = {};
arg.forEach(function(item) {
var keys = functionKeys(item);
if(Array.isArray(keys)) {
keys.forEach(function(key) {
merge[key] = true;
});
}
});
result = functionKeys(merge);
} else if(arg != null && typeof arg === 'object' && !(isLambda(arg))) {
result = Object.keys(arg);
if(result.length == 0) {
result = undefined;
}
} else {
result = undefined;
}
return result;
}
function functionLookup(object, key) {
var result = evaluateName({value: key}, object);
return result;
}
function functionAppend(arg1, arg2) {
if (typeof arg1 === 'undefined') {
return arg2;
}
if (typeof arg2 === 'undefined') {
return arg1;
}
if (!Array.isArray(arg1)) {
arg1 = [arg1];
}
if (!Array.isArray(arg2)) {
arg2 = [arg2];
}
Array.prototype.push.apply(arg1, arg2);
return arg1;
}
function functionExists(arg){
if (arguments.length != 1) {
throw {
message: 'The exists function expects one argument',
stack: (new Error()).stack
};
}
if (typeof arg === 'undefined') {
return false;
} else {
return true;
}
}
function functionSpread(arg) {
var result = [];
if(Array.isArray(arg)) {
arg.forEach(function(item) {
result = functionAppend(result, functionSpread(item));
});
} else if(arg != null && typeof arg === 'object' && !isLambda(arg)) {
for(var key in arg) {
var obj = {};
obj[key] = arg[key];
result.push(obj);
}
} else {
result = arg;
}
return result;
}
function createFrame(enclosingEnvironment) {
var bindings = {};
return {
bind: function (name, value) {
bindings[name] = value;
},
lookup: function (name) {
var value = bindings[name];
if (typeof value === 'undefined' && enclosingEnvironment) {
value = enclosingEnvironment.lookup(name);
}
return value;
}
};
}
var staticFrame = createFrame(null);
staticFrame.bind('sum', functionSum);
staticFrame.bind('count', functionCount);
staticFrame.bind('max', functionMax);
staticFrame.bind('min', functionMin);
staticFrame.bind('average', functionAverage);
staticFrame.bind('string', functionString);
staticFrame.bind('substring', functionSubstring);
staticFrame.bind('substringBefore', functionSubstringBefore);
staticFrame.bind('substringAfter', functionSubstringAfter);
staticFrame.bind('lowercase', functionLowercase);
staticFrame.bind('uppercase', functionUppercase);
staticFrame.bind('length', functionLength);
staticFrame.bind('split', functionSplit);
staticFrame.bind('join', functionJoin);
staticFrame.bind('number', functionNumber);
staticFrame.bind('boolean', functionBoolean);
staticFrame.bind('not', functionNot);
staticFrame.bind('map', functionMap);
staticFrame.bind('reduce', functionFoldLeft);
staticFrame.bind('keys', functionKeys);
staticFrame.bind('lookup', functionLookup);
staticFrame.bind('append', functionAppend);
staticFrame.bind('exists', functionExists);
staticFrame.bind('spread', functionSpread);
function jsonata(expr) {
var ast = parser(expr);
var environment = createFrame(staticFrame);
return {
evaluate: function (input, bindings) {
if (typeof bindings !== 'undefined') {
var exec_env;
exec_env = createFrame(environment);
for (var v in bindings) {
exec_env.bind(v, bindings[v]);
}
} else {
exec_env = environment;
}
exec_env.bind('$', input);
return evaluate(ast, input, exec_env);
},
assign: function (name, value) {
environment.bind(name, value);
}
};
}
jsonata.parser = parser;
return jsonata;
})();
var oop = require("../lib/oop");
var Mirror = require("../worker/mirror").Mirror;
var JSONataWorker = exports.JSONataWorker = function(sender) {
Mirror.call(this, sender);
this.setTimeout(200);
};
oop.inherits(JSONataWorker, Mirror);
(function() {
this.onUpdate = function() {
var value = this.doc.getValue();
var errors = [];
try {
if (value)
jsonata(value);
} catch (e) {
var pos = this.doc.indexToPosition(e.position-1);
var msg = e.message;
msg = msg.replace(/ at column \d+/,"");
errors.push({
row: pos.row,
column: pos.column,
text: msg,
type: "error"
});
}
this.sender.emit("annotate", errors);
};
}).call(JSONataWorker.prototype);
});
define("ace/lib/es5-shim",["require","exports","module"], function(require, exports, module) {
function Empty() {}
if (!Function.prototype.bind) {
Function.prototype.bind = function bind(that) { // .length is 1
var target = this;
if (typeof target != "function") {
throw new TypeError("Function.prototype.bind called on incompatible " + target);
}
var args = slice.call(arguments, 1); // for normal call
var bound = function () {
if (this instanceof bound) {
var result = target.apply(
this,
args.concat(slice.call(arguments))
);
if (Object(result) === result) {
return result;
}
return this;
} else {
return target.apply(
that,
args.concat(slice.call(arguments))
);
}
};
if(target.prototype) {
Empty.prototype = target.prototype;
bound.prototype = new Empty();
Empty.prototype = null;
}
return bound;
};
}
var call = Function.prototype.call;
var prototypeOfArray = Array.prototype;
var prototypeOfObject = Object.prototype;
var slice = prototypeOfArray.slice;
var _toString = call.bind(prototypeOfObject.toString);
var owns = call.bind(prototypeOfObject.hasOwnProperty);
var defineGetter;
var defineSetter;
var lookupGetter;
var lookupSetter;
var supportsAccessors;
if ((supportsAccessors = owns(prototypeOfObject, "__defineGetter__"))) {
defineGetter = call.bind(prototypeOfObject.__defineGetter__);
defineSetter = call.bind(prototypeOfObject.__defineSetter__);
lookupGetter = call.bind(prototypeOfObject.__lookupGetter__);
lookupSetter = call.bind(prototypeOfObject.__lookupSetter__);
}
if ([1,2].splice(0).length != 2) {
if(function() { // test IE < 9 to splice bug - see issue #138
function makeArray(l) {
var a = new Array(l+2);
a[0] = a[1] = 0;
return a;
}
var array = [], lengthBefore;
array.splice.apply(array, makeArray(20));
array.splice.apply(array, makeArray(26));
lengthBefore = array.length; //46
array.splice(5, 0, "XXX"); // add one element
lengthBefore + 1 == array.length
if (lengthBefore + 1 == array.length) {
return true;// has right splice implementation without bugs
}
}()) {//IE 6/7
var array_splice = Array.prototype.splice;
Array.prototype.splice = function(start, deleteCount) {
if (!arguments.length) {
return [];
} else {
return array_splice.apply(this, [
start === void 0 ? 0 : start,
deleteCount === void 0 ? (this.length - start) : deleteCount
].concat(slice.call(arguments, 2)))
}
};
} else {//IE8
Array.prototype.splice = function(pos, removeCount){
var length = this.length;
if (pos > 0) {
if (pos > length)
pos = length;
} else if (pos == void 0) {
pos = 0;
} else if (pos < 0) {
pos = Math.max(length + pos, 0);
}
if (!(pos+removeCount < length))
removeCount = length - pos;
var removed = this.slice(pos, pos+removeCount);
var insert = slice.call(arguments, 2);
var add = insert.length;
if (pos === length) {
if (add) {
this.push.apply(this, insert);
}
} else {
var remove = Math.min(removeCount, length - pos);
var tailOldPos = pos + remove;
var tailNewPos = tailOldPos + add - remove;
var tailCount = length - tailOldPos;
var lengthAfterRemove = length - remove;
if (tailNewPos < tailOldPos) { // case A
for (var i = 0; i < tailCount; ++i) {
this[tailNewPos+i] = this[tailOldPos+i];
}
} else if (tailNewPos > tailOldPos) { // case B
for (i = tailCount; i--; ) {
this[tailNewPos+i] = this[tailOldPos+i];
}
} // else, add == remove (nothing to do)
if (add && pos === lengthAfterRemove) {
this.length = lengthAfterRemove; // truncate array
this.push.apply(this, insert);
} else {
this.length = lengthAfterRemove + add; // reserves space
for (i = 0; i < add; ++i) {
this[pos+i] = insert[i];
}
}
}
return removed;
};
}
}
if (!Array.isArray) {
Array.isArray = function isArray(obj) {
return _toString(obj) == "[object Array]";
};
}
var boxedString = Object("a"),
splitString = boxedString[0] != "a" || !(0 in boxedString);
if (!Array.prototype.forEach) {
Array.prototype.forEach = function forEach(fun /*, thisp*/) {
var object = toObject(this),
self = splitString && _toString(this) == "[object String]" ?
this.split("") :
object,
thisp = arguments[1],
i = -1,
length = self.length >>> 0;
if (_toString(fun) != "[object Function]") {
throw new TypeError(); // TODO message
}
while (++i < length) {
if (i in self) {
fun.call(thisp, self[i], i, object);
}
}
};
}
if (!Array.prototype.map) {
Array.prototype.map = function map(fun /*, thisp*/) {
var object = toObject(this),
self = splitString && _toString(this) == "[object String]" ?
this.split("") :
object,
length = self.length >>> 0,
result = Array(length),
thisp = arguments[1];
if (_toString(fun) != "[object Function]") {
throw new TypeError(fun + " is not a function");
}
for (var i = 0; i < length; i++) {
if (i in self)
result[i] = fun.call(thisp, self[i], i, object);
}
return result;
};
}
if (!Array.prototype.filter) {
Array.prototype.filter = function filter(fun /*, thisp */) {
var object = toObject(this),
self = splitString && _toString(this) == "[object String]" ?
this.split("") :
object,
length = self.length >>> 0,
result = [],
value,
thisp = arguments[1];
if (_toString(fun) != "[object Function]") {
throw new TypeError(fun + " is not a function");
}
for (var i = 0; i < length; i++) {
if (i in self) {
value = self[i];
if (fun.call(thisp, value, i, object)) {
result.push(value);
}
}
}
return result;
};
}
if (!Array.prototype.every) {
Array.prototype.every = function every(fun /*, thisp */) {
var object = toObject(this),
self = splitString && _toString(this) == "[object String]" ?
this.split("") :
object,
length = self.length >>> 0,
thisp = arguments[1];
if (_toString(fun) != "[object Function]") {
throw new TypeError(fun + " is not a function");
}
for (var i = 0; i < length; i++) {
if (i in self && !fun.call(thisp, self[i], i, object)) {
return false;
}
}
return true;
};
}
if (!Array.prototype.some) {
Array.prototype.some = function some(fun /*, thisp */) {
var object = toObject(this),
self = splitString && _toString(this) == "[object String]" ?
this.split("") :
object,
length = self.length >>> 0,
thisp = arguments[1];
if (_toString(fun) != "[object Function]") {
throw new TypeError(fun + " is not a function");
}
for (var i = 0; i < length; i++) {
if (i in self && fun.call(thisp, self[i], i, object)) {
return true;
}
}
return false;
};
}
if (!Array.prototype.reduce) {
Array.prototype.reduce = function reduce(fun /*, initial*/) {
var object = toObject(this),
self = splitString && _toString(this) == "[object String]" ?
this.split("") :
object,
length = self.length >>> 0;
if (_toString(fun) != "[object Function]") {
throw new TypeError(fun + " is not a function");
}
if (!length && arguments.length == 1) {
throw new TypeError("reduce of empty array with no initial value");
}
var i = 0;
var result;
if (arguments.length >= 2) {
result = arguments[1];
} else {
do {
if (i in self) {
result = self[i++];
break;
}
if (++i >= length) {
throw new TypeError("reduce of empty array with no initial value");
}
} while (true);
}
for (; i < length; i++) {
if (i in self) {
result = fun.call(void 0, result, self[i], i, object);
}
}
return result;
};
}
if (!Array.prototype.reduceRight) {
Array.prototype.reduceRight = function reduceRight(fun /*, initial*/) {
var object = toObject(this),
self = splitString && _toString(this) == "[object String]" ?
this.split("") :
object,
length = self.length >>> 0;
if (_toString(fun) != "[object Function]") {
throw new TypeError(fun + " is not a function");
}
if (!length && arguments.length == 1) {
throw new TypeError("reduceRight of empty array with no initial value");
}
var result, i = length - 1;
if (arguments.length >= 2) {
result = arguments[1];
} else {
do {
if (i in self) {
result = self[i--];
break;
}
if (--i < 0) {
throw new TypeError("reduceRight of empty array with no initial value");
}
} while (true);
}
do {
if (i in this) {
result = fun.call(void 0, result, self[i], i, object);
}
} while (i--);
return result;
};
}
if (!Array.prototype.indexOf || ([0, 1].indexOf(1, 2) != -1)) {
Array.prototype.indexOf = function indexOf(sought /*, fromIndex */ ) {
var self = splitString && _toString(this) == "[object String]" ?
this.split("") :
toObject(this),
length = self.length >>> 0;
if (!length) {
return -1;
}
var i = 0;
if (arguments.length > 1) {
i = toInteger(arguments[1]);
}
i = i >= 0 ? i : Math.max(0, length + i);
for (; i < length; i++) {
if (i in self && self[i] === sought) {
return i;
}
}
return -1;
};
}
if (!Array.prototype.lastIndexOf || ([0, 1].lastIndexOf(0, -3) != -1)) {
Array.prototype.lastIndexOf = function lastIndexOf(sought /*, fromIndex */) {
var self = splitString && _toString(this) == "[object String]" ?
this.split("") :
toObject(this),
length = self.length >>> 0;
if (!length) {
return -1;
}
var i = length - 1;
if (arguments.length > 1) {
i = Math.min(i, toInteger(arguments[1]));
}
i = i >= 0 ? i : length - Math.abs(i);
for (; i >= 0; i--) {
if (i in self && sought === self[i]) {
return i;
}
}
return -1;
};
}
if (!Object.getPrototypeOf) {
Object.getPrototypeOf = function getPrototypeOf(object) {
return object.__proto__ || (
object.constructor ?
object.constructor.prototype :
prototypeOfObject
);
};
}
if (!Object.getOwnPropertyDescriptor) {
var ERR_NON_OBJECT = "Object.getOwnPropertyDescriptor called on a " +
"non-object: ";
Object.getOwnPropertyDescriptor = function getOwnPropertyDescriptor(object, property) {
if ((typeof object != "object" && typeof object != "function") || object === null)
throw new TypeError(ERR_NON_OBJECT + object);
if (!owns(object, property))
return;
var descriptor, getter, setter;
descriptor = { enumerable: true, configurable: true };
if (supportsAccessors) {
var prototype = object.__proto__;
object.__proto__ = prototypeOfObject;
var getter = lookupGetter(object, property);
var setter = lookupSetter(object, property);
object.__proto__ = prototype;
if (getter || setter) {
if (getter) descriptor.get = getter;
if (setter) descriptor.set = setter;
return descriptor;
}
}
descriptor.value = object[property];
return descriptor;
};
}
if (!Object.getOwnPropertyNames) {
Object.getOwnPropertyNames = function getOwnPropertyNames(object) {
return Object.keys(object);
};
}
if (!Object.create) {
var createEmpty;
if (Object.prototype.__proto__ === null) {
createEmpty = function () {
return { "__proto__": null };
};
} else {
createEmpty = function () {
var empty = {};
for (var i in empty)
empty[i] = null;
empty.constructor =
empty.hasOwnProperty =
empty.propertyIsEnumerable =
empty.isPrototypeOf =
empty.toLocaleString =
empty.toString =
empty.valueOf =
empty.__proto__ = null;
return empty;
}
}
Object.create = function create(prototype, properties) {
var object;
if (prototype === null) {
object = createEmpty();
} else {
if (typeof prototype != "object")
throw new TypeError("typeof prototype["+(typeof prototype)+"] != 'object'");
var Type = function () {};
Type.prototype = prototype;
object = new Type();
object.__proto__ = prototype;
}
if (properties !== void 0)
Object.defineProperties(object, properties);
return object;
};
}
function doesDefinePropertyWork(object) {
try {
Object.defineProperty(object, "sentinel", {});
return "sentinel" in object;
} catch (exception) {
}
}
if (Object.defineProperty) {
var definePropertyWorksOnObject = doesDefinePropertyWork({});
var definePropertyWorksOnDom = typeof document == "undefined" ||
doesDefinePropertyWork(document.createElement("div"));
if (!definePropertyWorksOnObject || !definePropertyWorksOnDom) {
var definePropertyFallback = Object.defineProperty;
}
}
if (!Object.defineProperty || definePropertyFallback) {
var ERR_NON_OBJECT_DESCRIPTOR = "Property description must be an object: ";
var ERR_NON_OBJECT_TARGET = "Object.defineProperty called on non-object: "
var ERR_ACCESSORS_NOT_SUPPORTED = "getters & setters can not be defined " +
"on this javascript engine";
Object.defineProperty = function defineProperty(object, property, descriptor) {
if ((typeof object != "object" && typeof object != "function") || object === null)
throw new TypeError(ERR_NON_OBJECT_TARGET + object);
if ((typeof descriptor != "object" && typeof descriptor != "function") || descriptor === null)
throw new TypeError(ERR_NON_OBJECT_DESCRIPTOR + descriptor);
if (definePropertyFallback) {
try {
return definePropertyFallback.call(Object, object, property, descriptor);
} catch (exception) {
}
}
if (owns(descriptor, "value")) {
if (supportsAccessors && (lookupGetter(object, property) ||
lookupSetter(object, property)))
{
var prototype = object.__proto__;
object.__proto__ = prototypeOfObject;
delete object[property];
object[property] = descriptor.value;
object.__proto__ = prototype;
} else {
object[property] = descriptor.value;
}
} else {
if (!supportsAccessors)
throw new TypeError(ERR_ACCESSORS_NOT_SUPPORTED);
if (owns(descriptor, "get"))
defineGetter(object, property, descriptor.get);
if (owns(descriptor, "set"))
defineSetter(object, property, descriptor.set);
}
return object;
};
}
if (!Object.defineProperties) {
Object.defineProperties = function defineProperties(object, properties) {
for (var property in properties) {
if (owns(properties, property))
Object.defineProperty(object, property, properties[property]);
}
return object;
};
}
if (!Object.seal) {
Object.seal = function seal(object) {
return object;
};
}
if (!Object.freeze) {
Object.freeze = function freeze(object) {
return object;
};
}
try {
Object.freeze(function () {});
} catch (exception) {
Object.freeze = (function freeze(freezeObject) {
return function freeze(object) {
if (typeof object == "function") {
return object;
} else {
return freezeObject(object);
}
};
})(Object.freeze);
}
if (!Object.preventExtensions) {
Object.preventExtensions = function preventExtensions(object) {
return object;
};
}
if (!Object.isSealed) {
Object.isSealed = function isSealed(object) {
return false;
};
}
if (!Object.isFrozen) {
Object.isFrozen = function isFrozen(object) {
return false;
};
}
if (!Object.isExtensible) {
Object.isExtensible = function isExtensible(object) {
if (Object(object) === object) {
throw new TypeError(); // TODO message
}
var name = '';
while (owns(object, name)) {
name += '?';
}
object[name] = true;
var returnValue = owns(object, name);
delete object[name];
return returnValue;
};
}
if (!Object.keys) {
var hasDontEnumBug = true,
dontEnums = [
"toString",
"toLocaleString",
"valueOf",
"hasOwnProperty",
"isPrototypeOf",
"propertyIsEnumerable",
"constructor"
],
dontEnumsLength = dontEnums.length;
for (var key in {"toString": null}) {
hasDontEnumBug = false;
}
Object.keys = function keys(object) {
if (
(typeof object != "object" && typeof object != "function") ||
object === null
) {
throw new TypeError("Object.keys called on a non-object");
}
var keys = [];
for (var name in object) {
if (owns(object, name)) {
keys.push(name);
}
}
if (hasDontEnumBug) {
for (var i = 0, ii = dontEnumsLength; i < ii; i++) {
var dontEnum = dontEnums[i];
if (owns(object, dontEnum)) {
keys.push(dontEnum);
}
}
}
return keys;
};
}
if (!Date.now) {
Date.now = function now() {
return new Date().getTime();
};
}
var ws = "\x09\x0A\x0B\x0C\x0D\x20\xA0\u1680\u180E\u2000\u2001\u2002\u2003" +
"\u2004\u2005\u2006\u2007\u2008\u2009\u200A\u202F\u205F\u3000\u2028" +
"\u2029\uFEFF";
if (!String.prototype.trim || ws.trim()) {
ws = "[" + ws + "]";
var trimBeginRegexp = new RegExp("^" + ws + ws + "*"),
trimEndRegexp = new RegExp(ws + ws + "*$");
String.prototype.trim = function trim() {
return String(this).replace(trimBeginRegexp, "").replace(trimEndRegexp, "");
};
}
function toInteger(n) {
n = +n;
if (n !== n) { // isNaN
n = 0;
} else if (n !== 0 && n !== (1/0) && n !== -(1/0)) {
n = (n > 0 || -1) * Math.floor(Math.abs(n));
}
return n;
}
function isPrimitive(input) {
var type = typeof input;
return (
input === null ||
type === "undefined" ||
type === "boolean" ||
type === "number" ||
type === "string"
);
}
function toPrimitive(input) {
var val, valueOf, toString;
if (isPrimitive(input)) {
return input;
}
valueOf = input.valueOf;
if (typeof valueOf === "function") {
val = valueOf.call(input);
if (isPrimitive(val)) {
return val;
}
}
toString = input.toString;
if (typeof toString === "function") {
val = toString.call(input);
if (isPrimitive(val)) {
return val;
}
}
throw new TypeError();
}
var toObject = function (o) {
if (o == null) { // this matches both null and undefined
throw new TypeError("can't convert "+o+" to object");
}
return Object(o);
};
});