İstədiklərinizdən sonra sizi təbrik edirəm. Bu mövzu əvvəlkindən daha yaxşıdır .
Ümumilikdə, iş prinsipi dəyişməz qaldı, yalnız indi heç bir gecikmə olmadan dərhal yerinə yetirilir.
Skripti Mikrotik-ə yükləyirik, BotID və ChatID-i özümüzə dəyişirik və onun üçün zaman cədvəli yaradırıq. 'Start Time' parametrini startup olaraq təyin edirik (Skripti işə salarkən çalışdırmaq).
'Interval': 00:00:00
Qalan hər şey əvvəlki kimi qaldı.
Telegram-v2
:delay 10
:global mtIdentity [
/system identity get name];
:global botID "botXXXXXXXXX:XXXXXXXXXXXXXXXXXXXXXXXXX" ;
:global myChatID "YYYYYY" ;
:local chatId 0;
:local messageId 0;
:local parse do={
:local startLoc ([:find $content $variable -1] + [:len $variable] + 2);
:local commaLoc ([:find $content "," $startLoc] - 1 + 1);
:local braceLoc ([:find $content "}" $startLoc] - 1 + 1);
:local endLoc $commaLoc;
:local startSymbol [:pick $content $startLoc]
:if ($braceLoc != 0 and ($commaLoc = 0 or $braceLoc < $commaLoc)) do={
:set endLoc $braceLoc;
};
:if ($startSymbol = "{") do={
:set endLoc ($braceLoc + 1);
};
:if ($quotas = true) do={
:set startLoc ($startLoc + 1);
:set endLoc ($endLoc - 1);
}
:if ($endLoc 30) do={
:set messageId ([$parse content=$content variable="update_id"] + 1)
:local message [$parse content=$content variable="text" quotas=true]
:local chat [$parse content=$content variable="chat"]
:local chatId [$parse content=$chat variable="id"]
:if (($chatId = $myChatID) and [/system script find name=$message] != "") do={
:system script run $message;
} else={
:tool fetch url=("https://api.telegram.org/$botID/sendmessage?chat_id=$chatId&text=$mtIdentity: Unknown command: $message") keep-result=no
}
}
} on-error={}
};Bir neçə il istifadədən sonra bir problem aşkar edildi, anlaşılmaz səbəblərdən zəif Mikrotik-lər skripti dayandırır, daha güclüləri isə fasiləsiz işləyir.
Bu məqsədlər üçün WatchDog adlı bir düzəliş yazdım. Burada skript adını yuxarıda göstərdiyimiz adla dəyişirik. Yenidən başlama intervalını 5 dəqiqə olaraq təyin edirik. Hər 5 dəqiqədən bir bizim "watchdog" skripti yoxlayacaq və əgər o işləmirsə, işə salacaq.
WatchDogT.me
:global scriptname "t.me"
:if ([:len [/system script job find script="$scriptname"]] > 0) do={
:log info "$scriptname Zaten İşləyir - davam etmədən əvvəl köhnə skripti öldür"
:foreach counter in=[/system script job find script="$scriptname"] do={
/system script job remove $counter
}
}
/system script run $scriptnameVə sonda, skript Mikrotik forumundan götürülmüşdür.
Bizə mühüm mövzuları logdan teleqramda göndərir.
Skripti cədvələ yükləyirik və yenidən başlama intervalını hər 5 dəqiqədən bir təyin edirik, BotID və ChatID-i özümüzə dəyişirik.
Notify-log
:global lastTime
:global output
:global mtIdentity [\/system identity get name];
:global botID "botXXXXXXXXX:XXXXXXXXXXXXXXXXXXXXXXXXX" ;
:global myChatID "YYYYYY" ;
:local LogGet [ :toarray [ \/log find topics~"critical" || message~"login failure" || message~"[Ff]ailure" ] ] ;
:local LogtLineCount [ :len $LogGet ] ;
if ($LogtLineCount > 0) do={
:local currentTime "$[ \/log get [ :pick $LogGet ($LogtLineCount -1) ] time ]";
:if ([:len $currentTime] = 10 ) do={
:set currentTime [ :pick $currentTime 0 10 ];
}
:set output "$currentTime - $[\/log get [ :pick $LogGet ($LogtLineCount-1) ] message ]";
:if (([:len $lastTime] 0) && ($lastTime != $currentTime))) do={
:set lastTime $currentTime ;
:tool fetch url=("https:\/\/api.telegram.org\/$botID\/sendmessage?chat_id=$myChatID&text="$mtIdentity" : $output") keep-result=no
}
}Alınan nəticə:

Mənbə: habr.com
