test-kitchen 1.3.1 → 1.4.0.beta.1

data/spec/kitchen/verifier/dummy_spec.rb

@@ -0,0 +1,91 @@
+# -*- encoding: utf-8 -*-
+#
+# Author:: Fletcher Nichol (<fnichol@nichol.ca>)
+#
+# Copyright (C) 2015, Fletcher Nichol
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#    http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+
+require_relative "../../spec_helper"
+
+require "logger"
+require "stringio"
+
+require "kitchen/verifier/dummy"
+
+describe Kitchen::Verifier::Dummy do
+
+  let(:logged_output) { StringIO.new }
+  let(:logger)        { Logger.new(logged_output) }
+  let(:platform)      { stub(:os_type => nil, :shell_type => nil) }
+  let(:suite)         { stub(:name => "fries") }
+  let(:state)         { Hash.new }
+
+  let(:config) do
+    { :test_base_path => "/basist", :kitchen_root => "/rooty" }
+  end
+
+  let(:instance) do
+    stub(
+      :name => "coolbeans",
+      :to_str => "instance",
+      :logger => logger,
+      :suite => suite,
+      :platform => platform
+    )
+  end
+
+  let(:verifier) do
+    Kitchen::Verifier::Dummy.new(config).finalize_config!(instance)
+  end
+
+  describe "configuration" do
+
+    it "sets :sleep to 0 by default" do
+      verifier[:sleep].must_equal 0
+    end
+
+    it "sets :random_failure to false by default" do
+      verifier[:random_failure].must_equal false
+    end
+  end
+
+  describe "#call" do
+
+    it "calls sleep if :sleep value is greater than 0" do
+      config[:sleep] = 12.5
+      verifier.expects(:sleep).with(12.5).returns(true)
+
+      verifier.call(state)
+    end
+
+    it "raises ActionFailed if :fail is set" do
+      config[:fail] = true
+
+      proc { verifier.call(state) }.must_raise Kitchen::ActionFailed
+    end
+
+    it "randomly raises ActionFailed if :random_failure is set" do
+      config[:random_failure] = true
+      verifier.stubs(:randomly_fail?).returns(true)
+
+      proc { verifier.call(state) }.must_raise Kitchen::ActionFailed
+    end
+
+    it "logs a converge event to INFO" do
+      verifier.call(state)
+
+      logged_output.string.must_match(/^.+ INFO .+ \[Dummy\] Verify on .+$/)
+    end
+  end
+end

data/spec/kitchen/verifier_spec.rb

@@ -0,0 +1,120 @@
+# -*- encoding: utf-8 -*-
+#
+# Author:: Fletcher Nichol (<fnichol@nichol.ca>)
+#
+# Copyright (C) 2015, Fletcher Nichol
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#    http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+
+require_relative "../spec_helper"
+
+require "kitchen/verifier"
+
+require "kitchen/configurable"
+module Kitchen
+  module Verifier
+    class Base
+      include Configurable
+      def initialize(config = {})
+        init_config(config)
+      end
+    end
+  end
+end
+
+module Kitchen
+
+  module Verifier
+
+    class Coolbeans < Kitchen::Verifier::Base
+    end
+
+    class ItDepends < Kitchen::Verifier::Base
+
+      attr_reader :verify_call_count
+
+      def initialize(config = {})
+        @verify_call_count = 0
+        super
+      end
+
+      def verify_dependencies
+        @verify_call_count += 1
+      end
+    end
+
+    class UnstableDepends < Kitchen::Verifier::Base
+
+      def verify_dependencies
+        raise UserError, "Oh noes, you don't have software!"
+      end
+    end
+  end
+end
+
+describe Kitchen::Verifier do
+
+  describe ".for_plugin" do
+
+    before do
+      Kitchen::Verifier.stubs(:require).returns(true)
+    end
+
+    it "returns a verifier object of the correct class" do
+      verifier = Kitchen::Verifier.for_plugin("coolbeans", {})
+
+      verifier.must_be_kind_of Kitchen::Verifier::Coolbeans
+    end
+
+    it "returns a verifier initialized with its config" do
+      verifier = Kitchen::Verifier.for_plugin("coolbeans", :foo => "bar")
+
+      verifier[:foo].must_equal "bar"
+    end
+
+    it "calls #verify_dependencies on the transport object" do
+      verifier = Kitchen::Verifier.for_plugin("it_depends", {})
+
+      verifier.verify_call_count.must_equal 1
+    end
+
+    it "calls #verify_dependencies once per verifier require" do
+      Kitchen::Verifier.stubs(:require).returns(true, false)
+      verifier1 = Kitchen::Verifier.for_plugin("it_depends", {})
+      verifier1.verify_call_count.must_equal 1
+      verifier2 = Kitchen::Verifier.for_plugin("it_depends", {})
+
+      verifier2.verify_call_count.must_equal 0
+    end
+
+    it "raises ClientError if the verifier could not be required" do
+      Kitchen::Verifier.stubs(:require).raises(LoadError)
+
+      proc { Kitchen::Verifier.for_plugin("coolbeans", {}) }.
+        must_raise Kitchen::ClientError
+    end
+
+    it "raises ClientError if the verifier's class constant was not found" do
+      # pretend require worked
+      Kitchen::Verifier.stubs(:require).returns(true)
+
+      proc { Kitchen::Verifier.for_plugin("nope", {}) }.
+        must_raise Kitchen::ClientError
+    end
+
+    it "raises UserError if #verify_dependencies failes" do
+      proc { Kitchen::Verifier.for_plugin("unstable_depends", {}) }.
+        must_raise Kitchen::UserError
+    end
+  end
+end

