titlepage 0.9.5

data/lib/titlepage/mapping_registry.rb

@@ -0,0 +1,201 @@
+require 'soap/mapping'
+
+module TitlePage
+
+  module DefaultMappingRegistry
+    EncodedRegistry = ::SOAP::Mapping::EncodedRegistry.new
+    LiteralRegistry = ::SOAP::Mapping::LiteralRegistry.new
+    NsTitleQuery = "urn:TitleQuery"
+
+    EncodedRegistry.register(
+      :class => TitlePage::ProductIdentifier,
+      :schema_type => XSD::QName.new(NsTitleQuery, "ProductIdentifier"),
+      :schema_element => [
+        ["productIDType", ["SOAP::SOAPString", XSD::QName.new(nil, "ProductIDType")]],
+        ["iDValue", ["SOAP::SOAPString", XSD::QName.new(nil, "IDValue")]]
+    ]
+    )
+
+    EncodedRegistry.register(
+      :class => TitlePage::Title,
+      :schema_type => XSD::QName.new(NsTitleQuery, "Title"),
+      :schema_element => [
+        ["titleType", ["SOAP::SOAPString", XSD::QName.new(nil, "TitleType")]],
+        ["titleText", ["SOAP::SOAPString", XSD::QName.new(nil, "TitleText")]],
+        ["titlePrefix", ["SOAP::SOAPString", XSD::QName.new(nil, "TitlePrefix")]],
+        ["titleWithoutPrefix", ["SOAP::SOAPString", XSD::QName.new(nil, "TitleWithoutPrefix")]],
+        ["subtitle", ["SOAP::SOAPString", XSD::QName.new(nil, "Subtitle")]]
+    ]
+    )
+
+    EncodedRegistry.register(
+      :class => TitlePage::Contributor,
+      :schema_type => XSD::QName.new(NsTitleQuery, "Contributor"),
+      :schema_element => [
+        ["sequenceNumber", ["SOAP::SOAPInteger", XSD::QName.new(nil, "SequenceNumber")]],
+        ["contributorRole", ["SOAP::SOAPString", XSD::QName.new(nil, "ContributorRole")]],
+        ["personName", ["SOAP::SOAPString", XSD::QName.new(nil, "PersonName")]],
+        ["personNameInverted", ["SOAP::SOAPString", XSD::QName.new(nil, "PersonNameInverted")]],
+        ["titlesBeforeNames", ["SOAP::SOAPString", XSD::QName.new(nil, "TitlesBeforeNames")]],
+        ["keyNames", ["SOAP::SOAPString", XSD::QName.new(nil, "KeyNames")]]
+    ]
+    )
+
+    EncodedRegistry.register(
+      :class => TitlePage::Stock,
+      :schema_type => XSD::QName.new(NsTitleQuery, "Stock"),
+      :schema_element => [
+        ["onHand", ["SOAP::SOAPString", XSD::QName.new(nil, "OnHand")]],
+        ["onOrder", ["SOAP::SOAPString", XSD::QName.new(nil, "OnOrder")]]
+    ]
+    )
+
+    EncodedRegistry.register(
+      :class => TitlePage::Price,
+      :schema_type => XSD::QName.new(NsTitleQuery, "Price"),
+      :schema_element => [
+        ["priceTypeCode", ["SOAP::SOAPString", XSD::QName.new(nil, "PriceTypeCode")]],
+        ["priceAmount", ["SOAP::SOAPDecimal", XSD::QName.new(nil, "PriceAmount")]]
+    ]
+    )
+
+    EncodedRegistry.register(
+      :class => TitlePage::SupplyDetail,
+      :schema_type => XSD::QName.new(NsTitleQuery, "SupplyDetail"),
+      :schema_element => [
+        ["supplierName", ["SOAP::SOAPString", XSD::QName.new(nil, "SupplierName")]],
+        ["supplierRole", ["SOAP::SOAPString", XSD::QName.new(nil, "SupplierRole")]],
+        ["productAvailability", ["SOAP::SOAPString", XSD::QName.new(nil, "ProductAvailability")]],
+        ["expectedShipDate", ["SOAP::SOAPString", XSD::QName.new(nil, "ExpectedShipDate")]],
+        ["stock", ["TitlePage::Stock", XSD::QName.new(nil, "Stock")]],
+        ["packQuantity", ["SOAP::SOAPInteger", XSD::QName.new(nil, "PackQuantity")]],
+        ["price", ["TitlePage::Price", XSD::QName.new(nil, "Price")]]
+    ]
+    )
+
+    EncodedRegistry.set(
+      TitlePage::ArrayOfContributor,
+      ::SOAP::SOAPArray,
+      ::SOAP::Mapping::EncodedRegistry::TypedArrayFactory,
+      { :type => XSD::QName.new(NsTitleQuery, "Contributor") }
+    )
+
+    EncodedRegistry.set(
+      TitlePage::ArrayOfProductIdentifier,
+      ::SOAP::SOAPArray,
+      ::SOAP::Mapping::EncodedRegistry::TypedArrayFactory,
+      { :type => XSD::QName.new(NsTitleQuery, "ProductIdentifier") }
+    )
+
+    EncodedRegistry.register(
+      :class => TitlePage::Product,
+      :schema_type => XSD::QName.new(NsTitleQuery, "Product"),
+      :schema_element => [
+        ["productIdentifiers", ["TitlePage::ArrayOfProductIdentifier", XSD::QName.new(nil, "ProductIdentifiers")]],
+        ["title", ["TitlePage::Title", XSD::QName.new(nil, "Title")]],
+        ["contributors", ["TitlePage::ArrayOfContributor", XSD::QName.new(nil, "Contributors")]],
+        ["supplyDetail", ["TitlePage::SupplyDetail", XSD::QName.new(nil, "SupplyDetail")]]
+    ]
+    )
+
+    EncodedRegistry.register(
+      :class => TitlePage::SearchResults,
+      :schema_type => XSD::QName.new(NsTitleQuery, "SearchResults"),
+      :schema_element => [
+        ["iSBN", ["SOAP::SOAPString", XSD::QName.new(nil, "ISBN")]],
+        ["eAN", ["SOAP::SOAPString", XSD::QName.new(nil, "EAN")]],
+        ["iSBN13", ["SOAP::SOAPString", XSD::QName.new(nil, "ISBN13")]],
+        ["product", ["TitlePage::Product", XSD::QName.new(nil, "Product")]]
+    ]
+    )
+
+    LiteralRegistry.register(
+      :class => TitlePage::ProductIdentifier,
+      :schema_type => XSD::QName.new(NsTitleQuery, "ProductIdentifier"),
+      :schema_element => [
+        ["productIDType", ["SOAP::SOAPString", XSD::QName.new(nil, "ProductIDType")]],
+        ["iDValue", ["SOAP::SOAPString", XSD::QName.new(nil, "IDValue")]]
+    ]
+    )
+
+    LiteralRegistry.register(
+      :class => TitlePage::Title,
+      :schema_type => XSD::QName.new(NsTitleQuery, "Title"),
+      :schema_element => [
+        ["titleType", ["SOAP::SOAPString", XSD::QName.new(nil, "TitleType")]],
+        ["titleText", ["SOAP::SOAPString", XSD::QName.new(nil, "TitleText")]],
+        ["titlePrefix", ["SOAP::SOAPString", XSD::QName.new(nil, "TitlePrefix")]],
+        ["titleWithoutPrefix", ["SOAP::SOAPString", XSD::QName.new(nil, "TitleWithoutPrefix")]],
+        ["subtitle", ["SOAP::SOAPString", XSD::QName.new(nil, "Subtitle")]]
+    ]
+    )
+
+    LiteralRegistry.register(
+      :class => TitlePage::Contributor,
+      :schema_type => XSD::QName.new(NsTitleQuery, "Contributor"),
+      :schema_element => [
+        ["sequenceNumber", ["SOAP::SOAPInteger", XSD::QName.new(nil, "SequenceNumber")]],
+        ["contributorRole", ["SOAP::SOAPString", XSD::QName.new(nil, "ContributorRole")]],
+        ["personName", ["SOAP::SOAPString", XSD::QName.new(nil, "PersonName")]],
+        ["personNameInverted", ["SOAP::SOAPString", XSD::QName.new(nil, "PersonNameInverted")]],
+        ["titlesBeforeNames", ["SOAP::SOAPString", XSD::QName.new(nil, "TitlesBeforeNames")]],
+        ["keyNames", ["SOAP::SOAPString", XSD::QName.new(nil, "KeyNames")]]
+    ]
+    )
+
+    LiteralRegistry.register(
+      :class => TitlePage::Stock,
+      :schema_type => XSD::QName.new(NsTitleQuery, "Stock"),
+      :schema_element => [
+        ["onHand", ["SOAP::SOAPString", XSD::QName.new(nil, "OnHand")]],
+        ["onOrder", ["SOAP::SOAPString", XSD::QName.new(nil, "OnOrder")]]
+    ]
+    )
+
+    LiteralRegistry.register(
+      :class => TitlePage::Price,
+      :schema_type => XSD::QName.new(NsTitleQuery, "Price"),
+      :schema_element => [
+        ["priceTypeCode", ["SOAP::SOAPString", XSD::QName.new(nil, "PriceTypeCode")]],
+        ["priceAmount", ["SOAP::SOAPDecimal", XSD::QName.new(nil, "PriceAmount")]]
+    ]
+    )
+
+    LiteralRegistry.register(
+      :class => TitlePage::SupplyDetail,
+      :schema_type => XSD::QName.new(NsTitleQuery, "SupplyDetail"),
+      :schema_element => [
+        ["supplierName", ["SOAP::SOAPString", XSD::QName.new(nil, "SupplierName")]],
+        ["supplierRole", ["SOAP::SOAPString", XSD::QName.new(nil, "SupplierRole")]],
+        ["productAvailability", ["SOAP::SOAPString", XSD::QName.new(nil, "ProductAvailability")]],
+        ["expectedShipDate", ["SOAP::SOAPString", XSD::QName.new(nil, "ExpectedShipDate")]],
+        ["stock", ["TitlePage::Stock", XSD::QName.new(nil, "Stock")]],
+        ["packQuantity", ["SOAP::SOAPInteger", XSD::QName.new(nil, "PackQuantity")]],
+        ["price", ["TitlePage::Price", XSD::QName.new(nil, "Price")]]
+    ]
+    )
+
+    LiteralRegistry.register(
+      :class => TitlePage::Product,
+      :schema_type => XSD::QName.new(NsTitleQuery, "Product"),
+      :schema_element => [
+        ["productIdentifiers", ["TitlePage::ArrayOfProductIdentifier", XSD::QName.new(nil, "ProductIdentifiers")]],
+        ["title", ["TitlePage::Title", XSD::QName.new(nil, "Title")]],
+        ["contributors", ["TitlePage::ArrayOfContributor", XSD::QName.new(nil, "Contributors")]],
+        ["supplyDetail", ["TitlePage::SupplyDetail", XSD::QName.new(nil, "SupplyDetail")]]
+    ]
+    )
+
+    LiteralRegistry.register(
+      :class => TitlePage::SearchResults,
+      :schema_type => XSD::QName.new(NsTitleQuery, "SearchResults"),
+      :schema_element => [
+        ["iSBN", ["SOAP::SOAPString", XSD::QName.new(nil, "ISBN")]],
+        ["eAN", ["SOAP::SOAPString", XSD::QName.new(nil, "EAN")]],
+        ["iSBN13", ["SOAP::SOAPString", XSD::QName.new(nil, "ISBN13")]],
+        ["product", ["TitlePage::Product", XSD::QName.new(nil, "Product")]]
+    ]
+    )
+  end
+
+end

