From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp1.migadu.com ([2001:41d0:303:e224::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms1.migadu.com with LMTPS id IAnuODFJHWYOcwAA62LTzQ:P1 (envelope-from ) for ; Mon, 15 Apr 2024 17:35:14 +0200 Received: from aspmx1.migadu.com ([2001:41d0:303:e224::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp1.migadu.com with LMTPS id IAnuODFJHWYOcwAA62LTzQ (envelope-from ) for ; Mon, 15 Apr 2024 17:35:14 +0200 X-Envelope-To: larch@yhetil.org Authentication-Results: aspmx1.migadu.com; dkim=none; spf=pass (aspmx1.migadu.com: domain of "guix-patches-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="guix-patches-bounces+larch=yhetil.org@gnu.org"; dmarc=none ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1713195313; h=from:from:sender:sender:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc:cc:mime-version:mime-version: content-type:content-type: content-transfer-encoding:content-transfer-encoding:resent-cc: resent-from:resent-sender:resent-message-id:in-reply-to:in-reply-to: references:references:list-id:list-help:list-unsubscribe: list-subscribe:list-post; bh=JH7mnIG1YJbgQe8U5es+KZ1wVBhGiH0nGDenBTmI5L8=; b=aolg9FdNPeBp5jS8mEk5/LP32C1zYDaJJJX4uf23qHPpuXLK89+awn/6N9plfuge0RlDfr Abtv9YCTVuvUA+S7hZlUD7p8CCDyY4YIejhRM2JPfffhStzEWmo8CskTVm5VDVRY84dsR5 opSR9Rp+h1+k1rcK0nG0pQZC4sHlXPckIeLBQQ08ihXmVXFd1bOuqC6WUr66ZQqhMyZNrI ON5RDkdnen2MJUZLUnbYL/XraKE2a69hEmmIuM+FYgu0tLGWh1UlEm2Kd/KvNTdNA/raPt H25In557xoJ0x/KazmX0zhfyAaOqu7hFZcqAv44Y6IekFrfpgtoMjTmMqqm5NA== ARC-Seal: i=1; s=key1; d=yhetil.org; t=1713195313; a=rsa-sha256; cv=none; b=cma50BZnVw8/UDNSz+N9f1/OOXaqVApnsgAtR7Cq9B7kOTUZwK9oR1xwtIbJEAkDrVTnGl rFR3SesTy5txijVgoADDjkfJd8E8A0oEyUA5+FjYiDNXprQOL9iFdPzAsl5/hHpXbyUyEg 42xDX9k9OES36UVTQkuuT7GXiGxYdA0uYhJBr8rklegU3/pQ25JuNkYoYfv7eeijdrwiBw nd0X0T5JRfX1vmBSR5PC2+qNm3QuBSa+RHQPYHhiH2mWpfiPF/qK0Q6mduD+GkAF1Bu0Gx Thth2r11gUMry7hXrqfuJ9qSbAzlWNJIVbJBF1nrSGDWr7Hmx+Q7b8tc1m7IcQ== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=none; spf=pass (aspmx1.migadu.com: domain of "guix-patches-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="guix-patches-bounces+larch=yhetil.org@gnu.org"; dmarc=none Received: from lists.gnu.org (lists.gnu.org [209.51.188.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 1E35C67E79 for ; Mon, 15 Apr 2024 17:35:13 +0200 (CEST) Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1rwOMC-0005ex-9m; Mon, 15 Apr 2024 11:34:56 -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 ) id 1rwOM9-0005eL-5E for guix-patches@gnu.org; Mon, 15 Apr 2024 11:34:53 -0400 Received: from debbugs.gnu.org ([2001:470:142:5::43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1rwOM8-00011N-5v for guix-patches@gnu.org; Mon, 15 Apr 2024 11:34:52 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1rwOMJ-0007TH-Kw for guix-patches@gnu.org; Mon, 15 Apr 2024 11:35:03 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#69899] [PATCH 1/2] vm: override %CURRENT-SYSTEM to always use a native emulator. References: In-Reply-To: Resent-From: Zheng Junjie Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Mon, 15 Apr 2024 15:35:03 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 69899 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 69899@debbugs.gnu.org Cc: Ludovic =?UTF-8?Q?Court=C3=A8s?= Received: via spool by 69899-submit@debbugs.gnu.org id=B69899.171319524928274 (code B ref 69899); Mon, 15 Apr 2024 15:35:03 +0000 Received: (at 69899) by debbugs.gnu.org; 15 Apr 2024 15:34:09 +0000 Received: from localhost ([127.0.0.1]:37863 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1rwOLR-0007Lx-8F for submit@debbugs.gnu.org; Mon, 15 Apr 2024 11:34:09 -0400 Received: from smtp21.cstnet.cn ([159.226.251.21]:39244 helo=cstnet.cn) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1rwOLJ-0007JA-Ln for 69899@debbugs.gnu.org; Mon, 15 Apr 2024 11:34:07 -0400 Received: from m.tailaa68d.ts.net (unknown [111.0.51.68]) by APP-01 (Coremail) with SMTP id qwCowAAX+VHTSB1maiCyAw--.14358S2; Mon, 15 Apr 2024 23:33:40 +0800 (CST) From: Zheng Junjie Date: Mon, 15 Apr 2024 23:33:37 +0800 Message-ID: <4d858dc7d62800138c0d8fd78c598c9a89044662.1713194805.git.zhengjunjie@iscas.ac.cn> X-Mailer: git-send-email 2.41.0 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-CM-TRANSID: qwCowAAX+VHTSB1maiCyAw--.14358S2 X-Coremail-Antispam: 1UD129KBjvJXoW7WF43ur4Uur4ruryDWF4xtFb_yoW8XF45pF nYk3y5K3WrGryIya409Fs7Xry7tr92y34Uur92yw48Aws8trWqgr1akr4YyFyDZFWrCry5 ZFyUKFyUZ3W5GaUanT9S1TB71UUUUUUqnTZGkaVYY2UrUUUUjbIjqfuFe4nvWSU5nxnvy2 9KBjDU0xBIdaVrnRJUUUyab7Iv0xC_Kw4lb4IE77IF4wAFF20E14v26r1j6r4UM7CY07I2 0VC2zVCF04k26cxKx2IYs7xG6rWj6s0DM7CIcVAFz4kK6r1j6r18M28lY4IEw2IIxxk0rw A2F7IY1VAKz4vEj48ve4kI8wA2z4x0Y4vE2Ix0cI8IcVAFwI0_Ar0_tr1l84ACjcxK6xII jxv20xvEc7CjxVAFwI0_Cr0_Gr1UM28EF7xvwVC2z280aVAFwI0_GcCE3s1l84ACjcxK6I 8E87Iv6xkF7I0E14v26rxl6s0DM2AIxVAIcxkEcVAq07x20xvEncxIr21l5I8CrVACY4xI 64kE6c02F40Ex7xfMcIj6xIIjxv20xvE14v26r1j6r18McIj6I8E87Iv67AKxVWUJVW8Jw Am72CE4IkC6x0Yz7v_Jr0_Gr1lF7xvr2IYc2Ij64vIr41l42xK82IYc2Ij64vIr41l4I8I 3I0E4IkC6x0Yz7v_Jr0_Gr1lx2IqxVAqx4xG67AKxVWUJVWUGwC20s026x8GjcxK67AKxV WUGVWUWwC2zVAF1VAY17CE14v26r1Y6r17MIIYrxkI7VAKI48JMIIF0xvE2Ix0cI8IcVAF wI0_Jr0_JF4lIxAIcVC0I7IYx2IY6xkF7I0E14v26r1j6r4UMIIF0xvE42xK8VAvwI8IcI k0rVWUJVWUCwCI42IY6I8E87Iv67AKxVWxJVW8Jr1lIxAIcVC2z280aVCY1x0267AKxVW8 JVW8JrUvcSsGvfC2KfnxnUUI43ZEXa7IU5PpnJUUUUU== X-Originating-IP: [111.0.51.68] X-CM-SenderInfo: x2kh0wxmxqyx3h6l2u1dvotugofq/ X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+larch=yhetil.org@gnu.org Sender: guix-patches-bounces+larch=yhetil.org@gnu.org X-Migadu-Flow: FLOW_IN X-Migadu-Country: US X-Migadu-Spam-Score: -4.07 X-Spam-Score: -4.07 X-Migadu-Queue-Id: 1E35C67E79 X-Migadu-Scanner: mx12.migadu.com X-TUID: 47QY5lX2MhpE From: Ludovic Courtès * gnu/system/vm.scm (system-qemu-image/shared-store-script): override %CURRENT-SYSTEM to always use a native emulator. Change-Id: Ia2cb7cca33eec018d810bd00d0208b58392ea483 --- gnu/system/vm.scm | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/gnu/system/vm.scm b/gnu/system/vm.scm index 7d9d07ebb7..2d1a4a9df1 100644 --- a/gnu/system/vm.scm +++ b/gnu/system/vm.scm @@ -287,8 +287,11 @@ (define* (system-qemu-image/shared-store-script os #~(format #f "/tmp/guix-image-~a" (basename #$base-image))) (define qemu-exec - #~(list #+(file-append qemu "/bin/" - (qemu-command (or target system))) + #~(list #+(with-parameters ((%current-system %system) + (%current-target-system #f)) + ;; Override %CURRENT-SYSTEM to always use a native emulator. + (file-append qemu "/bin/" + (qemu-command (or target system)))) ;; Tells qemu to use the terminal it was started in for IO. #$@(if graphic? '() #~("-nographic")) #$@(if full-boot? @@ -325,7 +328,9 @@ (define* (system-qemu-image/shared-store-script os #~(call-with-output-file #$output (lambda (port) (format port "#!~a~%" - #+(file-append bash "/bin/sh")) + #+(with-parameters ((%current-system %system) + (%current-target-system #f)) + (file-append bash "/bin/sh"))) #$@(if volatile? #~() #~((format port "~a~%" #+copy-image))) base-commit: 6b3c90f638292f9604a221ac6dbf22234f6e4c4b -- 2.41.0