phprpc 3.0.0

data/lib/phprpc/cgi_server.rb

@@ -0,0 +1,46 @@
+############################################################
+#                                                          #
+# The implementation of PHPRPC Protocol 3.0                #
+#                                                          #
+# cgi_server.rb                                            #
+#                                                          #
+# Release 3.0.0                                            #
+# Copyright (c) 2005-2008 by Team-PHPRPC                   #
+#                                                          #
+# WebSite:  http://www.phprpc.org/                         #
+#           http://www.phprpc.net/                         #
+#           http://www.phprpc.com/                         #
+#           http://sourceforge.net/projects/php-rpc/       #
+#                                                          #
+# Authors:  Ma Bingyao <andot@ujn.edu.cn>                  #
+#                                                          #
+# This file may be distributed and/or modified under the   #
+# terms of the GNU Lesser General Public License (LGPL)    #
+# version 3.0 as published by the Free Software Foundation #
+# and appearing in the included file LICENSE.              #
+#                                                          #
+############################################################
+#
+# PHPRPC CGIServer library.
+#
+# Copyright (C) 2005-2008 Ma Bingyao <andot@ujn.edu.cn>
+# Version: 3.0
+# LastModified: Sep 9, 2008
+# This library is free.  You can redistribute it and/or modify it.
+
+require "phprpc/base_server"
+
+module PHPRPC
+  
+  class CGIServer < BaseServer
+    
+    def start()
+      cgi = CGI::new
+      header, body = call!(ENV, cgi)
+      header['type'] = header['Content-Type']
+      cgi.out(header) { body }
+    end
+
+  end # class CGIServer
+
+end # module PHPRPC

data/lib/phprpc/client.rb

