Beautiful! Thank you for sharing this.
On 6/2/08, Stewart L <stewartl42 at gmail.com> wrote:
worked one out myself... Let me know if there is an easier way...
#!/usr/bin/perl
##########################################################################################
no-alerts.pl - This script uses bbhostgrep to get a list of sevrers, then
fetches their
info test. It then parses this looking for 'No Alerts Defined' It
then outputs
hostname of the machines that are missing alert config.
Created by Stewart Larsen
##########################################################################################
use strict; use LWP::Simple;
Set debug to 1 to see the hosts and URL as you loop through.
my $debug = 0;
#Token in bb-hosts to indicate we need to run firewall tests on this device my $test_name = '*';
#server to poll for information my $BBDISP = "192.168.1.1";
Paths - Fetch all hosts and trim for just the host name. Then sort and
unique the list my $BBHOSTGREP="/usr/lib/hobbit/server/bin/bbhostgrep '*'| /bin/cut -d' ' -f2 | /bin/sort | /usr/bin/uniq";
open (INPUT, "-|",$BBHOSTGREP ) or die "Cannot open input: $!\n"; while(<INPUT>) { chomp (my $host = $_); my $fetch_URL = 'http:// '.$BBDISP.'/hobbit-cgi/bb-hostsvc.sh?HOST='.$host.'&SERVICE=info'; print "$host: $fetch_URL\n" if $debug;
my $content = get $fetch_URL; if (!defined $content) { warn "Couldn't get $fetch_URL"; next; } if($content =~ m/No Alerts Defined/i) { print "$host has no alerts defined\n"; }} close INPUT;
On Mon, Jun 2, 2008 at 8:53 AM, Stewart L <stewartl42 at gmail.com> wrote:
Is there an easy way to check for hosts without alerts defined? I have about 4000 hosts being monitored and some do not have alerts defined. I would hate to have to check the info test for each of those manually.
-- Stewart
You only lose what you cling to.
-- Stewart
You only lose what you cling to.
-- Josh Luthman Office: 937-552-2340 Direct: 937-552-2343 1100 Wayne St Suite 1337 Troy, OH 45373
Those who don't understand UNIX are condemned to reinvent it, poorly. --- Henry Spencer