kernow-ruby-aaws 0.5.4 → 0.7.1

data/test/tc_seller_listing_lookup.rb

@@ -0,0 +1,58 @@
+# $Id: tc_seller_listing_lookup.rb,v 1.1 2009/06/03 08:46:31 ianmacd Exp $
+#
+
+require 'test/unit'
+require './setup'
+
+class TestSellerListingLookup < AWSTest
+
+  def test_seller_listing_lookup
+
+    sll = SellerListingLookup.new( 'AP8U6Y3PYQ9VO', :ASIN,
+				   { :Id => 'B0009RRRC8' } )
+    rg = ResponseGroup.new( 'SellerListing' )
+    response = @req.search( sll, rg )
+
+    item = response.kernel
+
+    assert_equal( 'actionrecords', item.seller.nickname )
+
+  end
+
+  def test_seller_listing_lookup_no_response_group
+
+    sll = SellerListingLookup.new( 'AP8U6Y3PYQ9VO', :ASIN,
+				   { :Id => 'B0009RRRC8' } )
+    sll.response_group = ResponseGroup.new( :SellerListing )
+    response = @req.search( sll )
+
+    item = response.kernel
+
+    assert_equal( 'actionrecords', item.seller.nickname )
+
+  end
+
+  def test_seller_listing_lookup_class_method
+
+    response = Amazon::AWS.seller_listing_lookup( 'AP8U6Y3PYQ9VO', :ASIN,
+						  { :Id => 'B0009RRRC8' } )
+
+    item = response.kernel
+
+    assert_equal( 'actionrecords', item.seller.nickname )
+
+  end
+
+  def test_seller_listing_lookup_class_method_block
+
+    Amazon::AWS.seller_listing_lookup( 'AP8U6Y3PYQ9VO', :ASIN,
+				       { :Id => 'B0009RRRC8' } ) do |r|
+
+      item = r.kernel
+
+      assert_equal( 'actionrecords', item.seller.nickname )
+
+    end
+  end
+
+end

data/test/tc_seller_listing_search.rb

@@ -0,0 +1,70 @@
+# $Id: tc_seller_listing_search.rb,v 1.1 2009/05/30 23:27:47 ianmacd Exp $
+#
+
+require 'test/unit'
+require './setup'
+
+class TestSellerListingSearch < AWSTest
+
+  def test_seller_listing_search
+
+    sl = SellerListingSearch.new( 'AP8U6Y3PYQ9VO',
+				  { 'Keywords' => 'Killing Joke' } )
+    rg = ResponseGroup.new( 'SellerListing' )
+    response = @req.search( sl, rg )
+
+    items = response.seller_listing_search_response[0].seller_listings[0].
+	    seller_listing
+
+
+    # Ensure we got some actual items back.
+    #
+    assert( items.size > 0 )
+
+  end
+
+  def test_seller_listing_search_no_response_group
+
+    sl = SellerListingSearch.new( 'AP8U6Y3PYQ9VO',
+				  { 'Keywords' => 'Killing Joke' } )
+    sl.response_group = ResponseGroup.new( :SellerListing )
+    response = @req.search( sl )
+
+    items = response.seller_listing_search_response[0].seller_listings[0].
+	    seller_listing
+
+    # Ensure we got some actual items back.
+    #
+    assert( items.size > 0 )
+
+  end
+
+  def test_seller_listing_search_class_method
+
+    response = Amazon::AWS.seller_listing_search( 'AP8U6Y3PYQ9VO',
+					    { 'Keywords' => 'Killing Joke' } )
+
+    items = response.seller_listing_search_response[0].seller_listings[0].
+	    seller_listing
+
+    # Ensure we got some actual items back.
+    #
+    assert( items.size > 0 )
+
+  end
+
+  def test_seller_listing_search_class_method_block
+
+    Amazon::AWS.seller_listing_search( 'AP8U6Y3PYQ9VO',
+				      { 'Keywords' => 'Killing Joke' } ) do |r|
+
+      items = r.seller_listing_search_response[0].seller_listings[0].
+	      seller_listing
+
+      # Ensure we got some actual items back.
+      #
+      assert( items.size > 0 )
+    end
+  end
+
+end

data/test/tc_seller_lookup.rb

