(use-modules (gnu)
	     (srfi srfi-1)
             )
(use-service-modules desktop networking ssh xorg sddm virtualization)
(use-package-modules wm shells)

(operating-system
  (locale "en_US.utf8")
  (timezone "Europe/Moscow")
  (keyboard-layout (keyboard-layout "us"))
  (host-name "guix")
  (users (cons* (user-account
                  (name "username")
                  (comment "Username")
                  (group "users")
                  (shell (file-append zsh "/bin/zsh"))
                  (home-directory "/home/username")
                  (supplementary-groups
                    '("wheel" "netdev" "audio" "video")))
                %base-user-accounts))
  (packages
    (append (map specification->package
		 '("sway" "swaybg" "swayidle" "swaylock" "waybar"
                   "sddm"
		   "zsh" "tmux" "zsh-autosuggestions"
                   "neovim" "openssh"
		   "termite" "git" "nss-certs"))
      %base-packages))

  (services (cons* (service qemu-binfmt-service-type ;; crosscompile
                            (qemu-binfmt-configuration
                              (platforms (lookup-qemu-platforms "arm" "aarch64"))))
                   (service openssh-service-type
                            (openssh-configuration
                              (password-authentication? #f)
			      (allow-agent-forwarding? #f)
			      (allow-tcp-forwarding? #f)
			      (gateway-ports? #f)
			      (use-pam? #f)
			      (authorized-keys
                                `(("username", (local-file "external.pub"))))))
                   (service sddm-service-type) ;; enable sddm instead gdm
                   (remove (lambda (service)
                             (eq? (service-kind service) gdm-service-type))
                           %desktop-services)))

  (bootloader
    (bootloader-configuration
      (bootloader grub-bootloader)
      (target "/dev/sda")
      (keyboard-layout keyboard-layout)))
  (swap-devices
    (list (uuid "4a5cb1cc-91d5-446f-b6cd-b4ec7f1ca930")))
  (file-systems
    (cons* (file-system
             (mount-point "/")
             (device
               (uuid "e8100f83-4a3e-48a9-b615-5237df9b8de8"
                     'ext4))
             (type "ext4"))
           %base-file-systems)))