/*
	This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program.  If not, see <http://www.gnu.org/licenses/>.
	
	Author: Sam Tsvilik
	Version: 3.0 Beta
	Last Modified: 10/31/2008
*/
(function($) {
    //Converts XML DOM to JSON
    $.extend(
		(function() {
		    var _nodeHandler = null;
		    var _features = null;
		    var _outputTypes = { complex: 0, lite: 1 };
		    //Helper functions
		    var clone = function(obj) {
		        if (!!obj && typeof (obj) === "object") {
		            function F() { }
		            F.prototype = obj;
		            return new F();
		        }
		    };
		    var isNumeric = function(s) {
		        var testStr = "";
		        if (s && typeof s == "string") { testStr = s; }
		        var pattern = /^((-)?([0-9]*)((\.{0,1})([0-9]+))?$)/;
		        return pattern.test(testStr);
		    };
		    var formatName = function(name) {
		        var regEx = /-/g;
		        var tName = String(name).replace(regEx, "_");
		        return tName;
		    }; //Alters attribute and collection names to comply with JS
		    //Node Prototype
		    var _node = (function() {
		        var _self = {
		            activate: function() {
		                var nodes = [];
		                if (!!nodes && _features.outputType === _outputTypes.complex) {
		                    nodes.getNodesByAttribute = function(attr, obj) {
		                        if (!!nodes && nodes.length > 0) {
		                            var out = [];
		                            var cNode;
		                            var maxLen = nodes.length - 1;
		                            if (maxLen >= 0) {
		                                do {
		                                    cNode = nodes[maxLen];
		                                    if (!!cNode && cNode[attr] === obj) { out.push(cNode); }
		                                } while (maxLen--);
		                            }
		                            out.reverse();
		                            return out;
		                        }
		                    };
		                    nodes.getNodeByAttribute = function(attr, obj) {
		                        if (!!nodes && nodes.length > 0) {
		                            var cNode = null;
		                            var maxLen = nodes.length - 1;
		                            if (maxLen >= 0) {
		                                do {
		                                    cNode = nodes[maxLen];
		                                    if (!!cNode && cNode[attr] === obj) { break; }
		                                } while (maxLen--);
		                            }
		                            return cNode;
		                        }
		                    };
		                    nodes.getNodesByValue = function(obj) {
		                        if (!!nodes && nodes.length > 0) {
		                            var out = [];
		                            var cNode;
		                            var maxLen = nodes.length - 1;
		                            if (maxLen >= 0) {
		                                do {
		                                    cNode = nodes[maxLen];
		                                    if (!!cNode && !!cNode.Text && cNode.Text === obj) { out.push(cNode); }
		                                } while (maxLen--);
		                            }
		                            out.reverse();
		                            return out;
		                        }
		                    };
		                    nodes.contains = function(attr, obj) {
		                        if (!!nodes && nodes.length > 0) {
		                            var out = false;
		                            var maxLen = nodes.length - 1;
		                            if (maxLen >= 0) {
		                                do {
		                                    if (nodes[maxLen][attr] === obj) { out = true; break; }
		                                } while (maxLen--);
		                            }
		                            return out;
		                        }
		                    };
		                    nodes.indexOf = function(attr, obj) {
		                        var pos = -1;
		                        if (!!nodes && nodes.length > 0) {
		                            var maxLen = nodes.length - 1;
		                            if (maxLen >= 0) {
		                                do {
		                                    if (nodes[maxLen][attr] === obj) { pos = maxLen; break; }
		                                } while (maxLen--);
		                            }
		                            return pos;
		                        }
		                    };
		                    nodes.SortByAttribute = function(col, dir) {
		                        if (!!nodes && nodes.length > 0) {
		                            nodes.sort(function(a, b) {
		                                var _a = (a[col]),
											_b = (b[col]);
		                                _a = isNumeric(_a) ? parseFloat(_a) : _a;
		                                _b = isNumeric(_b) ? parseFloat(_b) : _b;
		                                var _out = (_a < _b) ? -1 : (_b < _a) ? 1 : 0;
		                                _out = (!!dir && dir.toUpperCase() === "DESC") ? (0 - _out) : _out;
		                                return _out;
		                            });
		                        }
		                    };
		                    nodes.SortByValue = function(dir) {
		                        if (!!nodes && nodes.length > 0) {
		                            nodes.sort(function(a, b) {
		                                var _a = (a.Text),
											_b = (b.Text);
		                                _a = isNumeric(_a) ? parseFloat(_a) : _a;
		                                _b = isNumeric(_b) ? parseFloat(_b) : _b;
		                                var _out = (_a < _b) ? -1 : (_b < _a) ? 1 : 0;
		                                _out = (!!dir && dir.toUpperCase() === "DESC") ? (0 - _out) : _out;
		                                return _out;
		                            });
		                        }
		                    };
		                    nodes.SortByNode = function(node, dir) {
		                        if (!!nodes && nodes.length > 0) {
		                            nodes.sort(function(a, b) {
		                                var _a = (a[node][0].Text),
											_b = (b[node][0].Text);
		                                _a = isNumeric(_a) ? parseFloat(_a) : _a;
		                                _b = isNumeric(_b) ? parseFloat(_b) : _b;
		                                var _out = (_a < _b) ? -1 : (_b < _a) ? 1 : 0;
		                                _out = (!!dir && dir.toUpperCase() === "DESC") ? (0 - _out) : _out;
		                                return _out;
		                            });
		                        }
		                    };
		                }
		                return nodes;
		            }
		        };
		        return _self;
		    })();
		    //Makes a new node of type _node;
		    //Creates a nodes collection
		    var makeNodeContainer = function() {
		        var _fn = clone(_node);
		        return _fn.activate();
		    };
		    //Creates a single node component
		    var makeNode = function(node) {
		        var _self = { Text: "", _processChildren: true, _processAttributes: true };
		        var _customNode = null;
		        if (typeof (_nodeHandler) === "function") { //Check to see if custom node handler is present
		            try { _customNode = _nodeHandler(node); } catch (e) { }
		        }
		        if (!!_customNode && _customNode === -1) { //Skip node entirely
		            _self = null;
		        } else if (!!_customNode) { //Use custom node
		            _self = _customNode;
		            _self._processChildren = (typeof (_self._processChildren) === "undefined") ? true : _self._processChildren;
		            _self._processAttributes = (typeof (_self._processAttributes) === "undefined") ? true : _self._processAttributes;
		            if (!_self.Text) { _self.Text = ""; }
		            if (!_self._namespace) { if (!!node.prefix && _features.outputType === _outputTypes.complex) { _self._namespace = node.prefix; } }
		        } else { //Normal operation
		            //SOAP XML FIX to remove namespaces (i.e. soapenv:)
		            var elemName = (!!node.localName) ? node.localName : node.baseName;
		            elemName = formatName(elemName);
		            _self._nodeName = elemName;
		            if (!!node.prefix) { _self._namespace = node.prefix; }
		        }
		        return _self;
		    };
		    //Sets node attributes
		    var setAttributes = function(jNode, xNode) { //Set Attributes of an object
		        if (xNode.attributes.length > 0) {
		            if (_features.outputType === _outputTypes.complex) { jNode._attributes = []; }
		            var a = xNode.attributes.length - 1, attName = null, jParent = null;
		            do { //Order is irrelevant (speed-up)
		                attName = String(formatName(xNode.attributes[a].name));
		                jParent = jNode._parent || false;
		                //Prevents name collisions with node names
		                if (!!jParent && !!jParent[jNode._nodeName][0][attName] && typeof (jParent[jNode._nodeName][0][attName]) === "object") { attName = "attr_" + attName; }
		                if (_features.outputType === _outputTypes.complex) { jNode._attributes.push(attName); }
		                jNode[attName] = $.trim(xNode.attributes[a].value);
		            } while (a--);
		        }
		    };
		    var _self = {
		        JSONOutputType: _outputTypes,
		        xmlToJSON: function(xdoc, features) {
		            _features = features || { outputType: _self.JSONOutputType.complex };
		            _nodeHandler = _features && _features.nodeHandler;
		            var _xdoc = null; //xdoc now accepts xml string and xml dom object
		            if (typeof (xdoc) === "string") { _xdoc = _self.textToXML(xdoc); } else if (typeof (xdoc) === "object" && !!xdoc.nodeType) { _xdoc = xdoc; } else { _xdoc = null; }
		            if (!_xdoc) { return null; }
		            var xroot = (_xdoc.nodeType == 9) ? _xdoc.documentElement : _xdoc;
		            //JSON Object holder
		            var tmpObj = makeNode(xroot);
		            tmpObj.typeOf = "JSXBObject";
		            tmpObj.RootName = tmpObj._nodeName; //Backwards compat.						
		            if (_xdoc.nodeType == 3 || _xdoc.nodeType == 4) {
		                return _xdoc.nodeValue;
		            }
		            //Recursive JSON Assembler
		            function setObjects(obj, node) {
		                var cnode; //Current Node
		                var tObj; //New subnode
		                var cName = "";
		                if (!node) { return null; }
		                if (node.hasChildNodes()) {
		                    var nodeCount = node.childNodes.length - 1;
		                    var n = 0;
		                    do {
		                        cnode = node.childNodes[n];
		                        switch (cnode.nodeType) {
		                            case 1: //Node									
		                                //Process child nodes
		                                if (_features.outputType === _outputTypes.complex) { obj._children = (!!obj._children) ? obj._children : []; }
		                                //Create a single node
		                                tObj = makeNode(cnode);
		                                if (!!tObj) {
		                                    if (_features.outputType === _outputTypes.complex) { tObj._parent = obj; if (cName !== tObj._nodeName) { obj._children.push(tObj._nodeName); } }
		                                    //Create sub elemns array
		                                    if (!obj[tObj._nodeName]) { //If node is new then create a new container for nodes
		                                        obj[tObj._nodeName] = makeNodeContainer(); //Create Collection
		                                    }
		                                    //Add empty node holder to the container
		                                    obj[tObj._nodeName].push(tObj);
		                                    //Recursive call if node contains children										
		                                    if (!!tObj._processChildren && cnode.hasChildNodes()) { setObjects(tObj, cnode); } delete tObj._processChildren;
		                                    //Set node attributes after children are added
		                                    if (!!tObj._processAttributes) { setAttributes(tObj, cnode); } delete tObj._processAttributes;
		                                    cName = tObj._nodeName;
		                                    if (_features.outputType === _outputTypes.lite) { delete tObj._nodeName; }
		                                }
		                                break;
		                            case 3: //Text Value
		                                obj.Text += $.trim(cnode.nodeValue);
		                                break;
		                            case 4: //CDATA
		                                obj.Text += (!!cnode.text) ? $.trim(cnode.text) : $.trim(cnode.nodeValue);
		                                break;
		                        }
		                    } while (n++ < nodeCount);
		                }
		            }
		            //Set root attributes if any
		            setAttributes(tmpObj, xroot);
		            //Start assembling JSON
		            setObjects(tmpObj, xroot);
		            //Clean-up memmory
		            if (_features.outputType === _outputTypes.lite) { delete tmpObj._nodeName; }
		            delete tmpObj._processChildren;
		            delete tmpObj._processAttributes;
		            _xdoc = null;
		            xroot = null;
		            return tmpObj;
		        },
		        //Converts Text to XML DOM
		        textToXML: function(strXML) {
		            var xmlDoc = null;
		            try {
		                xmlDoc = ($.browser.msie) ? new ActiveXObject("Microsoft.XMLDOM") : new DOMParser();
		                xmlDoc.async = false;
		            } catch (e) { throw new Error("XML Parser could not be instantiated"); }
		            var out = null, isParsed = true;
		            if ($.browser.msie) {
		                isParsed = xmlDoc.loadXML(strXML);
		                out = (isParsed) ? xmlDoc : false;
		            } else {
		                out = xmlDoc.parseFromString(strXML, "text/xml");
		                isParsed = (out.documentElement.tagName !== "parsererror");
		            }
		            if (!isParsed) { throw new Error("Error parsing XML string"); }
		            return out;
		        }
		    };
		    return _self;
		})()
	);
})(jQuery);