hackerdude-aws 2.3.25

data/test/acf/test_acf.rb

@@ -0,0 +1,148 @@
+require File.dirname(__FILE__) + '/test_helper.rb'
+require File.dirname(__FILE__) + '/../test_credentials.rb'
+
+class TestAcf < Test::Unit::TestCase
+
+  RIGHT_OBJECT_TEXT     = 'Right test message'
+  
+  STDOUT.sync = true
+
+  def setup
+      TestCredentials.get_credentials
+    @acf= Aws::AcfInterface.new(TestCredentials.aws_access_key_id, TestCredentials.aws_secret_access_key)
+    @s3 = Aws::S3.new(TestCredentials.aws_access_key_id, TestCredentials.aws_secret_access_key)
+    @bucket_name   = "right-acf-awesome-test-bucket-0001"
+    @bucket_domain = "#{@bucket_name}.s3.amazonaws.com"
+  end
+
+  def test_01_list_distributions_part1
+    distributions = nil
+    assert_nothing_raised(Aws::AwsError) do
+      distributions = @acf.list_distributions
+    end
+    assert distributions.is_a?(Array)
+  end
+
+  def test_02_try_to_create_for_bad_bucket
+    # a bucket does not exist
+    assert_raise(Aws::AwsError) do
+      @acf.create_distribution("right-cloudfront-awesome-test-bucket-not-exist", "Mustn't to be born", true)
+    end
+    # a bucket is not a domain naming complied guy
+    bucket_name = 'right_cloudfront_awesome_test_bucket_BAD'
+    @s3.bucket(bucket_name, :create)
+    assert_raise(Aws::AwsError) do
+      @acf.create_distribution(bucket_name, "Mustn't to be born", true)
+    end
+  end
+
+  def test_03_create
+    comment = 'WooHoo!!!'
+    # create a test bucket
+    @s3.bucket(@bucket_name, :create)
+    # create a distribution
+    distribution = @acf.create_distribution(@bucket_domain, comment, true)
+    assert_equal comment, distribution[:comment]
+    assert       distribution[:cnames].size == 0
+    assert       distribution[:enabled]
+  end
+
+  def test_04_list_distributions_part2
+    distributions = @acf.list_distributions
+    assert distributions.size > 0
+  end
+
+  def get_test_distribution
+    @acf.list_distributions.select{ |d| d[:origin] == @bucket_domain }.first
+  end
+
+  def test_05_get_distribution
+    old = get_test_distribution
+    assert_nothing_raised do
+      @acf.get_distribution(old[:aws_id])
+    end
+  end
+
+  def test_06_get_and_set_config
+    config = nil
+    old = get_test_distribution
+    assert_nothing_raised do
+      config = @acf.get_distribution_config(old[:aws_id])
+    end
+    # change a config
+    config[:enabled] = false
+    config[:cnames] << 'x1.myawesomesite.com'
+    config[:cnames] << 'x2.myawesomesite.com'
+    # set config
+    set_config_result = nil
+    assert_nothing_raised do
+      set_config_result = @acf.set_distribution_config(old[:aws_id], config)
+    end
+    assert set_config_result
+    # reget the config and check
+    new_config = nil
+    assert_nothing_raised do
+      new_config = @acf.get_distribution_config(old[:aws_id])
+    end
+    assert           !new_config[:enabled]
+    assert_equal     new_config[:cnames].sort, ['x1.myawesomesite.com', 'x2.myawesomesite.com']
+    assert_not_equal config[:e_tag], new_config[:e_tag]
+
+    # try to update the old config again (must fail because ETAG has changed)
+    assert_raise(Aws::AwsError) do
+      @acf.set_distribution_config(old[:aws_id], config)
+    end
+  end
+
+  def test_07_caching
+    # enable caching
+    @acf.params[:cache] = true
+    # list distributions
+    @acf.list_distributions
+    # list the distributions again - cache should hit
+    assert_raise(Aws::AwsNoChange) do
+      @acf.list_distributions
+    end
+    # disable caching
+    @acf.params[:cache] = true
+  end
+
+  def test_08_delete_distribution
+    # we need ETAG so use get_distribution
+    distribution = @acf.get_distribution(get_test_distribution[:aws_id])
+    # try to delete a distribution
+    # should fail because
+    if distribution[:status] == 'InProgress'
+      # should fail because the distribution is not deployed yet
+      assert_raise(Aws::AwsError) do
+        @acf.delete_distribution(distribution[:aws_id], distribution[:e_tag])
+      end
+      # wait for a deployed state
+      print "waiting up to 5 min while the distribution is being deployed: "
+      100.times do
+        print '.'
+        distribution = @acf.get_distribution(distribution[:aws_id])
+        if distribution[:status] == 'Deployed'
+          print ' done'
+          break
+        end
+        sleep 3
+      end
+      puts
+    end
+
+    # only disabled and deployed distribution can be deleted
+    assert_equal 'Deployed', distribution[:status]
+    assert       !distribution[:enabled]
+
+    # delete the distribution
+    assert_nothing_raised do
+      @acf.delete_distribution(distribution[:aws_id], distribution[:e_tag])
+    end  
+  end
+
+  def test_09_drop_bucket
+    assert @s3.bucket(@bucket_name).delete
+  end
+
+end

