ECS 0.1.5 → 0.1.6

data/test/unit/ecs/help_response_group_test.rb

@@ -0,0 +1,78 @@
+#!/usr/local/bin/ruby
+
+require 'test/unit'
+require "#{File.expand_path( File.dirname( __FILE__ ) )}/../unit_test_setup"
+
+
+class ECSHelpResponseGroupTest < Test::Unit::TestCase
+  def setup
+  end
+  def teardown
+  end
+
+
+  def test_exists
+    assert_nothing_raised do
+      ECS::HelpResponseGroup
+    end
+  end
+  
+  
+  def test_simple
+    a = ECS.request_response_group
+
+    assert_equal 'RequestResponseGroup', a.response_group_name
+    assert a.valid_operations.size > 0
+
+    assert !ECS::ResponseGroups[a.response_group_name].nil?, "#{a.response_group_name} not included in #{ECS::ResponseGroups.keys.join( ', ' )}"
+  end
+  
+  
+  def test_valid_operations
+    assert_equal Array, ECS::HelpResponseGroup.valid_operations.class
+    assert_equal [ :Help ], ECS::HelpResponseGroup.valid_operations.map{ |p| p.to_s }.sort.map{ |p| p.to_sym }
+    assert_equal Array, ECS::HelpResponseGroup.valid_operations( true ).class
+  end
+  
+  def test_elements
+    assert_equal Array, ECS::HelpResponseGroup.elements.class
+    assert ECS::HelpResponseGroup.elements.size > 0
+    ECS::HelpResponseGroup.elements.each do |e|
+      assert_equal Proc, e.class
+    end
+    assert_equal Array, ECS::HelpResponseGroup.elements( true ).class
+  end
+  
+  
+  def test_help_xml
+    a = ECS.request_response_group
+    assert_equal XML::Document, a.help_xml.class
+    assert a.help_xml.to_s.length > 0
+  end
+  
+  def test_response_group_name
+    string_to_eval = "class ECS::CrazyResponseGroup < ECS::HelpResponseGroup ; @@response_group_name=nil ; ECS::ResponseGroups['CrazyResponseGroup'] = self ; end ; ECS::CrazyResponseGroup"
+    assert_nothing_raised do
+      eval( string_to_eval, binding, __FILE__, __LINE__ )
+    end
+    
+    klass = ECS::ResponseGroups['CrazyResponseGroup']
+
+    assert_match /.+::CrazyResponseGroup$/, klass.name
+    assert_equal 'CrazyResponseGroup', klass.response_group_name
+  end
+  
+  def test_aws_response_group_name
+    string_to_eval = "class ECS::CrazyResponseGroup < ECS::HelpResponseGroup ; @@response_group_name=nil ; ECS::ResponseGroups['CrazyResponseGroup'] = self ; end ; ECS::CrazyResponseGroup"
+    assert_nothing_raised do
+      eval( string_to_eval, binding, __FILE__, __LINE__ )
+    end
+    
+    klass = ECS::ResponseGroups['CrazyResponseGroup']
+
+    assert_match /.+::CrazyResponseGroup$/, klass.name
+    assert_equal 'Crazy', klass.aws_response_group_name
+  end
+end
+
+

data/test/unit/ecs/help_test.rb

