deltacloud-client 0.0.2

data/specs/data/images/img2.yml

@@ -0,0 +1,3 @@
+:description: Fedora 10
+:owner_id: fedoraproject
+:architecture: i386

data/specs/data/images/img3.yml

@@ -0,0 +1,3 @@
+:description: JBoss
+:owner_id: mockuser
+:architecture: i386

data/specs/data/instances/inst1.yml

@@ -0,0 +1,8 @@
+:name: MockUserInstance
+:state: RUNNING
+:image_id: img3
+:owner_id: mockuser
+:public_addresses: [ img3.inst1.public.com ]
+:private_addresses: [ img3.inst1.private.com ]
+:flavor_id: m1-small
+:realm_id: us

data/specs/data/instances/inst2.yml

@@ -0,0 +1,8 @@
+:name: AnotherInstance
+:state: RUNNING
+:image_id: img1
+:owner_id: anotheruser
+:public_addresses: [ img1.inst2.public.com ]
+:private_addresses: [ img1.inst2.private.com ]
+:flavor_id: m1-small
+:realm_id: us

data/specs/data/storage_snapshots/snap1.yml

@@ -0,0 +1,4 @@
+:owner_id: fedoraproject
+:created: Wed Jul 29 18:15:24 UTC 2009
+:state: COMPLETED
+:storage_volume_id: vol1

data/specs/data/storage_snapshots/snap2.yml

@@ -0,0 +1,4 @@
+:owner_id: mockuser
+:created: Wed Jul 29 18:15:24 UTC 2009
+:state: COMPLETED
+:storage_volume_id: vol2

data/specs/data/storage_snapshots/snap3.yml

@@ -0,0 +1,4 @@
+:owner_id: mockuser
+:created: Wed Jul 29 18:15:24 UTC 2009
+:state: COMPLETED
+:storage_volume_id: vol2

data/specs/data/storage_volumes/vol1.yml

@@ -0,0 +1,6 @@
+:owner_id: fedoraproject
+:created: Thu Jul 30 14:35:11 UTC 2009
+:state: AVAILABLE
+:capacity: 1
+:device:
+:instance_id:

data/specs/data/storage_volumes/vol2.yml

@@ -0,0 +1,6 @@
+:owner_id: mockuser
+:created: Thu Jul 30 14:35:11 UTC 2009
+:state: AVAILABLE
+:capacity: 1
+:device:
+:instance_id:

data/specs/data/storage_volumes/vol3.yml

@@ -0,0 +1,6 @@
+:owner_id: mockuser
+:created: Thu Jul 30 14:35:11 UTC 2009
+:state: IN-USE
+:capacity: 1
+:device: /dev/sda1
+:instance_id: inst1

data/specs/fixtures/images/img1.yml

@@ -0,0 +1,3 @@
+:description: Fedora 10
+:owner_id: fedoraproject
+:architecture: x86_64

data/specs/fixtures/images/img2.yml

@@ -0,0 +1,3 @@
+:description: Fedora 10
+:owner_id: fedoraproject
+:architecture: i386

data/specs/fixtures/images/img3.yml

@@ -0,0 +1,3 @@
+:description: JBoss
+:owner_id: mockuser
+:architecture: i386

data/specs/fixtures/instances/inst1.yml

@@ -0,0 +1,8 @@
+:name: MockUserInstance
+:state: RUNNING
+:image_id: img3
+:owner_id: mockuser
+:public_addresses: [ img3.inst1.public.com ]
+:private_addresses: [ img3.inst1.private.com ]
+:flavor_id: m1-small
+:realm_id: us

data/specs/fixtures/instances/inst2.yml

@@ -0,0 +1,8 @@
+:name: AnotherInstance
+:state: RUNNING
+:image_id: img1
+:owner_id: anotheruser
+:public_addresses: [ img1.inst2.public.com ]
+:private_addresses: [ img1.inst2.private.com ]
+:flavor_id: m1-small
+:realm_id: us

data/specs/fixtures/storage_snapshots/snap1.yml

@@ -0,0 +1,4 @@
+:owner_id: fedoraproject
+:created: Wed Jul 29 18:15:24 UTC 2009
+:state: COMPLETED
+:storage_volume_id: vol1

data/specs/fixtures/storage_snapshots/snap2.yml

@@ -0,0 +1,4 @@
+:owner_id: mockuser
+:created: Wed Jul 29 18:15:24 UTC 2009
+:state: COMPLETED
+:storage_volume_id: vol2

data/specs/fixtures/storage_snapshots/snap3.yml

