steamcannon-deltacloud-client 0.0.9.7.1-java

data/lib/plain_formatter.rb

@@ -0,0 +1,86 @@
+module DeltaCloud
+  module PlainFormatter
+    module FormatObject
+
+      class Base
+        def initialize(obj)
+          @obj = obj
+        end
+      end
+
+      class Image < Base
+        def format
+          sprintf("%-10s | %-20s | %-6s | %-20s | %15s",
+              @obj.id[0,10],
+              @obj.name ? @obj.name[0, 20]: 'unknown',
+              @obj.architecture[0,6],
+              @obj.description[0,20],
+              @obj.owner_id[0,15]
+          )
+        end
+      end
+
+      class Realm < Base
+        def format
+          sprintf("%-10s | %-15s | %-5s | %10s GB",
+            @obj.id[0, 10],
+            @obj.name[0, 15],
+            @obj.state[0,5],
+            @obj.limit.to_s[0,10]
+          )
+        end
+      end
+
+      class HardwareProfile < Base
+        def format
+          sprintf("%-15s | %-6s | %10s | %10s ", @obj.id[0, 15],
+            @obj.architecture.value[0,6], @obj.memory.value.to_s[0,10], @obj.storage.value.to_s[0,10])
+        end
+      end
+
+      class Instance < Base
+        def format
+          sprintf("%-15s | %-15s | %-15s | %10s | %32s | %32s",
+            @obj.id ? @obj.id[0,15] : '-',
+            @obj.name ? @obj.name[0,15] : 'unknown',
+            @obj.image.name ? @obj.image.name[0,15] : 'unknown',
+            @obj.state ? @obj.state.to_s[0,10] : 'unknown',
+            @obj.public_addresses.join(',')[0,32],
+            @obj.private_addresses.join(',')[0,32]
+          )
+        end
+      end
+
+      class StorageVolume < Base
+        def format
+          sprintf("%-10s | %15s GB | %-10s | %-10s | %-15s",
+            @obj.id[0,10],
+            @obj.capacity ? @obj.capacity.to_s[0,15] : 'unknown',
+            @obj.device ? @obj.device[0,10] : 'unknown',
+            @obj.respond_to?('state') ? @obj.state[0,10] : 'unknown',
+            @obj.instance ? @obj.instance.name[0,15] : 'unknown'
+          )
+        end
+      end
+
+      class StorageSnapshot < Base
+        def format
+          sprintf("%-10s | %-15s | %-6s | %15s",
+            @obj.id[0,10],
+            @obj.storage_volume.respond_to?('name') ? @obj.storage_volume.name[0, 15] : 'unknown',
+            @obj.state ? @obj.state[0,10] : 'unknown',
+            @obj.created ? @obj.created[0,19] : 'unknown'
+          )
+        end
+      end
+
+    end
+
+    def format(obj)
+      object_name = obj.class.name.classify.gsub(/^DeltaCloud::API::/, '')
+      format_class = DeltaCloud::PlainFormatter::FormatObject.const_get(object_name)
+      format_class.new(obj).format
+    end
+
+  end
+end

data/specs/data/images/img1.yml

@@ -0,0 +1,4 @@
+:description: Fedora 10
+:owner_id: fedoraproject
+:architecture: x86_64
+:id: img1

data/specs/data/images/img2.yml

@@ -0,0 +1,4 @@
+:description: Fedora 10
+:owner_id: fedoraproject
+:architecture: i386
+:id: img2

data/specs/data/images/img3.yml

@@ -0,0 +1,4 @@
+:description: JBoss
+:owner_id: mockuser
+:architecture: i386
+:id: img3

data/specs/data/instances/inst0.yml

@@ -0,0 +1,16 @@
+---
+:realm_id: us
+:public_addresses:
+- img1.inst0.public.com
+:state: RUNNING
+:name: "Mock Instance With Profile Change"
+:private_addresses:
+- img1.inst0.private.com
+:image_id: img1
+:instance_profile: !ruby/object:InstanceProfile
+  id: m1-large
+  memory: "12288"
+:owner_id: mockuser
+:actions:
+- :reboot
+- :stop

data/specs/data/instances/inst1.yml

@@ -0,0 +1,9 @@
+:name: MockUserInstance
+:state: RUNNING
+:image_id: img3
+:owner_id: mockuser
+:public_addresses: [ img3.inst1.public.com ]
+:private_addresses: [ img3.inst1.private.com ]
+:realm_id: us
+:instance_profile: !ruby/object:InstanceProfile
+  id: m1-small

data/specs/data/instances/inst2.yml

