Сообщите мне по электронной почте, если сессия BGP не установлена.

Добавить запланированный скрипт: если ([/routing bgp peer get [find name="xxx"] state] != "established") do={ .. отправить письмо сюда...}

Спасибо за ответ! Очень ценно! В меню "Система / Скрипты" я создал новый скрипт, состоящий из:
`:if ([/routing bgp peer get [find name=“mina”] state] != “established”) do={/tool e-mail send from= mikrotikDV@portomontenegro.com server=91.220.187.8 to= mvujkovic@portomontenegro.com subject=“bgp script test”}`

Потом я отключил пира "mina", запустил скрипт вручную и ждал тестового письма. Ничего не происходит, я что-то делаю не так?

Может, глупый вопрос: я просто копирую и вставляю код в меню Script (прикреплён)?

И после целого дня возился, и вот победитель! Вот он, если кому-то еще понадобится: `if ([/routing bgp peer get [find name=mina] state] != “established”) do={ – send email --}`. В общем, я использовал `find name= "mina"`, и это не работало с кавычками. Кто бы мог подумать?

Нужна дополнительная проверка. Если состояние не установлено, устанавливай глобальную переменную, что пир отмечен как упавший. В следующий раз, когда скрипт запустится, проверяй и отправляй письмо только если ранее было установлено.

Какой скрипт отключить ether2, если установлен BGP пир?

Я искал такой же скрипт, чтобы получать оповещения, когда какой-либо BGP-пир отключается. Я ничего готового не нашёл, поэтому написал скрипт на основе того, что было предложено в этой теме. Это один скрипт, поддерживающий несколько пиров и несколько адресов электронной почты для получения оповещений. Предполагается, что /tools email правильно настроен на роутере. Скрипт периодически (запускаю его с планировщиком - запускаю каждые 10 секунд без проблем) проверяет все настроенные BGP-пиры.
- Если пир отключён, он будет проигнорирован.
- Если состояние пира 'established', он будет проигнорирован.
- Если у пира любое другое состояние, кроме 'established', будет отправлено информационное письмо на настроенные адреса электронной почты и это будет залогировано как ошибка (красным) в окне журнала.
- Если при следующем запуске скрипта пир всё ещё отключён, он запомнит это и больше не будет отправлять никаких писем для этого пира.
- Если при следующем запуске пиры, которые были отключены, вернутся в состояние 'established', будет отправлено информационное письмо на настроенный адрес электронной почты и это будет залогировано как предупреждение (синим) в окне журнала.
Скрипт протестирован на v6.29 и v6.30.2. Не знаю, будет ли он работать корректно на старых версиях. (Уверенно знаю, что не работает на 5.x и, вероятно, не будет работать на <=6.3)
Известные проблемы: Если вы не определяете BGP-пиры с их правильными именами, скрипт не будет работать корректно. Чтобы использовать скрипт, вам нужно отредактировать только первые два массива, чтобы добавить имена ваших BGP-пиров и адреса электронной почты, разделенные запятыми. Также есть опция отладки, чтобы включить больше информации в окне журнала. Установите это значение false, чтобы отключить. Вам не нужно ничего редактировать в скрипте. Просто запустив его, он не должен выдавать никакого вывода (если отладка отключена), когда все пиры находятся в состоянии established.
##################################################################
# СТАТУС BGP-ПИРОВ С ПОЧТОЙ ОПОВЕЩЕНИЙ СЦРИПТ (только для RouterOS v6) #
# Исходный автор: Cha0s, около 2015 года, с улучшениями от JB172  #
# Информация: https://forum.mikrotik.com/viewtopic.php?p=494204#p494204 #
###################################################################
# РЕДАКТИРОВАТЬ ЗДЕСЬ
:local arrBgpPeers [:toarray "peer1,peer2,peer3"];
:local arrEmails [:toarray "email@example.net,email2@example.net"];
:local debug true
# КОНЕЦ РЕДАКТИРОВАНИЯ

# Определить переменные
:global arrBgpState;
:global gotKey false;
:local hostNameX ([/system identity get name]);
:local statusX;
:local peerX;
:local peerXarrEl;
:local mailToX;
:local mailSubjectX;
:local mailBodyX;
:local peerStatusX;

если ($debug = true) do={
:log info ("=============НАЧАЛО ОБНАРУЖЕНИЯ СТАТУСА BGP-ПИРОВ=============" )
}

# Инициализировать глобальный массив – довольно глупый способ это делать :P
:если ( [:len $arrBgpState] =0 ) do={
:set $arrBgpState {"false"="false"}
}

