Merge branch 'main' of github.com:fleschutz/PowerShell

scripts/check-hardware.ps1

@@ -15,8 +15,7 @@
 	Author: Markus Fleschutz | License: CC0
 #>
 
-" "
-& "$PSScriptRoot/write-green.ps1" "   H A R D W A R E"
+Write-Host "`n   H A R D W A R E" -foregroundColor green
 & "$PSScriptRoot/check-cpu.ps1"
 & "$PSScriptRoot/check-ram.ps1"
 & "$PSScriptRoot/check-gpu.ps1"

scripts/check-network.ps1

@@ -15,8 +15,7 @@
 	Author: Markus Fleschutz | License: CC0
 #>
 
-" "
-& "$PSScriptRoot/write-green.ps1" "   N E T W O R K"
+Write-Host "`n   N E T W O R K" -foregroundColor green
 & "$PSScriptRoot/ping-remote-hosts.ps1"
 & "$PSScriptRoot/check-firewall"
 & "$PSScriptRoot/check-dns.ps1"

scripts/check-software.ps1

@@ -15,8 +15,7 @@
 	Author: Markus Fleschutz | License: CC0
 #>
 
-" "
-& "$PSScriptRoot/write-green.ps1" "   S O F T W A R E"
+Write-Host "`n   S O F T W A R E" -foregroundColor green
 & "$PSScriptRoot/check-os.ps1"
 & "$PSScriptRoot/check-uptime.ps1"
 & "$PSScriptRoot/check-apps.ps1"

scripts/check-vpn.ps1

@@ -17,9 +17,9 @@ try {
 	if ($IsLinux) {
 		# TODO
 	} else {
-		$Connections = Get-VPNConnection
-		foreach($Connection in $Connections) {
-			Write-Host "✅ VPN to $($Connection.Name) is $($Connection.ConnectionStatus.ToLower())"
+		$connections = Get-VPNConnection
+		foreach($connection in $connections) {
+			Write-Host "✅ VPN to $($connection.Name) is $($connection.ConnectionStatus.ToLower())"
 			$noVPN = $false
 		}
 	}

scripts/ping-local-hosts.ps1

@@ -12,19 +12,20 @@
         Author: Markus Fleschutz | License: CC0
 #>
 
-$names = @('accesspoint','AD','AP','amnesiac','archlinux','auriga','berlin','boston','brother','canon','castor','cisco','echodot','epson','epson2550','epson2815','fedora','fireball','firewall','fritz.box','fritz!repeater','gassensor','gateway','hippo','heizung','hodor','homemanager','io','iphone','jarvis','jenkins','LA','laptop','linux','jupiter','mars','mercury','miami','mobile','none','none-1','none-2','NY','octo','office','officepc','paris','PI','pixel-6a','PC','pluto','printer','proxy','R2D2','raspberry','rocket','rome','router','sentinel','server','shelly','shelly1','smartphone','smartwatch','soundbar','sunnyboy','surface','switch','tablet','tau','tigercat','tolino','TV','ubuntu','vega','venus','xrx','zeus') # sorted alphabetically
-[int]$timeout = 600 # ms ping timeout
+param([int]$timeout = 600) # ms ping timeout
+
 
 try {
 	Write-Progress "Sending pings to the local hosts..."
 
+	$names = @('accesspoint','AD','AP','amnesiac','archlinux','auriga','berlin','boston','brother','canon','castor','cisco','echodot','epson','epson2550','epson2815','fedora','fireball','firewall','fritz.box','fritz!repeater','gassensor','gateway','hippo','heizung','hodor','homemanager','io','iphone','jarvis','jenkins','LA','laptop','linux','jupiter','mars','mercury','miami','mobile','none','none-1','none-2','NY','octo','office','officepc','paris','PI','pixel-6a','PC','pluto','printer','proxy','R2D2','raspberry','rocket','rome','router','sentinel','server','shelly','shelly1','smartphone','smartwatch','soundbar','sunnyboy','surface','switch','tablet','tau','tigercat','tolino','TV','ubuntu','vega','venus','xrx','zeus') # sorted alphabetically
         $queue = [System.Collections.Queue]::new()
 	foreach($name in $names) {
 		$ping = [System.Net.Networkinformation.Ping]::new()
 		$queue.Enqueue( @{Host=$name; Ping=$ping; Async=$ping.SendPingAsync($name, $timeout)} )
         }
 
-	$up = ""
+	[string]$up = ""
 	while ($queue.Count -gt 0) { $obj = $queue.Dequeue()
 		try { if ($obj.Async.Wait($timeout)) {
 				if ($obj.Async.Result.Status -ne "TimedOut") { $up += "$($obj.Host) " }
@@ -34,8 +35,8 @@ try {
 		$queue.Enqueue($obj)
 	}
 
-	Write-Progress -completed "done."
-	Write-Host "✅ Up: $($up)"
+	Write-Progress -completed "Done."
+	Write-Host "✅ Up: $up"
 	exit 0 # success
 } catch {
         "⚠️ Error in line $($_.InvocationInfo.ScriptLineNumber): $($Error[0])"

scripts/scan-network.ps1

@@ -0,0 +1,13 @@
+$a = Get-NetIPAddress | Where-Object -FilterScript { $_.SuffixOrigin -eq "DHCP" -or  $_.SuffixOrigin -eq "manual" } # | Format-Table -property IPAddress -autoSize
+
+$arguments = "-sT -T3" # Set sane defaults for command string
+$location = "nmap" # In case nmap is not in PATH
+$targets = ""
+
+foreach ( $i in $a ) {
+    $s = $i.IPAddress + "/" + $i.PrefixLength
+    $targets = $targets + " " + $s
+}
+$arguments = $arguments + " " + $targets
+
+Start-Process $location -ArgumentList $arguments -Wait