Мониторинг на наличността на хостове на Powershell

На всички пожелавам добър ден, искам да споделя проста инструкция «Как да спрем ръчно да пингваме десет хоста. Без регистрация и SMS!».

От пространствата на Интернет

Важно: аз не съм програмист и не съм системен администратор, но ми се налага да работя едновременно с голям набор сървъри и услуги и този скрипт го написах за собствено удобство.

На всички, на които това може да е полезно любопитно, моля, следвайте по-долу.

Защо PowershellИмам опит в писането на прости програми на Python, но той изисква или инсталиран интерпретатор, или права за стартиране на .exe, което, в рамките на моята работа, не винаги е възможно. А скрипт на Powershell по-често намира възможност да се стартира.

Не всички обичат конзолата/терминала

Мисля, че в това няма противоречие, в противен случай всички все още щяха да ползват конзолни имейл клиенти и в *nix-системите да не се е появявал графичен интерфейс.

Тъй като в ежедневието ми често се налага да използвам Powershell доста примитивно, първоначално се опитах да разбера дали мога да му добавя GUI. Оказва се, че е възможно и даже доста лесно:

Add-Type -assembly System.Windows.Forms #Свързваме библиотеката
$main_form = New-Object System.Windows.Forms.Form #Създаваме обект с нашето "прозорец"

#Задаваме параметрите му
$main_form.Text ='Links up' #Име в заглавието
$main_form.Width = 300 #Ширина на прозореца
$main_form.Height = 200 #Височина на прозореца
$main_form.AutoSize = $true #Даваме му възможност да променя размера, ако е необходимо
$main_form.ShowDialog() #Извикваме "прозореца"

Добавяне на елемент за изход и получаване на елементарно Windows-прозорец тавтология?.

Add-Type -assembly System.Windows.Forms # Свързваме библиотеката

$main_form = New-Object System.Windows.Forms.Form # Създаваме променлива с нашето "прозорец"

# Задаваме параметри на прозореца
$main_form.Text ='Links up' # Име на заглавието
$main_form.Width = 300 # Ширина на прозореца
$main_form.Height = 200 # Височина на прозореца
$main_form.AutoSize = $true # Позволяваме да променя размерите си, ако е необходимо

$Label = New-Object System.Windows.Forms.Label # Всички елементи на формата ще бъдат записвани в променливи, но всъщност това са обекти, както всяка друга променлива в PowerShell
$Label.Text = "Здравей! Аз съм обикновен Windows прозорец, а какво постигна ти?" # Показван текст
$Label.Location  = New-Object System.Drawing.Point(10,65) # Позиция на обекта вътре в формата по хоризонтал и вертикал (x,y)
$Label.AutoSize = $true 

$main_form.Controls.Add($Label) # Добавяме създадения обект към формата, за да не се загуби по време на изпълнение на скрипта

$main_form.ShowDialog() # Извикваме прозореца

Добавяме динамика

Този инструмент, с който "пингвах Яндекс" и монтирах *.iso, вече има отделен GUI, но това е недостатъчно. По подобен начин можем да изведем информация за наличността, но за мониторинг ще трябва всеки път да рестартираме скрипта.

Първо ще нарисуваме две иконки и ще добавим възможност за показване на изображения.

$PictureBox = New-Object system.Windows.Forms.PictureBox #Обектът за извеждане на изображения е напълно логичен
$PictureBox.width = 10
$PictureBox.height = 10
$PictureBox.location = New-Object System.Drawing.Point(178,12)

#Тук преминаваме към въпроса — свързваме извежданото изображение с резултата от проверката за достъпност на възел, използвайки командлета
#<b>test-connection</b>, където:
#-Count - задава броя на заявките
#-computer - IP адрес или домейно име за заявката
#-quiet - за да получим само Boolean стойност
if ((test-connection -Count 1 -computer ya.ru -quiet) -eq $True) {
	$PictureBox.imageLocation = "C:Testyes.png" #Обектът се обръща към съответната картинка 
}
Else {
	$PictureBox.imageLocation = "C:Testno.png" #Обектът се обръща към съответната картинка 
}
$PictureBox.SizeMode = [System.Windows.Forms.PictureBoxSizeMode]::zoom

