[Summary view] [Print] [Text view]

   1  // CodeMirror, copyright (c) by Marijn Haverbeke and others
   2  // Distributed under an MIT license: https://codemirror.net/5/LICENSE
   3  
   4  //mIRC mode by Ford_Lawnmower :: Based on Velocity mode by Steve O'Hara
   5  
   6  (function(mod) {
   7    if (typeof exports == "object" && typeof module == "object") // CommonJS
   8      mod(require("../../lib/codemirror"));
   9    else if (typeof define == "function" && define.amd) // AMD
  10      define(["../../lib/codemirror"], mod);
  11    else // Plain browser env
  12      mod(CodeMirror);
  13  })(function(CodeMirror) {
  14  "use strict";
  15  
  16  CodeMirror.defineMIME("text/mirc", "mirc");
  17  CodeMirror.defineMode("mirc", function() {
  18    function parseWords(str) {
  19      var obj = {}, words = str.split(" ");
  20      for (var i = 0; i < words.length; ++i) obj[words[i]] = true;
  21      return obj;
  22    }
  23    var specials = parseWords("$! $$ $& $? $+ $abook $abs $active $activecid " +
  24                              "$activewid $address $addtok $agent $agentname $agentstat $agentver " +
  25                              "$alias $and $anick $ansi2mirc $aop $appactive $appstate $asc $asctime " +
  26                              "$asin $atan $avoice $away $awaymsg $awaytime $banmask $base $bfind " +
  27                              "$binoff $biton $bnick $bvar $bytes $calc $cb $cd $ceil $chan $chanmodes " +
  28                              "$chantypes $chat $chr $cid $clevel $click $cmdbox $cmdline $cnick $color " +
  29                              "$com $comcall $comchan $comerr $compact $compress $comval $cos $count " +
  30                              "$cr $crc $creq $crlf $ctime $ctimer $ctrlenter $date $day $daylight " +
  31                              "$dbuh $dbuw $dccignore $dccport $dde $ddename $debug $decode $decompress " +
  32                              "$deltok $devent $dialog $did $didreg $didtok $didwm $disk $dlevel $dll " +
  33                              "$dllcall $dname $dns $duration $ebeeps $editbox $emailaddr $encode $error " +
  34                              "$eval $event $exist $feof $ferr $fgetc $file $filename $filtered $finddir " +
  35                              "$finddirn $findfile $findfilen $findtok $fline $floor $fopen $fread $fserve " +
  36                              "$fulladdress $fulldate $fullname $fullscreen $get $getdir $getdot $gettok $gmt " +
  37                              "$group $halted $hash $height $hfind $hget $highlight $hnick $hotline " +
  38                              "$hotlinepos $ial $ialchan $ibl $idle $iel $ifmatch $ignore $iif $iil " +
  39                              "$inelipse $ini $inmidi $inpaste $inpoly $input $inrect $inroundrect " +
  40                              "$insong $instok $int $inwave $ip $isalias $isbit $isdde $isdir $isfile " +
  41                              "$isid $islower $istok $isupper $keychar $keyrpt $keyval $knick $lactive " +
  42                              "$lactivecid $lactivewid $left $len $level $lf $line $lines $link $lock " +
  43                              "$lock $locked $log $logstamp $logstampfmt $longfn $longip $lower $ltimer " +
  44                              "$maddress $mask $matchkey $matchtok $md5 $me $menu $menubar $menucontext " +
  45                              "$menutype $mid $middir $mircdir $mircexe $mircini $mklogfn $mnick $mode " +
  46                              "$modefirst $modelast $modespl $mouse $msfile $network $newnick $nick $nofile " +
  47                              "$nopath $noqt $not $notags $notify $null $numeric $numok $oline $onpoly " +
  48                              "$opnick $or $ord $os $passivedcc $pic $play $pnick $port $portable $portfree " +
  49                              "$pos $prefix $prop $protect $puttok $qt $query $rand $r $rawmsg $read $readomo " +
  50                              "$readn $regex $regml $regsub $regsubex $remove $remtok $replace $replacex " +
  51                              "$reptok $result $rgb $right $round $scid $scon $script $scriptdir $scriptline " +
  52                              "$sdir $send $server $serverip $sfile $sha1 $shortfn $show $signal $sin " +
  53                              "$site $sline $snick $snicks $snotify $sock $sockbr $sockerr $sockname " +
  54                              "$sorttok $sound $sqrt $ssl $sreq $sslready $status $strip $str $stripped " +
  55                              "$syle $submenu $switchbar $tan $target $ticks $time $timer $timestamp " +
  56                              "$timestampfmt $timezone $tip $titlebar $toolbar $treebar $trust $ulevel " +
  57                              "$ulist $upper $uptime $url $usermode $v1 $v2 $var $vcmd $vcmdstat $vcmdver " +
  58                              "$version $vnick $vol $wid $width $wildsite $wildtok $window $wrap $xor");
  59    var keywords = parseWords("abook ajinvite alias aline ame amsg anick aop auser autojoin avoice " +
  60                              "away background ban bcopy beep bread break breplace bset btrunc bunset bwrite " +
  61                              "channel clear clearall cline clipboard close cnick color comclose comopen " +
  62                              "comreg continue copy creq ctcpreply ctcps dcc dccserver dde ddeserver " +
  63                              "debug dec describe dialog did didtok disable disconnect dlevel dline dll " +
  64                              "dns dqwindow drawcopy drawdot drawfill drawline drawpic drawrect drawreplace " +
  65                              "drawrot drawsave drawscroll drawtext ebeeps echo editbox emailaddr enable " +
  66                              "events exit fclose filter findtext finger firewall flash flist flood flush " +
  67                              "flushini font fopen fseek fsend fserve fullname fwrite ghide gload gmove " +
  68                              "gopts goto gplay gpoint gqreq groups gshow gsize gstop gtalk gunload hadd " +
  69                              "halt haltdef hdec hdel help hfree hinc hload hmake hop hsave ial ialclear " +
  70                              "ialmark identd if ignore iline inc invite iuser join kick linesep links list " +
  71                              "load loadbuf localinfo log mdi me menubar mkdir mnick mode msg nick noop notice " +
  72                              "notify omsg onotice part partall pdcc perform play playctrl pop protect pvoice " +
  73                              "qme qmsg query queryn quit raw reload remini remote remove rename renwin " +
  74                              "reseterror resetidle return rlevel rline rmdir run ruser save savebuf saveini " +
  75                              "say scid scon server set showmirc signam sline sockaccept sockclose socklist " +
  76                              "socklisten sockmark sockopen sockpause sockread sockrename sockudp sockwrite " +
  77                              "sound speak splay sreq strip switchbar timer timestamp titlebar tnick tokenize " +
  78                              "toolbar topic tray treebar ulist unload unset unsetall updatenl url uwho " +
  79                              "var vcadd vcmd vcrem vol while whois window winhelp write writeint if isalnum " +
  80                              "isalpha isaop isavoice isban ischan ishop isignore isin isincs isletter islower " +
  81                              "isnotify isnum ison isop isprotect isreg isupper isvoice iswm iswmcs " +
  82                              "elseif else goto menu nicklist status title icon size option text edit " +
  83                              "button check radio box scroll list combo link tab item");
  84    var functions = parseWords("if elseif else and not or eq ne in ni for foreach while switch");
  85    var isOperatorChar = /[+\-*&%=<>!?^\/\|]/;
  86    function chain(stream, state, f) {
  87      state.tokenize = f;
  88      return f(stream, state);
  89    }
  90    function tokenBase(stream, state) {
  91      var beforeParams = state.beforeParams;
  92      state.beforeParams = false;
  93      var ch = stream.next();
  94      if (/[\[\]{}\(\),\.]/.test(ch)) {
  95        if (ch == "(" && beforeParams) state.inParams = true;
  96        else if (ch == ")") state.inParams = false;
  97        return null;
  98      }
  99      else if (/\d/.test(ch)) {
 100        stream.eatWhile(/[\w\.]/);
 101        return "number";
 102      }
 103      else if (ch == "\\") {
 104        stream.eat("\\");
 105        stream.eat(/./);
 106        return "number";
 107      }
 108      else if (ch == "/" && stream.eat("*")) {
 109        return chain(stream, state, tokenComment);
 110      }
 111      else if (ch == ";" && stream.match(/ *\( *\(/)) {
 112        return chain(stream, state, tokenUnparsed);
 113      }
 114      else if (ch == ";" && !state.inParams) {
 115        stream.skipToEnd();
 116        return "comment";
 117      }
 118      else if (ch == '"') {
 119        stream.eat(/"/);
 120        return "keyword";
 121      }
 122      else if (ch == "$") {
 123        stream.eatWhile(/[$_a-z0-9A-Z\.:]/);
 124        if (specials && specials.propertyIsEnumerable(stream.current().toLowerCase())) {
 125          return "keyword";
 126        }
 127        else {
 128          state.beforeParams = true;
 129          return "builtin";
 130        }
 131      }
 132      else if (ch == "%") {
 133        stream.eatWhile(/[^,\s()]/);
 134        state.beforeParams = true;
 135        return "string";
 136      }
 137      else if (isOperatorChar.test(ch)) {
 138        stream.eatWhile(isOperatorChar);
 139        return "operator";
 140      }
 141      else {
 142        stream.eatWhile(/[\w\$_{}]/);
 143        var word = stream.current().toLowerCase();
 144        if (keywords && keywords.propertyIsEnumerable(word))
 145          return "keyword";
 146        if (functions && functions.propertyIsEnumerable(word)) {
 147          state.beforeParams = true;
 148          return "keyword";
 149        }
 150        return null;
 151      }
 152    }
 153    function tokenComment(stream, state) {
 154      var maybeEnd = false, ch;
 155      while (ch = stream.next()) {
 156        if (ch == "/" && maybeEnd) {
 157          state.tokenize = tokenBase;
 158          break;
 159        }
 160        maybeEnd = (ch == "*");
 161      }
 162      return "comment";
 163    }
 164    function tokenUnparsed(stream, state) {
 165      var maybeEnd = 0, ch;
 166      while (ch = stream.next()) {
 167        if (ch == ";" && maybeEnd == 2) {
 168          state.tokenize = tokenBase;
 169          break;
 170        }
 171        if (ch == ")")
 172          maybeEnd++;
 173        else if (ch != " ")
 174          maybeEnd = 0;
 175      }
 176      return "meta";
 177    }
 178    return {
 179      startState: function() {
 180        return {
 181          tokenize: tokenBase,
 182          beforeParams: false,
 183          inParams: false
 184        };
 185      },
 186      token: function(stream, state) {
 187        if (stream.eatSpace()) return null;
 188        return state.tokenize(stream, state);
 189      }
 190    };
 191  });
 192  
 193  });