specinfra-cisco 2.40.2

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

@@ -0,0 +1,113 @@
+class Specinfra::Command::Windows::Base::File < Specinfra::Command::Windows::Base
+  class << self
+    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)
+      %Q!Get-Content("#{file}") | Out-String!
+    end
+
+    def get_md5sum(file)
+      <<-EOT
+      $md5 = New-Object -TypeName System.Security.Cryptography.MD5CryptoServiceProvider
+      $sum = [System.BitConverter]::ToString($md5.ComputeHash([System.IO.File]::ReadAllBytes("#{file}")))
+      echo $sum.ToLower().Replace("-","")
+      EOT
+    end
+
+    def check_is_accessible_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_contains(file, pattern)
+      Backend::PowerShell::Command.new do
+        exec %Q!(Get-Content("#{file}") | Out-String) -match '#{convert_regexp(pattern)}'!
+      end
+    end
+
+    def check_contains_within file, pattern, from=nil, to=nil
+      from ||= '^'
+      to ||= '$'
+      Backend::PowerShell::Command.new do
+        using 'crop_text.ps1'
+        exec %Q!(CropText -text (Get-Content("#{file}") | Out-String) -fromPattern '#{convert_regexp(from)}' -toPattern '#{convert_regexp(to)}') -match '#{pattern}'!
+      end
+    end
+
+    def check_has_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
+
+    def check_is_owned_by(file, owner)
+      Backend::PowerShell::Command.new do
+        exec "$(if((Get-Item '#{file}').GetAccessControl().Owner -match '#{owner}' -or ((Get-Item '#{file}').GetAccessControl().Owner -match '#{owner}').Length -gt 0){ 0 } else { 1 })"
+      end
+    end
+
+    private
+    def item_has_attribute item, attribute
+      %Q!((Get-Item -Path "#{item}" -Force).attributes.ToString() -Split ', ') -contains '#{attribute}'!
+    end
+  end
+end

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

@@ -0,0 +1,11 @@
+class Specinfra::Command::Windows::Base::Group < Specinfra::Command::Windows::Base
+  class << self
+    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
+end

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

@@ -0,0 +1,25 @@
+class Specinfra::Command::Windows::Base::Host < Specinfra::Command::Windows::Base
+  class << self
+    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
+end

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

@@ -0,0 +1,19 @@
+class Specinfra::Command::Windows::Base::HotFix < Specinfra::Command::Windows::Base
+  class << self
+    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
+end

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

@@ -0,0 +1,66 @@
+class Specinfra::Command::Windows::Base::IisAppPool < Specinfra::Command::Windows::Base
+  class << self
+    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
+
+    def check_has_32bit_enabled(name)
+      Backend::PowerShell::Command.new do
+        using 'find_iis_component.ps1'
+        exec "(FindIISAppPool -name '#{name}').enable32BitAppOnWin64 -eq $true"
+      end
+    end
+
+    def check_has_idle_timeout(name, minutes)
+      Backend::PowerShell::Command.new do
+        using 'find_iis_component.ps1'
+        exec "(FindIISAppPool -name '#{name}').processModel.idleTimeout.Minutes -eq #{minutes}"
+      end
+    end
+
+    def check_has_identity_type(name, type)
+      Backend::PowerShell::Command.new do
+        using 'find_iis_component.ps1'
+        exec "(FindIISAppPool -name '#{name}').processModel.identityType -eq '#{type}'"
+      end
+    end
+
+    def check_has_user_profile(name)
+      Backend::PowerShell::Command.new do
+        using 'find_iis_component.ps1'
+        exec "(FindIISAppPool -name '#{name}').processModel.loadUserProfile -eq $true"
+      end
+    end
+
+    def check_has_username(name, username)
+      Backend::PowerShell::Command.new do
+        using 'find_iis_component.ps1'
+        exec "(FindIISAppPool -name '#{name}').processModel.username -eq '#{username}'"
+      end
+    end
+
+    def check_has_periodic_restart(name, minutes)
+      Backend::PowerShell::Command.new do
+        using 'find_iis_component.ps1'
+        exec "(FindIISAppPool -name '#{name}').recycling.periodicRestart.time.TotalMinutes -eq #{minutes}"
+      end
+    end
+
+    def check_has_managed_pipeline_mode(name, mode)
+      Backend::PowerShell::Command.new do
+        using 'find_iis_component.ps1'
+        exec "(FindIISAppPool -name '#{name}').managedPipelineMode -eq '#{mode}'"
+      end
+    end
+  end
+end

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

