+7 495 320-55-52
- Назад
- Телефоны
- +7 495 320-55-52
- Заказать звонок
info@mikrotik.moscow
г. Москва, ул. Бакунинская, 84
Пн-Пт: 09-00 до 18-00
Сб-Вс: выходной

Новичок в написании сценариев – опытный пользователь RooterOS.

Новичок в написании сценариев – опытный пользователь RooterOS., RouterOS

rootER

Guest

02.06.2008 13:40:00

Привет всем! Я пытаюсь написать скрипт, который будет получать итоговые данные по всем простым очередям и отправлять их мне в конце рабочего дня. Я это уже сделал, но есть одна проблема: я хочу, чтобы все результаты были в одном письме, а не в отдельном письме для каждого результата. Возможно, это довольно просто, но я новичок в скриптинге, поэтому буду очень благодарен за любую помощь. У меня версия v3.10, и вот мой текущий скрипт:

:global texts " ";
:local traf;
:global megs "0";
:global resulter " "
/queue simple
:for i from=60 to=198 do={
:if ([/queue simple find name=("192.168.0.".$i)]!="") do={
:set traf [get [find name=("192.168.0.".$i)] total-bytes]
:set megs ($traf / 1000000)
:if ($traf > 0) do={
:set texts ("192.168.0.".$i. "--------------> ". $megs . " Mb")
:log error ("192.168.0.$i" . "--------------" . "$megs" . " Mb")
:set resulter ("192.168.0." .$i. "-------------->". $megs . "Mb")

}
}
}

/tool e-mail send to="user@email.com" subject="testing it" body=("$resulter")

kameelperdza Guest	#2 0 23.04.2009 10:55:00 Привет, Giepie, твой скрипт работает отлично, спасибо. Я попробовал твой, и он тоже работает. Есть ли у тебя скрипт, который я могу использовать для завершения месяца? Дай знать, пожалуйста.

Giepie

Guest

22.06.2008 02:47:00

Всем привет! Поздравляю с написанием скрипта! Я пытался сделать свою версию с помощью цикла foreach, но этот вариант кажется лучше подходит для конкретной задачи. Хотел бы изменить скрипт, чтобы он отправлял мне не только “total-bytes”, а “total-tx-byte” и “total-rx-bytes”. Заметил, что MT имеет только два варианта: “total-bytes” или “bytes”. Где “total-bytes” отображается как: “12345”, а “bytes” — как: “12345/12345”. Кто-нибудь знает, как разделить TX от RX байтов? Буду очень благодарен за любую помощь! G

Giepie

Guest

22.06.2008 06:25:00

Я это сделал! Потребовалось несколько часов, но оно того стоило! Смело используйте, изменяйте и мусорьте! :log info “Запуск Проверщика Статистики Очередей” #### #DEFINE VARIABLES##### :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 #### #VARIABLES DEFINED##### ########## ИЗМЕНИТЕ ИНДИВИДУАЛЬНЫЕ ДЕТАЛИ ЗДЕСЬ: ########## :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” #### #КОНЕЦ ЦИКЛА SLASHCHECKER##### #### #ПОЛУЧЕН КОЛ-ВО СЛЭШ, НАЧИНАЕМ РАЗДЕЛЕНИЕ БАЙТОВ НА ВХОД И ВЫХОД##### :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 “НАЗВАНИЕ ИНТЕРФЕЙСА: $interfacename” #:log info “PRECALCBYTES: $precalcbytes” #:log info “BYTECOUNTEDUP $bytecountedup БАЙТОВ” #:log info “BYTECOUNTEDDOWN $bytecounteddown БАЙТОВ” #:log info “MEGCOUNTEDUP $megcountedup МБ” #:log info “MEGCOUNTEDDOWN $megcounteddown МБ” #:log info " " #:log info " " # #ДОБАВИТЬ ВЫШЕУКАЗАННУЮ ИНФОРМАЦИЮ В ПЕРЕМЕННУЮ EMAIL## :set emailvariable "$emailvariable QUEUE NAME:\t\t\t$interfacename TOTAL BYTES:\t\t$precalcbytes UPLOADED BYTES:\t\t$megcountedup MB DOWNLOADED BYTES:\t\t$megcounteddown MB " # #ОБНОВЛЕНИЕ ПЕРЕМЕННОЙ EMAIL СДЕЛАННО## } #### #КОНЕЦ ЦИКЛА ОБРАБОТЧИКА ОЧЕРЕДЕЙ##### #### #ОТПРАВКА ДЕТАЛЕЙ ПО EMAIL##### :set emailvariable “$emailvariable END OF QUEUE STATISTICS FOR: $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 “Проверка Статистики Очередей ЗАВЕРШЕНА и Отправлена по Email на $toemailaddress”

pjotr

Guest

23.02.2009 21:42:00

В версии 3.20 не работает. Подскажите, пожалуйста. Спасибо.

[quote="Giepie"]Я разобрался! Это заняло у меня несколько часов, но оно того стоило! Смело используйте, изменяйте и издевайтесь над ним! :log info “Starting QUEUE Statistics Checker”

kameelperdza Guest	#6 0 23.04.2009 07:55:00 Я тоже… Ничего не работает? Даже http://wiki.mikrotik.com/wiki/Automated_Usage_Script_without_usermanager. Может, кто-нибудь сможет помочь?

Giepie

Guest

23.04.2009 08:04:00

Привет, KameelperdZA! (от грохочущего западнокапского овец!) Хотел бы помочь тебе с твоими проблемами. Я все еще использую тот же скрипт (возможно, с небольшими дополнениями и изменениями), и он работает со всеми версиями, кроме MTROS4B. Не мог бы ты, пожалуйста, рассказать, что именно не работает, и, возможно, предоставить записи логов? Поскольку ты из ЮАР, я могу помочь тебе по телефону, если хочешь, но было бы неплохо, если бы мы держали остальных в курсе. G

mrz Guest	#8 0 23.04.2009 08:06:00 Не существует вещи под названием «Ничего не работает». Запусти скрипт из терминала и поищи сообщения об ошибках.

kameelperdza Guest	#9 0 23.04.2009 10:09:00 Привет, хорошие новости, отчёт "Руководство по использованию" работает. Но приходит только чёрный email, вот почему-то. А вот скрипт закрытия месяца не работает.

Giepie

Guest

#10

23.04.2009 10:16:00

Получаешь почту ЧЁРНУЮ или ПУСТУЮ? Если почта ЧЁРНАЯ, то, я думаю, проблема не в скрипте. Почта не должна быть пустой. Может, попробуй добавить текст в поле тела команды `/tool e-mail` и посмотришь, поможет ли это.

kameelperdza Guest	#11 0 23.04.2009 10:28:00 Извини, да, это пустое письмо. В скрипте указано: тема="Отчет об использовании вручную", тело="Отчет об использовании сайта - Время выполнения: $time $text". Но там ничего нет. У меня 2 очереди.

Читают тему

Главная Каталог 0 Корзина 0 Избранные Кабинет 0 Сравнение Акции Контакты Услуги Бренды Отзывы Компания Лицензии Документы Реквизиты Поиск Блог Обзоры