(use-modules
  (gnu)
  (gnu image)
  (gnu system nss)
  (rosenthal packages wm)
  (zilti packages sway)
  (zilti packages hyprland)
  (nongnu packages firmware)
  (nongnu packages linux)
  (nongnu system linux-initrd))

(use-service-modules
  admin
  authentication
  base
  configuration
  dbus
  desktop
  docker
  linux
  networking
  nix
  pm
  sddm
  sound
  virtualization
  xorg)

(use-package-modules
  bootloaders
  certs
  containers
  freedesktop
  fonts
  gl
  gnome
  linux
  pciutils
  qt
  readline
  terminals
  version-control
  virtualization
  wm
  xdisorg
  xorg)

(operating-system
 (host-name "ziltis-machine")
 (timezone "Europe/Berlin")
 (locale "de_DE.utf8")
 (keyboard-layout
  (keyboard-layout "de" #:options '("caps:swapescape")))
 (kernel linux)
 (initrd microcode-initrd)
 (firmware (list linux-firmware))
 (bootloader
  (bootloader-configuration
   (bootloader grub-efi-bootloader)
   (targets
    '("/boot/efi"))
   (keyboard-layout keyboard-layout)))
 #;(file-systems %local-filesystem)
 #;(swap-devices %local-swap)
  (file-systems (append (list
                         (file-system
                          (device (file-system-label "EFI"))
                          (mount-point "/boot/efi")
                          (type "vfat"))
                         (file-system
                          (device (file-system-label "guix"))
                          (mount-point "/")
                          (type "xfs")))
                        %base-file-systems))
  (swap-devices
   (list (swap-space (target (file-system-label "swap")))))
 (users
  (cons*
   (user-account
    (name "zilti")
    (group "users")
    (supplementary-groups
     '("avahi" "users" "wheel" "netdev" "audio" "cdrom" "video" "libvirt" "lp")))
   %base-user-accounts))
  (packages
   (append
    (list bluez-firmware
          egl-wayland
          eglexternalplatform
          font-terminus
          fwupd-nonfree
          git
          glu
          hwdata
          hyprland
          i915-firmware
          libdrm
          mesa
          nss-certs
          network-manager
          qtwayland
          readline
          tuxedo-keyboard
          xdg-desktop-portal
          xdg-desktop-portal-hyprland
          xf86-video-amdgpu
          xf86-video-intel
          xorg-server-xwayland
          amdgpu-firmware
          amd-microcode
          intel-microcode)
    
    %base-packages))
  (services
   (append
    (modify-services
     %desktop-services
     (delete gdm-service-type)
     (delete screen-locker-service-type)
     (delete login-service-type)
     (delete pulseaudio-service-type)
     (guix-service-type config => (guix-configuration
                                   (inherit config)
                                   (substitute-urls
                                    (append (list "https://substitutes.nonguix.org")
                                            %default-substitute-urls))
                                   (authorized-keys
                                    (append (list (local-file "./keys/non-guix.pub"))
                                            %default-authorized-guix-keys)))))
    (list (service tlp-service-type (tlp-configuration))
          (service
            thermald-service-type
            (thermald-configuration (adaptive? #t)))
          (service
            bluetooth-service-type
            (bluetooth-configuration))
          (service
            earlyoom-service-type
            (earlyoom-configuration
              (minimum-available-memory 5)
              (minimum-free-swap 5)))
          (service
            inputattach-service-type
            (inputattach-configuration))
          (service
            libvirt-service-type
            (libvirt-configuration
              (unix-sock-group "libvirt")))
          (service nix-service-type (nix-configuration))
          (service
            virtlog-service-type
            (virtlog-configuration))
          (service
            fstrim-service-type
            (fstrim-configuration))
          (service
            fprintd-service-type
            (fprintd-configuration))
          (service sddm-service-type (sddm-configuration)))
    
    (list polkit-wheel-service)
    #;(list
    (service greetd-service-type
             (greetd-configuration
              (greeter-supplementary-groups
               (list "video" "input"))
              (terminals
               (list
                (greetd-terminal-configuration
                 (terminal-vt "1"))
                (greetd-terminal-configuration
                 (terminal-vt "2"))
                (greetd-terminal-configuration
                 (terminal-vt "3"))
                (greetd-terminal-configuration
                 (terminal-vt "4"))
                #;(greetd-terminal-configuration
                (terminal-vt "7")
                (terminal-switch #t)
                (default-session-command
                (greetd-wlgreet-session
                (command
                (file-append swayfx "/bin/sway")))))
                (greetd-terminal-configuration
                 (terminal-vt "8")))))))
    (list
     (service screen-locker-service-type
              (screen-locker-configuration
               (name "swaylock")
               (program
                (file-append swaylock-effects "/bin/swaylock"))
               (using-setuid? #f))))
    (list
     (simple-service  'add-extra-hosts
                      hosts-service-type
                      (list (host "127.0.0.1" "l.redsky.io" '("ld.redsky.io"))
                            (host "::1" "l.redsky.io" '("ld.redsky.io")))))
    (list
     (service unattended-upgrade-service-type
      (unattended-upgrade-configuration
       (schedule "5 12 * * 1")
       (channels #~
        (append %default-channels
                (list
                 (channel
                  (name 'nonguix)
                  (url "https://gitlab.com/nonguix/nonguix")
                  ;; Enable signature verification:
                  (introduction
                   (make-channel-introduction
                    "897c1a470da759236cc11798f4e0a5f7d4d59fbc"
                    (openpgp-fingerprint
                     "2A39 3FFF 68F4 EF7A 3D29  12AF 6F51 20A0 22FB B2D5"))))
                 (channel
                  (name 'emacs)
                  (url "https://github.com/babariviere/guix-emacs")
                  (introduction
                   (make-channel-introduction
                    "72ca4ef5b572fea10a4589c37264fa35d4564783"
                    (openpgp-fingerprint
                     "261C A284 3452 FB01 F6DF  6CF4 F9B7 864F 2AB4 6F18"))))
                 (channel
                  (name 'rosenthal)
                  (url "https://codeberg.org/hako/rosenthal.git")
                  (branch "trunk")
                  (introduction
                   (make-channel-introduction
                    "7677db76330121a901604dfbad19077893865f35"
                    (openpgp-fingerprint
                     "13E7 6CD6 E649 C28C 3385  4DF5 5E5A A665 6149 17F7"))))
                 (channel
                  (name 'ziltis-channel)
                  (url "https://gitea.lyrion.ch/zilti/guixchannel")
                  #;(introduction
                   (make-channel-introduction
                    "2aa768893d7da14d9831d45e6f1b1625240ff222"
                    (openpgp-fingerprint
                     "37F6 55BA F43B C0FF 300A  91A1 B389 76E8 2C9D AE42")))))
               )))))))
 (name-service-switch %mdns-host-lookup-nss))