deltacloud-core 1.0.5 → 1.1.0

data/tests/cimi/db/db_helper.rb

@@ -0,0 +1,30 @@
+# Memory database
+if RUBY_PLATFORM == 'java'
+  ENV['DATABASE_LOCATION'] = 'jdbc:sqlite::memory:'
+else
+  ENV['DATABASE_LOCATION'] = 'sqlite:/'
+end
+
+ENV['RACK_ENV'] = 'development'
+
+require_relative '../../../lib/db'
+
+module Deltacloud
+  module DatabaseTestHelper
+
+    def check_entity_base_attrs(entity, entity_klass, provider)
+      entity.must_be_kind_of entity_klass
+      entity.id.wont_be_nil
+      entity.created_at.wont_be_nil
+      entity.name.wont_be_empty
+      entity.description.wont_be_empty
+      entity.provider.must_equal provider
+      entity.model.must_equal entity_klass
+      entity.to_hash[:name].must_equal entity.name
+      entity.to_hash[:description].must_equal entity.description
+      entity.to_hash[:property].must_be_kind_of Hash
+      entity.to_hash[:property].wont_be_empty
+    end
+
+  end
+end

data/tests/cimi/db/schema_test.rb

@@ -0,0 +1,94 @@
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative 'db_helper.rb'
+require_relative '../spec_helper.rb'
+
+describe "Deltacloud::Database" do
+
+  include Deltacloud::DatabaseTestHelper
+
+  before do
+    @db = Deltacloud.database
+  end
+
+  it 'has valid database connection' do
+    @db.test_connection.must_equal true
+  end
+
+  it 'creates the database schema' do
+    @db.tables.wont_be_empty
+    @db.tables.must_include :providers
+    @db.tables.must_include :entities
+  end
+
+  it 'should allow creation of providers' do
+    provider = Deltacloud::Database::Provider
+    provider.table_name.must_equal :providers
+    new_provider = provider.create(:driver => 'mock', :url => 'test1')
+    new_provider.must_be_kind_of provider
+    new_provider.destroy.wont_equal false
+  end
+
+  it 'should not allow creation of provider with nil driver' do
+    provider = Deltacloud::Database::Provider
+    lambda {
+      new_provider = provider.create(:driver => nil, :url => 'test1')
+    }.must_raise Sequel::InvalidValue
+  end
+
+  it 'allow creation of simple entity' do
+    provider = Deltacloud::Database::Provider
+    entity = Deltacloud::Database::Entity
+    entity.table_name.must_equal :entities
+
+    entity_provider = provider.create(:driver => :mock)
+
+    new_entity = entity_provider.add_entity(
+      :name => 'testEntity1',
+      :description => 'testEntity1 description',
+      :ent_properties => JSON::dump(:key => 'value')
+    )
+
+    check_entity_base_attrs new_entity, entity, entity_provider
+
+    new_entity.destroy.wont_equal false
+    entity_provider.destroy.wont_equal false
+  end
+
+  it 'allow creation of extended entities' do
+    provider = Deltacloud::Database::Provider
+    entity = Deltacloud::Database::MachineTemplate
+    entity.table_name.must_equal :entities
+    entity_provider = provider.create(:driver => :mock)
+    new_entity = entity_provider.add_machine_template(
+      :name => 'testMachineTemplate1',
+      :description => 'testMachineTemplate1 description',
+      :ent_properties => JSON::dump(:key => 'value'),
+      :machine_config => 'http://example.com/cimi/machine_configurations/m1-small',
+      :machine_image => 'http://example.com/cimi/machine_image/img1'
+    )
+    check_entity_base_attrs new_entity, entity, entity_provider
+
+    new_entity.machine_config.wont_be_empty
+    new_entity.machine_image.wont_be_empty
+
+    new_entity.destroy.wont_equal false
+    entity_provider.destroy.wont_equal false
+  end
+
+  it 'validate presence of required attributes for extended entities' do
+    provider = Deltacloud::Database::Provider
+    entity = Deltacloud::Database::MachineTemplate
+    entity.table_name.must_equal :entities
+    entity_provider = provider.create(:driver => :mock)
+    lambda {
+      new_entity = entity_provider.add_machine_template(
+        :name => 'testMachineTemplate1',
+        :description => 'testMachineTemplate1 description',
+        :ent_properties => JSON::dump(:key => 'value')
+      )
+    }.must_raise Sequel::ValidationFailed
+  end
+
+end

data/tests/cimi/model/collection_spec.rb

@@ -19,7 +19,6 @@ require 'require_relative' if RUBY_VERSION < '1.9'
 require_relative '../spec_helper.rb' if require 'minitest/autorun'
 
 require 'nokogiri'
-require 'json'
 
 describe "Collection class" do
 

