2019-12-02 12:22:45 +00:00
/ * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
A JavaScript tokenizer / parser / beautifier / compressor .
https : //github.com/mishoo/UglifyJS2
-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- ( C ) -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -
Author : Mihai Bazon
< mihai . bazon @ gmail . com >
http : //mihai.bazon.net/blog
Distributed under the BSD license :
Copyright 2012 ( c ) Mihai Bazon < mihai . bazon @ gmail . com >
Parser based on parse - js ( http : //marijn.haverbeke.nl/parse-js/).
Redistribution and use in source and binary forms , with or without
modification , are permitted provided that the following conditions
are met :
* Redistributions of source code must retain the above
copyright notice , this list of conditions and the following
disclaimer .
* Redistributions in binary form must reproduce the above
copyright notice , this list of conditions and the following
disclaimer in the documentation and / or other materials
provided with the distribution .
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER “ AS IS ” AND ANY
EXPRESS OR IMPLIED WARRANTIES , INCLUDING , BUT NOT LIMITED TO , THE
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
PURPOSE ARE DISCLAIMED . IN NO EVENT SHALL THE COPYRIGHT HOLDER BE
LIABLE FOR ANY DIRECT , INDIRECT , INCIDENTAL , SPECIAL , EXEMPLARY ,
OR CONSEQUENTIAL DAMAGES ( INCLUDING , BUT NOT LIMITED TO ,
PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES ; LOSS OF USE , DATA , OR
PROFITS ; OR BUSINESS INTERRUPTION ) HOWEVER CAUSED AND ON ANY
THEORY OF LIABILITY , WHETHER IN CONTRACT , STRICT LIABILITY , OR
TORT ( INCLUDING NEGLIGENCE OR OTHERWISE ) ARISING IN ANY WAY OUT OF
THE USE OF THIS SOFTWARE , EVEN IF ADVISED OF THE POSSIBILITY OF
SUCH DAMAGE .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * /
"use strict" ;
var KEYWORDS = 'break case catch const continue debugger default delete do else finally for function if in instanceof new return switch throw try typeof var void while with' ;
var KEYWORDS _ATOM = 'false null true' ;
var RESERVED _WORDS = 'abstract boolean byte char class double enum export extends final float goto implements import int interface let long native package private protected public short static super synchronized this throws transient volatile yield'
+ " " + KEYWORDS _ATOM + " " + KEYWORDS ;
var KEYWORDS _BEFORE _EXPRESSION = 'return new delete throw else case' ;
KEYWORDS = makePredicate ( KEYWORDS ) ;
RESERVED _WORDS = makePredicate ( RESERVED _WORDS ) ;
KEYWORDS _BEFORE _EXPRESSION = makePredicate ( KEYWORDS _BEFORE _EXPRESSION ) ;
KEYWORDS _ATOM = makePredicate ( KEYWORDS _ATOM ) ;
var OPERATOR _CHARS = makePredicate ( characters ( "+-*&%=<>!?|~^" ) ) ;
var RE _HEX _NUMBER = /^0x[0-9a-f]+$/i ;
var RE _OCT _NUMBER = /^0[0-7]+$/ ;
var OPERATORS = makePredicate ( [
"in" ,
"instanceof" ,
"typeof" ,
"new" ,
"void" ,
"delete" ,
"++" ,
"--" ,
"+" ,
"-" ,
"!" ,
"~" ,
"&" ,
"|" ,
"^" ,
"*" ,
"/" ,
"%" ,
">>" ,
"<<" ,
">>>" ,
"<" ,
">" ,
"<=" ,
">=" ,
"==" ,
"===" ,
"!=" ,
"!==" ,
"?" ,
"=" ,
"+=" ,
"-=" ,
"/=" ,
"*=" ,
"%=" ,
">>=" ,
"<<=" ,
">>>=" ,
"|=" ,
"^=" ,
"&=" ,
"&&" ,
"||"
] ) ;
var WHITESPACE _CHARS = makePredicate ( characters ( " \u00a0\n\r\t\f\u000b\u200b\u2000\u2001\u2002\u2003\u2004\u2005\u2006\u2007\u2008\u2009\u200a\u2028\u2029\u202f\u205f\u3000\uFEFF" ) ) ;
var NEWLINE _CHARS = makePredicate ( characters ( "\n\r\u2028\u2029" ) ) ;
var PUNC _BEFORE _EXPRESSION = makePredicate ( characters ( "[{(,;:" ) ) ;
var PUNC _CHARS = makePredicate ( characters ( "[]{}(),;:" ) ) ;
/* -----[ Tokenizer ]----- */
// regexps adapted from http://xregexp.com/plugins/#unicode
var UNICODE = {
letter : new RegExp ( " [ \ \u0041 - \ \u005A \ \u0061 - \ \u007A \ \u00AA \ \u00B5 \ \u00BA \ \u00C0 - \ \u00D6 \ \u00D8 - \ \u00F6 \ \u00F8 - \ \u02C1 \ \u02C6 - \ \u02D1 \ \u02E0 - \ \u02E4 \ \u02EC \ \u02EE \ \u0370 - \ \u0374 \ \u0376 \ \u0377 \ \u037A - \ \u037D \ \u037F \ \u0386 \ \u0388 - \ \u038A \ \u038C \ \u038E - \ \u03A1 \ \u03A3 - \ \u03F5 \ \u03F7 - \ \u0481 \ \u048A - \ \u052F \ \u0531 - \ \u0556 \ \u0559 \ \u0561 - \ \u0587 \ \u05D0 - \ \u05EA \ \u05F0 - \ \u05F2 \ \u0620 - \ \u064A \ \u066E \ \u066F \ \u0671 - \ \u06D3 \ \u06D5 \ \u06E5 \ \u06E6 \ \u06EE \ \u06EF \ \u06FA - \ \u06FC \ \u06FF \ \u0710 \ \u0712 - \ \u072F \ \u074D - \ \u07A5 \ \u07B1 \ \u07CA - \ \u07EA \ \u07F4 \ \u07F5 \ \u07FA \ \u0800 - \ \u0815 \ \u081A \ \u0824 \ \u0828 \ \u0840 - \ \u0858 \ \u08A0 - \ \u08B2 \ \u0904 - \ \u0939 \ \u093D \ \u0950 \ \u0958 - \ \u0961 \ \u0971 - \ \u0980 \ \u0985 - \ \u098C \ \u098F \ \u0990 \ \u0993 - \ \u09A8 \ \u09AA - \ \u09B0 \ \u09B2 \ \u09B6 - \ \u09B9 \ \u09BD \ \u09CE \ \u09DC \ \u09DD \ \u09DF - \ \u09E1 \ \u09F0 \ \u09F1 \ \u0A05 - \ \u0A0A \ \u0A0F \ \u0A10 \ \u0A13 - \ \u0A28 \ \u0A2A - \ \u0A30 \ \u0A32 \ \u0A33 \ \u0A35 \ \u0A36 \ \u0A38 \ \u0A39 \ \u0A59 - \ \u0A5C \ \u0A5E \ \u0A72 - \ \u0A74 \ \u0A85 - \ \u0A8D \ \u0A8F - \ \u0A91 \ \u0A93 - \ \u0AA8 \ \u0AAA - \ \u0AB0 \ \u0AB2 \ \u0AB3 \ \u0AB5 - \ \u0AB9 \ \u0ABD \ \u0AD0 \ \u0AE0 \ \u0AE1 \ \u0B05 - \ \u0B0C \ \u0B0F \ \u0B10 \ \u0B13 - \ \u0B28 \ \u0B2A - \ \u0B30 \ \u0B32 \ \u0B33 \ \u0B35 - \ \u0B39 \ \u0B3D \ \u0B5C \ \u0B5D \ \u0B5F - \ \u0B61 \ \u0B71 \ \u0B83 \ \u0B85 - \ \u0B8A \ \u0B8E - \ \u0B90 \ \u0B92 - \ \u0B95 \ \u0B99 \ \u0B9A \ \u0B9C \ \u0B9E \ \u0B9F \ \u0BA3 \ \u0BA4 \ \u0BA8 - \ \u0BAA \ \u0BAE - \ \u0BB9 \ \u0BD0 \ \u0C05 - \ \u0C0C \ \u0C0E - \ \u0C10 \ \u0C12 - \ \u0C28 \ \u0C2A - \ \u0C39 \ \u0C3D \ \u0C58 \ \u0C59 \ \u0C60 \ \u0C61 \ \u0C85 - \ \u0C8C \ \u0C8E - \ \u0C90 \ \u0C92 - \ \u0CA8 \ \u0CAA - \ \u0CB3 \ \u0CB5 - \ \u0CB9 \ \u0CBD \ \u0CDE \ \u0CE0 \ \u0CE1 \ \u0CF1 \ \u0CF2 \ \u0D05 - \ \u0D0C \ \u0D0E - \ \u0D10 \ \u0D12 - \ \u0D3A \ \u0D3D \ \u0D4E \ \u0D60 \ \u0D61 \ \u0D7A - \ \u0D7F \ \u0D85 - \ \u0D96 \ \u0D9A - \ \u0DB1 \ \u0DB3 - \ \u0DBB \ \u0DBD \ \u0DC0 - \ \u0DC6 \ \u0E01 - \ \u0E30 \ \u0E32 \ \u0E33 \ \u0E40 - \ \u0E46 \ \u0E81 \ \u0E82 \ \u0E84 \ \u0E87 \ \u0E88 \ \u0E8A \ \u0E8D \ \u0E94 - \ \u0E97 \ \u0E99 - \ \u0E9F \ \u0EA1 - \ \u0EA3 \ \u0EA5 \ \u0EA7 \ \u0EAA \ \u0EAB \ \u0EAD - \ \u0EB0 \ \u0EB2 \ \u0EB3 \ \u0EBD \ \u0EC0 - \ \u0EC4 \ \u0EC6 \ \u0EDC - \ \u0EDF \ \u0F00 \ \u0F40 - \ \u0F47 \ \u0F49 - \ \u0F6C \ \u0F88 - \ \u0F8C \ \u1000 - \ \u102A \ \u103F \ \u1050 - \ \u1055 \ \u105A - \ \u105D \ \u1061 \ \u1065 \ \u1066 \ \u106E - \ \u1070 \ \u1075 - \ \u1081 \ \u108E \ \u10A0 - \ \u10C5 \ \u10C7 \ \u10CD \ \u10D0 - \ \u10FA \ \u10FC - \ \u1248 \ \u124A - \ \u124D \ \u1250 - \ \u1256 \ \u1258 \ \u125A - \ \u125D \ \u1260 - \ \u1288 \ \u128A - \ \u128D \ \u1290 - \ \u12B0 \ \u12B2 - \ \u12B5 \ \u12B8 - \ \u12BE \ \u12C0 \ \u12C2 - \ \u12C5 \ \u12C8 - \ \u12D6 \ \u12D8 - \ \u1310 \ \u1312 - \ \u1315 \ \u1318 - \ \u135A \ \u1380 - \ \u138F \ \u13A0 - \ \u13F4 \ \u1401 - \ \u166C \ \u166F - \ \u167F \ \u1681 - \ \u169A \ \u16A0 - \ \u16EA \ \u16EE - \ \u16F8 \ \u1700 - \ \u170C \ \u170E - \ \u1711 \ \u1720 - \ \u1731 \ \u1740 - \ \u1751 \ \u1760 - \ \u176C \ \u176E - \ \u1770 \ \u1780 - \ \u17B3 \ \u17D7 \ \u17DC \ \u1820 - \ \u1877 \ \u1880 - \ \u18A8 \ \u18AA \ \u18B0 - \ \u18F5 \ \u1900 - \ \u191E \ \u1950 - \ \u196D \ \u1970 - \ \u1974 \ \u1980 - \ \u19AB \ \u19C1 - \ \u19C7 \ \u1A00 - \ \u1A16 \ \u1A20 - \ \u1A54 \ \u1AA7 \ \u1B05 - \ \u1B33 \ \u1B45 - \ \u1B4B \ \u1B83 - \ \u1BA0 \ \u1BAE \ \u1BAF \ \u1BBA - \ \u1BE5 \ \u1C00 - \ \u1C23 \ \u1C4D - \ \u1C4F \ \u1C5A - \ \u1C7D \ \u1CE9 - \ \u1CEC \ \u1CEE - \ \u1CF1 \ \u1CF5 \ \u1CF6 \ \u1D00 - \ \u1DBF \ \u1E00 - \ \u1F15 \ \u1F18 - \ \u1F1D \ \u1F20 - \ \u1F45 \ \u1F48 - \ \u1F4D \ \u1F50 - \ \u1F57 \ \u1F59 \ \u1F5B \ \u1F5D \ \u1F5F - \ \u1F7D \ \u1F80 - \ \u1FB4 \ \u1FB6 - \ \u1FBC \ \u1FBE \ \u1FC2 - \ \u1FC4 \ \u1FC6 - \ \u1FCC \ \u1FD0 - \ \u1FD3 \ \u1FD6 - \ \u1FDB \ \u1FE0 - \ \u1FEC \ \u1FF2 - \ \u1FF4 \ \u1FF6 - \ \u1FFC \ \u2071 \ \u207F \ \u2090 - \ \u209C \ \u2102 \ \u2107 \ \u210A - \ \u2113 \ \u2115 \ \u2119 - \ \u211D \ \u2124 \ \u2126 \ \u2128 \ \u212A - \ \u212D \ \u212F - \ \u2139 \ \u213C - \ \u213F \ \u2145 - \ \u2149 \ \u214E \ \u2160 - \ \u2188 \ \u2C00 - \ \u2C2E \ \u2C30 - \ \u2C5E \ \u2C60 - \ \u2CE4 \ \u2CEB - \ \u2CEE \ \u2CF2 \ \u2CF3 \ \u2D00 - \ \u2D25 \ \u2D27 \ \u2D2D \ \u2D30 - \ \u2D67 \ \u2D6F \ \u2D80 - \ \u2D96 \ \u2DA0 - \ \u2DA6 \ \u2DA8 - \ \u2DAE \ \u2DB0 - \ \u2DB6 \ \u2DB8 - \ \u2DBE \ \u2DC0 - \ \u2DC6 \ \u2DC8 - \ \u2DCE \ \u2DD0 - \ \u2DD6 \ \u2DD8 - \ \u2DDE \ \u2E2F \ \u3005 - \ \u3007 \ \u3021 - \ \u3029 \ \u3031 - \ \u3035 \ \u3038 - \ \u303C \ \u3041 - \ \u3096 \ \u309D - \ \u309F \ \u30A1 - \ \u30FA \ \u30FC - \ \u30FF \ \u3105 - \ \u312D \ \u3131 - \ \u318E \ \u31A0 - \ \u31BA \ \u31F0 - \ \u31FF \ \u3400 - \ \u4DB5 \ \u4E00 - \ \u9FCC \ \uA000 - \ \uA48C \ \uA4D0 - \ \uA4FD \ \uA500 - \ \uA60C \ \uA610 - \ \uA61F \ \uA62A \ \uA62B \ \uA640 - \ \uA66E \ \uA67F - \ \uA69D \ \uA6A0 - \ \uA6EF \ \uA717 - \ \uA71F \ \uA722 - \ \uA788 \ \uA78B - \ \uA78E \ \uA790 - \ \uA7AD \ \uA7B0 \ \uA7B1 \ \uA7F7 - \ \uA801 \ \uA803 - \ \uA805 \ \uA807 - \ \uA80A \ \
digit : new RegExp ( "[\\u0030-\\u0039\\u0660-\\u0669\\u06F0-\\u06F9\\u07C0-\\u07C9\\u0966-\\u096F\\u09E6-\\u09EF\\u0A66-\\u0A6F\\u0AE6-\\u0AEF\\u0B66-\\u0B6F\\u0BE6-\\u0BEF\\u0C66-\\u0C6F\\u0CE6-\\u0CEF\\u0D66-\\u0D6F\\u0DE6-\\u0DEF\\u0E50-\\u0E59\\u0ED0-\\u0ED9\\u0F20-\\u0F29\\u1040-\\u1049\\u1090-\\u1099\\u17E0-\\u17E9\\u1810-\\u1819\\u1946-\\u194F\\u19D0-\\u19D9\\u1A80-\\u1A89\\u1A90-\\u1A99\\u1B50-\\u1B59\\u1BB0-\\u1BB9\\u1C40-\\u1C49\\u1C50-\\u1C59\\uA620-\\uA629\\uA8D0-\\uA8D9\\uA900-\\uA909\\uA9D0-\\uA9D9\\uA9F0-\\uA9F9\\uAA50-\\uAA59\\uABF0-\\uABF9\\uFF10-\\uFF19]" ) ,
non _spacing _mark : new RegExp ( "[\\u0300-\\u036F\\u0483-\\u0487\\u0591-\\u05BD\\u05BF\\u05C1\\u05C2\\u05C4\\u05C5\\u05C7\\u0610-\\u061A\\u064B-\\u065E\\u0670\\u06D6-\\u06DC\\u06DF-\\u06E4\\u06E7\\u06E8\\u06EA-\\u06ED\\u0711\\u0730-\\u074A\\u07A6-\\u07B0\\u07EB-\\u07F3\\u0816-\\u0819\\u081B-\\u0823\\u0825-\\u0827\\u0829-\\u082D\\u0900-\\u0902\\u093C\\u0941-\\u0948\\u094D\\u0951-\\u0955\\u0962\\u0963\\u0981\\u09BC\\u09C1-\\u09C4\\u09CD\\u09E2\\u09E3\\u0A01\\u0A02\\u0A3C\\u0A41\\u0A42\\u0A47\\u0A48\\u0A4B-\\u0A4D\\u0A51\\u0A70\\u0A71\\u0A75\\u0A81\\u0A82\\u0ABC\\u0AC1-\\u0AC5\\u0AC7\\u0AC8\\u0ACD\\u0AE2\\u0AE3\\u0B01\\u0B3C\\u0B3F\\u0B41-\\u0B44\\u0B4D\\u0B56\\u0B62\\u0B63\\u0B82\\u0BC0\\u0BCD\\u0C3E-\\u0C40\\u0C46-\\u0C48\\u0C4A-\\u0C4D\\u0C55\\u0C56\\u0C62\\u0C63\\u0CBC\\u0CBF\\u0CC6\\u0CCC\\u0CCD\\u0CE2\\u0CE3\\u0D41-\\u0D44\\u0D4D\\u0D62\\u0D63\\u0DCA\\u0DD2-\\u0DD4\\u0DD6\\u0E31\\u0E34-\\u0E3A\\u0E47-\\u0E4E\\u0EB1\\u0EB4-\\u0EB9\\u0EBB\\u0EBC\\u0EC8-\\u0ECD\\u0F18\\u0F19\\u0F35\\u0F37\\u0F39\\u0F71-\\u0F7E\\u0F80-\\u0F84\\u0F86\\u0F87\\u0F90-\\u0F97\\u0F99-\\u0FBC\\u0FC6\\u102D-\\u1030\\u1032-\\u1037\\u1039\\u103A\\u103D\\u103E\\u1058\\u1059\\u105E-\\u1060\\u1071-\\u1074\\u1082\\u1085\\u1086\\u108D\\u109D\\u135F\\u1712-\\u1714\\u1732-\\u1734\\u1752\\u1753\\u1772\\u1773\\u17B7-\\u17BD\\u17C6\\u17C9-\\u17D3\\u17DD\\u180B-\\u180D\\u18A9\\u1920-\\u1922\\u1927\\u1928\\u1932\\u1939-\\u193B\\u1A17\\u1A18\\u1A56\\u1A58-\\u1A5E\\u1A60\\u1A62\\u1A65-\\u1A6C\\u1A73-\\u1A7C\\u1A7F\\u1B00-\\u1B03\\u1B34\\u1B36-\\u1B3A\\u1B3C\\u1B42\\u1B6B-\\u1B73\\u1B80\\u1B81\\u1BA2-\\u1BA5\\u1BA8\\u1BA9\\u1C2C-\\u1C33\\u1C36\\u1C37\\u1CD0-\\u1CD2\\u1CD4-\\u1CE0\\u1CE2-\\u1CE8\\u1CED\\u1DC0-\\u1DE6\\u1DFD-\\u1DFF\\u20D0-\\u20DC\\u20E1\\u20E5-\\u20F0\\u2CEF-\\u2CF1\\u2DE0-\\u2DFF\\u302A-\\u302F\\u3099\\u309A\\uA66F\\uA67C\\uA67D\\uA6F0\\uA6F1\\uA802\\uA806\\uA80B\\uA825\\uA826\\uA8C4\\uA8E0-\\uA8F1\\uA926-\\uA92D\\uA947-\\uA951\\uA980-\\uA982\\uA9B3\\uA9B6-\\uA9B9\\uA9BC\\uAA29-\\uAA2E\\uAA31\\uAA32\\uAA35\\uAA36\\uAA43\\uAA4C\\uAAB0\\uAAB2-\\uAAB4\\uAAB7\\uAAB8\\uAABE\\uAABF\\uAAC1\\uABE5\\uABE8\\uABED\\uFB1E\\uFE00-\\uFE0F\\uFE20-\\uFE26]" ) ,
space _combining _mark : new RegExp ( "[\\u0903\\u093E-\\u0940\\u0949-\\u094C\\u094E\\u0982\\u0983\\u09BE-\\u09C0\\u09C7\\u09C8\\u09CB\\u09CC\\u09D7\\u0A03\\u0A3E-\\u0A40\\u0A83\\u0ABE-\\u0AC0\\u0AC9\\u0ACB\\u0ACC\\u0B02\\u0B03\\u0B3E\\u0B40\\u0B47\\u0B48\\u0B4B\\u0B4C\\u0B57\\u0BBE\\u0BBF\\u0BC1\\u0BC2\\u0BC6-\\u0BC8\\u0BCA-\\u0BCC\\u0BD7\\u0C01-\\u0C03\\u0C41-\\u0C44\\u0C82\\u0C83\\u0CBE\\u0CC0-\\u0CC4\\u0CC7\\u0CC8\\u0CCA\\u0CCB\\u0CD5\\u0CD6\\u0D02\\u0D03\\u0D3E-\\u0D40\\u0D46-\\u0D48\\u0D4A-\\u0D4C\\u0D57\\u0D82\\u0D83\\u0DCF-\\u0DD1\\u0DD8-\\u0DDF\\u0DF2\\u0DF3\\u0F3E\\u0F3F\\u0F7F\\u102B\\u102C\\u1031\\u1038\\u103B\\u103C\\u1056\\u1057\\u1062-\\u1064\\u1067-\\u106D\\u1083\\u1084\\u1087-\\u108C\\u108F\\u109A-\\u109C\\u17B6\\u17BE-\\u17C5\\u17C7\\u17C8\\u1923-\\u1926\\u1929-\\u192B\\u1930\\u1931\\u1933-\\u1938\\u19B0-\\u19C0\\u19C8\\u19C9\\u1A19-\\u1A1B\\u1A55\\u1A57\\u1A61\\u1A63\\u1A64\\u1A6D-\\u1A72\\u1B04\\u1B35\\u1B3B\\u1B3D-\\u1B41\\u1B43\\u1B44\\u1B82\\u1BA1\\u1BA6\\u1BA7\\u1BAA\\u1C24-\\u1C2B\\u1C34\\u1C35\\u1CE1\\u1CF2\\uA823\\uA824\\uA827\\uA880\\uA881\\uA8B4-\\uA8C3\\uA952\\uA953\\uA983\\uA9B4\\uA9B5\\uA9BA\\uA9BB\\uA9BD-\\uA9C0\\uAA2F\\uAA30\\uAA33\\uAA34\\uAA4D\\uAA7B\\uABE3\\uABE4\\uABE6\\uABE7\\uABE9\\uABEA\\uABEC]" ) ,
connector _punctuation : new RegExp ( "[\\u005F\\u203F\\u2040\\u2054\\uFE33\\uFE34\\uFE4D-\\uFE4F\\uFF3F]" )
} ;
function is _letter ( code ) {
return ( code >= 97 && code <= 122 )
|| ( code >= 65 && code <= 90 )
|| ( code >= 0xaa && UNICODE . letter . test ( String . fromCharCode ( code ) ) ) ;
}
function is _surrogate _pair _head ( code ) {
if ( typeof code == "string" )
code = code . charCodeAt ( 0 ) ;
return code >= 0xd800 && code <= 0xdbff ;
}
function is _surrogate _pair _tail ( code ) {
if ( typeof code == "string" )
code = code . charCodeAt ( 0 ) ;
return code >= 0xdc00 && code <= 0xdfff ;
}
function is _digit ( code ) {
return code >= 48 && code <= 57 ;
}
function is _alphanumeric _char ( code ) {
return is _digit ( code ) || is _letter ( code ) ;
}
function is _unicode _digit ( code ) {
return UNICODE . digit . test ( String . fromCharCode ( code ) ) ;
}
function is _unicode _combining _mark ( ch ) {
return UNICODE . non _spacing _mark . test ( ch ) || UNICODE . space _combining _mark . test ( ch ) ;
}
function is _unicode _connector _punctuation ( ch ) {
return UNICODE . connector _punctuation . test ( ch ) ;
}
function is _identifier _start ( code ) {
return code == 36 || code == 95 || is _letter ( code ) ;
}
function is _identifier _char ( ch ) {
var code = ch . charCodeAt ( 0 ) ;
return is _identifier _start ( code )
|| is _digit ( code )
|| code == 8204 // \u200c: zero-width non-joiner <ZWNJ>
|| code == 8205 // \u200d: zero-width joiner <ZWJ> (in my ECMA-262 PDF, this is also 200c)
|| is _unicode _combining _mark ( ch )
|| is _unicode _connector _punctuation ( ch )
|| is _unicode _digit ( code )
;
}
function is _identifier _string ( str ) {
return /^[a-z_$][a-z0-9_$]*$/i . test ( str ) ;
}
function parse _js _number ( num ) {
if ( RE _HEX _NUMBER . test ( num ) ) {
return parseInt ( num . substr ( 2 ) , 16 ) ;
} else if ( RE _OCT _NUMBER . test ( num ) ) {
return parseInt ( num . substr ( 1 ) , 8 ) ;
} else {
var val = parseFloat ( num ) ;
if ( val == num ) return val ;
}
}
function JS _Parse _Error ( message , filename , line , col , pos ) {
this . message = message ;
this . filename = filename ;
this . line = line ;
this . col = col ;
this . pos = pos ;
}
JS _Parse _Error . prototype = Object . create ( Error . prototype ) ;
JS _Parse _Error . prototype . constructor = JS _Parse _Error ;
JS _Parse _Error . prototype . name = "SyntaxError" ;
configure _error _stack ( JS _Parse _Error ) ;
function js _error ( message , filename , line , col , pos ) {
throw new JS _Parse _Error ( message , filename , line , col , pos ) ;
}
function is _token ( token , type , val ) {
return token . type == type && ( val == null || token . value == val ) ;
}
var EX _EOF = { } ;
function tokenizer ( $TEXT , filename , html5 _comments , shebang ) {
var S = {
text : $TEXT ,
filename : filename ,
pos : 0 ,
tokpos : 0 ,
line : 1 ,
tokline : 0 ,
col : 0 ,
tokcol : 0 ,
newline _before : false ,
regex _allowed : false ,
comments _before : [ ] ,
directives : { } ,
directive _stack : [ ]
} ;
var prev _was _dot = false ;
function peek ( ) {
return S . text . charAt ( S . pos ) ;
}
function next ( signal _eof , in _string ) {
var ch = S . text . charAt ( S . pos ++ ) ;
if ( signal _eof && ! ch )
throw EX _EOF ;
if ( NEWLINE _CHARS [ ch ] ) {
S . newline _before = S . newline _before || ! in _string ;
++ S . line ;
S . col = 0 ;
if ( ! in _string && ch == "\r" && peek ( ) == "\n" ) {
// treat a \r\n sequence as a single \n
++ S . pos ;
ch = "\n" ;
}
} else {
++ S . col ;
}
return ch ;
}
function forward ( i ) {
while ( i -- > 0 ) next ( ) ;
}
function looking _at ( str ) {
return S . text . substr ( S . pos , str . length ) == str ;
}
function find _eol ( ) {
var text = S . text ;
for ( var i = S . pos ; i < S . text . length ; ++ i ) {
if ( NEWLINE _CHARS [ text [ i ] ] ) return i ;
}
return - 1 ;
}
function find ( what , signal _eof ) {
var pos = S . text . indexOf ( what , S . pos ) ;
if ( signal _eof && pos == - 1 ) throw EX _EOF ;
return pos ;
}
function start _token ( ) {
S . tokline = S . line ;
S . tokcol = S . col ;
S . tokpos = S . pos ;
}
function token ( type , value , is _comment ) {
S . regex _allowed = type == "operator" && ! UNARY _POSTFIX [ value ]
|| type == "keyword" && KEYWORDS _BEFORE _EXPRESSION [ value ]
|| type == "punc" && PUNC _BEFORE _EXPRESSION [ value ] ;
if ( type == "punc" && value == "." ) prev _was _dot = true ;
else if ( ! is _comment ) prev _was _dot = false ;
var ret = {
type : type ,
value : value ,
line : S . tokline ,
col : S . tokcol ,
pos : S . tokpos ,
endline : S . line ,
endcol : S . col ,
endpos : S . pos ,
nlb : S . newline _before ,
file : filename
} ;
if ( /^(?:num|string|regexp)$/i . test ( type ) ) {
ret . raw = $TEXT . substring ( ret . pos , ret . endpos ) ;
}
if ( ! is _comment ) {
ret . comments _before = S . comments _before ;
ret . comments _after = S . comments _before = [ ] ;
}
S . newline _before = false ;
return new AST _Token ( ret ) ;
}
function skip _whitespace ( ) {
while ( WHITESPACE _CHARS [ peek ( ) ] )
next ( ) ;
}
function read _while ( pred ) {
var ret = "" , ch , i = 0 ;
while ( ( ch = peek ( ) ) && pred ( ch , i ++ ) )
ret += next ( ) ;
return ret ;
}
function parse _error ( err ) {
js _error ( err , filename , S . tokline , S . tokcol , S . tokpos ) ;
}
function read _num ( prefix ) {
var has _e = false , after _e = false , has _x = false , has _dot = prefix == "." ;
var num = read _while ( function ( ch , i ) {
var code = ch . charCodeAt ( 0 ) ;
switch ( code ) {
case 120 : case 88 : // xX
return has _x ? false : ( has _x = true ) ;
case 101 : case 69 : // eE
return has _x ? true : has _e ? false : ( has _e = after _e = true ) ;
case 45 : // -
return after _e || ( i == 0 && ! prefix ) ;
case 43 : // +
return after _e ;
case ( after _e = false , 46 ) : // .
return ( ! has _dot && ! has _x && ! has _e ) ? ( has _dot = true ) : false ;
}
return is _alphanumeric _char ( code ) ;
} ) ;
if ( prefix ) num = prefix + num ;
if ( RE _OCT _NUMBER . test ( num ) && next _token . has _directive ( "use strict" ) ) {
parse _error ( "Legacy octal literals are not allowed in strict mode" ) ;
}
var valid = parse _js _number ( num ) ;
if ( ! isNaN ( valid ) ) return token ( "num" , valid ) ;
parse _error ( "Invalid syntax: " + num ) ;
}
function read _escaped _char ( in _string ) {
var ch = next ( true , in _string ) ;
switch ( ch . charCodeAt ( 0 ) ) {
case 110 : return "\n" ;
case 114 : return "\r" ;
case 116 : return "\t" ;
case 98 : return "\b" ;
case 118 : return "\u000b" ; // \v
case 102 : return "\f" ;
case 120 : return String . fromCharCode ( hex _bytes ( 2 ) ) ; // \x
case 117 : return String . fromCharCode ( hex _bytes ( 4 ) ) ; // \u
case 10 : return "" ; // newline
case 13 : // \r
if ( peek ( ) == "\n" ) { // DOS newline
next ( true , in _string ) ;
return "" ;
}
}
if ( ch >= "0" && ch <= "7" )
return read _octal _escape _sequence ( ch ) ;
return ch ;
}
function read _octal _escape _sequence ( ch ) {
// Read
var p = peek ( ) ;
if ( p >= "0" && p <= "7" ) {
ch += next ( true ) ;
if ( ch [ 0 ] <= "3" && ( p = peek ( ) ) >= "0" && p <= "7" )
ch += next ( true ) ;
}
// Parse
if ( ch === "0" ) return "\0" ;
if ( ch . length > 0 && next _token . has _directive ( "use strict" ) )
parse _error ( "Legacy octal escape sequences are not allowed in strict mode" ) ;
return String . fromCharCode ( parseInt ( ch , 8 ) ) ;
}
function hex _bytes ( n ) {
var num = 0 ;
for ( ; n > 0 ; -- n ) {
var digit = parseInt ( next ( true ) , 16 ) ;
if ( isNaN ( digit ) )
parse _error ( "Invalid hex-character pattern in string" ) ;
num = ( num << 4 ) | digit ;
}
return num ;
}
var read _string = with _eof _error ( "Unterminated string constant" , function ( quote _char ) {
var quote = next ( ) , ret = "" ;
for ( ; ; ) {
var ch = next ( true , true ) ;
if ( ch == "\\" ) ch = read _escaped _char ( true ) ;
else if ( NEWLINE _CHARS [ ch ] ) parse _error ( "Unterminated string constant" ) ;
else if ( ch == quote ) break ;
ret += ch ;
}
var tok = token ( "string" , ret ) ;
tok . quote = quote _char ;
return tok ;
} ) ;
function skip _line _comment ( type ) {
var regex _allowed = S . regex _allowed ;
var i = find _eol ( ) , ret ;
if ( i == - 1 ) {
ret = S . text . substr ( S . pos ) ;
S . pos = S . text . length ;
} else {
ret = S . text . substring ( S . pos , i ) ;
S . pos = i ;
}
S . col = S . tokcol + ( S . pos - S . tokpos ) ;
S . comments _before . push ( token ( type , ret , true ) ) ;
S . regex _allowed = regex _allowed ;
return next _token ;
}
var skip _multiline _comment = with _eof _error ( "Unterminated multiline comment" , function ( ) {
var regex _allowed = S . regex _allowed ;
var i = find ( "*/" , true ) ;
var text = S . text . substring ( S . pos , i ) . replace ( /\r\n|\r|\u2028|\u2029/g , '\n' ) ;
// update stream position
forward ( text . length /* doesn't count \r\n as 2 char while S.pos - i does */ + 2 ) ;
S . comments _before . push ( token ( "comment2" , text , true ) ) ;
S . regex _allowed = regex _allowed ;
return next _token ;
} ) ;
function read _name ( ) {
var backslash = false , name = "" , ch , escaped = false , hex ;
while ( ( ch = peek ( ) ) != null ) {
if ( ! backslash ) {
if ( ch == "\\" ) escaped = backslash = true , next ( ) ;
else if ( is _identifier _char ( ch ) ) name += next ( ) ;
else break ;
} else {
if ( ch != "u" ) parse _error ( "Expecting UnicodeEscapeSequence -- uXXXX" ) ;
ch = read _escaped _char ( ) ;
if ( ! is _identifier _char ( ch ) ) parse _error ( "Unicode char: " + ch . charCodeAt ( 0 ) + " is not valid in identifier" ) ;
name += ch ;
backslash = false ;
}
}
if ( KEYWORDS [ name ] && escaped ) {
hex = name . charCodeAt ( 0 ) . toString ( 16 ) . toUpperCase ( ) ;
name = "\\u" + "0000" . substr ( hex . length ) + hex + name . slice ( 1 ) ;
}
return name ;
}
var read _regexp = with _eof _error ( "Unterminated regular expression" , function ( source ) {
var prev _backslash = false , ch , in _class = false ;
while ( ( ch = next ( true ) ) ) if ( NEWLINE _CHARS [ ch ] ) {
parse _error ( "Unexpected line terminator" ) ;
} else if ( prev _backslash ) {
source += "\\" + ch ;
prev _backslash = false ;
} else if ( ch == "[" ) {
in _class = true ;
source += ch ;
} else if ( ch == "]" && in _class ) {
in _class = false ;
source += ch ;
} else if ( ch == "/" && ! in _class ) {
break ;
} else if ( ch == "\\" ) {
prev _backslash = true ;
} else {
source += ch ;
}
var mods = read _name ( ) ;
try {
var regexp = new RegExp ( source , mods ) ;
regexp . raw _source = source ;
return token ( "regexp" , regexp ) ;
} catch ( e ) {
parse _error ( e . message ) ;
}
} ) ;
function read _operator ( prefix ) {
function grow ( op ) {
if ( ! peek ( ) ) return op ;
var bigger = op + peek ( ) ;
if ( OPERATORS [ bigger ] ) {
next ( ) ;
return grow ( bigger ) ;
} else {
return op ;
}
}
return token ( "operator" , grow ( prefix || next ( ) ) ) ;
}
function handle _slash ( ) {
next ( ) ;
switch ( peek ( ) ) {
case "/" :
next ( ) ;
return skip _line _comment ( "comment1" ) ;
case "*" :
next ( ) ;
return skip _multiline _comment ( ) ;
}
return S . regex _allowed ? read _regexp ( "" ) : read _operator ( "/" ) ;
}
function handle _dot ( ) {
next ( ) ;
return is _digit ( peek ( ) . charCodeAt ( 0 ) ) ? read _num ( "." ) : token ( "punc" , "." ) ;
}
function read _word ( ) {
var word = read _name ( ) ;
if ( prev _was _dot ) return token ( "name" , word ) ;
return KEYWORDS _ATOM [ word ] ? token ( "atom" , word )
: ! KEYWORDS [ word ] ? token ( "name" , word )
: OPERATORS [ word ] ? token ( "operator" , word )
: token ( "keyword" , word ) ;
}
function with _eof _error ( eof _error , cont ) {
return function ( x ) {
try {
return cont ( x ) ;
} catch ( ex ) {
if ( ex === EX _EOF ) parse _error ( eof _error ) ;
else throw ex ;
}
} ;
}
function next _token ( force _regexp ) {
if ( force _regexp != null )
return read _regexp ( force _regexp ) ;
if ( shebang && S . pos == 0 && looking _at ( "#!" ) ) {
start _token ( ) ;
forward ( 2 ) ;
skip _line _comment ( "comment5" ) ;
}
for ( ; ; ) {
skip _whitespace ( ) ;
start _token ( ) ;
if ( html5 _comments ) {
if ( looking _at ( "<!--" ) ) {
forward ( 4 ) ;
skip _line _comment ( "comment3" ) ;
continue ;
}
if ( looking _at ( "-->" ) && S . newline _before ) {
forward ( 3 ) ;
skip _line _comment ( "comment4" ) ;
continue ;
}
}
var ch = peek ( ) ;
if ( ! ch ) return token ( "eof" ) ;
var code = ch . charCodeAt ( 0 ) ;
switch ( code ) {
case 34 : case 39 : return read _string ( ch ) ;
case 46 : return handle _dot ( ) ;
case 47 :
var tok = handle _slash ( ) ;
if ( tok === next _token ) continue ;
return tok ;
}
if ( is _digit ( code ) ) return read _num ( ) ;
if ( PUNC _CHARS [ ch ] ) return token ( "punc" , next ( ) ) ;
if ( OPERATOR _CHARS [ ch ] ) return read _operator ( ) ;
if ( code == 92 || is _identifier _start ( code ) ) return read _word ( ) ;
break ;
}
parse _error ( "Unexpected character '" + ch + "'" ) ;
}
next _token . context = function ( nc ) {
if ( nc ) S = nc ;
return S ;
} ;
next _token . add _directive = function ( directive ) {
S . directive _stack [ S . directive _stack . length - 1 ] . push ( directive ) ;
if ( S . directives [ directive ] ) S . directives [ directive ] ++ ;
else S . directives [ directive ] = 1 ;
}
next _token . push _directives _stack = function ( ) {
S . directive _stack . push ( [ ] ) ;
}
next _token . pop _directives _stack = function ( ) {
var directives = S . directive _stack . pop ( ) ;
for ( var i = directives . length ; -- i >= 0 ; ) {
S . directives [ directives [ i ] ] -- ;
}
}
next _token . has _directive = function ( directive ) {
return S . directives [ directive ] > 0 ;
}
return next _token ;
}
/* -----[ Parser (constants) ]----- */
var UNARY _PREFIX = makePredicate ( "typeof void delete -- ++ ! ~ - +" ) ;
var UNARY _POSTFIX = makePredicate ( "-- ++" ) ;
var ASSIGNMENT = makePredicate ( "= += -= /= *= %= >>= <<= >>>= |= ^= &=" ) ;
var PRECEDENCE = function ( a , ret ) {
for ( var i = 0 ; i < a . length ; ) {
var b = a [ i ++ ] ;
for ( var j = 0 ; j < b . length ; j ++ ) {
ret [ b [ j ] ] = i ;
}
}
return ret ;
} ( [
[ "||" ] ,
[ "&&" ] ,
[ "|" ] ,
[ "^" ] ,
[ "&" ] ,
[ "==" , "===" , "!=" , "!==" ] ,
[ "<" , ">" , "<=" , ">=" , "in" , "instanceof" ] ,
[ ">>" , "<<" , ">>>" ] ,
[ "+" , "-" ] ,
[ "*" , "/" , "%" ]
] , { } ) ;
var ATOMIC _START _TOKEN = makePredicate ( "atom num string regexp name" ) ;
/* -----[ Parser ]----- */
function parse ( $TEXT , options ) {
options = defaults ( options , {
bare _returns : false ,
expression : false ,
filename : null ,
html5 _comments : true ,
shebang : true ,
strict : false ,
toplevel : null ,
} , true ) ;
var S = {
input : typeof $TEXT == "string"
? tokenizer ( $TEXT , options . filename , options . html5 _comments , options . shebang )
: $TEXT ,
token : null ,
prev : null ,
peeked : null ,
in _function : 0 ,
in _directives : true ,
in _loop : 0 ,
labels : [ ]
} ;
S . token = next ( ) ;
function is ( type , value ) {
return is _token ( S . token , type , value ) ;
}
function peek ( ) {
return S . peeked || ( S . peeked = S . input ( ) ) ;
}
function next ( ) {
S . prev = S . token ;
if ( S . peeked ) {
S . token = S . peeked ;
S . peeked = null ;
} else {
S . token = S . input ( ) ;
}
S . in _directives = S . in _directives && (
S . token . type == "string" || is ( "punc" , ";" )
) ;
return S . token ;
}
function prev ( ) {
return S . prev ;
}
function croak ( msg , line , col , pos ) {
var ctx = S . input . context ( ) ;
js _error ( msg ,
ctx . filename ,
line != null ? line : ctx . tokline ,
col != null ? col : ctx . tokcol ,
pos != null ? pos : ctx . tokpos ) ;
}
function token _error ( token , msg ) {
croak ( msg , token . line , token . col ) ;
}
function token _to _string ( type , value ) {
return type + ( value === undefined ? "" : " «" + value + "»" ) ;
}
function unexpected ( token ) {
if ( token == null ) token = S . token ;
token _error ( token , "Unexpected token: " + token _to _string ( token . type , token . value ) ) ;
}
function expect _token ( type , val ) {
if ( is ( type , val ) ) return next ( ) ;
token _error ( S . token , "Unexpected token: " + token _to _string ( S . token . type , S . token . value ) + ", expected: " + token _to _string ( type , val ) ) ;
}
function expect ( punc ) {
return expect _token ( "punc" , punc ) ;
}
function has _newline _before ( token ) {
return token . nlb || ! all ( token . comments _before , function ( comment ) {
return ! comment . nlb ;
} ) ;
}
function can _insert _semicolon ( ) {
return ! options . strict
&& ( is ( "eof" ) || is ( "punc" , "}" ) || has _newline _before ( S . token ) ) ;
}
function semicolon ( optional ) {
if ( is ( "punc" , ";" ) ) next ( ) ;
else if ( ! optional && ! can _insert _semicolon ( ) ) expect _token ( "punc" , ";" ) ;
}
function parenthesised ( ) {
expect ( "(" ) ;
var exp = expression ( true ) ;
expect ( ")" ) ;
return exp ;
}
function embed _tokens ( parser ) {
return function ( ) {
var start = S . token ;
var expr = parser . apply ( null , arguments ) ;
var end = prev ( ) ;
expr . start = start ;
expr . end = end ;
return expr ;
} ;
}
function handle _regexp ( ) {
if ( is ( "operator" , "/" ) || is ( "operator" , "/=" ) ) {
S . peeked = null ;
S . token = S . input ( S . token . value . substr ( 1 ) ) ; // force regexp
}
}
var statement = embed _tokens ( function ( strict _defun ) {
handle _regexp ( ) ;
switch ( S . token . type ) {
case "string" :
2019-12-02 15:42:11 +00:00
var dir = S . in _directives ;
var body = expression ( true ) ;
if ( dir ) {
var token = body . start ;
if ( body instanceof AST _String && token . raw . indexOf ( "\\" ) == - 1 ) {
S . input . add _directive ( token . value ) ;
2019-12-02 12:22:45 +00:00
} else {
2019-12-02 15:42:11 +00:00
S . in _directives = dir = false ;
2019-12-02 12:22:45 +00:00
}
}
2019-12-02 15:42:11 +00:00
semicolon ( ) ;
return dir ? new AST _Directive ( body ) : new AST _SimpleStatement ( { body : body } ) ;
2019-12-02 12:22:45 +00:00
case "num" :
case "regexp" :
case "operator" :
case "atom" :
return simple _statement ( ) ;
case "name" :
return is _token ( peek ( ) , "punc" , ":" )
? labeled _statement ( )
: simple _statement ( ) ;
case "punc" :
switch ( S . token . value ) {
case "{" :
return new AST _BlockStatement ( {
start : S . token ,
body : block _ ( ) ,
end : prev ( )
} ) ;
case "[" :
case "(" :
return simple _statement ( ) ;
case ";" :
S . in _directives = false ;
next ( ) ;
return new AST _EmptyStatement ( ) ;
default :
unexpected ( ) ;
}
case "keyword" :
switch ( S . token . value ) {
case "break" :
next ( ) ;
return break _cont ( AST _Break ) ;
case "continue" :
next ( ) ;
return break _cont ( AST _Continue ) ;
case "debugger" :
next ( ) ;
semicolon ( ) ;
return new AST _Debugger ( ) ;
case "do" :
next ( ) ;
var body = in _loop ( statement ) ;
expect _token ( "keyword" , "while" ) ;
var condition = parenthesised ( ) ;
semicolon ( true ) ;
return new AST _Do ( {
body : body ,
condition : condition
} ) ;
case "while" :
next ( ) ;
return new AST _While ( {
condition : parenthesised ( ) ,
body : in _loop ( statement )
} ) ;
case "for" :
next ( ) ;
return for _ ( ) ;
case "function" :
if ( ! strict _defun && S . input . has _directive ( "use strict" ) ) {
croak ( "In strict mode code, functions can only be declared at top level or immediately within another function." ) ;
}
next ( ) ;
return function _ ( AST _Defun ) ;
case "if" :
next ( ) ;
return if _ ( ) ;
case "return" :
if ( S . in _function == 0 && ! options . bare _returns )
croak ( "'return' outside of function" ) ;
next ( ) ;
var value = null ;
if ( is ( "punc" , ";" ) ) {
next ( ) ;
} else if ( ! can _insert _semicolon ( ) ) {
value = expression ( true ) ;
semicolon ( ) ;
}
return new AST _Return ( {
value : value
} ) ;
case "switch" :
next ( ) ;
return new AST _Switch ( {
expression : parenthesised ( ) ,
body : in _loop ( switch _body _ )
} ) ;
case "throw" :
next ( ) ;
if ( has _newline _before ( S . token ) )
croak ( "Illegal newline after 'throw'" ) ;
var value = expression ( true ) ;
semicolon ( ) ;
return new AST _Throw ( {
value : value
} ) ;
case "try" :
next ( ) ;
return try _ ( ) ;
case "var" :
next ( ) ;
var node = var _ ( ) ;
semicolon ( ) ;
return node ;
case "with" :
if ( S . input . has _directive ( "use strict" ) ) {
croak ( "Strict mode may not include a with statement" ) ;
}
next ( ) ;
return new AST _With ( {
expression : parenthesised ( ) ,
body : statement ( )
} ) ;
}
}
unexpected ( ) ;
} ) ;
function labeled _statement ( ) {
var label = as _symbol ( AST _Label ) ;
if ( ! all ( S . labels , function ( l ) {
return l . name != label . name ;
} ) ) {
// ECMA-262, 12.12: An ECMAScript program is considered
// syntactically incorrect if it contains a
// LabelledStatement that is enclosed by a
// LabelledStatement with the same Identifier as label.
croak ( "Label " + label . name + " defined twice" ) ;
}
expect ( ":" ) ;
S . labels . push ( label ) ;
var stat = statement ( ) ;
S . labels . pop ( ) ;
if ( ! ( stat instanceof AST _IterationStatement ) ) {
// check for `continue` that refers to this label.
// those should be reported as syntax errors.
// https://github.com/mishoo/UglifyJS2/issues/287
label . references . forEach ( function ( ref ) {
if ( ref instanceof AST _Continue ) {
ref = ref . label . start ;
croak ( "Continue label `" + label . name + "` refers to non-IterationStatement." ,
ref . line , ref . col , ref . pos ) ;
}
} ) ;
}
return new AST _LabeledStatement ( { body : stat , label : label } ) ;
}
2019-12-02 15:42:11 +00:00
function simple _statement ( ) {
var body = expression ( true ) ;
semicolon ( ) ;
return new AST _SimpleStatement ( { body : body } ) ;
2019-12-02 12:22:45 +00:00
}
function break _cont ( type ) {
var label = null , ldef ;
if ( ! can _insert _semicolon ( ) ) {
label = as _symbol ( AST _LabelRef , true ) ;
}
if ( label != null ) {
ldef = find _if ( function ( l ) {
return l . name == label . name ;
} , S . labels ) ;
if ( ! ldef ) croak ( "Undefined label " + label . name ) ;
label . thedef = ldef ;
} else if ( S . in _loop == 0 ) croak ( type . TYPE + " not inside a loop or switch" ) ;
semicolon ( ) ;
var stat = new type ( { label : label } ) ;
if ( ldef ) ldef . references . push ( stat ) ;
return stat ;
}
function for _ ( ) {
expect ( "(" ) ;
var init = null ;
if ( ! is ( "punc" , ";" ) ) {
init = is ( "keyword" , "var" )
? ( next ( ) , var _ ( true ) )
: expression ( true , true ) ;
if ( is ( "operator" , "in" ) ) {
if ( init instanceof AST _Var ) {
if ( init . definitions . length > 1 )
croak ( "Only one variable declaration allowed in for..in loop" , init . start . line , init . start . col , init . start . pos ) ;
} else if ( ! is _assignable ( init ) ) {
croak ( "Invalid left-hand side in for..in loop" , init . start . line , init . start . col , init . start . pos ) ;
}
next ( ) ;
return for _in ( init ) ;
}
}
return regular _for ( init ) ;
}
function regular _for ( init ) {
expect ( ";" ) ;
var test = is ( "punc" , ";" ) ? null : expression ( true ) ;
expect ( ";" ) ;
var step = is ( "punc" , ")" ) ? null : expression ( true ) ;
expect ( ")" ) ;
return new AST _For ( {
init : init ,
condition : test ,
step : step ,
body : in _loop ( statement )
} ) ;
}
function for _in ( init ) {
var obj = expression ( true ) ;
expect ( ")" ) ;
return new AST _ForIn ( {
init : init ,
object : obj ,
body : in _loop ( statement )
} ) ;
}
var function _ = function ( ctor ) {
var in _statement = ctor === AST _Defun ;
var name = is ( "name" ) ? as _symbol ( in _statement ? AST _SymbolDefun : AST _SymbolLambda ) : null ;
if ( in _statement && ! name )
expect _token ( "name" ) ;
if ( name && ctor !== AST _Accessor && ! ( name instanceof AST _SymbolDeclaration ) )
unexpected ( prev ( ) ) ;
expect ( "(" ) ;
var argnames = [ ] ;
for ( var first = true ; ! is ( "punc" , ")" ) ; ) {
if ( first ) first = false ; else expect ( "," ) ;
argnames . push ( as _symbol ( AST _SymbolFunarg ) ) ;
}
next ( ) ;
var loop = S . in _loop ;
var labels = S . labels ;
++ S . in _function ;
S . in _directives = true ;
S . input . push _directives _stack ( ) ;
S . in _loop = 0 ;
S . labels = [ ] ;
var body = block _ ( true ) ;
if ( S . input . has _directive ( "use strict" ) ) {
if ( name ) strict _verify _symbol ( name ) ;
argnames . forEach ( strict _verify _symbol ) ;
}
S . input . pop _directives _stack ( ) ;
-- S . in _function ;
S . in _loop = loop ;
S . labels = labels ;
return new ctor ( {
name : name ,
argnames : argnames ,
body : body
} ) ;
} ;
function if _ ( ) {
var cond = parenthesised ( ) , body = statement ( ) , belse = null ;
if ( is ( "keyword" , "else" ) ) {
next ( ) ;
belse = statement ( ) ;
}
return new AST _If ( {
condition : cond ,
body : body ,
alternative : belse
} ) ;
}
function block _ ( strict _defun ) {
expect ( "{" ) ;
var a = [ ] ;
while ( ! is ( "punc" , "}" ) ) {
if ( is ( "eof" ) ) expect _token ( "punc" , "}" ) ;
a . push ( statement ( strict _defun ) ) ;
}
next ( ) ;
return a ;
}
function switch _body _ ( ) {
expect ( "{" ) ;
var a = [ ] , cur = null , branch = null , tmp ;
while ( ! is ( "punc" , "}" ) ) {
if ( is ( "eof" ) ) expect _token ( "punc" , "}" ) ;
if ( is ( "keyword" , "case" ) ) {
if ( branch ) branch . end = prev ( ) ;
cur = [ ] ;
branch = new AST _Case ( {
start : ( tmp = S . token , next ( ) , tmp ) ,
expression : expression ( true ) ,
body : cur
} ) ;
a . push ( branch ) ;
expect ( ":" ) ;
} else if ( is ( "keyword" , "default" ) ) {
if ( branch ) branch . end = prev ( ) ;
cur = [ ] ;
branch = new AST _Default ( {
start : ( tmp = S . token , next ( ) , expect ( ":" ) , tmp ) ,
body : cur
} ) ;
a . push ( branch ) ;
} else {
if ( ! cur ) unexpected ( ) ;
cur . push ( statement ( ) ) ;
}
}
if ( branch ) branch . end = prev ( ) ;
next ( ) ;
return a ;
}
function try _ ( ) {
var body = block _ ( ) , bcatch = null , bfinally = null ;
if ( is ( "keyword" , "catch" ) ) {
var start = S . token ;
next ( ) ;
expect ( "(" ) ;
var name = as _symbol ( AST _SymbolCatch ) ;
expect ( ")" ) ;
bcatch = new AST _Catch ( {
start : start ,
argname : name ,
body : block _ ( ) ,
end : prev ( )
} ) ;
}
if ( is ( "keyword" , "finally" ) ) {
var start = S . token ;
next ( ) ;
bfinally = new AST _Finally ( {
start : start ,
body : block _ ( ) ,
end : prev ( )
} ) ;
}
if ( ! bcatch && ! bfinally )
croak ( "Missing catch/finally blocks" ) ;
return new AST _Try ( {
body : body ,
bcatch : bcatch ,
bfinally : bfinally
} ) ;
}
function vardefs ( no _in ) {
var a = [ ] ;
for ( ; ; ) {
a . push ( new AST _VarDef ( {
start : S . token ,
name : as _symbol ( AST _SymbolVar ) ,
value : is ( "operator" , "=" ) ? ( next ( ) , expression ( false , no _in ) ) : null ,
end : prev ( )
} ) ) ;
if ( ! is ( "punc" , "," ) )
break ;
next ( ) ;
}
return a ;
}
var var _ = function ( no _in ) {
return new AST _Var ( {
start : prev ( ) ,
definitions : vardefs ( no _in ) ,
end : prev ( )
} ) ;
} ;
var new _ = function ( allow _calls ) {
var start = S . token ;
expect _token ( "operator" , "new" ) ;
var newexp = expr _atom ( false ) , args ;
if ( is ( "punc" , "(" ) ) {
next ( ) ;
args = expr _list ( ")" ) ;
} else {
args = [ ] ;
}
var call = new AST _New ( {
start : start ,
expression : newexp ,
args : args ,
end : prev ( )
} ) ;
mark _pure ( call ) ;
return subscripts ( call , allow _calls ) ;
} ;
function as _atom _node ( ) {
var tok = S . token , ret ;
switch ( tok . type ) {
case "name" :
ret = _make _symbol ( AST _SymbolRef ) ;
break ;
case "num" :
ret = new AST _Number ( { start : tok , end : tok , value : tok . value } ) ;
break ;
case "string" :
ret = new AST _String ( {
start : tok ,
end : tok ,
value : tok . value ,
quote : tok . quote
} ) ;
break ;
case "regexp" :
ret = new AST _RegExp ( { start : tok , end : tok , value : tok . value } ) ;
break ;
case "atom" :
switch ( tok . value ) {
case "false" :
ret = new AST _False ( { start : tok , end : tok } ) ;
break ;
case "true" :
ret = new AST _True ( { start : tok , end : tok } ) ;
break ;
case "null" :
ret = new AST _Null ( { start : tok , end : tok } ) ;
break ;
}
break ;
}
next ( ) ;
return ret ;
}
var expr _atom = function ( allow _calls ) {
if ( is ( "operator" , "new" ) ) {
return new _ ( allow _calls ) ;
}
var start = S . token ;
if ( is ( "punc" ) ) {
switch ( start . value ) {
case "(" :
next ( ) ;
var ex = expression ( true ) ;
var len = start . comments _before . length ;
[ ] . unshift . apply ( ex . start . comments _before , start . comments _before ) ;
start . comments _before . length = 0 ;
start . comments _before = ex . start . comments _before ;
start . comments _before _length = len ;
if ( len == 0 && start . comments _before . length > 0 ) {
var comment = start . comments _before [ 0 ] ;
if ( ! comment . nlb ) {
comment . nlb = start . nlb ;
start . nlb = false ;
}
}
start . comments _after = ex . start . comments _after ;
ex . start = start ;
expect ( ")" ) ;
var end = prev ( ) ;
end . comments _before = ex . end . comments _before ;
[ ] . push . apply ( ex . end . comments _after , end . comments _after ) ;
end . comments _after . length = 0 ;
end . comments _after = ex . end . comments _after ;
ex . end = end ;
if ( ex instanceof AST _Call ) mark _pure ( ex ) ;
return subscripts ( ex , allow _calls ) ;
case "[" :
return subscripts ( array _ ( ) , allow _calls ) ;
case "{" :
return subscripts ( object _ ( ) , allow _calls ) ;
}
unexpected ( ) ;
}
if ( is ( "keyword" , "function" ) ) {
next ( ) ;
var func = function _ ( AST _Function ) ;
func . start = start ;
func . end = prev ( ) ;
return subscripts ( func , allow _calls ) ;
}
if ( ATOMIC _START _TOKEN [ S . token . type ] ) {
return subscripts ( as _atom _node ( ) , allow _calls ) ;
}
unexpected ( ) ;
} ;
function expr _list ( closing , allow _trailing _comma , allow _empty ) {
var first = true , a = [ ] ;
while ( ! is ( "punc" , closing ) ) {
if ( first ) first = false ; else expect ( "," ) ;
if ( allow _trailing _comma && is ( "punc" , closing ) ) break ;
if ( is ( "punc" , "," ) && allow _empty ) {
a . push ( new AST _Hole ( { start : S . token , end : S . token } ) ) ;
} else {
a . push ( expression ( false ) ) ;
}
}
next ( ) ;
return a ;
}
var array _ = embed _tokens ( function ( ) {
expect ( "[" ) ;
return new AST _Array ( {
elements : expr _list ( "]" , ! options . strict , true )
} ) ;
} ) ;
var create _accessor = embed _tokens ( function ( ) {
return function _ ( AST _Accessor ) ;
} ) ;
var object _ = embed _tokens ( function ( ) {
expect ( "{" ) ;
var first = true , a = [ ] ;
while ( ! is ( "punc" , "}" ) ) {
if ( first ) first = false ; else expect ( "," ) ;
if ( ! options . strict && is ( "punc" , "}" ) )
// allow trailing comma
break ;
var start = S . token ;
var type = start . type ;
var name = as _property _name ( ) ;
if ( type == "name" && ! is ( "punc" , ":" ) ) {
var key = new AST _SymbolAccessor ( {
start : S . token ,
name : "" + as _property _name ( ) ,
end : prev ( )
} ) ;
if ( name == "get" ) {
a . push ( new AST _ObjectGetter ( {
start : start ,
key : key ,
value : create _accessor ( ) ,
end : prev ( )
} ) ) ;
continue ;
}
if ( name == "set" ) {
a . push ( new AST _ObjectSetter ( {
start : start ,
key : key ,
value : create _accessor ( ) ,
end : prev ( )
} ) ) ;
continue ;
}
}
expect ( ":" ) ;
a . push ( new AST _ObjectKeyVal ( {
start : start ,
quote : start . quote ,
key : "" + name ,
value : expression ( false ) ,
end : prev ( )
} ) ) ;
}
next ( ) ;
return new AST _Object ( { properties : a } ) ;
} ) ;
function as _property _name ( ) {
var tmp = S . token ;
switch ( tmp . type ) {
case "operator" :
if ( ! KEYWORDS [ tmp . value ] ) unexpected ( ) ;
case "num" :
case "string" :
case "name" :
case "keyword" :
case "atom" :
next ( ) ;
return tmp . value ;
default :
unexpected ( ) ;
}
}
function as _name ( ) {
if ( ! is ( "name" ) ) expect _token ( "name" ) ;
var name = S . token . value ;
next ( ) ;
return name ;
}
function _make _symbol ( type ) {
var name = S . token . value ;
return new ( name == "this" ? AST _This : type ) ( {
name : String ( name ) ,
start : S . token ,
end : S . token
} ) ;
}
function strict _verify _symbol ( sym ) {
if ( sym . name == "arguments" || sym . name == "eval" )
croak ( "Unexpected " + sym . name + " in strict mode" , sym . start . line , sym . start . col , sym . start . pos ) ;
}
function as _symbol ( type , noerror ) {
if ( ! is ( "name" ) ) {
if ( ! noerror ) croak ( "Name expected" ) ;
return null ;
}
var sym = _make _symbol ( type ) ;
if ( S . input . has _directive ( "use strict" ) && sym instanceof AST _SymbolDeclaration ) {
strict _verify _symbol ( sym ) ;
}
next ( ) ;
return sym ;
}
function mark _pure ( call ) {
var start = call . start ;
var comments = start . comments _before ;
var i = HOP ( start , "comments_before_length" ) ? start . comments _before _length : comments . length ;
while ( -- i >= 0 ) {
var comment = comments [ i ] ;
if ( /[@#]__PURE__/ . test ( comment . value ) ) {
call . pure = comment ;
break ;
}
}
}
var subscripts = function ( expr , allow _calls ) {
var start = expr . start ;
if ( is ( "punc" , "." ) ) {
next ( ) ;
return subscripts ( new AST _Dot ( {
start : start ,
expression : expr ,
property : as _name ( ) ,
end : prev ( )
} ) , allow _calls ) ;
}
if ( is ( "punc" , "[" ) ) {
next ( ) ;
var prop = expression ( true ) ;
expect ( "]" ) ;
return subscripts ( new AST _Sub ( {
start : start ,
expression : expr ,
property : prop ,
end : prev ( )
} ) , allow _calls ) ;
}
if ( allow _calls && is ( "punc" , "(" ) ) {
next ( ) ;
var call = new AST _Call ( {
start : start ,
expression : expr ,
args : expr _list ( ")" ) ,
end : prev ( )
} ) ;
mark _pure ( call ) ;
return subscripts ( call , true ) ;
}
return expr ;
} ;
var maybe _unary = function ( allow _calls ) {
var start = S . token ;
if ( is ( "operator" ) && UNARY _PREFIX [ start . value ] ) {
next ( ) ;
handle _regexp ( ) ;
var ex = make _unary ( AST _UnaryPrefix , start , maybe _unary ( allow _calls ) ) ;
ex . start = start ;
ex . end = prev ( ) ;
return ex ;
}
var val = expr _atom ( allow _calls ) ;
while ( is ( "operator" ) && UNARY _POSTFIX [ S . token . value ] && ! has _newline _before ( S . token ) ) {
val = make _unary ( AST _UnaryPostfix , S . token , val ) ;
val . start = start ;
val . end = S . token ;
next ( ) ;
}
return val ;
} ;
function make _unary ( ctor , token , expr ) {
var op = token . value ;
switch ( op ) {
case "++" :
case "--" :
if ( ! is _assignable ( expr ) )
croak ( "Invalid use of " + op + " operator" , token . line , token . col , token . pos ) ;
break ;
case "delete" :
if ( expr instanceof AST _SymbolRef && S . input . has _directive ( "use strict" ) )
croak ( "Calling delete on expression not allowed in strict mode" , expr . start . line , expr . start . col , expr . start . pos ) ;
break ;
}
return new ctor ( { operator : op , expression : expr } ) ;
}
var expr _op = function ( left , min _prec , no _in ) {
var op = is ( "operator" ) ? S . token . value : null ;
if ( op == "in" && no _in ) op = null ;
var prec = op != null ? PRECEDENCE [ op ] : null ;
if ( prec != null && prec > min _prec ) {
next ( ) ;
var right = expr _op ( maybe _unary ( true ) , prec , no _in ) ;
return expr _op ( new AST _Binary ( {
start : left . start ,
left : left ,
operator : op ,
right : right ,
end : right . end
} ) , min _prec , no _in ) ;
}
return left ;
} ;
function expr _ops ( no _in ) {
return expr _op ( maybe _unary ( true ) , 0 , no _in ) ;
}
var maybe _conditional = function ( no _in ) {
var start = S . token ;
var expr = expr _ops ( no _in ) ;
if ( is ( "operator" , "?" ) ) {
next ( ) ;
var yes = expression ( false ) ;
expect ( ":" ) ;
return new AST _Conditional ( {
start : start ,
condition : expr ,
consequent : yes ,
alternative : expression ( false , no _in ) ,
end : prev ( )
} ) ;
}
return expr ;
} ;
function is _assignable ( expr ) {
return expr instanceof AST _PropAccess || expr instanceof AST _SymbolRef ;
}
var maybe _assign = function ( no _in ) {
var start = S . token ;
var left = maybe _conditional ( no _in ) , val = S . token . value ;
if ( is ( "operator" ) && ASSIGNMENT [ val ] ) {
if ( is _assignable ( left ) ) {
next ( ) ;
return new AST _Assign ( {
start : start ,
left : left ,
operator : val ,
right : maybe _assign ( no _in ) ,
end : prev ( )
} ) ;
}
croak ( "Invalid assignment" ) ;
}
return left ;
} ;
var expression = function ( commas , no _in ) {
var start = S . token ;
var exprs = [ ] ;
while ( true ) {
exprs . push ( maybe _assign ( no _in ) ) ;
if ( ! commas || ! is ( "punc" , "," ) ) break ;
next ( ) ;
commas = true ;
}
return exprs . length == 1 ? exprs [ 0 ] : new AST _Sequence ( {
start : start ,
expressions : exprs ,
end : peek ( )
} ) ;
} ;
function in _loop ( cont ) {
++ S . in _loop ;
var ret = cont ( ) ;
-- S . in _loop ;
return ret ;
}
if ( options . expression ) {
handle _regexp ( ) ;
return expression ( true ) ;
}
return function ( ) {
var start = S . token ;
var body = [ ] ;
S . input . push _directives _stack ( ) ;
while ( ! is ( "eof" ) )
body . push ( statement ( true ) ) ;
S . input . pop _directives _stack ( ) ;
var end = prev ( ) ;
var toplevel = options . toplevel ;
if ( toplevel ) {
toplevel . body = toplevel . body . concat ( body ) ;
toplevel . end = end ;
} else {
toplevel = new AST _Toplevel ( { start : start , body : body , end : end } ) ;
}
return toplevel ;
} ( ) ;
}