azure-fix 0.7.0.pre3

data/lib/azure/cloud_service_management/cloud_service.rb

@@ -0,0 +1,38 @@
+#-------------------------------------------------------------------------
+# Copyright 2013 Microsoft Open Technologies, Inc.
+#
+# Licensed 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.
+#--------------------------------------------------------------------------
+
+module Azure
+  module CloudServiceManagement
+    class CloudService
+      def initialize
+        yield self if block_given?
+      end
+
+      attr_accessor :url
+      attr_accessor :name
+      attr_accessor :label
+      attr_accessor :description
+      attr_accessor :location
+      attr_accessor :affinity_group
+      attr_accessor :status
+      attr_accessor :date_created
+      attr_accessor :date_modified
+      attr_accessor :extended_properties
+      attr_accessor :default_winrm_certificate_thumbprint
+      attr_accessor :virtual_machines
+      attr_accessor :deployment_name
+    end
+  end
+end

data/lib/azure/cloud_service_management/cloud_service_management_service.rb

@@ -0,0 +1,135 @@
+#-------------------------------------------------------------------------
+# Copyright 2013 Microsoft Open Technologies, Inc.
+#
+# Licensed 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 'azure/cloud_service_management/serialization'
+
+module Azure
+  module CloudServiceManagement
+    class CloudServiceManagementService < BaseManagement::BaseManagementService
+      include Azure::Core::Utility
+
+      # Public: Creates a new cloud service in Microsoft Azure.
+      #
+      # ==== Attributes
+      #
+      # * +name+          - String. The name of the cloud service.
+      # * +options+       - Hash. Optional parameters.
+      #
+      # ==== Options
+      #
+      # Accepted key/value pairs in options parameter are:
+      # * +:label+  -String. The label for this cloud service.
+      # * +:description+         - String. A description for the hosted service. (optional)
+      # * +:location+  - String. The regional data center location where the
+      # cloud service will be created. Required if affinity group not
+      # specified (optional)
+      # * +:affinity_group_name  - String. Name of the affinity group with
+      # which to assocate the cloud service. Required if location not
+      # specified (optional)
+      # * +:extended_properties+  - Hash. Key/Value pairs of extended
+      # properties to add to the cloud service. The key is used as the
+      # property name and the value as its value. (optional)
+      #
+      # See http://msdn.microsoft.com/en-us/library/azure/gg441304.aspx
+      #
+      # Returns None
+      def create_cloud_service(name, options = {})
+        Azure::Loggerx.error_with_exit 'Cloud service name is not valid ' unless name
+        if get_cloud_service(name)
+          Azure::Loggerx.warn "Cloud service #{name} already exists. Skipped..."
+        else
+          Azure::Loggerx.info "Creating cloud service #{name}."
+          request_path = '/services/hostedservices'
+          body = Serialization.cloud_services_to_xml(name, options)
+          request = client.management_request(:post, request_path, body)
+          request.call
+        end
+      end
+
+      # Public: Gets a list of hosted services available under the current subscription.
+      #
+      # Returns an array of Azure::CloudServiceManagement::CloudService objects
+      def list_cloud_services
+        request_path = '/services/hostedservices'
+        request = client.management_request(:get, request_path)
+        response = request.call
+        Serialization.cloud_services_from_xml(response)
+      end
+
+      # Public: Checks to see if the specified hosted service is available
+      #
+      # ==== Attributes
+      #
+      # * +name+       - String. Cloud service name.
+      #
+      # Returns: A boolean value indicating whether the cloud service exists.
+      # If true, the cloud service is available. If false, the cloud service
+      # does not exist.
+      def get_cloud_service(name)
+        list_cloud_services.select { |x| x.name.casecmp(name) == 0 }.first
+      end
+
+      def get_cloud_service_properties(name)
+        request_path = "/services/hostedservices/#{name}?embed-detail=true"
+        request = client.management_request(:get, request_path)
+        response = request.call
+        Serialization.cloud_services_from_xml(response).first
+      end
+
+      # Public: Deletes the specified cloud service of given subscription id from Microsoft Azure.
+      #
+      # ==== Attributes
+      #
+      # * +name+       - String. Cloud service name.
+      #
+      # Returns:  None
+      def delete_cloud_service(cloud_service_name)
+        request_path= "/services/hostedservices/#{cloud_service_name}"
+        request = client.management_request(:delete, request_path)
+        Azure::Loggerx.info "Deleting cloud service #{cloud_service_name}. \n"
+        request.call
+      end
+
+      # Public: Deletes the specified deployment.
+      #
+      # ==== Attributes
+      #
+      # * +cloud_service_name+  - String. Cloud service name.
+      # * +slot+                - String. 'production' or 'staging'. Optional parameters.
+      #                           Default if not specified is 'production'
+      #
+      # See http://msdn.microsoft.com/en-us/library/azure/ee460815.aspx
+      #
+      # Returns NONE
+      def delete_cloud_service_deployment(cloud_service_name, slot='production')
+        slot = 'production' unless slot
+        request_path= "/services/hostedservices/#{cloud_service_name}/deploymentslots/#{slot}"
+        request = client.management_request(:delete, request_path)
+        Azure::Loggerx.info "Deleting deployment of cloud service \"#{cloud_service_name}\" ..."
+        request.call
+      end
+
+      def upload_certificate(cloud_service_name, ssh)
+        data = export_der(ssh[:cert], ssh[:key])
+        request_path= "/services/hostedservices/#{cloud_service_name}/certificates"
+        body = Serialization.add_certificate_to_xml(data)
+        Azure::Loggerx.info "Uploading certificate to cloud service #{cloud_service_name}..."
+        request = client.management_request(:post, request_path, body)
+        request.call
+      end
+    end
+  end
+end
+
+Azure::CloudServiceManagementService = Azure::CloudServiceManagement::CloudServiceManagementService

