* hydra: queue stats (nr running builds / nr queued builds)

2010-02-12 10:19:24 +00:00
parent 68c60b4c66
commit 9cebf03a45
2 changed files with 5 additions and 1 deletions
--- a/src/lib/Hydra/Controller/Root.pm
+++ b/src/lib/Hydra/Controller/Root.pm
@ -16,6 +16,10 @@ sub begin :Private {
    $c->stash->{curUri} = $c->request->uri;
    $c->stash->{version} = $ENV{"HYDRA_RELEASE"} || "<devel>";
    $c->stash->{nixVersion} = $ENV{"NIX_RELEASE"} || "<devel>";
+
+    $c->stash->{nrRunningBuilds} = $c->model('DB::BuildSchedulingInfo')->search({ busy => 1 }, {})->count();
+    $c->stash->{nrQueuedBuilds} = $c->model('DB::BuildSchedulingInfo')->count();
+    
 }