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

Show the runtime/build dependencies in the build page

Browse Source
This commit is contained in:
Eelco Dolstra
2013-02-20 17:58:27 +01:00
parent 11c09e4c5c
commit 36a1015444
6 changed files with 59 additions and 56 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@ -339,27 +339,30 @@ sub getDependencyGraph {
}
sub deps : Chained('build') PathPart('deps') {
sub build_deps : Chained('build') PathPart('build-deps') {
my ($self, $c) = @_;
my $build = $c->stash->{build};
my $drvPath = $build->drvpath;
error($c, "Derivation no longer available.") unless isValidPath $drvPath;
$c->stash->{buildTimeGraph} = getDependencyGraph($self, $c, 0, {}, $drvPath);
$c->stash->{template} = 'build-deps.tt';
}
sub runtime_deps : Chained('build') PathPart('runtime-deps') {
my ($self, $c) = @_;
my $build = $c->stash->{build};
my @outPaths = map { $_->path } $build->buildoutputs->all;
$c->stash->{available} = all { isValidPath($_) } @outPaths;
$c->stash->{drvAvailable} = isValidPath $drvPath;
error($c, "Build outputs no longer available.") unless all { isValidPath($_) } @outPaths;
if ($c->stash->{available}) {
my $done = {};
$c->stash->{runtimeGraph} = [ map { getDependencyGraph($self, $c, 1, $done, $_) } @outPaths ];
}
my $done = {};
$c->stash->{runtimeGraph} = [ map { getDependencyGraph($self, $c, 1, $done, $_) } @outPaths ];
if ($c->stash->{drvAvailable}) {
my $done = {};
$c->stash->{buildTimeGraph} = getDependencyGraph($self, $c, 0, $done, $drvPath);
}
$c->stash->{template} = 'deps.tt';
$c->stash->{template} = 'runtime-deps.tt';
}