rhc 0.92.11 → 0.93.18

data/spec/spec_helper.rb

@@ -0,0 +1,192 @@
+#require 'rubygems'
+#require 'spec'
+require 'webmock/rspec'
+
+begin
+  require 'simplecov'
+  SimpleCov.start do
+    add_filter 'lib/rhc-rest.rb'
+    add_filter 'lib/rhc-common.rb'
+    add_filter 'lib/helpers.rb'
+    add_filter 'lib/rhc/vendor/'
+    add_filter 'lib/rhc-rest/' #temporary
+    add_filter 'lib/rhc/wizard.rb' #temporary
+    add_filter 'lib/rhc/config.rb' #temporary
+  end
+
+  original_stderr = $stderr
+  at_exit do
+    begin
+      SimpleCov.result.format!
+      if SimpleCov.result.covered_percent < 100
+        original_stderr.puts "Coverage not 100%, build failed."
+        exit 1
+      end
+    rescue
+      puts "No coverage check, older Ruby"
+    end
+  end
+rescue
+end
+
+#include 'mocha'
+require 'rhc/cli'
+
+include WebMock::API
+
+module Commander::UI
+  alias :enable_paging_old :enable_paging
+  def enable_paging
+  end
+end
+
+
+module ClassSpecHelpers
+
+  include Commander::Delegates
+
+  def const_for(obj=nil)
+    if obj
+      Object.const_set(const_for, obj)
+    else
+      "#{description}".split(" ").map{|word| word.capitalize}.join.gsub(/[^\w]/, '')
+    end
+  end
+  def new_command_runner *args, &block
+    Commander::Runner.instance_variable_set :"@singleton", Commander::Runner.new(args)
+    program :name, 'test'
+    program :version, '1.2.3'
+    program :description, 'something'
+    #create_test_command
+    yield if block
+    Commander::Runner.instance
+  end
+
+  #
+  # 
+  #
+  def expects_running *args
+    mock_terminal
+    r = new_command_runner args do
+      instance #ensure instance is created before subject :new is mocked
+      subject.should_receive(:new).any_number_of_times.and_return(instance)
+      RHC::Commands.to_commander 
+    end
+    lambda { r.run!; @output }
+  end
+
+  class MockHighLineTerminal < HighLine
+    def initialize(input, output)
+      super
+      @last_read_pos = 0
+    end
+
+    ##
+    # read
+    #
+    # seeks to the last read in the IO stream and reads
+    # the data from that position so we don't repeat
+    # reads or get empty data due to writes moving
+    # the caret to the end of the stream
+    def read
+      @output.seek(@last_read_pos)
+      result = @output.read
+      @last_read_pos = @output.pos
+      result
+    end
+
+    ##
+    # write_line
+    #
+    # writes a line of data to the end of the
+    # input stream appending a newline so
+    # highline knows to stop processing and then
+    # resets the caret position to the last read
+    def write_line(str)
+      reset_pos = @input.pos
+      # seek end so we don't overwrite anything
+      @input.seek(0, IO::SEEK_END)
+      result = @input.write "#{str}\n"
+      @input.seek(reset_pos)
+      result
+    end
+  end
+
+  def mock_terminal
+    @input = StringIO.new
+    @output = StringIO.new
+    $stderr = (@error = StringIO.new)
+    $terminal = MockHighLineTerminal.new @input, @output
+  end
+
+  def run
+    #Commander::Runner.instance_variable_set :"@singleton", nil
+    mock_terminal
+    RHC::CLI.start(arguments)
+    "#{@output.string}\n#{$stderr.string}"
+  end
+  def run_output
+    run
+  rescue SystemExit => e
+    "#{@output.string}\n#{$stderr.string}#{e}"
+  else
+    "#{@output.string}\n#{$stderr.string}"
+  end
+end
+
+module ExitCodeMatchers
+  Spec::Matchers.define :exit_with_code do |code|
+    actual = nil
+    match do |block|
+      begin
+        block.call
+      rescue SystemExit => e
+        actual = e.status
+      else
+        actual = 0
+      end
+      actual and actual == code
+    end
+    failure_message_for_should do |block|
+      "expected block to call exit(#{code}) but exit" +
+        (actual.nil? ? " not called" : "(#{actual}) was called")
+    end
+    failure_message_for_should_not do |block|
+      "expected block not to call exit(#{code})"
+    end
+    description do
+      "expect block to call exit(#{code})"
+    end    
+  end  
+end
+
+module CommanderInvocationMatchers
+  Spec::Matchers.define :call do |method|
+    chain :on do |object|
+      @object = object
+    end
+    chain :with do |args|
+      @args = args
+    end
+
+    match do |block|
+      e = @object.should_receive(method)
+      e.with(@args) if @args
+      begin
+        block.call
+        true
+      rescue SystemExit => e
+        false
+      end
+    end
+    description do
+      "expect block to invoke '#{method}' on #{@object} with #{@args}"
+    end    
+  end  
+end
+
+Spec::Runner.configure do |config|
+  config.include(ExitCodeMatchers)
+  config.include(CommanderInvocationMatchers)
+  config.include(ClassSpecHelpers)
+end

