;; This configuration adapts the base-level 'ymir' ;;
;; OS declaration for 'garm', a laptop.            ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(define-module (garm)
  #:use-module (gnu)
  #:use-module (gnu home)
  #:use-module (gnu home services)
  #:use-module (gnu home services syncthing)
  #:use-module (gnu packages)
  #:use-module (gnu packages linux)
  #:use-module (gnu services)
  #:use-module (gnu services guix)
  #:use-module (gnu services pm)
  #:use-module (guix gexp)
  #:use-module (modules base)
  #:use-module (modules dwm)
  #:use-module (modules utils)
  #:use-module (modules xorg)
  #:use-module (modules ymir)
  #:use-module (modules pdf))


(define home
  (home-environment
   (services
    `(,@bd-base-home-services
      ,@bd-desktop-home-services
      ,@bd-pdf-services
      ,@bd-dwm-home-services
      ,(service home-syncthing-service-type)))))


(operating-system
 (inherit ymir)
 (host-name "garm")

 ;; (all packages are system wide)
 (packages
  `(,@bd-base-system-packages
    ,@bd-desktop-system-packages
    ,@bd-dwm-system-packages
    ,@bd-mpd-package
    ,@bd-games-packages

    ;; machine-specific packages
    ,@(list
       brightnessctl)))

 (services
  `(,@bd-base-system-services
    ,@bd-desktop-system-services
    ,@bd-mpd-service
    ,(service guix-home-service-type
              `((,username ,home)))
    ,(service tlp-service-type)))

 (mapped-devices (list (mapped-device
                        (source (uuid "1c6a4f4d-2494-4b83-965c-1bcfdbf8a0b8"))
                        (target "hidden")
                        (type luks-device-mapping))))

 (file-systems (cons* (file-system
                       (mount-point "/boot/efi")
                       (device (uuid
                                "1A7A-026F"
                                'fat32))
                       (type "vfat"))
                      (file-system
                       (mount-point "/home")
                       (device "/dev/mapper/hidden")
                       (type "ext4")
                       (dependencies mapped-devices))
                      (file-system
                       (mount-point "/")
                       (device (uuid
                                "0a0b9520-308f-4072-a62b-b91ffacdc5b0"
                                'ext4))
                       (type "ext4")) %base-file-systems)))