PowerShell: Andres Kõrvemaa, testports.ps1 - Revision history

Akorvema at 12:17, 31 May 2013

2013-05-31T12:17:18Z

← Older revision		Revision as of 15:17, 31 May 2013
Line 3:		Line 3:

	.SYNOPSIS		.SYNOPSIS
	Skript ~~hostide~~ portide avatust vastavalt etteantud hostide ja portide ~~mimekijale~~		Skript kontrollib portide avatust vastavalt etteantud hostide ja portide nimekirjale.

	.DESCRIPTION		.DESCRIPTION

Akorvema at 20:18, 18 January 2012

2012-01-18T20:18:50Z

← Older revision		Revision as of 23:18, 18 January 2012
Line 6:		Line 6:

	.DESCRIPTION		.DESCRIPTION
	Skript kontrollib ~~hosti~~ portide avatust ~~vastavalt parameetritena etteantud nimekrijadele~~.		Skript kontrollib hostide portide avatust/suletust. Hostide ja portide nimekirad antakse ette tekstifailidena.
	Juhul kui hostide või portide nimekija pole ettantud siis skript lõpetab töö.		Juhul kui hostide või portide nimekija pole ettantud siis skript lõpetab töö.
	Kontrollitavale ip aadressile tehakse nimelahendus ja avatud ja suletud pordid kuvatakse erivärviliselt.		Kontrollitavale ip aadressile tehakse nimelahendus ja avatud ja suletud pordid kuvatakse erivärviliselt.

Akorvema at 20:12, 18 January 2012

2012-01-18T20:12:11Z

