diff options
Diffstat (limited to 'guix/jd/desktops')
-rw-r--r-- | guix/jd/desktops/base.scm | 55 | ||||
-rwxr-xr-x | guix/jd/desktops/berserker.scm | 36 |
2 files changed, 54 insertions, 37 deletions
diff --git a/guix/jd/desktops/base.scm b/guix/jd/desktops/base.scm index c613c26..079d57e 100644 --- a/guix/jd/desktops/base.scm +++ b/guix/jd/desktops/base.scm | |||
@@ -18,7 +18,7 @@ | |||
18 | #:use-module (nongnu system linux-initrd)) | 18 | #:use-module (nongnu system linux-initrd)) |
19 | 19 | ||
20 | (use-package-modules wm gnome networking virtualization | 20 | (use-package-modules wm gnome networking virtualization |
21 | lisp lisp-xyz cups fonts gnupg) | 21 | lisp lisp-xyz cups fonts gnupg android) |
22 | 22 | ||
23 | (use-service-modules cups desktop networking ssh xorg | 23 | (use-service-modules cups desktop networking ssh xorg |
24 | docker virtualization pm sound dbus | 24 | docker virtualization pm sound dbus |
@@ -68,6 +68,7 @@ | |||
68 | "audio" ;; control audio devices | 68 | "audio" ;; control audio devices |
69 | "video" ;; access to webcam | 69 | "video" ;; access to webcam |
70 | "dialout" ;; access to /dev/ttyUSBX devices | 70 | "dialout" ;; access to /dev/ttyUSBX devices |
71 | "adbusers" | ||
71 | )))) | 72 | )))) |
72 | 73 | ||
73 | (define-public %jd-base-user-accounts | 74 | (define-public %jd-base-user-accounts |
@@ -147,7 +148,7 @@ | |||
147 | (map (lambda (tty) | 148 | (map (lambda (tty) |
148 | (cons tty (file-append | 149 | (cons tty (file-append |
149 | font-terminus | 150 | font-terminus |
150 | "/share/consolefonts/ter-112n"))) | 151 | "/share/consolefonts/ter-122n.psf.gz"))) |
151 | '("tty1" "tty2" "tty3" "tty4" "tty5" "tty6"))) | 152 | '("tty1" "tty2" "tty3" "tty4" "tty5" "tty6"))) |
152 | 153 | ||
153 | (service screen-locker-service-type | 154 | (service screen-locker-service-type |
@@ -167,6 +168,7 @@ | |||
167 | (bluetooth-configuration | 168 | (bluetooth-configuration |
168 | (auto-enable? #t))) | 169 | (auto-enable? #t))) |
169 | 170 | ||
171 | (service containerd-service-type) | ||
170 | (service docker-service-type) | 172 | (service docker-service-type) |
171 | (service libvirt-service-type | 173 | (service libvirt-service-type |
172 | (libvirt-configuration | 174 | (libvirt-configuration |
@@ -188,29 +190,38 @@ | |||
188 | (service nix-service-type) | 190 | (service nix-service-type) |
189 | 191 | ||
190 | polkit-network-manager-service | 192 | polkit-network-manager-service |
193 | |||
194 | (udev-rules-service 'android android-udev-rules | ||
195 | #:groups '("adbusers")) | ||
196 | |||
197 | (udev-rules-service 'microbit (udev-rule | ||
198 | "69-microbit.rules" | ||
199 | (string-append "ACTION!=\"add|change\", GOTO=\"microbit_rules_end\"" | ||
200 | "SUBSYSTEM==\"usb\", ATTR{idVendor}==\"0d28\", ATTR{idProduct}==\"0204\", TAG+=\"uaccess\"" | ||
201 | "LABEL=\"microbit_rules_end\""))) | ||
191 | 202 | ||
192 | ;; %desktop-services | 203 | ;; %desktop-services |
193 | (modify-services %desktop-services | 204 | (modify-services %desktop-services |
194 | (guix-service-type config => (guix-configuration | 205 | (guix-service-type config => (guix-configuration |
195 | (inherit config) | 206 | (inherit config) |
196 | (substitute-urls | 207 | (substitute-urls |
197 | (append (list "https://substitutes.nonguix.org") | 208 | (append (list "https://substitutes.nonguix.org") |
198 | %default-substitute-urls)) | 209 | %default-substitute-urls)) |
199 | (authorized-keys | 210 | (authorized-keys |
200 | (append (list (plain-file "non-guix.pub" | 211 | (append (list (plain-file "non-guix.pub" |
201 | "(public-key (ecc (curve Ed25519) (q #C1FD53E5D4CE971933EC50C9F307AE2171A2D3B52C804642A7A35F84F3A4EA98#)))")) | 212 | "(public-key (ecc (curve Ed25519) (q #C1FD53E5D4CE971933EC50C9F307AE2171A2D3B52C804642A7A35F84F3A4EA98#)))")) |
202 | %default-authorized-guix-keys)))) | 213 | %default-authorized-guix-keys)))) |
203 | (delete network-manager-service-type) | 214 | (delete network-manager-service-type) |
204 | ;; (delete mingetty-service-type) | 215 | ;; (delete mingetty-service-type) |
205 | (delete console-font-service-type) | 216 | (delete console-font-service-type) |
206 | 217 | ||
207 | (delete pulseaudio-service-type) | 218 | (delete pulseaudio-service-type) |
208 | (delete alsa-service-type) | 219 | (delete alsa-service-type) |
209 | (delete (if (string-prefix? "x86_64" | 220 | (delete (if (string-prefix? "x86_64" |
210 | (or (%current-target-system) | 221 | (or (%current-target-system) |
211 | (%current-system))) | 222 | (%current-system))) |
212 | gdm-service-type | 223 | gdm-service-type |
213 | sddm-service-type))))) | 224 | sddm-service-type))))) |
214 | 225 | ||
215 | ;; Odin is a base for my operating systems | 226 | ;; Odin is a base for my operating systems |
216 | (define-public odin-free | 227 | (define-public odin-free |
diff --git a/guix/jd/desktops/berserker.scm b/guix/jd/desktops/berserker.scm index ed673db..37e7adc 100755 --- a/guix/jd/desktops/berserker.scm +++ b/guix/jd/desktops/berserker.scm | |||
@@ -1,5 +1,6 @@ | |||
1 | (define-module (jd desktops berserker) | 1 | (define-module (jd desktops berserker) |
2 | #:use-module (jd desktops base) | 2 | #:use-module (jd desktops base) |
3 | #:use-module (jd packages linux) | ||
3 | #:use-module (gnu) | 4 | #:use-module (gnu) |
4 | #:use-module (gnu home)) | 5 | #:use-module (gnu home)) |
5 | 6 | ||
@@ -10,30 +11,35 @@ | |||
10 | (define system | 11 | (define system |
11 | (operating-system | 12 | (operating-system |
12 | (inherit odin-non-free) | 13 | (inherit odin-non-free) |
14 | (kernel-loadable-modules (list xmm7360-pci)) | ||
13 | (host-name "berserker") | 15 | (host-name "berserker") |
14 | 16 | ||
15 | (bootloader (bootloader-configuration | 17 | |
18 | (bootloader (bootloader-configuration | ||
16 | (bootloader grub-efi-bootloader) | 19 | (bootloader grub-efi-bootloader) |
17 | (targets (list "/boot/efi")))) | 20 | (targets (list "/boot/efi")))) |
21 | (mapped-devices (list (mapped-device | ||
22 | (source (uuid | ||
23 | "1f2b1bf2-89fe-4e2c-8b40-c460572bb776")) | ||
24 | (target "crypthome") | ||
25 | (type luks-device-mapping)))) | ||
18 | 26 | ||
19 | (swap-devices (list (swap-space | 27 | (file-systems (cons* (file-system |
20 | (target (uuid | ||
21 | "70ee2477-66ff-4856-aebf-8a77053c4462"))))) | ||
22 | |||
23 | (file-systems (cons* (file-system | ||
24 | (mount-point "/boot/efi") | ||
25 | (device (uuid "BE9B-69F0" | ||
26 | 'fat32)) | ||
27 | (type "vfat")) | ||
28 | |||
29 | (file-system | ||
30 | (mount-point "/") | 28 | (mount-point "/") |
31 | (device (uuid | 29 | (device (uuid |
32 | "d8783299-c180-4ca3-9c56-9826797f928d" | 30 | "66396ba1-bda9-46bd-ab26-5edc46b437d6" |
33 | 'ext4)) | 31 | 'ext4)) |
34 | (type "ext4")) | 32 | (type "ext4")) |
35 | 33 | (file-system | |
36 | %base-file-systems)))) | 34 | (mount-point "/boot/efi") |
35 | (device (uuid "482A-B117" | ||
36 | 'fat32)) | ||
37 | (type "vfat")) | ||
38 | (file-system | ||
39 | (mount-point "/home") | ||
40 | (device "/dev/mapper/crypthome") | ||
41 | (type "ext4") | ||
42 | (dependencies mapped-devices)) %base-file-systems)))) | ||
37 | 43 | ||
38 | 44 | ||
39 | (if (getenv "JD_HOME") home system) | 45 | (if (getenv "JD_HOME") home system) |