data/test/acf/test_helper.rb

@@ -0,0 +1,2 @@
+require 'test/unit'
+require File.dirname(__FILE__) + '/../../lib/right_aws'

data/test/alexa/test_alexa.rb

@@ -0,0 +1,53 @@
+require File.dirname(__FILE__) + '/test_helper.rb'
+require 'pp'
+require File.dirname(__FILE__) + '/../test_credentials.rb'
+
+require 'ruby-debug'
+Debugger.start
+
+# Tests the Alexa AWS implementation
+# Note this is very preliminary code. The code just spits back hashes
+# and it has no concept of types just yet. The parser can 
+# be overriden on the calls if you need stronger types and must 
+# have something right away.
+class TestAlexa < Test::Unit::TestCase
+
+		def setup
+        TestCredentials.get_credentials
+        @alexa   = Aws::Alexa.new(TestCredentials.aws_access_key_id,
+                              TestCredentials.aws_secret_access_key)
+		end
+
+		# Quick rank request
+		def test_rank
+		return
+			TestCredentials.get_credentials
+			rank = @alexa.alexa_rank("http://www.youtube.com")
+			assert ! rank.empty?
+			assert ! rank[:rank][:text].blank?
+			assert rank[:rank][:text].to_i > 0
+			assert ! rank[:data_url][:text].blank?
+		end
+
+		def test_alexa_urlinfo
+			TestCredentials.get_credentials
+			result = @alexa.alexa_url_info("http://www.yahoo.com")
+			assert result[:url_info_response][:response][:url_info_result][:alexa][:contact_info][:company_stock_ticker][:text] == "YHOO"
+		end
+
+		def test_alexa_category_browse
+			TestCredentials.get_credentials
+			category_browse = @alexa.alexa_category_browse("Top/Computers/Software/Operating_Systems")
+			assert ! category_browse.empty?
+			assert ! category_browse[:category_browse_response][:response][:category_browse_result][:alexa][:category_browse][:categories][:category].first[:path][:text].blank?
+			
+		end
+
+		def test_alexa_category_listings
+			TestCredentials.get_credentials
+			category_browse = @alexa.alexa_category_listings("Top/Computers/Software/Operating_Systems")
+			assert ! category_browse.empty?
+			assert category_browse[:category_listings_response][:response][:category_listings_result][:alexa][:category_listings][:listings][:listing].length > 0
+		end
+
+end

data/test/alexa/test_helper.rb

@@ -0,0 +1,2 @@
+require 'test/unit'
+require File.dirname(__FILE__) + '/../../lib/aws'

data/test/ec2/test_ec2.rb