data/lib/titlepage/titlepage_driver.rb

@@ -0,0 +1,87 @@
+require 'soap/rpc/driver'
+
+module TitlePage
+  class TitleQueryPortType < ::SOAP::RPC::Driver
+    DefaultEndpointUrl = "http://www.titlepage.com.au/ws/TitleQuery.php"
+    NsWs = "http://www.titlepage.com/ws"
+
+    Methods = [
+      [ XSD::QName.new(NsWs, "Login"),
+        "http://www.titlepage.com.au/ws/TitleQuery.php/Login",
+        "login",
+        [ ["in", "UserName", ["::SOAP::SOAPString"]],
+          ["in", "Password", ["::SOAP::SOAPString"]],
+          ["retval", "Token", ["::SOAP::SOAPString"]] ],
+          { :request_style =>  :rpc, :request_use =>  :encoded,
+            :response_style => :rpc, :response_use => :encoded,
+            :faults => {} }
+    ],
+      [ XSD::QName.new(NsWs, "SearchByISBN"),
+        "http://www.titlepage.com.au/ws/TitleQuery.php/SearchByISBN",
+        "searchByISBN",
+        [ ["in", "Token", ["::SOAP::SOAPString"]],
+          ["in", "ISBN", ["::SOAP::SOAPString"]],
+          ["retval", "SearchResults", ["TitlePage::SearchResults", "urn:TitleQuery", "SearchResults"]] ],
+          { :request_style =>  :rpc, :request_use =>  :encoded,
+            :response_style => :rpc, :response_use => :encoded,
+            :faults => {} }
+    ],
+      [ XSD::QName.new(NsWs, "SearchByISBN13"),
+        "http://www.titlepage.com.au/ws/TitleQuery.php/SearchByISBN13",
+        "searchByISBN13",
+        [ ["in", "Token", ["::SOAP::SOAPString"]],
+          ["in", "ISBN13", ["::SOAP::SOAPString"]],
+          ["retval", "SearchResults", ["TitlePage::SearchResults", "urn:TitleQuery", "SearchResults"]] ],
+          { :request_style =>  :rpc, :request_use =>  :encoded,
+            :response_style => :rpc, :response_use => :encoded,
+            :faults => {} }
+    ],
+      [ XSD::QName.new(NsWs, "SearchByEAN"),
+        "http://www.titlepage.com.au/ws/TitleQuery.php/SearchByEAN",
+        "searchByEAN",
+        [ ["in", "Token", ["::SOAP::SOAPString"]],
+          ["in", "EAN", ["::SOAP::SOAPString"]],
+          ["retval", "SearchResults", ["TitlePage::SearchResults", "urn:TitleQuery", "SearchResults"]] ],
+          { :request_style =>  :rpc, :request_use =>  :encoded,
+            :response_style => :rpc, :response_use => :encoded,
+            :faults => {} }
+    ],
+      [ XSD::QName.new(NsWs, "Logout"),
+        "http://www.titlepage.com.au/ws/TitleQuery.php/Logout",
+        "logout",
+        [ ["in", "token", ["::SOAP::SOAPString"]] ],
+        { :request_style =>  :rpc, :request_use =>  :encoded,
+          :response_style => :rpc, :response_use => :encoded,
+          :faults => {} }
+    ]
+    ]
+
+    def initialize(endpoint_url = nil)
+      endpoint_url ||= DefaultEndpointUrl
+      super(endpoint_url, nil)
+      self.mapping_registry = DefaultMappingRegistry::EncodedRegistry
+      self.literal_mapping_registry = DefaultMappingRegistry::LiteralRegistry
+      init_methods
+    end
+
+    private
+
+    def init_methods
+      Methods.each do |definitions|
+        opt = definitions.last
+        if opt[:request_style] == :document
+          add_document_operation(*definitions)
+        else
+          add_rpc_operation(*definitions)
+          qname = definitions[0]
+          name = definitions[2]
+          if qname.name != name and qname.name.capitalize == name.capitalize
+            ::SOAP::Mapping.define_singleton_method(self, qname.name) do |*arg|
+              __send__(name, *arg)
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/lib/titlepage/titlepage_utils.rb