$main_form.Controls.Add($PictureBox)

Отново нашите DNS-сервери правят проблеми…

И ще добавим бутон, за да можем да обновяваме показанията.

$Button = New-Object System.Windows.Forms.Button
$Button.Location = New-Object System.Drawing.Size(100,150) 
$Button.Size = New-Object System.Drawing.Size(80,30)
$Button.Text = "Презареди"

# Прикачваме събитие при натискането на бутона, за да се обърнем към всеки PictureBox съгласно описаната преди логика
$Button.Add_Click({ 
	if ((Test-Connection -Count 1 -computer ya.ru -quiet) -eq $True)
		{$PictureBox.imageLocation	= "C:Testyes.png"}
	Else {$PictureBox.imageLocation	= "C:Testno.png"}
	  
	if ((Test-Connection -Count 1 -computer 8.8.8.8 -quiet) -eq $True)
		{$PictureBox1.imageLocation	= "C:Testyes.png"}
	Else {$PictureBox1.imageLocation	= "C:Testno.png"}
 	})

$main_form.Controls.Add($Button)

Прекрасно, вече в продукция!?

След като ръчно зададох около половин дузина хостове, осъзнах нещо — този проект ще приключи, хостовете ще се сменят и всеки път ще трябва да променям скрипта. От една страна, не е страшно, това е решение за мен. От друга страна, погледнете какво се получава:

Зрелище не за слабонервни

Add-Type -assembly System.Windows.Forms #Свързваме библиотеката

$main_form = New-Object System.Windows.Forms.Form #Създаваме променлива с нашето "прозорче"

#Задаваме параметрите му
$main_form.Text ='Links up' #Име в заглавието
$main_form.Width = 300 #Ширина на прозореца
$main_form.Height = 200 #Височина на прозореца
$main_form.AutoSize = $true #Позволяваме му да променя размера си, ако е необходимо

$Label = New-Object System.Windows.Forms.Label #Всички елементи на формата ще се записват в променливи, но по същество това са обекти, подобно на всяка друга променлива в Powershell
$Label.Text = "ya.ru		............................" #Текст за извеждане 
$Label.Location  = New-Object System.Drawing.Point(15,10) #Позиция на обекта в рамките на формата по хоризонтала и вертикала (x,y)
$Label.AutoSize = $true 

$Label1 = New-Object System.Windows.Forms.Label #Всички елементи на формата ще се записват в променливи, но по същество това са обекти, подобно на всяка друга променлива в Powershell
$Label1.Text = "8.8.8.8		............................" #Текст за извеждане на Google DNS адрес
$Label1.Location  = New-Object System.Drawing.Point(15,30) #Позиция на обекта в рамките на формата по хоризонтала и вертикала (x,y)
$Label1.AutoSize = $true 

$Label2 = New-Object System.Windows.Forms.Label
$Label2.Text = "192.168.x.x	............................"
$Label2.Location  = New-Object System.Drawing.Point(15,50)
$Label2.AutoSize = $true

$Label3 = New-Object System.Windows.Forms.Label
$Label3.Text = "192.168.x.x	............................"
$Label3.Location  = New-Object System.Drawing.Point(15,70)
$Label3.AutoSize = $true

$Label4 = New-Object System.Windows.Forms.Label
$Label4.Text = "10.0.x.x	 ............................"
$Label4.Location  = New-Object System.Drawing.Point(15,90)
$Label4.AutoSize = $true

$Label5 = New-Object System.Windows.Forms.Label
$Label5.Text = "162.102.x.x	 ............................"
$Label5.Location  = New-Object System.Drawing.Point(15,110)
$Label5.AutoSize = $true

$PictureBox = New-Object system.Windows.Forms.PictureBox #Обект за извеждане на изображенията, наречен логично
$PictureBox.width = 10
$PictureBox.height = 10

