/**
 * Extends functionality but does not override if already present in oDestination
 * @param object oDestination The Object to augment
 * @param object oSource The Object Literal to augment oDestination with.
 */
Object.augment = function(oDestination, oSource) {
	for (var property in oSource) {
		if (typeof oDestination[property] == "undefined") {
			oDestination[property] = oSource[property];
		}
	}
	return oDestination;
}

/**
 * Holds reuseable bits of code for use by Library Classes and Functions
 * @author	Dan Dean
 */
var snippet = {
	// Used by String.extractScripts, String.stripScripts
	ScriptFragment: '(?:<script.*?>)((\n|\r|.)*?)(?:<\/script>)'
}



/**
 * Augment the browser String capabilities, where necessary
 * Taken directly from prototype.js
 */
Object.augment(String.prototype, {
	/**
	 * Remove whitespace at the front and back of a String
	 * FROM: http://kasimchen.com/2005/03/27/javascript-trim/#comment-789
	 */
	trim: function() {
		return this.replace(/^\s*|\s*$/g,'');
	},
	
	stripTags: function() {
		return this.replace(/<\/?[^>]+>/gi, '');
	},

	stripScripts: function() {
		return this.replace(new RegExp(snippet.ScriptFragment, 'img'), '');
	},
	
	extractScripts: function() {
		var matchAll = new RegExp(snippet.ScriptFragment, 'img');
		var matchOne = new RegExp(snippet.ScriptFragment, 'im');
		return (this.match(matchAll) || []).map(function(scriptTag) {
			return (scriptTag.match(matchOne) || ['', ''])[1];
		});
	},
	
	evalScripts: function() {
		return this.extractScripts().map(eval);
	},

	escapeHTML: function() {
		var div = document.createElement('div');
		var text = document.createTextNode(this);
		div.appendChild(text);
		return div.innerHTML;
	},

	unescapeHTML: function() {
		var div = document.createElement('div');
		div.innerHTML = this.stripTags();
		return div.childNodes[0] ? div.childNodes[0].nodeValue : '';
	},
	
	/**
	 * Prototype.js version of this was dependent on other Prototype.js Objects.
	 * Rewritten for Library independence.
	 * @author Dan Dean
	 * @return Object containing name/value pairs
	 * @return Value of supplied "key"
	 * @usage alert("firstname=dan&lastname=dean".toQueryParams()["lastname"]);
	 */
	toQueryParams: function() {
		var query_array =	this.substr(this.indexOf("?") + 1).split("&");
		var queryObj =		{};
		var query_count =	query_array.length;
		for (var i=0; i < query_count; i++) {
			query_pair = query_array[i].split("=");
			queryObj[query_pair[0]] = query_pair[1];
		}
		return queryObj;
	},
	
	/**
	 * Add/Update query parameter in a string
	 * Example: 'index.aspx?one=1'.addQueryParams('two',2) will return:
	 * 'index.aspx?one=1?two=2'
	 */
	addQueryParameter: function(key,value) {
		try { // get string before query params
			var front = this.match(/^.*[\?]/)[0];
		} catch (e) {
			var front = '';
		}
		var pairs = this.toQueryParams();
		pairs[key] = value;
		var i = 0;
		for (var j in pairs) {
			if (typeof pairs[j] != 'undefined') {
				front += (i>0) ? '&' : '';
				front += (j + '=' + pairs[j]); 
				i++;
			}
		}
		return front;
	},
	
	removeQueryParameter: function(key) {
		try { // get string before query params
			var front = this.match(/^.*[\?]/)[0];
		} catch (e) {
			var front = '';
		}
		var pairs = this.toQueryParams();
		for (var i in pairs) {
			if (i != key) {
				front = front.addQueryParameter(i,pairs[i]);
			}
		}
		return front;
	},
	
	toArray: function() {
		return this.split('');
	},
	
	camelize: function() { // converts css style props to js style props: 'border-color' = 'borderColor'
		var oStringList = this.split('-');
		if (oStringList.length == 1) return oStringList[0];
			
		var camelizedString = this.indexOf('-') == 0
			? oStringList[0].charAt(0).toUpperCase() + oStringList[0].substring(1) 
			: oStringList[0];
			
		for (var i = 1, len = oStringList.length; i < len; i++) {
			var s = oStringList[i];
			camelizedString += s.charAt(0).toUpperCase() + s.substring(1);
		}
		
		return camelizedString;
	},

	inspect: function() {
		return "'" + this.replace('\\', '\\\\').replace("'", '\\\'') + "'";
	},
	
	/**
	 * C# style String.format();
	 * @param String strings Arguments to format the String with.
	 * Example: "Rock and {0} {1}!".format("Roll", "Forever") will output "Rock and Roll Forever!".
	 */
	format: function(strings) {
			var val = this;
			for (var i=0; i < arguments.length; i++) {
				// Since we're building this on the fly, we have to double escape. I think that's the case, anyways.
				var regex = new RegExp("\\{" + i + "\\}", "g");
				val = val.replace(regex, arguments[i]);
			}
			return val;
	},
	contains: function(re, str) {
		if (str.search(re) != -1) {
			return true;
		} else {
			return false;
		}
	},
	getHostname: function() {
		return this.toString().replace(/^\w+\:\/\//,'').split('/')[0];
	}
});

/**
 * Augment the browser Function capabilities, where necessary
 */
Object.augment(Function.prototype, {
	// both call() and apply() are need by IE5 for some of the Array methods to work.
	// FROM: http://www.browserland.org/scripts/dragdrop/
	apply: function(scope, args) {
		if (!args) args = [];
		var index = 0, result;
		do { -- index } while (typeof scope[index] != "undefined");
		scope[index] = this;
	
		switch (args.length) {
			case 0:
				result = scope[index]();
				break;
			case 1:
				result = scope[index](args[0]);
				break;
			case 2:
				result = scope[index](args[0], args[1]);
				break;
			case 3:
				result = scope[index](args[0], args[1], args[2]);
				break;
			case 4:
				result = scope[index](args[0], args[1], args[2], args[3]);
				break;
			default:
				result = scope[index](args[0], args[1], args[2], args[3], args[4]);
				break;
		}
	
		delete scope[index];
		return result;
	},

	// FROM: http://www.browserland.org/scripts/dragdrop/
	call: function(scope) {
		var args = new Array(Math.max(arguments.length-1, 0));
		for (var i = 1; i < arguments.length; i++)
			args[i-1] = arguments[i];
		return this.apply(scope, args);
	}
});

/**
 * Augment the browser Array capabilities, where necessary
 * For a full explanation of JS Array capabilities, see the Array documentation:
 * http://developer.mozilla.org/en/docs/Core_JavaScript_1.5_Reference
 */
Object.augment(Array.prototype, {
	// FROM DECONCEPT
	// Adds one or more elements to the end of an array and returns the new length of the array.
	push: function(item) { // IE5
		this[this.length] = item;
		return this.length;
	},

	/**
	 * Adds and/or removes elements from an array.
	 * @param Number index	Index at which to start changing the array.
	 * @param Number count	An integer indicating the number of old array elements to remove.
	 * 				 		If count is 0, no elements are removed. In this case, you should specify at least one new element.
	 * @return Array An array containing the removed elements.
	 * FROM http://www.webreference.com/dhtml/column33/13.html
	 */
	splice: function(index,count){
		if(arguments.length == 0) return index;
		if(typeof index != "number") index = 0;
		if(index < 0) index = Math.max(0,this.length + index);
		if(index > this.length) {
			if(arguments.length > 2) index = this.length;
			else return [];
		}
		if(arguments.length < 2) count = this.length-index;
		count = (typeof count == "number") ? Math.max(0,count) : 0;
		removeArray = this.slice(index,index+count);
		endArray = this.slice(index+count);
		this.length = index;
		for(var i=2;i < arguments.length;i++){
			this[this.length] = arguments[i];
		}
		for(var i=0;i < endArray.length;i++){
			this[this.length] = endArray[i];
		}
		return removeArray;
	},

	/**
	 * Returns the first (least) index of an element within the array equal to the specified value, or -1 if none is found.
	 * @param Object obj Needle
	 * @param Number si Index to start search. Optional.
	 * FROM http://erik.eae.net
	 */
	indexOf: function (obj, si) {
		if (si == null) {
			si = 0;
		} else if (si < 0) {
			si = Math.max(0, this.length + si);
		}
		for (var i=si; i < this.length; i++) {
			if (this[i] === obj) { return i; }
		}
		return -1;
	},

	/**
	 * Returns the last (greatest) index of an element within the array equal to the specified value, or -1 if none is found.
	 * @param Object obj Needle
	 * @param Number si Index to start search. Optional.
	 * FROM http://erik.eae.net
	 */
	lastIndexOf: function (obj, si) {
		if (si == null) {
			si = this.length - 1;
		} else if (si < 0) {
			si = Math.max(0, this.length + si);
		}
		for (var i = si; i >= 0; i--) {
			if (this[i] === obj) { return i; }
		}
		return -1;
	},

	/**
	 * Calls a function for each element in the array.
	 * @param Function f Callback function to apply to each element in the array.
	 * @param Object obj Optional object to apply function to. Defaults to 'this'.
	 * FROM http://erik.eae.net
	 */
	forEach: function (f, obj) {
		obj = (obj != null) ? obj : this; // IE5 [dd]

		var l = this.length;
		for (var i = 0; i < l; i++) {
			f.call(obj, this[i], i, this);
		}
	},

	/**
	 * Creates a new array with all of the elements of this array for which the provided filtering function returns true.
	 * @param Function f Callback function to apply to each element in the array.
	 * @param Object obj Optional object to apply function to. Defaults to 'this'.
	 * FROM http://erik.eae.net
	 */
	filter: function (f, obj) {
		obj = (obj != null) ? obj : this; // IE5 [dd]

		var l = this.length;
		var res = [];
		for (var i = 0; i < l; i++) {
			if (f.call(obj, this[i], i, this)) {
				res.push(this[i]);
			}
		}
		return res;
	},
	// Creates a new array with the results of calling a provided function on every element in this array.
	map: function (f, obj) {
		obj = (obj != null) ? obj : this; // IE5 [dd]

		var l = this.length;
		var res = [];
		for (var i = 0; i < l; i++) {
			res.push(f.call(obj, this[i], i, this));
		}
		return res;
	},
	// Determines the existance of the needle in the stack
	contains: function (obj) {
		return this.indexOf(obj) != -1;
	},
	// Duplicates the subject array to a new array: var blah = myArray.copy()
	copy: function (obj) {
		return this.concat();
	},
	// Duplicates the passes array into the new array: var blah = new Array(); blah.copyFrom(arguments);
	// Useful for copying non Array types into arrays
	copyFrom: function(arr) {
		for (var i=0; i<arr.length; i++) {
			this.push(arr[i]);
		}
	},
	// Add something to stack at the specified index.
	insertAt: function (obj, i) {
		this.splice(i, 0, obj);
		// return this; // should this be here?
	},
	// Add something at the first index of obj2. Bumps everything from obj2 to the end of the stack down one index.
	// If obj2 is not found, obj is added to the end of the array
	insertBefore: function (obj, obj2) {
		var i = this.indexOf(obj2);
		if (i == -1) {
			this.push(obj);
		} else {
			this.splice(i, 0, obj);
		}
	},
	// Removes needle at specified index.
	removeAt: function (i) {
		this.splice(i, 1);
	},
	// Removes the first occurence of the supplied obj.
	remove: function (obj) {
		var i = this.indexOf(obj);
		if (i != -1) {
			this.splice(i, 1);
		}
	}
});


/**
 * DOM
 * More advanced functionality will reside in an external dom.js file
 * @alias $dom
 */
$dom = {
	/**
	 * Create a new DOM node
	 * @param {String} nodeName 	The kind of node to create (div, br, p, etc);
	 * @param {Object} attributes	Optional object map of attributes and values. Example: {id: 'myEl', class: 'myClass'}
	 * @param {String} content	Optional text to set as the textNode within the returned element
	 * @param {Array} content		Optional array of Dom Nodes to insert as childNodes
	 * @param {NodeList content	Optional NodeList of Dom Nodes to insert as childNodes
	 * @return {DOMNode} DOMNode
	 * NOTE: dom.create is *heavily* influence by the prototype library
	 */
	create: function(nodeName /* obj attributes, str text */) {
		var node = document.createElement(nodeName);
		for (var i=1; i<arguments.length; i++) {
			if (typeof arguments[i] == 'string') { // STRING
				node.appendChild(this._text(arguments[i]));
			} else if (typeof arguments[i] == 'object' && typeof arguments[i].nodeName != 'undefined') { // NODE
				node.appendChild(arguments[i]);
			} else if (typeof arguments[i] == 'object' && typeof arguments[i].length != 'undefined') { // ARRAY OF NODES OR NODELIST
				for (var j=0; j<arguments[i].length; j++) {
					node.appendChild(arguments[i][j].cloneNode(true));
				}
			} else if (typeof arguments[i] == 'object') { // ATTRIBUTES
				this._attributes(node, arguments[i]);
			}
		}
		return node;
	},
	/**
	 * Cycles through the supplied attributes and applies them to the supplied element
	 * @param {DOMNode} node The node to apply attributes to
	 * @param {Object} attributes A JSON Object of attributes: {className:'myclass', id:'myID'}
	 * @return void
	 * WARNING: An attibute can NOT be named 'class', but must be 'className'
	 */
	_attributes: function(node, attributes) {
		for (var attr in attributes) {
			switch (true) {
				case (attr=='className'):
					node.className = attributes[attr];
					break;
				case (attr=='htmlFor'): // must pass htmlFor, as 'for' is a keyword
					node.htmlFor = attributes[attr];
					break;
				default:
					node.setAttribute(attr, attributes[attr]);
			}
		}
	},
	/**
	 * Creates and returns a text node with the supplied value
	 * @param {String} text
	 */
	_text: function(text) {
		return document.createTextNode(text);
	},
	
	/**
	 * Removes nodes from the DOM
	 * @param {String/Object} Elements The node you want to remove passed via Node OR ID string
	 * @return {Object/Array} The Element or an Array of Elements removed
	 * FIXME This method currently won't accept an Array of elements or element ID's
	 */
	remove: function(Elements) {
		var removed = new Array();
		for (var i=0; i<arguments.length; i++) {
			var el = (typeof arguments[i] == 'string') ? this.getById(arguments[i]) : arguments[i] ;
			removed.push(el.parentNode.removeChild(el));
		}
		return (removed.length > 1) ? removed : removed[0];
	},
	
	/**
	 * Gets the requested element(s).
	 * If you pass in a single string, returns FALSE on failure or the DOMNode
	 * on success. If you pass in many strings an Array of all found elements 
	 * is returned, which means an Empty array on failure
	 * @param {String} ElementIDs A comma-seperated list of element ID's
	 * @return Boolean/Array/DOMNode
	 */
	getById: function(ElementIDs) {
		var elements = new Array();
		var result;
		for (var i=0; i<arguments.length; i++) {
			var el;
			if (el = document.getElementById(arguments[i])) {
				elements.push(el);
			}
		}
		switch (true) {
			case (arguments.length == 1 && elements.length == 1):
				result = elements[0];
				break;
			case (arguments.length > 1):
				result = elements;
				break;
			default:
				result = false;
				break;
		}
		return result;
	},
	
	/**
	 * Returns an Array of all found elements by supplied tag name
	 * @param String ElementTagNames A comma seperated list of NodeNames
	 * @return Array An Array of all found elements. An empty Array on failure
	 */
	getByTag: function(ElementTagNames) {
		var elements = new Array();
		for (var i=0; i<arguments.length; i++) {
			els = document.getElementsByTagName(arguments[i]);
			for (var j=0; j<els.length; j++) {
				elements.push(els[j]);
			}
		}
		return elements;
	},
	
	/**
	 * Get all nodes with the given className
	 * @param String classNames A list of node.className(s) to check for
	 * @return An array of elements or an empty array on failure
	 */
	getByClass: function(classNames) {
		var o = new Array();
		var all = (typeof document.getElementsByTagName != 'undefined') ? document.getElementsByTagName('*') : document.all ;
		for (var i=0; i<all.length; i++) {
			(this.hasClass(all[i],arguments)) ? o.push(all[i]) : true ;
		}
		return o;
	},

	/**
	 * Add a class to an element
	 * @param Object node The element to work on
	 * @param String cls The class to add to the element
	 */
	addClass: function(node, cls) {
		var c = node.className.split(' ');
		(!c.contains(cls)) ? c.push(cls) : true ;
		node.className = c.join(' ');
	},

	/**
	 * Remove a class from an element
	 * @param Object node The element to work on
	 * @param String cls The class to remove from the element
	 */
	removeClass: function(node, cls) {
		var c = node.className.split(' ');
		(c.contains(cls)) ? c.remove(cls) : true ;
		node.className = c.join(' ');
	},
	
	/**
	 * Swap one class with another. If the first class doesn't exist the new 
	 * class is added.
	 * @param Object node The element to work on
	 * @param String sOldClass The class to swap out
	 * @param String sNewClass The class to swap in
	 */
	swapClass: function(node, sOldClass, sNewClass) {
		if (this.hasClass(node,sOldClass)) {
			this.removeClass(node, sOldClass);
		}
		this.addClass(node, sNewClass);
	},

	/**
	 * Check an element for the given className(s)
	 * @param {Object} node The node to check for a className
	 * @param {String} classNames A list of classNames to check for
	 * @return Boolean
	 */
	hasClass: function(node, classNames) {
		var args = arguments;
		var start = 1;
		if (typeof arguments[1] == 'object') {
			args = arguments[1];
			start = 0;
		}
		var success = false;
		for (var i=start; i<args.length; i++) {
			if (node.className.split(' ').contains(args[i])) {
				success = true;
				break;
			}
		}
		return success;
		// return (node.className.split(' ').contains(cls));
	},
	
	/**
	 * Gets a property from an elements computed style in a x-browser fashion
	 * @param DOMNode oNode The element to work on
	 * @param String sProperty The CSS property to find
	 */
	getComputedStyle: function(oNode, sProperty) {
		var computedStyle = null;
		if (typeof oNode.currentStyle != 'undefined') {
			computedStyle = oNode.currentStyle;
		} else {
			computedStyle = document.defaultView.getComputedStyle(oNode,null);
		}
		return computedStyle[sProperty];
	}
}


/**
 * Add and Remove events from objects
 */
$event = {
	/**
	 * Adds an event to an object
	 * @param Object obj The object to attach an event to
	 * @param String type [load | blur | focus | etc]
	 * @param Function fn The function to call when the even fires
	 */
	add: function( obj, type, fn ) {
		if (obj.addEventListener) {
			obj.addEventListener( type, fn, false );
		} else if (obj.attachEvent) {
			obj["e"+type+fn] = fn;
			obj[type+fn] = function() { obj["e"+type+fn]( window.event ); }
			obj.attachEvent( "on"+type, obj[type+fn] );
		}		
	},
	/**
	 * The exact same as event.add, but removing instead of adding
	 */
	remove: function( obj, type, fn ) {
		if (obj.removeEventListener) {
			obj.removeEventListener( type, fn, false );
		} else if (obj.detachEvent) {
			obj.detachEvent( "on"+type, obj[type+fn] );
			obj[type+fn] = null;
			obj["e"+type+fn] = null;
		}
	},
	/**
	 * Stop an event from firing
	 * This does no work in Safari prior to 2.0.? (find webkit version)
	 */
	stop: function(e) {
		if (e) { // event object
			if (e.preventDefault) {	// W3C
				e.preventDefault();
				e.stopPropagation();
			} else {				// IE
				e.returnValue = false;
				e.cancelBubble = true;
			}
		} else {
		}
		return false;
	},
	/**
	 * Allows for the implementation of custom events on a per Object level
	 */
	CustomEvents: function() {
		/**
		 * Container object for custom events.
		 */
		this.events = {};
		/**
		 * Create a custom event
		 * @param String sEventName The name of your custom event
		 */
		this.create = function(sEventName) {
			this.events[sEventName] = [];
		}
		/**
		 * Fire a custom event
		 * @param String sEventName The name of the event to fire
		 */
		this.fire = function(sEventName) {
			if (typeof this.events[sEventName] == 'undefined') { return; }

			for (var i=0; i<this.events[sEventName].length; i++) {
				if (typeof this.events[sEventName][i] == 'undefined') { continue; }

				var id =		this.events[sEventName][i][0];
				var scope =		this.events[sEventName][i][1];
				var method =	this.events[sEventName][i][2];
				var arg =		this.events[sEventName][i][3] || [];
				scope[method].apply(scope, arg);

				if (typeof dbug != 'undefined' && dbug.customEventLogging === true) {
					dbug.log(id, sEventName, method);
				}
			}
			if (typeof dbug != 'undefined' && dbug.customEventLogging === true && this.events[sEventName].length == 0) {
				dbug.log(sEventName);
			}
		}
		/**
		 * Add a method to call when the event is fired
		 * @param String sEventName The name of the event to listen for
		 * @param Object oScope Optional, scope to call the method in. Default is Window
		 * @param String sMethod The method to call in the given scope
		 */
		this.addListener = function(sEventName, oListenScope, sListenMethod, aListenArguments) {
			var oListenScope=oListenScope, sListenMethod=sListenMethod, aListenArguments=aListenArguments;
			var sListenID = sEventName + '_' + Math.random().toString().split('.')[1];
			if (typeof sListenMethod == 'undefined') {
				sListenMethod = oListenScope;
				oListenScope = window;
			}
			if (typeof this.events[sEventName] != 'undefined') {
				this.events[sEventName].push([sListenID, oListenScope,sListenMethod,aListenArguments]);
				return sListenID;
			} else {
				return false;
			}
		}
		this.removeListener = function(sListenID) {
			var event_name = sListenID.split('_')[0];
			var ev = this.events[event_name];
			for (var i=0; i<ev.length; i++) {
				if (ev[i][0] == sListenID) {
					delete this.events[event_name][i];
					break;
				}
			}
		}
	}
}