@@ -0,0 +1,293 @@
+require 'xsd/qname'
+
+module TitlePage
+
+  # {urn:TitleQuery}ProductIdentifier
+  #   productIDType - SOAP::SOAPString
+  #   iDValue - SOAP::SOAPString
+  class ProductIdentifier
+    attr_accessor :productIDType
+    attr_accessor :iDValue
+
+    def initialize(productIDType = nil, iDValue = nil)
+      @productIDType = productIDType
+      @iDValue = iDValue
+    end
+
+    # An older version of soap4r that was used to generate boilerplate code
+    # in versions of this gem <= 0.9.3 created methods that started with
+    # capitals. Detect when some code calls these old method names and
+    # print a deprecation warning.
+    def method_missing(method, *arguments)
+      new_method = method.to_s[0,1].downcase
+      new_method << method.to_s[1,20]
+
+      if self.respond_to?(new_method)
+        $stderr.puts "Warning: #{method} is deprecated. Use #{new_method} instead"
+        self.send(new_method, *arguments)
+      else
+        super
+      end
+    end
+  end
+
+  # {urn:TitleQuery}Title
+  #   titleType - SOAP::SOAPString
+  #   titleText - SOAP::SOAPString
+  #   titlePrefix - SOAP::SOAPString
+  #   titleWithoutPrefix - SOAP::SOAPString
+  #   subtitle - SOAP::SOAPString
+  class Title
+    attr_accessor :titleType
+    attr_accessor :titleText
+    attr_accessor :titlePrefix
+    attr_accessor :titleWithoutPrefix
+    attr_accessor :subtitle
+
+    def initialize(titleType = nil, titleText = nil, titlePrefix = nil, titleWithoutPrefix = nil, subtitle = nil)
+      @titleType = titleType
+      @titleText = titleText
+      @titlePrefix = titlePrefix
+      @titleWithoutPrefix = titleWithoutPrefix
+      @subtitle = subtitle
+    end
+
+    # An older version of soap4r that was used to generate boilerplate code
+    # in versions of this gem <= 0.9.3 created methods that started with
+    # capitals. Detect when some code calls these old method names and
+    # print a deprecation warning.
+    def method_missing(method, *arguments)
+      new_method = method.to_s[0,1].downcase
+      new_method << method.to_s[1,20]
+
+      if self.respond_to?(new_method)
+        $stderr.puts "Warning: #{method} is deprecated. Use #{new_method} instead"
+        self.send(new_method, *arguments)
+      else
+        super
+      end
+    end
+  end
+
+  # {urn:TitleQuery}Contributor
+  #   sequenceNumber - SOAP::SOAPInteger
+  #   contributorRole - SOAP::SOAPString
+  #   personName - SOAP::SOAPString
+  #   personNameInverted - SOAP::SOAPString
+  #   titlesBeforeNames - SOAP::SOAPString
+  #   keyNames - SOAP::SOAPString
+  class Contributor
+    attr_accessor :sequenceNumber
+    attr_accessor :contributorRole
+    attr_accessor :personName
+    attr_accessor :personNameInverted
+    attr_accessor :titlesBeforeNames
+    attr_accessor :keyNames
+
+    def initialize(sequenceNumber = nil, contributorRole = nil, personName = nil, personNameInverted = nil, titlesBeforeNames = nil, keyNames = nil)
+      @sequenceNumber = sequenceNumber
+      @contributorRole = contributorRole
+      @personName = personName
+      @personNameInverted = personNameInverted
+      @titlesBeforeNames = titlesBeforeNames
+      @keyNames = keyNames
+    end
+
+    # An older version of soap4r that was used to generate boilerplate code
+    # in versions of this gem <= 0.9.3 created methods that started with
+    # capitals. Detect when some code calls these old method names and
+    # print a deprecation warning.
+    def method_missing(method, *arguments)
+      new_method = method.to_s[0,1].downcase
+      new_method << method.to_s[1,20]
+
+      if self.respond_to?(new_method)
+        $stderr.puts "Warning: #{method} is deprecated. Use #{new_method} instead"
+        self.send(new_method, *arguments)
+      else
+        super
+      end
+    end
+  end
+
+  # {urn:TitleQuery}Stock
+  #   onHand - SOAP::SOAPString
+  #   onOrder - SOAP::SOAPString
+  class Stock
+    attr_accessor :onHand
+    attr_accessor :onOrder
+
+    def initialize(onHand = nil, onOrder = nil)
+      @onHand = onHand
+      @onOrder = onOrder
+    end
+
+    # An older version of soap4r that was used to generate boilerplate code
+    # in versions of this gem <= 0.9.3 created methods that started with
+    # capitals. Detect when some code calls these old method names and
+    # print a deprecation warning.
+    def method_missing(method, *arguments)
+      new_method = method.to_s[0,1].downcase
+      new_method << method.to_s[1,20]
+
+      if self.respond_to?(new_method)
+        $stderr.puts "Warning: #{method} is deprecated. Use #{new_method} instead"
+        self.send(new_method, *arguments)
+      else
+        super
+      end
+    end
+  end
+
+  # {urn:TitleQuery}Price
+  #   priceTypeCode - SOAP::SOAPString
+  #   priceAmount - SOAP::SOAPDecimal
+  class Price
+    attr_accessor :priceTypeCode
+    attr_accessor :priceAmount
+
+    def initialize(priceTypeCode = nil, priceAmount = nil)
+      @priceTypeCode = priceTypeCode
+      @priceAmount = priceAmount
+    end
+
+    # An older version of soap4r that was used to generate boilerplate code
+    # in versions of this gem <= 0.9.3 created methods that started with
+    # capitals. Detect when some code calls these old method names and
+    # print a deprecation warning.
+    def method_missing(method, *arguments)
+      new_method = method.to_s[0,1].downcase
+      new_method << method.to_s[1,20]
+
+      if self.respond_to?(new_method)
+        $stderr.puts "Warning: #{method} is deprecated. Use #{new_method} instead"
+        self.send(new_method, *arguments)
+      else
+        super
+      end
+    end
+  end
+
+  # {urn:TitleQuery}SupplyDetail
+  #   supplierName - SOAP::SOAPString
+  #   supplierRole - SOAP::SOAPString
+  #   productAvailability - SOAP::SOAPString
+  #   expectedShipDate - SOAP::SOAPString
+  #   stock - TitlePage::Stock
+  #   packQuantity - SOAP::SOAPInteger
+  #   price - TitlePage::Price
+  class SupplyDetail
+    attr_accessor :supplierName
+    attr_accessor :supplierRole
+    attr_accessor :productAvailability
+    attr_accessor :expectedShipDate
+    attr_accessor :stock
+    attr_accessor :packQuantity
+    attr_accessor :price
+
+    def initialize(supplierName = nil, supplierRole = nil, productAvailability = nil, expectedShipDate = nil, stock = nil, packQuantity = nil, price = nil)
+      @supplierName = supplierName
+      @supplierRole = supplierRole
+      @productAvailability = productAvailability
+      @expectedShipDate = expectedShipDate
+      @stock = stock
+      @packQuantity = packQuantity
+      @price = price
+    end
+
+    # An older version of soap4r that was used to generate boilerplate code
+    # in versions of this gem <= 0.9.3 created methods that started with
+    # capitals. Detect when some code calls these old method names and
+    # print a deprecation warning.
+    def method_missing(method, *arguments)
+      new_method = method.to_s[0,1].downcase
+      new_method << method.to_s[1,20]
+
+      if self.respond_to?(new_method)
+        $stderr.puts "Warning: #{method} is deprecated. Use #{new_method} instead"
+        self.send(new_method, *arguments)
+      else
+        super
+      end
+    end
+  end
+
+  # {urn:TitleQuery}Product
+  #   productIdentifiers - TitlePage::ArrayOfProductIdentifier
+  #   title - TitlePage::Title
+  #   contributors - TitlePage::ArrayOfContributor
+  #   supplyDetail - TitlePage::SupplyDetail
+  class Product
+    attr_accessor :productIdentifiers
+    attr_accessor :title
+    attr_accessor :contributors
+    attr_accessor :supplyDetail
+
+    def initialize(productIdentifiers = nil, title = nil, contributors = nil, supplyDetail = nil)
+      @productIdentifiers = productIdentifiers
+      @title = title
+      @contributors = contributors
+      @supplyDetail = supplyDetail
+    end
+
+    # An older version of soap4r that was used to generate boilerplate code
+    # in versions of this gem <= 0.9.3 created methods that started with
+    # capitals. Detect when some code calls these old method names and
+    # print a deprecation warning.
+    def method_missing(method, *arguments)
+      new_method = method.to_s[0,1].downcase
+      new_method << method.to_s[1,20]
+
+      if self.respond_to?(new_method)
+        $stderr.puts "Warning: #{method} is deprecated. Use #{new_method} instead"
+        self.send(new_method, *arguments)
+      else
+        super
+      end
+    end
+  end
+
+  # {urn:TitleQuery}SearchResults
+  #   iSBN - SOAP::SOAPString
+  #   eAN - SOAP::SOAPString
+  #   iSBN13 - SOAP::SOAPString
+  #   product - TitlePage::Product
+  class SearchResults
+    attr_accessor :iSBN
+    attr_accessor :eAN
+    attr_accessor :iSBN13
+    attr_accessor :product
+
+    def initialize(iSBN = nil, eAN = nil, iSBN13 = nil, product = nil)
+      @iSBN = iSBN
+      @eAN = eAN
+      @iSBN13 = iSBN13
+      @product = product
+    end
+
+    # An older version of soap4r that was used to generate boilerplate code
+    # in versions of this gem <= 0.9.3 created methods that started with
+    # capitals. Detect when some code calls these old method names and
+    # print a deprecation warning.
+    def method_missing(method, *arguments)
+      new_method = method.to_s[0,1].downcase
+      new_method << method.to_s[1,20]
+
+      if self.respond_to?(new_method)
+        $stderr.puts "Warning: #{method} is deprecated. Use #{new_method} instead"
+        self.send(new_method, *arguments)
+      else
+        super
+      end
+    end
+  end
+
+  # {urn:TitleQuery}ArrayOfContributor
+  class ArrayOfContributor < ::Array
+  end
+
+  # {urn:TitleQuery}ArrayOfProductIdentifier
+  class ArrayOfProductIdentifier < ::Array
+  end
+
+end

