guix-patches
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[bug#63527] [PATCH 0/3] Initial attempt at rumpdisk support for the Hurd


From: Ludovic Courtès
Subject: [bug#63527] [PATCH 0/3] Initial attempt at rumpdisk support for the Hurd.
Date: Thu, 18 May 2023 19:18:54 +0200
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/28.2 (gnu/linux)

Janneke Nieuwenhuizen <janneke@gnu.org> skribis:

>  (define (hurd-multiboot-modules os)
>    (let* ((hurd (operating-system-hurd os))
> +         (pci-arbiter-command
> +          (list (file-append hurd "/hurd/pci-arbiter.static")
> +                "pci-arbiter"
> +                "--host-priv-port='${host-port}'"
> +                "--device-master-port='${device-port}'"
> +                "--next-task='${disk-task}'"
> +                "'$(pci-task=task-create)'"
> +                "'$(task-resume)'"))
> +         (rumpdisk-command
> +          (list (file-append hurd "/hurd/rumpdisk.static")
> +                "rumpdisk"
> +                "--next-task='${fs-task}'"
> +                "'$(disk-task=task-create)'"))
>           (root-file-system-command
>            (list (file-append hurd "/hurd/ext2fs.static")
>                  "ext2fs"
>                  "--multiboot-command-line='${kernel-command-line}'"
> -                "--host-priv-port='${host-port}'"
> -                "--device-master-port='${device-port}'"
>                  "--exec-server-task='${exec-task}'"
>                  "--store-type=typed"
>                  "--x-xattr-translator-records"
> -                "'${root}'" "'$(task-create)'" "'$(task-resume)'"))
> +                "'${root}'"
> +                "'$(fs-task=task-create)'"))
>           (target (%current-target-system))

Wo0t, impressive!





reply via email to

[Prev in Thread] Current Thread [Next in Thread]