mirror of
https://github.com/NixOS/nix.git
synced 2024-11-26 00:32:28 +00:00
Revert "Scan /proc/<pid>/cmdline for GC roots"
This reverts commit 194e3374b8
.
Checking the command line for GC roots means that
$ nix-store --delete $path
will fail because $path is now a root because it's mentioned on the
command line.
This commit is contained in:
parent
8931bf7168
commit
b352fe2775
@ -15,6 +15,8 @@ sub readProc {
|
||||
|
||||
my $process = "/proc/$name";
|
||||
|
||||
#print STDERR "=== $process\n";
|
||||
|
||||
my $target;
|
||||
print "$target\n" if $target = readlink "$process/exe";
|
||||
print "$target\n" if $target = readlink "$process/cwd";
|
||||
@ -36,17 +38,11 @@ sub readProc {
|
||||
}
|
||||
|
||||
# Get all store paths that appear in the environment of this process.
|
||||
my $re = "\Q$Nix::Config::storeDir\E\/[0-9a-z]+[0-9a-zA-Z\+\-\._\?=]*";
|
||||
eval {
|
||||
my $env = Nix::Utils::readFile "$process/environ";
|
||||
my @matches = $env =~ /$re/g;
|
||||
my @matches = $env =~ /\Q$Nix::Config::storeDir\E\/[0-9a-z]+[0-9a-zA-Z\+\-\._\?=]*/g;
|
||||
print "$_\n" foreach @matches;
|
||||
};
|
||||
eval {
|
||||
my $cmdline = Nix::Utils::readFile "$process/cmdline";
|
||||
my @matches = $cmdline =~ /$re/g;
|
||||
print "$_\n" foreach @matches;
|
||||
};
|
||||
}
|
||||
}
|
||||
|
||||
closedir DIR;
|
||||
|
Loading…
Reference in New Issue
Block a user