The syntax of the bb-protocol was described in bb-doc, so tested with the following perl subroutine and it worked.

• Øyvind

sub sendToXymon { use IO::Socket; my($server,$port,$host,$test,$color,$date,$subject,$string) = @_ ; my $sock = new IO::Socket::INET ( PeerAddr => $server, PeerPort => $port, Proto => 'tcp', ); die "Could not create socket: $!\n" unless $sock; print $sock "status " . &xymonhost($host) . "." . $test . " " . $color . " " . $date . " " . $subject . "\n" . $string ; close($sock); }

sub xymonhost { my($host) = @_ ; $host =~ s/\./,/g ; return $host ; }

Fra: Deiss, Mark [Mark.Deiss at xerox.com] Sendt: 9. august 2012 15:54 Til: Bjørge Øyvind (Operations); xymon at xymon.com Emne: RE: Perl client without xymon client. (OPEN)

You could investigate using Big Sister as a client. It's been a few years since I used it. It ~was Perl based and ~was compatible with Big Brother/port 1984 transmission/BB messaging format at the time.

I think it is safe to mention it now; in the past, Mr. Croteau and Mr. MacGuire would throw thunderbolts from Mount BB.

-----Original Message----- From: xymon-bounces at xymon.com [mailto:xymon-bounces at xymon.com] On Behalf Of oyvind.bjorge at telenor.com Sent: Thursday, August 09, 2012 9:17 AM To: xymon at xymon.com Subject: [Xymon] Perl client without xymon client. (OPEN)

Is there anyone that have made a perl module or subroutine for sending to a xymon-server without having to install the xymon client? On some node it is difficult to install a client. Some vendors are very afraid of having things installed on "their" equipment, and the os might be stripped down with no compilers and so on. For sending to xymon I guess all you need is a simple socket connections so I expect that this has been done many times already. Anyone who would like to share?

/ Øyvind

Xymon mailing list Xymon at xymon.com http://lists.xymon.com/mailman/listinfo/xymon

On Fri, Aug 10, 2012 at 2:47 AM, Henrik Størner <henrik at hswn.dk> wrote:

On 10-08-2012 03:55, Jeremy Laidman wrote:

...

#!/bin/bash exec 3<>/dev/tcp/$1/1984 || exit 1 echo "status uname -n.testing green date $2" >&3

Well, whaddayano - one learns something new every day!

This was too good to just leave in the mailinglist archive, so I collected the Perl, Bash- and Korn-shell suggestions into the Xymon "Tips & Tricks" document. See http://www.xymon.com/xymon/**help/xymon-tips.html#noinstall<http://www.xymon.com/xymon/help/xymon-tips.html#noinstall>

Another one for the list. This works well enough to be a drop-in replacement for the xymon binary on some AIX systems here. it gets you (optional) encrypted delivery.

 #!/bin/sh

 # Shell script replacement for the xymon binary

 export XYMONURL="https://server.domain.com/xymon-cgi/xymoncgimsg.cgi"

 # the curl option "--capath" designates a directory with CA

certificates # to validate secure server connections. If your xymon server doesn't # use https, that line can be removed.

 if [ "$2" = "@" ]; then
    # read message from stdin
    $XYMONHOME/bin/curl -s -S -L -m 30 \
       --capath /etc/pki/tls/certs \
       -H "Content-Type: application/octet-stream" \
       -H "MIME-version: 1.0" \
       --data-binary "@-" \
       $XYMONURL
 else
    # arg 2 *is* the message
    $XYMONHOME/bin/curl -s -S -L -m 30 \
       --capath /etc/pki/tls/certs \
       -H "Content-Type: application/octet-stream" \
       -H "MIME-version: 1.0" \
       --data-binary "$2" \
       $XYMONURL
 fi

 exit 0

Ralph Mitchell