fog-ecloud 0.0.1

data/lib/fog/ecloud/requests/compute/admin_edit_password_complexity_rules.rb

@@ -0,0 +1,72 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        def password_complexity_rules_edit(data)
+          validate_data([:rule_type], data)
+          if data[:rule_type] == "Custom"
+            raise ArgumentError.new("Required data missing: custom_rules") unless data[:custom_rules]
+          end
+          validate_data([:minimum_characters, :minimum_uppercase_characters, :minimum_lowercase_characters, :minimum_numeric_characters, :minimum_special_characters, :maximum_consecutive_characters_from_prior_passwords, :minimum_lifetime_restriction, :minimum_generations_before_reuse], data[:custom_rules])
+          body = build_password_complexity_rules_edit(data)
+          request(
+            :expects => 202,
+            :method => 'PUT',
+            :headers => {},
+            :body => body,
+            :uri => data[:uri],
+            :parse => true
+          )
+        end
+
+        private
+
+        def build_password_complexity_rules_edit(data)
+          xml = Builder::XmlMarkup.new
+          xml.PasswordComplexityRules do
+            xml.RuleType data[:rule_type]
+            if data[:rule_type] == "Custom"
+              xml.CustomRules do
+                xml.MinimumCharacters do
+                  xml.Enabled data[:custom_rules][:minimum_characters][:enabled]
+                  xml.Value data[:custom_rules][:minimum_characters][:value]
+                end
+                xml.MinimumUpperCaseCharacters do
+                  xml.Enabled data[:custom_rules][:minimum_uppercase_characters][:enabled]
+                  xml.Value data[:custom_rules][:minimum_uppercase_characters][:value]
+                end
+                xml.MinimumLowerCaseCharacters do
+                  xml.Enabled data[:custom_rules][:minimum_lowercase_characters][:enabled]
+                  xml.Value data[:custom_rules][:minimum_lowercase_characters][:value]
+                end
+                xml.MinimumNumericCharacters do
+                  xml.Enabled data[:custom_rules][:minimum_numeric_characters][:enabled]
+                  xml.Value data[:custom_rules][:minimum_numeric_characters][:value]
+                end
+                xml.MinimumSpecialCharacters do
+                  xml.Enabled data[:custom_rules][:minimum_special_characters][:enabled]
+                  xml.Value data[:custom_rules][:minimum_special_characters][:value]
+                end
+                xml.MaximumConsecutiveCharactersFromPriorPasswords do
+                  xml.Enabled data[:custom_rules][:maximum_consecutive_characters_from_prior_passwords][:enabled]
+                  xml.Value data[:custom_rules][:maximum_consecutive_characters_from_prior_passwords][:value]
+                end
+                xml.MinimumLifetimeRestriction do
+                  xml.Enabled data[:custom_rules][:minimum_lifetime_restriction][:enabled]
+                  xml.Value data[:custom_rules][:minimum_lifetime_restriction][:value]
+                end
+                xml.MinimumGenerationsBeforeReuse do
+                  xml.Enabled data[:custom_rules][:minimum_generations_before_reuse][:enabled]
+                  xml.Value data[:custom_rules][:minimum_generations_before_reuse][:value]
+                end
+              end
+            end
+            if data[:description]
+              xml.Description data[:description]
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/admin_enable_support_access.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :admin_enable_support_access, 204, 'POST'
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/backup_internet_service_create.rb

@@ -0,0 +1,47 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        include Shared
+
+        def backup_internet_service_create(data)
+          validate_data([:name, :protocol, :enabled, :persistence], data)
+          unless data[:persistence][:type]
+            raise ArgumentError.new("Required data missing: :persistence[:type]")
+          end
+
+          request(
+            :body => generate_backup_internet_service_request(data),
+            :expects => 201,
+            :method => "POST",
+            :headers => {},
+            :uri => data[:uri],
+            :parse => true
+          )
+        end
+
+        private
+
+        def generate_backup_internet_service_request(data)
+          xml = Builder::XmlMarkup.new
+          xml.CreateBackupInternetService(:name => data[:name]) do
+            xml.Protocol data[:protocol]
+            xml.Enabled data[:enabled]
+            if data[:description]
+              xml.Description data[:description]
+            end
+            xml.Persistence do
+              xml.Type data[:persistence][:type]
+              if data[:persistence][:timeout]
+                xml.Timeout data[:persistence][:timeout]
+              end
+            end
+            if data[:redirect_url]
+              xml.RedirectUrl data[:redirect_url]
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/backup_internet_service_delete.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :backup_internet_service_delete, 202, 'DELETE'
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/backup_internet_service_edit.rb

