GNU bug report logs - #77624
Bisected regression: guix system vm fails with --share option

Message received at submit <at> debbugs.gnu.org:

Received: (at submit) by debbugs.gnu.org; 8 Apr 2025 03:22:25 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Mon Apr 07 23:22:24 2025
Received: from localhost ([127.0.0.1]:58006 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1u1zXb-0006ix-1i
	for submit <at> debbugs.gnu.org; Mon, 07 Apr 2025 23:22:24 -0400
Received: from lists.gnu.org ([2001:470:142::17]:35564)
 by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.84_2) (envelope-from <writer@HIDDEN>) id 1u1sew-0003Uc-9R
 for submit <at> debbugs.gnu.org; Mon, 07 Apr 2025 16:01:30 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10])
 by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <writer@HIDDEN>) id 1u1seq-0005Aw-QV
 for bug-guix@HIDDEN; Mon, 07 Apr 2025 16:01:24 -0400
Received: from mout-p-101.mailbox.org ([80.241.56.151])
 by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_CHACHA20_POLY1305:256)
 (Exim 4.90_1) (envelope-from <writer@HIDDEN>) id 1u1sem-000779-DP
 for bug-guix@HIDDEN; Mon, 07 Apr 2025 16:01:24 -0400
Received: from smtp1.mailbox.org (smtp1.mailbox.org [10.196.197.1])
 (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)
 key-exchange X25519 server-signature RSA-PSS (4096 bits) server-digest SHA256)
 (No client certificate requested)
 by mout-p-101.mailbox.org (Postfix) with ESMTPS id 4ZWg7h5krrz9swN
 for <bug-guix@HIDDEN>; Mon,  7 Apr 2025 22:01:04 +0200 (CEST)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=owenh.net; s=MBO0001; 
 t=1744056064;
 h=from:from:reply-to:subject:subject:date:date:message-id:message-id:
 to:to:cc:mime-version:mime-version:content-type:content-type:
 content-transfer-encoding:content-transfer-encoding;
 bh=H/BB9PGlq4cbWhr/mVVeWYt04hWOUcrDz4kfzO7hneA=;
 b=0f23dPx0u1+4Bn/CeFoiUnb/QVT8chZQlON1zSCDZUr8VMsEcQU9ckn4x0nDhwpWdajCDb
 BOedy2IYrxTeLlAx/ZlGbgY/s5AdXnEMfgnTIcGmq7jMpq0M/Q/EFk4xD1ajfFJ1Xj0JFH
 nJKNlpvCsry5QZeMNBJ7d+A15NhsSM0uEq1IAr8IY+aLz8dfQSm7bLQw5V83UlGCzdby82
 xgQYxRmAVMplQFxvUfhuSbHu0ky0mWFEcdoin8CSCtvLvr1QIeNG2I03pr+lP7f9BDA/7H
 yxtTTrSVtIfv6M+zTyqEd8eyiTUzGMtuCAUrh0sZpdlfSkh9soX8tlmpGL+rsw==
Message-ID: <90d62105-8830-40bd-aa2e-6a8a6d4e5af1@HIDDEN>
Date: Mon, 7 Apr 2025 15:00:54 -0500
MIME-Version: 1.0
Content-Language: en-US
To: bug-guix@HIDDEN
From: "Owen T. Heisler" <writer@HIDDEN>
Subject: Bisected regression: guix system vm fails with --share option
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Received-SPF: pass client-ip=80.241.56.151; envelope-from=writer@HIDDEN;
 helo=mout-p-101.mailbox.org
X-Spam_score_int: -27
X-Spam_score: -2.8
X-Spam_bar: --
X-Spam_report: (-2.8 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1,
 DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1,
 RCVD_IN_DNSWL_LOW=-0.7, RCVD_IN_MSPIKE_H2=0.001,
 RCVD_IN_VALIDITY_CERTIFIED_BLOCKED=0.001, RCVD_IN_VALIDITY_RPBL_BLOCKED=0.001,
 SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no
X-Spam_action: no action
X-Spam-Score: 1.0 (+)
X-Debbugs-Envelope-To: submit
X-Mailman-Approved-At: Mon, 07 Apr 2025 23:22:20 -0400
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -0.0 (/)

Hello,

Since commit 9939677d15592acb8663162af8eab3d33f4831db, which changed
handling of Qemu options in `/gnu/system/vm.scm`, `guix system vm` fails
if the `--share` option is used.

```console
$ mkdir -p /tmp/share
$ guix time-machine --commit=9939677d15592acb8663162af8eab3d33f4831db --
system vm --share=/tmp/share /tmp/config.scm

Backtrace:
          17 (primitive-load "/home/user/.cache/guix/inferiors/oljja…")
In guix/ui.scm:
   2332:7 16 (run-guix . _)
  2295:10 15 (run-guix-command _ . _)
In ice-9/boot-9.scm:
  1752:10 14 (with-exception-handler _ _ #:unwind? _ # _)
In guix/status.scm:
    859:3 13 (_)
    839:4 12 (call-with-status-report _ _)
In guix/scripts/system.scm:
   1332:4 11 (_)
In ice-9/boot-9.scm:
  1752:10 10 (with-exception-handler _ _ #:unwind? _ # _)
In guix/store.scm:
   690:37  9 (thunk)
   1331:8  8 (call-with-build-handler #<procedure 7fae0ff885d0 at g…> …)
  2212:25  7 (run-with-store #<store-connection 256.99 7fae0ff61910> …)
In guix/scripts/system.scm:
    859:2  6 (_ _)
    739:8  5 (_ #<store-connection 256.99 7fae0ff61910>)
In gnu/system/vm.scm:
   309:17  4 (system-qemu-image/shared-store-script _ #:system _ # _ …)
    235:8  3 (common-qemu-options _ ("/gnu/store" "/tmp/share") # _ # …)
In unknown file:
           2 (concatenate (#<gexp ("-virtfs" (format #f "local,pa…> …))
In ice-9/boot-9.scm:
  1685:16  1 (raise-exception _ #:continuable? _)
  1685:16  0 (raise-exception _ #:continuable? _)

ice-9/boot-9.scm:1685:16: In procedure raise-exception:
In procedure append: Wrong type argument in position 1 (expecting empty
list): #<gexp ("-virtfs" (format #f
"local,path=~a,security_model=none,mount_tag=~a" #<gexp-input
"/gnu/store":out> #<gexp-input "TAGjoptajej2oynju6yvboauz7pl6uj":out>))
gnu/system/vm.scm:221:4 7fae13a4d630>
```

Using the following `config.scm`:

```scm
(use-modules (gnu bootloader))
(use-modules (gnu bootloader grub))
(use-modules (gnu system file-systems))

(operating-system
 (bootloader (bootloader-configuration
              (bootloader grub-bootloader)
              (targets '("/dev/vda"))
              (terminal-inputs '(console serial))
              (terminal-outputs '(console serial))
              (timeout 1)))
 (file-systems (cons (file-system
                      (mount-point "/")
                      (device "/dev/vda1")
                      (type "ext4")) %base-file-systems))
 (host-name "guix")
 (kernel-arguments (cons "console=ttyS0" %default-kernel-arguments))
 (locale "en_US.utf8"))
```

Thanks,
Owen