soap4r-ruby1.9 1.0.0

data/sample/showcase/wsdl/googleAdwords/ca.pem

@@ -0,0 +1,19 @@
+-----BEGIN CERTIFICATE-----
+MIIDJzCCApCgAwIBAgIBATANBgkqhkiG9w0BAQQFADCBzjELMAkGA1UEBhMCWkEx
+FTATBgNVBAgTDFdlc3Rlcm4gQ2FwZTESMBAGA1UEBxMJQ2FwZSBUb3duMR0wGwYD
+VQQKExRUaGF3dGUgQ29uc3VsdGluZyBjYzEoMCYGA1UECxMfQ2VydGlmaWNhdGlv
+biBTZXJ2aWNlcyBEaXZpc2lvbjEhMB8GA1UEAxMYVGhhd3RlIFByZW1pdW0gU2Vy
+dmVyIENBMSgwJgYJKoZIhvcNAQkBFhlwcmVtaXVtLXNlcnZlckB0aGF3dGUuY29t
+MB4XDTk2MDgwMTAwMDAwMFoXDTIwMTIzMTIzNTk1OVowgc4xCzAJBgNVBAYTAlpB
+MRUwEwYDVQQIEwxXZXN0ZXJuIENhcGUxEjAQBgNVBAcTCUNhcGUgVG93bjEdMBsG
+A1UEChMUVGhhd3RlIENvbnN1bHRpbmcgY2MxKDAmBgNVBAsTH0NlcnRpZmljYXRp
+b24gU2VydmljZXMgRGl2aXNpb24xITAfBgNVBAMTGFRoYXd0ZSBQcmVtaXVtIFNl
+cnZlciBDQTEoMCYGCSqGSIb3DQEJARYZcHJlbWl1bS1zZXJ2ZXJAdGhhd3RlLmNv
+bTCBnzANBgkqhkiG9w0BAQEFAAOBjQAwgYkCgYEA0jY2aovXwlue2oFBYo847kkE
+VdbQ7xwblRZH7xhINTpS9CtqBo87L+pW46+GjZ4X9560ZXUCTe/LCaIhUdib0GfQ
+ug2SBhRz1JPLlyoAnFxODLz6FVL88kRu2hFKbgifLy3j+ao6hnO2RlNYyIkFvYMR
+uHM/qgeN9EJN50CdHDcCAwEAAaMTMBEwDwYDVR0TAQH/BAUwAwEB/zANBgkqhkiG
+9w0BAQQFAAOBgQAmSCwWwlj66BZ0DKqqX1Q/8tfJeGBeXm43YyJ3Nn6yF8Q0ufUI
+hfzJATj/Tb7yFkJD57taRvvBxhEf8UqwKEbJw8RCfbz6q1lu1bdRiBHjpIUZa4JM
+pAwSremkrj/xw0llmozFyD4lt5SZu5IycQfwhl7tUCemDaYj+bvLpgcUQg==
+-----END CERTIFICATE-----

data/sample/showcase/wsdl/googleAdwords/client.rb

@@ -0,0 +1,40 @@
+# To generate default.rb, do like this;
+# % wsdl2ruby.rb --wsdl "https://adwords.google.com/api/adwords/v2/CampaignService?WSDL" --classdef --force
+
+require 'soap/wsdlDriver'
+require 'soap/header/simplehandler'
+require 'default'
+
+class HeaderHandler < SOAP::Header::SimpleHandler
+  def initialize(tag, value)
+    super(XSD::QName.new(nil, tag))
+    @tag = tag
+    @value = value
+  end
+
+  def on_simple_outbound
+    @value
+  end
+end
+
+wsdl = 'https://adwords.google.com/api/adwords/v2/CampaignService?WSDL'
+
+client = SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
+
+client.wiredump_dev = STDOUT  # Log high-level activity
+client.wiredump_file_base = "log"  # Log SOAP request and response
+
+# My Client Center manager account
+client.headerhandler << HeaderHandler.new('email', 'email@example.com')
+
+client.headerhandler << HeaderHandler.new('password', 'mypassword')
+client.headerhandler << HeaderHandler.new('useragent', 'soap4r test')
+client.headerhandler << HeaderHandler.new('token', 'XYZ1234567890')
+
+# (Optional) Any client account you manage
+client.headerhandler << HeaderHandler.new('clientEmail', 'abc@mail.com')
+
+camplist = client.call("getAllAdWordsCampaigns",
+  GetAllAdWordsCampaigns.new(123))
+
+p camplist 

