Мониторинг доступности веб-сервиса

на форуме разработчиков спроси

да там я уже задал вопрос, молчат...
http://www.zabbix.com/forum/showthread.php?t=17975

причем тут заббикс?
на форуме документума спроси ))))

> Как это реализовать в заббиксе чё-то не осилил

через UserParameter. туда bash-скрипт можно забиндить, а дальше curl, awk, sed и grep.

хз чем поможет curl, но lynx открыть даже страничку логина не смог

>Может есть у кого примеры построения подобной системы мониторинга?

HP BAC :)

Я бы писал минимальный перловый скрипт, который POST-ом логинится, парсит отданный результат, и возвращает 1 или 0. Ну и заббиксом через UserParameter дергал этот скрипт.

Могу кинуть перловский web-клиент, поправишь форму, введешь логин и пароль. Скрипт логинится, а дальше сам допишешь, что надо делать.

gh0stwizard, ок, потестирую если выложите

тут уже не обойтись без разгребания руками, прежде чем автоматизировать все через CURL. проверь что за форма авторизации, GET или POST запрос, что шлется и т.д.
короче для написания скрипта парсера анализ таки нужен.

http://pastebin.org/387244

Обновил код с примером того, как вытянуть файл. Фишка в том, что куки работают автоматом, и не надо лишних телодвижений. Просто пишется новый запрос и все.

http://pastebin.org/387256

спасибо, щас потестирую
и вот я реконструкцию tcp-сессии выложил (после нажатия кнопки Login)
http://pastebin.org/387266

что-то просветление всё не наступает
мне надо в скрипте писать переменные
SafeLoginComponent_username_0=adm1
SafeLoginComponent_password_0=mypassword
?
и gzip ответы как парсить? или там может «200» достаточно отпарсить?

$req->content(«SafeLoginComponent_username_0=$username&SafeLoginComponent_password_0=$password»);

Насчет gzip не знаю, не сталкивался. В любом случае если надо распарсить, делаем так:

my @gz_content = $res->as_string;

Потом разархивируем чем-нибудь, например, модулем Tie::Gzip.

В то же время есть встроенная поддержка для кодирования, раскодирования в LWP, надо тестировать:

$mess->decode
$mess->decoded_content()

http://search.cpan.org/~gaas/libwww-perl-5.836/lib/HTTP/Message.pm