135/netdisco
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

initial broken implementation of the runner

Browse Source
This commit is contained in:
Oliver Gorwits
2017-09-03 22:30:28 +01:00
parent 49b5274c33
commit a8c58a7b05
4 changed files with 57 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

42
lib/App/Netdisco/Backend/Runner.pm
View File

@@ -1,7 +1,8 @@
package App::Netdisco::Backend::Runner;
use Dancer ':moose :syntax';
use App::Netdisco::Worker::Status;
use Dancer::Factory::Hook;
use aliased 'App::Netdisco::Worker::Status';
use Try::Tiny;
use Role::Tiny;
@@ -9,7 +10,44 @@ use namespace::clean;
# mixin code to run workers loaded via plugins
sub run {
return App::Netdisco::Worker::Status->new({done => true, message => 'ok'});
my ($self, $job) = @_;
die 'bad job to run()' unless ref $job eq 'App::Netdisco::Backend::Job';
my $action = $job->action;
my @phase_hooks = @{ (setting('_nd2worker_hooks') || []) };
# run 00init primary
my $status = _run_first("nd2worker_${action}_00init_primary", $job);
return $status if $status->not_ok;
# run each 00init worker
_run_all("nd2worker_${action}_00init", $job);
# run primary
_run_first($_.'_primary', $job)
for (grep { m/^nd2worker_${action}_/ } @phase_hooks);
# run each worker
_run_all($_, $job)
for (grep { m/^nd2worker_${action}_/ } @phase_hooks);
return true;
}
sub _run_first {
my $hook = shift or return Status->error('missing hook param');
my $job = shift or return Status->error('missing job param');
my $store = Dancer::Factory::Hook->instance();
$store->hook_is_registered($hook)
or return Status->error("no such hook: $hook");
foreach my $worker (@{ $store->get_hooks_for($hook) }) {
my $status = $worker->($job);
return $status if $status->ok;
}
return Status->error('no worker was successful');
}
true;