@@ -0,0 +1,268 @@
+############################################################
+#                                                          #
+# The implementation of PHPRPC Protocol 3.0                #
+#                                                          #
+# client.rb                                                #
+#                                                          #
+# Release 3.0.0                                            #
+# Copyright (c) 2005-2008 by Team-PHPRPC                   #
+#                                                          #
+# WebSite:  http://www.phprpc.org/                         #
+#           http://www.phprpc.net/                         #
+#           http://www.phprpc.com/                         #
+#           http://sourceforge.net/projects/php-rpc/       #
+#                                                          #
+# Authors:  Ma Bingyao <andot@ujn.edu.cn>                  #
+#                                                          #
+# This file may be distributed and/or modified under the   #
+# terms of the GNU Lesser General Public License (LGPL)    #
+# version 3.0 as published by the Free Software Foundation #
+# and appearing in the included file LICENSE.              #
+#                                                          #
+############################################################
+#
+# PHPRPC Client library.
+#
+# Copyright (C) 2005-2008 Ma Bingyao <andot@ujn.edu.cn>
+# Version: 3.0
+# LastModified: Sep 15, 2008
+# This library is free.  You can redistribute it and/or modify it.
+
+require "net/http"
+require "net/https"
+require "uri"
+require "digest/md5"
+require "php/formator"
+require "crypt/xxtea"
+require "powmod"
+
+module PHPRPC
+  
+  class Error < Exception
+    attr_accessor :number
+  end
+
+  class Client
+
+    VERSION = '3.00'
+
+    def initialize(url = nil)
+      Net::HTTP.version_1_2
+      @httpclient = nil
+      @http = Net::HTTP
+      if url then
+        @uri = URI.parse(url)
+      end
+      @timeout = 30
+      @output = ''
+      @warning = nil
+      @key = nil
+      @keylength = 128
+      @encryptmode = 0
+      @cookie = ''
+      @cookies = {}
+      @charset = 'utf-8'
+      @username = nil
+      @password = nil
+      @server_version = nil
+    end
+
+    def use_service(url, username = nil, password = nil)
+      close
+      @httpclient = nil
+      @uri = URI.parse(url)
+      @key = nil
+      @keylength = 128
+      @encryptmode = 0
+      @cookie = ''
+      @cookies = {}
+      @charset = 'utf-8'
+      @username = username
+      @password = password
+      Proxy.new(self)
+    end
+
+    def set_proxy(p_addr, p_port = nil, p_user = nil, p_pass = nil)
+      close
+      @httpclient = nil
+      @http = Net::HTTP::Proxy(p_addr, p_port, p_user, p_pass)
+    end
+
+    def proxy=(proxy)
+      close
+      @httpclient = nil
+      @http = case proxy
+      when Net::HTTP then
+        proxy
+      when String then
+        uri = URI.parse(proxy)
+        Net::HTTP::Proxy(uri.host, uri.port, uri.user, uri.password)
+      else
+        proxy.superclass == Net::HTTP ? proxy : Net::HTTP
+      end
+    end
+
+    attr_reader :keylength
+
+    def keylength=(val)
+      @keylength = val if @key.nil?
+    end
+
+    attr_reader :encryptmode
+
+    def encryptmode=(val)
+      @encryptmode = ((val >= 0) and (val <= 3)) ? val.floor : 0;
+    end
+
+    attr_accessor :charset, :timeout
+    
+    attr_reader :output, :warning
+
+    def invoke(methodname, args, byref = false)
+      begin
+        _key_exchange()
+        request = "phprpc_func=#{methodname}"
+        request << '&phprpc_args=' << [_encrypt(PHP::Formator.serialize(args), 1)].pack('m').delete!("\n").gsub('+', '%2B') if args.size > 0
+        request << "&phprpc_encrypt=#{@encryptmode}"
+        request << '&phprpc_ref=false' if not byref
+        result = _post(request)
+        if result.key?('phprpc_errstr') and result.key?('phprpc_errno') then
+          @warning = PHPRPC::Error.new(result['phprpc_errstr'].unpack('m')[0])
+          @warning.number = result['phprpc_errno'].to_i
+        elsif result.key?('phprpc_functions') then
+          @warning = PHPRPC::Error.new("PHPRPC server haven't received then POST data!")
+          @warning.number = 1
+        else
+          @warning = PHPRPC::Error.new("PHPRPC server occured unknown error!")
+          @warning.number = 1
+        end
+        if result.key?('phprpc_output') then
+          @output = result['phprpc_output'].unpack('m')[0]
+          @output = _decrypt(@output, 3) if @server_version >= 3
+        else
+          @output = ''
+        end
+        if result.key?('phprpc_result') then
+          PHP::Formator.unserialize(_decrypt(result['phprpc_arg'].unpack('m')[0], 1)).each { |key, value|
+            args[key] = value
+          } if result.key?('phprpc_args')
+          PHP::Formator.unserialize(_decrypt(result['phprpc_result'].unpack('m')[0], 2))
+        else
+          @warning
+        end
+      rescue PHPRPC::Error => e
+        return e
+      rescue Exception => ex
+        e = PHPRPC::Error.new(ex.message)
+        e.number = 1
+        return e
+      end
+    end
+    
+    def close
+      @httpclient.finish if (not @httpclient.nil?) and @httpclient.started?
+    end
+
+    private
+
+    def _raise_error(number, message)
+      error = Error.new(message)
+      error.number = number
+      raise error
+    end
+    
+    def _post(req)
+      if @httpclient.nil? then
+        @httpclient = @http.new(@uri.host, @uri.port)
+        @httpclient.use_ssl = (@uri.scheme == 'https')
+        @httpclient.start
+      end
+      headers = {
+        'Cookie' => @cookie,
+        'User-Agent' => "PHPRPC 3.0 Client for Ruby (#{RUBY_VERSION})",
+        'Cache-Control' => 'no-cache',
+        'Content-Type' => "application/x-www-form-urlencoded; charset=#{@charset}",
+        'Content-Length' => req.size.to_s,
+        'Connection' => 'keep-alive',
+      }
+      headers.delete('Cookie') if @cookie.nil? or @cookie.empty?
+      resp, data = @httpclient.request_post(@uri.path, req, headers)
+      if resp.code == '200' then
+        if resp.key?('x-powered-by') then
+          @server_version = nil
+          resp['x-powered-by'].split(', ').each { |value|
+            @server_version = value[14..-1].to_f if value[0, 13] == 'PHPRPC Server'
+          }
+          _raise_error(1, 'Illegal PHPRPC server.') if @server_version.nil? 
+        else
+          _raise_error(1, 'Illegal PHPRPC server.')
+        end
+        resp['content-type'].split(', ').each { |value|
+          @charset = value[20..-1] if value[/^text\/plain; charset=/i]
+        }
+        if resp.key?('set-cookie') then
+          resp['set-cookie'].split(/[;,]\s?/).each { |pairs|
+            name, value = pairs.split('=', 2)
+            values ||= ''
+            @cookies[name] = value unless ['domain', 'expires', 'path', 'secure'].include?(name)
+          }
+          @cookie = ''
+          @cookies.each { |name, value|
+            @cookie << "#{name}=#{value}; "
+          }
+        end
+        result = {}
+        data.split(/;\r\n/).each { |line|
+          result.store(*line.match(/^(phprpc_[a-z]+)="(.*)"$/)[1, 2])
+        }
+        return result
+      else
+        _raise_error(resp.code.to_i, resp.message)
+      end
+    end
+
+    def _key_exchange
+      if (@key.nil?) and (@encryptmode != 0) then
+        result = _post("phprpc_encrypt=true&phprpc_keylen=#{@keylength.to_s}")
+        @keylength = result.key?('phprpc_keylen') ? result['phprpc_keylen'].to_i : 128
+        if result.key?('phprpc_encrypt') then
+          encrypt = PHP::Formator.unserialize(result['phprpc_encrypt'].unpack("m")[0])
+          x = rand(1 << (@keylength - 1)) or (1 << (@keylength - 2))
+          key = Math.powmod(encrypt['y'].to_i, x, encrypt['p'].to_i)
+          @key = (@keylength == 128) ? [key.to_s(16).rjust(32, '0')].pack('H*') : Digest::MD5.digest(key.to_s)
+          y = Math.powmod(encrypt['g'].to_i, x, encrypt['p'].to_i)
+          _post("phprpc_encrypt=#{y}")
+        else
+          @key = nil
+          @encryptmode = 0
+        end
+      end
+    end
+    
+    def _encrypt(str, level)
+      ((not @key.nil?) and (@encryptmode >= level)) ? Crypt::XXTEA.encrypt(str, @key) : str
+    end
+    
+    def _decrypt(str, level)
+      ((not @key.nil?) and (@encryptmode >= level)) ? Crypt::XXTEA.decrypt(str, @key) : str
+    end
+    
+    def method_missing(methodname, *args)
+      self.invoke(methodname, args)
+    end
+
+    class Proxy
+
+      def initialize(phprpc_client)
+	@phprpc_client = phprpc_client
+      end
+
+      def method_missing(methodname, *args)
+        @phprpc_client.invoke(methodname, args)
+      end
+
+    end # class Proxy
+
+  end # class Client
+
+end # module PHPRPC

