auser-poolparty 0.2.2 → 0.2.3

data/spec/poolparty/base_packages/haproxy_spec.rb

@@ -0,0 +1,13 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "haproxy base package" do
+  before(:each) do
+    @ha = PoolPartyHaproxyClass.new do      
+    end
+    stub_list_from_remote_for(@ha)
+    @ha.stub!(:list_of_running_instances).and_return []
+  end
+  it "should have the heartbeat package defined" do
+    lambda {PoolPartyHaproxyClass}.should_not raise_error    
+  end
+end

data/spec/poolparty/base_packages/heartbeat_spec.rb

@@ -0,0 +1,30 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "heartbeat base package" do
+  # before(:each) do
+  #   @cloud = Cloud.new(:app, self)
+  #   @hb = PoolPartyHeartbeatClass.new(@cloud)
+  #   stub_list_from_remote_for(@cloud)
+  #   stub_list_of_instances_for(@cloud)
+  # end
+  # it "should have the heartbeat package defined" do
+  #   lambda {PoolPartyHeartbeatClass}.should_not raise_error    
+  # end
+  # it "should have a parent set to the cloud" do
+  #   @hb.parent.should == @cloud
+  # end
+  # it "should call enable (and setup resources) since there is no block given when it's instantiated" do
+  #   @hb.resources.should_not be_empty
+  # end
+  # it "should have no resources when starting with a block (that defines no methods)" do
+  #   @pphc = PoolPartyHeartbeatClass.new do
+  #   end
+  #   @pphc.resources.should be_empty
+  # end
+  # it "should have a file resource" do
+  #   @hb.resource(:remotefile).should_not be_empty
+  # end
+  # it "should have at least 3 remotefiles" do
+  #   @hb.resource(:remotefile).size.should >= 3
+  # end
+end

data/spec/poolparty/bin/console_spec.rb

@@ -0,0 +1,80 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+require File.dirname(__FILE__) + '/../../../lib/poolparty/helpers/console'
+
+describe "Console" do
+  before(:each) do
+    ::File.stub!(:file?).with("pop").and_return true
+  end
+  describe "load_pool" do
+    before(:each) do
+      reset!
+      @string =<<-EOS
+      pool :app do
+        maximum_instances 2
+        cloud :rawr do          
+        end
+      end
+      EOS
+      self.stub!(:open).and_return @string
+      @string.stub!(:read).and_return @string
+    end
+    it "should give you the load_pool method" do
+      self.respond_to?(:load_pool).should == true
+    end
+    it "should call script inflate on the filename" do      
+      PoolParty::Script.should_receive(:inflate).once
+      load_pool("pop")
+    end
+    describe "calling" do
+      before(:each) do
+        reset!
+        load_pool("pop")
+      end
+      it "should instance_eval the string" do
+        pool(:app).should_not be_nil
+      end
+      it "should store the cloud inside the pool after inflating" do
+        pool(:app).cloud(:rawr).should_not be_nil
+      end
+      it "should say that the cloud inside the pool's parent is the containing parent" do      
+        pool(:app).cloud(:rawr).parent.should == pool(:app)
+      end
+      it "should say that the maximum_instances on the cloud is the containing pool's option" do
+        pool(:app).cloud(:rawr).maximum_instances.should == 2
+      end
+    end
+  end  
+  describe "reload!" do
+    before(:each) do
+      reset!
+      self.stub!(:require).and_return true
+    end
+    it "should call reset!" do
+      self.should_receive(:reset!).once
+    end
+    after do
+      reload!
+    end
+  end
+  describe "print" do
+    before(:each) do
+      reset!
+      @string =<<-EOS
+      pool :app do
+        maximum_instances 2
+        cloud :rawr do          
+        end
+      end
+      EOS
+      self.stub!(:open).and_return @string
+      @string.stub!(:read).and_return @string
+      load_pool("pop")
+    end
+    it "should be able to print the clouds" do      
+      pools.should_not be_empty
+      hide_output do
+        pool_describe.should == pools.size
+      end      
+    end
+  end
+end

data/spec/poolparty/core/array_spec.rb

@@ -0,0 +1,26 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "Array" do
+  before(:each) do
+    @array = ["run this", "run that"]
+  end
+  describe "runnable" do
+    it "should be able to produced a runnable string" do;@array.runnable.should == 'run this  &&  run that';end
+    it "should be turn into a string" do;@array.runnable.class.should == String;end
+  end
+  describe "nice_runnable" do
+    before(:each) do
+      @array << ""
+      @array << "peabody"      
+    end
+    it "should reject any empty elements out of the array" do
+      (@array << [""]).nice_runnable.should == "run this \n run that \n peabody"
+    end
+  end
+  describe "to_os" do
+    it "should be able to turn itself to an open struct" do; @array.first.should_receive(:to_os);end        
+    after do
+      @array.to_os
+    end
+  end
+end

data/spec/poolparty/core/float.rb

