aws-s3 0.1.0

data/test/remote/acl_test.rb

@@ -0,0 +1,117 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+class RemoteACLTest < Test::Unit::TestCase
+  
+  def setup
+    establish_real_connection
+  end
+  
+  def teardown
+    disconnect!
+  end
+  
+  def test_acl
+    Bucket.create(TEST_BUCKET) # Wipe out the existing bucket's ACL
+      
+    bucket_policy = Bucket.acl(TEST_BUCKET)
+    assert_equal 1, bucket_policy.grants.size
+    assert !bucket_policy.grants.include?(:public_read_acp)
+    
+    bucket_policy.grants << ACL::Grant.grant(:public_read_acp)
+    
+    assert_nothing_raised do
+      Bucket.acl(TEST_BUCKET, bucket_policy)
+    end
+    
+    bucket = Bucket.find(TEST_BUCKET)
+    assert bucket.acl.grants.include?(:public_read_acp)
+
+    bucket.acl.grants.pop # Get rid of the newly added grant
+    
+    assert !bucket.acl.grants.include?(:public_read_acp)
+    bucket.acl(bucket.acl) # Update its acl
+    assert Service.response.success?
+    
+    bucket_policy = Bucket.acl(TEST_BUCKET)
+    assert_equal 1, bucket_policy.grants.size
+    assert !bucket_policy.grants.include?(:public_read_acp)
+    
+    S3Object.store('testing-acls', 'the test data', TEST_BUCKET, :content_type => 'text/plain')
+    acl = S3Object.acl('testing-acls', TEST_BUCKET)
+    
+    # Confirm object has the default policy 
+    
+    assert !acl.grants.empty?
+    assert_equal 1, acl.grants.size
+    grant = acl.grants.first
+    
+    assert_equal 'FULL_CONTROL', grant.permission
+    
+    grantee = grant.grantee
+    
+    assert acl.owner.id
+    assert acl.owner.display_name
+    assert grantee.id
+    assert grantee.display_name
+    
+    assert_equal acl.owner.id, grantee.id
+    assert_equal acl.owner.display_name, grantee.display_name
+    
+    assert_equal Owner.current, acl.owner
+    
+    
+    # Manually add read access to an Amazon customer by email address
+    
+    new_grant                       = ACL::Grant.new
+    new_grant.permission            = 'READ'
+    new_grant_grantee               = ACL::Grantee.new
+    new_grant_grantee.email_address = 'marcel@vernix.org'
+    new_grant.grantee = new_grant_grantee
+    acl.grants << new_grant
+    
+    assert_nothing_raised do
+      S3Object.acl('testing-acls', TEST_BUCKET, acl)
+    end
+    
+    # Confirm the acl was updated successfully
+    
+    assert Service.response.success?
+    
+    acl = S3Object.acl('testing-acls', TEST_BUCKET)
+    assert !acl.grants.empty?
+    assert_equal 2, acl.grants.size
+    new_grant = acl.grants.last
+    assert_equal 'READ', new_grant.permission
+    
+    # Confirm instance method has same result
+    
+    assert_equal acl.grants, S3Object.find('testing-acls', TEST_BUCKET).acl.grants
+    
+    # Get rid of the grant we just added
+    
+    acl.grants.pop
+    
+    # Confirm acl class method sees that the bucket option is being used to put a new acl
+    
+    assert_nothing_raised do
+      TestS3Object.acl('testing-acls', acl)
+    end
+    
+    assert Service.response.success?
+    
+    acl = TestS3Object.acl('testing-acls')
+    
+    # Confirm added grant was removed from the policy
+    
+    assert !acl.grants.empty?
+    assert_equal 1, acl.grants.size
+    grant = acl.grants.first
+    assert_equal 'FULL_CONTROL', grant.permission
+    
+    assert_nothing_raised do
+      S3Object.delete('testing-acls', TEST_BUCKET)
+    end
+    
+    assert Service.response.success?
+  end
+end

data/test/remote/bittorrent_test.rb