data/spec/kitchen_spec.rb

@@ -97,6 +97,13 @@ describe "Kitchen" do
       must_match %r{ -- Kitchen: uhoh$}
   end
 
+  it ".default_file_logger accepts a level and log_overwrite" do
+    l = Kitchen.default_file_logger(:error, false)
+
+    l.level.must_equal 3
+    l.log_overwrite.must_equal false
+  end
+
   it "sets Kitchen.logger to a Kitchen::Logger" do
     Kitchen.default_logger.must_be_instance_of Kitchen::Logger
   end

data/spec/spec_helper.rb

@@ -46,3 +46,11 @@ class IO
     File.open(args[0], "rb") { |f| f.read(args[1]) }
   end
 end
+
+def with_fake_fs
+  FakeFS.activate!
+  FileUtils.mkdir_p("/tmp")
+  yield
+  FakeFS.deactivate!
+  FakeFS::FileSystem.clear
+end

data/spec/support/powershell_max_size_spec.rb

@@ -0,0 +1,40 @@
+# -*- encoding: utf-8 -*-
+#
+# Author:: Fletcher Nichol (<fnichol@nichol.ca>)
+#
+# Copyright (C) 2014, Fletcher Nichol
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#    http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+
+require_relative "../spec_helper"
+
+# There is some double Base64 encoding going on when a PowerShell script is
+# given to a CMD to invoke. We're in a battle with Windows' CMD max length and
+# that what these specs are trying to ensure. This does lead to some less than
+# ideal "code golfing" to reduce the code payload, but at the end of the day
+# it's easier to see the entire context of the code vs. uploading partial code
+# fragements and calling them on the remote side (not to mention more expensive
+# in terms of PowerShell invocations).
+
+describe "PowerShell script max size" do
+
+  MAX_POWERSHELL_SIZE = 3010
+
+  Dir.glob(File.join(File.dirname(__FILE__), "../../support/*.ps1*")).each do|script|
+    base = File.basename(script)
+
+    it "support/#{base} size must be less than #{MAX_POWERSHELL_SIZE} bytes" do
+      (IO.read(script).size < MAX_POWERSHELL_SIZE).must_equal true
+    end
+  end
+end

data/support/busser_install_command.ps1

