openshift-origin-console 1.3.2

data/test/integration/rest_api/application_test.rb

@@ -0,0 +1,115 @@
+require File.expand_path('../../../test_helper', __FILE__)
+
+class RestApiApplicationTest < ActiveSupport::TestCase
+  include RestApiAuth
+
+  def test_create
+    with_configured_user
+    setup_domain
+
+    app = Application.new :as => @user
+    assert_raise(ActiveResource::MissingPrefixParam) { app.save }
+
+    app.domain = @domain
+
+    assert !app.save
+    assert app.errors[:name].present?, app.errors.inspect
+
+    app.name = 'test'
+
+    assert !app.save
+    assert app.errors[:cartridge].present?, app.errors.inspect
+
+    app.cartridge = 'php-5.3'
+
+    assert app.save, app.errors.inspect
+    saved_app = @domain.find_application('test')
+    app.schema.each_key do |key|
+      value = app.send(key)
+      assert_equal app.send(key), saved_app.send(key) unless value.nil?
+    end
+
+    assert_nil app.building_app
+    assert_nil app.building_with
+
+    prefix_options = app.prefix_options
+    app.reload
+    assert_equal prefix_options, app.prefix_options
+  end
+
+  def test_retrieve_cartridges
+    #setup_domain
+    #app = Application.create :name => 'test', :domain => @domain, :cartridge => 'php-5.3', :as => @user
+    app = with_app
+
+    assert cartridges = app.cartridges
+    assert_equal 1, cartridges.length
+    assert cart = cartridges.first
+    assert_equal app.framework, cart.name
+    assert cart.description
+    assert cart.tags.present?
+
+    # scaling parameters
+    assert_nil cart.scales_with
+    assert_equal 1, cart.supported_scales_from
+    assert_equal 1, cart.supported_scales_to
+    assert_equal 1, cart.current_scale
+    assert_equal 1, cart.scales_from
+    assert_equal 1, cart.scales_to
+    assert !cart.scales?
+  end
+
+  def test_create_multiple_cartridges
+    with_configured_user
+    setup_domain
+
+    assert_create_app({:cartridges => ['ruby-1.9','mysql-5.1']}, "Simple cartridges list") do |app|
+      assert_equal ['ruby-1.9', 'mysql-5.1'], app.cartridges.map(&:name)
+    end
+    assert_create_app({:cartridges => [{:name => 'ruby-1.9'},'mysql-5.1']}, "Mixed objects list") do |app|
+      assert_equal ['ruby-1.9', 'mysql-5.1'], app.cartridges.map(&:name)
+    end
+  end
+
+  def test_create_app_with_initial_git_url
+    with_configured_user
+    setup_domain
+
+    assert_create_app({:initial_git_url => 'https://github.com/openshift/wordpress-example', :cartridges => ['php-5.3']}, "Set initial git URL") do |app|
+      assert_equal ['php-5.3'], app.cartridges.map(&:name)
+      loaded_app = Application.find(app.name, :params => {:domain_id => @domain.id}, :as => @user)
+      omit("No initial_git_url returned") unless loaded_app.initial_git_url
+      assert_equal "https://github.com/openshift/wordpress-example", loaded_app.initial_git_url
+    end
+  end
+
+  def assert_create_app(options, message="", &block)
+    app = Application.new({:name => 'test', :domain => @domain}.merge(options))
+    assert app.save, "#{description} could not be saved, #{app.errors.to_hash.inspect}"
+    begin
+      yield app
+    ensure
+      puts "Unable to delete app" unless app.destroy
+    end
+    app
+  end
+
+  def test_retrieve_gear_groups
+    app = with_app
+
+    cart = Cartridge.new :name => app.framework
+
+    assert groups = app.gear_groups
+
+    assert_equal 1, groups.length
+    group = groups[0]
+    assert group.is_a? GearGroup
+    assert group.name
+    assert_equal [cart], group.cartridges
+    assert_equal 1, group.gears.length
+    gear = group.gears[0]
+    assert gear.is_a? Gear
+    assert [:started, :idle].include? gear.state
+    assert gear.id
+  end
+end

data/test/integration/rest_api/cartridge_test.rb