data/lib/phprpc/ebb_server.rb

@@ -0,0 +1,89 @@
+############################################################
+#                                                          #
+# The implementation of PHPRPC Protocol 3.0                #
+#                                                          #
+# ebb_server.rb                                            #
+#                                                          #
+# Release 3.0.0                                            #
+# Copyright (c) 2005-2008 by Team-PHPRPC                   #
+#                                                          #
+# WebSite:  http://www.phprpc.org/                         #
+#           http://www.phprpc.net/                         #
+#           http://www.phprpc.com/                         #
+#           http://sourceforge.net/projects/php-rpc/       #
+#                                                          #
+# Authors:  Ma Bingyao <andot@ujn.edu.cn>                  #
+#                                                          #
+# This file may be distributed and/or modified under the   #
+# terms of the GNU Lesser General Public License (LGPL)    #
+# version 3.0 as published by the Free Software Foundation #
+# and appearing in the included file LICENSE.              #
+#                                                          #
+############################################################
+#
+# PHPRPC EbbServer library.
+#
+# Copyright (C) 2005-2008 Ma Bingyao <andot@ujn.edu.cn>
+# Version: 3.0
+# LastModified: Sep 14, 2008
+# This library is free.  You can redistribute it and/or modify it.
+
+require 'ebb_ffi'
+require 'ebb'
+require "phprpc/base_server"
+
+module PHPRPC
+  class EbbServer < BaseServer
+    
+    def initialize(options = {})
+      super()
+      @options = {
+        :port                 => 3000,
+        :session_mode         => :file,
+        :path                 => "/",
+        :expire_after         => 1800,        
+      }.update(options)
+      @opts = OptionParser.new
+      @opts.banner = "Usage: #{@opts.program_name} ebb [options]"
+      @opts.separator ""
+      @opts.separator "Server options:"
+      @opts.on('-p', '--port PORT', Integer, "Which port to bind to (default: #{@options[:port]})") { |port| @options[:port] = port }
+      @opts.on('--ssl_cert FILE', String, "SSL certificate file") { |file| @options[:ssl_cert] = file }
+      @opts.on('--ssl_key FILE', String, "SSL key file") { |file| @options[:ssl_key] = file }
+      @opts.separator ""
+      @opts.separator "Session options:"
+      @opts.on('-s', '--session-mode MODE', [:file, :memcache, :pool], "Select Session mode (file, memcache, pool)", "(default: #{@options[:session_mode].to_s})") { |mode| @options[:session_mode] = mode }
+      @opts.on('-e','--expire-after TIME', Integer, "Session expire after (default: #{@options[:expire_after]})") { |time| @options[:expire_after] = time }
+      @opts.on('-m','--memcache_server SERVER', String, "Memcache server used by session in", "memcache mode (default: localhost:11211)") { |server| @options[:memcache_server] = server }
+      @opts.on('--prefix PATH', String, "Mount the PHPRPC Server under PATH", "(start with /)") { |path| @options[:path] = path }
+      @opts.separator ""
+      @opts.separator "Common options:"
+      @opts.on_tail("-D", "--debug", "Set debbuging on") { self.debug = true }
+      @opts.on_tail('-?', '-h', '--help', "Show this help message.") { puts @opts; exit }
+      @opts.on_tail('-v', '--version', "Show version") { puts Ebb::VERSION_STRING; exit }
+      begin
+        @opts.parse!(ARGV)
+      rescue OptionParser::ParseError
+        puts @opts
+        exit
+      end
+    end
+
+    def start()
+      app = self
+      if [:memcache, :pool].include?(@options[:session_mode]) then
+        begin
+          require 'rack'
+          if @options[:session_mode] == :memcache then
+            app = Rack::Session::Memcache.new(self, @options)
+          else
+            app = Rack::Session::Pool.new(self, @options)
+          end
+        rescue Exception
+          app = self
+        end
+      end
+      Ebb.start_server(app, @options)
+    end
+  end
+end

