RE: [hobbit] os count

["Everett, Vernon" <Vernon.Everett (at) woodside.com.au>]

Hi

I posted a script earlier this week, which can help you with this problem.
http://www.hswn.dk/hobbiton/2008/11/msg00400.html
Might need to pipe the output to get exactly what you want, but it will get basic Os versions, and with a little massaging, it will give you what you want.

Cheers
     V


-----Original Message-----
From: michael nemeth [mailto:michael.nemeth (at) lmco.com]
Sent: Friday, 21 November 2008 12:06 AM
To: hobbit (at) hswn.dk
Subject: Re: [hobbit] os count

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:michael.nemeth (at) lmco.com]
> Sent: Thursday, November 20, 2008 7:11 AM
> To: hobbit (at) hswn.dk
> 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}; }
>
>
> To unsubscribe from the hobbit list, send an e-mail to
> hobbit-unsubscribe (at) hswn.dk
>
>
>
> 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.
>
> To unsubscribe from the hobbit list, send an e-mail to
> hobbit-unsubscribe (at) hswn.dk
>
>
>
>


To unsubscribe from the hobbit list, send an e-mail to
hobbit-unsubscribe (at) hswn.dk



NOTICE: This email and any attachments are confidential. 
They may contain legally privileged information or 
copyright material. You must not read, copy, use or 
disclose them without authorisation. If you are not an 
intended recipient, please contact us at once by return 
email and then delete both messages and all attachments.