@@ -0,0 +1,47 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        include Shared
+
+        def backup_internet_service_edit(data)
+          validate_data([:name, :protocol, :enabled, :persistence], data)
+          unless data[:persistence][:type]
+            raise ArgumentError.new("Required data missing: :persistence[:type]")
+          end
+
+          request(
+            :body => generate_backup_internet_service_request(data),
+            :expects => 202,
+            :method => "PUT",
+            :headers => {},
+            :uri => data[:uri],
+            :parse => true
+          )
+        end
+
+        private
+
+        def generate_backup_internet_service_request(data)
+          xml = Builder::XmlMarkup.new
+          xml.BackupInternetService(:name => data[:name]) do
+            xml.Protocol data[:protocol]
+            xml.Enabled data[:enabled]
+            if data[:description]
+              xml.Description data[:description]
+            end
+            xml.Persistence do
+              xml.Type data[:persistence][:type]
+              if data[:persistence][:timeout]
+                xml.Timeout data[:persistence][:timeout]
+              end
+            end
+            if data[:redirect_url]
+              xml.RedirectUrl data[:redirect_url]
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/compute_pool_edit.rb

@@ -0,0 +1,35 @@
+module Fog
+  module Compute
+    class Ecloud
+      module Shared
+        def validate_edit_compute_pool_options(options)
+          required_opts = [:name]
+          unless required_opts.all? { |opt| options.key?(opt) }
+            raise ArgumentError.new("Required data missing: #{(required_opts - options.keys).map(&:inspect).join(", ")}")
+          end
+        end
+
+        def build_compute_pool_body_edit(options)
+          xml = Builder::XmlMarkup.new
+          xml.ComputePool(:name => options[:name]) do
+          end
+        end
+      end
+
+      class Real
+        def compute_pool_edit(options)
+          validate_edit_compute_pool_options(options)
+          body = build_compute_pool_body_edit(options)
+          request(
+            :expects => 200,
+            :method => 'PUT',
+            :headers => {},
+            :body => body,
+            :uri => options[:uri],
+            :parse => true
+          )
+        end
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/firewall_acls_create.rb

@@ -0,0 +1,78 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        include Shared
+
+        def firewall_acls_create(data)
+          validate_data([:permission, :protocol, :source, :destination], data)
+          raise ArgumentError.new("Required data missing: source[:type] is required") unless data[:source][:type]
+          raise ArgumentError.new("Required data missing: destination[:type] is required") unless data[:destination][:type]
+
+          request(
+            :body => generate_create_firewall_acls_request(data),
+            :expects => 201,
+            :method => "POST",
+            :headers => {},
+            :uri => data[:uri],
+            :parse => true
+          )
+        end
+
+        private
+
+        def generate_create_firewall_acls_request(data)
+          xml = Builder::XmlMarkup.new
+          xml.CreateFirewallAcl do
+            xml.Permission data[:permission]
+            xml.Protocol data[:protocol]
+            xml.Source do
+              xml.Type data[:source][:type]
+              if data[:source][:external_ip_address]
+                xml.ExternalIpAddress data[:external_ip_address]
+              end
+              if data[:source][:external_network]
+                xml.ExternalNetwork do
+                  xml.Address data[:source][:external_network][:address]
+                  xml.Size data[:source][:external_network][:size]
+                end
+              end
+              if data[:source][:ip_address]
+                xml.IpAddress(:href => data[:source][:ip_address])
+              end
+              if data[:source][:network]
+                xml.Network(:href => data[:source][:network][:href], :name => data[:source][:network][:name])
+              end
+            end
+            xml.Destination do
+              xml.Type data[:destination][:type]
+              if data[:destination][:external_ip_address]
+                xml.ExternalIpAddress data[:external_ip_address]
+              end
+              if data[:destination][:external_network]
+                xml.ExternalNetwork do
+                  xml.Address data[:destination][:external_network][:address]
+                  xml.Size data[:destination][:external_network][:size]
+                end
+              end
+              if data[:destination][:ip_address]
+                xml.IpAddress(:href => data[:destination][:ip_address])
+              end
+              if data[:destination][:network]
+                xml.Network(:href => data[:destination][:network][:href], :name => data[:destination][:network][:name])
+              end
+            end
+            xml.PortRange do
+              if data[:port_range][:start]
+                xml.Start data[:port_range][:start]
+              end
+              if data[:port_range][:end]
+                xml.End data[:port_range][:end]
+              end
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/firewall_acls_delete.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :firewall_acls_delete, 202, 'DELETE'
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_admin_organization.rb

