Changeset 791e58164dd85cd9f9dcc7dcd0ea3f8337b61504 in xas-supervisor


Ignore:
Timestamp:
12/04/15 10:22:28 (3 years ago)
Author:
Kevin L. Esteb <kevin@…>
Branches:
master
Children:
46cd4240670ef645a4b78521eabbc2c10aae9891
Parents:
d997f3599fa08e6e145dc7e299a5981095ca2874
git-author:
Kevin L. Esteb <kevin@…> (12/04/15 10:22:28)
git-committer:
Kevin L. Esteb <kevin@…> (12/04/15 10:22:28)
Message:

fixing typos

Location:
trunk
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • trunk/lib/XAS/Apps/Supervisor/Monitor.pm

    rd997f3599fa08e6e145dc7e299a5981095ca2874 r791e58164dd85cd9f9dcc7dcd0ea3f8337b61504  
    1010  version   => $VERSION, 
    1111  base      => 'XAS::Lib::App::Service', 
    12   accessors => 'port host', 
     12  accessors => 'port address', 
    1313  constants => ':jsonrpc', 
    1414  vars => { 
     
    2727 
    2828    my $controller = XAS::Supervisor::Controller->new( 
    29         -alias => 'controller', 
    30         -port  => $self->port, 
    31         -host  => $self->host, 
     29        -alias     => 'controller', 
     30        -port      => $self->port, 
     31        -address   => $self->address, 
    3232        -processes => XAS::Supervisor::Monitor->load($self->service) 
    3333    ); 
     
    5252    my $self = shift; 
    5353 
    54     $self->{'port'} = RPC_DEFAULT_PORT; 
    55     $self->{'host'} = RPC_DEFAULT_HOST; 
     54    $self->{'port'}    = RPC_DEFAULT_PORT; 
     55    $self->{'address'} = RPC_DEFAULT_ADDRESS; 
    5656 
    5757    return { 
    5858        'port=s' => \$self->{'port'}, 
    59         'host=s' => \$self->{'host'}, 
     59        'address=s' => \$self->{'host'}, 
    6060    }; 
    6161 
  • trunk/lib/XAS/Supervisor/Controller.pm

    re941b3b70118b141c0535180df00742d2c121c6f r791e58164dd85cd9f9dcc7dcd0ea3f8337b61504  
    33our $VERSION = '0.01'; 
    44 
     5use POE; 
    56use XAS::Class 
    67  debug     => 0, 
     
    89  base      => 'XAS::Lib::Net::Server', 
    910  mixin     => 'XAS::Lib::Mixins::JSON::Server', 
    10   constants => ':process :jsonrpc', 
     11  constants => ':process :jsonrpc HASHREF', 
    1112  vars => { 
    1213    PARAMS => { 
     
    3031    # communications from RPC. 
    3132 
    32     $poe_kernel->state('stop_process',   '_stop_process',  $self); 
    33     $poe_kernel->state('stat_process',   '_stat_process',  $self); 
    34     $poe_kernel->state('start_process',  '_start_process', $self); 
    35     $poe_kernel->state('pause_process',  '_pause_process', $self); 
    36     $poe_kernel->state('resume_process', '_resume_process' $self); 
    37     $poe_kernel->state('check_status',   '_check_status',  $self); 
     33    $poe_kernel->state('stop_process',   '_stop_process',   $self); 
     34    $poe_kernel->state('stat_process',   '_stat_process',   $self); 
     35    $poe_kernel->state('start_process',  '_start_process',  $self); 
     36    $poe_kernel->state('pause_process',  '_pause_process',  $self); 
     37    $poe_kernel->state('resume_process', '_resume_process', $self); 
     38    $poe_kernel->state('check_status',   '_check_status',   $self); 
    3839 
    3940    # walk the chain 
     
    6970        { type => HASHREF }, 
    7071        { type => HASHREF }, 
    71     }); 
     72    ]); 
    7273 
    7374    my $alias = $self->alias; 
     
    9798        { type => HASHREF }, 
    9899        { type => HASHREF }, 
    99     }); 
     100    ]); 
    100101 
    101102    my $alias = $self->alias; 
     
    125126        { type => HASHREF }, 
    126127        { type => HASHREF }, 
    127     }); 
     128    ]); 
    128129 
    129130    my $alias = $self->alias; 
     
    156157        { type => HASHREF }, 
    157158        { type => HASHREF }, 
    158     }); 
     159    ]); 
    159160 
    160161    my $alias = $self->alias; 
     
    184185        { type => HASHREF }, 
    185186        { type => HASHREF }, 
    186     }); 
     187    ]); 
    187188 
    188189    my $alias = $self->alias; 
     
    212213        { type => HASHREF }, 
    213214        { type => HASHREF }, 
    214     }); 
     215    ]); 
    215216 
    216217    my $alias = $self->alias; 
     
    322323        'stat_process', 
    323324        'kill_process', 
    324         'pause_process' 
     325        'pause_process', 
    325326        'resume_process' 
    326327    ]; 
  • trunk/lib/XAS/Supervisor/Monitor.pm

    rd997f3599fa08e6e145dc7e299a5981095ca2874 r791e58164dd85cd9f9dcc7dcd0ea3f8337b61504  
    5151            -command        => $self->cfg->val($section, 'command'), 
    5252            -directory      => Dir($self->cfg->val($section, 'directory', "/")), 
    53             -environment    => $env; 
     53            -environment    => $env, 
    5454            -exit_codes     => $self->cfg->val($section, 'exit-codes', '0,1'), 
    5555            -exit_retries   => $self->cfg->val($section, 'exit-retires', 5), 
     
    6868                    $self->log->$level(sprintf('%s: %s', $alias, $line)); 
    6969                } else { 
    70                     $self->log->info(sprintf('%s: -> %s', $alias, output)); 
     70                    $self->log->info(sprintf('%s: -> %s', $alias, $output)); 
    7171                } 
    7272            } 
  • trunk/sbin/xas-supervisor

    • Property mode changed from 100644 to 100755
    rd997f3599fa08e6e145dc7e299a5981095ca2874 r791e58164dd85cd9f9dcc7dcd0ea3f8337b61504  
    1515# PARAMETERS: 
    1616#              --port         the port to listen on 
    17 #              --host         the interface to use 
     17#              --address      the network address to use 
    1818#              --log-type     toggles the log type 
    1919#              --log-facility changes the log facility to use 
     
    6161 options: 
    6262   --port        the management port to listen on 
    63    --host        the network address to use 
     63   --address     the network address to use 
    6464   --help        outputs simple help text 
    6565   --manual      outputs the procedures manual 
     
    7575This procedure is a simple template to help write standardized procedures. 
    7676 
     77=head1 CONFIGURATION 
     78 
     79 
    7780=head1 OPTIONS AND ARGUMENTS 
    7881 
    7982=over 4 
     83 
     84=item B<--port> 
     85 
     86The network port to listen on for management functions. 
     87 
     88=item B<--address> 
     89 
     90The network address to use. 
    8091 
    8192=item B<--help> 
     
    124135=over 4 
    125136 
     137=item L<XAS::Apps::Supervisor::Monitor|XAS::Apps::Supervisor::Monitor> 
     138 
     139=item L<XAS::Supervisor|XAS::Supervisor> 
     140 
    126141=item L<XAS|XAS> 
    127142 
Note: See TracChangeset for help on using the changeset viewer.