data/tests/cimi/model/machine_spec.rb

@@ -23,10 +23,27 @@ describe "Machine model" do
   before do
     @xml = IO::read(File::join(DATA_DIR, "machine.xml"))
     @json = IO::read(File::join(DATA_DIR, "machine.json"))
+    @xml_minimal = IO::read(File::join(DATA_DIR, "machine-minimal.xml"))
+    @json_minimal = IO::read(File::join(DATA_DIR, "machine-minimal.json"))
   end
 
   it "can be constructed from XML and JSON" do
     should_properly_serialize_model CIMI::Model::Machine, @xml, @json
   end
 
+  it "should parse minimal XML machine" do
+    machine = CIMI::Model::Machine.from_xml(@xml_minimal)
+    machine.id.wont_be_nil
+    machine.state.must_equal "STARTED"
+    machine.disks.entries.wont_be_nil
+    machine.disks.entries.size.must_equal 0
+  end
+
+  it "should parse minimal JSON machine" do
+    machine = CIMI::Model::Machine.from_json(@json_minimal)
+    machine.id.wont_be_nil
+    machine.state.must_equal "STARTED"
+    machine.disks.entries.wont_be_nil
+    machine.disks.entries.size.must_equal 0
+  end
 end

data/tests/cimi/spec_helper.rb

@@ -18,6 +18,7 @@ require 'rubygems'
 require 'minitest/autorun'
 require 'minitest/spec'
 require 'xmlsimple'
+require 'json/pure'
 require 'require_relative' if RUBY_VERSION < '1.9'
 
 require_relative '../../lib/deltacloud/core_ext.rb'
@@ -66,8 +67,8 @@ class HashCmp
         # and therefore not ordered, even though XmlSimple
         # represents them as an array; since that array can be generated
         # from a hash, in Ruby 1.8 the order of the array is random
-        exp = exp.sort! { |item1, item2| item1["name"] <=> item2["name"] }
-        act = act.sort! { |item1, item2| item1["name"] <=> item2["name"] }
+        exp = exp.sort! { |item1, item2| item1["key"] <=> item2["key"] }
+        act = act.sort! { |item1, item2| item1["key"] <=> item2["key"] }
       end
       0.upto(exp.size-1) do |i|
         compare_values(exp[i], act[i], path + [ "#{name}[#{i}]" ])

data/tests/deltacloud/collections/buckets_collection_test.rb

@@ -61,5 +61,8 @@ describe Deltacloud::Collections::Buckets do
     status.must_equal 204
   end
 
+  it 'properly serialize attributes in JSON' do
+    check_json_serialization_for :bucket, 'bucket1'
+  end
 
 end

data/tests/deltacloud/collections/drivers_collection_test.rb

@@ -34,4 +34,14 @@ describe Deltacloud::Collections::Drivers do
     end
   end
 
+  it 'properly serialize attributes in JSON' do
+    header 'Accept', 'application/json'
+    get root_url + "/drivers/ec2"
+    status.must_equal 200
+    json['driver'].wont_be_empty
+    json['driver']['id'].must_equal 'ec2'
+    json['driver']['name'].must_equal 'EC2'
+    json['driver']['entrypoints'].wont_be_empty
+  end
+
 end

data/tests/deltacloud/collections/hardware_profiles_collection_test.rb

@@ -50,4 +50,8 @@ describe Deltacloud::Collections::HardwareProfiles do
     status.must_equal 404
   end
 
+  it 'properly serialize attributes in JSON' do
+    check_json_serialization_for :hardware_profile, 'm1-small'
+  end
+
 end

data/tests/deltacloud/collections/images_collection_test.rb

@@ -56,4 +56,8 @@ describe Deltacloud::Collections::Images do
     status.must_equal 404
   end
 
+  it 'properly serialize attributes in JSON' do
+    check_json_serialization_for :image, 'img1'
+  end
+
 end

data/tests/deltacloud/collections/instances_collection_test.rb

@@ -59,5 +59,18 @@ describe Deltacloud::Collections::Instances do
     status.must_equal 204
   end
 
-
+  it 'properly serialize attributes in JSON' do
+    header 'Accept', 'application/json'
+    get root_url + "/instances"
+    status.must_equal 200
+    json['instances'].wont_be_empty
+    get root_url + "/instances/inst1"
+    status.must_equal 200
+    json['instance'].wont_be_empty
+    Instance.attributes.each do |attr|
+      attr = attr.to_s.gsub(/_id$/,'') if attr.to_s =~ /_id$/
+      next if ['authn_error', 'firewalls', 'keyname', 'username', 'password'].include?(attr.to_s)
+      json['instance'].keys.must_include attr.to_s
+    end
+  end
 end

data/tests/deltacloud/collections/keys_collection_test.rb

