;; -*- mode: scheme; -*-
;; This is an operating system configuration template
;; for a "bare bones" setup, with no X11 display server.

(use-modules (gnu))
(use-service-modules networking ssh)
(use-package-modules screen ssh)

(operating-system
  (host-name "komputilo")
  (timezone "Europe/Berlin")
  (locale "en_US.utf8")

  ;; Boot in "legacy" BIOS mode, assuming /dev/sdX is the
  ;; target hard disk, and "my-root" is the label of the target
  ;; root file system.
  (bootloader (bootloader-configuration
                (bootloader grub-bootloader)
                (targets '("/dev/sdX"))))
  ;; It's fitting to support the equally bare bones ‘-nographic’
  ;; QEMU option, which also nicely sidesteps forcing QWERTY.
  (kernel-arguments (list "console=ttyS0,115200"))
  (file-systems (cons (file-system
                        (device (file-system-label "my-root"))
                        (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.
  (users (cons (user-account
                (name "alice")
                (comment "Bob's sister")
                (group "users")

                ;; Adding the account to the "wheel" group
                ;; 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")))
               %base-user-accounts))

  ;; Globally-installed packages.
  (packages (cons screen %base-packages))

  ;; Add services to the baseline: a DHCP client and an SSH
  ;; server.  You may wish to add an NTP service here.
  (services (append (list (service dhcp-client-service-type)
                          (service openssh-service-type
                                   (openssh-configuration
                                    (openssh openssh-sans-x)
                                    (port-number 2222))))
                    %base-services)))
<a href='/guix/log/?id=571f1b9c01e3a29b3f6d288d991a89e3ab189370&amp;showmsg=1'>root</a>/<a href='/guix/log/tests?id=571f1b9c01e3a29b3f6d288d991a89e3ab189370&amp;showmsg=1'>tests</a>/<a href='/guix/log/tests/store-roots.scm?id=571f1b9c01e3a29b3f6d288d991a89e3ab189370&amp;showmsg=1'>store-roots.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/tests/store-roots.scm?id=571f1b9c01e3a29b3f6d288d991a89e3ab189370'>Collapse</a>)</th><th class='left'>Author</th></tr>
<tr class='logheader'><td><span title='2023-08-18 16:10:08 +0200'>2023-08-18</span></td><td class='logsubject'><a href='/guix/commit/tests/store-roots.scm?id=4b1fdd44ed87dc07d23cc9313a8b6b14d0646923'>tests: store-roots: Remove bogus test.</a></td><td>Ludovic Courtès</td></tr>
<tr class='nohover-highlight'><td/><td colspan='3' class='logmsg'>
This test was added in 1261ce15233cbf7e24de9959df86a23b46314a28 but it
proved to be bogus: &lt;https://issues.guix.gnu.org/64760&gt;.

* tests/store-roots.scm ("gc-roots, initial"): Remove.


</td></tr>
<tr class='logheader'><td><span title='2023-06-18 23:36:25 +0200'>2023-06-18</span></td><td class='logsubject'><a href='/guix/commit/tests/store-roots.scm?id=1261ce15233cbf7e24de9959df86a23b46314a28'>store: Tolerate non-existent GC root directories.</a></td><td>Ludovic Courtès</td></tr>
<tr class='nohover-highlight'><td/><td colspan='3' class='logmsg'>
* guix/store/roots.scm (gc-roots): Wrap 'scandir*' call in 'catch'.
* tests/store-roots.scm ("gc-roots, initial"): New test.  Move
'open-connection' call below.


</td></tr>