BSonPosh

Test-Host (WMI Ping -or Port Check)

I often find (specifically when using WMI) the need to ping the machine first before performing any queries. WMI takes FOREVER to timeout. I decided that I should use a script/function to test a host before passing it down the pipe.

There are a couple of problems with this approach that I had to consider.
1) How do I know what to test without corrupting the pipe or using foreach?
- For this I added a “-property” parameter that would allow the user to pick what property to check against, but still output the entire object that was inputted.

2) What about firewalls that block ping?
- Added TestPort function that does a TCP connect and returns $true or $false

3) What if I want a conditional port check.
- Added the ability to Change the Default Port for TCP Connection Test

Here is the script that I came up with and some of things it does.
Parameters
- $property: The Property to Ping or Test (Default is none.)
- $tport: The Port to test against (Default is 135. Used with -port)
- $timeout: The timeout for the connection (Default is 1000 ms, Used with -port)
- [switch]$port: Switch to Test a port instead of Ping
- [switch]$verbose: Provides Verbose Output.
Features
- Will Ping ‘$_’ by default
- Can pass the property that contains the Host to test using -property
- Can use -port to test a port instead of ping. (Uses TCP)
- Maintains the Object that is tested and passes it down the pipe if connection is passed.

A Demo of the script in action

Best Viewed Full Screen
Get the Flash Player to see this player.

Script CODE

Param($property,$tport=135,$timeout=1000,[switch]$port,[switch]$verbose)
Begin{
function TestPort {
Param($srv)
$error.Clear()
$ErrorActionPreference = "SilentlyContinue"
$tcpclient = new-Object system.Net.Sockets.TcpClient
$iar = $tcpclient.BeginConnect($srv,$tport,$null,$null)
$wait = $iar.AsyncWaitHandle.WaitOne($timeout,$false)
# Traps
trap {if($verbose){Write-Host "General Exception"};return $false}
trap [System.Net.Sockets.SocketException]
{
if($verbose){Write-Host "Exception: $($_.exception.message)"}
return $false
}
if(!$wait)
{
$tcpclient.Close()
if($verbose){Write-Host "Connection Timeout"}
return $false
}
else
{
$tcpclient.EndConnect($iar) | out-Null
$tcpclient.Close()
}
if(!$error[0]){return $true}
}
function PingServer {
Param($MyHost)
$pingresult = Get-WmiObject win32_pingstatus -f "address=’$MyHost’"
if($pingresult.statuscode -eq 0) {$true} else {$false}
}
}
Process{
if($_)
{
if($port)
{
if($property)
{
if(TestPort $_.$property){$_}
}
else
{
if(TestPort $_){$_}
}
}
else
{
if($property)
{
if(PingServer $_.$property){$_}
}
else
{
if(PingServer $_){$_}
}
}
}
}

If you want this as a function use this code

function Test-Host{
Param($property,$tport=135,$timeout=1000,[switch]$port,[switch]$verbose)
Begin{
function TestPort {
Param($srv)
$error.Clear()
$ErrorActionPreference = "SilentlyContinue"
$tcpclient = new-Object system.Net.Sockets.TcpClient
$iar = $tcpclient.BeginConnect($srv,$tport,$null,$null)
$wait = $iar.AsyncWaitHandle.WaitOne($timeout,$false)
# Traps
trap {if($verbose){Write-Host "General Exception"};return $false}
trap [System.Net.Sockets.SocketException]
{
if($verbose){Write-Host "Exception: $($_.exception.message)"}
return $false
}
if(!$wait)
{
$tcpclient.Close()
if($verbose){Write-Host "Connection Timeout"}
return $false
}
else
{
$tcpclient.EndConnect($iar) | out-Null
$tcpclient.Close()
}
if(!$error[0]){return $true}
}
function PingServer {
Param($MyHost)
$pingresult = Get-WmiObject win32_pingstatus -f "address=’$MyHost’"
if($pingresult.statuscode -eq 0) {$true} else {$false}
}
}
Process{
if($_)
{
if($port)
{
if($property)
{
if(TestPort $_.$property){$_}
}
else
{
if(TestPort $_){$_}
}
}
else
{
if($property)
{
if(PingServer $_.$property){$_}
}
else
{
if(PingServer $_){$_}
}
}
}
}}

tshell :: May.27.2008 :: All :: No Comments »

Get-CitrixPrinterInfo.ps1 (Citrix Top 10)

This script just collects the Printer Information from all the Servers in the Farm. It will output them to a file or you can pipe them and filter them.

Name: Get-CitrixPrinterInfo.ps1
Purpose: Gets Print Driver Info from all the Servers in the Farm and outputs to file or console

