137 lines
3.4 KiB
Ruby
137 lines
3.4 KiB
Ruby
# SOAP4R - WEBrick HTTP Server
|
|
# Copyright (C) 2003, 2004 by NAKAMURA, Hiroshi <nahi@ruby-lang.org>.
|
|
|
|
# This program is copyrighted free software by NAKAMURA, Hiroshi. You can
|
|
# redistribute it and/or modify it under the same terms of Ruby's license;
|
|
# either the dual license version in 2003, or any later version.
|
|
|
|
|
|
require 'logger'
|
|
require 'soap/rpc/soaplet'
|
|
require 'soap/streamHandler'
|
|
require 'webrick'
|
|
|
|
|
|
module SOAP
|
|
module RPC
|
|
|
|
|
|
class HTTPServer < Logger::Application
|
|
attr_reader :server
|
|
attr_accessor :default_namespace
|
|
|
|
def initialize(config)
|
|
super(config[:SOAPHTTPServerApplicationName] || self.class.name)
|
|
@default_namespace = config[:SOAPDefaultNamespace]
|
|
@webrick_config = config.dup
|
|
@webrick_config[:Logger] ||= @log
|
|
@server = nil
|
|
@soaplet = ::SOAP::RPC::SOAPlet.new
|
|
self.level = Logger::Severity::INFO
|
|
on_init
|
|
end
|
|
|
|
def on_init
|
|
# define extra methods in derived class.
|
|
end
|
|
|
|
def status
|
|
if @server
|
|
@server.status
|
|
else
|
|
nil
|
|
end
|
|
end
|
|
|
|
def shutdown
|
|
@server.shutdown if @server
|
|
end
|
|
|
|
def mapping_registry
|
|
@soaplet.app_scope_router.mapping_registry
|
|
end
|
|
|
|
def mapping_registry=(mapping_registry)
|
|
@soaplet.app_scope_router.mapping_registry = mapping_registry
|
|
end
|
|
|
|
# servant entry interface
|
|
|
|
def add_rpc_request_servant(factory, namespace = @default_namespace,
|
|
mapping_registry = nil)
|
|
@soaplet.add_rpc_request_servant(factory, namespace, mapping_registry)
|
|
end
|
|
|
|
def add_rpc_servant(obj, namespace = @default_namespace)
|
|
@soaplet.add_rpc_servant(obj, namespace)
|
|
end
|
|
|
|
def add_rpc_request_headerhandler(factory)
|
|
@soaplet.add_rpc_request_headerhandler(factory)
|
|
end
|
|
|
|
def add_rpc_headerhandler(obj)
|
|
@soaplet.add_rpc_headerhandler(obj)
|
|
end
|
|
|
|
# method entry interface
|
|
|
|
def add_rpc_method(obj, name, *param)
|
|
add_rpc_method_as(obj, name, name, *param)
|
|
end
|
|
alias add_method add_rpc_method
|
|
|
|
def add_document_method(obj, name, req_qname, res_qname)
|
|
opt = {}
|
|
opt[:request_style] = opt[:response_style] = :document
|
|
opt[:request_use] = opt[:response_use] = :literal
|
|
param_def = [
|
|
['input', req_qname.name, [nil, req_qname.namespace, req_qname.name]],
|
|
['output', req_qname.name, [nil, res_qname.namespace, res_qname.name]]
|
|
]
|
|
@soaplet.app_scope_router.add_operation(req_qname, nil, obj, name,
|
|
param_def, opt)
|
|
end
|
|
|
|
def add_rpc_method_as(obj, name, name_as, *param)
|
|
qname = XSD::QName.new(@default_namespace, name_as)
|
|
soapaction = nil
|
|
param_def = create_param_def(obj, name, param)
|
|
add_operation(qname, soapaction, obj, name, param_def)
|
|
end
|
|
alias add_method_as add_rpc_method_as
|
|
|
|
def add_operation(qname, soapaction, obj, name, param_def, opt = {})
|
|
opt[:request_style] ||= :rpc
|
|
opt[:response_style] ||= :rpc
|
|
opt[:request_use] ||= :encoded
|
|
opt[:response_use] ||= :encoded
|
|
@soaplet.app_scope_router.add_operation(qname, soapaction, obj, name,
|
|
param_def, opt)
|
|
end
|
|
|
|
def create_param_def(obj, name, param = nil)
|
|
if param.nil? or param.empty?
|
|
method = obj.method(name)
|
|
::SOAP::RPC::SOAPMethod.create_param_def(
|
|
(1..method.arity.abs).collect { |i| "p#{i}" })
|
|
elsif param.size == 1 and param[0].is_a?(Array)
|
|
param[0]
|
|
else
|
|
::SOAP::RPC::SOAPMethod.create_param_def(param)
|
|
end
|
|
end
|
|
|
|
private
|
|
|
|
def run
|
|
@server = WEBrick::HTTPServer.new(@webrick_config)
|
|
@server.mount('/', @soaplet)
|
|
@server.start
|
|
end
|
|
end
|
|
|
|
|
|
end
|
|
end
|