initial commit

[namibia] / public / js / vendor / ape-source / mootools-core.js

/*
---

name: Core

description: The core of MooTools, contains all the base functions and the Native and Hash implementations. Required by all the other scripts.

license: MIT-style license.

copyright: Copyright (c) 2006-2008 [Valerio Proietti](http://mad4milk.net/).

authors: The MooTools production team (http://mootools.net/developers/)

inspiration:
  - Class implementation inspired by [Base.js](http://dean.edwards.name/weblog/2006/03/base/) Copyright (c) 2006 Dean Edwards, [GNU Lesser General Public License](http://opensource.org/licenses/lgpl-license.php)
  - Some functionality inspired by [Prototype.js](http://prototypejs.org) Copyright (c) 2005-2007 Sam Stephenson, [MIT License](http://opensource.org/licenses/mit-license.php)

provides: [MooTools, Native, Hash.base, Array.each, $util]

...
*/

var MooTools = {
        'version': '1.2.5',
        'build': '008d8f0f2fcc2044e54fdd3635341aaab274e757'
};

var Native = function(options){
        options = options || {};
        var name = options.name;
        var legacy = options.legacy;
        var protect = options.protect;
        var methods = options.implement;
        var generics = options.generics;
        var initialize = options.initialize;
        var afterImplement = options.afterImplement || function(){};
        var object = initialize || legacy;
        generics = generics !== false;

        object.constructor = Native;
        object.$family = {name: 'native'};
        if (legacy && initialize) object.prototype = legacy.prototype;
        object.prototype.constructor = object;

        if (name){
                var family = name.toLowerCase();
                object.prototype.$family = {name: family};
                Native.typize(object, family);
        }

        var add = function(obj, name, method, force){
                if (!protect || force || !obj.prototype[name]) obj.prototype[name] = method;
                if (generics) Native.genericize(obj, name, protect);
                afterImplement.call(obj, name, method);
                return obj;
        };

        object.alias = function(a1, a2, a3){
                if (typeof a1 == 'string'){
                        var pa1 = this.prototype[a1];
                        if ((a1 = pa1)) return add(this, a2, a1, a3);
                }
                for (var a in a1) this.alias(a, a1[a], a2);
                return this;
        };

        object.implement = function(a1, a2, a3){
                if (typeof a1 == 'string') return add(this, a1, a2, a3);
                for (var p in a1) add(this, p, a1[p], a2);
                return this;
        };

        if (methods) object.implement(methods);

        return object;
};

Native.genericize = function(object, property, check){
        if ((!check || !object[property]) && typeof object.prototype[property] == 'function') object[property] = function(){
                var args = Array.prototype.slice.call(arguments);
                return object.prototype[property].apply(args.shift(), args);
        };
};

Native.implement = function(objects, properties){
        for (var i = 0, l = objects.length; i < l; i++) objects[i].implement(properties);
};

Native.typize = function(object, family){
        if (!object.type) object.type = function(item){
                return ($type(item) === family);
        };
};

(function(){
        var natives = {'Array': Array, 'Date': Date, 'Function': Function, 'Number': Number, 'RegExp': RegExp, 'String': String};
        for (var n in natives) new Native({name: n, initialize: natives[n], protect: true});

        var types = {'boolean': Boolean, 'native': Native, 'object': Object};
        for (var t in types) Native.typize(types[t], t);

        var generics = {
                'Array': ["concat", "indexOf", "join", "lastIndexOf", "pop", "push", "reverse", "shift", "slice", "sort", "splice", "toString", "unshift", "valueOf"],
                'String': ["charAt", "charCodeAt", "concat", "indexOf", "lastIndexOf", "match", "replace", "search", "slice", "split", "substr", "substring", "toLowerCase", "toUpperCase", "valueOf"]
        };
        for (var g in generics){
                for (var i = generics[g].length; i--;) Native.genericize(natives[g], generics[g][i], true);
        }
})();

var Hash = new Native({

        name: 'Hash',

        initialize: function(object){
                if ($type(object) == 'hash') object = $unlink(object.getClean());
                for (var key in object) this[key] = object[key];
                return this;
        }

});

Hash.implement({

        forEach: function(fn, bind){
                for (var key in this){
                        if (this.hasOwnProperty(key)) fn.call(bind, this[key], key, this);
                }
        },

        getClean: function(){
                var clean = {};
                for (var key in this){
                        if (this.hasOwnProperty(key)) clean[key] = this[key];
                }
                return clean;
        },

        getLength: function(){
                var length = 0;
                for (var key in this){
                        if (this.hasOwnProperty(key)) length++;
                }
                return length;
        }

});

Hash.alias('forEach', 'each');

Array.implement({

        forEach: function(fn, bind){
                for (var i = 0, l = this.length; i < l; i++) fn.call(bind, this[i], i, this);
        }

});

Array.alias('forEach', 'each');

function $A(iterable){
        if (iterable.item){
                var l = iterable.length, array = new Array(l);
                while (l--) array[l] = iterable[l];
                return array;
        }
        return Array.prototype.slice.call(iterable);
};

