JakeHillion/nixpkgs
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

nixos/tests/taskserver: Test imperative users

Browse Source 
As the nixos-taskserver command can also be used to imperatively manage
users, we need to test this as well.

Signed-off-by: aszlig <aszlig@redmoonstudios.org>
This commit is contained in:
aszlig 2016-04-11 12:03:16 +02:00
parent 2acf8677fa
commit 636e0e552d
No known key found for this signature in database
GPG Key ID: D0EBD0EC8C2DC961
1 changed files with 25 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
nixos/tests/taskserver.nix
View File

@ -1,7 +1,7 @@
import ./make-test.nix {
name = "taskserver";
nodes = {
nodes = rec {
server = {
networking.firewall.enable = false;
services.taskserver.enable = true;
@ -19,15 +19,10 @@ import ./make-test.nix {
users.users.alice.isNormalUser = true;
users.users.bob.isNormalUser = true;
users.users.foo.isNormalUser = true;
users.users.bar.isNormalUser = true;
};
client2 = { pkgs, ... }: {
networking.firewall.enable = false;
environment.systemPackages = [ pkgs.taskwarrior ];
users.users.alice.isNormalUser = true;
users.users.bob.isNormalUser = true;
users.users.foo.isNormalUser = true;
};
client2 = client1;
};
testScript = { nodes, ... }: let
@ -65,6 +60,17 @@ import ./make-test.nix {
}
}
sub testSync ($) {
my $user = $_[0];
subtest "sync for user $user", sub {
$client1->succeed(su $user, "task add foo >&2");
$client1->succeed(su $user, "task sync >&2");
$client2->fail(su $user, "task list >&2");
$client2->succeed(su $user, "task sync >&2");
$client2->succeed(su $user, "task list >&2");
};
}
startAll;
$server->waitForUnit("taskserver.service");
@ -84,14 +90,16 @@ import ./make-test.nix {
setupClientsFor "testOrganisation", "foo";
setupClientsFor "anotherOrganisation", "bob";
for ("alice", "bob", "foo") {
subtest "sync for $_", sub {
$client1->succeed(su $_, "task add foo >&2");
$client1->succeed(su $_, "task sync >&2");
$client2->fail(su $_, "task list >&2");
$client2->succeed(su $_, "task sync >&2");
$client2->succeed(su $_, "task list >&2");
};
}
testSync $_ for ("alice", "bob", "foo");
$server->fail("nixos-taskserver add-user imperativeOrg bar");
$server->succeed(
"nixos-taskserver add-org imperativeOrg",
"nixos-taskserver add-user imperativeOrg bar"
);
setupClientsFor "imperativeOrg", "bar";
testSync "bar";
'';
}