stretchr 1.0.0

data/test/test_client.rb

@@ -0,0 +1,132 @@
+require 'test/unit'
+require 'test_helper.rb'
+
+class StretchrTest < Test::Unit::TestCase
+
+	def test_new_with_missing_fields
+		assert_raise Stretchr::MissingAttributeError do
+			stretchr = Stretchr::Client.new({})
+		end
+		assert_raise Stretchr::MissingAttributeError do
+			stretchr = Stretchr::Client.new({public_key: "test", project: "project.company"})
+		end
+		assert_raise Stretchr::MissingAttributeError do
+			stretchr = Stretchr::Client.new({private_key: 'ABC123-private', project: "project.company"})
+		end
+		assert_raise Stretchr::MissingAttributeError do
+			stretchr = Stretchr::Client.new({private_key: 'ABC123-private', public_key: "test"})
+		end
+
+	end
+
+	def test_new_defaults
+
+		stretchr = test_stretchr_object
+		assert_not_nil stretchr.signatory, "stretchr.signatory"
+		assert_not_nil stretchr.transporter, "stretchr.transporter"
+
+	end
+
+	def test_new_custom_transporter
+
+		transporter = Object.new
+		stretchr = Stretchr::Client.new({transporter: transporter, private_key: 'ABC123-private', public_key: "test", project: "project.company"})
+		assert_equal transporter, stretchr.transporter
+
+	end
+
+	def test_new_custom_signatory
+
+		signatory = Object.new
+		stretchr = Stretchr::Client.new({signatory: signatory, private_key: 'ABC123-private', public_key: "test", project: "project.company"})
+		assert_equal signatory, stretchr.signatory
+
+	end
+
+	def test_make_request
+
+		stretchr = test_stretchr_object
+		stretchr.people(123).books
+		
+		stretchr.http_method = :get
+
+		request = stretchr.generate_request
+
+		assert_equal true, request.is_a?(Stretchr::Request)
+
+		assert_equal(stretchr.http_method, request.http_method)
+		assert_equal(stretchr.signed_uri, request.signed_uri)
+
+	end
+
+	def test_basic_url_generation
+		stretchr = test_stretchr_object
+		assert_equal URI.parse("http://project.company.stretchr.com/api/v1/people/1/cars").to_s, stretchr.people(1).cars.to_url
+	end
+
+	def test_paging
+		stretchr = test_stretchr_object
+		stretchr.people.limit(10).skip(10)
+		assert_equal true, stretchr.uri.validate_param_value("~limit", "10"), "limit not set"
+		assert_equal true, stretchr.uri.validate_param_value("~skip", "10"), "skip not set"
+
+		stretchr = test_stretchr_object
+		stretchr.people.limit(10).page(2)
+		assert_equal true, stretchr.uri.validate_param_value("~limit", "10"), "limit not set"
+		assert_equal true, stretchr.uri.validate_param_value("~skip", "10"), "skip not set"
+	end
+
+	def test_orders
+		stretchr = test_stretchr_object
+		stretchr.people.order("-age")
+		assert_equal true, stretchr.uri.validate_param_value("~order", "-age")
+
+		stretchr = test_stretchr_object
+		stretchr.people.order("-age,name")
+		assert_equal true, stretchr.uri.validate_param_value("~order", "-age,name")
+	end
+
+	def test_configuration_setup
+		Stretchr.config do |s|
+			s.private_key = "test_private"
+			s.public_key = "test_public"
+			s.project = "test"
+		end
+
+		assert_equal Stretchr.instance_eval {@configuration.private_key}, "test_private", "Should have setup configuration for the module"
+		assert_nothing_raised do
+			client = Stretchr::Client.new
+		end
+
+		assert_raise Stretchr::UnknownConfiguration, "Should raise an error when we pass an unknown configuration in" do
+			Stretchr.config do |s|
+				s.fake_param = "what"
+			end
+		end
+		#FIXME : this is a hack to reset the client!
+		Stretchr.instance_eval {@configuration = Stretchr::Configuration.new}
+	end
+
+	def test_client_shouldnt_expect_options
+		assert_nothing_raised do
+			client = Stretchr::Client.new(nil)
+		end
+	end
+
+	def test_client_should_raise_errors
+		stretchr = test_stretchr_object
+		stretchr.noisy_errors = true
+		assert_raises Stretchr::NotFound, "Should have returned not found!" do
+			stretchr.transporter.responses << Stretchr::Response.new({json: ({"~s" => 404}).to_json})
+			stretchr.get
+		end
+	end
+
+	def test_query
+		stretchr = test_stretchr_object
+		stretchr.where("name" => "ryan", "age" => ">21")
+		assert stretchr.uri.validate_param_value(":name", "ryan"), "Should have searched for a name"
+		assert stretchr.uri.validate_param_value(":age", ">21"), "Should search for an age"
+	end
+
+end

