Hi,
Current bweb version from bacula community 5.2.13
allows only to run backup jobs (.jobs type=B).
The attached git diff shows my modifications which
allow to run admin jobs too.
Hopefully this can be integrated into next version.
Best regards
Ulrich
diff --git a/gui/bweb/lib/Bconsole.pm b/gui/bweb/lib/Bconsole.pm
index dd1b580..4211493 100644
--- a/gui/bweb/lib/Bconsole.pm
+++ b/gui/bweb/lib/Bconsole.pm
@@ -388,6 +388,12 @@ sub get_fileset
return $ret;
}
+sub list_admin
+{
+ my ($self) = @_;
+ return sort split(/\r?\n/, $self->send_cmd(".jobs type=D"));
+}
+
sub list_backup
{
my ($self) = @_;
diff --git a/gui/bweb/lib/Bweb.pm b/gui/bweb/lib/Bweb.pm
index 52abe32..b10e58e 100644
--- a/gui/bweb/lib/Bweb.pm
+++ b/gui/bweb/lib/Bweb.pm
@@ -5039,7 +5039,7 @@ sub run_job_select
my $b = $self->get_bconsole();
- my $joblist = [ map { { name => $_ } } $b->list_backup() ];
+ my $joblist = [ map { { name => $_ } } $b->list_backup(), $b->list_admin() ];
$self->display({ Jobs => $joblist }, "run_job.tpl");
}
@@ -5101,7 +5101,7 @@ SELECT Pool.Name AS name
my %job_opt = (%$attr, %$arg);
- my $jobs = [ map {{ name => $_ }} $b->list_backup() ];
+ my $jobs = [ map {{ name => $_ }} $b->list_backup(), $b->list_admin() ];
my $pools = [ map { { name => $_ } } $b->list_pool() ];
my $clients = [ map { { name => $_ } }$b->list_client()];
@@ -5125,7 +5125,7 @@ sub run_job
my $b = $self->get_bconsole();
- my $jobs = [ map {{ name => $_ }} $b->list_backup() ];
+ my $jobs = [ map {{ name => $_ }} $b->list_backup(), $b->list_admin() ];
if ($b->{error}) {
return $self->error("Bconsole returns an error, check your setup. ERR=$b->{error}");
}
------------------------------------------------------------------------------
Shape the Mobile Experience: Free Subscription
Software experts and developers: Be at the forefront of tech innovation.
Intel(R) Software Adrenaline delivers strategic insight and game-changing
conversations that shape the rapidly evolving mobile landscape. Sign up now.
http://pubads.g.doubleclick.net/gampad/clk?id=63431311&iu=/4140/ostg.clktrk
_______________________________________________
Bacula-devel mailing list
Bacula-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/bacula-devel
