deltacloud-core 1.0.1 → 1.0.2

data/tests/cimi/spec/cimi/model/volume_configuration_spec.rb

@@ -0,0 +1,34 @@
+
+# Licensed to the Apache Software Foundation (ASF) under one or more
+# contributor license agreements.  See the NOTICE file distributed with
+# this work for additional information regarding copyright ownership.  The
+# ASF licenses this file to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance with the
+# License.  You may obtain a copy of the License at
+#
+#       http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
+# WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.  See the
+# License for the specific language governing permissions and limitations
+# under the License.
+#
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative '../../spec_helper.rb' if require 'minitest/autorun'
+
+describe "Volume Configuration model" do
+
+  before do
+    @xml = IO::read(File::join(DATA_DIR, "volume_configuration.xml"))
+    @json = IO::read(File::join(DATA_DIR, "volume_configuration.json"))
+  end
+
+  it "can be constructed from XML and JSON" do
+    should_properly_serialize_model CIMI::Model::VolumeConfiguration, @xml, @json
+  end
+
+
+end

data/tests/cimi/spec/cimi/model/volume_image_spec.rb

@@ -0,0 +1,33 @@
+# Licensed to the Apache Software Foundation (ASF) under one or more
+# contributor license agreements.  See the NOTICE file distributed with
+# this work for additional information regarding copyright ownership.  The
+# ASF licenses this file to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance with the
+# License.  You may obtain a copy of the License at
+#
+#       http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
+# WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.  See the
+# License for the specific language governing permissions and limitations
+# under the License.
+#
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative '../../spec_helper.rb' if require 'minitest/autorun'
+
+describe "Volume Image model" do
+
+  before do
+    @xml = IO::read(File::join(DATA_DIR, "volume_image.xml"))
+    @json = IO::read(File::join(DATA_DIR, "volume_image.json"))
+  end
+
+  it "can be constructed from XML and JSON" do
+    should_properly_serialize_model CIMI::Model::VolumeImage, @xml, @json
+  end
+
+
+end

data/tests/cimi/spec/cimi/model/volume_spec.rb

@@ -0,0 +1,32 @@
+# Licensed to the Apache Software Foundation (ASF) under one or more
+# contributor license agreements.  See the NOTICE file distributed with
+# this work for additional information regarding copyright ownership.  The
+# ASF licenses this file to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance with the
+# License.  You may obtain a copy of the License at
+#
+#       http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
+# WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.  See the
+# License for the specific language governing permissions and limitations
+# under the License.
+#
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative '../../spec_helper.rb' if require 'minitest/autorun'
+
+describe "Volume model" do
+
+  before do
+    @xml = IO::read(File::join(DATA_DIR, "volume.xml"))
+    @json = IO::read(File::join(DATA_DIR, "volume.json"))
+  end
+
+  it "can be constructed from XML and JSON" do
+    should_properly_serialize_model CIMI::Model::Volume, @xml, @json
+  end
+
+end

data/tests/cimi/spec/cimi/model/volume_template_spec.rb

@@ -0,0 +1,32 @@
+# Licensed to the Apache Software Foundation (ASF) under one or more
+# contributor license agreements.  See the NOTICE file distributed with
+# this work for additional information regarding copyright ownership.  The
+# ASF licenses this file to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance with the
+# License.  You may obtain a copy of the License at
+#
+#       http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
+# WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.  See the
+# License for the specific language governing permissions and limitations
+# under the License.
+#
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative '../../spec_helper.rb' if require 'minitest/autorun'
+
+describe "Volume Template model" do
+
+  before do
+    @xml = IO::read(File::join(DATA_DIR, "volume_template.xml"))
+    @json = IO::read(File::join(DATA_DIR, "volume_template.json"))
+  end
+
+  it "can be constructed from XML and JSON" do
+    should_properly_serialize_model CIMI::Model::VolumeTemplate, @xml, @json
+  end
+
+end

data/tests/cimi/spec/spec_helper.rb