data/test/test_helper.rb

@@ -0,0 +1,74 @@
+require "cgi" unless defined? CGI
+require_relative "../lib/stretchr"
+
+def test_stretchr_object
+  Stretchr::Client.new({transporter: Stretchr::TestTransporter.new, private_key: 'ABC123-private', public_key: "test", project: "project.company"})
+end
+
+module Stretchr
+	class GenerateResponse
+		class << self
+			def get_single_response(params = {})
+				response = {
+					"~s" => params[:status] || 200,
+					"~d" => params[:data],
+				}
+				response["~e"] = params[:errors] if params[:errors]
+				response["~x"] = params[:context] if params[:context]
+				response["~ch"] = params[:change_info] if params[:change_info]
+				response.to_json
+			end
+
+			def get_collection_response(params = {})
+				response = {
+					"~s" => params[:status] || 200,
+					"~d" => {
+							"~t" => params[:total] || 10,
+							"~c" => params[:in_response] || 0
+						},
+				}
+				if params[:objects]
+					response["~d"]["~i"] = params[:objects]
+					response["~d"]["~c"] = params[:objects].length
+				end
+				response["~e"] = params[:errors] if params[:errors]
+				response["~x"] = params[:context] if params[:context]
+				response["~ch"] = params[:change_info] if params[:change_info]
+				response.to_json
+			end
+
+			def post_response(params = {})
+				response = {
+					"~s" => params[:status] || 200,
+					"~ch" => {"~c" => 1, "~u" => 1, "~d" => 0 }
+				}
+				response["~ch"]["~deltas"] = params[:deltas] if params[:deltas]
+				response.to_json
+			end
+
+			def put_response(params = {})
+				{
+
+				}
+			end
+
+		end
+	end
+end
+
+module URI
+
+	def get_param(param)
+		CGI.parse(CGI.unescape(self.query))[param]
+	end
+
+	def validate_param_value(param, value)
+		CGI.parse(CGI.unescape(self.query))[param].include?(value)
+	end
+
+	def validate_param_presence(param)
+    return false if self.query == nil
+		CGI.parse(CGI.unescape(self.query))[param] == [] ? false : true
+	end
+
+end

data/test/test_resources.rb

