MyPreciousRuby1 1.1.0

data/samples/sample-subscriber.rb

@@ -0,0 +1,135 @@
+require 'marketingcloudsdk'
+require_relative 'sample_helper' # contains auth with credentials
+
+begin
+  stubObj = MarketingCloudSDK::Client.new auth
+
+  # NOTE: These examples only work in accounts where the SubscriberKey functionality is not enabled
+  #       SubscriberKey will need to be included in the props if that feature is enabled
+
+  SubscriberTestEmail = "RubySDKExample@jb.kevy.com"
+
+  # Create Subscriber
+  p '>>> Create Subscriber'
+  postSub = MarketingCloudSDK::Subscriber.new
+  postSub.authStub = stubObj
+  postSub.props = {"EmailAddress" => SubscriberTestEmail}
+  p '>>> Posting'
+  postResponse = postSub.post
+  p "Post Status: #{postResponse.success? ? 'Success' : 'Failure'}"
+  p 'Code: ' + postResponse.code.to_s
+  p 'Message: ' + postResponse.message.to_s
+  p 'Result Count: ' + postResponse.results.length.to_s
+  p 'Results: ' + postResponse.results.inspect
+
+  raise 'Failure creating subscriber' unless postResponse.success?
+
+  # Retrieve newly created Subscriber
+  p '>>> Retrieve newly created Subscriber'
+  getSub = MarketingCloudSDK::Subscriber.new()
+  getSub.authStub = stubObj
+  getSub.props = ["SubscriberKey", "EmailAddress", "Status"]
+  getSub.filter = {'Property' => 'SubscriberKey', 'SimpleOperator' => 'equals', 'Value' => SubscriberTestEmail}
+  getResponse = getSub.get
+  p "Retrieve Status: #{getResponse.success? ? 'Success' : 'Failure'}"
+  p 'Code: ' + getResponse.code.to_s
+  p 'Message: ' + getResponse.message.to_s
+  p 'MoreResults: ' + getResponse.more?.to_s
+  p 'Results Length: ' + getResponse.results.length.to_s
+  p 'Results: ' + getResponse.results.to_s
+
+  raise 'Failure retrieving subscriber' unless getResponse.success?
+
+  # Update Subscriber
+  p '>>> Update Subscriber'
+  patchSub = MarketingCloudSDK::Subscriber.new
+  patchSub.authStub = stubObj
+  patchSub.props = {"EmailAddress" => SubscriberTestEmail, "Status" => "Unsubscribed"}
+  patchResponse = patchSub.patch
+  p 'Patch Status: ' + patchResponse.status.to_s
+  p 'Code: ' + patchResponse.code.to_s
+  p 'Message: ' + patchResponse.message.to_s
+  p 'Result Count: ' + patchResponse.results.length.to_s
+  p 'Results: ' + patchResponse.results.inspect
+
+  raise 'Failure updating subscriber' unless patchResponse.success?
+
+  # Retrieve Subscriber that should have status unsubscribed now
+  p '>>> Retrieve Subscriber that should have status unsubscribed now'
+  getSub = MarketingCloudSDK::Subscriber.new()
+  getSub.authStub = stubObj
+  getSub.props = ["SubscriberKey", "EmailAddress", "Status"]
+  getSub.filter = {'Property' => 'SubscriberKey','SimpleOperator' => 'equals','Value' => SubscriberTestEmail};
+  getResponse = getSub.get
+  p 'Retrieve Status: ' + getResponse.status.to_s
+  p 'Code: ' + getResponse.code.to_s
+  p 'Message: ' + getResponse.message.to_s
+  p 'MoreResults: ' + getResponse.more?.to_s
+  p 'Results Length: ' + getResponse.results.length.to_s
+  p 'Results: ' + getResponse.results.to_s
+
+  raise 'Failure retrieving subscriber' unless getResponse.success?
+
+  # Delete Subscriber
+  p '>>> Delete Subscriber'
+  deleteSub = MarketingCloudSDK::Subscriber.new()
+  deleteSub.authStub = stubObj
+  deleteSub.props = {"EmailAddress" => SubscriberTestEmail}
+  deleteResponse = deleteSub.delete
+  p 'Delete Status: ' + deleteResponse.status.to_s
+  p 'Code: ' + deleteResponse.code.to_s
+  p 'Message: ' + deleteResponse.message.to_s
+  p 'Results Length: ' + deleteResponse.results.length.to_s
+  p 'Results: ' + deleteResponse.results.to_s
+
+  raise 'Failure deleting subscriber' unless deleteResponse.success?
+
+  # Retrieve Subscriber to confirm deletion
+  p '>>> Retrieve Subscriber to confirm deletion'
+  getSub = MarketingCloudSDK::Subscriber.new()
+  getSub.authStub = stubObj
+  getSub.props = ["SubscriberKey", "EmailAddress", "Status"]
+  getSub.filter = {'Property' => 'SubscriberKey','SimpleOperator' => 'equals','Value' => SubscriberTestEmail};
+  getResponse = getSub.get
+  p 'Retrieve Status: ' + getResponse.status.to_s
+  p 'Code: ' + getResponse.code.to_s
+  p 'Message: ' + getResponse.message.to_s
+  p 'MoreResults: ' + getResponse.more?.to_s
+  p 'Results Length: ' + getResponse.results.length.to_s
+  p 'Results: ' + getResponse.results.to_s
+
+  raise 'Failure retrieving subscriber' unless getResponse.success?
+
+=begin
+  # Do not run the "Retrieve All Subscribers" request for testing if you have more than 100,000 records in your account as it will take a long time to complete.
+
+  # Retrieve All Subcribers with GetMoreResults
+  p '>>> Retrieve All Subcribers with GetMoreResults'
+  getSub = MarketingCloudSDK::Subscriber.new()
+  getSub.authStub = stubObj
+  getSub.props = ["SubscriberKey", "EmailAddress", "Status"]
+  getResponse = getSub.get
+  p 'Retrieve Status: ' + getResponse.status.to_s
+  p 'Code: ' + getResponse.code.to_s
+  p 'Message: ' + getResponse.message.to_s
+  p 'MoreResults: ' + getResponse.more?.to_s
+  p 'RequestID: ' + getResponse.request_id.to_s
+  p 'Results Length: ' + getResponse.results.length.to_s
+  #p 'Results: ' + getResponse.results.to_s
+
+  while getResponse.more? do
+    p '>>> Continue Retrieve All Subcribers with GetMoreResults'
+    getResponse.continue
+    p 'Retrieve Status: ' + getResponse.status.to_s
+    p 'Code: ' + getResponse.code.to_s
+    p 'Message: ' + getResponse.message.to_s
+    p 'MoreResults: ' + getResponse.more?.to_s
+    p 'RequestID: ' + getResponse.request_id.to_s
+    p 'Results Length: ' + getResponse.results.length.to_s
+  end
+=end
+
+rescue => e
+  p "Caught exception: #{e.message}"
+  p e.backtrace
+end

