guix-config

guix system configuration/declaration
git clone git://git.eonn.xyz/guix-config.git
Log | Files | Refs | LICENSE

cocles.scm (2921B)


      1 (use-modules
      2  (gnu)
      3  (gnu services sysctl)
      4  (gnu services networking)
      5  (gnu services dbus)
      6  (gnu services desktop)
      7  (gnu services virtualization)
      8  (gnu packages linux)
      9  (nongnu packages linux)
     10  (nongnu system linux-initrd)
     11  (eonn guix packages)
     12 
     13  ;;For concatenate
     14  (srfi srfi-1))
     15 
     16 (define %my-services
     17   (cons*
     18     (service network-manager-service-type)
     19     (service wpa-supplicant-service-type)
     20     (polkit-service)
     21     (dbus-service)
     22     (service elogind-service-type)
     23     (udisks-service)
     24     (service special-files-service-type
     25      `(("/lib64/ld-linux-x86-64.so.2" ,(file-append (canonical-package glibc) "/lib/ld-linux-x86-64.so.2"))))
     26     (service libvirt-service-type
     27 	     (libvirt-configuration
     28 	      (unix-sock-group "libvirt")
     29 	      (tls-port "16555")))
     30     (service virtlog-service-type
     31 	     (virtlog-configuration
     32 	      (max-clients 1000)))
     33     (modify-services %base-services
     34 		     (sysctl-service-type config =>
     35 					  (sysctl-configuration
     36 					   (settings (append '(("kernel.dmesg_restrict" . "0"))
     37 							     %default-sysctl-settings))))
     38 		     (login-service-type config =>
     39 					 (login-configuration
     40 					  (inherit config)
     41 					  (motd (plain-file "motd" "\
     42 					 Hot chicken hot chicken, what combo you pickin?\n\n")))))))
     43 
     44 (define %my-packages
     45   (append (concatenate (list
     46            system-packages
     47 	   xorg-packages
     48 	   xorg-misc-packages
     49 	   font-packages
     50 	   desktop-packages
     51 	   theme-packages
     52 	   tools-packages
     53 	   virtualization-packages
     54 	   (map specification->package
     55 		'("xf86-video-ati"))))
     56 	  %base-packages))
     57 
     58 (operating-system
     59   (host-name "cocles")
     60   (timezone "America/New_York")
     61   (locale "en_US.utf8")
     62 
     63   ;; nonfree components
     64   (kernel linux)
     65   (initrd microcode-initrd)
     66   (firmware (cons* amdgpu-firmware %base-firmware))
     67   ;;
     68 
     69   (kernel-loadable-modules
     70    (list v4l2loopback-linux-module))
     71 
     72   (keyboard-layout (keyboard-layout "us" "colemak"))
     73 
     74   (bootloader (bootloader-configuration
     75                 (bootloader grub-efi-bootloader)
     76                 (targets '("boot/"))
     77 		(keyboard-layout keyboard-layout)))
     78 
     79   (file-systems (append
     80                  (list (file-system
     81                          (device (file-system-label "rootfs"))
     82                          (mount-point "/")
     83                          (type "ext4"))
     84 		       (file-system
     85 			 (device "/dev/sda1")
     86 			 (mount-point "/mnt/games")
     87 			 (type "ext4"))
     88 		       (file-system
     89 			 (device "/dev/sda2")
     90 			 (mount-point "/mnt/storage")
     91 			 (type "xfs"))
     92 		       (file-system
     93 			 (device "/dev/sdb1")
     94 			 (mount-point "/mnt/other")
     95 			 (type "ext4")))
     96                  %base-file-systems))
     97 
     98   (users (cons (user-account
     99                 (name "ian")
    100                 (group "users")
    101                 (supplementary-groups '("wheel" "netdev"
    102                                         "audio" "video"
    103 					"libvirt" "kvm")))
    104                %base-user-accounts))
    105 
    106   (packages %my-packages)
    107   (services %my-services))