Project

General

Profile

Download (11.9 KB) Statistics
| Branch: | Tag: | Revision:
require 'test_helper'

class HostgroupTest < ActiveSupport::TestCase
setup do
User.current = User.find_by_login "admin"
end
test "name can't be blank" do
host_group = Hostgroup.new :name => " "
assert host_group.name.strip.empty?
assert !host_group.save
end

test "name can't contain trailing white spaces" do
host_group = Hostgroup.new :name => " all hosts in the world "
assert !host_group.name.squeeze(" ").empty?
assert !host_group.save

host_group.name.squeeze!(" ")
assert host_group.save
end

test "name must be unique" do
host_group = Hostgroup.new :name => "some hosts"
assert host_group.save

other_host_group = Hostgroup.new :name => "some hosts"
assert !other_host_group.save
end

def setup_user operation
super operation, "hostgroups"
end

test "should be able to nest a group parameters" do
# creates a 3 level hirecy, each one with his own parameters
# and overrides.
pid = Time.now.to_i
assert (top = Hostgroup.create(:name => "topA", :group_parameters_attributes => {
pid += 1=>{"name"=>"topA", "value"=>"1", :nested => ""},
pid += 1=>{"name"=>"topB", "value"=>"1", :nested => ""},
pid += 1=>{"name"=>"topC", "value"=>"1", :nested => ""},
}))
assert (second = Hostgroup.create(:name => "SecondA", :parent_id => top.id, :group_parameters_attributes => {
pid += 1 =>{"name"=>"topA", "value"=>"2", :nested => ""},
pid += 1 =>{"name"=>"secondA", "value"=>"2", :nested => ""}}))

assert second.parameters.include? "topA"
assert_equal "2", second.parameters["topA"]
assert second.parameters.include? "topB"
assert_equal "1", second.parameters["topB"]
assert second.parameters.include? "topC"
assert_equal "1", second.parameters["topC"]
assert second.parameters.include? "secondA"
assert_equal "2", second.parameters["secondA"]

assert (third = Hostgroup.create(:name => "ThirdA", :parent_id => second.id, :group_parameters_attributes => {
pid += 1 =>{"name"=>"topB", "value"=>"3", :nested => ""},
pid += 1 =>{"name"=>"topA", "value"=>"3", :nested => ""}}))

assert third.parameters.include? "topA"
assert_equal "3", third.parameters["topA"]
assert third.parameters.include? "topB"
assert_equal "3", third.parameters["topB"]
assert third.parameters.include? "topC"
assert_equal "1", third.parameters["topC"]
assert third.parameters.include? "secondA"
assert_equal "2", third.parameters["secondA"]
end

test "should inherit parent classes" do
child, top = nil
as_admin do
top = Hostgroup.create!(:name => "topA")
top.puppetclasses << Puppetclass.first
child = Hostgroup.create!(:name => "secondB", :parent_id => top.id)
child.puppetclasses << Puppetclass.last
end

assert_equal [Puppetclass.first, Puppetclass.last].sort, child.classes.sort
end

test "blocks deletion of hosts with children" do
top = Hostgroup.create(:name => "topA")
second = Hostgroup.create(:name => "secondB", :parent_id => top.id)

assert top.has_children?
assert_raise Ancestry::AncestryException do
top.destroy
end
end

test "changing name of hostgroup updates other hostgroup labels" do
#setup - add parent to hostgroup :common (not in fixtures, since no field parent_id)
hostgroup = hostgroups(:db)
parent_hostgroup = hostgroups(:common)
hostgroup.parent_id = parent_hostgroup.id
assert hostgroup.save!

# change name of parent
assert parent_hostgroup.update_attributes(:name => "new_common")
# check if hostgroup(:db) label changed
hostgroup.reload
assert_equal "new_common/db", hostgroup.title
end

test "deleting a hostgroup with children does not change labels" do
#setup - get label "common/db"
hostgroup = hostgroups(:db)
parent_hostgroup = hostgroups(:common)
hostgroup.parent_id = parent_hostgroup.id
assert hostgroup.save!
hostgroup.reload
assert_equal "Common/db", hostgroup.title