@@ -0,0 +1,45 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+class RemoteBittorrentTest < Test::Unit::TestCase
+  def setup
+    establish_real_connection
+  end
+  
+  def teardown
+    disconnect!
+  end
+  
+  def test_bittorrent
+    bt_test_key = 'testing-bittorrent'
+    S3Object.create(bt_test_key, 'foo', TEST_BUCKET)
+    
+    # Confirm we can fetch a bittorrent file for this object
+    
+    torrent_file = nil
+    assert_nothing_raised do
+      torrent_file = S3Object.torrent_for(bt_test_key, TEST_BUCKET)
+    end
+    assert torrent_file
+    assert torrent_file['tracker']
+    
+    # Make object accessible to the public via a torrent
+    
+    policy = S3Object.acl(bt_test_key, TEST_BUCKET)
+    
+    assert !policy.grants.include?(:public_read)
+    
+    assert_nothing_raised do
+      S3Object.grant_torrent_access_to(bt_test_key, TEST_BUCKET)
+    end
+    
+    policy = S3Object.acl(bt_test_key, TEST_BUCKET)
+    
+    assert policy.grants.include?(:public_read)
+    
+    # Confirm instance method wraps class method
+    
+    assert_equal torrent_file, S3Object.find(bt_test_key, TEST_BUCKET).torrent 
+    
+    S3Object.delete(bt_test_key, TEST_BUCKET)
+  end
+end

data/test/remote/bucket_test.rb

@@ -0,0 +1,127 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+class RemoteBucketTest < Test::Unit::TestCase
+  
+  def setup
+    establish_real_connection
+    assert Bucket.find(TEST_BUCKET).delete_all
+  end
+  
+  def teardown
+    disconnect!
+  end
+
+  def test_bucket
+    # Fetch the testing bucket
+    
+    bucket = nil
+    assert_nothing_raised do
+      bucket = Bucket.find(TEST_BUCKET)
+    end
+    
+    assert bucket
+    
+    # Confirm we can fetch the bucket implicitly
+    
+    bucket = nil
+    assert_nothing_raised do
+      bucket = TestBucket.find
+    end
+    
+    assert bucket
+    
+    # Confirm the bucket has the right name
+    
+    assert_equal TEST_BUCKET, bucket.name
+    
+    assert bucket.empty?
+    assert_equal 0, bucket.size
+    
+    # Add some files to the bucket
+    
+    assert_nothing_raised do
+      %w(a m z).each do |file_name|
+        S3Object.create(file_name, file_name, bucket.name, :content_type => 'text/plain')
+      end
+    end
+    
+    # Confirm that we can reload the objects
+    
+    assert_nothing_raised do
+      bucket.objects(:reload)
+    end
+    
+    assert !bucket.empty?
+    assert_equal 3, bucket.size
+    
+    assert_nothing_raised do
+      bucket.objects(:marker => 'm')
+    end
+
+    assert_equal 1, bucket.size
+    assert bucket['z']
+    
+    assert_equal 1, Bucket.find(TEST_BUCKET, :max_keys => 1).size
+    
+    assert_nothing_raised do
+      bucket.objects(:reload)
+    end
+    
+    assert_equal 3, bucket.size
+    
+    # Ensure the reloaded buckets have been repatriated
+    
+    assert_equal bucket, bucket.objects.first.bucket
+    
+    # Confirm that we can delete one of the objects and it will be removed
+    
+    object_to_be_deleted = bucket.objects.last
+    assert_nothing_raised do
+      object_to_be_deleted.delete
+    end
+    
+    assert !bucket.objects.include?(object_to_be_deleted)
+    
+    # Confirm that we can add an object
+    
+    object = bucket.new_object(:value => 'hello')
+    
+    assert_raises(NoKeySpecified) do
+      object.store
+    end
+    
+    object.key = 'abc'
+    assert_nothing_raised do
+      object.store
+    end
+    
+    assert bucket.objects.include?(object)
+    
+    # Confirm that the object is still there after reloading its objects
+    
+    assert_nothing_raised do
+      bucket.objects(:reload)
+    end 
+    assert bucket.objects.include?(object)
+    
+    # Check that TestBucket has the same objects fetched implicitly
+    
+    assert_equal bucket.objects, TestBucket.objects
+    
+    # Empty out bucket
+    
+    assert_nothing_raised do
+      bucket.delete_all
+    end
+    
+    assert bucket.empty?
+    
+    bucket = nil
+    assert_nothing_raised do
+      bucket = Bucket.find(TEST_BUCKET)
+    end
+    
+    assert bucket.empty?    
+  end
+      
+end

data/test/remote/logging_test.rb

