425 lines
12 KiB
Org Mode
425 lines
12 KiB
Org Mode
#+TITLE: Guix Configuration
|
|
|
|
I use GNU Guix as my operating system. I'm able to declare the state of the operating system in a series of configuration files in a similar way to Puppet. Eventually I would like to integrate Guix Home into this configuration.
|
|
|
|
* Channels
|
|
Disclaimer: I use the nonguix channel only for the use of building Firefox from source easily.
|
|
|
|
#+begin_src scheme
|
|
(list (channel
|
|
(name 'guix)
|
|
(url "https://git.savannah.gnu.org/git/guix.git")
|
|
(introduction
|
|
(make-channel-introduction
|
|
"9edb3f66fd807b096b48283debdcddccfea34bad"
|
|
(openpgp-fingerprint
|
|
"BBB0 2DDF 2CEA F6A8 0D1D E643 A2A0 6DF2 A33A 54FA"))))
|
|
(channel
|
|
(name 'nonguix)
|
|
(url "https://gitlab.com/nonguix/nonguix")
|
|
(introduction
|
|
(make-channel-introduction
|
|
"897c1a470da759236cc11798f4e0a5f7d4d59fbc"
|
|
(openpgp-fingerprint
|
|
"2A39 3FFF 68F4 EF7A 3D29 12AF 6F51 20A0 22FB B2D5")))))
|
|
#+end_src
|
|
|
|
* System
|
|
** Home Desktop
|
|
#+begin_src scheme :tangle ~/Dotfiles/.config/guix/home-desk.scm :mkdirp yes
|
|
(use-modules (gnu)
|
|
(gnu services desktop)
|
|
(gnu packages wm)
|
|
(gnu system setuid)
|
|
(gnu packages admin)
|
|
(nongnu packages linux))
|
|
|
|
(use-service-modules
|
|
cups
|
|
desktop
|
|
networking
|
|
ssh
|
|
sddm
|
|
xorg)
|
|
|
|
(operating-system
|
|
(kernel linux)
|
|
(firmware (list linux-firmware))
|
|
(locale "en_US.utf8")
|
|
(timezone "America/Los_Angeles")
|
|
(keyboard-layout (keyboard-layout "us"))
|
|
(host-name "borges")
|
|
(setuid-programs
|
|
(cons (setuid-program
|
|
(program (file-append swaylock "/bin/swaylock")))
|
|
%setuid-programs))
|
|
(users (cons* (user-account
|
|
(name "opal")
|
|
(comment "opal")
|
|
(group "users")
|
|
(home-directory "/home/opal")
|
|
(supplementary-groups
|
|
'("wheel"
|
|
"netdev"
|
|
"audio"
|
|
"video")))
|
|
%base-user-accounts))
|
|
(packages
|
|
(append
|
|
(list
|
|
(specification->package "git")
|
|
(specification->package "wl-clipboard")
|
|
(specification->package "vim")
|
|
(specification->package "nss-certs")
|
|
(specification->package "stow")
|
|
(specification->package "exfat-utils")
|
|
(specification->package "emacs")
|
|
(specification->package "emacs-exwm")
|
|
(specification->package "sway")
|
|
(specification->package "swaybg")
|
|
(specification->package "swaylock")
|
|
(specification->package "swayidle")
|
|
(specification->package "polybar")
|
|
(specification->package "nyxt")
|
|
(specification->package "dmenu")
|
|
(specification->package "bluez")
|
|
(specification->package "bluez-alsa")
|
|
(specification->package "pulseaudio")
|
|
(specification->package "keepassxc")
|
|
(specification->package "font-fira-mono")
|
|
(specification->package "font-fira-sans")
|
|
(specification->package "font-fira-code")
|
|
(specification->package "gcc-toolchain"))
|
|
%base-packages))
|
|
(services
|
|
(append (modify-services %desktop-services
|
|
(delete gdm-service-type))
|
|
(list (service sddm-service-type
|
|
(sddm-configuration
|
|
(display-server "wayland"))))))
|
|
(bootloader
|
|
(bootloader-configuration
|
|
(bootloader grub-efi-bootloader)
|
|
(targets (list "/boot/efi"))
|
|
(keyboard-layout keyboard-layout)))
|
|
(mapped-devices
|
|
(list (mapped-device
|
|
(source
|
|
(uuid "40aa6387-e935-4f70-8e7d-1975678a5a32"))
|
|
(target "cryptroot")
|
|
(type luks-device-mapping))))
|
|
(file-systems
|
|
(cons* (file-system
|
|
(mount-point "/")
|
|
(device "/dev/mapper/cryptroot")
|
|
(type "btrfs")
|
|
(dependencies mapped-devices))
|
|
(file-system
|
|
(mount-point "/boot/efi")
|
|
(device (uuid "1C3B-10F5" 'fat32))
|
|
(type "vfat"))
|
|
%base-file-systems)))
|
|
|
|
;; (setuid-programs
|
|
;; (let ((from (lambda (package file)
|
|
;; (setuid-program (program (file-append package file))))))
|
|
;; (cons* (from light "/bin/light")
|
|
;; (from mtr "/sbin/mtr")
|
|
;; (from network-manager "/bin/nmtui")
|
|
;; (from nfs-utils "/sbin/mount.nfs")
|
|
;; (from swaylock "/bin/swaylock")
|
|
;; %setuid-programs)))
|
|
|
|
;; (services (cons* ...
|
|
;; (modify-services %desktop-services
|
|
;; (gdm-service-type config
|
|
;; => (gdm-configuration
|
|
;; (inherit config)
|
|
;; (wayland? #t)
|
|
;; (debug? #t))))))
|
|
|
|
|
|
#+end_src
|
|
|
|
** Work Laptop
|
|
|
|
#+begin_src scheme :tangle ~/Dotfiles/.config/guix/work-laptop.scm :mkdirp yes
|
|
(use-modules (gnu)
|
|
(gnu services desktop)
|
|
(gnu packages wm)
|
|
(gnu system setuid)
|
|
(gnu packages admin)
|
|
(nongnu packages linux))
|
|
(use-service-modules
|
|
cups
|
|
desktop
|
|
networking
|
|
ssh
|
|
sddm
|
|
xorg)
|
|
|
|
(operating-system
|
|
(kernel linux)
|
|
(firmware (list linux-firmware))
|
|
(locale "en_US.utf8")
|
|
(timezone "America/Los_Angeles")
|
|
(keyboard-layout (keyboard-layout "us"))
|
|
(setuid-programs
|
|
(cons (setuid-program
|
|
(program (file-append swaylock "/bin/swaylock")))
|
|
%setuid-programs))
|
|
(host-name "work")
|
|
(users (cons* (user-account
|
|
(name "opal")
|
|
(comment "Opal")
|
|
(group "users")
|
|
(home-directory "/home/opal")
|
|
(supplementary-groups
|
|
'("wheel" "netdev" "audio" "video")))
|
|
%base-user-accounts))
|
|
(packages
|
|
(append
|
|
(list
|
|
(specification->package "git")
|
|
(specification->package "wl-clipboard")
|
|
(specification->package "vim")
|
|
(specification->package "nss-certs")
|
|
(specification->package "stow")
|
|
(specification->package "exfat-utils")
|
|
(specification->package "emacs")
|
|
(specification->package "emacs-exwm")
|
|
(specification->package "sway")
|
|
(specification->package "swaybg")
|
|
(specification->package "swaylock")
|
|
(specification->package "swayidle")
|
|
(specification->package "polybar")
|
|
(specification->package "nyxt")
|
|
(specification->package "dmenu")
|
|
(specification->package "bluez")
|
|
(specification->package "bluez-alsa")
|
|
(specification->package "pulseaudio")
|
|
(specification->package "keepassxc")
|
|
(specification->package "font-fira-mono")
|
|
(specification->package "font-fira-sans")
|
|
(specification->package "font-fira-code")
|
|
(specification->package "gcc-toolchain"))
|
|
%base-packages))
|
|
(services
|
|
(append (modify-services %desktop-services
|
|
(delete gdm-service-type))
|
|
(list (service sddm-service-type
|
|
(sddm-configuration
|
|
(display-server "wayland"))))))
|
|
(bootloader
|
|
(bootloader-configuration
|
|
(bootloader grub-efi-bootloader)
|
|
(targets (list "/boot/efi"))
|
|
(keyboard-layout keyboard-layout)))
|
|
(mapped-devices
|
|
(list (mapped-device
|
|
(source
|
|
(uuid "abe760e2-4ba5-4f43-81a2-1c3f16eb62a8"))
|
|
(target "cryptroot")
|
|
(type luks-device-mapping))))
|
|
(file-systems
|
|
(cons* (file-system
|
|
(mount-point "/")
|
|
(device "/dev/mapper/cryptroot")
|
|
(type "btrfs")
|
|
(dependencies mapped-devices))
|
|
(file-system
|
|
(mount-point "/boot/efi")
|
|
(device (uuid "15B3-5DE5" 'fat32))
|
|
(type "vfat"))
|
|
%base-file-systems)))
|
|
#+end_src
|
|
|
|
* Home
|
|
#+begin_src emacs-lisp
|
|
(use-modules
|
|
(gnu)
|
|
(gnu home)
|
|
(gnu home services)
|
|
(gnu home services shells)
|
|
(gnu home services shepard)
|
|
(gnu packages libreoffice)
|
|
(gnu packages mail)
|
|
(gnu packages pdf))
|
|
|
|
(home-environment
|
|
(packages
|
|
(append
|
|
;; Tools/Libraries
|
|
(list
|
|
gcc-toolchain
|
|
wget
|
|
curl
|
|
cmake
|
|
make
|
|
zip
|
|
unzip
|
|
libtool
|
|
binutils-gold
|
|
openssl
|
|
openssh
|
|
gst-plugins-bad
|
|
gst-plugins-base
|
|
gst-plugins-good
|
|
gst-plugins-ugly
|
|
gst-libav
|
|
wl-clipboard
|
|
zsh
|
|
gnupg)
|
|
;; Applications
|
|
(list
|
|
alacritty
|
|
nyxt
|
|
zathura-pdf-mupdf
|
|
thunar
|
|
firefox
|
|
wl-randr
|
|
libreoffice
|
|
calibre
|
|
mpv
|
|
youtube-dl
|
|
icedove)
|
|
;; Emacs
|
|
(list
|
|
emacs-vterm
|
|
emacs-geiser
|
|
emacs-geiser-guile
|
|
emacs-doom-modeline
|
|
emacs-all-the-icons
|
|
emacs-all-the-icons-dired
|
|
emacs-general
|
|
emacs-which-key
|
|
emacs-alert
|
|
emacs-helpful
|
|
emacs-pinentry
|
|
emacs-doom-themes
|
|
emacs-evil
|
|
emacs-evil-collection
|
|
emacs-vertico
|
|
emacs-orderless
|
|
emacs-consult
|
|
emacs-company
|
|
emacs-marginalia
|
|
emacs-perspective
|
|
emacs-dired-rsync
|
|
emacs-dired-hacks
|
|
emacs-org-bullets
|
|
emacs-org-make-toc
|
|
emacs-visual-fill-column
|
|
emacs-flycheck
|
|
emacs-rainbow-mode
|
|
emacs-rainbow-delimiters
|
|
emacs-magit
|
|
emacs-projectile
|
|
emacs-lsp-mode
|
|
emacs-lsp-ui
|
|
emacs-treemacs
|
|
emacs-lsp-treemacs
|
|
emacs-parinfer
|
|
emacs-yasnippet
|
|
emacs-pdf-tools)
|
|
;; Languages
|
|
(list
|
|
ruby
|
|
python
|
|
guile
|
|
sbcl
|
|
perl
|
|
python-lsp-server
|
|
ruby-solargraph)
|
|
;; Aesthetics/Fonts
|
|
(list
|
|
papirus-icon-theme
|
|
arc-theme
|
|
font-fira-mono
|
|
font-fira-code
|
|
font-fira-sans
|
|
font-abattis-cantarell
|
|
font-google-noto
|
|
font-awesome)))
|
|
(services
|
|
(append
|
|
;; Shell
|
|
(list
|
|
(service home-zsh-service-type
|
|
(home-zsh-configuration
|
|
;; Place all configs to $XDG_CONFIG_HOME/zsh. Makes
|
|
;; ~/.zshenv to set ZDOTDIR to $XDG_CONFIG_HOME/zsh
|
|
;; and shell process starts with ~/.config/zsh/.zshenv
|
|
(xdg-flavor? #t)
|
|
;; .zshenv
|
|
(zshenv
|
|
(list
|
|
(local-file
|
|
(string-append (getenv "HOME")
|
|
"/Dotfiles/.config/zsh/.zshenv")
|
|
"/.config/zsh/.zshenv")))
|
|
;; .zprofile
|
|
(zprofile
|
|
(list
|
|
(local-file
|
|
(string-append (getenv "HOME")
|
|
"/Dotfiles/.config/zsh/.zprofile")
|
|
"/.config/zsh/.zprofile")))
|
|
(zshrc
|
|
(list
|
|
(local-file
|
|
(string-append (getenv "HOME")
|
|
"/Dotfiles/.config/zsh/.zshrc")
|
|
"/.config/zsh/.zshrc"))))))
|
|
;; Files
|
|
(list
|
|
(simple-service 'emacs-config
|
|
home-files-service-type
|
|
(list
|
|
`(".config/emacs/init.el"
|
|
,(local-file
|
|
(string-append (getenv "HOME")
|
|
"/Dotfiles/emacs/init.el")))))
|
|
|
|
(simple-service 'nyxt-config
|
|
home-files-service-type
|
|
(list
|
|
`(".config/nyxt/init.lisp"
|
|
,(local-file
|
|
(string-append (getenv "HOME")
|
|
"/Dotfiles/nyxt/init.lisp")))))
|
|
|
|
(simple-service 'dunst-config
|
|
home-files-service-type
|
|
(list
|
|
`(".config/dunst/dunstrc"
|
|
,(local-file
|
|
(string-append (getenv "HOME")
|
|
"/Dotfiles/dunst/dunstrc")))))
|
|
|
|
(simple-service 'alacritty-config
|
|
home-files-service-type
|
|
(list
|
|
`(".config/alacritty/alacritty.yml"
|
|
,(local-file
|
|
(string-append (getenv "HOME")
|
|
"/Dotfiles/alacritty/alacritty.yml")))))
|
|
|
|
(simple-service 'alacritty-config
|
|
)
|
|
;; Daemons
|
|
(list
|
|
(service home-shepard-service-type
|
|
(home-shepherd-configuration
|
|
(services
|
|
(list
|
|
(shepard-service
|
|
(provision '(emacs))
|
|
(start #~(make-system-constructor "emacs --daemon"))
|
|
(stop #~(make-system-constructor "emacsclient -e '(kill-emacs)'")))
|
|
(shepard-service
|
|
(provision '(gnome-keyring-daemon))
|
|
(start #~(make-system-contructor "gnome-keyring-daemon --daemonize"))
|
|
(stop #~(make-system-contructor "pkill gnome-keyring-daemon")))))))))))
|
|
#+end_src
|