@@ -0,0 +1,44 @@
+require File.expand_path('../../../test_helper', __FILE__)
+
+class RestApiCartridgeTest < ActiveSupport::TestCase
+  include RestApiAuth
+
+  def setup
+    with_configured_user
+  end
+
+  test 'cartridge scale parameters can be changed' do
+    app = with_scalable_app
+
+    carts = app.cartridges.select{ |c| c.scales? }
+    assert_equal 1, carts.length
+
+    cart = carts.first
+    assert cart.tags.include? :web_framework
+    assert cart.scales_from > 0
+    assert cart.scales_to != 0
+    assert cart.supported_scales_from > 0
+    assert_equal(-1, cart.supported_scales_to)
+
+    base = Range.new(cart.supported_scales_from, cart.supported_scales_to == -1 ? User.find(:one, :as => @user).max_gears : [100,cart.supported_scales_to].min).to_a.sample
+
+    name = cart.name
+
+    prefix = cart.prefix_options.dup
+
+    cart.scales_from = base
+    cart.scales_to = base
+    assert cart.save, "Unable to set scales_from/to to #{base}: #{cart.errors.full_messages}"
+
+    assert_equal base, cart.scales_from
+    assert_equal base, cart.scales_to
+
+    assert_equal prefix, cart.prefix_options
+
+    cart.reload 
+
+    assert_equal base, cart.scales_from
+    assert_equal base, cart.scales_to
+
+  end
+end

data/test/integration/rest_api/cartridge_type_test.rb

@@ -0,0 +1,143 @@
+require File.expand_path('../../../test_helper', __FILE__)
+
+class RestApiCartridgeTypeTest < ActiveSupport::TestCase
+
+  def setup
+    with_configured_user
+  end
+
+  def log_types(types)
+    types.each do |t|
+      Rails.logger.debug <<-TYPE.strip_heredoc
+        Type #{t.display_name} (#{t.id})
+          description: #{t.description}
+          tags:        #{t.tags.inspect}
+          version:     #{t.version}
+          cartridges:  #{t.respond_to?(:cartridges) ? t.cartridges.inspect : 'n/a'}
+          priority:    #{t.priority}
+        #{log_extra(t)}
+      TYPE
+    end
+  end
+  def log_extra(type)
+    if type.respond_to?(:requires)
+      "  requires:    #{type.requires.inspect}\n"
+    end
+  end
+
+  test 'should load embedded cartridge types from server' do
+    types = CartridgeType.embedded
+    assert types.length > 0
+    types.sort!
+
+    log_types(types)
+
+    assert type = types.find{ |t| t.name.starts_with?('phpmyadmin-') }
+    assert type.requires.find{ |r| r.starts_with?('mysql-') }, type.requires.inspect
+    assert type.tags.include? :administration
+    assert_not_equal type.name, type.display_name
+
+    assert (required = types.select{ |t| t.requires.present? }).length > 1
+    assert types.all?{ |t| t.tags.present? }
+    assert types.all?{ |t| t.tags.present? }
+    assert types.all?{ |t| (t.tags & t.categories).sort.uniq == t.categories.sort.uniq }
+  end
+
+  test 'should load standalone cartridge types' do
+    types = CartridgeType.standalone
+    assert types.length > 0
+    types.sort!
+
+    log_types(types)
+
+    assert types[0].name.starts_with?('jbosseap-')
+  end
+
+  test 'should load metadata from broker' do
+    assert type = CartridgeType.find('zend-5.6')
+    assert type.tags.include?(:web_framework), type.tags.inspect
+    assert_not_equal type.name, type.display_name
+  end
+
+  test 'should load application types' do
+    types = ApplicationType.all
+    assert types.length > 0
+
+    types.sort!
+    log_types(types)
+
+    assert types[0].id.starts_with?('cart!jbosseap'), types[0].id
+
+    type = types.find(&:template?)
+    omit("No templates defined on this server") if type.nil?
+
+    template = type.template
+    assert template.name
+    assert template.description
+    assert template.version
+    assert template.website
+    assert template.git_url
+    assert template.git_project_url
+    assert_equal type.id, "template!#{template.name}"
+    assert template.git_project_url
+    assert_same template.tags, template.tags
+  end
+
+  test 'sort cartridges' do
+    array = ['diy-0.1','mongodb-2.2'].map{ |s| Cartridge.new(:name => s) }
+    assert_equal array.map(&:name), array.sort.map(&:name)
+  end
+
+  test 'cartridges are sorted properly' do
+    ruby18 = CartridgeType.find 'ruby-1.8'
+    ruby = CartridgeType.find 'ruby-1.9'
+    php = CartridgeType.find 'php-5.3'
+    mongo = CartridgeType.find 'mongodb-2.2'
+    cron = CartridgeType.find 'cron-1.4'
+    jenkins = CartridgeType.find 'jenkins-client-1.4'
+
+    assert ruby18 > ruby
+    assert ruby < ruby18
+
+    assert cron > ruby
+    assert ruby < cron
+
+    assert mongo < cron
+    assert cron > mongo
+
+    assert ruby < mongo
+    assert mongo > ruby
+
+    assert php < ruby
+    assert ruby > php
+
+    assert php < jenkins
+    assert ruby < jenkins
+  end
+
+  test 'matching cartridges types' do
+    found, missing = ApplicationType.matching_cartridges('php-')
+    assert_equal ['php-5.3'], found['php-'].map(&:name), found.inspect
+    assert missing.empty?
+  end
+
+  # Currently /application_templates/<string>.json can return an array
+  # if the value is not a properly formatted ID.  This is questionable,
+  # and this test is only to protect us in the case that we have code
+  # depending on that behavior.  If this behavior is moved to a new
+  # route then we can remove this.
+  test 'application template names returned by server' do
+    template = ApplicationTemplate.first(:from => :wordpress)
+    omit("No templates defined on this server") unless template
+    assert_equal 'WordPress', template.display_name
+  end
+
+  test 'match cartridges' do
+    assert_equal [], CartridgeType.cached.matches('bra').map(&:name)
+    assert_equal ['ruby-1.9','ruby-1.8'], CartridgeType.cached.matches('ruby').map(&:name)
+    assert_equal ['ruby-1.9','ruby-1.8'], CartridgeType.cached.matches('ruby*').map(&:name)
+    assert_equal ['ruby-1.9','ruby-1.8'], CartridgeType.cached.matches('*uby*').map(&:name)
+    assert_equal ['zend-5.6','php-5.3'], CartridgeType.cached.matches('zend-|php-').map(&:name)
+    assert_equal ['php-5.3','zend-5.6'], CartridgeType.cached.matches('php-|zend-').map(&:name)
+  end
+end

