summaryrefslogtreecommitdiff
path: root/gnu/packages/admin.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/packages/admin.scm')
-rw-r--r--gnu/packages/admin.scm180
1 files changed, 162 insertions, 18 deletions
diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index f19289e553..00436e9920 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -32,10 +32,14 @@
;;; Copyright © 2019, 2020 Mathieu Othacehe <m.othacehe@gmail.com>
;;; Copyright © 2020 Oleg Pykhalov <go.wigust@gmail.com>
;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
-;;; Copyright © 2020 Michael Rohleder <mike@rohleder.de>
+;;; Copyright © 2020, 2021 Michael Rohleder <mike@rohleder.de>
;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com>
;;; Copyright © 2020 Morgan Smith <Morgan.J.Smith@outlook.com>
;;; Copyright © 2021 Maxim Cournoyer <maxim.cournoyer@gmail.com>
+;;; Copyright © 2021 Zheng Junjie <873216071@qq.com>
+;;; Copyright © 2021 Stefan Reichör <stefan@xsteve.at>
+;;; Copyright © 2021 qblade <qblade@protonmail.com>
+;;; Copyright © 2021 Hyunseok Kim <lasnesne@lagunposprasihopre.org>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -459,7 +463,7 @@ graphs and can export its output to different formats.")
(define-public facter
(package
(name "facter")
- (version "4.0.49")
+ (version "4.0.51")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -468,7 +472,7 @@ graphs and can export its output to different formats.")
(file-name (git-file-name name version))
(sha256
(base32
- "0l7gic5ql5xiy5s6rb0j9ydyaal5bcxl10bx45khcgdr9zg16pb1"))))
+ "1s98rq2wjmh8bqdfdibvfp9j2ynd97k0c4hairryrzl9nna3j542"))))
(build-system ruby-build-system)
(arguments
`(#:phases
@@ -527,6 +531,42 @@ or via the @code{facter} Ruby library.")
(home-page "https://github.com/puppetlabs/facter-ng")
(license license:expat)))
+(define-public ttyload
+ (let ((revision "1")
+ (commit "f9495372801ce4b4dad98ad854203e694c31c1eb"))
+ (package
+ (name "ttyload")
+ (version (git-version "0.5.3" revision commit))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/lindes/ttyload")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "0ldb7a13b9v876c6cbrs78pkizj64drnqx95z5shfbwgpwfhr4im"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:tests? #f ; no tests
+ #:make-flags
+ (list (string-append "CC=" ,(cc-for-target)))
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'configure)
+ (replace 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (bin (string-append out "/bin")))
+ (install-file "ttyload" bin)))))))
+ (home-page "https://www.daveltd.com/src/util/ttyload/")
+ (synopsis "Console based color-coded graphs of CPU load average")
+ (description
+ "Show graphs for 1 minute, 5 minute, 15 minute load averages on the
+console.")
+ ;; This package uses a modified version of the "ISC License".
+ (license (license:non-copyleft "file://LICENSE")))))
+
(define-public htop
(package
(name "htop")
@@ -578,6 +618,40 @@ application (for console or X terminals) and requires ncurses.")
memory, disks, network and processes.")
(license license:asl2.0)))
+(define-public bpytop
+ (package
+ (name "bpytop")
+ (version "1.0.63")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (pypi-uri "bpytop" version))
+ (sha256
+ (base32
+ "0ql72s842g56rnzdqja6m53lw5y68c4gb540ihp1bjg7x9ycim11"))))
+ (build-system python-build-system)
+ (inputs
+ `(("python-psutil" ,python-psutil)))
+ (arguments
+ `(#:phases
+ (modify-phases %standard-phases
+ (add-after 'install 'install-themes
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((themes (string-append (assoc-ref outputs "out")
+ "/lib/python"
+ ,(version-major+minor
+ (package-version python))
+ "/site-packages/bpytop-themes")))
+ (mkdir-p themes)
+ (copy-recursively "bpytop-themes" themes)))))))
+ (home-page
+ "https://github.com/aristocratos/bpytop")
+ (synopsis "Resource monitor")
+ (description "Resource monitor that shows usage and stats for processor,
+memory, disks, network and processes. It's a Python port of
+@command{bashtop}.")
+ (license license:asl2.0)))
+
(define-public pies
(package
(name "pies")
@@ -978,7 +1052,7 @@ connection alive.")
(define-public isc-dhcp
(let* ((bind-major-version "9")
(bind-minor-version "11")
- (bind-patch-version "22")
+ (bind-patch-version "28")
(bind-release-type "") ; for patch release, use "-P"
(bind-release-version "") ; for patch release, e.g. "6"
(bind-version (string-append bind-major-version
@@ -1115,7 +1189,7 @@ connection alive.")
"/bind-" bind-version ".tar.gz"))
(sha256
(base32
- "1j9a4r83a77mp8k1y8z524c9rzdqgd8rzwczd6zwmw86a00xiimg"))))
+ "0x2yjy0d8p7i5mr2s5y65fdax0jjgvd8fn07s42c8dxsrbkcp40h"))))
("coreutils*" ,coreutils)
("sed*" ,sed)))
@@ -1132,14 +1206,14 @@ tools: server, client, and relay agent.")
(define-public libpcap
(package
(name "libpcap")
- (version "1.9.1")
+ (version "1.10.0")
(source (origin
(method url-fetch)
(uri (string-append "https://www.tcpdump.org/release/libpcap-"
version ".tar.gz"))
(sha256
(base32
- "153h1378diqyc27jjgz6gg5nxmb4ddk006d9xg69nqavgiikflk3"))))
+ "07ibr6zzfh1wk5gqcbnlyh6v0dfmhpfd0fqj5y3yxvzf4ckb84ld"))))
(build-system gnu-build-system)
(native-inputs
`(("bison" ,bison)
@@ -1160,14 +1234,14 @@ network statistics collection, security monitoring, network debugging, etc.")
(define-public tcpdump
(package
(name "tcpdump")
- (version "4.9.3")
+ (version "4.99.0")
(source (origin
(method url-fetch)
(uri (string-append "https://www.tcpdump.org/release/tcpdump-"
version ".tar.gz"))
(sha256
(base32
- "0434vdcnbqaia672rggjzdn4bb8p8dchz559yiszzdk0sjrprm1c"))))
+ "0hmqh2fx8rgs9v1mk3vpywj61xvkifz260q685xllxr8jmxg3wlc"))))
(build-system gnu-build-system)
(inputs `(("libpcap" ,libpcap)
("openssl" ,openssl)))
@@ -1587,7 +1661,9 @@ features of sudo with a fraction of the codebase.")
;; Disable D-Bus to save ~14MiB on the closure size.
(("^CONFIG_CTRL_IFACE_DBUS" line _)
(string-append "#" line)))
- #t))))
+ #t))
+ (patches
+ (search-patches "wpa-supplicant-CVE-2021-27803.patch"))))
(build-system gnu-build-system)
(arguments
`(#:phases
@@ -1751,7 +1827,9 @@ command.")
".tar.gz"))
(sha256
(base32
- "1mrbvg4v7vm7mknf0n29mf88k3s4a4qj6r4d51wq8hmjj1m7s7c8"))))
+ "1mrbvg4v7vm7mknf0n29mf88k3s4a4qj6r4d51wq8hmjj1m7s7c8"))
+ (patches
+ (search-patches "wpa-supplicant-CVE-2021-27803.patch"))))
(build-system gnu-build-system)
(arguments
`(#:phases
@@ -2057,6 +2135,33 @@ environment variable is set and output is to tty.")
(home-page "http://mama.indstate.edu/users/ice/tree/")
(license license:gpl2+)))
+(define-public lr
+ (package
+ (name "lr")
+ (version "1.5.1")
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://git.vuxu.org/lr/")
+ (commit (string-append "v" version))))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "1wv2acm4r5y5gg6f64v2hiwpg1f3lnr4fy1a9zssw77fmdc7ys3j"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:tests? #f
+ #:make-flags (list (string-append "CC=" ,(cc-for-target))
+ (string-append "PREFIX=" %output))
+ #:phases (modify-phases %standard-phases
+ (delete 'configure))))
+ (synopsis "Tool to generate customized file listings")
+ (description
+ "lr is a tool for generating file listings, which includes the best
+features of ls(1), find(1), stat(1) and du(1).")
+ (home-page "https://git.vuxu.org/lr/about")
+ (license license:expat)))
+
(define-public direvent
(package
(name "direvent")
@@ -2219,13 +2324,13 @@ of supported upstream metrics systems simultaneously.")
(define-public ansible
(package
(name "ansible")
- (version "2.9.16")
+ (version "2.9.18")
(source
(origin
(method url-fetch)
(uri (pypi-uri "ansible" version))
(sha256
- (base32 "0j1icfqff25zm9sq6j41ipl6gcj3i67mb5bqbjf2f2q1yx6rm8sk"))))
+ (base32 "0g6rsnh02zq5nizamgakl2wvgz7hk1lpnjn9akldrcpa55vygzjm"))))
(build-system python-build-system)
(native-inputs
`(("python-bcrypt" ,python-bcrypt)
@@ -3821,6 +3926,38 @@ support forum. It runs with the @code{/exec} command in most IRC clients.")
(description "This package provides @code{udev} bindings for Python.")
(license license:lgpl2.1)))
+(define-public vmtouch
+ (package
+ (name "vmtouch")
+ (version "1.3.1")
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/hoytech/vmtouch/")
+ (commit (string-append "v" version))))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "08da6apzfkfjwasn4dxrlfxqfx7arl28apdzac5nvm0fhvws0dxk"))))
+ (build-system gnu-build-system)
+ (native-inputs
+ `(("perl" ,perl)))
+ (arguments
+ `(#:tests? #f ; no tests
+ #:make-flags
+ (list
+ (string-append "CC=" ,(cc-for-target))
+ (string-append "PREFIX=" (assoc-ref %outputs "out")))
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'configure))))
+ (home-page "https://github.com/hoytech/vmtouch/")
+ (synopsis "Portable file system cache diagnostics and control")
+ (description
+ "vmtouch is a tool for learning about and controlling the file system
+cache of unix and unix-like systems.")
+ (license license:bsd-3)))
+
(define-public solaar
(package
(name "solaar")
@@ -3843,7 +3980,14 @@ support forum. It runs with the @code{/exec} command in most IRC clients.")
(setenv "PYTHONPATH" "lib"))))))
(propagated-inputs
`(("python-pygobject" ,python-pygobject)
- ("python-pyudev" ,python-pyudev)))
+ ("python-pyudev" ,python-pyudev)
+
+ ;; For GUI.
+ ("python-pyyaml" ,python-pyyaml)
+ ("python-psutil" ,python-psutil)
+ ("python-xlib" ,python-xlib)
+ ("gtk+" ,gtk+)
+ ("python-pygobject" ,python-pygobject)))
(home-page "https://smxi.org/docs/inxi.htm")
(synopsis "Linux devices manager for the Logitech Unifying Receiver")
(description "This package provides tools to manage clients of the
@@ -3854,7 +3998,7 @@ Logitech Unifying Receiver.")
(package
(name "lynis")
;; Also update the ‘lynis-sdk’ input to the commit matching this release.
- (version "2.7.5")
+ (version "3.0.3")
(source
(origin
(method git-fetch)
@@ -3863,7 +4007,7 @@ Logitech Unifying Receiver.")
(commit version)))
(file-name (git-file-name name version))
(sha256
- (base32 "1lkkbvxm0rgrrlx0szaxmf8ghc3d26wal96sgqk84m37mvs1f7p0"))
+ (base32 "0sdjh2f1563qalp740vkaaxdxl56ny98h168cggpm10h2yq366gr"))
(modules '((guix build utils)))
(snippet
'(begin
@@ -3880,10 +4024,10 @@ Logitech Unifying Receiver.")
(method git-fetch)
(uri (git-reference
(url "https://github.com/CISOfy/lynis-sdk")
- (commit "bf1c1d95121da9ca79a9eac5a15ed8d81e34094d")))
+ (commit "ea7a39774fbd71113a1955cf1a4937b489935174")))
(file-name (git-file-name "lynis-sdk" version))
(sha256
- (base32 "1ndz5v0039dqa87cva2dk55a8hkw0fibsw8hh2ddmny9qkr4l3dp"))))))
+ (base32 "0q5j2myshjkz9qwvcg8n7c33yw2cp80yvzhckd60qmzabv4g4qb5"))))))
(arguments
`(#:phases
(modify-phases %standard-phases
generated by cgit v1.2.3 (git 2.44.0) at 2024-06-02 12:30:27 +0000