GNU bug report logs - #75695
[PATCH v3 05/11] gnu: Add libretro-dolphin-emu.

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

Received: (at submit) by debbugs.gnu.org; 20 Jan 2025 14:30:49 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Mon Jan 20 09:30:48 2025
Received: from localhost ([127.0.0.1]:49516 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1tZsnf-0007Cb-Rd
	for submit <at> debbugs.gnu.org; Mon, 20 Jan 2025 09:30:48 -0500
Received: from lists.gnu.org ([2001:470:142::17]:45804)
 by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.84_2) (envelope-from <maxim.cournoyer@HIDDEN>)
 id 1tZsna-0007BS-Qh
 for submit <at> debbugs.gnu.org; Mon, 20 Jan 2025 09:30:43 -0500
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 <maxim.cournoyer@HIDDEN>)
 id 1tZsnV-0007Oe-2I
 for guix-patches@HIDDEN; Mon, 20 Jan 2025 09:30:37 -0500
Received: from mail-pj1-x1033.google.com ([2607:f8b0:4864:20::1033])
 by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128)
 (Exim 4.90_1) (envelope-from <maxim.cournoyer@HIDDEN>)
 id 1tZsnT-0004wX-8R
 for guix-patches@HIDDEN; Mon, 20 Jan 2025 09:30:36 -0500
Received: by mail-pj1-x1033.google.com with SMTP id
 98e67ed59e1d1-2f441791e40so5895800a91.3
 for <guix-patches@HIDDEN>; Mon, 20 Jan 2025 06:30:34 -0800 (PST)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=gmail.com; s=20230601; t=1737383433; x=1737988233; darn=gnu.org;
 h=content-transfer-encoding:mime-version:references:in-reply-to
 :message-id:date:subject:cc:to:from:from:to:cc:subject:date
 :message-id:reply-to;
 bh=dnLRJsSJJjH3WNq3hIXrdtAEtSACSOymKKfKzPpb9HI=;
 b=Ok8eKQoY0noDPXg9BFKYb/ZveUgvoPIFz6A49M3WGlriKekboleLHPGzsYnTv00tni
 tT2IjLuMlb4nqTLTd57iNUTnDS8y5X9DAUjW+5iRdf3vDtaAIzRD5HBqVFJ8U1bE69u/
 NMXN5EvbZoO/Txm4xVzPDwiOvnlu08TDgmskzfLpExEsiyo5mOdQD1khn9yNf/nzDY51
 G9z6EidDgYubj9++GWpFRrczD8nn5ehPPuBf4TC0IwpCZlKIg8pseHbDDOPvuC1to2DA
 QsFE4XWxgSmv5WldecqdTHoh893SwRrqeyjExjzC8cqxDQEFIYfHCu+Rak0VjBXgPUoB
 W13w==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20230601; t=1737383433; x=1737988233;
 h=content-transfer-encoding:mime-version:references:in-reply-to
 :message-id:date:subject:cc:to:from:x-gm-message-state:from:to:cc
 :subject:date:message-id:reply-to;
 bh=dnLRJsSJJjH3WNq3hIXrdtAEtSACSOymKKfKzPpb9HI=;
 b=PbkXYM+du/yl1gP5FENu3OrVveqVf4Pi1kZDbn2zLPp4W7W8+IqYqP4I8tl9a47ewx
 5YBgLsIvEs8CRN0emDITnvQ9cJWmAqe5AAhNSoqy378Nf3TYQUvs6eiUecBZ4fVT5/Yi
 voQ+5ZzFAbeb+/It5YxYBOxSxdWxaUl5rb3woh35XuRh91bbl3iBfuDUxwmyRSOqESS3
 wD6A3aui29+3nhGIaf7ydR6mpUBfCvmyohZe6P7Y07CPSREh5pRa0Zy7xHi7rlsm+XjZ
 ZZp2R8t8s9/QLTGdnSd6bSljmQBQdpSuDcADy7XbnQTg33jx66ZML05YqGz9sH8e0CQc
 MaLQ==
X-Gm-Message-State: AOJu0YyLctq73IM7q4p/BRdoQT1d4+BvmQOElv9vaJO81HbzFw802dLu
 IZv3EQPmZJzp78wfC7hNy3Zr2SkvjbuD8AMMZuke9n3OXUvX2U7Gm864CnEA
X-Gm-Gg: ASbGncusJfmDnwWQ3W6wmD8aBXRIw9h5wWUthRWXfbxmkYypNMnIKtyayYh+8knQ55d
 ck45X9ivFrA02FNNf7duTkax/b1+HWwB9YIoQ14+aDaFW0vBory6Whcqhj0lxO1yW20hXwO2PJN
 9hOLTx9LvRFu2mXYGm+ciqe468BseHd0/Z3r86yOs9DG3eQvRPg05/XNNUUkQpoVMV9dHUHPPYs
 jSzZWmstJmhLxVYFsG78vlFLyAt1ZVyHCtiEDrQK+hD3ksMFSabnGWja3iDYxeB8NqnVIUyxKj6
 rX0J2vksUwnw
