specinfra 2.0.0.beta6 → 2.0.0.beta7

data/lib/specinfra/command/windows/base.rb

@@ -0,0 +1,14 @@
+class Specinfra::Command::Windows::Base
+  def self.create
+    self.new
+  end
+
+  private
+  def windows_account account
+    match = /((.+)\\)?(.+)/.match account
+    domain = match[2]
+    name = match[3]
+    [name, domain]
+  end
+
+end

data/lib/specinfra/command/windows/base/feature.rb

@@ -0,0 +1,15 @@
+class Specinfra::Command::Windows::Base::Feature < Specinfra::Command::Windows::Base
+  def check_is_enabled(name,provider)
+    if provider.nil?
+      cmd =  "@(ListWindowsFeatures -feature #{name}).count -gt 0"
+    else
+      cmd =  "@(ListWindowsFeatures -feature #{name} -provider #{provider}).count -gt 0"
+    end
+
+    Backend::PowerShell::Command.new do
+      using 'list_windows_features.ps1'
+      exec cmd
+    end
+  end
+end
+

data/lib/specinfra/command/windows/base/file.rb

@@ -0,0 +1,103 @@
+class Specinfra::Command::Windows::Base::File < Specinfra::Command::Windows::Base
+  def check_is_file(file)
+    cmd = item_has_attribute file, 'Archive'
+    Backend::PowerShell::Command.new do
+      exec cmd
+    end
+  end
+
+  def check_is_directory(dir)
+    cmd = item_has_attribute dir, 'Directory'
+    Backend::PowerShell::Command.new do
+      exec cmd
+    end
+  end
+
+  def check_is_hidden(file)
+    cmd = item_has_attribute file, 'Hidden'
+    Backend::PowerShell::Command.new do
+      exec cmd
+    end
+  end
+
+  def check_is_readonly(file)
+    cmd = item_has_attribute file, 'ReadOnly'
+    Backend::PowerShell::Command.new do
+      exec cmd
+    end
+  end
+
+  def check_is_system(file)
+    cmd = item_has_attribute file, 'System'
+    Backend::PowerShell::Command.new do
+      exec cmd
+    end
+  end
+  
+  def get_content(file)
+    "[Io.File]::ReadAllText('#{file}')"
+  end
+  
+  def check_access_by_user(file, user, access)
+    case access
+    when 'r'
+      check_is_readable(file, user)
+    when 'w'
+      check_is_writable(file, user)
+    when 'x'
+      check_is_executable(file, user)
+    end
+  end
+
+  def check_is_readable(file, by_whom)
+    Backend::PowerShell::Command.new do
+      using 'check_file_access_rules.ps1'
+      exec "CheckFileAccessRules -path '#{file}' -identity '#{get_identity by_whom}' -rules @('FullControl', 'Modify', 'ReadAndExecute', 'Read', 'ListDirectory')"
+    end
+  end
+
+  def check_is_writable(file, by_whom)
+    Backend::PowerShell::Command.new do
+      using 'check_file_access_rules.ps1'
+      exec "CheckFileAccessRules -path '#{file}' -identity '#{get_identity by_whom}' -rules @('FullControl', 'Modify', 'Write')"
+    end
+  end
+
+  def check_is_executable(file, by_whom)
+    Backend::PowerShell::Command.new do
+      using 'check_file_access_rules.ps1'
+      exec "CheckFileAccessRules -path '#{file}' -identity '#{get_identity by_whom}' -rules @('FullControl', 'Modify', 'ReadAndExecute', 'ExecuteFile')"
+    end
+  end
+
+  def check_contain(file, pattern)
+    Backend::PowerShell::Command.new do
+      exec "[Io.File]::ReadAllText('#{file}') -match '#{convert_regexp(pattern)}'"
+    end
+  end
+
+  def check_contain_within file, pattern, from=nil, to=nil
+    from ||= '^'
+    to ||= '$'
+    Backend::PowerShell::Command.new do
+      using 'crop_text.ps1'
+      exec %Q[(CropText -text ([Io.File]::ReadAllText('#{file}')) -fromPattern '#{convert_regexp(from)}' -toPattern '#{convert_regexp(to)}') -match '#{pattern}']
+    end
+  end
+
+  def check_version(name,version)
+    cmd = "((Get-Command '#{name}').FileVersionInfo.ProductVersion -eq '#{version}') -or ((Get-Command '#{name}').FileVersionInfo.FileVersion -eq '#{version}')"
+    Backend::PowerShell::Command.new { exec cmd }
+  end
+
+  private
+  def item_has_attribute item, attribute
+    "((Get-Item -Path '#{item}' -Force).attributes.ToString() -Split ', ') -contains '#{attribute}'"
+  end
+
+end
+
+
+
+
+

