Perlbot/perlbuut
1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut synced 2025-06-07 22:55:40 -04:00
Code Issues Releases Wiki Activity

Fix Linux::Seccomp polluting the namespace

Browse source
This commit is contained in:
Ryan Voots 2017-03-29 17:28:26 -04:00
parent 90c7e35d4a
commit b60a1f1a51
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lib/eval.pl
View file

@ -56,7 +56,7 @@ $|++;
#*STDOUT = $stdh; #*STDOUT = $stdh;
sub get_seccomp { sub get_seccomp {
use Linux::Seccomp ':all'; use Linux::Seccomp ;
my $seccomp = Linux::Seccomp->new(SCMP_ACT_KILL); my $seccomp = Linux::Seccomp->new(SCMP_ACT_KILL);
##### set seccomp ##### set seccomp
# #
@ -74,7 +74,7 @@ sub get_seccomp {
my $rule_add = sub { my $rule_add = sub {
my $name = shift; my $name = shift;
$seccomp->rule_add(SCMP_ACT_ALLOW, syscall_resolve_name($name), @_); $seccomp->rule_add(SCMP_ACT_ALLOW, Linux::Seccomp::syscall_resolve_name($name), @_);
}; };
$rule_add->(write => [0, '==', 2]); # STDERR $rule_add->(write => [0, '==', 2]); # STDERR