data/lib/azure/cloud_service_management/serialization.rb

@@ -0,0 +1,118 @@
+#-------------------------------------------------------------------------
+# Copyright 2013 Microsoft Open Technologies, Inc.
+#
+# Licensed 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 'base64'
+require 'azure/cloud_service_management/cloud_service'
+require 'azure/virtual_machine_management/serialization'
+
+module Azure
+  module CloudServiceManagement
+    module Serialization
+      extend Azure::Core::Utility
+      def self.cloud_services_to_xml(name, options = {})
+        options[:label] = options[:label] || name
+
+        builder = Nokogiri::XML::Builder.new do |xml|
+          xml.CreateHostedService(
+            'xmlns' => 'http://schemas.microsoft.com/windowsazure'
+          ) do
+            xml.ServiceName(name)
+            xml.Label(Base64.encode64(options[:label]))
+            xml.Description(options[:description]) unless\
+              options[:description].nil? || options[:description].empty?
+
+            unless options[:affinity_group_name].nil?
+              xml.AffinityGroup(options[:affinity_group_name])
+            else
+              xml.Location(options[:location])
+            end
+
+            xml.ExtendedProperties do
+              options[:extended_properties].each do |prop_name, prop_value|
+                xml.ExtendedProperty do
+                  xml.Name(prop_name)
+                  xml.Value(prop_value)
+                end unless (prop_name.nil? || prop_name.empty?)\
+                  || (prop_value.nil? || prop_value.empty?)
+              end
+            end unless options[:extended_properties].nil?\
+              || options[:extended_properties].empty?
+          end
+        end
+        builder.doc.to_xml
+      end
+
+      def self.cloud_services_from_xml(cloud_xml)
+        clouds = []
+        cloud_services_xml = cloud_xml.css('HostedServices HostedService')
+        cloud_services_xml = cloud_xml.css('HostedService') if \
+          cloud_services_xml.length == 0
+        cloud_services_xml.each do |cloud_service_xml|
+          cloud = CloudService.new
+          cloud.url = xml_content(cloud_service_xml, 'Url')
+          cloud.name = xml_content(cloud_service_xml, 'ServiceName')
+
+          props_xml = cloud_service_xml.css('HostedServiceProperties')
+
+          cloud.label = Base64.decode64(xml_content(props_xml, 'Label'))
+          cloud.description = xml_content(props_xml, 'Description')
+          location = xml_content(props_xml, 'Location')
+          cloud.location = location unless location.empty?
+          affinity_group =  xml_content(props_xml, 'AffinityGroup')
+          cloud.affinity_group = affinity_group unless affinity_group
+          cloud.status = xml_content(props_xml, 'Status')
+          cloud.date_created = xml_content(props_xml, 'DateCreated')
+          cloud.date_modified = xml_content(props_xml, 'DateLastModified')
+
+          cloud.extended_properties = {}
+          props_xml.css('ExtendedProperties ExtendedProperty').map do |prop|
+            p_name = xml_content(prop, 'Name')
+            p_value = xml_content(prop, 'Value')
+            cloud.extended_properties[p_name] = p_value
+          end
+
+          cloud.default_winrm_certificate_thumbprint = xml_content(
+            cloud_service_xml, 'DefaultWinRMCertificateThumbprint'
+          )
+          deployment_xml = cloud_services_xml.css('Deployments Deployment')
+          cloud.deployment_name = xml_content(deployment_xml, 'Name')
+          vms_in_deployment = {}
+
+          cloud_service_xml.css('Deployments').each do |deployxml|
+            deployment_name = xml_content(deployxml, 'Deployment Name')
+            vms = Azure::VirtualMachineManagement::Serialization.virtual_machines_from_xml(
+              deployxml, cloud.name
+            )
+            vms_in_deployment[deployment_name.to_sym] = vms if vms
+          end
+
+          cloud.virtual_machines = vms_in_deployment
+          clouds << cloud
+        end
+        clouds.compact
+      end
+
+      def self.add_certificate_to_xml(data)
+        builder = Nokogiri::XML::Builder.new do |xml|
+          xml.CertificateFile('xmlns' => 'http://schemas.microsoft.com/windowsazure') do
+            xml.Data data
+            xml.CertificateFormat 'pfx'
+            xml.Password nil
+          end
+        end
+        builder.doc.to_xml
+      end
+    end
+  end
+end

