;; -*- mode: scheme; -*-

(use-modules (gnu)
             (gnu system nss)
             (guix utils)
             (guix packages)
             (gnu packages vim)
             (gnu packages gnome)
             (gnu packages wm)
             (gnu packages terminals)
             (gnu packages admin)
             (gnu services dbus)
             (gnu packages glib)
             (gnu packages ncurses)
             (gnu packages package-management)
             (gnu packages version-control)
             (gnu packages librewolf)
             (gnu packages fonts)
             (nongnu packages linux)
             (nongnu system linux-initrd))

(use-service-modules desktop networking dbus)

(operating-system
  (kernel linux)
  (initrd microcode-initrd)
  (firmware (list linux-firmware))
  (host-name "antelope")
  (timezone "America/Denver")
  (locale "en_US.utf8")
  (keyboard-layout (keyboard-layout "us"))
  (bootloader (bootloader-configuration
                (bootloader grub-efi-bootloader)
                (targets '("/boot"))
                (keyboard-layout keyboard-layout)))
  (file-systems (append
                 (list (file-system
                         (device (uuid "0382fec0-696c-46e2-bf07-2c4fac64a7e8" 'ext4))
                         (mount-point "/")
                         (type "ext4"))
                       (file-system
                         (device (uuid "87EA-47EC" 'fat))
                         (mount-point "/boot")
                         (type "vfat")))
                 %base-file-systems))
  (users (cons (user-account
                (name "noelle")
                (group "users")
                (supplementary-groups '("wheel" "netdev" "audio" "video")))
               %base-user-accounts))
  (packages (append (list
                     vim
                     network-manager
                     sway
                     fastfetch
                     foot
                     wmenu
                     dbus
                     ncurses
                     stow
                     git
                     librewolf
                     font-adwaita)
                    %base-packages))
  (services (modify-services (append (list (service network-manager-service-type)
                                           (service wpa-supplicant-service-type)
                                           (service elogind-service-type))
                                     %base-services)
              (guix-service-type config =>
                                 (guix-configuration
                                   (inherit config)
                                   (substitute-urls
                                     (append (list "https://substitutes.nonguix.org")
                                             %default-substitute-urls))
                                   (authorized-keys
                                     (append (list (plain-file "nonguix.pub"
                                                               "(public-key (ecc (curve Ed25519) (q #C1FD53E5D4CE971933EC50C9F307AE2171A2D3B52C804642A7A35F84F3A4EA98#)))"))
                                             %default-authorized-guix-keys))))))
  (name-service-switch %mdns-host-lookup-nss))