mirror of
https://github.com/munin-monitoring/contrib.git
synced 2018-11-08 00:59:34 +01:00
Adding basic spoolfetch plugin support
This commit is contained in:
parent
7fc99a3716
commit
8eee012f2c
@ -19,6 +19,8 @@ my $port; # Default is stdin/stdout
|
||||
my $verbose;
|
||||
my $host;
|
||||
my $plugin_dir = "plugins";
|
||||
my $spoolfetch_dir;
|
||||
|
||||
{
|
||||
my $man = 0;
|
||||
my $help = 0;
|
||||
@ -29,6 +31,8 @@ my $plugin_dir = "plugins";
|
||||
'plugin-dir|d=s' => \$plugin_dir,
|
||||
'host|h=s' => \$host,
|
||||
|
||||
'spoolfetch-dir|s=s' => \$spoolfetch_dir,
|
||||
|
||||
'help|?' => \$help,
|
||||
man => \$man,
|
||||
) or pod2usage(2);
|
||||
@ -78,12 +82,19 @@ while(my $line = <>) {
|
||||
system($plugin_filename, $arg_plugin);
|
||||
print ".";
|
||||
next;
|
||||
} elsif ($cmd eq "cap") {
|
||||
print "cap ";
|
||||
print "spool " if $spoolfetch_dir;
|
||||
next;
|
||||
} elsif ($cmd eq "spoolfetch" && $spoolfetch_dir) {
|
||||
system("$spoolfetch_dir/spoolfetch_$host", $arg);
|
||||
print ".";
|
||||
next;
|
||||
}
|
||||
|
||||
# Arriving here is not a good sign
|
||||
print "# Unknown command. Try list, nodes, config, fetch, version, alert or quit";
|
||||
} continue {
|
||||
#print " " x 4096;
|
||||
print "\n";
|
||||
};
|
||||
|
||||
@ -105,6 +116,8 @@ Options:
|
||||
--plugin-dir Plugin directory (default is current dir)
|
||||
--host Host name (default is /bin/hostname)
|
||||
|
||||
--spoolfetch-dir Spoolfetch plugin dirs (default is disabled)
|
||||
|
||||
--help brief help message
|
||||
--man full documentation
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user