Fixed TLinkButton.

2 files changed, 544 insertions, 3 deletions

diff --git a/tools/jsbuilder/build.php b/tools/jsbuilder/build.php
index 8712c347..e690cd18 100644
--- a/tools/jsbuilder/build.php
+++ b/tools/jsbuilder/build.php
@@ -22,10 +22,12 @@
  * @package Tools

  */

 

-/**

- * The compression command line

- */

+//compress using a script, has more options but lesss robut

+//define('COMPRESS_COMMAND','java -jar '.dirname(__FILE__).'/custom_rhino.jar packer.js %s > %s');

+

+//compress using build-in engine, very robust.

 define('COMPRESS_COMMAND','java -jar '.dirname(__FILE__).'/custom_rhino.jar -c %s > %s');

+

 /**

  * The root directory for storing all source js files

  */

diff --git a/tools/jsbuilder/packer.js b/tools/jsbuilder/packer.js
new file mode 100644
index 00000000..d261be35
--- /dev/null
+++ b/tools/jsbuilder/packer.js
@@ -0,0 +1,539 @@
+/*

+    common, version 1.0.4a (2005/06/07)

+    Copyright 2005, Dean Edwards

+    License: http://creativecommons.org/licenses/LGPL/2.1/

+*/

+

+// this function may be used to cast any javascript object

+//  to a common object

+function ICommon(that) {

+    if (that != null) {

+        that.inherit = Common.prototype.inherit;

+        that.specialize = Common.prototype.specialize;

+    }

+    return that;

+};

+

+// sub-classing

+ICommon.specialize = function($prototype, $constructor) {

+    // initialise class properties

+    if (!$prototype) $prototype = {};

+    if (!$constructor) $constructor = $prototype.constructor;

+    if ($constructor == {}.constructor) $constructor = new Function;

+    // build the inheritance chain

+    //  insert a dummy constructor between the ancestor

+    //  and the new constructor. this allows standard

+    //  prototype inheritance plus chained constructor

+    //  functions.

+    $constructor.valueOf = new Function("return this");

+    $constructor.valueOf.prototype = new this.valueOf;

+    $constructor.valueOf.prototype.specialize($prototype);

+    $constructor.prototype = new $constructor.valueOf;

+    $constructor.valueOf.prototype.constructor = $constructor;

+    $constructor.prototype.constructor = $constructor;

+    $constructor.ancestor = this;

+    $constructor.specialize = arguments.callee;

+    $constructor.ancestorOf = this.ancestorOf;

+    return $constructor;

+};

+

+// root of the inheritance chain

+ICommon.valueOf = new Function("return this");

+

+// common interface

+ICommon.valueOf.prototype = {

+constructor: ICommon,

+inherit: function() {

+//-

+//   Call this method from any other method to call that method's ancestor.

+//   If there is no ancestor function then this function will throw an error.

+//-

+    return arguments.callee.caller.ancestor.apply(this, arguments);

+},

+specialize: function(that) {

+//-

+//   Add the interface of another object to this object

+//-

+    // if this object is the prototype then specialize the /real/ prototype

+    if (this == this.constructor.prototype && this.constructor.specialize) {

+        return this.constructor.valueOf.prototype.specialize(that);

+    }

+    // add each of one of the source object's properties to this object

+    for (var i in that) {

+        switch (i) {

+            case "constructor": // don't do this one!

+            case "toString":    // do this one maually

+            case "valueOf":     // ignore this one...

+                continue;

+        }

+        // implement inheritance

+        if (typeof that[i] == "function" && that[i] != this[i]) {

+            that[i].ancestor = this[i];

+        }

+        // add the property

+        this[i] = that[i];

+    }

+    // do the "toString" function manually

+    if (that.toString != this.toString && that.toString != {}.toString) {

+        that.toString.ancestor = this.toString;

+        this.toString = that.toString;

+    }

+    return this;

+}};

+

+// create the root

+function Common() {

+//--

+//   empty constructor function

+//--

+};

