From 53f1b621d9e0ad56bac726661455270b6d70ac10 Mon Sep 17 00:00:00 2001
From: Hilton Chain <hako@ultrarare.space>
Date: Sat, 1 Oct 2022 10:32:40 +0800
Subject: nongnu: Add nvidia-module.

This is the proprietary Nvidia kernel module.

* nongnu/packages/nvidia.scm (nvidia-module): New variable.

Signed-off-by: Jonathan Brielmaier <jonathan.brielmaier@web.de>
---
 nongnu/packages/nvidia.scm | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)

diff --git a/nongnu/packages/nvidia.scm b/nongnu/packages/nvidia.scm
index 5951d57..7a24c2c 100644
--- a/nongnu/packages/nvidia.scm
+++ b/nongnu/packages/nvidia.scm
@@ -520,6 +520,46 @@ packages that have been compiled with a mesa output, take a look at the nvda
 package.")
     (license (license:nonfree (format #f "file:///share/doc/nvidia-driver-~a/LICENSE" version)))))
 
+(define-public nvidia-module
+  (package
+    (name "nvidia-module")
+    (version nvidia-version)
+    (source nvidia-source)
+    (build-system linux-module-build-system)
+    (arguments
+     (list #:linux linux-lts
+           #:source-directory "kernel"
+           #:tests? #f
+           #:make-flags
+           #~(list (string-append "CC=" #$(cc-for-target)))
+           #:phases
+           #~(modify-phases %standard-phases
+               (delete 'strip)
+               (add-before 'configure 'fixpath
+                 (lambda* (#:key (source-directory ".") #:allow-other-keys)
+                   (substitute* (string-append source-directory "/Kbuild")
+                     (("/bin/sh") (which "sh")))))
+               (replace 'build
+                 (lambda* (#:key (make-flags '()) (parallel-build? #t)
+                           (source-directory ".")
+                           inputs
+                           #:allow-other-keys)
+                   (apply invoke "make" "-C" (canonicalize-path source-directory)
+                          (string-append "SYSSRC=" (search-input-directory
+                                                    inputs "/lib/modules/build"))
+                          `(,@(if parallel-build?
+                                  `("-j" ,(number->string
+                                           (parallel-job-count)))
+                                  '())
+                            ,@make-flags)))))))
+    (home-page "https://www.nvidia.com")
+    (synopsis "Proprietary NVIDIA kernel modules")
+    (description
+     "This package provides the evil NVIDIA proprietary kernel modules.")
+    (license
+     (license:nonfree
+      (format #f "file:///share/doc/nvidia-driver-~a/LICENSE" version)))))
+
 (define-public nvidia-module-open
   (package
     (name "nvidia-module-open")
-- 
cgit v1.2.3