deltacloud-core 0.1.2 → 0.3.0

data/lib/deltacloud/drivers/terremark/terremark_driver.rb

@@ -1,5 +1,3 @@
-# Copyright (C) 2010  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

data/lib/deltacloud/hardware_profile.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009,2010  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
@@ -63,7 +61,7 @@ module Deltacloud
       end
 
       def param
-        "hwp_#{name}"
+        :"hwp_#{name}"
       end
 
       def fixed?

data/lib/deltacloud/helpers.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009,2010  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

data/lib/deltacloud/helpers/application_helper.rb

@@ -1,5 +1,3 @@
-# Copyright (C) 2009, 2010  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
@@ -17,8 +15,12 @@
 
 # Methods added to this helper will be available to all templates in the application.
 
+require 'benchmark'
+
 module ApplicationHelper
 
+  include Deltacloud
+
   def bread_crumb
     s = "<ul class='breadcrumb'><li class='first'><a href='#{url_for('/')}'>&#948</a></li>"
     url = request.path_info.split('?')  #remove extra query string parameters
@@ -34,11 +36,16 @@ module ApplicationHelper
         end
       end
     end
+    s+="<li class='docs'>#{link_to_documentation}</li>"
     s+="</ul>"
   end
 
   def instance_action_method(action)
-    collections[:instances].operations[action.to_sym].method
+    action_method(action, :instances)
+  end
+
+  def action_method(action, collection)
+    collections[collection].operations[action.to_sym].method
   end
 
   def driver_has_feature?(feature_name, collection_name = :instances)
@@ -67,9 +74,12 @@ module ApplicationHelper
       filter.merge!(:architecture => params[:architecture]) if params[:architecture]
       filter.merge!(:owner_id => params[:owner_id]) if params[:owner_id]
       filter.merge!(:state => params[:state]) if params[:state]
-      filter = nil if filter.keys.size.eql?(0)
+      filter = {} if filter.keys.size.eql?(0)
       singular = model.to_s.singularize.to_sym
-      @elements = driver.send(model.to_sym, credentials, filter)
+      @benchmark = Benchmark.measure do
+        @elements = driver.send(model.to_sym, credentials, filter)
+      end
+      headers['X-Backend-Runtime'] = @benchmark.real.to_s
       instance_variable_set(:"@#{model}", @elements)
       respond_to do |format|
         format.html { haml :"#{model}/index" }
@@ -79,7 +89,9 @@ module ApplicationHelper
   end
 
   def show(model)
-    @element = driver.send(model, credentials, { :id => params[:id]} )
+    @benchmark = Benchmark.measure do
+      @element = driver.send(model, credentials, { :id => params[:id]} )
+    end
     instance_variable_set("@#{model}", @element)
     if @element
       respond_to do |format|
@@ -97,7 +109,7 @@ module ApplicationHelper
     response.status = status
     respond_to do |format|
       format.xml { haml :"errors/#{template}", :layout => false }
-      format.html { haml :"errors/#{template}" }
+      format.html { haml :"errors/#{template}", :layout => :error }
     end
   end
 
@@ -112,7 +124,13 @@ module ApplicationHelper
 
     @instance = driver.send(:"#{name}_instance", credentials, params["id"])
 
-    return redirect(instances_url) if name.eql?(:destroy) or @instance.class!=Instance
+    if name == :destroy or @instance.class!=Instance
+      respond_to do |format|
+        format.xml { return 204 }
+        format.json { return 204 }
+        format.html { return redirect(instances_url) }
+      end
+    end
 
     respond_to do |format|
       format.xml { haml :"instances/show" }
@@ -121,8 +139,8 @@ module ApplicationHelper
     end
   end
 
-  def cdata(&block)
-    text = capture_haml(&block)
+  def cdata(text = nil, &block)
+    text ||= capture_haml(&block)
     "<![CDATA[#{text.strip}]]>"
   end
 
@@ -131,9 +149,8 @@ module ApplicationHelper
   end
 
   def link_to_action(action, url, method)
-    return link_to(action, url) if method.eql? :get
     capture_haml do
-      haml_tag :form, :method => :post, :action => url, :class => :link do
+      haml_tag :form, :method => :post, :action => url, :class => [:link, method] do
         haml_tag :input, :type => :hidden, :name => '_method', :value => method
         haml_tag :button, :type => :submit do 
           haml_concat action
@@ -142,4 +159,61 @@ module ApplicationHelper
     end
   end
 
