deltacloud-core 1.0.1 → 1.0.2

data/tests/deltacloud/server_test.rb

@@ -0,0 +1,149 @@
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative 'common.rb'
+
+describe Deltacloud::API do
+
+  before do
+    def app; Deltacloud::API; end
+  end
+
+  it 'has the config set property' do
+    Deltacloud::config[:deltacloud].must_be_kind_of Deltacloud::Server
+    root_url.must_equal Deltacloud[:deltacloud].root_url
+  end
+
+  it 'must provide the root_url entrypoint' do
+    get root_url
+    status.must_equal 200
+    xml.root.name.must_equal 'api'
+  end
+
+  it 'must advertise current API version in response headers' do
+    get root_url
+    headers['Server'].must_match(/Apache-Deltacloud\/(\d+).(\d+).(\d+)/)
+    xml.root.name.must_equal 'api'
+  end
+
+  it 'must advertise current API driver in response headers' do
+    get root_url
+    headers['X-Deltacloud-Driver'].must_equal Deltacloud[:deltacloud].default_driver.to_s
+    xml.root.name.must_equal 'api'
+  end
+
+  it 'must force authentication when :force_auth param set' do
+    get root_url, :force_auth => '1'
+    status.must_equal 401
+    authorize 'mockuser', 'mockpassword'
+    get root_url, :force_auth => '1'
+    status.must_equal 200
+  end
+
+  it 'must return list of collections on OPTIONS' do
+    options root_url
+    headers['Allow'].wont_be_nil
+    headers['Allow'].split(',').must_include 'Sinatra::Rabbit::DriversCollection'
+  end
+
+  it 'must support setting driver and provider using POST' do
+    post root_url, { :driver => :ec2 }
+    headers['Location'].wont_be_nil
+    headers['Location'].must_match(/\/api;driver=ec2/)
+    post root_url, { :provider => :test_provider }
+    headers['Location'].wont_be_nil
+    headers['Location'].must_match(/\/api;provider=test_provider/)
+  end
+
+  it 'must support matrix parameters for changing API driver' do
+    get root_url + ';driver=ec2'
+    headers['X-Deltacloud-Driver'].must_equal 'ec2'
+    xml.root.name.must_equal 'api'
+  end
+
+  it 'must support matrix parameters for changing API provider' do
+    get root_url + ';provider=someprovider'
+    headers['X-Deltacloud-Provider'].must_equal 'someprovider'
+    xml.root.name.must_equal 'api'
+  end
+
+  it 'must support matrix parameters for changing both API provider and driver' do
+    get root_url + ';provider=someprovider;driver=ec2'
+    headers['X-Deltacloud-Provider'].must_equal 'someprovider'
+    headers['X-Deltacloud-Driver'].must_equal 'ec2'
+    xml.root.name.must_equal 'api'
+  end
+
+  it 'must change driver back to default when no matrix param set' do
+    get root_url + ';driver=ec2'
+    headers['X-Deltacloud-Driver'].must_equal 'ec2'
+    get root_url
+    headers['X-Deltacloud-Driver'].must_equal Deltacloud[:deltacloud].default_driver.to_s
+    xml.root.name.must_equal 'api'
+  end
+
+  it 'must change provider back to default when no matrix param set' do
+    get root_url + ';provider=someprovider'
+    headers['X-Deltacloud-Provider'].must_equal 'someprovider'
+    get root_url
+    headers['X-Deltacloud-Provider'].must_be_nil
+    xml.root.name.must_equal 'api'
+  end
+
+  it 'must support matrix params when they are part of URL' do
+    get root_url + ';driver=ec2/hardware_profiles'
+    headers['X-Deltacloud-Driver'].must_equal 'ec2'
+    status.must_equal 200
+    xml.root.name.must_equal 'hardware_profiles'
+  end
+
+  it 'must switch driver using X-Deltacloud-Driver HTTP header in request' do
+    header 'X-Deltacloud-Driver', 'ec2'
+    get root_url
+    headers['X-Deltacloud-Driver'].must_equal 'ec2'
+    header 'X-Deltacloud-Driver', 'mock'
+    get root_url
+    headers['X-Deltacloud-Driver'].must_equal 'mock'
+  end
+
+  it 'must switch provider using X-Deltacloud-Provider HTTP header in request' do
+    header 'X-Deltacloud-Provider', 'someprovider'
+    get root_url
+    headers['X-Deltacloud-Provider'].must_equal 'someprovider'
+    header 'X-Deltacloud-Provider', nil
+    get root_url
+    headers['X-Deltacloud-Provider'].must_be_nil
+  end
+
+  it 'must support media type negotiation for JSON format' do
+    header 'Accept', 'application/json'
+    get root_url
+    status.must_equal 200
+    headers['Content-Type'].must_equal 'application/json'
+    JSON::parse(response_body).must_be_kind_of Hash
+    JSON::parse(response_body)['api'].must_be_kind_of Hash
+  end
+
+  it 'must support media type negotiation for HTML format' do
+    header 'Accept', 'text/html'
+    get root_url
+    status.must_equal 200
+    headers['Content-Type'].must_equal 'text/html'
+    response_body.must_match(/^<\!DOCTYPE html>/)
+  end
+
+  it 'must support media type negotiation for XML format' do
+    header 'Accept', 'application/xml'
+    get root_url
+    status.must_equal 200
+    headers['Content-Type'].must_equal 'application/xml'
+    xml.root.name.must_equal 'api'
+  end
+
+  it 'must return proper error when unknown media type requested' do
+    header 'Accept', 'application/unknown'
+    get root_url
+    status.must_equal 406
+  end
+
+end

