fog-azure 0.0.1

data/lib/fog/azure/version.rb

@@ -0,0 +1,26 @@
+# Copyright (c) Microsoft Open Technologies, Inc.  All rights reserved.
+#
+# The MIT License (MIT)
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+module Fog
+  module AZURE
+    VERSION = "0.0.1"
+  end
+end

data/lib/fog/bin/azure.rb

@@ -0,0 +1,84 @@
+# Copyright (c) Microsoft Open Technologies, Inc.  All rights reserved.
+#
+# The MIT License (MIT)
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+module Azure # deviates from other bin stuff to accomodate gem
+  class << self
+    def class_for(key)
+      case key
+      when :compute
+        Fog::Compute::Azure
+      else
+        raise ArgumentError, "Unrecognized service: #{key}"
+      end
+    end
+
+    def [](service)
+      @@connections ||= Hash.new do |hash, key|
+        hash[key] = case key
+        when :compute
+          Fog::Logger.warning("Azure[:compute] is not recommended, use Compute[:azure] for portability")
+          Fog::Compute.new(:provider => 'Azure')
+        else
+          raise ArgumentError, "Unrecognized service: #{key.inspect}"
+        end
+      end
+      @@connections[service]
+    end
+
+    def available?
+      availability = true
+      for service in services
+        begin
+          service = self.class_for(service)
+          availability &&= service.requirements.all? { |requirement| Fog.credentials.include?(requirement) }
+        rescue ArgumentError => e
+          Fog::Logger.warning(e.message)
+          availability = false
+        rescue => e
+          availability = false
+        end
+      end
+
+      if availability
+        for service in services
+          for collection in self.class_for(service).collections
+            unless self.respond_to?(collection)
+              self.class_eval <<-EOS, __FILE__, __LINE__
+                def self.#{collection}
+                  self[:#{service}].#{collection}
+                end
+              EOS
+            end
+          end
+        end
+      end
+      availability
+    end
+
+    def collections
+      services.map {|service| self[service].collections}.flatten.sort_by {|service| service.to_s}
+    end
+
+    def services
+      Fog::Azure.services
+    end
+  end
+end

data/tests/azure_test_helper.rb

@@ -0,0 +1,84 @@
+# Copyright (c) Microsoft Open Technologies, Inc.  All rights reserved.
+#
+# The MIT License (MIT)
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+
+def azure_service
+  Fog::Compute[:azure]
+end
+
+def vm_attributes
+  image = azure_service.images.select{|image| image.os_type == "Linux"}.first
+  location = image.locations.split(";").first
+
+  {
+    :image  => image.name,
+    :location => location,
+    :vm_name => vm_name,
+    :vm_user => "foguser",
+    :password =>  "ComplexPassword!123",
+    :storage_account_name => storage_name
+  }
+end
+
+def vm_name
+  "fog-test-server"
+end
+
+def storage_name
+  "fogteststorageaccount"
+end
+
+def fog_server
+  server = azure_service.servers.select { |s| s.vm_name == vm_name }.first
+  unless server
+    server = azure_service.servers.create(
+      vm_attributes
+    )
+  end
+  server
+end
+
+def storage_account
+  storage = azure_service.storage_accounts.select { |s| s.name == storage_name }.first
+  unless storage
+    storage = azure_service.storage_accounts.create(
+      {:name => storage_name, :location => "West US"}
+    )
+  end
+  azure_service.storage_accounts.get(storage_name)
+end
+
+def vm_destroy
+  server = azure_service.servers.select { |s| s.vm_name == vm_name }.first
+  server.destroy if server
+end
+
+def storage_destroy
+  storage = azure_service.storage_accounts.select { |s| s.name == storage_name }.first
+  storage.destroy if storage
+end
+
+at_exit do
+  unless Fog.mocking?
+    storage_destroy
+    vm_destroy
+  end
+end

data/tests/helper.rb

@@ -0,0 +1,36 @@
+# Copyright (c) Microsoft Open Technologies, Inc.  All rights reserved.
+#
+# The MIT License (MIT)
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+
+require File.expand_path('../../lib/fog/azure', __FILE__)
+
+Bundler.require(:test)
+
+Excon.defaults.merge!(:debug_request => true, :debug_response => true)
+
+require File.expand_path(File.join(File.dirname(__FILE__), 'helpers', 'mock_helper'))
+
+# This overrides the default 600 seconds timeout during live test runs
+if Fog.mocking?
+  Fog.timeout = ENV['FOG_TEST_TIMEOUT'] || 2000
+  Fog::Logger.warning "Setting default fog timeout to #{Fog.timeout} seconds"
+end
+

data/tests/helpers/mock_helper.rb

@@ -0,0 +1,36 @@
+# Copyright (c) Microsoft Open Technologies, Inc.  All rights reserved.
+#
+# The MIT License (MIT)
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+# Use so you can run in mock mode from the command line
+#
+# FOG_MOCK=true fog
+
+if ENV["FOG_MOCK"] == "true"
+  Fog.mock!
+end
+
+# if in mocked mode, fill in some fake credentials for us
+if Fog.mock?
+  Fog.credentials = {
+    :azure_sub_id                     => 'azure_sub_id',
+    :azure_pem                        => 'path_of_pem'
+  }.merge(Fog.credentials)
+end

data/tests/models/compute/image_tests.rb

@@ -0,0 +1,50 @@
+# Copyright (c) Microsoft Open Technologies, Inc.  All rights reserved.
+#
+# The MIT License (MIT)
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+Shindo.tests("Fog::Compute[:azure] | image model", ["azure", "compute"]) do
+
+  service = Fog::Compute[:azure]
+
+  tests("The image model should") do
+    image  = service.images.first
+    tests("have the action") do
+      test("reload") { image.respond_to? "reload" }
+    end
+    tests("have attributes") do
+      model_attribute_hash = image.attributes
+      attributes = [
+        :name,
+        :os_type
+      ]
+      tests("The image model should respond to") do
+        attributes.each do |attribute|
+          test("#{attribute}") { image.respond_to? attribute }
+        end
+      end
+      tests("The attributes hash should have key") do
+        attributes.each do |attribute|
+          test("#{attribute}") { model_attribute_hash.key? attribute }
+        end
+      end
+    end
+  end
+
+end

data/tests/models/compute/server_tests.rb

@@ -0,0 +1,84 @@
+# Copyright (c) Microsoft Open Technologies, Inc.  All rights reserved.
+#
+# The MIT License (MIT)
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+Shindo.tests("Fog::Compute[:azure] | server model", ["azure", "compute"]) do
+
+  server = fog_server
+
+  tests("The server model should") do
+    pending if Fog.mocking?
+    tests("have the action") do
+      test("reload") { server.respond_to? "reload" }
+      %w{
+        destroy
+        reboot
+        shutdown
+        start
+      }.each do |action|
+        test(action) { server.respond_to? action }
+      end
+    end
+
+    tests("have attributes") do
+      attributes = [
+        :vm_name,
+        :status,
+        :ipaddress,
+        :cloud_service_name,
+        :image,
+        :location,
+        :os_type,
+        :storage_account_name
+      ]
+      tests("The server model should respond to") do
+        attributes.each do |attribute|
+          test("#{attribute}") { server.respond_to? attribute }
+        end
+      end
+    end
+
+    test("#reboot") do
+      server.reboot
+      server = fog_server
+      %w(ReadyRole Provisioning RoleStateUnknown).include?  server.status
+    end
+
+    test("#start") do
+      server.start
+      server = fog_server
+      status = %w(ReadyRole Provisioning RoleStateUnknown)
+      status.include?  server.status
+    end
+
+    test("#shutdown") do
+      server.shutdown
+      server = fog_server
+      %w(StoppedVM StoppedDeallocated).include?  server.status
+    end
+
+    test("#destroy") do
+      server.destroy
+      server = azure_service.servers.select { |s| s.vm_name == vm_name }.first
+      server.nil?
+    end
+  end
+
+end

data/tests/models/compute/storage_account_tests.rb

@@ -0,0 +1,51 @@
+# Copyright (c) Microsoft Open Technologies, Inc.  All rights reserved.
+#
+# The MIT License (MIT)
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+Shindo.tests("Fog::Compute[:azure] | storage account model", ["azure", "compute"]) do
+
+  storage = storage_account
+
+  tests("The storage account model should") do
+
+    tests("have the action") do
+      test("reload") { storage.respond_to? "reload" }
+    end
+    tests("have attributes") do
+      model_attribute_hash = storage.attributes
+      attributes = [
+        :name,
+        :location,
+        :status
+      ]
+      tests("The storage account model should respond to") do
+        attributes.each do |attribute|
+          test("#{attribute}") { storage.respond_to? attribute }
+        end
+      end
+      tests("The attributes hash should have key") do
+        attributes.each do |attribute|
+          test("#{attribute}") { model_attribute_hash.key? attribute }
+        end
+      end
+    end
+  end
+
+end