From 3d495ba0b5c148b3d1d55cb3ad1004d1bf08841d Mon Sep 17 00:00:00 2001 From: Ryan Schanzenbacher Date: Thu, 18 May 2023 01:57:03 -0400 Subject: [PATCH] many changes, mostly migrations to using shepherd home services --- home-config/bashrc | 4 ++-- home-config/home-configuration.scm | 21 ++++++++++++++----- home-config/sway/config | 8 +++---- .../ryan-services}/pipewire.scm | 6 +++--- system.scm | 12 +++++++++-- 5 files changed, 35 insertions(+), 16 deletions(-) rename {home-config => modules/ryan-services}/pipewire.scm (97%) diff --git a/home-config/bashrc b/home-config/bashrc index 6d22d87..f52ed48 100644 --- a/home-config/bashrc +++ b/home-config/bashrc @@ -41,6 +41,6 @@ alias cat='bat --paging=never' export XDG_DATA_DIRS=$XDG_DATA_DIRS:/var/lib/flatpak/exports/share:/home/ryan/.local/share/flatpak/exports/share # GPG SETUP FOR SSH -export SSH_AUTH_SOCK=$(gpgconf --list-dirs agent-ssh-socket) -gpgconf --launch gpg-agent +#export SSH_AUTH_SOCK=$(gpgconf --list-dirs agent-ssh-socket) +#gpgconf --launch gpg-agent export GPG_TTY=$(tty) diff --git a/home-config/home-configuration.scm b/home-config/home-configuration.scm index 17874d3..64d1236 100644 --- a/home-config/home-configuration.scm +++ b/home-config/home-configuration.scm @@ -8,11 +8,15 @@ (gnu packages) (gnu packages vim) (gnu packages gcc) + (gnu packages gnupg) (gnu services) (guix packages) (guix gexp) (gnu home services shells) - (gnu home services)) + (gnu home services desktop) + (gnu home services gnupg) + (gnu home services) + (ryan-services pipewire)) (define my-neovim (package @@ -52,7 +56,7 @@ "texlive-amsfonts" "texlive-lm" "texlive-lm-math" - "texlive-generic-iftex" + "texlive-iftex" "texlive-unicode-math" "texlive-fontspec" "texlive-xcolor" @@ -97,6 +101,13 @@ (service home-files-service-type `((".local/share/nvim/site/autoload/plug.vim" ,(local-file "nvim/plugin-manager/plug.vim")) (".ssh/config" ,(local-file "ssh/config")) - (".gnupg/sshcontrol" ,(local-file "gnupg/sshcontrol")) - (".gnupg/gpg-agent.conf" ,(local-file "gnupg/gpg-agent.conf")) - (".fonts" ,(local-file "fonts" #:recursive? #t)) ))))) + ;(".gnupg/sshcontrol" ,(local-file "gnupg/sshcontrol")) + ;(".gnupg/gpg-agent.conf" ,(local-file "gnupg/gpg-agent.conf")) + (".fonts" ,(local-file "fonts" #:recursive? #t)))) + (service home-pipewire-service-type) + (service home-dbus-service-type) + (service home-gpg-agent-service-type + (home-gpg-agent-configuration + (pinentry-program + (file-append pinentry "/bin/pinentry")) + (ssh-support? #t))) ))) diff --git a/home-config/sway/config b/home-config/sway/config index 3c2d0c2..fdc56e0 100644 --- a/home-config/sway/config +++ b/home-config/sway/config @@ -24,7 +24,7 @@ exec sh ~/.profile # Load up the user session dbus -exec dbus-daemon --session --address=unix:path=$XDG_RUNTIME_DIR/bus +#exec dbus-daemon --session --address=unix:path=$XDG_RUNTIME_DIR/bus # # Logo key. Use Mod1 for Alt. @@ -280,14 +280,14 @@ exec hash dbus-update-activation-environment 2>/dev/null && dbus-update-activati # Numlock on startup input * xkb_numlock enabled +# Bluetooth +exec blueman-applet + # Audio Server #exec pipewire #exec wireplumber #exec pipewire-pulse -# Bluetooth -exec blueman-applet - # Spotifyd #exec spotifyd diff --git a/home-config/pipewire.scm b/modules/ryan-services/pipewire.scm similarity index 97% rename from home-config/pipewire.scm rename to modules/ryan-services/pipewire.scm index 48089ad..cd2d10e 100644 --- a/home-config/pipewire.scm +++ b/modules/ryan-services/pipewire.scm @@ -1,4 +1,4 @@ -(define-module (home-configuration pipewire) +(define-module (ryan-services pipewire) #:use-module (gnu packages) #:use-module (gnu packages linux) #:use-module (gnu services) @@ -37,7 +37,7 @@ (start #~(make-forkexec-constructor (list #$(file-append pipewire "/bin/pipewire-pulse")) #:log-file (string-append - (or (getend "XDG_LOG_HOME") + (or (getenv "XDG_LOG_HOME") (format #f "~a/.local/var/log" (getenv "HOME"))) "/pipewire-pulse.log") @@ -71,7 +71,7 @@ ">\n<" #$(file-append pipewire "/share/alsa/alsa.conf.d/99-pipewire-default.conf") - ">/n" + ">\n" " pcm_type.pipewire { lib " #$(file-append pipewire "/lib/alsa-lib/libasound_module_pcm_pipewire.so") diff --git a/system.scm b/system.scm index ab17f32..3450770 100644 --- a/system.scm +++ b/system.scm @@ -19,7 +19,7 @@ (use-modules (gnu packages tls)) (use-modules (srfi srfi-1)) (use-package-modules security-token) -(use-service-modules cups desktop networking xorg ssh sound security-token docker) +(use-service-modules cups desktop networking xorg ssh sound security-token docker virtualization) ; Define package that installs my root ca public keys (define my-ca-certs @@ -94,7 +94,7 @@ (group "users") ;(shell (file-append zsh "/bin/zsh")) (home-directory "/home/ryan") - (supplementary-groups '("wheel" "netdev" "audio" "video" "lp" "plugdev" "docker"))) + (supplementary-groups '("wheel" "netdev" "audio" "video" "lp" "plugdev" "docker" "libvirt" "kvm"))) %base-user-accounts)) ;; Packages installed system-wide. Users can also install packages @@ -120,11 +120,16 @@ "wl-clipboard" "bluez" "blueman" + "ldacbt" + "libfreeaptx" + "libfdk" "opendoas" "xdg-desktop-portal-wlr" "xdg-desktop-portal" "pipewire" "docker" + "libvirt" + "virt-manager" "wireplumber" "zsh")) (list my-ca-certs) @@ -140,6 +145,9 @@ (service openssh-service-type) (service pcscd-service-type) (service docker-service-type) + (service libvirt-service-type + (libvirt-configuration + (unix-sock-group "libvirt"))) (service bluetooth-service-type) (udev-rules-service 'fido2 libfido2 #:groups '("plugdev")))