data/lib/specinfra/command/windows/base/group.rb

@@ -0,0 +1,9 @@
+class Specinfra::Command::Windows::Base::Group < Specinfra::Command::Windows::Base
+  def check_exists(group)
+    group_id, domain = windows_account group
+    Backend::PowerShell::Command.new do
+      using 'find_group.ps1'
+      exec "(FindGroup -groupName '#{group_id}'#{domain.nil? ? "" : " -domain '#{domain}'"}) -ne $null"
+    end
+  end
+end

data/lib/specinfra/command/windows/base/host.rb

@@ -0,0 +1,23 @@
+class Specinfra::Command::Windows::Base::Host < Specinfra::Command::Windows::Base
+  def check_is_resolvable(name, type)
+    if type == "hosts"
+      cmd = "@(Select-String -path (Join-Path -Path $($env:windir) -ChildPath 'system32/drivers/etc/hosts') -pattern '#{name}\\b').count -gt 0"
+    else
+      cmd = "@([System.Net.Dns]::GetHostAddresses('#{name}')).count -gt 0"
+    end
+    Backend::PowerShell::Command.new { exec cmd }
+  end
+
+  def check_is_reachable(host, port, proto, timeout)
+    if port.nil?
+      Backend::PowerShell::Command.new do
+        exec "(New-Object System.Net.NetworkInformation.Ping).send('#{host}').Status -eq 'Success'"
+      end
+    else
+      Backend::PowerShell::Command.new do
+        using 'is_remote_port_listening.ps1'
+        exec"(IsRemotePortListening -hostname #{host} -port #{port} -timeout #{timeout} -proto #{proto}) -eq $true"
+      end
+    end
+  end
+end

data/lib/specinfra/command/windows/base/hot_fix.rb

@@ -0,0 +1,17 @@
+class Specinfra::Command::Windows::Base::HotFix < Specinfra::Command::Windows::Base
+  def check_is_installed(description, hot_fix_id=nil)
+    hot_fix_id_match = /(KB\d+)/i.match(description)
+    hot_fix_id = hot_fix_id_match ? hot_fix_id_match[1] : description if hot_fix_id.nil?
+
+    args = [ 
+      '-description', "'#{description}'",
+      '-hotFixId', "'#{hot_fix_id}'"
+    ]
+ 
+    cmd = "(FindInstalledHotFix #{args.join(' ')})" 
+    Backend::PowerShell::Command.new do
+      using 'find_installed_hot_fix.ps1'
+      exec "#{cmd} -eq $true"
+    end
+  end
+end

data/lib/specinfra/command/windows/base/iis_app_pool.rb

@@ -0,0 +1,15 @@
+class Specinfra::Command::Windows::Base::IisAppPool < Specinfra::Command::Windows::Base
+  def check_exists(name)
+    Backend::PowerShell::Command.new do
+      using 'find_iis_component.ps1'
+      exec "@(FindIISAppPool -name '#{name}').count -gt 0"
+    end
+  end
+
+  def check_has_dotnet_version(name, dotnet)
+    Backend::PowerShell::Command.new do
+      using 'find_iis_component.ps1'
+      exec "(FindIISAppPool -name '#{name}').managedRuntimeVersion -match 'v#{dotnet}'"
+    end
+  end
+end

data/lib/specinfra/command/windows/base/iis_website.rb

@@ -0,0 +1,36 @@
+class Specinfra::Command::Windows::Base::IisWebsite < Specinfra::Command::Windows::Base
+  def check_is_enabled(name)
+    Backend::PowerShell::Command.new do
+      using 'find_iis_component.ps1'
+      exec "(FindIISWebsite -name '#{name}').serverAutoStart -eq $true"
+    end
+  end
+
+  def check_is_installed(name)
+    Backend::PowerShell::Command.new do
+      using 'find_iis_component.ps1'
+      exec "@(FindIISWebsite -name '#{name}').count -gt 0"
+    end
+  end
+
+  def check_is_running(name)
+    Backend::PowerShell::Command.new do
+      using 'find_iis_component.ps1'
+      exec "(FindIISWebsite -name '#{name}').state -eq 'Started'"
+    end
+  end
+
+  def check_is_in_app_pool(name, app_pool)
+    Backend::PowerShell::Command.new do
+      using 'find_iis_component.ps1'
+      exec "(FindIISWebsite -name '#{name}').applicationPool -match '#{app_pool}'"
+    end
+  end
+
+  def check_has_physical_path(name, path)
+    Backend::PowerShell::Command.new do
+      using 'find_iis_component.ps1'
+      exec "[System.Environment]::ExpandEnvironmentVariables( ( FindIISWebsite -name '#{name}' ).physicalPath ).replace('\\', '/' ) -eq ('#{path}'.trimEnd('/').replace('\\', '/'))"
+    end
+  end
+end

