forked from mirrors/nixpkgs
85 lines
2.9 KiB
Nix
85 lines
2.9 KiB
Nix
import ./make-test.nix ({ pkgs, ... }:
|
|
{
|
|
name = "ecryptfs";
|
|
|
|
machine = { config, pkgs, ... }: {
|
|
imports = [ ./common/user-account.nix ];
|
|
boot.kernelModules = [ "ecryptfs" ];
|
|
security.pam.enableEcryptfs = true;
|
|
environment.systemPackages = with pkgs; [ keyutils ];
|
|
};
|
|
|
|
testScript = ''
|
|
$machine->waitForUnit("default.target");
|
|
|
|
# Set alice up with a password and a home
|
|
$machine->succeed("(echo foobar; echo foobar) | passwd alice");
|
|
$machine->succeed("chown -R alice.users ~alice");
|
|
|
|
# Migrate alice's home
|
|
my $out = $machine->succeed("echo foobar | ecryptfs-migrate-home -u alice");
|
|
$machine->log("ecryptfs-migrate-home said: $out");
|
|
|
|
# Log alice in (ecryptfs passwhrase is wrapped during first login)
|
|
$machine->waitUntilTTYMatches(1, "login: ");
|
|
$machine->sendChars("alice\n");
|
|
$machine->waitUntilTTYMatches(1, "Password: ");
|
|
$machine->sendChars("foobar\n");
|
|
$machine->waitUntilTTYMatches(1, "alice\@machine");
|
|
$machine->sendChars("logout\n");
|
|
$machine->waitUntilTTYMatches(1, "login: ");
|
|
|
|
# Why do I need to do this??
|
|
$machine->succeed("su alice -c ecryptfs-umount-private || true");
|
|
$machine->sleep(1);
|
|
$machine->fail("mount | grep ecryptfs"); # check that encrypted home is not mounted
|
|
|
|
# Show contents of the user keyring
|
|
my $out = $machine->succeed("su - alice -c 'keyctl list \@u'");
|
|
$machine->log("keyctl unlink said: " . $out);
|
|
|
|
# Log alice again
|
|
$machine->waitUntilTTYMatches(1, "login: ");
|
|
$machine->sendChars("alice\n");
|
|
$machine->waitUntilTTYMatches(1, "Password: ");
|
|
$machine->sendChars("foobar\n");
|
|
$machine->waitUntilTTYMatches(1, "alice\@machine");
|
|
|
|
# Create some files in encrypted home
|
|
$machine->succeed("su alice -c 'touch ~alice/a'");
|
|
$machine->succeed("su alice -c 'echo c > ~alice/b'");
|
|
|
|
# Logout
|
|
$machine->sendChars("logout\n");
|
|
$machine->waitUntilTTYMatches(1, "login: ");
|
|
|
|
# Why do I need to do this??
|
|
$machine->succeed("su alice -c ecryptfs-umount-private || true");
|
|
$machine->sleep(1);
|
|
|
|
# Check that the filesystem is not accessible
|
|
$machine->fail("mount | grep ecryptfs");
|
|
$machine->succeed("su alice -c 'test \! -f ~alice/a'");
|
|
$machine->succeed("su alice -c 'test \! -f ~alice/b'");
|
|
|
|
# Log alice once more
|
|
$machine->waitUntilTTYMatches(1, "login: ");
|
|
$machine->sendChars("alice\n");
|
|
$machine->waitUntilTTYMatches(1, "Password: ");
|
|
$machine->sendChars("foobar\n");
|
|
$machine->waitUntilTTYMatches(1, "alice\@machine");
|
|
|
|
# Check that the files are there
|
|
$machine->sleep(1);
|
|
$machine->succeed("su alice -c 'test -f ~alice/a'");
|
|
$machine->succeed("su alice -c 'test -f ~alice/b'");
|
|
$machine->succeed(qq%test "\$(cat ~alice/b)" = "c"%);
|
|
|
|
# Catch https://github.com/NixOS/nixpkgs/issues/16766
|
|
$machine->succeed("su alice -c 'ls -lh ~alice/'");
|
|
|
|
$machine->sendChars("logout\n");
|
|
$machine->waitUntilTTYMatches(1, "login: ");
|
|
'';
|
|
})
|