delroth/hydra
0
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Merge pull request #1136 from DeterminateSystems/github-status-cached-evals

Browse source 
GithubStatus: try pushing statuses for cached buildqueued/buildfinished events
This commit is contained in:
Graham Christensen 2022-01-31 09:11:37 -05:00 committed by GitHub
parent 001539c3d2 ef362e92d1
commit 94ed9ed7ff
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 14 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
src/lib/Hydra/Plugin/GithubStatus.pm
View file

@ -26,7 +26,7 @@ sub toGithubState {
}
sub common {
my ($self, $topbuild, $dependents, $finished) = @_;
my ($self, $topbuild, $dependents, $finished, $cachedEval) = @_;
my $cfg = $self->{config}->{githubstatus};
my @config = defined $cfg ? ref $cfg eq "ARRAY" ? @$cfg : ($cfg) : ();
my $baseurl = $self->{config}->{'base_uri'} || "http://localhost:3000";
@ -58,6 +58,9 @@ sub common {
my @inputs = defined $inputs_cfg ? ref $inputs_cfg eq "ARRAY" ? @$inputs_cfg : ($inputs_cfg) : ();
my %seen = map { $_ => {} } @inputs;
while (my $eval = $evals->next) {
if (defined($cachedEval) && $cachedEval->id != $eval->id) {
next;
}
my $sendStatus = sub {
my ($input, $owner, $repo, $rev) = @_;
@ -129,4 +132,14 @@ sub buildFinished {
common(@_, 1);
}
sub cachedBuildQueued {
my ($self, $evaluation, $build) = @_;
common($self, $build, [], 0, $evaluation);
}
sub cachedBuildFinished {
my ($self, $evaluation, $build) = @_;
common($self, $build, [], 1, $evaluation);
}
1;