auser-poolparty 1.2.12 → 1.3.0

data/spec/poolparty/poolparty/neighborhoods_spec.rb

@@ -1,65 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-
-include PoolParty
-
-describe "Neighborhoods" do
-  it "should have a constant: Neighborhoods" do
-    Object.const_get("Neighborhoods").should == PoolParty::Neighborhoods
-  end
-  it "should set the schema when starting with a json string (or a hash)" do
-    n = Neighborhoods.new({:instances => "b"})
-    n.schema.nil?.should == false
-    n.schema.class.should == PoolParty::Schema
-  end
-  it "should raise an error if a new Neighborhood is created with a nil parameter" do
-    lambda {Neighborhoods.new}.should raise_error
-  end
-  it "should raise an error if there are no instances defined in the json" do
-    lambda {Neighborhoods.new({:a => "b"})}.should raise_error
-  end
-  it "should not raise a fit if there ARE instances defined" do
-    lambda{Neighborhoods.new({:instances => ["10.0.0.1"]})}.should_not raise_error
-  end
-  it "should return an instance ip when calling for the first instance" do
-    n = Neighborhoods.new(sample_instances_list)
-    n.instances.first.ip.should == "127.0.0.1"
-    n.instances[1].ip.should == "127.0.0.2"
-  end
-  it "should return an instance ip when calling for the [0] instance" do
-    n = Neighborhoods.new(sample_instances_list)
-    n[0].ip.should == "127.0.0.1"
-    n[1].ip.should == "127.0.0.2"
-  end
-  it "should be able to try to save the instances into a json file" do
-    filepath = "/tmp/poolparty/neighborhood.json"
-    ::File.should_receive(:open).with(filepath, "w").and_return true
-    Neighborhoods.new(sample_instances_list).clump(filepath)
-  end
-  it "should be able to try to save the instances (class method) into a json file" do
-    filepath = "/tmp/poolparty/neighborhood.json"
-    ::File.should_receive(:open).with(filepath, "w").and_return true
-    Neighborhoods.clump(sample_instances_list,filepath)
-  end
-  it "should load from the default properly with the first's instance's ip" do
-    str = "{\"instances\":[{\"instance_id\":\"master\",\"launching_time\":\"2009/03/26 01:06:18 -0700\",\"ip\":\"127.0.0.1\"},{\"instance_id\":\"node1\",\"launching_time\":\"2009/03/26 01:06:18 -0700\",\"ip\":\"127.0.0.2\"}]}"
-    ::File.should_receive(:file?).with("/etc/poolparty/neighborhood.json").and_return true
-    ::File.stub!(:file?).and_return false
-    
-    str.stub!(:read).and_return str
-    Neighborhoods.should_receive(:open).with("/etc/poolparty/neighborhood.json").and_return str
-    
-    n = Neighborhoods.load_default
-    n[0].ip.should == "127.0.0.1"
-  end
-  context "load_default" do
-    it "should try to look in the paths to see if the neighborhood file exists" do
-      ::File.should_receive(:file?).with("/etc/poolparty/neighborhood.json").and_return true
-      ::File.stub!(:file?).and_return false
-      @file = sample_instances_list
-      @file.stub!(:read).and_return @file
-      Neighborhoods.should_receive(:open).with("/etc/poolparty/neighborhood.json").and_return @file
-      n = Neighborhoods.load_default
-      n.instances.first.ip.should == "127.0.0.1"
-    end
-  end
-end

data/spec/poolparty/poolparty/plugin_model_spec.rb

@@ -1,50 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-require File.dirname(__FILE__) + '/test_plugins/webserver'
-
-describe "Plugin" do
-  before(:each) do
-    reset!
-    @c = cloud :test_plugin_model_cloud do
-      apache_test do                
-        site("heady", {
-          :document_root => "/root"
-        })
-      end
-    end
-  end
-
-  describe "registered" do
-    before(:each) do
-      @plugin = @c.apache_test
-    end
-
-    it "be of the class apache_testtestClass on the Kernel" do
-      @plugin.class.should == PoolParty::Plugin::ApacheTest
-    end
-    it "should store the regsitered plugins in an array" do
-      @plugin.should_not be_nil
-    end
-    it "should have the plugin name as a method on the cloud " do
-      @c.respond_to?(:apache_test).should == true
-    end
-    
-    describe "methods" do
-      it "should call the enable_php method when in the defininition of the cloud" do
-        @plugin.respond_to?(:enable_php).should == true
-      end
-      it "should call php = true in the enable_php" do
-        @plugin.php.should == false
-        @plugin.enable_php
-        @plugin.php.should == true
-      end
-
-      it "should call the site method when in the defininition of the cloud" do
-        @plugin.respond_to?(:site).should == true
-      end
-      it "should be able to call the plugin method site" do
-        @plugin.should_receive(:virtual_host).with("hop", {:document_root => "/root"})
-        @plugin.virtual_host("hop", {:document_root => "/root"})
-      end
-    end
-  end
-end