@@ -0,0 +1,136 @@
+# Licensed to the Apache Software Foundation (ASF) under one or more
+# contributor license agreements.  See the NOTICE file distributed with
+# this work for additional information regarding copyright ownership.  The
+# ASF licenses this file to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance with the
+# License.  You may obtain a copy of the License at
+#
+#       http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
+# WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.  See the
+# License for the specific language governing permissions and limitations
+# under the License.
+#
+
+require 'rubygems'
+require 'minitest/autorun'
+require 'minitest/spec'
+require 'xmlsimple'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative '../../../lib/deltacloud/core_ext.rb'
+require_relative '../../../lib/cimi/models.rb'
+
+DATA_DIR = File::join(File::expand_path(File::dirname(__FILE__)), 'cimi', 'data')
+
+def parse_xml(xml, opts = {})
+  opts[:force_content] = true
+  opts[:keep_root] = true unless opts.has_key?(:keep_root)
+  XmlSimple.xml_in(xml, opts)
+end
+
+class HashCmp
+  def initialize(exp, act)
+    @exp = exp
+    @act = act
+    @io = StringIO.new
+  end
+
+  def match?
+    @equal = true
+    compare_values(@exp, @act, [])
+    @equal
+  end
+
+  def errors
+    @io.string
+  end
+
+  private
+  def compare_values(exp, act, path)
+    if exp.is_a?(String)
+      mismatch("entries differ", exp, act, path) unless exp == act
+    elsif exp.is_a?(Array)
+      mismatch("expected array", exp, act, path) unless act.is_a?(Array)
+      unless act.size == exp.size
+        mismatch("different array lengths", exp, act, path)
+      end
+      name = path.pop
+      if name == "property"
+        # Special hack for properties, since they truly are a hash
+        # 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"] }
+      end
+      0.upto(exp.size-1) do |i|
+        compare_values(exp[i], act[i], path + [ "#{name}[#{i}]" ])
+      end
+    elsif exp.is_a?(Hash)
+      unless act.is_a?(Hash)
+        mismatch("expected Hash", exp, act, path)
+        return
+      end
+      unless (missing = exp.keys - act.keys).empty?
+        error "Missing key(s) at /#{path.join("/")}: #{missing.inspect}"
+      end
+      unless (excess = act.keys - exp.keys).empty?
+        error "Excess key(s) at /#{path.join("/")}: #{excess.inspect}"
+      end
+      (exp.keys - missing - excess).each do |k|
+        compare_values(exp[k], act[k], path + [ k ])
+      end
+    end
+  end
+
+  def mismatch(msg, exp, act, path)
+    error "#{msg}[#{fmt(path)}]: #{exp.inspect} != #{act.inspect}"
+  end
+
+  def error(msg)
+    @equal = false
+    @io.puts msg
+  end
+
+  def fmt(path)
+    "/#{path.join("/")}"
+  end
+end
+
+def should_properly_serialize_model(model_class, xml, json)
+  # Roundtrip in same format
+  model_class.from_xml(xml).must_serialize_to xml, :fmt => :xml
+  model_class.from_json(json).must_serialize_to json, :fmt => :json
+  # Roundtrip crossing format
+  model_class.from_xml(xml).must_serialize_to json, :fmt => :json
+  model_class.from_json(json).must_serialize_to xml, :fmt => :xml
+end
+
+module MiniTest::Assertions
+
+  def assert_serialize_to(exp, act, opts)
+    raise "missing format; use :fmt => [:xml || :json]" if opts[:fmt].nil?
+    exp, act = [exp, act].map { |x| convert(x, opts[:fmt]) }
+    m = HashCmp.new(exp, act)
+    assert m.match?,  "#{opts[:fmt].to_s.upcase} documents do not match\n" + m.errors
+  end
+
+  def convert(x, fmt)
+    if fmt == :json
+      x = x.to_json if x.is_a?(CIMI::Model::Base)
+      x = JSON.parse(x) if x.is_a?(String)
+    elsif fmt == :xml
+      x = x.to_xml if x.is_a?(CIMI::Model::Base)
+      x = parse_xml(x)  if x.is_a?(String)
+    else
+      raise "Invalid format #{fmt}"
+    end
+    x
+  end
+
+end
+
+CIMI::Model::Base.infect_an_assertion :assert_serialize_to, :must_serialize_to

data/tests/deltacloud/base_collection_test.rb

@@ -0,0 +1,30 @@
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative 'common.rb'
+
+describe Deltacloud::Collections::Base do
+
+  before do
+    @base = Deltacloud::Collections::Base
+  end
+
+  it 'has config set correctly' do
+    @base.config.must_be_kind_of Deltacloud::Server
+    @base.config.root_url.must_equal Deltacloud.config[:deltacloud].root_url
+  end
+
+  it 'has root_url set correctly' do
+    @base.root_url.must_equal  Deltacloud.config[:deltacloud].root_url
+  end
+
+  it 'has version set correctly' do
+    @base.version.must_equal  Deltacloud.config[:deltacloud].version
+  end
+
+  it 'provides helper for routes' do
+    @base.must_respond_to :route_for
+    @base.route_for('/hardware_profiles').must_equal "#{Deltacloud.config[:deltacloud].root_url}/hardware_profiles"
+  end
+
+end

data/tests/deltacloud/collections/buckets_collection_test.rb