@@ -0,0 +1,205 @@
+require File.dirname(__FILE__) + '/test_helper.rb'
+require 'pp'
+require File.dirname(__FILE__) + '/../test_credentials.rb'
+
+class TestEc2 < Test::Unit::TestCase
+
+    # Some of RightEc2 instance methods concerning instance launching and image registration
+    # are not tested here due to their potentially risk.
+
+    def setup
+        TestCredentials.get_credentials
+        @ec2   = Aws::Ec2.new(TestCredentials.aws_access_key_id,
+                              TestCredentials.aws_secret_access_key)
+        @key   = 'right_ec2_awesome_test_key'
+        @group = 'right_ec2_awesome_test_security_group'
+    end
+
+    def test_001_describe_availability_zones
+        TestCredentials.get_credentials
+        @ec2   = Aws::Ec2.new(TestCredentials.aws_access_key_id,
+                              TestCredentials.aws_secret_access_key)
+        zones = @ec2.describe_availability_zones
+        puts zones.inspect
+        assert zones.is_a? Array
+        assert zones.size > 3
+        zones.each do |z|
+            puts z[:zone_name]
+        end
+        assert zones[0][:zone_name] == "us-east-1a"
+    end
+
+    def test_01_create_describe_key_pairs
+        new_key = @ec2.create_key_pair(@key)
+        assert new_key[:aws_material][/BEGIN RSA PRIVATE KEY/], "New key material is absent"
+        keys = @ec2.describe_key_pairs
+        assert keys.map { |key| key[:aws_key_name] }.include?(@key), "#{@key} must exist"
+    end
+
+    def test_02_create_security_group
+        assert @ec2.create_security_group(@group, 'My awesone test group'), 'Create_security_group fail'
+        group = @ec2.describe_security_groups([@group])[0]
+        assert_equal @group, group[:aws_group_name], 'Group must be created but does not exist'
+    end
+
+    def test_03_perms_add
+        assert @ec2.authorize_security_group_named_ingress(@group, TestCredentials.account_number, 'default')
+        assert @ec2.authorize_security_group_IP_ingress(@group, 80, 80, 'udp', '192.168.1.0/8')
+    end
+
+    def test_04_check_new_perms_exist
+        assert_equal 2, @ec2.describe_security_groups([@group])[0][:aws_perms].size
+    end
+
+    def test_05_perms_remove
+        assert @ec2.revoke_security_group_IP_ingress(@group, 80, 80, 'udp', '192.168.1.0/8')
+        assert @ec2.revoke_security_group_named_ingress(@group,
+                                                        TestCredentials.account_number, 'default')
+    end
+
+    def test_06_describe_images
+        images = describe_images
+        # unknown image
+        assert_raise(Aws::AwsError) { @ec2.describe_images(['ami-ABCDEFGH']) }
+    end
+
+    def test_07_describe_instanses
+        assert @ec2.describe_instances
+        # unknown image
+        assert_raise(Aws::AwsError) { @ec2.describe_instances(['i-ABCDEFGH']) }
+    end
+
+    def test_08_delete_security_group
+        assert @ec2.delete_security_group(@group), 'Delete_security_group fail'
+    end
+
+    def test_09_delete_key_pair
+        assert @ec2.delete_key_pair(@key), 'Delete_key_pair fail'
+##  Hmmm... Amazon does not through the exception any more. It now just returns a 'true' if the key does not exist any more...
+##      # key must be deleted already
+##    assert_raise(Aws::AwsError) { @ec2.delete_key_pair(@key) }
+    end
+
+    def test_10_signature_version_0
+        ec2 = Aws::Ec2.new(TestCredentials.aws_access_key_id, TestCredentials.aws_secret_access_key, :signature_version => '0')
+        images = ec2.describe_images
+        assert images.size>0, 'Amazon must have at least some public images'
+        # check that the request has correct signature version
+        assert ec2.last_request.path.include?('SignatureVersion=0')
+    end
+
+    def test_11_regions
+        regions = nil
+        assert_nothing_raised do
+            regions = @ec2.describe_regions
+        end
+        # check we got more that 0 regions
+        assert regions.size > 0
+        # check an access to regions
+        regions.each do |region|
+            regional_ec2 = Aws::Ec2.new(TestCredentials.aws_access_key_id, TestCredentials.aws_secret_access_key, :region => region)
+            # do we have a correct endpoint server?
+            assert_equal "#{region}.ec2.amazonaws.com", regional_ec2.params[:server]
+            # get a list of images from every region
+            images = nil
+            assert_nothing_raised do
+                images = regional_ec2.describe_regions
+            end
+            # every region must have images
+            assert images.size > 0
+        end
+    end
+
+    def test_12_endpoint_url
+        ec2 = Aws::Ec2.new(TestCredentials.aws_access_key_id, TestCredentials.aws_secret_access_key, :endpoint_url => 'a://b.c:0/d/', :region => 'z')
+        # :endpoint_url has a priority hence :region should be ommitted
+        assert_equal 'a', ec2.params[:protocol]
+        assert_equal 'b.c', ec2.params[:server]
+        assert_equal '/d/', ec2.params[:service]
+        assert_equal 0, ec2.params[:port]
+        assert_nil ec2.params[:region]
+    end
+
+    def test_13a_create_describe_delete_tag
+      images = describe_images
+      resource_id = images.first[:aws_id]
+      
+      assert @ec2.create_tag(resource_id, 'testkey', 'testvalue').inspect, "Could not add a tag to #{resource_id}"
+      assert_equal(
+        [{:aws_resource_id=>resource_id, :aws_resource_type=>"image", :aws_key=>"testkey", :aws_value=>"testvalue"}],
+        @ec2.describe_tags('Filter.1.Name' => 'resource-id', 'Filter.1.Value.1' => resource_id)
+      )
+      assert_equal(
+        [],
+        @ec2.describe_tags('Filter.1.Name' => 'resource-id', 'Filter.1.Value.1' => '__blah__')
+      )
+      
+      assert @ec2.delete_tag(resource_id, 'testkey').inspect, "Could not delete tag 'testkey' from #{resource_id}"
+      sleep 1 # :(
+      assert_equal(
+        [],
+        @ec2.describe_tags('Filter.1.Name' => 'resource-id', 'Filter.1.Value.1' => resource_id)
+      )
+    end
+
+    def test_13b_create_describe_delete_tag_by_value
+      images = describe_images
+      resource_id = images.first[:aws_id]
+      
+      assert @ec2.create_tag(resource_id, 'testkey', 'testvalue').inspect, "Could not add a tag to #{resource_id}"
+      assert_equal(
+        [{:aws_resource_id=>resource_id, :aws_resource_type=>"image", :aws_key=>"testkey", :aws_value=>"testvalue"}],
+        @ec2.describe_tags('Filter.1.Name' => 'resource-id', 'Filter.1.Value.1' => resource_id, 'Filter.2.Name' => 'key', 'Filter.2.Value.1' => 'testkey')
+      )
+      assert_equal(
+        [],
+        @ec2.describe_tags('Filter.1.Name' => 'resource-id', 'Filter.1.Value.1' => resource_id, 'Filter.2.Name' => 'key', 'Filter.2.Value.1' => '__blah__')
+      )
+      
+      assert @ec2.delete_tag(resource_id, 'testkey', 'testvalue').inspect, "Could not delete tag 'testkey' from #{resource_id}"
+      sleep 1 # :(
+      assert_equal(
+        [],
+        @ec2.describe_tags('Filter.1.Name' => 'resource-id', 'Filter.1.Value.1' => resource_id, 'Filter.2.Name' => 'key', 'Filter.2.Value.1' => 'testkey')
+      )
+    end
+
+    def test_13c_delete_tag_with_empty_or_nil_value
+      images = describe_images
+      resource_id = images.first[:aws_id]
+      
+      assert @ec2.create_tag(resource_id, 'testkey', 'testvalue').inspect, "Could not add a tag to #{resource_id}"
+      assert_equal(
+        [{:aws_resource_id=>resource_id, :aws_resource_type=>"image", :aws_key=>"testkey", :aws_value=>"testvalue"}],
+        @ec2.describe_tags('Filter.1.Name' => 'resource-id', 'Filter.1.Value.1' => resource_id)
+      )
+      
+      # Delete a tag with an empty string value...
+      assert @ec2.delete_tag(resource_id, 'testkey', '').inspect, "Could not delete tag 'testkey' from #{resource_id}"
+      sleep 1 # :(
+      # ... does nothing
+      assert_equal(
+        [{:aws_resource_id=>resource_id, :aws_resource_type=>"image", :aws_key=>"testkey", :aws_value=>"testvalue"}],
+        @ec2.describe_tags('Filter.1.Name' => 'resource-id', 'Filter.1.Value.1' => resource_id)
+      )
+      
+      # Delete a tag with value = nil...
+      assert @ec2.delete_tag(resource_id, 'testkey', nil).inspect, "Could not delete tag 'testkey' from #{resource_id}"
+      sleep 1 # :(
+      # ... deletes all tags with the given key
+      assert_equal(
+        [],
+        @ec2.describe_tags('Filter.1.Name' => 'resource-id', 'Filter.1.Value.1' => resource_id)
+      )
+    end
+
+  private
+
+    # Memoize the images to speed up the tests
+    def describe_images
+      @@images ||= @ec2.describe_images
+      assert @@images.size>0, 'Amazon must have at least some public images'
+      @@images
+    end
+
+end