function $arguments(i){
        return function(){
                return arguments[i];
        };
};

function $chk(obj){
        return !!(obj || obj === 0);
};

function $clear(timer){
        clearTimeout(timer);
        clearInterval(timer);
        return null;
};

function $defined(obj){
        return (obj != undefined);
};

function $each(iterable, fn, bind){
        var type = $type(iterable);
        ((type == 'arguments' || type == 'collection' || type == 'array') ? Array : Hash).each(iterable, fn, bind);
};

function $empty(){};

function $extend(original, extended){
        for (var key in (extended || {})) original[key] = extended[key];
        return original;
};

function $H(object){
        return new Hash(object);
};

function $lambda(value){
        return ($type(value) == 'function') ? value : function(){
                return value;
        };
};

function $merge(){
        var args = Array.slice(arguments);
        args.unshift({});
        return $mixin.apply(null, args);
};

function $mixin(mix){
        for (var i = 1, l = arguments.length; i < l; i++){
                var object = arguments[i];
                if ($type(object) != 'object') continue;
                for (var key in object){
                        var op = object[key], mp = mix[key];
                        mix[key] = (mp && $type(op) == 'object' && $type(mp) == 'object') ? $mixin(mp, op) : $unlink(op);
                }
        }
        return mix;
};

function $pick(){
        for (var i = 0, l = arguments.length; i < l; i++){
                if (arguments[i] != undefined) return arguments[i];
        }
        return null;
};

function $random(min, max){
        return Math.floor(Math.random() * (max - min + 1) + min);
};

function $splat(obj){
        var type = $type(obj);
        return (type) ? ((type != 'array' && type != 'arguments') ? [obj] : obj) : [];
};

var $time = Date.now || function(){
        return +new Date;
};

function $try(){
        for (var i = 0, l = arguments.length; i < l; i++){
                try {
                        return arguments[i]();
                } catch(e){}
        }
        return null;
};

function $type(obj){
        if (obj == undefined) return false;
        if (obj.$family) return (obj.$family.name == 'number' && !isFinite(obj)) ? false : obj.$family.name;
        if (obj.nodeName){
                switch (obj.nodeType){
                        case 1: return 'element';
                        case 3: return (/\S/).test(obj.nodeValue) ? 'textnode' : 'whitespace';
                }
        } else if (typeof obj.length == 'number'){
                if (obj.callee) return 'arguments';
                else if (obj.item) return 'collection';
        }
        return typeof obj;
};

function $unlink(object){
        var unlinked;
        switch ($type(object)){
                case 'object':
                        unlinked = {};
                        for (var p in object) unlinked[p] = $unlink(object[p]);
                break;
                case 'hash':
                        unlinked = new Hash(object);
                break;
                case 'array':
                        unlinked = [];
                        for (var i = 0, l = object.length; i < l; i++) unlinked[i] = $unlink(object[i]);
                break;
                default: return object;
        }
        return unlinked;
};


/*
---

name: Browser

description: The Browser Core. Contains Browser initialization, Window and Document, and the Browser Hash.

license: MIT-style license.

requires: [Native, $util]

provides: [Browser, Window, Document, $exec]

...
*/

var Browser = $merge({

        Engine: {name: 'unknown', version: 0},

        Platform: {name: (window.orientation != undefined) ? 'ipod' : (navigator.platform.match(/mac|win|linux/i) || ['other'])[0].toLowerCase()},

        Features: {xpath: !!(document.evaluate), air: !!(window.runtime), query: !!(document.querySelector)},

        Plugins: {},

        Engines: {

                presto: function(){
                        return (!window.opera) ? false : ((arguments.callee.caller) ? 960 : ((document.getElementsByClassName) ? 950 : 925));
                },

                trident: function(){
                        return (!window.ActiveXObject) ? false : ((window.XMLHttpRequest) ? ((document.querySelectorAll) ? 6 : 5) : 4);
                },

                webkit: function(){
                        return (navigator.taintEnabled) ? false : ((Browser.Features.xpath) ? ((Browser.Features.query) ? 525 : 420) : 419);
                },

                gecko: function(){
                        return (!document.getBoxObjectFor && window.mozInnerScreenX == null) ? false : ((document.getElementsByClassName) ? 19 : 18);
                }

        }

}, Browser || {});

Browser.Platform[Browser.Platform.name] = true;

Browser.detect = function(){

        for (var engine in this.Engines){
                var version = this.Engines[engine]();
                if (version){
                        this.Engine = {name: engine, version: version};
                        this.Engine[engine] = this.Engine[engine + version] = true;
                        break;
                }
        }

        return {name: engine, version: version};

};

Browser.detect();

Browser.Request = function(){
        return $try(function(){
                return new XMLHttpRequest();
        }, function(){
                return new ActiveXObject('MSXML2.XMLHTTP');
        }, function(){
                return new ActiveXObject('Microsoft.XMLHTTP');
        });
};