+  def link_to_format(format)
+    return '' unless request.env['REQUEST_URI']
+    uri = request.env['REQUEST_URI']
+    return if uri.include?('format=')
+    if uri.include?('?')
+      uri+="&format=#{format}"
+    else
+      uri+="?format=#{format}"
+    end
+    '<a href="%s">%s</a>' % [uri, "#{format}".upcase]
+  end
+
+  def link_to_documentation
+    return '' unless request.env['REQUEST_URI']
+    uri = request.env['REQUEST_URI'].dup
+    uri.gsub!('/api', '/api/docs/') unless uri.include?("docs") #i.e. if already serving under /api/docs, leave it be
+    '<a href="%s">[ Documentation ]</a>' % uri
+  end
+
+  def action_url
+    if [:index].include?(@operation.name)
+      url_for("/api/#{@collection.name.to_s}")
+    elsif [:show, :stop, :start, :reboot, :attach, :detach].include?(@operation.name)
+      url_for("/api/#{@collection.name.to_s}/:id/#{@operation.name}")
+    elsif [:destroy].include?(@operation.name)
+      url_for("/api/#{@collection.name.to_s}/:id")
+    else
+      url_for("/api/#{@collection.name}/#{@operation.name}")
+    end
+  end
+
+  def image_for_state(state)
+    state_img = "stopped" if (state!='RUNNING' or state!='PENDING')
+    "<img src='/images/#{state.downcase}.png' title='#{state}'/>"
+  end
+
+  def truncate_words(text, length = 10)
+    return nil unless text
+    return text if text.length<=length
+    end_string = "...#{text[(text.length-(length/2))..text.length]}"
+    "#{text[0..(length/2)]}#{end_string}"
+  end
+
+  # Reverse the entrypoints hash for a driver from drivers.yaml; note that
+  # +d+ is a hash, not an actual driver object
+  def driver_provider(d)
+    result = {}
+    if d[:entrypoints]
+      d[:entrypoints].each do |kind, details|
+        details.each do |prov, url|
+          result[prov] ||= {}
+          result[prov][kind] = url
+        end
+      end
+    end
+    result
+  end
 end

data/lib/deltacloud/helpers/blob_stream.rb

@@ -1,5 +1,3 @@
-# Copyright (C) 2010  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
@@ -15,6 +13,7 @@
 # License for the specific language governing permissions and limitations
 # under the License.
 
+include Deltacloud
 begin
   require 'eventmachine'
   #--
@@ -62,3 +61,21 @@ rescue LoadError => e
     end
   end
 end
+
+class Hash
+
+  def gsub_keys(pattern, replacement)
+    rgx_pattern = Regexp.compile(pattern, true)
+    remove = []
+    self.each_key do |key|
+      if key.to_s.match(rgx_pattern)
+         new_key = key.to_s.gsub(rgx_pattern, replacement)
+         self[new_key] = self[key]
+         remove << key
+      end #key.match
+    end # each_key do
+    #remove the original keys
+    self.delete_if{|k,v| remove.include?(k)}
+  end #def
+
+end #class

data/lib/deltacloud/helpers/conversion_helper.rb

@@ -1,5 +1,3 @@
-# Copyright (C) 2009, 2010  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

data/lib/deltacloud/helpers/hardware_profiles_helper.rb

@@ -1,5 +1,3 @@
-# Copyright (C) 2009, 2010  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

data/lib/deltacloud/method_serializer.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009,2010  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

data/lib/deltacloud/models/base_model.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009, 2010  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

data/lib/deltacloud/models/blob.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009, 2010  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
@@ -24,5 +22,6 @@ class Blob < BaseModel
   attr_accessor :content_type
   attr_accessor :last_modified
   attr_accessor :content
+  attr_accessor :user_metadata
 
 end

data/lib/deltacloud/models/bucket.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009, 2010  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

data/lib/deltacloud/models/image.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009, 2010  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

data/lib/deltacloud/models/instance.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009, 2010  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
@@ -30,6 +28,25 @@ class Instance < BaseModel
   attr_accessor :launch_time
   attr_accessor :keyname
   attr_accessor :authn_error
+  attr_accessor :username
+  attr_accessor :password
+  attr_accessor :create_image
+
+  def can_create_image?
+    self.create_image
+  end
+
+  def to_s
+    name
+  end
+
+  def hardware_profile
+    instance_profile
+  end
+
+  def hardware_profile=(profile)
+    instance_profile = profile
+  end
 
   def initialize(init=nil)
     super(init)