data/sample/showcase/wsdl/googleAdwords/soap/property

@@ -0,0 +1 @@
+client.protocol.http.ssl_config.ca_file = ca.pem

data/sample/showcase/wsdl/googleSearch/GoogleSearch.rb

@@ -0,0 +1,97 @@
+require 'xsd/qname'
+
+# {urn:GoogleSearch}GoogleSearchResult
+class GoogleSearchResult
+  @@schema_type = "GoogleSearchResult"
+  @@schema_ns = "urn:GoogleSearch"
+  @@schema_element = [["documentFiltering", "SOAP::SOAPBoolean"], ["searchComments", "SOAP::SOAPString"], ["estimatedTotalResultsCount", "SOAP::SOAPInt"], ["estimateIsExact", "SOAP::SOAPBoolean"], ["resultElements", "ResultElementArray"], ["searchQuery", "SOAP::SOAPString"], ["startIndex", "SOAP::SOAPInt"], ["endIndex", "SOAP::SOAPInt"], ["searchTips", "SOAP::SOAPString"], ["directoryCategories", "DirectoryCategoryArray"], ["searchTime", "SOAP::SOAPDouble"]]
+
+  attr_accessor :documentFiltering
+  attr_accessor :searchComments
+  attr_accessor :estimatedTotalResultsCount
+  attr_accessor :estimateIsExact
+  attr_accessor :resultElements
+  attr_accessor :searchQuery
+  attr_accessor :startIndex
+  attr_accessor :endIndex
+  attr_accessor :searchTips
+  attr_accessor :directoryCategories
+  attr_accessor :searchTime
+
+  def initialize(documentFiltering = nil, searchComments = nil, estimatedTotalResultsCount = nil, estimateIsExact = nil, resultElements = nil, searchQuery = nil, startIndex = nil, endIndex = nil, searchTips = nil, directoryCategories = nil, searchTime = nil)
+    @documentFiltering = documentFiltering
+    @searchComments = searchComments
+    @estimatedTotalResultsCount = estimatedTotalResultsCount
+    @estimateIsExact = estimateIsExact
+    @resultElements = resultElements
+    @searchQuery = searchQuery
+    @startIndex = startIndex
+    @endIndex = endIndex
+    @searchTips = searchTips
+    @directoryCategories = directoryCategories
+    @searchTime = searchTime
+  end
+end
+
+# {urn:GoogleSearch}ResultElement
+class ResultElement
+  @@schema_type = "ResultElement"
+  @@schema_ns = "urn:GoogleSearch"
+  @@schema_element = [["summary", "SOAP::SOAPString"], ["uRL", ["SOAP::SOAPString", XSD::QName.new("urn:GoogleSearch", "URL")]], ["snippet", "SOAP::SOAPString"], ["title", "SOAP::SOAPString"], ["cachedSize", "SOAP::SOAPString"], ["relatedInformationPresent", "SOAP::SOAPBoolean"], ["hostName", "SOAP::SOAPString"], ["directoryCategory", "DirectoryCategory"], ["directoryTitle", "SOAP::SOAPString"]]
+
+  attr_accessor :summary
+  attr_accessor :snippet
+  attr_accessor :title
+  attr_accessor :cachedSize
+  attr_accessor :relatedInformationPresent
+  attr_accessor :hostName
+  attr_accessor :directoryCategory
+  attr_accessor :directoryTitle
+
+  def URL
+    @uRL
+  end
+
+  def URL=(value)
+    @uRL = value
+  end
+
+  def initialize(summary = nil, uRL = nil, snippet = nil, title = nil, cachedSize = nil, relatedInformationPresent = nil, hostName = nil, directoryCategory = nil, directoryTitle = nil)
+    @summary = summary
+    @uRL = uRL
+    @snippet = snippet
+    @title = title
+    @cachedSize = cachedSize
+    @relatedInformationPresent = relatedInformationPresent
+    @hostName = hostName
+    @directoryCategory = directoryCategory
+    @directoryTitle = directoryTitle
+  end
+end
+
+# {urn:GoogleSearch}ResultElementArray
+class ResultElementArray < ::Array
+  @@schema_type = "ResultElement"
+  @@schema_ns = "urn:GoogleSearch"
+end
+
+# {urn:GoogleSearch}DirectoryCategoryArray
+class DirectoryCategoryArray < ::Array
+  @@schema_type = "DirectoryCategory"
+  @@schema_ns = "urn:GoogleSearch"
+end
+
+# {urn:GoogleSearch}DirectoryCategory
+class DirectoryCategory
+  @@schema_type = "DirectoryCategory"
+  @@schema_ns = "urn:GoogleSearch"
+  @@schema_element = [["fullViewableName", "SOAP::SOAPString"], ["specialEncoding", "SOAP::SOAPString"]]
+
+  attr_accessor :fullViewableName
+  attr_accessor :specialEncoding
+
+  def initialize(fullViewableName = nil, specialEncoding = nil)
+    @fullViewableName = fullViewableName
+    @specialEncoding = specialEncoding
+  end
+end

