From 6c9c8abcae770c60bd36406e59b54a9fd0aba798 Mon Sep 17 00:00:00 2001
From: Hilton Chain <hako@ultrarare.space>
Date: Fri, 25 Nov 2022 14:02:59 +0800
Subject: [PATCH] rosenthal: Add busybox/static.

* rosenthal/packages/busybox.scm: New file.
(busybox/static): New variable.
---
 rosenthal/packages/busybox.scm | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 rosenthal/packages/busybox.scm

diff --git a/rosenthal/packages/busybox.scm b/rosenthal/packages/busybox.scm
new file mode 100644
index 0000000..caae86a
--- /dev/null
+++ b/rosenthal/packages/busybox.scm
@@ -0,0 +1,28 @@
+;; SPDX-FileCopyrightText: 2022 Hilton Chain <hako@ultrarare.space>
+;;
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+(define-module (rosenthal packages busybox)
+  #:use-module (guix gexp)
+  #:use-module (guix packages)
+  #:use-module (guix utils)
+  #:use-module (gnu packages busybox))
+
+(define-public busybox/static
+  (let ((base busybox))
+    (package
+      (inherit base)
+      (name "busybox-static")
+      (arguments
+       (substitute-keyword-arguments (package-arguments base)
+         ((#:phases phases)
+          #~(modify-phases #$phases
+              (add-after 'configure 'static-build
+                (lambda _
+                  (substitute* ".config"
+                    (("# CONFIG_STATIC is not set")
+                     "CONFIG_STATIC=y"))))
+              ;; FIXME: All mdev tests fail when building staticly.
+              (add-before 'check 'disable-failing-tests
+                (lambda _
+                  (delete-file "testsuite/mdev.tests"))))))))))