ahuston-0/hydra
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

* Start of a JSON API to get information about a specific build.

Browse Source 
E.g. http://server/build/1341335/api/get-info returns a JSON 
  record containing information about the build.
This commit is contained in:
Eelco Dolstra
2011-09-15 08:27:17 +00:00
parent d72538e641
commit d8a7ca67f4
5 changed files with 28 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
src/lib/Hydra/Controller/Build.pm
View File

@@ -10,6 +10,7 @@ use File::stat;
use Data::Dump qw(dump);
use Nix;
sub build : Chained('/') PathPart CaptureArgs(1) {
my ($self, $c, $id) = @_;
@@ -29,6 +30,7 @@ sub build : Chained('/') PathPart CaptureArgs(1) {
$c->stash->{project} = $c->stash->{build}->project;
}
sub view_build : Chained('build') PathPart('') Args(0) {
my ($self, $c) = @_;
@@ -215,6 +217,7 @@ sub download_by_type : Chained('build') PathPart('download-by-type') {
$c->res->redirect(defaultUriForProduct($self, $c, $product, @path));
}
sub contents : Chained('build') PathPart Args(1) {
my ($self, $c, $productnr) = @_;
@@ -308,6 +311,7 @@ sub buildtimedeps : Chained('build') PathPart('buildtime-deps') {
$c->res->content_type('image/png'); # !!!
}
sub deps : Chained('build') PathPart('deps') {
my ($self, $c) = @_;
@@ -539,4 +543,15 @@ sub clone_submit : Chained('build') PathPart('clone/submit') Args(0) {
}
sub get_info : Chained('build') PathPart('api/get-info') Args(0) {
my ($self, $c) = @_;
my $build = $c->stash->{build};
# !!! strip the json prefix
$c->stash->{jsonBuildId} = $build->id;
$c->stash->{jsonDrvPath} = $build->drvpath;
$c->stash->{jsonOutPath} = $build->outpath;
$c->forward('View::JSON');
}
1;