s3lib 0.1.0

data/lib/s3lib_with_mixin.rb

@@ -0,0 +1,11 @@
+require File.join(File.dirname(__FILE__), 's3_authenticator')
+require File.join(File.dirname(__FILE__), 's3_errors')
+require File.join(File.dirname(__FILE__), 'acl_access')
+require File.join(File.dirname(__FILE__), 'object_with_acl_mixin')
+require File.join(File.dirname(__FILE__), 'bucket_with_acl_mixin')
+require File.join(File.dirname(__FILE__), 'acl')
+require File.join(File.dirname(__FILE__), 'grant')
+
+require 'rexml/document'
+require 'rubygems'
+require 'builder'

data/lib/service.rb

@@ -0,0 +1,24 @@
+# service.rb
+require File.join(File.dirname(__FILE__), 's3_authenticator')
+require 'rexml/document'
+
+module S3Lib
+  
+  class Service
+    
+    def self.buckets
+      response = S3Lib.request(:get, '')
+      doc = REXML::Document.new(response)
+      xml = doc.root
+      REXML::XPath.match(xml, '//Buckets/Bucket').collect do |bucket_xml|
+        Bucket.new(bucket_xml)
+      end
+    end
+        
+  end
+  
+end
+
+if __FILE__ == $0
+  S3Lib::Service.buckets
+end

data/lib/service_dev.rb

@@ -0,0 +1,36 @@
+# service.rb
+require File.join(File.dirname(__FILE__), 's3_authenticator')
+require 'rexml/document'
+
+module S3Lib
+  
+  class Service
+    
+    def self.buckets
+      response = S3Lib.request(:get, '')
+      xml = REXML::Document.new(response).root
+
+      REXML::XPath.match(xml, '//Buckets/Bucket').collect do |bucket_xml|
+        Bucket.new(bucket_xml)
+      end
+    end
+        
+  end
+  
+  # This is a stub of the Bucket class that will be replaced with
+  # a full-blown class in the following recipes.  
+  class Bucket
+    
+    attr_reader :name
+    
+    def initialize(doc)
+      @name = doc.elements['Name'].text      
+    end
+    
+  end
+  
+end
+
+if __FILE__ == $0
+  S3Lib::Service.buckets
+end

data/s3lib.gemspec

