azurex 0.6.5

data/test/integration/service_bus/rules_test.rb

@@ -0,0 +1,145 @@
+#-------------------------------------------------------------------------
+# # Copyright (c) Microsoft and contributors. All rights reserved.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#   http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#--------------------------------------------------------------------------
+require "integration/test_helper"
+
+describe "ServiceBus Rules" do
+  subject { Azure::ServiceBus::ServiceBusService.new }
+  after { ServiceBusTopicNameHelper.clean }
+  let(:topic){ ServiceBusTopicNameHelper.name }
+  let(:subscription){ "mySubscription" }
+  let(:rule){ "myRule" }
+
+  before {
+    subject.create_topic topic
+    subject.create_subscription topic, subscription
+  }
+
+  it "should be able to create a new rule" do
+    result = subject.create_rule topic, subscription, rule
+    result.must_be :kind_of?, Azure::ServiceBus::Rule
+    result.filter.must_be_kind_of Azure::ServiceBus::TrueFilter
+    result.filter.sql_expression.must_equal "1=1"
+    result.filter.compatibility_level.must_equal 20
+  end
+
+  it "should be able to create a new rule object" do
+    ruleObject = Azure::ServiceBus::Rule.new "my_other_rule"
+    ruleObject.subscription = subscription
+    ruleObject.topic = topic
+
+    result = subject.create_rule ruleObject
+    result.must_be :kind_of?, Azure::ServiceBus::Rule
+    result.filter.must_be_kind_of Azure::ServiceBus::TrueFilter
+    result.filter.sql_expression.must_equal "1=1"
+    result.filter.compatibility_level.must_equal 20
+
+    subject.delete_rule result
+  end
+
+  it "should be able to create a new rule with an action" do
+    ruleObject = Azure::ServiceBus::Rule.new "my_other_rule"
+    ruleObject.subscription = subscription
+    ruleObject.topic = topic
+    ruleObject.filter = Azure::ServiceBus::SqlFilter.new({ :sql_expression => "MyProperty='XYZ'" })
+    ruleObject.action = Azure::ServiceBus::SqlRuleAction.new({ :sql_expression => "set MyProperty2 = 'ABC'" })
+
+    result = subject.create_rule ruleObject
+    result.must_be :kind_of?, Azure::ServiceBus::Rule
+    result.filter.must_be_kind_of Azure::ServiceBus::SqlFilter
+    result.filter.sql_expression.must_equal "MyProperty='XYZ'"
+    result.filter.compatibility_level.must_equal 20
+
+    result.action.must_be_kind_of Azure::ServiceBus::SqlRuleAction
+    result.action.sql_expression.must_equal "set MyProperty2 = 'ABC'"
+    result.action.compatibility_level.must_equal 20
+
+    subject.delete_rule result
+  end
+
+  it "should be able to create a new rule with a correlation filter" do
+    ruleObject = Azure::ServiceBus::Rule.new "my_other_rule"
+    ruleObject.subscription = subscription
+    ruleObject.topic = topic
+    ruleObject.filter = Azure::ServiceBus::CorrelationFilter.new({ :correlation_id => "identifier" })
+    ruleObject.action = Azure::ServiceBus::SqlRuleAction.new({ :sql_expression => "set MyProperty2 = 'ABC'" })
+
+    result = subject.create_rule ruleObject
+    result.must_be :kind_of?, Azure::ServiceBus::Rule
+    result.filter.must_be_kind_of Azure::ServiceBus::CorrelationFilter
+    result.filter.correlation_id.must_equal "identifier"
+
+    result.action.must_be_kind_of Azure::ServiceBus::SqlRuleAction
+    result.action.sql_expression.must_equal "set MyProperty2 = 'ABC'"
+    result.action.compatibility_level.must_equal 20
+
+    subject.delete_rule result
+  end
+
+  describe "when a rule exists" do
+    before { subject.create_rule topic, subscription, rule }
+
+    it "should be able to delete rules" do
+      subject.delete_rule topic, subscription, rule
+    end
+
+    it "should be able to get rules" do
+      result = subject.get_rule topic, subscription, rule
+      result.must_be :kind_of?, Azure::ServiceBus::Rule
+      result.filter.must_be_kind_of Azure::ServiceBus::TrueFilter
+      result.filter.sql_expression.must_equal "1=1"
+      result.filter.compatibility_level.must_equal 20
+    end
+
+    it "should be able to list rules" do
+      result = subject.list_rules topic, subscription
+      rule_found = false
+      result.each { |r|
+        rule_found = true if r.name == rule
+      }
+      assert rule_found, "list_rules didn't include the expected rule"
+    end
+
+    describe 'when multiple rules exist' do
+      let(:rule1) { "myRule1" }
+      let(:rule2) { "myRule2" }
+      before { 
+        subject.create_rule topic, subscription, rule1
+        subject.create_rule topic, subscription, rule2
+      }
+
+      it "should be able to use $skip token" do
+        result = subject.list_rules topic, subscription
+        result2 = subject.list_rules topic, subscription, { :skip => 1 }
+        result2.length.must_equal result.length - 1
+        result2[0].id.must_equal result[1].id
+      end
+      
+      it "should be able to use $top token" do
+        result = subject.list_rules topic, subscription
+        result.length.wont_equal 1
+
+        result2 = subject.list_rules topic, subscription, { :top => 1 }
+        result2.length.must_equal 1
+      end
+
+      it "should be able to use $skip and $top token together" do
+        result = subject.list_rules topic, subscription
+        result2 = subject.list_rules topic, subscription, { :skip => 1, :top => 1 }
+        result2.length.must_equal 1
+        result2[0].id.must_equal result[1].id
+      end
+    end
+  end
+end