@@ -0,0 +1,23 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_admin_organization
+      end
+
+      class Mock
+        def get_admin_organization(uri)
+          organization_id = id_from_uri(uri)
+          admin_organization    = self.data[:admin_organizations][organization_id]
+
+          if admin_organization
+            body = Fog::Ecloud.slice(admin_organization, :id, :organization_id)
+
+            response(:body => body)
+          else response(:status => 404) # ?
+          end
+        end
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_api_key.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_api_key
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_api_keys.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_api_keys
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_association.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_association
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_associations.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_associations
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_authentication_level.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_authentication_level
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_authentication_levels.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_authentication_levels
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_backup_internet_service.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_backup_internet_service
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_backup_internet_services.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_backup_internet_services
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_catalog.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_catalog
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_catalog_configuration.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_catalog_configuration
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_catalog_configurations.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_catalog_configurations
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_catalog_item.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_catalog_item
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_compute_pool.rb

@@ -0,0 +1,21 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_compute_pool
+      end
+
+      class Mock
+        def get_compute_pool(uri)
+          compute_pool_id = id_from_uri(uri)
+          compute_pool = self.data[:compute_pools][compute_pool_id]
+
+          if compute_pool
+            response(:body => Fog::Ecloud.slice(compute_pool, :id, :environment))
+          else response(:status => 404) # ?
+          end
+        end
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_compute_pools.rb

@@ -0,0 +1,31 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_compute_pools
+      end
+
+      class Mock
+        def get_compute_pools(uri) # /cloudapi/ecloud/computepools/environments/534
+          environment_id = id_from_uri(uri)
+          environment    = self.data[:environments][environment_id]
+
+          compute_pools  = self.data[:compute_pools].values.select{|cp| cp[:environment_id] == environment_id}
+
+          compute_pools = compute_pools.map{|cp| Fog::Ecloud.slice(cp, :id, :environment_id)}
+
+          compute_pool_response = {:ComputePool => (compute_pools.size > 1 ? compute_pools : compute_pools.first)} # GAH
+          body = {
+            :href  => uri,
+            :type  => "application/vnd.tmrk.cloud.computePool; type=collection",
+            :Links => {
+              :Link => environment,
+            }
+          }.merge(compute_pool_response)
+
+          response(:body => body)
+        end
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_cpu_usage_detail.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_cpu_usage_detail
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_cpu_usage_detail_summary.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_cpu_usage_detail_summary
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_detached_disk.rb

@@ -0,0 +1,21 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_detached_disk
+      end
+
+      class Mock
+        def get_detached_disk(uri)
+          detached_disk_id = id_from_uri(uri)
+          detached_disk    = self.data[:detached_disks][detached_disk_id]
+
+          if detached_disk
+            response(:body => Fog::Ecloud.slice(detached_disk, :id, :compute_pool_id))
+          else raise Fog::Errors::NotFound
+          end
+        end
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_detached_disks.rb

@@ -0,0 +1,31 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_detached_disks
+      end
+
+      class Mock
+        def get_detached_disks(uri)
+          compute_pool_id = id_from_uri(uri)
+          compute_pool    = self.data[:compute_pools][compute_pool_id]
+
+          detached_disks  = self.data[:detached_disks].values.select{|cp| cp[:compute_pool_id] == compute_pool_id}
+
+          detached_disks = detached_disks.map{|dd| Fog::Ecloud.slice(dd, :id, :compute_pool_id)}
+
+          detached_disk_response = {:DetachedDisk => (detached_disks.size > 1 ? detached_disks : detached_disks.first)} # GAH
+          body = {
+            :href  => uri,
+            :type  => "application/vnd.tmrk.cloud.detachedDisk; type=collection",
+            :Links => {
+              :Link => Fog::Ecloud.keep(compute_pool, :name, :href, :type),
+            }
+          }.merge(detached_disk_response)
+
+          response(:body => body)
+        end
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_environment.rb

@@ -0,0 +1,31 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_environment
+      end
+
+      class Mock
+        def get_environment(uri)
+          environment_id = id_from_uri(uri)
+          organizations = self.data[:organizations].values
+          environment = nil
+          catch(:found) do
+            organizations.each do |organization|
+              organization[:Locations][:Location].each do |location|
+                environment = location[:Environments][:Environment].find{|e| e[:id] == environment_id}
+                throw :found if environment
+              end
+            end
+          end
+          if environment
+            body = environment.dup
+            body.delete(:id)
+            response(:body => body)
+          else response(:status => 404) # ?
+          end
+        end
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_firewall_acl.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_firewall_acl
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_firewall_acls.rb

@@ -0,0 +1,9 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_firewall_acls
+      end
+    end
+  end
+end

data/lib/fog/ecloud/requests/compute/get_group.rb

@@ -0,0 +1,18 @@
+module Fog
+  module Compute
+    class Ecloud
+      class Real
+        basic_request :get_group
+      end
+
+      class Mock
+        def get_group(uri)
+          group_id = id_from_uri(uri)
+          group = self.data[:groups][group_id]
+
+          response(:body =>  group)
+        end
+      end
+    end
+  end
+end