@@ -0,0 +1,4 @@
+:owner_id: mockuser
+:created: Wed Jul 29 18:15:24 UTC 2009
+:state: COMPLETED
+:storage_volume_id: vol2

data/specs/fixtures/storage_volumes/vol1.yml

@@ -0,0 +1,6 @@
+:owner_id: fedoraproject
+:created: Thu Jul 30 14:35:11 UTC 2009
+:state: AVAILABLE
+:capacity: 1
+:device:
+:instance_id:

data/specs/fixtures/storage_volumes/vol2.yml

@@ -0,0 +1,6 @@
+:owner_id: mockuser
+:created: Thu Jul 30 14:35:11 UTC 2009
+:state: AVAILABLE
+:capacity: 1
+:device:
+:instance_id:

data/specs/fixtures/storage_volumes/vol3.yml

@@ -0,0 +1,6 @@
+:owner_id: mockuser
+:created: Thu Jul 30 14:35:11 UTC 2009
+:state: IN-USE
+:capacity: 1
+:device: /dev/sda1
+:instance_id: inst1

data/specs/flavors_spec.rb

@@ -0,0 +1,67 @@
+#
+# Copyright (C) 2009  Red Hat, Inc.
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+
+
+require 'specs/spec_helper'
+
+describe "flavors" do
+
+  it_should_behave_like "all resources"
+
+  it "should allow retrieval of all flavors" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      flavors = client.flavors
+      flavors.should_not be_empty
+      flavors.each do |flavor|
+        flavor.uri.should_not be_nil
+        flavor.uri.should be_a(String)
+        flavor.architecture.should_not be_nil
+        flavor.architecture.should be_a(String)
+        flavor.storage.should_not be_nil
+        flavor.storage.should be_a(Float)
+        flavor.memory.should_not be_nil
+        flavor.memory.should be_a(Float)
+      end
+    end
+  end
+
+  it "should allow filtering of flavors by architecture" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      flavors = client.flavors( :architecture=>'i386' )
+      flavors.should_not be_empty
+      flavors.size.should eql( 1 )
+      flavors.first.architecture.should eql( 'i386' )
+    end
+  end
+
+  it "should allow fetching a flavor by id" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      flavor = client.flavor( 'm1-small' )
+      flavor.should_not be_nil
+      flavor.id.should eql( 'm1-small' )
+    end
+  end
+
+  it "should allow fetching a flavor by URI" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      flavor = client.fetch_flavor( API_URL + '/flavors/m1-small' )
+      flavor.should_not be_nil
+      flavor.id.should eql( 'm1-small' )
+    end
+  end
+
+end

data/specs/images_spec.rb

@@ -0,0 +1,104 @@
+#
+# Copyright (C) 2009  Red Hat, Inc.
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+
+
+require 'specs/spec_helper'
+
+describe "images" do
+
+  it_should_behave_like "all resources"
+
+  it "should allow retrieval of all images" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      images = client.images
+      images.should_not be_empty
+      images.size.should eql( 3 )
+      images.each do |image|
+        image.uri.should_not be_nil
+        image.uri.should be_a(String)
+        image.description.should_not be_nil
+        image.description.should be_a(String)
+        image.architecture.should_not be_nil
+        image.architecture.should be_a(String)
+        image.owner_id.should_not be_nil
+        image.owner_id.should be_a(String)
+      end
+    end
+  end
+
+  it "should allow retrieval of my own images" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      images = client.images( :owner_id=>:self )
+      images.should_not be_empty
+      images.size.should eql( 1 )
+      images.each do |image|
+        image.uri.should_not be_nil
+        image.uri.should be_a(String)
+        image.description.should_not be_nil
+        image.description.should be_a(String)
+        image.architecture.should_not be_nil
+        image.architecture.should be_a(String)
+        image.owner_id.should_not be_nil
+        image.owner_id.should be_a(String)
+      end
+    end
+  end
+
+  it "should allow retrieval of a single image by ID" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      image = client.image( 'img1' )
+      image.should_not be_nil
+      image.uri.should eql( API_URL + '/images/img1' )
+      image.id.should eql( 'img1' )
+      image.architecture.should eql( 'x86_64' )
+    end
+  end
+
+  it "should allow retrieval of a single image by URI" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      image = client.fetch_image( API_URL + '/images/img1' )
+      image.should_not be_nil
+      image.uri.should eql( API_URL + '/images/img1' )
+      image.id.should eql( 'img1' )
+      image.architecture.should eql( 'x86_64' )
+    end
+  end
+
+  describe "filtering by architecture" do
+    it "return matching images" do
+      DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+        images = client.images( :architecture=>'x86_64' )
+        images.should_not be_empty
+        images.each do |image|
+          image.architecture.should eql( 'x86_64' )
+        end
+        images = client.images( :architecture=>'i386' )
+        images.should_not be_empty
+        images.each do |image|
+          image.architecture.should eql( 'i386' )
+        end
+      end
+    end
+
+    it "should return an empty array for no matches" do
+      DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+        images = client.images( :architecture=>'8088' )
+        images.should be_empty
+      end
+    end
+  end
+end