# Цикл по массиву пиров
:local arrPos
:для arrPos от=0 до=([:len $arrBgpPeers]-1) do={

# Установить peerX в текущее имя пира для этой итерации
:set peerX [:pick $arrBgpPeers $arrPos];

# Проверить, включён ли пир, и продолжить
:если ([/routing bgp peer get [find name=$peerX] disabled ] != true) do={

# Получить статус пира
:set peerStatusX [/routing bgp peer get [find name="$peerX"] state]

# Найти ключ пира в глобальном массиве
:foreach k,v in=$arrBgpState do={
если ($k != "false") do={
если ($gotKey = false) do={
если ($k = $peerX) do={
:set gotKey true
}
}
}
}

# Инициализировать элемент массива arrBgpState с именем peerX, если он ещё не существует
:если ($gotKey = false) do={
:set ($arrBgpState->"$peerX") "up"
}

# Сбросить это для следующей итерации
:set gotKey false

# Предыдущий статус запуска пира
:set statusX ($arrBgpState->"$peerX")

# Подготовить текст письма
:set mailBodyX ("Имя хоста роутера: " . $hostNameX . "\nСтатус BGP-пира: " . $peerStatusX . "\nИмя BGP-пира: " . $peerX . "\n");

# Проверить, не находится ли BGP-пир не в состоянии established
:если ($peerStatusX != "established") do={
   
   # Проверить, это первое время, когда пир отключён
   :если ( $statusX  = "up" ) do={

# Установить значение в 'down' для глобального ключа пира
:set ($arrBgpState->$peerX) "down"

# Информационное логирование
если ($debug = true) do={
:log error ("BGP-пир ". $peerX ." состояние " . $peerStatusX . ". Отправка оповещений по электронной почте!")
}

# Подготовить тему письма
:set mailSubjectX ("BGP-пир ". $peerX ." на ". $hostNameX . " НЕ находится в состоянии established!");

# Цикл по массиву писем, чтобы отправить письма всем получателям в массиве
:local arrPos2
:для arrPos2 от=0 до=([:len $arrEmails]-1) do={
# Установить mailToX в получателя для этой итерации
:set mailToX [:pick $arrEmails $arrPos2]

# Информационное логирование
:log error ("BGP-пир " . $peerX . " статус " .$peerStatusX. "! Отправка оповещения по электронной почте " . $mailToX . "." )

# Отправить письмо
/tool e-mail send to=$mailToX subject=$mailSubjectX body=$mailBodyX;
}      

} иное={
# Пир отключён. Уже отправлено уведомление, так что ничего не делайте.
если ($debug = true) do={
:log info ("BGP-пир ". $peerX ." уже отключён. Игнорировать!")
}
}

} иное={

# Проверить, только что вернулся пир в работу и отправить информационное письмо
если ($statusX = "down") do={

# Подготовить тему письма
:set mailSubjectX ("BGP-пир ". $peerX ." на ". $hostNameX . " восстановился!");

# Цикл по массиву писем, чтобы отправить письма всем получателям в массиве
:local arrPos2
:для arrPos2 от=0 до=([:len $arrEmails]-1) do={
# Установить mailToX в получателя для этой итерации
:set mailToX [:pick $arrEmails $arrPos2]

# Информационное логирование
:log info ("BGP-пир " . $peerX . " работает. Ничего не делать!")
}

# Установить статус пира в up
:set ($arrBgpState->$peerX) "up"
}
}

} иное={
если ($debug = true) do={
:log warning ("BGP-пир " . $peerX . " отключён. Игнорировать!")
}
}

}

если ($debug = true) do={
:log info ("=============КОНЕЦ ОБНАРУЖЕНИЯ СТАТУСА BGP-ПИРОВ===============" )
} Я не очень хорошо знаком с языком скриптов RouterOS, поэтому, безусловно, есть возможности для улучшения моего кода! Не стесняйтесь редактировать его по своему вкусу.

Вот перевод текста на русский язык:

Вот немного измененная версия, которая автоматически найдет все настроенные BGP-пиры и будет их мониторить (вместо того, чтобы определять каждого пира вручную). Спасибо JB172 за патч.
##################################################################
# СТАТУС BGP ПИРОВ - СКРИПТ ОПОЗОРЕНИЯ ПО ЭЛЕКТРОННОЙ ПОЧТЕ (только для RouterOS v6) #
# Изначальный автор: Cha0s, примерно 2015 год, с улучшениями от JB172 #
# Информация: http://forum.mikrotik.com/t/email-me-if-bgp-session-status-in-not-established/58669/15 #
###################################################################
# РЕДАКТИРОВАТЬ ЗДЕСЬ
:local arrEmails [:toarray "email@example.net,email2@example.net"];
:local debug true
# КОНЕЦ РЕДАКТИРОВАНИЯ

# Определяем переменные
:global arrBgpState;
:global gotKey false;
:local hostNameX ([/system identity get name]);
:local statusX;
:local peerX;
:local peerXarrEl;
:local mailToX;
:local mailSubjectX;
:local mailBodyX;
:local peerStatusX;
:local arrBgpPeers [:toarray ""];
:local peername "";
:local peerTotal "";

если ($debug = true) то={
  :log info ("=============НАЧАЛО ОБНАРУЖЕНИЯ СТАТУСА BGP ПИРОВ=============" )
}

# Инициализируем глобальный массив — довольно нелепый способ, но ничего не поделаешь :P
:если ( [:len $arrBgpState] = 0 ) то={
  :set $arrBgpState {"false"="false"}
}

