Robot/contrib-munin
2
0
Fork 0
mirror of https://github.com/munin-monitoring/contrib.git synced 2018-11-08 00:59:34 +01:00
Code Issues Releases Wiki Activity

Merge pull request #204 from thiagocsf/master

Browse Source 
Add plugins for Sick-Beard
This commit is contained in:
Kenyon Ralph 2012-12-25 14:09:04 -08:00
commit 0adad54696
2 changed files with 138 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

69
plugins/sickbeard/sickbeard_episodes Executable file
View File

@ -0,0 +1,69 @@
#!/usr/bin/perl
#
# Munin plugins for Sick-Beard
#
# Copyright (C) 2012 - Blauwbek
# Copyright (C) 2012 - Thiago
#
# Sick-Beard : http://sickbeard.com/
#
# This program 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 program 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/>.
#
# Requires: JSON::Any
# LWP::UserAgent
#
# Configuration example
# [sickbeard*]
# env.host http://host:port/
# env.api apikey
#
use strict;
use JSON::Any;
use LWP::UserAgent;
#defines
my $HOST = exists $ENV{'host'} ? $ENV{'host'} : "http://localhost:8081/";
my $API = exists $ENV{'api'} ? $ENV{'api'} : "";
my $URL = $HOST."/api/".$API."/?cmd=shows.stats";
my $sURL = sprintf $URL;
#config output
if(defined $ARGV[0] && $ARGV[0] eq 'config')
{
print <<EOC
graph_title Episodes
graph_vlabel Episodes
graph_category Sick-Beard
down.label Downloaded
total.label Total
EOC
;
exit 0;
}
my $get = LWP::UserAgent->new;
my $req = $get->get($sURL);
my $json = JSON::Any->jsonToObj($req->content());
if ($json->{result} eq 'success') {
print "down.value $json->{data}->{ep_downloaded}\n";
print "total.value $json->{data}->{ep_total}\n";
exit 0;
} else {
print "$json->{message}\n";
exit 1;
}

69
plugins/sickbeard/sickbeard_shows Executable file
View File

@ -0,0 +1,69 @@
#!/usr/bin/perl
#
# Munin plugins for Sick-Beard
#
# Copyright (C) 2012 - Blauwbek
# Copyright (C) 2012 - Thiago
#
# Sick-Beard : http://sickbeard.com/
#
# This program 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 program 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/>.
#
# Requires: JSON::Any
# LWP::UserAgent
#
# Configuration example
# [sickbeard*]
# env.host http://host:port/
# env.api apikey
#
use strict;
use JSON::Any;
use LWP::UserAgent;
#defines
my $HOST = exists $ENV{'host'} ? $ENV{'host'} : "http://localhost:8081/";
my $API = exists $ENV{'api'} ? $ENV{'api'} : "";
my $URL = $HOST."/api/".$API."/?cmd=shows.stats";
my $sURL = sprintf $URL;
#config output
if(defined $ARGV[0] && $ARGV[0] eq 'config')
{
print <<EOC
graph_title Shows
graph_vlabel Shows
graph_category Sick-Beard
active.label Active
total.label Total
EOC
;
exit 0;
}
my $get = LWP::UserAgent->new;
my $req = $get->get($sURL);
my $json = JSON::Any->jsonToObj($req->content());
if ($json->{result} eq 'success') {
print "active.value $json->{data}->{shows_active}\n";
print "total.value $json->{data}->{shows_total}\n";
exit 0;
} else {
print "$json->{message}\n";
exit 1;
}