@@ -0,0 +1,14 @@
+if ((& "$ruby" "$gem" list busser -i) -ne "true") {
+  Write-Host "-----> Installing Busser ($version)`n"
+  & "$ruby" "$gem" install $gem_install_args.Split() 2>&1
+} else {
+  Write-Host "-----> Busser installation detected ($version)`n"
+}
+
+if (-Not (Test-Path "$busser")) {
+  $gem_bindir = & "$ruby" -rrubygems -e "puts Gem.bindir.dup.gsub('/', '\\')"
+  & "$ruby" "$gem_bindir\busser" setup --type bat 2>&1
+}
+
+Write-Host "       Installing Busser plugins: $plugins`n"
+& "$busser" plugin install $plugins.Split() 2>&1

data/support/busser_install_command.sh

@@ -0,0 +1,15 @@
+$gem list busser -i 2>&1 >/dev/null
+if test $? -ne 0; then
+  echo "-----> Installing Busser ($version)"
+  $gem install $gem_install_args
+else
+  echo "-----> Busser installation detected ($version)"
+fi
+
+if test ! -f "$BUSSER_ROOT/bin/busser"; then
+  gem_bindir=`$ruby -rrubygems -e "puts Gem.bindir"`
+  $gem_bindir/busser setup
+fi
+
+echo "       Installing Busser plugins: $plugins"
+$busser plugin install $plugins

data/support/check_files.ps1.erb

@@ -0,0 +1,48 @@
+$hash_file = "<%= hash_file %>"
+
+Function Cleanup($o) { if (($o -ne $null) -and ($o.GetType().GetMethod("Dispose") -ne $null)) { $o.Dispose() } }
+
+Function Decode-Base64File($src, $dst) {
+  Try {
+    $in = (Get-Item $src).OpenRead()
+    $b64 = New-Object -TypeName System.Security.Cryptography.FromBase64Transform
+    $m = [System.Security.Cryptography.CryptoStreamMode]::Read
+    $d = New-Object -TypeName System.Security.Cryptography.CryptoStream $in,$b64,$m
+    Copy-Stream $d ($out = [System.IO.File]::OpenWrite($dst))
+  } Finally { Cleanup $in; Cleanup $out; Cleanup $d }
+}
+
+Function Copy-Stream($src, $dst) { $b = New-Object Byte[] 4096; while (($i = $src.Read($b, 0, $b.Length)) -ne 0) { $dst.Write($b, 0, $i) } }
+
+Function Check-Files($h) {
+  return $h.GetEnumerator() | ForEach-Object {
+    $dst = Unresolve-Path $_.Key
+    New-Object psobject -Property @{
+      chk_exists = ($exists = Test-Path $dst -PathType Leaf)
+      src_md5 = ($sMd5 = $_.Value)
+      dst_md5 = ($dMd5 = if ($exists) { Get-MD5Sum $dst } else { $null })
+      chk_dirty = ($dirty = if ($sMd5 -ne $dMd5) { $true } else { $false })
+      verifies = if ($dirty -eq $false) { $true } else { $false }
+    }
+  } | Select-Object -Property chk_exists,src_md5,dst_md5,chk_dirty,verifies
+}
+
+Function Get-MD5Sum($src) {
+  Try {
+    $c = New-Object -TypeName System.Security.Cryptography.MD5CryptoServiceProvider
+    $bytes = $c.ComputeHash(($in = (Get-Item $src).OpenRead()))
+    return ([System.BitConverter]::ToString($bytes)).Replace("-", "").ToLower()
+  } Finally { Cleanup $c; Cleanup $in }
+}
+
+Function Invoke-Input($in) {
+  $in = Unresolve-Path $in
+  Decode-Base64File $in ($decoded = "$($in).ps1")
+  $expr = Get-Content $decoded | Out-String
+  Remove-Item $in,$decoded -Force
+  return Invoke-Expression "$expr"
+}
+
+Function Unresolve-Path($p) { if ($p -eq $null) { return $null } else { return $ExecutionContext.SessionState.Path.GetUnresolvedProviderPathFromPSPath($p) } }
+
+Check-Files (Invoke-Input $hash_file) | ConvertTo-Csv -NoTypeInformation

data/support/chef_base_init_command.ps1