data/tests/deprecated/api/library_test.rb

@@ -0,0 +1,6 @@
+require_relative './common'
+require_relative '../../lib/deltacloud/api'
+
+require 'pp'
+
+

data/tests/deprecated/drivers/ec2/common.rb

@@ -0,0 +1,23 @@
+ENV['API_DRIVER']   = 'ec2'
+ENV['TESTS_API_USERNAME'] = 'AKIAIZ63KHGXIWDMBY6Q'
+ENV['TESTS_API_PASSWORD'] = 'zUfBCbML2S6pXKS44eEEXw0Cf/G8z9hMSxP2hcLV'
+ENV['RACK_ENV']     = 'test'
+
+$:.unshift File.join(File.dirname(__FILE__), '..', '..', '..')
+require 'tests/minitest_common'
+
+require 'vcr'
+require 'timecop'
+
+VCR.configure do |c|
+  c.cassette_library_dir = File.join(File.dirname(__FILE__), 'fixtures')
+  c.hook_into :webmock
+  c.default_cassette_options = { :record => :new_episodes }
+  #c.default_cassette_options = { :record => :none }
+end
+
+# Let's set time that timecop will use to freeze
+# Time.now will then return this time instead of 'real' system time
+
+FREEZED_TIME = DateTime.parse("2012-05-31 12:58:00 +0200")
+Timecop.freeze(FREEZED_TIME)

data/tests/deprecated/drivers/ec2/images_test.rb

