poolparty 0.2.84 → 1.2.2

data/spec/poolparty/bin/console_spec.rb

@@ -6,7 +6,10 @@ reset!
 
 describe "Console" do
   before(:each) do
-    ::File.stub!(:readable?).with("pop").and_return true
+    ::File.stub!(:readable?).and_return true
+    Dir.stub!(:pwd).and_return "/flop"
+    Dir.stub!(:[]).and_return []
+    Dir.stub!(:[]).with("/flop/*/*.rb").and_return ["clouds.rb"]    
   end
   describe "load_pool" do
     before(:each) do
@@ -14,38 +17,22 @@ describe "Console" do
       @string =<<-EOS
       pool :app do
         maximum_instances 2
-        cloud :rawr do          
+        cloud :rawr do
+          maximum_instances 200
         end
       end
       EOS
       self.stub!(:open).and_return @string
       @string.stub!(:read).and_return @string
+      ::File.stub!(:readable?).with(@string).and_return true
     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
+      PoolParty::Pool::Pool.should_receive(:load_from_file).and_return "wee"
       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
@@ -65,6 +52,7 @@ describe "Console" do
       ::File.stub!(:readable?).with(@filename).and_return true
       @filename.stub!(:read).and_return "spec contents"
       self.stub!(:open).with(@filename).and_return @filename
+      Binary.stub!(:get_existing_spec_location).and_return @filename
     end
     it "should call readable on the string sent in to load_pool" do      
       lambda {
@@ -73,7 +61,7 @@ describe "Console" do
       }
     end
     it "should call inflate from Script with the poolspec" do
-      PoolParty::Script.should_receive(:inflate).with("spec contents", "myspec.spec")
+      PoolParty::Pool::Pool.should_receive(:load_from_file).with("myspec.spec").and_return true
       load_pool(@filename)
     end
   end
@@ -89,13 +77,7 @@ describe "Console" do
       EOS
       self.stub!(:open).and_return @string
       @string.stub!(:read).and_return @string
-      load_pool("pop")
+      PoolParty::Pool::Pool.new(:dummy).instance_eval @string
     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

@@ -23,9 +23,26 @@ describe "Array" do
       @array.to_os
     end
   end
-  describe "to_option_string" do
-    it "should map the to_option_strings in an array of strings" do
-      ["hi", "be"].to_option_string.should == "[ 'hi', 'be' ]"
+  require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+  describe "select_with_hash" do
+    before(:all) do
+      @remote_instances_list =[
+        {:status=>'running', :ip=>'10'}, 
+        {:status => 'pending', :ip=>'not.assigned'}, 
+        {:status=>'running', :ip=>'192', :bogus=>nil} 
+      ]
+    end
+    it "should return the selected array" do
+        @remote_instances_list.select_with_hash( {:status => 'running'}).size.should == 2
+        @remote_instances_list.select_with_hash( {:ip => 'not.assigned'}).should == [{:status => 'pending', :ip=>'not.assigned'},]
+        @remote_instances_list.select_with_hash( {:bogus => nil}).size.should == 1
+    end
+    it "should not raise an error if element does not have key" do
+      @remote_instances_list.select_with_hash( {:snot => 'runny'}).size.should == 0
+    end
+    it "should return all the instances if there are no values passed in" do
+      @remote_instances_list.select_with_hash.should == @remote_instances_list
     end
   end
 end

data/spec/poolparty/core/hash_spec.rb

@@ -24,42 +24,44 @@ describe "Hash" do
   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.sort.should == ["a => 10", "b => 'q'"]
-  end
-  it "should be able to flush out into a string into an array" do
-    @a.flush_out.sort.should == ["a => '10'","b => '20'","c => '30'"]
-  end
-  it "should be able to flush out with pre and posts" do
-    @a.flush_out("hi", "ho").sort.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
+  describe "method_missing" do
+    it "should be able to call a key on the hash as a method" do
+      {:first_name => "bob", :last_name => "frank"}.first_name.should == "bob"
     end
-    it "should only have the key a (selected)" do
-      @selected_hash.keys.should == [:a]
+    it "should return nil if there is no key set in the hash" do
+      lambda {{:first_name => "bob", :last_name => "frank"}.neighbor}.should raise_error
     end
   end
-  describe "extract!" do
+  describe "choose" 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]
+      @selected_hash = @a.choose {|k,v| k if k == :a}
     end
-    it "should return the old array with the other keys" do
-      @a.keys.sort.should == [:b, :c]
+    it "should return a hash when choosing" do
+      @selected_hash.class.should == Hash
     end
