guignol 0.1.2.1 → 0.3.0

data/lib/guignol/array/collect_key.rb

@@ -1,32 +0,0 @@
-# Copyright (c) 2012, HouseTrip SA.
-# All rights reserved.
-# 
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions are met: 
-# 
-# 1. Redistributions of source code must retain the above copyright notice, this
-#    list of conditions and the following disclaimer. 
-# 2. Redistributions in binary form must reproduce the above copyright notice,
-#    this list of conditions and the following disclaimer in the documentation
-#    and/or other materials provided with the distribution. 
-# 
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
-# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
-# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
-# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR
-# ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
-# (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
-# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
-# ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
-# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
-# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-# 
-# The views and conclusions contained in the software and documentation are those
-# of the authors and should not be interpreted as representing official policies, 
-# either expressed or implied, of the authors.
-
-Array.class_eval do
-  def collect_key(key)
-    collect { |item| item.kind_of?(Hash) ? item[key] : nil }
-  end
-end

data/lib/guignol/commands.rb

@@ -1,48 +0,0 @@
-# Copyright (c) 2012, HouseTrip SA.
-# All rights reserved.
-# 
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions are met: 
-# 
-# 1. Redistributions of source code must retain the above copyright notice, this
-#    list of conditions and the following disclaimer. 
-# 2. Redistributions in binary form must reproduce the above copyright notice,
-#    this list of conditions and the following disclaimer in the documentation
-#    and/or other materials provided with the distribution. 
-# 
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
-# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
-# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
-# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR
-# ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
-# (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
-# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
-# ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
-# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
-# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-# 
-# The views and conclusions contained in the software and documentation are those
-# of the authors and should not be interpreted as representing official policies, 
-# either expressed or implied, of the authors.
-
-require 'guignol/commands/create'
-require 'guignol/commands/kill'
-require 'guignol/commands/start'
-require 'guignol/commands/stop'
-require 'guignol/commands/help'
-require 'guignol/commands/list'
-require 'guignol/commands/uuid'
-require 'guignol/commands/fix_dns'
-
-module Guignol::Commands
-  Map = {
-    'create'     => Guignol::Commands::Create,
-    'kill'       => Guignol::Commands::Kill,
-    'start'      => Guignol::Commands::Start,
-    'stop'       => Guignol::Commands::Stop,
-    'help'       => Guignol::Commands::Help,
-    'list'       => Guignol::Commands::List,
-    'uuid'       => Guignol::Commands::UUID,
-    'fixdns'     => Guignol::Commands::FixDNS,
-  }
-end

data/lib/guignol/commands/help.rb

@@ -1,77 +0,0 @@
-# Copyright (c) 2012, HouseTrip SA.
-# All rights reserved.
-# 
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions are met: 
-# 
-# 1. Redistributions of source code must retain the above copyright notice, this
-#    list of conditions and the following disclaimer. 
-# 2. Redistributions in binary form must reproduce the above copyright notice,
-#    this list of conditions and the following disclaimer in the documentation
-#    and/or other materials provided with the distribution. 
-# 
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
-# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
-# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
-# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR
-# ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
-# (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
-# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
-# ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
-# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
-# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-# 
-# The views and conclusions contained in the software and documentation are those
-# of the authors and should not be interpreted as representing official policies, 
-# either expressed or implied, of the authors.
-
-require 'guignol/commands/base'
-require 'guignol/instance'
-
-module Guignol::Commands
-  class Help
-    def initialize(*argv)
-      if help_for = argv.shift
-        @command_class = Guignol::Commands::Map[help_for]
-        @command_class.nil? and raise "no such command '#{help_for}'"
-      end
-    end
-
-    def run
-      if @command_class.respond_to?(:long_usage)
-        puts @command_class.long_usage
-      else
-        usage
-      end
-    end
-
-    def usage
-      puts "usage: guignol <command> [options] [patterns]"
-      puts "manipulate EC2 instances from your command line."
-      puts
-      puts "The commands are:"
-      command_table =
-        Guignol::Commands::Map.map { |command_name, command_class|
-          usage = command_class.short_usage
-           [command_name] + usage
-        }
-      puts format_table(command_table, :sep => "  ")
-    end
-
-    def self.short_usage
-      ["", "You're reading it !"]
-    end
-
-  private
-
-    # Format a text table from an array of arrays. Rows separated by +sep+.
-    def format_table(table, options={})
-      sep = options.delete(:sep) || " | "
-      columns = table.map { |row| row.size }.max
-      widths = table.reduce([0] * columns) { |memo,row| row.map(&:size).zip(memo).map(&:max) }
-      format = widths.map { |width| "%-#{width}s" }.join(sep)
-      table.map { |row| format % row }.join("\n")
-    end
-  end
-end
-

