[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
24/24: hurd-boot: Use 'setxattr' instead of invoking settrans.
From: |
guix-commits |
Subject: |
24/24: hurd-boot: Use 'setxattr' instead of invoking settrans. |
Date: |
Mon, 8 Jun 2020 08:37:31 -0400 (EDT) |
janneke pushed a commit to branch wip-hurd-vm
in repository guix.
commit 09ed8bf01305d45b3ef83f350b2ccb6b16ab214c
Author: Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
AuthorDate: Mon Jun 8 12:25:24 2020 +0200
hurd-boot: Use 'setxattr' instead of invoking settrans.
Note: Using `getxattr' on the Hurd instead of running showtrans does not
work (yet?).
* gnu/build/hurd-boot.scm (setup-translator): Use 'setxattr' instead of
invoking settrans.
* gnu/system.scm (hurd-multiboot-modules): Add --x-xattr-translator-records
to
enable xattr-embebbing of translators.
---
gnu/build/hurd-boot.scm | 2 +-
gnu/system.scm | 1 +
2 files changed, 2 insertions(+), 1 deletion(-)
diff --git a/gnu/build/hurd-boot.scm b/gnu/build/hurd-boot.scm
index 398cee1..8150aff 100644
--- a/gnu/build/hurd-boot.scm
+++ b/gnu/build/hurd-boot.scm
@@ -140,7 +140,7 @@ set."
(chmod port mode)))))
(catch 'system-error
(lambda _
- (apply invoke "settrans" "--create" file-name command))
+ (setxattr file-name "gnu.translator" (string-join command "\0"
'suffix)))
(lambda (key . args)
(let ((errno (system-error-errno (cons key args))))
(format (current-error-port) "~a: ~a\n"
diff --git a/gnu/system.scm b/gnu/system.scm
index 21d0fbd..c6feea0 100644
--- a/gnu/system.scm
+++ b/gnu/system.scm
@@ -1190,6 +1190,7 @@ a list of <menu-entry>, to populate the \"old entries\"
menu."
"--device-master-port='${device-port}'"
"--exec-server-task='${exec-task}'"
"--store-type=typed"
+ "--x-xattr-translator-records"
"'${root}'" "'$(task-create)'" "'$(task-resume)'"))
(target (%current-target-system))
(libc (if target
- 09/24: bootloader: grub: Add support for multiboot., (continued)
- 09/24: bootloader: grub: Add support for multiboot., guix-commits, 2020/06/08
- 14/24: services: hurd: Populate system profile., guix-commits, 2020/06/08
- 10/24: system: Use 'hurd' package in label., guix-commits, 2020/06/08
- 11/24: system: examples: Add bare-hurd.tmpl., guix-commits, 2020/06/08
- 12/24: system: Support activation service for the Hurd., guix-commits, 2020/06/08
- 05/24: system: hurd: Add hurd-default-essential-services., guix-commits, 2020/06/08
- 06/24: system: Add 'hurd' field to <operating-system>., guix-commits, 2020/06/08
- 07/24: bootloader: Extend `<menu-entry>' for multiboot., guix-commits, 2020/06/08
- 16/24: services: Add `hurd-console-service-type'., guix-commits, 2020/06/08
- 17/24: services: Add `hurd-getty-service-type'., guix-commits, 2020/06/08
- 24/24: hurd-boot: Use 'setxattr' instead of invoking settrans.,
guix-commits <=
- 08/24: system: Add 'multiboot-modules' field to <boot-parameters>., guix-commits, 2020/06/08
- 13/24: services: Support etc-service for the Hurd., guix-commits, 2020/06/08
- 15/24: gnu: hurd: Create minimal "runsystem" script to invoke "rc"., guix-commits, 2020/06/08
- 18/24: system: hurd: Populate services., guix-commits, 2020/06/08
- 19/24: hurd-boot: Further cleanup of "rc"., guix-commits, 2020/06/08
- 21/24: hurd-boot: Create individual translators instead of running MAKEDEV., guix-commits, 2020/06/08
- 23/24: system: bare-hurd.tmpl: Add openssh client and service., guix-commits, 2020/06/08
- 20/24: gnu: services: Add %hurd-startup-service., guix-commits, 2020/06/08
- 22/24: system: hurd: Remove 'cross-hurd-image' hack., guix-commits, 2020/06/08