@@ -0,0 +1,82 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+class RemoteLoggingTest < Test::Unit::TestCase
+  def setup
+    establish_real_connection
+  end
+  
+  def teardown
+    disconnect!
+  end
+  
+  def test_logging
+    Bucket.create(TEST_BUCKET) # Clear out any custom grants
+    
+    # Confirm that logging is not enabled on the test bucket
+    
+    assert !Bucket.logging_enabled_for?(TEST_BUCKET)
+    assert !Bucket.find(TEST_BUCKET).logging_enabled?
+    
+    assert_equal [], Bucket.logs_for(TEST_BUCKET)
+    
+    # Confirm the current bucket doesn't have logging grants
+    
+    policy = Bucket.acl(TEST_BUCKET)
+    assert !policy.grants.include?(:logging_read_acp)
+    assert !policy.grants.include?(:logging_write)
+    
+    # Confirm that we can enable logging
+    
+    assert_nothing_raised do
+      Bucket.enable_logging_for TEST_BUCKET
+    end
+    
+    # Confirm enabling logging worked
+    
+    assert Service.response.success?
+        
+    assert Bucket.logging_enabled_for?(TEST_BUCKET)
+    assert Bucket.find(TEST_BUCKET).logging_enabled?
+    
+    # Confirm the appropriate grants were added
+    
+    policy = Bucket.acl(TEST_BUCKET)
+    assert policy.grants.include?(:logging_read_acp)
+    assert policy.grants.include?(:logging_write)
+    
+    # Confirm logging status used defaults
+    
+    logging_status = Bucket.logging_status_for TEST_BUCKET
+    assert_equal TEST_BUCKET, logging_status.target_bucket
+    assert_equal 'log-', logging_status.target_prefix
+    
+    # Confirm we can update the logging status
+    
+    logging_status.target_prefix = 'access-log-'
+    
+    assert_nothing_raised do
+      Bucket.logging_status_for TEST_BUCKET, logging_status
+    end
+    
+    assert Service.response.success?
+    
+    logging_status = Bucket.logging_status_for TEST_BUCKET
+    assert_equal 'access-log-', logging_status.target_prefix
+    
+    # Confirm we can make a request for the bucket's logs
+    
+    assert_nothing_raised do
+      Bucket.logs_for TEST_BUCKET
+    end
+    
+    # Confirm we can disable logging
+    
+    assert_nothing_raised do
+      Bucket.disable_logging_for(TEST_BUCKET)
+    end
+    
+    assert Service.response.success?
+    
+    assert !Bucket.logging_enabled_for?(TEST_BUCKET)
+  end
+end

data/test/remote/object_test.rb

