sunstone 0.1.0

data/test/sunstone/model_test.rb

@@ -0,0 +1,11 @@
+require 'test_helper'
+
+class Sunstone::ModelTest < Minitest::Test
+
+  def setup
+    Sunstone.site = "http://test_api_key@testhost.com"
+  end
+  
+  #TODO: test initializer
+  
+end

data/test/sunstone/parser_test.rb

@@ -0,0 +1,124 @@
+require 'test_helper'
+
+class TestModel < Sunstone::Model
+  
+  belongs_to :test_model
+  
+  has_many :test_models
+  
+  define_schema do
+    integer   :testid
+    boolean   :red
+    datetime  :created_at
+    decimal   :rate
+    string    :name
+    string    :nicknames, :array => true
+  end
+end
+
+class Sunstone::ParserTest < Minitest::Test
+
+  test '::parse(klass, string)' do
+    assert_equal true, Sunstone::Parser.parse(TestModel, '{"red": true}').red
+  end
+
+  test '::parse(model_instance, string)' do
+    model = TestModel.new
+    Sunstone::Parser.parse(model, '{"red": true}')
+    assert_equal true, model.red
+  end
+  
+  test '::parse(klass, response)' do
+    Sunstone.site = "http://test_api_key@testhost.com"
+    stub_request(:get, "http://testhost.com/test").to_return(:body => '{"red": true}')
+    
+    model = Sunstone.get('/test') do |response|
+      Sunstone::Parser.parse(TestModel, response)
+    end
+    
+    assert_equal true, model.red
+  end
+  
+  test "parse boolean attributes" do
+    parser = Sunstone::Parser.new(TestModel)
+    assert_equal true, parser.parse('{"red": true}').red
+
+    parser = Sunstone::Parser.new(TestModel)
+    assert_equal false, parser.parse('{"red": false}').red
+  end
+
+  test "parse date attributes" do
+    parser = Sunstone::Parser.new(TestModel)
+    assert_equal DateTime.new(2014, 7, 14, 16, 44, 15, '-7'), parser.parse('{"created_at": "2014-07-14T16:44:15-07:00"}').created_at
+  end
+
+  test "parse decimal attributes" do
+    parser = Sunstone::Parser.new(TestModel)
+    assert_equal 10.254, parser.parse('{"rate": 10.254}').rate
+  end
+  
+  test "parse integer attributes" do
+    parser = Sunstone::Parser.new(TestModel)
+    assert_equal 123654, parser.parse('{"testid": 123654}').testid
+  end
+  
+  test "parse string attributes" do
+    parser = Sunstone::Parser.new(TestModel)
+    assert_equal "my name", parser.parse('{"name": "my name"}').name
+  end
+
+  test "parse array attribute" do
+    parser = Sunstone::Parser.new(TestModel)
+    assert_equal ["name 1", "name 2"], parser.parse('{"nicknames": ["name 1", "name 2"]}').nicknames
+  end
+  
+  test "parse skips over unkown key" do
+    assert_nothing_raised do
+      Sunstone::Parser.parse(TestModel, '{"other_key": "name 2"}')
+      Sunstone::Parser.parse(TestModel, '{"other_key": ["name 1", "name 2"]}')
+    end
+  end
+  
+  test "parse belong_to association" do
+    parser = Sunstone::Parser.new(TestModel)
+    assert_equal({
+      :rate => BigDecimal.new("10.254"),
+      :created_at => DateTime.new(2014, 7, 14, 16, 44, 15, '-7'),
+      :testid => 123654,
+      :name => "my name",
+      :nicknames => ["name 1", "name 2"]
+    }, parser.parse('{"test_model": {
+      "rate": 10.254,
+      "created_at": "2014-07-14T16:44:15-07:00",
+      "testid": 123654,
+      "name": "my name",
+      "nicknames": ["name 1", "name 2"]
+    }}').test_model.instance_variable_get(:@attributes))
+  end
+  
+  test "parse has_many association" do
+    parser = Sunstone::Parser.new(TestModel)
+    attrs = {
+      :rate => BigDecimal.new("10.254"),
+      :created_at => DateTime.new(2014, 7, 14, 16, 44, 15, '-7'),
+      :testid => 123654,
+      :name => "my name",
+      :nicknames => ["name 1", "name 2"]
+    }
+    
+    assert_equal([attrs, attrs], parser.parse('{"test_models": [{
+      "rate": 10.254,
+      "created_at": "2014-07-14T16:44:15-07:00",
+      "testid": 123654,
+      "name": "my name",
+      "nicknames": ["name 1", "name 2"]
+    }, {
+      "rate": 10.254,
+      "created_at": "2014-07-14T16:44:15-07:00",
+      "testid": 123654,
+      "name": "my name",
+      "nicknames": ["name 1", "name 2"]
+    }]}').test_models.map{|m| m.instance_variable_get(:@attributes)})
+  end
+  
+end

