;; -*- mode: scheme; -*-
;; This is an operating system configuration template
;; for a "bare bones" setup on BeagleBone Black board.

(use-modules (gnu) (gnu bootloader u-boot))
(use-service-modules networking)
(use-package-modules bootloaders screen ssh)

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

  ;; Assuming /dev/mmcblk1 is the eMMC, and "my-root" is
  ;; the label of the target root file system.
  (bootloader (bootloader-configuration
               (bootloader u-boot-beaglebone-black-bootloader)
               (targets '("/dev/mmcblk1"))))

  ;; This module is required to mount the SD card.
  (initrd-modules (cons "omap_hsmmc" %base-initrd-modules))

  (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 (append (list screen openssh) %base-packages))

  (services (append (list (service dhcp-client-service-type)
                          ;; mingetty does not work on serial lines.
                          ;; Use agetty with board-specific serial parameters.
                          (service agetty-service-type
                                   (agetty-configuration
                                    (extra-options '("-L"))
                                    (baud-rate "115200")
                                    (term "vt100")
                                    (tty "ttyO0"))))
                    %base-services)))
f1359175f444a2bc8ecac54177'>tests</a>/<a href='/guix/log/gnu/tests/networking.scm?id=8421d101c1061ef1359175f444a2bc8ecac54177'>networking.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/gnu/tests/networking.scm?id=8421d101c1061ef1359175f444a2bc8ecac54177&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2023-11-05 23:23:23 +0100'>2023-11-05</span></td><td><a href='/guix/commit/gnu/tests/networking.scm?id=31b39f2a336270048574ede1ed1619ff11f95a0a'>tests: inetd: Avoid race condition when looking for PID file.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/tests/networking.scm (run-inetd-test): Use ‘wait-for-file’ instead
of ‘file-exists?’.

Change-Id: I3e596814485428fb81595d81c4e03519340c6576
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2023-10-11 18:51:07 +0200'>2023-10-11</span></td><td><a href='/guix/commit/gnu/tests/networking.scm?id=670d985cabf81a28660c4a8024f752decc495dce'>services: static-networking: Add support for bonding.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/base.scm (&lt;network-link&gt;): Add mac-address field. Set
type field to #f by default, so it won't be mandatory. network-link
without a type will be used for existing interfaces.
(assert-network-link-mac-address, mac-address?): Add sanitizer. Allow
valid mac-address or #f.
(assert-network-link-type): Add sanitizer. Allow symbol or #f.
* gnu/services/base.scm (network-set-up/linux,
network-tear-down/linux): Adapt to new structure.
* doc/guix.texi (Networking Setup): Document it.
* gnu/tests/networking.scm (run-static-networking-advanced-test): New
variable.

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Alexey Abramov</td></tr>