@@ -0,0 +1,59 @@
+class Specinfra::Command::Windows::Base::IisWebsite < Specinfra::Command::Windows::Base
+  class << self
+    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
+
+    def check_has_site_bindings(name, port, protocol, ipaddress, host_header)
+      Backend::PowerShell::Command.new do
+        using 'find_iis_component.ps1'
+        exec "(FindSiteBindings -name '#{name}' -protocol '#{protocol}' -hostHeader '#{host_header}' -port #{port} -ipAddress '#{ipaddress}').count -gt 0"
+      end
+    end
+
+    def check_has_virtual_dir(name, vdir, path)
+      Backend::PowerShell::Command.new do
+        using 'find_iis_component.ps1'
+        exec "(FindSiteVirtualDir -name '#{name}' -vdir '#{vdir}' -path '#{path}') -eq $true"
+      end
+    end
+
+    def check_has_site_application(name, app, pool, physical_path)
+      Backend::PowerShell::Command.new do
+        using 'find_iis_component.ps1'
+        exec "(FindSiteApplication -name '#{name}' -app '#{app}' -pool '#{pool}' -physicalPath '#{physical_path}') -eq $true"
+      end
+    end
+  end
+end

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

@@ -0,0 +1,11 @@
+class Specinfra::Command::Windows::Base::Package < Specinfra::Command::Windows::Base
+  class << self
+    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
+end

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

@@ -0,0 +1,17 @@
+class Specinfra::Command::Windows::Base::Port < Specinfra::Command::Windows::Base
+  class << self
+    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
+end

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

@@ -0,0 +1,31 @@
+class Specinfra::Command::Windows::Base::Process < Specinfra::Command::Windows::Base
+  class << self
+    def check_process(process)
+      Backend::PowerShell::Command.new do
+        exec "(Get-Process '#{process}') -ne $null"
+      end
+    end
+
+    def get(process, opts)
+      column = opts[:format].chomp '='
+
+      case column
+      when 'pid'
+        # map 'pid' to its windows equivalent
+        get_process_property(process, 'processid')
+      when 'user'
+        %Q!gwmi win32_process -filter "name = '#{process}'" | select -first 1 | %{$_.getowner().user}!
+      when 'group'
+        # no concept of process group on Windows
+        raise NotImplementedError.new('Unable to get process group on Windows')
+      else
+        get_process_property(process, column)
+      end
+    end
+
+    private
+    def get_process_property(process, property)
+      %Q!Get-WmiObject Win32_Process -Filter "name = '#{process}'" | select -First 1 #{property} -ExpandProperty #{property}!
+    end
+  end
+end

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

@@ -0,0 +1,53 @@
+class Specinfra::Command::Windows::Base::RegistryKey < Specinfra::Command::Windows::Base
+  class << self
+    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"
+      create_command cmd
+    end
+
+    def check_has_property(key_name, key_property)
+      cmd = "(Get-Item 'Registry::#{key_name}').GetValueKind('#{key_property[:name]}') -eq '#{get_key_type(key_property[:type])}'"
+      create_command 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"
+      create_command cmd
+    end
+
+    private
+    def do_not_convert?(key_type)
+      key_type.to_s =~ /_converted/i
+    end
+
+    def get_key_type(key_type)
+       REGISTRY_KEY_TYPES[key_type.to_s.gsub("_converted",'').to_sym]
+    end
+
+    def convert_key_property_value property
+      return property[:value] if do_not_convert? property[:type]
+      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
+end

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

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

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

@@ -0,0 +1,31 @@
+class Specinfra::Command::Windows::Base::Service < Specinfra::Command::Windows::Base
+  class << self
+    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
+end