@@ -0,0 +1,13 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "Float" do
+  it "should be able to round to the nearest integer" do
+    10.95.round_to(1).should == 11
+  end
+  it "should be able to get the ceiling" do
+    10.54.ceil_to(1).should == 10.6
+  end
+  it "should be able to get the floor" do
+    10.14.floor_to(1).should == 10.1
+  end
+end

data/spec/poolparty/core/hash_spec.rb

@@ -0,0 +1,63 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "Hash" do
+  before(:each) do
+    @a = {:a => "10", :b => "20", :c => "30"}
+  end
+  it "should preserve the contents of the original hash when safe_merge'ing" do
+    a = {:a => "10", :b => "20"}
+    b = {:b => "30", :c => "40"}
+    a.safe_merge(b).should == {:a => "10", :b => "20", :c => "40"}
+  end
+  it "should preserve the contents of the original hash when safe_merge!'ing" do
+    a = {:a => "10", :b => "20"}
+    b = {:b => "30", :c => "40"}
+    a.safe_merge!(b)
+    a.should == {:a => "10", :b => "20", :c => "40"}
+  end
+  it "should be able to turn itself into an open struct" do
+    @a.to_os.class.should == MyOpenStruct
+  end
+  it "should respond to to_hash" do
+    @a.to_os.respond_to?(:to_hash).should == true
+  end
+  it "should be able to turn itself into an open struct with the method to_hash on the object" do
+    @a.to_os.to_hash.should == @a
+  end
+  it "should not put quotes around integers" do
+    {:a => 10, :b => "q"}.flush_out.should == ["a => 10", "b => 'q'"]
+  end
+  it "should be able to flush out into a string into an array" do
+    @a.flush_out.should == ["a => '10'","b => '20'","c => '30'"]
+  end
+  it "should be able to flush out with prev and posts" do
+    @a.flush_out("hi", "ho").should == ["hia => '10'ho","hib => '20'ho","hic => '30'ho"]
+  end
+  describe "select" do
+    before(:each) do
+      @selected_hash = @a.select {|k,v| k if k == :a}
+    end
+    it "should return a hash when selecting" do
+      @selected_hash.class.should == Hash
+    end
+    it "should only have the key a (selected)" do
+      @selected_hash.keys.should == [:a]
+    end
+  end
+  describe "extract!" do
+    before(:each) do
+      @rejected_hash = @a.extract! {|k,v| k == :a }
+    end
+    it "should have a reject with the keys" do
+      @rejected_hash.keys.should == [:a]
+    end
+    it "should return the old array with the other keys" do
+      @a.keys.should == [:b, :c]
+    end
+    it "should not throw a fit with an empty hash" do
+      lambda {
+        {}.extract!
+      }.should_not raise_error
+    end
+  end
+end

data/spec/poolparty/core/kernel_spec.rb

@@ -0,0 +1,24 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "Kernel extensions" do
+  before(:each) do
+    @obj = Object.new
+  end
+  it "should eval the string into time" do
+    @obj.should_receive(:sleep).once.with(10.seconds).and_return true
+    @obj.wait "10.seconds"
+  end
+end
+describe "Object extensions" do
+  before(:each) do
+    @klass = Object.new
+    @klass.instance_eval <<-EOE
+      def hello
+        puts "hello"
+      end
+    EOE
+  end
+  it "should be able to get a list of the defined methods on the object" do
+    @klass.my_methods.should == ["hello"]
+  end
+end

data/spec/poolparty/core/module_spec.rb

@@ -0,0 +1,15 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "Module" do
+  before(:each) do
+    @mod = Module.new do
+      attr_accessor_with_default :a do
+        Hash.new
+      end
+    end
+    @klass = Class.new.extend(@mod)
+  end
+  it "should be able to set method accessors" do
+    @klass.a.should == {}
+  end
+end

data/spec/poolparty/core/object_spec.rb

@@ -0,0 +1,40 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "Object" do
+  it "should respond to to_os" do
+    Object.new.respond_to?(:to_os).should == true
+  end
+  describe "with_options" do
+    before(:each) do
+      @obj = Class.new
+    end
+    it "should respond to with_options" do
+      @obj.respond_to?(:with_options).should == true
+    end
+    it "should set the options on the parent" do
+      allow_message_expectations_on_nil
+      @a.should_receive(:clone).and_return @a
+      @a.stub!(:options).and_return({})
+      with_options({:nick => "name"}, @a) do
+      end
+    end
+    
+    describe "running" do
+      before(:each) do
+        Class.stub!(:default_options).and_return({})
+        Class.send :include, Configurable
+        Class.send :include, MethodMissingSugar
+        @a = Class.new        
+        @b = Class.new
+        
+        with_options({:nick => "name", :b => @b}, @a) do
+          b.dude "totally"
+        end
+        
+      end
+      it "should set the options on the child in the instance eval" do
+        @b.dude.should == "totally"
+      end
+    end
+  end
+end

data/spec/poolparty/core/string_spec.rb