data/lib/deltacloud/models/instance_profile.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009, 2010  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
@@ -38,6 +36,10 @@ class InstanceProfile < BaseModel
     id
   end
 
+  def to_s
+    name
+  end
+
   def overrides
     [:memory, :storage, :architecture, :cpu].inject({}) do |h, p|
       if v = instance_variable_get("@#{p}")

data/lib/deltacloud/models/key.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009, 2010 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

data/lib/deltacloud/models/load_balancer.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009, 2010  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

data/lib/deltacloud/models/realm.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009, 2010  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

data/lib/deltacloud/models/storage_snapshot.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009, 2010  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

data/lib/deltacloud/models/storage_volume.rb

@@ -1,6 +1,4 @@
 #
-# Copyright (C) 2009, 2010  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
@@ -24,5 +22,9 @@ class StorageVolume < BaseModel
   attr_accessor :capacity
   attr_accessor :instance_id
   attr_accessor :device
+  attr_accessor :realm_id
+  attr_accessor :actions
+  attr_accessor :name
+  attr_accessor :kind
 
 end

data/lib/deltacloud/runner.rb

@@ -0,0 +1,132 @@
+# 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 'net/ssh'
+require 'socket'
+require 'tempfile'
+
+module Deltacloud
+
+  module Runner
+
+    class RunnerError < StandardError
+      attr_reader :message
+      def initialize(message)
+        @message = message
+        super
+      end
+    end
+    
+    class InstanceSSHError < RunnerError; end
+
+    def self.execute(command, opts={})
+      
+      if opts[:credentials] and (not opts[:credentials][:password] and not opts[:private_key])
+        raise RunnerError::new("Either password or key must be specified")
+      end
+
+      # First check networking and firewalling
+      network = Network::new(opts[:ip], opts[:port])
+
+      # Then check SSH availability
+      ssh = SSH::new(network, opts[:credentials], opts[:private_key])
+
+      # Finaly execute SSH command on instance
+      ssh.execute(command)
+    end
+
+    class Network
+      attr_accessor :ip, :port
+
+      def initialize(ip, port)
+        @ip, @port = ip, port
+      end
+    end
+
+    class SSH
+
+      attr_reader :network
+      attr_accessor :credentials, :key
+      attr_reader :command
+
+      def initialize(network, credentials, key=nil)
+        @network, @credentials, @key = network, credentials, key
+        @result = ""
+      end
+
+      def execute(command)
+        @command = command
+        config = ssh_config(@network, @credentials, @key)
+        begin
+          session = nil
+	  # Default timeout for connecting to an instance.
+	  # 20 seconds should be OK for most of connections, if you are
+	  # experiencing some Exceptions with Timeouts increase this value.
+	  # Please keep in mind that the HTTP request timeout is set to 60
+	  # seconds, so you need to fit into this time
+          Timeout::timeout(20) do
+            session = Net::SSH.start(@network.ip, 'root', config)
+          end
+          session.open_channel do |channel|
+            channel.on_data do |ch, data|
+              @result += data
+            end
+            channel.exec(command)
+            session.loop
+          end
+          session.close
+        rescue Exception => e
+          raise InstanceSSHError.new("#{e.class.name}: #{e.message}")
+        ensure
+          # FileUtils.rm(config[:keys].first) rescue nil
+        end
+        Deltacloud::Runner::Response.new(self, @result)
+      end
+
+      private
+
+      def ssh_config(network, credentials, key)
+        config = { :port => network.port }
+        config.merge!({ :password => credentials[:password ]}) if credentials[:password]
+        config.merge!({ :keys => [ keyfile(key) ] }) unless key.nil?
+        config
+      end
+
+      # Right now there is no way howto pass private_key using String
+      # eg. without saving key to temporary file.
+      def keyfile(key)
+        keyfile = Tempfile.new("ec2_private.key")
+        key_material = ""
+        key.split("\n").each { |line| key_material+="#{line.strip}\n" if line.strip.size>0 }
+        keyfile.write(key_material) && keyfile.close
+        puts "[*] Using #{keyfile.path} as private key"
+        keyfile.path
+      end
+
+    end
+
+    class Response
+      
+      attr_reader :body
+      attr_reader :ssh
+
+      def initialize(ssh, response_body)
+        @body, @ssh = response_body, ssh
+      end
+
+    end
+
+  end
+end