abbith/guix/guixbook-pro.scm

(setenv "GUIX_PACKAGE_PATH" "/home/steve/Source/bbbsd")

(use-modules (gnu)
             (gnu system nss)
             (bbbsd packages linux)
             (bbbsd packages firmware))

(use-service-modules desktop xorg avahi dbus sound networking pm sddm ssh security-token )
(use-package-modules bootloaders certs suckless wm gnome libusb ssh
         version-control
                     xdisorg xorg pulseaudio ssh web curl sqlite nss wget curl
                     file linux bash)

(define %cuirass-specs
  #~(list
     '((#:name . "bbbsd")
       (#:load-path-inputs . ("guix"))
       (#:package-path-inputs . "bbbsd")
       (#:proc-input . "guix")
       (#:proc-file . "build-aux/cuirass/gnu-system.scm")
       (#:proc . cuirass-jobs)
       (#:proc-args . ((subset . "manifests")
                       (systems . "x86_64-linux")
                       (manifests . (("config" . "guix/manifest.scm")))))
       (#:inputs . (((#:name . "guix")
                     (#:url . "git://git.savannah.gnu.org/guix.git")
                     (#:load-path . ".")
                     (#:branch . "master")
                     (#:no-compile? . #t))
                    ((#:name . "bbbsd")
                     (#:url . "https://git.bonerbonerboner.com/boner-boner-boner/bbbsd.git")
                     (#:load-path . ".")
                     (#:branch . "master")
                     (#:no-compile? . #t)))))))

(define %guixbook-packages
  (cons* sway swaylock dmenu
         glibc-utf8-locales
   pulseaudio
         git
         gvfs
         sqlite
         nss nss-certs
         wget curl file strace binutils
         acpi cpupower
         bash bash-completion coreutils
         %base-packages))

(operating-system
 (host-name "guixbook-pro")
 (timezone "America/New_York")
 (locale "en_US.utf8")

 (kernel linux)
 (kernel-arguments '("acpi_backlight=vendor" "modprobe.blacklist=pcspkr,snd_pcsp"))

 (firmware
  (cons*
   b43-firmware
   linux-firmware-nonfree
   %base-firmware))

 (bootloader
  (bootloader-configuration
   (bootloader grub-efi-bootloader)
   (target "/boot/efi")))

 (file-systems
  (cons* (file-system
          (device (file-system-label "guixsd"))
          (mount-point "/")
          (type "ext4"))
         (file-system
          (device (file-system-label "EFI"))
          (mount-point "/boot/efi")
          (type "vfat"))
         %base-file-systems))

 (swap-devices '("/dev/sda3"))


 (users
  (cons (user-account
         (name "steve")
         (comment "Steve")
         (group "users")
         (supplementary-groups '("wheel" "netdev" "input"
                                 "audio" "video" "users"))
         (home-directory "/home/steve"))
        %base-user-accounts))

 (packages %guixbook-packages)

 (services
  (cons*

   (service
    sddm-service-type
    (sddm-configuration
     (display-server "wayland")

     (auto-login-user "steve")))

   (screen-locker-service swaylock "swaylock")

   (simple-service 'mtp udev-service-type (list libmtp))

   (service network-manager-service-type)
   (service wpa-supplicant-service-type)

   (service thermald-service-type)
   (service tlp-service-type)
   (service upower-service-type
            (upower-configuration
             (use-percentage-for-policy? #t)
             (percentage-low 25)
             (percentage-critical 10)
             (percentage-action 5)))

   (service avahi-service-type)
   (udisks-service)
   (accountsservice-service)
;   (service colord-service-type)
   (geoclue-service)
   (polkit-service)
   (elogind-service)
   (dbus-service)

   (bluetooth-service #:auto-enable? #t)

;   (service gnome-keyring-service-type)
   (service pcscd-service-type)

   (service ntp-service-type)
   (service openssh-service-type)

   (service alsa-service-type)
 ;  (service pulseaudio-service-type)

;   (service earlyoom-service-type)

   %base-services))

 (name-service-switch %mdns-host-lookup-nss))