[frontierkernel-commits] odbs/frontierRoot/system/verbs/apps/Manila callHandler,1.1.1.1,1.2

[creedon <icr...@us...>]

Update of /cvsroot/frontierkernel/odbs/frontierRoot/system/verbs/apps/Manila
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10459

Modified Files:
	callHandler 
Log Message:
changed localhost to 127.0.0.1

Index: callHandler
===================================================================
RCS file: /cvsroot/frontierkernel/odbs/frontierRoot/system/verbs/apps/Manila/callHandler,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -d -r1.1.1.1 -r1.2
*** callHandler	26 Mar 2005 19:42:16 -0000	1.1.1.1
--- callHandler	19 Jun 2005 18:10:14 -0000	1.2
***************
*** 1,3 ****
  FrontierVcsFile:1:scpt:system.verbs.apps.Manila.callHandler
  
! on callHandler (rpcServer="localhost", rpcPort=user.inetd.config.http.port, procedureName="", adrparamlist=nil, fldebug=false, ticksToTimeOut=nil, flShowMessages=true, rpcPath=nil, flAsynch=false, adrCallback=nil, extraInfo=nil, adrErrorCallback=nil, username="", password="") {
	
	Ç11/19/00; 11:15:19 PM by JES
		ÇCall either an XML-RPC handler or a SOAP handler, depending on the pref at user.manila.prefs.flUseSoap
	ÇChanges:
		Ç02/04/01; 4:56:48 PM by JES
			ÇCall soap.rpc.client with the correct actionUri and methodName. Prevents generation of XML with elements containing slash characters.
	
	bundle { // make sure the pref exists
		if not defined (user.manila) {
			new (tableType, @user.manila)};
		if not defined (user.manila.prefs) {
			new (tableType, @user.manila.prefs)};
		if not defined (user.manila.prefs.flUseSoap) {
			if defined (manila.flUseSoap) {
				user.manila.prefs.flUseSoap = manila.flUseSoap;
				delete (@manila.flUseSoap)}
			else {
				user.manila.prefs.flUseSoap = false}}};
	
	if user.manila.prefs.flUseSoap {
		ÇTransform the request parameters so they can be used to call a SOAP handler.
		local (action, ppath);
		action = string.nthField (procedureName, ".", string.countFields (procedureName, "."));
		ppath = "/" + string.mid (procedureName, 1, sizeof (procedureName) - (sizeof (action) + 1) );
		ppath = string.replaceAll (ppath, ".", "/");
		return (soap.rpc.client (ppath, action, adrparamlist, rpcServer, rpcPort, username, password, fldebug, ticksToTimeOut, flShowMessages))}
	else { // use XML-RPC
		return (betty.rpc.client (rpcServer, rpcPort, procedureName, adrparamlist, fldebug, ticksToTimeOut, flShowMessages, rpcPath, flAsynch, adrCallback, extraInfo, adrErrorCallback, username, password))}}
\ No newline at end of file
--- 1,3 ----
  FrontierVcsFile:1:scpt:system.verbs.apps.Manila.callHandler
  
! on callHandler (rpcServer="127.0.0.1", rpcPort=user.inetd.config.http.port, procedureName="", adrparamlist=nil, fldebug=false, ticksToTimeOut=nil, flShowMessages=true, rpcPath=nil, flAsynch=false, adrCallback=nil, extraInfo=nil, adrErrorCallback=nil, username="", password="") {
	
	ÇChanges
		Ç6/19/05; 10:03:52 AM by TAC
			Çchanged localhost to 127.0.0.1
		Ç02/04/01; 4:56:48 PM by JES
			ÇCall soap.rpc.client with the correct actionUri and methodName. Prevents generation of XML with elements containing slash characters.
		Ç11/19/00; 11:15:19 PM by JES
			ÇCall either an XML-RPC handler or a SOAP handler, depending on the pref at user.manila.prefs.flUseSoap
	
	bundle { // make sure the pref exists
		if not defined (user.manila) {
			new (tableType, @user.manila)};
		if not defined (user.manila.prefs) {
			new (tableType, @user.manila.prefs)};
		if not defined (user.manila.prefs.flUseSoap) {
			if defined (manila.flUseSoap) {
				user.manila.prefs.flUseSoap = manila.flUseSoap;
				delete (@manila.flUseSoap)}
			else {
				user.manila.prefs.flUseSoap = false}}};
	
	if user.manila.prefs.flUseSoap {
		ÇTransform the request parameters so they can be used to call a SOAP handler.
		local (action, ppath);
		action = string.nthField (procedureName, ".", string.countFields (procedureName, "."));
		ppath = "/" + string.mid (procedureName, 1, sizeof (procedureName) - (sizeof (action) + 1) );
		ppath = string.replaceAll (ppath, ".", "/");
		return (soap.rpc.client (ppath, action, adrparamlist, rpcServer, rpcPort, username, password, fldebug, ticksToTimeOut, flShowMessages))}
	else { // use XML-RPC
		return (betty.rpc.client (rpcServer, rpcPort, procedureName, adrparamlist, fldebug, ticksToTimeOut, flShowMessages, rpcPath, flAsynch, adrCallback, extraInfo, adrErrorCallback, username, password))}}
\ No newline at end of file