From f66e219bd633bfcab96b5f34bfcaf86d3984faaf Mon Sep 17 00:00:00 2001
From: Jesse Davis <jdalton.davis@gmail.com>
Date: Sat, 9 Jan 2016 17:50:58 -0600
Subject: new Get-Keystrokes

---
 Tests/Exfiltration.tests.ps1 | 55 ++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 55 insertions(+)
 create mode 100644 Tests/Exfiltration.tests.ps1

(limited to 'Tests')

diff --git a/Tests/Exfiltration.tests.ps1 b/Tests/Exfiltration.tests.ps1
new file mode 100644
index 0000000..baeebb8
--- /dev/null
+++ b/Tests/Exfiltration.tests.ps1
@@ -0,0 +1,55 @@
+Set-StrictMode -Version Latest
+
+$TestScriptRoot = Split-Path $MyInvocation.MyCommand.Path -Parent
+$ModuleRoot = Resolve-Path "$TestScriptRoot\.."
+$ModuleManifest = "$ModuleRoot\Exfiltration\Exfiltration.psd1"
+
+Remove-Module [E]xfiltration
+Import-Module $ModuleManifest -Force -ErrorAction Stop
+
+Describe 'Get-Keystrokes' {
+    
+    if (Test-Path "$($env:TEMP)\key.log") { Remove-Item -Force "$($env:TEMP)\key.log" }
+    $WindowTitle = (Get-Process -Id $PID).MainWindowTitle
+    
+    $Shell = New-Object -ComObject wscript.shell
+    $Shell.AppActivate($WindowTitle)
+    
+    $KeyLogger = Get-Keystrokes -Return
+    Start-Sleep -Seconds 1
+
+    $Shell.SendKeys('Pester is SUPER l337!')
+    $KeyLogger.Dispose()
+
+    It 'Should output to file' { Test-Path "$($env:TEMP)\key.log" | Should Be $true }
+    
+    $KeyObjects = Get-Content -Path "$($env:TEMP)\key.log" | ConvertFrom-Csv
+
+    It 'Should log all keystrokes' {
+        $Keys = $KeyObjects | % { $_.TypedKey }
+        $String = -join $Keys
+        $String | Should Be '<Shift>Pester< >is< ><Shift>S<Shift>U<Shift>P<Shift>E<Shift>R< >l337<Shift>!'
+    }
+
+    It 'Should get foreground window title' {
+        $KeyObjects[0].WindowTitle | Should Be $WindowTitle
+    }
+
+    It 'Should log time of key press' {
+        $KeyTime = [DateTime]::Parse($KeyObjects[0].Time)
+        $KeyTime.GetType().Name | Should Be 'DateTime'
+    }
+
+    It 'Should stop logging Pester is SUPER l337!after timeout' {
+        
+        $Timeout = 0.05
+        $KeyLogger = Get-Keystrokes -Timeout $Timeout -Return
+        
+        Start-Sleep -Seconds 4
+
+        $KeyLogger.Runspace.RunspaceAvailability | Should Be 'Available'
+        $KeyLogger.Dispose()
+    }
+
+    Remove-Item -Force "$($env:TEMP)\key.log"
+}
\ No newline at end of file
-- 
cgit v1.2.3