ysm4r 0.1

data/lib/ysm4r.rb

@@ -0,0 +1,4 @@
+require 'rubygems'
+gem 'soap4r'
+require 'soap/compat'
+require 'ysm4r/client'

data/lib/ysm4r/client.rb

@@ -0,0 +1,120 @@
+require 'soap/soap'
+require 'soapex/error'
+require 'soapex/driver'
+require 'ysm4r/service'
+
+module YSM
+
+  class Config
+    HeaderKeys = [:username, :password, :license, :masterAccountID, :accountID]
+    attr_reader(*HeaderKeys)
+    attr_reader :sandbox
+
+    def initialize(options={})
+      @sandbox = false
+      IO.foreach(filename) do |line|
+	next if line =~ /^#/
+        name, value = line.split('=')
+        value = (options[name] || value.strip)
+        instance_variable_set(atsym(name), value)
+      end
+      @sandbox = ['True', 'true', '1'].include?(@sandbox.strip)
+    end
+
+    def makeHeaders
+      HeaderKeys.map do |key|
+        Service::HeaderHandler.new(
+          key.to_s, instance_variable_get(atsym(key)))
+      end
+    end
+
+    private
+
+    def atsym(name)
+      ("@"+(name.to_s)).to_sym
+    end
+    def filename
+      gemfile = File.join(File.dirname(__FILE__), '..', '..', 'ysm.properties')
+      userhome = (ENV['HOME'] || ENV['USERPROFILE'])
+      homefile = userhome ? File.join(userhome, 'ysm.properties') : gemfile
+      # a config file found in user's home dir overrides the one distributed
+      # with the gem
+      FileTest.exists?(homefile) ? homefile : gemfile
+    end
+  end
+
+    class Client
+        attr_reader :config, :drivers, :version
+        @methodMap = Hash.new
+        
+        def initialize(version=nil, options={})
+            @config = Config.new(options)
+            @headers = @config.makeHeaders
+            @version = (version || Service.getVersions.sort.last)
+            prepareDrivers
+        end
+        
+        def method_missing(m, *args)
+            methodName = m.id2name
+            requestName = YSM::fix_case_up(methodName) # upper first character
+
+            if driver = @methodMap[methodName]
+                servicename = driver.class.name.split("::").last
+                #args.map! {|a| a.to_s}
+                req = eval("YSM::#{servicename}::#{requestName}").new(*args)
+                return driver.method(methodName).call(req).out
+            else
+                raise(SOAP::MultiService::UnknownAPICall,
+                  "Unknown API Call: #{requestName}", caller)
+            end
+
+            # Handle YSM Application-level error
+            rescue SOAP::FaultError => fault
+                raise(SOAP::MultiService::ApiError.new(fault),
+                  "#{methodName} Call Failed: #{fault.faultstring.to_s}", caller)
+        end
+        
+        private
+
+        def prepareDrivers
+            @drivers = Hash.new
+            Service.doRequire(@version, @config.sandbox)
+
+            # the Location and Upgrade services provide their own
+            # endpoint_urls, the other services must use the endpoint
+            # provided by the Location service.
+            bootstrap = ["Location", "Upgrade"]
+            bootstrap.each {|driver| @drivers[driver] = makeDriver(driver)}
+            @methodMap = Service.getMethodMap(@drivers)
+            location = getMasterAccountLocation
+
+            Service.getServices(@version).each do |servicename|
+              next if bootstrap.include?(servicename) 
+              endpoint = "#{location}/V#{@version}/#{servicename}Service"
+              @drivers[servicename] = makeDriver(servicename, endpoint)
+            end
+            @methodMap = Service.getMethodMap(@drivers)
+        end
+        
+        def makeDriver(name, location=nil)
+            driver = eval("YSM::#{name}Service::#{name}Service").new
+            driver.prepare(@headers, location)
+            driver
+        end
+        
+    end
+
+    # These class module methods are helper functions
+    class <<self 
+    
+      def fix_case_up(name)
+        (newname = name.dup)[0] = name[0,1].upcase # upper first character
+        newname
+      end
+    
+      def fix_case_down(name)
+        (newname = name.dup)[0] = name[0,1].downcase
+        newname
+      end
+    end
+end

data/lib/ysm4r/service.rb