#attempt to destroy parent hostgroup
begin
assert_not parent_hostgroup.destroy
rescue Ancestry::AncestryException
end
# check if hostgroup(:db) label remains the same
hostgroup.reload
assert_equal "Common/db", hostgroup.title
end

test "should find associated lookup_values" do
assert_equal [lookup_values(:hostgroupcommon), lookup_values(:four)].map(&:id).sort, hostgroups(:common).lookup_values.map(&:id).sort
end

test "should find associated lookup_values with unsafe SQL name" do
hostgroup = hostgroups(:common)
hostgroup.name = "Robert';"
hostgroup.save!
lv = lookup_values(:four)
lv.match = "hostgroup=#{hostgroup.name}"
lv.save!
assert_equal [lookup_values(:hostgroupcommon), lookup_values(:four)].map(&:id).sort, hostgroup.lookup_values.map(&:id).sort
end

# test NestedAncestryCommon methods generate by class method nested_attribute_for
test "respond to nested_attribute_for methods" do
hostgroup = hostgroups(:common)
[:compute_profile_id, :environment_id, :domain_id, :puppet_proxy_id, :puppet_ca_proxy_id,
:operatingsystem_id, :architecture_id, :medium_id, :ptable_id, :subnet_id].each do |field|
assert hostgroup.respond_to?("inherited_#{field}")
end
end

test "inherited id value equals field id value if no ancestry" do
hostgroup = hostgroups(:common)
[:compute_profile_id, :environment_id, :domain_id, :puppet_proxy_id, :puppet_ca_proxy_id,
:operatingsystem_id, :architecture_id, :medium_id, :ptable_id, :subnet_id].each do |field|
assert_equal hostgroup.send(field), hostgroup.send("inherited_#{field}")
end
end

test "inherited id value equals parent's field id value if the child's value is null" do
child = hostgroups(:inherited)
parent = hostgroups(:parent)
# environment_id is not included in the array below since child value is not null
[:compute_profile_id, :domain_id, :puppet_proxy_id, :puppet_ca_proxy_id,
:operatingsystem_id, :architecture_id, :medium_id, :ptable_id, :subnet_id].each do |field|
assert_equal parent.send(field), child.send("inherited_#{field}")
end
end

test "inherited id value does not inherit parent's field id value if the child's value is not null" do
child = hostgroups(:inherited)
parent = hostgroups(:parent)
# only environment_id is overriden in inherited fixture
refute_equal parent.environment_id, child.inherited_environment_id
assert_equal child.environment_id, child.inherited_environment_id
end

test "inherited object equals parent object if the child's value is null" do
child = hostgroups(:inherited)
parent = hostgroups(:parent)
# methods below do not include _id
# environment is not included in the array below since child value is not null
[:compute_profile, :domain, :puppet_proxy, :puppet_ca_proxy,
:operatingsystem, :architecture, :medium, :ptable, :subnet].each do |field|
assert_equal parent.send(field), child.send(field)
end
end

test "inherited object does not inherit parent object if the child's value is null" do
child = hostgroups(:inherited)
parent = hostgroups(:parent)
# only environment_id is overriden in inherited fixture
refute_equal parent.environment, child.environment
assert_equal environments(:production), child.environment
end

test "classes_in_groups should return the puppetclasses of a config group only if it is in hostgroup environment" do
# config_groups(:one) and (:three) belongs to hostgroups(:common)
hostgroup = hostgroups(:common)
group_classes = hostgroup.classes_in_groups
# four classes in config groups
assert_equal 4, (config_groups(:one).puppetclasses + config_groups(:three).puppetclasses).uniq.count
# but only 3 are in production environment. git is in testing environment
assert_equal 3, group_classes.count
assert_equal ['chkmk', 'nagios', 'vim'].sort, group_classes.map(&:name).sort
end