@@ -0,0 +1,54 @@
+# $Id: tc_seller_lookup.rb,v 1.1 2009/06/03 09:53:02 ianmacd Exp $
+#
+
+require 'test/unit'
+require './setup'
+
+class TestSellerLookup < AWSTest
+
+  def test_seller_lookup
+
+    sl = SellerLookup.new( 'A3QFR0K2KCB7EG' )
+    rg = ResponseGroup.new( 'Seller' )
+    response = @req.search( sl, rg )
+
+    seller = response.kernel
+
+    assert_equal( 'wherehouse', seller.nickname )
+
+  end
+
+  def test_seller_lookup_no_response_group
+
+    sl = SellerLookup.new( 'A3QFR0K2KCB7EG' )
+    sl.response_group = ResponseGroup.new( :Seller )
+    response = @req.search( sl )
+
+    seller = response.kernel
+
+    assert_equal( 'wherehouse', seller.nickname )
+
+  end
+
+  def test_seller_lookup_class_method
+
+    response = Amazon::AWS.seller_lookup( 'A3QFR0K2KCB7EG' )
+
+    seller = response.kernel
+
+    assert_equal( 'wherehouse', seller.nickname )
+
+  end
+
+  def test_seller_lookup_class_method_block
+
+    Amazon::AWS.seller_lookup( 'A3QFR0K2KCB7EG' ) do |r|
+
+      seller = r.kernel
+
+      assert_equal( 'wherehouse', seller.nickname )
+
+    end
+  end
+
+end

data/test/tc_shopping_cart.rb

@@ -1,4 +1,4 @@
-# $Id: tc_shopping_cart.rb,v 1.5 2008/07/05 14:18:03 ianmacd Exp $
+# $Id: tc_shopping_cart.rb,v 1.6 2009/03/27 14:00:22 ianmacd Exp $
 #
 
 require 'test/unit'
@@ -23,7 +23,7 @@ class TestShoppingCart < AWSTest
     # Create a cart with three items. The last two are given as multiple
     # single-element hashes. MergeCart is false.
     #