data/test/integration/service_bus/sb_queue_gb18030_test.rb

@@ -0,0 +1,182 @@
+#-------------------------------------------------------------------------
+# # Copyright (c) Microsoft and contributors. All rights reserved.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#   http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#--------------------------------------------------------------------------
+require "integration/test_helper"
+require "azure/blob/blob_service"
+
+describe 'Service Bus Queue GB-18030' do
+  subject { Azure::ServiceBus::ServiceBusService.new }
+  let(:queue_name) { ServiceBusQueueNameHelper.name }
+
+  before { subject.create_queue queue_name }
+  after { ServiceBusQueueNameHelper.clean }
+
+  it 'Read/Write SB Queue Name UTF-8' do
+    # Expected results: Failure, because the Queue
+    # name can only contain ASCII
+    # characters, per the Service Bus Queue spec.
+    GB18030TestStrings.get.each { |k,v|
+      begin
+        subject.create_queue queue_name + v.encode("UTF-8")
+        flunk "No exception"
+      rescue
+        # Add validation?
+      end
+    }
+  end
+
+  it 'Read/Write SB Queue Name GB-18030' do
+    # Expected results: Failure, because the Queue
+    # name can only contain ASCII
+    # characters, per the Service Bus Queue spec.
+    GB18030TestStrings.get.each { |k,v|
+      begin
+        subject.create_queue queue_name + v.encode("GB18030")
+        flunk "No exception"
+      rescue
+        # Add validation?
+      end
+    }
+  end
+
+  it 'Read/Write SB Queue Metadata UTF-8' do
+    GB18030TestStrings.get.each { |k,v|
+      begin
+        subject.create_queue queue_name, {
+          :dead_lettering_on_message_expiration => v.encode("UTF-8"),
+        }
+        flunk "No exception"
+      rescue Azure::Core::Http::HTTPError => error
+        error.status_code.must_equal 400
+      end
+    }
+  end
+
+  it 'Read/Write SB Queue Metadata GB18030' do
+    GB18030TestStrings.get.each { |k,v|
+      begin
+        subject.create_queue queue_name, {
+          :dead_lettering_on_message_expiration => v.encode("GB18030"),
+        }
+        flunk "No exception"
+      rescue Azure::Core::Http::HTTPError => error
+        error.status_code.must_equal 400
+      end
+    }
+  end
+
+  it 'Read/Write SB Queue message UTF-8' do
+    GB18030TestStrings.get.each { |k,v|
+      msg = Azure::ServiceBus::BrokeredMessage.new(v.encode("UTF-8"))
+      subject.send_queue_message queue_name, msg
+      retrieved = subject.read_delete_queue_message queue_name
+      retrieved.body.force_encoding("UTF-8").must_equal v.encode("UTF-8")
+    }
+  end
+
+  it 'Read/Write SB Queue message GB18030' do
+    GB18030TestStrings.get.each { |k,v|
+      msg = Azure::ServiceBus::BrokeredMessage.new(v.encode("GB18030"))
+      subject.send_queue_message queue_name, msg
+      retrieved = subject.read_delete_queue_message queue_name
+      retrieved.body.force_encoding("GB18030").must_equal v.encode("GB18030")
+    }
+  end
+
+  # it 'Read/Write SB Queue message Metadata UTF-8' do
+  #   GB18030TestStrings.get.each { |k,v|
+  #     msg = Azure::ServiceBus::BrokeredMessage.new("some text") do |m|
+  #       m.to = v.encode("UTF-8")
+  #     end
+  #     begin
+  #       subject.send_queue_message queue_name, msg
+  #       # Do not flunk here; the service appears to let some
+  #       # "bad" strings go through
+  #     rescue Azure::Core::Http::HTTPError => error
+  #       error.status_code.must_equal 500
+  #     end
+  #   }
+  # end
+
+  # it 'Read/Write SB Queue message Metadata GB18030' do
+  #   GB18030TestStrings.get.each { |k,v|
+  #     msg = Azure::ServiceBus::BrokeredMessage.new("some text") do |m|
+  #       m.to = v.encode("GB18030")
+  #     end
+  #     begin
+  #       subject.send_queue_message queue_name, msg
+  #       # Do not flunk here; the service appears to let some
+  #       # "bad" strings go through
+  #     rescue Azure::Core::Http::HTTPError => error
+  #       error.status_code.must_equal 500
+  #     end
+  #   }
+  # end
+
+  it 'Read/Write SB Queue Custom Property Key UTF-8' do
+    GB18030TestStrings.get.each { |k,v|
+      msg = Azure::ServiceBus::BrokeredMessage.new("some text", {
+          ("key" +  v).encode("UTF-8") => "CustomStringProperty"
+      })
+      begin
+        subject.send_queue_message queue_name, msg
+        flunk "No exception"
+      rescue Azure::Core::Http::HTTPError => error
+        error.status_code.must_equal 400
+      end
+    }
+  end
+
+  it 'Read/Write SB Queue Custom Property Key GB18030' do
+    GB18030TestStrings.get.each { |k,v|
+      msg = Azure::ServiceBus::BrokeredMessage.new("some text", {
+          ("key" +  v).encode("GB18030") => "CustomStringProperty",
+      })
+      begin
+        subject.send_queue_message queue_name, msg
+        flunk "No exception"
+      rescue Azure::Core::Http::HTTPError => error
+        error.status_code.must_equal 400
+      end
+    }
+  end
+
+  # it 'Read/Write SB Queue Custom Property Value UTF-8' do
+  #   GB18030TestStrings.get.each { |k,v|
+  #     msg = Azure::ServiceBus::BrokeredMessage.new("some text", {
+  #         "key" => ("value" + v).encode("UTF-8")
+  #     })
+
+  #     begin
+  #       subject.send_queue_message queue_name, msg
+  #     end
+  #   }
+  # end
+
+  # it 'Read/Write SB Queue Custom Property Value GB18030' do
+  #   GB18030TestStrings.get.each { |k,v|
+  #     msg = Azure::ServiceBus::BrokeredMessage.new("some text", {
+  #         "key" => ("value" + v).encode("GB18030")
+  #     })
+  #     begin
+  #       subject.send_queue_message queue_name, msg
+  #       retrieved = subject.read_delete_queue_message queue_name
+  #       # Do not flunk here; the service appears to let some
+  #       # "bad" strings go through
+  #     rescue Azure::Core::Http::HTTPError => error
+  #       error.status_code.must_equal 500
+  #     end
+  #   }
+  # end
+end