data/lib/phprpc/fake_server.rb

@@ -0,0 +1,50 @@
+############################################################
+#                                                          #
+# The implementation of PHPRPC Protocol 3.0                #
+#                                                          #
+# fake_server.rb                                           #
+#                                                          #
+# Release 3.0.0                                            #
+# Copyright (c) 2005-2008 by Team-PHPRPC                   #
+#                                                          #
+# WebSite:  http://www.phprpc.org/                         #
+#           http://www.phprpc.net/                         #
+#           http://www.phprpc.com/                         #
+#           http://sourceforge.net/projects/php-rpc/       #
+#                                                          #
+# Authors:  Ma Bingyao <andot@ujn.edu.cn>                  #
+#                                                          #
+# This file may be distributed and/or modified under the   #
+# terms of the GNU Lesser General Public License (LGPL)    #
+# version 3.0 as published by the Free Software Foundation #
+# and appearing in the included file LICENSE.              #
+#                                                          #
+############################################################
+#
+# PHPRPC FakeServer library.
+#
+# Copyright (C) 2005-2008 Ma Bingyao <andot@ujn.edu.cn>
+# Version: 3.0
+# LastModified: Sep 13, 2008
+# This library is free.  You can redistribute it and/or modify it.
+
+require 'optparse'
+
+module PHPRPC
+  class FakeServer
+
+    def initialize
+      @opts = OptionParser.new
+      @opts.banner = "Usage: #{@opts.program_name} [ServerName] [options]"
+      @opts.separator ""
+      @opts.separator "ServerName: (mongrel, thin, fcgi, scgi, lsapi, ebb, webrick)"
+      @opts.separator ""
+      @opts.separator "options:"
+      @opts.on_tail('-?', '-h', '--help', "Show this help message.", "Show more messages with ServerName.") { puts @opts; exit }
+      puts @opts
+      exit
+    end
+
+  end # class FakeServer
+
+end