git.shemshak.org - ~bandali/configs/blob - .config/guix/system/chaman.scm

   1 (use-modules (gnu)
   2              (gnu packages linux)
   3              (srfi srfi-1))             ;for 'remove'
   4 (use-service-modules admin desktop mail networking pm ssh xorg)
   5
   6 (operating-system
   7   (host-name "chaman")
   8   (locale "en_CA.utf8")
   9   (timezone "America/Toronto")
  10   (keyboard-layout
  11    (keyboard-layout "us" "basic"))
  12   (bootloader
  13    (bootloader-configuration
  14     (bootloader grub-bootloader)
  15     (target "/dev/sda")
  16     (keyboard-layout keyboard-layout)))
  17   (mapped-devices
  18    (list (mapped-device
  19           (source
  20            (uuid "3d9d579d-3626-4fb2-9c16-beae804f1cf9"))
  21           (target "groot")
  22           (type luks-device-mapping))))
  23   (file-systems
  24    (cons* (file-system
  25             (mount-point "/")
  26             (device "/dev/mapper/groot")
  27             (type "ext4")
  28             (dependencies mapped-devices))
  29           %base-file-systems))
  30   (users (cons* (user-account
  31                  (name "bandali")
  32                  (group "users")
  33                  (home-directory "/home/bandali")
  34                  (supplementary-groups
  35                   '("wheel" "netdev" "audio" "video")))
  36                 %base-user-accounts))
  37   (packages
  38    (append
  39     (list (specification->package "nss-certs"))
  40     %base-packages))
  41   (services
  42    (cons*
  43     (service xfce-desktop-service-type)
  44     (service openssh-service-type)
  45     (set-xorg-configuration
  46      (xorg-configuration
  47       (keyboard-layout keyboard-layout)))
  48     (dovecot-service #:config
  49                      (dovecot-configuration
  50                       ;; (log-path "/dev/stderr")
  51                       (protocols (list (protocol-configuration
  52                                         (name "imap"))))
  53                       (ssl? "no")
  54                       (listen '("127.0.0.1"))
  55                       (disable-plaintext-auth? #f)
  56                       (auth-mechanisms '("plain"))
  57                       (postmaster-address "bandali@gnu.local")
  58                       (mail-location "maildir:/home/bandali/mail/%d/%n/mail")
  59                       (userdbs (list (userdb-configuration
  60                                       (driver "static")
  61                                       (args (list "uid=bandali" "gid=users" "home=/home/bandali/mail/%d/%n")))))
  62                       (passdbs (list (passdb-configuration
  63                                       (driver "passwd-file")
  64                                       (args (list "/home/bandali/.config/dovecot/passwd")))))))
  65     (service rottlog-service-type
  66              (rottlog-configuration))
  67     (service thermald-service-type)
  68     (service tlp-service-type
  69              (tlp-configuration
  70               (cpu-boost-on-ac? #t)
  71               (sound-power-save-on-bat 0)
  72               (sound-power-save-controller? #f)
  73               ;; (usb-blacklist "0e8f:00a8") ;for some reason doesn't seem to work
  74               (usb-autosuspend? #f)))
  75     (simple-service 'my-powertop-auto-tune activation-service-type
  76                     #~(zero? (system* #$(file-append powertop "/sbin/powertop")
  77                                       "--auto-tune")))
  78     ;; (service slim-service-type
  79     ;;          (slim-configuration
  80     ;;           (display ":0")
  81     ;;           (vt "vt7")))
  82     ;; (service slim-service-type
  83     ;;          (slim-configuration
  84     ;;           (display ":1")
  85     ;;           (vt "vt8")))
  86     ;; (remove (lambda (service)
  87     ;;           (eq? (service-kind service) gdm-service-type))
  88     ;;         %desktop-services)
  89     %desktop-services)))