os count

Isn't that reported by the client as part of the big local checkout
message.  If you click through one of the cpu, disk, memory or procs dots,
then click through the "client data available" link near the bottom of the
page, you'll see the report.  It'll start something like this:

     client servername.linux linux
     [date]
     Thu Nov 20 09:53:28 CST 2008
     [uname]
     Linux servername 2.6.22-gentoo-r4 sparc64
     [osversion]
     Gentoo Base System release 1.12.11.1
     [uptime]
     09:53:28 up 14 days, 20:40,  0 users,  load average: 0.00, 0.00, 0.00


Ralph Mitchell


On Thu, Nov 20, 2008 at 9:06 AM, michael nemeth <user-609d3fab5b2d@xymon.invalid>wrote:

Henrik suggest this awhile ago:
$BBHOME/server/bin/bb 127.0.0.1 'hobbitdboard fields=BBH_OS test=info'
So I'm not sure were hobbit gets the  BBH_OS

Root, Paul wrote:

I wrote a script that does a similar thing. It connects to each machine
and does a uname. Being Solaris centric, I split it up by solaris version
(and zone).
I ran your script on my server, and it gives me 50 more machines than I
think I have. It certainly doesn't add up to the entries in the bb-hosts
file.
I print out a chart of each machine's level then sum it up like this:

Host Count:
   noconn : 29
     zone : 57
      5.7 : 2
      5.8 : 2
      5.9 : 11
     5.10 : 32
    nossh : 44
    Linux : 7
    TOTAL : 184


I haven't had time, but I need/want to graph this.


Paul Root
Lead Internet Systems Eng
Network Services

-----Original Message-----
From: michael nemeth [mailto:user-609d3fab5b2d@xymon.invalid] Sent: Thursday,
November 20, 2008 7:11 AM
To: user-ae9b8668bcde@xymon.invalid
Subject: [hobbit] os count

Did did a little perl program that does an os count produces count like
hp-ux   3
linux      1
sunos    38.

Run as a stand alone did not see the need to run out of hobbit.
But Henrik wouldn't this be easy enough to add in to bbtest?
Here it is:

#!/usr/local/bin/perl
eval 'exec /usr/local/bin/perl -S $0 ${1+"$@"}'
   if $running_under_some_shell;
                       # this emulates #! processing on NIH machines.
                       # (remove #! line above if indigestible)

eval '$

 '.$1.'$2;' while $ARGV[0] =~ /^([A-Za-z_0-9]+=)(.*)/ && shift;

                       # process any FOO=bar switches

$[ = 1;                 # set array base to 1
$BBHOME="/home/mnemeth/sunhobbit/";
open (HOB, "$BBHOME/server/bin/bb 127.0.0.1 'hobbitdboard fields=BBH_OS
test=info' |") ;

while (<HOB>) {
   chomp;      # strip record separator
   @Fld = split(' ', $_, -1);

   for ($i = 1; $i <= $#Fld; $i++) {
       $freq{$Fld[$i]}++;
   }
}

foreach $word (sort keys %freq) {
   printf "%s\t%d\n", $word, $freq{$word};
}


This communication is the property of Qwest and may contain confidential
or
privileged information. Unauthorized use of this communication is strictly
prohibited and may be unlawful.  If you have received this communication in
error, please immediately notify the sender by reply e-mail and destroy all
copies of the communication and any attachments.