data/test/integration/rest_api/domain_test.rb

@@ -0,0 +1,91 @@
+require File.expand_path('../../../test_helper', __FILE__)
+
+class RestApiDomainTest < ActiveSupport::TestCase
+  include RestApiAuth
+
+  def setup
+    with_configured_user
+  end
+  def teardown
+    cleanup_domain
+  end
+
+  def test_load_setup_domain
+    setup_domain
+    setup_domain
+    assert @domain
+    assert @domain.errors.empty?
+  end
+
+  def test_domains_get
+    setup_domain
+    domains = Domain.find :all, :as => @user
+    assert_equal 1, domains.length
+    assert_equal "#{uuid}", domains[0].name
+  end
+
+  def test_domains_first
+    setup_domain
+    domain = Domain.find :one, :as => @user
+    assert_equal "#{uuid}", domain.name
+  end
+
+  def test_domain_exists_error
+    setup_domain
+    domain = Domain.find :one, :as => @user
+    domain2 = Domain.new :name => domain.name, :as => @user
+    assert !domain2.save
+    assert domain2.errors[:name].is_a?(Array), domain2.errors.inspect
+    assert domain2.errors[:name][0].is_a?(String), domain2.errors.inspect
+    assert domain2.errors[:name][0].include?('Name'), domain2.errors[:name][0]
+  end
+
+  def test_domains_update
+    setup_domain
+    domains = Domain.find :all, :as => @user
+    assert_equal 1, domains.length
+    assert_equal "#{uuid}", domains[0].name
+
+    d = domains[0]
+    assert !d.changed?
+    assert_equal "#{uuid}", d.id
+
+    # change name twice to make sure id doesn't change
+    d.name = "notsaved"
+    assert d.changed?
+    assert_equal "#{uuid}", d.to_param
+    d.name = "#{uuid.reverse}"
+    assert_equal "#{uuid}", d.to_param
+
+    assert d.save, d.errors.inspect
+    assert !d.changed?
+    # make sure the param value == the current name
+    assert_equal "#{uuid.reverse}", d.to_param
+
+    domains = Domain.find :all, :as => @user
+    assert_equal 1, domains.length
+    assert_equal "#{uuid.reverse}", domains[0].name
+
+    #cleanup
+    domains.each {|d| d.destroy_recursive}
+    @domain = nil
+  end
+
+  def test_domain_delete
+    setup_domain
+    domain = @domain
+    name = domain.name
+
+    assert_difference('Domain.find(:all, :as => @user).length', -1) do
+      assert domain.destroy
+    end
+
+    @domain = nil # don't need to clear the first domain now
+  end
+
+  def test_domain_find_throws
+    assert_raise RestApi::ResourceNotFound do
+      Domain.find 'invalid_name', :as => @user
+    end
+  end
+end