data/test/integration/service_bus/scenario_test.rb

@@ -0,0 +1,101 @@
+#-------------------------------------------------------------------------
+# # Copyright (c) Microsoft and contributors. All rights reserved.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#   http:#www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#--------------------------------------------------------------------------
+require 'integration/test_helper'
+
+require 'azure/service_bus/brokered_message'
+
+class ScenarioHelper
+  def self.out(s)
+    print s + "\n" if false
+  end
+
+  def self.get_custom_properties(i)
+    custom_properties             = {}
+    custom_properties['i']        = i
+    custom_properties['test']     = Time.local(2001, i, 1)
+    custom_properties['name']     = 'Test' + i.to_s
+    custom_properties['meanname'] = "'\"Me`\\'&*<>!@#%^*)\n" + i.to_s
+    custom_properties['int']      = 50 + i
+    custom_properties['float']    = 3.14159 + i
+    custom_properties['even']     = (i % 2 == 0)
+    custom_properties
+  end
+
+  def self.create_issue_message(issue_id, issue_body, label)
+    message = Azure::ServiceBus::BrokeredMessage.new(issue_body)
+
+    message.correlation_id  = 'correlationid' + label
+    message.delivery_count  = 1
+    message.sequence_number = 12
+    message.content_type    = 'text/xml'
+    message.label           = label
+    message.to              = '1@1.com'
+    message.message_id      = issue_id
+
+    custom_properties = ScenarioHelper.get_custom_properties issue_id.to_i
+    custom_properties.each do |key, value|
+      message.properties[key] = value
+    end
+
+    message
+  end
+
+  def self.compare_messages(expected,
+                            actual,
+                            custom_properties = nil)
+    actual.body.must_equal                       expected.body
+    actual.content_type.must_equal               expected.content_type
+    actual.correlation_id.must_equal             expected.correlation_id
+    actual.label.must_equal                      expected.label
+    actual.message_id.must_equal                 expected.message_id
+    actual.reply_to.must_equal                   expected.reply_to
+    actual.reply_to_session_id.must_equal        expected.reply_to_session_id
+    actual.scheduled_enqueue_time_utc.must_equal(
+      expected.scheduled_enqueue_time_utc
+    )
+    actual.session_id.must_equal                 expected.session_id
+    actual.to.must_equal                         expected.to
+
+    # Note: The following properties are controlled by the server,
+    # so we cannot verify as much
+    actual.delivery_count.must_be_kind_of Integer
+    actual.sequence_number.must_be_kind_of Integer
+    actual.enqueued_time_utc.must_be_kind_of Time
+    actual.lock_token.must_be_kind_of String unless actual.lock_token.nil?
+
+    actual.locked_until_utc.must_be_kind_of Time\
+      unless actual.locked_until_utc.nil?
+
+    if custom_properties.nil?
+      expected_properties = expected.properties
+      index = expected_properties['i']
+      index = 1 if index.nil?
+      custom_properties = get_custom_properties(index.to_i)
+    end
+
+    custom_properties.each do |key, value|
+      ScenarioHelper.out key + ':' + value.to_s
+      k_d = actual.properties[key.downcase]
+      ScenarioHelper.out("#{k_d}:#{k_d.nil? ? '<nil>' : k_d.to_s}")
+      if value != 'GUID'
+        if !value.nil? && value.class == Time
+          value.httpdate.must_equal k_d
+        else
+          value.must_equal(k_d)
+        end
+      end
+    end
+  end
+end

