diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2019-12-31 01:22:22 +0100 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2020-01-03 13:54:13 +0100 |
| commit | 378994459a1f5234edb2bf7773dc14dbf71a9420 (patch) | |
| tree | 8632d221ab0a563acaab4f287555af4a08dc8ed6 /gnu | |
| parent | 56dad973bce2ecb7c7093316f06efa07a4a26070 (diff) | |
| download | guix-378994459a1f5234edb2bf7773dc14dbf71a9420.tar guix-378994459a1f5234edb2bf7773dc14dbf71a9420.tar.gz | |
gnu: Add jfs_fsck-static.
* gnu/packages/file-systems.scm (jfs_fsck-static): New public variable.
Diffstat (limited to 'gnu')
| -rw-r--r-- | gnu/packages/file-systems.scm | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/gnu/packages/file-systems.scm b/gnu/packages/file-systems.scm index 3a8848b3ad..a3dc993055 100644 --- a/gnu/packages/file-systems.scm +++ b/gnu/packages/file-systems.scm @@ -28,6 +28,7 @@ #:use-module (guix build-system cmake) #:use-module (guix build-system gnu) #:use-module (guix build-system linux-module) + #:use-module (guix build-system trivial) #:use-module (guix utils) #:use-module (gnu packages) #:use-module (gnu packages acl) @@ -154,6 +155,38 @@ transaction log. `(("util-linux:static" ,util-linux "static") ,@(package-inputs jfsutils)))))) +(define-public jfs_fsck/static + (package + (name "jfs_fsck-static") + (version (package-version jfsutils)) + (source #f) + (build-system trivial-build-system) + (arguments + `(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils) + (ice-9 ftw) + (srfi srfi-26)) + (let* ((jfsutils (assoc-ref %build-inputs "jfsutils")) + (fsck "jfs_fsck") + (out (assoc-ref %outputs "out")) + (sbin (string-append out "/sbin"))) + (mkdir-p sbin) + (with-directory-excursion sbin + (install-file (string-append jfsutils "/sbin/" fsck) + ".") + (remove-store-references fsck) + (chmod fsck #o555)) + #t)))) + (inputs + `(("jfsutils" ,jfsutils/static))) + (home-page (package-home-page jfsutils)) + (synopsis "Statically-linked jfs_fsck command from jfsutils") + (description "This package provides statically-linked jfs_fsck command taken +from the jfsutils package. It is meant to be used in initrds.") + (license (package-license jfsutils)))) + (define-public disorderfs (package (name "disorderfs") |