data/spec/poolparty/poolparty/plugin_spec.rb

@@ -1,41 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-
-include PoolParty::Resources
-require File.dirname(__FILE__) + '/test_plugins/webserver'
-
-describe "Plugin" do
-  describe "wrapped" do
-    before(:each) do
-      reset!
-      cloud :app_for_plugin do
-        apache_test do
-          enable_php
-          site("heady", {
-            :document_root => "/root"
-          })
-        end
-        apache_test do
-          site("boob")
-        end
-      end
-      @plugin = clouds[:app_for_plugin].apache_test
-    end
-    it "should not be empty" do
-      clouds[:app_for_plugin].apache_test.class.should == ::PoolParty::Plugin::ApacheTest
-    end
-    it "should set loaded == true" do
-      clouds[:app_for_plugin].apache_test.loaded.should == true
-    end
-    it "should have enable_php as a method" do
-      ::PoolParty::Plugin::ApacheTest.new.respond_to?(:enable_php).should == true
-    end
-    it "should set enable_php" do
-      @plugin.enable_php.should == true
-    end
-    it "should store the plugin in the clouds plugin_store" do
-      clouds[:app_for_plugin].plugin_store[-2].class.should == @plugin.class
-      clouds[:app_for_plugin].apache_test
-      clouds[:app_for_plugin].plugin_store[-2].class.should == @plugin.class
-    end
-  end
-end

data/spec/poolparty/poolparty/pool_spec.rb

@@ -1,94 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-
-describe "Pool" do
-  before(:each) do
-    @obj = Object.new
-  end
-  it "should respond to the pool method" do
-    @obj.respond_to?(:pool).should == true
-  end
-  it "should store the pool in the global array" do
-    @p = pool :app do
-    end
-    @obj.pools[:app].should == @p
-  end
-    
-  describe "block" do
-    before(:each) do
-      @pool = Pool.new(:test) do
-        # Inside pool block
-        Proc.new {puts "hello world"}
-      end
-    end
-    
-    it "should be able to define a cloud within the pool block" do
-      @pool.respond_to?(:cloud).should == true
-    end
-    it "should evaluate the block when creating a new pool" do
-      Proc.should_receive(:new).at_least(1)
-      Pool.new(:test) do
-        Proc.new {puts "hi"}
-      end
-    end
-    describe "plugins" do
-      after(:each) do
-        @pool.instance_eval do
-          plugin_directory "yaway"
-        end
-      end
-      it "should call Dir when the plugin directory is set" do
-        ::File.should_receive(:directory?).with("yaway").once.and_return true
-        ::File.stub!(:directory?).and_return(false)
-        Dir.should_receive(:[]).with("yaway/*/*.rb").once.and_return []        
-      end
-    end
-    describe "configuration" do
-      before(:each) do
-        reset!
-        @pool = Pool.new :test do
-          expand_when "nails"
-        end
-      end
-      it "should set the plugin_directory to nails" do
-        @pool.expand_when.should == "nails"
-      end
-      describe "range for min/max instances" do
-        it "should be able to respond to instances" do
-          @pool.respond_to?(:instances).should == true
-        end
-        it "should be able to pass instances a range" do
-          lambda {
-            @pool.instance_eval do
-              instances 2..5
-            end
-          }.should_not raise_error
-        end
-        it "should set the minimum as the minimum_instances from the range" do
-          @pool.instance_eval do
-            instances 2..5
-          end
-          @pool.minimum_instances.should == 2
-        end
-        it "should set the maximum as the maximum_instances from the range" do
-          @pool.instance_eval do
-            instances 2..5
-          end
-          @pool.maximum_instances.should == 5
-        end
-      end
-    end  
-    describe "with clouds" do
-      before(:each) do
-        reset!
-        @pool = Pool.new :test do
-          cloud :app
-          cloud :db
-        end
-      end
-      it "should have 2 clouds in the pool when there are 2 described" do
-        @pool.clouds.size.should == 2
-      end
-    end
-    
-  end
-end