data/lib/titlepage/wwwclient.rb

@@ -0,0 +1,102 @@
+$LOAD_PATH.unshift(File.dirname(__FILE__) + "/../")
+
+require 'rbook/isbn'
+require 'net/http'
+
+module TitlePage
+
+  # A helper class for grabbing ONIX files from titlepage.com
+  #
+  # A valid login is required, see the site for information on applying
+  # for access.
+  #
+  # You should be aware of any limits of query volume imposed by the provider - currently a
+  # maximum of 30 queries per minute is permitted.
+  #
+  # = Usage
+  #
+  #   TitlePage::WWWClient.open("username","password") do |tp|
+  #     puts tp.get_onix_file("9780091835132")
+  #   end
+  #
+  class WWWClient
+
+    TITLEPAGE_DOMAIN = "www.titlepage.com"
+
+    def get_onix_file(isbn)
+      isbn = RBook::ISBN.convert_to_isbn13(isbn)
+      raise ArgumentError, 'Invalid ISBN supplied' if isbn.nil?
+
+      headers = { 'Cookie' => @cookie }
+
+      login_response = Net::HTTP.start(TITLEPAGE_DOMAIN, 80) do |http|
+        data = [
+          "posted=yes",
+          "quicksearch=#{isbn}",
+          "qsrchby=ean",
+            "detailed=Search"
+        ].join("&")
+        http.post('/results.php', data, headers)
+      end
+      regex = /onclick=\"bookPopUp\(\'(.+)\'\);\"/
+        code = login_response.body.match(regex)
+      if code.nil?
+        return nil
+      else
+        code = code[1]
+      end
+      onix_file = Net::HTTP.start(TITLEPAGE_DOMAIN, 80) do |http|
+        data = [
+          "download=Download",
+          "rr=#{code}"
+        ].join("&")
+        http.post('/detail.php', data, headers)
+      end
+      return onix_file.body
+    end
+
+    # login to the titlepage website.
+    def login(username, password)
+      login_response = Net::HTTP.start(TITLEPAGE_DOMAIN, 80) do |http|
+        data = [
+          "usr=#{username}",
+          "pwd=#{password}",
+          "login=Login"
+        ].join("&")
+        http.post('/index.php', data)
+      end
+      @cookie = login_response['set-cookie']
+    end
+
+    # logout from the titlepage API
+    def logout
+      if @cookie
+        login_response = Net::HTTP.start(TITLEPAGE_DOMAIN, 80) do |http|
+          http.get("/logout.php")
+        end
+        @cookie = nil
+      end
+    end
+
+    # a convenience method to make queries to title page a little cleaner. This function
+    # essentially calls the login and logout functions for you automatically.
+    #
+    #  TitlePage::WWWClient.open("username","password") do |tp|
+    #    result = tp.get_onix_file("9780091835132")
+    #  end
+    def self.open(username, password)
+
+      tp = self.new
+
+      begin
+        tp.login(username, password)
+
+        yield(tp)
+
+      ensure
+        tp.logout
+      end
+    end
+
+  end
+end