@@ -0,0 +1,230 @@
+$:.unshift File.join(File.dirname(__FILE__), '..', '..', '..')
+require 'tests/drivers/ec2/common'
+
+describe 'Deltacloud API Images' do
+  before do
+    Timecop.freeze(FREEZED_TIME)
+    VCR.insert_cassette __name__
+  end
+
+  after do
+    VCR.eject_cassette
+  end
+
+  include Deltacloud::Test
+
+  it 'must advertise have the images collection in API entrypoint' do
+    get root_url
+    (xml_response/'api/link[@rel=images]').wont_be_empty
+  end
+
+  it 'must require authentication to access the "image" collection' do
+    get collection_url(:images)
+    last_response.status.must_equal 401
+  end
+
+  it 'should respond with HTTP_OK when accessing the :images collection with authentication' do
+    authenticate
+    get collection_url(:images)
+    last_response.status.must_equal 200
+  end
+
+  it 'should support the JSON media type' do
+    authenticate
+    header 'Accept', 'application/json'
+    get collection_url(:images)
+    last_response.status.must_equal 200
+    last_response.headers['Content-Type'].must_equal 'application/json'
+  end
+
+  it 'must include the ETag in HTTP headers' do
+    authenticate
+    get collection_url(:images)
+    last_response.headers['ETag'].wont_be_nil
+  end
+
+  it 'must have the "images" element on top level' do
+    authenticate
+    get collection_url(:images)
+    xml_response.root.name.must_equal 'images'
+  end
+
+  it 'must have some "image" elements inside "images"' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').wont_be_empty
+  end
+
+  it 'must provide the :id attribute for each image in collection' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').each do |r|
+      r[:id].wont_be_nil
+    end
+  end
+
+  it 'must include the :href attribute for each "image" element in collection' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').each do |r|
+      r[:href].wont_be_nil
+    end
+  end
+
+  it 'must use the absolute URL in each :href attribute' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').each do |r|
+      r[:href].must_match /^http/
+    end
+  end
+
+  it 'must have the URL ending with the :id of the image' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').each do |r|
+      r[:href].must_match /#{r[:id]}$/
+    end
+  end
+
+  it 'must return the list of valid parameters for the :index action' do
+    authenticate
+    options collection_url(:images) + '/index'
+    last_response.headers['Allow'].wont_be_nil
+  end
+
+  it 'must have the "name" element defined for each image in collection' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').each do |r|
+      (r/'name').wont_be_empty
+    end
+  end
+
+  it 'must have the "state" element defined for each image in collection' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').each do |r|
+      (r/'state').wont_be_empty
+    end
+  end
+
+  it 'must return the full "image" when following the URL in image element' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').wont_be_empty
+    (xml_response/'images/image')[0..10].each do |r|
+      VCR.use_cassette "#{__name__}_image_#{r[:id]}" do
+        get collection_url(:images) + '/' + r[:id]
+      end
+      last_response.status.must_equal 200
+    end
+  end
+
+  it 'must have the "name" element for the image and it should match with the one in collection' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').wont_be_empty
+    (xml_response/'images/image')[0..10].each do |r|
+      VCR.use_cassette "#{__name__}_image_#{r[:id]}" do
+        get collection_url(:images) + '/' + r[:id]
+      end
+      (xml_response/'name').wont_be_empty
+      (xml_response/'name').first.text.must_equal((r/'name').first.text)
+    end
+  end
+
+  it 'must have the "name" element for the image and it should match with the one in collection' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').wont_be_empty
+    (xml_response/'images/image')[0..10].each do |r|
+      VCR.use_cassette "#{__name__}_image_#{r[:id]}" do
+        get collection_url(:images) + '/' + r[:id]
+      end
+      (xml_response/'state').wont_be_empty
+      (xml_response/'state').first.text.must_equal((r/'state').first.text)
+    end
+  end
+
+  it 'should have the "owner_id" element for each image' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').wont_be_empty
+    (xml_response/'images/image')[0..10].each do |r|
+      VCR.use_cassette "#{__name__}_image_#{r[:id]}" do
+        get collection_url(:images) + '/' + r[:id]
+      end
+      (xml_response/'owner_id').wont_be_empty
+    end
+  end
+
+  it 'should have the "description" element for each image' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').wont_be_empty
+    (xml_response/'images/image')[0..10].each do |r|
+      VCR.use_cassette "#{__name__}_image_#{r[:id]}" do
+        get collection_url(:images) + '/' + r[:id]
+      end
+      (xml_response/'description').wont_be_empty
+    end
+  end
+
+  it 'should have the "architecture" element for each image' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').wont_be_empty
+    (xml_response/'images/image')[0..10].each do |r|
+      VCR.use_cassette "#{__name__}_image_#{r[:id]}" do
+        get collection_url(:images) + '/' + r[:id]
+      end
+      (xml_response/'architecture').wont_be_empty
+    end
+  end
+
+  it 'should include the list of compatible hardware_profiles for each image' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').wont_be_empty
+    (xml_response/'images/image')[0..10].each do |r|
+      VCR.use_cassette "#{__name__}_image_#{r[:id]}" do
+        get collection_url(:images) + '/' + r[:id]
+      end
+      (xml_response/'hardware_profiles/hardware_profile').wont_be_empty
+      (xml_response/'hardware_profiles/hardware_profile').each do |hwp|
+        hwp[:href].wont_be_nil
+        hwp[:href].must_match /^http/
+        hwp[:id].wont_be_nil
+        hwp[:href].must_match /\/#{hwp[:id]}$/
+        hwp[:rel].must_equal 'hardware_profile'
+      end
+    end
+  end
+
+  it 'should advertise the list of actions that can be executed for each image' do
+    authenticate
+    get collection_url(:images)
+    (xml_response/'images/image').wont_be_empty
+    (xml_response/'images/image')[0..10].each do |r|
+      VCR.use_cassette "#{__name__}_image_#{r[:id]}" do
+        get collection_url(:images) + '/' + r[:id]
+      end
+      (xml_response/'actions/link').wont_be_empty
+      (xml_response/'actions/link').each do |l|
+        l[:href].wont_be_nil
+        l[:href].must_match /^http/
+        l[:method].wont_be_nil
+        l[:rel].wont_be_nil
+      end
+    end
+  end
+
+  it 'should give client HTML form to create new image' do
+    authenticate
+    header 'Accept', 'text/html'
+    get collection_url(:images) + '/new'
+    last_response.status.must_equal 200
+  end
+
+end

