Rev 2976 | Blame | Compare with Previous | Last modification | View Log
<?php/* 25 October 2011. version 1.1-FF4** This is the php version of the Dean Edwards JavaScript's Packer,* Based on :** ParseMaster, version 1.0.2 (2005-08-19) Copyright 2005, Dean Edwards* a multi-pattern parser.* KNOWN BUG: erroneous behavior when using escapeChar with a replacement* value that is a function** packer, version 2.0.2 (2005-08-19) Copyright 2004-2005, Dean Edwards** License: http://creativecommons.org/licenses/LGPL/2.1/** Ported to PHP by Nicolas Martin.** ----------------------------------------------------------------------* changelog:* 1.1 : correct a bug, '\0' packed then unpacked becomes '\'.* 1.1-FF4 : Firefox 4 fix, Copyright 2011, Mieczyslaw Nalewaj* ----------------------------------------------------------------------** examples of usage :* $myPacker = new JavaScriptPacker($script, 62, true, false);* $packed = $myPacker->pack();** or** $myPacker = new JavaScriptPacker($script, 'Normal', true, false);* $packed = $myPacker->pack();** or (default values)** $myPacker = new JavaScriptPacker($script);* $packed = $myPacker->pack();*** params of the constructor :* $script: the JavaScript to pack, string.* $encoding: level of encoding, int or string :* 0,10,62,95 or 'None', 'Numeric', 'Normal', 'High ASCII'.* default: 62.* $fastDecode: include the fast decoder in the packed result, boolean.* default : true.* $specialChars: if you are flagged your private and local variables* in the script, boolean.* default: false.** The pack() method return the compressed JavasScript, as a string.** see http://dean.edwards.name/packer/usage/ for more information.** Notes :* # need PHP 5 . Tested with PHP 5.1.2, 5.1.3, 5.1.4, 5.2.3** # The packed result may be different than with the Dean Edwards* version, but with the same length. The reason is that the PHP* function usort to sort array don't necessarily preserve the* original order of two equal member. The Javascript sort function* in fact preserve this order (but that's not require by the* ECMAScript standard). So the encoded keywords order can be* different in the two results.** # Be careful with the 'High ASCII' Level encoding if you use* UTF-8 in your files...*/class JavaScriptPacker{// constantsconst IGNORE = '$1';// validate parametersprivate $_script = '';private $_encoding = 62;private $_fastDecode = true;private $_specialChars = false;private $LITERAL_ENCODING = array('None' => 0,'Numeric' => 10,'Normal' => 62,'High ASCII' => 95);public function __construct($_script, $_encoding = 62, $_fastDecode = true, $_specialChars = false){$this->_script = $_script . "\n";if (array_key_exists($_encoding, $this->LITERAL_ENCODING))$_encoding = $this->LITERAL_ENCODING[$_encoding];$this->_encoding = min((int) $_encoding, 95);$this->_fastDecode = $_fastDecode;$this->_specialChars = $_specialChars;}public function pack(){$this->_addParser('_basicCompression');if ($this->_specialChars)$this->_addParser('_encodeSpecialChars');if ($this->_encoding)$this->_addParser('_encodeKeywords');// go!return $this->_pack($this->_script);}// apply all parsing routinesprivate function _pack($script){for ($i = 0; isset($this->_parsers[$i]); $i++) {$script = call_user_func(array(&$this, $this->_parsers[$i]), $script);}return $script;}// keep a list of parsing functions, they'll be executed all at onceprivate $_parsers = array();private function _addParser($parser){$this->_parsers[] = $parser;}// zero encoding - just removal of white space and commentsprivate function _basicCompression($script){$parser = new ParseMaster();// make safe$parser->escapeChar = '\\';// protect strings$parser->add('/\'[^\'\\n\\r]*\'/', self::IGNORE);$parser->add('/"[^"\\n\\r]*"/', self::IGNORE);// remove comments$parser->add('/\\/\\/[^\\n\\r]*[\\n\\r]/', ' ');$parser->add('/\\/\\*[^*]*\\*+([^\\/][^*]*\\*+)*\\//', ' ');// protect regular expressions$parser->add('/\\s+(\\/[^\\/\\n\\r\\*][^\\/\\n\\r]*\\/g?i?)/', '$2'); // IGNORE$parser->add('/[^\\w\\x24\\/\'"*)\\?:]\\/[^\\/\\n\\r\\*][^\\/\\n\\r]*\\/g?i?/', self::IGNORE);// remove: ;;; doSomething();if ($this->_specialChars) $parser->add('/;;;[^\\n\\r]+[\\n\\r]/');// remove redundant semi-colons$parser->add('/\\(;;\\)/', self::IGNORE); // protect for (;;) loops$parser->add('/;+\\s*([};])/', '$2');// apply the above$script = $parser->exec($script);// remove white-space$parser->add('/(\\b|\\x24)\\s+(\\b|\\x24)/', '$2 $3');$parser->add('/([+\\-])\\s+([+\\-])/', '$2 $3');$parser->add('/\\s+/', '');// donereturn $parser->exec($script);}private function _encodeSpecialChars($script){$parser = new ParseMaster();// replace: $name -> n, $$name -> na$parser->add('/((\\x24+)([a-zA-Z$_]+))(\\d*)/',array('fn' => '_replace_name'));// replace: _name -> _0, double-underscore (__name) is ignored$regexp = '/\\b_[A-Za-z\\d]\\w*/';// build the word list$keywords = $this->_analyze($script, $regexp, '_encodePrivate');// quick ref$encoded = $keywords['encoded'];$parser->add($regexp,array('fn' => '_replace_encoded','data' => $encoded));return $parser->exec($script);}private function _encodeKeywords($script){// escape high-ascii values already in the script (i.e. in strings)if ($this->_encoding > 62)$script = $this->_escape95($script);// create the parser$parser = new ParseMaster();$encode = $this->_getEncoder($this->_encoding);// for high-ascii, don't encode single character low-ascii$regexp = ($this->_encoding > 62) ? '/\\w\\w+/' : '/\\w+/';// build the word list$keywords = $this->_analyze($script, $regexp, $encode);$encoded = $keywords['encoded'];// encode$parser->add($regexp,array('fn' => '_replace_encoded','data' => $encoded));if (empty($script)) return $script;else {//$res = $parser->exec($script);//$res = $this->_bootStrap($res, $keywords);//return $res;return $this->_bootStrap($parser->exec($script), $keywords);}}private function _analyze($script, $regexp, $encode){// analyse// retreive all words in the script$all = array();preg_match_all($regexp, $script, $all);$_sorted = array(); // list of words sorted by frequency$_encoded = array(); // dictionary of word->encoding$_protected = array(); // instances of "protected" words$all = $all[0]; // simulate the javascript comportement of global matchif (!empty($all)) {$unsorted = array(); // same list, not sorted$protected = array(); // "protected" words (dictionary of word->"word")$value = array(); // dictionary of charCode->encoding (eg. 256->ff)$this->_count = array(); // word->count$i = count($all); $j = 0; //$word = null;// count the occurrences - used for sorting laterdo {--$i;$word = '$' . $all[$i];if (!isset($this->_count[$word])) {$this->_count[$word] = 0;$unsorted[$j] = $word;// make a dictionary of all of the protected words in this script// these are words that might be mistaken for encoding//if (is_string($encode) && method_exists($this, $encode))$values[$j] = call_user_func(array(&$this, $encode), $j);$protected['$' . $values[$j]] = $j++;}// increment the word counter$this->_count[$word]++;} while ($i > 0);// prepare to sort the word list, first we must protect// words that are also used as codes. we assign them a code// equivalent to the word itself.// e.g. if "do" falls within our encoding range// then we store keywords["do"] = "do";// this avoids problems when decoding$i = count($unsorted);do {$word = $unsorted[--$i];if (isset($protected[$word]) /*!= null*/) {$_sorted[$protected[$word]] = substr($word, 1);$_protected[$protected[$word]] = true;$this->_count[$word] = 0;}} while ($i);// sort the words by frequency// Note: the javascript and php version of sort can be different :// in php manual, usort :// " If two members compare as equal,// their order in the sorted array is undefined."// so the final packed script is different of the Dean's javascript version// but equivalent.// the ECMAscript standard does not guarantee this behaviour,// and thus not all browsers (e.g. Mozilla versions dating back to at// least 2003) respect this.usort($unsorted, array(&$this, '_sortWords'));$j = 0;// because there are "protected" words in the list// we must add the sorted words around themdo {if (!isset($_sorted[$i]))$_sorted[$i] = substr($unsorted[$j++], 1);$_encoded[$_sorted[$i]] = $values[$i];} while (++$i < count($unsorted));}return array('sorted' => $_sorted,'encoded' => $_encoded,'protected' => $_protected);}private $_count = array();private function _sortWords($match1, $match2){return $this->_count[$match2] - $this->_count[$match1];}// build the boot function used for loading and decodingprivate function _bootStrap($packed, $keywords){$ENCODE = $this->_safeRegExp('$encode\\($count\\)');// $packed: the packed script$packed = "'" . $this->_escape($packed) . "'";// $ascii: base for encoding$ascii = min(count($keywords['sorted']), $this->_encoding);if ($ascii == 0) $ascii = 1;// $count: number of words contained in the script$count = count($keywords['sorted']);// $keywords: list of words contained in the scriptforeach ($keywords['protected'] as $i=>$value) {$keywords['sorted'][$i] = '';}// convert from a string to an arrayksort($keywords['sorted']);$keywords = "'" . implode('|', $keywords['sorted']) . "'.split('|')";$encode = ($this->_encoding > 62) ? '_encode95' : $this->_getEncoder($ascii);$encode = $this->_getJSFunction($encode);$encode = preg_replace('/_encoding/', '$ascii', $encode);$encode = preg_replace('/arguments\\.callee/', '$encode', $encode);$inline = '\\$count' . ($ascii > 10 ? '.toString(\\$ascii)' : '');// $decode: code snippet to speed up decodingif ($this->_fastDecode) {// create the decoder$decode = $this->_getJSFunction('_decodeBody');if ($this->_encoding > 62)$decode = preg_replace('/\\\\w/', '[\\xa1-\\xff]', $decode);// perform the encoding inline for lower ascii valueselseif ($ascii < 36)$decode = preg_replace($ENCODE, $inline, $decode);// special case: when $count==0 there are no keywords. I want to keep// the basic shape of the unpacking funcion so i'll frig the code...if ($count == 0)$decode = preg_replace($this->_safeRegExp('($count)\\s*=\\s*1'), '$1=0', $decode, 1);}// boot function$unpack = $this->_getJSFunction('_unpack');if ($this->_fastDecode) {// insert the decoder$this->buffer = $decode;$unpack = preg_replace_callback('/\\{/', array(&$this, '_insertFastDecode'), $unpack, 1);}$unpack = preg_replace('/"/', "'", $unpack);if ($this->_encoding > 62) { // high-ascii// get rid of the word-boundaries for regexp matches$unpack = preg_replace('/\'\\\\\\\\b\'\s*\\+|\\+\s*\'\\\\\\\\b\'/', '', $unpack);}if ($ascii > 36 || $this->_encoding > 62 || $this->_fastDecode) {// insert the encode function$this->buffer = $encode;$unpack = preg_replace_callback('/\\{/', array(&$this, '_insertFastEncode'), $unpack, 1);} else {// perform the encoding inline$unpack = preg_replace($ENCODE, $inline, $unpack);}// pack the boot function too$unpackPacker = new JavaScriptPacker($unpack, 0, false, true);$unpack = $unpackPacker->pack();// arguments$params = array($packed, $ascii, $count, $keywords);if ($this->_fastDecode) {$params[] = 0;$params[] = '{}';}$params = implode(',', $params);// the whole thing//Firefox 4 fix, old: return 'eval(' . $unpack . '(' . $params . "))\n";return "(typeof setTimeout=='function'?setTimeout:eval)(" . $unpack . "(" . $params . "));\n";}private $buffer;private function _insertFastDecode($match){return '{' . $this->buffer . ';';}private function _insertFastEncode($match){return '{$encode=' . $this->buffer . ';';}// mmm.. ..which one do i need ??private function _getEncoder($ascii){return $ascii > 10 ? $ascii > 36 ? $ascii > 62 ?'_encode95' : '_encode62' : '_encode36' : '_encode10';}// zero encoding// characters: 0123456789private function _encode10($charCode){return $charCode;}// inherent base36 support// characters: 0123456789abcdefghijklmnopqrstuvwxyzprivate function _encode36($charCode){return base_convert($charCode, 10, 36);}// hitch a ride on base36 and add the upper case alpha characters// characters: 0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZprivate function _encode62($charCode){$res = '';if ($charCode >= $this->_encoding) {$res = $this->_encode62((int) ($charCode / $this->_encoding));}$charCode = $charCode % $this->_encoding;if ($charCode > 35)return $res . chr($charCode + 29);elsereturn $res . base_convert($charCode, 10, 36);}// use high-ascii values// characters: ¡¢£¤¥¦§¨©ª«¬®¯°±²³´µ¶·¸¹º»¼½¾¿ÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖ×ØÙÚÛÜÝÞßàáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþprivate function _encode95($charCode){$res = '';if ($charCode >= $this->_encoding)$res = $this->_encode95($charCode / $this->_encoding);return $res . chr(($charCode % $this->_encoding) + 161);}private function _safeRegExp($string){return '/'.preg_replace('/\$/', '\\\$', $string).'/';}private function _encodePrivate($charCode){return "_" . $charCode;}// protect characters used by the parserprivate function _escape($script){return preg_replace('/([\\\\\'])/', '\\\$1', $script);}// protect high-ascii characters already in the scriptprivate function _escape95($script){return preg_replace_callback('/[\\xa1-\\xff]/',array(&$this, '_escape95Bis'),$script);}private function _escape95Bis($match){return '\x'.((string) dechex(ord($match)));}private function _getJSFunction($aName){if (defined('self::JSFUNCTION'.$aName))return constant('self::JSFUNCTION'.$aName);elsereturn '';}// JavaScript Functions used.// Note : In Dean's version, these functions are converted// with 'String(aFunctionName);'.// This internal conversion complete the original code, ex :// 'while (aBool) anAction();' is converted to// 'while (aBool) { anAction(); }'.// The JavaScript functions below are corrected.// unpacking function - this is the boot strap function// data extracted from this packing routine is passed to// this function when decoded in the target// NOTE ! : without the ';' final.const JSFUNCTION_unpack ='function ($packed, $ascii, $count, $keywords, $encode, $decode) {while ($count--) {if ($keywords[$count]) {$packed = $packed.replace(new RegExp(\'\\\\b\' + $encode($count) + \'\\\\b\', \'g\'), $keywords[$count]);}}return $packed;}';/*'function ($packed, $ascii, $count, $keywords, $encode, $decode) {while ($count--)if ($keywords[$count])$packed = $packed.replace(new RegExp(\'\\\\b\' + $encode($count) + \'\\\\b\', \'g\'), $keywords[$count]);return $packed;}';*/// code-snippet inserted into the unpacker to speed up decodingconst JSFUNCTION_decodeBody =//_decode = function () {// does the browser support String.replace where the// replacement value is a function?' if (!\'\'.replace(/^/, String)) {// decode all the values we needwhile ($count--) {$decode[$encode($count)] = $keywords[$count] || $encode($count);}// global replacement function$keywords = [function ($encoded) {return $decode[$encoded]}];// generic match$encode = function () {return \'\\\\w+\'};// reset the loop counter - we are now doing a global replace$count = 1;}';//};/*' if (!\'\'.replace(/^/, String)) {// decode all the values we needwhile ($count--) $decode[$encode($count)] = $keywords[$count] || $encode($count);// global replacement function$keywords = [function ($encoded) {return $decode[$encoded]}];// generic match$encode = function () {return\'\\\\w+\'};// reset the loop counter - we are now doing a global replace$count = 1;}';*/// zero encoding// characters: 0123456789const JSFUNCTION_encode10 ='function ($charCode) {return $charCode;}';//;';// inherent base36 support// characters: 0123456789abcdefghijklmnopqrstuvwxyzconst JSFUNCTION_encode36 ='function ($charCode) {return $charCode.toString(36);}';//;';// hitch a ride on base36 and add the upper case alpha characters// characters: 0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZconst JSFUNCTION_encode62 ='function ($charCode) {return ($charCode < _encoding ? \'\' : arguments.callee(parseInt($charCode / _encoding))) +(($charCode = $charCode % _encoding) > 35 ? String.fromCharCode($charCode + 29) : $charCode.toString(36));}';// use high-ascii values// characters: ¡¢£¤¥¦§¨©ª«¬®¯°±²³´µ¶·¸¹º»¼½¾¿ÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖ×ØÙÚÛÜÝÞßàáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþconst JSFUNCTION_encode95 ='function ($charCode) {return ($charCode < _encoding ? \'\' : arguments.callee($charCode / _encoding)) +String.fromCharCode($charCode % _encoding + 161);}';}class ParseMaster{public $ignoreCase = false;public $escapeChar = '';// constantsconst EXPRESSION = 0;const REPLACEMENT = 1;const LENGTH = 2;// used to determine nesting levelsprivate $GROUPS = '/\\(/';//gprivate $SUB_REPLACE = '/\\$\\d/';private $INDEXED = '/^\\$\\d+$/';private $TRIM = '/([\'"])\\1\\.(.*)\\.\\1\\1$/';private $ESCAPE = '/\\\./';//gprivate $QUOTE = '/\'/';private $DELETED = '/\\x01[^\\x01]*\\x01/';//gpublic function add($expression, $replacement = ''){// count the number of sub-expressions// - add one because each pattern is itself a sub-expression$length = 1 + preg_match_all($this->GROUPS, $this->_internalEscape((string) $expression), $out);// treat only strings $replacementif (is_string($replacement)) {// does the pattern deal with sub-expressions?if (preg_match($this->SUB_REPLACE, $replacement)) {// a simple lookup? (e.g. "$2")if (preg_match($this->INDEXED, $replacement)) {// store the index (used for fast retrieval of matched strings)$replacement = (int) (substr($replacement, 1)) - 1;} else { // a complicated lookup (e.g. "Hello $2 $1")// build a function to do the lookup$quote = preg_match($this->QUOTE, $this->_internalEscape($replacement))? '"' : "'";$replacement = array('fn' => '_backReferences','data' => array('replacement' => $replacement,'length' => $length,'quote' => $quote));}}}// pass the modified argumentsif (!empty($expression)) $this->_add($expression, $replacement, $length);else $this->_add('/^$/', $replacement, $length);}public function exec($string){// execute the global replacement$this->_escaped = array();// simulate the _patterns.toSTring of Dean$regexp = '/';foreach ($this->_patterns as $reg) {$regexp .= '(' . substr($reg[self::EXPRESSION], 1, -1) . ')|';}$regexp = substr($regexp, 0, -1) . '/';$regexp .= ($this->ignoreCase) ? 'i' : '';$string = $this->_escape($string, $this->escapeChar);$string = preg_replace_callback($regexp,array(&$this,'_replacement'),$string);$string = $this->_unescape($string, $this->escapeChar);return preg_replace($this->DELETED, '', $string);}public function reset(){// clear the patterns collection so that this object may be re-used$this->_patterns = array();}// privateprivate $_escaped = array(); // escaped charactersprivate $_patterns = array(); // patterns stored by index// create and add a new pattern to the patterns collectionprivate function _add(){$arguments = func_get_args();$this->_patterns[] = $arguments;}// this is the global replace function (it's quite complicated)private function _replacement($arguments){if (empty($arguments)) return '';$i = 1; $j = 0;// loop through the patternswhile (isset($this->_patterns[$j])) {$pattern = $this->_patterns[$j++];// do we have a result?if (isset($arguments[$i]) && ($arguments[$i] != '')) {$replacement = $pattern[self::REPLACEMENT];if (is_array($replacement) && isset($replacement['fn'])) {if (isset($replacement['data'])) $this->buffer = $replacement['data'];return call_user_func(array(&$this, $replacement['fn']), $arguments, $i);} elseif (is_int($replacement)) {return $arguments[$replacement + $i];}$delete = ($this->escapeChar == '' ||strpos($arguments[$i], $this->escapeChar) === false)? '' : "\x01" . $arguments[$i] . "\x01";return $delete . $replacement;// skip over references to sub-expressions} else {$i += $pattern[self::LENGTH];}}}private function _backReferences($match, $offset){$replacement = $this->buffer['replacement'];$quote = $this->buffer['quote'];$i = $this->buffer['length'];while ($i) {$replacement = str_replace('$'.$i--, $match[$offset + $i], $replacement);}return $replacement;}private function _replace_name($match, $offset){$length = strlen($match[$offset + 2]);$start = $length - max($length - strlen($match[$offset + 3]), 0);return substr($match[$offset + 1], $start, $length) . $match[$offset + 4];}private function _replace_encoded($match, $offset){return $this->buffer[$match[$offset]];}// php : we cannot pass additional data to preg_replace_callback,// and we cannot use &$this in create_function, so let's go to lower levelprivate $buffer;// encode escaped charactersprivate function _escape($string, $escapeChar){if ($escapeChar) {$this->buffer = $escapeChar;return preg_replace_callback('/\\' . $escapeChar . '(.)' .'/',array(&$this, '_escapeBis'),$string);} else {return $string;}}private function _escapeBis($match){$this->_escaped[] = $match[1];return $this->buffer;}// decode escaped charactersprivate function _unescape($string, $escapeChar){if ($escapeChar) {$regexp = '/'.'\\'.$escapeChar.'/';$this->buffer = array('escapeChar'=> $escapeChar, 'i' => 0);return preg_replace_callback($regexp,array(&$this, '_unescapeBis'),$string);} else {return $string;}}private function _unescapeBis(){if (isset($this->_escaped[$this->buffer['i']])&& $this->_escaped[$this->buffer['i']] != ''){$temp = $this->_escaped[$this->buffer['i']];} else {$temp = '';}$this->buffer['i']++;return $this->buffer['escapeChar'] . $temp;}private function _internalEscape($string){return preg_replace($this->ESCAPE, '', $string);}}