data/test/integration/rest_api/info_test.rb

@@ -0,0 +1,9 @@
+require File.expand_path('../../../test_helper', __FILE__)
+
+class RestApiInfoTest < ActiveSupport::TestCase
+  test "retrieve api info" do
+    assert info = RestApi::Info.find(:one)
+    assert info.version.to_f >= 1.0
+    assert info.supported_api_versions.length.present?
+  end
+end

data/test/integration/rest_api/key_test.rb

@@ -0,0 +1,85 @@
+require File.expand_path('../../../test_helper', __FILE__)
+
+class RestApiKeyTest < ActiveSupport::TestCase
+  include RestApiAuth
+
+  def setup
+    with_configured_user
+    once :remove_keys do
+      user = @user
+      lambda { Key.find(:all, :as => user).map(&:destroy) rescue nil }
+    end
+  end
+  def teardown
+    cleanup_domain
+  end
+
+  def unique_name
+    super "#{uuid}%i"
+  end
+
+  def test_key_get_all
+    assert Key.find :all, :as => @user
+  end
+
+  def test_key_first
+    assert_equal Key.first(:as => @user), Key.find(:all, :as => @user)[0]
+  end
+
+  def test_key_create
+    assert_difference('Key.find(:all, :as => @user).length', 1) do
+      key = Key.new :type => 'ssh-rsa', :name => unique_name, :content => unique_name, :as => @user
+      assert key.save, key.errors.inspect
+    end
+  end
+
+  def test_key_create_custom_type
+    assert_difference('Key.find(:all, :as => @user).length', 1) do
+      key = Key.new :type => 'ecdsa-sha2-nistp521', :name => unique_name, :content => unique_name, :as => @user
+      assert key.save
+    end
+  end
+
+  def test_invalid_key_create
+    assert_difference('Key.find(:all, :as => @user).length', 0) do
+      key = Key.new :type => 'ssh-rsa', :name => "invalid_name#{uuid}", :content => uuid, :as => @user
+      assert !key.save
+    end
+  end
+
+  def test_key_server_validation
+    key = Key.new :as => @user
+    assert !key.save(:validate => false) # don't check client validations
+    assert !key.errors.empty?
+    assert_equal ['Key name is required and cannot be blank.'], key.errors[:name]
+    assert_equal ['Key content is required and cannot be blank.'], key.errors[:content]
+    assert key.errors[:type].first =~ /Your SSH public key appears to be invalid/
+  end
+
+  def test_key_delete
+    key = nil
+    assert_difference('Key.find(:all, :as => @user).length', 1) do
+      key = Key.new :type => 'ssh-rsa', :name => unique_name, :content => unique_name, :as => @user
+      assert key.save, key.errors.inspect
+    end
+    assert_difference('Key.find(:all, :as => @user).length', -1) do
+      key.destroy
+    end
+  end
+
+  def test_user_get
+    user = User.find :one, :as => @user
+    assert user
+    assert_equal @user.login, user.login
+  end
+
+  def test_key_list
+    key = Key.new :raw_content => "ssh-rsa #{unique_name}", :name => unique_name, :as => @user
+    assert key.save, key.errors.inspect
+
+    keys = Key.find :all, :as => @user
+    assert keys.length > 0
+    assert found_key = keys.find {|k| k.name == key.name }
+    assert_attr_equal key, found_key
+  end
+end