Line 164... |
Line 164... |
164 |
push @status, "remote machine ($configuration->{'remoteMachine'}->{'ip'}) is " . ( $configuration->{'remoteMachine'}->{'up'} ? 'Up' : 'Down' ) . "\n";
|
164 |
push @status, "remote machine ($configuration->{'remoteMachine'}->{'ip'}) is " . ( $configuration->{'remoteMachine'}->{'up'} ? 'Up' : 'Down' ) . "\n";
|
165 |
# check for maintenance flags, exit if we should go into mainteannce mode
|
165 |
# check for maintenance flags, exit if we should go into mainteannce mode
|
166 |
if ( my $result = &checkMaintenance( $configuration ) ) {
|
166 |
if ( my $result = &checkMaintenance( $configuration ) ) {
|
167 |
push @status,$result;
|
167 |
push @status,$result;
|
168 |
&sendMail( join( "\n", @status), $configuration, "Maintenance Mode" );
|
168 |
&sendMail( join( "\n", @status), $configuration, "Maintenance Mode" );
|
169 |
exit;
|
169 |
die;
|
170 |
}
|
170 |
}
|
171 |
|
171 |
|
172 |
# we can not connect to the remote server, so just shut down
|
172 |
# we can not connect to the remote server, so just shut down
|
173 |
&shutdownMachine( $configuration, "No connection to remote machine", @status ) unless $configuration->{'remoteMachine'}->{'up'};
|
173 |
&shutdownMachine( $configuration, "No connection to remote machine", @status ) unless $configuration->{'remoteMachine'}->{'up'};
|
174 |
|
174 |
|