data/test/functional/application_test.rb

@@ -0,0 +1,71 @@
+require File.expand_path('../../test_helper', __FILE__)
+
+class ApplicationTest < Test::Unit::TestCase
+  setup :with_devenv
+
+  def teardown
+    if @client && @client.domains
+      @client.domains.each do |domain|
+        domain.delete(true)
+      end
+    end
+  end
+
+  def test_create_app
+    domain_name = "rhcrest#{@random}"
+    domain = @client.add_domain(domain_name)
+    assert domain.namespace == domain_name
+    app = domain.add_application("app", {:cartridge => "php-5.3"})
+    puts app
+    assert app.name == "app", "application name is not equal "
+    puts app.framework
+    assert app.framework == "php-5.3"
+    apps = @client.find_application("app")
+    assert apps.length == 1
+    assert apps.first.name == "app"
+  end
+
+=begin
+  def test_create_scalable_app
+    domain_name = "rhcrest#{@random}"
+    domain = @client.add_domain(domain_name)
+    assert domain.namespace == domain_name
+    app = domain.add_application("app", {:cartridge => "php-5.3", :scale => true})
+    assert app.name == "app"
+    assert app.framework == "php-5.3"
+    assert app.scalable == true
+    apps = @client.find_application("app")
+    assert apps.length == 1
+    assert apps.first.name == "app"
+  end
+
+  def test_create_app_with_small_node
+    domain_name = "rhcrest#{@random}"
+    domain = @client.add_domain(domain_name)
+    assert domain.namespace == domain_name
+    app = domain.add_application("app", {:cartridge => "php-5.3", :node_profile => "small"})
+    assert app.name == "app"
+    assert app.framework == "php-5.3"
+    assert app.node_profile = "small"
+    apps = @client.find_application("app")
+    assert apps.length == 1
+    assert apps.first.name == "app"
+
+  end
+
+  def test_create_scalable_app_with_small_node
+    domain_name = "rhcrest#{@random}"
+    domain = @client.add_domain(domain_name)
+    assert domain.namespace == domain_name
+    app = domain.add_application("app", {:cartridge => "php-5.3", :scale => true, :node_profile => "small"})
+    assert app.name == "app"
+    assert app.framework == "php-5.3"
+    assert app.node_profile = "small"
+    assert app.scalable == true
+    apps = @client.find_application("app")
+    assert apps.length == 1
+    assert apps.first.name == "app"
+  end
+=end
+
+end

data/test/functional/domain_test.rb

@@ -0,0 +1,123 @@
+require File.expand_path('../../test_helper', __FILE__)
+
+class DomainTest < Test::Unit::TestCase
+
+  setup :with_devenv
+
+  def teardown
+    if @client && @client.domains
+      @client.domains.each do |domain|
+        domain.delete(true)
+      end
+    end
+  end
+
+  def test_create_domain
+
+    domain_name = "rhcrest#{@random}"
+
+    domain = @client.add_domain(domain_name)
+    assert domain.namespace == domain_name
+
+    domains = @client.domains
+    assert domains.length == 1
+    domain = domains.first
+    assert domain.namespace == domain_name
+
+    domains = @client.find_domain(domain_name)
+    assert domains.length == 1
+    domain = domains.first
+    assert domain.namespace == domain_name
+
+  end
+
+  def test_create_multiple_domains
+
+    domain_name = "rhcrest#{@random}"
+    domain = @client.add_domain(domain_name)
+    assert domain.namespace == domain_name
+
+    domains = @client.domains
+    assert domains.length == 1
+    domain = domains.first
+    assert domain.namespace == domain_name
+
+    domains = @client.find_domain(domain_name)
+    assert domains.length == 1
+    domain = domains.first
+    assert domain.namespace == domain_name
+
+    domain_name = "rhcrest#{@random}X"
+    domain = @client.add_domain(domain_name)
+    assert domain.namespace == domain_name
+
+    domains = @client.domains
+    assert domains.length == 2
+
+    domains = @client.find_domain(domain_name)
+    assert domains.length == 1
+    domain = domains.first
+    assert domain.namespace == domain_name
+  end
+
+  def test_update_domain
+
+    domain_name = "rhcrest#{@random}"
+    domain = @client.add_domain(domain_name)
+    assert domain.namespace == domain_name
+    new_domain_name = "rhcrest#{@random}X"
+    domain = domain.update(new_domain_name)
+
+    domains = @client.domains
+    assert domains.length == 1
+    domain = domains.first
+    assert domain.namespace == new_domain_name
+
+    domains = @client.find_domain(new_domain_name)
+    assert domains.length == 1
+    domain = domains.first
+    assert domain.namespace == new_domain_name
+
+  end
+
+  def test_update_domain_with_app
+
+    domain_name = "rhcrest#{@random}"
+    domain = @client.add_domain(domain_name)
+    assert domain.namespace == domain_name
+    app = domain.add_application("app", {:cartridge => "php-5.3"})
+    new_domain_name = "rhcrest#{@random}X"
+    domain = domain.update(new_domain_name)
+
+    domains = @client.domains
+    assert domains.length == 1
+    domain = domains.first
+    assert domain.namespace == new_domain_name
+
+    domains = @client.find_domain(new_domain_name)
+    assert domains.length == 1
+    domain = domains.first
+    assert domain.namespace == new_domain_name
+
+  end
+
+  def test_delete_domain_with_app
+
+    domain_name = "rhcrest#{@random}"
+    domain = @client.add_domain(domain_name)
+    assert domain.namespace == domain_name
+    app = domain.add_application("app", {:cartridge => "php-5.3"})
+    assert_raise Rhc::Rest::ClientErrorException do
+      domain.delete
+    end
+  end
+
+  def test_force_delete_domain_with_app
+    domain_name = "rhcrest#{@random}"
+    domain = @client.add_domain(domain_name)
+    assert domain.namespace == domain_name
+    app = domain.add_application("app", {:cartridge => "php-5.3"})
+    domain.delete(true)
+    assert @client.domains.length == 0
+  end
+end