@@ -0,0 +1,187 @@
+require 'test/unit'
+require 'test_helper.rb'
+
+class ResourcesTest < Test::Unit::TestCase
+	Stretchr.config do |s|
+		s.project = "test"
+		s.private_key = "test"
+		s.public_key = "test"
+	end
+
+	class Account < Stretchr::Resource
+		stretchr_config path: "/books/:id", transporter: Stretchr::TestTransporter.new
+
+		def self.load_response(response)
+			self.stretchr_client.transporter.responses << Stretchr::Response.new({json: response})
+		end
+	end
+
+	def test_ghost_methods
+		resource = Stretchr::Resource.new
+		resource.name = "Ryan"
+		assert_equal resource.name, "Ryan", "Should be able to create any attributes for a resource"
+	end
+
+	def test_resources_build_clients
+		assert_equal Stretchr::Resource.stretchr_client.class, Stretchr::Client, "Client should exist for Resources"
+		assert_equal Account.stretchr_client.path, "/books/:id"
+	end
+
+	def test_strip_tildes
+		account = Account.new({"~id" => "test"})
+		assert_equal "test", account.stretchr_id, "Should have stripped the tilde"
+	end
+
+	def test_can_find_resources
+		response = Stretchr::GenerateResponse.get_single_response({status: 200, data: {"~id" => "test", name: "Ryan"}})
+		Account.load_response(response)
+		account = Account.find({:id => "test"})
+		assert_equal Account, account.class, "Should have returned an account object"
+		assert_equal "Ryan", account.name, "Should have returned the data attributes as methods"
+	end
+
+	def test_can_get_all_resources
+		response = Stretchr::GenerateResponse.get_collection_response({objects: [{name: "Ryan", "~id" => "ryan"}, {name: "Tim", "~id" => "tim"}]})
+		Account.load_response(response)
+		accounts = Account.all
+		assert_equal "/books/", Account.stretchr_client.transporter.requests.last.signed_uri.path.gsub(/\/api\/v[0-9]*/, "") #gsub to trim out the /api/v1 bit
+		assert_equal accounts.first.class, Account, "Should have returned an array of account objects"
+		assert_equal accounts.first.name, "Ryan", "Should have returned the data for each object"
+	end
+
+	def test_single_from_all
+		response = Stretchr::GenerateResponse.get_collection_response({objects: [{name: "Ryan", "~id" => "ryan"}]})
+		Account.load_response(response)
+		accounts = Account.all
+		assert accounts.is_a?(Array), "Should return an array even for a single response"
+	end
+
+	def test_none_from_all
+		response = Stretchr::GenerateResponse.get_collection_response
+		Account.load_response(response)
+		accounts = Account.all
+		assert accounts.is_a?(Array), "Should return an array even for zero objects"
+	end
+
+	def test_save_new_object
+		account = Account.new
+		account.name = "Ryan"
+
+		response = Stretchr::GenerateResponse.post_response({deltas: {"~id" => "asdf"}})
+		Account.load_response(response)
+
+		account.save
+		assert_equal ({name: "Ryan"}).to_json, Account.stretchr_client.transporter.requests.last.body, "Should have set the correct body"
+		assert account.stretchr_id != nil, "Should have returned and set a stretchr id"
+	end
+
+	def test_save_new_object_with_id
+		account = Account.new
+		account.name = "Ryan"
+		account.stretchr_id = "ryan"
+
+		response = Stretchr::GenerateResponse.post_response
+		Account.load_response(response)
+
+		account.save
+		assert JSON.parse(Account.stretchr_client.transporter.requests.last.body).has_key?("~id"), "Should have set the stretchr id for me!"
+	end
+
+	def test_save_old_project
+		response = Stretchr::GenerateResponse.get_single_response({status: 200, data: {"~id" => "test", name: "Ryan"}})
+		Account.load_response(response)
+		account = Account.find({id: "test"})
+
+		account.name = "Ryan"
+
+		response = Stretchr::GenerateResponse.post_response
+		Account.load_response(response)
+		account.save
+
+		assert Account.stretchr_client.transporter.requests.last.http_method == :put, "Should have sent a put to update stretchr object"
+
+	end
+
+	def test_create_method
+		response = Stretchr::GenerateResponse.post_response({deltas: [{"~id" => "asdf"}]})
+		Account.load_response(response)
+
+		account = Account.create({name: "Ryan"})
+		assert_equal "Ryan", account.name, "Should have created the object with the attributes"
+		assert_equal "asdf", account.stretchr_id, "Should have given it a stretchr ID from the response"
+
+		response = Stretchr::GenerateResponse.post_response({deltas: [{"~id" => "ryan"}, {"~id" => "tim"}]})
+		Account.load_response(response)
+
+		accounts = Account.create([{name: "Ryan"}, {name: "Tim"}])
+		assert_equal "ryan", accounts.first.stretchr_id, "Should have returned an array of objects"
+		assert_equal "tim", accounts[1].stretchr_id, "Second object should work!"
+	end
+
+	def test_create_with_id
+		response = Stretchr::GenerateResponse.post_response({deltas: [{"~id" => "asdf"}]})
+		Account.load_response(response)
+
+		account = Account.create({name: "Ryan", stretchr_id: "ryan-id"})
+
+		assert Account.stretchr_client.transporter.requests.last.body.include?("~id"), "Should have set the ~id for stretchr"
+	end
+
+	def test_not_found
+		response = Stretchr::GenerateResponse.get_single_response({status: 404})
+		Account.load_response(response)
+		account = Account.find({id: "ryan"})
+		assert_equal false, account, "Should have returned false if object not found"
+	end
+
+	def test_find_resources
+		response = Stretchr::GenerateResponse.get_collection_response({objects: [{name: "Ryan", "~id" => "ryan"}, {name: "Ryan", "~id" => "tim"}]})
+		Account.load_response(response)
+		accounts = Account.where("name" => "Ryan")
+		assert accounts.length == 2, "should have returned two objects"
+		assert accounts.first.is_a?(Account), "should have returned an array of account objects"
+		assert accounts.first.name == "Ryan", "should have returned editable objects"
+	end
+
+	def test_find_no_resources
+		response = Stretchr::GenerateResponse.get_collection_response
+		Account.load_response(response)
+		accounts = Account.where("name" => "Ryan")
+		assert_equal false, accounts, "Should have returned false for no objects!"
+	end
+
+	def test_remove_params_from_path
+		response = Stretchr::GenerateResponse.get_collection_response({objects: [], in_response: 0})
+		Account.load_response(response)
+		accounts = Account.where({id: "test"})
+		last_uri = Account.stretchr_client.transporter.requests.last.signed_uri
+		assert last_uri.path.include?("/books/test"), "Should have set the path"
+		assert !URI.decode(last_uri.query).include?(":id"), "Should not have included id search in query"
+	end
+
+	def test_nil_path_param
+		assert_nothing_raised "Nil attributes shouldn't raise error" do
+			Stretchr::Resource.instance_eval { prep_path("/accounts/:account_id", {account_id: nil}) }
+		end
+	end
+
+	def test_number_for_param
+		assert_nothing_raised "Nil attributes shouldn't raise error" do
+			Stretchr::Resource.instance_eval { prep_path("/accounts/:account_id", {account_id: 123}) }
+		end
+	end
+
+	def test_to_json
+		account = Account.new
+		account.name = "Ryan"
+		account.stretchr_id = "asdf"
+		hash = {"name" => "Ryan", "stretchr_id" => "asdf"}
+		assert_equal hash, account.to_hash, "Should have returned a hash"
+		assert_equal hash.to_json, account.to_json, "Should have returned json"
+	end
+
+	#FIXME : It needs to know when an item already exists and when it's being created for the first time and handle them appropriately
+	#FIXME : It needs to be able to throw errors for 404, etc...
+	#FIXME : Should test "where" with params in the path as well.  It should add them to the path but remove them from the query
+
+end