data/test/sunstone/schema_test.rb

@@ -0,0 +1,25 @@
+require 'test_helper'
+
+class Sunstone::SchemaTest < Minitest::Test
+
+  test "type methods" do
+    schema = Sunstone::Schema.new
+    
+    schema.boolean(:boolean)
+    schema.datetime(:datetime)
+    schema.decimal(:decimal)
+    schema.integer(:integer)
+    schema.string(:string)
+    
+    {
+      :boolean  => Sunstone::Type::Boolean,
+      :datetime => Sunstone::Type::DateTime,
+      :decimal  => Sunstone::Type::Decimal,
+      :integer  => Sunstone::Type::Integer,
+      :string   => Sunstone::Type::String
+    }.each do |name, klass|
+      assert_kind_of  klass, schema[name]
+    end
+  end
+  
+end

data/test/sunstone/type/boolean_test.rb

@@ -0,0 +1,24 @@
+require 'test_helper'
+
+class Sunstone::Type::BooleanTest < Minitest::Test
+
+  test "type casting" do
+    type = Sunstone::Type::Boolean.new
+    
+    assert_equal true, type.type_cast_from_user(true)
+    assert_equal true, type.type_cast_from_user('true')
+    assert_equal true, type.type_cast_from_user('TRUE')
+    
+    assert_equal false, type.type_cast_from_user(false)
+    assert_equal false, type.type_cast_from_user('false')
+    assert_equal false, type.type_cast_from_user('FALSE')
+  end
+  
+  test "#type_cast_for_json" do
+    type = Sunstone::Type::Boolean.new
+    
+    assert_equal true, type.type_cast_for_json(true)
+    assert_equal false, type.type_cast_for_json(false)
+  end
+
+end

data/test/sunstone/type/date_time_test.rb

