02/02: hydra: monokuma: Update config for system reinstall.

[Christopher Baines]

cbaines pushed a commit to branch master
in repository maintenance.

commit 4251f10c0ae4c7de526fad05283917556ba3693c
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Wed Apr 19 12:42:33 2023 +0100

    hydra: monokuma: Update config for system reinstall.
    
    There were problems with the root btrfs filesystem on monokuma, and I
    wasn't able to repair the filesystem. This has put me off using btrfs
    again, so I've resintalled the system using ext4 instead.
    
    * hydra/monokuma.scm (btrfs-balance-job): Remove.
    (operating-system)[initrd-modules]: Add ahci_dwc.
    [file-systems]: Change btrfs to ext4.
    [services]: Remove btrfs-balance-job.
    [packages]: Remove btrfs-progs.
---
 hydra/monokuma.scm | 17 ++++-------------
 1 file changed, 4 insertions(+), 13 deletions(-)

diff --git a/hydra/monokuma.scm b/hydra/monokuma.scm
index b0438d7..70b3ee8 100644
--- a/hydra/monokuma.scm
+++ b/hydra/monokuma.scm
@@ -26,16 +26,6 @@
   ;; Run 'guix gc' at 3AM every day.
   #~(job '(next-hour '(3)) "guix gc -F 200G"))
 
-(define btrfs-balance-job
-  ;; Re-allocate chunks which are using less than 5% of their chunk
-  ;; space, to regain Btrfs 'unallocated' space.  The usage is kept
-  ;; low (5%) to minimize wear on the SSD.  Runs at 5 AM every 3 days.
-  #~(job '(next-hour-from (next-day (range 1 31 3)) '(5))
-         (lambda ()
-           (system* #$(file-append btrfs-progs "/bin/btrfs")
-                    "balance" "start" "-dusage=5" "/"))
-         "btrfs-balance"))
-
 ;; The actual machine.
 
 (operating-system
@@ -47,11 +37,12 @@
                (bootloader grub-efi-bootloader)
                (targets '("/boot/efi"))))
   (initrd-modules (cons* "xhci-pci" "ahci_platform" "sg" "sd_mod"
+                         "ahci_dwc"
                          %base-initrd-modules))
   (file-systems (cons* (file-system
                          (device "/dev/sda2")
                          (mount-point "/")
-                         (type "btrfs"))
+                         (type "ext4"))
                        (file-system
                          (device "/dev/sda1")
                          (mount-point "/boot/efi")
@@ -78,7 +69,7 @@
                    (service dhcp-client-service-type)
                    (service mcron-service-type
                             (mcron-configuration
-                             (jobs (list gc-job btrfs-balance-job))))
+                             (jobs (list gc-job))))
 
                    (service agetty-service-type
                             (agetty-configuration
@@ -127,4 +118,4 @@
                                  (extra-options
                                   '("--max-jobs=4")))))))
 
-  (packages (cons* btrfs-progs screen openssh strace nss-certs 
%base-packages)))
+  (packages (cons* screen openssh strace nss-certs %base-packages)))