deltacloud-core 1.0.2 → 1.0.3

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

@@ -1,19 +0,0 @@
-$:.unshift File.join(File.dirname(__FILE__), '..', '..', '..')
-require 'tests/drivers/ec2/common'
-
-describe 'Deltacloud API' do
-
-  before do
-    Timecop.freeze(FREEZED_TIME)
-    VCR.insert_cassette __name__
-  end
-
-  after do
-    VCR.eject_cassette
-  end
-
-  include Deltacloud::Test
-
-  eval File.read('tests/minitest_common_api_test.rb')
-
-end

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

@@ -1,23 +0,0 @@
-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/drivers_test.rb

@@ -1,120 +0,0 @@
-$:.unshift File.join(File.dirname(__FILE__), '..', '..', '..')
-require 'tests/drivers/ec2/common'
-
-describe 'Deltacloud API drivers' do
-  include Deltacloud::Test
-  before do
-    Timecop.freeze(FREEZED_TIME)
-    VCR.insert_cassette __name__
-  end
-
-  after do
-    VCR.eject_cassette
-  end
-
-  it 'must advertise have the drivers collection in API entrypoint' do
-    get root_url
-    (xml_response/'api/link[@rel=drivers]').wont_be_empty
-  end
-
-  it 'must not require authentication to access the "driver" collection' do
-    get collection_url(:drivers)
-    last_response.status.must_equal 200
-  end
-
-  it 'should respond with HTTP_OK when accessing the :drivers collection with authentication' do
-    get collection_url(:drivers)
-    last_response.status.must_equal 200
-  end
-
-  it 'should support the JSON media type' do
-    header 'Accept', 'application/json'
-    get collection_url(:drivers)
-    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
-    get collection_url(:drivers)
-    last_response.headers['ETag'].wont_be_nil
-  end
-
-  it 'must have the "drivers" element on top level' do
-    get collection_url(:drivers)
-    xml_response.root.name.must_equal 'drivers'
-  end
-
-  it 'must have some "driver" elements inside "drivers"' do
-    get collection_url(:drivers)
-    (xml_response/'drivers/driver').wont_be_empty
-  end
-
-  it 'must provide the :id attribute for each driver in collection' do
-    get collection_url(:drivers)
-    (xml_response/'drivers/driver').each do |r|
-      r[:id].wont_be_nil
-    end
-  end
-
-  it 'must include the :href attribute for each "driver" element in collection' do
-    get collection_url(:drivers)
-    (xml_response/'drivers/driver').each do |r|
-      r[:href].wont_be_nil
-    end
-  end
-
-  it 'must use the absolute URL in each :href attribute' do
-    get collection_url(:drivers)
-    (xml_response/'drivers/driver').each do |r|
-      r[:href].must_match /^http/
-    end
-  end
-
-  it 'must have the URL ending with the :id of the driver' do
-    get collection_url(:drivers)
-    (xml_response/'drivers/driver').each do |r|
-      r[:href].must_match /#{r[:id]}$/
-    end
-  end
-
-  it 'must return the list of valid parameters for the :index action' do
-    options collection_url(:drivers) + '/index'
-    last_response.headers['Allow'].wont_be_nil
-  end
-
-  it 'must have the "name" element defined for each driver in collection' do
-    get collection_url(:drivers)
-    (xml_response/'drivers/driver').each do |r|
-      (r/'name').wont_be_nil
-    end
-  end
-
-
-  it 'must return the full "driver" when following the URL in driver element' do
-    authenticate
-    get collection_url(:drivers)
-    (xml_response/'drivers/driver').each do |r|
-      get collection_url(:drivers) + '/' + r[:id]
-      last_response.status.must_equal 200
-    end
-  end
-
-  it 'must have the "name" element for the driver and it should match with the one in collection' do
-    authenticate
-    get collection_url(:drivers)
-    (xml_response/'drivers/driver').each do |r|
-      r[:id].wont_be_nil
-      get collection_url(:drivers) + '/' + r[:id]
-      (xml_response/'name').wont_be_empty
-      (xml_response/'name').first.text.must_equal((r/'name').first.text)
-    end
-  end
-
-  it 'should advertise available providers for some drivers' do
-    get collection_url(:drivers)
-    (xml_response/'drivers/driver/provider').each do |p|
-      p[:id].wont_be_nil
-    end
-  end
-
-end

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