data/samples/sample-triggeredsend.rb

@@ -0,0 +1,129 @@
+require 'marketingcloudsdk'
+require 'securerandom'
+require_relative 'sample_helper'
+
+begin
+	stubObj = MarketingCloudSDK::Client.new auth
+
+	# Get all TriggeredSendDefinitions
+	p '>>> Get all TriggeredSendDefinitions'
+	getTS = MarketingCloudSDK::TriggeredSend.new
+	getTS.authStub = stubObj
+	getTS.props = ["CustomerKey", "Name", "TriggeredSendStatus"]
+	getResponse = getTS.get
+	p 'Retrieve Status: ' + getResponse.status.to_s
+	p 'Code: ' + getResponse.code.to_s
+	p 'Message: ' + getResponse.message.to_s
+	p 'MoreResults: ' + getResponse.more?.to_s
+	p 'Results Count: ' + getResponse.results.length.to_s
+	#p 'Results: ' + getResponse.results.to_s
+  raise 'Failure retrieving triggersend' unless getResponse.success?
+
+	# Generate a unique identifier for the TriggeredSend customer key since they cannot be re-used even after deleted
+	TSNameForCreateThenDelete = SecureRandom.uuid
+
+	# Create a TriggeredSend Definition
+	p '>>> Create a TriggeredSend Definition'
+	postTrig = MarketingCloudSDK::TriggeredSend.new
+	postTrig.authStub = stubObj
+	postTrig.props = {'CustomerKey' => TSNameForCreateThenDelete,'Name' => TSNameForCreateThenDelete, 'Email' => {"ID"=>"3113962"}, "SendClassification"=> {"CustomerKey"=> "2240"}}
+	postResponse = postTrig.post
+	p 'Post Status: ' + postResponse.status.to_s
+	p 'Code: ' + postResponse.code.to_s
+	p 'Message: ' + postResponse.message.to_s
+	p 'Result Count: ' + postResponse.results.length.to_s
+	p 'Results: ' + postResponse.results.inspect
+  raise 'Failure creating triggersend' unless postResponse.success?
+
+	# Specify the name of a TriggeredSend that was setup for testing
+	# Do not use a production Triggered Send Definition
+
+	NameOfTestTS = "TEXTEXT"
+
+	# Pause a TriggeredSend
+	p '>>> Pause a TriggeredSend'
+	patchTrig = MarketingCloudSDK::TriggeredSend.new
+	patchTrig.authStub = stubObj
+	patchTrig.props = {"CustomerKey" => NameOfTestTS, "TriggeredSendStatus" =>"Inactive"}
+	patchResponse = patchTrig.patch
+	p 'Patch Status: ' + patchResponse.status.to_s
+	p 'Code: ' + patchResponse.code.to_s
+	p 'Message: ' + patchResponse.message.to_s
+	p 'Result Count: ' + patchResponse.results.length.to_s
+	p 'Results: ' + patchResponse.results.inspect
+  raise 'Failure updating triggersend' unless patchResponse.success?
+
+	# Retrieve Single TriggeredSend
+	p '>>> Retrieve Single TriggeredSend'
+	getTS = MarketingCloudSDK::TriggeredSend.new
+	getTS.authStub = stubObj
+	getTS.props = ["CustomerKey", "Name", "TriggeredSendStatus"]
+	getTS.filter = {'Property' => 'CustomerKey','SimpleOperator' => 'equals','Value' => NameOfTestTS}
+	getResponse = getTS.get
+	p 'Retrieve Status: ' + getResponse.status.to_s
+	p 'Code: ' + getResponse.code.to_s
+	p 'Message: ' + getResponse.message.to_s
+	p 'MoreResults: ' + getResponse.more?.to_s
+	p 'Results Count: ' + getResponse.results.length.to_s
+	p 'Results: ' + getResponse.results.to_s
+  raise 'Failure retrieving triggersend' unless getResponse.success?
+
+	# Start a TriggeredSend by setting to Active
+	p '>>> Start a TriggeredSend by setting to Active'
+	patchTrig = MarketingCloudSDK::TriggeredSend.new
+	patchTrig.authStub = stubObj
+	patchTrig.props = {"CustomerKey" => NameOfTestTS, "TriggeredSendStatus" =>"Active"}
+	patchResponse = patchTrig.patch
+	p 'Patch Status: ' + patchResponse.status.to_s
+	p 'Code: ' + patchResponse.code.to_s
+	p 'Message: ' + patchResponse.message.to_s
+	p 'Result Count: ' + patchResponse.results.length.to_s
+	p 'Results: ' + patchResponse.results.inspect
+  raise 'Failure updating triggersend' unless patchResponse.success?
+
+	# Retrieve Single TriggeredSend After setting back to active
+	p '>>> Retrieve Single TriggeredSend After setting back to active'
+	getTS = MarketingCloudSDK::TriggeredSend.new
+	getTS.authStub = stubObj
+	getTS.props = ["CustomerKey", "Name", "TriggeredSendStatus"]
+	getTS.filter = {'Property' => 'CustomerKey','SimpleOperator' => 'equals','Value' => NameOfTestTS}
+	getResponse = getTS.get
+	p 'Retrieve Status: ' + getResponse.status.to_s
+	p 'Code: ' + getResponse.code.to_s
+	p 'Message: ' + getResponse.message.to_s
+	p 'MoreResults: ' + getResponse.more?.to_s
+	p 'Results Count: ' + getResponse.results.length.to_s
+	p 'Results: ' + getResponse.results.to_s
+  raise 'Failure retrieving triggersend' unless getResponse.success?
+
+	# Send an email with TriggeredSend
+	p '>>> Send an email with TriggeredSend'
+	sendTrig = MarketingCloudSDK::TriggeredSend.new
+	sendTrig.authStub = stubObj
+	sendTrig.props = [{"CustomerKey" => NameOfTestTS, "Subscribers" => {"EmailAddress"=>"testing@bh.exacttarget.com", "SubscriberKey" => "testing@bh.exacttarget.com"}}]
+	sendResponse = sendTrig.send
+	p 'Send Status: ' + sendResponse.status.to_s
+	p 'Code: ' + sendResponse.code.to_s
+	p 'Message: ' + sendResponse.message.to_s
+	p 'Result Count: ' + sendResponse.results.length.to_s
+	p 'Results: ' + sendResponse.results.inspect
+  raise 'Failure sending triggersend' unless sendResponse.success?
+
+
+	# Delete a TriggeredSend Definition
+	p '>>> Delete a TriggeredSend Definition '
+	deleteTrig = MarketingCloudSDK::TriggeredSend.new
+	deleteTrig.authStub = stubObj
+	deleteTrig.props = {'CustomerKey' => TSNameForCreateThenDelete}
+	deleteResponse = deleteTrig.delete
+	p 'Delete Status: ' + deleteResponse.status.to_s
+	p 'Code: ' + deleteResponse.code.to_s
+	p 'Message: ' + deleteResponse.message.to_s
+	p 'Result Count: ' + deleteResponse.results.length.to_s
+	p 'Results: ' + deleteResponse.results.inspect
+  raise 'Failure deleting triggersend' unless deleteResponse.success?
+
+rescue => e
+	p "Caught exception: #{e.message}"
+	p e.backtrace
+end

