freya/dotfiles-guix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

update configs and virt packages

Browse source
This commit is contained in:
Freya Murphy 2023-09-14 08:59:36 -04:00
parent e192e86738
commit 0e7f944b53
No known key found for this signature in database
GPG key ID: 988032A5638EE799
10 changed files with 56 additions and 38 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
channels.scm
View file

@ -3,7 +3,7 @@
(url "https://git.savannah.gnu.org/git/guix.git") (url "https://git.savannah.gnu.org/git/guix.git")
(branch "master") (branch "master")
(commit (commit
"c3d48d024b95f57850ec429d7f326d817dda5090") "e5f7c14ef6c951f02ca710fad1869db3aedff4b5")
(introduction (introduction
(make-channel-introduction (make-channel-introduction
"9edb3f66fd807b096b48283debdcddccfea34bad" "9edb3f66fd807b096b48283debdcddccfea34bad"
@ -14,21 +14,9 @@
(url "https://gitlab.com/nonguix/nonguix") (url "https://gitlab.com/nonguix/nonguix")
(branch "master") (branch "master")
(commit (commit
"e2aa9e56d4d1888bf51d7671a18d304750373f89") "e951cda078529d238f1bc942db1112f76a01a5f7")
(introduction (introduction
(make-channel-introduction (make-channel-introduction
"897c1a470da759236cc11798f4e0a5f7d4d59fbc" "897c1a470da759236cc11798f4e0a5f7d4d59fbc"
(openpgp-fingerprint (openpgp-fingerprint
"2A39 3FFF 68F4 EF7A 3D29 12AF 6F51 20A0 22FB B2D5")))) "2A39 3FFF 68F4 EF7A 3D29 12AF 6F51 20A0 22FB B2D5")))))
(channel
(name 'rosenthal)
(url "https://codeberg.org/hako/rosenthal.git")
(branch "trunk")
(commit
"129ca6fe164bf8b5a37357bab8c5229b611f1df2")
(introduction
(make-channel-introduction
"7677db76330121a901604dfbad19077893865f35"
(openpgp-fingerprint
"13E7 6CD6 E649 C28C 3385 4DF5 5E5A A665 6149 17F7"))))
)

7
home-config/home-configuration.scm
View file

@ -19,6 +19,7 @@
(home-services pipewire) (home-services pipewire)
(home-packages mozillia) (home-packages mozillia)
(home-packages vim) (home-packages vim)
(home-packages gcc)
(home-packages audio)) (home-packages audio))
@ -32,7 +33,7 @@
"qrencode" "qrencode"
"sassc" "sassc"
"binutils" "binutils"
"gcc-toolchain" ;"gcc-toolchain"
"clang-toolchain" "clang-toolchain"
"libreoffice" "libreoffice"
"gnupg" "gnupg"
@ -68,10 +69,12 @@
"fd" "fd"
"nasm" "nasm"
"node" "node"
"ncurses"
"jq"
"tree-sitter-cli" "tree-sitter-cli"
"python-pynvim")) "python-pynvim"))
(list neovim-new easyeffects firefox-wayland-new))) (list neovim-new easyeffects firefox-wayland-new gcc-new)))
;; Below is the list of Home services. To search for available ;; Below is the list of Home services. To search for available
;; services, run 'guix home search KEYWORD' in a terminal. ;; services, run 'guix home search KEYWORD' in a terminal.

9
home-config/nix-home-manager/home.nix
View file

