1
0
mirror of https://github.com/opinkerfi/nagios-plugins.git synced 2024-11-22 18:33:45 +01:00

Added perty-nagios-mailer.pl

This commit is contained in:
Tómas Edwardsson 2010-04-29 13:08:00 +00:00
parent d06d4aafed
commit c8b798f32d
2 changed files with 151 additions and 0 deletions

View File

@ -0,0 +1,3 @@
* Support for multiple graphs
* Possible html escape
* Write the usage function

View File

@ -0,0 +1,148 @@
#!/usr/bin/perl
#
# Copyright 2010, Tomas Edwardsson
#
# This script is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# This script is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
use strict;
use warnings;
use MIME::Lite;
use MIME::Entity;
use MIME::Base64;
# Some defaults
my $pnp4nagios_perfdata = '/nagios/share/perfdata';
my $pnp4nagios_phpdir = '/nagios/share';
my $nagios_cgiurl = "http://slxnagios1/nagios/cgi-bin";
my $pnp4nagios_url = "http://slxnagios1/nagios/pnp4nagios.php";
my $from_address = 'nagios@lsh.is';
my $logo = '/nagios/share/images/sblogo.jpg';
if (@ARGV != 8) {
usage();
}
my ($recipient, $date, $type, $host, $ip, $service, $state, $message) = @ARGV;
my $rrd = '';
if (-f "$pnp4nagios_perfdata/$host/$service.rrd") {
my $t = time();
$rrd = `( cd $pnp4nagios_phpdir;php -r 'parse_str("host=$host&srv=$service&source=1&view=0&end=$t&display=image", \$_GET); include_once("pnp4nagios.php");' )`;
}
my $head = MIME::Entity->build(
Type => 'multipart/related',
From => $from_address,
To => $recipient,
Subject => "Nagios, $state - $host - $service"
);
my $alt = MIME::Entity->build(
Type => 'multipart/alternative'
);
my $txt_content = MIME::Entity->build(
Type => 'text/plain',
Charset => 'UTF-8',
Encoding => 'quoted-printable',
Data => sprintf(<<EO),
Host: $host ($ip)
Service: $service
State: $state
Date: $date
Notification Type: $type
Description: $message
EO
);
my $state_color = '#33FF00';
if ($state eq 'WARNING') {
$state_color = '#FFFF00';
} elsif ($state eq 'CRITICAL') {
$state_color = '#F83838';
}
my $html_content = MIME::Entity->build(
Type => 'text/html',
Charset => 'UTF-8',
Encoding => 'quoted-printable',
Data => qq{
<body>
<table style="background: #ddd;width: 604px">
<tr>
<td colspan="2" style="background: black;align: center"><img src="cid:sblogo.png"></td>
</tr>
<tr>
<td style="background: black;color: white;font-weight: bold;width: 150px">Host</td>
<td style="background: white;color: black"><a style="color: black;text-decoration: underline" href="$nagios_cgiurl/extinfo.cgi?type=1&host=$host">$host ($ip)</a></td>
</tr>
<tr>
<td style="background: black;color: white;font-weight: bold">Service</td>
<td style="background: white;color: black"><a style="color: black;text-decoration: underline" href="$nagios_cgiurl/extinfo.cgi?type=2&host=$host&service=$service">$service</a></td>
</tr>
<tr>
<td style="background: black;color: white;font-weight: bold">State</td>
<td style="background: $state_color;color: black;font-weight: bold">$state</td>
</tr>
<tr>
<td style="background: black;color: white;font-weight: bold">Date</td>
<td style="background: white;color: black">$date</td>
</tr>
<tr>
<td style="background: black;color: white;font-weight: bold">Type</td>
<td style="background: white;color: black">$type</td>
</tr>
<tr>
<td style="background: black;color: white;font-weight: bold" colspan="2">Description</td>
</tr>
<tr>
<td colspan="2" style="background: white;color: black">$message</td>
</tr>
} . ($rrd ? qq{
<tr>
<td style="background: white" colspan="2">
<a href="$pnp4nagios_url?host=$host&srv=$service"><img border=0 src="cid:pnp.gif"></a>
</td>
</tr>
} : "") . qq{
</table>
</body>}
);
my $rrdimage = MIME::Entity->build(
Data => $rrd,
Type => 'image/gif',
Id => '<pnp.gif>',
Encoding => 'base64'
) if ($rrd);
$alt->add_part($txt_content);
$alt->add_part($html_content);
$head->add_part($alt);
$head->add_part($rrdimage) if ($rrd);
$head->attach(
Path => $logo,
Type => 'image/png',
Id => '<sblogo.png>',
Encoding => 'base64'
);
open SENDMAIL, '|/usr/sbin/sendmail -t';
$head->print(\*SENDMAIL);
close SENDMAIL;