-    cart.cart_create( :ASIN, 'B00151HZA6', 3, false,
+    cart.cart_create( :ASIN, 'B001CB0UJC', 3, false,
 		      { 'B000WC4AH0' => 2 },
 		      { 'B0006L16N8' => 1 } )
     items = cart.items
@@ -31,7 +31,7 @@ class TestShoppingCart < AWSTest
     # Check that the quantities match what we expect.
     #
     assert_equal( 3, items.size )
-    item = items.find { |item| item.asin == 'B00151HZA6'  }
+    item = items.find { |item| item.asin == 'B001CB0UJC'  }
     assert_equal( '3', item.quantity[0] )
     item = items.find { |item| item.asin == 'B000WC4AH0'  }
     assert_equal( '2', item.quantity[0] )
@@ -70,7 +70,7 @@ class TestShoppingCart < AWSTest
     # hash. MergeCart is true. Cart#create is used as an alias of
     # Cart#cart_create.
     #
-    cart.create( :ASIN, 'B00151HZA6', 1, true,
+    cart.create( :ASIN, 'B001CB0UJC', 1, true,
 		 { 'B000WC4AH0' => 2,
 		   'B0006L16N8' => 3 } )
     items = cart.items
@@ -78,7 +78,7 @@ class TestShoppingCart < AWSTest
     # Check that the quantities match what we expect.
     #
     assert_equal( 3, items.size )
-    item = items.find { |item| item.asin == 'B00151HZA6'  }
+    item = items.find { |item| item.asin == 'B001CB0UJC'  }
     assert_equal( '1', item.quantity[0] )
     item = items.find { |item| item.asin == 'B000WC4AH0'  }
     assert_equal( '2', item.quantity[0] )
@@ -125,10 +125,10 @@ class TestShoppingCart < AWSTest
 
     # Modify an item quantity.
     #
-    cart.cart_modify( :ASIN, 'B00151HZA6', 2 )
+    cart.cart_modify( :ASIN, 'B001CB0UJC', 2 )
     items = cart.items
     assert_equal( 8, items.size )
-    item = items.find { |item| item.asin == 'B00151HZA6'  }
+    item = items.find { |item| item.asin == 'B001CB0UJC'  }
     assert_equal( '2', item.quantity[0] )
 
     # Move item to 'Save For Later' area.
@@ -174,7 +174,7 @@ class TestShoppingCart < AWSTest
 
     # Move another item to the 'Save For Later' area.
     #
-    cart.cart_modify( :ASIN, 'B00151HZA6', 2, true )
+    cart.cart_modify( :ASIN, 'B001CB0UJC', 2, true )
     items = cart.items
     assert_equal( 6, items.size )
     sfl_items = cart.saved_for_later_items
@@ -182,7 +182,7 @@ class TestShoppingCart < AWSTest
 
     # Now remove that item while it's still in the 'Save For Later' area.
     #
-    cart.cart_modify( :ASIN, 'B00151HZA6', 0 )
+    cart.cart_modify( :ASIN, 'B001CB0UJC', 0 )
     items = cart.items
     assert_equal( 6, items.size )
     sfl_items = cart.saved_for_later_items

data/test/tc_similarity_lookup.rb

@@ -0,0 +1,59 @@
+# $Id: tc_similarity_lookup.rb,v 1.1 2009/06/03 10:29:24 ianmacd Exp $
+#
+
+require 'test/unit'
+require './setup'
+
+class TestSimilarityLookup < AWSTest
+
+  def test_similarity_lookup
+
+    sl = SimilarityLookup.new( [ 'B000AE4QEC', 'B000051WBE' ] )
+    rg = ResponseGroup.new( :Subjects )
+    response = @req.search( sl, rg )
+
+    items = response.similarity_lookup_response[0].items
+
+    assert_match( /^\w+/, items.item[0].subjects.subject[0] )
+    assert_match( /^\w+/, items.item[1].subjects.subject[0] )
+
+  end
+
+  def test_similarity_lookup_no_response_group
+
+    sl = SimilarityLookup.new( [ 'B000AE4QEC', 'B000051WBE' ] )
+    sl.response_group = ResponseGroup.new( :Subjects )
+    response = @req.search( sl, nil )
+
+    items = response.similarity_lookup_response[0].items
+
+    assert_match( /^\w+/, items.item[0].subjects.subject[0] )
+    assert_match( /^\w+/, items.item[1].subjects.subject[0] )
+
+  end
+
+  def test_similarity_lookup_class_method
+
+    response = Amazon::AWS.similarity_lookup( [ 'B000AE4QEC', 'B000051WBE' ] )
+
+    items = response.similarity_lookup_response[0].items
+
+    assert_match( /^http:/, items.item[0].detail_page_url )
+    assert_match( /^http:/, items.item[1].detail_page_url )
+
+  end
+
+  def test_item_search_class_method_block
+
+    Amazon::AWS.similarity_lookup( [ 'B000AE4QEC', 'B000051WBE' ] ) do |r|
+
+    items = r.similarity_lookup_response[0].items
+
+    assert_match( /^http:/, items.item[0].detail_page_url )
+    assert_match( /^http:/, items.item[1].detail_page_url )
+
+    end
+
+  end
+
+end

data/test/tc_tag_lookup.rb

@@ -0,0 +1,35 @@
+# $Id: tc_tag_lookup.rb,v 1.1 2009/06/03 23:20:37 ianmacd Exp $
+#
+
+require 'test/unit'
+require './setup'
+
+class TestTagLookup < AWSTest
+
+  def test_tag_lookup
+
+    @req.locale = 'us'
+    tl = TagLookup.new( 'Awful' )
+    rg = ResponseGroup.new( :Tags, :TagsSummary )
+    response = @req.search( tl, rg )
+
+    tag = response.kernel
+
+    assert_equal( '2005-11-21 16:46:53', tag.first_tagging.time )
+
+  end
+
+  def test_tag_lookup_no_response_group
+
+    @req.locale = 'us'
+    tl = TagLookup.new( 'Awful' )
+    tl.response_group = ResponseGroup.new( :Tags, :TagsSummary )
+    response = @req.search( tl, nil )
+
+    tag = response.kernel
+
+    assert_equal( '2005-11-21 16:46:53', tag.first_tagging.time )
+
+  end
+
+end

data/test/tc_transaction_lookup.rb

@@ -0,0 +1,35 @@
+# $Id: tc_transaction_lookup.rb,v 1.1 2009/06/03 23:25:33 ianmacd Exp $
+#
+
+require 'test/unit'
+require './setup'
+
+class TestTransactionLookup < AWSTest
+
+  def test_transaction_lookup
+
+    @req.locale = 'us'
+    tl = TransactionLookup.new( '103-5663398-5028241' )
+    rg = ResponseGroup.new( :TransactionDetails )
+    response = @req.search( tl, rg )
+
+    trans = response.kernel
+
+    assert_equal( '2008-04-13T23:49:38', trans.transaction_date )
+
+  end
+
+  def test_transaction_lookup_no_response_group
+
+    @req.locale = 'us'
+    tl = TransactionLookup.new( '103-5663398-5028241' )
+    tl.response_group = ResponseGroup.new( :TransactionDetails )
+    response = @req.search( tl, nil )
+
+    trans = response.kernel
+
+    assert_equal( '2008-04-13T23:49:38', trans.transaction_date )
+
+  end
+
+end

data/test/tc_vehicle_operations.rb

@@ -0,0 +1,106 @@
+#!/usr/bin/ruby -w
+#
+# $Id: tc_vehicle_operations.rb,v 1.1 2009/02/19 15:50:03 ianmacd Exp $
+
+require 'test/unit'
+require './setup'
+
+class TestVehicles < AWSTest
+
+  def test_vehicle_search
+    @req.locale = 'us'
+
+    # Get all cars for year 2008.
+    #
+    vs = VehicleSearch.new( { 'Year' => 2008 } )
+    rg = ResponseGroup.new( 'VehicleMakes' )
+    response = @req.search( vs, rg )
+
+    makes = response.vehicle_search_response[0].vehicle_years[0].
+	    vehicle_year[0].vehicle_makes[0].vehicle_make
+    assert( makes.size > 0 )
+
+    make_id = makes.find { |make| make.make_name == 'Audi' }.make_id.to_i
+
+
+    # Get all Audi models from 2008.
+    #
+    vs = VehicleSearch.new( { 'Year' => 2008,
+			      'MakeId' => make_id } )
+    rg = ResponseGroup.new( 'VehicleModels' )
+    response = @req.search( vs, rg )
+
+    models = response.vehicle_search_response[0].vehicle_years[0].
+	     vehicle_year[0].vehicle_makes[0].vehicle_make[0].
+	     vehicle_models[0].vehicle_model
+    assert( models.size > 0 )
+
+    model_id = models.find { |model| model.model_name == 'R8' }.model_id.to_i
+
+    # Get all Audi R8 trim packages from 2008.
+    #
+    vs = VehicleSearch.new( { 'Year' => 2008,
+			      'MakeId' => make_id,
+			      'ModelId' => model_id } )
+    rg = ResponseGroup.new( 'VehicleTrims' )
+    response = @req.search( vs, rg )
+
+    trims = response.vehicle_search_response[0].vehicle_years[0].
+	    vehicle_year[0].vehicle_makes[0].vehicle_make[0].
+	    vehicle_models[0].vehicle_model[0].vehicle_trims[0].vehicle_trim
+    assert( trims.size > 0 )
+
+    trim_id = trims.find { |trim| trim.trim_name == 'Base' }.trim_id.to_i
+
+    vs = VehicleSearch.new( { 'Year' => 2008,
+			      'MakeId' => make_id,
+			      'ModelId' => model_id,
+			      'TrimId' => trim_id } )
+    rg = ResponseGroup.new( 'VehicleOptions' )
+    response = @req.search( vs, rg )
+
+    options = response.vehicle_search_response[0].vehicle_years[0].
+	      vehicle_year[0].vehicle_makes[0].vehicle_make[0].
+	      vehicle_models[0].vehicle_model[0].vehicle_trims[0].
+	      vehicle_trim[0].vehicle_options[0]
+    engine = options.vehicle_engine_options.vehicle_engine
+    engine_name = engine.engine_name
+    engine_id = engine.engine_id
+    assert_not_nil( engine_name )
+
+    # Find parts for our 2008 Audi R8 with Base trim and whatever engine that
+    # trim package has.
+    #
+    vps = VehiclePartSearch.new( 2008, make_id, model_id,
+				 { 'TrimId' => trim_id,
+				   'EngineId' => engine_id } )
+    rg = ResponseGroup.new( 'VehicleParts' )
+    response = @req.search( vps, rg )
+
+    parts = response.vehicle_part_search_response[0].vehicle_parts[0].part
+    assert( parts.size > 0 )
+
+    # Now, we do a reverse look-up.
+    #
+    # Go through all parts and test to see if they fit in our 2008 Audi R8
+    # Base trim. The answer should always be yes.
+    #
+    # part = parts[rand( parts.size - 1 )].item.asin
+
+    parts.each do |part|
+      vpl = VehiclePartLookup.new( part.item.asin,
+				   { 'Year' => 2008,
+				     'MakeId' => make_id,
+				     'ModelId' => model_id,
+				     'TrimId' => trim_id } )
+
+      rg = ResponseGroup.new( 'VehiclePartFit' )
+      response = @req.search( vpl, rg )
+
+      fit = response.vehicle_part_lookup_response[0].vehicle_parts[0].part.
+            vehicle_part_fit.is_fit
+      assert_equal( 'YES', fit )
+    end
+   end
+
+end