data/samples/sample-unsubevent.rb

@@ -0,0 +1,72 @@
+require 'marketingcloudsdk'
+require_relative 'sample_helper'
+
+begin
+	stubObj = MarketingCloudSDK::Client.new auth
+
+	## Modify the date below to reduce the number of results returned from the request
+	## Setting this too far in the past could result in a very large response size
+	retrieveDate = '2013-01-15T13:00:00.000'
+
+	p '>>> Retrieve Filtered UnsubEvents with GetMoreResults'
+	getUnsubEvent = MarketingCloudSDK::UnsubEvent.new()
+	getUnsubEvent.authStub = stubObj
+	getUnsubEvent.props = ["SendID","SubscriberKey","EventDate",
+  "Client.ID","EventType","BatchID","TriggeredSendDefinitionObjectID","PartnerKey"]
+	getUnsubEvent.filter = {'Property' => 'EventDate',
+  'SimpleOperator' => 'greaterThan','DateValue' => retrieveDate}
+	getResponse = getUnsubEvent.get
+	p 'Retrieve Status: ' + getResponse.status.to_s
+	p 'Code: ' + getResponse.code.to_s
+	p 'Message: ' + getResponse.message.to_s
+	p 'MoreResults: ' + getResponse.more?.to_s
+	p 'RequestID: ' + getResponse.request_id.to_s
+	p 'Results Length: ' + getResponse.results.length.to_s
+	# Since this could potentially return a large number of results, we do not want to print the results
+	#p 'Results: ' + getResponse.results.to_s
+  raise 'Failure retrieving unsub events' unless getResponse.success?
+
+	while getResponse.more? do
+		p '>>> Continue Retrieve Filtered UnsubEvents with GetMoreResults'
+		getResponse = getUnsubEvent.continue
+		p 'Retrieve Status: ' + getResponse.status.to_s
+		p 'Code: ' + getResponse.code.to_s
+		p 'Message: ' + getResponse.message.to_s
+		p 'MoreResults: ' + getResponse.more?.to_s
+		p 'RequestID: ' + getResponse.request_id.to_s
+		p 'Results Length: ' + getResponse.results.length.to_s
+	end
+
+	#  The following request could potentially bring back large amounts of data if run against a production account
+=begin
+	p '>>> Retrieve All UnsubEvents with GetMoreResults'
+	getUnsubEvent = MarketingCloudSDK::UnsubEvent.new()
+	getUnsubEvent.authStub = stubObj
+	getUnsubEvent.props = ["SendID","SubscriberKey","EventDate","Client.ID","EventType","BatchID","TriggeredSendDefinitionObjectID","PartnerKey"]
+	getResponse = getUnsubEvent.get
+	p 'Retrieve Status: ' + getResponse.status.to_s
+	p 'Code: ' + getResponse.code.to_s
+	p 'Message: ' + getResponse.message.to_s
+	p 'MoreResults: ' + getResponse.more?.to_s
+	p 'RequestID: ' + getResponse.request_id.to_s
+	p 'Results Length: ' + getResponse.results.length.to_s
+	# Since this could potentially return a large number of results, we do not want to print the results
+	#p 'Results: ' + getResponse.results.to_s
+
+	while getResponse.more? do
+		p '>>> Continue Retrieve All UnsubEvents with GetMoreResults'
+		getResponse = getUnsubEvent.continue
+		p 'Retrieve Status: ' + getResponse.status.to_s
+		p 'Code: ' + getResponse.code.to_s
+		p 'Message: ' + getResponse.message.to_s
+		p 'MoreResults: ' + getResponse.more?.to_s
+		p 'RequestID: ' + getResponse.request_id.to_s
+		p 'Results Length: ' + getResponse.results.length.to_s
+	end
+=end
+
+rescue => e
+	p "Caught exception: #{e.message}"
+	p e.backtrace
+end
+