data/tests/deprecated/drivers/ec2/keys_test.rb

@@ -0,0 +1,181 @@
+$:.unshift File.join(File.dirname(__FILE__), '..', '..', '..')
+require 'tests/drivers/ec2/common'
+
+describe 'Deltacloud API Keys' do
+
+  before do
+    Timecop.freeze(FREEZED_TIME)
+    VCR.insert_cassette __name__
+  end
+
+  after do
+    VCR.eject_cassette
+  end
+
+  include Deltacloud::Test
+
+  it 'must advertise have the keys collection in API entrypoint' do
+    get root_url
+    (xml_response/'api/link[@rel=keys]').wont_be_empty
+  end
+
+  it 'must require authentication to access the "key" collection' do
+    get collection_url(:keys)
+    last_response.status.must_equal 401
+  end
+
+  it 'should respond with HTTP_OK when accessing the :keys collection with authentication' do
+    authenticate
+    get collection_url(:keys)
+    last_response.status.must_equal 200
+  end
+
+  it 'should support the JSON media type' do
+    authenticate
+    header 'Accept', 'application/json'
+    get collection_url(:keys)
+    last_response.status.must_equal 200
+    last_response.headers['Content-Type'].must_equal 'application/json'
+  end
+
+  it 'must include the ETag in HTTP headers' do
+    authenticate
+    get collection_url(:keys)
+    last_response.headers['ETag'].wont_be_nil
+  end
+
+  it 'must have the "keys" element on top level' do
+    authenticate
+    get collection_url(:keys)
+    xml_response.root.name.must_equal 'keys'
+  end
+
+  it 'must have some "key" elements inside "keys"' do
+    authenticate
+    get collection_url(:keys)
+    (xml_response/'keys/key').wont_be_empty
+  end
+
+  it 'must tell the kind of "key" elements inside "keys"' do
+    authenticate
+    get collection_url(:keys)
+    (xml_response/'keys/key').each do |k|
+      k[:type].must_match /(key|password)/
+    end
+  end
+
+  it 'must provide the :id attribute for each key in collection' do
+    authenticate
+    get collection_url(:keys)
+    (xml_response/'keys/key').each do |r|
+      r[:id].wont_be_nil
+    end
+  end
+
+  it 'must include the :href attribute for each "key" element in collection' do
+    authenticate
+    get collection_url(:keys)
+    (xml_response/'keys/key').each do |r|
+      r[:href].wont_be_nil
+    end
+  end
+
+  it 'must use the absolute URL in each :href attribute' do
+    authenticate
+    get collection_url(:keys)
+    (xml_response/'keys/key').each do |r|
+      r[:href].must_match /^http/
+    end
+  end
+
+  it 'must have the URL ending with the :id of the key' do
+    authenticate
+    get collection_url(:keys)
+    (xml_response/'keys/key').each do |r|
+      r[:href].must_match /#{r[:id]}$/
+    end
+  end
+
+  it 'must return the list of valid parameters for the :index action' do
+    authenticate
+    options collection_url(:keys) + '/index'
+    last_response.headers['Allow'].wont_be_nil
+  end
+
+  it 'must have the "name" element defined for each key in collection' do
+    authenticate
+    get collection_url(:keys)
+    (xml_response/'keys/key').each do |r|
+      (r/'name').wont_be_empty
+    end
+  end
+
+
+  it 'must return the full "key" when following the URL in key element' do
+    authenticate
+    get collection_url(:keys)
+    (xml_response/'keys/key').each do |r|
+      get collection_url(:keys) + '/' + r[:id]
+      last_response.status.must_equal 200
+    end
+  end
+
+  it 'must have the "name" element for the key and it should match with the one in collection' do
+    authenticate
+    get collection_url(:keys)
+    (xml_response/'keys/key').each do |r|
+      VCR.use_cassette "#{__name__}_key_#{r[:id]}" do
+        get collection_url(:keys) + '/' + r[:id]
+      end
+      (xml_response/'name').wont_be_empty
+      (xml_response/'name').first.text.must_equal((r/'name').first.text)
+    end
+  end
+
+  it 'must have the "name" element for the key and it should match with the one in collection' do
+    authenticate
+    get collection_url(:keys)
+    (xml_response/'keys/key').each do |r|
+      VCR.use_cassette "#{__name__}_key_#{r[:id]}" do
+        get collection_url(:keys) + '/' + r[:id]
+      end
+      (xml_response/'state').wont_be_empty
+      (xml_response/'state').first.text.must_equal((r/'state').first.text)
+    end
+  end
+
+  it 'should advertise the list of actions that can be executed for each key' do
+    authenticate
+    get collection_url(:keys)
+    (xml_response/'keys/key').each do |r|
+      VCR.use_cassette "#{__name__}_key_#{r[:id]}" do
+        get collection_url(:keys) + '/' + r[:id]
+      end
+      (xml_response/'actions/link').wont_be_empty
+      (xml_response/'actions/link').each do |l|
+        l[:href].wont_be_nil
+        l[:href].must_match /^http/
+        l[:method].wont_be_nil
+        l[:rel].wont_be_nil
+      end
+    end
+  end
+
+  it 'should allow to create a new key and then remove it' do
+    authenticate
+    key_name = Time.now.to_i.to_s
+    post collection_url(:keys), {
+      :name => 'test_key_'+key_name
+    }
+    last_response.status.must_equal 201 # HTTP_CREATED
+    VCR.use_cassette "#{__name__}_key_#{key_name}" do
+      get collection_url(:keys) + '/' + 'test_key_'+key_name
+    end
+    last_response.status.must_equal 200 # HTTP_OK
+    VCR.use_cassette "#{__name__}_delete_key_#{key_name}" do
+      delete collection_url(:keys) + '/' + 'test_key_'+key_name
+    end
+    last_response.status.must_equal 204 # HTTP_NO_CONTENT
+  end
+
+end