summaryrefslogtreecommitdiff
path: root/.config/guix/vali.scm
blob: e2ff0be26e58de967ef06ee3dcbc1e12ebc0108e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; This configuration adapts the base-level 'ymir' ;;
;; OS declaration for 'vali', a laptop.            ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(define-module (vali)
  #:use-module (ymir)
  #:use-module (gnu)
  #:use-module (gnu home)
  #:use-module (gnu packages)
  #:use-module (gnu home services)
  #:use-module (gnu services)
  #:use-module (guix gexp)
  #:use-module (xdg)
  #:use-module (shell)
  #:use-module (ssh)
  #:use-module (gpg)
  #:use-module (xserver)
  #:use-module (base))


(define system
  (operating-system
    (inherit ymir)
    (host-name "vali")

    (mapped-devices (list (mapped-device
                           (source (uuid "8d3ccf19-035a-4956-8ba7-7c00dfa3a02c"))
                           (target "hidden")
                           (type luks-device-mapping))))

    (file-systems (cons* (file-system
                           (mount-point "/boot/efi")
                           (device (uuid
                                    "8A13-7018"
                                    'fat32))
                           (type "vfat"))
                         (file-system
                           (mount-point "/home/bdunahu/Personal")
                           (device "/dev/mapper/hidden")
                           (type "ext4")
                           (dependencies mapped-devices))
                         (file-system
                           (mount-point "/")
                           (device (uuid
                                    "69a3593b-12bd-40ad-a932-007674a8cfe8"
                                    'ext4))
                           (type "ext4")) %base-file-systems))))


(define home
  (home-environment
   (packages
    `(,@desktop-packages
      ,@program-packages))

   (services
    `(,@xdg-service
      ,@shell-service
      ,@ssh-service
      ,@gpg-service
      ,@base-services
      ,@xorg-services))))


(if (getenv "RUNNING_GUIX_HOME") home system)