multitoolgui-exp.ps1

<# This form was created using POSHGUI.com  a free online gui designer for PowerShell
.NAME
    Multitool
#>

#Path to current running script.
$ErrorActionPreference = "stop"
$pathToScript = (split-path -parent $PSCommandPath)
$splitoption = [System.StringSplitOptions]::RemoveEmptyEntries
Add-Type -AssemblyName System.Windows.Forms
[System.Windows.Forms.Application]::EnableVisualStyles()

$Form                            = New-Object system.Windows.Forms.Form
$Form.ClientSize                 = '752,646'
$Form.text                       = "Multitool"
$Form.TopMost                    = $false

$ComboBox1_PickGroup             = New-Object system.Windows.Forms.ComboBox
$ComboBox1_PickGroup.text        = "Select a task"
$ComboBox1_PickGroup.BackColor   = "#7ed321"
$ComboBox1_PickGroup.width       = 736
$ComboBox1_PickGroup.height      = 20
$ComboBox1_PickGroup.DisplayMember = "cboDisplay"
$ComboBox1_PickGroup.ValueMember = "cboValue"
#@('Run Command','Network') | ForEach-Object {[void] $ComboBox1_PickGroup.Items.Add($_)}
$ComboBox1_PickGroup.location    = New-Object System.Drawing.Point(13,17)
$ComboBox1_PickGroup.Font        = 'Microsoft Sans Serif,10'
$ComboBox1_PickGroup.Sorted      = $true
$ComboBox1_PickGroup.AutoSize    = $true
$ComboBox1_PickGroup.Add_SelectionChangeCommitted({ ComboBox1PickGroup_SelectionChangeCommitted })

$ToolTip_ComboBox1PickGroup        = New-Object system.Windows.Forms.ToolTip
$ToolTip_ComboBox1PickGroup.ToolTipTitle  = "Select action to populate code block"
$ToolTip_ComboBox1PickGroup.isBalloon  = $true
$ToolTip_ComboBox1PickGroup.SetToolTip($ComboBox1_PickGroup,'Select action to populate code block.')

$TextBox_targets                = New-Object system.Windows.Forms.TextBox
$TextBox_targets.BackColor      = "#b8e986"
$TextBox_targets.text           = "Target List"
$TextBox_targets.multiline      = $true
#$TextBox_targets.width          = 168
#$TextBox_targets.height         = 565
$TextBox_targets.location       = New-Object System.Drawing.Point(18,52)
$TextBox_targets.Font           = 'Courier New,10'
$TextBox_targets.WordWrap       = $false
$TextBox_targets.AutoSize       = $true
#docs for scrollbars in MS site show this for scroll bars but doesn't seem to work
#TextBox_targets.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
$TextBox_targets.ScrollBars     = "Both"
$TextBox_targets.MinimumSize    = New-Object System.Drawing.Size(168,565)
$TextBox_targets.Anchor         = 'top,bottom,left'

$Button_TargetText               = New-Object system.Windows.Forms.Button
$Button_TargetText.text          = "Pop Targets (Code)"
$Button_TargetText.width         = 150
$Button_TargetText.height        = 30
$Button_TargetText.location      = New-Object System.Drawing.Point(200,120)
$Button_TargetText.Font          = 'Microsoft Sans Serif,10'
#$Button_TargetText.Add_Click({$TextBox_targets.Text = "vbahincav1`r`nvbachicav1"})
$Button_TargetText.Add_Click({ButtonRunTargetText})

$ToolTip_ButtonTargetText        = New-Object system.Windows.Forms.ToolTip
$ToolTip_ButtonTargetText.ToolTipTitle  = "Populate target text using code."
$ToolTip_ButtonTargetText.isBalloon  = $true
$ToolTip_ButtonTargetText.SetToolTip($Button_TargetText,'Use code from code block to populate target text area (left column).')

$Button_RunCodeBoxAction               = New-Object system.Windows.Forms.Button
$Button_RunCodeBoxAction.text          = "Run Code"
$Button_RunCodeBoxAction.width         = 147
$Button_RunCodeBoxAction.height        = 30
$Button_RunCodeBoxAction.location      = New-Object System.Drawing.Point(355,120)
$Button_RunCodeBoxAction.Font          = 'Microsoft Sans Serif,10'
$Button_RunCodeBoxAction.Add_Click({ButtonRunCodeBoxActionClick})

$ToolTip_RunCodeBoxAction              = New-Object system.Windows.Forms.ToolTip
$ToolTip_RunCodeBoxAction.ToolTipTitle = "Run code against targets."
$ToolTip_RunCodeBoxAction.isBalloon    = $true
$ToolTip_RunCodeBoxAction.SetToolTip($Button_RunCodeBoxAction,'Run action specified in code block with targets (left column).')

