From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp0 ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms11 with LMTPS id QM2lM5USsF7/fwAA0tVLHw (envelope-from ) for ; Mon, 04 May 2020 13:03:17 +0000 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp0 with LMTPS id QBykBKASsF7BXgAA1q6Kng (envelope-from ) for ; Mon, 04 May 2020 13:03:28 +0000 Received: from lists.gnu.org (lists.gnu.org [IPv6:2001:470:142::17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id E44779425DA for ; Mon, 4 May 2020 13:03:26 +0000 (UTC) Received: from localhost ([::1]:33930 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1jVakp-0006Xc-B9 for larch@yhetil.org; Mon, 04 May 2020 09:03:27 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:60822) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1jVakJ-0006Vt-R5 for guix-devel@gnu.org; Mon, 04 May 2020 09:02:55 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:56864) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1jVakJ-0006fj-H5; Mon, 04 May 2020 09:02:55 -0400 Received: from [2001:980:1b4f:1:42d2:832d:bb59:862] (port=54346 helo=dundal.peder.onsbrabantnet.nl) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1jVakF-0007nz-4I; Mon, 04 May 2020 09:02:54 -0400 From: Jan Nieuwenhuizen To: guix-devel@gnu.org Subject: guix system vm-image --target=i586-pc-gnu Hurd'le Organization: AvatarAcademy.nl X-Url: http://AvatarAcademy.nl Date: Mon, 04 May 2020 15:02:49 +0200 Message-ID: <87r1vzkg3q.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.3 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-BeenThere: guix-devel@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+larch=yhetil.org@gnu.org Sender: "Guix-devel" X-Scanner: scn0 X-Spam-Score: -1.01 Authentication-Results: aspmx1.migadu.com; dkim=none; dmarc=none; spf=pass (aspmx1.migadu.com: domain of guix-devel-bounces@gnu.org designates 2001:470:142::17 as permitted sender) smtp.mailfrom=guix-devel-bounces@gnu.org X-Scan-Result: default: False [-1.01 / 13.00]; RCVD_VIA_SMTP_AUTH(0.00)[]; GENERIC_REPUTATION(0.00)[-0.49461988557055]; DWL_DNSWL_FAIL(0.00)[2001:470:142::17:server fail]; R_SPF_ALLOW(-0.20)[+ip6:2001:470:142::/48:c]; IP_REPUTATION_HAM(0.00)[asn: 22989(0.13), country: US(-0.00), ip: 2001:470:142::17(-0.49)]; TO_DN_NONE(0.00)[]; HAS_ORG_HEADER(0.00)[]; MX_GOOD(-0.50)[cached: eggs.gnu.org]; MAILLIST(-0.20)[mailman]; FORGED_RECIPIENTS_MAILLIST(0.00)[]; RCVD_IN_DNSWL_FAIL(0.00)[2001:470:142::17:server fail]; RCVD_TLS_LAST(0.00)[]; MIME_TRACE(0.00)[0:+]; MID_RHS_MATCH_FROM(0.00)[]; TAGGED_FROM(0.00)[larch=yhetil.org]; ASN(0.00)[asn:22989, ipnet:2001:470:142::/48, country:US]; ARC_NA(0.00)[]; RCVD_COUNT_FIVE(0.00)[5]; FROM_NEQ_ENVFROM(0.00)[janneke@gnu.org,guix-devel-bounces@gnu.org]; FROM_HAS_DN(0.00)[]; TO_DOM_EQ_FROM_DOM(0.00)[]; URIBL_BLOCKED(0.00)[lilypond.org:url,dezyne.org:url,joyofsource.com:url,5.0.0.16:email,avataracademy.com:url,gnu.org:email]; MIME_GOOD(-0.10)[text/plain]; DMARC_NA(0.00)[gnu.org]; HAS_LIST_UNSUB(-0.01)[]; RCPT_COUNT_ONE(0.00)[1]; R_DKIM_NA(0.00)[]; DBL_PROHIBIT(0.00)[5.0.0.16:email]; FORGED_SENDER_MAILLIST(0.00)[] X-TUID: a8O7YTFeadl4 Hi! We have made some great progress on "guix system vm-image" for the Hurd. The "wip-hurd-vm" branch has been reset, and there now is only this one cross-build puzzle that we need to solve (until we hit the next problem ;-). Running ./pre-inst-env guix system vm-image --target=3Di586-pc-gnu gnu/system/e= xamples/bare-hurd.tmpl --verbosity=3D1 to cross build a VM-image for the Hurd on current "wip-hurd-vm" 9b25e0e4aa DRAFT services: hurd: Use activation-service, hurd-etc-servi= ce. will attepmt to also build a native, non-cross-built Hurd (in my case for x86_64), which fails. It could be that I am something silly, or we may not have noticed before because usually a native linux will already be available, and else it will succeeed. The diff below adds some debug printing, I get --8<---------------cut here---------------start------------->8--- 14:48:08 janneke@dundal:~/src/guix/wip-hurd-vm [env] $ ./pre-inst-env guix system vm-image --target=3Di586-pc-gnu gnu/system/exa= mples/bare-hurd.tmpl --verbosity=3D1 ;;; ("perform-action: getting packages") ;;; (" =3D> " #) ;;; ("implicit mlet-lowering target=3D" "i586-pc-gnu") ;;; (" =3D> " (# # sys-object" #) ;;; ("implicit mlet-lower" "i586-pc-gnu") ;;; ("hurd-etc-services: target=3D" #f) ;;; ("hurd-etc-services: target=3D" #f) The following derivation will be built: /gnu/store/9s621nadr6xcj74n1dl4c7gkvn8x0179-hurd-0.9-1.91a5167.drv process 2740 acquired build slot '/var/guix/offload/kluit.dezyne.org:22/0' load on machine 'kluit.dezyne.org' is 0.0 (normalized: 0.0) building /gnu/store/9s621nadr6xcj74n1dl4c7gkvn8x0179-hurd-0.9-1.91a5167.drv= ... |offloading build of /gnu/store/9s621nadr6xcj74n1dl4c7gkvn8x0179-hurd-0.9-1= .91a5167.drv to 'kluit.dezyne.org' build of /gnu/store/9s621nadr6xcj74n1dl4c7gkvn8x0179-hurd-0.9-1.91a5167.drv= failed View build log at '/var/log/guix/drvs/9s/621nadr6xcj74n1dl4c7gkvn8x0179-hur= d-0.9-1.91a5167.drv.bz2'. guix system: error: build of `/gnu/store/9s621nadr6xcj74n1dl4c7gkvn8x0179-h= urd-0.9-1.91a5167.drv' failed [1]14:48:17 janneke@dundal:~/src/guix/wip-hurd-vm [env] --8<---------------cut here---------------end--------------->8--- Any help/ideas greatly appreciated. I can add something like (target (pk "target" (%current-target-system))) (hurd (operating-system-hurd os)) (hurd (if target (with-parameters ((%current-target-system target)= ) hurd) hurd))) but that does not help; as (%current-target-system) migh be #f. Hardcoding TARGET to "i586-pc-gnu"..."works", but is not a solution: we certainly cannot do that for generic services. Greetings, janneke diff --git a/gnu/services/hurd.scm b/gnu/services/hurd.scm index b3c71e69bd..9d2b94280b 100644 --- a/gnu/services/hurd.scm +++ b/gnu/services/hurd.scm @@ -22,6 +22,7 @@ #:use-module (gnu system) #:use-module (guix gexp) #:use-module (guix records) + #:use-module (guix utils) #:export (hurd-etc-service)) =20 ;;; Commentary: @@ -50,6 +51,7 @@ if [ -f \"$GUIX_PROFILE/etc/profile\" ]; then . \"$GUIX_PROFILE/etc/profile\" fi\n")) (hurd (operating-system-hurd os))) + (pk "hurd-etc-services: target=3D" (%current-target-system)) (etc-service `(("services" ,(file-append net-base "/etc/services")) ("protocols" ,(file-append net-base "/etc/protocols")) diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm index 2664c66a30..26c5208d9d 100644 --- a/guix/scripts/system.scm +++ b/guix/scripts/system.scm @@ -799,13 +799,24 @@ static checks." (check-initrd-modules os))) =20 (mlet* %store-monad - ((sys (system-derivation-for-action os action + ((foo -> (pk "perform-action: getting packages")) + (packages -> (mlet %store-monad () (return (operating-system-packag= es os)))) + (foo -> (pk " =3D> " packages)) + (foo -> (pk "implicit mlet-lowering target=3D" (%current-target-sys= tem))) + (packages packages) + (foo -> (pk " =3D> " packages)) + (foo -> (pk "calling system-derivation-for-action")) + (sys-object -> (system-derivation-for-action os action #:file-system-type file-sy= stem-type #:image-size image-size #:full-boot? full-boot? #:container-shared-network= ? container-shared-network? #:mappings mappings)) =20 + (foo -> (pk " =3D> sys-object" sys-object)) + (foo -> (pk "implicit mlet-lower" (%current-target-system))) + (sys sys-object) + (foo -> (pk " =3D> sys" sys)) ;; For 'init' and 'reconfigure', always build BOOTCFG, even if ;; --no-bootloader is passed, because we then use it as a GC root. ;; See . --=20 Jan Nieuwenhuizen | GNU LilyPond http://lilypond.org Freelance IT http://JoyofSource.com | Avatar=C2=AE http://AvatarAcademy.com