-    it "should not throw a fit with an empty hash" do
-      lambda {
-        {}.extract!
-      }.should_not raise_error
+    it "should only have the key a (choos)" do
+      @selected_hash.keys.should == [:a]
     end
   end
+  #TODO: deprecate
+  # 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.sort.should == [:b, :c]
+  #   end
+  #   it "should not throw a fit with an empty hash" do
+  # {}.extract!
+  #       lambda {
+  #       {}.extract!
+  #     }.should_not raise_error
+  #   end
+  # end
+ 
   describe "append" do
     before(:each) do
       @hash = {:game => "token", :required => "for_play"}

data/spec/poolparty/core/object_spec.rb

@@ -42,8 +42,7 @@ describe "Object" do
     describe "running" do
       before(:each) do
         Class.stub!(:default_options).and_return({})
-        Class.send :include, Configurable
-        Class.send :include, MethodMissingSugar
+        Class.send :include, Dslify
         @a = Class.new        
         @b = Class.new
         
@@ -59,7 +58,7 @@ describe "Object" do
     describe "contextual running" do
       before(:each) do
         @obj.stub!(:default_options).and_return {}
-        @a = @obj.run_in_context { @a = "hello world" }
+        @a = @obj.instance_eval { @a = "hello world" }
       end
       it "should have the method meta_eval" do
         @obj.respond_to?(:meta_eval).should == true

data/spec/poolparty/core/ordered_hash_spec.rb

