NAME

Schedule::Load::Hosts - Return host loading information across a network

SYNOPSIS

    use Schedule::Load::Hosts;

    my $hosts = Schedule::Load::Hosts->fetch();
    $hosts->print_machines();
    $hosts->print_top();

    # Overall machine status
    my $hosts = Schedule::Load::Hosts->fetch();
    (my $FORMAT =    "%-12s    %4s     %4s   %6s%%       %5s    %s\n") =~ s/\s\s+/ /g;
    printf ($FORMAT, "HOST", "CPUs", "FREQ", "TotCPU", "LOAD", "ARCH/OS");
    foreach my $host ($hosts->hosts_sorted) {
        printf STDOUT ($FORMAT,
                       $host->hostname,
                       $host->cpus_slash,
                       $host->max_clock,
                       sprintf("%3.1f", $host->total_pctcpu),
                       sprintf("%2.2f", $host->adj_load),
                       $host->archname ." ". $host->osvers,
                       );
    }

    # Top processes
    (my $FORMAT =    "%-12s   %6s    %-10s     %-5s    %6s     %5s%%    %s\n") =~ s/\s\s+/ /g;
    printf ($FORMAT, "HOST", "PID", "USER",  "STATE", "RUNTM", "CPU","COMMAND");
    foreach my $host ($hosts->hosts_sorted) {
        foreach $p ($host->top_processes) {
            printf($FORMAT,
                   $host->hostname,
                   $p->pid,             $p->uname,
                   $p->state,           $p->time_hhmm,
                   $p->pctcpu,          $p->fname);
        }
    }

DESCRIPTION

This package provides information about host loading and top processes from many machines across a entire network.

$self->fetch (): Fetch the data structures from across the network. This also creates a new object. Accepts the port and host parameters.
$self->format_table(formats=>[...], data=>[...]);: Used internally by the print routines, but may be useful for external use also. Return a table as a string. Named format argument must be an array reference containing sprintf strings, plus '^' may be used as the width of the widest data column. Named data argument must be two dimmensional array reference of the data table to be printed.
$self->restart (): Restart all daemons, loading their code from the executables again. Use sparingly. chooser parameter if true (default) restarts chooser, reporter parameter if true (default) restarts reporter.
$self->hosts (): Returns the host objects in name sorted order, accessible with Schedule::Load::Hosts::Host. In an array context, returns a list; In a a scalar context, returns a reference to a list. This function is historical, using hosts_sorted or hosts_unsorted is faster.
$self->hosts_sorted (): Returns array of host objects in name sorted order, accessible with Schedule::Load::Hosts::Host.
$self->hosts_unsorted (): Returns array of host objects in unsorted order, accessible with Schedule::Load::Hosts::Host.
$self->hosts_match (...): Returns Schedule::Load::Hosts::Host objects for every host that matches the specified criteria. Criteria are named parameters, as described in Schedule::Load::Schedule, of the following: classes specifies an arrayref of allowed classes. match_cb is a routine returning true if this host matches. allow_reserved=>0 disables returning of reserved hosts.
$self->idle_host_names (...): Returns a list of host cpu names which are presently idle. Multiple free CPUs on a given host will result in that name being returned multiple times.
$self->ping: Return true if the slchoosed server is up.
$self->get_host ($hostname): Returns a reference to a host object with the specified hostname, or undef if not found.
$self->classes (): Returns all class_ variables under all hosts. In an array context, returns a list; In a a scalar context, returns a reference to a list.
$self->print_classes: Returns a string with the list of machines and classes that may run on them in a printable format.
$self->print_hosts: Returns a string with the list of host machines and loading in a printable format.
$self->print_top: Returns a string with the top jobs on all machines in a printable format, ala the top program.
$self->print_loads: Returns a string with the top jobs command lines, including any jobs with a fixed loading.

PARAMETERS

dhost: List of daemon hosts that may be running the slchoosed server. The second host is only used if the first is down, and so on down the list.
port: The port number of slchoosed. Defaults to 'slchoosed' looked up via /etc/services, else 1752.

DISTRIBUTION

The latest version is available from CPAN and from <http://www.veripool.org/>.

Copyright 1998-2011 by Wilson Snyder. This package is free software; you can redistribute it and/or modify it under the terms of either the GNU Lesser General Public License Version 3 or the Perl Artistic License Version 2.0.

AUTHORS