From: Jorge Acereda <jacereda@gmail.com>
To: 53059@debbugs.gnu.org
Cc: Jorge Acereda <jacereda@gmail.com>
Subject: [bug#53059] [PATCH v2] gnu: Add gpu-switch.
Date: Fri, 7 Jan 2022 19:37:20 +0100 [thread overview]
Message-ID: <6a263efbca6f379b056e06887de50e6cccac9929.1641580314.git.jacereda@gmail.com> (raw)
In-Reply-To: <79655b434893691c6647f28087652f162aad80de.1641496236.git.jacereda@gmail.com>
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain; charset=yes, Size: 3762 bytes --]
The package version is the same one used in nixpkgs (current tip).
Should I add some "unstable" string somewhere? Also, I'm pretty sure
I overcomplicated things, there must be some easier way to patch the
executable paths.
* gnu/packages/graphics.scm (gpu-switch): New variable.
---
gnu/packages/graphics.scm | 58 ++++++++++++++++++++++++++++++++++++++-
1 file changed, 57 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/graphics.scm b/gnu/packages/graphics.scm
index fe35aaad2d..d425a18c18 100644
--- a/gnu/packages/graphics.scm
+++ b/gnu/packages/graphics.scm
@@ -27,6 +27,7 @@
;;; Copyright © 2021 Andy Tai <atai@atai.org>
;;; Copyright © 2021 Ekaitz Zarraga <ekaitz@elenq.tech>
;;; Copyright © 2021 Vinicius Monego <monego@posteo.net>
+;;; Copyright © 2022 Jorge Acereda <jacereda@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -113,12 +114,14 @@ (define-module (gnu packages graphics)
#:use-module (guix build-system meson)
#:use-module (guix build-system python)
#:use-module (guix build-system qt)
+ #:use-module (guix build-system trivial)
#:use-module (guix download)
#:use-module (guix git-download)
#:use-module (guix hg-download)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages)
- #:use-module (guix utils))
+ #:use-module (guix utils)
+ #:use-module (ice-9 match))
(define-public mmm
(package
@@ -2011,4 +2014,56 @@ (define-public monado
such as VR and AR on mobile, PC/desktop, and any other device. Monado aims to be
a complete and conforming implementation of the OpenXR API made by Khronos.")
(license license:boost1.0)))
+
+(define-public gpu-switch
+ (package
+ (name "gpu-switch")
+ (version "2017-04-28")
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/0xbb/gpu-switch")
+ (commit "a365f56d435c8ef84c4dd2ab935ede4992359e31")))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "1jnh43nijkqd83h7piq7225ixziggyzaalabgissyxdyz6szcn0r"))))
+ (build-system trivial-build-system)
+ (inputs
+ (list bash e2fsprogs util-linux grep coreutils which))
+ (arguments
+ `(#:modules ((guix build utils))
+ #:builder
+ (begin
+ (use-modules (guix build utils) (ice-9 match))
+ (let* ((out (assoc-ref %outputs "out"))
+ (gpu-switch (search-input-file %build-inputs "gpu-switch"))
+ (bin (string-append out "/bin"))
+ (out-gpu-switch (string-append bin "/gpu-switch"))
+ (readme (search-input-file %build-inputs "README.md")))
+ (install-file gpu-switch bin)
+ (for-each
+ (match-lambda
+ ((pkg . nm) (substitute* out-gpu-switch
+ ((nm)
+ (string-append (assoc-ref %build-inputs pkg)
+ "/bin/" nm)))))
+ '(("coreutils" . "basename")
+ ("bash" . "bash")
+ ("util-linux" . "mount")
+ ("which" . "which")
+ ("coreutils" . "cat")
+ ("e2fsprogs" . "chattr")
+ ("grep" . "grep")))
+ (install-file readme (string-append out "/share/doc/gpu-switch-" ,version))
+ #t))))
+ (home-page "https://github.com/0xbb/gpu-switch")
+ (synopsis "GPU switcher for dual-GPU MacBook Pro models")
+ (description
+ "Switch between the integrated and dedicated GPU of dual-GPU MacBook Pro
+models for the next reboot.
+
+It aims to remove the need of booting into OS X and running gfxCardStatus
+v2.2.1 to switch to the integrated card.")
+ (license license:expat)))
+
--
2.34.0
next prev parent reply other threads:[~2022-01-07 18:44 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2022-01-06 19:11 [bug#53059] [PATCH] gnu: Add gpu-switch Jorge Acereda
2022-01-06 21:01 ` Maxime Devos
[not found] ` <87pmp42w9k.fsf@gmail.com>
2022-01-07 10:45 ` Maxime Devos
2022-01-07 18:37 ` Jorge Acereda [this message]
2022-01-08 15:38 ` [bug#53059] [PATCH v2] " Maxime Devos
2022-01-08 19:42 ` [bug#53059] [PATCH v3] " Jorge Acereda
2022-01-08 19:53 ` [bug#53059] [PATCH v4] " Jorge Acereda
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://guix.gnu.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=6a263efbca6f379b056e06887de50e6cccac9929.1641580314.git.jacereda@gmail.com \
--to=jacereda@gmail.com \
--cc=53059@debbugs.gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/guix.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).