summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorFranz Geffke <m@f-a.nz>2025-03-18 17:14:39 +0000
committerFranz Geffke <m@f-a.nz>2025-03-18 17:14:39 +0000
commite8b7b41dc0d32d02bfd72a43dbae54a5c3c73fad (patch)
treefe470ce48f15a1a919619803586e3d405bc15f2b
parenteba4f77e01c745c434b497e1bf364c72752fa2bd (diff)
px: Remove throttled
-rw-r--r--px/packages/throttled.scm101
1 files changed, 0 insertions, 101 deletions
diff --git a/px/packages/throttled.scm b/px/packages/throttled.scm
deleted file mode 100644
index 3f6e74b..0000000
--- a/px/packages/throttled.scm
+++ /dev/null
@@ -1,101 +0,0 @@
-(define-module (px packages throttled)
- #:use-module ((guix licenses)
- #:prefix license:)
- #:use-module (guix download)
- #:use-module (guix packages)
- #:use-module (guix utils)
- #:use-module (guix build-system trivial)
- #:use-module (gnu packages bash)
- #:use-module (gnu packages base)
- #:use-module (gnu packages compression)
- #:use-module (gnu packages glib)
- #:use-module (gnu packages python)
- #:use-module (gnu packages python-xyz))
-
-(define-public throttled
- (package
- (name "throttled")
- (version "0.10.0")
- (source
- (origin
- (method url-fetch)
- (uri (string-append
- "https://github.com/erpalma/throttled/archive/refs/tags/v"
- version ".tar.gz"))
- (sha256
- (base32 "1f39rfk6bdx0a0m7krbb7yj0jy1p2a7qqn99y7jb02d84vy45q29"))))
- (build-system trivial-build-system)
- (arguments
- `(#:modules ((guix build utils))
- #:builder (begin
- (use-modules (guix build utils)
- (srfi srfi-26))
- (let* ((source (assoc-ref %build-inputs "source"))
- (bash (assoc-ref %build-inputs "bash"))
- (coreutils (assoc-ref %build-inputs "coreutils"))
- (dbus (assoc-ref %build-inputs "dbus"))
- (gzip (assoc-ref %build-inputs "gzip"))
- (python (assoc-ref %build-inputs "python"))
- (python-dbus (assoc-ref %build-inputs "python-dbus"))
- (python-pygo (assoc-ref %build-inputs
- "python-pygobject"))
- (pythonpath (string-append "/lib/python"
- ,(version-major+minor (package-version
- python))
- "/site-packages:"))
- (tar (assoc-ref %build-inputs "tar"))
- (bin-dir (string-append %output "/bin"))
- (etc-dir (string-append %output "/etc/throttled"))
- (python-dir (string-append %output "/python"))
- (root-dir "throttled-0.10.0")
- (bin-script (string-append root-dir
- "/runit/throttled/run"))
- (py-script (string-append root-dir "/throttled.py")))
- (mkdir-p bin-dir)
- (mkdir-p etc-dir)
- (mkdir-p python-dir)
- (setenv "PATH"
- (string-append (string-append bash "/bin:")
- (string-append coreutils "/bin:")
- (string-append gzip "/bin:")
- (string-append tar "/bin:")))
- (invoke "tar" "xvf" source)
- (invoke "cp"
- (string-append root-dir "/etc/throttled.conf")
- (string-append etc-dir "/throttled.conf"))
- (invoke "cp"
- (string-append root-dir "/mmio.py") python-dir)
- (substitute* py-script
- (("/etc/throttled")
- etc-dir))
- (invoke "cp" py-script python-dir)
- (substitute* bin-script
- (("/opt/throttled/venv")
- python))
- (substitute* bin-script
- (("/opt/throttled/throttled.py")
- (string-append python-dir "/throttled.py" " $@")))
- (invoke "mv" bin-script
- (string-append bin-dir "/throttled"))
- (wrap-program (string-append bin-dir "/throttled")
- `("PYTHONPATH" ":" prefix
- (,(string-append python-dbus pythonpath))))
- (wrap-program (string-append bin-dir "/throttled")
- `("PYTHONPATH" ":" prefix
- (,(string-append python-pygo pythonpath))))
- #t))))
- (native-inputs `(("coreutils" ,coreutils)
- ("gzip" ,gzip)
- ("python" ,python)
- ("tar" ,tar)))
- (inputs `(("bash" ,bash)
- ("python-dbus" ,python-dbus)
- ("python-pygobject" ,python-pygobject)))
- (home-page "https://github.com/erpalma/throttled")
- (synopsis "Workaround for Intel throttling issues in Linux.")
- (description
- "The CPU package power limit (PL1/2) is forced to a value of 44 W (29 W on battery)
-and the temperature trip point to 95 'C (85 'C on battery) by overriding default values
-in MSR and MCHBAR every 5 seconds (30 on battery) to block the Embedded Controller from
-resetting these values to default.")
- (license license:expat)))