+this.Common = ICommon.specialize({

+constructor: Common,

+toString: function() {

+    return "[common " + (this.constructor.className || "Object") + "]";

+},

+instanceOf: function(klass) {

+    return this.constructor == klass || klass.ancestorOf(this.constructor);

+}

+});

+Common.className = "Common";

+Common.ancestor = null;

+Common.ancestorOf = function(klass) {

+    // Is this class an ancestor of the supplied class?

+    while (klass && klass.ancestor != this) klass = klass.ancestor;

+    return Boolean(klass);

+};

+

+// preserve the common prototype so that we can tell when a

+//  property of the root class has changed

+Common.valueOf.ancestor = ICommon;

+

+// c'est fini!

+

+/*

+    ParseMaster, version 1.0.2 (2005-08-19)

+    Copyright 2005, Dean Edwards

+    License: http://creativecommons.org/licenses/LGPL/2.1/

+*/

+

+/* a multi-pattern parser */

+

+// KNOWN BUG: erroneous behavior when using escapeChar with a replacement value that is a function

+

+function ParseMaster() {

+    // constants

+    var $EXPRESSION = 0, $REPLACEMENT = 1, $LENGTH = 2;

+    // used to determine nesting levels

+    var $GROUPS = /\(/g, $SUB_REPLACE = /\$\d/, $INDEXED = /^\$\d+$/,

+        $TRIM = /(['"])\1\+(.*)\+\1\1$/, $$ESCAPE = /\\./g, $QUOTE = /'/,

+        $$DELETED = /\x01[^\x01]*\x01/g;

+    var self = this;

+    // public

+    this.add = function($expression, $replacement) {

+        if (!$replacement) $replacement = "";

+        // count the number of sub-expressions

+        //  - add one because each pattern is itself a sub-expression

+        var $length = (_internalEscape(String($expression)).match($GROUPS) || "").length + 1;

+        // does the pattern deal with sub-expressions?

+        if ($SUB_REPLACE.test($replacement)) {

+            // a simple lookup? (e.g. "$2")

+            if ($INDEXED.test($replacement)) {

+                // store the index (used for fast retrieval of matched strings)

+                $replacement = parseInt($replacement.slice(1)) - 1;

+            } else { // a complicated lookup (e.g. "Hello $2 $1")

+                // build a function to do the lookup

+                var i = $length;

+                var $quote = $QUOTE.test(_internalEscape($replacement)) ? '"' : "'";

+                while (i) $replacement = $replacement.split("$" + i--).join($quote + "+a[o+" + i + "]+" + $quote);

+                $replacement = new Function("a,o", "return" + $quote + $replacement.replace($TRIM, "$1") + $quote);

+            }

+        }

+        // pass the modified arguments

+        _add($expression || "/^$/", $replacement, $length);

+    };

+    // execute the global replacement

+    this.exec = function($string) {

+        _escaped.length = 0;

+        return _unescape(_escape($string, this.escapeChar).replace(

+            new RegExp(_patterns, this.ignoreCase ? "gi" : "g"), _replacement), this.escapeChar).replace($$DELETED, "");

+    };

+    // clear the patterns collection so that this object may be re-used

+    this.reset = function() {

+        _patterns.length = 0;

+    };

+

+    // private

+    var _escaped = [];  // escaped characters

+    var _patterns = []; // patterns stored by index

+    var _toString = function(){return "(" + String(this[$EXPRESSION]).slice(1, -1) + ")"};

+    _patterns.toString = function(){return this.join("|")};

+    // create and add a new pattern to the patterns collection

+    function _add() {

+        arguments.toString = _toString;

+        // store the pattern - as an arguments object (i think this is quicker..?)

+        _patterns[_patterns.length] = arguments;

+    }

+    // this is the global replace function (it's quite complicated)

+    function _replacement() {

+        if (!arguments[0]) return "";

+        var i = 1, j = 0, $pattern;

+        // loop through the patterns

+        while ($pattern = _patterns[j++]) {

+            // do we have a result?

+            if (arguments[i]) {

+                var $replacement = $pattern[$REPLACEMENT];

+                switch (typeof $replacement) {

+                    case "function": return $replacement(arguments, i);

+                    case "number": return arguments[$replacement + i];

+                }

+                var $delete = (arguments[i].indexOf(self.escapeChar) == -1) ? "" :

+                    "\x01" + arguments[i] + "\x01";

+                return $delete + $replacement;

+            // skip over references to sub-expressions

+            } else i += $pattern[$LENGTH];

+        }

+    };

+    // encode escaped characters

+    function _escape($string, $escapeChar) {

+        return $escapeChar ? $string.replace(new RegExp("\\" + $escapeChar + "(.)", "g"), function($match, $char) {

+            _escaped[_escaped.length] = $char;

+            return $escapeChar;

+        }) : $string;

+    };

+    // decode escaped characters

+    function _unescape($string, $escapeChar) {

+        var i = 0;

+        return $escapeChar ? $string.replace(new RegExp("\\" + $escapeChar, "g"), function() {

+            return $escapeChar + (_escaped[i++] || "");

+        }) : $string;

+    };

+    function _internalEscape($string) {

+        return $string.replace($$ESCAPE, "");

+    };

+};

+ParseMaster.prototype = {

+    constructor: ParseMaster,

+    ignoreCase: false,

+    escapeChar: ""

+};

+

+

+/*

+    packer, version 2.0.2 (2005-08-19)

+    Copyright 2004-2005, Dean Edwards

+    License: http://creativecommons.org/licenses/LGPL/2.1/

+*/

+

+function pack(_script, _encoding, _fastDecode, _specialChars) {

+    // constants

+    var $IGNORE = "$1";

+

+    // validate parameters

+    _script += "\n";

+    _encoding = Math.min(parseInt(_encoding), 95);

+

+    // apply all parsing routines

+    function _pack($script) {

+        var i, $parse;

+        for (i = 0; ($parse = _parsers[i]); i++) {

+            $script = $parse($script);

+        }

+        return $script;

+    };

+

+    // unpacking function - this is the boot strap function

+    //  data extracted from this packing routine is passed to

+    //  this function when decoded in the target

+    var _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;

+    };

+

+    // code-snippet inserted into the unpacker to speed up decoding

+    var _decode = function() {

+        // does the browser support String.replace where the

+        //  replacement value is a function?

+        if (!''.replace(/^/, String)) {

+            // decode all the values we need

+            while ($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;

+        }

+    };

+

+    // keep a list of parsing functions, they'll be executed all at once

+    var _parsers = [];

+    function _addParser($parser) {

+        _parsers[_parsers.length] = $parser;

+    };

+

+    // zero encoding - just removal of white space and comments

+    function _basicCompression($script) {

+        var $parser = new ParseMaster;

+        // make safe

+        $parser.escapeChar = "\\";

+        // protect strings

+        $parser.add(/'[^'\n\r]*'/, $IGNORE);

+        $parser.add(/"[^"\n\r]*"/, $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?/, $IGNORE);

+        // remove: ;;; doSomething();

+        //if (_specialChars) $parser.add(/;;;[^\n\r]+[\n\r]/);

+        // remove redundant semi-colons

+        $parser.add(/\(;;\)/, $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+/, "");

+        // done

+        return $parser.exec($script);

+    };

+

+    function _encodeSpecialChars($script) {

+        var $parser = new ParseMaster;

+        // replace: $name -> n, $$name -> na

+        $parser.add(/((\x24+)([a-zA-Z$_]+))(\d*)/, function($match, $offset) {

+            var $length = $match[$offset + 2].length;

+            var $start = $length - Math.max($length - $match[$offset + 3].length, 0);

+            return $match[$offset + 1].substr($start, $length) + $match[$offset + 4];

+        });

+        // replace: _name -> _0, double-underscore (__name) is ignored

+        var $regexp = /\b_[A-Za-z\d]\w*/;

+        // build the word list

+        var $keywords = _analyze($script, _globalize($regexp), _encodePrivate);

+        // quick ref

+        var $encoded = $keywords.$encoded;

+        $parser.add($regexp, function($match, $offset) {

+            return $encoded[$match[$offset]];

+        });

+        return $parser.exec($script);

+    };

+

+    function _encodeKeywords($script) {

+        // escape high-ascii values already in the script (i.e. in strings)

+        if (_encoding > 62) $script = _escape95($script);

+        // create the parser

+        var $parser = new ParseMaster;

+        var $encode = _getEncoder(_encoding);

+        // for high-ascii, don't encode single character low-ascii

+        var $regexp = (_encoding > 62) ? /\w\w+/ : /\w+/;

+        // build the word list

+        $keywords = _analyze($script, _globalize($regexp), $encode);

+        var $encoded = $keywords.$encoded;

+        // encode

+        $parser.add($regexp, function($match, $offset) {

+        return $encoded[$match[$offset]];

+        });

+        // if encoded, wrap the script in a decoding function

+        return $script && _bootStrap($parser.exec($script), $keywords);

+    };

+

+    function _analyze($script, $regexp, $encode) {

+        // analyse

+        // retreive all words in the script

+        var $all = $script.match($regexp);

+        var $$sorted = []; // list of words sorted by frequency

+        var $$encoded = {}; // dictionary of word->encoding

+        var $$protected = {}; // instances of "protected" words

+        if ($all) {

+            var $unsorted = []; // same list, not sorted

+            var $protected = {}; // "protected" words (dictionary of word->"word")

+            var $values = {}; // dictionary of charCode->encoding (eg. 256->ff)

+            var $count = {}; // word->count

+            var i = $all.length, j = 0, $word;

+            // count the occurrences - used for sorting later

+            do {

+                $word = "$" + $all[--i];

+                if (!$count[$word]) {

+                    $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

+                    $protected["$" + ($values[j] = $encode(j))] = j++;

+                }

+                // increment the word counter

+                $count[$word]++;

+            } while (i);

+            // 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 = $unsorted.length;

+            do {

+                $word = $unsorted[--i];

+                if ($protected[$word] != null) {

+                    $$sorted[$protected[$word]] = $word.slice(1);

+                    $$protected[$protected[$word]] = true;

+                    $count[$word] = 0;

+                }

+            } while (i);

+            // sort the words by frequency

+            $unsorted.sort(function($match1, $match2) {

+                return $count[$match2] - $count[$match1];

+            });

+            j = 0;

+            // because there are "protected" words in the list

+            //  we must add the sorted words around them

+            do {

+                if ($$sorted[i] == null) $$sorted[i] = $unsorted[j++].slice(1);

+                $$encoded[$$sorted[i]] = $values[i];

+            } while (++i < $unsorted.length);

+        }

+        return {$sorted: $$sorted, $encoded: $$encoded, $protected: $$protected};

+    };

+

+    // build the boot function used for loading and decoding

+    function _bootStrap($packed, $keywords) {

+        var $ENCODE = _safeRegExp("$encode\\($count\\)", "g");

+

+        // $packed: the packed script

+        $packed = "'" + _escape($packed) + "'";

+

+        // $ascii: base for encoding

+        var $ascii = Math.min($keywords.$sorted.length, _encoding) || 1;

+

+        // $count: number of words contained in the script

+        var $count = $keywords.$sorted.length;

+

+        // $keywords: list of words contained in the script

+        for (var i in $keywords.$protected) $keywords.$sorted[i] = "";

+        // convert from a string to an array

+        $keywords = "'" + $keywords.$sorted.join("|") + "'.split('|')";

+

+        // $encode: encoding function (used for decoding the script)

+        var $encode = _encoding > 62 ? _encode95 : _getEncoder($ascii);

+        $encode = String($encode).replace(/_encoding/g, "$ascii").replace(/arguments\.callee/g, "$encode");

+        var $inline = "$count" + ($ascii > 10 ? ".toString($ascii)" : "");

+

+        // $decode: code snippet to speed up decoding

+        if (_fastDecode) {

+            // create the decoder

+            var $decode = _getFunctionBody(_decode);

+            if (_encoding > 62) $decode = $decode.replace(/\\\\w/g, "[\\xa1-\\xff]");

+            // perform the encoding inline for lower ascii values

+            else if ($ascii < 36) $decode = $decode.replace($ENCODE, $inline);

+            // 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) $decode = $decode.replace(_safeRegExp("($count)\\s*=\\s*1"), "$1=0");

+        }

+

+        // boot function

+        var $unpack = String(_unpack);

+        if (_fastDecode) {

+            // insert the decoder

+            $unpack = $unpack.replace(/\{/, "{" + $decode + ";");

+        }

+        $unpack = $unpack.replace(/"/g, "'");

+        if (_encoding > 62) { // high-ascii

+            // get rid of the word-boundaries for regexp matches

+            $unpack = $unpack.replace(/'\\\\b'\s*\+|\+\s*'\\\\b'/g, "");

+        }

+        if ($ascii > 36 || _encoding > 62 || _fastDecode) {

+            // insert the encode function

+            $unpack = $unpack.replace(/\{/, "{$encode=" + $encode + ";");

+        } else {

+            // perform the encoding inline

+            $unpack = $unpack.replace($ENCODE, $inline);

+        }

+        // pack the boot function too

+        $unpack = pack($unpack, 0, false, true);

+

+        // arguments

+        var $params = [$packed, $ascii, $count, $keywords];

+        if (_fastDecode) {

+            // insert placeholders for the decoder

+            $params = $params.concat(0, "{}");

+        }

+

+        // the whole thing

+        return "eval(" + $unpack + "(" + $params + "))\n";

+    };

+

+    // mmm.. ..which one do i need ??

+    function _getEncoder($ascii) {

+        return $ascii > 10 ? $ascii > 36 ? $ascii > 62 ? _encode95 : _encode62 : _encode36 : _encode10;

+    };

+

+    // zero encoding

+    // characters: 0123456789

+    var _encode10 = function($charCode) {

+        return $charCode;

+    };

+

+    // inherent base36 support

+    // characters: 0123456789abcdefghijklmnopqrstuvwxyz

+    var _encode36 = function($charCode) {

+        return $charCode.toString(36);

+    };

+

+    // hitch a ride on base36 and add the upper case alpha characters

+    // characters: 0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ

+    var _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: ¡¢£¤¥¦§¨©ª«¬­®¯°±²³´µ¶·¸¹º»¼½¾¿ÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖ×ØÙÚÛÜÝÞßàáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþ

+    var _encode95 = function($charCode) {

+        return ($charCode < _encoding ? '' : arguments.callee($charCode / _encoding)) +

+            String.fromCharCode($charCode % _encoding + 161);

+    };

+

+    // special _chars

+    var _encodePrivate = function($charCode) {

+        return "_" + $charCode;

+    };

+

+    // protect characters used by the parser

+    function _escape($script) {

+        return $script.replace(/([\\'])/g, "\\$1");

+    };

+

+    // protect high-ascii characters already in the script

+    function _escape95($script) {

+        return $script.replace(/[\xa1-\xff]/g, function($match) {

+            return "\\x" + $match.charCodeAt(0).toString(16);

+        });

+    };

+

+    function _safeRegExp($string, $flags) {

+        return new RegExp($string.replace(/\$/g, "\\$"), $flags);

+    };

+

+    // extract the body of a function

+    function _getFunctionBody($function) {

+        with (String($function)) return slice(indexOf("{") + 1, lastIndexOf("}"));

+    };

+

+    // set the global flag on a RegExp (you have to create a new one)

+    function _globalize($regexp) {

+        return new RegExp(String($regexp).slice(1, -1), "g");

+    };

+

+    // build the parsing routine

+    _addParser(_basicCompression);

+    if (_specialChars) _addParser(_encodeSpecialChars);

+    if (_encoding) _addParser(_encodeKeywords);

+

+    // go!

+    return _pack(_script);

+};

+

+print(pack(readFile(arguments[0])));