@@ -0,0 +1,68 @@
+require 'soap/header/simplehandler'
+
+module YSM
+  SandBoxServices = ['Location', 'Upgrade']
+
+  VersionServices = {
+    1 => [
+      'MasterAccount', 'Account', 'UserManagement', 'Location', 'Upgrade',
+      'Campaign', 'AdGroup', 'Ad', 'Keyword', 'ExcludedWords',
+      'BidInformation', 'Forecast', 'KeywordResearch', 'Budgeting',
+      'BasicReport'],
+    2 => [
+      'Company', 'MasterAccount', 'Account', 'UserManagement',
+      'Location', 'Upgrade', 'Campaign', 'AdGroup', 'Ad', 'Keyword',
+      'ExcludedWords', 'BidInformation', 'Forecast', 'KeywordResearch',
+      'Budgeting', 'BasicReport']
+  }
+
+
+    class Service
+
+      class HeaderHandler < SOAP::Header::SimpleHandler
+        def initialize(tag, value)
+          super(XSD::QName.new(nil, tag))
+          @tag = tag
+          @value = value
+        end
+    
+        # The initial handler from the sample was wrong,
+        # it generated 2 level of tags
+        def on_simple_outbound
+          @value
+        end
+      end
+
+
+    def Service.getVersions
+      VersionServices.keys
+    end
+
+        def Service.getServices(version)
+            VersionServices[version]
+        end
+        
+        def Service.doRequire(version, sandbox=false)
+            req = []
+            Service.getServices(version).each do |s|
+              sbox = (sandbox && SandBoxServices.include?(s)) ? "sandbox/" : ""
+              req << "require 'ysm4r/v#{version}/#{sbox}#{s}ServiceDriver'"
+            end
+            req.each {|r| eval(r)}
+        end
+        
+        def Service.getService(version, method)
+        
+        end
+        
+        def Service.getMethodMap(drivers)
+            #Service.getVersions.each do |v|
+            methodMap = Hash.new
+            drivers.each_value do |d|
+              d.class::Methods.each {|m| methodMap[m[1]] = d}
+            end
+            methodMap
+        end
+    end
+    
+end

data/lib/ysm4r/v1/AccountService.rb

