blob: 4988606c3a2098dba6453b3635ce709254ad2bfa (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
#! /usr/bin/perl -w
use strict;
use POSIX qw(tmpnam);
my $pkgfile = $ARGV[0];
die unless defined $pkgfile;
my $tmpdir;
do { $tmpdir = tmpnam(); }
until mkdir $tmpdir, 0777;
# !!! remove tmpdir on exit
print "unpacking $pkgfile in $tmpdir...\n";
system "bunzip2 < $pkgfile | (cd $tmpdir && tar xf -)";
die if $?;
print "this package contains the following derivations:\n";
system "nix-env -qsf $tmpdir/default.nix";
die if $?;
print "do you wish to install them (y/n)? ";
my $reply = <STDIN>;
chomp $reply;
exit if (!($reply eq "y"));
print "pulling caches...\n";
system "nix-pull `cat $tmpdir/caches`";
die if $?;
print "installing package...\n";
system "nix-env -i $tmpdir/default.nix '*'";
die if $?;
print "installing succeeded! (enter to continue)\n";
<STDIN>;
|