(use-modules (gnu)
             (gnu system))
(use-modules (nongnu packages linux)
             (nongnu system linux-initrd))

(load "system.common.scm")

(let ((os (install-to (uuid "60c115b5-08f2-435b-95e5-d3b81ffba4f4" 'ext4))))
  (operating-system
    (inherit os)
    (host-name "rose")
    (services
      (modify-services
        (xfce-desktop-services os)
        (guix-service-type config =>
          (guix-configuration
            (inherit config)
            (substitute-urls
              (cons* "https://substitutes.nonguix.org"
                     %default-substitute-urls))
            (authorized-keys
              (cons* (local-file "./nonguix.key.pub")
                     %default-authorized-guix-keys))))))
    (kernel linux)
    (initrd microcode-initrd)
    (firmware (list linux-firmware))
    (mapped-devices
      (list (mapped-device
              (source (uuid "c896e07f-d2ed-4390-8ce0-b82080d1bdc2"))
              (target "HOME")
              (type luks-device-mapping))))
    (file-systems
      (cons* (file-system
               (mount-point "/home")
               (device (uuid "73dc31f8-844d-4a87-bf54-4fb86a49469c" 'ext4))
               (type "ext4")
               (dependencies mapped-devices))
             (file-system
               (mount-point "/boot/efi")
               (device (uuid "545B-970F" 'fat32))
               (type "vfat"))
             (operating-system-file-systems os)))))