635 lines
24 KiB
JavaScript
635 lines
24 KiB
JavaScript
|
define("ace/mode/vbscript_highlight_rules",["require","exports","module","ace/lib/oop","ace/mode/text_highlight_rules"], function(require, exports, module) {
|
||
|
|
"use strict";
|
||
|
|
|
||
|
|
var oop = require("../lib/oop");
|
||
|
|
var TextHighlightRules = require("./text_highlight_rules").TextHighlightRules;
|
||
|
|
|
||
|
|
var VBScriptHighlightRules = function() {
|
||
|
|
|
||
|
|
var keywordMapper = this.createKeywordMapper({
|
||
|
|
"keyword.control.asp": "If|Then|Else|ElseIf|End|While|Wend|For|To|Each|Case|Select|Return"
|
||
|
|
+ "|Continue|Do|Until|Loop|Next|With|Exit|Function|Property|Type|Enum|Sub|IIf|Class",
|
||
|
|
"storage.type.asp": "Dim|Call|Const|Redim|Set|Let|Get|New|Randomize|Option|Explicit|Preserve|Erase|Execute|ExecuteGlobal",
|
||
|
|
"storage.modifier.asp": "Private|Public|Default",
|
||
|
|
"keyword.operator.asp": "Mod|And|Not|Or|Xor|As|Eqv|Imp|Is",
|
||
|
|
"constant.language.asp": "Empty|False|Nothing|Null|True",
|
||
|
|
"variable.language.vb.asp": "Me",
|
||
|
|
"support.class.vb.asp": "RegExp",
|
||
|
|
"support.class.asp": "Application|ObjectContext|Request|Response|Server|Session",
|
||
|
|
"support.class.collection.asp": "Contents|StaticObjects|ClientCertificate|Cookies|Form|QueryString|ServerVariables",
|
||
|
|
"support.constant.asp": "TotalBytes|Buffer|CacheControl|Charset|ContentType|Expires|ExpiresAbsolute"
|
||
|
|
+ "|IsClientConnected|PICS|Status|ScriptTimeout|CodePage|LCID|SessionID|Timeout",
|
||
|
|
"support.function.asp": "Lock|Unlock|SetAbort|SetComplete|BinaryRead|AddHeader|AppendToLog"
|
||
|
|
+ "|BinaryWrite|Clear|Flush|Redirect|Write|CreateObject|HTMLEncode|MapPath|URLEncode|Abandon|Convert|Regex",
|
||
|
|
"support.function.event.asp": "Application_OnEnd|Application_OnStart"
|
||
|
|
+ "|OnTransactionAbort|OnTransactionCommit|Session_OnEnd|Session_OnStart",
|
||
|
|
"support.function.vb.asp": "Array|Add|Asc|Atn|CBool|CByte|CCur|CDate|CDbl|Chr|CInt|CLng"
|
||
|
|
+ "|Conversions|Cos|CreateObject|CSng|CStr|Date|DateAdd|DateDiff|DatePart|DateSerial"
|
||
|
|
+ "|DateValue|Day|Derived|Math|Escape|Eval|Exists|Exp|Filter|FormatCurrency"
|
||
|
|
+ "|FormatDateTime|FormatNumber|FormatPercent|GetLocale|GetObject|GetRef|Hex"
|
||
|
|
+ "|Hour|InputBox|InStr|InStrRev|Int|Fix|IsArray|IsDate|IsEmpty|IsNull|IsNumeric"
|
||
|
|
+ "|IsObject|Item|Items|Join|Keys|LBound|LCase|Left|Len|LoadPicture|Log|LTrim|RTrim"
|
||
|
|
+ "|Trim|Maths|Mid|Minute|Month|MonthName|MsgBox|Now|Oct|Remove|RemoveAll|Replace"
|
||
|
|
+ "|RGB|Right|Rnd|Round|ScriptEngine|ScriptEngineBuildVersion|ScriptEngineMajorVersion"
|
||
|
|
+ "|ScriptEngineMinorVersion|Second|SetLocale|Sgn|Sin|Space|Split|Sqr|StrComp|String|StrReverse"
|
||
|
|
+ "|Tan|Time|Timer|TimeSerial|TimeValue|TypeName|UBound|UCase|Unescape|VarType|Weekday|WeekdayName|Year"
|
||
|
|
+ "|AscB|AscW|ChrB|ChrW|InStrB|LeftB|LenB|MidB|RightB|Abs|GetUILanguage",
|
||
|
|
"support.type.vb.asp": "vbTrue|vbFalse|vbCr|vbCrLf|vbFormFeed|vbLf|vbNewLine|vbNullChar|vbNullString"
|
||
|
|
+ "|vbTab|vbVerticalTab|vbBinaryCompare|vbTextCompare|vbSunday|vbMonday|vbTuesday|vbWednesday"
|
||
|
|
+ "|vbThursday|vbFriday|vbSaturday|vbUseSystemDayOfWeek|vbFirstJan1|vbFirstFourDays|vbFirstFullWeek"
|
||
|
|
+ "|vbGeneralDate|vbLongDate|vbShortDate|vbLongTime|vbShortTime|vbObjectError|vbEmpty|vbNull|vbInteger"
|
||
|
|
+ "|vbLong|vbSingle|vbDouble|vbCurrency|vbDate|vbString|vbObject|vbError|vbBoolean|vbVariant"
|
||
|
|
+ "|vbDataObject|vbDecimal|vbByte|vbArray|vbOKOnly|vbOKCancel|vbAbortRetryIgnore|vbYesNoCancel|vbYesNo"
|
||
|
|
+ "|vbRetryCancel|vbCritical|vbQuestion|vbExclamation|vbInformation|vbDefaultButton1|vbDefaultButton2"
|
||
|
|
+ "|vbDefaultButton3|vbDefaultButton4|vbApplicationModal|vbSystemModal|vbOK|vbCancel|vbAbort|vbRetry|vbIgnore|vbYes|vbNo"
|
||
|
|
+ "|vbUseDefault"
|
||
|
|
}, "identifier", true);
|
||
|
|
|
||
|
|
this.$rules = {
|
||
|
|
"start": [
|
||
|
|
{
|
||
|
|
token: [
|
||
|
|
"meta.ending-space"
|
||
|
|
],
|
||
|
|
regex: "$"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: [null],
|
||
|
|
regex: "^(?=\\t)",
|
||
|
|
next: "state_3"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: [null],
|
||
|
|
regex: "^(?= )",
|
||
|
|
next: "state_4"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: [
|
||
|
|
"text",
|
||
|
|
"storage.type.function.asp",
|
||
|
|
"text",
|
||
|
|
"entity.name.function.asp",
|
||
|
|
"text",
|
||
|
|
"punctuation.definition.parameters.asp",
|
||
|
|
"variable.parameter.function.asp",
|
||
|
|
"punctuation.definition.parameters.asp"
|
||
|
|
],
|
||
|
|
regex: "^(\\s*)(Function|Sub)(\\s+)([a-zA-Z_]\\w*)(\\s*)(\\()([^)]*)(\\))"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: "punctuation.definition.comment.asp",
|
||
|
|
regex: "'|REM(?=\\s|$)",
|
||
|
|
next: "comment",
|
||
|
|
caseInsensitive: true
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: "storage.type.asp",
|
||
|
|
regex: "On\\s+Error\\s+(?:Resume\\s+Next|GoTo)\\b",
|
||
|
|
caseInsensitive: true
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: "punctuation.definition.string.begin.asp",
|
||
|
|
regex: '"',
|
||
|
|
next: "string"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: [
|
||
|
|
"punctuation.definition.variable.asp"
|
||
|
|
],
|
||
|
|
regex: "(\\$)[a-zA-Z_x7f-xff][a-zA-Z0-9_x7f-xff]*?\\b\\s*"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: "constant.numeric.asp",
|
||
|
|
regex: "-?\\b(?:(?:0(?:x|X)[0-9a-fA-F]*)|(?:(?:[0-9]+\\.?[0-9]*)|(?:\\.[0-9]+))(?:(?:e|E)(?:\\+|-)?[0-9]+)?)(?:L|l|UL|ul|u|U|F|f)?\\b"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
regex: "\\w+",
|
||
|
|
token: keywordMapper
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: ["entity.name.function.asp"],
|
||
|
|
regex: "(?:(\\b[a-zA-Z_x7f-xff][a-zA-Z0-9_x7f-xff]*?\\b)(?=\\(\\)?))"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: ["keyword.operator.asp"],
|
||
|
|
regex: "\\-|\\+|\\*|\\/|\\>|\\<|\\=|\\&|\\\\|\\^"
|
||
|
|
}
|
||
|
|
],
|
||
|
|
"state_3": [
|
||
|
|
{
|
||
|
|
token: [
|
||
|
|
"meta.odd-tab.tabs",
|
||
|
|
"meta.even-tab.tabs"
|
||
|
|
],
|
||
|
|
regex: "(\\t)(\\t)?"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: "meta.leading-space",
|
||
|
|
regex: "(?=[^\\t])",
|
||
|
|
next: "start"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: "meta.leading-space",
|
||
|
|
regex: ".",
|
||
|
|
next: "state_3"
|
||
|
|
}
|
||
|
|
],
|
||
|
|
"state_4": [
|
||
|
|
{
|
||
|
|
token: ["meta.odd-tab.spaces", "meta.even-tab.spaces"],
|
||
|
|
regex: "( )( )?"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: "meta.leading-space",
|
||
|
|
regex: "(?=[^ ])",
|
||
|
|
next: "start"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
defaultToken: "meta.leading-space"
|
||
|
|
}
|
||
|
|
],
|
||
|
|
"comment": [
|
||
|
|
{
|
||
|
|
token: "comment.line.apostrophe.asp",
|
||
|
|
regex: "$",
|
||
|
|
next: "start"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
defaultToken: "comment.line.apostrophe.asp"
|
||
|
|
}
|
||
|
|
],
|
||
|
|
"string": [
|
||
|
|
{
|
||
|
|
token: "constant.character.escape.apostrophe.asp",
|
||
|
|
regex: '""'
|
||
|
|
},
|
||
|
|
{
|
||
|
|
token: "string.quoted.double.asp",
|
||
|
|
regex: '"',
|
||
|
|
next: "start"
|
||
|
|
},
|
||
|
|
{
|
||
|
|
defaultToken: "string.quoted.double.asp"
|
||
|
|
}
|
||
|
|
]
|
||
|
|
};
|
||
|
|
|
||
|
|
};
|
||
|
|
|
||
|
|
oop.inherits(VBScriptHighlightRules, TextHighlightRules);
|
||
|
|
|
||
|
|
exports.VBScriptHighlightRules = VBScriptHighlightRules;
|
||
|
|
});
|
||
|
|
|
||
|
|
define("ace/mode/folding/vbscript",["require","exports","module","ace/lib/oop","ace/mode/folding/fold_mode","ace/range","ace/token_iterator"], function(require, exports, module) {
|
||
|
|
"use strict";
|
||
|
|
|
||
|
|
var oop = require("../../lib/oop");
|
||
|
|
var BaseFoldMode = require("./fold_mode").FoldMode;
|
||
|
|
var Range = require("../../range").Range;
|
||
|
|
var TokenIterator = require("../../token_iterator").TokenIterator;
|
||
|
|
|
||
|
|
|
||
|
|
var FoldMode = exports.FoldMode = function() {};
|
||
|
|
|
||
|
|
oop.inherits(FoldMode, BaseFoldMode);
|
||
|
|
|
||
|
|
(function() {
|
||
|
|
this.indentKeywords = {
|
||
|
|
"class": 1,
|
||
|
|
"function": 1,
|
||
|
|
"sub": 1,
|
||
|
|
"if": 1,
|
||
|
|
"select": 1,
|
||
|
|
"do": 1,
|
||
|
|
"for": 1,
|
||
|
|
"while": 1,
|
||
|
|
"with": 1,
|
||
|
|
"property": 1,
|
||
|
|
"else": 1,
|
||
|
|
"elseif": 1,
|
||
|
|
"end": -1,
|
||
|
|
"loop": -1,
|
||
|
|
"next": -1,
|
||
|
|
"wend": -1
|
||
|
|
};
|
||
|
|
|
||
|
|
this.foldingStartMarker = /(?:\s|^)(class|function|sub|if|select|do|for|while|with|property|else|elseif)\b/i;
|
||
|
|
this.foldingStopMarker = /\b(end|loop|next|wend)\b/i;
|
||
|
|
|
||
|
|
this.getFoldWidgetRange = function (session, foldStyle, row) {
|
||
|
|
var line = session.getLine(row);
|
||
|
|
var isStart = this.foldingStartMarker.test(line);
|
||
|
|
var isEnd = this.foldingStopMarker.test(line);
|
||
|
|
if (isStart || isEnd) {
|
||
|
|
var match = (isEnd) ? this.foldingStopMarker.exec(line) : this.foldingStartMarker.exec(line);
|
||
|
|
var keyword = match && match[1].toLowerCase();
|
||
|
|
if (keyword) {
|
||
|
|
var type = session.getTokenAt(row, match.index + 2).type;
|
||
|
|
if (type === "keyword.control.asp" || type === "storage.type.function.asp")
|
||
|
|
return this.vbsBlock(session, row, match.index + 2);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
};
|
||
|
|
this.getFoldWidget = function(session, foldStyle, row) {
|
||
|
|
var line = session.getLine(row);
|
||
|
|
var isStart = this.foldingStartMarker.test(line);
|
||
|
|
var isEnd = this.foldingStopMarker.test(line);
|
||
|
|
if (isStart && !isEnd) {
|
||
|
|
var match = this.foldingStartMarker.exec(line);
|
||
|
|
var keyword = match && match[1].toLowerCase();
|
||
|
|
if (keyword) {
|
||
|
|
var type = session.getTokenAt(row, match.index + 2).type;
|
||
|
|
if (type == "keyword.control.asp" || type == "storage.type.function.asp") {
|
||
|
|
if (keyword == "if" && !/then\s*('|$)/i.test(line))
|
||
|
|
return "";
|
||
|
|
return "start";
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return "";
|
||
|
|
};
|
||
|
|
|
||
|
|
this.vbsBlock = function(session, row, column, tokenRange) {
|
||
|
|
var stream = new TokenIterator(session, row, column);
|
||
|
|
|
||
|
|
var endOpenings = {
|
||
|
|
"class": 1,
|
||
|
|
"function": 1,
|
||
|
|
"sub": 1,
|
||
|
|
"if": 1,
|
||
|
|
"select": 1,
|
||
|
|
"with": 1,
|
||
|
|
"property": 1,
|
||
|
|
"else": 1,
|
||
|
|
"elseif": 1
|
||
|
|
};
|
||
|
|
|
||
|
|
var token = stream.getCurrentToken();
|
||
|
|
if (!token || (token.type != "keyword.control.asp" && token.type != "storage.type.function.asp"))
|
||
|
|
return;
|
||
|
|
|
||
|
|
var startTokenValue = token.value.toLowerCase();
|
||
|
|
var val = token.value.toLowerCase();
|
||
|
|
|
||
|
|
var stack = [val];
|
||
|
|
var dir = this.indentKeywords[val];
|
||
|
|
|
||
|
|
if (!dir)
|
||
|
|
return;
|
||
|
|
|
||
|
|
var firstRange = stream.getCurrentTokenRange();
|
||
|
|
switch (val) {
|
||
|
|
case "property":
|
||
|
|
case "sub":
|
||
|
|
case "function":
|
||
|
|
case "if":
|
||
|
|
case "select":
|
||
|
|
case "do":
|
||
|
|
case "for":
|
||
|
|
case "class":
|
||
|
|
case "while":
|
||
|
|
case "with":
|
||
|
|
var line = session.getLine(row);
|
||
|
|
var singleLineCondition = /^\s*If\s+.*\s+Then(?!')\s+(?!')\S/i.test(line);
|
||
|
|
if (singleLineCondition)
|
||
|
|
return;
|
||
|
|
var checkToken = new RegExp("(?:^|\\s)" + val, "i");
|
||
|
|
var endTest = /^\s*End\s(If|Sub|Select|Function|Class|With|Property)\s*/i.test(line);
|
||
|
|
if (!checkToken.test(line) && !endTest) {
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
if (endTest) {
|
||
|
|
var tokenRange = stream.getCurrentTokenRange();
|
||
|
|
stream.step = stream.stepBackward;
|
||
|
|
stream.step();
|
||
|
|
stream.step();
|
||
|
|
token = stream.getCurrentToken();
|
||
|
|
if (token) {
|
||
|
|
val = token.value.toLowerCase();
|
||
|
|
if (val == "end") {
|
||
|
|
firstRange = stream.getCurrentTokenRange();
|
||
|
|
firstRange = new Range(firstRange.start.row, firstRange.start.column, tokenRange.start.row, tokenRange.end.column);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
dir = -1;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case "end":
|
||
|
|
var tokenPos = stream.getCurrentTokenPosition();
|
||
|
|
firstRange = stream.getCurrentTokenRange();
|
||
|
|
stream.step = stream.stepForward;
|
||
|
|
stream.step();
|
||
|
|
stream.step();
|
||
|
|
token = stream.getCurrentToken();
|
||
|
|
if (token) {
|
||
|
|
val = token.value.toLowerCase();
|
||
|
|
if (val in endOpenings) {
|
||
|
|
startTokenValue = val;
|
||
|
|
var nextTokenPos = stream.getCurrentTokenPosition();
|
||
|
|
var endColumn = nextTokenPos.column + val.length;
|
||
|
|
firstRange = new Range(tokenPos.row, tokenPos.column, nextTokenPos.row, endColumn);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
stream.step = stream.stepBackward;
|
||
|
|
stream.step();
|
||
|
|
stream.step();
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
var startColumn = dir === -1 ? session.getLine(row - 1).length : session.getLine(row).length;
|
||
|
|
var startRow = row;
|
||
|
|
var ranges = [];
|
||
|
|
ranges.push(firstRange);
|
||
|
|
|
||
|
|
stream.step = dir === -1 ? stream.stepBackward : stream.stepForward;
|
||
|
|
while(token = stream.step()) {
|
||
|
|
var outputRange = null;
|
||
|
|
var ignore = false;
|
||
|
|
if (token.type != "keyword.control.asp" && token.type != "storage.type.function.asp")
|
||
|
|
continue;
|
||
|
|
val = token.value.toLowerCase();
|
||
|
|
var level = dir * this.indentKeywords[val];
|
||
|
|
|
||
|
|
switch (val) {
|
||
|
|
case "property":
|
||
|
|
case "sub":
|
||
|
|
case "function":
|
||
|
|
case "if":
|
||
|
|
case "select":
|
||
|
|
case "do":
|
||
|
|
case "for":
|
||
|
|
case "class":
|
||
|
|
case "while":
|
||
|
|
case "with":
|
||
|
|
var line = session.getLine(stream.getCurrentTokenRow());
|
||
|
|
var singleLineCondition = /^\s*If\s+.*\s+Then(?!')\s+(?!')\S/i.test(line);
|
||
|
|
if (singleLineCondition) {
|
||
|
|
level = 0;
|
||
|
|
ignore = true;
|
||
|
|
}
|
||
|
|
var checkToken = new RegExp("^\\s* end\\s+" + val, "i");
|
||
|
|
if (checkToken.test(line)) {
|
||
|
|
level = 0;
|
||
|
|
ignore = true;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case "elseif":
|
||
|
|
case "else":
|
||
|
|
level = 0;
|
||
|
|
if (startTokenValue != "elseif") {
|
||
|
|
ignore = true;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (level > 0) {
|
||
|
|
stack.unshift(val);
|
||
|
|
} else if (level <= 0 && ignore === false) {
|
||
|
|
stack.shift();
|
||
|
|
if (!stack.length) {
|
||
|
|
switch (val) {
|
||
|
|
case "end":
|
||
|
|
var tokenPos = stream.getCurrentTokenPosition();
|
||
|
|
outputRange = stream.getCurrentTokenRange();
|
||
|
|
stream.step();
|
||
|
|
stream.step();
|
||
|
|
token = stream.getCurrentToken();
|
||
|
|
if (token) {
|
||
|
|
val = token.value.toLowerCase();
|
||
|
|
if (val in endOpenings) {
|
||
|
|
if ((startTokenValue == "else" || startTokenValue == "elseif")) {
|
||
|
|
if (val !== "if") {
|
||
|
|
ranges.shift();
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
if (val != startTokenValue)
|
||
|
|
ranges.shift();
|
||
|
|
}
|
||
|
|
var nextTokenPos = stream.getCurrentTokenPosition();
|
||
|
|
var endColumn = nextTokenPos.column + val.length;
|
||
|
|
outputRange = new Range(tokenPos.row, tokenPos.column, nextTokenPos.row, endColumn);
|
||
|
|
} else {
|
||
|
|
ranges.shift();
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
ranges.shift();
|
||
|
|
}
|
||
|
|
stream.step = stream.stepBackward;
|
||
|
|
stream.step();
|
||
|
|
stream.step();
|
||
|
|
token = stream.getCurrentToken();
|
||
|
|
val = token.value.toLowerCase();
|
||
|
|
break;
|
||
|
|
case "select":
|
||
|
|
case "sub":
|
||
|
|
case "if":
|
||
|
|
case "function":
|
||
|
|
case "class":
|
||
|
|
case "with":
|
||
|
|
case "property":
|
||
|
|
if (val != startTokenValue)
|
||
|
|
ranges.shift();
|
||
|
|
break;
|
||
|
|
case "do":
|
||
|
|
if (startTokenValue != "loop")
|
||
|
|
ranges.shift();
|
||
|
|
break;
|
||
|
|
case "loop":
|
||
|
|
if (startTokenValue != "do")
|
||
|
|
ranges.shift();
|
||
|
|
break;
|
||
|
|
case "for":
|
||
|
|
if (startTokenValue != "next")
|
||
|
|
ranges.shift();
|
||
|
|
break;
|
||
|
|
case "next":
|
||
|
|
if (startTokenValue != "for")
|
||
|
|
ranges.shift();
|
||
|
|
break;
|
||
|
|
case "while":
|
||
|
|
if (startTokenValue != "wend")
|
||
|
|
ranges.shift();
|
||
|
|
break;
|
||
|
|
case "wend":
|
||
|
|
if (startTokenValue != "while")
|
||
|
|
ranges.shift();
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (level === 0){
|
||
|
|
stack.unshift(val);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
if (!token)
|
||
|
|
return null;
|
||
|
|
|
||
|
|
if (tokenRange) {
|
||
|
|
if (!outputRange) {
|
||
|
|
ranges.push(stream.getCurrentTokenRange());
|
||
|
|
} else {
|
||
|
|
ranges.push(outputRange);
|
||
|
|
}
|
||
|
|
return ranges;
|
||
|
|
}
|
||
|
|
|
||
|
|
var row = stream.getCurrentTokenRow();
|
||
|
|
if (dir === -1) {
|
||
|
|
var endColumn = session.getLine(row).length;
|
||
|
|
return new Range(row, endColumn, startRow - 1, startColumn);
|
||
|
|
} else
|
||
|
|
return new Range(startRow, startColumn, row - 1, session.getLine(row - 1).length);
|
||
|
|
};
|
||
|
|
|
||
|
|
}).call(FoldMode.prototype);
|
||
|
|
|
||
|
|
});
|
||
|
|
|
||
|
|
define("ace/mode/vbscript",["require","exports","module","ace/lib/oop","ace/mode/text","ace/mode/vbscript_highlight_rules","ace/mode/folding/vbscript","ace/range"], function(require, exports, module) {
|
||
|
|
"use strict";
|
||
|
|
|
||
|
|
var oop = require("../lib/oop");
|
||
|
|
var TextMode = require("./text").Mode;
|
||
|
|
var VBScriptHighlightRules = require("./vbscript_highlight_rules").VBScriptHighlightRules;
|
||
|
|
var FoldMode = require("./folding/vbscript").FoldMode;
|
||
|
|
var Range = require("../range").Range;
|
||
|
|
|
||
|
|
var Mode = function() {
|
||
|
|
this.HighlightRules = VBScriptHighlightRules;
|
||
|
|
this.foldingRules = new FoldMode();
|
||
|
|
this.$behaviour = this.$defaultBehaviour;
|
||
|
|
this.indentKeywords = this.foldingRules.indentKeywords;
|
||
|
|
};
|
||
|
|
oop.inherits(Mode, TextMode);
|
||
|
|
|
||
|
|
(function() {
|
||
|
|
|
||
|
|
this.lineCommentStart = ["'", "REM"];
|
||
|
|
|
||
|
|
var outdentKeywords = [
|
||
|
|
"else",
|
||
|
|
"elseif",
|
||
|
|
"end",
|
||
|
|
"loop",
|
||
|
|
"next",
|
||
|
|
"wend"
|
||
|
|
];
|
||
|
|
|
||
|
|
function getNetIndentLevel(tokens, line, indentKeywords) {
|
||
|
|
var level = 0;
|
||
|
|
for (var i = 0; i < tokens.length; i++) {
|
||
|
|
var token = tokens[i];
|
||
|
|
if (token.type == "keyword.control.asp" || token.type == "storage.type.function.asp") {
|
||
|
|
var val = token.value.toLowerCase();
|
||
|
|
if (val in indentKeywords) {
|
||
|
|
switch (val) {
|
||
|
|
case "property":
|
||
|
|
case "sub":
|
||
|
|
case "function":
|
||
|
|
case "select":
|
||
|
|
case "do":
|
||
|
|
case "for":
|
||
|
|
case "class":
|
||
|
|
case "while":
|
||
|
|
case "with":
|
||
|
|
case "if":
|
||
|
|
var checkToken = new RegExp("^\\s* end\\s+" + val, "i");
|
||
|
|
var singleLineCondition = /^\s*If\s+.*\s+Then(?!')\s+(?!')\S/i.test(line);
|
||
|
|
if (!singleLineCondition && !checkToken.test(line))
|
||
|
|
level += indentKeywords[val];
|
||
|
|
break;
|
||
|
|
default:
|
||
|
|
level += indentKeywords[val];
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if (level < 0) {
|
||
|
|
return -1;
|
||
|
|
} else if (level > 0) {
|
||
|
|
return 1;
|
||
|
|
} else {
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
this.getNextLineIndent = function(state, line, tab) {
|
||
|
|
var indent = this.$getIndent(line);
|
||
|
|
var level = 0;
|
||
|
|
|
||
|
|
var tokenizedLine = this.getTokenizer().getLineTokens(line, state);
|
||
|
|
var tokens = tokenizedLine.tokens;
|
||
|
|
|
||
|
|
if (state == "start") {
|
||
|
|
level = getNetIndentLevel(tokens, line, this.indentKeywords);
|
||
|
|
}
|
||
|
|
if (level > 0) {
|
||
|
|
return indent + tab;
|
||
|
|
} else if (level < 0 && indent.substr(indent.length - tab.length) == tab) {
|
||
|
|
if (!this.checkOutdent(state, line, "\n")) {
|
||
|
|
return indent.substr(0, indent.length - tab.length);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return indent;
|
||
|
|
};
|
||
|
|
|
||
|
|
this.checkOutdent = function(state, line, input) {
|
||
|
|
if (input != "\n" && input != "\r" && input != "\r\n")
|
||
|
|
return false;
|
||
|
|
|
||
|
|
var tokens = this.getTokenizer().getLineTokens(line.trim(), state).tokens;
|
||
|
|
|
||
|
|
if (!tokens || !tokens.length)
|
||
|
|
return false;
|
||
|
|
var val = tokens[0].value.toLowerCase();
|
||
|
|
return ((tokens[0].type == "keyword.control.asp" || tokens[0].type == "storage.type.function.asp") && outdentKeywords.indexOf(val) != -1);
|
||
|
|
};
|
||
|
|
|
||
|
|
this.getMatching = function(session, row, column, tokenRange) {
|
||
|
|
if (row == undefined) {
|
||
|
|
var pos = session.selection.lead;
|
||
|
|
column = pos.column;
|
||
|
|
row = pos.row;
|
||
|
|
}
|
||
|
|
if (tokenRange == undefined)
|
||
|
|
tokenRange = true;
|
||
|
|
|
||
|
|
var startToken = session.getTokenAt(row, column);
|
||
|
|
if (startToken) {
|
||
|
|
var val = startToken.value.toLowerCase();
|
||
|
|
if (val in this.indentKeywords)
|
||
|
|
return this.foldingRules.vbsBlock(session, row, column, tokenRange);
|
||
|
|
}
|
||
|
|
};
|
||
|
|
|
||
|
|
this.autoOutdent = function(state, session, row) {
|
||
|
|
var line = session.getLine(row);
|
||
|
|
var column = line.match(/^\s*/)[0].length;
|
||
|
|
if (!column || !row) return;
|
||
|
|
|
||
|
|
var startRange = this.getMatching(session, row, column + 1, false);
|
||
|
|
if (!startRange || startRange.start.row == row)
|
||
|
|
return;
|
||
|
|
var indent = this.$getIndent(session.getLine(startRange.start.row));
|
||
|
|
if (indent.length != column) {
|
||
|
|
session.replace(new Range(row, 0, row, column), indent);
|
||
|
|
session.outdentRows(new Range(row + 1, 0, row + 1, 0));
|
||
|
|
}
|
||
|
|
};
|
||
|
|
|
||
|
|
this.$id = "ace/mode/vbscript";
|
||
|
|
}).call(Mode.prototype);
|
||
|
|
|
||
|
|
exports.Mode = Mode;
|
||
|
|
}); (function() {
|
||
|
|
window.require(["ace/mode/vbscript"], function(m) {
|
||
|
|
if (typeof module == "object" && typeof exports == "object" && module) {
|
||
|
|
module.exports = m;
|
||
|
|
}
|
||
|
|
});
|
||
|
|
})();
|
||
|
|
|