diff options
Diffstat (limited to 'nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools')
5 files changed, 306 insertions, 0 deletions
diff --git a/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/Makefile b/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/Makefile new file mode 100644 index 0000000..ecdd3cb --- /dev/null +++ b/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/Makefile @@ -0,0 +1,11 @@ +PLUGIN := check_smstools +CLEANFILES := check_smstools +DOCFILES := README.check_smstools + + +include ../common.mk + +check_smstools: bin/check_smstools + cp $< $@ + chmod 755 $@ + diff --git a/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/README.check_smstools b/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/README.check_smstools new file mode 100644 index 0000000..893806e --- /dev/null +++ b/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/README.check_smstools @@ -0,0 +1,45 @@ +check_smstools +-------------- + +Depends: +-------- +- Nagios::Plugin +- smstools3 + +Usage: +------ +The plugin can be used to monitor a gsm modem used together with smstools. +For this to work it relies on a smstools feature which should be available +since version 3.1 called regular_run_cmd. + +So the following change is needed in the modem section of +the modem that is to be monitored: + +regular_run_cmd = AT+CSQ +regular_run_cmd = AT+CREG? +regular_run_cmd = AT+COPS? +regular_run_interval = 60 +regular_run_statfile = /var/log/smstools/smsd_stats/modem_status + +The interval and the file can of course be adjusted. However the file given +above is the default file used by the plugin. If it is changed then the plugin +needs to be called with --stat-file <filename>. The commands however are +required, except for the AT+COPS? command. This is only for operator detection +and can be disabled, if one isn't interested what operator the modem is +registered to. + +Known Bugs: +----------- +Currently the script does not work with the embedded perl interpreter for unknown reasons. +Therefore it contains a + +# nagios: -epn + +header, which causes nagios to not use the embedded perl interpreter for it. + +License: +------- +This plugin is licensed under the terms of the GPL v2 or later. See COPYING for details. +Author: +------ +Patrick Schoenfeld <schoenfeld@debian.org> diff --git a/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/bin/check_smstools b/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/bin/check_smstools new file mode 100755 index 0000000..a7a0336 --- /dev/null +++ b/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/bin/check_smstools @@ -0,0 +1,241 @@ +#!/usr/bin/perl + +# +# Retrieves the status of an SMS Modem via smstools3. +# + +# Author: Patrick Schoenfeld <schoenfeld@debian.org> +# This file is licensed under the terms of the GPL v2 or later. +# See the file COPYING for details. + +# Currently this plugin does not work with nagios embedded perl +# nagios: -epn + +use strict; +use warnings; +use Nagios::Plugin; +use POSIX; + +# Define regular expressions used to find the correct lines from +# the status file +my $signal_command = 'AT\+CSQ'; +my $registration_status_command = 'AT\+CREG\?'; +my $operator_command = 'AT\+COPS\?'; + +# Define a regular expression that is used to check against +# the answer of the modem to the AT+CREG? command in order +# to determine registration status of the modem +my $registration_status_expect = '.,1'; + +# Define the default path of the status file +my $status_file = '/var/log/smstools/smsd_stats/modem_status'; + +# Default Threshoulds +my $warning_lvl = 12; # WARNING, if signal level < threshould +my $critical_lvl = 10; # CRITICAL, if signal level < threshould +my $maxage = 60; # CRIRTICAL, if status file is more then x seconds old + +# Status variables +my $siglvl; +my $sigdbm; +my $operator; +my $expected_operator; +my $registration_status; +my $timestamp; +my $np; + +sub init_plugin { + $np = Nagios::Plugin->new(usage => "usage: %s"); + + $np->add_arg( + spec => 'warning|w=f', + help => 'the signal level (as a positive float between 0..32) at which' . + 'to emit a WARNING state if the signal level is below this value' + ); + + $np->add_arg( + spec => 'critical|c=f', + help => 'the signal level (as a positive float between 0..32) at which to ' . + 'emit a CRITICAL state if the signal level is below this value' + ); + + $np->add_arg( + spec => 'max-age=i', + help => 'specify the maximum tolerated age of the status file in seconds' + ); + + $np->add_arg( + spec => 'status-file=s', + help => 'specifies the file which is checked for the status information' + ); + + $np->add_arg( + spec => 'expected-operator=s', + help => 'Specifies an operator that is expected. If the registered operator ' . + 'is not the same as specified here, the plugin will exit with a ' . + 'CRITICAL state' + ); + + $np->add_arg( + spec => 'debug|d', + help => 'Enable debug mode' + ); + + $np->getopts; + + if ($np->opts->warning) { + $warning_lvl = $np->opts->warning; + } + + if ($np->opts->critical) { + $critical_lvl = $np->opts->critical; + } + + if ($np->opts->get('status-file')) { + $status_file = $np->opts->get('status-file'); + } + + if ($np->opts->get('max-age')) { + $maxage = $np->opts->get('max-age'); + } + + if ($np->opts->get('expected-operator')) { + $expected_operator = $np->opts->get('expected-operator'); + } + if ($critical_lvl > $warning_lvl) { + $np->nagios_die("Critical level ($critical_lvl) is higher then the warning level ($warning_lvl)"); + } + + # Test if status_file is readable + unless (-r $status_file) + { + $np->nagios_die("Unable to read modem status file"); + } +} + +sub parse_logline { + my $line = shift; + my %result; + + # Use the line without the timestamp + $line = substr($line, 22); + $line =~ s/://g; + + # Split line into an array + my @line = split(/\s/, $line); + + # Modem + chomp $line[1]; + $result{'modem'} = $line[1]; + + # Command + $result{'cmd'} = $line[3]; + + # Answer + $result{'answer'} = $line[5]; + + return %result; +} + +sub process_statusfile { + open(STATUS_FILE, "< $status_file") or $np->nagios_die("Unable to open modem status file"); + + # Check status file freshness + my $fileage = (stat(STATUS_FILE))[9]; + my $fileage_difference = time() - $fileage; + + if ($fileage_difference > $maxage) { + $np->nagios_exit(CRITICAL, "Status file has not changed since $maxage seconds\n"); + } + + while(<STATUS_FILE>) { + my %result = parse_logline($_); + + unless ($registration_status) { + if ($result{'cmd'} =~ /$registration_status_command/) { + $registration_status = $result{'answer'}; + } + } + + unless ($siglvl) { + if ($result{'cmd'} =~ /$signal_command/) { + $siglvl = $result{'answer'}; + $siglvl =~ s/,/./g; + $sigdbm = (2*$siglvl) - 113; + } + } + + unless ($operator) { + if ($result{'cmd'} =~ /$operator_command/) { + $operator = $result{'answer'}; + $operator =~ s/0,0,"//g; + } + } + # No need to parse the rest of the file, if signal + # and registration status are known + if ($siglvl and $registration_status and $operator) { + last; + } + } + + close(STATUS_FILE); +} + +sub check_registration { + unless ($registration_status) { + $np->nagios_die("Unable to determine modem registration status."); + } + + unless ($registration_status =~ /$registration_status_expect/) { + $np->nagios_exit(CRITICAL, "Modem is not registered to a GSM network."); + } +} + +sub check_signal { + unless ($siglvl) { + $np->nagios_die("Unable to determine the modem signal strength."); + } + + if (($siglvl < 0) or ($siglvl > 31)) { + $np->nagios_die("Unable to determine the modem signal strength."); + } + + # Add performance data information + $np->add_perfdata( + label => 'level', + value => $siglvl + ); + + $np->add_perfdata( + label => 'dBm', + value => $sigdbm + ); + + if ($siglvl <= $critical_lvl) { + $np->nagios_exit(CRITICAL, "Modem is registered ($operator), but signal quality ($siglvl) is below threshould."); + } + + if ($siglvl <= $warning_lvl) { + $np->nagios_exit(WARNING, "Modem is registered ($operator), but signal quality ($siglvl) is below threshould."); + } + + # If we get here we can exit with OK + $np->nagios_exit(OK, "Modem is registered ($operator). Signal quality is $siglvl / $sigdbm dBm."); +} + +sub check_operator { + unless ($operator) { + $operator = "Unknown Operator"; + } + + if ($expected_operator) { + if ($operator ne $expected_operator) { + $np->nagios_exit(CRITICAL, "Modem is registered to $operator while $expected_operator is expected."); + } + } +} +init_plugin; +process_statusfile; +check_registration; +check_operator; +check_signal; diff --git a/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/control b/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/control new file mode 100644 index 0000000..255eb1b --- /dev/null +++ b/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/control @@ -0,0 +1,7 @@ +Homepage: http://exchange.nagios.org/directory/Plugins/Hardware/Mobile-Devices/check_smstools/details +Uploaders: Bernd Zeimetz <bzed@debian.org> +Description: plugin to check GSM Modems using smstools + check_smstools is a plugin to monitor a GSM modem + signal quality and registration status with smstools. +Recommends: libmonitoring-plugin-perl | libnagios-plugin-perl +Suggests: smstools (>= 3~) diff --git a/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/copyright b/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/copyright new file mode 100644 index 0000000..c947edf --- /dev/null +++ b/nagios-plugins-contrib-24.20190301~bpo9+1/check_smstools/copyright @@ -0,0 +1,2 @@ +Author: Patrick Schoenfeld <schoenfeld@debian.org> +This file is licensed under the terms of the GPL v2 or later. |