@@ -0,0 +1,65 @@
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative File.join('..', 'common.rb')
+
+describe Deltacloud::Collections::Buckets do
+
+  before do
+    def app; Deltacloud::API; end
+    authorize 'mockuser', 'mockpassword'
+    @collection = Deltacloud::Collections.collection(:buckets)
+  end
+
+  it 'has index operation' do
+    @collection.operation(:index).must_equal Sinatra::Rabbit::BucketsCollection::IndexOperation
+  end
+
+  it 'provides URL to specify new bucket' do
+    header 'Accept', 'text/html'
+    get root_url + '/buckets/new/' + Deltacloud::Helpers::Application::NEW_BLOB_FORM_ID
+    status.must_equal 200
+  end
+
+  it 'returns list of buckets in various formats with index operation' do
+    formats.each do |format|
+      header 'Accept', format
+      get root_url + '/buckets'
+      status.must_equal 200
+    end
+  end
+
+  it 'must support creating a new bucket and destroying it' do
+    post root_url + '/buckets', { :name => 'test-bucket1' }
+    status.must_equal 201
+    xml.root.name.must_equal 'bucket'
+    delete root_url + '/buckets/' + xml.root[:id]
+    status.must_equal 204
+  end
+
+  it 'returns blob metadata' do
+    head root_url + '/buckets/bucket1/blob1'
+    headers['X-Deltacloud-Blobmeta-SOMENEWKEY'].must_equal 'NEWVALUE'
+    status.must_equal 204
+    head root_url + '/buckets/bucket1/non-existing-blob'
+    status.must_equal 404
+  end
+
+  it 'returns blob details on show operation in various formats' do
+    formats.each do |format|
+      header 'Accept', format
+      get root_url + '/buckets/bucket1/blob1'
+      last_response
+      status.must_equal 200
+    end
+  end
+
+  it 'creates a new blob and then destroy it' do
+    post root_url + '/buckets/bucket1', { :blob_id => 'test-blob', :blob_data => 'test', :meta_params => '1', :meta_name1 => 'test-meta1' }
+    status.must_equal 201
+    delete root_url + '/buckets/bucket1/test-blob'
+    status.must_equal 204
+  end
+
+
+end

data/tests/deltacloud/collections/drivers_collection_test.rb

@@ -0,0 +1,37 @@
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative File.join('..', 'common.rb')
+
+describe Deltacloud::Collections::Drivers do
+
+  before do
+    def app; Deltacloud::API; end
+    @collection = Deltacloud::Collections.collection(:drivers)
+  end
+
+  it 'has index operation' do
+    @collection.operation(:index).must_equal Sinatra::Rabbit::DriversCollection::IndexOperation
+  end
+
+  it 'has show operation' do
+    @collection.operation(:show).must_equal Sinatra::Rabbit::DriversCollection::ShowOperation
+  end
+
+  it 'returns list of drivers in various formats with index operation' do
+    formats.each do |format|
+      header 'Accept', format
+      get root_url + '/drivers'
+      status.must_equal 200
+    end
+  end
+
+  it 'returns details about driver in various formats with show operation' do
+    formats.each do |format|
+      header 'Accept', format
+      get root_url + '/drivers/mock'
+      status.must_equal 200
+    end
+  end
+
+end

data/tests/deltacloud/collections/hardware_profiles_collection_test.rb

@@ -0,0 +1,53 @@
+require 'rubygems'
+require 'require_relative' if RUBY_VERSION < '1.9'
+
+require_relative File.join('..', 'common.rb')
+
+describe Deltacloud::Collections::HardwareProfiles do
+
+  before do
+    def app; Deltacloud::API; end
+    authorize 'mockuser', 'mockpassword'
+    @collection = Deltacloud::Collections.collection(:hardware_profiles)
+  end
+
+  it 'has index operation' do
+    @collection.operation(:index).must_equal Sinatra::Rabbit::HardwareProfilesCollection::IndexOperation
+  end
+
+  it 'has show operation' do
+    @collection.operation(:show).must_equal Sinatra::Rabbit::HardwareProfilesCollection::ShowOperation
+  end
+
+  it 'returns list of hardware profiles in various formats with index operation' do
+    formats.each do |format|
+      header 'Accept', format
+      get root_url + '/hardware_profiles'
+      status.must_equal 200
+    end
+  end
+
+  it 'returns details about hardware profile in various formats with show operation' do
+    formats.each do |format|
+      header 'Accept', format
+      get root_url + '/hardware_profiles/m1-small'
+      status.must_equal 200
+    end
+  end
+
+  it 'returns details for various hardware profile configurations' do
+    get root_url + '/hardware_profiles'
+    status.must_equal 200
+    (xml/'hardware_profiles/hardware_profile').each do |hwp|
+      get root_url + '/hardware_profiles/' + hwp[:id]
+      status.must_equal 200
+      xml.root[:id].must_equal hwp[:id]
+    end
+  end
+
+  it 'reports 404 when querying non-existing hardware profile' do
+    get root_url + '/hardware_profiles/unknown'
+    status.must_equal 404
+  end
+
+end