diff options
Diffstat (limited to 'gnu/packages/admin.scm')
| -rw-r--r-- | gnu/packages/admin.scm | 115 |
1 files changed, 115 insertions, 0 deletions
diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm index fcf05992d8..023a85f136 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm @@ -62,6 +62,8 @@ ;;; Copyright © 2023 Bruno Victal <[email protected]> ;;; Copyright © 2023 Tobias Kortkamp <[email protected]> ;;; Copyright © 2023 Jaeme Sifat <[email protected]> +;;; Copyright © 2023 Nicolas Graves <[email protected]> +;;; Copyright © 2023 Tomás Ortín Fernández <[email protected]> ;;; ;;; This file is part of GNU Guix. ;;; @@ -112,6 +114,7 @@ #:use-module (gnu packages compression) #:use-module (gnu packages crates-graphics) #:use-module (gnu packages crates-io) + #:use-module (gnu packages crates-windows) #:use-module (gnu packages crypto) #:use-module (gnu packages cryptsetup) #:use-module (gnu packages curl) @@ -130,6 +133,8 @@ #:use-module (gnu packages gnome) #:use-module (gnu packages gnupg) #:use-module (gnu packages golang) + #:use-module (gnu packages golang-build) + #:use-module (gnu packages golang-compression) #:use-module (gnu packages groff) #:use-module (gnu packages gtk) #:use-module (gnu packages guile) @@ -149,6 +154,7 @@ #:use-module (gnu packages mcrypt) #:use-module (gnu packages mpi) #:use-module (gnu packages ncurses) + #:use-module (gnu packages nettle) #:use-module (gnu packages networking) #:use-module (gnu packages openldap) #:use-module (gnu packages package-management) @@ -4907,6 +4913,33 @@ It can mount all local file systems supported by @command{mount}, as well as LUKS volumes encrypted with the user's log-in password.") (license (list license:gpl2+ license:lgpl2.1+)))) +(define-public pam-uaccess + (let ((commit "54fbf043c63cc500b4850b0b4a12ea14078f2b53") + (revision "0")) + (package + (name "pam-uaccess") + (version (git-version "0.0.0" revision commit)) + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://git.sr.ht/~kennylevinsen/pam_uaccess") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "08068cw4nvcanym8b5dyccnnb3qc3f09pbvi6fcfiz227yx73npc")))) + (build-system meson-build-system) + (native-inputs (list pkg-config)) + (inputs (list acl eudev linux-pam)) + (home-page "https://git.sr.ht/~kennylevinsen/pam_uaccess") + (synopsis + "PAM module that grants access to devices tagged @code{uaccess} in udev") + (description + "@code{pam_uaccess} is a PAM module that grants access to devices tagged +@code{uaccess} in udev for the duration of the users' session, replacing +elogind's uaccess feature.") + (license license:expat)))) + (define-public jc (package (name "jc") @@ -5814,6 +5847,57 @@ up services to use only two factor, or public/private authentication mechanisms if you really want to protect services.") (license license:gpl2+))) +(define-public restartd + (let* ((commit "7044125ac55056f2663536f7137170edf92ebd75") + ;; Version is 0.2.4 in the version file in the repo + ;; but not in github tags. + ;; It is released as 0.2.3-1.1 for other distributions. + ;; Probably because of the lack of activity upstream. + (revision "1")) + (package + (name "restartd") + (version (git-version "0.2.3" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/ajraymond/restartd") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1m1np00b4zvvwx63gzysbi38i5vj1jsjvh2s0p9czl6dzyz582z0")) + (patches (search-patches "restartd-update-robust.patch")))) + (build-system gnu-build-system) + (arguments + (list + #:tests? #f ; no tests + #:make-flags + #~(list (string-append "CC=" #$(cc-for-target))) + #:phases + #~(modify-phases %standard-phases + (delete 'configure) + (replace 'install + (lambda _ + (install-file "restartd.conf" (string-append #$output "/etc")) + (install-file "restartd" (string-append #$output "/sbin")) + (install-file "restartd.8" + (string-append #$output "/share/man/man8")) + (mkdir-p (string-append #$output "/share/man/fr/man8")) + (copy-file + "restartd.fr.8" + (string-append #$output "/share/man/fr/man8/restartd.8"))))))) + (home-page "https://launchpad.net/debian/+source/restartd") + (synopsis "Daemon for restarting processes") + (description "This package provides a daemon for checking running and +not running processes. It reads the @file{/proc} directory every @var{n} +seconds and does a POSIX regexp on the process names. The daemon runs a +user-provided script when it detects a program in the running processes, or an +alternate script if it doesn't detect the program. The daemon can only be +called by the root user, but can use @command{sudo -u user} in the process +called if needed.") + (license license:gpl2+)))) + (define-public rex (package (name "rex") @@ -6038,3 +6122,34 @@ breadth-first rather than depth-first. It is otherwise compatible with many versions of @command{find}, including POSIX, GNU, and *BSD find.") (home-page "https://tavianator.com/projects/bfs.html") (license license:bsd-0))) + +(define-public rdfind + (package + (name "rdfind") + (version "1.6.0") + (source + (origin + (method url-fetch) + (uri (string-append "https://rdfind.pauldreik.se/" name "-" version + ".tar.gz")) + (sha256 + (base32 "0y9j1w3nbgjks0k4kgm6qq92yrwgv66n212ncmlmhsl8y676wh3s")))) + (build-system gnu-build-system) + (native-inputs (list which)) + (inputs (list nettle)) + (arguments + (list + #:phases #~(modify-phases %standard-phases + (add-before 'check 'patch-tests + (lambda _ + (display (which "echo")) + (substitute* "testcases/common_funcs.sh" + (("/bin/echo") + (which "echo")))))))) + (home-page "https://rdfind.pauldreik.se") + (synopsis "Find duplicate files") + (description + "Rdfind is a command line tool that finds duplicate files based on +their content instead of their file names. It is useful for compressing +backup directories or just finding duplicate files.") + (license license:gpl2+))) |