@@ -0,0 +1,152 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "String" do
+  describe "hasherize" do
+    before(:each) do
+      @str=<<-EOE
+hello world
+you are my
+hero
+      EOE
+      @hashed = @str.hasherize(%w(hello you))
+    end
+    it "should return a hash from the string" do
+      @hashed.class.should == Hash
+    end
+    it "should have hello as a key" do
+      @hashed.has_key?(:hello).should == true
+    end
+    describe "arrayable" do
+      it "should be able to turn the string into an array" do
+        @str.arrayable.class.should == Array
+      end
+    end    
+  end
+  before(:each) do
+    @string = "string"
+    @string.stub!(:bucket_objects).and_return([])
+  end
+  # Dumb test
+  it "should be able to call bucket_objects on itself" do
+    @string.should_receive(:bucket_objects)
+    @string.bucket_objects
+  end
+  describe "with config replacements" do
+    it "should replace those syms in the string" do
+      ("new :port" ^ {:port => 100}).should == "new 100"
+    end
+    it "should be able to detect vars" do
+      @string=<<-EOC
+listen web_proxy 127.0.0.1::client_port
+\tserver web1 127.0.0.1::port weight 1 minconn 3 maxconn 6 check inter 30000
+      EOC
+      (@string ^ {:client_port => 3000, :port => 3001}).should ==<<-EOO
+listen web_proxy 127.0.0.1:3000
+\tserver web1 127.0.0.1:3001 weight 1 minconn 3 maxconn 6 check inter 30000
+      EOO
+    end
+  end
+  describe "collect_each_line_with_index" do
+    before(:each) do
+      @longer_string = "hot\npotato\nthrough\nthe\nwindow"
+    end
+    it "should run the same code on the entire string" do
+      @longer_string.collect_each_line_with_index do |str, index|
+        "#{index}_#{str}"
+      end.should == ["0_hot", "1_potato", "2_through", "3_the", "4_window"]
+    end
+  end
+  describe "String" do
+    before(:each) do
+      @str =<<-EOS
+        echo 'hi'
+        puts 'hi'
+      EOS
+    end
+    it "should be able to convert a big string with \n to a runnable string" do
+      @str.runnable.should == "echo 'hi' &&         puts 'hi'"
+    end
+  end
+  describe "Constantize" do
+    before(:each) do
+      @str = "prok"
+    end
+    it "should be able to turn itself into constant" do
+      @str.class_constant.should == PoolPartyProkClass
+    end
+    it "should turn itself into a class constant" do
+      @str.class_constant.class.should == Class
+    end
+    it "should not recreate the constant if it exists" do
+      Class.should_receive(:new).once.and_return Class.new
+      @str.class_constant
+      @str.class_constant
+    end
+    it "should set the parent class when sent with the superclass" do
+      "stirer".class_constant(String).ancestors[1].should == String
+    end
+    it "should be able to create a module into a constant" do
+      @str.module_constant.should == ProkModule
+    end
+    it "should turn itself into a class constant" do
+      @str.module_constant.class.should == Module
+    end
+    it "should create the module on preserved module constant" do
+      Module.should_receive(:new).once
+      @str.preserved_module_constant.should == Prok
+      @str.preserved_module_constant
+      @str.preserved_module_constant
+    end
+    describe "with a block" do
+      before(:each) do
+        @str = "nack"
+      end
+      it "should be able to yield a block on the module and set methods" do
+        "tippy".module_constant do
+          def tippy
+            puts "etc"
+          end
+        end
+        Class.new.extend("tippy".module_constant).methods.include?("tippy").should == true
+      end
+    end
+  end
+  describe "top level class" do
+    it "should be able to get the top level class" do
+      "PoolParty::Resources::File".top_level_class.should == "file"
+    end
+  end
+  describe "to_option_string" do
+    it "should not touch a string, but return the string with single quotes" do
+      "rocks".to_option_string.should == "'rocks'"
+    end
+    it "should return a string of the format Service[nagios] with no single quotes" do
+      "Service[nagios]".to_option_string.should == "Service[nagios]"
+    end
+    it "should also return a string if there is a string within the string" do
+      'Package["heartbeat-2"]'.to_option_string.should == 'Package["heartbeat-2"]'
+    end
+    it "should return File['/etc/apache2/conf.d/base.conf'] as a string" do
+      'File["/etc/apache2/conf.d/base.conf"]'.to_option_string.should == "File[\"/etc/apache2/conf.d/base.conf\"]"
+    end
+  end
+  describe "sanitize" do
+    it "should remove the periods from the string" do
+      "xnot.org".sanitize.should == "xnotorg"
+    end
+  end
+  describe "nice_runnable" do
+    before(:each) do
+      @tasks = ["ls -l", "echo 'hello'"]
+    end
+    it "should turn an array into a string" do
+        @tasks.nice_runnable.class.should == String
+    end
+    it "should add \\n between the commands" do
+      @tasks.nice_runnable.should == "ls -l \n echo 'hello'"
+    end
+    it "should strip out excess lines" do
+      (@tasks << []).nice_runnable.should == "ls -l \n echo 'hello'"
+    end
+  end
+end