@@ -0,0 +1,48 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "Ordered Hash" do
+  before(:each) do
+    @oh = OrderedHash.new
+    @oh["var1"] = 10
+    @oh["var2"] = 2
+    @oh[:var3] = 3
+    @oh["var4"] = 4
+  end
+  it "should stay in order in enumeration (keys)" do
+    @oh.collect {|k,v| k }.should == ["var1", "var2", :var3, "var4"]
+  end
+  it "should stay in order in enumeration (values)" do
+    @oh.collect {|k,v| v }.should == [10,2,3,4]
+  end
+  it "should be able to be pulled out with the hash convention" do
+    @oh['var1'].should == 10
+    @oh['var2'].should == 2
+    @oh[:var3].should == 3
+    @oh["var4"].should == 4
+  end
+  it "should retain order in a merge" do
+    @oh.merge!(:var5 => 5)
+    @oh.collect {|k,v| v }.should == [10,2,3,4,5]
+  end
+  it "should retain order in a non-descructive merge" do
+    @oh = @oh.merge(:var5 => 5)
+    @oh.collect {|k,v| v }.should == [10,2,3,4,5]
+  end
+  it "should keep the keys in order too!" do
+    @oh.keys.should == ["var1", "var2", :var3, "var4"]
+  end
+  it "should have values method" do
+    @oh.values.should === [10,2,3,4]
+  end
+  it "should to_json" do
+    @oh[:arr] = [1,2,3]
+    @oh.to_json.should == "{\"var1\":10,\"var2\":2,\"var3\":3,\"var4\":4,\"arr\":[1,2,3]}"
+  end
+  it "PoolParty Key" do
+      @oh[:key] = [Key.new, Key.new('path/to/nowhere')]
+      expected=<<JSO
+ {\"var1\":10,\"var2\":2,\"var3\":3,\"var4\":4,\"key\":[{\"basename\":\"id_rsa\",\"full_filepath\": \"/etc/poolparty/id_rsa\"},{\"basename\":\"path/to/nowhere\",\"full_filepath\": \"/etc/poolparty/path/to/nowhere\"}]}
+JSO
+      @oh.to_json.should == expected.strip
+  end
+end

data/spec/poolparty/core/string_spec.rb

@@ -119,33 +119,7 @@ listen web_proxy 127.0.0.1:3000
       "file".camelcase.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
-    it "should turn a resource into a requires file" do
-      @cloud = cloud :app do
-        file(:name => "franke")
-      end
-      @file = @cloud.resource(:file).first
-      @file.to_option_string.should == "File['franke']"
-    end
-    it "should turn a function into a string without quotes" do
-      "active_nodes()".to_option_string.should == "active_nodes()"
-    end
-    it "should turna function into a string outsid ethe quotes with a parameter" do
-      "active_nodes(10)".to_option_string.should == "active_nodes(10)"
-    end
-  end
+  
   describe "sanitize" do
     it "should remove the periods from the string" do
       "xnot.org".sanitize.should == "xnotorg"

data/spec/poolparty/dependencies_spec.rb

@@ -0,0 +1,11 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+include PoolParty
+describe "Dependencies" do
+  it "should have a method called dedependencies" do
+    Dependencies.respond_to?(:dependencies).should == true
+  end
+  it "should have a package(file) method" do
+    Dependencies.respond_to?(:package).should == true
+  end
+end

data/spec/poolparty/dependency_resolver/chef_resolver_spec.rb

@@ -0,0 +1,107 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "ChefResolver" do
+  before :all do
+    reset!
+    @cloud_reference_hash = {
+      :options => {:name => "dog", :keypair => "bob", :users => ["ari", "michael"]},
+      :resources => [
+        {:name => "/etc/motd", :content => "Welcome to the cloud", :pp_type => "file"},
+        {:name => "/etc/profile", :content => "profile info", :pp_type => "file"},
+        {:name => "/var/www", :pp_type => "directory"}
+      ],
+      :services => {
+        :apache => [{
+          :options => {:listen => "8080"},
+          :resources => [
+            {:name => "/etc/apache2/apache2.conf", :pp_type => "file", :template => "/absolute/path/to/template", :content => "rendered template string"}
+          ],
+          :services => {}
+        }]
+      }
+    }
+  end
+  
+  it "throw an exception if not given a hash" do
+    pending # odd error with should raise_error
+    # lambda { PoolParty::ChefResolver.compile }.should raise_error
+  end
+  it "accept a hash" do
+    lambda { PoolParty::ChefResolver.compile(@cloud_reference_hash)}.should_not raise_error
+  end
+  
+  describe "when passed a valid cloud hash" do
+    
+    before(:all) do
+      @dr = ChefResolver.new(@cloud_reference_hash)
+      @compiled = @dr.compile
+    end
+    
+    # describe "variables" do
+    #   it "output options as Chef variables" do
+    #     @compiled.should match(/bob/)
+    #     @compiled.instance_of?(String).should == true
+    #     @compiled.should match(/\$users = \[ \".* \]/)
+    #   end
+    # end
+    
+    describe "resources" do
+      it "should print resources in the proper layout" do
+        @compiled.should =~ /template "\/etc\/motd" do/
+      end
+    end
+    
+    describe "services" do
+      it "should print apache into a class definition" do
+        # puts "<pre>#{@compiled.to_yaml}</pre>"
+        # @compiled.should =~ /class apache \{/
+        pending
+      end
+    end
+    
+  end
+  
+  describe "with a cloud" do
+    before(:each) do
+      class ChefResolverSpec
+        plugin :apache do
+        end
+      end
+      @cloud = cloud :hope do
+        keypair "bob"
+        has_file :name => "/etc/motd", :content => "Welcome to the cloud"        
+        has_file :name => "/etc/profile", :content => "profile info"        
+        has_directory :name => "/var/www"
+        has_file :name => "/var/www/index.html", :content => "profile info", :requires => get_directory("/var/www")
+        # has_package :name => "bash"        
+        # parent == cloud
+        apache do
+          # parent == apache
+          listen "8080"
+          has_file :name => "/etc/apache2/apache2.conf", :template => "#{::File.dirname(__FILE__)}/../fixtures/test_template.erb", :friends => "bob"
+          has_exec :command => "ls /etc/apache2"
+        end
+      end
+      @properties = @cloud.to_properties_hash
+      
+      # puts "<pre>#{@cloud_reference_hash.to_yaml}\n\n#{@properties.to_yaml}</pre>"
+      @dr = ChefResolver.new(@properties)
+      @compiled = @dr.compile
+      # puts "---\n#{@compiled}"
+    end
+    it "should compile to a string" do
+      # puts "<pre>#{@compiled.to_yaml}</pre>"
+      @compiled.class.should == String
+    end
+    it "should include apache class" do
+      @compiled.should =~ /# apache/
+    end
+    it "should require the file to have the directory (written as file)" do
+      @compiled.should =~ /directory \"\/var\/www\" do/
+    end
+    after(:all) do
+      # ::FileUtils.rm_rf "/tmp/poolparty/dr_configure/"
+    end
+  end
+  
+end

data/spec/poolparty/dependency_resolver/dependency_resolver_cloud_extensions_spec.rb

@@ -0,0 +1,122 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+class DependencyResolverCloudExtensionsSpecBase < PoolParty::PoolPartyBaseClass
+  include Dslify
+end
+
+# files, directories, etc...
+class DependencyResolverSpecTestResource
+  include Dslify
+  include PoolParty::DependencyResolverResourceExtensions
+end
+
+# plugins, base_packages
+class DependencyResolverSpecTestService < DependencyResolverCloudExtensionsSpecBase
+  
+end
+
+# clouds, duh
+class DependencyResolverSpecTestCloud < DependencyResolverCloudExtensionsSpecBase
+end
+
+class JunkClassForDefiningPlugin
+  plugin :apache_plugin do
+    def loaded(o={},&block)
+    end
+  end  
+end
+
+describe "Resolution spec" do
+  before(:each) do
+    @apache_file = DependencyResolverSpecTestResource.new
+    @apache_file.name "/etc/apache2/apache2.conf"
+    @apache_file.template "/absolute/path/to/template"
+    @apache_file.content "rendered template string"
+    
+    @apache = DependencyResolverSpecTestService.new :apache_file
+    @apache.listen "8080"
+    @apache.resources[:file] = []
+    @apache.resources[:file] << @apache_file
+        
+    @cloud = DependencyResolverSpecTestCloud.new :cloud
+    @cloud.keypair "bob"
+    @cloud.name "dog"
+    
+    (@cloud.resources[:apache] ||= []) << @apache
+
+    @cloud_file_motd = DependencyResolverSpecTestResource.new
+    @cloud_file_motd.name "/etc/motd"
+    @cloud_file_motd.content "Welcome to the cloud"
+    
+    @cloud_file_profile = DependencyResolverSpecTestResource.new
+    @cloud_file_profile.name "/etc/profile"
+    @cloud_file_profile.content "profile info"
+        
+    @cloud.resources[:file] = []
+    @cloud.resources[:file] << @cloud_file_motd
+    @cloud.resources[:file] << @cloud_file_profile
+    
+    @cloud_directory_var_www = DependencyResolverSpecTestResource.new
+    @cloud_directory_var_www.name "/var/www"
+    
+    @cloud.resources[:directory] = []
+    @cloud.resources[:directory] << @cloud_directory_var_www    
+  end
+  it "be able to call to_properties_hash" do
+    @cloud.respond_to?(:to_properties_hash).should == true
+  end
+  describe "to_properties_hash" do
+    it "should output a hash" do
+      @cloud.to_properties_hash.class.should == Hash
+    end
+    it "should have resources on the cloud as an array of hashes" do      
+      @cloud.to_properties_hash[:resources].class.should == Array
+    end
+  end
+
+  describe "defined cloud" do
+    before(:each) do
+      reset!
+      ::File.stub!(:basename).and_return "template"
+      @file = "Hello <%= friends %> on port <%= listen %>"
+      @file.stub!(:read).and_return @file
+      Template.stub!(:open).and_return @file
+
+      cloud :dog_for_test do
+        keypair "bob"
+        has_file :name => "/etc/motd", :content => "Welcome to the cloud"
+        has_file :name => "/etc/profile", :content => "profile info"
+        has_directory :name => "/var/www"
+        has_package :name => "bash"
+        # parent == nil
+        apache_plugin do
+          # parent == TestClass
+          # puts "<pre>#{parent}</pre> on <pre>#{context_stack.map {|a| a.class }.join(", ")} from #{self.class}</pre>"
+          listen "8080"
+          has_file :name => "/etc/apache2/apache2.conf", :template => "/absolute/path/to/template", :friends => "bob", :render_as => :erb
+        end
+      end
+      @cloud = clouds[:dog_for_test]
+      @properties = @cloud.to_properties_hash
+      @apache_key = @properties[:resources].select {|hsh| hsh[:name] =~ /apache/ }.first
+    end
+    
+    it "should have the method to_properties_hash on the cloud" do
+      @cloud.respond_to?(:to_properties_hash).should == true
+    end
+    it "should have resources on the cloud as an array of hashes" do
+      # puts "<pre>#{cloud(:dog).to_properties_hash.to_yaml}</pre>"
+      @properties[:resources].class.should == Array
+    end
+    it "contain content in the template's hash" do
+      @apache_key.resources.select_with_hash(:pp_type => "file").last[:content].should == "Hello bob on port 8080"
+    end
+    it "contain the files in a hash" do
+      # puts "<pre>#{@properties.to_yaml}</pre>"
+      @properties[:resources].select {|a| a[:name] == "/etc/motd" }.first.nil?.should == false
+    end
+    it "contain the directory named /var/www" do
+      @properties[:resources].select {|a| a[:name] == "/var/www" }.first.nil?.should == false
+    end
+  end
+end

data/spec/poolparty/dependency_resolver/dependency_resolver_spec.rb

@@ -0,0 +1,16 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "Resolution spec" do
+  before(:each) do
+    @dr = DependencyResolver.new({})
+    DependencyResolver.stub!(:new).and_return @dr
+  end
+  
+  it "should have a tree_hash associated with the resolver" do
+    @dr.properties_hash.should == {}
+  end
+  it "runs compile on a new object when calling compile on the class" do    
+    @dr.should_receive(:compile)
+    DependencyResolver.compile(hash)
+  end
+end

data/spec/poolparty/dependency_resolver/puppet_resolver_spec.rb

@@ -0,0 +1,121 @@
+# MOVED TO A TEST
+# require File.dirname(__FILE__) + '/../spec_helper'
+# 
+# describe "PuppetResolver" do
+#   before :all do
+#     reset!
+#     @cloud_reference_hash = {
+#       :options => {:name => "dog", :keypair => "bob", :users => ["ari", "michael"]},
+#       :resources => [
+#         {:name => "/etc/motd", :content => "Welcome to the cloud", :pp_type => "file"},
+#         {:name => "/etc/profile", :content => "profile info", :pp_type => "file"},
+#         {:name => "/var/www", :pp_type => "directory"}
+#       ],
+#       :services => {
+#         :apache => [{
+#           :options => {:listen => "8080"},
+#           :resources => [
+#             {:name => "/etc/apache2/apache2.conf", :pp_type => "file", :template => "/absolute/path/to/template", :content => "rendered template string"}
+#           ],
+#           :services => {}
+#         }]
+#       }
+#     }
+#   end
+#   
+#   it "throw an exception if not given a hash" do
+#     pending # odd error with should raise_error
+#     # lambda { PoolParty::PuppetResolver.compile }.should raise_error
+#   end
+#   it "accept a hash" do
+#     lambda { PoolParty::PuppetResolver.compile(@cloud_reference_hash)}.should_not raise_error
+#   end
+#   
+#   describe "when passed a valid cloud hash" do
+#     
+#     before(:all) do
+#       reset!
+#       @dr = PuppetResolver.new(@cloud_reference_hash)
+#       @compiled = @dr.compile
+#     end
+#     
+#     # describe "variables" do
+#     #   it "output options as puppet variables" do
+#     #     @compiled.should match(/bob/)
+#     #     @compiled.instance_of?(String).should == true
+#     #     @compiled.should match(/\$users = \[ \".* \]/)
+#     #   end
+#     # end
+#     
+#     describe "resources" do
+#       it "should print resources in the proper layout" do        
+#         @compiled.should =~ /file \{ "\/etc\/motd"/
+#       end
+#     end
+#     
+#     describe "services" do
+#       it "should print apache into a class definition" do
+#         # puts "<pre>#{@compiled.to_yaml}</pre>"
+#         @compiled.should =~ /class apache \{/
+#       end
+#     end
+#     
+#   end
+#   
+#   describe "with a cloud" do
+#     before(:each) do
+#       class PuppetResolverSpec
+#         plugin :apache do
+#         end
+#       end
+#       # reset!
+#       @cloud = cloud :hope do
+#         keypair "bob"
+#         has_file :name => "/etc/motd", :content => "Welcome to the cloud"        
+#         has_file :name => "/etc/profile", :content => "profile info"        
+#         
+#         has_directory :name => "/var/www"
+#         has_file :name => "/var/www/index.html", :content => "profile info", :requires => get_directory("/var/www")
+#         
+#         dependency_resolver "puppet"
+#         # has_package :name => "bash"        
+#         # parent == cloud
+#         apache do
+#           # parent == apache
+#           listen "8080"
+#           has_file :name => "/etc/apache2/apache2.conf", :template => "#{::File.dirname(__FILE__)}/../fixtures/test_template.erb", :friends => "bob"
+#           has_exec :command => "ls /etc/apache2"
+#         end
+#         
+#         case_of "hostname" do
+#           when_is 'master' do            
+#             has_package :name=>'haproxy'
+#           end
+#         end
+#       end
+#       @properties = @cloud.to_properties_hash
+#       
+#       # puts "<pre>#{@cloud_reference_hash.to_yaml}\n\n#{@properties}</pre>"
+#       @dr = PuppetResolver.new(@properties)
+#       @compiled = @dr.compile
+#     end
+#     it "should compile to a string" do
+#       # puts "<pre>#{@compiled.to_yaml}</pre>"
+#       @compiled.class.should == String
+#     end
+#     it "should include apache class" do
+#       @compiled.should =~ /class apache \{/
+#     end
+#     it "should include the case statement" do
+#       @compiled.should =~ /case \$hostname \{/
+#       @compiled.should =~ /master : \{/
+#     end
+#     it "should require the file to have the directory (written as file)" do
+#       @compiled.should =~ /require => File\[\"\/var\/www\"\]/
+#     end
+#     it "should ensure file" do
+#       @compiled.should =~ /ensure => "present"/      
+#     end
+#   end
+#   
+# end