My system configuration files
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

117 lines
4.1 KiB

;; This is an operating system configuration generated
;; by the graphical installer.
(use-modules (gnu)
(gnu services mcron)
(gnu system locale))
(use-service-modules dbus sound vpn desktop networking ssh xorg
shepherd virtualization)
(use-package-modules audio bash shells linux glib)
(define garbage-collector-job
;; Collect garbage 1 minutes after midnight every day.
;; The job's action is a shell command.
#~(job "1 0 * * *" ;Vixie cron syntax
"guix pull && guix upgrade && guix gc -F 1G"))
(define borg-backup-job
;; Run the backup script 5 minutes after midnight every day
;; This runs from the user's home directory.
#~(job "5 0 * * *" ;Vixie cron syntax
#:user "alex"))
(locale "en_GB.utf8")
(cons* (locale-definition
(name "ja_JP.utf8") (source "ja_JP"))
(name "gl_ES.utf8") (source "gl_ES"))
(timezone "Europe/London")
(keyboard-layout "us" "mac"))
(bootloader grub-bootloader)
(target "/dev/sda")
(keyboard-layout keyboard-layout)))
(cons* (file-system
(mount-point "/boot")
(uuid "313090d7-42c7-436a-b8b8-7ae92a1a69cd"
(type "ext4"))
(mount-point "/home")
(uuid "2c896a94-8a1c-417c-a447-818143bb4008"
(type "ext4"))
(mount-point "/")
(uuid "24b2d106-7133-4747-937a-2d999eed03c2"
(type "ext4"))
(host-name "alex-guix")
(users (cons* (user-account
(name "alex")
(comment "alex")
(group "users")
(home-directory "/home/alex")
(shell (file-append bash "/bin/bash"))
'("wheel" "libvirt" "kvm" "netdev" "audio" "video")))
(map specification->package+output
'("nss-certs" "vim" "zsh" "util-linux"
"wget" "unzip" "tree" "gnome"
"font-dejavu" "font-abattis-cantarell"
"curl" "openssl" "htop"))
(list (service gnome-desktop-service-type)
(service xfce-desktop-service-type)
(service tor-service-type)
(service libvirt-service-type
(unix-sock-group "libvirt")
(log-level 2)
(tls-port "16555")))
(service virtlog-service-type
(max-clients 1000)))
(keyboard-layout keyboard-layout)))
;; this service provides symlinks for programs in standard locations
;; (eg /bin/bash)
(service special-files-service-type
`(("/bin/sh" ,(file-append bash "/bin/sh"))
("/bin/pwd" ,(file-append coreutils "/bin/pwd"))
("/bin/bash" ,(file-append bash "/bin/bash"))
("/lib64" ,(file-append glibc "/lib"))
("/usr/bin/env" ,(file-append coreutils "/bin/env"))))
;; this service authorizes substitute URLs
;; (service guix-service-type
;; (guix-configuration
;; (substitute-urls
;; (list ""
;; ""))))
(pam-limits-entry "@audio" 'both 'rtprio 99)
(pam-limits-entry "@audio" 'both 'memlock 'unlimited)))
(service mcron-service-type
(jobs (list garbage-collector-job