data/test/integration/service_bus/subscriptions_test.rb

@@ -0,0 +1,211 @@
+#-------------------------------------------------------------------------
+# # Copyright (c) Microsoft and contributors. All rights reserved.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#   http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#--------------------------------------------------------------------------
+require "integration/test_helper"
+
+describe "ServiceBus Subscriptions" do
+  subject { Azure::ServiceBus::ServiceBusService.new }
+  after { ServiceBusTopicNameHelper.clean }
+  let(:topic){ ServiceBusTopicNameHelper.name }
+  let(:subscription) { "mySubscription" }
+  let(:subscription_alternative) { "mySubscription" }
+  let(:description_alternative) {{
+    :lock_duration => 'PT30S',
+    :requires_session => true,
+    :default_message_time_to_live => 'PT30M',
+    :dead_lettering_on_message_expiration => true,
+    :dead_lettering_on_filter_evaluation_exceptions => true,
+    :max_delivery_count => 20,
+    :enable_batched_operations => true
+  }}
+
+  before { subject.create_topic topic }
+
+  it "should be able to set description values to false" do
+    s = Azure::ServiceBus::Subscription.new(subscription, {
+      :requires_session => false
+    })
+
+    s.requires_session.must_equal false
+  end
+
+  it "should be able to create a new subscription" do
+    result = subject.create_subscription topic, subscription
+    result.must_be :kind_of?, Azure::ServiceBus::Subscription
+    result.name.must_equal subscription
+  end
+
+  it "should be able to create a new subscription from a string and description Hash" do
+    result = subject.create_subscription topic, subscription_alternative, description_alternative
+    result.must_be :kind_of?, Azure::ServiceBus::Subscription
+    result.name.must_equal subscription_alternative
+
+    result.lock_duration.must_equal 30.0
+    result.requires_session.must_equal description_alternative[:requires_session]
+    result.default_message_time_to_live.must_equal 1800.0
+    result.dead_lettering_on_message_expiration.must_equal description_alternative[:dead_lettering_on_message_expiration]
+    result.dead_lettering_on_filter_evaluation_exceptions.must_equal description_alternative[:dead_lettering_on_filter_evaluation_exceptions]
+    result.max_delivery_count.must_equal description_alternative[:max_delivery_count]
+    result.enable_batched_operations.must_equal description_alternative[:enable_batched_operations]
+  end
+
+  it "should be able to create a new subscription with objects" do
+    subscriptionObject = Azure::ServiceBus::Subscription.new "my_other_sub"
+    subscriptionObject.topic = topic
+    subscriptionObject.max_delivery_count = 3
+
+    result = subject.create_subscription subscriptionObject
+    result.must_be :kind_of?, Azure::ServiceBus::Subscription
+    result.name.must_equal subscriptionObject.name
+    result.max_delivery_count.must_equal subscriptionObject.max_delivery_count
+
+    subject.delete_subscription result
+  end
+
+  describe "when a subscription exists" do
+    before { subject.create_subscription topic, subscription }
+    it "should be able to delete the subscription" do
+      subject.delete_subscription topic, subscription
+    end
+
+    it "should be able to get the subscription" do
+      result = subject.get_subscription topic, subscription
+      result.must_be :kind_of?, Azure::ServiceBus::Subscription
+      result.name.must_equal subscription
+    end
+
+    it "should be able to list subscriptions" do
+      result = subject.list_subscriptions topic
+      subscription_found = false
+      result.each { |s|
+        subscription_found = true if s.name == subscription
+      }
+      assert subscription_found, "list_subscriptions didn't include the expected subscription"
+    end
+
+    describe "when there are messages" do
+      let(:msg) { 
+        m = Azure::ServiceBus::BrokeredMessage.new("some message body", {:prop1 => "val1"})
+        m.to = "me"
+        m.label = "my_label"
+        m
+      }
+      before { 
+        subject.send_topic_message topic, msg
+      }
+
+      it "should be able to peek lock a message" do
+        retrieved = subject.peek_lock_subscription_message topic, subscription
+
+        retrieved.to.must_equal msg.to
+        retrieved.body.must_equal msg.body
+        retrieved.label.must_equal msg.label
+
+        retrieved = subject.read_delete_subscription_message topic, subscription, { :timeout => 1 }
+        retrieved.must_be_nil
+      end
+
+      it "should be able to read delete a message" do
+        retrieved = subject.read_delete_subscription_message topic, subscription
+
+        retrieved.must_be :kind_of?, Azure::ServiceBus::BrokeredMessage
+        retrieved.body.must_equal msg.body
+        retrieved.to.must_equal msg.to
+
+        # it should be deleted
+        retrieved = subject.read_delete_subscription_message topic, subscription, { :timeout => 1 }
+        retrieved.must_be_nil
+      end
+
+      it "should be able to unlock a message" do
+        retrieved = subject.peek_lock_subscription_message topic, subscription, { :timeout => 1 }
+        retrieved.body.must_equal msg.body
+
+        # There shouldn't be an available message in the queue
+        retrieved2 = subject.peek_lock_subscription_message topic, subscription, { :timeout => 1 }
+        retrieved2.must_be_nil
+
+        # Unlock the message
+        res = subject.unlock_subscription_message retrieved
+        res.must_be_nil
+
+        # The message should be available once again
+        retrieved = subject.peek_lock_subscription_message topic, subscription, { :timeout => 1 }
+        retrieved.body.must_equal msg.body
+      end
+
+      it "should be able to read a message from a subscription" do
+        subject.send_topic_message topic, msg
+        retrieved = subject.receive_subscription_message topic, subscription
+
+        retrieved.to.must_equal msg.to
+        retrieved.body.must_equal msg.body
+        retrieved.label.must_equal msg.label
+      end
+    end
+
+    describe 'when there are multiple subscriptions' do
+      let(:subscription1) { ServiceBusTopicNameHelper.name }
+      let(:subscription2) { ServiceBusTopicNameHelper.name }
+
+      before { 
+        subject.create_subscription topic, subscription1
+        subject.create_subscription topic, subscription2
+      }
+
+      it "should be able to list subscriptions" do
+        result = subject.list_subscriptions topic
+
+        subscription_found = false
+        subscription1_found = false
+        subscription2_found = false
+
+        result.each { |s|
+          subscription_found = true if s.name == subscription
+          subscription1_found = true if s.name == subscription1
+          subscription2_found = true if s.name == subscription2
+        }
+
+        assert (subscription_found and subscription1_found and subscription2_found), "list_subscriptions didn't include the expected subscriptions"
+      end
+
+      it "should be able to use $skip token" do
+        result = subject.list_subscriptions topic
+        result2 = subject.list_subscriptions topic, { :skip => 1 }
+        result2.length.must_equal result.length - 1
+        result2.continuation_token.must_be_nil
+        result2[0].id.must_equal result[1].id
+      end
+      
+      it "should be able to use $top token" do
+        result = subject.list_subscriptions topic
+        result.length.wont_equal 1
+        result.continuation_token.must_be_nil
+
+        result2 = subject.list_subscriptions topic, { :top => 1 }
+        result2.continuation_token.wont_be_nil
+        result2.continuation_token[:skip].wont_be_nil
+        result2.continuation_token[:top].wont_be_nil
+        result2.length.must_equal 1
+      end
+
+      it "should be able to use $skip and $top token together" do
+        result = subject.list_subscriptions topic
+        result2 = subject.list_subscriptions topic, { :skip => 1, :top => 1 }
+        result2.length.must_equal 1
+        result2[0].id.must_equal result[1].id
+      end
+    end
+  end
+end