From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp12.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms5.migadu.com with LMTPS id CFPAG0Uq2GMAAgEAbAwnHQ (envelope-from ) for ; Mon, 30 Jan 2023 21:36:21 +0100 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp12.migadu.com with LMTPS id MKejG0Uq2GMySgAAauVa8A (envelope-from ) for ; Mon, 30 Jan 2023 21:36:21 +0100 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 CE0403E798 for ; Mon, 30 Jan 2023 21:36:20 +0100 (CET) Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1pMaso-0006zf-KS; Mon, 30 Jan 2023 15:36:06 -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 ) id 1pMask-0006vm-I0 for guix-patches@gnu.org; Mon, 30 Jan 2023 15:36:02 -0500 Received: from debbugs.gnu.org ([209.51.188.43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1pMask-0001Lq-9o for guix-patches@gnu.org; Mon, 30 Jan 2023 15:36:02 -0500 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1pMask-000606-5Y for guix-patches@gnu.org; Mon, 30 Jan 2023 15:36:02 -0500 X-Loop: help-debbugs@gnu.org Subject: [bug#61067] [PATCH] gnu: wine: Invert the relationship between wine and wine-minimal. References: In-Reply-To: Resent-From: Kaelyn Takata Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Mon, 30 Jan 2023 20:36:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 61067 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 61067@debbugs.gnu.org Cc: Kaelyn Takata Received: via spool by 61067-submit@debbugs.gnu.org id=B61067.167511095623054 (code B ref 61067); Mon, 30 Jan 2023 20:36:02 +0000 Received: (at 61067) by debbugs.gnu.org; 30 Jan 2023 20:35:56 +0000 Received: from localhost ([127.0.0.1]:50666 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1pMasd-0005zl-AG for submit@debbugs.gnu.org; Mon, 30 Jan 2023 15:35:55 -0500 Received: from mail-4322.protonmail.ch ([185.70.43.22]:51269) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1pMasb-0005zV-DA for 61067@debbugs.gnu.org; Mon, 30 Jan 2023 15:35:54 -0500 Date: Mon, 30 Jan 2023 20:35:41 +0000 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=protonmail.com; s=protonmail3; t=1675110946; x=1675370146; bh=9Sfb6aB7bvWvgjQGjTwhiDnsuWwD/XvhvCd8EYmJpM8=; h=Date:To:From:Cc:Subject:Message-ID:Feedback-ID:From:To:Cc:Date: Subject:Reply-To:Feedback-ID:Message-ID:BIMI-Selector; b=spEJz3sd74fygXewiC4sj2n2u76wwr5knrug2YOOLGEK1PJhSRui9Pkjl/4PrtTJP ol/qoZXh+TMyCl+FduNs3tucmhqGLaQkzMpbPqGY/vvHmOawg4sswOJXqCLjnIII+8 rPvXwZ//qBzVsjxXaFOHG3ICdGD0yTxXolvrYhPPY9jbB2BH8kiTIriXuLGi//qRut wJN1gv1P3JsF5gDQI6GH50h2R2G2oclcD6aNwIcQ9YFj9cFOSozk1RHRFZHuvhz7e0 bm6JBgkDCZg3MQLMeNuuOSPKV1t3TzkMxc40AG1TmrMPWAElZoHsEES6Zrf1PxgAIa rxFwrdpgxK7Dg== Message-ID: Feedback-ID: 34709329:user:proton MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable 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: , Reply-to: Kaelyn Takata X-ACL-Warn: , Kaelyn Takata via Guix-patches From: Kaelyn Takata via Guix-patches via 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 ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1675110981; h=from:from:sender:sender:reply-to: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:dkim-signature; bh=9Sfb6aB7bvWvgjQGjTwhiDnsuWwD/XvhvCd8EYmJpM8=; b=mqDltelZZMkHp6/syZOBYG3ZjYVqRGVZLUll6q4eT3gwLlQNg5KEmsddKR3EfyUfYAgrhA hE6TTmnJl/Dp2rsgW4nairOdQxHT2uoeInoz3JD68qeNNs87NKOKmVGAJoUTLCiwngXylz dXzfcE9XBdspOLybX1Fem9itB0yNjJl7ogw5Cf93S/CexUck+JJvoPPIQDy/eC4UZaAIyP 6MioFpVGQX4UE5Nc7qa59APmDKJ6HMYkauIvYGIdFFAS5zG28hb76wR7bfdeh9bV7Pg1Ml TqAlZCdBn6RFVri9AbWC9r00eC1hKhGiOYngJlLwAIWZvYzvTFQVs5ev83MgpA== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=protonmail.com header.s=protonmail3 header.b=spEJz3sd; 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=pass (policy=none) header.from=gnu.org ARC-Seal: i=1; s=key1; d=yhetil.org; t=1675110981; a=rsa-sha256; cv=none; b=sQoQQhutNSXVYiGZhedFr19mx2NfL3MTHBRP/Rgu7ifIsdiN8O3O23jKqpSur6ZWpgyzTe N0v/XT6hauAyb86hmMFdCz2qF/sOZQzlbgAP29me4YEMbOwQwpo4Rxo9hh1F1UgW7uFXpo jcU1xL2K1jHX+Ztvrrqp9qnDCoGxgEYBD56nVpi/mVmnDwK0BlUaO//eJCRoFIQKTpCGN7 Q86+iHOpEqrNCqDJUwICg5X+9hX2d4Hx2LzYLZUv4Eev25sFz5D4fmF3HHCvCTW01GiZcv wHoiZ+MFahkqTODPQWWqqJqQc6H/q3//+DEE16mLPwPyRmbzklRR2JQGUafboA== Authentication-Results: aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=protonmail.com header.s=protonmail3 header.b=spEJz3sd; 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=pass (policy=none) header.from=gnu.org X-Migadu-Scanner: scn0.migadu.com X-Spam-Score: -2.58 X-Migadu-Queue-Id: CE0403E798 X-Migadu-Spam-Score: -2.58 X-TUID: VjTWga3v6TLn * gnu/packages/wine.scm (wine,wine-minimal): Have wine expand upon the package definition of wine-minimal instead of having wine-minimal trim down the package definition of wine. --- gnu/packages/wine.scm | 162 +++++++++++++++++++++--------------------- 1 file changed, 81 insertions(+), 81 deletions(-) diff --git a/gnu/packages/wine.scm b/gnu/packages/wine.scm index 10cae76ed8..3299059968 100644 --- a/gnu/packages/wine.scm +++ b/gnu/packages/wine.scm @@ -74,9 +74,11 @@ (define-module (gnu packages wine) #:use-module (ice-9 match) #:use-module (srfi srfi-1)) -(define-public wine +;; This minimal build of Wine is needed to prevent a circular dependency w= ith +;; vkd3d. +(define-public wine-minimal (package - (name "wine") + (name "wine-minimal") (version "8.0") (source (origin @@ -91,8 +93,77 @@ (define-public wine (sha256 (base32 "0bkr3klvjy8h4djddr31fvapsi9pc2rsiyhaa7j1lwpq704w4wh2")))) (build-system gnu-build-system) + (native-inputs (list bison flex)) + (inputs `()) + (arguments + (list + ;; Force a 32-bit build targeting a similar architecture, i.e.: + ;; armhf for armhf/aarch64, i686 for i686/x86_64. + #:system (match (%current-system) + ((or "armhf-linux" "aarch64-linux") "armhf-linux") + (_ "i686-linux")) + + ;; XXX: There's a test suite, but it's unclear whether it's suppose= d to + ;; pass. + #:tests? #f + + #:make-flags + #~(list "SHELL=3Dbash" + (string-append "libdir=3D" #$output "/lib/wine32")) + + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'patch-SHELL + (lambda _ + (substitute* "configure" + ;; configure first respects CONFIG_SHELL, clobbers SHELL = later. + (("/bin/sh") + (which "bash"))))) + (add-after 'configure 'patch-dlopen-paths + ;; Hardcode dlopened sonames to absolute paths. + (lambda _ + (let* ((library-path (search-path-as-string->list + (getenv "LIBRARY_PATH"))) + (find-so (lambda (soname) + (search-path library-path soname)))) + (substitute* "include/config.h" + (("(#define SONAME_.* )\"(.*)\"" _ defso soname) + (format #f "~a\"~a\"" defso (find-so soname))))))) + (add-after 'patch-generated-file-shebangs 'patch-makedep + (lambda* (#:key outputs #:allow-other-keys) + (substitute* "tools/makedep.c" + (("output_filenames\\( unix_libs \\);" all) + (string-append all + "output ( \" -Wl,-rpath=3D%s \", arch_install_dirs[arch= ] );"))))) + (add-before 'build 'set-widl-time-override + ;; Set WIDL_TIME_OVERRIDE to avoid embedding the current date= in + ;; files generated by WIDL. + (lambda _ + (setenv "WIDL_TIME_OVERRIDE" "315532800")))) + #:configure-flags + #~(list "--without-freetype" + "--without-x"))) + (home-page "https://www.winehq.org/") + (synopsis "Implementation of the Windows API (32-bit only)") + (description + "Wine (originally an acronym for \"Wine Is Not an Emulator\") is a +compatibility layer capable of running Windows applications. Instead of +simulating internal Windows logic like a virtual machine or emulator, Wine +translates Windows API calls into POSIX calls on-the-fly, eliminating the +performance and memory penalties of other methods and allowing you to clea= nly +integrate Windows applications into your desktop.") + ;; Any platform should be able to build wine, but based on '#:system' = these + ;; are the ones we currently support. + (supported-systems '("i686-linux" "x86_64-linux" "armhf-linux")) + (license license:lgpl2.1+))) + +(define-public wine + (package + (inherit wine-minimal) + (name "wine") (native-inputs - (list bison flex gettext-minimal perl pkg-config)) + (modify-inputs (package-native-inputs wine-minimal) + (prepend gettext-minimal perl pkg-config))) (inputs ;; Some libraries like libjpeg are now compiled into native PE object= s. ;; The ELF objects provided by Guix packages are of no use. Whilst t= his @@ -100,6 +171,7 @@ (define-public wine ;; to build some of these from Guix PACKAGE-SOURCE but attempts were = not ;; fruitful so far. See . (list alsa-lib + bash-minimal cups dbus eudev @@ -132,23 +204,9 @@ (define-public wine vkd3d vulkan-loader)) (arguments - (list - ;; Force a 32-bit build targeting a similar architecture, i.e.: - ;; armhf for armhf/aarch64, i686 for i686/x86_64. - #:system (match (%current-system) - ((or "armhf-linux" "aarch64-linux") "armhf-linux") - (_ "i686-linux")) - - ;; XXX: There's a test suite, but it's unclear whether it's suppose= d to - ;; pass. - #:tests? #f - - #:make-flags - #~(list "SHELL=3Dbash" - (string-append "libdir=3D" #$output "/lib/wine32")) - - #:phases - #~(modify-phases %standard-phases + (substitute-keyword-arguments (package-arguments wine-minimal) + ((#:phases phases) + #~(modify-phases #$phases ;; Explicitly set the 32-bit version of vulkan-loader when inst= alling ;; to i686-linux or x86_64-linux. ;; TODO: Add more JSON files as they become available in Mesa. @@ -173,47 +231,8 @@ (define-public wine "/radeon_icd.i686.json" ":" icd "/intel_icd.i686.json"))= ))))))) (_ - `())) - (add-after 'unpack 'patch-SHELL - (lambda _ - (substitute* "configure" - ;; configure first respects CONFIG_SHELL, clobbers SHELL = later. - (("/bin/sh") - (which "bash"))))) - (add-after 'configure 'patch-dlopen-paths - ;; Hardcode dlopened sonames to absolute paths. - (lambda _ - (let* ((library-path (search-path-as-string->list - (getenv "LIBRARY_PATH"))) - (find-so (lambda (soname) - (search-path library-path soname)))) - (substitute* "include/config.h" - (("(#define SONAME_.* )\"(.*)\"" _ defso soname) - (format #f "~a\"~a\"" defso (find-so soname))))))) - (add-after 'patch-generated-file-shebangs 'patch-makedep - (lambda* (#:key outputs #:allow-other-keys) - (substitute* "tools/makedep.c" - (("output_filenames\\( unix_libs \\);" all) - (string-append all - "output ( \" -Wl,-rpath=3D%s \", arch_ins= tall_dirs[arch] );"))))) - (add-before 'build 'set-widl-time-override - ;; Set WIDL_TIME_OVERRIDE to avoid embedding the current date= in - ;; files generated by WIDL. - (lambda _ - (setenv "WIDL_TIME_OVERRIDE" "315532800")))))) - (home-page "https://www.winehq.org/") - (synopsis "Implementation of the Windows API (32-bit only)") - (description - "Wine (originally an acronym for \"Wine Is Not an Emulator\") is a -compatibility layer capable of running Windows applications. Instead of -simulating internal Windows logic like a virtual machine or emulator, Wine -translates Windows API calls into POSIX calls on-the-fly, eliminating the -performance and memory penalties of other methods and allowing you to clea= nly -integrate Windows applications into your desktop.") - ;; Any platform should be able to build wine, but based on '#:system' = these - ;; are thr ones we currently support. - (supported-systems '("i686-linux" "x86_64-linux" "armhf-linux")) - (license license:lgpl2.1+))) + `())))) + ((#:configure-flags _ '()) #~'()))))) (define-public wine64 (package @@ -226,8 +245,7 @@ (define-public wine64 (strip-keyword-arguments '(#:system) (package-arguments wine)) ((#:make-flags _) #~(list "SHELL=3Dbash" - (string-append "libdir=3D" #$output "/lib/wine64")) - ) + (string-append "libdir=3D" #$output "/lib/wine64"))) ((#:phases phases) #~(modify-phases #$phases ;; Explicitly set both the 64-bit and 32-bit versions of vulka= n-loader @@ -281,24 +299,6 @@ (define-public wine64 (synopsis "Implementation of the Windows API (WoW64 version)") (supported-systems '("x86_64-linux" "aarch64-linux")))) -;; This minimal build of Wine is needed to prevent a circular dependency w= ith -;; vkd3d. -(define-public wine-minimal - (package - (inherit wine) - (name "wine-minimal") - (native-inputs (modify-inputs (package-native-inputs wine) - (delete "gettext" "perl" "pkg-config"))) - (inputs `()) - (arguments - (substitute-keyword-arguments (package-arguments wine) - ((#:phases phases) - #~(modify-phases #$phases - (delete 'wrap-executable))) ;; Don't reference Vulkan ICD file= s. - ((#:configure-flags _ '()) - #~(list "--without-freetype" - "--without-x")))))) - (define-public wine-staging-patchset-data (package (name "wine-staging-patchset-data") base-commit: c2b40b4b4c9e0227e47730ebe73a653b89d1e568 prerequisite-patch-id: a4f31b7648d1a378604724327efd615cfaf30deb prerequisite-patch-id: 61c258aa83aa60b83e2b9e44ff0f88ecc4277ff0 prerequisite-patch-id: 151abf5b65589e5721ffc2607e884f5375150108 prerequisite-patch-id: c3046a4e9ad075f3013aafda88cec6a22341ac7c prerequisite-patch-id: 19a15bb5b766f40a985df7677db0866ad8c28069 -- 2.39.1