← Older revision		Revision as of 23:12, 18 January 2012
Line 41:		Line 41:

	$ping = new-object System.Net.NetworkInformation.Ping		$ping = new-object System.Net.NetworkInformation.Ping
			$ErrorActionPreference = "SilentlyContinue"

	foreach ($ip in $hostlist) {		foreach ($ip in $hostlist) {
Line 47:		Line 47:
	# Teeme ip aadressile nimelahenduse		# Teeme ip aadressile nimelahenduse
	$dnsnimi = ([System.Net.Dns]::GetHostByAddress("$ip")).HostName		$dnsnimi = ([System.Net.Dns]::GetHostByAddress("$ip")).HostName
			$ErrorActionPreference = "SilentlyContinue"
	if (! $?){		if (! $?){
	Write-Host "Host:" $ip "- not found" -ForegroundColor Red		Write-Host "Host:" $ip "- not found" -ForegroundColor Red

Akorvema at 20:05, 18 January 2012

2012-01-18T20:05:31Z

← Older revision		Revision as of 23:05, 18 January 2012
Line 49:		Line 49:

	if (! $?){		if (! $?){
	Write-Host "Host:" ~~$dnsnimi~~ $ip "- not found" -ForegroundColor Red		Write-Host "Host:" $ip "- not found" -ForegroundColor Red
	}		}

Akorvema at 20:04, 18 January 2012

2012-01-18T20:04:30Z

← Older revision		Revision as of 23:04, 18 January 2012
Line 45:		Line 45:
	foreach ($ip in $hostlist) {		foreach ($ip in $hostlist) {
	$tulemus = $ping.send($ip)		$tulemus = $ping.send($ip)
			# Teeme ip aadressile nimelahenduse
	$dnsnimi = ([System.Net.Dns]::GetHostByAddress("$ip")).HostName		$dnsnimi = ([System.Net.Dns]::GetHostByAddress("$ip")).HostName

Akorvema at 19:58, 18 January 2012

2012-01-18T19:58:03Z

← Older revision		Revision as of 22:58, 18 January 2012
Line 8:		Line 8:
	Skript kontrollib hosti portide avatust vastavalt parameetritena etteantud nimekrijadele.		Skript kontrollib hosti portide avatust vastavalt parameetritena etteantud nimekrijadele.
	Juhul kui hostide või portide nimekija pole ettantud siis skript lõpetab töö.		Juhul kui hostide või portide nimekija pole ettantud siis skript lõpetab töö.
	Kontrollitavale ip aadressile tehakse nimelahendus ja avatud ja suletud pordid kuvatakse erivärviliselt.		Kontrollitavale ip aadressile tehakse nimelahendus ja avatud ja suletud pordid kuvatakse erivärviliselt.
	Avatud pordid on tulemuses rohelist värvi ja suletud punast värvi.		Avatud pordid on tulemuses rohelist värvi ja suletud punast värvi.

	.EXAMPLE		.EXAMPLE

Akorvema at 19:57, 18 January 2012

2012-01-18T19:57:34Z

← Older revision	Revision as of 22:57, 18 January 2012
Line 1:	Line 1:
		<source lang="powershell">
		<#

		.SYNOPSIS
		Skript hostide portide avatust vastavalt etteantud hostide ja portide mimekijale

		.DESCRIPTION
		Skript kontrollib hosti portide avatust vastavalt parameetritena etteantud nimekrijadele.
		Juhul kui hostide või portide nimekija pole ettantud siis skript lõpetab töö.
		Kontrollitavale ip aadressile tehakse nimelahendus ja avatud ja suletud pordid kuvatakse erivärviliselt.
		Avatud pordid on tulemuses rohelist värvi ja suletud punast värvi.

		.EXAMPLE
		./testports.ps1 hostlist.txt portlist.txt

		.VERSION
		0.2

		.NOTES
		Autor: Andres Kõrvemaa

		#>


		# Deklareerime parameetrid
		param([string]$hostid,[string]$pordid)
		# Kontrollime Hostide nimekirja olemasolu
		if ($hostid -eq ""){
		Write-Host "Hostide nimekirja pole määratud! " -ForegroundColor Yellow
		break
		}
		# Kontrollime portide nimekirja olemasolu
		If ($pordid -eq ""){
		Write-Host "Portide nimekirja parameetrit pole määratud !!" -ForegroundColor Yellow
		break
		}
		# Loeme failist sisse hostid
		[Array]$hostlist = Get-Content $hostid
		# Loeme failist sisse pordid
		[Array]$ports = Get-Content $pordid

		$ping = new-object System.Net.NetworkInformation.Ping


		foreach ($ip in $hostlist) {
		$tulemus = $ping.send($ip)
		$dnsnimi = ([System.Net.Dns]::GetHostByAddress("$ip")).HostName

		if (! $?){
		Write-Host "Host:" $dnsnimi $ip "- not found" -ForegroundColor Red
		}


		else {
		if ($tulemus.status.tostring() –eq “Success”) {

		write-host $dnsnimi $ip "- Ports: " -foregroundColor Yellow -NoNewline
		foreach ($port in $ports){
		$socket = new-object System.Net.Sockets.TcpClient($ip, $port)
		if ($socket –eq $null) {
		write-host "$port," -ForegroundColor Red -NoNewline
		}
		else {
		write-host "$port,"-foregroundcolor Green -NoNewline
		$socket = $null
		}
		}
		}
		else {
		write-host "Host: $ip - down" -ForegroundColor Red
		}
		}
		Write-Host ""
		}
		$ping = $null






		</source>

Akorvema: Blanked the page

2012-01-18T19:53:39Z

Blanked the page

← Older revision		Revision as of 22:53, 18 January 2012
Line 1:		Line 1:
	<#

	~~.SYNOPSIS~~
	~~Skript hostide portide avatust vastavalt etteantud hostide ja portide mimekijale~~

	~~.DESCRIPTION~~
	~~Skript kontrollib hosti portide avatust vastavalt parameetritena etteantud nimekrijadele.~~
	~~Juhul kui hostide või portide nimekija pole ettantud siis skript lõpetab töö.~~
	~~Kontrollitavale ip aadressile tehakse nimelahendus ja avatud ja suletud pordid kuvatakse erivärviliselt.~~
	~~Avatud pordid on tulemuses rohelist värvi ja suletud punast värvi.~~

	~~.EXAMPLE~~
	~~./testports.ps1 hostlist.txt portlist.txt~~

	~~.VERSION~~
	~~0.2~~

	~~.NOTES~~
	~~Autor: Andres Kõrvemaa~~

	#>


	~~# Deklareerime parameetrid~~
	~~param([string]$hostid,[string]$pordid)~~
	~~# Kontrollime Hostide nimekirja olemasolu~~
	~~if ($hostid -eq ""){~~
	~~Write-Host "Hostide nimekirja pole määratud! " -ForegroundColor Yellow~~
	~~break~~
	}
	~~# Kontrollime portide nimekirja olemasolu~~
	~~If ($pordid -eq ""){~~
	~~Write-Host "Portide nimekirja parameetrit pole määratud !!" -ForegroundColor Yellow~~
	~~break~~
	}
	~~# Loeme failist sisse hostid~~
	~~[Array]$hostlist = Get-Content $hostid~~
	~~# Loeme failist sisse pordid~~
	~~[Array]$ports = Get-Content $pordid~~

	~~$ping = new-object System.Net.NetworkInformation.Ping~~


	~~foreach ($ip in $hostlist) {~~
	~~$tulemus = $ping.send($ip)~~
	~~$dnsnimi = ([System.Net.Dns]::GetHostByAddress("$ip")).HostName~~

	~~if (! $?){~~
	~~Write-Host "Host:" $dnsnimi $ip "- not found" -ForegroundColor Red~~
	}


	~~else {~~
	~~if ($tulemus.status.tostring() –eq “Success”) {~~

	~~write-host $dnsnimi $ip "- Ports: " -foregroundColor Yellow -NoNewline~~
	~~foreach ($port in $ports){~~
	~~$socket = new-object System.Net.Sockets.TcpClient($ip, $port)~~
	~~if ($socket –eq $null) {~~
	~~write-host "$port," -ForegroundColor Red -NoNewline~~
	}
	~~else {~~
	~~write-host "$port,"-foregroundcolor Green -NoNewline~~
	~~$socket = $null~~
	}
	}
	}
	~~else {~~
	~~write-host "Host: $ip - down" -ForegroundColor Red~~
	}
	}
	~~Write-Host ""~~
	}
	~~$ping = $null~~

Akorvema: Created page with '<# .SYNOPSIS Skript hostide portide avatust vastavalt etteantud hostide ja portide mimekijale .DESCRIPTION Skript kontrollib hosti portide avatust vastavalt parameetr…'

2012-01-18T19:53:20Z

Created page with '<# .SYNOPSIS Skript hostide portide avatust vastavalt etteantud hostide ja portide mimekijale .DESCRIPTION Skript kontrollib hosti portide avatust vastavalt parameetr…'

New page

<#

.SYNOPSIS
Skript hostide portide avatust vastavalt etteantud hostide ja portide mimekijale

.DESCRIPTION
Skript kontrollib hosti portide avatust vastavalt parameetritena etteantud nimekrijadele.
Juhul kui hostide või portide nimekija pole ettantud siis skript lõpetab töö.
Kontrollitavale ip aadressile tehakse nimelahendus ja avatud ja suletud pordid kuvatakse erivärviliselt.
Avatud pordid on tulemuses rohelist värvi ja suletud punast värvi.

.EXAMPLE
./testports.ps1 hostlist.txt portlist.txt

.VERSION
0.2

.NOTES
Autor: Andres Kõrvemaa

#>

# Deklareerime parameetrid
param([string]$hostid,[string]$pordid)
# Kontrollime Hostide nimekirja olemasolu
if ($hostid -eq ""){
Write-Host "Hostide nimekirja pole määratud! " -ForegroundColor Yellow
break
}
# Kontrollime portide nimekirja olemasolu
If ($pordid -eq ""){
Write-Host "Portide nimekirja parameetrit pole määratud !!" -ForegroundColor Yellow
break
}
# Loeme failist sisse hostid
[Array]$hostlist = Get-Content $hostid
# Loeme failist sisse pordid
[Array]$ports = Get-Content $pordid

$ping = new-object System.Net.NetworkInformation.Ping

foreach ($ip in $hostlist) {
$tulemus = $ping.send($ip)
$dnsnimi = ([System.Net.Dns]::GetHostByAddress("$ip")).HostName

if (! $?){
Write-Host "Host:" $dnsnimi $ip "- not found" -ForegroundColor Red
}

else {
if ($tulemus.status.tostring() –eq “Success”) {

write-host $dnsnimi $ip "- Ports: " -foregroundColor Yellow -NoNewline
foreach ($port in $ports){
$socket = new-object System.Net.Sockets.TcpClient($ip, $port)
if ($socket –eq $null) {
write-host "$port," -ForegroundColor Red -NoNewline
}
else {
write-host "$port,"-foregroundcolor Green -NoNewline
$socket = $null
}
}
}
else {
write-host "Host: $ip - down" -ForegroundColor Red
}
}
Write-Host ""
}
$ping = $null