Nagios :: Arayüz Nagios ile çalışma zamanı etkileşimi
Şimdi İndirin

Nagios :: Arayüz Sıralama ve Özet

Nagios :: Arayüz Etiketler

Perl modülü arayüz perl Nagios Nagios arayüzü

Nagios :: Arayüz Açıklama

Nagios ile çalışma zamanı etkileşimi Nagios :: Arabirim, Nagios 3 örnekleri ile temel çalışma zamanı etkileşimi için Perl modülüdür. Yapılandırma dosyalarını (henüz mi?) Ayrıştırmak veya yazmak için hiçbir işlev yoktur, ancak çoğu logfile mesajını ayrıştırabilir, ancak yazma kontrol mesajlarını yazabilir ve yararlı bir şey kaydetmeyen eylemlerin makbuzları için durum dosyasını ayrıştırabilir. Arayüz; # dosyayı kullanan bir logfile okuyucusu ayarlayın :: $ $ logfile = nagios = nagios :: arayüz :: logfile-> Yeni (Tail => Dosya :: Tail-> Yeni (Name => "/ var / log / nagios3 / nagios .log ", maxinterval => 5, aralık => 2, kuyruk => 10,),); # Bir mesajı oku, ayrıştırın ve $ log_message = $ logfile-> get_message; # veya başka bir yerden loglines alırsanız, Parse_Logline $ log_message = $ logfile-> parse_logline ($ _); # İade edilen mesajlar, tür için ortak ve sınıflar için roller var. $ log_message-> ana bilgisayar yazdırın. " dır-dir " . ($ log_message-> up? "Yukarı": "Aşağı"); $ log_message-> yaparsa ("Nagios :: arayüzü :: Alert :: Host"); # NAGIOS kontrol dosyasıyla kontrol edin $ Control = Nagios :: Arabirim :: Control-> Yeni (dosya adı => "/var/lib/nagios3/rw/nagios.cmd",); # Bir komut olarak sorunu yapmak için herhangi bir günlük mesajı yapın ... # Bkz. Nagios :: Arabirim :: BetonTetipler Listesi için $ $ SVC_Downtime = Nagios :: Arabirim :: SchedulesViceDowntime-> Yeni (BACAK => Saat, SON => zaman + 15 * 60, sabit => 1, yazar => ($ env {logname} || $ env {user} || (getpwuid ($ "işte bir yorum",); benim $ Entry_Time = $ Control-> Sayı ($ svc_downtime); # Durum Günlüğünü Okuma $ Durumum = Nagios :: Arabirim :: status-> Yeni (dosya adı => "/var/cache/nagios3/status.dat",); 1 iken uyku (stat $ status-> dosya adı) <$ emsion_time); $ status-> parse_file; benim @blocks = grep {$ _-> {entry_time} == $ Entry_time $ _-> {Yorum} eq "İşte bir yorum", } $ status-> get_blocks ("ServiceDowntime"); Set :: Nesne QW (SET); \ n "; # Şimdi Kesintiyi İptal Et, Örnek $ Control-> Sorunlarını tamamlamak için (Harita {Nagios :: Arabirim :: DeleteServeDownTime-> Yeni (Downtime_ID => $ _)} $ Downtime_IDS-> Üyeler); Gereksinimler: · Perl

Nagios :: Arayüz İlgili Yazılım