@@ -0,0 +1,31 @@
+require 'test_helper'
+
+class Sunstone::Type::DateTimeTest < Minitest::Test
+
+  test "#type_cast_from_user" do
+    type = Sunstone::Type::DateTime.new
+    
+    assert_equal DateTime.new(2001, 2, 3, 4, 5, 6, '+7'), type.type_cast_from_user('2001-02-03T04:05:06+07:00')
+    assert_equal DateTime.new(2001, 2, 3, 4, 5, 6, '+7'), type.type_cast_from_user('20010203T040506+0700')
+    assert_equal DateTime.new(2001, 2, 3, 4, 5, 6, '+7'), type.type_cast_from_user('2001-W05-6T04:05:06+07:00')
+    assert_equal DateTime.new(2014, 7, 14, 16, 44, 15, '-7'), type.type_cast_from_user("2014-07-14T16:44:15-07:00")
+    assert_equal Rational(123,1000), type.type_cast_from_user('2001-02-03T04:05:06.123+07:00').sec_fraction
+  end
+  
+  test "#type_cast_from_json" do
+    type = Sunstone::Type::DateTime.new
+    
+    assert_equal DateTime.new(2001, 2, 3, 4, 5, 6, '+7'), type.type_cast_from_json('2001-02-03T04:05:06+07:00')
+    assert_equal DateTime.new(2001, 2, 3, 4, 5, 6, '+7'), type.type_cast_from_json('20010203T040506+0700')
+    assert_equal DateTime.new(2001, 2, 3, 4, 5, 6, '+7'), type.type_cast_from_json('2001-W05-6T04:05:06+07:00')
+    assert_equal DateTime.new(2014, 7, 14, 16, 44, 15, '-7'), type.type_cast_from_json("2014-07-14T16:44:15-07:00")
+    assert_equal Rational(123,1000), type.type_cast_from_json('2001-02-03T04:05:06.123+07:00').sec_fraction
+  end
+
+  test "#type_cast_for_json" do
+    type = Sunstone::Type::DateTime.new
+    
+    assert_equal '2001-02-03T04:05:06.000+07:00', type.type_cast_for_json(DateTime.new(2001, 2, 3, 4, 5, 6, '+7'))
+  end
+  
+end

data/test/sunstone/type/decimal_test.rb

@@ -0,0 +1,27 @@
+require 'test_helper'
+
+class Sunstone::Type::DecimalTest < Minitest::Test
+
+  test "#type_cast_from_user" do
+    type = Sunstone::Type::Decimal.new
+    
+    assert_equal BigDecimal.new("10.50"), type.type_cast_from_user(BigDecimal.new("10.50"))
+    assert_equal BigDecimal.new("10.50"), type.type_cast_from_user(10.50)
+    assert_equal BigDecimal.new("10.50"), type.type_cast_from_user("10.50")
+  end
+  
+  test "#type_cast_from_json" do
+    type = Sunstone::Type::Decimal.new
+    
+    assert_equal BigDecimal.new("10.50"), type.type_cast_from_json(BigDecimal.new("10.50"))
+    assert_equal BigDecimal.new("10.50"), type.type_cast_from_json(10.50)
+    assert_equal BigDecimal.new("10.50"), type.type_cast_from_json("10.50")
+  end
+  
+  test "#type_cast_for_json" do
+    type = Sunstone::Type::Decimal.new
+    
+    assert_equal BigDecimal.new("10.50"), type.type_cast_for_json(BigDecimal.new("10.50"))
+  end
+
+end

data/test/sunstone/type/integer_test.rb

@@ -0,0 +1,29 @@
+require 'test_helper'
+
+class Sunstone::Type::IntegerTest < Minitest::Test
+
+  test "#type_cast_from_user" do
+    type = Sunstone::Type::Integer.new
+    
+    assert_equal 10, type.type_cast_from_user(10)
+    assert_equal 10, type.type_cast_from_user("10")
+    assert_equal 1,  type.type_cast_from_user(true)
+    assert_equal 0,  type.type_cast_from_user(false)
+  end
+  
+  test "#type_cast_from_json" do
+    type = Sunstone::Type::Integer.new
+    
+    assert_equal 10, type.type_cast_from_json(10)
+    assert_equal 10, type.type_cast_from_json("10")
+    assert_equal 1,  type.type_cast_from_json(true)
+    assert_equal 0,  type.type_cast_from_json(false)
+  end
+
+  test "#type_cast_for_json" do
+    type = Sunstone::Type::Integer.new
+    
+    assert_equal 10, type.type_cast_for_json(10)
+  end
+  
+end

data/test/sunstone/type/string_test.rb