@@ -57,4 +57,8 @@ describe Deltacloud::Collections::Keys do
     status.must_equal 404
   end
 
+  it 'properly serialize attributes in JSON' do
+    check_json_serialization_for :key, 'test-key'
+  end
+
 end

data/tests/deltacloud/collections/realms_collection_test.rb

@@ -0,0 +1,47 @@
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative File.join('..', 'common.rb')
+
+describe Deltacloud::Collections::Realms do
+
+  before do
+    def app; run_frontend; end
+    authorize 'mockuser', 'mockpassword'
+    @collection = Deltacloud::Collections.collection(:realms)
+  end
+
+  it 'has index operation' do
+    @collection.operation(:index).must_equal Sinatra::Rabbit::RealmsCollection::IndexOperation
+  end
+
+  it 'has show operation' do
+    @collection.operation(:show).must_equal Sinatra::Rabbit::RealmsCollection::ShowOperation
+  end
+
+  it 'returns list of realms in various formats with index operation' do
+    formats.each do |format|
+      header 'Accept', format
+      get root_url + '/realms'
+      status.must_equal 200
+    end
+  end
+
+  it 'returns details about key in various formats with show operation' do
+    formats.each do |format|
+      header 'Accept', format
+      get root_url + '/realms/eu'
+      status.must_equal 200
+    end
+  end
+
+  it 'reports 404 when querying non-existing key' do
+    get root_url + '/realms/unknown'
+    status.must_equal 404
+  end
+
+  it 'properly serialize attributes in JSON' do
+    check_json_serialization_for :realm, 'us'
+  end
+
+end

data/tests/deltacloud/collections/storage_snapshots_collection_test.rb

@@ -0,0 +1,47 @@
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative File.join('..', 'common.rb')
+
+describe Deltacloud::Collections::StorageSnapshots do
+
+  before do
+    def app; run_frontend; end
+    authorize 'mockuser', 'mockpassword'
+    @collection = Deltacloud::Collections.collection(:storage_snapshots)
+  end
+
+  it 'has index operation' do
+    @collection.operation(:index).must_equal Sinatra::Rabbit::StorageSnapshotsCollection::IndexOperation
+  end
+
+  it 'has show operation' do
+    @collection.operation(:show).must_equal Sinatra::Rabbit::StorageSnapshotsCollection::ShowOperation
+  end
+
+  it 'returns list of storage_snapshots in various formats with index operation' do
+    formats.each do |format|
+      header 'Accept', format
+      get root_url + '/storage_snapshots'
+      status.must_equal 200
+    end
+  end
+
+  it 'returns details about storage_volume in various formats with show operation' do
+    formats.each do |format|
+      header 'Accept', format
+      get root_url + '/storage_snapshots/snap1'
+      status.must_equal 200
+    end
+  end
+
+  it 'reports 404 when querying non-existing key' do
+    get root_url + '/storage_snapshots/unknown'
+    status.must_equal 404
+  end
+
+  it 'properly serialize attributes in JSON' do
+    check_json_serialization_for :storage_snapshot, 'snap1', [:name, :description]
+  end
+
+end

data/tests/deltacloud/collections/storage_volumes_collection_test.rb

@@ -0,0 +1,47 @@
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative File.join('..', 'common.rb')
+
+describe Deltacloud::Collections::StorageVolumes do
+
+  before do
+    def app; run_frontend; end
+    authorize 'mockuser', 'mockpassword'
+    @collection = Deltacloud::Collections.collection(:storage_volumes)
+  end
+
+  it 'has index operation' do
+    @collection.operation(:index).must_equal Sinatra::Rabbit::StorageVolumesCollection::IndexOperation
+  end
+
+  it 'has show operation' do
+    @collection.operation(:show).must_equal Sinatra::Rabbit::StorageVolumesCollection::ShowOperation
+  end
+
+  it 'returns list of storage_volumes in various formats with index operation' do
+    formats.each do |format|
+      header 'Accept', format
+      get root_url + '/storage_volumes'
+      status.must_equal 200
+    end
+  end
+
+  it 'returns details about storage_volume in various formats with show operation' do
+    formats.each do |format|
+      header 'Accept', format
+      get root_url + '/storage_volumes/vol1'
+      status.must_equal 200
+    end
+  end
+
+  it 'reports 404 when querying non-existing key' do
+    get root_url + '/storage_volumes/unknown'
+    status.must_equal 404
+  end
+
+  it 'properly serialize attributes in JSON' do
+    check_json_serialization_for :storage_volume, 'vol1'
+  end
+
+end

data/tests/deltacloud/common.rb

@@ -12,3 +12,18 @@ Deltacloud::configure do |server|
 end
 
 Deltacloud.require_frontend!
