(function() {
var startTag = /^<(\w+)((?:\s+\w+(?:\s*=\s*(?:(?:"[^"]*")|(?:'[^']*')|[^>\s]+))?)*)\s*(\/?)>/,
	endTag = /^<\/(\w+)[^>]*>/,
	attr = /(\w+)(?:\s*=\s*(?:(?:"((?:\\.|[^"])*)")|(?:'((?:\\.|[^'])*)')|([^>\s]+)))?/g;
var empty = makeMap("area,base,basefont,br,col,frame,hr,img,input,isindex,link,meta,param,embed");
var block = makeMap("address,applet,blockquote,button,center,dd,del,dir,div,dl,dt,fieldset,form,frameset,hr,iframe,ins,isindex,li,map,menu,noframes,noscript,object,ol,p,pre,script,table,tbody,td,tfoot,th,thead,tr,ul");
var inline = makeMap("a,abbr,acronym,applet,b,basefont,bdo,big,br,button,cite,code,del,dfn,em,font,i,iframe,img,input,ins,kbd,label,map,object,q,s,samp,script,select,small,span,strike,strong,sub,sup,textarea,tt,u,var");
var closeSelf = makeMap("colgroup,dd,dt,li,options,p,td,tfoot,th,thead,tr");
var fillAttrs = makeMap("checked,compact,declare,defer,disabled,ismap,multiple,nohref,noresize,noshade,nowrap,readonly,selected");
var special = makeMap("script,style");
var HTMLParser = this.HTMLParser = function(html, handler) {
    var index, chars, match, stack = [], last = html;
    stack.last = function() {return this[this.length - 1];};
    while (html) {
        chars = true;
        if (!stack.last() || !special[stack.last()]) {
            if (html.indexOf("<!--") == 0) {
                index = html.indexOf("-->");
                if (index >= 0) {
                    if (handler.comment)
                        handler.comment(html.substring(4, index));
                    html = html.substring(index + 3);
                    chars = false;
                }
            } else if (html.indexOf("</") == 0) {
                match = html.match(endTag);
                if (match) {
                    html = html.substring(match[0].length);
                    match[0].replace(endTag, parseEndTag);
                    chars = false;
                }
            } else if (html.indexOf("<") == 0) {
                match = html.match(startTag);
                if (match) {
                    html = html.substring(match[0].length);
                    match[0].replace(startTag, parseStartTag);
                    chars = false;
                }
            }
            if (chars) {
                index = html.indexOf("<");
                var text = index < 0 ? html : html.substring(0, index);
                html = index < 0 ? "" : html.substring(index);
                if (handler.chars) {
                    handler.chars(text);
                }
            }
        } else {
            var tagClosePos = html.indexOf("</" + stack.last());
            var text = html.substring(0, tagClosePos);
            text = text.replace(/<!--(.*?)-->/g, "$1").replace(/<!\[CDATA\[(.*?)]]>/g, "$1");
            html = html.substring(html.indexOf(">", tagClosePos) + 1);
            if (handler.chars) {
                handler.chars(text);
            }
            parseEndTag("", stack.last());
        }
        if (html == last) {
            break;
        }
        else {
            last = html;
        }
    }
    parseEndTag();
    function parseStartTag(tag, tagName, rest, unary) {
        if (block[tagName]) {
            while (stack.last() && inline[stack.last()]) {
                parseEndTag("", stack.last());
            }
        }
        if (closeSelf[tagName] && stack.last() == tagName) {
            parseEndTag("", tagName);
        }
        unary = empty[tagName] || !!unary;
        if (!unary) {
            stack.push(tagName);
        }
        if (handler.start) {
            var attrs = [];
            rest.replace(attr, function(match, name) {
                var value = arguments[2] ? arguments[2] :
					arguments[3] ? arguments[3] :
					arguments[4] ? arguments[4] :
					fillAttrs[name] ? name : "";
                attrs.push({
                    name: name,
                    value: value,
                    escaped: value.replace(/(^|[^\\])"/g, '$1\\\"') //"
                });
            });
            if (handler.start) {
                handler.start(tagName, attrs, unary);
            }
        }
    }
    function parseEndTag(tag, tagName) {
        if (!tagName) {
            var pos = 0;
        }
        else {
            for (var pos = stack.length - 1; pos >= 0; pos--) {
                if (stack[pos] == tagName) {
                    break;
                }
            }
        }
        if (pos >= 0) {
            for (var i = stack.length - 1; i >= pos; i--) {
                if (handler.end) {
                    handler.end(stack[i]);
                }
            }
            stack.length = pos;
        }
    }
};
this.HTMLtoXML = function(html) {
    var results = "";
    HTMLParser(html, {
        start: function(tag, attrs, unary) {
            results += "<" + tag;
            for (var i = 0; i < attrs.length; i++) {
                results += " " + attrs[i].name + '="' + attrs[i].escaped + '"';
            }
            results += (unary ? "/" : "") + ">";
        },
        end: function(tag) {
            results += "</" + tag + ">";
        },
        chars: function(text) {
            results += text;
        },
        comment: function(text) {
            results += "<!--" + text + "-->";
        }
    });
    return results;
};
this.HTMLtoDOM = function(html, doc) {
    var one = makeMap("html,head,body,title");
    var structure = {
        link: "head",
        base: "head"
    };
    if (!doc) {
        if (typeof DOMDocument != "undefined") {
            doc = new DOMDocument();
        }
        else if (typeof document != "undefined" && document.implementation && document.implementation.createDocument) {
            doc = document.implementation.createDocument("", "", null);
        }
        else if (typeof ActiveX != "undefined") {
            doc = new ActiveXObject("Msxml.DOMDocument");
        }
    } else {
        doc = doc.ownerDocument || doc.getOwnerDocument && doc.getOwnerDocument() || doc;
    }
    var elems = [], documentElement = doc.documentElement || doc.getDocumentElement && doc.getDocumentElement();
    if (!documentElement && doc.createElement) (function() {
        var html = doc.createElement("html");
        var head = doc.createElement("head");
        head.appendChild(doc.createElement("title"));
        html.appendChild(head);
        html.appendChild(doc.createElement("body"));
        doc.appendChild(html);
    })();
    if (doc.getElementsByTagName) {
        for (var i in one) {
            one[i] = doc.getElementsByTagName(i)[0];
        }
    }
    var curParentNode = one.body;
    HTMLParser(html, {
        start: function(tagName, attrs, unary) {
            if (one[tagName]) {
                curParentNode = one[tagName];
                return;
            }
            var elem = doc.createElement(tagName);
            for (var attr in attrs) {
                elem.setAttribute(attrs[attr].name, attrs[attr].value);
            }
            if (structure[tagName] && typeof one[structure[tagName]] != "boolean") {
                one[structure[tagName]].appendChild(elem);
            } else if (curParentNode && curParentNode.appendChild) {
                curParentNode.appendChild(elem);
            }
            if (!unary) {
                elems.push(elem);
                curParentNode = elem;
            }
        },
        end: function(tag) {
            elems.length -= 1;
            curParentNode = elems[elems.length - 1];
        },
        chars: function(text) {
            curParentNode.appendChild(doc.createTextNode(text));
        },
        comment: function(text) {
            // create comment node
        }
    });
    return doc;
};
function makeMap(str) {
    var obj = {}, items = str.split(",");
    for (var i = 0; i < items.length; i++) {
        obj[items[i]] = true;
    }
    return obj;
}
})();