@@ -0,0 +1,267 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+class RemoteS3ObjectTest < Test::Unit::TestCase
+  def setup
+    establish_real_connection
+  end
+  
+  def teardown
+    disconnect!
+  end
+  
+  def test_object
+    key                 = 'testing_s3objects'
+    value               = 'testing'
+    content_type        = 'text/plain'
+    fetch_object_at     = Proc.new {|url| Net::HTTP.get_response(URI.parse(url))}
+    unauthenticated_url = ['http:/', Base.connection.http.address, TEST_BUCKET, key].join('/')
+    
+    # Create an object
+    
+    response = nil
+    assert_nothing_raised do
+      response = S3Object.create(key, value, TEST_BUCKET, :access => :public_read, :content_type => content_type)
+    end
+    
+    # Check response
+    
+    assert response.success?
+    
+    # Extract the object's etag
+    
+    etag = nil
+    assert_nothing_raised do
+      etag = response.etag
+    end
+    
+    assert etag
+    
+    # Confirm we can't create an object unless the bucket is set
+    
+    assert_raises(NoBucketSpecified) do
+      object = S3Object.new
+      object.key = 'hello'
+      object.store
+    end
+    
+    # Fetch newly created object to show it was actually created
+    
+    object = nil
+    assert_nothing_raised do
+      object = S3Object.find(key, TEST_BUCKET)
+    end
+    
+    assert object
+    
+    # Confirm it has the right etag
+    
+    assert_equal etag, object.etag
+    
+    # Check if its owner is properly set
+    
+    assert_nothing_raised do
+      object.owner.display_name
+    end
+    
+    # Confirm we can get the object's key
+    
+    assert_equal key, object.key
+    
+    # Confirm its value was properly set
+    
+    assert_equal value, object.value
+    assert_equal value, S3Object.value(key, TEST_BUCKET)
+    streamed_value = ''
+    assert_nothing_raised do
+      S3Object.stream(key, TEST_BUCKET) do |segment|
+        streamed_value << segment
+      end
+    end
+    
+    assert_equal value, streamed_value
+    
+    # Change its value
+    
+    new_value = "<script>alert('foo');</script>"
+    assert_nothing_raised do
+      object.value = new_value
+    end
+    assert_equal new_value, object.value
+    
+    # Confirm content type was properly set
+    
+    assert_equal content_type, object.content_type
+    
+    # Change its content type
+    
+    new_content_type = 'text/javascript'
+    assert_nothing_raised do
+      object.content_type = new_content_type
+    end
+    
+    assert_equal new_content_type, object.content_type
+    
+    # Test that it is publicly readable
+    
+    response = fetch_object_at[unauthenticated_url]
+    assert (200..299).include?(response.code.to_i)
+    
+    # Confirm that it has no meta data
+    
+    assert object.metadata.empty?
+    
+    # Set some meta data
+    
+    metadata_key   = :secret_sauce
+    metadata_value = "it's a secret"
+    object.metadata[metadata_key] = metadata_value
+    
+    # Persist all changes
+    
+    assert_nothing_raised do
+      object.store
+    end
+    
+    # Refetch the object
+    
+    key = object.key
+    object = nil
+    assert_nothing_raised do
+      object = S3Object.find(key, TEST_BUCKET)
+    end
+    
+    # Confirm all changes were persisted
+    
+    assert object
+    assert_equal key, object.key
+    
+    assert_equal new_content_type, object.content_type
+    
+    assert_equal new_value, object.value
+    assert_equal new_value, object.value(:reload)
+    
+    assert !object.metadata.empty?
+    assert_equal metadata_value, object.metadata[metadata_key]
+    
+    # Change acl
+    
+    assert_nothing_raised do
+      S3Object.create(object.key, object.value, TEST_BUCKET, :access => :private, :content_type => object.content_type)
+    end
+    
+    # Confirm object is no longer publicly readable
+    
+    response = fetch_object_at[unauthenticated_url]
+    assert (400..499).include?(response.code.to_i)
+    
+    # Confirm object is accessible from its authenticated url
+    
+    response = fetch_object_at[object.url]
+    assert (200..299).include?(response.code.to_i)
+    
+    # Copy the object
+    
+    assert_nothing_raised do
+      object.copy('testing_s3objects-copy')
+    end
+    
+    # Confirm the object is identical
+    
+    copy = nil
+    assert_nothing_raised do
+      copy = S3Object.find('testing_s3objects-copy', TEST_BUCKET)
+    end
+    
+    assert copy
+    
+    assert_equal object.value, copy.value
+    assert_equal object.content_type, copy.content_type
+    
+    # Delete object
+    
+    assert_nothing_raised do
+      object.delete
+    end
+    
+    # Confirm we can rename objects
+    
+    renamed_to = copy.key + '-renamed'
+    renamed_value = copy.value
+    assert_nothing_raised do
+      S3Object.rename(copy.key, renamed_to, TEST_BUCKET)
+    end
+    
+    # Confirm renamed copy exists
+    
+    renamed = nil
+    assert_nothing_raised do
+      renamed = S3Object.find(renamed_to, TEST_BUCKET)
+    end
+    
+    assert renamed
+    assert_equal renamed_value, renamed.value
+    
+    # Confirm copy is deleted
+    
+    assert_raises(NoSuchKey) do
+      S3Object.find(copy.key, TEST_BUCKET)
+    end
+    
+    # Confirm that you can not store an object once it is deleted
+    
+    assert_raises(DeletedObject) do
+      object.store
+    end
+    
+    assert_raises(NoSuchKey) do
+      S3Object.find(key, TEST_BUCKET)
+    end
+    
+    # Confirm we can pass in an IO stream and have the uploading sent in chunks
+    
+    response = nil
+    test_file_key = File.basename(TEST_FILE)
+    assert_nothing_raised do
+      response = S3Object.store(test_file_key, File.open(TEST_FILE), TEST_BUCKET)
+    end
+    assert response.success?
+    
+    assert_equal File.size(TEST_FILE), Integer(S3Object.about(test_file_key, TEST_BUCKET)['content-length'])
+    
+    result = nil
+    assert_nothing_raised do
+      result = S3Object.delete(test_file_key, TEST_BUCKET)
+    end
+    
+    assert result
+    
+    # Confirm we can create an object with spaces in its key
+    
+    object = S3Object.new(:value => 'just some text')
+    object.key = 'name with spaces'
+    object.bucket = Bucket.find(TEST_BUCKET)
+    
+    assert_nothing_raised do
+      object.store
+    end
+    
+    object = nil
+    assert_nothing_raised do
+      object = S3Object.find('name with spaces', TEST_BUCKET)
+    end
+    
+    assert object
+    assert_equal 'name with spaces', object.key
+    
+    # Confirm authenticated url is generated correctly despite space in file name
+    
+    response = fetch_object_at[object.url]
+    assert (200..299).include?(response.code.to_i)
+    
+    # Confirm we can delete objects with spaces in their key
+    
+    assert_nothing_raised do
+      object.delete
+    end
+  end
+end