@@ -0,0 +1,696 @@
+#!/usr/local/bin/ruby
+
+require 'test/unit'
+require "#{File.expand_path( File.dirname( __FILE__ ) )}/../unit_test_setup"
+
+class ECSBrowseNodeLookupTest < Test::Unit::TestCase
+  def setup
+    ECS.default_locale = :us
+  end
+  def teardown
+    ECS.clear_cache
+  end
+
+
+  def test_exists
+    assert_nothing_raised do
+      ECS::Help
+    end
+    assert( ECS::Operations.o_include?( :Help ), "#{ECS::Operations.keys.join(', ')} (no ECS::Help)" )
+  end
+
+  def test_required_parameters
+    assert_equal Array, ECS::Help.required_parameters.class
+    assert_equal [ :About, :HelpType ], ECS::Help.required_parameters.map{ |p| p.to_s }.sort.map{ |p| p.to_sym }
+    assert_equal Array, ECS::Help.required_parameters( true ).class
+  end
+  
+  def test_missing_required_parameters
+    x = nil
+    x = ECS.customer_content_search( :Name => 'wzph' )
+    assert_nothing_raised do
+      #The help for CustomerContentSearch has no RequiredParameters
+      x.class.required_parameters
+    end
+    assert x.xml.to_s !~ /<RequiredParameters>/
+  end
+
+  def test_cached_content
+    h = ECS.help( :HelpType => 'Operation', :About => 'BrowseNodeLookup' )
+
+    assert_equal nil, h.cached_content
+    
+    assert_nothing_raised do
+      h.xml.to_s
+    end
+    
+    assert h.xml.to_s, h.cached_content.to_s
+    assert h.cached_content.to_s.length > 0
+  end
+
+  def test_cached?
+    h = ECS.help( :HelpType => 'Operation', :About => 'BrowseNodeLookup' )
+
+    assert !h.cached?
+    
+    assert_nothing_raised do
+      h.xml
+    end
+    
+    assert h.cached?
+  end
+  def test_parameters_for_xml
+    p = { :HelpType => 'Operation', :About => 'BrowseNodeLookup' }
+    
+    h = ECS.help( p )
+    
+    assert_equal p.merge( :Operation => 'Help' ), h.parameters_for_xml
+  end
+
+
+  def test_available_parameters
+    assert_equal Array, ECS::Help.available_parameters.class
+    assert_equal [ :AssociateTag, :ContentType, :Marketplace, :MarketplaceDomain, :Style, :Validate, :Version, :XMLEscaping ], ECS::Help.available_parameters.map{ |p| p.to_s }.sort.map{ |p| p.to_sym }
+    assert_equal Array, ECS::Help.available_parameters( true ).class
+  end
+
+  def test_optional_parameters
+    assert_equal ECS::Help.available_parameters, ECS::Help.optional_parameters
+  end
+
+  def test_default_response_groups
+    assert_equal Array, ECS::Help.default_response_groups.class
+    assert_equal [ :HelpResponseGroup, :RequestResponseGroup ], ECS::Help.default_response_groups.map{ |p| p.response_group_name.to_s }.sort.map{ |p| p.to_sym }
+    assert_equal Array, ECS::Help.default_response_groups( true ).class
+  end
+
+  def test_available_response_groups
+    assert_equal Array, ECS::Help.available_response_groups.class
+    assert_equal [ :HelpResponseGroup, :RequestResponseGroup ], ECS::Help.available_response_groups.map{ |p| p.response_group_name.to_s }.sort.map{ |p| p.to_sym }
+    assert_equal Array, ECS::Help.available_response_groups( true ).class
+  end
+
+
+  def test_operation_name
+    assert_equal 'Help', ECS::Help.operation_name
+    b = ECS.browse_node_lookup( :BrowseNodeId => 23 )
+
+    assert_equal 'BrowseNodeLookup', b.class.operation_name
+    
+  end
+
+  def test_subclass
+    h = ECS.help( :HelpType => 'Operation', :About => 'BrowseNodeLookup' )
+    b = ECS.browse_node_lookup( :BrowseNodeId => 23 )
+    assert_not_equal h.class.help_xml.to_s, b.class.help_xml.to_s
+  end
+
+  def test_simple
+    h = nil
+
+    assert_nothing_raised do
+      h = ECS.help( :About => 'BrowseNodeLookup', :HelpType => 'Operation' )
+      h.xml
+    end
+    
+    assert_match /::Help$/, h.class.name
+    assert_equal Array, h.class.required_parameters.class
+    assert_equal Array, h.class.available_parameters.class
+    assert_equal Array, h.class.default_response_groups.class
+    assert_equal Array, h.class.available_response_groups.class
+  end
+
+  def test_help_xml
+    assert_equal XML::Document, ECS::Help.help_xml.class
+    h = ECS.help( :HelpType => 'Operation', :About => 'BrowseNodeLookup' )
+    assert_equal XML::Document, h.help_xml.class
+    
+    assert_equal ECS::Help.help_xml.to_s, h.help_xml.to_s
+
+    assert_equal XML::Document, ECS::Help.help_xml( true ).class
+  end
+
+  def test_xml
+    h = ECS.help( :HelpType => 'Operation', :About => 'BrowseNodeLookup' )
+    assert_nothing_raised do
+      h.xml
+    end
+    
+    assert_equal XML::Document, h.xml.class
+    assert_equal XML::Document, h.xml( true ).class
+    
+    
+    h = ECS.help( :HelpType => 'Operation' )
+    assert_raises ArgumentError do
+      h.xml
+    end
+  end
+
+  def test_potential_elements
+    h = ECS.browse_node_lookup( :BrowseNodeId => 22 )
+    assert_equal Array, h.potential_elements.class
+    assert h.potential_elements.size > 0
+    h.response_groups.each do |response_group|
+      response_group.elements.each do |element|
+        assert h.potential_elements.include?( element )
+        assert_nothing_raised do
+          element.call( h )
+        end
+      end
+    end
+  end
+  
+  def test_method_missing
+    h = ECS.browse_node_lookup( :BrowseNodeId => 22 )
+    assert !h.respond_to?( :IsValid )
+    assert_nothing_raised do
+      h.IsValid
+    end
+    assert h.respond_to?( :IsValid )
+    
+    assert_nothing_raised do
+      h.IsValid( true )
+    end
+
+    assert_equal XML::Node, h.IsValid.class
+    assert_equal 'True', h.IsValid.content
+
+    assert_equal XML::Node::Set, h.Argument.class
+    assert h.Argument.size > 3
+
+    assert_equal XML::Node, h.Arguments.class
+
+
+    h = ECS.something_silly
+    assert !h.respond_to?( :IsValid )
+    assert_nothing_raised do
+      h.IsValid
+    end
+    assert h.respond_to?( :IsValid )
+    
+    assert_equal XML::Node::Set, h.IsValid.class
+    assert_equal 0, h.IsValid.size
+  end
+  
+  def test_method_missing_each
+    h = ECS.browse_node_lookup( :BrowseNodeId => 22 )
+    assert !h.respond_to?( :each_IsValid )
+    assert_nothing_raised do
+      h.each_IsValid # no block
+    end
+    assert h.respond_to?( :each_IsValid )
+    
+    x = 1
+    h.each_IsValid { |i| x += 1 }
+    assert_equal 1, x
+
+    h = ECS.browse_node_lookup( :BrowseNodeId => 22 )
+    assert !h.respond_to?( :each_IsValid )
+    assert_equal 1, x
+    assert_nothing_raised do
+      h.each_IsValid { |i| x += 1 }
+    end
+    assert_equal 2, x
+    assert !h.respond_to?( :each_IsValid )
+    
+    
+    h.each_Argument { |argument| assert_equal XML::Node, argument.class }
+    
+    
+    h = ECS.something_else_crazy( :BrowseNodeId => 22 )
+    assert !h.respond_to?( :each_IsValid )
+    assert_nothing_raised do
+      h.each_IsValid # no block
+    end
+    assert h.respond_to?( :each_IsValid )
+    
+    
+    book_response = ECS.item_lookup( :ItemId => '0812970802' )
+    i = 0
+    book_response.each_Author do |author|
+      i += 1
+      assert_equal 'Lauren F. Winner', author.content
+    end
+    
+    assert_equal 1, i
+  end
+
+
+  def test_method_missing_count
+    book_response = ECS.item_lookup( :ItemId => '0812970802' )
+    assert_equal 6, book_response.Argument_count
+    assert_equal 1, book_response.Author_count
+    assert_equal 0, book_response.Nothing_count
+  end
+  
+#  def test_response_groups
+#    h1 = ECS.help( :HelpType => 'Operation', :About => 'BrowseNodeLookup', :ResponseGroup => ['Request', 'Help'] )
+#    assert_equal Array, h1.response_groups.class
+#    assert_equal 2, h1.response_groups.size
+#    h1.response_groups.each do |rg|
+#      assert rg.ancestors.include?( ECS::HelpResponseGroup )
+#    end
+#    
+#    assert_nothing_raised do
+#      h1.response_groups( true )
+#    end
+#
+#    h2 = ECS.help( :HelpType => 'Operation', :About => 'BrowseNodeLookup' )
+#    assert_equal Array, h2.response_groups.class
+#    assert_equal 2, h2.response_groups.size
+#    h2.response_groups.each do |rg|
+#      assert rg.ancestors.include?( ECS::HelpResponseGroup )
+#    end
+#    assert_equal h2.class.default_response_groups, h2.response_groups
+#    assert_equal h1.response_groups, h2.response_groups
+#    
+#    h3 = ECS.help( :HelpType => 'Operation', :About => 'BrowseNodeLookup', :ResponseGroup => 'Request' )
+#    assert_equal Array, h3.response_groups.class
+#    assert_equal 1, h3.response_groups.size
+#    h3.response_groups.each do |rg|
+#      assert rg.ancestors.include?( ECS::HelpResponseGroup )
+#    end
+#    assert_not_equal h1.response_groups, h3.response_groups
+#  end
+
+
+
+
+  def test_valid?
+    h = ECS.something_ridiculous
+    assert !h.valid?
+
+    h = ECS.help( :HelpType => 'Operation', :About => 'NOTHING' )
+    assert !h.valid?
+
+    h = ECS.help( :HelpType => 'Operation', :About => 'BrowseNodeLookup' )
+    assert h.valid?
+  end
+
+  def test_errors_from_aws
+    x = XML::Parser.new
+    x.string = '<?xml version="1.0" encoding="UTF-8"?>
+    <ItemLookupResponse>
+      <OperationRequest>
+        <HTTPHeaders>
+          <Header Name="UserAgent"/>
+        </HTTPHeaders>
+        <RequestId>073636SFEVZ21RFTY5N7</RequestId>
+        <Arguments>
+          <Argument Name="Service" Value="AWSECommerceService"/>
+        </Arguments>
+        <RequestProcessingTime>0.00560617446899414</RequestProcessingTime>
+      </OperationRequest>
+      <Items>
+        <Request>
+          <IsValid>False</IsValid>
+          <Errors>
+            <Error>
+              <Code>AWS.MissingParameters</Code>
+              <Message>Your request is missing required parameters. Required parameters include ItemId.</Message>
+            </Error>
+          </Errors>
+        </Request>
+      </Items>
+    </ItemLookupResponse>'
+    d = x.parse
+    assert_equal Array, ECS::Help.errors_from_aws( d ).class
+    assert_equal 1, ECS::Help.errors_from_aws( d ).size
+    assert_match /^Your request is missing required parameters/, ECS::Help.errors_from_aws( d ).first.message
+    assert_equal Array, ECS::Help.errors_from_aws( d.to_s ).class
+    assert_equal 1, ECS::Help.errors_from_aws( d.to_s ).size
+    assert_match /^Your request is missing required parameters/, ECS::Help.errors_from_aws( d.to_s ).first.message
+
+
+    x.string = '<?xml version="1.0" encoding="UTF-8"?>
+    <ItemLookupResponse>
+      <OperationRequest>
+        <HTTPHeaders>
+          <Header Name="UserAgent"/>
+        </HTTPHeaders>
+        <RequestId>073636SFEVZ21RFTY5N7</RequestId>
+        <Arguments>
+          <Argument Name="Service" Value="AWSECommerceService"/>
+        </Arguments>
+        <RequestProcessingTime>0.00560617446899414</RequestProcessingTime>
+      </OperationRequest>
+      <Items>
+        <Request>
+          <IsValid>True</IsValid>
+          <Errors>
+            <Error>
+              <Code>AWS.MissingParameters</Code>
+              <Message>Your request is missing required parameters. Required parameters include ItemId.</Message>
+            </Error>
+          </Errors>
+        </Request>
+      </Items>
+    </ItemLookupResponse>'
+    d = x.parse
+    assert_equal Array, ECS::Help.errors_from_aws( d ).class
+    assert_equal 1, ECS::Help.errors_from_aws( d ).size
+    assert_match /^Your request is missing required parameters/, ECS::Help.errors_from_aws( d ).first.message
+    assert_equal Array, ECS::Help.errors_from_aws( d.to_s ).class
+    assert_equal 1, ECS::Help.errors_from_aws( d.to_s ).size
+    assert_match /^Your request is missing required parameters/, ECS::Help.errors_from_aws( d.to_s ).first.message
+
+
+
+    x.string = '<?xml version="1.0" encoding="UTF-8"?><Errors><Error>Bad Error!</Error></Errors>'
+    d = x.parse
+    assert_equal Array, ECS::Help.errors_from_aws( d ).class
+    assert_equal 0, ECS::Help.errors_from_aws( d ).size
+    assert_equal Array, ECS::Help.errors_from_aws( d.to_s ).class
+    assert_equal 0, ECS::Help.errors_from_aws( d.to_s ).size
+
+    x.string = '<?xml version="1.0" encoding="UTF-8"?><Errors><Error><Code>Good Error</Code><Message>This is a good error</Message></Error></Errors>'
+    d = x.parse
+    assert_equal Array, ECS::Help.errors_from_aws( d ).class
+    assert_equal 1, ECS::Help.errors_from_aws( d ).size
+    assert_match /^This is a good error/, ECS::Help.errors_from_aws( d ).first.message
+    assert_equal Array, ECS::Help.errors_from_aws( d.to_s ).class
+    assert_equal 1, ECS::Help.errors_from_aws( d.to_s ).size
+    assert_match /^This is a good error/, ECS::Help.errors_from_aws( d.to_s ).first.message
+
+
+    x.string = '<?xml version="1.0" encoding="UTF-8"?>
+    <BrowseNodeLookupResponse>
+      <OperationRequest>
+        <HTTPHeaders>
+          <Header Name="UserAgent"/>
+        </HTTPHeaders>
+        <RequestId>10931PRERC228G0J80WW</RequestId>
+        <Arguments>
+          <Argument Name="Service" Value="AWSECommerceService"/>
+          <Argument Name="Operation" Value="BrowseNodeLookup"/>
+          <Argument Name="HelpType" Value="Operation"/>
+          <Argument Name="AWSAccessKeyId" Value=""/>
+          <Argument Name="About" Value="BrowseNodeLookup"/>
+        </Arguments>
+        <RequestProcessingTime>0.0036160945892334</RequestProcessingTime>
+      </OperationRequest>
+      <BrowseNodes>
+        <Request>
+          <IsValid>False</IsValid>
+          <Errors>
+            <Error>
+              <Code>AWS.MissingParameters</Code>
+              <Message>Your request is missing required parameters. Required parameters include BrowseNodeId.</Message>
+            </Error>
+          </Errors>
+        </Request>
+      </BrowseNodes>
+    </BrowseNodeLookupResponse>'
+    d = x.parse
+    assert_equal Array, ECS::Help.errors_from_aws( d ).class
+    assert_equal 1, ECS::Help.errors_from_aws( d ).size
+    assert_match /^Your request is missing required parameters/, ECS::Help.errors_from_aws( d ).first.message
+    assert_equal Array, ECS::Help.errors_from_aws( d.to_s ).class
+    assert_equal 1, ECS::Help.errors_from_aws( d.to_s ).size
+    assert_match /^Your request is missing required parameters/, ECS::Help.errors_from_aws( d.to_s ).first.message
+
+    x.string = '<?xml version="1.0" encoding="UTF-8"?>
+    <ItemLookupResponse>
+      <OperationRequest>
+        <HTTPHeaders>
+          <Header Name="UserAgent"/>
+        </HTTPHeaders>
+        <RequestId>073636SFEVZ21RFTY5N7</RequestId>
+        <Arguments>
+          <Argument Name="Service" Value="AWSECommerceService"/>
+        </Arguments>
+        <RequestProcessingTime>0.00560617446899414</RequestProcessingTime>
+      </OperationRequest>
+      <Items>
+        <Request>
+          <IsValid>True</IsValid>
+        </Request>
+      </Items>
+    </ItemLookupResponse>'
+    d = x.parse
+    assert_equal Array, ECS::Help.errors_from_aws( d ).class
+    assert_equal 0, ECS::Help.errors_from_aws( d ).size
+    assert_equal Array, ECS::Help.errors_from_aws( d.to_s ).class
+    assert_equal 0, ECS::Help.errors_from_aws( d.to_s ).size
+  end
+
+  def test_valid_aws_response?
+    x = XML::Parser.new
+    x.string = '<?xml version="1.0" encoding="UTF-8"?>
+    <ItemLookupResponse>
+      <OperationRequest>
+        <HTTPHeaders>
+          <Header Name="UserAgent"/>
+        </HTTPHeaders>
+        <RequestId>073636SFEVZ21RFTY5N7</RequestId>
+        <Arguments>
+          <Argument Name="Service" Value="AWSECommerceService"/>
+        </Arguments>
+        <RequestProcessingTime>0.00560617446899414</RequestProcessingTime>
+      </OperationRequest>
+      <Items>
+        <Request>
+          <IsValid>False</IsValid>
+          <Errors>
+            <Error>
+              <Code>AWS.MissingParameters</Code>
+              <Message>Your request is missing required parameters. Required parameters include ItemId.</Message>
+            </Error>
+          </Errors>
+        </Request>
+      </Items>
+    </ItemLookupResponse>'
+    d = x.parse
+    assert !ECS::Help.valid_aws_response?( d )
+    assert !ECS::Help.valid_aws_response?( d.to_s )
+
+    x.string = '<?xml version="1.0" encoding="UTF-8"?>
+    <ItemLookupResponse>
+      <OperationRequest>
+        <HTTPHeaders>
+          <Header Name="UserAgent"/>
+        </HTTPHeaders>
+        <RequestId>073636SFEVZ21RFTY5N7</RequestId>
+        <Arguments>
+          <Argument Name="Service" Value="AWSECommerceService"/>
+        </Arguments>
+        <RequestProcessingTime>0.00560617446899414</RequestProcessingTime>
+      </OperationRequest>
+      <Items>
+        <Request>
+          <IsValid>True</IsValid>
+          <Errors>
+            <Error>
+              <Code>AWS.MissingParameters</Code>
+              <Message>Your request is missing required parameters. Required parameters include ItemId.</Message>
+            </Error>
+          </Errors>
+        </Request>
+      </Items>
+    </ItemLookupResponse>'
+    d = x.parse
+    assert !ECS::Help.valid_aws_response?( d )
+    assert !ECS::Help.valid_aws_response?( d.to_s )
+
+    x.string = '<?xml version="1.0" encoding="UTF-8"?><Errors><Error>Nutty!</Error></Errors>'
+    d = x.parse
+    assert ECS::Help.valid_aws_response?( d )
+    assert ECS::Help.valid_aws_response?( d.to_s )
+
+    x.string = '<?xml version="1.0" encoding="UTF-8"?><Errors><Request><IsValid>False</IsValid></Request><Error>Nutty!</Error></Errors>'
+    d = x.parse
+    assert !ECS::Help.valid_aws_response?( d )
+    assert !ECS::Help.valid_aws_response?( d.to_s )
+
+    x.string = '<?xml version="1.0" encoding="UTF-8"?><Errors><Request><IsValid>false</IsValid></Request><Error>Nutty!</Error></Errors>'
+    d = x.parse
+    assert !ECS::Help.valid_aws_response?( d )
+    assert !ECS::Help.valid_aws_response?( d.to_s )
+
+    x.string = '<?xml version="1.0" encoding="UTF-8"?><Errors><Error><Code>Good Error</Code><Message>This is a good error</Message></Error></Errors>'
+    d = x.parse
+    assert !ECS::Help.valid_aws_response?( d )
+    assert !ECS::Help.valid_aws_response?( d.to_s )
+
+
+
+    x.string = '<?xml version="1.0" encoding="UTF-8"?>
+    <BrowseNodeLookupResponse>
+      <OperationRequest>
+        <HTTPHeaders>
+          <Header Name="UserAgent"/>
+        </HTTPHeaders>
+        <RequestId>10931PRERC228G0J80WW</RequestId>
+        <Arguments>
+          <Argument Name="Service" Value="AWSECommerceService"/>
+          <Argument Name="Operation" Value="BrowseNodeLookup"/>
+          <Argument Name="HelpType" Value="Operation"/>
+          <Argument Name="AWSAccessKeyId" Value=""/>
+          <Argument Name="About" Value="BrowseNodeLookup"/>
+        </Arguments>
+        <RequestProcessingTime>0.0036160945892334</RequestProcessingTime>
+      </OperationRequest>
+      <BrowseNodes>
+        <Request>
+          <IsValid>False</IsValid>
+          <Errors>
+            <Error>
+              <Code>AWS.MissingParameters</Code>
+              <Message>Your request is missing required parameters. Required parameters include BrowseNodeId.</Message>
+            </Error>
+          </Errors>
+        </Request>
+      </BrowseNodes>
+    </BrowseNodeLookupResponse>'
+    d = x.parse
+    assert !ECS::Help.valid_aws_response?( d )
+    assert !ECS::Help.valid_aws_response?( d.to_s )
+
+    x.string = '<?xml version="1.0" encoding="UTF-8"?>
+    <ItemLookupResponse>
+      <OperationRequest>
+        <HTTPHeaders>
+          <Header Name="UserAgent"/>
+        </HTTPHeaders>
+        <RequestId>073636SFEVZ21RFTY5N7</RequestId>
+        <Arguments>
+          <Argument Name="Service" Value="AWSECommerceService"/>
+        </Arguments>
+        <RequestProcessingTime>0.00560617446899414</RequestProcessingTime>
+      </OperationRequest>
+      <Items>
+        <Request>
+          <IsValid>True</IsValid>
+        </Request>
+      </Items>
+    </ItemLookupResponse>'
+    d = x.parse
+    assert ECS::Help.valid_aws_response?( d )
+    assert ECS::Help.valid_aws_response?( d.to_s )
+  end
+
+
+
+  def test_errors
+    h = ECS.something_ridiculous
+    assert_equal 1, h.errors.size
+    assert_equal RuntimeError, h.errors.first.class
+    assert_match /^The Operation parameter is invalid\. Please modify the Operation parameter and retry\. Valid values for the Operation parameter/, h.errors.first.message
+
+    h = ECS.help( :HelpType => 'Operation' )
+    assert_raises ArgumentError do
+      h.errors
+    end
+
+    h = ECS.help( :HelpType => 'Operation', :About => 'BrowseNodeLookup' )
+    assert_equal 0, h.errors.size
+  end
+
+
+
+  def test_headers
+    h = ECS.help( :About => 'BrowseNodeInfo', :HelpType => 'ResponseGroup' )
+    assert_equal Hash, h.headers.class
+    assert_equal 1, h.headers.size
+    assert defined?( h.headers[:UserAgent] )
+    assert_equal '', h.headers[:UserAgent]
+    
+    assert_nothing_raised do
+      h.headers( true )
+    end
+    
+    h = ECS.something_silly
+    assert_equal Hash, h.headers.class
+    assert_equal 0, h.headers.size
+  end
+
+  
+  def test_headers
+    h = ECS.help( :About => 'BrowseNodeInfo', :HelpType => 'ResponseGroup' )
+    assert_equal String, h.request_id.class
+    assert h.request_id.length
+    
+    assert_nothing_raised do
+      h.request_id( true )
+    end
+    
+    h = ECS.something_silly
+    assert_equal 'Could not determine request_id', h.request_id
+  end
+
+  
+  def test_arguments
+    h = ECS.help( :About => 'BrowseNodeInfo', :HelpType => 'ResponseGroup' )
+    assert_equal Hash, h.arguments.class
+    assert_equal 7, h.arguments.size
+    args = h.arguments
+    args.delete( :AWSAccessKeyId )
+    assert_equal( {
+      :About=>"BrowseNodeInfo",
+      :Operation=>"Help",
+      :HelpType=>"ResponseGroup",
+      :Service=>"AWSECommerceService",
+      :Version=>"2007-02-22",
+      :AssociateTag=>ECS.associate_id
+      }, args )
+    
+    assert_nothing_raised do
+      h.arguments( true )
+    end
+    
+    h = ECS.something_silly
+    assert_equal Hash, h.arguments.class
+    assert_equal 0, h.arguments.size
+  end
+
+  def test_processing_time
+    h = ECS.help( :About => 'BrowseNodeInfo', :HelpType => 'ResponseGroup' )
+    assert_equal Float, h.request_processing_time.class
+    assert h.request_processing_time > 0.0
+    
+    assert_nothing_raised do
+      h.request_processing_time( true )
+    end
+    
+    h = ECS.something_silly
+    assert_in_delta -1.0, h.request_processing_time, 0.00001
+  end
+
+
+  def test_miscellaneous
+    book = ECS.item_lookup( :ItemId => '0974514055', :ResponseGroup => [ 'Large', 'Offers' ] )
+    assert_nothing_raised do
+      book.ItemAttributes.Title.content
+    end
+    assert_equal "Programming Ruby: The Pragmatic Programmers' Guide, Second Edition", ( book.ItemAttributes.Title.content =~ /^(.*?),\s+(the)$/i ? "#{$2} #{$1}" : book.ItemAttributes.Title.content )
+  end
+
+  def test_to_yaml
+    help = ECS.help( :HelpType => 'Operation', :About => 'Help' )
+    help_yaml = ''
+    assert_nothing_raised do
+      help_yaml = help.to_yaml
+    end
+    
+    restored_help = YAML::load( help_yaml )
+    assert_equal help.operation_name, restored_help.operation_name
+    
+    book = ECS.item_lookup( :ItemId => '0974514055', :ResponseGroup => [ 'Large', 'Offers' ] )
+    assert_equal "Programming Ruby: The Pragmatic Programmers' Guide, Second Edition", ( book.ItemAttributes.Title.content =~ /^(.*?),\s+(the)$/i ? "#{$2} #{$1}" : book.ItemAttributes.Title.content )
+
+    book_yaml = ''
+    assert_nothing_raised do
+      book_yaml = book.to_yaml
+    end
+    
+    restored_book = YAML::load( book_yaml )
+    assert_equal restored_book.class, book.class
+    
+    assert_equal "Programming Ruby: The Pragmatic Programmers' Guide, Second Edition", ( restored_book.ItemAttributes.Title.content =~ /^(.*?),\s+(the)$/i ? "#{$2} #{$1}" : restored_book.ItemAttributes.Title.content )
+
+    unknown_yaml = "--- !ecs.rubyforge.org,2007/help:#<Class:0x6b2520>::SimilarityLookup \nparameters: \n  :ItemId: 0974514055\noperation_name: similarity_lookup\n"
+    restored_similarity_lookup = YAML::load( unknown_yaml )
+    assert_equal 'SimilarityLookup', restored_similarity_lookup.operation_name
+  end
+
+end