/*
Written by Steve Tucker, 2006, http://www.stevetucker.co.uk
Full documentation can be found at http://www.stevetucker.co.uk/page-innerxhtml.php
Released under the Creative Commons Attribution-Share Alike 3.0  License, http://creativecommons.org/licenses/by-sa/3.0/

Change Log
----------
15/10/2006	v0.3	innerXHTML official release.
21/03/2007	v0.4	1. Third argument $appendage added (Steve Tucker & Stef Dawson, www.stefdawson.com)
			2. $source argument accepts string ID (Stef Dawson)
			3. IE6 'on' functions work (Stef Dawson & Steve Tucker)
12/10/2008  v0.666 Roger Wakeman
			1. script reads and writes styles and scripts in IE
			2. script no longer stalls on html comments containing html or multiple lines
			3. uncomment lines 46, 48 and 109 and 140 to avoid getting extra, non-valid jquery attributes in IE when using jquery
*/

var innerxhtmlLastTag = '';  //so sloppy

innerXHTML = function($source,$string,$appendage) {
	// (v0.4) Written 2006 by Steve Tucker, http://www.stevetucker.co.uk
	if (typeof($source) == 'string') $source = document.getElementById($source);
	if (!($source.nodeType == 1)) return false;
	var $children = $source.childNodes;
	var $xhtml = '';
	if (!$string) {
		for (var $i=0; $i<$children.length; $i++) {
			if ($children[$i].nodeType == 3) {
				var $text_content = $children[$i].nodeValue;
				$text_content = $text_content.replace(/</g,'&lt;');
				$text_content = $text_content.replace(/>/g,'&gt;');
				$xhtml += $text_content;
			}
			else if ($children[$i].nodeType == 8) {
				$xhtml += '<!--'+$children[$i].nodeValue+'-->';
			}
			else {
				$xhtml += '<'+$children[$i].nodeName.toLowerCase();
				var $attributes = $children[$i].attributes;
 				for (var $j=0; $j<$attributes.length; $j++) {
					var $attName = $attributes[$j].nodeName.toLowerCase();
					var $attValue = $attributes[$j].nodeValue;
					if ($attName == 'style' && $children[$i].style.cssText) {
						$xhtml += ' style="'+$children[$i].style.cssText.toLowerCase()+'"';
					}
					else if ($attValue && $attName != 'contenteditable') {
						if ($attName.indexOf('jq') == -1) { //uncomment these if you use jquery. IE adds crazy jquery attributes to everything. Mysterious!
							$xhtml += ' ' + $attName + '="' + $attValue + '"';
						}
					}
				}
				if ($children[$i].nodeName == 'STYLE' && $children[$i].styleSheet) {
					$xhtml += '>' + $children[$i].styleSheet.cssText;
				} else if ($children[$i].nodeName == 'SCRIPT') {
					$xhtml += '>' + $children[$i].text;
				} else {
					$xhtml += '>' + innerXHTML($children[$i]);
				}
				$xhtml += '</'+$children[$i].nodeName.toLowerCase()+'>';
			}
		}
	}
	else {
		if (!$appendage) {
			while ($children.length>0) {
				$source.removeChild($children[0]);
			}
			$appendage = false;
		}
		$xhtml = $string;
		while ($string) {
			var $returned = translateXHTML($string);
			var $elements = $returned[0];
			$string = $returned[1];
			if ($elements) {
				if (typeof($appendage) == 'string') $appendage = document.getElementById($appendage);
				if (!($appendage.nodeType == 1)) $source.appendChild($elements);
				else $source.insertBefore($elements,$appendage);
			}
		}
	}
	return $xhtml;
}
function translateXHTML($string) {
	var $match = /^<\/[a-z0-9]{1,}>/i.test($string);
	if ($match) {
		var $return = Array;
		$return[0] = false;
		$return[1] = $string.replace(/^<\/[a-z0-9]{1,}>/i,'');
		return $return;
	}
	$match = /^<[a-z]{1,}/i.test($string);
	if ($match) {
		$string = $string.replace(/^</,'');
		var $element = $string.match(/[a-z0-9]{1,}/i);
		innerxhtmlLastTag = $element;
		if ($element) {
			var $new_element = document.createElement($element[0]);
			$string = $string.replace(/[a-z0-9]{1,}/i,'');
			var $attribute = true;
			while ($attribute) {
				$string = $string.replace(/^\s{1,}/,'');
				$attribute = $string.match(/^[a-z1-9_-]{1,}="[^"]{0,}"/i);
				if ($attribute) {
					$attribute = $attribute[0];
					$string = $string.replace(/^[a-z1-9_-]{1,}="[^"]{0,}"/i,'');
					if ($attribute.indexOf('jquery') == -1) { //IE adds jquery attributes to elements
						var $attName = $attribute.match(/^[a-z1-9_-]{1,}/i);
						$attribute = $attribute.replace(/^[a-z1-9_-]{1,}="/i,'');
						$attribute = $attribute.replace(/;{0,1}"$/,'');
						if ($attribute) {
							var $attValue = $attribute;
							if ($attName == 'value') $new_element.value = $attValue;
							else if ($attName == 'class') $new_element.className = $attValue;
							else if ($attName == 'style') {
								var $style = $attValue.split(';');
								for (var $i=0; $i<$style.length; $i++) {
									var $this_style = $style[$i].split(':');
									$this_style[0] = $this_style[0].toLowerCase().replace(/(^\s{0,})|(\s{0,1}$)/,'');
									$this_style[1] = $this_style[1].toLowerCase().replace(/(^\s{0,})|(\s{0,1}$)/,'');
									if (/-{1,}/g.test($this_style[0])) {
										var $this_style_words = $this_style[0].split(/-/g);
										$this_style[0] = '';
										for (var $j=0; $j<$this_style_words.length; $j++) {
											if ($j==0) {
												$this_style[0] = $this_style_words[0];
												continue;
											}
											var $first_letter = $this_style_words[$j].toUpperCase().match(/^[a-z]{1,1}/i);
											$this_style[0] += $first_letter+$this_style_words[$j].replace(/^[a-z]{1,1}/,'');
										}
									}
									$new_element.style[$this_style[0]] = $this_style[1];
								}
							}
							else if (/^on/.test($attName)) $new_element[$attName] = function() { eval($attValue) };
							else $new_element.setAttribute($attName,$attValue);
						}
						else $attribute = true;
					} //jquery if
				}
			}
			
			$match = /^>/.test($string);
			if ($match) {
				$string = $string.replace(/^>/,'');
				var $child = true;
				while ($child) {
					var $returned = translateXHTML($string);
					$child = $returned[0];
					if ($child) {
							if ($new_element.nodeName == 'STYLE' && $new_element.styleSheet) { //IE bullshit
								$new_element.styleSheet.cssText = $child.nodeValue;
							} else if ($new_element.nodeName == 'SCRIPT') {
								$new_element.text = $child.nodeValue;
							} else {
								$new_element.appendChild($child);
							}
					}
					
					$string = $returned[1];
				}
			}
			$string = $string.replace(/^\/>/, '');
		}
	}
	
	$match = /^[^<>]{1,}/i.test($string);
	if ($match && !$new_element) {
		if (innerxhtmlLastTag == 'script') {  //script
			var $text_content = $string.split('</script>')[0];
		} else {
			var $text_content = $string.match(/^[^<>]{1,}/i)[0];
		}
		$text_content = $text_content.replace(/&lt;/g,'	<');
		$text_content = $text_content.replace(/&gt;/g,'>');
		var $new_element = document.createTextNode($text_content);
		if (innerxhtmlLastTag == 'script') {  //script
			$string = $string.replace($text_content, '');
			innerxhtmlLastTag = '';
		} else {
			$string = $string.replace(/^[^<>]{1,}/i, '');
		}
	}
	$match = /<!--[\s\S]*?-->/i.test($string); //changed ^[^<>]{1,} to [\s\S]*? so it doesn't stall on comments containing html or multiple lines. I suck at regex, so this could probably be tweaked.
	if ($match && !$new_element) {
		if (document.createComment) {
			$string = $string.replace(/<!--/i, '');
			var $text_content = $string.match(/[\s\S]*?-->/i);
			$text_content = $text_content[0].replace(/-->{1,1}$/, '');
			var $new_element = document.createComment($text_content);
			$string = $string.replace(/[\s\S]*?-->/i, '');
		} else {	
			$string = $string.replace(/<!--[\s\S]*?-->/i, '');
		}
	}
	var $return = Array;
	$return[0] = $new_element;
	$return[1] = $string;
	return $return;
}


jQuery.fn.extend({
	innerXHTML: function() {
		return innerXHTML( jQuery(this)[0] );
	}
});