@@ -0,0 +1,74 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run 'rake gemspec'
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{s3lib}
+  s.version = "0.1.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Scott Patten"]
+  s.date = %q{2011-11-11}
+  s.description = %q{This library forms the basis for building a library to talk to Amazon S3 using Ruby.  It is used as an example of how to build an Amazon S3 interface in The S3 Cookbook (http://thes3cookbook.com)}
+  s.email = %q{scott@scottpatten.ca}
+  s.executables = ["s3lib", "s3sh_as"]
+  s.files = [
+    "Rakefile",
+    "VERSION.yml",
+    "bin/s3lib",
+    "bin/s3sh_as",
+    "github-test.rb",
+    "lib/acl.rb",
+    "lib/acl_access.rb",
+    "lib/acl_creating_a_grant_recipe.rb",
+    "lib/acl_reading_acl_recipe.rb",
+    "lib/acl_refreshing_cached_grants_recipe.rb",
+    "lib/bucket.rb",
+    "lib/bucket_before_refactoring.rb",
+    "lib/bucket_create.rb",
+    "lib/bucket_find.rb",
+    "lib/bucket_with_acl_mixin.rb",
+    "lib/error_handling.rb",
+    "lib/grant.rb",
+    "lib/grant_creating_a_grant_recipe.rb",
+    "lib/grant_reading_acl_recipe.rb",
+    "lib/object.rb",
+    "lib/object_from_bucket_test.rb",
+    "lib/object_take1.rb",
+    "lib/object_with_acl_mixin.rb",
+    "lib/put_with_curl_test.rb",
+    "lib/s3_authenticator.rb",
+    "lib/s3_authenticator_dev.rb",
+    "lib/s3_authenticator_dev_private.rb",
+    "lib/s3_errors.rb",
+    "lib/s3lib.rb",
+    "lib/s3lib_with_mixin.rb",
+    "lib/service.rb",
+    "lib/service_dev.rb",
+    "s3lib.gemspec",
+    "sample_usage.rb",
+    "test/acl_test.rb",
+    "test/amazon_headers_test.rb",
+    "test/canonical_resource_test.rb",
+    "test/canonical_string_tests.rb",
+    "test/first_test.rb",
+    "test/first_test_private.rb",
+    "test/full_test.rb",
+    "test/s3_authenticator_test.rb"
+  ]
+  s.homepage = %q{http://thes3cookbook.com}
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.6.2}
+  s.summary = %q{An Amazon S3 interface library used as an example in The S3 Cookbook (http://thes3cookbook.com)}
+
+  if s.respond_to? :specification_version then
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
+    else
+    end
+  else
+  end
+end
+

data/sample_usage.rb

@@ -0,0 +1,45 @@
+#!/usr/bin/env ruby
+
+# require 'rubygems'
+# require 's3lib'
+require File.join(File.dirname(__FILE__), 'lib/s3lib')
+include S3Lib
+
+bucket_name = 'spattens_first_bucket'
+
+# Delete the bucket if it already exists.  We want to start with an empty bucket.
+Bucket.delete(bucket_name, :force => true) if Bucket.find(bucket_name)
+
+# Create the bucket and store it in b
+Bucket.create(bucket_name)
+bucket = Bucket.find(bucket_name)
+puts "Objects in bucket: #{bucket.objects.length}"
+
+# Create some objects in the bucket
+S3Object.create(bucket_name, 'first_object.txt', "this is the content")
+S3Object.create(bucket_name, 'second_object.txt', "This is the second object")
+
+# Create an object from a file
+File.open('powers.txt', 'w') do |f|
+  10.times do |n|
+    f.puts "#{n},#{n**2},#{n**3},#{n**4}"
+  end
+end
+S3Object.create(bucket_name, 'powers.txt', File.read('powers.txt'))
+
+# Look at the objects in the bucket, using refresh to make sure we see the new objects.
+puts "Objects in buckets: #{bucket.objects(:refresh => true).length}"
+first_obj = bucket.objects.first
+puts "contents of the first object (#{first_obj.key}): #{first_obj.value}"
+
+# Accessing objects by their name
+puts "contents of the 'powers.txt' object:\n#{bucket['powers.txt'].value}"
+
+# Show the permissions on 'powers.txt'
+puts "Grants on 'powers.txt':\n#{bucket['powers.txt'].acl.inspect}"
+
+# Grant world-read permission on 'powers.txt'
+bucket['powers.txt'].acl.add_grant!(:read, :type => :public)
+
+# Show the new permissions on 'powers.txt'
+puts "Grants on 'powers.txt':\n#{bucket['powers.txt'].acl.inspect}"

data/test/acl_test.rb

@@ -0,0 +1,89 @@
+require 'test/unit'
+require File.join(File.dirname(__FILE__), '..', 'lib', 's3lib')
+include S3Lib
+
+
+class S3AclTest < Test::Unit::TestCase
+    
+  SPATTEN_CANONICAL_ID = '9d92623ba6dd9d7cc06a7b8bcc46381e7c646f72d769214012f7e91b50c0de0f'
+  SPATTEN_DESIGN_CANONICAL_ID = '2f29caa19cd40477cf8a840b6dc473463cbda95b7dc81a8d72118a42733a7661'
+  SPATTEN_EMAIL = 'scott@spattendesign.com'
+  
+  def setup
+    @bucket = Bucket.find('spatten_test_bucket')
+    @object = @bucket['copy_test']
+    @bucket_acl = Acl.new('spatten_test_bucket')
+  end
+  
+  def teardown
+    @bucket_acl.clear_grants
+    @bucket_acl.add_grant(:full_control, {:type => :canonical, :grantee => @bucket_acl.owner})
+    @bucket_acl.set_grants
+  end
+  
+  
+  def test_acl_creation_with_bucket_object
+    assert_nothing_raised{@bucket_acl = Acl.new(@bucket)}
+  end
+  
+  def test_acl_can_instantiate_grants
+    assert_nothing_raised {@bucket_acl.grants.inspect}
+  end
+  
+  def test_add_grant_works
+    old_length = @bucket_acl.grants.length    
+    assert_nothing_raised do
+      @bucket_acl.add_grant(:read, {:type => :all_s3})
+      assert_equal old_length + 1, @bucket_acl.grants.length
+    end
+  end 
+
+  def test_add_grant_by_canonical_id
+    old_length = @bucket_acl.grants.length    
+    assert_nothing_raised do
+      @bucket_acl.add_grant(:read, {:type => :canonical, :grantee => SPATTEN_DESIGN_CANONICAL_ID})
+      assert_equal old_length + 1, @bucket_acl.grants.length
+    end    
+    @bucket_acl.set_grants
+    assert_equal old_length + 1, @bucket_acl.grants.length
+    assert_equal :canonical, @bucket_acl.grants.last.type
+    assert_equal SPATTEN_DESIGN_CANONICAL_ID, @bucket_acl.grants.last.grantee    
+  end
+  
+  def test_add_grant_by_email
+    old_length = @bucket_acl.grants.length    
+    assert_nothing_raised do
+      @bucket_acl.add_grant(:read, {:type => :email, :grantee => SPATTEN_EMAIL})
+      assert_equal old_length + 1, @bucket_acl.grants.length
+    end    
+    @bucket_acl.set_grants
+    assert_equal old_length + 1, @bucket_acl.grants.length
+    assert_equal :canonical, @bucket_acl.grants.last.type
+    assert_equal SPATTEN_DESIGN_CANONICAL_ID, @bucket_acl.grants.last.grantee
+  end
+  
+  def test_add_grant_to_all_s3
+    old_length = @bucket_acl.grants.length    
+    assert_nothing_raised do
+      @bucket_acl.add_grant(:read, {:type => :all_s3})
+      assert_equal old_length + 1, @bucket_acl.grants.length
+    end    
+    @bucket_acl.set_grants
+    assert_equal old_length + 1, @bucket_acl.grants.length    
+  end
+  
+  def test_to_xml_includes_grant_xml
+    assert_match "<Grant>", @bucket_acl.to_xml
+  end
+  
+  def test_set_grants_works
+    old_length = @bucket_acl.grants.length
+    @bucket_acl.add_grant(:read, {:type => :all_s3})
+    assert_nothing_raised {@bucket_acl.set_grants}
+    assert_equal old_length + 1, @bucket_acl.grants.length
+  end 
+  
+  def test_owner
+    assert_equal SPATTEN_CANONICAL_ID, @bucket_acl.owner
+  end
+end

data/test/amazon_headers_test.rb

@@ -0,0 +1,87 @@
+require 'test/unit'
+require File.join(File.dirname(__FILE__), '../lib/s3_authenticator')
+
+class S3AuthenticatorAmazonHeadersTest < Test::Unit::TestCase
+  
+  def setup
+    S3Lib::AuthenticatedRequest.test_mode
+    @s3_test = S3Lib::AuthenticatedRequest.new
+  end
+  
+  def test_amazon_headers_should_remove_non_amazon_headers
+    @s3_test.make_authenticated_request(:get, '', {'content-type' => 'content', 
+                                                   'some-other-header' => 'other',
+                                                   'x-amz-meta-one' => 'one',
+                                                   'x-amz-meta-two' => 'two'})
+    headers = @s3_test.canonicalized_amazon_headers
+    assert_no_match /other/, headers
+    assert_no_match /content/, headers
+  end
+  
+  def test_amazon_headers_should_keep_amazon_headers
+    @s3_test.make_authenticated_request(:get, '', {'content-type' => 'content', 
+                                                   'some-other-header' => 'other',
+                                                   'x-amz-meta-one' => 'one',
+                                                   'x-amz-meta-two' => 'two'})
+    headers = @s3_test.canonicalized_amazon_headers    
+    assert_match /x-amz-meta-one/, headers
+    assert_match /x-amz-meta-two/, headers
+  end
+  
+  def test_amazon_headers_should_be_lowercase
+    @s3_test.make_authenticated_request(:get, '', {'content-type' => 'content', 
+                                                   'some-other-header' => 'other',
+                                                   'X-amz-meta-one' => 'one',
+                                                   'x-Amz-meta-two' => 'two'})
+    headers = @s3_test.canonicalized_amazon_headers    
+    assert_match /x-amz-meta-one/, headers
+    assert_match /x-amz-meta-two/, headers
+  end
+  
+  def test_amazon_headers_should_be_alphabetized
+    @s3_test.make_authenticated_request(:get, '', {'content-type' => 'content', 
+                                                   'some-other-header' => 'other',
+                                                   'X-amz-meta-one' => 'one',
+                                                   'x-Amz-meta-two' => 'two',
+                                                   'x-amz-meta-zed' => 'zed',
+                                                   'x-amz-meta-alpha' => 'alpha'})
+    headers = @s3_test.canonicalized_amazon_headers    
+    assert_match /alpha.*one.*two.*zed/m, headers # /m on the reg-exp makes .* include newlines
+  end
+  
+  def test_xamzdate_should_override_date_header
+    @s3_test.make_authenticated_request(:get, '', {'date' => 'December 15, 2005', 'x-amz-date' => 'Tue, 27 Mar 2007 21:20:26 +0000'})
+    headers = @s3_test.canonicalized_headers    
+    assert_match /2007/, headers
+    assert_no_match /2005/, headers
+  end
+
+  def test_xamzdate_should_override_capitalized_date_header
+    @s3_test.make_authenticated_request(:get, '', {'date' => 'December 15, 2005', 'X-amz-date' => 'Tue, 27 Mar 2007 21:20:26 +0000'})
+    headers = @s3_test.canonicalized_headers    
+    assert_match /2007/, headers
+    assert_no_match /2005/, headers
+  end
+  
+  def test_leading_spaces_get_stripped_from_header_values
+    @s3_test.make_authenticated_request(:get, '', {'x-amz-meta-one' => ' one with a leading space',
+                                                   'x-Amz-meta-two' => ' two with a leading and trailing space '})
+    headers = @s3_test.canonicalized_amazon_headers 
+    assert_match /x-amz-meta-one:one with a leading space/, headers
+    assert_match /x-amz-meta-two:two with a leading and trailing space /, headers 
+  end
+  
+  def test_long_amazon_headers_should_get_unfolded
+    @s3_test.make_authenticated_request(:get, '', {'x-amz-meta-one' => "A really long header\nwith multiple lines\nshould be unfolded."})
+    headers = @s3_test.canonicalized_amazon_headers 
+    assert_match /x-amz-meta-one:A really long header with multiple lines should be unfolded./, headers    
+  end
+  
+  def test_values_as_arrays_should_be_joined_as_commas
+     @s3_test.make_authenticated_request(:get, '', {'x-amz-mult' => ['a', 'b', 'c']})
+     
+     headers = @s3_test.canonicalized_amazon_headers
+     assert_match /a,b,c/, headers
+  end
+  
+end

data/test/canonical_resource_test.rb

@@ -0,0 +1,53 @@
+require 'test/unit'
+require File.join(File.dirname(__FILE__), '../lib/s3_authenticator')
+
+class S3AuthenticatorCanonicalResourceTest < Test::Unit::TestCase
+  
+  def setup
+    S3Lib::AuthenticatedRequest.test_mode
+    @s3_test = S3Lib::AuthenticatedRequest.new
+  end
+
+  def test_forward_slash_is_always_added
+    @s3_test.make_authenticated_request(:get, '')
+    assert_match /^\//, @s3_test.canonicalized_resource
+  end
+  
+  def test_bucket_name_in_uri_should_get_passed_through
+    @s3_test.make_authenticated_request(:get, 'my_bucket')
+    assert_match /^\/my_bucket/, @s3_test.canonicalized_resource
+  end
+    
+  def test_canonicalized_resource_should_include_uri
+    @s3_test.make_authenticated_request(:get, 'my_bucket/vampire.jpg')
+    assert_match /vampire.jpg$/, @s3_test.canonicalized_resource
+  end  
+  
+  def test_canonicalized_resource_should_include_sub_resource
+    @s3_test.make_authenticated_request(:get, 'my_bucket/vampire.jpg?torrent')
+    assert_match /vampire.jpg\?torrent$/, @s3_test.canonicalized_resource    
+  end
+  
+  def test_bucket_name_with_virtual_hosting
+    @s3_test.make_authenticated_request(:get, '/', {'host' => 'some_bucket.s3.amazonaws.com'})
+    assert_match /some_bucket\//, @s3_test.canonicalized_resource
+    assert_no_match /s3.amazonaws.com/, @s3_test.canonicalized_resource
+  end
+  
+  def test_bucket_name_with_cname_virtual_hosting
+    @s3_test.make_authenticated_request(:get, '/', {'host' => 'some_bucket.example.com'})
+    assert_match /^\/some_bucket.example.com/, @s3_test.canonicalized_resource
+  end
+  
+  def test_bucket_name_is_lowercase_with_virtual_hosting
+    @s3_test.make_authenticated_request(:get, '/', {'host' => 'Some_Bucket.s3.amazonaws.com'})
+    assert_match /some_bucket/, @s3_test.canonicalized_resource
+  end
+  
+  def test_bucket_name_is_lowercase_with_cname_virtual_hosting
+    @s3_test.make_authenticated_request(:get, '/', {'host' => 'Some_Bucket.example.com'})
+    assert_match /some_bucket.example.com/, @s3_test.canonicalized_resource
+  end  
+
+  
+end

data/test/canonical_string_tests.rb

@@ -0,0 +1,73 @@
+require 'test/unit'
+require File.join(File.dirname(__FILE__), '../lib/s3_authenticator')
+
+class S3AuthenticatorTest < Test::Unit::TestCase
+  
+  def setup
+    S3Lib::AuthenticatedRequest.test_mode
+    @s3_test = S3Lib::AuthenticatedRequest.new
+  end
+
+  # See http://developer.amazonwebservices.com/connect/entry.jspa?externalID=123&categoryID=48
+  def test_dg_sample_one
+    @s3_test.make_authenticated_request(:get, '/photos/puppy.jpg', {'Host' => 'johnsmith.s3.amazonaws.com',
+                                                                    'Date' => 'Tue, 27 Mar 2007 19:36:42 +0000'})
+    expected_canonical_string = "GET\n\n\nTue, 27 Mar 2007 19:36:42 +0000\n/johnsmith/photos/puppy.jpg"
+    assert_equal expected_canonical_string, @s3_test.canonical_string
+  end
+  
+  def test_dg_sample_two
+    @s3_test.make_authenticated_request(:put, '/photos/puppy.jpg', {'Content-Type' => 'image/jpeg',
+                                                                    'Content-Length' => '94328',
+                                                                    'Host' => 'johnsmith.s3.amazonaws.com',
+                                                                    'Date' => 'Tue, 27 Mar 2007 21:15:45 +0000'})
+    expected_canonical_string = "PUT\n\nimage/jpeg\nTue, 27 Mar 2007 21:15:45 +0000\n/johnsmith/photos/puppy.jpg"
+    assert_equal expected_canonical_string, @s3_test.canonical_string  
+  end
+  
+  def test_dg_sample_three
+    @s3_test.make_authenticated_request(:get, '', {'prefix' => 'photos',
+                                                   'max-keys' => '50',
+                                                   'marker' => 'puppy',
+                                                   'host' => 'johnsmith.s3.amazonaws.com',
+                                                   'date' => 'Tue, 27 Mar 2007 19:42:41 +0000'})
+    assert_equal "GET\n\n\nTue, 27 Mar 2007 19:42:41 +0000\n/johnsmith/", @s3_test.canonical_string
+  end 
+  
+  def test_dg_sample_four
+    @s3_test.make_authenticated_request(:get, '?acl', {'host' => 'johnsmith.s3.amazonaws.com', 
+                                                       'date' => 'Tue, 27 Mar 2007 19:44:46 +0000'})
+    
+    assert_equal "GET\n\n\nTue, 27 Mar 2007 19:44:46 +0000\n/johnsmith/?acl", @s3_test.canonical_string    
+  end
+  
+  def test_dg_sample_five
+    @s3_test.make_authenticated_request(:delete, '/johnsmith/photos/puppy.jpg', 
+                                                  {'User-Agent' => 'dotnet',
+                                                   'host' => 's3.amazonaws.com',
+                                                   'date' => 'Tue, 27 Mar 2007 21:20:27 +0000',
+                                                   'x-amz-date' => 'Tue, 27 Mar 2007 21:20:26 +0000' })                                                   
+    assert_equal "DELETE\n\n\n\nx-amz-date:Tue, 27 Mar 2007 21:20:26 +0000\n/johnsmith/photos/puppy.jpg", @s3_test.canonical_string
+  end   
+  
+  def test_dg_sample_six
+    @s3_test.make_authenticated_request(:put,    '/db-backup.dat.gz', 
+                                                  {'User-Agent' => 'curl/7.15.5',
+                                                   'host' => 'static.johnsmith.net:8080',
+                                                   'date' => 'Tue, 27 Mar 2007 21:06:08 +0000',
+                                                   'x-amz-acl' => 'public-read',
+                                                   'content-type' => 'application/x-download',
+                                                   'Content-MD5' => '4gJE4saaMU4BqNR0kLY+lw==',
+                                                   'X-Amz-Meta-ReviewedBy' => ['joe@johnsmith.net', 'jane@johnsmith.net'],
+                                                   'X-Amz-Meta-FileChecksum' => '0x02661779',
+                                                   'X-Amz-Meta-ChecksumAlgorithm' => 'crc32',
+                                                   'Content-Disposition' => 'attachment; filename=database.dat',
+                                                   'Content-Encoding' => 'gzip',
+                                                   'Content-Length' => '5913339' })
+    expected_canonical_string =  "PUT\n4gJE4saaMU4BqNR0kLY+lw==\napplication/x-download\nTue, 27 Mar 2007 21:06:08 +0000\n" + 
+                                 "x-amz-acl:public-read\nx-amz-meta-checksumalgorithm:crc32\nx-amz-meta-filechecksum:0x02661779\n" +
+                                 "x-amz-meta-reviewedby:joe@johnsmith.net,jane@johnsmith.net\n/static.johnsmith.net/db-backup.dat.gz"
+    assert_equal expected_canonical_string, @s3_test.canonical_string
+  end  
+  
+end

data/test/first_test.rb

@@ -0,0 +1,34 @@
+require 'test/unit'
+require File.join(File.dirname(__FILE__), '../lib/s3_authenticator')
+
+class S3AuthenticatorTest < Test::Unit::TestCase
+  
+  def setup
+    @s3_test = S3Lib::AuthenticatedRequest.new
+  end
+  
+  def test_http_verb_is_uppercase    
+    @s3_test.make_authenticated_request(:get, '/', {'host' => 's3.amazonaws.com'})
+    assert_match /^GET\n/, @s3_test.canonical_string
+  end
+  
+  def test_canonical_string_contains_positional_headers    
+    @s3_test.make_authenticated_request(:get, '', {'content-type' => 'some crazy content type', 
+                                                   'date' => 'December 25th, 2007', 
+                                                   'content-md5' => 'whee'})
+    assert_match /^GET\n#{@s3_test.canonicalized_positional_headers}/, @s3_test.canonical_string
+  end
+  
+  def test_positional_headers_with_all_headers
+    @s3_test.make_authenticated_request(:get, '', {'content-type' => 'some crazy content type', 
+                                                   'date' => 'December 25th, 2007', 
+                                                   'content-md5' => 'whee'})
+    assert_equal "whee\nsome crazy content type\nDecember 25th, 2007\n", @s3_test.canonicalized_positional_headers
+  end  
+  
+  def test_positional_headers_with_only_date_header
+    @s3_test.make_authenticated_request(:get, '', {'date' => 'December 25th, 2007'})
+    assert_equal "\n\nDecember 25th, 2007\n", @s3_test.canonicalized_positional_headers
+  end  
+  
+end

data/test/first_test_private.rb

@@ -0,0 +1,55 @@
+# Make private methods and attributes public so that you can test them
+module S3Lib
+  class AuthenticatedRequest
+  
+    attr_reader :headers  
+  
+    def public_canonicalized_headers
+      canonicalized_headers
+    end  
+  
+    def public_canonicalized_positional_headers
+      canonicalized_positional_headers
+    end
+  
+    def public_canonical_string
+      canonical_string
+    end
+  
+  end  
+end
+
+require 'test/unit'
+require File.join(File.dirname(__FILE__), '../lib/s3_authenticator')
+
+class S3AuthenticatorTest < Test::Unit::TestCase
+  
+  def setup
+    @s3_test = S3Lib::AuthenticatedRequest.new
+  end
+  
+  def test_http_verb_is_uppercase    
+    @s3_test.make_authenticated_request(:get, '/', {'host' => 's3.amazonaws.com'})
+    assert_match /^GET\n/, @s3_test.public_canonical_string
+  end
+  
+  def test_canonical_string_contains_positional_headers    
+    @s3_test.make_authenticated_request(:get, '', {'content-type' => 'some crazy content type', 
+                                                   'date' => 'December 25th, 2007', 
+                                                   'content-md5' => 'whee'})
+    assert_match /^GET\n#{@s3_test.public_canonicalized_positional_headers}/, @s3_test.public_canonical_string
+  end
+  
+  def test_positional_headers_with_all_headers
+    @s3_test.make_authenticated_request(:get, '', {'content-type' => 'some crazy content type', 
+                                                   'date' => 'December 25th, 2007', 
+                                                   'content-md5' => 'whee'})
+    assert_equal "whee\nsome crazy content type\nDecember 25th, 2007\n", @s3_test.public_canonicalized_positional_headers
+  end  
+  
+  def test_positional_headers_with_only_date_header
+    @s3_test.make_authenticated_request(:get, '', {'date' => 'December 25th, 2007'})
+    assert_equal "\n\nDecember 25th, 2007\n", @s3_test.public_canonicalized_positional_headers
+  end  
+  
+end