data/lib/azure/configurable.rb

@@ -0,0 +1,290 @@
+#-------------------------------------------------------------------------
+# # Copyright (c) Microsoft and contributors. All rights reserved.
+#
+# Licensed 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.
+#--------------------------------------------------------------------------
+
+module Azure
+  # The Azure::Configurable module provides basic configuration for Azure activities.
+  module Configurable
+
+    # @!attribute [w] storage_access_key
+    #   @return [String] Azure Storage access key.
+    # @!attribute storage_account_name
+    #   @return [String] Azure Storage account name
+    # @!attribute sb_access_key
+    #   @return [String] Azure Service Bus access key
+    # @!attribute sb_sas_key
+    #   @return [String] Azure Service Bus Shared Access Signature key
+    # @!attribute sb_sas_key_name
+    #   @return [String] Azure Service Bus Shared Access Signature key name
+    # @!attribute sb_namespace
+    #   @return [String] Azure Service Bus namespace
+    # @!attribute sb_issuer
+    #   @return [String] Azure Service Bus issuer
+    # @!attribute ca_file
+    #   @return [String] Location of the Certificate Authority bundle to be used for HTTPS
+    # @!attribute management_certificate
+    #   @return [String|File] Azure Service Management certificate (pfx or pem)
+    # @!attribute subscription_id
+    #   @return [String] Azure Subscription ID
+    # @!attribute http_private_key
+    #   @return [String] Private key used for HTTPS certificate based authentication (derived from the management cert)
+    # @!attribute http_certificate_key
+    #   @return [String] Public key used for HTTPS certificate based authentication (derived from the management cert)
+    # @!attribute sql_database_management_endpoint
+    #   @return [String] Azure SQL database management endpoint. default: https://management.core.windows.net:8443/
+    # @!attribute storage_blob_host
+    #   @return [String] Set the host for the Blob service. Only set this if you want
+    #     something custom (like, for example, to point this to a LocalStorage
+    #     emulator). This should be the complete host, including http:// at the
+    #     start. When using the emulator, make sure to include your account name at
+    #     the end.
+    # @!attribute storage_table_host
+    #   @return [String] Get the host for this service. If you set something using #storage_table_host=,
+    #     then we use that. Else we default to Azure's default hosts, based
+    #     on your account name.
+    # @!attribute storage_queue_host
+    #   @return [String] Set the host for the Queue service. Only set this if you want
+    #     something custom (like, for example, to point this to a LocalStorage
+    #     emulator). This should be the complete host, including http:// at the
+    #     start. When using the emulator, make sure to include your account name at
+    #     the end.
+    # @!attribute management_endpoint
+    #   @return [String] Azure Service Management Endpoint. default: https://management.core.windows.net
+
+    attr_accessor :storage_access_key,
+                  :storage_account_name,
+                  :sb_access_key,
+                  :sb_namespace,
+                  :sb_sas_key,
+                  :sb_sas_key_name,
+                  :sb_issuer,
+                  :ca_file,
+                  :subscription_id
+
+    attr_reader :http_private_key,
+                :http_certificate_key,
+                :acs_host,
+                :service_bus_host
+
+    attr_writer :storage_table_host,
+                :storage_blob_host,
+                :storage_queue_host,
+                :sql_database_management_endpoint,
+                :management_endpoint
+
+    class << self
+
+      # List of configurable keys for {Azure::Client}
+      # @return [Array] of option keys
+      def keys
+        @keys ||= [
+            :storage_access_key,
+            :storage_account_name,
+            :sb_access_key,
+            :sb_sas_key,
+            :sb_sas_key_name,
+            :ca_file,
+            :sb_namespace,
+            :management_certificate,
+            :subscription_id,
+            :sql_database_management_endpoint,
+            :sb_issuer,
+            :storage_table_host,
+            :storage_blob_host,
+            :storage_queue_host,
+            :management_endpoint
+        ]
+      end
+    end
+
+    # Set configuration options using a block
+    def configure
+      yield self
+    end
+
+    # Reset configuration options to default values
+    def reset!(options = {})
+      Azure::Configurable.keys.each do |key|
+        value = if self == Azure
+                  Azure::Default.options[key]
+                else
+                  Azure.send(key)
+                end
+
+        if key == :management_certificate
+          @certificate_key = nil
+          @private_key = nil
+          send(:"#{key.to_s + '='}", value)
+        else
+          instance_variable_set(:"@#{key}", options.fetch(key, value))
+        end
+      end
+      self.send(:reset_agents!) if self.respond_to?(:reset_agents!)
+      self
+    end
+
+    alias setup reset!
+
+    def management_certificate
+      @management_certificate
+    end
+
+    # Set the management certificate via string or file (populates #http_private_key and #http_certificate_key)
+    # @param  [String|File] the string or file representing the .pem or .pfx
+    def management_certificate=(cert_string_or_file)
+      self.send(:reset_agents!) if self.respond_to?(:reset_agents!)
+      if cert_string_or_file.nil?
+        @certificate_key = @private_key = @management_certificate = nil
+      else
+
+        # the pfx may have null chars which will raise an exception in File.file?
+        invalid_file_chars = cert_string_or_file.to_s =~ /\x00/
+
+        # validate only if input is file path
+        if !invalid_file_chars && File.file?(cert_string_or_file) && File.extname(cert_string_or_file).downcase =~ /(pem|pfx)$/
+          error_message = "Could not read from file '#{cert_string_or_file}'."
+          raise ArgumentError.new(error_message) unless test('r', cert_string_or_file)
+        end
+
+        # get the string representation of cert
+        cert_file = if !invalid_file_chars && File.file?(cert_string_or_file)
+                      read_cert_from_file(cert_string_or_file)
+                    else
+                      cert_string_or_file
+                    end
+
+        begin
+          if cert_file =~ /-----BEGIN CERTIFICATE-----/
+            # Parse pem content
+            @certificate_key = OpenSSL::X509::Certificate.new(cert_file)
+            @private_key = OpenSSL::PKey::RSA.new(cert_file)
+          else
+            # Parse pfx content
+            cert_content = OpenSSL::PKCS12.new(cert_file)
+            @certificate_key = OpenSSL::X509::Certificate.new(
+                cert_content.certificate.to_pem
+            )
+            @private_key = OpenSSL::PKey::RSA.new(cert_content.key.to_pem)
+          end
+          @management_certificate = cert_file
+        rescue OpenSSL::OpenSSLError => e
+          @certificate_key = nil
+          @private_key = nil
+          raise ArgumentError.new("Management certificate not valid. Error: #{e.message}")
+        end
+      end
+    end
+
+    # Private side of the management certificate
+    # @returns [OpenSSL::X509::Certificate]
+    def http_private_key
+      @private_key
+    end
+
+    # Public side of the management certificate
+    # @returns [OpenSSL::PKey::RSA]
+    def http_certificate_key
+      @certificate_key
+    end
+
+    def management_endpoint
+      normalize_endpoint do
+        if URI(@management_endpoint).scheme.nil?
+          "https://#{@management_endpoint}"
+        else
+          @management_endpoint
+        end
+      end
+    end
+
+    def sql_database_management_endpoint
+      normalize_endpoint do
+        if URI(@sql_database_management_endpoint).scheme.nil?
+          "https://#{@sql_database_management_endpoint}:8443"
+        else
+          @sql_database_management_endpoint
+        end
+      end
+    end
+
+    # Storage queue host
+    # @return [String]
+    def storage_queue_host
+      @storage_queue_host || default_host(:queue)
+    end
+
+    # Storage blob host
+    # @return [String]
+    def storage_blob_host
+      @storage_blob_host || default_host(:blob)
+    end
+
+    # Storage table host
+    # @return [String]
+    def storage_table_host
+      @storage_table_host || default_host(:table)
+    end
+
+    # Get the host for the ACS service.
+    # @return [String]
+    def acs_host
+      if sb_namespace.empty?
+        nil
+      else
+        "https://#{sb_namespace}-sb.accesscontrol.windows.net"
+      end
+    end
+
+    # Get the host for Service Bus based on the Service Bus Namespace.
+    # @return [String]
+    def service_bus_host
+      if sb_namespace.empty?
+        nil
+      else
+        "https://#{sb_namespace}.servicebus.windows.net"
+      end
+    end
+
+    def config
+      self
+    end
+
+    private
+
+    def default_host(service)
+      "https://#{storage_account_name}.#{service}.core.windows.net"
+    end
+
+    def read_cert_from_file(cert_file_path)
+      if File.extname(cert_file_path).downcase == '.pem'
+        File.read(cert_file_path)
+      else
+        File.binread(cert_file_path)
+      end
+    end
+
+    def normalize_endpoint
+      if block_given?
+        File.join(yield, '')
+      else
+        nil
+      end
+    end
+
+    def options
+      Hash[Azure::Configurable.keys.map { |key| [key, instance_variable_get(:"@#{key}")] }]
+    end
+
+  end
+end