#Тук привързваме изображението, което ще се показва, към резултата от проверката за достъпност на възела, използвайки командлет
#<b>test-connection</b>, където:
#-Count - предава броя на заявките
#-computer - IP адрес или доменно име за заявка
#-quiet - за да получим само Boolean стойност
$PictureBox.location = New-Object System.Drawing.Point(235,12)
if ((test-connection -Count 1 -computer ya.ru -quiet) -eq $True) {
	$PictureBox.imageLocation = "C:Testyes.png" #Обектът обраща към съответната картинка 
}
Else {
	$PictureBox.imageLocation = "C:Testno.png" #Обектът обраща към съответната картинка 
}
$PictureBox.SizeMode = [System.Windows.Forms.PictureBoxSizeMode]::zoom

$PictureBox1 = New-Object system.Windows.Forms.PictureBox #Обект за извеждане на изображения, наречен логично
$PictureBox1.width = 10
$PictureBox1.height = 10
$PictureBox1.location = New-Object System.Drawing.Point(235,32)
if ((test-connection -Count 1 -computer 8.8.8.8 -quiet) -eq $True) {
	$PictureBox1.imageLocation = "C:Testyes.png" #Обектът обраща към съответната картинка 
}
Else {
	$PictureBox1.imageLocation = "C:Testno.png" #Обектът обраща към съответната картинка 
}
$PictureBox1.SizeMode = [System.Windows.Forms.PictureBoxSizeMode]::zoom

$PictureBox2 = New-Object system.Windows.Forms.PictureBox #Обект за извеждане на изображения, наречен логично
$PictureBox2.width = 10
$PictureBox2.height = 10
$PictureBox2.location = New-Object System.Drawing.Point(235,52)
if ((test-connection -Count 1 -computer 192.168.x.x -quiet) -eq $True) {
	$PictureBox2.imageLocation = "C:Testyes.png" #Обектът обраща към съответната картинка 
}
Else {
	$PictureBox2.imageLocation = "C:Testno.png" #Обектът обраща към съответната картинка 
}
$PictureBox2.SizeMode = [System.Windows.Forms.PictureBoxSizeMode]::zoom

$PictureBox3 = New-Object system.Windows.Forms.PictureBox #Обект за извеждане на изображения, наречен логично
$PictureBox3.width = 10
$PictureBox3.height = 10
$PictureBox3.location = New-Object System.Drawing.Point(235,72)
if ((test-connection -Count 1 -computer 192.168.x.x -quiet) -eq $True) {
	$PictureBox3.imageLocation = "C:Testyes.png" #Обектът обраща към съответната картинка 
}
Else {
	$PictureBox3.imageLocation = "C:Testno.png" #Обектът обраща към съответната картинка 
}
$PictureBox3.SizeMode = [System.Windows.Forms.PictureBoxSizeMode]::zoom

$PictureBox4 = New-Object system.Windows.Forms.PictureBox #Обект за извеждане на изображения, наречен логично
$PictureBox4.width = 10
$PictureBox4.height = 10
$PictureBox4.location = New-Object System.Drawing.Point(235,92)
if ((test-connection -Count 1 -computer 10.0.x.x -quiet) -eq $True) {
	$PictureBox4.imageLocation = "C:Testyes.png" #Обектът обраща към съответната картинка 
}
Else {
	$PictureBox4.imageLocation = "C:Testno.png" #Обектът обраща към съответната картинка 
}
$PictureBox1.SizeMode = [System.Windows.Forms.PictureBoxSizeMode]::zoom

$PictureBox5 = New-Object system.Windows.Forms.PictureBox #Обект за извеждане на изображения, наречен логично
$PictureBox5.width = 10
$PictureBox5.height = 10
$PictureBox5.location = New-Object System.Drawing.Point(235,112)
if ((test-connection -Count 1 -computer 162.102.x.x -quiet) -eq $True) {
	$PictureBox5.imageLocation = "C:Testyes.png" #Обектът обраща към съответната картинка 
	}
Else {
	$PictureBox5.imageLocation = "C:Testno.png" #Обектът обраща към съответната картинка 
	}
$PictureBox5.SizeMode = [System.Windows.Forms.PictureBoxSizeMode]::zoom