Browser.Features.xhr = !!(Browser.Request());

Browser.Plugins.Flash = (function(){
        var version = ($try(function(){
                return navigator.plugins['Shockwave Flash'].description;
        }, function(){
                return new ActiveXObject('ShockwaveFlash.ShockwaveFlash').GetVariable('$version');
        }) || '0 r0').match(/\d+/g);
        return {version: parseInt(version[0] || 0 + '.' + version[1], 10) || 0, build: parseInt(version[2], 10) || 0};
})();

function $exec(text){
        if (!text) return text;
        if (window.execScript){
                window.execScript(text);
        } else {
                var script = document.createElement('script');
                script.setAttribute('type', 'text/javascript');
                script[(Browser.Engine.webkit && Browser.Engine.version < 420) ? 'innerText' : 'text'] = text;
                document.head.appendChild(script);
                document.head.removeChild(script);
        }
        return text;
};

Native.UID = 1;

var $uid = (Browser.Engine.trident) ? function(item){
        return (item.uid || (item.uid = [Native.UID++]))[0];
} : function(item){
        return item.uid || (item.uid = Native.UID++);
};

var Window = new Native({

        name: 'Window',

        legacy: (Browser.Engine.trident) ? null: window.Window,

        initialize: function(win){
                $uid(win);
                if (!win.Element){
                        win.Element = $empty;
                        if (Browser.Engine.webkit) win.document.createElement("iframe"); //fixes safari 2
                        win.Element.prototype = (Browser.Engine.webkit) ? window["[[DOMElement.prototype]]"] : {};
                }
                win.document.window = win;
                return $extend(win, Window.Prototype);
        },

        afterImplement: function(property, value){
                window[property] = Window.Prototype[property] = value;
        }

});

Window.Prototype = {$family: {name: 'window'}};

new Window(window);

var Document = new Native({

        name: 'Document',

        legacy: (Browser.Engine.trident) ? null: window.Document,

        initialize: function(doc){
                $uid(doc);
                doc.head = doc.getElementsByTagName('head')[0];
                doc.html = doc.getElementsByTagName('html')[0];
                if (Browser.Engine.trident && Browser.Engine.version <= 4) $try(function(){
                        doc.execCommand("BackgroundImageCache", false, true);
                });
                if (Browser.Engine.trident) doc.window.attachEvent('onunload', function(){
                        doc.window.detachEvent('onunload', arguments.callee);
                        doc.head = doc.html = doc.window = null;
                });
                return $extend(doc, Document.Prototype);
        },

        afterImplement: function(property, value){
                document[property] = Document.Prototype[property] = value;
        }

});

Document.Prototype = {$family: {name: 'document'}};

new Document(document);


/*
---

name: Array

description: Contains Array Prototypes like each, contains, and erase.

license: MIT-style license.

requires: [$util, Array.each]

provides: Array

...
*/

Array.implement({

        every: function(fn, bind){
                for (var i = 0, l = this.length; i < l; i++){
                        if (!fn.call(bind, this[i], i, this)) return false;
                }
                return true;
        },

        filter: function(fn, bind){
                var results = [];
                for (var i = 0, l = this.length; i < l; i++){
                        if (fn.call(bind, this[i], i, this)) results.push(this[i]);
                }
                return results;
        },

        clean: function(){
                return this.filter($defined);
        },

        indexOf: function(item, from){
                var len = this.length;
                for (var i = (from < 0) ? Math.max(0, len + from) : from || 0; i < len; i++){
                        if (this[i] === item) return i;
                }
                return -1;
        },

        map: function(fn, bind){
                var results = [];
                for (var i = 0, l = this.length; i < l; i++) results[i] = fn.call(bind, this[i], i, this);
                return results;
        },

        some: function(fn, bind){
                for (var i = 0, l = this.length; i < l; i++){
                        if (fn.call(bind, this[i], i, this)) return true;
                }
                return false;
        },

        associate: function(keys){
                var obj = {}, length = Math.min(this.length, keys.length);
                for (var i = 0; i < length; i++) obj[keys[i]] = this[i];
                return obj;
        },

        link: function(object){
                var result = {};
                for (var i = 0, l = this.length; i < l; i++){
                        for (var key in object){
                                if (object[key](this[i])){
                                        result[key] = this[i];
                                        delete object[key];
                                        break;
                                }
                        }
                }
                return result;
        },

        contains: function(item, from){
                return this.indexOf(item, from) != -1;
        },

        extend: function(array){
                for (var i = 0, j = array.length; i < j; i++) this.push(array[i]);
                return this;
        },
        
        getLast: function(){
                return (this.length) ? this[this.length - 1] : null;
        },

        getRandom: function(){
                return (this.length) ? this[$random(0, this.length - 1)] : null;
        },

        include: function(item){
                if (!this.contains(item)) this.push(item);
                return this;
        },

        combine: function(array){
                for (var i = 0, l = array.length; i < l; i++) this.include(array[i]);
                return this;
        },

        erase: function(item){
                for (var i = this.length; i--; i){
                        if (this[i] === item) this.splice(i, 1);
                }
                return this;
        },

        empty: function(){
                this.length = 0;
                return this;
        },

        flatten: function(){
                var array = [];
                for (var i = 0, l = this.length; i < l; i++){
                        var type = $type(this[i]);
                        if (!type) continue;
                        array = array.concat((type == 'array' || type == 'collection' || type == 'arguments') ? Array.flatten(this[i]) : this[i]);
                }
                return array;
        },

        hexToRgb: function(array){
                if (this.length != 3) return null;
                var rgb = this.map(function(value){
                        if (value.length == 1) value += value;
                        return value.toInt(16);
                });
                return (array) ? rgb : 'rgb(' + rgb + ')';
        },

        rgbToHex: function(array){
                if (this.length < 3) return null;
                if (this.length == 4 && this[3] == 0 && !array) return 'transparent';
                var hex = [];
                for (var i = 0; i < 3; i++){
                        var bit = (this[i] - 0).toString(16);
                        hex.push((bit.length == 1) ? '0' + bit : bit);
                }
                return (array) ? hex : '#' + hex.join('');
        }

});