@@ -0,0 +1,54 @@
+require 'test_helper'
+
+class Sunstone::Type::StringTest < Minitest::Test
+
+  test "#type_cast_from_user" do
+    type = Sunstone::Type::String.new
+    
+    assert_equal "1",       type.type_cast_from_user(true)
+    assert_equal "0",       type.type_cast_from_user(false)
+    assert_equal "123",     type.type_cast_from_user(123)
+    assert_equal "string",  type.type_cast_from_user("string")
+  end
+  
+  test "#type_cast_from_json" do
+    type = Sunstone::Type::String.new
+    
+    assert_equal "1",       type.type_cast_from_json(true)
+    assert_equal "0",       type.type_cast_from_json(false)
+    assert_equal "123",     type.type_cast_from_json(123)
+    assert_equal "string",  type.type_cast_from_json("string")
+  end
+  
+  test "#type_cast_for_json" do
+    type = Sunstone::Type::String.new
+    
+    assert_equal "10", type.type_cast_for_json("10")
+  end
+  
+  test "values are duped coming out" do
+    s = "foo"
+    type = Sunstone::Type::String.new
+    
+    assert_not_same s, type.type_cast_from_user(s)
+    assert_not_same s, type.type_cast_from_json(s)
+  end
+
+  test "string mutations are detected" # do
+  #   klass = Class.new(Model)
+  #   klass.table_name = 'authors'
+  #
+  #   author = klass.create!(name: 'Sean')
+  #   assert_not author.changed?
+  #
+  #   author.name << ' Griffin'
+  #   assert author.name_changed?
+  #
+  #   author.save!
+  #   author.reload
+  #
+  #   assert_equal 'Sean Griffin', author.name
+  #   assert_not author.changed?
+  # end
+  
+end

data/test/sunstone/type/value_test.rb

@@ -0,0 +1,27 @@
+require 'test_helper'
+
+class Sunstone::Type::ValueTest < Minitest::Test
+
+  test "#readonly?" do
+    type = Sunstone::Type::Value.new(:readonly => true)
+    assert_equal true, type.readonly?
+  end
+  
+  test "array support" do
+    type = Sunstone::Type::Value.new(:array => true)
+    
+    type.expects(:_type_cast).with(1).returns(1).twice
+    type.expects(:_type_cast).with('2').returns('2').twice
+    type.expects(:_type_cast).with(:a).returns(:a).twice
+    
+    assert_equal([1, '2', :a], type.type_cast_from_user([1, '2', :a]))
+    assert_equal([1, '2', :a], type.type_cast_from_json([1, '2', :a]))
+  end
+  
+  test "#type_cast_for_json" do
+    type = Sunstone::Type::Value.new(:array => true)
+    
+    assert_equal [1, '2', :a], type.type_cast_for_json([1, '2', :a])
+  end
+  
+end

data/test/sunstone_test.rb