$Button = New-Object System.Windows.Forms.Button
$Button.Location = New-Object System.Drawing.Size(100,150) 
$Button.Size = New-Object System.Drawing.Size(80,30)
$Button.Text = "Презареди"

# Задаваме събитие на натиск на бутона, което извиква всеки PictureBox според описаната логика
$Button.Add_Click({ 
	if ((Test-Connection -Count 1 -computer ya.ru -quiet) -eq $True)
		{$PictureBox.imageLocation	= "C:Testyes.png"}
	Else {$PictureBox.imageLocation	= "C:Testno.png"}
	  
	if ((Test-Connection -Count 1 -computer 8.8.8.8 -quiet) -eq $True)
		{$PictureBox1.imageLocation	= "C:Testyes.png"}
	Else {$PictureBox1.imageLocation	= "C:Testno.png"}

	if ((Test-Connection -Count 1 -computer 192.168.x.x -quiet) -eq $True)
		{$PictureBox2.imageLocation	= "C:Testyes.png"}
	Else {$PictureBox2.imageLocation	= "C:Testno.png"}

	if ((Test-Connection -Count 1 -computer 192.168.x.x -quiet) -eq $True)
		{$PictureBox3.imageLocation	= "C:Testyes.png"}
	Else {$PictureBox3.imageLocation	= "C:Testno.png"}

	if ((Test-Connection -Count 1 -computer 10.0.x.x -quiet) -eq $True)
		{$PictureBox4.imageLocation	= "C:Testyes.png"}
	Else {$PictureBox4.imageLocation	= "C:Testno.png"}

	if ((Test-Connection -Count 1 -computer 162.102.x.x -quiet) -eq $True)
		{$PictureBox5.imageLocation	= "C:Testyes.png"}
	Else {$PictureBox5.imageLocation	= "C:Testno.png"}
	})

$main_form.Controls.Add($Label) #добавяме създадения обект към формата, за да не се загуби при изпълнението на скрипта
$main_form.Controls.Add($Label1)
$main_form.Controls.Add($Label2)
$main_form.Controls.Add($Label3)
$main_form.Controls.Add($Label4)
$main_form.Controls.Add($Label5)
$main_form.Controls.Add($PictureBox)
$main_form.Controls.Add($PictureBox1)
$main_form.Controls.Add($PictureBox2)
$main_form.Controls.Add($PictureBox3)
$main_form.Controls.Add($PictureBox4)
$main_form.Controls.Add($PictureBox5)
$main_form.Controls.Add($Button)

$main_form.ShowDialog() #извикваме елементарния прозорец

Дори ако спазваме чистота и се придържаме към структурата, периодичното редактиране ще предизвиква не най-приятните усещания.

Първо изнасяме проверката за достъпност в отделна функция, а пътя към каталога в отделна променлива:

$script_path	= "C:TestPS ping"

#Преминаваме към функцията с вече съществуващия обект PictureBox и IP адреса, който трябва да проверим.
#На изхода променя зарежданото изображение.
function get_status($PictureBox,$path_ip) {
	if ((Test-Connection -Count 1 -computer $path_ip -quiet) -eq $True)
		{$PictureBox.imageLocation	= $script_path + "yes.png"}
	Else {$PictureBox.imageLocation	= $script_path + "no.png"} 
	}

Изнасяме данните за хоста във външен файл path.txt, записвайки ги във вида «ip/host-functional-name/», а в документа ще ги приемем в масиви. Ще направим и изчислението на Y позицията по-автоматизирано. Това ни дава възможност да създаваме Label`и и checkbox`и с извикване на функцията:

#создаем описательную линию, на вход идут: объект Label, IP-адресс, описание и позиция по оси Y
Function Create_line($label,$path_ip,$caption, $top){ 
	$label.Location = New-Object System.Drawing.Point(1, $top)
	$label.text = $path_ip+$caption
	$label.font = $font
	$Label.AutoSize = $true
	}