data/lib/guignol/instance.rb

@@ -1,270 +0,0 @@
-# Copyright (c) 2012, HouseTrip SA.
-# All rights reserved.
-# 
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions are met: 
-# 
-# 1. Redistributions of source code must retain the above copyright notice, this
-#    list of conditions and the following disclaimer. 
-# 2. Redistributions in binary form must reproduce the above copyright notice,
-#    this list of conditions and the following disclaimer in the documentation
-#    and/or other materials provided with the distribution. 
-# 
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
-# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
-# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
-# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR
-# ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
-# (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
-# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
-# ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
-# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
-# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-# 
-# The views and conclusions contained in the software and documentation are those
-# of the authors and should not be interpreted as representing official policies, 
-# either expressed or implied, of the authors.
-
-require 'yaml'
-require 'fog'
-require 'md5'
-require 'active_support/core_ext/hash/slice'
-require 'guignol'
-require 'guignol/shared'
-require 'guignol/volume'
-
-module Guignol
-  class Instance
-    include Shared
-
-    def initialize(options)
-      @options = options.dup
-      require_options :name, :uuid
-
-      @options[:volumes] ||= []
-      connection_options = DefaultConnectionOptions.dup.merge @options.slice(:region)
-
-      @connection = Fog::Compute.new(connection_options)
-
-      @subject = @connection.servers.
-        select { |s| s.state != 'terminated' }.
-        find { |s| s.tags['UUID'] == uuid }
-    end
-
-
-    def exist?
-      !!@subject
-    end
-
-
-    def name
-      @options[:name]
-    end
-
-
-    def domain
-      @options[:domain]
-    end
-
-
-    def uuid
-      @options[:uuid]
-    end
-
-
-    def fqdn
-      name and domain and "#{name}.#{domain}"
-    end
-
-    def state
-      exist? and @subject.state or 'nonexistent'
-    end
-
-    def create
-      log "server already exists" and return self if exist?
-        
-      options = DefaultServerOptions.dup.merge @options.slice(:image_id, :flavor_id, :key_name, :security_group_ids, :user_data)
-
-      # check for pre-existing volume(s). if any exist, add their AZ to the server's options
-      zones = @options[:volumes].map { |volume_options| Volume.new(volume_options).availability_zone }.compact.uniq
-      if zones.size > 1
-        raise "pre-existing volumes volumes are in different availability zones"
-      elsif zones.size == 1
-        log "using AZ '#{zones.first}' since volumes already exist"
-        options[:availability_zone] = zones.first
-      end
-
-      log "building server..."
-      @subject = @connection.servers.create(options)
-      setup
-      log "created as #{@subject.dns_name}"
-
-      return self
-    rescue Exception => e
-      log "error while creating (#{e.class.name})"
-      destroy
-      raise
-    end
-
-
-    def start
-      log "server doesn't exist (ignoring)" and return unless exist?
-      wait_for_state_transitions
-
-      if @subject.state != "stopped"
-        log "server #{@subject.state}."
-      else
-        log "starting server..."
-        @subject.start
-        setup
-        log "server started"
-      end
-      return self
-    end
-
-    # shared between create and start
-    def setup
-      update_tags
-      log "waiting for public dns to be set up..."
-      wait_for { @subject.dns_name }
-      update_dns
-      update_volumes
-      wait_for_state 'running'
-      return self
-    end
-
-    def stop
-      wait_for_state_transitions
-      if !exist?
-        log "server doesn't exist (ignoring)."
-      elsif @subject.state != "running"
-        log "server #{@subject.state}."
-      else
-        log "stopping server..."
-        remove_dns
-        @subject.stop
-        wait_for_state 'stopped', 'terminated'
-      end
-      return self
-    end
-
-
-    def destroy
-      if !exist?
-        log "server doesn't exist (ignoring)."
-      else
-        log "tearing server down..."
-        remove_dns
-        @subject.destroy
-        wait_for_state 'stopped', 'terminated'
-        # FIXME: remove tags here
-        @subject = nil
-      end
-      return self
-    end
-
-
-    def update_tags
-      log "updating server tags"
-      tags = { 'Name' => name, 'Domain' => domain, 'UUID' => uuid }
-      response = @connection.create_tags(@subject.id, tags)
-      raise "failed" unless response.status == 200
-      return self
-    end
-
-
-    def update_root_volume_tags
-      log "updating root volume tags"
-      tags = { 'Name' => "#{name}-root", 'UUID' => uuid }
-      response = @connection.create_tags(@subject.volumes.first.id, tags)
-      raise "failed" unless response.status == 200
-      return self
-    end
-
-
-    def update_volumes
-      update_root_volume_tags
-
-      @options[:volumes].each do |options|
-        options[:availability_zone] = @subject.availability_zone
-        Volume.new(options).attach(@subject.id)
-      end
-    end
-
-
-    def update_dns
-      return unless @options[:domain]
-      log "updating dns zone"
-      
-      unless dns_zone
-        log "dns zone does not exist"
-        return self
-      end
-
-      if record = dns_record
-        if dns_record_matches?(record)
-          log "DNS record already exists"
-          return self
-        else
-          log "warning, while creating, DNS record exists but points to wrong server (fixing)"
-          record.destroy
-        end
-      end
-
-      dns_zone.records.create(:name => fqdn, :type => 'CNAME', :value => @subject.dns_name, :ttl => 5)
-      log "#{fqdn} -> #{@subject.dns_name}"
-      return self
-    end
-
-
-    def remove_dns
-      return unless @options[:domain]
-      log "removing dns record"
-
-      unless dns_zone
-        log "dns zone does not exist"
-        return self
-      end
-
-      if record = dns_record
-        unless dns_record_matches?(record)
-          log "warning, while removing, DNS record exist but does not point to the current server"
-        end
-        record.destroy
-      end
-
-      return self
-    end
-
-
-  private
-
-
-    def wait_for_state_transitions
-      return unless @subject
-      return unless %w(stopping pending).include? @subject.state
-      log "waiting for state transition from '#{@subject.state}' to complete"
-      wait_for { @subject.state != 'pending' }
-      wait_for { @subject.state != 'stopping' }
-    end
-
-
-    def dns_connection
-      @dns_connection ||= Fog::DNS.new(:provider => :aws)
-    end
-
-
-    def dns_zone
-      @dns_zone ||= dns_connection.zones.find { |zone| zone.domain == domain }
-    end
-
-    def dns_record
-      dns_zone.records.find { |record| record.name == fqdn }
-    end      
-
-    def dns_record_matches?(record)
-      !!record and record.value.any? { |dns_name| dns_name == @subject.dns_name }
-    end
-
-  end
-end