test "should return all classes for environment only" do
# config_groups(:one) and (:three) belongs to hostgroup(:common)
hostgroup = hostgroups(:common)
all_classes = hostgroup.classes
# three classes from group plus one class directly - base
assert_equal 4, all_classes.count
assert_equal ['base', 'chkmk', 'nagios', 'vim'].sort, all_classes.map(&:name).sort
end

test "search hostgroups by config group" do
config_group = config_groups(:one)
hostgroups = Hostgroup.search_for("config_group = #{config_group.name}")
assert_equal 3, hostgroups.count
assert_equal ["Common", "Parent", "inherited"].sort, hostgroups.map(&:name).sort
end

test "parent_classes should return parent classes if hostgroup has parent and environment are the same" do
hostgroup = hostgroups(:inherited)
assert hostgroup.parent
# update environment for this test to be same as parent
hostgroup.parent.update_attribute(:environment_id, hostgroup.environment_id)
refute_empty hostgroup.parent_classes
assert_equal hostgroup.parent_classes, hostgroup.parent.classes
end

test "parent_classes should not return parent classes that do not match environment" do
hostgroup = hostgroups(:inherited)
assert hostgroup.parent
refute_empty hostgroup.parent_classes
refute_equal hostgroup.environment, hostgroup.parent.environment
refute_equal hostgroup.parent_classes, hostgroup.parent.classes
end

test "parent_classes should return empty array if hostgroup does not has parent" do
hostgroup = hostgroups(:common)
assert_nil hostgroup.parent
assert_empty hostgroup.parent_classes
end

test "parent_config_groups should return parent config_groups if hostgroup has parent - 2 levels" do
hostgroup = hostgroups(:inherited)
assert hostgroup.parent
assert_equal hostgroup.parent_config_groups, hostgroup.parent.config_groups
end

test "parent_config_groups should return parent config_groups if hostgroup has parent - 3 levels" do
assert hostgroup = Hostgroup.create!(:name => 'third level', :parent_id => hostgroups(:inherited).id)
groups = (hostgroup.config_groups + hostgroup.parent.config_groups + hostgroup.parent.parent.config_groups).uniq.sort
assert_equal groups, hostgroup.parent_config_groups.sort
end

test "parent_config_groups should return empty array if hostgroup does not has parent" do
hostgroup = hostgroups(:common)
assert_nil hostgroup.parent
assert_empty hostgroup.parent_config_groups
end

test "individual puppetclasses added to hostgroup (that can be removed) does not include classes that are included by config group" do
hostgroup = hostgroups(:parent)
# update parent to production environment
hostgroup.update_attribute(:environment_id, environments(:production).id)
# nagios puppetclasses(:five) is also in config_groups(:one) Monitoring
hostgroup.puppetclasses << puppetclasses(:five)
assert_equal ['git', 'nagios'].sort, hostgroup.puppetclasses.map(&:name).sort
assert_equal ['git'], hostgroup.individual_puppetclasses.map(&:name)
end

test "available_puppetclasses should return all if no environment" do
hostgroup = hostgroups(:common)
hostgroup.update_attribute(:environment_id, nil)
assert_equal Puppetclass.scoped, hostgroup.available_puppetclasses
end

test "available_puppetclasses should return environment-specific classes" do
hostgroup = hostgroups(:common)
refute_equal Puppetclass.scoped, hostgroup.available_puppetclasses
assert_equal hostgroup.environment.puppetclasses.sort, hostgroup.available_puppetclasses.sort
end

test "available_puppetclasses should return environment-specific classes (and that are NOT already inherited by parent)" do
hostgroup = hostgroups(:inherited)
refute_equal Puppetclass.scoped, hostgroup.available_puppetclasses
refute_equal hostgroup.environment.puppetclasses.sort, hostgroup.available_puppetclasses.sort
assert_equal (hostgroup.environment.puppetclasses - hostgroup.parent_classes).sort, hostgroup.available_puppetclasses.sort
end

end
(41-41/96)