/*
	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/>.
*/
//Singleton SOAP Client
var SOAPClient = {
	Proxy: "",
	SOAPServer: "",
	ContentType: "text/xml",
	CharSet: "utf-8",
	ResponseXML: null,
	ResponseText: "",
	Status: 0,
	ContentLength: 0,
	Namespace: function(name, uri) {
		return {"name":name, "uri":uri};
	},
	SendRequest: function(soapReq, callback,arg) {		
		if(!!SOAPClient.Proxy) {
			SOAPClient.ResponseText = "";
			SOAPClient.ResponseXML = null;
			SOAPClient.Status = 0;
			
			var content = soapReq.toString();
			SOAPClient.ContentLength = content.length;
			
			function getResponse(xData) {
				if(!!callback) {
					SOAPClient.Status = xData.status;
					SOAPClient.ResponseText = xData.responseText;
					SOAPClient.ResponseXML = xData.responseXML;
					var jsOut = $.xmlToJSON(xData.responseXML);
					callback(jsOut,arg);
				}
			}
			$.ajax({
				 type: "POST",
				 url: SOAPClient.Proxy,
				 dataType: "xml",
				 processData: false,
				 data: content,
				 complete: getResponse,
				 contentType: SOAPClient.ContentType + "; charset=\"" + SOAPClient.CharSet + "\"",
				 beforeSend: function(req) {
					req.setRequestHeader("Method", "POST");
				 	req.setRequestHeader("Content-Length", SOAPClient.ContentLength);					
					req.setRequestHeader("SOAPServer", SOAPClient.SOAPServer);
					req.setRequestHeader("SOAPAction", soapReq.Action);
				 }
			});
		}
	},	
	ToXML: function(soapObj) {
		var out = [];
		var isNSObj=false;
		try {
			if(!!soapObj&&typeof(soapObj)==="object"&&soapObj.typeOf==="SOAPObject") {
				//Namespaces
				if(!!soapObj.ns) {
					if(typeof(soapObj.ns)==="object") {
						isNSObj=true;
						out.push("<"+soapObj.ns.name+":"+soapObj.name);
						out.push(" xmlns:"+soapObj.ns.name+"=\""+soapObj.ns.uri+"\"");
					} else  {
						out.push("<"+soapObj.name);
						out.push(" xmlns=\""+soapObj.ns+"\"");
					}
				} else {
					out.push("<"+soapObj.name);
				}
				//Node Attributes
				if(soapObj.attributes.length > 0) {
					 var cAttr;
					 var aLen=soapObj.attributes.length-1;
					 do {
						 cAttr=soapObj.attributes[aLen];
						 if(isNSObj) {
						 	out.push(" "+soapObj.ns.name+":"+cAttr.name+"=\""+cAttr.value+"\"");
						 } else {
							out.push(" "+cAttr.name+"=\""+cAttr.value+"\"");
						 }
					 } while(aLen--);					 					 
				}
				out.push(">");
				//Node children
				if(soapObj.hasChildren()) {					
					var cPos, cObj;
					for(cPos in soapObj.children){
						cObj = soapObj.children[cPos];
						if(typeof(cObj)==="object"){out.push(SOAPClient.ToXML(cObj));}
					}
				}
				//Node Value
				if(!!soapObj.value){out.push(soapObj.value);}
				//Close Tag
				if(isNSObj){out.push("</"+soapObj.ns.name+":"+soapObj.name+">");}
				else {out.push("</"+soapObj.name+">");}
				return out.join("");
			}
		} catch(e){alert("Unable to process SOAPObject! Object must be an instance of SOAPObject");}
	}
};
//Soap request - this is what being sent using SOAPClient.SendRequest
var SOAPRequest=function(action, soapObj) {
	this.Action=action;	
	var nss=[];
	var headers=[];
	var bodies=(!!soapObj)?[soapObj]:[];
	this.addNamespace=function(ns, uri){nss.push(new SOAPClient.Namespace(ns, uri));};
	this.addHeader=function(soapObj){headers.push(soapObj);};
	this.addBody=function(soapObj){bodies.push(soapObj);};
	this.toString=function() {
		var soapEnv = new SOAPObject("soapenv:Envelope");
			soapEnv.attr("xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/");
		//Add Namespace(s)
		if(nss.length>0){
			var tNs, tNo;
			for(tNs in nss){if(!nss.hasOwnProperty || nss.hasOwnProperty(tNs)){tNo=nss[tNs];if(typeof(tNo)==="object"){soapEnv.attr("xmlns:"+tNo.name, tNo.uri);}}}
		}
		//Add Header(s)
		if(headers.length>0) {
			var soapHeader = soapEnv.appendChild(new SOAPObject("soapenv:Header"));
			var tHdr;
			for(tHdr in headers){if(!headers.hasOwnProperty || headers.hasOwnProperty(tHdr)){soapHeader.appendChild(headers[tHdr]);}}
		}
		//Add Body(s)
		if(bodies.length>0) {
			var soapBody = soapEnv.appendChild(new SOAPObject("soapenv:Body"));
			var tBdy;
			for(tBdy in bodies){if(!bodies.hasOwnProperty || bodies.hasOwnProperty(tBdy)){soapBody.appendChild(bodies[tBdy]);}}
		}
		return soapEnv.toString();		
	};
};

//Soap Object - Used to build body envelope and other structures
var SOAPObject = function(name) {
	this.typeOf="SOAPObject";
	this.ns=null;
	this.name=name;
	this.attributes=[];
	this.children=[];
	this.value=null;
	this.attr=function(name, value){this.attributes.push({"name":name, "value":value});return this;};
	this.appendChild=function(obj){this.children.push(obj);return obj;};
	this.hasChildren=function(){return (this.children.length > 0)?true:false;};
	this.val=function(v){if(!v){return this.value;}else{this.value=v;return this;}};
	this.toString=function(){return SOAPClient.ToXML(this);};
};