[Xymon] Perl script to test EMC storage devices in xymon

[David Baldwin]

Betsy,
> Here's my first crack at a script to test EMC storage in xymon. I need
> to expand it to take a list of exceptions to customize disk full
> alerts for different volumes
>  I think it needs more error checking and a way to check xymon env
> variables and get them from the client dir if they aren't set. But so
> far it works.
>
> Comments very welcome.  It's my first real perl script.
Well done on taking the plunge on developing your own tests!

The lines:

my $REDDOT    = '<IMG SRC="/xymon/gifs/red-recent.gif">';
my $YELLOWDOT = '<IMG SRC="/xymon/gifs/yellow-recent.gif">';

should be replaced with:

my $REDDOT    = '&red';
my $YELLOWDOT = '&yellow';

Note that the insertion of the appropriate image is done on the xymon
server, and should not be hard-coded to a particular image path.

A different approach you can take, is to generate a client message on
behalf of your device - it looks like you are already doing the
equivalent of [disk] and [uptime] sections, but if the information is
accessible and already in a mostly similar format you may be able to
fairly easily do [procs], [memory], [cpu], etc. I've done this for some
appliances where I can pull some info via SNMP.

Client messages are pretty flexible - if a section isn't there (e.g.
[ports]), the server just won't be able to generate a column report on
it but otherwise doesn't care. One advantage of this approach is that
you can then configure thresholds, etc just as you would for any other
client, maintaining centralised test configuration.

You can add your own client message sections like your "nas_rep" test
and run a server-side monitor on the client channel. See
http://xymonton.org/monitors:check-client

The beauty of the xymon architecture - so many choices...

David.

-- 
David Baldwin - Senior Systems Administrator (Datacentres + Networks)
Information and Communication Technology Services
Australian Sports Commission          http://ausport.gov.au
Tel 02 62147830 Fax 02 62141830       PO Box 176 Belconnen ACT 2616
david.baldwin at ausport.gov.au          Leverrier Street Bruce ACT 2617


-------------------------------------------------------------------------------------
Keep up to date with what's happening in Australian sport visit http://www.ausport.gov.au

This message is intended for the addressee named and may contain confidential and privileged information. If you are not the intended recipient please note that any form of distribution, copying or use of this communication or the information in it is strictly prohibited and may be unlawful. If you receive this message in error, please delete it and notify the sender.
-------------------------------------------------------------------------------------