From 16ca5f5de629d1df10da2103836e8e0375613c27 Mon Sep 17 00:00:00 2001 From: Marius Gavrilescu Date: Sat, 19 Nov 2016 20:06:05 +0000 Subject: [PATCH] Add a simple test of essential functionality --- t/Linux-Seccomp.t | 14 ++++++++++++-- 1 file changed, 12 insertions(+), 2 deletions(-) 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'; -- 2.30.2