data/sample/showcase/wsdl/googleSearch/GoogleSearchDriver.rb

@@ -0,0 +1,102 @@
+require 'GoogleSearch.rb'
+
+require 'soap/rpc/driver'
+
+class GoogleSearchPort < ::SOAP::RPC::Driver
+  DefaultEndpointUrl = "http://api.google.com/search/beta2"
+  MappingRegistry = ::SOAP::Mapping::Registry.new
+
+  MappingRegistry.set(
+    GoogleSearchResult,
+    ::SOAP::SOAPStruct,
+    ::SOAP::Mapping::Registry::TypedStructFactory,
+    { :type => XSD::QName.new("urn:GoogleSearch", "GoogleSearchResult") }
+  )
+  MappingRegistry.set(
+    ResultElementArray,
+    ::SOAP::SOAPArray,
+    ::SOAP::Mapping::Registry::TypedArrayFactory,
+    { :type => XSD::QName.new("urn:GoogleSearch", "ResultElement") }
+  )
+  MappingRegistry.set(
+    DirectoryCategoryArray,
+    ::SOAP::SOAPArray,
+    ::SOAP::Mapping::Registry::TypedArrayFactory,
+    { :type => XSD::QName.new("urn:GoogleSearch", "DirectoryCategory") }
+  )
+  MappingRegistry.set(
+    ResultElement,
+    ::SOAP::SOAPStruct,
+    ::SOAP::Mapping::Registry::TypedStructFactory,
+    { :type => XSD::QName.new("urn:GoogleSearch", "ResultElement") }
+  )
+  MappingRegistry.set(
+    DirectoryCategory,
+    ::SOAP::SOAPStruct,
+    ::SOAP::Mapping::Registry::TypedStructFactory,
+    { :type => XSD::QName.new("urn:GoogleSearch", "DirectoryCategory") }
+  )
+
+  Methods = [
+    ["doGetCachedPage", "doGetCachedPage",
+      [
+        [:in, "key", ["::SOAP::SOAPString"]],
+        [:in, "url", ["::SOAP::SOAPString"]],
+        [:retval, "return", ["::SOAP::SOAPBase64"]]
+      ],
+      "urn:GoogleSearchAction", "urn:GoogleSearch", :rpc
+    ],
+    ["doSpellingSuggestion", "doSpellingSuggestion",
+      [
+        [:in, "key", ["::SOAP::SOAPString"]],
+        [:in, "phrase", ["::SOAP::SOAPString"]],
+        [:retval, "return", ["::SOAP::SOAPString"]]
+      ],
+      "urn:GoogleSearchAction", "urn:GoogleSearch", :rpc
+    ],
+    ["doGoogleSearch", "doGoogleSearch",
+      [
+        [:in, "key", ["::SOAP::SOAPString"]],
+        [:in, "q", ["::SOAP::SOAPString"]],
+        [:in, "start", ["::SOAP::SOAPInt"]],
+        [:in, "maxResults", ["::SOAP::SOAPInt"]],
+        [:in, "filter", ["::SOAP::SOAPBoolean"]],
+        [:in, "restrict", ["::SOAP::SOAPString"]],
+        [:in, "safeSearch", ["::SOAP::SOAPBoolean"]],
+        [:in, "lr", ["::SOAP::SOAPString"]],
+        [:in, "ie", ["::SOAP::SOAPString"]],
+        [:in, "oe", ["::SOAP::SOAPString"]],
+        [:retval, "return", ["GoogleSearchResult", "urn:GoogleSearch", "GoogleSearchResult"]]
+      ],
+      "urn:GoogleSearchAction", "urn:GoogleSearch", :rpc
+    ]
+  ]
+
+  def initialize(endpoint_url = nil)
+    endpoint_url ||= DefaultEndpointUrl
+    super(endpoint_url, nil)
+    self.mapping_registry = MappingRegistry
+    init_methods
+  end
+
+private
+
+  def init_methods
+    Methods.each do |name_as, name, params, soapaction, namespace, style|
+      qname = XSD::QName.new(namespace, name_as)
+      if style == :document
+        @proxy.add_document_method(soapaction, name, params)
+        add_document_method_interface(name, params)
+      else
+        @proxy.add_rpc_method(qname, soapaction, name, params)
+        add_rpc_method_interface(name, params)
+      end
+      if name_as != name and name_as.capitalize == name.capitalize
+        ::SOAP::Mapping.define_singleton_method(self, name_as) do |*arg|
+          __send__(name, *arg)
+        end
+      end
+    end
+  end
+end
+

