;; This is an operating system configuration template
;; for a "bare bones" setup, with no X11 display server.

(use-modules (gnu))
(use-service-modules networking
                     desktop
                     dbus
                     ssh
                     sysctl)
(use-package-modules admin
                     certs
                     curl
                     ntp
                     nvi
                     ssh
                     shells
                     rsync
                     tmux
                     version-control
                     vim)

(operating-system
  (host-name "zamia")
  (timezone "America/New_York")
  (locale "en_US.UTF-8")
  (locale-libcs (list glibc-2.29 (canonical-package glibc)))

  (kernel-arguments
   '(;; Console resolution
     "gfxpayload=1440x900x16,1440x900"

     ;; console cursor. stops the blinking but the colors are bad
     "vt.cur.default=0x520032"

     "consoleblank=120"
     ;; ???
     "quiet"
     ;; Disable the PC speaker
     "modprobe.blacklist=pcspkr,snd_pcsp"))

  ;; Assuming /dev/sdX is the target hard disk, and "my-root" is
  ;; the label of the target root file system.
  (bootloader (grub-configuration (target "/dev/sda")
                                  (terminal-outputs '(console))))
  (file-systems (cons* (file-system
                        (device (uuid "foo"))
                        (mount-point "/")
                        (type "btrfs"))
                       (file-system
                        (device (uuid "bar"))
                        (mount-point "/home")
                        (type "btrfs"))
                      %base-file-systems))

  ;; This is where user accounts are specified.  The "root"
  ;; account is implicit, and is initially created with the
  ;; empty password.
  (users (append (list (user-account
                         (name "leo")
                         (group "users")
                         (shell #~(string-append #$zsh "/bin/zsh"))

                         ;; Adding the account to the "wheel" group
                         ;; makes it a sudoer.  Adding it to "audio"
                         ;; and "video" allows the user to play sound
                         ;; and access the webcam.
                         (supplementary-groups '("wheel" "netdev" "audio"))))
               %base-user-accounts))

  ;; Globally-installed packages.
  (packages (cons* curl
                   git
                   openssh mosh
                   nss-certs
                   ntp
                   rsync
                   tmux
                   tree
                   vim nvi
                   %base-packages))

  (services
    (cons* (dbus-service)
           (service gpm-service-type)
           (service openssh-service-type
                      (openssh-configuration
                        (password-authentication? #f)))
           (service ntp-service-type)
           (service dhcp-client-service-type)
           (service wpa-supplicant-service-type
             (wpa-supplicant-configuration
               (interface "wls1")
               (config-file "/etc/wpa_supplicant/wpa_supplicant.conf")))
           (elogind-service)
           (modify-services %base-services
             (guix-service-type config =>
                                (guix-configuration
                                  (inherit config)
                                  (extra-options '("--max-jobs=4"))
                                  (substitute-urls
                                    '("https://private.mirror https://ci.guix.gnu.org"))))))))