From 227dbd841a630034a508ccd2718609a5113a0a5d Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Fri, 29 Sep 2017 16:15:57 +0200 Subject: gnu: Add pdsh. * gnu/packages/ssh.scm (pdsh): New variable. --- gnu/packages/ssh.scm | 38 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 38 insertions(+) diff --git a/gnu/packages/ssh.scm b/gnu/packages/ssh.scm index 1dac85d74a..8317f29cd8 100644 --- a/gnu/packages/ssh.scm +++ b/gnu/packages/ssh.scm @@ -8,6 +8,7 @@ ;;; Copyright © 2016 Christopher Allan Webber ;;; Copyright © 2017 Tobias Geerinckx-Rice ;;; Copyright © 2017 Stefan Reichör +;;; Copyright © 2017 Ricardo Wurmus ;;; ;;; This file is part of GNU Guix. ;;; @@ -603,3 +604,40 @@ (define-public autossh ;; copy of this license in their headers, but there's no separate file ;; with that information. (license:non-copyleft "file://autossh.c")))) + +(define-public pdsh + (package + (name "pdsh") + (version "2.29") + (source + (origin + (method url-fetch) + (uri (string-append "https://storage.googleapis.com/" + "google-code-archive-downloads/v2/code.google.com/" + "pdsh/pdsh-" version ".tar.bz2")) + (sha256 + (base32 "1kvzz01fyaxfqmbh53f4ljfsgvxdykh5jyr6fh4f1bw2ywxr1w2p")))) + (build-system gnu-build-system) + (arguments + `(#:configure-flags + (list "--with-ssh") + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'patch-/bin/sh + (lambda _ + (substitute* '("tests/runtests.sh" + "tests/test-lib.sh" + "tests/test-modules/pcptest.c") + (("/bin/sh") (which "bash"))) + #t))))) + (inputs + `(("openssh" ,openssh) + ("mit-krb5" ,mit-krb5) + ("perl" ,perl))) + (home-page "https://code.google.com/archive/p/pdsh") + (synopsis "Parallel distributed shell") + (description "Pdsh is a an efficient, multithreaded remote shell client +which executes commands on multiple remote hosts in parallel. Pdsh implements +dynamically loadable modules for extended functionality such as new remote +shell services and remote host selection.") + (license license:gpl2+))) -- cgit v1.2.3