data/test/functional/test_credentials.rb

@@ -0,0 +1,5 @@
+class TestCredentails
+  @@aws_access_key_id = nil
+  @@aws_secret_access_key = nil
+  @@account_number = nil
+end

data/test/sample-usage.rb

@@ -0,0 +1,122 @@
+#!/usr/bin/env ruby
+# Copyright 2011 Red Hat, 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 'rhc-rest'
+
+
+if __FILE__ == $0
+  
+end_point = ARGV[0]
+username = ARGV[1]
+password = ARGV[2]
+domain_id = ARGV[3]
+
+if end_point.nil? or username.nil? or password.nil? or domain_id.nil?
+  puts "Usage: https://<hostname>/broker/rest <username> <password> <domain_id>"
+  exit 1
+end
+@mydebug =true
+client = Rhc::Rest::Client.new(end_point, username, password)
+
+client.domains.each do |domain|
+  domain.applications.each do |app|
+    app.delete
+  end
+  domain.delete
+end
+puts "Creating a domain"
+domain = client.add_domain(domain_id)
+puts "Domain created: #{domain.id}"
+
+puts "Getting all cartridges..."
+client.cartridges.each do |cart|
+  puts "  #{cart.name} (type: #{cart.type})"
+end
+
+puts "Creating application appone"
+carts = client.find_cartridge("php-5.3")
+domain.add_application("appone", {:cartridge => carts.first.name})
+
+puts "Try deleting domain with an application"
+begin
+  domain.delete
+rescue Exception => e
+  puts e.message
+end
+
+puts "Getting all domains and applications..."
+client.domains.each do |domain|
+  puts "  Domain: #{domain.id}"
+  domain.applications.each do |app|
+    puts "    Application: #{app.name}"
+    app.cartridges.each do |cart|
+      puts "      Cartridge #{cart.name} (#{cart.type})"
+    end
+  end
+end
+
+puts "Find application=appone and restart it..."
+apps = client.find_application("appone")
+apps.first.restart
+
+apps = client.find_application("appthree")
+if not apps.nil? and not apps.first.nil?
+  apps.first.delete
+end
+
+puts "Create new application named appthree..."
+app = client.domains.first.add_application("appthree", {:cartridge =>"php-5.3"})
+puts "Adding MySQL cartridge to appthree"
+cartridge = app.add_cartridge("mysql-5.1")
+puts "Check to see if it was added"
+app.cartridges.each do |cart|
+  puts "Cartridge #{cart.name} (#{cart.type})"
+end
+
+puts "Restart MySQL cartridge"
+cartridge.restart
+puts "Deleting MySQL cartridge"
+cartridge.delete
+puts "Check to see if it was deleted"
+if app.cartridges.size == 0
+  puts "MySQL cartridge is deleted"
+end
+puts "Deleting appthree"
+app.delete
+end
+
+puts "Adding, updating and deleting keys"
+key = client.user.add_key("newkey", "NEWKEYCONTENT", "ssh-rsa")
+
+puts "Added key: #{key.name} updating key content"
+key.update(key.type, "NEWKEYCONTENT123")
+
+puts "Getting all keys..."
+client.user.keys.each do |key|
+  puts "  Key: #{key.name} (type: #{key.type}) #{key.content}"
+end
+
+puts "Deleting key"
+begin
+  key.delete
+rescue Exception => e
+  puts e.message
+end
+
+puts 'Clean up domains and apps by force deleting domain'
+client.domains.each do |domain|
+  domain.delete(true)
+end
+