/*--------------------------------------
Name: AJAXRequest
Version: 0.8.06
Author: xujiwei
E-mail: vipxjw@163.com
Website: http://www.xujiwei.cn/
License: http://www.gnu.org/licenses/gpl.html GPL
Copyright (c) 2006-2008, xujiwei, All Rights Reserved

AjaxRequest Deveoper Manual:
    http://ajax.xujiwei.cn/
--------------------------------------*/
/**
 * AJAXRequest绫?
 * @author	xujiwei
 * @constructor
 * @class		AJAXRequest
 * @param		{Object}	[initObj]	鍒濆鍖栧弬鏁板璞?
 * @param		{String}	[initObj.url=""]			瑕佽姹傜殑Url
 * @param		{String}	[initObj.content=""]		瑕佸彂閫佺殑鍐呭
 * @param		{String}	[initObj.method="GET"]		璇锋眰鏂规硶锛孏ET 鎴?POST
 * @param		{String}	[initObj.charset]			鍙戦€佹暟鎹椂浣跨敤鐨勭紪鐮?
 * @param		{Boolean}	[initObj.async=true]		璇锋眰绫诲瀷锛宼rue 涓哄紓姝ワ紝false 涓哄悓姝?
 * @param		{Number}	[initObj.timeout=3600000]	璇锋眰瓒呮椂鏃堕棿锛屽崟浣嶄负姣
 * @param		{function}	[initObj.ontimeout]			璇锋眰瓒呮椂鏃剁殑鍥炶皟鍑芥暟
 * @param		{function}	[initObj.onrequeststart]		璇锋眰寮€濮嬫椂鐨勫洖璋冨嚱鏁?
 * @param		{function}	[initObj.onrequestend]		璇锋眰缁撴潫鏃剁殑鍥炶皟鍑芥暟
 * @param		{function}	[initObj.oncomplete]		璇锋眰姝ｇ‘瀹屾垚鏃剁殑鍥炶皟鍑芥暟
 * @param		{function}	[initObj.onexception]		璇锋眰鍙戠敓寮傚父鏃剁殑鍥炶皟鍑芥暟
 * @property	{String}	url			瑕佽姹傜殑Url
 * @property	{String}	content		瑕佸彂閫佺殑鍐呭
 * @property	{String}	method		璇锋眰鏂规硶锛孏ET 鎴?POST
 * @property	{String}	charset		鍙戦€佹暟鎹椂浣跨敤鐨勭紪鐮?
 * @property	{Boolean}	async		璇锋眰绫诲瀷锛宼rue 涓哄紓姝ワ紝false 涓哄悓姝?
 * @property	{Number}	timeout		璇锋眰瓒呮椂鏃堕棿锛屽崟浣嶄负姣
 * @property	{function}	ontimeout	璇锋眰瓒呮椂鏃剁殑鍥炶皟鍑芥暟
 * @property	{function}	onrequeststart	璇锋眰寮€濮嬫椂鐨勫洖璋冨嚱鏁?
 * @property	{function}	onrequestend	璇锋眰缁撴潫鏃剁殑鍥炶皟鍑芥暟
 * @property	{function}	oncomplete	璇锋眰姝ｇ‘瀹屾垚鏃剁殑鍥炶皟鍑芥暟
 * @property	{function}	onexception	璇锋眰鍙戠敓寮傚父鏃剁殑鍥炶皟鍑芥暟
 * @example
 * var ajax1 = new AJAXRequest();
 * var ajax2 = new AJAXRequest({
 * 	url: "getdata.asp",	// 浠巊etdata.asp鑾峰彇鏁版嵁
 * 	method: "GET",		// GET鏂瑰紡
 * 	oncomplete: function(obj) {
 * 		alert(obj.responesText);	// 鏄剧ずgetdata.asp杈撳嚭鐨勫唴瀹?
 * });
 */
