* $HYDRA_DATA environment variable.

[?]
Nov 28, 2008, 2:36 PM
AFTXA575C6JTVLVXTYJUKQGPLBO3NFORLO5XDSPHNL44HXLRH4TAC

Dependencies

Change contents

  • replacement in src/Hydra/lib/Hydra/Controller/Root.pm at line 754
    [4.120][4.111:243]()
    return error($c, "Path " . $product->path . " is no longer available.") unless Hydra::Helper::Nix::isValidPath($product->path);
    [4.120]
    [4.260]
    return error($c, "Path " . $product->path . " is no longer available.") unless isValidPath($product->path);
  • edit in src/Hydra/lib/Hydra/Helper/Nix.pm at line 4
    [4.486]
    [4.486]
    use Exporter;
    our @ISA = qw(Exporter);
    our @EXPORT = qw(isValidPath getHydraPath getHydraDBPath openHydraDB);
  • replacement in src/Hydra/lib/Hydra/Helper/Nix.pm at line 13
    [4.613][4.613:673]()
    return system("nix-store --check-validity $path") == 0;
    [4.613]
    [4.673]
    return system("nix-store --check-validity $path 2> /dev/null") == 0;
    }
    sub getHydraPath {
    my $dir = $ENV{HYDRA_DATA};
    die "The HYDRA_DATA environment variable is not set!\n" unless defined $dir;
    die "The HYDRA_DATA directory does not exist!\n" unless -d $dir;
    return $dir;
    }
    sub getHydraDBPath {
    my $path = getHydraPath . '/hydra.sqlite';
    die "The Hydra database ($path) not exist!\n" unless -f $path;
    return "dbi:SQLite:$path";
  • replacement in src/Hydra/lib/Hydra/Helper/Nix.pm at line 32
    [4.677][4.677:680]()
    1;
    [4.677]
    [4.680]
    sub openHydraDB {
    my $db = Hydra::Schema->connect(getHydraDBPath, "", "", {});
    $db->storage->dbh->do("PRAGMA synchronous = OFF;");
    return $db;
    }
  • edit in src/Hydra/lib/Hydra/Helper/Nix.pm at line 38
    [4.681]
    1;
  • edit in src/Hydra/lib/Hydra/Model/DB.pm at line 5
    [4.2784]
    [4.2784]
    use Hydra::Helper::Nix;
  • replacement in src/Hydra/lib/Hydra/Model/DB.pm at line 9
    [4.397][4.2851:2927](),[4.2851][4.2851:2927]()
    connect_info => [
    'dbi:SQLite:../hydra.sqlite',
    ],
    [4.397]
    [4.2927]
    connect_info => [getHydraDBPath],
  • edit in src/Hydra/lib/Hydra.pm at line 5
    [4.7005]
    [4.7005]
    use Hydra::Helper::Nix;
  • replacement in src/Hydra/lib/Hydra.pm at line 24
    [4.4025][4.1392:1424](),[4.1392][4.1392:1424]()
    default_view => "TT"
    );
    [4.4025]
    [4.7262]
    default_view => "TT",
    session => {
    storage => getHydraPath . "/session_data"
    }
    );
  • replacement in src/Hydra/programs/Build.pl at line 7
    [4.73][4.2986:2987](),[4.2986][4.2986:2987]()
    [4.73]
    [4.2987]
    use Hydra::Helper::Nix;
  • edit in src/Hydra/programs/Build.pl at line 9
    [4.2988][4.74:153]()
    my $db = Hydra::Schema->connect("dbi:SQLite:dbname=hydra.sqlite", "", "", {});
  • replacement in src/Hydra/programs/Build.pl at line 10
    [4.155][4.155:207]()
    $db->storage->dbh->do("PRAGMA synchronous = OFF;");
    [4.155]
    [4.3075]
    my $db = openHydraDB;
  • edit in src/Hydra/programs/Build.pl at line 13
    [4.3077][4.3077:3194]()
    sub isValidPath {
    my $path = shift;
    return system("nix-store --check-validity $path 2> /dev/null") == 0;
    }
  • edit in src/Hydra/programs/Runner.pl at line 5
    [4.1564]
    [4.244]
    use File::Basename;
  • edit in src/Hydra/programs/Runner.pl at line 8
    [4.206]
    [4.7877]
    use Hydra::Helper::Nix;
  • replacement in src/Hydra/programs/Runner.pl at line 11
    [4.7879][4.207:286]()
    my $db = Hydra::Schema->connect("dbi:SQLite:dbname=hydra.sqlite", "", "", {});
    [4.7879]
    [4.265]
    chdir getHydraPath or die;
    my $db = openHydraDB;
  • replacement in src/Hydra/programs/Runner.pl at line 14
    [4.266][4.266:318]()
    $db->storage->dbh->do("PRAGMA synchronous = OFF;");
    [4.266]
    [4.7966]
    my $hydraHome = $ENV{"HYDRA_HOME"};
    die "The HYDRA_HOME environment variable is not set!\n" unless defined $hydraHome;
  • edit in src/Hydra/programs/Runner.pl at line 76
    [3.790]
    [4.60]
    mkdir(dirname $logfile);
  • replacement in src/Hydra/programs/Runner.pl at line 99
    [4.189][4.1720:1766](),[4.502][4.1720:1766](),[4.1766][4.548:652](),[4.548][4.548:652](),[4.652][4.330:436](),[4.436][3.1396:1446]()
    open LOG, ">$logfile" or die;
    POSIX::dup2(fileno(LOG), 1) or die;
    POSIX::dup2(fileno(LOG), 2) or die;
    exec("perl", "-IHydra/lib", "-w",
    "./Hydra/programs/Build.pl", $id);
    warn "cannot start build " . $id;
    [4.502]
    [4.2074]
    eval {
    open LOG, ">$logfile" or die "cannot create logfile $logfile";
    POSIX::dup2(fileno(LOG), 1) or die;
    POSIX::dup2(fileno(LOG), 2) or die;
    exec("perl", "-I$hydraHome/lib", "-w", "$ENV{'HYDRA_HOME'}/programs/Build.pl", $id);
    };
    warn "cannot start build $id: $@";
  • edit in src/Hydra/programs/Scheduler.pl at line 6
    [4.492]
    [4.1980]
    use Hydra::Helper::Nix;
  • edit in src/Hydra/programs/Scheduler.pl at line 10
    [4.1393][4.1393:1394](),[4.1394][4.493:572]()
    my $db = Hydra::Schema->connect("dbi:SQLite:dbname=hydra.sqlite", "", "", {});
  • replacement in src/Hydra/programs/Scheduler.pl at line 11
    [4.915][4.915:967]()
    $db->storage->dbh->do("PRAGMA synchronous = OFF;");
    [4.915]
    [4.1424]
    my $db = openHydraDB;
  • edit in src/Hydra/programs/Scheduler.pl at line 14
    [4.1426][4.0:113](),[4.3635][4.6681:6684](),[4.6684][4.1995:1996]()
    sub isValidPath {
    my $path = shift;
    return system("nix-store --check-validity $path 2> /dev/null") == 0;
    }
  • replacement in src/Hydra/root/product-list.tt at line 29
    [2.4113][2.4113:4187]()
    product.path %]</tt>. If you get the error message “imported
    [2.4113]
    [2.4187]
    product.path %]</tt>. You’ll probably also want to do
    <pre>nix-env -i [% product.path %]</pre>
    to actually install the package in your Nix user environment.</p>
    <p>If you get the error message “imported