@ -29,11 +29,6 @@ $URLs = @{
SdeleteDownload = " http://download.sysinternals.com/files/SDelete.zip "
SdeleteDownload = " http://download.sysinternals.com/files/SDelete.zip "
} }
$script:ScriptPath = $MyInvocation . MyCommand . Path $script:ScriptPath = $MyInvocation . MyCommand . Path
$script:RestartRegistryKeys = @ {
RunBeforeLogon = " HKLM:\SOFTWARE\Microsoft\Windows\CurrentVersion\RunServicesOnce "
RunAtLogon = " HKLM:\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce "
}
$script:RestartRegistryProperty = " $ScriptProductName "
### Private support functions I use behind the scenes ### Private support functions I use behind the scenes
@ -54,25 +49,38 @@ function Get-WebUrl {
<# <#
. synopsis . synopsis
Invoke an expression ; log the expression , output , and the last exit code Invoke an expression ; log the expression , optionally with any output , and the last exit code if appropriate
#> #>
function Invoke-Expression AndLog { function Invoke-Expression Ex {
[ cmdletbinding ( ) ] param (
[ cmdletbinding ( ) ] param (
[ parameter ( mandatory = $true ) ] [ string ] $command ,
[ parameter ( mandatory = $true ) ] [ string ] $command ,
[ switch ] $invokeWithCmdExe ,
[ switch ] $invokeWithCmdExe ,
[ switch ] $checkExitCode ,
[ switch ] $checkExitCode ,
[ switch ] $logToStdout ,
[ int ] $sleepSeconds
[ int ] $sleepSeconds
)
)
$global:LASTEXITCODE = 0
$global:LASTEXITCODE = 0
if ( $invokeWithCmdExe ) {
$commandSb = if ( $invokeWithCmdExe ) { { cmd / c " $command " } } else { { invoke-expression -command $command } }
Write-EventLogWrapper " Invoking CMD: ' $command ' "
Write-EventLogWrapper " Invoke-ExpressionEx called to run command ' $command ' `r `n `r `n Using scriptblock: $( $commandSb . ToString ( ) ) "
$output = cmd / c " $command "
$output = $null
try {
if ( $logToStdout ) {
$commandSb . invoke ( )
$message = " Expression ' $command ' exited with code ' $LASTEXITCODE ' "
}
else {
$output = $commandSb . invoke ( )
$message = " Expression ' $command ' exited with code ' $LASTEXITCODE ' and output the following to the console: `r `n `r `n $output "
}
Write-EventLogWrapper -message $message
}
}
else {
catch {
Write-EventLogWrapper " Invoking Powershell expression: ' $command ' "
Write-EventLogWrapper -message " Invoke-ExpressionEx faile3d to run command ' $command ' "
$output = invoke-expression -command $command
Write-ErrorStackToEventLog -errorStack $_
throw $_
}
}
Write-EventLogWrapper " Expression ' $command ' had a last exit code of ' $LastExitCode ' and output the following to the console: `r `n `r `n $output "
if ( $checkExitCode -and $global:LASTEXITCODE -ne 0 ) {
if ( $checkExitCode -and $global:LASTEXITCODE -ne 0 ) {
throw " LASTEXITCODE: ${global:LASTEXITCODE} for command: ' ${command} ' "
throw " LASTEXITCODE: ${global:LASTEXITCODE} for command: ' ${command} ' "
}
}
@ -97,6 +105,7 @@ function Write-EventLogWrapper {
New-EventLog -Source $EventLogSource -LogName $eventLogName
New-EventLog -Source $EventLogSource -LogName $eventLogName
}
}
$messagePlus = " $message `r `n `r `n Script: $( $script:ScriptPath ) `r `n User: ${env:USERDOMAIN} \ ${env:USERNAME} "
$messagePlus = " $message `r `n `r `n Script: $( $script:ScriptPath ) `r `n User: ${env:USERDOMAIN} \ ${env:USERNAME} "
if ( $messagePlus . length -gt 32766 ) { $messagePlus = $messagePlus . SubString ( 0 , 32766 ) } # Because Write-EventLog will die otherwise
Write-Host -foreground magenta " ====Writing to $EvengLogName event log==== "
Write-Host -foreground magenta " ====Writing to $EvengLogName event log==== "
write-host -foreground darkgray " $messagePlus `r `n "
write-host -foreground darkgray " $messagePlus `r `n "
Write-EventLog -LogName $eventLogName -Source $EventLogSource -EventID $eventId -EntryType $entryType -Message $MessagePlus
Write-EventLog -LogName $eventLogName -Source $EventLogSource -EventID $eventId -EntryType $entryType -Message $MessagePlus
@ -134,55 +143,89 @@ function Write-ErrorStackToEventLog {
Write-EventLogWrapper $message
Write-EventLogWrapper $message
} }
<# function Test-PowershellSyntax {
. synopsis [ cmdletbinding ( DefaultParameterSetName = 'FromText' ) ]
Create and set the registry property which will run this script on reboot
#>
function Set-RestartRegistryEntry {
param (
param (
[ parameter ( mandatory = $true ) ] [ ValidateSet ( 'RunBeforeLogon' , 'RunAtLogon' , 'NoRestart' ) ] [ string ] $RestartAction ,
[ parameter ( mandatory = $true , ParameterSetName = 'FromText' ) ] [ string ] $text ,
[ string ] $restartCommand
[ parameter ( mandatory = $true , ParameterSetName = 'FromFile' ) ] [ string ] $fileName ,
[ switch ] $ThrowOnFailure
)
)
$tokens = @ ( )
$parseErrors = @ ( )
$parser = [ System.Management.Automation.Language.Parser ]
if ( $pscmdlet . ParameterSetName -eq 'FromText' ) {
$parsed = $parser :: ParseInput ( $text , [ ref ] $tokens , [ ref ] $parseErrors )
}
elseif ( $pscmdlet . ParameterSetName -eq 'FromFile' ) {
$fileName = resolve-path $fileName
$parsed = $parser :: ParseFile ( $fileName , [ ref ] $tokens , [ ref ] $parseErrors )
}
write-verbose " $( $tokens . count ) tokens found. "
if ( $RestartAction -match " NoRestart " ) {
if ( $parseErrors . count -gt 0 ) {
Write-EventLogWrapper " Called Set-RestartRegistryEntry with -RestartAction NoRestart, will not write registry key "
$message = " $( $parseErrors . count ) parse errors found in file ' $fileName ': `r `n "
return
$parseErrors | % { $message + = " `r `n $_ " }
if ( $ThrowOnFailure ) { throw $message } else { write-verbose $message }
return $false
}
}
return $true
}
<#
. description
Set a scheduled task to run on next logon of the calling user . Intended for tasks that need to reboot and then be restarted such as applying Windows Updates
. notes
The Powershell New-ScheduledTask cmdlet is broken for me on Win81 , but SchTasks . exe doesn ' t support actions with long arguments ( requires a command line of < 200something characters ) . lmfao .
My workaround is to take a scriptblock , and then just save it to a file and call the file from Powershell .
I create the scheduled task with SchTasks . exe , then modify it with Powershell cmdlets that can handle long arguments just fine
#>
function Set-RestartScheduledTask {
[ cmdletbinding ( ) ] param (
[ Parameter ( Mandatory = $true ) ] [ Scriptblock ] $restartCommand ,
[ string ] $tempRestartScriptPath = " ${env:temp} \ $ScriptProductName -TempRestartScript.ps1 " ,
[ string ] $taskName = " $ScriptProductName -RestartTask "
)
Remove-RestartScheduledTask -taskName $taskName
$currentUser = [ Security.Principal.WindowsIdentity ] :: GetCurrent ( ) . Name
$restartCommand . ToString ( ) | Out-File -FilePath $tempRestartScriptPath
" Unregister-ScheduledTask -taskName ' $taskName ' -Confirm: `$ false " | Out-File -Append -FilePath $tempRestartScriptPath
Test-PowershellSyntax -ThrowOnFailure -FileName $tempRestartScriptPath
$schTasksCmd = 'SchTasks.exe /create /sc ONLOGON /tn "{0}" /tr "cmd.exe /c echo TemporparyPlaceholderCommand" /ru "{1}" /it /rl HIGHEST /f' -f $taskName , $currentUser
Invoke-ExpressionEx -command $schTasksCmd -invokeWithCmdExe -checkExitCode
# SchTasks.exe cannot specify a user for the LOGON schedule - it applies to all users. Modify it here:
$trigger = New-ScheduledTaskTrigger -AtLogon -User $currentUser
# SchTasks.exe cannot specify an action with long arguments (maxes out at like 200something chars). Modify it here:
$action = New-ScheduledTaskAction -Execute " $PSHome \Powershell.exe " -Argument " -File `" $tempRestartScriptPath `" "
Set-ScheduledTask -taskname $taskName -action $action -trigger $trigger
$message = " Setting the Restart Registry Key at: {0}\{1} `r `n {2} " -f $script:RestartRegistryKeys . $RestartAction , $script:RestartRegistryProperty , $restartCommand
$message = " Created scheduled task called ' $taskName ', which will run a temp file at ' $tempRestartScriptPath ', containing: `r `n `r `n "
Write-EventLogWrapper -message $message
$message + = ( Get-Content $tempRestartScriptPath ) -join " `r `n "
New-Item $script:RestartRegistryKeys . $RestartAction -force | out-null
Write-EventLogWrapper -message $message
Set-ItemProperty -Path $script:RestartRegistryKeys . $RestartAction -Name $script:RestartRegistryProperty -Value $restartCommand
} }
function Get-RestartRegistryEntry { function Get-RestartScheduledTask {
[ cmdletbinding ( ) ] param ( )
[ cmdletbinding ( ) ] param (
$entries = @ ( )
[ string ] $taskName = $ScriptProductName
foreach ( $key in $script:RestartRegistryKeys . Keys ) {
)
$regKey = $script:RestartRegistryKeys [ $key ]
Get-ScheduledTask | ? -Property TaskName -match $taskName
$entry = New-Object PSObject -Property @ {
RegistryKey = $regKey
RegistryProperty = $script:RestartRegistryProperty
PropertyValue = $null
}
if ( test-path $regKey ) {
$regProps = get-item $regKey | select -expand Property
if ( $regProps -contains $script:RestartRegistryProperty ) {
$entry . PropertyValue = Get-ItemProperty -path $regKey | select -expand $script:RestartRegistryProperty
}
}
Add-Member -inputObject $entry -memberType ScriptProperty -Name StringRepr -Value {
" Key: $( $this . RegistryKey ) , Property: $( $this . RegistryProperty ) , Value: $( $this . PropertyValue ) "
}
$entries + = @ ( $entry )
}
return $entries
} }
function Remove-RestartRegistryEntries { function Remove-RestartScheduledTask {
[ cmdletbinding ( ) ] param ( )
[ cmdletbinding ( ) ] param (
foreach ( $key in $script:RestartRegistryKeys . Keys ) {
[ string ] $taskName = $ScriptProductName
try { Remove-ItemProperty -Path $script:RestartRegistryKeys [ $key ] -name $script:RestartRegistryProperty } catch { }
)
$existingTask = Get-RestartScheduledTask -taskName $taskName
if ( $existingTask ) {
Write-EventLogWrapper -message " Found existing task named ' $taskName '; deleting... "
Unregister-ScheduledTask -InputObject $existingTask -Confirm: $false | out-null
}
else {
Write-EventLogWrapper -message " Did not find any existing task named ' $taskName ' "
}
}
} }
@ -221,7 +264,7 @@ function Install-SevenZip {
Write-EventLogWrapper " Downloaded ' $( $URLs . SevenZipDownload . $OSArch ) ' to ' $szDlPath ', now running msiexec... "
Write-EventLogWrapper " Downloaded ' $( $URLs . SevenZipDownload . $OSArch ) ' to ' $szDlPath ', now running msiexec... "
$msiCall = '& msiexec /qn /i "{0}"' -f $szDlPath
$msiCall = '& msiexec /qn /i "{0}"' -f $szDlPath
# Windows suxxx so msiexec sometimes returns right away? or something idk. fuck
# Windows suxxx so msiexec sometimes returns right away? or something idk. fuck
Invoke-Expression AndLog -checkExitCode -command $msiCall -sleepSeconds 30
Invoke-Expression Ex -checkExitCode -command $msiCall -sleepSeconds 30
}
}
finally {
finally {
rm -force $szDlPath
rm -force $szDlPath
@ -242,9 +285,9 @@ function Install-VBoxAdditions {
Write-EventLogWrapper " Installing the Oracle certificate... "
Write-EventLogWrapper " Installing the Oracle certificate... "
$oracleCert = resolve-path " $baseDir \cert\oracle-vbox.cer " | select -expand path
$oracleCert = resolve-path " $baseDir \cert\oracle-vbox.cer " | select -expand path
# NOTE: Checking for exit code, but this command will fail with an error if the cert is already installed
# NOTE: Checking for exit code, but this command will fail with an error if the cert is already installed
Invoke-Expression AndLog -checkExitCode -command ( '& "{0}" add-trusted-publisher "{1}" --root "{1}"' -f " $baseDir \cert\VBoxCertUtil.exe " , $oracleCert )
Invoke-Expression Ex -checkExitCode -command ( '& "{0}" add-trusted-publisher "{1}" --root "{1}"' -f " $baseDir \cert\VBoxCertUtil.exe " , $oracleCert )
Write-EventLogWrapper " Installing the virtualbox additions "
Write-EventLogWrapper " Installing the virtualbox additions "
Invoke-Expression AndLog -checkExitCode -command ( '& "{0}" /with_wddm /S' -f " $baseDir \VBoxWindowsAdditions.exe " ) # returns IMMEDIATELY, goddamn fuckers
Invoke-Expression Ex -checkExitCode -command ( '& "{0}" /with_wddm /S' -f " $baseDir \VBoxWindowsAdditions.exe " ) # returns IMMEDIATELY, goddamn fuckers
while ( get-process -Name VBoxWindowsAdditions * ) { write-host 'Waiting for VBox install to finish...' ; sleep 1 ; }
while ( get-process -Name VBoxWindowsAdditions * ) { write-host 'Waiting for VBox install to finish...' ; sleep 1 ; }
Write-EventLogWrapper " virtualbox additions have now been installed "
Write-EventLogWrapper " virtualbox additions have now been installed "
}
}
@ -255,7 +298,7 @@ function Install-VBoxAdditions {
$vbgaPath = mkdir -force " ${env:Temp} \InstallVbox " | select -expand fullname
$vbgaPath = mkdir -force " ${env:Temp} \InstallVbox " | select -expand fullname
try {
try {
Write-EventLogWrapper " Extracting iso at ' $isoPath ' to directory at ' $vbgaPath '... "
Write-EventLogWrapper " Extracting iso at ' $isoPath ' to directory at ' $vbgaPath '... "
Invoke-Expression AndLog -checkExitCode -command ( 'sevenzip x "{0}" -o"{1}"' -f $isoPath , $vbgaPath )
Invoke-Expression Ex -checkExitCode -command ( 'sevenzip x "{0}" -o"{1}"' -f $isoPath , $vbgaPath )
InstallVBoxAdditionsFromDir $vbgaPath
InstallVBoxAdditionsFromDir $vbgaPath
}
}
finally {
finally {
@ -292,15 +335,21 @@ function Install-CompiledDotNetAssemblies {
# http://support.microsoft.com/kb/2570538
# http://support.microsoft.com/kb/2570538
# http://robrelyea.wordpress.com/2007/07/13/may-be-helpful-ngen-exe-executequeueditems/
# http://robrelyea.wordpress.com/2007/07/13/may-be-helpful-ngen-exe-executequeueditems/
# Don't check the return value - sometimes it fails and that's fine
# Don't check the return value - sometimes it fails and that's fine
set-alias ngen32 " ${env:WinDir} \microsoft.net\framework\v4.0.30319\ngen.exe "
$ngen32 = " ${env:WinDir} \microsoft.net\framework\v4.0.30319\ngen.exe "
ngen32 update / force / queue
Invoke-ExpressionEx " $ngen32 update /force /queue "
ngen32 executequeueditems
Invoke-ExpressionEx " $ngen32 executequeueditems "
# set-alias ngen32 "${env:WinDir}\microsoft.net\framework\v4.0.30319\ngen.exe"
# ngen32 update /force /queue
# ngen32 executequeueditems
if ( ( Get-OSArchitecture ) -match $ArchitectureId . amd64 ) {
if ( ( Get-OSArchitecture ) -match $ArchitectureId . amd64 ) {
set-alias ngen64 " ${env:WinDir} \microsoft.net\framework64\v4.0.30319\ngen.exe "
# set-alias ngen64 "${env:WinDir}\microsoft.net\framework64\v4.0.30319\ngen.exe"
ngen64 update / force / queue
# ngen64 update /force /queue
ngen64 executequeueditems
# ngen64 executequeueditems
$ngen64 = " ${env:WinDir} \microsoft.net\framework64\v4.0.30319\ngen.exe "
Invoke-ExpressionEx " $ngen64 update /force /queue "
Invoke-ExpressionEx " $ngen64 executequeueditems "
}
}
} }
@ -310,19 +359,19 @@ function Compress-WindowsInstall {
$udfZipPath = Get-WebUrl -url $URLs . UltraDefragDownload . $OSArch -outDir $env:temp
$udfZipPath = Get-WebUrl -url $URLs . UltraDefragDownload . $OSArch -outDir $env:temp
$udfExPath = " ${env:temp} \ultradefrag-portable-6.1.0. $OSArch "
$udfExPath = " ${env:temp} \ultradefrag-portable-6.1.0. $OSArch "
# This archive contains a folder - extract it directly to the temp dir
# This archive contains a folder - extract it directly to the temp dir
Invoke-Expression AndLog -checkExitCode -command ( 'sevenzip x "{0}" "-o{1}"' -f $udfZipPath , $env:temp )
Invoke-Expression Ex -checkExitCode -command ( 'sevenzip x "{0}" "-o{1}"' -f $udfZipPath , $env:temp )
$sdZipPath = Get-WebUrl -url $URLs . SdeleteDownload -outDir $env:temp
$sdZipPath = Get-WebUrl -url $URLs . SdeleteDownload -outDir $env:temp
$sdExPath = " ${env:temp} \SDelete "
$sdExPath = " ${env:temp} \SDelete "
# This archive does NOT contain a folder - extract it to a subfolder (will create if necessary)
# This archive does NOT contain a folder - extract it to a subfolder (will create if necessary)
Invoke-Expression AndLog -checkExitCode -command ( 'sevenzip x "{0}" "-o{1}"' -f $sdZipPath , $sdExPath )
Invoke-Expression Ex -checkExitCode -command ( 'sevenzip x "{0}" "-o{1}"' -f $sdZipPath , $sdExPath )
stop-service wuauserv
stop-service wuauserv
rm -recurse -force $ { env : WinDir } \ SoftwareDistribution \ Download
rm -recurse -force $ { env : WinDir } \ SoftwareDistribution \ Download
start-service wuauserv
start-service wuauserv
Invoke-Expression AndLog -checkExitCode -command ( '& {0} --optimize --repeat "{1}"' -f " $udfExPath \udefrag.exe " , " $env:SystemDrive " )
Invoke-Expression Ex -checkExitCode -logToStdout -command ( '& {0} --optimize --repeat "{1}"' -f " $udfExPath \udefrag.exe " , " $env:SystemDrive " )
Invoke-Expression AndLog -checkExitCode -command ( '& {0} /accepteula -q -z "{1}"' -f " $sdExPath \SDelete.exe " , $env:SystemDrive )
Invoke-Expression Ex -checkExitCode -command ( '& {0} /accepteula -q -z "{1}"' -f " $sdExPath \SDelete.exe " , $env:SystemDrive )
}
}
finally {
finally {
rm -recurse -force $udfZipPath , $udfExPath , $sdZipPath , $sdExPath -ErrorAction Continue
rm -recurse -force $udfZipPath , $udfExPath , $sdZipPath , $sdExPath -ErrorAction Continue
@ -494,21 +543,21 @@ function Enable-WinRM {
# call cmd.exe over and over like this, that problem goes away.
# call cmd.exe over and over like this, that problem goes away.
# Note: order is important. This order makes sure that any time packer can successfully
# Note: order is important. This order makes sure that any time packer can successfully
# connect to WinRm, it won't later turn winrm back off or make it unavailable.
# connect to WinRm, it won't later turn winrm back off or make it unavailable.
Invoke-Expression AndLog -invokeWithCmdExe -command 'net stop winrm'
Invoke-Expression Ex -invokeWithCmdExe -command 'net stop winrm'
Invoke-Expression AndLog -invokeWithCmdExe -command 'sc.exe config winrm start= auto'
Invoke-Expression Ex -invokeWithCmdExe -command 'sc.exe config winrm start= auto'
Invoke-Expression AndLog -invokeWithCmdExe -command 'winrm quickconfig -q'
Invoke-Expression Ex -invokeWithCmdExe -command 'winrm quickconfig -q'
Invoke-Expression AndLog -invokeWithCmdExe -command 'winrm quickconfig -transport:http'
Invoke-Expression Ex -invokeWithCmdExe -command 'winrm quickconfig -transport:http'
Invoke-Expression AndLog -invokeWithCmdExe -command 'winrm set winrm/config @{MaxTimeoutms="1800000"}'
Invoke-Expression Ex -invokeWithCmdExe -command 'winrm set winrm/config @{MaxTimeoutms="1800000"}'
Invoke-Expression AndLog -invokeWithCmdExe -command 'winrm set winrm/config/winrs @{MaxMemoryPerShellMB="2048"}'
Invoke-Expression Ex -invokeWithCmdExe -command 'winrm set winrm/config/winrs @{MaxMemoryPerShellMB="2048"}'
Invoke-Expression AndLog -invokeWithCmdExe -command 'winrm set winrm/config/service @{AllowUnencrypted="true"}'
Invoke-Expression Ex -invokeWithCmdExe -command 'winrm set winrm/config/service @{AllowUnencrypted="true"}'
Invoke-Expression AndLog -invokeWithCmdExe -command 'winrm set winrm/config/client @{AllowUnencrypted="true"}'
Invoke-Expression Ex -invokeWithCmdExe -command 'winrm set winrm/config/client @{AllowUnencrypted="true"}'
Invoke-Expression AndLog -invokeWithCmdExe -command 'winrm set winrm/config/service/auth @{Basic="true"}'
Invoke-Expression Ex -invokeWithCmdExe -command 'winrm set winrm/config/service/auth @{Basic="true"}'
Invoke-Expression AndLog -invokeWithCmdExe -command 'winrm set winrm/config/client/auth @{Basic="true"}'
Invoke-Expression Ex -invokeWithCmdExe -command 'winrm set winrm/config/client/auth @{Basic="true"}'
Invoke-Expression AndLog -invokeWithCmdExe -command 'winrm set winrm/config/service/auth @{CredSSP="true"}'
Invoke-Expression Ex -invokeWithCmdExe -command 'winrm set winrm/config/service/auth @{CredSSP="true"}'
Invoke-Expression AndLog -invokeWithCmdExe -command 'winrm set winrm/config/listener?Address=*+Transport=HTTP @{Port="5985"}'
Invoke-Expression Ex -invokeWithCmdExe -command 'winrm set winrm/config/listener?Address=*+Transport=HTTP @{Port="5985"}'
Invoke-Expression AndLog -invokeWithCmdExe -command 'netsh advfirewall firewall set rule group="remote administration" new enable=yes'
Invoke-Expression Ex -invokeWithCmdExe -command 'netsh advfirewall firewall set rule group="remote administration" new enable=yes'
Invoke-Expression AndLog -invokeWithCmdExe -command 'netsh firewall add portopening TCP 5985 "Port 5985"'
Invoke-Expression Ex -invokeWithCmdExe -command 'netsh firewall add portopening TCP 5985 "Port 5985"'
Invoke-Expression AndLog -invokeWithCmdExe -command 'net start winrm'
Invoke-Expression Ex -invokeWithCmdExe -command 'net start winrm'
} }
function Set-PasswordExpiry { # TODO fixme use pure Powershell function Set-PasswordExpiry { # TODO fixme use pure Powershell
@ -521,7 +570,7 @@ function Set-PasswordExpiry { # TODO fixme use pure Powershell
wmic useraccount where " name='{0}' " set " PasswordExpires={1} " wmic useraccount where " name='{0}' " set " PasswordExpires={1} "
" @ " @
$command = $command -f $accountName , $passwordExpiress
$command = $command -f $accountName , $passwordExpiress
Invoke-Expression AndLog -invokeWithCmdExe -command $command
Invoke-Expression Ex -invokeWithCmdExe -command $command
} }
<# <#
Micah R Ledbetter
9 years ago