/*
---

name: Function

description: Contains Function Prototypes like create, bind, pass, and delay.

license: MIT-style license.

requires: [Native, $util]

provides: Function

...
*/

try {
        delete Function.prototype.bind;
} catch(e){}

Function.implement({

        extend: function(properties){
                for (var property in properties) this[property] = properties[property];
                return this;
        },

        create: function(options){
                var self = this;
                options = options || {};
                return function(event){
                        var args = options.arguments;
                        args = (args != undefined) ? $splat(args) : Array.slice(arguments, (options.event) ? 1 : 0);
                        if (options.event) args = [event || window.event].extend(args);
                        var returns = function(){
                                return self.apply(options.bind || null, args);
                        };
                        if (options.delay) return setTimeout(returns, options.delay);
                        if (options.periodical) return setInterval(returns, options.periodical);
                        if (options.attempt) return $try(returns);
                        return returns();
                };
        },

        run: function(args, bind){
                return this.apply(bind, $splat(args));
        },

        pass: function(args, bind){
                return this.create({bind: bind, arguments: args});
        },

        bind: function(bind, args){
                return this.create({bind: bind, arguments: args});
        },

        bindWithEvent: function(bind, args){
                return this.create({bind: bind, arguments: args, event: true});
        },

        attempt: function(args, bind){
                return this.create({bind: bind, arguments: args, attempt: true})();
        },

        delay: function(delay, bind, args){
                return this.create({bind: bind, arguments: args, delay: delay})();
        },

        periodical: function(periodical, bind, args){
                return this.create({bind: bind, arguments: args, periodical: periodical})();
        }

});


/*
---

name: Number

description: Contains Number Prototypes like limit, round, times, and ceil.

license: MIT-style license.

requires: [Native, $util]

provides: Number

...
*/

Number.implement({

        limit: function(min, max){
                return Math.min(max, Math.max(min, this));
        },

        round: function(precision){
                precision = Math.pow(10, precision || 0);
                return Math.round(this * precision) / precision;
        },

        times: function(fn, bind){
                for (var i = 0; i < this; i++) fn.call(bind, i, this);
        },

        toFloat: function(){
                return parseFloat(this);
        },

        toInt: function(base){
                return parseInt(this, base || 10);
        }

});

Number.alias('times', 'each');

(function(math){
        var methods = {};
        math.each(function(name){
                if (!Number[name]) methods[name] = function(){
                        return Math[name].apply(null, [this].concat($A(arguments)));
                };
        });
        Number.implement(methods);
})(['abs', 'acos', 'asin', 'atan', 'atan2', 'ceil', 'cos', 'exp', 'floor', 'log', 'max', 'min', 'pow', 'sin', 'sqrt', 'tan']);


/*
---

name: String

description: Contains String Prototypes like camelCase, capitalize, test, and toInt.

license: MIT-style license.

requires: Native

provides: String

...
*/

