mirror of
https://github.com/privatevoid-net/nix-super.git
synced 2024-11-22 14:06:16 +02:00
21655a70f5
Nix expressions. To subscribe to a channel (needs to be done only once): nix-channel --add \ http://catamaran.labs.cs.uu.nl/dist/nix/channels/nixpkgs-unstable This just adds the given URL to ~/.nix-channels (which can also be edited manually). To update from all channels: nix-channel --update This fetches the latest expressions and pulls cache manifests. The default Nix expression (~/.nix-defexpr) is made to point to the conjunction of the expressions downloaded from all channels. So to update all installed derivations in the current user environment: nix-channel --update nix-env --upgrade '*' If you are really courageous, you can put this in a cronjob or something. You can subscribe to multiple channels. It is not entirely clear what happens when there are name clashes between derivations from different channels. From nix-env/main.cc it appears that the one with the lowest (highest?) hash will be used, which is pretty meaningless.
115 lines
2.8 KiB
Text
Executable file
115 lines
2.8 KiB
Text
Executable file
#! @perl@ -w
|
|
|
|
use strict;
|
|
|
|
|
|
# Figure out the name of the `.nix-channels' file to use.
|
|
my $home = $ENV{"HOME"};
|
|
die '$HOME not set' unless defined $home;
|
|
my $channelsList = "$home/.nix-channels";
|
|
|
|
|
|
my @channels;
|
|
|
|
|
|
# Reads the list of channels from the file $channelsList;
|
|
sub readChannels {
|
|
return if (!-f $channelsList);
|
|
open CHANNELS, "<$channelsList" or die "cannot open `$channelsList'";
|
|
while (<CHANNELS>) {
|
|
chomp;
|
|
push @channels, $_;
|
|
}
|
|
close CHANNELS;
|
|
}
|
|
|
|
|
|
# Writes the list of channels to the file $channelsList;
|
|
sub writeChannels {
|
|
open CHANNELS, ">$channelsList" or die "cannot open `$channelsList'";
|
|
foreach my $url (@channels) {
|
|
print CHANNELS "$url\n";
|
|
}
|
|
close CHANNELS;
|
|
}
|
|
|
|
|
|
# Adds a channel to the file $channelsList;
|
|
sub addChannel {
|
|
my $url = shift;
|
|
readChannels;
|
|
foreach my $url2 (@channels) {
|
|
return if $url eq $url2;
|
|
}
|
|
push @channels, $url;
|
|
writeChannels;
|
|
}
|
|
|
|
|
|
# Fetch Nix expressions and pull cache manifests from the subscribed
|
|
# channels.
|
|
sub update {
|
|
readChannels;
|
|
|
|
# Pull cache manifests.
|
|
foreach my $url (@channels) {
|
|
print "pulling cache manifest from `$url'\n";
|
|
system "@bindir@/nix-pull '$url'/MANIFEST";
|
|
die "cannot pull cache manifest from `$url'" if ($? != 0);
|
|
}
|
|
|
|
# Create a Nix expression that fetches and unpacks the channel Nix
|
|
# expressions.
|
|
|
|
my $nixExpr = "[";
|
|
|
|
foreach my $url (@channels) {
|
|
my $fullURL = "$url/nixexprs.tar.bz2";
|
|
my $hash = `@bindir@/nix-prefetch-url '$fullURL' 2> /dev/null`
|
|
or die "cannot fetch `$fullURL'";
|
|
chomp $hash;
|
|
# !!! escaping
|
|
$nixExpr .= "((import @datadir@/nix/corepkgs/fetchurl) " .
|
|
"{url = $fullURL; md5 = \"$hash\"; system = \"@system@\";}) "
|
|
}
|
|
|
|
$nixExpr .= "]";
|
|
|
|
$nixExpr =
|
|
"(import @datadir@/nix/corepkgs/channels/unpack.nix) " .
|
|
"{inputs = $nixExpr; system = \"@system@\";}";
|
|
|
|
# Instantiate and realise it.
|
|
my $storeExpr = `echo '$nixExpr' | @bindir@/nix-instantiate -`
|
|
or die "cannot instantiate Nix expression";
|
|
chomp $storeExpr;
|
|
|
|
my $outPath = `nix-store -qnfB '$storeExpr'`
|
|
or die "cannot realise store expression";
|
|
chomp $outPath;
|
|
|
|
# Make it the default Nix expression for `nix-env'.
|
|
system "@bindir@/nix-env --import '$outPath'";
|
|
die "cannot pull set default Nix expression to `$outPath'" if ($? != 0);
|
|
}
|
|
|
|
|
|
while (scalar @ARGV) {
|
|
my $arg = shift @ARGV;
|
|
|
|
if ($arg eq "--add") {
|
|
die "syntax: nix-channel --add URL" if (scalar @ARGV != 1);
|
|
addChannel (shift @ARGV);
|
|
last;
|
|
}
|
|
|
|
elsif ($arg eq "--update") {
|
|
die "syntax: nix-channel --update" if (scalar @ARGV != 0);
|
|
update;
|
|
last;
|
|
}
|
|
|
|
else {
|
|
die "unknown argument `$arg'";
|
|
}
|
|
}
|