07/12: tests: install: Fix encrypted-home-os, encrypted-home-os-key-file tests.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 0aec4e7b70cc1ae18b17522eb04ad40468984e6e
Author: Tomas Volf <~@wolfsden.cz>
AuthorDate: Thu Jan 11 18:35:44 2024 +0100

    tests: install: Fix encrypted-home-os, encrypted-home-os-key-file tests.
    
    The installation no longer fits into the 1.6G, leading to a warning while
    running the test:
    
        guix system: warning: at least 1526.8 MB needed but only 1408.4 MB 
available in /mnt
    
    Followed by a failure:
    
         93% 
[####################################################################     
]note: build failure may have been caused by lack of free disk space
        builder for 
`/gnu/store/8wl8q8nc1za0vlyv21jpzwgml45njgk2-module-import-compiled.drv' failed 
with exit code 1
    
    This commit increases the root partition to 2G, making the test pass again.
    
    * gnu/tests/install.scm (%encrypted-root-installation-script): Increase the
    root partition to 2G.
    (%test-encrypted-home-os), (%test-encrypted-home-os-key-file): Increase the
    target size to 3G to accommodate for the larger root partition.
    
    Change-Id: I0f7092f7b7fc9992d3f895a1eaecf1f2065b7360
    Signed-off-by: Ludovic Courtès <ludo@gnu.org>
---
 gnu/tests/install.scm | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/gnu/tests/install.scm b/gnu/tests/install.scm
index f553eeaa3e..f9e766e532 100644
--- a/gnu/tests/install.scm
+++ b/gnu/tests/install.scm
@@ -964,8 +964,8 @@ guix --version
 export GUIX_BUILD_OPTIONS=--no-grafts
 parted --script /dev/vdb mklabel gpt \\
   mkpart primary ext2 1M 3M \\
-  mkpart primary ext2 3M 1.6G \\
-  mkpart primary 1.6G 2.0G \\
+  mkpart primary ext2 3M 2G \\
+  mkpart primary 2G 2.4G \\
   set 1 boot on \\
   set 1 bios_grub on
 
@@ -1033,7 +1033,9 @@ launched as a shepherd service."
                                               %encrypted-home-os-source
                                               #:script
                                               
%encrypted-home-installation-script
-                                              #:packages (list cpio)))
+                                              #:packages (list cpio)
+                                              #:target-size
+                                              (* 3000 MiB)))
                          (command (qemu-command* images)))
       (run-basic-test %encrypted-home-os command "encrypted-home-os"
                       #:initialization enter-luks-passphrase-for-home)))))
@@ -1090,7 +1092,9 @@ unlock done using a key file")
                                               
%encrypted-home-os-key-file-source
                                               #:script
                                               
%encrypted-home-installation-script
-                                              #:packages (list cpio)))
+                                              #:packages (list cpio)
+                                              #:target-size
+                                              (* 3000 MiB)))
                          (command (qemu-command* images)))
       (run-basic-test %encrypted-home-os-key-file
                       command "encrypted-home-os-key-file")))))