data/samples/sample_helper.rb.template

@@ -0,0 +1,10 @@
+def auth
+  {
+    'client' => {
+      'id' => YOURID,
+      'secret' => YOURSERET,
+      'base_api_url' => 'https://www.exacttargetapis.com',
+      'request_token_url' => 'https://auth.exacttargetapis.com/v1/requestToken'
+    }
+  }
+end

data/spec/client_spec.rb

@@ -0,0 +1,218 @@
+require 'spec_helper.rb'
+
+describe MarketingCloudSDK::Client do
+
+  context 'initialized' do
+
+    it 'with client parameters' do
+      client = MarketingCloudSDK::Client.new 'client' => {'id' => '1234', 'secret' => 'ssssh', 'signature' => 'hancock',
+                                                          'base_api_url' => 'http://getapis', 'request_token_url' => 'http://authapi'}
+      expect(client.secret).to eq 'ssssh'
+      expect(client.id).to eq '1234'
+      expect(client.signature).to eq 'hancock'
+      expect(client.base_api_url).to eq 'http://getapis'
+      expect(client.request_token_url).to eq 'http://authapi'
+    end
+
+    it 'with debug=true' do
+      client = MarketingCloudSDK::Client.new({}, true)
+      expect(client.debug).to be true
+    end
+
+    it 'with debug=false' do
+      client = MarketingCloudSDK::Client.new({}, false)
+      expect(client.debug).to be false
+    end
+
+    it 'sets the request_token url to parameter if it exists' do
+      client = MarketingCloudSDK::Client.new({'request_token_url' => 'fake/url'}, false)
+      expect(client.request_token_url).to eq 'fake/url'
+    end
+
+    it 'sets the base_api_url url to a default if it does not exist' do
+      client = MarketingCloudSDK::Client.new({}, false)
+      expect(client.base_api_url).to eq 'https://www.exacttargetapis.com'
+    end
+
+    it 'sets the request_token url to a default if it does not exist' do
+      client = MarketingCloudSDK::Client.new({}, false)
+      expect(client.request_token_url).to eq 'https://auth.exacttargetapis.com/v1/requestToken'
+    end
+
+    it 'creates SoapClient' do
+      client = MarketingCloudSDK::Client.new
+      expect(client).to be_kind_of MarketingCloudSDK::Soap
+    end
+
+    it '#wsdl defaults to https://webservice.exacttarget.com/etframework.wsdl' do
+      client = MarketingCloudSDK::Client.new
+      expect(client.wsdl).to eq 'https://webservice.exacttarget.com/etframework.wsdl'
+    end
+
+    it 'creates RestClient' do
+      client = MarketingCloudSDK::Client.new
+      expect(client).to be_kind_of MarketingCloudSDK::Rest
+    end
+
+    describe 'with a wsdl' do
+
+      let(:client) { MarketingCloudSDK::Client.new 'defaultwsdl' => 'somewsdl' }
+
+      it'creates a SoapClient' do
+        expect(client).to be_kind_of MarketingCloudSDK::Soap
+      end
+
+      it'#wsdl returns default wsdl' do
+        expect(client.wsdl).to eq 'somewsdl'
+      end
+    end
+  end
+
+  context 'instance can set' do
+
+    let(:client) { MarketingCloudSDK::Client.new }
+
+    it 'client id' do
+      client.id = 123
+      expect(client.id).to eq 123
+    end
+
+    it 'client secret' do
+      client.secret = 'sssh'
+      expect(client.secret).to eq 'sssh'
+    end
+
+    it 'refresh token' do
+      client.refresh_token = 'refresh'
+      expect(client.refresh_token).to eq 'refresh'
+    end
+
+    it 'debug' do
+      expect(client.debug).to be false
+      client.debug = true
+      expect(client.debug).to be true
+    end
+  end
+
+  describe '#jwt=' do
+
+    let(:payload) {
+     {
+      'request' => {
+        'user'=> {
+          'oauthToken' => 123456789,
+          'expiresIn' => 3600,
+          'internalOauthToken' => 987654321,
+          'refreshToken' => 101010101010
+        },
+        'application'=> {
+          'package' => 'JustTesting'
+        }
+      }
+     }
+    }
+
+    let(:sig){
+      sig = 'hanckock'
+    }
+
+    let(:encoded) {
+      JWT.encode(payload, sig)
+    }
+
+    it 'raises an exception when signature is missing' do
+      expect { MarketingCloudSDK::Client.new.jwt = encoded }.to raise_exception 'Require app signature to decode JWT'
+    end
+
+    describe 'decodes JWT' do
+
+      let(:sig){
+        sig = 'hanckock'
+      }
+
+      let(:encoded) {
+        JWT.encode(payload, sig)
+      }
+
+      let(:client) {
+        MarketingCloudSDK::Client.new 'client' => { 'id' => '1234', 'secret' => 'ssssh', 'signature' => sig }
+      }
+
+      it 'making auth token available to client' do
+        client.jwt = encoded
+        expect(client.auth_token).to eq 123456789
+      end
+
+      it 'making internal token available to client' do
+        client.jwt = encoded
+        expect(client.internal_token).to eq 987654321
+      end
+
+      it 'making refresh token available to client' do
+        client.jwt = encoded
+        expect(client.refresh_token).to eq 101010101010
+      end
+    end
+  end
+
+  describe '#refresh_token' do
+    let(:client) { MarketingCloudSDK::Client.new }
+
+    it 'defaults to nil' do
+      expect(client.refresh_token).to be_nil
+    end
+
+    it 'can be accessed' do
+      client.refresh_token = '1234567890'
+      expect(client.refresh_token).to eq '1234567890'
+    end
+  end
+
+  describe '#refresh' do
+
+    let(:client) { MarketingCloudSDK::Client.new }
+
+    context 'raises an exception' do
+
+      it 'when client id and secret are missing' do
+        expect { client.refresh }.to raise_exception 'Require Client Id and Client Secret to refresh tokens'
+      end
+
+      it 'when client id is missing' do
+        client.secret = 1234
+        expect { client.refresh }.to raise_exception 'Require Client Id and Client Secret to refresh tokens'
+      end
+
+      it 'when client secret is missing' do
+        client.id = 1234
+        expect { client.refresh }.to raise_exception 'Require Client Id and Client Secret to refresh tokens'
+      end
+    end
+
+    #context 'posts' do
+    #  let(:client) { MarketingCloudSDK::Client.new 'client' => { 'id' => 123, 'secret' => 'sssh'} }
+    #  it 'accessType=offline' do
+    #  client.stub(:post)
+    #    .with({'clientId' => 123, 'secret' => 'ssh', 'accessType' => 'offline'})
+    #    .and_return()
+    #end
+
+    #context 'updates' do
+    #  let(:client) { MarketingCloudSDK::Client.new 'client' => { 'id' => 123, 'secret' => 'sssh'} }
+
+    #  it 'access_token' do
+    #    #client.stub(:post).
+    #  end
+    #end
+  end
+
+  describe 'includes HTTPRequest' do
+
+    subject { MarketingCloudSDK::Client.new }
+
+    it { should respond_to(:get) }
+    it { should respond_to(:post) }
+    it { should respond_to(:patch) }
+    it { should respond_to(:delete) }
+  end
+end