ecl.js (8843B)
1 // CodeMirror, copyright (c) by Marijn Haverbeke and others 2 // Distributed under an MIT license: http://codemirror.net/LICENSE 3 4 (function(mod) { 5 if (typeof exports == "object" && typeof module == "object") // CommonJS 6 mod(require("../../lib/codemirror")); 7 else if (typeof define == "function" && define.amd) // AMD 8 define(["../../lib/codemirror"], mod); 9 else // Plain browser env 10 mod(CodeMirror); 11 })(function(CodeMirror) { 12 "use strict"; 13 14 CodeMirror.defineMode("ecl", function(config) { 15 16 function words(str) { 17 var obj = {}, words = str.split(" "); 18 for (var i = 0; i < words.length; ++i) obj[words[i]] = true; 19 return obj; 20 } 21 22 function metaHook(stream, state) { 23 if (!state.startOfLine) return false; 24 stream.skipToEnd(); 25 return "meta"; 26 } 27 28 var indentUnit = config.indentUnit; 29 var keyword = words("abs acos allnodes ascii asin asstring atan atan2 ave case choose choosen choosesets clustersize combine correlation cos cosh count covariance cron dataset dedup define denormalize distribute distributed distribution ebcdic enth error evaluate event eventextra eventname exists exp failcode failmessage fetch fromunicode getisvalid global graph group hash hash32 hash64 hashcrc hashmd5 having if index intformat isvalid iterate join keyunicode length library limit ln local log loop map matched matchlength matchposition matchtext matchunicode max merge mergejoin min nolocal nonempty normalize parse pipe power preload process project pull random range rank ranked realformat recordof regexfind regexreplace regroup rejected rollup round roundup row rowdiff sample set sin sinh sizeof soapcall sort sorted sqrt stepped stored sum table tan tanh thisnode topn tounicode transfer trim truncate typeof ungroup unicodeorder variance which workunit xmldecode xmlencode xmltext xmlunicode"); 30 var variable = words("apply assert build buildindex evaluate fail keydiff keypatch loadxml nothor notify output parallel sequential soapcall wait"); 31 var variable_2 = words("__compressed__ all and any as atmost before beginc++ best between case const counter csv descend encrypt end endc++ endmacro except exclusive expire export extend false few first flat from full function group header heading hole ifblock import in interface joined keep keyed last left limit load local locale lookup macro many maxcount maxlength min skew module named nocase noroot noscan nosort not of only opt or outer overwrite packed partition penalty physicallength pipe quote record relationship repeat return right scan self separator service shared skew skip sql store terminator thor threshold token transform trim true type unicodeorder unsorted validate virtual whole wild within xml xpath"); 32 var variable_3 = words("ascii big_endian boolean data decimal ebcdic integer pattern qstring real record rule set of string token udecimal unicode unsigned varstring varunicode"); 33 var builtin = words("checkpoint deprecated failcode failmessage failure global independent onwarning persist priority recovery stored success wait when"); 34 var blockKeywords = words("catch class do else finally for if switch try while"); 35 var atoms = words("true false null"); 36 var hooks = {"#": metaHook}; 37 var isOperatorChar = /[+\-*&%=<>!?|\/]/; 38 39 var curPunc; 40 41 function tokenBase(stream, state) { 42 var ch = stream.next(); 43 if (hooks[ch]) { 44 var result = hooks[ch](stream, state); 45 if (result !== false) return result; 46 } 47 if (ch == '"' || ch == "'") { 48 state.tokenize = tokenString(ch); 49 return state.tokenize(stream, state); 50 } 51 if (/[\[\]{}\(\),;\:\.]/.test(ch)) { 52 curPunc = ch; 53 return null; 54 } 55 if (/\d/.test(ch)) { 56 stream.eatWhile(/[\w\.]/); 57 return "number"; 58 } 59 if (ch == "/") { 60 if (stream.eat("*")) { 61 state.tokenize = tokenComment; 62 return tokenComment(stream, state); 63 } 64 if (stream.eat("/")) { 65 stream.skipToEnd(); 66 return "comment"; 67 } 68 } 69 if (isOperatorChar.test(ch)) { 70 stream.eatWhile(isOperatorChar); 71 return "operator"; 72 } 73 stream.eatWhile(/[\w\$_]/); 74 var cur = stream.current().toLowerCase(); 75 if (keyword.propertyIsEnumerable(cur)) { 76 if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement"; 77 return "keyword"; 78 } else if (variable.propertyIsEnumerable(cur)) { 79 if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement"; 80 return "variable"; 81 } else if (variable_2.propertyIsEnumerable(cur)) { 82 if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement"; 83 return "variable-2"; 84 } else if (variable_3.propertyIsEnumerable(cur)) { 85 if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement"; 86 return "variable-3"; 87 } else if (builtin.propertyIsEnumerable(cur)) { 88 if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement"; 89 return "builtin"; 90 } else { //Data types are of from KEYWORD## 91 var i = cur.length - 1; 92 while(i >= 0 && (!isNaN(cur[i]) || cur[i] == '_')) 93 --i; 94 95 if (i > 0) { 96 var cur2 = cur.substr(0, i + 1); 97 if (variable_3.propertyIsEnumerable(cur2)) { 98 if (blockKeywords.propertyIsEnumerable(cur2)) curPunc = "newstatement"; 99 return "variable-3"; 100 } 101 } 102 } 103 if (atoms.propertyIsEnumerable(cur)) return "atom"; 104 return null; 105 } 106 107 function tokenString(quote) { 108 return function(stream, state) { 109 var escaped = false, next, end = false; 110 while ((next = stream.next()) != null) { 111 if (next == quote && !escaped) {end = true; break;} 112 escaped = !escaped && next == "\\"; 113 } 114 if (end || !escaped) 115 state.tokenize = tokenBase; 116 return "string"; 117 }; 118 } 119 120 function tokenComment(stream, state) { 121 var maybeEnd = false, ch; 122 while (ch = stream.next()) { 123 if (ch == "/" && maybeEnd) { 124 state.tokenize = tokenBase; 125 break; 126 } 127 maybeEnd = (ch == "*"); 128 } 129 return "comment"; 130 } 131 132 function Context(indented, column, type, align, prev) { 133 this.indented = indented; 134 this.column = column; 135 this.type = type; 136 this.align = align; 137 this.prev = prev; 138 } 139 function pushContext(state, col, type) { 140 return state.context = new Context(state.indented, col, type, null, state.context); 141 } 142 function popContext(state) { 143 var t = state.context.type; 144 if (t == ")" || t == "]" || t == "}") 145 state.indented = state.context.indented; 146 return state.context = state.context.prev; 147 } 148 149 // Interface 150 151 return { 152 startState: function(basecolumn) { 153 return { 154 tokenize: null, 155 context: new Context((basecolumn || 0) - indentUnit, 0, "top", false), 156 indented: 0, 157 startOfLine: true 158 }; 159 }, 160 161 token: function(stream, state) { 162 var ctx = state.context; 163 if (stream.sol()) { 164 if (ctx.align == null) ctx.align = false; 165 state.indented = stream.indentation(); 166 state.startOfLine = true; 167 } 168 if (stream.eatSpace()) return null; 169 curPunc = null; 170 var style = (state.tokenize || tokenBase)(stream, state); 171 if (style == "comment" || style == "meta") return style; 172 if (ctx.align == null) ctx.align = true; 173 174 if ((curPunc == ";" || curPunc == ":") && ctx.type == "statement") popContext(state); 175 else if (curPunc == "{") pushContext(state, stream.column(), "}"); 176 else if (curPunc == "[") pushContext(state, stream.column(), "]"); 177 else if (curPunc == "(") pushContext(state, stream.column(), ")"); 178 else if (curPunc == "}") { 179 while (ctx.type == "statement") ctx = popContext(state); 180 if (ctx.type == "}") ctx = popContext(state); 181 while (ctx.type == "statement") ctx = popContext(state); 182 } 183 else if (curPunc == ctx.type) popContext(state); 184 else if (ctx.type == "}" || ctx.type == "top" || (ctx.type == "statement" && curPunc == "newstatement")) 185 pushContext(state, stream.column(), "statement"); 186 state.startOfLine = false; 187 return style; 188 }, 189 190 indent: function(state, textAfter) { 191 if (state.tokenize != tokenBase && state.tokenize != null) return 0; 192 var ctx = state.context, firstChar = textAfter && textAfter.charAt(0); 193 if (ctx.type == "statement" && firstChar == "}") ctx = ctx.prev; 194 var closing = firstChar == ctx.type; 195 if (ctx.type == "statement") return ctx.indented + (firstChar == "{" ? 0 : indentUnit); 196 else if (ctx.align) return ctx.column + (closing ? 0 : 1); 197 else return ctx.indented + (closing ? 0 : indentUnit); 198 }, 199 200 electricChars: "{}" 201 }; 202 }); 203 204 CodeMirror.defineMIME("text/x-ecl", "ecl"); 205 206 });