data/spec/poolparty/poolparty/resource_spec.rb

@@ -1,204 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-
-include PoolParty::Resources
-
-require File.dirname(__FILE__) + '/test_plugins/webserver'
-
-class MyResource < PoolParty::Resources::Resource
-  # Just to give some options for the test class
-  default_options(:a => 1,:b => 2,:c => 3)
-end
-describe "Resource" do
-
-  describe "wrapped" do
-    before(:each) do
-      @resource = MyResource.new({:a => 10}) do
-        b "90"
-      end
-    end
-    it "should set a from the hash" do
-      @resource.a.should == 10
-    end
-    it "should set b from within the block" do
-      @resource.b.should == "90"
-    end
-    it "should not wipe out the rest of the default options" do
-      @resource.c.should == 3    
-    end
-    describe "class methods" do
-      describe "available resources" do
-        before(:each) do 
-          @available = PoolParty::Resources::Resource.available_resources
-        end
-        it "should be an array" do
-          @available.class.should == Array
-        end
-        it "should not be empty" do
-          @available.empty?.should == false
-        end
-        it "should have some basic resources" do
-          @available.should include(PoolParty::Resources::Cron)
-          @available.should include(PoolParty::Resources::File)
-          @available.should include(PoolParty::Resources::Package)
-        end
-      end
-    end
-    describe "instance methods" do
-      before(:each) do
-        @resource = MyResource.new
-      end
-      %w(ensures is_present is_absent).each do |method|
-        eval <<-EOE
-          it "should have the method #{method} available" do; @resource.respond_to?(:#{method}).should == true; end
-        EOE
-      end
-
-      it "should be able to call ensures method on the resource" do
-        @resource.respond_to?(:ensures).should == true
-      end
-      it "should push the option ensure onto the options" do
-        @resource.dsl_options.has_key?(:ensures).should == false
-        @resource.ensures :absent
-        @resource.dsl_options.has_key?(:ensures).should == true
-      end
-      it "should write the option ensures as present with is_present" do
-        @resource.dsl_options.has_key?(:ensures).should == false
-        @resource.is_present
-        @resource.dsl_options.has_key?(:ensures).should == true
-      end
-      it "should write the option ensures as absent with is_absent" do
-        @resource.dsl_options.has_key?(:ensures).should == false
-        @resource.is_absent
-        @resource.dsl_options.has_key?(:ensures).should == true
-      end
-    end
-    describe "command" do
-      before(:each) do
-        @tc = TestBaseClass.new do
-          has_file(:name => "frank")
-        end
-        @cloud = @tc
-      end
-      describe "add_resource" do
-        it "should call add_resource when creating using the command: file" do
-          @cloud.should_receive(:add_resource).with(:file, {:name => "frank"})
-          @cloud.instance_eval do
-            __file(:name => "frank")
-          end
-        end
-        it "should return a resource when the resource does not exist" do
-          @cloud.resource(:file).first.class.should == PoolParty::Resources::File
-        end
-        it "should return a resource when the resource does exist" do
-          @cloud.instance_eval do
-            resources[:file] = nil
-            has_file({:name => "frank"})
-          end
-          @cloud.resource(:file).first.class.should == PoolParty::Resources::File
-        end
-      end
-      it "should create the new 'resource' as a resource" do
-        @tc.resource(:file).class.should == Array
-      end
-      it "should contain 3 instances after calling resource 3 times" do
-        @cloud.instance_eval do
-          resources[:file] = nil
-          has_file({:name => "red"})
-          has_file({:name => "hot"})
-          has_file({:name => "summer"})
-        end
-        @tc.resource(:file).size.should == 3
-      end
-      describe "adding" do
-        before(:each) do
-          @cloud.instance_eval do
-            resources[:file] = nil
-            has_file({:name => "red"})
-            has_file({:name => "hot"})
-            has_file({:name => "summer"})
-          end
-        end
-        it "should contain file named with 'red'" do
-          @cloud.get_resource(:file, "red").nil?.should == false
-        end
-      end
-      describe "method_missing" do
-        before(:each) do
-          @cloud.instance_eval do
-            resources[:file] = nil
-            has_file({:name => "red"})
-            has_file({:name => "hot"})
-            has_file({:name => "summer"})
-          end
-        end
-        it "should be able to pick out methods with the phrase has_" do
-          lambda {
-            @cloud.instance_eval do
-              has_file({:name => "summer"})
-            end
-          }.should_not raise_error
-        end
-        it "should pick out methods with the phrase does_not_" do
-          lambda {
-            @cloud.instance_eval do
-              does_not_have_file({:name => "summer"})
-            end
-          }.should_not raise_error
-        end
-      end
-      describe "get_resource" do
-        before(:each) do
-          @tc.instance_eval do
-            resources[:file] = nil
-            has_file(:name => "red")
-            has_file(:name => "hot")
-            has_file(:name => "tamales")
-          end
-        end
-        it "should return a type of resource when looking for a resource that exists" do
-          @tc.get_resource(:file, "hot").class.should == PoolParty::Resources::File
-        end
-        it "should return the resource of the name requested" do
-          @tc.get_resource(:file, "hot").name.should == "hot"
-        end
-        it "should return nil if the resource requested is not there" do
-          @tc.get_resource(:file, "smarties").nil?.should == true
-        end
-        it "should not have created any more resources" do
-          @tc.resource(:file).size.should == 3
-        end
-      end
-      describe "appending to resource" do
-        before(:each) do
-          @tc = TestBaseClass.new do
-            has_directory(:name => "/var/www") do
-              has_file(:name => "/var/www/file.html")
-            end
-          end
-          @dir = @tc.resource(:directory).first
-          @file = @tc.resource(:file).first
-        end
-        it "should say there is 1 resource because the lower-level resources should be contained on the parenting resource" do
-          @tc.resources.size.should == 2
-        end
-        it "should say there is one resource on the outer resource" do
-          @dir.resources.size.should == 2
-        end
-        it "should contain the file as a resource" do
-          @dir.resource(:file)[0].class.should == PoolParty::Resources::File
-        end
-      end
-      describe "fetching" do
-        before(:each) do
-          @tc = TestBaseClass.new do
-            has_file(:name => "pancakes")
-          end
-          @file = @tc.resource(:file).first
-        end
-        it "should return the file preiously created" do
-          @tc.resource(:file).first.dsl_options.keys.sort.should == @file.dsl_options.keys.sort
-        end
-      end
-    end    
-  end
-end

data/spec/poolparty/poolparty/script_spec.rb

@@ -1,46 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-
-include PoolParty::Resources
-
-describe "Script" do
-
-  describe "wrapped" do
-    it "should have inflate as a class method" do
-      Script.respond_to?(:inflate).should == true
-    end
-    it "should have inflate_file as an instance method" do
-      Script.respond_to?(:inflate_file).should == true
-    end
-
-    describe "with a script" do
-      # describe "save!" do
-      #   before(:each) do
-      #     reset!
-      # 
-      #     pool :appdotcomcool do
-      #       ami "ami-123456"
-      #       
-      #       cloud :app do
-      #         expand_when "cpu > 90", "memory > 80"
-      #         contract_when "cpu < 10", "memory < 10"
-      #         
-      #         has_file :name => "/etc/httpd/httpd.conf"
-      #       end
-      #     end
-      #     @saved = Script.save!(false)
-      #   end
-      #   it "should save the full keypair" do
-      #     @saved.should =~ /keypair ([\w -\/]+)+id_rsa'/
-      #   end
-      #   it "should save the ami" do
-      #     @saved.should =~ /ami 'ami-123456'/
-      #   end
-      #   it "should save the expansions" do
-      #     @saved.should =~ /expand_when 'cpu>90', 'memory>80'/
-      #   end
-      # end
-      # NOT ENTIRELY CERTAIN THIS SHOULD WORK THE SAME WAY IT WORKED BEFORE
-      # AL
-    end
-  end
-end

data/spec/poolparty/poolparty/service_spec.rb

@@ -1,5 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-
-describe "Service" do
-  
-end

data/spec/poolparty/poolparty/template_spec.rb

@@ -1,26 +0,0 @@
-require File.dirname(__FILE__) + '/../spec_helper'
-
-describe "Template" do
-  describe "of string" do
-    before(:each) do
-      @template_string = "Hello <%= name %>"
-    end
-    it "should have a method compile on Template class" do
-      Template.respond_to?(:compile_string).should == true
-    end
-    it "should return rendered content" do
-      Template.compile_string(@template_string, {:name => "bob"}).should == "Hello bob"
-    end
-  end
-  describe "of file" do
-    before(:each) do
-      @template_file = ::File.dirname(__FILE__) + "/../fixtures/test_template.erb"
-    end
-    it "have the method compile_file on the Template class" do
-      Template.respond_to?(:compile_file).should == true
-    end
-    it "return the rendered content into a string" do
-      Template.compile_file(@template_file, {:friends => "bob"}).should == "Hello bob"
-    end
-  end
-end

data/spec/poolparty/poolparty/test_plugins/sshkey_test

@@ -1,2 +0,0 @@
--- THIS IS A TEST SSH KEY FILE --
-

data/spec/poolparty/poolparty/test_plugins/webserver.rb

@@ -1,32 +0,0 @@
-module PoolParty
-  module Plugin
-    
-    class ApacheTest < Plugin
-      def loaded(o={}, &block)
-        @loaded ||= true
-      end
-
-      def enable
-      end
-
-      def enable_php
-        @php = true
-      end
-
-      def php
-        @php ||= false
-      end
-
-      def site(name=:domain1, opts={})
-        virtual_host name, opts
-      end
-
-      def virtual_host(name, opts={})
-        opts = {
-          :document_root => opts[:document_root] || "/www/#{name}/"
-        }
-      end
-    end
-    
-  end
-end

data/spec/poolparty/poolparty_base_class_spec.rb

@@ -1,84 +0,0 @@
-# MOVED TO A TEST
-
-# require File.dirname(__FILE__) + '/spec_helper'
-
-# describe "BaseClass" do
-#   describe "services" do
-#     before(:each) do
-#       reset!
-#       @tbc = TestBaseClass.new do
-#         has_git_repos :name => "test git", :at => "/var/www/google", :source => "git://pop.git"
-#       end
-#     end
-#     it "should add a service when a service is called" do
-#       @tbc.services.size.should == 1
-#     end
-#   end
-#   describe "context_stack" do
-#     before(:each) do
-#       ::PoolParty.reset!
-#       @a = TestBaseClass.new
-#     end
-#     it "should have a context stack that is empty" do
-#       @a.context_stack.empty?.should == true
-#     end
-#     it "should have a context_stack that is not empty when being evaluated" do
-#       TestBaseClass.new do
-#         context_stack.empty?.should == false
-#       end
-#     end
-#     it "should have self in context_stack" do
-#       TestBaseClass.new do
-#         context_stack.last.should == self
-#       end
-#     end
-#     it "should have the parent of self set in the context stack in the current_context" do
-#       TestBaseClass.new do
-#         current_context.last.should == parent
-#       end
-#     end
-#     describe "depth" do
-#       before(:each) do
-#         reset!
-#         Proc.new do 
-#           @a = $a =TestBaseClass.new do
-#             @@b = $b = TestBaseClass.new do
-#               @@c = $c =TestBaseClass.new do
-#               end
-#             end
-#           end
-#         end.call
-#       end
-#       it "should set the correct depth" do
-#         @a.depth.should == 0
-#         @@b.depth.should == 1
-#         @@c.depth.should == 2
-#       end
-#       it "should have the parent set properly" do
-#         # @a.parent.should == nil
-#         @@c.parent.should == @@b
-#         @@b.parent.should == @a
-#       end
-#       it "should have proper self" do
-#         @a.this.should == $a.this
-#       end
-#     end
-#   end
-#   it "should have the parent set properly" do
-#     @a = TestBaseClass.new do
-#       @@b = TestBaseClass.new do
-#         @@c = TestBaseClass.new do
-#         end
-#       end
-#     end
-#     
-#     @a.parent.should == nil
-#     @@c.parent.should == @@b
-#     @@b.parent.should == @a
-# 
-#     @a.parent.should == nil
-#     @@c.parent.should == @@b
-#     @@b.parent.should == @a
-#   end
-#   
-# end