2015-05-09 17:16:11 -04:00
|
|
|
;; This is an operating system configuration template
|
|
|
|
;; for a "bare bones" setup, with no X11 display server.
|
2014-07-24 16:45:24 -04:00
|
|
|
|
|
|
|
(use-modules (gnu))
|
2015-05-09 17:16:11 -04:00
|
|
|
(use-service-modules networking ssh)
|
|
|
|
(use-package-modules admin)
|
2014-07-24 16:45:24 -04:00
|
|
|
|
|
|
|
(operating-system
|
2015-05-09 17:16:11 -04:00
|
|
|
(host-name "komputilo")
|
|
|
|
(timezone "Europe/Berlin")
|
2014-07-24 16:45:24 -04:00
|
|
|
(locale "en_US.UTF-8")
|
|
|
|
|
|
|
|
;; Assuming /dev/sdX is the target hard disk, and "root" is
|
|
|
|
;; the label of the target root file system.
|
|
|
|
(bootloader (grub-configuration (device "/dev/sdX")))
|
|
|
|
(file-systems (cons (file-system
|
|
|
|
(device "root")
|
|
|
|
(title 'label)
|
|
|
|
(mount-point "/")
|
|
|
|
(type "ext4"))
|
|
|
|
%base-file-systems))
|
|
|
|
|
|
|
|
;; This is where user accounts are specified. The "root"
|
|
|
|
;; account is implicit, and is initially created with the
|
|
|
|
;; empty password.
|
2015-05-25 10:54:05 -04:00
|
|
|
(users (cons (user-account
|
2014-07-24 16:45:24 -04:00
|
|
|
(name "alice")
|
|
|
|
(comment "Bob's sister")
|
|
|
|
(group "users")
|
|
|
|
|
|
|
|
;; Adding the account to the "wheel" group
|
2014-11-10 16:27:28 -05:00
|
|
|
;; makes it a sudoer. Adding it to "audio"
|
|
|
|
;; and "video" allows the user to play sound
|
|
|
|
;; and access the webcam.
|
|
|
|
(supplementary-groups '("wheel"
|
|
|
|
"audio" "video"))
|
2015-05-25 10:54:05 -04:00
|
|
|
(home-directory "/home/alice"))
|
|
|
|
%base-user-accounts))
|
2015-01-23 09:12:26 -05:00
|
|
|
|
2015-03-08 18:05:51 -04:00
|
|
|
;; Globally-installed packages.
|
2015-05-09 17:16:11 -04:00
|
|
|
(packages (cons tcpdump %base-packages))
|
2015-03-08 18:05:51 -04:00
|
|
|
|
2015-05-09 17:16:11 -04:00
|
|
|
;; Add services to the baseline: a DHCP client and
|
|
|
|
;; an SSH server.
|
|
|
|
(services (cons* (dhcp-client-service)
|
|
|
|
(lsh-service #:port-number 2222)
|
2015-01-23 09:12:26 -05:00
|
|
|
%base-services)))
|