startapp 0.1.6

data/lib/rhc/rest/application.rb

@@ -0,0 +1,348 @@
+require 'uri'
+
+module RHC
+  module Rest
+    class Application < Base
+      include Membership
+
+      define_attr :domain_id, :name, :creation_time, :uuid,
+                  :git_url, :app_url, :gear_profile, :framework,
+                  :scalable, :health_check_path, :embedded, :gear_count,
+                  :ssh_url, :building_app, :cartridges, :initial_git_url,
+                  :auto_deploy, :deployment_branch, :deployment_type, :keep_deployments, :deployments
+      alias_method :domain_name, :domain_id
+
+      # Query helper to say consistent with cartridge
+      def scalable?
+        scalable
+      end
+
+      def id
+        attributes['id'] || uuid
+      end
+
+      def uuid
+        if (client.api_version_negotiated >= 1.6)
+          attributes['id']
+        else
+          attributes['uuid']
+        end
+      end
+
+      def domain
+        domain_id
+      end
+
+      def scalable_carts
+        return [] unless scalable?
+        carts = cartridges.select(&:scalable?)
+        scales_with = carts.map(&:scales_with)
+        carts.delete_if{|x| scales_with.include?(x.name)}
+      end
+
+      def add_cartridge(cart, options={})
+        debug "Adding cartridge #{name}"
+        clear_attribute :cartridges
+        cart =
+          if cart.is_a? String
+            {:name => cart}
+          elsif cart.respond_to? :[]
+            cart
+          else
+            c = cart.url ? {:url => cart.url} : {:name => cart.name}
+            if cart.respond_to?(:environment_variables) && cart.environment_variables.present?
+              c[:environment_variables] = cart.environment_variables
+            end
+            if cart.respond_to?(:gear_size) && cart.gear_size.present?
+              c[:gear_size] = cart.gear_size
+            end
+            cart = c
+          end
+
+        if cart.respond_to?(:[]) and cart[:url] and !has_param?('ADD_CARTRIDGE', 'url')
+          raise RHC::Rest::DownloadingCartridgesNotSupported, "The server does not support downloading cartridges."
+        end
+
+        rest_method(
+          "ADD_CARTRIDGE",
+          cart,
+          options
+        )
+      end
+
+      def cartridges
+        @cartridges ||=
+          unless (carts = attributes['cartridges']).nil?
+            carts.map{|x| Cartridge.new(x, client) }
+          else
+            debug "Getting all cartridges for application #{name}"
+            rest_method "LIST_CARTRIDGES"
+          end
+      end
+
+      def gear_info
+        { :gear_count => gear_count, :gear_profile => gear_profile } unless gear_count.nil?
+      end
+
+      def gear_groups
+        debug "Getting all gear groups for application #{name}"
+        rest_method "GET_GEAR_GROUPS"
+      end
+
+      def gears
+        gear_groups.map{ |group| group.gears }.flatten
+      end
+
+      def gear_ssh_url(gear_id)
+        gear = gears.find{ |g| g['id'] == gear_id }
+
+        raise ArgumentError, "Gear #{gear_id} not found" if gear.nil?
+        gear['ssh_url'] or raise NoPerGearOperations
+      end
+
+      def tidy
+        debug "Starting application #{name}"
+        rest_method 'TIDY', :event => "tidy"
+      end
+
+      def scale_up
+        rest_method 'SCALE_UP', :event => "scale-up"
+      end
+
+      def scale_down
+        rest_method 'SCALE_DOWN', :event => "scale-down"
+      end
+
+      def start
+        debug "Starting application #{name}"
+        rest_method 'START', :event => "start"
+      end
+
+      def stop(force=false)
+        debug "Stopping application #{name} force-#{force}"
+
+        if force
+          payload = {:event=> "force-stop"}
+        else
+          payload = {:event=> "stop"}
+        end
+
+        rest_method "STOP", payload
+      end
+
+      def restart
+        debug "Restarting application #{name}"
+        rest_method "RESTART", :event => "restart"
+      end
+
+      def destroy
+        debug "Deleting application #{name}"
+        rest_method "DELETE"
+      end
+      alias :delete :destroy
+
+      def reload
+        debug "Reload application #{name}"
+        rest_method "RELOAD", :event => "reload"
+      end
+
+      def threaddump
+        debug "Running thread dump for #{name}"
+        rest_method "THREAD_DUMP", :event => "thread-dump"
+      end
+
+      def environment_variables
+        debug "Getting all environment variables for application #{name}"
+        if supports? "LIST_ENVIRONMENT_VARIABLES"
+          rest_method "LIST_ENVIRONMENT_VARIABLES"
+        else
+          raise RHC::EnvironmentVariablesNotSupportedException.new
+        end
+      end
+
+      def find_environment_variable(env_var_name)
+        find_environment_variables(env_var_name).first
+      end
+
+      def find_environment_variables(env_var_names=nil)
+        return environment_variables if env_var_names.nil?
+        env_var_names = [env_var_names].flatten
+        debug "Finding environment variable(s) #{env_var_names.inspect} in app #{@name}"
+        env_vars = environment_variables.select { |item| env_var_names.include? item.name }
+        raise RHC::EnvironmentVariableNotFoundException.new("Environment variable(s) #{env_var_names.join(', ')} can't be found in application #{name}.") if env_vars.empty?
+        env_vars
+      end
+
+      # @param [Array<RHC::Rest::EnvironmentVariable>] Array of RHC::Rest::EnvironmentVariable to be set
+      def set_environment_variables(env_vars=[])
+        debug "Adding environment variable(s) #{env_vars.inspect} for #{name}"
+        if supports? "SET_UNSET_ENVIRONMENT_VARIABLES"
+          rest_method "SET_UNSET_ENVIRONMENT_VARIABLES", :environment_variables => env_vars.map{|item| item.to_hash}
+        else
+          raise RHC::EnvironmentVariablesNotSupportedException.new
+        end
+      end
+
+      # @param [Array<String>] Array of env var names like ['FOO', 'BAR']
+      def unset_environment_variables(env_vars=[])
+        debug "Removing environment variable(s) #{env_vars.inspect} for #{name}"
+        if supports? "SET_UNSET_ENVIRONMENT_VARIABLES"
+          rest_method "SET_UNSET_ENVIRONMENT_VARIABLES", :environment_variables => env_vars.map{|item| {:name => item}}
+        else
+          raise RHC::EnvironmentVariablesNotSupportedException.new
+        end
+      end
+
+      def supports_add_cartridge_with_env_vars?
+        has_param?('ADD_CARTRIDGE', 'environment_variables')
+      end
+
+      def supports_add_cartridge_with_gear_size?
+        has_param?('ADD_CARTRIDGE', 'gear_size')
+      end
+
+      def deployments
+        debug "Listing deployments for application #{name}"
+        raise RHC::DeploymentsNotSupportedException if !supports? "LIST_DEPLOYMENTS"
+        rest_method("LIST_DEPLOYMENTS").sort
+      end
+
+      def deployment_activations
+        items = []
+
+        # building an array of activations with their deployments
+        deployments.each do |deployment|
+          deployment.activations.each do |activation|
+            items << {:activation => activation, :deployment => deployment}
+          end
+        end
+
+        items.sort! {|a,b| a[:activation].created_at <=> b[:activation].created_at }
+
+        first_activation = {}
+
+        items.each do |item|
+          deployment = item[:deployment]
+          activation = item[:activation]
+
+          # set the currently active (last activation by date)
+          item[:active] = item == items.last
+
+          # mark rollbacks (activations whose deployment had previous activations)
+          if rollback_to = first_activation[deployment.id]
+            item[:rollback] = true
+            item[:rollback_to] = rollback_to
+            # mark rolled back (all in between a rollback and its original deployment)
+            items.each {|i| i[:rolled_back] = true if i[:activation].created_at > rollback_to && i[:activation].created_at < activation.created_at }
+          else
+            first_activation[deployment.id] = activation.created_at
+          end
+
+        end
+
+        items
+      end
+
+      def configure(options={})
+        debug "Running update for #{name} with options #{options.inspect}"
+        if supports? "UPDATE"
+          rest_method "UPDATE", options
+        else
+          raise RHC::DeploymentsNotSupportedException
+        end
+      end
+
+      def add_alias(app_alias)
+        debug "Running add_alias for #{name}"
+        rest_method "ADD_ALIAS", :event => "add-alias", :alias => app_alias
+      end
+
+      def remove_alias(app_alias)
+        debug "Running remove_alias for #{name}"
+        if (client.api_version_negotiated >= 1.4)
+          find_alias(app_alias).destroy
+        else
+          rest_method "REMOVE_ALIAS", :event => "remove-alias", :alias => app_alias
+        end
+      end
+
+      def aliases
+        debug "Getting all aliases for application #{name}"
+        @aliases ||= begin
+          aliases = attributes['aliases']
+          if aliases.nil? or not aliases.is_a?(Array)
+            supports?('LIST_ALIASES') ? rest_method("LIST_ALIASES") : []
+          else
+            aliases.map do |a|
+              Alias.new(a.is_a?(String) ? {'id' => a} : a, client)
+            end
+          end
+        end
+      end
+
+      def find_alias(name, options={})
+        debug "Finding alias #{name} in app #{@name}"
+
+        if name.is_a?(Hash)
+          options = name
+          name = options[:name]
+        end
+        aliases.each { |a| return a if a.is_a?(String) || a.id == name.downcase }
+        raise RHC::AliasNotFoundException.new("Alias #{name} can't be found in application #{@name}.")
+      end
+
+      #Find Cartridge by name
+      def find_cartridge(sought, options={})
+        debug "Finding cartridge #{sought} in app #{name}"
+
+        type = options[:type]
+
+        cartridges.each { |cart| return cart if cart.name == sought and (type.nil? or cart.type == type) }
+
+        suggested_msg = ""
+        valid_cartridges = cartridges.select {|c| type.nil? or c.type == type}
+        unless valid_cartridges.empty?
+          suggested_msg = "\n\nValid cartridges:"
+          valid_cartridges.each { |cart| suggested_msg += "\n#{cart.name}" }
+        end
+        raise RHC::CartridgeNotFoundException.new("Cartridge #{sought} can't be found in application #{name}.#{suggested_msg}")
+      end
+
+      #Find Cartridges by name or regex
+      def find_cartridges(name, options={})
+        if name.is_a?(Hash)
+          options = name
+          name = options[:name]
+        end
+
+        type = options[:type]
+        regex = options[:regex]
+        debug "Finding cartridge #{name || regex} in app #{@name}"
+
+        filtered = Array.new
+        cartridges.each do |cart|
+          if regex
+            filtered.push(cart) if cart.name.match(/(?i:#{regex})/) and (type.nil? or cart.type == type)
+          else
+            filtered.push(cart) if cart.name.downcase == name.downcase and (type.nil? or cart.type == type)
+          end
+        end
+        filtered
+      end
+
+      def host
+        @host ||= URI.parse(app_url).host rescue nil
+      end
+
+      def ssh_string
+        RHC::Helpers.ssh_string(ssh_url)
+      end
+
+      def <=>(other)
+        c = name.downcase <=> other.name.downcase
+        return c unless c == 0
+        domain_id <=> other.domain_id
+      end
+    end
+  end
+end

data/lib/rhc/rest/attributes.rb

@@ -0,0 +1,36 @@
+module RHC::Rest::Attributes
+  def attributes
+    @attributes
+  end
+
+  def attributes=(attr=nil)
+    @attributes = (attr || {}).stringify_keys!
+  end
+
+  def attribute(name)
+    instance_variable_get("@#{name}") || attributes[name.to_s]
+  end
+
+  def clear_attribute(name)
+    v = instance_variable_set("@#{name}", nil)
+    attributes.delete(name.to_s) or v 
+  end
+end
+
+module RHC::Rest::AttributesClass
+  def define_attr(*names)
+    names.map(&:to_sym).each do |name|
+      define_method(name) do
+        attribute(name)
+      end
+      define_method("#{name}=") do |value|
+        instance_variable_set(:"@#{name}", nil)
+        attributes[name.to_s] = value
+      end
+    end
+  end
+
+  def model_name
+    name.split("::").last
+  end
+end

data/lib/rhc/rest/authorization.rb

@@ -0,0 +1,8 @@
+module RHC
+  module Rest
+    class Authorization < Base
+      define_attr :token, :note, :expires_in, :expires_in_seconds, :scopes, :created_at
+      alias_method :creation_time, :created_at
+    end
+  end
+end

data/lib/rhc/rest/base.rb

@@ -0,0 +1,79 @@
+require 'cgi'
+
+module RHC
+  module Rest
+    class Base
+      include Attributes
+      extend AttributesClass
+
+      define_attr :messages
+
+      def initialize(attrs=nil, client=nil)
+        @attributes = (attrs || {}).stringify_keys!
+        @attributes['messages'] ||= []
+        @client = client
+      end
+
+      def add_message(msg)
+        messages << msg
+      end
+
+      def rest_method(link_name, payload={}, options={})
+        link = link(link_name)
+        raise "No link defined for #{link_name}" unless link
+        url = link['href']
+        url = url.gsub(/:\w+/) { |s| CGI.escape(options[:params][s]) || s } if options[:params]
+        method = options[:method] || link['method']
+
+        result = client.request(options.merge({
+          :url => url,
+          :method => method,
+          :payload => payload,
+        }))
+        if result.is_a?(Hash) && (result['messages'] || result['errors'])
+          attributes['messages'] = Array(result['messages'])
+          result = self
+        end
+        result
+      end
+
+      def links
+        attributes['links'] || {}
+      end
+
+      def supports?(sym)
+        !!link(sym)
+      end
+
+      def has_param?(sym, name)
+        if l = link(sym)
+          (l['required_params'] || []).any?{ |p| p['name'] == name} or (l['optional_params'] || []).any?{ |p| p['name'] == name}
+        end
+      end
+
+      def link_href(sym, params=nil, resource=nil, &block)
+        if (l = link(sym)) && (h = l['href'])
+          h = h.gsub(/:\w+/){ |s| params[s].nil? ? s : CGI.escape(params[s]) } if params
+          h = "#{h}/#{resource}" if resource
+          return h
+        end
+        yield if block_given?
+      end
+
+      protected
+        attr_reader :client
+
+        def link(sym)
+          (links[sym.to_s] || links[sym.to_s.upcase])
+        end
+
+        def debug(msg, obj=nil)
+          client.debug("#{msg}#{obj ? " #{obj}" : ''}") if client && client.debug?
+        end
+
+        def debug?
+          client && client.debug?
+        end
+    end
+  end
+end

data/lib/rhc/rest/cartridge.rb

@@ -0,0 +1,162 @@
+module RHC
+  module Rest
+    class Cartridge < Base
+      HIDDEN_TAGS = [:framework, :web_framework, :cartridge].map(&:to_s)
+
+      define_attr :type, :name, :display_name, :properties, :gear_profile, :status_messages, :scales_to, :scales_from, :scales_with,
+                  :current_scale, :supported_scales_to, :supported_scales_from, :tags, :description, :collocated_with, :base_gear_storage,
+                  :additional_gear_storage, :url, :environment_variables, :gear_size, :automatic_updates
+
+      def scalable?
+        supported_scales_to != supported_scales_from
+      end
+
+      def custom?
+        url.present?
+      end
+
+      def only_in_new?
+        type == 'standalone'
+      end
+
+      def only_in_existing?
+        type == 'embedded'
+      end
+
+      def automatic_updates?
+        v = attribute(:automatic_updates)
+        if v.nil?
+          v = !(tags.include?('no_updates') || custom?)
+        end
+        v
+      end
+
+      def shares_gears?
+        Array(collocated_with).present?
+      end
+      def collocated_with
+        Array(attribute(:collocated_with))
+      end
+
+      def tags
+        Array(attribute(:tags))
+      end
+
+      def gear_storage
+        (base_gear_storage + additional_gear_storage) * 1024 * 1024 * 1024
+      end
+
+      def additional_gear_storage
+        attribute(:additional_gear_storage).to_i rescue 0
+      end
+
+      def display_name
+        attribute(:display_name) || name || url_basename
+      end
+
+      #
+      # Use this value when the user should interact with this cart via CLI arguments
+      #
+      def short_name
+        name || url
+      end
+
+      def usage_rate?
+        rate = usage_rate
+        rate && rate > 0.0
+      end
+
+      def usage_rate
+        rate = attribute(:usage_rate_usd)
+
+        if attribute(:usage_rates)
+          rate ||= attribute(:usage_rates).inject(0) { |total, rate| total + rate['usd'].to_f }
+        end
+
+        rate.to_f rescue 0.0
+      end
+
+      def scaling
+        {
+          :current_scale => current_scale,
+          :scales_from => scales_from,
+          :scales_to => scales_to,
+          :gear_profile => gear_profile,
+        } if scalable?
+      end
+
+      def property(type, key)
+        key, type = key.to_s, type.to_s
+        properties.select{ |p| p['type'] == type }.find{ |p| p['name'] == key }
+      end
+
+      def status
+        debug "Getting cartridge #{name}'s status"
+        result = rest_method "GET", :include => "status_messages"
+        result.status_messages
+      end
+
+      def start
+        debug "Starting cartridge #{name}"
+        rest_method "START", :event => "start"
+      end
+
+      def stop
+        debug "Stopping cartridge #{name}"
+        rest_method "STOP", :event => "stop"
+      end
+
+      def restart
+        debug "Restarting cartridge #{name}"
+        rest_method "RESTART", :event => "restart"
+      end
+
+      def reload
+        debug "Reloading cartridge #{name}"
+        rest_method "RESTART", :event => "reload"
+      end
+
+      def destroy
+        debug "Deleting cartridge #{name}"
+        rest_method "DELETE"
+      end
+      alias :delete :destroy
+
+      def set_scales(values)
+        values.delete_if{|k,v| v.nil? }
+        debug "Setting scales = %s" % values.map{|k,v| "#{k}: #{v}"}.join(" ")
+        rest_method "UPDATE", values
+      end
+
+      def set_storage(values)
+        debug "Setting additional storage: #{values[:additional_gear_storage]}GB"
+        rest_method "UPDATE", values
+      end
+
+      def connection_info
+        info = property(:cart_data, :connection_url) || property(:cart_data, :job_url) || property(:cart_data, :monitoring_url)
+        info ? (info["value"] || '').rstrip : nil
+      end
+
+      def <=>(other)
+        return -1 if other.type == 'standalone' && type != 'standalone'
+        return 1  if type == 'standalone' && other.type != 'standalone'
+        name <=> other.name
+      end
+
+      def url_basename
+        uri = URI.parse(url)
+        name = uri.fragment
+        name = Rack::Utils.parse_nested_query(uri.query)['name'] if name.blank? && uri.query
+        name = File.basename(uri.path) if name.blank? && uri.path.present? && uri.path != '/'
+        name.presence || url
+      rescue
+        url
+      end
+
+      def self.for_url(url)
+        new 'url' => url
+      end
+    end
+  end
+end