# Get-CitrixPrinterInfo.ps1
# Brandon Shell [MVP]
# www.bsonposh.com
# Gets Print Driver Info from all the Servers in the Farm
Param($Server,$file,[Switch]$help)
function HelpMe{
Write-Host
Write-Host " Get-CitrixPrinterInfo.ps1:" -fore Green
Write-Host " Gets Print Driver Info from all the Servers in the Farm"
Write-Host
Write-Host " Parameters:" -fore Green
Write-Host " -Server : Optional. Server to Get Print Info From "
Write-Host " -File : Optional. File Name to Export Info to"
Write-Host " -Help : Optional. Displays This"
Write-Host
Write-Host " Examples:" -fore Green
Write-Host " Gets Print Info and Exports to File" -fore White
Write-Host " .\Get-CitrixPrinterInfo.ps1 -file MyExportFile.txt" -fore Yellow
Write-Host
Write-Host " Gets Print Drivers from a Specific Server and outputs DriverName and SourceServer" -fore White
Write-Host " .\Get-CitrixPrinterInfo.ps1 <serverName> | ft DriverName,SourceServer" -fore Yellow
Write-Host
}
# Check for Help Flag
if($help){HelpMe;Write-Host;Return}
# Check for File
if($file)
{
if($server) # If -Server was passed we run check just against it and output to screen
{
$mfsrv = new-Object -com "MetaframeCOM.MetaframeServer"
$mfsrv.Initialize(6,$Server.ToUpper())
$mfsrv | foreach{"`n$($_.ServerName) `n$(’-'*20)";$_.PrinterDrivers| Format-Table} | out-File $file -enc ASCII
}
else # We run the check against the whole farm and output results to file
{
$mfarm = new-Object -com "MetaframeCOM.MetaframeFarm"
$mfarm.Initialize(1)
$mfarm.Servers | foreach{"`n$($_.ServerName) `n$(’-'*20)";$_.PrinterDrivers| Format-Table} | out-File $file -enc ASCII
}
}
else
{
if($server) # If -Server was passed we run check just against it and output to screen
{
$mfsrv = new-Object -com "MetaframeCOM.MetaframeServer"
$mfsrv.Initialize(6,$Server.ToUpper())
$mfsrv | foreach{"`n$($_.ServerName) `n$(’-'*20)";$_.PrinterDrivers| Format-Table}
}
else # We run the check against the whole farm and output results to screen
{
$mfarm = new-Object -com "MetaframeCOM.MetaframeFarm"
$mfarm.Initialize(1)
$mfarm.Servers | foreach{"`n$($_.ServerName) `n$(’-'*20)";$_.PrinterDrivers| Format-Table}
}
}

tshell :: Apr.07.2008 :: Citrix, Powershell, Scripting :: No Comments »

How to Manage Multiple Citrix Farms

Chris left a comment on Powershelling Citrix (The Good, Bad, and The Code)

Here is a function that returns a farm object for Server that is passed.

function Get-CitrixFarm {
Param([string]$server)
$type = [system.Type]::GetTypeFromProgID("MetaframeCOM.MetaFrameFarm",$server)
$farm = [system.Activator]::CreateInstance($type)
$farm.Initialize(1)
return $farm
}

Here is an example to find a Server that a User is on.

function Find-CitrixUser {
Param([string]$user,[string]$server,[string]$domain,[switch]$verbose)
$type = [system.Type]::GetTypeFromProgID("MetaframeCOM.MetaframeUser",$server)
$mfuser = [system.Activator]::CreateInstance($type)
$mfuser.Initialize(1,$domain,1,$user)
Write-Host
Write-Host "User: $($mfuser.UserName) found on the Following:"
foreach ($s in $mfuser.Sessions)
{
if($verbose)
{
Write-Host
Write-Host "$($s.ServerName)"
Write-Host "-=-=-=-=-=-"
Write-Host "AppName : $($s.AppName)" -foregroundcolor yellow
Write-Host "SessionName : $($s.SessionName)" -foregroundcolor yellow
Write-Host "SessionID : $($s.SessionID)" -foregroundcolor yellow
Write-Host "ClientAddress : $($s.ClientAddress)" -foregroundcolor yellow
Write-Host "ClientEncryption : $($s.ClientEncryption)" -foregroundcolor yellow
Write-Host
Write-Host "Processes"
Write-Host "========="
foreach ($proc in $s.Processes)
{
Write-Host $proc.ProcessName -foregroundcolor Green
}
Write-host
}
else
{
write-Host " -> $($s.ServerName)"
}
}
}

tshell :: Jun.13.2007 :: Citrix, HowTo, Powershell, Scripting :: No Comments »

Birth of a Script/Function

I know my post have been few and far between, but I have been super swamped at work and will be for a few more months at least.

