Форум поддержи и обмена опытом пользователей оборудования RouterBOARD и операционной системы RouterOS Латвийского производителя MikroTik
https://forummikrotik.ru/
Код: Выделить всё
/system script run script1Код: Выделить всё
/system script run script2Код: Выделить всё
{
:local y [/ip arp find mac-address=хх:хх:хх:хх:хх:хх];
# Скрипт отработает, как только переменная примет какое-либо значение
:if ( $y!="") do={
:log warning "This comp online!";
# скриптом отсылаем письмо (параметры почты вставить свои)
/tool e-mail send from="..." to=... server=... port=587 user=... password=... start-tls=yes subject=("IP work") body=("This comp online! " . [/system clock get time] . " " . [/system clock get date]);
# Ждем, когда письмо отправится
:delay 30;
# Включаем шедулер для второго скрипта
/system scheduler enable IPwork;
# Выключаем шедулер для этого скрипта
/system scheduler disable IPdream;
}
} Код: Выделить всё
{
:local y [/ip arp find mac-address=хх:хх:хх:хх:хх:хх];
# Скрипт отработает, как только переменная не будет иметь никакого значения
:if ( $y="") do={
:log warning "This comp offline!";
# скриптом отсылаем письмо (параметры почты вставить свои)
/tool e-mail send from="..." to=... server=... port=587 user=... password=... start-tls=yes subject=("IP wdream") body=("This comp offline! " . [/system clock get time] . " " . [/system clock get date]);
# Ждем, когда письмо отправится
:delay 30;
# Включаем шедулер для первого скрипта
/system scheduler enable IPdream;
# Выключаем шедулер для этого скрипта
/system scheduler disable IPwork;
}
} podarok66 писал(а):Да, поэтому переменную Status надо бы делать global, первой строкой выполнить проверку на наличие ее в системе вообще, в случае отсутствия присвоить ей какое-то значение и дальше по плану...
Как-то так мыслится издалека
Код: Выделить всё
:local Status 0;
:local StatusOld 0 ;
:local y [/ip arp find mac-address=хх:хх:хх:хх:хх:хх];
:if ( $y!="") do={
:set Status 1;
} else {
:set Status 0;
}
:if ($Status!=$StatusOld) do={
:if ($Status=1) do={
:log warning "This comp ONline!";
}} else {
:log warning "This comp OFFline!";
}
:set StatusOld $Status ;
}V palto писал(а):Но вы же сперва пишите про одно
podarok66 писал(а):
Да, поэтому переменную Status надо бы делать global, первой строкой выполнить проверку на наличие ее в системе вообще, в случае отсутствия присвоить ей какое-то значение и дальше по плану...
Как-то так мыслится издалека
podarok66 писал(а): Затем можно пропинговать устройство по найденному адресу и, если оно отвечает, то высылаем письмо и включаем другой скрипт, который по нашему адресу пингует устройство через назначенные промежутки времени и отключаем этот скрипт. Как только ответа на пинги, нет высылает соответствующее письмо и включает первый скрипт и выключает второй... Ну это очень приближенно, в итоге все можно решить значительно изящнее, я уверен. Нужно только посидеть и подумать.
V palto писал(а):в ответ на просьбу о помощи вы сперва фыркаете, а потом выдаете код
V palto писал(а):Я не знаю как процитированные строки реализовать в коде,
V palto писал(а):выдаете код, совсем другой (да, простой, да рабочий, но другой), в нем нет global переменной и всего остального.
V palto писал(а):Другие форумчане в состоянии разрешить ситуацию для человека не желающего вникать в суть кодинга? Для меня.
V palto писал(а):podarok66, из-за огромного количества амбиций, вероятно будет много проще и спокойнее, если вы будете просто модерировать.
От вас советов более не надо. Спасибо.
V palto писал(а): Переменную StatusOld делал global - эффекта нет.
Код: Выделить всё
/ip dhcp-server
add add-arp=yes address-pool=pool-HS disabled=no interface=Br-HS \
[b]lease-script=OnUser[/b] lease-time=12h name=server1
Код: Выделить всё
/system script
add name=OnUser policy=\
ftp,reboot,read,write,policy,test,password,sniff,sensitive source=":local \
mac \$leaseActMAC\r\
\n/log warning \$mac\r\
\n:if (![/ip dhcp-server lease get [find mac-address=\$mac] dynamic ]) do=\
{\r\
\n/ip hotspot ip-binding add type=bypassed mac-address=\$mac\r\
\n} else={\r\
\n:if ([:len [/ip hotspot ip-binding find mac-address=\$mac]] > 0) do={/ip\
\_hotspot ip-binding remove [find mac-address=\$mac]}\r\
\n}"