function AJAXRequest() {
	var xmlPool=[],objPool=[],AJAX=this,ac=arguments.length,av=arguments;
	var xmlVersion=["MSXML2.XMLHTTP","Microsoft.XMLHTTP"];
	var ec=emptyFun=function(){};
	av=ac>0?typeof(av[0])=="object"?av[0]:{}:{};
	var encode=$GEC(av.charset+"");
	var prop=['url','content','method','async','timeout','ontimeout','onrequeststart','onrequestend','oncomplete','onexception'];
	var defval=['','','GET',true,3600000,ec,ec,ec,ec,ec],l=prop.length;
	while(l--){this[prop[l]]=getp(av[prop[l]],defval[l]);}
	if(!getObj()) return false;
	function getp(p,d) { return p!=undefined?p:d; }
	function getObj() {
		var i,j,tmpObj;
		for(i=0,j=xmlPool.length;i<j;i++) if(xmlPool[i].readyState==0||xmlPool[i].readyState==4) return xmlPool[i];
		try { tmpObj=new XMLHttpRequest; }
		catch(e) {
			for(i=0,j=xmlVersion.length;i<j;i++) {
				try { tmpObj=new ActiveXObject(xmlVersion[i]); } catch(e2) { continue; }
				break;
			}
		}
		if(!tmpObj) return false;
		else { xmlPool[xmlPool.length]=tmpObj; return xmlPool[xmlPool.length-1]; }
	}
	function $(id){return document.getElementById(id);}
	function $N(d){var n=d*1;return(isNaN(n)?0:n);}
	function $VO(v){return(typeof(v)=="string"?(v=$(v))?v:false:v);}
	function $GID(){return((new Date)*1);}
	function $SOP(id,ct){objPool[id+""]=ct;}
	function $LOP(id){return(objPool[id+""]);}
	function $SRP(f,r,p){return(function(s){s=f(s);for(var i=0;i<r.length;i++) s=s.replace(r[i],p[i]);return(s);});}
	function $GEC(cs){
		if(cs.toUpperCase()=="UTF-8") return(encodeURIComponent);
		else return($SRP(escape,[/\+/g],["%2B"]));
	}
	function $ST(obj,text) {
		var nn=obj.nodeName.toUpperCase();
		if("INPUT|TEXTAREA|OPTION".indexOf(nn)>-1) obj.value=text;
		else try{obj.innerHTML=text;} catch(e){};
	}
	function $CB(cb) {
		if(typeof(cb)=="function") return cb;
		else {
			cb=$VO(cb);
			if(cb) return(function(obj){$ST(cb,obj.responseText);});
			else return this.oncomplete; }
	}
	function $GP(p,v,d,f) {
		var i=0;
		while(i<v.length){p[i]=v[i]?f[i]?f[i](v[i]):v[i]:d[i];i++;}
		while(i<d.length){p[i]=d[i];i++;}
	}
	function send(purl,pc,pcbf,pm,pa) {
		var ct,ctf=false,xmlObj=getObj(),ac=arguments.length,av=arguments;
		if(!xmlObj) return false;
		var pmp=pm.toUpperCase()=="POST"?true:false;
		if(!pm||!purl) return false;
		var ev={url:purl, content:pc, method:pm};
		purl+=(purl.indexOf("?")>-1?"&":"?")+"timestamp="+$GID();
		xmlObj.open(pm,purl,pa);
		AJAX.onrequeststart(ev);
		if(pmp) xmlObj.setRequestHeader("Content-Type","application/x-www-form-urlencoded");
		ct=setTimeout(function(){ctf=true;xmlObj.abort();},AJAX.timeout);
		var rc=function() {
			if(ctf) { AJAX.ontimeout(ev); AJAX.onrequestend(ev); }
			else if(xmlObj.readyState==4) {
				ev.status=xmlObj.status;
				try{ clearTimeout(ct); } catch(e) {};
				try{ if(xmlObj.status==200) pcbf(xmlObj); else AJAX.onexception(ev); }
				catch(e) { AJAX.onexception(ev); }
				AJAX.onrequestend(ev);
			}
		}
		xmlObj.onreadystatechange=rc;
		if(pmp) xmlObj.send(pc); else xmlObj.send("");
		if(pa==false) rc();
		return true;
	}
	/**
	 * 璁剧疆鍙戦€佽姹傛椂浣跨敤鐨勭紪鐮?
	 * @param	{String}	charset	缂栫爜鍚嶇О锛孶TF-8 鎴?GB2312锛屾垨鑰呭叾浠?
	 * @example
	 * var ajax = new AJAXRequest();
	 * ajax.setcharset("GB2312");
	 */
	this.setcharset=function(cs) { encode=$GEC(cs); }
	/**
	 * 浣跨敤GET鏂规硶璇锋眰鎸囧畾鐨刄rl
	 * @param	{String}	[url]		瑕佽姹傜殑Url
	 * @param	{function|Object|String}	[oncomplete]	姝ｇ‘杩斿洖鏃剁殑鍥炶皟鍑芥暟锛屾垨鑰呰鏇存柊鐨勫璞★紝鎴栬€呰鏇存柊瀵硅薄鐨処D
	 * @example
	 * var ajax = new AJAXRequest();
	 * ajax.get("getdata.asp", function(obj) {
	 * 	alert(obj.responseText);	// 鏄剧ず浠巊etdata.asp寰楀埌鐨勬暟鎹?
	 * });
	 * ajax.get("getdata.asp", "txtData");	// 灏嗕粠getdata.asp寰楀埌鐨勬暟鎹洿鏂板埌ID涓簍xtData鐨凥TML鍏冪礌
	 */
	this.get=function() {
		var p=[],av=arguments;
		$GP(p,av,[this.url,this.oncomplete],[null,$CB]);
		if(!p[0]&&!p[1]) return false;
		return(send(p[0],"",p[1],"GET",this.async));
	}
	/**
	 * 鎸変竴瀹氭椂闂撮棿闅旇姹傛寚瀹氱殑Url骞舵洿鏂版寚瀹氱殑瀵硅薄
	 * @param	{function|Object|String}	oncomplete	姝ｇ‘杩斿洖鏃剁殑鍥炶皟鍑芥暟锛屾垨鑰呰鏇存柊鐨勫璞★紝鎴栬€呰鏇存柊瀵硅薄鐨処D
	 * @param	{String}	url			璇锋眰鐨刄rl
	 * @param	{Number}	interval	鍙戦€佽姹傜殑鏃堕棿闂撮殧
	 * @param	{Number}	times		鍙戦€佽姹傜殑娆℃暟
	 * @return	{String}	update杩囩▼鐨勬爣璇嗙锛岀敤浜庡仠姝pdate
	 * @see		AJAXRequest#stopupdate
	 * @example
	 * var ajax = new AJAXRequest();
	 * ajax.update(function(obj) {
	 * 		alert(obj.responseText); 
	 * 	},
	 * 	"getdata.asp",	// 浠巊etdata.asp鑾峰彇鏁版嵁
	 * 	1000,	// 姣?绉掓洿鏂颁竴灏?
	 * 	3		// 鏇存柊3娆?
	 * );
	 */
	this.update=function() {
		var p=[],purl,puo,pinv,pcnt,av=arguments;
		$GP(p,av,[this.oncomplete,this.url,-1,-1],[$CB,null,$N,$N]);
		if(p[2]==-1) p[3]=1;
		var sf=function(){send(p[1],"",p[0],"GET",AJAX.async);};
		var id=$GID();
		var cf=function(cc) {
			sf(); cc--; if(cc==0) return;
			$SOP(id,setTimeout(function(){cf(cc);},p[2]));
		}
		cf(p[3]);
		return id;
	}
	/**
	 * 鍋滄鏇存柊瀵硅薄
	 * @param	{String}	update_id	update鏂规硶杩斿洖鐨勬爣璇嗙
	 * @see		AJAXRequest#update
	 * @example
	 * var ajax = new AJAXRequest();
	 * var up = ajax.update("txtData", "getdata.asp");
	 * ajax.stopupdate(up);
	 */
	this.stopupdate=function(id) {
		clearTimeout($LOP(id));
	}
	/**
	 * 鍙戦€佹暟鎹埌鎸囧畾Url
	 * @param	{String}	[url]			璇锋眰鐨刄rl
	 * @param	{String}	[content]		瑕佸彂閫佺殑鏁版嵁
	 * @param	{function|Object|String}	[oncomplete]	姝ｇ‘杩斿洖鏃剁殑鍥炶皟鍑芥暟锛屾垨鑰呰鏇存柊鐨勫璞★紝鎴栬€呰鏇存柊瀵硅薄鐨処D
	 * @see		AJAXRequest#postf
	 * @example
	 * var ajax = new AJAXRequest();
	 * ajax.post("postdata.asp", "the data to post", function(){});
	 */
	this.post=function() {
		var p=[],av=arguments;
		$GP(p,av,[this.url,this.content,this.oncomplete],[null,null,$CB]);
		if(!p[0]&&!p[2]) return false;
		return(send(p[0],p[1],p[2],"POST",this.async));
	}
	/**
	 * 鍙戦€佹寚瀹氱殑琛ㄥ崟鍒版寚瀹氱殑Url
	 * @param	{String|Object}	formObject	琛ㄥ崟瀵硅薄鎴栬〃鍗曞璞＄殑ID
	 * @param	{function|Object|String}	[oncomplete]	姝ｇ‘杩斿洖鏃剁殑鍥炶皟鍑芥暟锛屾垨鑰呰鏇存柊鐨勫璞★紝鎴栬€呰鏇存柊瀵硅薄鐨処D
	 * @see		AJAXRequest#post
	 * @example
	 * var ajax = new AJAXRequest();
	 * ajax.postf("dataForm", function(obj) {
	 * 	alert(obj.responseText);
	 * });
	 */
	this.postf=function() {
		var p=[],fo,vaf,pcbf,purl,pc,pm,ac=arguments.length,av=arguments;
		fo=ac>0?$VO(av[0]):false;
		if(!fo||(fo&&fo.nodeName!="FORM")) return false;
		vaf=fo.getAttribute("onvalidate");
		vaf=vaf?(typeof(vaf)=="string"?new Function(vaf):vaf):null;
		if(vaf&&!vaf()) return false;
		$GP(p,[av[1],fo.getAttribute("action"),fo.getAttribute("method")],[this.oncomplete,this.url,this.method],[$CB,null,null]);
		pcbf=p[0];purl=p[1];
		if(!pcbf&&!purl) return false;
		pc=this.formToStr(fo); if(!pc) return false;
		if(p[2].toUpperCase()=="POST")
			return(send(purl,pc,pcbf,"POST",true));
		else {
			purl+=(purl.indexOf("?")>-1?"&":"?")+pc;
			return(send(purl,"",pcbf,"GET",true));
		}
	}
	/**
	 * 灏嗚〃鍗曞璞¤浆鎹㈠寲UrlEncode鐨勫瓧绗︿覆
	 * @author	SurfChen <surfchen@gmail.com>
	 * @link	http://www.surfchen.org/
	 * @param	{Object} formObject
	 * @returns {String} 琛ㄥ崟瀛楃涓?
	 * @see		AJAXRequest#postf
	 * @ignore
	 */
	this.formToStr=function(fc) {
		var i,qs="",and="",ev="";
		for(i=0;i<fc.length;i++) {
			e=fc[i];
			if (e.name!='') {
				if (e.type=='select-one'&&e.selectedIndex>-1) ev=e.options[e.selectedIndex].value;
				else if (e.type=='checkbox' || e.type=='radio') {
					if (e.checked==false) continue;
					ev=e.value;
				}
				else ev=e.value;
				ev=encode(ev); qs+=and+e.name+'='+ev; and="&";
			}
		}
		return qs;
	}
}