data/sample/showcase/wsdl/googleSearch/README

@@ -0,0 +1,6 @@
+wsdlDriver.rb: Do google search using WSDL.
+
+Whole files except wsdl.rb in this directory is created by wsdl2ruby.rb from
+GoogleSearch.wsdl with options;
+
+% wsdl2ruby.rb --wsdl http://api.google.com/GoogleSearch.wsdl --classdef --client_skelton --servant_skelton --cgi_stub --standalone_server_stub --driver --force

data/sample/showcase/wsdl/googleSearch/httpd.rb

@@ -0,0 +1,20 @@
+#!/usr/bin/env ruby
+
+require 'webrick'
+require 'soap/property'
+
+docroot = "."
+port = 8808
+if opt = SOAP::Property.loadproperty("samplehttpd.conf")
+  docroot = opt["docroot"]
+  port = Integer(opt["port"])
+end
+
+s = WEBrick::HTTPServer.new(
+  :BindAddress => "0.0.0.0",
+  :Port => port,
+  :DocumentRoot => docroot,
+  :CGIPathEnv => ENV['PATH']
+)
+trap(:INT){ s.shutdown }
+s.start

data/sample/showcase/wsdl/googleSearch/sampleClient.rb

@@ -0,0 +1,56 @@
+#!/usr/bin/env ruby
+
+# This file is a sample based on GoogleSearchClient.rb, which can be
+# generated by WSDL file and wsdl2ruby.rb.
+#
+# $ wsdl2ruby.rb --type client --force \
+#   --wsdl http://api.google.com/GoogleSearch.wsdl
+#
+# See wsdlDriver.rb to use WSDL file directly (slow).
+require 'GoogleSearchDriver.rb'
+
+endpoint_url = ARGV.shift
+obj = GoogleSearchPort.new(endpoint_url)
+
+# Uncomment the below line to see SOAP wiredumps.
+# obj.wiredump_dev = STDERR
+
+# SYNOPSIS
+#   doGoogleSearch(key, q, start, maxResults, filter, restrict, safeSearch, lr, ie, oe)
+#
+# ARGS
+#   key		 - {http://www.w3.org/2001/XMLSchema}string
+#   q		 - {http://www.w3.org/2001/XMLSchema}string
+#   start		 - {http://www.w3.org/2001/XMLSchema}int
+#   maxResults		 - {http://www.w3.org/2001/XMLSchema}int
+#   filter		 - {http://www.w3.org/2001/XMLSchema}boolean
+#   restrict		 - {http://www.w3.org/2001/XMLSchema}string
+#   safeSearch		 - {http://www.w3.org/2001/XMLSchema}boolean
+#   lr		 - {http://www.w3.org/2001/XMLSchema}string
+#   ie		 - {http://www.w3.org/2001/XMLSchema}string
+#   oe		 - {http://www.w3.org/2001/XMLSchema}string
+#
+# RETURNS
+#   return		GoogleSearchResult - {urn:GoogleSearch}GoogleSearchResult
+#
+# RAISES
+#    N/A
+#
+key = q = start = maxResults = filter = restrict = safeSearch = lr = ie = oe = nil
+key = File.open(File.expand_path("~/.google_key")) { |f| f.read }.chomp
+q = "Ruby"
+start = 0
+maxResults = 10
+filter = false
+restrict = ""
+safeSearch = false
+lr = ""
+ie = "utf-8"
+oe = "utf-8"
+result = obj.doGoogleSearch(key, q, start, maxResults, filter, restrict, safeSearch, lr, ie, oe)
+
+result.resultElements.each do |ele|
+  puts "== #{ele.title}: #{ele.URL}"
+  puts ele.snippet
+  puts
+end

