mirror of
https://github.com/eworm-de/routeros-scripts.git
synced 2024-05-11 05:55:19 +00:00
global-functions: introduce $MailServerIsUp
This commit is contained in:
@ -34,6 +34,7 @@
|
||||
:global RandomDelay;
|
||||
:global DeviceInfo;
|
||||
:global ScriptInstallUpdate;
|
||||
:global MailServerIsUp;
|
||||
|
||||
# url encoding
|
||||
:set UrlEncode do={
|
||||
@ -436,3 +437,24 @@
|
||||
}
|
||||
/ system script run script-updates;
|
||||
}
|
||||
|
||||
# check if mail server is up
|
||||
:set MailServerIsUp do={
|
||||
:local MailServer [ / tool e-mail get address ];
|
||||
:local MailHost $MailServer;
|
||||
|
||||
:if ([ / tool netwatch print count-only where comment=$MailServer ] = 0) do={
|
||||
:log warn ("Adding netwatch entry for mail server.");
|
||||
:local MailHost $MailServer;
|
||||
:if ([ :typeof [ :toip $MailHost ] ] != "ip" ) do={
|
||||
:set MailHost [ :resolve $MailServer ];
|
||||
}
|
||||
/ tool netwatch add comment=$MailServer host=[ :resolve $MailServer ];
|
||||
}
|
||||
|
||||
:if ([ / tool netwatch get [ find where comment=$MailServer ] status ] = "up") do={
|
||||
:return true;
|
||||
}
|
||||
|
||||
:return false;
|
||||
}
|
||||
|
Reference in New Issue
Block a user