# Заполняем массив arrBgpPeers именами пиров
:для i в=[/routing bgp peer find] то={
:set peername [/routing bgp peer get $i name];
:set peerTotal ($peerTotal . "," .$peername);
}
:set arrBgpPeers [:toarray $peerTotal];

# Перебираем массив пиров
:local arrPos
:для arrPos от=0 до=([:len $arrBgpPeers]-1) то={

  # Присваиваем peerX текущее имя пира для этой итерации
  :set peerX [:pick $arrBgpPeers $arrPos];

  # Проверяем, включен ли пир и переходим к следующему шагу
  :если ([/routing bgp peer get [find name=$peerX] disabled ] != true) то={
     
     # Получаем статус пира
     :set peerStatusX [/routing bgp peer get [find name="$peerX"] state]

     # Ищем ключ пира в глобальном массиве
     :для k,v в=$arrBgpState то={
        если ($k != "false") то={
           :если ($gotKey = false) то={
              :если ($k = $peerX) то={
                 :set gotKey true
              }
           }
        }
     }
     
     # Инициализируем элемент массива arrBgpState с именем peerX, если его там еще нет
     :если ($gotKey = false) то={
        :set ($arrBgpState->"$peerX") "up"
     }
     
     # Сбрасываем это для следующей итерации
     :set gotKey false  
     
     # Предыдущий статус пира
     :set statusX ($arrBgpState->"$peerX")
     
     # Подготавливаем текст электронного письма
     :set mailBodyX ("Имя хоста маршрутизатора: " . $hostNameX . "\nСтатус BGP пира: " . $peerStatusX . "\nИмя BGP пира: " . $peerX . "\n");
     
     # Проверяем, установлен ли BGP пир
     :если ($peerStatusX != "established") то={
       
         # Проверяем, является ли это первый раз, когда пир опустился
         :если ( $statusX  = "up" ) то={
           
           # Устанавливаем значение в 'down' для глобального ключа пира
           :set ($arrBgpState->$peerX) "down"

           # Информационный лог
           если ($debug = true) то={
              :log error ("Состояние BGP пира ". $peerX ." — " . $peerStatusX . ". Отправляем уведомления по электронной почте!")
           }

           # Подготавливаем тему электронного письма
           :set mailSubjectX ("Состояние BGP пира ". $peerX ." на ". $hostNameX . " НЕ установлено!");
           
           # Перебираем массив электронных писем, чтобы отправить электронные письма всем получателям в массиве
           :local arrPos2
           :для arrPos2 от=0 до=([:len $arrEmails]-1) то={
              # Устанавливаем mailToX получателю для этой итерации
              :set mailToX [:pick $arrEmails $arrPos2]
             
              # Информационный лог
              :log error ("Состояние BGP пира " . $peerX . " — " .$peerStatusX. "! Отправляем уведомление по электронной почте на " . $mailToX . "." )
                   
              # Отправляем электронное письмо
              /tool e-mail send to=$mailToX subject=$mailSubjectX body=$mailBodyX;
           }        

        } иначе={
           # Пир опустился. Уведомление уже было отправлено, поэтому ничего не делаем.
           если ($debug = true) то={
              :log info ("BGP пир ". $peerX ." уже опустился. Игнорируем!")
           }
        }

     } иначе={
       
        # Проверяем, вернулся ли пир и отправляем информационное электронное письмо
        если ($statusX = "down") то={
           
           # Подготавливаем тему электронного письма
           :set mailSubjectX ("Состояние BGP пира ". $peerX ." на ". $hostNameX . " восстановлено!");
                   
           # Перебираем массив электронных писем, чтобы отправить электронные письма всем получателям в массиве
           :local arrPos2
           :для arrPos2 от=0 до=([:len $arrEmails]-1) то={
              # Устанавливаем mailToX получателю для этой итерации
              :set mailToX [:pick $arrEmails $arrPos2]
             
              # Информационный лог
              :log warning ("Состояние BGP пира " . $peerX . " восстановлено! Отправляем информационное электронное письмо на " . $mailToX . "." )
                   
              # Отправляем электронное письмо
              /tool e-mail send to=$mailToX subject=$mailSubjectX body=$mailBodyX;
           }            
           
        }
       
        если ($debug = true) то={
           :log info ("Состояние BGP пира " . $peerX . " — в норме. Ничего не делаем!")
        }
       
        # Устанавливаем статус пира в 'up'
        :set ($arrBgpState->$peerX) "up"
     }      
     
  } иначе={
     если ($debug = true) то={
        :log warning ("BGP пир " . $peerX . " отключен. Игнорируем!")
     }
  }  
     
}

если ($debug = true) то={
  :log info ("=============ЗАВЕРШЕНИЕ ОБНАРУЖЕНИЯ СТАТУСА BGP ПИРОВ===============" )
}

Привет! Может, кто-нибудь подскажет, как настроить получение уведомления по электронной почте, когда сессия BGP разрывается?