data/specs/initialization_spec.rb

@@ -0,0 +1,59 @@
+#
+# Copyright (C) 2009  Red Hat, Inc.
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+
+require 'specs/spec_helper'
+
+describe "initializing the client" do
+
+  it "should parse valid API URIs" do
+    client = DeltaCloud.new( API_NAME, API_PASSWORD, API_URL )
+    client.api_host.should eql( API_HOST )
+    client.api_port.should eql( API_PORT.to_i )
+    client.api_path.should eql( API_PATH )
+  end
+
+  it "should discover entry points upon connection" do
+    DeltaCloud.new( "name", "password", API_URL ) do |client|
+      client.entry_points[:flavors].should           eql( "#{API_URL}/flavors" )
+      client.entry_points[:images].should            eql( "#{API_URL}/images" )
+      client.entry_points[:instances].should         eql( "#{API_URL}/instances" )
+      client.entry_points[:storage_volumes].should   eql( "#{API_URL}/storage_volumes" )
+      client.entry_points[:storage_snapshots].should eql( "#{API_URL}/storage_snapshots" )
+    end
+  end
+
+  it "should provide the current driver name via client" do
+    DeltaCloud.new( "name", "password", API_URL ) do |client|
+      client.driver_name.should eql( 'mock' )
+    end
+  end
+
+  it "should provide the current driver name without client" do
+    DeltaCloud.driver_name( API_URL ).should eql( 'mock' )
+  end
+
+  describe "without a block" do
+    before( :each ) do
+      reload_fixtures
+    end
+    it "should connect without a block" do
+      client = DeltaCloud.new( API_NAME, API_PASSWORD, API_URL )
+      client.images.should_not be_nil
+    end
+  end
+
+end

data/specs/instance_states_spec.rb

@@ -0,0 +1,77 @@
+#
+# Copyright (C) 2009  Red Hat, Inc.
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+
+
+require 'specs/spec_helper'
+
+=begin
+Spec::Matchers.define :include_transition do |action,to|
+  match do |transitions|
+    found = transitions.find{|e| e.action.to_s == action.to_s && e.to.to_s == to.to_s }
+    ! found.nil?
+  end
+end
+=end
+
+describe "instance-states" do
+
+  it_should_behave_like "all resources"
+
+  it "should allow retrieval of instance-state information" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      instance_states = client.instance_states
+      instance_states.should_not be_nil
+      instance_states.should_not be_empty
+
+      instance_states[0].name.should eql( 'start' )
+      instance_states[0].transitions.size.should eql( 1 )
+      instance_states[0].transitions[0].should_not be_auto
+
+      instance_states[1].name.should eql( 'pending' )
+      instance_states[1].transitions.size.should eql( 1 )
+      instance_states[1].transitions[0].should be_auto
+
+      instance_states[2].name.should eql( 'running' )
+      instance_states[2].transitions.size.should eql( 2 )
+      includes_transition( instance_states[2].transitions, :reboot, :running ).should be_true
+      includes_transition( instance_states[2].transitions, :stop, :stopped ).should be_true
+    end
+  end
+
+  it "should allow retrieval of a single instance-state blob" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      instance_state = client.instance_state( :pending )
+      instance_state.should_not be_nil
+      instance_state.name.should eql( 'pending' )
+      instance_state.transitions.size.should eql( 1 )
+      instance_state.transitions[0].should be_auto
+
+      instance_state = client.instance_state( :running )
+      instance_state.name.should eql( 'running' )
+      instance_state.transitions.size.should eql( 2 )
+      includes_transition( instance_state.transitions, :reboot, :running ).should be_true
+      includes_transition( instance_state.transitions, :stop, :stopped ).should be_true
+    end
+  end
+
+  def includes_transition( transitions, action, to )
+    found = transitions.find{|e| e.action.to_s == action.to_s && e.to.to_s == to.to_s }
+    ! found.nil?
+  end
+
+
+end