Вывести простое имя очереди и статистику в одной команде.

Привет всем!

Подумал, что вам может быть интересно мое скрипт. Я не тестировал его для динамических очередей, так как он нужен мне только для статических:

:log info “Запуск Queue Statistics Checker”

####
#ОПРЕДЕЛЕНИЕ ПЕРЕМЕННЫХ
#####
:local slashchecker
:local slashcheckertotal
:local bytecountedup
:local bytecounteddown
:local megcountedup
:local megcounteddown
:local slashcounter
:local precalcbytes
:local pickbegin
:local pickend
:local slashcounted
:local slashcounted1
:local numberofqueues
:local test
:local interfacename
:local emailvariable
:local highsitename
:local fromemailaddress
:local toemailaddress

####
#ПЕРЕМЕННЫЕ ОПРЕДЕЛЕНЫ#####

#########
#ЗДЕСЬ НУЖНО ИЗМЕНИТЬ ОТДЕЛЬНЫЕ ДЕТАЛИ:
#########
:set fromemailaddress “ highsite@domain.co.za ”
:set toemailaddress “ admin@domain.co.za ”

#########
#КОНЕЦ ИЗМЕНЕНИЯ ОТДЕЛЬНЫХ ДЕТАЛЕЙ
#########

####
#ПОДСЧЁТ КОЛИЧЕСТВА ОЧЕРЕДЕЙ#####
:set numberofqueues [/queue simple print count-only]
:set highsitename [/system identity get name]

#

#ДОБАВИТЬ ДЕТАЛИ В ПЕРЕМЕННУЮ EMAIL##
:set emailvariable "СТАТИСТИКА ОЧЕРЕДЕЙ ДЛЯ: $highsitename ОБЩЕЕ КОЛИЧЕСТВО ОЧЕРЕДЕЙ: $numberofqueues"

#

#ДОБАВИТЬ ДЕТАЛИ В ПЕРЕМЕННУЮ EMAIL ЗДЕСЬ##

####
#НАЧАЛО ОСНОВНОГО ЦИКЛА ДЛЯ ОБРАБОТКИ ОЧЕРЕДЕЙ#####
/queue simple
:foreach n in=[/queue simple find priority=8] do={
:local interfacename [/queue simple get [$n] name]

####
#РАЗДЕЛЕНИЕ БАЙТОВ ЗАГРУЗКИ/СКАЧКИ ОТ ОЧЕРЕДИ#####
#

#ПРЕДНАСТРОЕННЫЕ ПЕРЕМЕННЫЕ##
:local precalcbytes [:pick [/queue simple get [$n] bytes] 0 30]
:set slashcheckertotal $precalcbytes
:set pickbegin 1
:set pickend 2
:set slashcounter 0

####
#НАЧАЛО СЛЭШ-ЧЕКЕРА#####
/queue simple
:for i from=1 to=20 do={
:set pickbegin (pickbegin + 1)
:set pickend (pickend + 1)
:set slashchecker [:pick $slashcheckertotal $pickbegin $pickend]
:if ($slashchecker = “/”) do={
:set slashcounted $pickbegin
} else={
:set slashcounter ($slashcounter +1)
}
}
#:log info “SLASHCOUNTED: $slashcounted”

####
#КОНЕЦ СЛЭШ-ЧЕКЕР ЛООП#####

####
#ПОЛУЧЕН СЛЭШ-ПИК КОЛИЧЕСТВО, НАЧАЛО РАЗДЕЛИЯ БАЙТОВ НА ЗАГРУЖКУ И СКАЧКУ#####
:set slashcounted1 ($slashcounted + 1)
:set bytecountedup [:pick $precalcbytes 0 $slashcounted]
:set bytecounteddown [:pick $precalcbytes $slashcounted1 30]
:set megcountedup ($bytecountedup / 1000000)
:set megcounteddown ($bytecounteddown / 1000000)
#:log info “INTERFACE NAME: $interfacename”
#:log info “PRECALCBYTES: $precalcbytes”
#:log info “BYTECOUNTEDUP $bytecountedup БАЙТ”
#:log info “BYTECOUNTEDDOWN $bytecounteddown БАЙТ”
#:log info “MEGCOUNTEDUP $megcountedup MB”
#:log info “MEGCOUNTEDDOWN $megcounteddown MB”
#:log info " "
#:log info " "

#

#ДОБАВИТЬ ВЫШЕУПОМЯНУТЫЕ ДЕТАЛИ В ПЕРЕМЕННУЮ EMAIL##
:set emailvariable "$emailvariable ИМЯ ОЧЕРЕДИ:\t\t\t$interfacename ОБЩЕЕ КОЛИЧЕСТВО БАЙТ:\t\t$precalcbytes ЗАГРУЖЕНО БАЙТ:\t\t$megcountedup MB СКАЧАНО БАЙТ:\t\t$megcounteddown MB"

#

#ОБНОВЛЕНИЕ ПЕРЕМЕННОЙ EMAIL ЗДЕСЬ##
}

####
#КОНЕЦ ЦИКЛА ПРОЦЕССА ОЧЕРЕДИ#####

####
#ОТПРАВКА ДЕТАЛЕЙ НА EMAIL#####
:set emailvariable "$emailvariable КОНЕЦ СТАТИСТИКИ ОЧЕРЕДЕЙ ДЛЯ: $highsitename"
/tool e-mail send from=$fromemailaddress to=$toemailaddress server=196.25.240.94 subject=“$highsitename QUEUE Statistics” body=$emailvariable

####
#КОНЕЦ ОТПРАВКИ EMAIL#####
:log info “Общее количество обработанных очередей: $numberofqueues”
:log info “Проверка статистики Queue ЗАВЕРШЕНА и отправлена по электронной почте на $toemailaddress”
Наслаждайтесь!

Привет, Pjotr! Что именно не работает со скриптом? Ты в курсе, что IP-адрес SAIX изменился? SAIX рекомендует использовать smtp.saix.net вместо его IP, поскольку некоторые сегменты их сети разрешаются к разным адресам. Если проблема в том, что скрипт не отправляет почту, то, скорее всего, дело в SMTP-адресе. Попробуй пропингуй smtp.saix.net с highsite и посмотри, к какому адресу он разрешается. Если проблема в том, что скрипт не запускается из-за чего-то другого, мы могли бы копнуть глубже. Я бегло просмотрел скрипт, но очевидных проблем не увидел. Может, пришлешь нам больше информации о том, что именно не работает? Обычно, когда я что-то отлаживаю, я комментирую (#) большую часть скрипта и убираю комментарии по одному, пока не найду место, где он перестает работать. (или, альтернативно, добавляй :log error “скрипт здесь” в некоторых строках, запускай скрипт и двигай :log запись вниз, пока не найдешь, где он останавливается…). Надеюсь, эта информация оказалась полезной! G

Если количество очередей > 1, отображается ошибка [admin@H] > /system script run script1
2
Ошибка сценария: нельзя разделить строку по интервалу времени

Привет, ребята! Знаю, тема старая, но интересно, как это работает на ROS 6.5? Мне нужно получить статистику общего количества отправленных и принятых байт для всех моих очередей. Очереди созданы статические, и во всех в разделе имени указано "Local - xxxxx" или "Management - xxxxx". Я не использовал комментарии ни для одной из очередей. Буду очень благодарен за любую информацию.

С уважением,
Wes.