#создаем индикатор для описательной линию, на вход идут: объект PictureBox, IP-адресс и позиция по оси Y
Function Create_link($PictureBox,$path_ip, $top){ 
	$PictureBox.width	= 10
	$PictureBox.height	= 10
	$PictureBox.location	= New-Object System.Drawing.Point(210,$top)
	get_status -PictureBox $PictureBox -path_ip $path_ip
	$PictureBox.SizeMode	= [System.Windows.Forms.PictureBoxSizeMode]::zoom
	}

$line = Get-content -LiteralPath $script_path"path.txt" #вытаскиваем данные о необходимых хостах
$len = $line.Length	#вычисляем длину, а точнее массив длин каждой строки

$i = 0

#далее объявляем массивы которые понадобятся дальше
$ip = @()	#массив ip
$capt = @()	#массив описания
$Labels =@()	#массив Label
$PictureBoxs =@()	#массив PictureBox

while($i -lt $len){
	$f = $line[$i].IndexOf("/") #вычисляем позицию начала описания
	$l = $line[$i].LastIndexOf("/")	#вычисляем позицию конца описания
	$ip += $line[$i].Substring(0,$f)	#вытаскиваем ip
	$capt += $line[$i].Substring($f+1,$l-$f-1)	#вытаскиваем описание

	#создаем поле Label
	Create_line -label ($label_obj = New-Object System.Windows.Forms.Label) -path_ip $ip[$i] -caption $capt[$i] -top $label_from_top
	#создаем поле PictureBox
	Create_link -PictureBox ($PictureBox_obj = New-Object system.Windows.Forms.PictureBox) -path_ip $ip[$i] -top $label_from_top

	$label_from_top += 15	#делаем "шаг" по оси Y

	$Labels	+= $label_obj	#вносим созданный Label в общий массив
	$PictureBoxs	+= $PictureBox_obj	#вносим созданный PictureBox в общий массив
	$main_form.Controls.Add($Labels[$i])
	$main_form.Controls.Add($PictureBoxs[$i])
	$i	+=1
	}

Добавяме място за извеждане на времето на последната проверка, защото е удобно, и малко ще допълним действието при натискане на бутона.

$Label0	= New-Object System.Windows.Forms.Label
$Label0.Text	= Get-Date
$Label0.Location	= New-Object System.Drawing.Point(80,180)
$Label0.AutoSize	= $true
$main_form.Controls.Add($Label0)
$Button.Add_Click({ 
	while($i -lt $len){
		get_status -PictureBox $PictureBoxs[$i] -path_ip $ip[$i]
		$i +=1
		}
	$Label0.Text	= Get-Date 
	})

Също така добавих малка функция, която при открит недостъпен хост не само променя индикатора, но и вика от високоговорителите.

Add-Type -AssemblyName System.Speech
$voice	= New-Object System.Speech.Synthesis.SpeechSynthesizer
$voice.Rate	= 5
$voice.Speak("Внимание! Внимание! Сървърът е под атака!")

След няколко украсителни елемента и подреждане в четим и удобен вид, стана така:

Пълния код на скрипта

Add-Type -AssemblyName System.Speech
Add-Type -assembly System.Windows.Forms

$script_path	= "C:PS ping"
$label_from_top	= 10
$voice	= New-Object System.Speech.Synthesis.SpeechSynthesizer
$voice.Rate	= 5

# Преход към функция с уже созданным объектом PictureBox и IP-адресом, который нужно проверить.
# На выходе она изменяет загружаемую картинку.
function get_status($PictureBox,$path_ip) {
	if ((Test-Connection -Count 1 -computer $path_ip -quiet) -eq $True) {
		$PictureBox.imageLocation	= $script_path + "yes.png"
		}
	Else {
		$PictureBox.imageLocation	= $script_path + "no.png"
		$voice.Speak("Грешка! Хост " + $path_ip + ", недостъпен!")
		}
	}

# Създаваме описателен ред, на вход идват: обект Label, IP-адрес, описание и позиция по ос Y
Function Create_line($label,$path_ip,$caption, $top){ 
	$label.Location	= New-Object System.Drawing.Point(1, $top)
	$label.text	= $path_ip+$caption
	$label.font	= $font
	$Label.AutoSize	= $true
	}