That said I am writing some scripts and functions for work and as I was writing one today I though maybe I should share how I go about writing a function slash script. I like step-by-step lists so I decided at that format.

1> A purpose
- All Scripts must start with a purpose. Be it install something or check something. It needs to do something.

2> I figure the best process to do what I want
- Can what I want done be remoted?
- Do I use WMI?
- Do I use .NET?
- Do I use external Commands?
- Who is going to be doing it? What rights do they need?
- Does it have potential to break stuff (BIGGY!!!)

3> Write a function or functions that do what I want done on one Server, Device, or file
Example

function Checkhf{
Param($srv,$ptch)
$hf = get-WmiObject Win32_QuickfixEngineering -ComputerName $srv | where-Object{$_.HotfixID -match $ptch}
if($hf)
{
return $true
}
else
{
return $false
}
}

4> Cut and Paste function into my templates (At the bottom of post)
- Add any missing parameters
- Add any extra parsing
- Add error control if needed

5> Now it looks like this

function Check-Hotfix {
Param([string]$server,[string]$hotfix)
Begin{
function PingServer {
param([string]$srv)
$pingresult = Get-WmiObject win32_pingstatus -f "address=’$srv’"
if($pingresult.statuscode -eq 0) {$true} else {$false}
}
function Checkhf{
Param($srv,$ptch)
$hf = get-WmiObject Win32_QuickfixEngineering -ComputerName $srv | where-Object{$_.HotfixID -match $ptch}
if($hf)
{
return $true
}
else
{
return $false
}
}
Write-Host
$process = @()
}
Process{
if($_)
{
if($_.ServerName)
{
$process += $_.ServerName
}
else
{
$process += $_
}
}
}
End{
if($Server){$Process += $Server}
if($process.Length -eq 0){$Process += get-content env:COMPUTERNAME}
foreach($s in $process)
{
if(PingServer $s)
{
$myobj = "" | select-Object Server,Result
$myobj.Server = $s
$myobj.Result = Checkhf -srv $s -ptch $hotfix
Write-Output $myObj
}
}
}
}

6> Final Test

Here are my Templates
- By default they take a Pipe, Server, or File and will process all three

Template for Script

Param([string]$server,[string]$file)
Begin{
function PingServer {
param($srv)
$pingresult = Get-WmiObject win32_pingstatus -f "address=’$srv’"
if($pingresult.statuscode -eq 0) {$true} else {$false}
}
function InsertFunctionHere{
}
Write-Host
$process = @()
}
Process{
if($_)
{
if($_.ServerName)
{
$process += $_.ServerName
}
else
{
$process += $_
}
}
}
End{
# Check if $server is populated and add to Process Array
if($Server){$Process += $Server}
# Check if $file is populated and add to Process Array
if($file)
{
foreach($entry in (get-content $file))
{
$Process += $entry
}
}
# If Process Array is empty… Add self
if($process.Length -eq 0){$Process += get-content env:COMPUTERNAME}
foreach($s in $process)
{
if(pingserver $s)
{
InsertFunctionHere $s
}
Write-Host
}
}

Template for Function

function Verb-Noun {
Param([string]$server,[string]$file)
Begin{
function PingServer {
param($srv)
$pingresult = Get-WmiObject win32_pingstatus -f "address=’$srv’"
if($pingresult.statuscode -eq 0) {$true} else {$false}
}
function InsertFunctionHere{
}
Write-Host
$process = @()
}
Process{
if($_)
{
if($_.ServerName)
{
$process += $_.ServerName
}
else
{
$process += $_
}
}
}
End{
# Check if $server is populated and add to Process Array
if($Server){$Process += $Server}
# Check if $file is populated and add to Process Array
if($file)
{
foreach($entry in (get-content $file))
{
$Process += $entry
}
}
# If Process Array is empty… Add self
if($process.Length -eq 0){$Process += get-content env:COMPUTERNAME}
foreach($s in $process)
{
if(pingserver $s)
{
InsertFunctionHere $s
}
Write-Host
}
}
}

tshell :: Apr.24.2007 :: HowTo, Powershell, functions :: No Comments »

The “Power” of SHELL

Test-Host (WMI Ping -or Port Check)

Get-CitrixPrinterInfo.ps1 (Citrix Top 10)

How to Manage Multiple Citrix Farms

Birth of a Script/Function

Microsoft MVP

Non-Posh Blogs

Recent Posts

Meta

Top OS

Visitors Online

BSonPosh

The “Power” of SHELL

Test-Host (WMI Ping -or Port Check)

Get-CitrixPrinterInfo.ps1 (Citrix Top 10)

How to Manage Multiple Citrix Farms

Birth of a Script/Function

Microsoft MVP

Non-Posh Blogs

Recent Posts

Tags

Meta

Top OS

Visitors Online