ناجيوس :: واجهة تفاعل وقت التشغيل مع Nagios
التحميل الان

ناجيوس :: واجهة الترتيب والملخص

ناجيوس :: واجهة العلامات

الوحدة النمطية بيرل واجهه المستخدم بيرل ناجيوس واجهة nagios

ناجيوس :: واجهة وصف

التفاعل وقت التشغيل مع Nagios Nagios :: Interface هي وحدة بيرل لتفاعل وقت التشغيل الأساسي مع Nagios 3 مثيلات. لا توجد وظائف لتحليل ملفات التكوين أو الكتابة (حتى الآن؟)، ولكن يمكن أن تحليل معظم رسائل LogFile، وكذلك رسائل التحكم في الكتابة وتحليل ملف الحالة لإيصالات الإجراءات التي لم تسجل أي شيء مفيد. يستخدم Nagios :: واجهه المستخدم؛ # قم بإعداد قارئ LogFile يستخدم الملف :: الذيل My Logfile $ = Nagios :: Interface :: LogFile-> جديد (TALE => ملف :: الذيل-> جديد (الاسم => "/ var / log / nagios3 / nagios .log "، maxinterval => 5، الفاصل => 2، الذيل => 10،)،)؛ # قراءة رسالة، وتحليلها وإرجاعها لي $ log_message = $ logfile-> get_message؛ # أو إذا حصلت على خطوط من مكان آخر، فقم بتمرير إلى parse_logline $ log_message = $ logfile-> parse_logline ($ _)؛ # الرسائل التي يتم إرجاعها لها أدوار للشعرية والفئات للنوع. طباعة $ log_message-> المضيف. " يكون " . ($ log_message-> أعلى؟ "UP": "لأسفل")؛ إذا $ log_message-> هل ("Nagios :: واجهة :: Alert :: Host")؛ # السيطرة عبر ملف التحكم nagios بلدي التحكم $ = Nagios :: Interface :: Control-> جديد (اسم الملف => "/var/lib/nagios3/rw/nagios.cmd"،)؛ # اجعل أي نوع من رسائل السجل لإصدار أمر كأمر ... # انظر Nagios :: Interface :: Concretetypes للحصول على قائمة My $ SVC_DownTime = Nagios :: Interface :: Schiewsuleservedowntime-> جديد (ابدأ => الوقت، النهاية => الوقت + 15 * 60، ثابت => 1، المؤلف => ($ ENV {logname} || $ Env env {user} || (getpwuid ($ "هنا تعليق"،)؛ بلدي $ Entry_Time = $ Control-> المشكلة ($ svc_downtime)؛ # قراءة الحالة سجل الحالة بلدي $ الحالة = nagios :: واجهة :: الحالة-> جديد (اسم الملف => "/var/cache/nagios3/status.dat"،)؛ النوم 1 بينما ((stat stat الحالة-> اسم الملف) <$ st_time_time)؛ $ status-> parse_file؛ my blocks = grep {$ _--- } حالة $-> get_blocks ("servicedowntime")؛ استخدم Set :: Object QW (Set)؛ My $ downtime_ids = set (خريطة {$ _-> {downtime_id} }Blocks))؛ طباعة "معرفات التوقف: $ downtime_ids \ n "؛ # الآن إلغاء التوقف، لإكمال المثال $ Control-> العدد (خريطة {nagios :: واجهة :: deleteservedowntime-> جديد (downtime_id => $ _ids-ids-> الأعضاء)؛ المتطلبات: perl.

ناجيوس :: واجهة برامج ذات صلة