@@ -0,0 +1,302 @@
+require 'test_helper'
+
+class SunstoneTest < Minitest::Test
+
+  def setup
+    Sunstone.site = "http://test_api_key@testhost.com"
+  end
+  
+  # Sunstone.site= ============================================================
+  
+  test "setting the site sets the api_key" do
+    Sunstone.site = 'https://my_api_key@localhost'
+    assert_equal('my_api_key', Sunstone.api_key)
+  end
+  
+  test "setting the site sets the host" do
+    Sunstone.site = 'https://my_api_key@example.com'
+    assert_equal('example.com', Sunstone.host)
+  end
+  
+  test "setting the site sets the port" do
+    Sunstone.site = 'http://my_api_key@example.com'
+    assert_equal(80, Sunstone.port)
+    
+    Sunstone.site = 'https://my_api_key@example.com'
+    assert_equal(443, Sunstone.port)
+    
+    Sunstone.site = 'https://my_api_key@example.com:4321'
+    assert_equal(4321, Sunstone.port)
+  end
+  
+  test "setting the site sets the use_ssl option" do
+    Sunstone.site = 'http://my_api_key@example.com'
+    assert_equal(false, Sunstone.use_ssl)
+    
+    Sunstone.site = 'https://my_api_key@example.com'
+    assert_equal(true, Sunstone.use_ssl)
+  end
+  
+  # Sunstone.user_agent= ======================================================
+  test "setting the user_agent appends it to the User-Agent" do
+    assert_equal("Sunstone/#{Sunstone::VERSION} Ruby/#{RUBY_VERSION}-p#{RUBY_PATCHLEVEL} #{RUBY_PLATFORM}", Sunstone.user_agent)
+    
+    Sunstone.user_agent = "MyGem/3.14"
+    assert_equal("MyGem/3.14 Sunstone/#{Sunstone::VERSION} Ruby/#{RUBY_VERSION}-p#{RUBY_PATCHLEVEL} #{RUBY_PLATFORM}", Sunstone.user_agent)
+    Sunstone.user_agent = nil
+  end
+  
+  # Sunstone.with_cookie_store ================================================
+  
+  test '#with_cookie_store(store, &block) sets the cookie-store' do
+    assert_nil Thread.current[:sunstone_cookie_store]
+    Sunstone.with_cookie_store('my_store') do
+      assert_equal 'my_store', Thread.current[:sunstone_cookie_store]
+    end
+    assert_nil Thread.current[:sunstone_cookie_store]
+  end
+
+  # Sunstone.send_request =====================================================
+  
+  test '#send_request(#<Net::HTTPRequest>)' do
+    stub_request(:get, "http://testhost.com/test").to_return(:body => "get")
+    
+    assert_equal('get', Sunstone.send_request(Net::HTTP::Get.new('/test')).body)
+  end
+  
+  test '#send_request(#<Net::HTTPRequest>, body) with string body' do
+    stub_request(:post, "http://testhost.com/test").with(:body => '{"key":"value"}').to_return(:body => "post")
+    
+    assert_equal('post', Sunstone.send_request(Net::HTTP::Post.new('/test'), '{"key":"value"}').body)
+  end
+  
+  test '#send_request(#<Net::HTTPRequest>, body) with IO body' do
+    stub_request(:post, "http://testhost.com/test").with { |request|
+      request.headers['Transfer-Encoding'] == "chunked" && request.body == '{"key":"value"}'
+    }.to_return(:body => "post")
+
+    rd, wr = IO.pipe
+    wr.write('{"key":"value"}')
+    wr.close
+
+    assert_equal('post', Sunstone.send_request(Net::HTTP::Post.new('/test'), rd).body)
+  end
+  
+  test '#send_request(#<Net::HTTPRequest>, body) with Ruby Object body' do
+    stub_request(:post, "http://testhost.com/test").with(:body => '{"key":"value"}').to_return(:body => "post")
+    
+    assert_equal('post', Sunstone.send_request(Net::HTTP::Post.new('/test'), {:key => 'value'}).body)
+  end
+
+  test '#send_request(#<Net::HTTPRequest>) raises Sunstone::Exceptions on non-200 responses' do  
+    stub_request(:get, "http://testhost.com/400").to_return(:status => 400)
+    stub_request(:get, "http://testhost.com/401").to_return(:status => 401)
+    stub_request(:get, "http://testhost.com/404").to_return(:status => 404)
+    stub_request(:get, "http://testhost.com/410").to_return(:status => 410)
+    stub_request(:get, "http://testhost.com/422").to_return(:status => 422)
+    stub_request(:get, "http://testhost.com/450").to_return(:status => 450)
+    stub_request(:get, "http://testhost.com/503").to_return(:status => 503)
+    stub_request(:get, "http://testhost.com/550").to_return(:status => 550)
+    
+    assert_raises(Sunstone::Exception::BadRequest)   { Sunstone.send_request(Net::HTTP::Get.new('/400')) }
+    assert_raises(Sunstone::Exception::Unauthorized) { Sunstone.send_request(Net::HTTP::Get.new('/401')) }
+    assert_raises(Sunstone::Exception::NotFound)     { Sunstone.send_request(Net::HTTP::Get.new('/404')) }
+    assert_raises(Sunstone::Exception::Gone)         { Sunstone.send_request(Net::HTTP::Get.new('/410')) }
+    assert_raises(Sunstone::Exception::ApiVersionUnsupported) { Sunstone.send_request(Net::HTTP::Get.new('/422')) }
+    assert_raises(Sunstone::Exception)               { Sunstone.send_request(Net::HTTP::Get.new('/450')) }
+    assert_raises(Sunstone::Exception::ServiceUnavailable)    { Sunstone.send_request(Net::HTTP::Get.new('/503')) }
+    assert_raises(Sunstone::Exception)               { Sunstone.send_request(Net::HTTP::Get.new('/550')) }
+  end
+  
+  test '#send_request(#<Net::HTTPRequest>, &block) returns value returned from &block' do
+    stub_request(:get, "http://testhost.com/test").to_return(:body => 'get')
+    
+    value = Sunstone.send_request(Net::HTTP::Get.new('/test')) do |response|
+      3215
+    end
+    
+    assert_equal 3215, value
+  end
+  
+  test '#send_request(#<Net::HTTPRequest>, &block)' do
+    stub_request(:get, "http://testhost.com/test").to_return(:body => 'get')
+    
+    Sunstone.send_request(Net::HTTP::Get.new('/test')) do |response|
+      assert_equal 'get', response.body
+    end
+
+    # make sure block is not called when not in valid_response_codes
+    stub_request(:get, "http://testhost.com/test").to_return(:status => 401, :body => 'get')
+    
+    assert_raises(Sunstone::Exception::Unauthorized) {
+      Sunstone.send_request(Net::HTTP::Get.new('/test')) do |response|
+        raise Sunstone::Exception, 'Should not get here'
+      end
+    }
+  end
+
+  test '#send_request(#<Net::HTTPRequest>, &block) with block reading chunks' do
+    rd, wr = IO.pipe
+    rd = Net::BufferedIO.new(rd)
+    wr.write(<<-DATA.gsub(/^ +/, '').gsub(/\n/, "\r\n"))
+      HTTP/1.1 200 OK
+      Content-Length: 5
+      
+      hello
+    DATA
+
+    res = Net::HTTPResponse.read_new(rd)
+    connection = mock('connection')
+    connection.stubs(:request).yields(res)
+    Sunstone.stubs(:with_connection).yields(connection)
+    
+    res.reading_body(rd, true) do
+      Sunstone.send_request(Net::HTTP::Get.new('/test')) do |response|
+        response.read_body do |chunk|
+          assert_equal('hello', chunk)
+        end
+      end
+    end
+  end
+  
+  test '#send_request(#<Net::HTTPRequest) adds cookies to the cookie store if present' do
+    store = CookieStore::HashStore.new
+    stub_request(:get, "http://testhost.com/test").to_return(:body => 'get', :headers => {'Set-Cookie' => 'foo=bar; Max-Age=3600'})
+    
+    Sunstone.with_cookie_store(store) do
+      Sunstone.send_request(Net::HTTP::Get.new('/test'))
+    end
+    
+    assert_equal 1, store.instance_variable_get(:@domains).size
+    assert_equal 1, store.instance_variable_get(:@domains)['testhost.com'].size
+    assert_equal 1, store.instance_variable_get(:@domains)['testhost.com']['/test'].size
+    assert_equal 'bar', store.instance_variable_get(:@domains)['testhost.com']['/test']['foo'].value
+  end
+  
+  test '#send_request(#<Net::HTTPRequest>) includes the headers' do
+    stub_request(:get, "http://testhost.com/test").with(:headers => {
+      'Api-Key'      => 'test_api_key',
+      'Content-Type' => 'application/json',
+      'User-Agent'   => Sunstone.user_agent
+    }).to_return(:body => "get")
+
+    assert_equal('get', Sunstone.send_request(Net::HTTP::Get.new('/test')).body)
+    
+    # Test without api key
+    Sunstone.site = "http://testhost.com"
+    stub_request(:get, "http://testhost.com/test").with(:headers => {
+      'Content-Type'=>'application/json',
+      'User-Agent'=>'Sunstone/0.1 Ruby/2.1.1-p76 x86_64-darwin13.0'
+    }).to_return(:body => "get")
+
+    assert_equal('get', Sunstone.send_request(Net::HTTP::Get.new('/test')).body)
+  end
+  
+  # Sunstone.get ==============================================================
+  
+  test '#get(path)' do
+    stub_request(:get, "http://testhost.com/test").to_return(:body => "get")
+    
+    assert_equal('get', Sunstone.get('/test').body)
+  end
+
+  test '#get(path, params) with params as string' do
+    stub_request(:get, "http://testhost.com/test").with(:query => {'key' => 'value'}).to_return(:body => "get")
+
+    assert_equal 'get', Sunstone.get('/test', 'key=value').body
+  end
+  
+  test '#get(path, params) with params as hash' do
+    stub_request(:get, "http://testhost.com/test").with(:query => {'key' => 'value'}).to_return(:body => "get")
+
+    assert_equal 'get', Sunstone.get('/test', {:key => 'value'}).body
+  end
+  
+  test '#get(path, &block)' do
+    stub_request(:get, "http://testhost.com/test").to_return(:body => 'get')
+    
+    Sunstone.get('/test') do |response|
+      assert_equal 'get', response.body
+    end
+  end
+
+  # Sunstone.post =============================================================
+
+  test '#post(path)' do
+    stub_request(:post, "http://testhost.com/test").to_return(:body => "post")
+    
+    assert_equal('post', Sunstone.post('/test').body)
+  end
+  
+  test '#post(path, body)' do
+    stub_request(:post, "http://testhost.com/test").with(:body => 'body').to_return(:body => "post")
+    
+    assert_equal('post', Sunstone.post('/test', 'body').body)
+  end
+  
+  test '#post(path, &block)' do
+    stub_request(:post, "http://testhost.com/test").to_return(:body => 'post')
+    
+    Sunstone.post('/test') do |response|
+      assert_equal 'post', response.body
+    end
+  end
+  
+  # Sunstone.put ==============================================================
+
+  test '#put(path)' do
+    stub_request(:put, "http://testhost.com/test").to_return(:body => "put")
+    
+    assert_equal('put', Sunstone.put('/test').body)
+  end
+  
+  test '#put(path, body)' do
+    stub_request(:put, "http://testhost.com/test").with(:body => 'body').to_return(:body => "put")
+    
+    assert_equal('put', Sunstone.put('/test', 'body').body)
+  end
+  
+  test '#put(path, &block)' do
+    stub_request(:put, "http://testhost.com/test").to_return(:body => 'put')
+    
+    Sunstone.put('/test') do |response|
+      assert_equal 'put', response.body
+    end
+  end
+
+  # Sunstone.delete ===========================================================
+
+  test '#delete' do
+    stub_request(:delete, "http://testhost.com/test").to_return(:body => "delete")
+    
+    assert_equal('delete', Sunstone.delete('/test').body)
+  end
+  
+  test '#delete(path, &block)' do
+    stub_request(:delete, "http://testhost.com/test").to_return(:body => 'delete')
+    
+    Sunstone.delete('/test') do |response|
+      assert_equal 'delete', response.body
+    end
+  end
+  
+  # Sunstone.ping =============================================================
+  
+  test '#ping' do
+    stub_request(:get, "http://testhost.com/ping").to_return(:body => 'pong')
+    
+    assert_equal( 'pong', Sunstone.ping )
+  end
+  
+  # Sunstone.config ===========================================================
+  
+  test '#config' do
+    stub_request(:get, "http://testhost.com/config").to_return(:body => '{"server": "configs"}')
+    
+    assert_equal( {:server => "configs"}, Sunstone.config )
+  end
+
+
+
+
+end