data/sample/showcase/wsdl/googleSearch/samplehttpd.conf

@@ -0,0 +1,2 @@
+docroot = .
+port = 8808

data/sample/showcase/wsdl/googleSearch/sjissearch.sh

@@ -0,0 +1,3 @@
+#!/bin/sh -
+
+ruby -Ks wsdlDriver.rb 'Ruby �Ȃ�'

data/sample/showcase/wsdl/googleSearch/wsdlDriver.rb

@@ -0,0 +1,29 @@
+#require 'uconv'
+require 'soap/wsdlDriver'
+
+word = ARGV.shift
+# You must get key from http://www.google.com/apis/ to use Google Web APIs.
+key = File.open(File.expand_path("~/.google_key")) { |f| f.read }.chomp
+
+GOOGLE_WSDL = 'http://api.google.com/GoogleSearch.wsdl'
+# GOOGLE_WSDL = 'GoogleSearch.wsdl'
+
+def html2rd(str)
+  str.gsub(%r(<b>(.*?)</b>), '((*\\1*))').strip
+end
+
+
+google = SOAP::WSDLDriverFactory.new(GOOGLE_WSDL).create_rpc_driver
+google.options["soap.envelope.use_numeric_character_reference"] = true
+google.wiredump_dev = STDOUT if $DEBUG
+#google.generate_explicit_type = false
+
+result = google.doGoogleSearch( key, word, 0, 10, false, "", false, "", 'utf-8', 'utf-8' )
+
+exit
+
+result.resultElements.each do |ele|
+  puts "== #{html2rd(ele.title)}: #{ele["URL"]}"
+  puts html2rd(ele.snippet)
+  puts
+end

data/sample/showcase/wsdl/noaa/README.txt

@@ -0,0 +1,5 @@
+1. run wsdl2ruby.rb againt ndfdXML.wsdl
+
+% bin/wsdl2ruby.rb --wsdl ndfdXML.wsdl --type client --force
+
+2. run client.rb to see how it works.

data/sample/showcase/wsdl/noaa/client.rb

@@ -0,0 +1,44 @@
+## preparing
+
+t = Time.now
+starter = Time.local(t.year,t.mon, t.day) + (24 *3600)
+ender = starter + 7 * 24 *3600
+lattitude = 39.0
+longitude = -77.0
+
+## accessing through dynamically generated driver
+
+require 'soap/wsdlDriver'
+
+params = {:maxt => false, :mint => false, :temp => true, :dew => true,
+  :pop12 => false, :qpf => false, :sky => false, :snow => false,
+  :wspd => false, :wdir => false, :wx => false, :waveh => false,
+  :icons => false}
+
+wsdl = "http://weather.gov/forecasts/xml/DWMLgen/wsdl/ndfdXML.wsdl"
+drv = SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
+drv.wiredump_dev = STDOUT if $DEBUG
+dwml = drv.nDFDgen(lattitude, longitude, 'time-series', starter, ender, params)
+puts dwml
+
+require 'xsd/mapping'
+data = XSD::Mapping.xml2obj(dwml).data
+
+data.parameters.temperature.each do |temp|
+  p temp.name
+  p temp.value
+end
+
+## accessing through statically generated driver
+
+# run wsdl2ruby.rb to create needed files like this;
+# wsdl2ruby.rb --wsdl http://weather.gov/forecasts/xml/DWMLgen/wsdl/ndfdXML.wsdl --type client
+require 'defaultDriver.rb'
+params = WeatherParametersType.new(false, false, true, true, false, false,
+  false, false, false, false, false, false, false)
+
+drv = NdfdXMLPortType.new
+drv.wiredump_dev = STDOUT if $DEBUG
+dwml = drv.nDFDgen(lattitude, longitude, ProductType::TimeSeries, starter,
+  ender, params)
+puts dwml