data/lib/specinfra/command/windows/base/package.rb

@@ -0,0 +1,9 @@
+class Specinfra::Command::Windows::Base::Package < Specinfra::Command::Windows::Base
+  def check_is_installed(package, version=nil)
+    version_selection = version.nil? ? "" : "-appVersion '#{version}'"
+    Backend::PowerShell::Command.new do
+      using 'find_installed_application.ps1'
+      exec "(FindInstalledApplication -appName '#{package}' #{version_selection}) -eq $true"
+    end
+  end
+end

data/lib/specinfra/command/windows/base/port.rb

@@ -0,0 +1,15 @@
+class Specinfra::Command::Windows::Base::Port < Specinfra::Command::Windows::Base
+  def check_is_listening(port, options=nil)
+    Backend::PowerShell::Command.new do
+      using 'is_port_listening.ps1'
+      exec "IsPortListening -portNumber #{port}"
+    end
+  end
+
+  def check_is_listening_with_protocol(port, protocol)
+    Backend::PowerShell::Command.new do
+      using 'is_port_listening.ps1'
+      exec "IsPortListening -portNumber #{port} -protocol '#{protocol}'"
+    end
+  end
+end

data/lib/specinfra/command/windows/base/process.rb

@@ -0,0 +1,7 @@
+class Specinfra::Command::Windows::Base::Process < Specinfra::Command::Windows::Base
+  def check_process(process)
+    Backend::PowerShell::Command.new do
+      exec "(Get-Process '#{process}') -ne $null"
+    end
+  end
+end

data/lib/specinfra/command/windows/base/registry_key.rb

@@ -0,0 +1,43 @@
+class Specinfra::Command::Windows::Base::RegistryKey < Specinfra::Command::Windows::Base
+  REGISTRY_KEY_TYPES = {
+    :type_string       => 'String',
+    :type_binary       => 'Binary',
+    :type_dword        => 'DWord',
+    :type_qword        => 'QWord',
+    :type_multistring  => 'MultiString',
+    :type_expandstring => 'ExpandString'
+  }
+
+  def check_exists(key_name)
+    cmd = "(Get-Item 'Registry::#{key_name}') -ne $null"
+    Backend::PowerShell::Command.new { exec cmd }
+  end
+
+  def check_has_property(key_name, key_property)
+    cmd = "(Get-Item 'Registry::#{key_name}').GetValueKind('#{key_property[:name]}') -eq '#{REGISTRY_KEY_TYPES[key_property[:type]]}'"
+    Backend::PowerShell::Command.new { exec cmd }
+  end
+
+  def check_has_value(key_name, key_property)
+    value = convert_key_property_value key_property
+    cmd = "(Compare-Object (Get-Item 'Registry::#{key_name}').GetValue('#{key_property[:name]}') #{value}) -eq $null"
+    Backend::PowerShell::Command.new { exec cmd }
+  end
+
+  private
+  def convert_key_property_value property
+    case property[:type]
+    when :type_binary
+      byte_array = [property[:value]].pack('H*').bytes.to_a
+      "([byte[]] #{byte_array.join(',')})"
+    when :type_dword
+      [property[:value].rjust(8, '0').scan(/[0-9a-f]{2}/i).reverse.join].pack("H*").unpack("l").first
+    when :type_qword
+      property[:value].hex
+    else
+      string_array = property[:value].split("\n").map {|s| "'#{s}'"}.reduce {|acc, s| "#{acc},#{s}"}
+      "@(#{string_array})"
+    end
+  end
+
+end

data/lib/specinfra/command/windows/base/scheduled_task.rb

@@ -0,0 +1,8 @@
+class Specinfra::Command::Windows::Base::ScheduledTask < Specinfra::Command::Windows::Base
+  def check_exists(name)
+    Backend::PowerShell::Command.new do
+      using 'find_scheduled_task.ps1'
+      exec "(FindScheduledTask -name '#{name}').TaskName -eq '\\#{name}'"
+    end
+  end
+end

data/lib/specinfra/command/windows/base/service.rb