data/test/ec2/test_helper.rb

@@ -0,0 +1,2 @@
+require 'test/unit'
+require File.dirname(__FILE__) + '/../../lib/aws'

data/test/ec2/test_mon.rb

@@ -0,0 +1,17 @@
+require File.dirname(__FILE__) + '/test_helper.rb'
+require File.dirname(__FILE__) + '/../test_credentials.rb'
+require 'pp'
+
+class TestEc2 < Test::Unit::TestCase
+
+    # Some of RightEc2 instance methods concerning instance launching and image registration
+    # are not tested here due to their potentially risk.
+
+    def setup
+        TestCredentials.get_credentials
+        @ec2 = Aws::Ec2.new(TestCredentials.aws_access_key_id,
+                                   TestCredentials.aws_secret_access_key)
+        @key = 'right_ec2_awesome_test_key'
+        @group = 'right_ec2_awesome_test_security_group'
+    end
+end

data/test/elb/test_elb.rb

@@ -0,0 +1,51 @@
+require 'test/unit'
+require File.dirname(__FILE__) + '/../../lib/aws'
+require 'pp'
+require File.dirname(__FILE__) + '/../test_credentials.rb'
+
+class TestElb < Test::Unit::TestCase
+
+    # Some of RightEc2 instance methods concerning instance launching and image registration
+    # are not tested here due to their potentially risk.
+
+    def setup
+        TestCredentials.get_credentials
+
+        @ec2 = Aws::Ec2.new(TestCredentials.aws_access_key_id,
+                            TestCredentials.aws_secret_access_key)
+
+        @elb = Aws::Elb.new(TestCredentials.aws_access_key_id,
+                            TestCredentials.aws_secret_access_key)
+        @key = 'right_ec2_awesome_test_key'
+        @group = 'right_ec2_awesome_test_security_group'
+    end
+
+    def test_01_create_elb
+
+    end
+
+    def test_02_register_instances
+
+    end
+
+    def test_03_deregister_instances
+
+    end
+
+
+    def test_04_describe_elb
+        desc = @elb.describe_load_balancers
+        puts desc.inspect
+    end
+
+    def test_06_describe_instance_health
+
+    end
+
+
+    def test_15_delete_elb
+
+    end
+
+
+end