data/lib/guignol/shared.rb

@@ -1,80 +0,0 @@
-# Copyright (c) 2012, HouseTrip SA.
-# All rights reserved.
-# 
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions are met: 
-# 
-# 1. Redistributions of source code must retain the above copyright notice, this
-#    list of conditions and the following disclaimer. 
-# 2. Redistributions in binary form must reproduce the above copyright notice,
-#    this list of conditions and the following disclaimer in the documentation
-#    and/or other materials provided with the distribution. 
-# 
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
-# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
-# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
-# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR
-# ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
-# (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
-# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
-# ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
-# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
-# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-# 
-# The views and conclusions contained in the software and documentation are those
-# of the authors and should not be interpreted as representing official policies, 
-# either expressed or implied, of the authors.
-
-require 'guignol/tty_spinner'
-
-module Guignol
-  module Shared
-
-
-    def log message
-      stamp = Time.now.strftime('%Y-%m-%d %H:%M:%S')
-      $stderr.write("[#{stamp}] #{name}: #{message}\n")
-      $stderr.flush
-      true
-    end
-
-
-    def subject_name
-      self.class.name.gsub(/.*:/,'').downcase
-    end
-
-
-    def wait_for_state(*states)
-      @subject or raise "#{subject_name} doesn't exist"
-      original_state = @subject.state
-      unless states.include?(original_state)
-        log "waiting for #{subject_name} to become #{states.join(' or ')}..."
-        wait_for do
-          if @subject.state != original_state
-            log "#{subject_name} now #{@subject.state}"
-            original_state = @subject.state
-          end
-          states.include?(@subject.state)
-        end
-      end
-    end
-
-
-    def wait_for(&block)
-      return unless @subject
-      @subject.wait_for { TtySpinner.spin! ; block.call }
-    end
-
-    def confirm(message)
-      puts "#{message} [y/n]"
-      $stdin.gets =~ /^y$/i
-    end
-
-    def require_options(*required_options)
-      required_options.each do |required_option|
-        next if @options.include?(required_option)
-        raise "option '#{required_option}' is mandatory for each #{subject_name}"
-      end
-    end
-  end
-end