warningshot 0.9.4

data/test/spec/spec_helper.rb

@@ -0,0 +1,11 @@
+require 'lib/warningshot'
+
+$test_data  = "." / "test" / "data"
+$log_root   = "." / "test" / "log"
+$log_file   = $log_root / 'warningshot.log'
+
+FileUtils.mkdir_p $log_root
+
+$logger = Logger.new $log_file
+$logger.formatter = WarningShot::LoggerFormatter.new
+$logger.level     = Logger::DEBUG

data/test/spec/unit/resolvers/core_lib_resolver_spec.rb

@@ -0,0 +1,39 @@
+require "." / "lib" / "resolvers" / "core_lib_resolver"
+
+describe WarningShot::CoreLibResolver do
+  before :all do
+    WarningShot::CoreLibResolver.logger = $logger
+  end
+  
+  
+  it 'should have tests registered' do
+    WarningShot::CoreLibResolver.tests.empty?.should be(false)
+  end
+  
+  it 'should not have resolutions registered' do
+    WarningShot::CoreLibResolver.resolutions.empty?.should be(true)
+  end
+  
+  it 'should increment #errors for unloadable core libs' do
+    cld = WarningShot::CoreLibResolver.new 'bogus_core_lib_name'
+    cld.test!
+    
+    cld.failed.length.should be(1)
+  end
+  
+  it 'should be able to unload file references from $"' do
+    @originals = $".clone
+    require 'observer'
+    WarningShot::CoreLibResolver.unload(($" - @originals))
+    require('observer').should be(true)
+  end
+  
+  it 'should be able to purge classes from memory' do
+    @original_classes = Symbol.all_symbols
+    WarningShot::CoreLibResolver.purge true
+    require 'observer'
+    WarningShot::CoreLibResolver.purge_classes((Symbol.all_symbols - @original_classes))
+    defined?(Observer).should be(nil)
+  end
+  
+end

data/test/spec/unit/resolvers/directory_resolver_spec.rb

@@ -0,0 +1,39 @@
+require "." / "lib" / "resolvers" / "directory_resolver"
+
+describe WarningShot::DirectoryResolver do
+  before :all do
+    WarningShot::DirectoryResolver.logger = $logger
+    
+    @@base_path = File.expand_path("." / "test" / "data" / "resolvers" / "directory")
+  end
+  
+  after :each do
+    FileUtils.rm_rf @@base_path
+  end
+
+  it 'should have tests registered' do
+    WarningShot::DirectoryResolver.tests.empty?.should be(false)
+  end
+
+  it 'should have resolutions registered' do
+    WarningShot::DirectoryResolver.resolutions.empty?.should be(false)
+  end
+  
+  describe 'with resolutions enabled & with resolution instructions' do
+
+    it 'should create the directory if it does not exist' do      
+      control_dir = File.expand_path('.')
+      test_dir1 = @@base_path / 'test1'
+      test_dir2 = @@base_path / 'test2'
+      resolver = WarningShot::DirectoryResolver.new control_dir,test_dir1, test_dir2
+      resolver.test!
+      resolver.passed.length.should be(1)
+      resolver.failed.length.should be(2)
+      
+      resolver.resolve!
+      resolver.resolved.length.should be(2)
+      File.directory?(test_dir1).should be(true)
+      File.directory?(test_dir2).should be(true)        
+    end      
+  end # End healing enabled, instructions provided
+end

data/test/spec/unit/resolvers/file_resolver_spec.rb

@@ -0,0 +1,134 @@
+require "." / "lib" / "resolvers" / "file_resolver"
+
+describe WarningShot::FileResolver do
+  before :all do
+    WarningShot::FileResolver.logger = $logger
+
+    @@base_path = File.expand_path("." / "test" / "data" / "resolvers" / "file")
+    @@source_path   = @@base_path / 'src'
+    @@dest_path     = @@base_path / 'dest'
+    FileUtils.mkdir_p @@dest_path
+  end
+  
+  before :each do
+    FileUtils.mkdir_p @@dest_path
+  end
+
+  after :each do
+    FileUtils.rm_rf @@dest_path
+  end
+
+  it 'should have tests registered' do
+    WarningShot::FileResolver.tests.empty?.should be(false)
+  end
+
+  it 'should have resolutions regsitered' do
+    WarningShot::FileResolver.resolutions.empty?.should be(false)
+  end
+    
+  it 'should treate relative paths as from directory specified by WarningShot::Config[:application]' do
+    pending
+  end
+   
+  describe 'with healing enabled' do
+    describe 'with heal instructions' do
+      describe 'file does not exist' do
+        it 'should add failed dependencies to #failed' do
+          that_file = @@source_path / 'that.txt'
+          this_file = @@dest_path / 'this.txt'
+          
+          fd = WarningShot::FileResolver.new({:source  => "file://#{that_file}",:target => this_file})
+          fd.test!
+          
+          fd.failed.length.should be(1)
+        end 
+        
+        it 'should heal a file from file://' do
+          that_file = @@source_path / 'that.txt'
+          this_file = @@dest_path / 'this.txt'
+          
+          fd = WarningShot::FileResolver.new({:source  => "file://#{that_file}",:target => this_file})
+          fd.test!
+          fd.failed.length.should be(1)
+          fd.resolve!
+          fd.resolved.length.should be(1)
+        end
+        
+        it 'should heal a file from http://' do
+          fd = WarningShot::FileResolver.new({:source  => "http://www.example.com/",:target => (@@dest_path / 'internetz.html')})
+          fd.test!
+          fd.failed.length.should be(1)
+          fd.resolve!
+          fd.resolved.length.should be(1)
+        end
+        
+        it 'should be able to verify the root ca and peer when healing over https' do
+          pending
+        end
+                
+        it 'should not increment #resolved if the resolution fails' do
+          fd = WarningShot::FileResolver.new({:source  => "http://www.example.com/DOESNT.EXIST",:target => (@@dest_path / 'doesnt_exist.html')})
+          fd.test!
+          fd.failed.length.should be(1)
+          fd.resolve!
+          fd.failed.length.should_not be(2)
+        end
+      end # End healing enabled, instructions provided, file does not exists
+    end # End healing enabled, instructions provided
+    
+    describe 'without heal instructions' do
+      it 'should be able to return unresolved dependencies' do
+        this_file = @@dest_path / 'this.txt'
+        
+        fd = WarningShot::FileResolver.new({:target => this_file})
+        fd.test!
+        fd.resolve!
+        fd.unresolved.length.should be(1)
+
+        fd = WarningShot::FileResolver.new this_file
+        fd.test!
+        fd.resolve!
+        fd.unresolved.length.should be(1)
+      end
+      
+      describe 'file does not exist' do 
+        it 'should add dependency to #failed' do
+          this_file = @@dest_path / 'this.txt'
+
+          fd = WarningShot::FileResolver.new({:target => this_file})
+          fd.test!
+          fd.failed.length.should be(1)
+          fd.resolve!
+          fd.unresolved.length.should be(1)
+        end
+      end # End healing enabled, instructions not provided, file does not exists
+    end # End healing enabled, instructions not provided
+  end # End healing enabled
+  
+  describe 'with healing disabled' do
+    describe 'with heal instructions' do      
+      describe 'file does not exist' do 
+        it 'should add dependency to #failed' do
+          that_file = @@source_path / 'that.txt'
+          this_file = @@dest_path / 'this.txt'
+
+          fd = WarningShot::FileResolver.new({:target => this_file,:source => that_file})
+          fd.test!
+          fd.failed.length.should be(1)
+        end
+      end # End healing disabled, instructions provided, file does not exists
+    end
+    
+    describe 'without heal instructions' do      
+      describe 'file does not exist' do 
+        it 'should add dependency to #failed' do
+          this_file = @@dest_path / 'this.txt'
+
+          fd = WarningShot::FileResolver.new({:target => this_file})
+          fd.test!
+          fd.failed.length.should be(1)
+        end
+      end # End healing disabled, instructions not provided, file does not exists
+    end # End healing disabled, instructions not provided
+  end # End healing disabled
+end

data/test/spec/unit/resolvers/gem_resolver_spec.rb

@@ -0,0 +1,74 @@
+#Note, this fails if the gem yard is already installed, which sucks.  Waiting on rubyforge to
+# approve ws-dummy gem
+
+require "." / "lib" / "resolvers" / "gem_resolver"
+require 'fileutils'
+describe WarningShot::GemResolver do
+  before :all do
+    WarningShot::GemResolver.logger = $logger
+    
+    FileUtils.rm_rf "./test/output/gems"
+  end
+  
+  after :all do
+    FileUtils.rm_rf "./test/output/gems"
+  end
+
+  it 'should have tests registered' do
+    WarningShot::GemResolver.tests.empty?.should be(false)
+  end
+
+  it 'should have resolutions registered' do
+    WarningShot::GemResolver.resolutions.empty?.should be(false)
+  end
+  
+  it 'should provide the command line option gem_path' do
+    WarningShot.parser.to_s.include?("Alternate gem path ':' separated to check.  First in path is where gems will be installed").should be(true)
+    WarningShot::Config.configuration.key?(:gem_path).should be(true)
+  end
+  
+  it 'should provide the command line option minigems' do
+    WarningShot.parser.to_s.include?("Not supported yet.").should be(true)
+    WarningShot::Config.configuration.key?(:minigems).should be(true)
+  end
+  
+  it 'should override Gem.path if gem_path is given' do
+    WarningShot::Config.configuration[:gem_path] = "./test/output/gems:./test/outputs/gems2"
+    WarningShot::GemResolver.load_paths
+    
+    Gem.path[0].should == "./test/output/gems"
+    Gem.path[1].should == "./test/outputs/gems2"
+  end
+  
+  it 'should be able to determine if a gem is installed' do
+    resolver = WarningShot::GemResolver.new({:name => "rake"},{:name => "rspec",:version => ">=1.1.4"})
+    resolver.test!
+    
+    resolver.passed.size.should be(2)
+  end
+    
+  # The gem name is the healing instructions, so if its provide, there
+  #   are instructions 
+  it 'should install the gems when healing is enabled' do
+    resolver = WarningShot::GemResolver.new({:name => "yard"})
+    resolver.test!
+    
+    resolver.failed.size.should be(1)
+    
+    resolver.resolve!
+    resolver.resolved.size.should be(1)
+  end
+  
+  it 'should check for gems in --gempath when specified' do
+    pending
+  end
+  
+  it 'should install gems in --gempath when specified and resolving' do
+    pending
+  end
+    
+  it 'should use warningshot_dummy instead of the gems listed above' do
+    #it should also uninstall it before :all and after :all
+    pending
+  end
+end

data/test/spec/unit/resolvers/integrity_resolver_spec.rb

@@ -0,0 +1,103 @@
+require "." / "lib" / "resolvers" / "integrity_resolver"
+
+describe WarningShot::IntegrityResolver do
+  before :all do
+    WarningShot::IntegrityResolver.logger = $logger
+
+    @@base_path   = File.expand_path("." / "test" / "data" / "resolvers" / "file")
+    @@source_path = @@base_path / 'src'
+  end
+  
+  it 'should have tests registered' do
+    WarningShot::IntegrityResolver.tests.empty?.should be(false)
+  end
+
+  it 'should not have resolutions registered' do
+    WarningShot::IntegrityResolver.resolutions.empty?.should be(true)
+  end
+  
+  it 'should be able to verify a sha1 digest' do
+
+    that_file = @@source_path / 'that.txt'
+    #These values are flipped from FileResolverRspec so that we dont
+    # have to resolve the file dependency to check the integrity
+    resolver = WarningShot::IntegrityResolver.new({
+      :target => "file://#{that_file}",
+      :source => "",
+      :sha1 => "e87c9091b6f6d30d1a05d66de1acbac6e1998121"
+    })
+    
+    resolver.test!
+    resolver.failed.length.should be(0)    
+  end
+  
+  it 'should be able to determine if a sha1 digest is wrong' do
+    that_file = @@source_path / 'that.txt'
+    #These values are flipped from FileResolverRspec so that we dont
+    # have to resolve the file dependency to check the integrity
+    resolver = WarningShot::IntegrityResolver.new({
+      :target => "file://#{that_file}",
+      :source => "",
+      :sha1 => "WRONG"
+    })
+    
+    resolver.test!
+    resolver.failed.length.should be(1)
+  end
+  
+  it 'should be able to determine if an md5 digest is wrong' do
+    that_file = @@source_path / 'that.txt'
+    #These values are flipped from FileResolverRspec so that we dont
+    # have to resolve the file dependency to check the integrity
+    resolver = WarningShot::IntegrityResolver.new({
+      :target => "file://#{that_file}",
+      :source => "",
+      :md5 => "WRONG"
+    })
+    
+    resolver.test!
+    resolver.failed.length.should be(1)
+  end
+  
+  it 'should be able to verify a md5 digest' do
+    that_file = @@source_path / 'that.txt'
+    #These values are flipped from FileResolverRspec so that we dont
+    # have to resolve the file dependency to check the integrity
+    resolver = WarningShot::IntegrityResolver.new({
+      :target => "file://#{that_file}",
+      :source => "",
+      :md5 => "db59da6066bab8885569c012b1f6b173"
+    })
+    
+    resolver.test!
+    resolver.failed.length.should be(0)
+  end
+  
+  it 'should use sha1 if md5 and sha1 are given' do
+    that_file = @@source_path / 'that.txt'
+    #These values are flipped from FileResolverRspec so that we dont
+    # have to resolve the file dependency to check the integrity
+    resolver = WarningShot::IntegrityResolver.new({
+      :target => "file://#{that_file}",
+      :source => "",
+      :md5 => "WRONG",
+      :sha1 => "e87c9091b6f6d30d1a05d66de1acbac6e1998121"
+    })
+    
+    resolver.test!
+    resolver.failed.length.should be(0)
+  end
+  
+  it 'should be silent if a digest isnt given' do
+    that_file = @@source_path / 'that.txt'
+    #These values are flipped from FileResolverRspec so that we dont
+    # have to resolve the file dependency to check the integrity
+    resolver = WarningShot::IntegrityResolver.new({
+      :target => "file://#{that_file}",
+      :source => ""
+    })
+    
+    resolver.test!
+    resolver.failed.length.should be(0)
+  end
+end

data/test/spec/unit/resolvers/manual_resolver_spec.rb

@@ -0,0 +1,17 @@
+require "." / "lib" / "resolvers" / "manual_resolver"
+
+describe WarningShot::ManualResolver do
+  before :all do
+    WarningShot::ManualResolver.logger = $logger
+  end
+  
+  it 'should have tests registered' do
+    WarningShot::ManualResolver.tests.empty?.should be(false)
+  end
+
+  it 'should have resolutions registered' do
+    WarningShot::ManualResolver.resolutions.empty?.should be(true)
+  end
+
+  #Does this need any further test?
+end

data/test/spec/unit/resolvers/permission_resolver_spec.rb

@@ -0,0 +1,56 @@
+require '.' / 'lib' / 'resolvers' / 'permission_resolver'
+
+describe WarningShot::PermissionResolver do
+  before :all do
+    WarningShot::PermissionResolver.logger = $logger
+  end
+
+  it 'should have tests registered' do
+    WarningShot::PermissionResolver.tests.empty?.should be(false)
+  end
+
+  it 'should have resolutions registered' do
+    WarningShot::PermissionResolver.resolutions.empty?.should be(false)
+  end
+  
+  it 'should be able to determine if the user permission is correct' do
+    _file   = $test_data / 'permission_test.txt'
+    _file2  = $test_data / 'permission_test.fake'
+    
+    resolver = WarningShot::PermissionResolver.new({
+      :path => _file,       :mode   => '0755', 
+      :user => 'www-data',  :group  => 'www-data', 
+      :recursive => "none"
+    })
+    
+    resolver2 = WarningShot::PermissionResolver.new({
+      :path => _file2,      :mode   => '0755', 
+      :user => 'www-data',  :group  => 'www-data', 
+      :recursive => "none"
+    })
+      
+    pending
+  end
+  
+  it 'should be able to determine if the group permission is correct' do
+    pending
+  end
+  
+  it 'should be able to determine if the mode is correct' do
+    pending
+  end
+  
+  describe 'with healing enabled and with healing instructions' do
+    it 'should be able to correct the user' do
+      pending
+    end
+    
+    it 'should be able to correct the group' do
+      pending
+    end
+    
+    it 'should be able to correct the mode' do
+      pending
+    end
+  end
+end

data/test/spec/unit/resolvers/symlink_resolver_spec.rb

@@ -0,0 +1,44 @@
+require "." / "lib" / "resolvers" / "symlink_resolver"
+
+describe WarningShot::SymlinkResolver do
+  before :all do
+    WarningShot::SymlinkResolver.logger = $logger 
+    
+    @@data_path = File.expand_path("." / "test" / "data")
+    @@base_path = File.expand_path("." / "test" / "data" / "resolvers" / "symlink")
+  end
+  
+  before :each do
+    FileUtils.mkdir_p @@base_path
+  end
+
+  after :each do
+    FileUtils.rm_rf @@base_path
+  end
+
+  it 'should have tests registered' do
+    WarningShot::SymlinkResolver.tests.empty?.should be(false)
+  end
+
+  it 'should have resolutions registered' do
+    WarningShot::SymlinkResolver.resolutions.empty?.should be(false)
+  end
+     
+  describe 'with healing enabled & with heal instructions' do
+    it 'should create a symlink' do
+
+      symlink_dep = {
+        :source => @@data_path / 'mock_resolver.rb',
+        :target => @@base_path / 'linked_mock_resolver.rb'
+      }
+      resolver = WarningShot::SymlinkResolver.new symlink_dep
+      
+      resolver.test!
+      resolver.failed.length.should be(1)
+      resolver.resolve!
+      resolver.resolved.length.should be(1)
+      
+      File.symlink?(symlink_dep[:target]).should be(true)
+    end
+  end # End healing enabled, instructions provided
+end

data/test/spec/unit/resolvers/url_resolver_spec.rb

@@ -0,0 +1,64 @@
+require '.' / 'lib' / 'resolvers' / 'url_resolver'
+
+describe WarningShot::UrlResolver do
+  before :all do    
+    WarningShot::UrlResolver.logger = $logger 
+  end
+
+  it 'should have tests registered' do
+    WarningShot::UrlResolver.tests.empty?.should be(false)
+  end
+
+  it 'should have resolutions registered' do
+    WarningShot::UrlResolver.resolutions.empty?.should be(true)
+  end
+
+  it 'should extend the command line interface' do
+    WarningShot.parser.to_s.include?("Success is only for 200 instead of 2xx").should be(true)    
+    WarningShot.parser.to_s.include?("SSL Verify Peer Depth").should be(true)    
+    WarningShot.parser.to_s.include?("Path to root ca certificate").should be(true)    
+  end
+
+  it 'should be able to determine if an http address is reachable' do
+    resolver = WarningShot::UrlResolver.new "http://example.com"
+    resolver.test!
+    resolver.failed.length.should be(0)
+  end
+  
+  it 'should be able to determine if an https address is reachable' do
+    #Yeah, what https page to use, huh?
+    resolver = WarningShot::UrlResolver.new "https://www.google.com/analytics/home/"
+    resolver.test!
+    resolver.failed.length.should be(0)
+  end
+  
+  it 'should be able to determine if an http address is unreachable' do
+    resolver = WarningShot::UrlResolver.new "http://example.com", "http://127.0.0.1:31337"
+    resolver.test!
+    resolver.failed.length.should be(1)
+    resolver.passed.length.should be(1)
+  end
+  
+  it 'should be able to determine if an https address is unreachable' do
+    resolver = WarningShot::UrlResolver.new "https://www.google.com/analytics/home/", "https://127.0.0.1:31337"
+    resolver.test!
+    resolver.failed.length.should be(1)
+    resolver.passed.length.should be(1)
+  end
+    
+  it 'should be able to receive --strict from the command line' do
+    WarningShot::Config.configuration[:url_strict] = true
+    WarningShot::Config.configuration[:url_strict].should be(true)
+    
+    #google redirects, ever heard of no-www.org?
+    resolver = WarningShot::UrlResolver.new "http://example.com","http://google.com"
+
+    resolver.test!
+    resolver.failed.length.should be(1)
+    resolver.passed.length.should be(1)
+  end
+  
+  it 'should be able to verify CA certificate and peer' do
+    pending
+  end
+end

data/test/spec/unit/warning_shot/config_spec.rb

@@ -0,0 +1,35 @@
+describe WarningShot::Config do
+  
+  it 'should provide access to configuration' do
+    WarningShot::Config.respond_to? :configuration
+  end
+  
+  it 'should be able to parse an ARGV string' do
+    args = ['--no-verbose','--resolve','--environment=rspec_test','-g','-aRspecTest']
+    WarningShot::Config.parse_args(args)
+    WarningShot::Config.configuration[:verbose].should be(false)
+    WarningShot::Config.configuration[:resolve].should be(true)
+    WarningShot::Config.configuration[:environment].should == 'rspec_test'
+    WarningShot::Config.configuration[:growl].should be(true)
+    WarningShot::Config.configuration[:application].should == 'RspecTest'
+  end
+  
+  it 'should provide defaults' do
+    WarningShot::Config.defaults.class.should be(Hash)
+  end
+  
+  it 'should allow access like a hash' do
+    WarningShot::Config.respond_to?(:[]).should be(true)
+    WarningShot::Config.respond_to?(:[]=).should be(true)
+  end
+  
+  it 'should allow configurations to be changed with a block' do
+    WarningShot::Config.use do|c|
+      c[:growl] = true
+      c[:resolve]= true
+    end
+    
+    WarningShot::Config[:growl].should be(true)
+    WarningShot::Config[:resolve].should be(true)
+  end
+end

data/test/spec/unit/warning_shot/dependency_resolver_spec.rb

@@ -0,0 +1,43 @@
+describe WarningShot::DependencyResolver do
+  before :all do
+    @config = {
+      :config_paths => [$test_data],
+      :environment => 'rspec',
+      :log_path => $log_file
+    }
+    
+  end
+  
+  it 'should accept a glob to find config files' do
+    # Consider taking a glob instead of a set of paths
+    pending
+  end
+  
+  it 'should create a dependency tree from a set of config files' do
+    @config = {
+      :config_paths => [$test_data],
+      :environment => 'rspec',
+      :log_path => $log_file
+    }
+    
+    dr = WarningShot::DependencyResolver.new(@config)
+    
+    dr.dependency_tree[:mock].empty?.should be(false)
+    dr.dependency_tree[:mock].class.should be(Array)
+    dr.dependency_tree[:mock].size.should == 10
+
+    dr.dependency_tree.key?(:faux).should be(true)
+    dr.dependency_tree[:faux].empty?.should be(true)        
+  end
+  
+  it 'should respond to #stats' do
+    dr = WarningShot::DependencyResolver.new(@config)
+    dr.respond_to?(:stats).should be(true)
+    dr.stats.class.should be(Hash)
+  end
+  
+  it 'should be able to run a set of resolvers' do
+    pending
+  end
+  
+end