@@ -0,0 +1,18 @@
+Function Delete-AllDirs($dirs) {
+  $dirs | ForEach-Object {
+    if (Test-Path ($path = Unresolve-Path $_)) { Remove-Item $path -Recurse -Force }
+  }
+}
+
+Function Unresolve-Path($p) {
+  if ($p -eq $null) { return $null }
+  else { return $ExecutionContext.SessionState.Path.GetUnresolvedProviderPathFromPSPath($p) }
+}
+
+Function Make-RootPath($p) {
+  $p = Unresolve-Path $p
+  if (-Not (Test-Path $p)) { New-Item $p -ItemType directory | Out-Null }
+}
+
+Delete-AllDirs $dirs
+Make-RootPath $root_path

data/support/chef_base_init_command.sh

@@ -0,0 +1,2 @@
+$sudo_rm -rf $dirs
+mkdir -p $root_path

data/support/chef_base_install_command.ps1

@@ -0,0 +1,76 @@
+Function Check-UpdateChef($root, $version) {
+  if (-Not (Test-Path $root)) { return $true }
+  elseif ("$version" -eq "true") { return $false }
+  elseif ("$version" -eq "latest") { return $true }
+
+  Try { $chef_version = (& $root\bin\chef-solo.bat -v).split(" ", 2)[1] }
+  Catch { $chef_version = "" }
+
+  if ($chef_version.StartsWith($version)) { return $false }
+  else { return $true }
+}
+
+Function Get-ChefMetadata($url) {
+  Try { $response = ($c = Make-WebClient).DownloadString($url) }
+  Finally { if ($c -ne $null) { $c.Dispose() } }
+
+  $md = ConvertFrom-StringData $response.Replace("`t", "=")
+  return @($md.url, $md.md5)
+}
+
+Function Get-MD5Sum($src) {
+  Try {
+    $c = New-Object -TypeName System.Security.Cryptography.MD5CryptoServiceProvider
+    $bytes = $c.ComputeHash(($in = (Get-Item $src).OpenRead()))
+    return ([System.BitConverter]::ToString($bytes)).Replace("-", "").ToLower()
+  } Finally { if (($c -ne $null) -and ($c.GetType().GetMethod("Dispose") -ne $null)) { $c.Dispose() }; if ($in -ne $null) { $in.Dispose() } }
+}
+
+Function Download-Chef($md_url, $dst) {
+  $url, $md5 = Get-ChefMetadata $md_url
+
+  Try {
+    Log "Downloading package from $url"
+    ($c = Make-WebClient).DownloadFile($url, $dst)
+    Log "Download complete."
+  } Finally { if ($c -ne $null) { $c.Dispose() } }
+
+  if (($dmd5 = Get-MD5Sum $dst) -eq $md5) { Log "Successfully verified $dst" }
+  else { throw "MD5 for $dst $dmd5 does not match $md5" }
+}
+
+Function Install-Chef($msi) {
+  Log "Installing Chef Omnibus package $msi"
+  $p = Start-Process -FilePath "msiexec.exe" -ArgumentList "/qn /i $msi" -Passthru -Wait
+
+  if ($p.ExitCode -ne 0) { throw "msiexec was not successful. Received exit code $($p.ExitCode)" }
+
+  Remove-Item $msi -Force
+  Log "Installation complete"
+}
+
+Function Log($m) { Write-Host "       $m`n" }
+
+Function Make-WebClient {
+  $proxy = New-Object -TypeName System.Net.WebProxy
+  $proxy.Address = $env:http_proxy
+  $client = New-Object -TypeName System.Net.WebClient
+  $client.Proxy = $proxy
+  return $client
+}
+
+Function Unresolve-Path($p) {
+  if ($p -eq $null) { return $null }
+  else { return $ExecutionContext.SessionState.Path.GetUnresolvedProviderPathFromPSPath($p) }
+}
+
+$chef_omnibus_root = Unresolve-Path $chef_omnibus_root
+$msi = Unresolve-Path $msi
+
+if (Check-UpdateChef $chef_omnibus_root $version) {
+  Write-Host "-----> Installing Chef Omnibus ($pretty_version)`n"
+  Download-Chef "$chef_metadata_url" $msi
+  Install-Chef $msi
+} else {
+  Write-Host "-----> Chef Omnibus installation detected ($pretty_version)`n"
+}