poolparty 0.0.4 → 0.2.6

data/spec/poolparty/pool/cloud_spec.rb

@@ -0,0 +1,299 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+include PoolParty::Cloud
+class TestServiceClass
+  plugin :test_service do
+    def enable
+      has_file(:name => "/etc/poolparty/lobos")
+    end                  
+  end
+end
+
+describe "Cloud" do
+  before(:each) do
+    @obj = Object.new
+    @pool = pool :just_pool do; end
+  end
+  it "should respond to the pool method outside the block" do
+    @obj.respond_to?(:cloud).should == true
+  end
+  describe "global" do
+    before(:each) do
+      @cloud1 = cloud :pop do;end
+    end
+    it "should store the cloud in the global list of clouds" do    
+      @obj.clouds.has_key?(:pop).should == true
+    end
+    it "should store the cloud" do
+      @obj.cloud(:pop).should == @cloud1
+    end
+    it "should have set the using base on intantiation to ec2" do
+      @cloud1.using_remoter?.should_not == nil
+    end
+    it "should say the remoter_base is ec2 (by default)" do
+      @cloud1.remote_base.should == PoolParty::Ec2
+    end
+  end
+  it "should return the cloud if the cloud key is already in the clouds list" do
+    @cld = cloud :pop do;end
+    @pool.cloud(:pop).should == @cld
+  end
+  describe "options" do
+    before(:each) do
+      reset!
+      @p = pool :options do
+        minimum_instances 100
+        access_key "access_key"
+        cloud :apple do          
+          access_key "cloud_access_key"
+        end
+      end
+      @c = @p.cloud(:apple)
+    end
+    it "should be able to grab the cloud from the pool" do
+      @c.should == @p.cloud(:apple)
+    end
+    it "should take the options set on the pool" do
+      @p.minimum_instances.should == 100
+    end
+    it "should take the access_key option set from the cloud" do
+      @c.access_key.should == "cloud_access_key"
+    end
+  end
+  describe "block" do
+    before(:each) do
+      reset!
+      @cloud = Cloud.new(:test, @pool) do
+        # Inside cloud block
+        keypair "fake_keypair"
+      end
+    end
+    
+    it "should be able to pull the pool from the cloud" do
+      @cloud.parent == @pool
+    end
+    it "should have services in an array" do
+      @cloud.services.class.should == Array
+    end
+    it "should have no services in the array when there are no services defined" do
+      @cloud.services.size.should == 0
+    end
+    it "should respond to a configure method" do
+      @cloud.respond_to?(:configure).should == true
+    end
+    describe "configuration" do
+      before(:each) do
+        reset!
+        @cloud2 = Cloud.new(:test, @pool) do
+          minimum_instances 1
+          maximum_instances 2
+        end
+      end
+      it "should be able to se the minimum_instances without the var" do
+        @cloud2.minimum_instances.should == 1
+      end
+      it "should be able to se the maximum_instances with the =" do
+        @cloud2.maximum_instances.should == 2
+      end
+    end
+    describe "options" do
+      it "should set the minimum_instances to 2" do
+        @cloud.minimum_instances.should == 2
+      end
+      it "should set the maximum_instances to 4" do
+        @cloud.maximum_instances.should == 4
+      end
+      it "should be able to set the minimum instances" do
+        @cloud.minimum_instances 3
+        @cloud.minimum_instances.should == 3
+      end
+      it "should be able to take a hash from configure and convert it to the options" do
+        @cloud.configure( {:minimum_instances => 1, :maximum_instances => 10, :keypair => "friend"} )
+        @cloud.keypair.should == "friend"
+      end
+      describe "minimum_instances/maximum_instances as a range" do
+        before(:each) do
+          reset!
+          @pool = pool :just_pool do
+            cloud :app do
+              instances 8..15
+            end
+          end
+          @cloud = @pool.cloud(:app)
+        end
+        it "should set the minimum based on the range" do
+          @cloud.minimum_instances.should == 8
+        end
+        it "should set the maximum based on the range set by instances" do
+          @cloud.maximum_instances.should == 15
+        end
+      end
+      describe "keypair" do
+        before(:each) do
+          reset!
+        end
+        it "should be able to define a keypair in the cloud" do
+          @c = cloud :app do
+            keypair "hotdog"
+          end
+          @c.keypair.should == "hotdog"
+        end
+        it "should take the pool parent's keypair if it's defined on the pool" do
+          pool :pool do
+            keypair "ney"
+            cloud :app do
+            end
+            cloud :group do
+            end
+          end
+          pool(:pool).cloud(:app).keypair.should == "ney"
+          pool(:pool).cloud(:group).keypair.should == "ney"
+        end
+        it "should generate a keypair based on the cloud name if none is defined" do
+          pool :pool do
+            cloud :app do
+            end
+            cloud :nickes do
+            end
+          end
+          pool(:pool).cloud(:app).keypair.should == "pool_app"
+          pool(:pool).cloud(:nickes).keypair.should == "pool_nickes"
+        end
+      end
+      describe "Manifest" do
+        before(:each) do
+          reset!
+          stub_list_from_remote_for(@cloud)
+          @cloud.instance_eval do
+            has_file(:name => "/etc/httpd/http.conf") do
+              content <<-EOE
+                hello my lady
+              EOE
+            end
+            has_gem(:name => "poolparty")
+            has_package(:name => "dummy")            
+          end
+        end
+        it "should it should have the method build_manifest" do
+          @cloud.respond_to?(:build_manifest).should == true
+        end
+        it "should have 3 resources" do
+          @cloud.add_poolparty_base_requirements
+          @cloud.number_of_resources.should > 3
+        end
+        it "should receive add_poolparty_base_requirements before building the manifest" do
+          @cloud.should_receive(:add_poolparty_base_requirements).once
+          @cloud.build_manifest
+        end
+        describe "add_poolparty_base_requirements" do
+          before(:each) do
+            reset!            
+            @cloud.instance_eval do
+              @heartbeat = nil
+            end
+            @hb = "heartbeat".class_constant.new(@cloud)
+          end
+          it "should call initialize on heartbeat (in add_poolparty_base_requirements)" do
+            @hb.class.should_receive(:new).and_return true
+            @cloud.add_poolparty_base_requirements
+          end
+          it "should call heartbeat on the cloud" do
+            @cloud.should_receive(:heartbeat).and_return true
+            @cloud.add_poolparty_base_requirements
+          end
+          it "should call Hearbeat.new" do
+            "heartbeat".class_constant.should_receive(:new).and_return @hb
+            @cloud.add_poolparty_base_requirements            
+          end
+          it "should call enable on the plugin call" do
+            @hb = "heartbeat".class_constant
+            "heartbeat".class_constant.stub!(:new).and_return @hb
+            
+            @cloud.add_poolparty_base_requirements
+            @cloud.heartbeat.should == @hb
+          end
+          describe "after adding" do
+            before(:each) do
+              stub_list_from_remote_for(@cloud)
+              @cloud.add_poolparty_base_requirements              
+            end
+            it "should add resources onto the heartbeat class inside the cloud" do
+              @cloud.services.size.should > 0
+            end
+            it "should store the class heartbeat" do              
+              @cloud.services.map {|a| a.class}.include?("heartbeat".class_constant).should == true
+            end
+            it "should have an array of resources on the heartbeat" do
+              @cloud.services.first.resources.class.should == Hash
+            end
+            describe "resources" do
+              before(:each) do
+                @cloud8 = Cloud.new(:tester, @pool) do     
+                  test_service             
+                end
+                @service = @cloud8.services.first
+                @files = @service.resource(:file)
+              end
+              it "should have a file resource" do
+                @files.first.nil?.should == false
+              end
+              it "should have an array of lines" do
+                @files.class.should == Array
+              end
+              it "should not be empty" do
+                @files.should_not be_empty
+              end
+            end
+          end
+        end
+        describe "building" do
+          before(:each) do            
+            str = "master 192.168.0.1
+            node1 192.168.0.2"
+            @sample_instances_list = [{:ip => "192.168.0.1", :name => "master"}, {:ip => "192.168.0.2", :name => "node1"}]
+            @ris = @sample_instances_list.map {|h| PoolParty::Remote::RemoteInstance.new(h, @cloud) }
+            
+            @manifest = @cloud.build_manifest
+          end
+          it "should return a string when calling build_manifest" do
+            @manifest.class.should == String
+          end
+          it "should have a comment of # file in the manifest as described by the has_file" do
+            @manifest.should =~ /file \{/
+          end
+          it "should have the comment of a package in the manifest" do
+            @manifest.should =~ /package \{/
+          end
+          it "should have the comment for heartbeat in the manifest" do
+            @manifest.should =~ /class heartbeat/            
+          end
+          it "should include the poolparty gem" do
+            @manifest.should =~ /package \{/
+          end
+          it "should include custom functions" do
+            @manifest.should =~ /define line\(\$file/
+            
+            File.open("test_manifest.pp", "w+") {|f| f << @manifest}
+          end
+          it "should include the hosts for all the listed local instances" do
+            @manifest.should =~ /host \{\n\t\t"master":/
+          end
+        end
+      end
+    end
+    
+    describe "instances" do
+      before(:each) do
+        @cloud3 = cloud :pop do;keypair "fake_keypair";end
+        stub_list_from_remote_for(@cloud3)
+      end
+      it "should respond to the method master" do
+        @cloud3.respond_to?(:master).should == true
+      end
+      it "should return a master that is not nil" do
+        @cloud3.master.should_not be_nil
+      end
+    end
+    
+  end
+end

data/spec/poolparty/pool/configurers/files/ruby_basic.rb

@@ -0,0 +1,17 @@
+pool :poolpartyrb do
+  plugin_directory "docs_plugins"
+  
+  cloud :app do
+        
+    # Configuration
+    configure({ :maximum_instances => 1,:keypair => "name" })
+    minimum_instances 1    
+    
+    apache do
+      enable_php
+      site("poolpartyrb.com")
+    end
+        
+  end
+  
+end

data/spec/poolparty/pool/configurers/files/ruby_plugins.rb

@@ -0,0 +1,16 @@
+pool :poolpartyrb do
+  
+  cloud :app do
+    
+    apache do
+      enable_php
+      
+      site({
+        :document_root => "/www/domain2",
+        :server_name => "domain2.com"
+      })
+    end    
+    
+  end
+  
+end

data/spec/poolparty/pool/configurers/ruby_spec.rb

@@ -0,0 +1,58 @@
+require File.dirname(__FILE__) + '/../../spec_helper'
+require File.dirname(__FILE__) + '/../test_plugins/webserver'
+
+describe "Configurer" do
+  before(:each) do
+    reset!
+    @basic = read_file(File.join(File.dirname(__FILE__), "files", "ruby_basic.rb"))
+    Script.inflate @basic
+    @conf = Object.new
+  end
+  it "should not be nil" do
+    @conf.should_not be_nil
+  end
+  
+  describe "with a spec file" do
+    before(:each) do
+      @s = Script.new
+      Script.stub!(:new).and_return(@s)
+      @basic = read_file(File.join(File.dirname(__FILE__), "files", "ruby_basic.rb"))
+    end
+    it "should load the basic example configure" do
+      @s.should_receive(:inflate).and_return true
+    end
+    it "should call inflate on the pools" do
+      @s.pools.each {|a,b| b.should_receive(:inflate).and_return true }
+    end
+    describe "pool" do
+      before(:each) do
+        Script.inflate @basic
+        @pool = pool(:poolpartyrb)
+      end
+    end
+    describe "clouds" do
+      before(:each) do
+        reset!
+        Script.inflate @basic
+        @cloud = pool(:poolpartyrb).cloud(:app)
+      end
+      it "should contain a list of the clouds within the pool (:app)" do
+        @cloud.should_not be_nil
+      end
+      it "should set the minimum instances on the :app cloud" do
+        @cloud.minimum_instances.should == 1
+      end
+      it "should set the maximum instances on the :app cloud" do
+        @cloud.maximum_instances.should == 1
+      end
+      it "should set the keypair name on the :app cloud too" do
+        @cloud.keypair.should == "name"
+      end
+    end
+    
+    after do
+      Script.inflate @basic
+    end
+  end
+  
+end

data/spec/poolparty/pool/custom_resource_spec.rb

@@ -0,0 +1,115 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+include PoolParty::Resources
+
+describe "Custom Resource" do
+  before(:each) do
+    @cloud = cloud :name do; end
+  end
+  it "should provide custom_resource as a method" do
+    self.respond_to?(:define_resource).should == true
+  end
+  describe "defining" do
+    it "should not raise ResourceException if custom_function and custom_usage are defined" do
+      lambda {
+        define_resource(:rockstar) do
+          def has_a_line_in_file(line="line_in_file", file="file")
+            call_function "line(#{file}, #{line})"
+          end
+          custom_function <<-EOF
+          define line($file, $line, $ensure = 'present') {
+            case...
+          }
+          EOF
+        end
+      }.should_not raise_error
+    end
+    describe "define_resource" do
+      before(:each) do
+        define_resource(:rockstar) do
+          def has_a_line_in_file(line="line_in_file", file="file")
+            call_function "line(#{file}, #{line})"
+          end
+          custom_function <<-EOF
+          define line($file, $line, $ensure = 'present') {
+            case...
+          }
+          EOF
+        end
+      end
+      it "should create a custom resource available as a class" do
+        lambda {RockstarClass.new }.should_not raise_error
+      end
+      it "should add the method has_a_line_in_file to Resources" do
+        PoolParty::Resources.methods.include?("has_a_line_in_file").should == true
+      end
+    end
+    describe "printing" do
+      before do
+        reset_resources!
+        define_resource(:rockstar) do
+          def has_a_line_in_file(line="line_in_file", file="file")
+            call_function "line(#{file}, #{line})"
+          end
+          custom_function <<-EOF
+          define line($file, $line, $ensure = 'present') {
+            case...
+          }
+          EOF
+        end
+        @resource = RockstarClass.new
+      end
+      it "should not be nil after it is defined" do
+        @resource.should_not be_nil
+      end
+      it "should store the custom_function in the class" do
+        RockstarClass.custom_functions.select {|a| a if a =~ /define line/}.should_not be_empty
+      end
+      it "should allow for the has_a_line_in_file to be called from within a plugin" do        
+        @resource.instance_eval do
+          has_a_line_in_file("hi", "filename")
+        end
+        @resource.resource(:call_function).to_string.should == "line(filename, hi)"
+      end
+      it "should be stored in an array" do
+        resource(:rockstar).class.should == Array
+      end
+      describe "call function" do
+        it "should have the class CallFunction available" do
+          lambda {PoolParty::Resources::CallFunction}.should_not raise_error
+        end
+        it "should create a new CallFunction instance when calling call_function with a string" do
+          PoolParty::Resources::CallFunction.should_receive(:new).and_return "bunk"
+          add_resource(:call_function, "line")
+        end
+        it "should create a call function in the function call array" do
+          add_resource(:call_function, @cloud, "heyyohey")
+          resource(:call_function).size.should == 1
+        end
+        describe "defining" do
+          it "should add the methods to the class through module_eval" do
+            PoolParty::Resources.should_receive(:module_eval).at_least(1)
+            define_resource :imarockstar2YEAH do
+            end
+          end
+        end
+      
+        describe "within context" do
+          before(:each) do
+            cloud :apple do
+              has_line_in_file("hello", "messages")
+              brain_child("meee")
+            end
+            @cloud = cloud(:apple)
+          end
+          it "should have 1 resource (the line resource)" do
+            @cloud.resources.should_not be_empty
+          end
+          it "should have one call_function resource" do
+            @cloud.resource(:call_function).first.to_string.should =~ /line \{/
+          end
+        end
+      end
+    end
+  end
+end