String.implement({

        test: function(regex, params){
                return ((typeof regex == 'string') ? new RegExp(regex, params) : regex).test(this);
        },

        contains: function(string, separator){
                return (separator) ? (separator + this + separator).indexOf(separator + string + separator) > -1 : this.indexOf(string) > -1;
        },

        trim: function(){
                return this.replace(/^\s+|\s+$/g, '');
        },

        clean: function(){
                return this.replace(/\s+/g, ' ').trim();
        },

        camelCase: function(){
                return this.replace(/-\D/g, function(match){
                        return match.charAt(1).toUpperCase();
                });
        },

        hyphenate: function(){
                return this.replace(/[A-Z]/g, function(match){
                        return ('-' + match.charAt(0).toLowerCase());
                });
        },

        capitalize: function(){
                return this.replace(/\b[a-z]/g, function(match){
                        return match.toUpperCase();
                });
        },

        escapeRegExp: function(){
                return this.replace(/([-.*+?^${}()|[\]\/\\])/g, '\\$1');
        },

        toInt: function(base){
                return parseInt(this, base || 10);
        },

        toFloat: function(){
                return parseFloat(this);
        },

        hexToRgb: function(array){
                var hex = this.match(/^#?(\w{1,2})(\w{1,2})(\w{1,2})$/);
                return (hex) ? hex.slice(1).hexToRgb(array) : null;
        },

        rgbToHex: function(array){
                var rgb = this.match(/\d{1,3}/g);
                return (rgb) ? rgb.rgbToHex(array) : null;
        },

        stripScripts: function(option){
                var scripts = '';
                var text = this.replace(/<script[^>]*>([\s\S]*?)<\/script>/gi, function(){
                        scripts += arguments[1] + '\n';
                        return '';
                });
                if (option === true) $exec(scripts);
                else if ($type(option) == 'function') option(scripts, text);
                return text;
        },

        substitute: function(object, regexp){
                return this.replace(regexp || (/\\?\{([^{}]+)\}/g), function(match, name){
                        if (match.charAt(0) == '\\') return match.slice(1);
                        return (object[name] != undefined) ? object[name] : '';
                });
        }

});


/*
---

name: Hash

description: Contains Hash Prototypes. Provides a means for overcoming the JavaScript practical impossibility of extending native Objects.

license: MIT-style license.

requires: Hash.base

provides: Hash

...
*/

Hash.implement({

        has: Object.prototype.hasOwnProperty,

        keyOf: function(value){
                for (var key in this){
                        if (this.hasOwnProperty(key) && this[key] === value) return key;
                }
                return null;
        },

        hasValue: function(value){
                return (Hash.keyOf(this, value) !== null);
        },

        extend: function(properties){
                Hash.each(properties || {}, function(value, key){
                        Hash.set(this, key, value);
                }, this);
                return this;
        },

        combine: function(properties){
                Hash.each(properties || {}, function(value, key){
                        Hash.include(this, key, value);
                }, this);
                return this;
        },

        erase: function(key){
                if (this.hasOwnProperty(key)) delete this[key];
                return this;
        },

        get: function(key){
                return (this.hasOwnProperty(key)) ? this[key] : null;
        },

        set: function(key, value){
                if (!this[key] || this.hasOwnProperty(key)) this[key] = value;
                return this;
        },

        empty: function(){
                Hash.each(this, function(value, key){
                        delete this[key];
                }, this);
                return this;
        },

        include: function(key, value){
                if (this[key] == undefined) this[key] = value;
                return this;
        },

        map: function(fn, bind){
                var results = new Hash;
                Hash.each(this, function(value, key){
                        results.set(key, fn.call(bind, value, key, this));
                }, this);
                return results;
        },

        filter: function(fn, bind){
                var results = new Hash;
                Hash.each(this, function(value, key){
                        if (fn.call(bind, value, key, this)) results.set(key, value);
                }, this);
                return results;
        },

        every: function(fn, bind){
                for (var key in this){
                        if (this.hasOwnProperty(key) && !fn.call(bind, this[key], key)) return false;
                }
                return true;
        },

        some: function(fn, bind){
                for (var key in this){
                        if (this.hasOwnProperty(key) && fn.call(bind, this[key], key)) return true;
                }
                return false;
        },

        getKeys: function(){
                var keys = [];
                Hash.each(this, function(value, key){
                        keys.push(key);
                });
                return keys;
        },

        getValues: function(){
                var values = [];
                Hash.each(this, function(value){
                        values.push(value);
                });
                return values;
        },

        toQueryString: function(base){
                var queryString = [];
                Hash.each(this, function(value, key){
                        if (base) key = base + '[' + key + ']';
                        var result;
                        switch ($type(value)){
                                case 'object': result = Hash.toQueryString(value, key); break;
                                case 'array':
                                        var qs = {};
                                        value.each(function(val, i){
                                                qs[i] = val;
                                        });
                                        result = Hash.toQueryString(qs, key);
                                break;
                                default: result = key + '=' + encodeURIComponent(value);
                        }
                        if (value != undefined) queryString.push(result);
                });

                return queryString.join('&');
        }

});

Hash.alias({keyOf: 'indexOf', hasValue: 'contains'});


/*
---

name: Event

description: Contains the Event Class, to make the event object cross-browser.

license: MIT-style license.

requires: [Window, Document, Hash, Array, Function, String]

provides: Event

...
*/

var Event = new Native({

        name: 'Event',

        initialize: function(event, win){
                win = win || window;
                var doc = win.document;
                event = event || win.event;
                if (event.$extended) return event;
                this.$extended = true;
                var type = event.type;
                var target = event.target || event.srcElement;
                while (target && target.nodeType == 3) target = target.parentNode;

                if (type.test(/key/)){
                        var code = event.which || event.keyCode;
                        var key = Event.Keys.keyOf(code);
                        if (type == 'keydown'){
                                var fKey = code - 111;
                                if (fKey > 0 && fKey < 13) key = 'f' + fKey;
                        }
                        key = key || String.fromCharCode(code).toLowerCase();
                } else if (type.match(/(click|mouse|menu)/i)){
                        doc = (!doc.compatMode || doc.compatMode == 'CSS1Compat') ? doc.html : doc.body;
                        var page = {
                                x: event.pageX || event.clientX + doc.scrollLeft,
                                y: event.pageY || event.clientY + doc.scrollTop
                        };
                        var client = {
                                x: (event.pageX) ? event.pageX - win.pageXOffset : event.clientX,
                                y: (event.pageY) ? event.pageY - win.pageYOffset : event.clientY
                        };
                        if (type.match(/DOMMouseScroll|mousewheel/)){
                                var wheel = (event.wheelDelta) ? event.wheelDelta / 120 : -(event.detail || 0) / 3;
                        }
                        var rightClick = (event.which == 3) || (event.button == 2);
                        var related = null;
                        if (type.match(/over|out/)){
                                switch (type){
                                        case 'mouseover': related = event.relatedTarget || event.fromElement; break;
                                        case 'mouseout': related = event.relatedTarget || event.toElement;
                                }
                                if (!(function(){
                                        while (related && related.nodeType == 3) related = related.parentNode;
                                        return true;
                                }).create({attempt: Browser.Engine.gecko})()) related = false;
                        }
                }

                return $extend(this, {
                        event: event,
                        type: type,

                        page: page,
                        client: client,
                        rightClick: rightClick,

                        wheel: wheel,

                        relatedTarget: related,
                        target: target,

                        code: code,
                        key: key,

                        shift: event.shiftKey,
                        control: event.ctrlKey,
                        alt: event.altKey,
                        meta: event.metaKey
                });
        }

});

Event.Keys = new Hash({
        'enter': 13,
        'up': 38,
        'down': 40,
        'left': 37,
        'right': 39,
        'esc': 27,
        'space': 32,
        'backspace': 8,
        'tab': 9,
        'delete': 46
});

Event.implement({

        stop: function(){
                return this.stopPropagation().preventDefault();
        },

        stopPropagation: function(){
                if (this.event.stopPropagation) this.event.stopPropagation();
                else this.event.cancelBubble = true;
                return this;
        },

        preventDefault: function(){
                if (this.event.preventDefault) this.event.preventDefault();
                else this.event.returnValue = false;
                return this;
        }

});


/*
---

name: Class

description: Contains the Class Function for easily creating, extending, and implementing reusable Classes.

license: MIT-style license.

requires: [$util, Native, Array, String, Function, Number, Hash]

provides: Class

...
*/

function Class(params){
        
        if (params instanceof Function) params = {initialize: params};
        
        var newClass = function(){
                Object.reset(this);
                if (newClass._prototyping) return this;
                this._current = $empty;
                var value = (this.initialize) ? this.initialize.apply(this, arguments) : this;
                delete this._current; delete this.caller;
                return value;
        }.extend(this);
        
        newClass.implement(params);
        
        newClass.constructor = Class;
        newClass.prototype.constructor = newClass;

        return newClass;

};

Function.prototype.protect = function(){
        this._protected = true;
        return this;
};

Object.reset = function(object, key){
                
        if (key == null){
                for (var p in object) Object.reset(object, p);
                return object;
        }
        
        delete object[key];
        
        switch ($type(object[key])){
                case 'object':
                        var F = function(){};
                        F.prototype = object[key];
                        var i = new F;
                        object[key] = Object.reset(i);
                break;
                case 'array': object[key] = $unlink(object[key]); break;
        }
        
        return object;
        
};

new Native({name: 'Class', initialize: Class}).extend({

        instantiate: function(F){
                F._prototyping = true;
                var proto = new F;
                delete F._prototyping;
                return proto;
        },
        
        wrap: function(self, key, method){
                if (method._origin) method = method._origin;
                
                return function(){
                        if (method._protected && this._current == null) throw new Error('The method "' + key + '" cannot be called.');
                        var caller = this.caller, current = this._current;
                        this.caller = current; this._current = arguments.callee;
                        var result = method.apply(this, arguments);
                        this._current = current; this.caller = caller;
                        return result;
                }.extend({_owner: self, _origin: method, _name: key});

        }
        
});

Class.implement({
        
        implement: function(key, value){
                
                if ($type(key) == 'object'){
                        for (var p in key) this.implement(p, key[p]);
                        return this;
                }
                
                var mutator = Class.Mutators[key];
                
                if (mutator){
                        value = mutator.call(this, value);
                        if (value == null) return this;
                }
                
                var proto = this.prototype;

                switch ($type(value)){
                        
                        case 'function':
                                if (value._hidden) return this;
                                proto[key] = Class.wrap(this, key, value);
                        break;
                        
                        case 'object':
                                var previous = proto[key];
                                if ($type(previous) == 'object') $mixin(previous, value);
                                else proto[key] = $unlink(value);
                        break;
                        
                        case 'array':
                                proto[key] = $unlink(value);
                        break;
                        
                        default: proto[key] = value;

                }
                
                return this;

        }
        
});

Class.Mutators = {
        
        Extends: function(parent){

                this.parent = parent;
                this.prototype = Class.instantiate(parent);

                this.implement('parent', function(){
                        var name = this.caller._name, previous = this.caller._owner.parent.prototype[name];
                        if (!previous) throw new Error('The method "' + name + '" has no parent.');
                        return previous.apply(this, arguments);
                }.protect());

        },

        Implements: function(items){
                $splat(items).each(function(item){
                        if (item instanceof Function) item = Class.instantiate(item);
                        this.implement(item);
                }, this);

        }
        
};


/*
---

name: Class.Extras

description: Contains Utility Classes that can be implemented into your own Classes to ease the execution of many common tasks.

license: MIT-style license.

requires: Class

provides: [Chain, Events, Options, Class.Extras]

...
*/

var Chain = new Class({

        $chain: [],

        chain: function(){
                this.$chain.extend(Array.flatten(arguments));
                return this;
        },

        callChain: function(){
                return (this.$chain.length) ? this.$chain.shift().apply(this, arguments) : false;
        },

        clearChain: function(){
                this.$chain.empty();
                return this;
        }

});

var Events = new Class({

        $events: {},

        addEvent: function(type, fn, internal){
                type = Events.removeOn(type);
                if (fn != $empty){
                        this.$events[type] = this.$events[type] || [];
                        this.$events[type].include(fn);
                        if (internal) fn.internal = true;
                }
                return this;
        },

        addEvents: function(events){
                for (var type in events) this.addEvent(type, events[type]);
                return this;
        },

        fireEvent: function(type, args, delay){
                type = Events.removeOn(type);
                if (!this.$events || !this.$events[type]) return this;
                this.$events[type].each(function(fn){
                        fn.create({'bind': this, 'delay': delay, 'arguments': args})();
                }, this);
                return this;
        },

        removeEvent: function(type, fn){
                type = Events.removeOn(type);
                if (!this.$events[type]) return this;
                if (!fn.internal) this.$events[type].erase(fn);
                return this;
        },

        removeEvents: function(events){
                var type;
                if ($type(events) == 'object'){
                        for (type in events) this.removeEvent(type, events[type]);
                        return this;
                }
                if (events) events = Events.removeOn(events);
                for (type in this.$events){
                        if (events && events != type) continue;
                        var fns = this.$events[type];
                        for (var i = fns.length; i--; i) this.removeEvent(type, fns[i]);
                }
                return this;
        }

});

Events.removeOn = function(string){
        return string.replace(/^on([A-Z])/, function(full, first){
                return first.toLowerCase();
        });
};

var Options = new Class({

        setOptions: function(){
                this.options = $merge.run([this.options].extend(arguments));
                if (!this.addEvent) return this;
                for (var option in this.options){
                        if ($type(this.options[option]) != 'function' || !(/^on[A-Z]/).test(option)) continue;
                        this.addEvent(option, this.options[option]);
                        delete this.options[option];
                }
                return this;
        }

});



/*
---

name: Cookie

description: Class for creating, reading, and deleting browser Cookies.

license: MIT-style license.

credits: Based on the functions by Peter-Paul Koch (http://quirksmode.org).

requires: Options

provides: Cookie

...
*/

var Cookie = new Class({

        Implements: Options,

        options: {
                path: false,
                domain: false,
                duration: false,
                secure: false,
                document: document
        },

        initialize: function(key, options){
                this.key = key;
                this.setOptions(options);
        },

        write: function(value){
                value = encodeURIComponent(value);
                if (this.options.domain) value += '; domain=' + this.options.domain;
                if (this.options.path) value += '; path=' + this.options.path;
                if (this.options.duration){
                        var date = new Date();
                        date.setTime(date.getTime() + this.options.duration * 24 * 60 * 60 * 1000);
                        value += '; expires=' + date.toGMTString();
                }
                if (this.options.secure) value += '; secure';
                this.options.document.cookie = this.key + '=' + value;
                return this;
        },

        read: function(){
                var value = this.options.document.cookie.match('(?:^|;)\\s*' + this.key.escapeRegExp() + '=([^;]*)');
                return (value) ? decodeURIComponent(value[1]) : null;
        },

        dispose: function(){
                new Cookie(this.key, $merge(this.options, {duration: -1})).write('');
                return this;
        }

});

Cookie.write = function(key, value, options){
        return new Cookie(key, options).write(value);
};

Cookie.read = function(key){
        return new Cookie(key).read();
};

Cookie.dispose = function(key, options){
        return new Cookie(key, options).dispose();
};


/*
---

name: Request

description: Powerful all purpose Request Class. Uses XMLHTTPRequest.

license: MIT-style license.

requires: [Element, Chain, Events, Options, Browser]

provides: Request

...
*/

var Request = new Class({

        Implements: [Chain, Events, Options],

        options: {/*
                onRequest: $empty,
                onComplete: $empty,
                onCancel: $empty,
                onSuccess: $empty,
                onFailure: $empty,
                onException: $empty,*/
                url: '',
                data: '',
                headers: {
                        'X-Requested-With': 'XMLHttpRequest',
                        'Accept': 'text/javascript, text/html, application/xml, text/xml, */*'
                },
                async: true,
                format: false,
                method: 'post',
                link: 'ignore',
                isSuccess: null,
                emulation: true,
                urlEncoded: true,
                encoding: 'utf-8',
                evalScripts: false,
                evalResponse: false,
                noCache: false
        },

        initialize: function(options){
                this.xhr = new Browser.Request();
                this.setOptions(options);
                this.options.isSuccess = this.options.isSuccess || this.isSuccess;
                this.headers = new Hash(this.options.headers);
        },

        onStateChange: function(){
                if (this.xhr.readyState != 4 || !this.running) return;
                this.running = false;
                this.status = 0;
                $try(function(){
                        this.status = this.xhr.status;
                }.bind(this));
                this.xhr.onreadystatechange = $empty;
                if (this.options.isSuccess.call(this, this.status)){
                        this.response = {text: this.xhr.responseText, xml: this.xhr.responseXML};
                        this.success(this.response.text, this.response.xml);
                } else {
                        this.response = {text: null, xml: null};
                        this.failure();
                }
        },

        isSuccess: function(){
                return ((this.status >= 200) && (this.status < 300));
        },

        processScripts: function(text){
                if (this.options.evalResponse || (/(ecma|java)script/).test(this.getHeader('Content-type'))) return $exec(text);
                return text.stripScripts(this.options.evalScripts);
        },

        success: function(text, xml){
                this.onSuccess(this.processScripts(text), xml);
        },

        onSuccess: function(){
                this.fireEvent('complete', arguments).fireEvent('success', arguments).callChain();
        },

        failure: function(){
                this.onFailure();
        },

        onFailure: function(){
                this.fireEvent('complete').fireEvent('failure', this.xhr);
        },

        setHeader: function(name, value){
                this.headers.set(name, value);
                return this;
        },

        getHeader: function(name){
                return $try(function(){
                        return this.xhr.getResponseHeader(name);
                }.bind(this));
        },

        check: function(){
                if (!this.running) return true;
                switch (this.options.link){
                        case 'cancel': this.cancel(); return true;
                        case 'chain': this.chain(this.caller.bind(this, arguments)); return false;
                }
                return false;
        },

        send: function(options){
                if (!this.check(options)) return this;
                this.running = true;

                var type = $type(options);
                if (type == 'string' || type == 'element') options = {data: options};

                var old = this.options;
                options = $extend({data: old.data, url: old.url, method: old.method}, options);
                var data = options.data, url = String(options.url), method = options.method.toLowerCase();

                switch ($type(data)){
                        case 'element': data = document.id(data).toQueryString(); break;
                        case 'object': case 'hash': data = Hash.toQueryString(data);
                }

                if (this.options.format){
                        var format = 'format=' + this.options.format;
                        data = (data) ? format + '&' + data : format;
                }

                if (this.options.emulation && !['get', 'post'].contains(method)){
                        var _method = '_method=' + method;
                        data = (data) ? _method + '&' + data : _method;
                        method = 'post';
                }

                if (this.options.urlEncoded && method == 'post'){
                        var encoding = (this.options.encoding) ? '; charset=' + this.options.encoding : '';
                        this.headers.set('Content-type', 'application/x-www-form-urlencoded' + encoding);
                }

                if (this.options.noCache){
                        var noCache = 'noCache=' + new Date().getTime();
                        data = (data) ? noCache + '&' + data : noCache;
                }

                var trimPosition = url.lastIndexOf('/');
                if (trimPosition > -1 && (trimPosition = url.indexOf('#')) > -1) url = url.substr(0, trimPosition);

                if (data && method == 'get'){
                        url = url + (url.contains('?') ? '&' : '?') + data;
                        data = null;
                }

                this.xhr.open(method.toUpperCase(), url, this.options.async);

                this.xhr.onreadystatechange = this.onStateChange.bind(this);

                this.headers.each(function(value, key){
                        try {
                                this.xhr.setRequestHeader(key, value);
                        } catch (e){
                                this.fireEvent('exception', [key, value]);
                        }
                }, this);

                this.fireEvent('request');
                this.xhr.send(data);
                if (!this.options.async) this.onStateChange();
                return this;
        },

        cancel: function(){
                if (!this.running) return this;
                this.running = false;
                this.xhr.abort();
                this.xhr.onreadystatechange = $empty;
                this.xhr = new Browser.Request();
                this.fireEvent('cancel');
                return this;
        }

});

(function(){

var methods = {};
['get', 'post', 'put', 'delete', 'GET', 'POST', 'PUT', 'DELETE'].each(function(method){
        methods[method] = function(){
                var params = Array.link(arguments, {url: String.type, data: $defined});
                return this.send($extend(params, {method: method}));
        };
});

Request.implement(methods);

})();