drakx - Mageia Installer and base platform for many utilities

diff options

author	Thierry Vignaud <tvignaud@mandriva.org>	2002-10-16 12:30:57 +0000
committer	Thierry Vignaud <tvignaud@mandriva.org>	2002-10-16 12:30:57 +0000
commit	28452db1b08cc4d108fbb503d5785edca068b5f1 (patch)
tree	3b7fe639202ca688b9eb92bacd56c5665dafddbe /onfig( '-driver' => Log::Agent::Driver::File->make( '-prefix' => $0, '-showpid' => 1, '-file' => 'mdvonline.log', ), #-caller => [ -display => '($sub/$line)', -postfix => 1 ], '-priority' => [ '-display' => '[$priority]' ], ); logsay "=================="; mdkonline::is_running('mdvonline_agent') and die "mdvonline_agent already running\n"; require_root_capability(); my %conf = mdkonline::get_configuration(); print Dumper(%conf); ! defined %conf and logwarn "no configuration set", exit 0; logsay "checking for tasks"; print Dumper(%conf); my $answer = mdkonline::soap_get_task($conf{HOST_ID}, $conf{HOST_KEY}); print Dumper($answer); if ($answer->{code} == 0) { if ($answer->{data}{command} eq 'none') { logsay "nothing to do"; } else { logsay "got something"; mdkonline::run_and_return_task($answer->{data}); } exit 1; } else { logwarn "something went wrong " . $answer->{message} . " (" . $answer->{code} . ")"; exit 0; }