simcop2387/sys-linux-namespace
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

Fix uflags

Browse source
This commit is contained in:
Ryan Voots 2017-05-03 22:37:44 -07:00
parent e6ac228d7a
commit 55275c2459
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lib/Sys/Linux/Namespace.pm
View file

@ -25,10 +25,12 @@ sub _uflags {
$uflags |= CLONE_NEWNS if ($self->private_tmp || $self->private_mount);
$uflags |= CLONE_NEWPID if ($self->private_pid);
$uflags |= CLONE_NEWNET if ($self->private_net);
return $uflags;
}
sub _subprocess {
my ($self, $code, @args) = @_;
my ($self, $code, %args) = @_;
die "_subprocess requires a CODE ref" unless ref $code eq 'CODE';
my $pid = fork();
@ -38,7 +40,7 @@ sub _subprocess {
waitpid($pid, 0); # block and wait on child
return $?;
} else {
$code->(@args);
$code->(%args);
_exit(0);
}
}
@ -93,12 +95,12 @@ sub setup {
$self->_subprocess(sub {
$self->post_setup(%args);
$code->(%args);
});
}, %args);
} else {
$self->post_setup(%args);
$code->(%args);
}
});
}, %args);
} else {
unshare($uflags);
$self->post_setup(%args);