+
+def check_json_serialization_for(model, sample_id, optional_attrs=[])
+  header 'Accept', 'application/json'
+  get root_url + "/#{model.to_s.pluralize}"
+  status.must_equal 200
+  json[model.to_s.pluralize].wont_be_empty
+  get root_url + "/#{model.to_s.pluralize}/#{sample_id}"
+  status.must_equal 200
+  json[model.to_s].wont_be_empty
+  klass = self.class.const_get(model.to_s.camelize)
+  klass.attributes.each do |attr|
+    attr = attr.to_s.gsub(/_id$/,'') if attr.to_s =~ /_id$/
+    json[model.to_s].keys.must_include attr.to_s unless optional_attrs.include? attr
+  end
+end

data/tests/deltacloud/deltacloud_helper_test.rb

@@ -27,10 +27,6 @@ describe Deltacloud::Helpers::Application do
     @helper.instance_action_method(:destroy).must_equal :delete
   end
 
-  it 'provide helper to parse from XML to JSON' do
-    @helper.to_json('<xml>1</xml>').must_equal '{"xml":"1"}'
-  end
-
   it 'provide helper for wrapping text nodes with CDATA' do
     @helper.render_cdata('test').must_equal '<![CDATA[test]]>'
     @helper.render_cdata('').must_equal '<![CDATA[]]>'

data/tests/deltacloud/launcher_test.rb

@@ -0,0 +1,108 @@
+=begin
+
+# TODO: This test require full access to 'kill' command and also
+# ability to execute the actual launcher.
+#
+
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+require_relative 'common.rb'
+require 'socket'
+require 'timeout'
+require 'rest-client'
+
+def is_port_open?(ip, port)
+  begin
+    Timeout::timeout(1) do
+      begin
+        s = TCPSocket.new(ip, port)
+        s.close
+        return true
+      rescue Errno::ECONNREFUSED, Errno::EHOSTUNREACH
+        return false
+      end
+    end
+  rescue Timeout::Error
+  end
+  return false
+end
+
+def wait_for_port_open(port)
+  retries = 5
+  begin
+    raise unless is_port_open?('127.0.0.1', port)
+    true
+  rescue
+    sleep(1) && retry if (retries-=1) != 0
+    false
+  end
+end
+
+def kill_process(pid)
+  Process.kill('TERM', pid) rescue ''
+  # Die!
+  Process.kill('KILL', pid) rescue ''
+end
+
+describe "deltacloudd" do
+
+  before do
+    @pids ||= []
+  end
+
+  it 'starts the deltacloud server gracefully' do
+    pid = Process.fork
+    if pid.nil? then
+      Dir.chdir(File.join(File.dirname(__FILE__), '..', '..'))
+      exec("./bin/deltacloudd -i mock -p 3011")
+    else
+      Process.detach(pid) && @pids << pid
+      wait_for_port_open(3011).must_equal true
+      RestClient.get('http://localhost:3011/api').code.must_equal 200
+      kill_process(pid)
+      is_port_open?('127.0.0.1', 3011).must_equal false
+    end
+  end
+
+  it 'starts the deltacloud server gracefully with multiple frontends' do
+    pid = Process.fork
+    if pid.nil? then
+      Dir.chdir(File.join(File.dirname(__FILE__), '..', '..'))
+      exec("./bin/deltacloudd -i mock -f deltacloud,cimi,ec2 -p 3011")
+    else
+      Process.detach(pid) && @pids << pid
+      wait_for_port_open(3011).must_equal true
+      RestClient.get('http://localhost:3011/api').code.must_equal 200
+      RestClient.get('http://localhost:3011/cimi/cloudEntryPoint').code.must_equal 200
+      kill_process(pid)
+      is_port_open?('127.0.0.1', 3011).must_equal false
+    end
+  end
+
+  it 'starts the deltacloud server gracefully when using webrick' do
+    pid = Process.fork
+    if pid.nil? then
+      Dir.chdir(File.join(File.dirname(__FILE__), '..', '..'))
+      exec("./bin/deltacloudd -w -i mock -p 3011")
+    else
+      Process.detach(pid) && @pids << pid
+      wait_for_port_open(3011).must_equal true
+      RestClient.get('http://localhost:3011/api').code.must_equal 200
+      kill_process(pid)
+      is_port_open?('127.0.0.1', 3011).must_equal false
+    end
+  end
+
+  it 'lists the available drivers' do
+    Dir.chdir(File.join(File.dirname(__FILE__), '..', '..'))
+    output = `./bin/deltacloudd -l`
+    output.must_include 'Available drivers'
+    output.must_include 'mock'
+  end
+
+  after do
+    @pids.map { |pid| kill_process(pid) }
+  end
+
+end
+=end