diff options
| author | Jelle Licht <jlicht@fsfe.org> | 2022-03-12 21:34:09 +0100 |
|---|---|---|
| committer | Jelle Licht <jlicht@fsfe.org> | 2022-03-20 16:40:22 +0100 |
| commit | 10d865aa921f559562fb543d7796c7a08e17f016 (patch) | |
| tree | 9b608a6192adbf807c8e6a467e5a9ae36ba29683 | |
| parent | 01d433250fe03326b4ea305d527c0294ed2eb037 (diff) | |
| download | guix-patches-10d865aa921f559562fb543d7796c7a08e17f016.tar guix-patches-10d865aa921f559562fb543d7796c7a08e17f016.tar.gz | |
services: thermald: Add 'adaptive?' field.
* gnu/services/pm.scm (<thermald-configuration>): Add 'adaptive?' field.
(thermald-shepherd-service): Use it to pass --adaptive to thermald.
* doc/guix.texi (Power Management Services): Document the 'adaptive?' field of
'thermald-configuration'.
| -rw-r--r-- | doc/guix.texi | 4 | ||||
| -rw-r--r-- | gnu/services/pm.scm | 5 |
2 files changed, 9 insertions, 0 deletions
diff --git a/doc/guix.texi b/doc/guix.texi index 15ab97699c..44b0f9f1ea 100644 --- a/doc/guix.texi +++ b/doc/guix.texi @@ -30687,6 +30687,10 @@ of processors and preventing overheating. Data type representing the configuration of @code{thermald-service-type}. @table @asis +@item @code{adaptive?} (default: @code{#f}) +Use @acronym{DPTF, Dynamic Power and Thermal Framework} adaptive tables +when present. + @item @code{ignore-cpuid-check?} (default: @code{#f}) Ignore cpuid check for supported CPU models. diff --git a/gnu/services/pm.scm b/gnu/services/pm.scm index 3da3c0b961..e48236dbca 100644 --- a/gnu/services/pm.scm +++ b/gnu/services/pm.scm @@ -435,6 +435,8 @@ shutdown on system startup.")) (define-record-type* <thermald-configuration> thermald-configuration make-thermald-configuration thermald-configuration? + (adaptive? thermald-adaptive? ;boolean + (default #f)) (ignore-cpuid-check? thermald-ignore-cpuid-check? ;boolean (default #f)) (thermald thermald-thermald ;file-like @@ -448,6 +450,9 @@ shutdown on system startup.")) (start #~(make-forkexec-constructor '(#$(file-append (thermald-thermald config) "/sbin/thermald") "--no-daemon" + #$@(if (thermald-adaptive? config) + '("--adaptive") + '()) #$@(if (thermald-ignore-cpuid-check? config) '("--ignore-cpuid-check") '())))) |