;; This is an operating system configuration generated
;; by the graphical installer.
;;
;; Once installation is complete, you can learn and modify
;; this file to tweak the system configuration, and pass it
;; to the 'guix system reconfigure' command to effect your
;; changes.


;; Indicate which modules to import to access the variables
;; used in this configuration.

(define-module (zeus)
  #:use-module (gnu)
  #:use-module (srfi srfi-1)
  #:use-module (gnu system nss)
  #:use-module (gnu services pm)
  #:use-module (gnu services ssh)
  #:use-module (gnu services cups)
  #:use-module (gnu services guix)
  #:use-module (gnu services desktop)
  #:use-module (gnu services docker)
  #:use-module (gnu services networking)
  #:use-module (gnu services virtualization)
  #:use-module (gnu packages wm)
  #:use-module (gnu packages cups)
  #:use-module (gnu packages vim)
  #:use-module (gnu packages gtk)
  #:use-module (gnu packages xorg)
  #:use-module (gnu packages emacs)
  #:use-module (gnu packages file-systems)
  #:use-module (gnu packages gnome)
  #:use-module (gnu packages mtools)
  #:use-module (gnu packages linux)
  #:use-module (gnu packages audio)
  #:use-module (gnu packages gnuzilla)
  #:use-module (gnu packages web-browsers)
  #:use-module (gnu packages version-control)
  #:use-module (gnu packages package-management)
  #:use-module (gnu packages linux)
  #:use-module (gnu packages admin)
  #:use-module (nongnu packages linux)
  #:use-module (nongnu system linux-initrd))


(use-service-modules cups desktop networking ssh xorg)

(operating-system
 (host-name "zeus")
 
 (kernel linux)
 (firmware (list linux-firmware))
 (initrd microcode-initrd)

 (kernel-loadable-modules (list v4l2loopback-linux-module))
 
 (locale "en_US.utf8")
 (timezone "Europe/Athens")
 (keyboard-layout (keyboard-layout "us"
				   #:options
				   '("ctrl:nocaps")))

 ;; The list of user accounts ('root' is implicit).
 (users (cons (user-account
               (name "apollo")
               (comment "Thanos Apollo")
               (group "users")
               (home-directory "/home/apollo")
               (supplementary-groups '("wheel"  ;; sudo
                                       "netdev" ;; network devices
                                       "kvm"
                                       "tty"
                                       "input"
                                       "realtime" ;; Enable realtime scheduling
                                       "lp"       ;; control bluetooth devices
                                       "audio"    ;; control audio devices
                                       "video"))) ;; control video devices
              %base-user-accounts))

 ;; Add the 'realtime' group
 (groups (cons (user-group (system? #t) (name "realtime"))
               %base-groups))

 ;; Packages installed system-wide.  Users can also install packages
 ;; under their own account: use 'guix search KEYWORD' to search
 ;; for packages and 'guix install PACKAGE' to install a package.
 (packages (append (map specification->package
			`("emacs-exwm"	
			  "emacs-desktop-environment"
			  "emacs"
			  "emacs-guix"
			  "emacs-vterm"
			  "emacs-dashboard"
			  "emacs-multi-vterm"
			  "emacs-pdf-tools"
			  "emacs-stumpwm-mode"
			  "stumpish"
			  "xrandr"
			  "picom"
			  "gnome"
			  "gnome-desktop"
			  "nss-certs"
			  "python"
			  "bind"
			  "alacritty"
			  "emacs-vterm"
			  "emacs-multi-vterm"
			  "alsa-utils"
			  "bluez-alsa"
			  "gnome-bluetooth"
			  "blueman"
			  "qtile"
			  "git"
			  "stumpwm"
			  "rofi"
			  "qemu"
			  "libvirt"
			  "virt-manager"			  
			  "font-jetbrains-mono"))
		   %base-packages))

 ;; Below is the list of system services.  To search for available
 ;; services, run 'guix system search KEYWORD' in a terminal.
 (services
  (append (list (service gnome-desktop-service-type)		 
		(service openssh-service-type)
		(service bluetooth-service-type)
		(service cups-service-type)
		(set-xorg-configuration
		 (xorg-configuration (keyboard-layout keyboard-layout)))
		)
	  ;; This is the default list of services we
	  ;; are appending to.
	  %desktop-services))
 

 
 (bootloader (bootloader-configuration
              (bootloader grub-efi-bootloader)
              (targets (list "/boot/efi"))
              (keyboard-layout keyboard-layout)))
 (mapped-devices (list (mapped-device
                        (source (uuid
                                 "0594b592-ddcb-4a3c-958d-c773d7a85d93"))
                        (target "cryptroot")
                        (type luks-device-mapping))
                       (mapped-device
                        (source (uuid
                                 "a44f40ec-94c3-457a-a9ed-5db5396f3aea"))
                        (target "crypthome")
                        (type luks-device-mapping))))

 ;; The list of file systems that get "mounted".  The unique
 ;; file system identifiers there ("UUIDs") can be obtained
 ;; by running 'blkid' in a terminal.
 (file-systems (cons* (file-system
                       (mount-point "/boot/efi")
                       (device (uuid "98B8-B93E"
                                     'fat32))
                       (type "vfat"))
                      (file-system
                       (mount-point "/")
                       (device "/dev/mapper/cryptroot")
                       (type "ext4")
                       (dependencies mapped-devices))
                      (file-system
                       (mount-point "/home")
                       (device "/dev/mapper/crypthome")
                       (type "ext4")
                       (dependencies mapped-devices))
		      (file-system
		       (mount-point "/home/apollo/external")
		       (device "/dev/sda1")
		       (type "ext4")
		       (dependencies mapped-devices))
		      %base-file-systems)))