X-Git-Url: http://git.ieval.ro/?p=linux-seccomp.git;a=blobdiff_plain;f=t%2FLinux-Seccomp.t;h=954b2cce2926b06598e0219b2e60d31a6ab810a8;hp=771d41e4851f9b92e87d98b8bb3975360cfa1c91;hb=16ca5f5de629d1df10da2103836e8e0375613c27;hpb=0f2e0967ddbd2c70e153423cddeb9f184761eb70 diff --git a/t/Linux-Seccomp.t b/t/Linux-Seccomp.t index 771d41e..954b2cc 100644 --- a/t/Linux-Seccomp.t +++ b/t/Linux-Seccomp.t @@ -2,8 +2,8 @@ use strict; use warnings; -use Test::More tests => 2; -BEGIN { use_ok('Linux::Seccomp') }; +use Test::More tests => 3; +BEGIN { use_ok('Linux::Seccomp', ':all') }; my $fail = 0; @@ -122,3 +122,13 @@ foreach my $constname (qw( } ok( $fail == 0 , 'Constants' ); + +my $got_sigsys = 0; +$SIG{SYS} = sub { $got_sigsys = 1 }; + +my $ctx = Linux::Seccomp->new(SCMP_ACT_ALLOW); +$ctx->rule_add(SCMP_ACT_TRAP, syscall_resolve_name('mkdir')); +$ctx->load; + +mkdir 'testdir'; +ok $got_sigsys, 'filter with SCMP_ACT_TRAP on mkdir() works';