@@ -0,0 +1,9 @@
+:name: AnotherInstance
+:state: RUNNING
+:image_id: img1
+:owner_id: anotheruser
+:public_addresses: [ img1.inst2.public.com ]
+:private_addresses: [ img1.inst2.private.com ]
+:realm_id: us
+:instance_profile: !ruby/object:InstanceProfile
+  id: m1-large

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,4 @@
+:description: Fedora 10
+:owner_id: fedoraproject
+:architecture: x86_64
+:id: img1

data/specs/fixtures/images/img2.yml

@@ -0,0 +1,4 @@
+:description: Fedora 10
+:owner_id: fedoraproject
+:architecture: i386
+:id: img2

data/specs/fixtures/images/img3.yml

@@ -0,0 +1,4 @@
+:description: JBoss
+:owner_id: mockuser
+:architecture: i386
+:id: img3

data/specs/fixtures/instances/inst0.yml

@@ -0,0 +1,16 @@
+---
+:realm_id: us
+:public_addresses:
+- img1.inst0.public.com
+:state: RUNNING
+:name: "Mock Instance With Profile Change"
+:private_addresses:
+- img1.inst0.private.com
+:image_id: img1
+:instance_profile: !ruby/object:InstanceProfile
+  id: m1-large
+  memory: "12288"
+:owner_id: mockuser
+:actions:
+- :reboot
+- :stop

data/specs/fixtures/instances/inst1.yml

@@ -0,0 +1,9 @@
+:name: MockUserInstance
+:state: RUNNING
+:image_id: img3
+:owner_id: mockuser
+:public_addresses: [ img3.inst1.public.com ]
+:private_addresses: [ img3.inst1.private.com ]
+:realm_id: us
+:instance_profile: !ruby/object:InstanceProfile
+  id: m1-small

data/specs/fixtures/instances/inst2.yml

@@ -0,0 +1,9 @@
+:name: AnotherInstance
+:state: RUNNING
+:image_id: img1
+:owner_id: anotheruser
+:public_addresses: [ img1.inst2.public.com ]
+:private_addresses: [ img1.inst2.private.com ]
+:realm_id: us
+:instance_profile: !ruby/object:InstanceProfile
+  id: m1-large

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/hardware_profiles_spec.rb

@@ -0,0 +1,78 @@
+#
+# Copyright (C) 2009  Red Hat, Inc.
+#
+# 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 'specs/spec_helper'
+
+def prop_check(prop, value_class)
+  if prop.present?
+    prop.value.should_not be_nil
+    prop.value.should be_a(value_class)
+  end
+end
+
+describe "hardware_profiles" do
+
+  it_should_behave_like "all resources"
+
+  it "should allow retrieval of all hardware profiles" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      hardware_profiles = client.hardware_profiles
+      hardware_profiles.should_not be_empty
+      hardware_profiles.each do |hwp|
+        hwp.uri.should_not be_nil
+        hwp.uri.should be_a(String)
+        prop_check(hwp.architecture, String)  if hwp.architecture
+      end
+    end
+  end
+
+  it "should allow filtering of hardware_profiles by architecture" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      hardware_profiles = client.hardware_profiles( :architecture=>'i386' )
+      hardware_profiles.should_not be_empty
+      hardware_profiles.size.should eql( 2 )
+      hardware_profiles.first.architecture.value.should eql( 'i386' )
+    end
+  end
+
+  it "should allow fetching a hardware_profile by id" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      hwp = client.hardware_profile( 'm1-small' )
+      hwp.should_not be_nil
+      hwp.id.should eql( 'm1-small' )
+    end
+  end
+
+  it "should allow fetching different hardware_profiles" do
+    client = DeltaCloud.new( API_NAME, API_PASSWORD, API_URL )
+    hwp1 = client.hardware_profile( 'm1-small' )
+    hwp2 = client.hardware_profile( 'm1-xlarge' )
+    hwp1.storage.value.should_not eql(hwp2.storage.value)
+    hwp1.memory.value.should_not eql(hwp2.memory.value)
+  end
+
+  it "should allow fetching a hardware_profile by URI" do
+    DeltaCloud.new( API_NAME, API_PASSWORD, API_URL ) do |client|
+      hwp = client.fetch_hardware_profile( API_URL + '/hardware_profiles/m1-small' )
+      hwp.should_not be_nil
+      hwp.id.should eql( 'm1-small' )
+    end
+  end
+
+end

data/specs/images_spec.rb

@@ -0,0 +1,105 @@
+#
+# Copyright (C) 2009  Red Hat, Inc.
+#
+# 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 '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,60 @@
+#
+# Copyright (C) 2009  Red Hat, Inc.
+#
+# 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 '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[:hardware_profiles].should eql( "#{API_URL}/hardware_profiles" )
+      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,78 @@
+#
+# Copyright (C) 2009  Red Hat, Inc.
+#
+# 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 '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