(define-module (systems muix)
  #:use-module (gnu)
  #:use-module (guix)
  #:use-module (systems base))

;; /dev/sda1
(define %device-uuid-efi  "AC4A-082E")
;; /dev/sda2
(define %device-uuid-root "d1efd870-c9d9-47f5-bed5-3209e95b4f16")

(system-config (operating-system
  (host-name "muix")

  (keyboard-layout (keyboard-layout "us" "altgr-intl" #:model "thinkpad"))

  (mapped-devices (list (mapped-device
                          (source (uuid %device-uuid-root))
                          (target "guixvm")
                          (type luks-device-mapping))))

  (file-systems (append (map 
                          (lambda (item) (file-system
                            (device "/dev/mapper/guixvm")
                            (mount-point (car item))
                            (type "btrfs")
                            (options (car (cdr item)))
                            (dependencies mapped-devices)))
                          '(("/"        "subvol=root")
                            ("/swap"    "subvol=swap")
                            ("/boot"    "subvol=boot")
                            ("/gnu"     "subvol=gnu")
                            ("/home"    "subvol=home")
                            ("/var/log" "subvol=log")))
    (list (file-system
            (mount-point "/boot/efi")
            (device (uuid %device-uuid-efi 'fat32))
            (type "vfat")))
    %base-file-systems))

  (swap-devices (list (swap-space
                        (target "/swap/swapfile")
                        (dependencies file-systems))))

  (bootloader (bootloader-configuration
                (bootloader grub-efi-removable-bootloader)
                (targets '("/boot/efi"))
                (timeout 1)
                (keyboard-layout keyboard-layout)))))