data/test/test_signatory.rb

@@ -0,0 +1,67 @@
+require 'test/unit'
+require 'test_helper.rb'
+
+class ResourcesTest < Test::Unit::TestCase
+
+	def test_signed_uri
+
+		stretchr = test_stretchr_object
+		stretchr.people(123).books
+
+		assert_equal(true, stretchr.signed_uri.validate_param_presence("~sign"), "~sign param expected")
+
+	end
+
+	def test_signing
+		public_key = "ABC123"
+		private_key = "ABC123-private"
+		body = "body"
+		url = "http://test.stretchr.com/api/v1?:name=!Mat&:name=!Laurie&:age=>20"
+
+		#as per documentation
+		assert_equal true, Stretchr::Signatory.generate_signed_url("get", url, public_key, private_key, body).validate_param_value("~sign", "6c3dc03b3f85c9eb80ed9e4bd21e82f1bbda5b8d"), "URL signature didn't match expected"
+	end
+
+	def test_signing_again
+		public_key = "ABC123"
+		private_key = "PRIVATE"
+		url = "http://localhost:8080/api/v1?:name=!Mat&:name=!Laurie&:age=>20"
+
+		#as per documentation
+		assert_equal "6841830bf612b03864edeebf9b99b7f48a8edf2d", Stretchr::Signatory.generate_signed_url("get", url, public_key, private_key).get_param("~sign").first, "URL signature didn't match expected"
+
+	end
+
+	def test_signing_with_no_query
+		public_key = "ABC123"
+		private_key = "ABC123-private"
+		body = "body"
+		url = "http://test.stretchr.com/api/v1"
+
+		#as per documentation
+		assert_equal "d5e1dcbba794be7dc6767076bd4747b51837f21d", Stretchr::Signatory.generate_signed_url("get", url, public_key, private_key, body).get_param("~sign").first, "URL signature didn't match expected"
+	end
+
+	def test_signing_with_escapable_characters
+
+		public_key = "ABC123"
+		private_key = "PRIVATE"
+		url = "http://localhost:8080/api/v1/people?:~created=>10000000"
+
+		#as per documentation
+		assert_equal "b54b16d3542a1497bf22c4f61aa935e81032e7b5", Stretchr::Signatory.generate_signed_url("get", url, public_key, private_key).get_param("~sign").first, "URL signature didn't match expected"
+
+	end
+
+	def test_private_key_and_body_hash_removal
+		#we shouldn't see the private key or body hash in the final url
+		public_key = "ABC123"
+		private_key = "ABC123-private"
+		body = "body"
+		url = "http://test.stretchr.com/api/v1?:name=!Mat&:name=!Laurie&:age=>20"
+
+		assert_equal false, Stretchr::Signatory.generate_signed_url("get", url, public_key, private_key, body).validate_param_presence("~private"), "private param included"
+		assert_equal false, Stretchr::Signatory.generate_signed_url("get", url, public_key, private_key, body).validate_param_presence("~bodyhash"), "private param included"
+	end
+
+end