$Button_CheckOutputToggle               = New-Object system.Windows.Forms.Button
$Button_CheckOutputToggle.text          = "Check Output"
$Button_CheckOutputToggle.width         = 147
$Button_CheckOutputToggle.height        = 30
$Button_CheckOutputToggle.location      = New-Object System.Drawing.Point(510,120)
$Button_CheckOutputToggle.Font          = 'Microsoft Sans Serif,10'
$Button_CheckOutputToggle.Add_Click({ButtonCheckOutputToggleClick})

$ToolTip_CheckOutputToggle              = New-Object system.Windows.Forms.ToolTip
$ToolTip_CheckOutputToggle.ToolTipTitle = "Check output."
$ToolTip_CheckOutputToggle.isBalloon    = $true
$ToolTip_CheckOutputToggle.SetToolTip($Button_CheckOutputToggle,'Check the output files and display contents if output present.')

$CheckBox_NoOutputFile                    = New-Object system.Windows.Forms.CheckBox
$CheckBox_NoOutputFile.text               = "No Output"
$CheckBox_NoOutputFile.AutoSize           = $true
$CheckBox_NoOutputFile.width              = 104
$CheckBox_NoOutputFile.height             = 20
$CheckBox_NoOutputFile.location           = New-Object System.Drawing.Point(660,120)
$CheckBox_NoOutputFile.Font               = 'Microsoft Sans Serif,10'

$ToolTip_NoOutputFile              = New-Object system.Windows.Forms.ToolTip
$ToolTip_NoOutputFile.ToolTipTitle = "Check output."
$ToolTip_NoOutputFile.isBalloon    = $true
$ToolTip_NoOutputFile.SetToolTip($CheckBox_NoOutputFile,'Check if Cmd prompt output only.  Textbox on form will not be able to show output.')

$TextBox_TopDesc                = New-Object system.Windows.Forms.TextBox
$TextBox_TopDesc.BackColor      = "#b8e986"
$TextBox_TopDesc.text           = "Combobox selection Description"
$TextBox_TopDesc.multiline      = $true
#$TextBox_TopDesc.width          = 550
#$TextBox_TopDesc.height         = 65
$TextBox_TopDesc.location       = New-Object System.Drawing.Point(200,52)
$TextBox_TopDesc.Font           = 'Microsoft Sans Serif,10'
$TextBox_TopDesc.ReadOnly       = $true 
$TextBox_TopDesc.ScrollBars     = "Vertical"
$TextBox_TopDesc.AutoSize       = $true
$TextBox_TopDesc.MinimumSize    = New-Object System.Drawing.Size(550,65)
$TextBox_TopDesc.Anchor         = 'top,left,right'

$TextBox_Code                   = New-Object system.Windows.Forms.TextBox
$TextBox_Code.BackColor         = "#b8e986"
$TextBox_Code.text              = "Combobox selection Code"
$TextBox_Code.multiline         = $true
#$TextBox_Code.width             = 550
#$TextBox_Code.height            = 100
$TextBox_Code.location          = New-Object System.Drawing.Point(200,160)
$TextBox_Code.WordWrap          = $false
$TextBox_Code.Font              = 'Courier New,10'
#$TextBox_Code.ReadOnly          = $true 
$TextBox_Code.ScrollBars        = "Both"
$TextBox_Code.AutoSize          = $true
$TextBox_Code.MinimumSize       = New-Object System.Drawing.Size(550,100)
$TextBox_Code.Anchor            = 'top,bottom,left,right'

$TextBox_Output                   = New-Object system.Windows.Forms.TextBox
$TextBox_Output.BackColor         = "#b8e986"
$TextBox_Output.text              = "Output textbox`r`n"
$TextBox_Output.multiline         = $true
#$TextBox_Output.width             = 550
#$TextBox_Output.height            = 330
$TextBox_Output.location          = New-Object System.Drawing.Point(200,280)
$TextBox_Output.Font              = 'Courier New,10'
$TextBox_Output.WordWrap          = $false
#$TextBox_Output.ReadOnly          = $true 
$TextBox_Output.ScrollBars        = "Both"
$TextBox_Output.AutoSize          = $true
$TextBox_Output.MinimumSize       = New-Object System.Drawing.Size(550,330)
$TextBox_Output.Anchor            = 'bottom,left,right'

