From mboxrd@z Thu Jan 1 00:00:00 1970 From: Eric Bavier Subject: [PATCH 4/4] gnu: Add Tomb. Date: Tue, 23 Aug 2016 01:15:12 -0500 Message-ID: <20160823061512.13024-4-ericbavier@openmailbox.org> References: <20160823061512.13024-1-ericbavier@openmailbox.org> Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: quoted-printable Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:39379) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bc503-00073N-Ua for guix-devel@gnu.org; Tue, 23 Aug 2016 02:15:53 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bc4zy-0005xE-U7 for guix-devel@gnu.org; Tue, 23 Aug 2016 02:15:50 -0400 Received: from mail2.openmailbox.org ([62.4.1.33]:41107) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bc4zy-0005x1-Do for guix-devel@gnu.org; Tue, 23 Aug 2016 02:15:46 -0400 In-Reply-To: <20160823061512.13024-1-ericbavier@openmailbox.org> List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: "Guix-devel" To: guix-devel@gnu.org From: Eric Bavier * gnu/packages/crypto.scm (tomb): New variable. --- gnu/packages/crypto.scm | 60 +++++++++++++++++++++++++++++++++++++++++++= ++++++ 1 file changed, 60 insertions(+) diff --git a/gnu/packages/crypto.scm b/gnu/packages/crypto.scm index 7d61164..ea2d58a 100644 --- a/gnu/packages/crypto.scm +++ b/gnu/packages/crypto.scm @@ -4,6 +4,7 @@ ;;; Copyright =C2=A9 2016 Leo Famulari ;;; Copyright =C2=A9 2016 Lukas Gradl ;;; Copyright =C2=A9 2016 Tobias Geerinckx-Rice +;;; Copyright =C2=A9 2016 Eric Bavier ;;; ;;; This file is part of GNU Guix. ;;; @@ -22,9 +23,13 @@ =20 (define-module (gnu packages crypto) #:use-module (gnu packages) + #:use-module (gnu packages aidc) #:use-module (gnu packages autotools) #:use-module (gnu packages boost) + #:use-module (gnu packages cryptsetup) #:use-module (gnu packages gettext) + #:use-module (gnu packages gnupg) + #:use-module (gnu packages image) #:use-module (gnu packages pkg-config) #:use-module (gnu packages libbsd) #:use-module (gnu packages linux) @@ -32,8 +37,10 @@ #:use-module (gnu packages password-utils) #:use-module (gnu packages perl) #:use-module (gnu packages readline) + #:use-module (gnu packages search) #:use-module (gnu packages serialization) #:use-module (gnu packages tls) + #:use-module (gnu packages zsh) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) #:use-module (guix download) @@ -223,3 +230,56 @@ to provide security against off-line attacks, such a= s a drive falling into the wrong hands.") (license (list license:lgpl3+ ;encfs library license:gpl3+)))) ;command-line tools + +(define-public tomb + (package + (name "tomb") + (version "2.2") + (source (origin + (method url-fetch) + (uri (string-append "https://files.dyne.org/tomb/" + "tomb-" version ".tar.gz")) + (sha256 + (base32 + "11msj38fdmymiqcmwq1883kjqi5zr01ybdjj58rfjjrw4zw2w5y0"))= )) + (build-system gnu-build-system) + (inputs ;users should install their preferred pine= ntry-* + `(("zsh" ,zsh) + ("gnupg" ,gnupg) + ("cryptsetup" ,cryptsetup) + ("gettext" ,gnu-gettext) ;used at runtime + ("mlocate" ,mlocate) + ("qrencode" ,qrencode) + ("steghide" ,steghide) + ("swish-e" ,swish-e))) + (arguments + `(#:make-flags (list (string-append "PREFIX=3D" (assoc-ref %outputs= "out"))) + #:tests? #f ;requires root + ;; TODO: Build and install gtk and qt trays + #:phases + (modify-phases %standard-phases + (delete 'configure) ;no configuration to be done + (add-after 'install 'i18n + (lambda* (#:key make-flags #:allow-other-keys) + (zero? (apply system* + "make" "-C" "extras/translations" + "install" make-flags)))) + (add-after 'install 'wrap + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (wrap-program (string-append out "/bin/tomb") + `("PATH" ":" prefix + (,(string-append (assoc-ref inputs "mlocate") "/bin") + ,@(map (lambda (program) + (or (and=3D> (which program) dirname) + (error "program not found:" program))) + '("gpg" "cryptsetup" "gettext" + "qrencode" "steghide" "swish-e"))))) + #t)))))) + (home-page "http://www.dyne.org/software/tomb") + (synopsis "File encryption for secret data") + (description + "Tomb is an application to manage the creation and access of encryp= ted +storage files: it can be operated from commandline and it can integrate = with a +user's graphical desktop.") + (license license:gpl3+))) --=20 2.9.2