data/test/test_stretchr_http_actions.rb

@@ -0,0 +1,190 @@
+require 'test/unit'
+require 'test_helper.rb'
+
+class StretchrHttpActionsTest < Test::Unit::TestCase
+
+  def test_create
+
+    stretchr = test_stretchr_object
+
+    test_response = Stretchr::Response.new(:json => '{"~s":200,"~d":{"name":"Ryan"}}')
+    stretchr.transporter.responses << test_response
+
+    response_from_post = stretchr.people(123).create({:name=>"Ryan"})
+
+    assert_equal(response_from_post, test_response, "response from get should be the response form the transporter")
+    
+    if assert_equal(1, stretchr.transporter.requests.length)
+      
+      request = stretchr.transporter.requests[0]
+      
+      assert_equal(:post, request.http_method, "http_method")
+      assert_equal(request.body, {:name=>"Ryan"}.to_json)
+      assert_equal("http://project.company.stretchr.com/api/v1/people/123?%7Ekey=test&%7Esign=a2c48a40179fdd9db12f157d289e9ec79b00fe04", request.signed_uri.to_s)
+
+    end
+
+  end
+
+  def test_update
+
+    stretchr = test_stretchr_object
+
+    test_response = Stretchr::Response.new(:json => '{"~s":200,"~d":{"name":"Ryan"}}')
+    stretchr.transporter.responses << test_response
+
+    response_from_put = stretchr.people(123).update({:name=>"Mat"})
+
+    assert_equal(response_from_put, test_response, "response from get should be the response form the transporter")
+    
+    if assert_equal(1, stretchr.transporter.requests.length)
+      
+      request = stretchr.transporter.requests[0]
+      
+      assert_equal(:put, request.http_method, "http_method")
+      assert_equal(request.body, {:name=>"Mat"}.to_json)
+      assert_equal("http://project.company.stretchr.com/api/v1/people/123?%7Ekey=test&%7Esign=837147f09451a998c041c328821c6b72f88f3336", request.signed_uri.to_s)
+
+    end
+
+  end
+
+  def test_replace
+
+    stretchr = test_stretchr_object
+
+    test_response = Stretchr::Response.new(:json => '{"~s":200,"~d":{"name":"Ryan"}}')
+    stretchr.transporter.responses << test_response
+
+    response_from_post = stretchr.people(123).replace({:name=>"Ryan"})
+
+    assert_equal(response_from_post, test_response, "response from get should be the response form the transporter")
+    
+    if assert_equal(1, stretchr.transporter.requests.length)
+      
+      request = stretchr.transporter.requests[0]
+      
+      assert_equal(:post, request.http_method, "http_method")
+      assert_equal(request.body, {:name=>"Ryan"}.to_json)
+      assert_equal("http://project.company.stretchr.com/api/v1/people/123?%7Ekey=test&%7Esign=a2c48a40179fdd9db12f157d289e9ec79b00fe04", request.signed_uri.to_s)
+
+    end
+
+  end
+
+  def test_read
+
+    stretchr = test_stretchr_object
+
+    test_response = Stretchr::Response.new(:json => '{"~s":200,"~d":{"name":"Ryan"}}')
+    stretchr.transporter.responses << test_response
+
+    response_from_get = stretchr.people(123).read
+
+    assert_equal(test_response, response_from_get, "response from get should be the response form the transporter")
+    
+    if assert_equal(1, stretchr.transporter.requests.length)
+      
+      request = stretchr.transporter.requests[0]
+      
+      assert_equal(:get, request.http_method, "http_method")
+      assert_nil(request.body, "body")
+      assert_equal("http://project.company.stretchr.com/api/v1/people/123?%7Ekey=test&%7Esign=a6bfa773f9169dbeae077ba6a8ac3da07fc19db3", request.signed_uri.to_s)
+
+    end
+
+  end
+
+  def test_get
+
+    stretchr = test_stretchr_object
+
+    test_response = Stretchr::Response.new(:json => '{"~s":200,"~d":{"name":"Ryan"}}')
+    stretchr.transporter.responses << test_response
+
+    response_from_get = stretchr.people(123).get
+
+    assert_equal(test_response, response_from_get, "response from get should be the response form the transporter")
+    
+    if assert_equal(1, stretchr.transporter.requests.length)
+      
+      request = stretchr.transporter.requests[0]
+      
+      assert_equal(:get, request.http_method, "http_method")
+      assert_nil(request.body, "body")
+      assert_equal("http://project.company.stretchr.com/api/v1/people/123?%7Ekey=test&%7Esign=a6bfa773f9169dbeae077ba6a8ac3da07fc19db3", request.signed_uri.to_s)
+
+    end
+
+  end
+
+  def test_post
+
+    stretchr = test_stretchr_object
+
+    test_response = Stretchr::Response.new(:json => '{"~s":200,"~d":{"name":"Ryan"}}')
+    stretchr.transporter.responses << test_response
+
+    response_from_post = stretchr.people(123).body({:name=>"Ryan"}).post
+
+    assert_equal(response_from_post, test_response, "response from get should be the response form the transporter")
+    
+    if assert_equal(1, stretchr.transporter.requests.length)
+      
+      request = stretchr.transporter.requests[0]
+      
+      assert_equal(:post, request.http_method, "http_method")
+      assert_equal(request.body, {:name=>"Ryan"}.to_json)
+      assert_equal("http://project.company.stretchr.com/api/v1/people/123?%7Ekey=test&%7Esign=a2c48a40179fdd9db12f157d289e9ec79b00fe04", request.signed_uri.to_s)
+
+    end
+
+  end
+
+  def test_put
+
+    stretchr = test_stretchr_object
+
+    test_response = Stretchr::Response.new(:json => '{"~s":200,"~d":{"name":"Ryan"}}')
+    stretchr.transporter.responses << test_response
+
+    response_from_put = stretchr.people(123).body({:name=>"Mat"}).put
+
+    assert_equal(response_from_put, test_response, "response from get should be the response form the transporter")
+    
+    if assert_equal(1, stretchr.transporter.requests.length)
+      
+      request = stretchr.transporter.requests[0]
+      
+      assert_equal(:put, request.http_method, "http_method")
+      assert_equal(request.body, {:name=>"Mat"}.to_json)
+      assert_equal("http://project.company.stretchr.com/api/v1/people/123?%7Ekey=test&%7Esign=837147f09451a998c041c328821c6b72f88f3336", request.signed_uri.to_s)
+
+    end
+
+  end
+
+  def test_delete
+
+    stretchr = test_stretchr_object
+
+    test_response = Stretchr::Response.new(:json => '{"~s":200,"~d":{"name":"Ryan"}}')
+    stretchr.transporter.responses << test_response
+
+    response_from_delete = stretchr.people(123).delete
+
+    assert_equal(response_from_delete, test_response, "response from get should be the response form the transporter")
+    
+    if assert_equal(1, stretchr.transporter.requests.length)
+      
+      request = stretchr.transporter.requests[0]
+      
+      assert_equal(:delete, request.http_method, "http_method")
+      assert_nil(request.body, "body")
+      assert_equal("http://project.company.stretchr.com/api/v1/people/123?%7Ekey=test&%7Esign=7becba6ba04d40b7dd19408776f7f028c0d8f864", request.signed_uri.to_s)
+
+    end
+
+  end
+
+end

data/test/test_stretchr_request.rb

@@ -0,0 +1,26 @@
+require 'test/unit'
+require 'test_helper.rb'
+
+class StretchrRequestTest < Test::Unit::TestCase
+
+  def test_new
+
+    uri = URI.parse("http://test.stretchr.com/api/v1")
+    r = Stretchr::Request.new(
+      :http_method => :get,
+      :signed_uri => uri,
+      :body => "This is the body",
+      :headers => {
+        "X-Custom-Header" => "Hello"
+      }
+    )
+
+    assert_equal(r.http_method, :get)
+    assert_equal(r.signed_uri, uri)
+    assert_equal(r.body, "This is the body")
+    assert_equal(r.headers["X-Custom-Header"], "Hello")
+
+  end
+
+  
+end