vriska/hydra
0
0
Fork 0
forked from lix-project/hydra
Code Pull requests Activity

Test setup: support arbitrary hydra config

Browse source
This commit is contained in:
Graham Christensen 2021-02-23 16:08:25 -05:00
parent 8d3633594b
commit b2520267a9
No known key found for this signature in database
GPG key ID: FE918C3A98C1030F
1 changed files with 30 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

31
tests/lib/Setup.pm
View file

@ -10,7 +10,30 @@ use Cwd;
our @ISA = qw(Exporter); our @ISA = qw(Exporter);
our @EXPORT = qw(test_init hydra_setup nrBuildsForJobset queuedBuildsForJobset nrQueuedBuildsForJobset createBaseJobset createJobsetWithOneInput evalSucceeds runBuild updateRepository); our @EXPORT = qw(test_init hydra_setup nrBuildsForJobset queuedBuildsForJobset nrQueuedBuildsForJobset createBaseJobset createJobsetWithOneInput evalSucceeds runBuild updateRepository);
sub test_init() { # Set up the environment for running tests.
#
# Hash Parameters:
#
# * hydra_config: configuration for the Hydra processes for your test.
#
# This clears several environment variables and sets them to ephemeral
# values: a temporary database, temporary Nix store, temporary Hydra
# data directory, etc.
#
# Note: This function must run _very_ early, before nearly any Hydra
# libraries are loaded. To use this, you very likely need to `use Setup`
# and then run `test_init`, and then `require` the Hydra libraries you
# need.
#
# It returns a tuple: a handle to a temporary directory and a handle to
# the postgres service. If either of these variables go out of scope,
# those resources are released and the test environment becomes invalid.
#
# Look at the top of an existing `.t` file to see how this should be used
# in practice.
sub test_init {
my %opts = @_;
my $dir = File::Temp->newdir(); my $dir = File::Temp->newdir();
$ENV{'HYDRA_DATA'} = "$dir/hydra-data"; $ENV{'HYDRA_DATA'} = "$dir/hydra-data";
@ -22,6 +45,12 @@ sub test_init() {
print $fh "sandbox = false\n"; print $fh "sandbox = false\n";
close $fh; close $fh;
$ENV{'HYDRA_CONFIG'} = "$dir/hydra.conf";
open(my $fh, '>', $ENV{'HYDRA_CONFIG'}) or die "Could not open file '" . $ENV{'HYDRA_CONFIG'}. " $!";
print $fh $opts{'hydra_config'} || "";
close $fh;
$ENV{'NIX_STATE_DIR'} = "$dir/nix/var/nix"; $ENV{'NIX_STATE_DIR'} = "$dir/nix/var/nix";
$ENV{'NIX_MANIFESTS_DIR'} = "$dir/nix/var/nix/manifests"; $ENV{'NIX_MANIFESTS_DIR'} = "$dir/nix/var/nix/manifests";