X-Google-Smtp-Source: AGHT+IE9cx8qKkfSUhyWvwYnOjUxpSIHUvoKWuBb00/1QUCTlmgtgcrGjnZhz5CjvDN0zs3XQJ1cIQ==
X-Received: by 2002:aa7:9317:0:b0:725:e37d:cd35 with SMTP id
 d2e1a72fcca58-72dafa7c471mr21569393b3a.18.1737383432699; 
 Mon, 20 Jan 2025 06:30:32 -0800 (PST)
Received: from localhost.localdomain ([2405:6586:be0:0:c8ff:1707:9b9:af89])
 by smtp.gmail.com with ESMTPSA id
 d2e1a72fcca58-72dab9c8d2bsm7396313b3a.92.2025.01.20.06.30.31
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Mon, 20 Jan 2025 06:30:32 -0800 (PST)
From: Maxim Cournoyer <maxim.cournoyer@HIDDEN>
To: guix-patches@HIDDEN
Subject: [PATCH v3 05/11] gnu: Add libretro-dolphin-emu.
Date: Mon, 20 Jan 2025 23:28:27 +0900
Message-ID: <7c91845b6318c7ad843927abc59e35d9d9538498.1737383313.git.maxim.cournoyer@HIDDEN>
X-Mailer: git-send-email 2.47.1
In-Reply-To: <7a983f303aba15d35ec687bcba4de4fee572899b.1737383313.git.maxim.cournoyer@HIDDEN>
References: <7a983f303aba15d35ec687bcba4de4fee572899b.1737383313.git.maxim.cournoyer@HIDDEN>
MIME-Version: 1.0
X-Debbugs-Cc: Adam Faiz <adam.faiz@HIDDEN>, Liliana Marie Prikler <liliana.prikler@HIDDEN>, 宋文武 <iyzsong@HIDDEN>
Content-Transfer-Encoding: 8bit
Received-SPF: pass client-ip=2607:f8b0:4864:20::1033;
 envelope-from=maxim.cournoyer@HIDDEN; helo=mail-pj1-x1033.google.com
X-Spam_score_int: -20
X-Spam_score: -2.1
X-Spam_bar: --
X-Spam_report: (-2.1 / 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, FREEMAIL_FROM=0.001,
 RCVD_IN_DNSWL_NONE=-0.0001, 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
Cc: Maxim Cournoyer <maxim.cournoyer@HIDDEN>
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 (/)

* gnu/packages/emulators.scm (libretro-dolphin-emu): New variable.

Change-Id: Id05e1d17ff6927bb1492ce2816790f7d94f9e1b8
---
 gnu/packages/emulators.scm | 51 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 51 insertions(+)

diff --git a/gnu/packages/emulators.scm b/gnu/packages/emulators.scm
index bc1c8541b0..31e242741f 100644
--- a/gnu/packages/emulators.scm
+++ b/gnu/packages/emulators.scm
@@ -481,6 +481,57 @@ (define-public dolphin-emu
       ;; dolphin/Data/Sys/GC/font_*.bin: Licensed under ASL2.0.
       (license (list license:gpl2+ license:asl2.0 license:fdl1.2+)))))
 
+(define-public libretro-dolphin-emu
+  ;; There are no tag or release; use the latest commit.
+  (let ((commit "89a4df725d4eb24537728f7d655cddb1add25c18")
+        (revision "0"))
+    (package
+      (inherit dolphin-emu)
+      (name "libretro-dolphin-emu")
+      (version (git-version "5.0" revision commit))
+      (source (origin
+                (inherit (package-source dolphin-emu))
+                (method git-fetch)
+                (uri (git-reference
+                      (url "https://github.com/libretro/dolphin")
+                      (commit commit)))
+                (file-name (git-file-name name version))
+                (sha256
+                 (base32
+                  "1fvm6hy0ihc0j3sgv88a7ak08c0kyikmmiif827j981fy7zvglvz"))))
+      (arguments
+       (substitute-keyword-arguments (package-arguments dolphin-emu)
+         ((#:configure-flags flags ''())
+          #~(cons "-DLIBRETRO=ON" #$flags))
+         ((#:phases phases '%standard-phases)
+          #~(modify-phases #$phases
+              (add-after 'unpack 'deregister-bundled-sources
+                (lambda _
+                  (substitute* "CMakeLists.txt"
+                    ((".*add_subdirectory.*Externals/curl.*") "")
+                    ((".*add_subdirectory.*Externals/libpng.*") ""))))
+              (replace 'install
+                (lambda _
+                  (install-file "dolphin_libretro.so"
+                                (string-append #$output "/lib/libretro"))
+                  ;; The system data files are also required for the proper
+                  ;; functioning of dolphin; without them, it crashes with
+                  ;; segmentation faults and cannot save files to the memory
+                  ;; card.
+                  (let ((sysdir (string-append
+                                 #$output
+                                 "/share/libretro/system/dolphin-emu")))
+                    (mkdir-p sysdir)
+                    (copy-recursively "../source/Data/Sys"
+                                      (string-append sysdir "/Sys")))))))))
+      (inputs
+       ;; Delete large and extraneous inputs.
+       (modify-inputs (package-inputs dolphin-emu)
+         (delete "ffmpeg"
+                 "gtk+"
+                 "qtbase")))
+      (synopsis "Libretro port of Dolphin, the Nintendo Wii/GameCube emulator"))))
+
 (define-public dosbox
   (package
     (name "dosbox")
-- 
2.47.1