/*
 * jquery.transform.js
 * 
 * Permission is hereby granted, free of charge, to any person obtaining a
 * copy of this software and associated documentation files (the "Software"),
 * to deal in the Software without restriction, including without limitation
 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
 * and/or sell copies of the Software, and to permit persons to whom the
 * Software is furnished to do so, subject to the following conditions:
 * 
 * The above copyright notice and this permission notice shall be included
 * in all copies or substantial portions of the Software.
 * 
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN
 * NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,
 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
 * USE OR OTHER DEALINGS IN THE SOFTWARE.
 * 
 */
(function($) {
	$.transform = function(o) {
		var createXmlObj = function(data) {
			if($.browser.msie) {
				var x = $("<xml>")[0];
				x.loadXML(data);
				return x;
			} else {
				var parser = new DOMParser();
				return parser.parseFromString(data,"text/xml");
			};
		};
		
		var call = function(f,o,tel,other) {
			if($.isFunction(f)) {
				var arg1 = tel.html();
				if(o.c.dataType.toUpperCase() == "JSON") {
					arg1 = eval("(" + tel.html() + ")");
				}
				if(o.c.dataType.toUpperCase() == "XML") {
					arg1 = createXmlObj(tel.html());
				}
				f(arg1,o.c.xslstr,o.c.xmlstr,o.c,other);
			};
		};
				
		var t = this;
		t.c = {
			el:o.el,
			cache:o.cache == null?false:o.cache,
			async:o.async == null?true:o.async,
			xsl:o.xsl == null?false:o.xsl,
			xml:o.xml == null?false:o.xml,
			xslstr:o.xslstr == null?false:o.xslstr,
			xmlstr:o.xmlstr == null?false:o.xmlstr,
			xslobj:o.xslobj == null?false:o.xslobj,
			xmlobj:o.xmlobj == null?false:o.xmlobj,
			xslParams:o.xslParams == null?false:o.xslParams,
			error:o.error == null? false : o.error,
			success:o.success == null?false:o.success,
			complete:o.complete == null?false:o.complete,
			island:o.island == null?false:o.island,
			pass:o.pass == null?false:o.pass,
			msg:o.msg == null?false:o.msg,
			dataType:o.dataType == null?"html":o.dataType
		};
		
		if(o.msg) {
			$(o.el).html((typeof(o.msg) == "string")? o.msg : $(o.msg).html());
		};
		
		var id = function(pre) {
			var name = pre + "_" + (Math.round(Math.random() * 999));
			return $("#" + name).length == 0 ? name : id(pre);
		};
		
		var replaceref = function(val, o) {
			o.c.xsl = o.c.xsl?o.c.xsl:"";
			var c = location.protocol == "file:" && $.browser.msie ? "\\" : "/";
			var path1 = location.protocol + c + c + location.host;
			var path2 = location.pathname.substring(0,location.pathname.lastIndexOf(c) + 1) + o.c.xsl.substring(0,o.c.xsl.lastIndexOf("/") + 1);
			
			if(val.substring(0,1) == c) {
				return path1 + val;
			}
			else if(val.substring(0,2) == "..") {
				var count = 0;
				while(val.indexOf("..") != -1) {
					val = val.substring(val.indexOf("..") + 3);
					count += 1;
				}
				
				var p = path1 + path2.substring(0,path2.length - 1);
				
				for(var x=0;x<count;x++) {
					p = p.substring(0,p.lastIndexOf(c));
				}
				return p + c + val;
			}
			else {
				return path1 + path2 + val;
			};
		};
		
		var checkReady = function(o) {
			if((o.c.xslstr || o.c.xslobj) && (o.c.xmlstr || o.c.xmlobj)) {
				var fail = false;
				var tel = $("<div></div>");
				if(o.c.throwerror) {
					call(o.c.error,o,tel,{message:"Bad XML or XSL call"}); 
					return;
				};
				
				if(o.c.island) {
					if(o.c.island == true) {o.c.island = "body";};
					o.c.xslid = id("xsl");
					$(o.c.island).append("<div id='" + o.c.xslid + "' name='" + o.c.xslid + "' style='display:none;'>" + o.c.xslstr + "</div>");
					o.c.xmlid = id("xml");
					$(o.c.island).append("<div id='" + o.c.xmlid + "' name='" + o.c.xmlid + "' style='display:none;'>" + o.c.xmlstr + "</div>");
				};
				
				o.c.xslobj = o.c.xslobj ? o.c.xslobj : createXmlObj(o.c.xslstr);
				o.c.xmlobj = o.c.xmlobj ? o.c.xmlobj : createXmlObj(o.c.xmlstr);
				
				if($.browser.msie) {
				    try {					
						
						var fixref = function(ref,xObj) {
							var vals = xObj.selectNodes(ref);
							for(var x = 0; x<vals.length; x++) {
								vals[x].setAttribute("href",replaceref(vals[x].getAttribute("href"),o));
							};
						};
						
						fixref("//xsl:include",o.c.xslobj);
						fixref("//xsl:import",o.c.xslobj);
						
						var addparams = function(op, xObj) {
							for(var p in op) 
			                {
			                    var strParam = "//xsl:param[@name='" + p + "']";
			                    
			                    try {			                        
									var v = op[p];
									if(isNaN(parseInt(op[p])) && op[p].indexOf("'") < 0) {
										v = "'" + op[p] + "'";
									}
				    				var xslParam = xObj.selectSingleNode(strParam);	    				
					    			xslParam.setAttribute("select",v);
					    		    
					            } catch(ex) {
					                //param failed
					            };
			                };
						};
						
						addparams(o.c.xslParams,o.c.xslobj);
						tel.empty().html(o.c.xmlobj.transformNode(o.c.xslobj)); 
					} catch(ex) {
						fail = true;
						call(o.c.error,o,tel,ex); 
					}
				} else {
					try {
						var proc = new XSLTProcessor();
						
						var fixref = function(ref,xObj) {
							ref = $.browser.mozilla && $.browser.version.substring(0,3) == "1.9" ? "xsl:" + ref : ref;
							
							/*if(!$.browser.safari) {
								$(xObj).find(ref).each(function() {
									$(this).attr("href",replaceref($(this).attr("href"),o));
								});
							} else {*/
								var vals = xObj.getElementsByTagName(ref);
								for(var x=0; x<vals.length;x++) {
									//alert(replaceref(vals[x].getAttribute("href"),o))
									vals[x].setAttribute("href",replaceref(vals[x].getAttribute("href"),o));
								};
							//}
						};
						
						fixref("import",o.c.xslobj);
						fixref("include",o.c.xslobj);
						
						var addparams = function(op) {
							for(var p in op) {
								proc.setParameter(null, p, op[p]);
							};
						};
						addparams(o.c.xslParams);
						
						var doc = document.implementation.createDocument("","",null);
						proc.importStylesheet(o.c.xslobj);
						tel.empty().append(proc.transformToFragment(o.c.xmlobj,doc));
					} catch(ex) {
						fail = true;
						call(o.c.error,o,tel,ex);
					}
				};
				
				if(o.c.el) {
					$(o.c.el).html(tel.html());
				};
				if(!fail) {
					call(o.c.success,o,tel);
				};
				call(o.c.complete,o,tel);
				
				return tel.html();
			};
		};
		
		var makeCall = function(t,options,type) {
			if(typeof(options) == "string") {
				options = {
					cache:false,//type == "XSL" ? true : false,
					url:options,
					dataType:"xml",
					async:t.c.async,
					pass:t.c.pass
				};
			};
			
			options.complete = function(r) {
				if(type == "XSL") { if(r.status == 200) { t.c.xslstr = r.responseText; } else { t.c.xslstr = "error"; t.c.throwerror=true; } }
				else { if(r.status == 200) { t.c.xmlstr = r.responseText;} else { t.c.xmlstr = "error"; t.c.throwerror=true; } };
				if(t.c.async) { checkReady(t); };
			};
			
			$.ajax(options);
		};
		
		if(t.c.xsl) {
			makeCall(t,o.xsl,"XSL");
		};
		
		if(t.c.xml) {
			makeCall(t,o.xml,"XML");
		};
		
		if(!t.c.async || (t.c.xmlstr || t.c.xmlobj) || (t.c.xslstr || t.c.xslobj)) {
			return checkReady(t);
		};
	};
	
	$.fn.transform = function(o) {
		return this.each(function() {
			o = o ? o : {};
			o.el = this;
			new $.transform(o);
		});
	};
})(jQuery);

$().ready(function(){
	$("[transform != '']").each(function(num,el) {
		$(el).transform(eval("(" + $(el).attr("transform") + ")"));
	});
});