$Form.controls.AddRange(@($ComboBox1_PickGroup,$TextBox_targets,$Button_TargetText,$Button_RunCodeBoxAction,$Button_CheckOutputToggle,$CheckBox_NoOutputFile,$TextBox_TopDesc,$TextBox_Code,$TextBox_Output))

Function Add-Output {
    Param ($Message)
    # Sample of function use: Add-Output -Message "Adding line to textbox"
    $TextBox_Output.AppendText("`r`n$Message")
    $TextBox_Output.Refresh()
    $TextBox_Output.ScrollToCaret()
}

Function Add-Target {
    Param ($Message)
    # Sample of function use: Add-Output -Message "Adding line to textbox"
    $TextBox_targets.AppendText("`r`n$Message")
    $TextBox_targets.Refresh()
    $TextBox_targets.ScrollToCaret()
}

function ComboBox1PickGroup_SelectionChangeCommitted {
    $arrValue = ($ComboBox1_PickGroup.SelectedItem).cboValue.split("++++++")
	$TextBox_TopDesc.Text = $arrValue[0]
    #if (($arrValue[0].split("#",$splitoption))[0].trim() -eq "script") {
	if ($arrValue[0].substring(0,$arrValue[0].indexof("#")).trim() -eq "script") {
		#$TextBox_Code.text = "#(" + $ComboBox1_PickGroup.SelectedIndex.ToString() + ")`r`n#" + ($ComboBox1_PickGroup.SelectedItem).cboDisplay + "`r`n" + ($arrValue[($arrValue.length-1)] -split '\n' | %{ $_ + "`r`n"})
		$TextBox_Code.text = "#" + ($ComboBox1_PickGroup.SelectedItem).cboDisplay + "`r`n" + ($arrValue[($arrValue.length-1)] -split '\n' | %{ $_ + "`r`n"})
    } else {
        if (Test-Path ("$pathToScript\multitoolscripts\" + ($ComboBox1_PickGroup.SelectedItem).cboValue.split("++++++",$splitoption)[1])) {
            $TextBox_Code.text = (get-content ("$pathToScript\multitoolscripts\" + ($ComboBox1_PickGroup.SelectedItem).cboValue.split("++++++",$splitoption)[1]) -Delimiter "`r`n")
        } else {
            $TextBox_Code.text = "File not found in $pathToScript\multitoolscripts\" + ($ComboBox1_PickGroup.SelectedItem).cboValue.split("++++++",$splitoption)[1]
        }
    }
}

function ButtonRunTargetText {
    Invoke-Expression $TextBox_Code.Text
    $TextBox_Output.Text = "Total Targets: " + $arrTarget.Length.ToString()
    $origOFS = $OFS
    $OFS = "`r`n"        
    $TextBox_Targets.Text = $arrTarget
    $OFS = $origOFS        
}

function ButtonRunCodeBoxActionClick {
	$useInvokeCommand = $false
    $origOFS = $OFS
    #Using * asterick as delimiter for array as string $OFS.  Change if needed
    $OFS = "*"        
	#Check to see if invoke-command is selected, search for "#Invoke-Command" in one of the lines.
	$TextBox_Code.Text.split("`r`n")|%{if ($_.indexof("#Invoke-Command") -gt -1){$useInvokeCommand = $true; $true}} | select-object -first 1
	$arrTarget = ($TextBox_targets.Text).Split("`n") | %{$_.trim()}
    #Using * asterick as delimiter for array as string $OFS.  Change if needed
	$strDelimiter = "*"
	if ($useInvokeCommand -eq $false)
		{$BtnCode = '$arrTarget = "' + $arrTarget + '".Split("' + $strDelimiter + '")' + "`r`n" +$TextBox_Code.Text}
	else {
		#strip Lines with # in 1st position after trim and strip empty lines.
		$BtnCode = ""
		$TextBox_Code.Text.split("`r`n").trim() | %{if ($_.indexof("#") -ne 0 -and $_.length -gt 0){ $BtnCode = $BtnCode + ($_.replace("`n","")) + "`r`n"}}
		$BtnCode = '$strCode = ' + " {`r`n" + $BtnCode + "}`r`n"
		$BtnCode = $BtnCode + '$arrTarget = "' + $arrTarget + '".Split("' + $strDelimiter + '")' + "`r`n"
		#$BtnCode = $BtnCode + '$arrTarget| %{invoke-command -computername $_ -scriptblock $strCode}'
		$BtnCode = $BtnCode + '$arrTarget| %{if(test-connection $_ -count 1 -quiet){invoke-command -computername $_ -scriptblock $strCode} else {"Ping Failed for $_"}}'
		$TextBox_Output.Text = $BtnCode
	}
	$OFS = $origOFS
    #Need to escape " with \" in order to pass commands(script) as argument to powershell.exe
    $processCommand = $BtnCode.replace('"','\"')
    if ($CheckBox_NoOutputFile.Checked) {
        Start-Process -FilePath PowerShell -ArgumentList "-NoExit -NoProfile -ExecutionPolicy Bypass -Command & {$processCommand}"
        $TextBox_Output.text = "No Outputtext checked.`r`nStrip the 'exit' from the code before running.`r`n"
    } else {
        $processCommand = $processCommand + "`r`n exit"
        Start-Process -FilePath PowerShell -ArgumentList "-NoExit -NoProfile -ExecutionPolicy Bypass -Command & {$processCommand}" -RedirectStandardOutput "$pathToScript\multitoolOutput.txt" -RedirectStandardError "$pathToScript\multitoolError.txt"    
    }
    ButtonCheckOutputToggleClick
	
}

Function ButtonCheckOutputToggleClick {
    if (Test-Path "$pathToScript\multitoolOutput.txt" -PathType Leaf) { 
        if (Get-Content "$pathToScript\multitoolOutput.txt") {
            $TextBox_Output.Text = $TextBox_Output.Text + "`r`n" + ((date).ToString()) + "`r`n" +  (Get-Content "$pathToScript\multitoolOutput.txt" -Delimiter "`r`n") + "----------------------`r`n"
        } else {$TextBox_Output.Text = $TextBox_Output.Text + ((date).ToString()) + " Not output yet.`r`n---------------------------`r`n"}
    } else {
        $TextBox_Output.Text = $TextBox_Output.Text + "----------------------" + (date).ToString() + " No Output generated yet.`r`n"
    }
    if (Test-Path "$pathToScript\multitoolError.txt" -PathType Leaf) { 
        if (Get-Content "$pathToScript\multitoolOutput.txt") {
            $TextBox_Output.Text = $TextBox_Output.Text + ((date).ToString()) + "`r`n" +  (Get-Content "$pathToScript\multitoolError.txt" -Delimiter "`r`n") + "----------------------`r`n"
        } else {$TextBox_Output.Text = $TextBox_Output.Text + ((date).ToString()) + " Not errors yet.`r`n---------------------------`r`n"}
    } else {
        $TextBox_Output.Text = $TextBox_Output.Text + "----------------------" + (date).ToString() + " No Errors generated yet.`r`n"
    }
    $TextBox_Output.Select()
    $TextBox_Output.ScrollToCaret()
    $Button_CheckOutputToggle.Select()
}

function CreateComboboxItem {
    #function to creat objects for adding display and value to combobox items
    Param ([string]$cbodisplay="display", [string]$cbovalue="value")
    #$ComboBox1_PickGroup.DisplayMember = "cboDisplay"
    #$ComboBox1_PickGroup.ValueMember = "cboValue"
    $cboObject = New-Object -TypeName PSObject
    $cboObject | Add-Member -Type NoteProperty -Name cboDisplay -Value $cbodisplay
    $cboObject | Add-Member -Type NoteProperty -Name cboValue -Value $cbovalue
    return $cboObject
}

#populate combo box
#@((CreateComboboxItem -cboDisplay "Run Command" -cbovalue "disp1"),(CreateComboboxItem -cboDisplay 'Network' -cbovalue 'disp2')) | ForEach-Object {[void] $ComboBox1_PickGroup.Items.Add($_)}
#$pscript|format-hex  #This lets you look at hex output to see what line seperator is.
#0A 09 seperates the hex output lines.  0A is LF (Line Feed), 09 is HT (Horizontal Tab)  For this case, \n is used.

#Sample combo box entry for checking hotfix from powershell in variable in this script, single quotes to prevent var expansion:
#Note, using '++++++' as delimiter for description text box entry and code entry.  Description further seperated using # for script/file, example below is script
#File would be script loaded from seperate file in 'multitoolscripts' folder in same directory as this form script.:
$pscript = @'
    script#Run code block using invoke-command.  ++++++
	# Run block of code using invoke-command.  Note, interactive code won't run and will hang the sesssion.
	"$env:computername output start:"
	# Place code between start and end comment statement
	# Start code block
	
	# End code block
	"$env:computername output end:"
'@
[void] $ComboBox1_PickGroup.Items.Add((CreateComboboxItem -cboDisplay "Invoke-Command" -cbovalue $pscript))
$pscript = @'
    script#Uses powershell commandlet to check for hotfixes on target systems.  ++++++
    $hotfixes = "KB4012216", "KB4012217", "KB4012218", "KB4012219", "KB4012220", "KB4012598", "KB4012606", "KB4013198", "KB4013429", "KB4015217", "KB4015219", "KB4015221", "KB4015549", "KB4015550", "KB4015551", "KB4015552", "KB4015553", "KB4015554", "KB4016635", "KB4016636", "KB4016637", "KB4019213", "KB4019214", "KB4019215", "KB4019216", "KB4019217", "KB4019218", "KB4019263", "KB4019264", "KB4019265", "KB4019472", "KB4019473", "KB4019474", "KB4022719", "KB4022168", "KB4022722", "KB4022726", "KB4022717", "KB4022723", "KB4022715", "KB4023680"
    # Search for the HotFixes
    $arrTarget| %{$_; Get-HotFix -ComputerName $_ | Where-Object {$hotfixes -contains $_.HotfixID} | Select-Object -property "HotFixID", "InstalledOn"}
'@
[void] $ComboBox1_PickGroup.Items.Add((CreateComboboxItem -cboDisplay "Check Hotfix" -cbovalue $pscript))
#Reboot Computers
$pscript = @'
    script#Reboot computers using the shutdown command, don't need to add credentials to command other than user context.  Restart-computer requires -credential parameter.  ++++++
    # /r restart otherwise shutsdown system
    $arrTarget | %{$_; shutdown /r /m \\$_}
'@
[void] $ComboBox1_PickGroup.Items.Add((CreateComboboxItem -cboDisplay "Reboot or Shutdown system with shutdown.exe" -cbovalue $pscript))
#Reg Query
$pscript = @'
    script#Uses Command Line to Req Query systems in target list.  ++++++
    # Req Query, for help "reg query /?"
    # Sample reg paths
	# reg query "\\VBAMGYPRT01\HKLM\SYSTEM\CurrentControlSet\services\SNMP\Parameters" /s
    # Reg Query "\\VBAMGYPRT01\HKLM\SOFTWARE\Policies\Microsoft\Windows NT\Printers" /S | Out-GridView
    # Reg Query "\\VBAMGYPRT01\HKLM\Software\Microsoft\Cryptography\OID\Encoding Type 0\CertDllCreateCertificateChainEngine\Config\Default" /v WeakSha1ThirdPartyFlags
    # Uncomment following to use invoke-command instead
    # $arrTarget| %{if(test-connection $_ -count 1 -quiet){$_;  invoke-command -computername $_ -scriptblock {Reg Query "HKLM\Software\Microsoft\Windows\CurrentVersion\Uninstall" /S}} else {"Ping Failed for $_"}}
    $arrTarget| %{if(test-connection $_ -count 1 -quiet){$_; Reg Query "\\$_\HKLM\Software\Microsoft\Windows\CurrentVersion\Uninstall" /S} else {"Ping Failed for $_"}}
'@
[void] $ComboBox1_PickGroup.Items.Add((CreateComboboxItem -cboDisplay "Reg Query Systems in list" -cbovalue $pscript))
#Reg Query for SNMP parameters
$pscript = @'
    script#Uses Command Line to Req Query systems in target list.  ++++++
    # Req Query, for help "reg query /?"
    # Sample reg paths
	# reg query "\\VBAMGYPRT01\HKLM\SYSTEM\CurrentControlSet\services\SNMP\Parameters" /s
    # Reg Query "\\VBAMGYPRT01\HKLM\SOFTWARE\Policies\Microsoft\Windows NT\Printers" /S | Out-GridView
    # Reg Query "\\VBAMGYPRT01\HKLM\Software\Microsoft\Cryptography\OID\Encoding Type 0\CertDllCreateCertificateChainEngine\Config\Default" /v WeakSha1ThirdPartyFlags
    # Uncomment following to use invoke-command instead
    # $arrTarget| %{if(test-connection $_ -count 1 -quiet){$_;  invoke-command -computername $_ -scriptblock {Reg Query "HKLM\Software\Microsoft\Windows\CurrentVersion\Uninstall" /S}} else {"Ping Failed for $_"}}
    $arrTarget| %{if(test-connection $_ -count 1 -quiet){$_; Reg Query "\\$_\HKLM\SYSTEM\CurrentControlSet\services\SNMP\Parameters\ValidCommunities" /S} else {"Ping Failed for $_"}}
'@
[void] $ComboBox1_PickGroup.Items.Add((CreateComboboxItem -cboDisplay "Reg Query SNMP parameters" -cbovalue $pscript))
# All code that is visible to form must be inserted before this line.
$Form.ShowDialog()