<%@ LANGUAGE=VBScript %>
<%
'# ==========================================================================================================
'#
'# JSON-RPC Proxy ASP [classic asp]
'#
'# This asp page/component will forward the json-rpc request to an existing json-rpc service 
'# and transparently forward the result back to the caller via the HTTP response. 
'# 
'# @author Zen Sugiarto
'# ==========================================================================================================
 
'# configuration
'# -------------
 
'# This URl points to the json-rpc service point. 
'# if your system uses a different configuration mechanism, please adjust it accordingly
'#
Dim servicePointUrl
servicePointUrl = "http://url-to-json-rpc/point"
 
'# main body of execution
'# ----------------------
 
'# this function allows for msg to be logged into a log file so we can trace / analyze the traffic.
Sub logInfo (message)
	logFile = Server.MapPath("event.log")
    Const ForWriting   = 2
    Const ForAppending = 8
    Set fs = CreateObject("Scripting.FileSystemObject")
    If fs.FileExists(logFile) Then
        Set logFile = fs.OpenTextFile(logFile, ForAppending)
    Else
        Set logFile = fs.CreateTextFile(logFile, True)
    End If    
    logFile.WriteLine(Now() & vbTab & message)
    logFile.Close
    Set logFile = nothing
    Set fs = nothing
End Sub
 
' we read all of the POST data, json-rpc supports get, but this component only does POST for now.
' the safe array read from .BinaryRead is then converted into string, which is then sent into the 
' forwarding HTTP request object to the bus.
dim safeArray, totalBytes
totalBytes=Request.TotalBytes
safeArray=Request.BinaryRead(totalBytes)
jsonBody = ""
For n = 1 To LenB(safeArray)
  jsonBody = jsonBody & Chr(AscB(MidB(safeArray,n,1)))
Next
 
' create the HTTP request object to be forwarded into the service bus, 
' inject the json body in.
Dim httpreq
Set httpreq = Server.CreateObject("MSXML2.XMLHTTP")
httpreq.open "POST",servicePointUrl, False
httpreq.setRequestHeader "Content-Type","application/json-rpc"
'httpreq.setRequestHeader "Cookie",Request.Cookies
 
' Send out the request
On Error Resume Next
httpreq.send jsonBody
logInfo("REQUEST={ queryString=" & Request.QueryString & ", cookies="& Request.Cookies &", totalBytes=" & Request.TotalBytes & ", jsonBody="&jsonBody)
 
' TODO: implement error handling
 
' get response text, set mime type to application/json-rpc and write the bus response to the response stream
Response.ContentType="application/json-rpc"
Response.Write(httpreq.responseText)
%>

import sys
from optparse import OptionParser
from SimpleXMLRPCServer import SimpleXMLRPCServer
 
class DynamicXMLRPCServer(SimpleXMLRPCServer):
    """
    An XMLRPC server that will register all function whose name are prefixed with PREFIX via xml-rpc
    Zen Sugiarto - 2011
    """
 
    # this is the prefix used by this sever to decide whether a given method should be published over xml-rpc or not.
    PREFIX="xmlrpc_"
 
    # constructor
    def __init__(self, params):
        self.params=params
        self.host=params['host']
        self.port=params['port']
        SimpleXMLRPCServer.__init__(self,(self.host, self.port))
        # register all xmlrpc_ functions over xml-rpc
        for name in dir(self):
            if name[:len(DynamicXMLRPCServer.PREFIX)] == DynamicXMLRPCServer.PREFIX:
                function=getattr(self,name)
                print "registering function: %s as %s " % ( name, name[len(DynamicXMLRPCServer.PREFIX):] )
                self.register_function(function, name[len(DynamicXMLRPCServer.PREFIX):])
 
    # note: xmlrpc_ prefix is used by this server to mark that this function will be published
    def xmlrpc_hello(self,msg):
        """
        A simple hello function used for simple ping check. 
        @param msg - msg to pass to hello
        @return dictionary {"hello":msg}
        """
        return {"hello":msg}
 
    def xmlrpc_describe(self):
        """
        Retrieves the description/documentation of available functions within this service.
        by the grace of python's .__doc__ object.
        @return dictionary of the following format
        { 
            'function_name' : 'documentation/description of that function '} 
        } 
        """
        metaDescription={}
        for name in dir(self):
            if name[:len(DynamicXMLRPCServer.PREFIX)] == DynamicXMLRPCServer.PREFIX:
                function=getattr(self,name)
                metaDescription[name[len(DynamicXMLRPCServer.PREFIX):]]=function.__doc__
        return metaDescription;
 
    def xmlrpc_yourFunction(self):
        """
        Put in more function here!~
        """
        print "IMPLEMENT ME"
 
def main():
    """ main method """
    parser = OptionParser(""" 
        Template service object - please put your comment in here
        """)
    parser.add_option("--host", dest="host", help="hostname to publish the service against")
    parser.add_option("--port", dest="port", help="port number to use")
    (options, args) = parser.parse_args()
 
    if( options.host == None or options.port == None ):
        print "insufficient options provided. try --help"
        sys.exit(1);
 
    server = DynamicXMLRPCServer({'host':options.host,'port':int(options.port)})
    server.serve_forever()
 
if __name__ == "__main__":
    main()

import xmlrpclib
print xmlrpclib.ServerProxy("http://localhost:8000/").hello("zen")

import xmlrpclib
import readline
import cmd
import traceback
import pprint
import datetime
from optparse import OptionParser
import sys
 
class XmlRpcClientConsole(cmd.Cmd): 
    """
    Generic xml rpc client console, works with any xml rpc service
    """
    def __init__(self, url):
        cmd.Cmd.__init__(self)
        self.url = url;
        self.server = xmlrpclib.ServerProxy(url)
        self.pp = pprint.PrettyPrinter(indent=2)
        self.updatePrompt()
 
    def updatePrompt(self):
        self.prompt = "\n[%s] %s\nxmlrpc >> " % (datetime.datetime.now().strftime("%Y.%m.%d %H:%M:%S"),self.url)
 
    def default(self, line):
        try:
            result=None
            exec("result=self.server.%s" % (line))
            self.pp.pprint(result) # default formatter: pretty print the resultant data
        except Exception, ex:
            traceback.print_exc(ex)
        print; self.updatePrompt()
 
    def do_help(self,line):
        print
        print "-------------------------------------"
        print "GENERIC XML RPC CLIENT CONSOLE - HELP"
        print "-------------------------------------"
        print
        print "Simply type in the function name on the xml-rpc service end, like you would"
        print "on any good ol' python program. For example, if the other side has a method"
        print "called helloWorld(strparam), you can invoke it like so:"
        print
        print "... xmlrpc >> helloWorld('hello zen')"
        print
        print "the client is therefore completely transparent and exposes the full capabilities"
        print "of the server end. have fun." # -zen
        print 
 
def main():
    parser = OptionParser("""Generic XML RPC Client console""")
    parser.add_option("--url", dest="url", help="The XML RPC service URL to connect")
    parser.add_option("--cmd", dest="cmd", help="A one-off command to execute")
    (options, args) = parser.parse_args()
 
    if options.url == None :
        parser.print_help()
        sys.exit(1)
 
    console = XmlRpcClientConsole(options.url)
    if options.cmd != None :
        # run the cmd and bomb out
        console.default(options.cmd)
        sys.exit(0)
    else:
        print "for help using the console, type 'help'"
        # enter into cmd loop for interactive session
        console.cmdloop()
 
if __name__ == "__main__":
    main()