aboutsummaryrefslogtreecommitdiff
path: root/tests/server/backend-t
diff options
context:
space:
mode:
authorRuss Allbery <rra@stanford.edu>2010-08-25 18:01:37 -0700
committerRuss Allbery <rra@stanford.edu>2010-08-25 18:01:37 -0700
commit5cc66fdef38a67e25850159c0c5282d6dc927178 (patch)
tree9636351ee75eacc2f74a989fd8fad712fe95e6ec /tests/server/backend-t
parentd46528a011f58881af9e9fb0c11de6422d469f17 (diff)
parente91c0b93355b28617f7c0d756026856762ece242 (diff)
Merge commit 'upstream/0.12' into debian
Diffstat (limited to 'tests/server/backend-t')
-rwxr-xr-xtests/server/backend-t18
1 files changed, 13 insertions, 5 deletions
diff --git a/tests/server/backend-t b/tests/server/backend-t
index b58d02c..a618391 100755
--- a/tests/server/backend-t
+++ b/tests/server/backend-t
@@ -289,11 +289,19 @@ for my $command (sort keys %acl_commands) {
my @args = @base;
$args[$arg] = 'foo;bar';
($out, $err) = run_backend ('acl', $command, @args);
- is ($err, "invalid characters in argument: foo;bar\n",
- "Invalid arguments for acl $command $arg");
- is ($OUTPUT, "error for admin (1.2.3.4): invalid characters in"
- . " argument: foo;bar\n", ' and syslog correct');
- is ($out, "$new\n", ' and nothing ran');
+ if (($command eq 'add' or $command eq 'remove') and $arg == 2) {
+ is ($err, '', 'Add/remove allows any characters');
+ is ($OUTPUT, "command acl $command @args[0..2] from admin"
+ . " (1.2.3.4) succeeded\n", ' and success logged');
+ is ($out, "$new\nacl_$command @args[0..2]\n",
+ ' and calls the right method');
+ } else {
+ is ($err, "invalid characters in argument: foo;bar\n",
+ "Invalid arguments for acl $command $arg");
+ is ($OUTPUT, "error for admin (1.2.3.4): invalid characters in"
+ . " argument: foo;bar\n", ' and syslog correct');
+ is ($out, "$new\n", ' and nothing ran');
+ }
}
}
for my $command (sort keys %flag_commands) {