;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; This configuration defines the base-level ;;
;; services for both of my machines.         ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(define-module (ymir)
  #:use-module (gnu))
(use-service-modules audio desktop networking ssh xorg)

;;;; user
(define-public username "bdunahu")
(define user (user-account
              (name username)
              (comment username)
              (group "users")
              (home-directory (string-append "/home/" username))
              (supplementary-groups '("audio"
                                      "netdev"
                                      "video"
                                      "wheel"))))


;;;; base os
(define-public ymir
  (operating-system
   (host-name "ymir")
   (locale "en_US.utf8")
   (timezone "America/Denver")
   (keyboard-layout (keyboard-layout "us"))
   (kernel-arguments
    (list
     "quiet"))

   ;; 'root' is implicit
   (users (cons* user
                 %base-user-accounts))

   ;; grub (uefi)
   (bootloader (bootloader-configuration
                (bootloader grub-efi-bootloader)
                (targets (list "/boot/efi"))
                (keyboard-layout keyboard-layout)))

   ;; packages installed system-wide.
   (packages (append (map specification->package
                          '("cryptsetup"
                            "curl"
                            "emacs"
                            "emacs-desktop-environment"
                            "emacs-exwm"
                            "git"
                            "imagemagick"
                            "mpd"
                            "mpd-mpc"
                            "nss-certs"
                            "picom"
                            "pulseaudio"
                            "vim"
                            "xmodmap"))
                     %base-packages))

   ;; base system services.
   (services
    (append (list
             (service openssh-service-type
                      (openssh-configuration
                       (x11-forwarding? #t)
                       (permit-root-login 'prohibit-password)
                       (password-authentication? #f)))
             (service tor-service-type)
             ;; (service mpd-service-type
             ;;                      (mpd-configuration
             ;;                       (user user)
             ;;                       (music-directory "~/Personal/mpd/music")
             ;;                       (playlist-directory "~/Personal/mpd/playlist")
             ;;                       (default-port 6600)))
             (set-xorg-configuration
              (xorg-configuration (keyboard-layout keyboard-layout))))

            ;; This is the default list of services we
            ;; are appending to.
            %desktop-services))

   ;; OVERRIDE ME
   (file-systems (cons*
                  (file-system
                   (mount-point "/")
                   (device "none")
                   (type "tmpfs")
                   (check? #f))
                  %base-file-systems))))