[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
20/85: hurd-boot: Setup pci-arbiter and rumpdisk translators.
From: |
guix-commits |
Subject: |
20/85: hurd-boot: Setup pci-arbiter and rumpdisk translators. |
Date: |
Thu, 15 Jun 2023 02:32:38 -0400 (EDT) |
janneke pushed a commit to branch hurd-team
in repository guix.
commit 5b43c8edaf4e99376a0a6ab5478ddff89d212fa8
Author: Janneke Nieuwenhuizen <janneke@gnu.org>
AuthorDate: Wed May 17 07:16:26 2023 +0200
hurd-boot: Setup pci-arbiter and rumpdisk translators.
* gnu/build/hurd-boot.scm (make-hurd-device-nodes): Create "servers/bus/pci.
(set-hurd-device-translators): Create transators for pci-arbiter, rumpdisk,
and /dev/wd0..3s1..4.
---
gnu/build/hurd-boot.scm | 27 +++++++++++++++++++++++----
1 file changed, 23 insertions(+), 4 deletions(-)
diff --git a/gnu/build/hurd-boot.scm b/gnu/build/hurd-boot.scm
index 95c15907dd..7cfffc876e 100644
--- a/gnu/build/hurd-boot.scm
+++ b/gnu/build/hurd-boot.scm
@@ -1,6 +1,6 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2020-2022 Ludovic Courtès <ludo@gnu.org>
-;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+;;; Copyright © 2020, 2023 Janneke Nieuwenhuizen <janneke@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -105,7 +105,7 @@ Return the value associated with OPTION, or #f on failure."
;; TODO: Set the 'gnu.translator' extended attribute for passive translator
;; settings?
- )
+ (mkdir-p (scope "servers/bus/pci")))
(define (passive-translator-xattr? file-name)
"Return true if FILE-NAME has an extended @code{gnu.translator} attribute
@@ -183,7 +183,8 @@ set."
(mkdir-p dir))))
(define servers
- '(("servers/crash-dump-core" ("/hurd/crash" "--dump-core"))
+ '(("servers/bus/pci" ("/hurd/pci-arbiter"))
+ ("servers/crash-dump-core" ("/hurd/crash" "--dump-core"))
("servers/crash-kill" ("/hurd/crash" "--kill"))
("servers/crash-suspend" ("/hurd/crash" "--suspend"))
("servers/password" ("/hurd/password"))
@@ -213,6 +214,8 @@ set."
;; 'fd_to_filename' in libc expects it.
("dev/fd" ("/hurd/magic" "--directory" "fd") #o555)
+ ("dev/rumpdisk"("/hurd/rumpdisk") #o660)
+
;; Create a number of ttys; syslogd writes to tty12 by default.
;; FIXME: Creating /dev/tty12 leads the console client to switch to
;; tty12 when syslogd starts, which is confusing for users. Thus, do
@@ -236,7 +239,22 @@ set."
("/hurd/term" ,(string-append "/dev/ttyp" n)
"pty-slave" ,(string-append "/dev/ptyp" n))
#o666))))
- (iota 10 0))))
+ (iota 10 0))
+ ,@(append-map (lambda (n)
+ (let* ((n (number->string n))
+ (drive (string-append "dev/wd" n))
+ (disk (string-append "@/dev/disk:wd" n)))
+ `((,drive ("/hurd/storeio" ,disk) #o600)
+ ,@(map (lambda (p)
+ (let ((p (number->string p)))
+ `(,(string-append drive "s" p)
+ ("/hurd/storeio"
+ "--store-type=typed"
+ ,(string-append
+ "part:" p ":device:@" disk))
+ #o660)))
+ (iota 4 1)))))
+ (iota 4 0))))
(for-each scope-set-translator servers)
(mkdir* "dev/vcs/1")
@@ -249,6 +267,7 @@ set."
(false-if-EEXIST (symlink "/dev/fd/1" (scope "dev/stdout")))
(false-if-EEXIST (symlink "/dev/fd/2" (scope "dev/stderr")))
(false-if-EEXIST (symlink "crash-dump-core" (scope "servers/crash")))
+ (false-if-EEXIST (symlink "/dev/rumpdisk" (scope "dev/disk")))
;; Make sure /etc/mtab is a symlink to /proc/mounts.
(false-if-exception (delete-file (scope "etc/mtab")))
- 18/85: gnu: parted: Support building for the Hurd., (continued)
- 18/85: gnu: parted: Support building for the Hurd., guix-commits, 2023/06/15
- 21/85: services: childhurd: Bump default qemu memory to 2048MB., guix-commits, 2023/06/15
- 36/85: Revert "gnu: libunistring: Fix make check for the Hurd.", guix-commits, 2023/06/15
- 32/85: gnu: commencement: gnumach-headers-boot0: Update to 1.8+git20221224., guix-commits, 2023/06/15
- 48/85: gnu: python: Support native build on the Hurd., guix-commits, 2023/06/15
- 81/85: system: hurd: Add procps to %base-packages/hurd., guix-commits, 2023/06/15
- 45/85: hurd: Support system init in /libexec/runsystem., guix-commits, 2023/06/15
- 03/85: gnu: gnumach-headers: Cross-build without relying on x86., guix-commits, 2023/06/15
- 04/85: gnu: hurd: Update supported systems., guix-commits, 2023/06/15
- 05/85: gnu: Add libc-for-target and glibc/hurd., guix-commits, 2023/06/15
- 20/85: hurd-boot: Setup pci-arbiter and rumpdisk translators.,
guix-commits <=
- 75/85: gnu: ghostscript: Fix build for the Hurd., guix-commits, 2023/06/15
- 39/85: gnu: grep: Update hanging and failing tests for the Hurd., guix-commits, 2023/06/15
- 50/85: gnu: elfutils: Skip failing tests for the Hurd., guix-commits, 2023/06/15
- 51/85: gnu: libbsd: Skip failing test for the Hurd., guix-commits, 2023/06/15
- 82/85: system: hurd: Add swap-services to hurd-default-essential-services., guix-commits, 2023/06/15
- 78/85: gnu: fontforge: Support build for the Hurd., guix-commits, 2023/06/15
- 84/85: DRAFT hurd-boot: Support second boot., guix-commits, 2023/06/15
- 49/85: gnu: mpfr: Skip failing test for the Hurd., guix-commits, 2023/06/15