@@ -0,0 +1,29 @@
+class Specinfra::Command::Windows::Base::Service < Specinfra::Command::Windows::Base
+  def check_is_installed(service)
+    Backend::PowerShell::Command.new do
+      using 'find_service.ps1'
+      exec "@(FindService -name '#{service}').count -gt 0"
+    end
+  end
+
+  def check_has_start_mode(service, mode)
+    Backend::PowerShell::Command.new do
+      using 'find_service.ps1'
+      exec  "'#{mode}' -match (FindService -name '#{service}').StartMode -and (FindService -name '#{service}') -ne $null"
+    end
+  end
+
+  def check_is_enabled(service, level=nil)
+    Backend::PowerShell::Command.new do
+      using 'find_service.ps1'
+      exec "(FindService -name '#{service}').StartMode -eq 'Auto'"
+    end
+  end
+
+  def check_is_running(service)
+    Backend::PowerShell::Command.new do
+      using 'find_service.ps1'
+      exec "(FindService -name '#{service}').State -eq 'Running'"
+    end
+  end
+end

data/lib/specinfra/command/windows/base/user.rb

@@ -0,0 +1,20 @@
+class Specinfra::Command::Windows::Base::User < Specinfra::Command::Windows::Base
+  def check_exists(user)
+    user_id, domain = windows_account user
+    Backend::PowerShell::Command.new do
+      using 'find_user.ps1'
+      exec "(FindUser -userName '#{user_id}'#{domain.nil? ? "" : " -domain '#{domain}'"}) -ne $null"
+    end
+  end
+
+  def check_is_belonging_to_group(user, group)
+    user_id, user_domain = windows_account user
+    group_id, group_domain = windows_account group
+    Backend::PowerShell::Command.new do
+      using 'find_user.ps1'
+      using 'find_group.ps1'
+      using 'find_usergroup.ps1'
+      exec "(FindUserGroup -userName '#{user_id}'#{user_domain.nil? ? "" : " -userDomain '#{user_domain}'"} -groupName '#{group_id}'#{group_domain.nil? ? "" : " -groupDomain '#{group_domain}'"}) -ne $null"
+    end
+  end
+end

data/lib/specinfra/configuration.rb

@@ -23,7 +23,8 @@ module Specinfra
 
       # Define os method explicitly to avoid stack level
       # too deep caused by Helpet::DetectOS#os
-      def os
+      def os(value=nil)
+        @os = value if value
         if @os.nil? && defined?(RSpec) && RSpec.configuration.respond_to?(:os)
           @os = RSpec.configuration.os
         end

data/lib/specinfra/helper.rb

@@ -1,5 +1,5 @@
 require 'specinfra/helper/os'
-require 'specinfra/helper/detect_os'
+include Specinfra::Helper::Os
 
 require 'specinfra/helper/backend'
 include Specinfra::Helper::Backend

data/lib/specinfra/helper/backend.rb

@@ -18,7 +18,7 @@ module Specinfra
     module Backend
       def backend_for(type)
         instance = self.class.const_get('Specinfra').const_get('Backend').const_get(type.to_s.capitalize).instance
-        commands = self.class.const_get('Specinfra').const_get('Command').const_get(instance.check_os[:family]).new
+        commands = Specinfra::Command::Base.new
         instance.set_commands(commands)
         instance
       end

data/lib/specinfra/helper/detect_os.rb

@@ -1,23 +1,17 @@
-module Specinfra
-  module Helper
-    module DetectOS
-      def commands
-        self.class.const_get('Specinfra').const_get('Command').const_get(os[:family]).new
-      end
-
-      def os
-        property[:os_by_host] = {} if ! property[:os_by_host]
-        host = Specinfra.configuration.ssh ? Specinfra.configuration.ssh.host : 'localhost'
-
-        if property[:os_by_host][host]
-          os_by_host = property[:os_by_host][host]
-        else
-          # Set command object explicitly to avoid `stack too deep`
-          os_by_host = backend(Specinfra::Command::Base.new).check_os
-          property[:os_by_host][host] = os_by_host
-        end
-        os_by_host
-      end
-    end
+module Specinfra::Helper
+  class DetectOs
   end
 end
+
+require 'specinfra/helper/detect_os/aix'
+require 'specinfra/helper/detect_os/arch'
+require 'specinfra/helper/detect_os/darwin'
+require 'specinfra/helper/detect_os/debian'
+require 'specinfra/helper/detect_os/freebsd'
+require 'specinfra/helper/detect_os/gentoo'
+require 'specinfra/helper/detect_os/nixos'
+require 'specinfra/helper/detect_os/openbsd'
+require 'specinfra/helper/detect_os/plamo'
+require 'specinfra/helper/detect_os/redhat'
+require 'specinfra/helper/detect_os/solaris'
+require 'specinfra/helper/detect_os/suse'