# Създаваме индикатор за описателен ред, на вход идват: обект PictureBox, IP-адрес и позиция по ос Y
Function Create_link($PictureBox,$path_ip, $top){ 
	$PictureBox.width	= 10
	$PictureBox.height	= 10
	$PictureBox.location	= New-Object System.Drawing.Point(210,$top)
	get_status -PictureBox $PictureBox -path_ip $path_ip
	$PictureBox.SizeMode	= [System.Windows.Forms.PictureBoxSizeMode]::zoom
	}

$main_form	= New-Object System.Windows.Forms.Form
$main_form.Text ='Линкове нагоре' # Име в заглавието
$main_form.Width = 300 # Ширина на прозореца
$main_form.Height = 200 # Височина на прозореца
$main_form.AutoSize = $true # Даваме му възможност самостоятелно да променя размера, при необходимост
$main_form.TopMost	= $true # Това е много важна част, тя дава възможност за закрепване на прозореца над другите

$line = Get-content -LiteralPath $script_path"path.txt" # Извличаме данни за необходимите хостове
$len = $line.Length	# Изчисляваме дължината, а точното масиви дължина на всеки ред

$i = 0

# По-нататък обявяваме масиви, които ще са нужни по-късно
$ip	= @()	# Масив ip
$capt	= @()	# Масив описание
$Labels	=@()	# Масив Label
$PictureBoxs	=@()	# Масив PictureBox

while($i -lt $len){
	$f	= $line[$i].IndexOf("/") # Изчисляваме позицията на началото на описанието
	$l	= $line[$i].LastIndexOf("/")	# Изчисляваме позицията на края на описанието
	$ip	+= $line[$i].Substring(0,$f)	# Извличаме ip
	$capt	+= $line[$i].Substring($f+1,$l-$f-1)	# Извличаме описание

	# Създаваме поле Label
	Create_line -label ($label_obj = New-Object System.Windows.Forms.Label) -path_ip $ip[$i] -caption $capt[$i] -top $label_from_top
	# Създаваме поле PictureBox
	Create_link -PictureBox ($PictureBox_obj = New-Object system.Windows.Forms.PictureBox) -path_ip $ip[$i] -top $label_from_top

	$label_from_top	+= 15	# Правим "стъпка" по ос Y

	$Labels	+= $label_obj	# Вносим създадения Label в общия масив
	$PictureBoxs	+= $PictureBox_obj	# Вносим създадения PictureBox в общия масив
	$main_form.Controls.Add($Labels[$i])
	$main_form.Controls.Add($PictureBoxs[$i])
	$i	+=1
}

# Това поле с последното време на проверка
$Label0	= New-Object System.Windows.Forms.Label
$Label0.Text	= Get-Date
$Label0.Location	= New-Object System.Drawing.Point(80,180)
$Label0.AutoSize	= $true


# Вешаме на събитие натискане на бутона извикване на всеки PictureBox съгласно предварително описаната логика
$Button	= New-Object System.Windows.Forms.Button
$Button.Location	= New-Object System.Drawing.Size(100,200)
$Button.Size	= New-Object System.Drawing.Size(80,30)
$Button.Text	= "Презареди"

$Button.Add_Click({ 
	while($i -lt $len){
		get_status -PictureBox $PictureBoxs[$i] -path_ip $ip[$i]
		$i	+=1
		}
	$i	= 0
	$Label0.Text	= Get-Date 
})

$main_form.Controls.Add($Button)
$main_form.Controls.Add($Label0)

$main_form.ShowDialog()

Следсловие

Надявам се този туториал да бъде полезен на някого. Ако вие сте го правили от малък, поздравления, аз не съм. Но съм готов да изслушам вашите коментари и предложения.

За мен беше приятно да се поровя и да събера такава малка, но полезна утилита. В плановете ми е да реализирам добавяне и изтриване на възли от GUI, както и да направя автоматично обновление на статусите без необходимост от натискане на бутон, за да не блокира „powershell.exe“.

Последната версия на скрипта е на GitHub

Източник: habr.com