@@ -1,224 +0,0 @@
-$:.unshift File.join(File.dirname(__FILE__), '..', '..', '..')
-require 'tests/drivers/ec2/common'
-
-describe 'Deltacloud API Hardware Profiles' do
-  include Deltacloud::Test
-
-  it 'must advertise have the hardware_profiles collection in API entrypoint' do
-    get root_url
-    (xml_response/'api/link[@rel=hardware_profiles]').wont_be_empty
-  end
-
-  it 'should respond with HTTP_OK when accessing the :hardware_profiles collection with authentication' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    last_response.status.must_equal 200
-  end
-
-  it 'should support the JSON media type' do
-    authenticate
-    header 'Accept', 'application/json'
-    get collection_url(:hardware_profiles)
-    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(:hardware_profiles)
-    last_response.headers['ETag'].wont_be_nil
-  end
-
-  it 'must have the "hardware_profiles" element on top level' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    xml_response.root.name.must_equal 'hardware_profiles'
-  end
-
-  it 'must have some "hardware_profile" elements inside "hardware_profiles"' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').wont_be_empty
-  end
-
-  it 'must provide the :id attribute for each hardware_profile in collection' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      r[:id].wont_be_nil
-    end
-  end
-
-  it 'must include the :href attribute for each "hardware_profile" element in collection' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').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(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      r[:href].must_match /^http/
-    end
-  end
-
-  it 'must have the URL ending with the :id of the hardware_profile' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').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(:hardware_profiles) + '/index'
-    last_response.headers['Allow'].wont_be_nil
-  end
-
-  it 'must have the "name" element defined for each hardware_profile in collection' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      (r/'name').wont_be_empty
-    end
-  end
-
-  it 'should have the "property" element defined if not the opaque hardware_profile' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      next if r[:id] == 'opaque'
-      (r/'property').wont_be_empty
-    end
-  end
-
-  it 'must define the :kind attribute for each "property" ' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      next if r[:id] == 'opaque'
-      (r/'property').each { |p| p[:kind].wont_be_nil }
-    end
-  end
-
-  it 'must define the :name attribute for each "property" ' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      next if r[:id] == 'opaque'
-      (r/'property').each { |p| p[:name].wont_be_nil }
-    end
-  end
-
-  it 'must define the :unit attribute for each "property" ' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      next if r[:id] == 'opaque'
-      (r/'property').each { |p| p[:unit].wont_be_nil }
-    end
-  end
-
-  it 'must define the :value attribute for each "property" ' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      next if r[:id] == 'opaque'
-      (r/'property').each { |p| p[:value].wont_be_nil }
-    end
-  end
-
-  it 'must define the "param" element if property kind is not "fixed"' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      next if r[:id] == 'opaque'
-      (r/'property').each do |p|
-        next if p[:kind] == 'fixed'
-        (p/'param').wont_be_empty
-        (p/'param').size.must_equal 1
-        (p/'param').first[:href].wont_be_nil
-        (p/'param').first[:href].must_match /^http/
-        (p/'param').first[:method].wont_be_nil
-        (p/'param').first[:name].wont_be_nil
-        (p/'param').first[:operation].wont_be_nil
-      end
-    end
-  end
-
-  it 'must provide the list of valid values when the property is defined as "enum"' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      next if r[:id] == 'opaque'
-      (r/'property').each do |p|
-        next if p[:kind] != 'enum'
-        (p/'enum/entry').wont_be_empty
-        (p/'enum/entry').each { |e| e[:value].wont_be_nil }
-      end
-    end
-  end
-
-  it 'must provide the range of valid values when the property is defined as "range"' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      next if r[:id] == 'opaque'
-      (r/'property').each do |p|
-        next if p[:kind] != 'range'
-        (p/'range').wont_be_empty
-        (p/'range').size.must_equal 1
-        (p/'range').first[:first].wont_be_nil
-        (p/'range').first[:last].wont_be_nil
-      end
-    end
-  end
-
-  it 'must provide the default value within the range if property defined as "range"' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      next if r[:id] == 'opaque'
-      (r/'property').each do |p|
-        next if p[:kind] != 'range'
-        ((p/'range').first[:first].to_i..(p/'range').first[:last].to_i).include?(p[:value].to_i).must_equal true
-      end
-    end
-  end
-
-  it 'must provide the default value that is included in enum list if property defined as "enum"' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      next if r[:id] == 'opaque'
-      (r/'property').each do |p|
-        next if p[:kind] != 'enum'
-        (p/'enum/entry').map { |e| e[:value] }.include?(p[:value]).must_equal true
-      end
-    end
-  end
-
-  it 'must return the full "hardware_profile" when following the URL in hardware_profile element' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      get collection_url(:hardware_profiles) + '/' + r[:id]
-      last_response.status.must_equal 200
-    end
-  end
-
-  it 'must have the "name" element for the hardware_profile and it should match with the one in collection' do
-    authenticate
-    get collection_url(:hardware_profiles)
-    (xml_response/'hardware_profiles/hardware_profile').each do |r|
-      get collection_url(:hardware_profiles) + '/' + r[:id]
-      (xml_response/'name').wont_be_empty
-      (xml_response/'name').first.text.must_equal((r/'name').first.text)
-    end
-  end
-
-end

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

@@ -1,230 +0,0 @@
-$:.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