@@ -0,0 +1,370 @@
+require 'xsd/qname'
+
+module YSM::AccountService
+
+
+# {http://marketing.ews.yahooapis.com/V1}ApiFault
+class ApiFault < ::StandardError
+  attr_accessor :code
+  attr_accessor :message
+
+  def initialize(code = nil, message = nil)
+    @code = code
+    @message = message
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}ArrayOfContinent
+class ArrayOfContinent < ::Array
+end
+
+# {http://marketing.ews.yahooapis.com/V1}Account
+class Account
+  attr_accessor :iD
+  attr_accessor :advancedMatchON
+  attr_accessor :businessTypeCode
+  attr_accessor :contentMatchON
+  attr_accessor :displayURL
+  attr_accessor :marketID
+  attr_accessor :masterAccountID
+  attr_accessor :name
+  attr_accessor :nameFurigana
+  attr_accessor :personalID
+  attr_accessor :sitePassword
+  attr_accessor :siteUserName
+  attr_accessor :sponsoredSearchON
+  attr_accessor :vatCode
+  attr_accessor :websiteURL
+
+  def initialize(iD = nil, advancedMatchON = nil, businessTypeCode = nil, contentMatchON = nil, displayURL = nil, marketID = nil, masterAccountID = nil, name = nil, nameFurigana = nil, personalID = nil, sitePassword = nil, siteUserName = nil, sponsoredSearchON = nil, vatCode = nil, websiteURL = nil)
+    @iD = iD
+    @advancedMatchON = advancedMatchON
+    @businessTypeCode = businessTypeCode
+    @contentMatchON = contentMatchON
+    @displayURL = displayURL
+    @marketID = marketID
+    @masterAccountID = masterAccountID
+    @name = name
+    @nameFurigana = nameFurigana
+    @personalID = personalID
+    @sitePassword = sitePassword
+    @siteUserName = siteUserName
+    @sponsoredSearchON = sponsoredSearchON
+    @vatCode = vatCode
+    @websiteURL = websiteURL
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}ArrayOfAccount
+class ArrayOfAccount < ::Array
+end
+
+# {http://marketing.ews.yahooapis.com/V1}CombinedAccountStatus
+class CombinedAccountStatus
+  attr_accessor :accountStatus
+  attr_accessor :onlineStatus
+  attr_accessor :onlineStatusAsOf
+
+  def initialize(accountStatus = nil, onlineStatus = nil, onlineStatusAsOf = nil)
+    @accountStatus = accountStatus
+    @onlineStatus = onlineStatus
+    @onlineStatusAsOf = onlineStatusAsOf
+  end
+end
+
+# {http://schemas.xmlsoap.org/ws/2002/07/secext}Security
+class Security
+  attr_accessor :usernameToken
+
+  def initialize(usernameToken = nil)
+    @usernameToken = usernameToken
+  end
+end
+
+# {http://schemas.xmlsoap.org/ws/2002/07/secext}UsernameToken
+class UsernameToken
+  attr_accessor :username
+  attr_accessor :password
+
+  def initialize(username = nil, password = nil)
+    @username = username
+    @password = password
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}Continent
+class Continent < ::String
+  Africa = Continent.new("Africa")
+  Asia = Continent.new("Asia")
+  Australia = Continent.new("Australia")
+  Europe = Continent.new("Europe")
+  NorthAmerica = Continent.new("NorthAmerica")
+  SouthAmerica = Continent.new("SouthAmerica")
+end
+
+# {http://marketing.ews.yahooapis.com/V1}AccountStatus
+class AccountStatus < ::String
+  Active = AccountStatus.new("Active")
+  Inactive = AccountStatus.new("Inactive")
+end
+
+# {http://marketing.ews.yahooapis.com/V1}addMoney
+class AddMoney
+  attr_accessor :accountID
+  attr_accessor :amount
+
+  def initialize(accountID = nil, amount = nil)
+    @accountID = accountID
+    @amount = amount
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}addMoneyResponse
+class AddMoneyResponse
+  def initialize
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}deleteContinentBlockListFromAccount
+class DeleteContinentBlockListFromAccount
+  attr_accessor :accountID
+
+  def initialize(accountID = nil)
+    @accountID = accountID
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}deleteContinentBlockListFromAccountResponse
+class DeleteContinentBlockListFromAccountResponse
+  def initialize
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getContinentBlockListForAccount
+class GetContinentBlockListForAccount
+  attr_accessor :accountID
+
+  def initialize(accountID = nil)
+    @accountID = accountID
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getContinentBlockListForAccountResponse
+class GetContinentBlockListForAccountResponse
+  attr_accessor :out
+
+  def initialize(out = nil)
+    @out = out
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getAccount
+class GetAccount
+  attr_accessor :accountID
+
+  def initialize(accountID = nil)
+    @accountID = accountID
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getAccountResponse
+class GetAccountResponse
+  attr_accessor :out
+
+  def initialize(out = nil)
+    @out = out
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}setChargeAmount
+class SetChargeAmount
+  attr_accessor :accountID
+  attr_accessor :chargeAmount
+
+  def initialize(accountID = nil, chargeAmount = nil)
+    @accountID = accountID
+    @chargeAmount = chargeAmount
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}setChargeAmountResponse
+class SetChargeAmountResponse
+  def initialize
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getChargeAmount
+class GetChargeAmount
+  attr_accessor :accountID
+
+  def initialize(accountID = nil)
+    @accountID = accountID
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getChargeAmountResponse
+class GetChargeAmountResponse
+  attr_accessor :out
+
+  def initialize(out = nil)
+    @out = out
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}setActiveCreditCard
+class SetActiveCreditCard
+  attr_accessor :accountID
+  attr_accessor :paymentMethodID
+
+  def initialize(accountID = nil, paymentMethodID = nil)
+    @accountID = accountID
+    @paymentMethodID = paymentMethodID
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}setActiveCreditCardResponse
+class SetActiveCreditCardResponse
+  def initialize
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}updateAccount
+class UpdateAccount
+  attr_accessor :account
+  attr_accessor :updateAll
+
+  def initialize(account = nil, updateAll = nil)
+    @account = account
+    @updateAll = updateAll
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}updateAccountResponse
+class UpdateAccountResponse
+  def initialize
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getActiveCreditCard
+class GetActiveCreditCard
+  attr_accessor :accountID
+
+  def initialize(accountID = nil)
+    @accountID = accountID
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getActiveCreditCardResponse
+class GetActiveCreditCardResponse
+  attr_accessor :out
+
+  def initialize(out = nil)
+    @out = out
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}addAccount
+class AddAccount
+  attr_accessor :account
+
+  def initialize(account = nil)
+    @account = account
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}addAccountResponse
+class AddAccountResponse
+  attr_accessor :out
+
+  def initialize(out = nil)
+    @out = out
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}updateStatusForAccount
+class UpdateStatusForAccount
+  attr_accessor :accountID
+  attr_accessor :accountStatus
+
+  def initialize(accountID = nil, accountStatus = nil)
+    @accountID = accountID
+    @accountStatus = accountStatus
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}updateStatusForAccountResponse
+class UpdateStatusForAccountResponse
+  def initialize
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getAccountBalance
+class GetAccountBalance
+  attr_accessor :accountID
+
+  def initialize(accountID = nil)
+    @accountID = accountID
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getAccountBalanceResponse
+class GetAccountBalanceResponse
+  attr_accessor :out
+
+  def initialize(out = nil)
+    @out = out
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getAccounts
+class GetAccounts
+  def initialize
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getAccountsResponse
+class GetAccountsResponse
+  attr_accessor :out
+
+  def initialize(out = nil)
+    @out = out
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}setContinentBlockListForAccount
+class SetContinentBlockListForAccount
+  attr_accessor :accountID
+  attr_accessor :continents
+
+  def initialize(accountID = nil, continents = nil)
+    @accountID = accountID
+    @continents = continents
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}setContinentBlockListForAccountResponse
+class SetContinentBlockListForAccountResponse
+  def initialize
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getAccountStatus
+class GetAccountStatus
+  attr_accessor :accountID
+
+  def initialize(accountID = nil)
+    @accountID = accountID
+  end
+end
+
+# {http://marketing.ews.yahooapis.com/V1}getAccountStatusResponse
+class GetAccountStatusResponse
+  attr_accessor :out
+
+  def initialize(out = nil)
+    @out = out
+  end
+end
+
+
+end