/*
 * JSON-RPC JavaScript client
 *
 * $Id: jsonrpc.js,v 1.2 2007/01/08 07:23:18 John Exp $
 *
 * Copyright (c) 2003-2004 Jan-Klaas Kollhof
 * Copyright (c) 2005 Michael Clark, Metaparadigm Pte Ltd
 *
 * This code is based on Jan-Klaas' JavaScript o lait library (jsolait).
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *    http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 *
 */
escapeJSONChar=function escapeJSONChar(c){if(c=="\""||c=="\\")return"\\"+c;else if(c=="\b")return"\\b";else if(c=="\f")return"\\f";else if(c=="\n")return"\\n";else if(c=="\r")return"\\r";else if(c=="\t")return"\\t";var hex=c.charCodeAt(0).toString(16);if(hex.length==1)return"\\u000"+hex;else if(hex.length==2)return"\\u00"+hex;else if(hex.length==3)return"\\u0"+hex;else return"\\u"+hex;};escapeJSONString=function escapeJSONString(s){var parts=s.split("");for(var i=0;i<parts.length;i++){var c=parts[i];if(c=='"'||c=='\\'||c.charCodeAt(0)<32||c.charCodeAt(0)>=128)parts[i]=escapeJSONChar(parts[i]);}return"\""+parts.join("")+"\"";};toJSON=function toJSON(o){if(o==null){return"null";}else if(o.constructor==String){return escapeJSONString(o);}else if(o.constructor==Number){return o.toString();}else if(o.constructor==Boolean){return o.toString();}else if(o.constructor==Date){return'{javaClass: "java.util.Date", time: '+o.valueOf()+'}';}else if(o.constructor==Array){var v=[];for(var i=0;i<o.length;i++)v.push(toJSON(o[i]));return"["+v.join(", ")+"]";}else{var v=[];for(attr in o){if(o[attr]==null)v.push("\""+attr+"\": null");else if(typeof o[attr]=="function");else v.push(escapeJSONString(attr)+": "+toJSON(o[attr]));}return"{"+v.join(", ")+"}";}};JSONRpcClient=function JSONRpcClient_ctor(serverURL,user,pass,objectID){this.serverURL=serverURL;this.user=user;this.pass=pass;this.objectID=objectID;if(this.objectID){this._addMethods(["listMethods"]);var req=this._makeRequest("listMethods",[]);}else{this._addMethods(["system.listMethods"]);var req=this._makeRequest("system.listMethods",[]);}var m=this._sendRequest(req);this._addMethods(m);};JSONRpcClient.Exception=function JSONRpcClient_Exception_ctor(code,message,javaStack){this.code=code;var name;if(javaStack){this.javaStack=javaStack;var m=javaStack.match(/^([^:]*)/);if(m)name=m[0];}if(name)this.name=name;else this.name="JSONRpcClientException";this.message=message;};JSONRpcClient.Exception.CODE_REMOTE_EXCEPTION=490;JSONRpcClient.Exception.CODE_ERR_CLIENT=550;JSONRpcClient.Exception.CODE_ERR_PARSE=590;JSONRpcClient.Exception.CODE_ERR_NOMETHOD=591;JSONRpcClient.Exception.CODE_ERR_UNMARSHALL=592;JSONRpcClient.Exception.CODE_ERR_MARSHALL=593;JSONRpcClient.Exception.prototype=new Error();JSONRpcClient.Exception.prototype.toString=function JSONRpcClient_Exception_toString(code,msg){return this.name+": "+this.message;};JSONRpcClient.default_ex_handler=function JSONRpcClient_default_ex_handler(e){alert(e);};JSONRpcClient.toplevel_ex_handler=JSONRpcClient.default_ex_handler;JSONRpcClient.profile_async=false;JSONRpcClient.max_req_active=1;JSONRpcClient.requestId=1;JSONRpcClient.prototype._createMethod=function JSONRpcClient_createMethod(methodName){var fn=function(){var args=[];var callback=null;for(var i=0;i<arguments.length;i++)args.push(arguments[i]);if(typeof args[0]=="function")callback=args.shift();var req=fn.client._makeRequest.call(fn.client,fn.methodName,args,callback);if(callback==null){return fn.client._sendRequest.call(fn.client,req);}else{JSONRpcClient.async_requests.push(req);JSONRpcClient.kick_async();return req.requestId;}};fn.client=this;fn.methodName=methodName;return fn;};JSONRpcClient.prototype._addMethods=function JSONRpcClient_addMethods(methodNames){for(var i=0;i<methodNames.length;i++){var obj=this;var names=methodNames[i].split(".");for(var n=0;n<names.length-1;n++){var name=names[n];if(obj[name]){obj=obj[name];}else{obj[name]=new Object();obj=obj[name];}}var name=names[names.length-1];if(!obj[name]){var method=this._createMethod(methodNames[i]);obj[name]=method;}}};JSONRpcClient._getCharsetFromHeaders=function JSONRpcClient_getCharsetFromHeaders(http){try{var contentType=http.getResponseHeader("Content-type");var parts=contentType.split(/\s*;\s*/);for(var i=0;i<parts.length;i++){if(parts[i].substring(0,8)=="charset=")return parts[i].substring(8,parts[i].length);}}catch(e){}return"UTF-8";};JSONRpcClient.async_requests=[];JSONRpcClient.async_inflight={};JSONRpcClient.async_responses=[];JSONRpcClient.async_timeout=null;JSONRpcClient.num_req_active=0;JSONRpcClient._async_handler=function JSONRpcClient_async_handler(){JSONRpcClient.async_timeout=null;while(JSONRpcClient.async_responses.length>0){var res=JSONRpcClient.async_responses.shift();if(res.canceled)continue;if(res.profile)res.profile.dispatch=new Date();try{res.cb(res.result,res.ex,res.profile);}catch(e){JSONRpcClient.toplevel_ex_handler(e);}}while(JSONRpcClient.async_requests.length>0&&JSONRpcClient.num_req_active<JSONRpcClient.max_req_active){var req=JSONRpcClient.async_requests.shift();if(req.canceled)continue;req.client._sendRequest.call(req.client,req);}};JSONRpcClient.kick_async=function JSONRpcClient_kick_async(){if(JSONRpcClient.async_timeout==null)JSONRpcClient.async_timeout=setTimeout(JSONRpcClient._async_handler,0);};JSONRpcClient.cancelRequest=function JSONRpcClient_cancelRequest(requestId){if(JSONRpcClient.async_inflight[requestId]){JSONRpcClient.async_inflight[requestId].canceled=true;return true;}for(var i in JSONRpcClient.async_requests){if(JSONRpcClient.async_requests[i].requestId==requestId){JSONRpcClient.async_requests[i].canceled=true;return true;}}for(var i in JSONRpcClient.async_responses){if(JSONRpcClient.async_responses[i].requestId==requestId){JSONRpcClient.async_responses[i].canceled=true;return true;}}return false;};JSONRpcClient.prototype._makeRequest=function JSONRpcClient_makeRequest(methodName,args,cb){var req={};req.client=this;req.requestId=JSONRpcClient.requestId++;var obj={};obj.id=req.requestId;if(this.objectID)obj.method=".obj#"+this.objectID+"."+methodName;else
obj.method=methodName;obj.params=args;if(cb)req.cb=cb;if(JSONRpcClient.profile_async)req.profile={"submit":new Date()};req.data=toJSON(obj);return req;};JSONRpcClient.prototype._sendRequest=function JSONRpcClient_sendRequest(req){if(req.profile)req.profile.start=new Date();var http=JSONRpcClient.poolGetHTTPRequest();JSONRpcClient.num_req_active++;if(typeof(this.user)=="undefined"){http.open("POST",this.serverURL,(req.cb!=null));}else
{http.open("POST",this.serverURL,(req.cb!=null),this.user,this.pass);}try{http.setRequestHeader("Content-type","text/plain");}catch(e){}if(req.cb){var self=this;http.onreadystatechange=function(){if(http.readyState==4){http.onreadystatechange=function(){};var res={"cb":req.cb,"result":null,"ex":null};if(req.profile){res.profile=req.profile;res.profile.end=new Date();}try{res.result=self._handleResponse(http);}catch(e){res.ex=e;}if(!JSONRpcClient.async_inflight[req.requestId].canceled)JSONRpcClient.async_responses.push(res);delete JSONRpcClient.async_inflight[req.requestId];JSONRpcClient.kick_async();}};}else{http.onreadystatechange=function(){};}JSONRpcClient.async_inflight[req.requestId]=req;try{http.send(req.data);}catch(e){JSONRpcClient.poolReturnHTTPRequest(http);JSONRpcClient.num_req_active--;throw new JSONRpcClient.Exception
(JSONRpcClient.Exception.CODE_ERR_CLIENT,"Connection failed");}if(!req.cb)return this._handleResponse(http);};JSONRpcClient.prototype._handleResponse=function JSONRpcClient_handleResponse(http){if(!this.charset){this.charset=JSONRpcClient._getCharsetFromHeaders(http);}var status,statusText,data;try{status=http.status;statusText=http.statusText;data=http.responseText;}catch(e){JSONRpcClient.poolReturnHTTPRequest(http);JSONRpcClient.num_req_active--;JSONRpcClient.kick_async();throw new JSONRpcClient.Exception
(JSONRpcClient.Exception.CODE_ERR_CLIENT,"Connection failed");}JSONRpcClient.poolReturnHTTPRequest(http);JSONRpcClient.num_req_active--;if(status!=200){throw new JSONRpcClient.Exception(status,statusText);}var obj;try{eval("obj = "+data);}catch(e){throw new JSONRpcClient.Exception(550,"error parsing result");}if(obj.error)throw new JSONRpcClient.Exception(obj.error.code,obj.error.msg,obj.error.trace);var res=obj.result;if(res&&res.objectID&&res.JSONRPCType=="CallableReference")return new JSONRpcClient(this.serverURL,this.user,this.pass,res.objectID);return res;};JSONRpcClient.http_spare=[];JSONRpcClient.http_max_spare=8;JSONRpcClient.poolGetHTTPRequest=function JSONRpcClient_pool_getHTTPRequest(){if(JSONRpcClient.http_spare.length>0){return JSONRpcClient.http_spare.pop();}return JSONRpcClient.getHTTPRequest();};JSONRpcClient.poolReturnHTTPRequest=function JSONRpcClient_poolReturnHTTPRequest(http){if(JSONRpcClient.http_spare.length>=JSONRpcClient.http_max_spare)delete http;else
JSONRpcClient.http_spare.push(http);};JSONRpcClient.msxmlNames=["MSXML2.XMLHTTP.5.0","MSXML2.XMLHTTP.4.0","MSXML2.XMLHTTP.3.0","MSXML2.XMLHTTP","Microsoft.XMLHTTP"];JSONRpcClient.getHTTPRequest=function JSONRpcClient_getHTTPRequest(){try{JSONRpcClient.httpObjectName="XMLHttpRequest";return new XMLHttpRequest();}catch(e){}for(var i=0;i<JSONRpcClient.msxmlNames.length;i++){try{JSONRpcClient.httpObjectName=JSONRpcClient.msxmlNames[i];return new ActiveXObject(JSONRpcClient.msxmlNames[i]);}catch(e){}}JSONRpcClient.httpObjectName=null;throw new JSONRpcClient.Exception(0,"Can't create XMLHttpRequest object");};