@ -16,16 +16,23 @@
# The home.packages option allows you to install Nix packages into your # The home.packages option allows you to install Nix packages into your
# environment. # environment.
home.packages = with pkgs; [ home.packages = with pkgs; [
# Main packages
yt-dlp yt-dlp
starship starship
discord discord
thunderbirdPackages.thunderbird-115 thunderbirdPackages.thunderbird-115
# Rust
rustup rustup
glibc glibc
gcc gcc-unwrapped
# Java
jdk jdk
maven maven
jetbrains.idea-community
# Lua
lua lua
lua52Packages.dkjson lua52Packages.dkjson
lua52Packages.luaposix lua52Packages.luaposix

2
home-config/ssh/config
View file

@ -10,7 +10,7 @@ Host tardis
Port 1111 Port 1111
Host stationery Host stationery
HostName stationery.lol HostName stationery.faith
User tylerm User tylerm
Host queeg Host queeg

4
home-config/sway/config.d/idle
View file

@ -1,5 +1,5 @@
# Turn off display after tiemout # Turn off display after tiemout
exec swayidle -w \ exec swayidle -w \
timeout 300 'swaylock -f -c 14171d' \ timeout 300 '~/.config/sway/lock.sh' \
timeout 300 'swaymsg "output * dpms off"' resume 'swaymsg "output * dpms on"' \ timeout 300 'swaymsg "output * dpms off"' resume 'swaymsg "output * dpms on"' \
before-sleep 'swaylock -f -c 14171d' before-sleep '~/.config/sway/lock.sh'

3
home-config/sway/lock.sh Executable file
View file

@ -0,0 +1,3 @@
#!/usr/bin/env bash
swaylock --indicator --clock -i ~/.config/sway/nya0.png --effect-blur 10x5

2
home-config/sway/power/layout
View file

@ -1,6 +1,6 @@
{ {
"label" : "lock", "label" : "lock",
"action" : "swaylock -f -c 242434", "action" : "~/.config/sway/lock.sh",
"text" : "Lock", "text" : "Lock",
"keybind" : "l" "keybind" : "l"
} }

33
modules/home-config/base-system.scm
View file

@ -6,6 +6,7 @@
#:use-module (gnu packages avahi) #:use-module (gnu packages avahi)
#:use-module (gnu packages shells) #:use-module (gnu packages shells)
#:use-module (gnu packages tls) #:use-module (gnu packages tls)
#:use-module (gnu packages gcc)
#:use-module (gnu packages security-token) #:use-module (gnu packages security-token)
#:use-module (gnu packages virtualization) #:use-module (gnu packages virtualization)
#:use-module (guix packages) #:use-module (guix packages)
@ -118,20 +119,19 @@
;; services. run 'guix system search KEYWORD' in a terminal. ;; services. run 'guix system search KEYWORD' in a terminal.
(services (services
(append (list (append (list
;; To configure OpenSSH, pass an 'openssh-configuration'
;; To configure OpenSSH, pass an 'openssh-configuration' ;; record as a second argument to 'service' below.
;; record as a second argument to 'service' below. (service openssh-service-type)
(service openssh-service-type) (service pcscd-service-type)
(service pcscd-service-type) (service spice-vdagent-service-type)
(service spice-vdagent-service-type) (service cups-service-type
(service cups-service-type (cups-configuration
(cups-configuration (web-interface? #t)))
(web-interface? #t))) ;; Avahi is only present for CUPS to support "automagic" printing
;; Avahi is only present for CUPS to support "automagic" printing (service avahi-service-type
(service avahi-service-type (avahi-configuration
(avahi-configuration (publish? #f) ;; do not advertise this machiene
(publish? #f) ;; do not advertise this machiene (publish-workstation? #f))) ; do not advertise, I want this to be as silent as possible
(publish-workstation? #f))) ; do not advertise, I want this to be as silent as possible
(service docker-service-type) (service docker-service-type)
(service nix-service-type) (service nix-service-type)
(service libvirt-service-type (service libvirt-service-type
@ -143,6 +143,11 @@
(service bluetooth-service-type) (service bluetooth-service-type)
(service pam-limits-service-type) (service pam-limits-service-type)
(service fprintd-service-type) (service fprintd-service-type)
;; (service special-files-service-type
;; `(("/lib64" ,(directory-union "rustup-libs"
;; (list
;; (file-append glibc "/lib")
;; (file-append gcc "/lib"))))))
(udev-rules-service 'fido2 libfido2 #:groups '("plugdev"))) (udev-rules-service 'fido2 libfido2 #:groups '("plugdev")))
;; This is the default list of services we ;; This is the default list of services we

12
modules/home-packages/gcc.scm Normal file
View file

@ -0,0 +1,12 @@
(define-module (home-packages gcc)
#:use-module (gnu)
#:use-module (guix packages)
#:use-module (gnu packages gcc))
(define-public gcc-new
(package
(inherit gcc)
(name "gcc-new")
(outputs (package-outputs gcc))))

4
modules/home-packages/virtualization.scm
View file

@ -19,7 +19,7 @@
(substitute-keyword-arguments (package-arguments libvirt) (substitute-keyword-arguments (package-arguments libvirt)
((#:phases phases) ((#:phases phases)
#~(modify-phases #$phases #~(modify-phases #$phases
(add-after 'install 'install-firmware (add-after 'install 'install-uefi
(lambda _ (lambda _
(let ((fmw (string-append #$output "/share/qemu"))) (let ((fmw (string-append #$output "/share/qemu")))
(mkdir-p fmw) (mkdir-p fmw)
@ -38,7 +38,7 @@
(substitute-keyword-arguments (package-arguments virt-manager) (substitute-keyword-arguments (package-arguments virt-manager)
((#:phases phases) ((#:phases phases)
#~(modify-phases #$phases #~(modify-phases #$phases
(add-after 'install 'install-firmware (add-after 'install 'install-uefi
(lambda _ (lambda _
(let ((fmw (string-append #$output "/share/qemu"))) (let ((fmw (string-append #$output "/share/qemu")))
(mkdir-p fmw) (mkdir-p fmw)