aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/backup.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2021-12-13 17:18:24 +0100
committerLudovic Courtès <ludo@gnu.org>2021-12-13 17:48:25 +0100
commit8394619baceb118df92e355377fd543bb1aa501a (patch)
tree504f07c2a9f88596a305b59ef45f941062426a52 /gnu/packages/backup.scm
parentaca2defe0172868295941fd9f0e97886f6e9b2d4 (diff)
downloadguix-8394619baceb118df92e355377fd543bb1aa501a.tar
guix-8394619baceb118df92e355377fd543bb1aa501a.tar.gz
gnu: Simplify package inputs.
This commit was obtained by running: ./pre-inst-env guix style without any additional argument.
Diffstat (limited to 'gnu/packages/backup.scm')
-rw-r--r--gnu/packages/backup.scm190
1 files changed, 77 insertions, 113 deletions
diff --git a/gnu/packages/backup.scm b/gnu/packages/backup.scm
index 5e147113b1..fdb84898bb 100644
--- a/gnu/packages/backup.scm
+++ b/gnu/packages/backup.scm
@@ -118,11 +118,11 @@
("pygobject" ,python-pygobject)
("urllib3" ,python-urllib3)))
(inputs
- `(("dbus" ,dbus) ; dbus-launch (Gio backend)
- ("librsync" ,librsync)
- ("lftp" ,lftp)
- ("gnupg" ,gnupg) ; gpg executable needed
- ("util-linux" ,util-linux))) ; for setsid
+ (list dbus ; dbus-launch (Gio backend)
+ librsync
+ lftp
+ gnupg ; gpg executable needed
+ util-linux)) ; for setsid
(arguments
`(#:test-target "test"
#:phases
@@ -173,8 +173,7 @@ spying and/or modification by the server.")
(base32
"11mx8q29cr0sryd11awab7y4mhqgbamb1ss77rffjj6in8pb4hdk"))))
(native-inputs
- `(("automake" ,automake)
- ("autoconf" ,autoconf)))
+ (list automake autoconf))
(build-system gnu-build-system)
(synopsis "File verification and repair tools")
(description "Par2cmdline uses Reed-Solomon error-correcting codes to
@@ -200,14 +199,14 @@ can even repair them.")
(base32
"02bnczg01cyhajmm4rhbnc0ja0dd9ikv9fwv28asxh1rlx9yr0b7"))))
(build-system gnu-build-system)
- (native-inputs `(("pkg-config" ,pkg-config)))
+ (native-inputs (list pkg-config))
(inputs
- `(("glib" ,glib)
- ("tar" ,tar)
- ("lzop" ,lzop)
- ("mcrypt" ,mcrypt)
- ("openssh" ,openssh)
- ("gnupg" ,gnupg-1)))
+ (list glib
+ tar
+ lzop
+ mcrypt
+ openssh
+ gnupg-1))
(arguments
`(#:configure-flags
`(,(string-append "--sbindir=" (assoc-ref %outputs "out") "/bin"))
@@ -239,13 +238,13 @@ backups (called chunks) to allow easy burning to CD/DVD.")
"16r95rlmikll1k8vbhh06vq6x3srkc10hzxjjf3021mjs2ld65qf"))))
(build-system gnu-build-system)
(inputs
- `(("bzip2" ,bzip2)
- ("libxml2" ,libxml2)
- ("lzo" ,lzo)
- ("nettle" ,nettle)
- ("xz" ,xz)
- ("zlib" ,zlib)
- ("zstd" ,zstd "lib")))
+ (list bzip2
+ libxml2
+ lzo
+ nettle
+ xz
+ zlib
+ `(,zstd "lib")))
(arguments
`(#:configure-flags '("--disable-static")
#:phases
@@ -337,21 +336,15 @@ random access nor for in-place modification.")
(base32 "0bzyv6qmnivxnv9nw7lnfn46k0m1dlxcjj53zcva6v8y8084l1iw"))))
(build-system gnu-build-system)
(native-inputs
- `(("autoconf" ,autoconf)
- ("automake" ,automake)
- ("pkg-config" ,pkg-config)
-
- ;; For tests.
- ("dejagnu" ,dejagnu)))
+ (list autoconf automake pkg-config
+ ;; For tests.
+ dejagnu))
(inputs
;; XXX Compiling with nettle (encryption) support requires patching out
;; -Werror from GNUmakefile.in. Then, rdup-tr-{en,de}crypt tests fail:
;; free(): invalid pointer
;; ** rdup-tr: SIGPIPE received, exiting
- `(("glib" ,glib)
- ("pcre" ,pcre)
- ("libarchive" ,libarchive)
- ("mcrypt" ,mcrypt)))
+ (list glib pcre libarchive mcrypt))
(arguments
`(#:parallel-build? #f ;race conditions
#:phases
@@ -414,13 +407,11 @@ list and implement the backup strategy.")
(setenv "VERSION" ,version)
(patch-shebang "autover.sh"))))))
(native-inputs
- `(("automake" ,automake)
- ("autoconf" ,autoconf)
-
- ;; For the tests.
- ("valgrind" ,valgrind)))
+ (list automake autoconf
+ ;; For the tests.
+ valgrind))
(inputs
- `(("util-linux" ,util-linux "lib"))) ; libblkid
+ (list `(,util-linux "lib"))) ; libblkid
(home-page "https://www.snapraid.it/")
(synopsis "Efficient backups using parity snapshots across disk arrays")
(description
@@ -462,7 +453,7 @@ remain fully idle, saving power and producing less noise.")
"0miklk4bqblpyzh1bni4x6lqn88fa8fjn15x1k1n8bxkx60nlymd"))))
(build-system gnu-build-system)
(inputs
- `(("librsync" ,librsync-0.9)))
+ (list librsync-0.9))
(arguments
`(#:make-flags `(,(string-append "PREFIX=" (assoc-ref %outputs "out"))
,(string-append "CC=" ,(cc-for-target)))
@@ -493,10 +484,9 @@ errors.")
(base32 "11rvjcp77zwgkphz1kyf5yqgr3rlss7dm9xzmvpvc4lp99xq7drb"))))
(build-system python-build-system)
(native-inputs
- `(("python-setuptools-scm" ,python-setuptools-scm)))
+ (list python-setuptools-scm))
(inputs
- `(("python" ,python)
- ("librsync" ,librsync)))
+ (list python librsync))
(arguments
`(#:tests? #f)) ; Tests require root/sudo
(home-page "https://rdiff-backup.net/")
@@ -535,8 +525,7 @@ rdiff-backup is easy to use and settings have sensible defaults.")
(lambda _
(invoke "make" "test"))))))
(inputs
- `(("perl" ,perl)
- ("rsync" ,rsync)))
+ (list perl rsync))
(home-page "https://rsnapshot.org")
(synopsis "Deduplicating snapshot backup utility based on rsync")
(description "rsnapshot is a file system snapshot utility based on rsync.
@@ -600,22 +589,20 @@ rsnapshot uses hard links to deduplicate identical files.")
;; some obscure reason. Better skip it.
(setenv "XFAIL_TESTS" "utils/block-server"))))))
(native-inputs
- `(("guile" ,guile-2.0)
- ("gperf" ,gperf-3.0) ;see <https://bugs.gnu.org/32382>
- ("pkg-config" ,pkg-config)
- ("rpcsvc-proto" ,rpcsvc-proto))) ;for 'rpcgen'
+ (list guile-2.0 gperf-3.0 ;see <https://bugs.gnu.org/32382>
+ pkg-config rpcsvc-proto)) ;for 'rpcgen'
(inputs
- `(("guile" ,guile-2.0)
- ("util-linux" ,util-linux)
- ("libtirpc" ,libtirpc)
- ("gnutls" ,gnutls)
- ("tdb" ,tdb)
- ("bdb" ,bdb)
- ("gdbm" ,gdbm)
- ("libgcrypt" ,libgcrypt)
- ("lzo" ,lzo)
- ("bzip2" ,bzip2)
- ("zlib" ,zlib)))
+ (list guile-2.0
+ util-linux
+ libtirpc
+ gnutls
+ tdb
+ bdb
+ gdbm
+ libgcrypt
+ lzo
+ bzip2
+ zlib))
(home-page "https://nongnu.org/libchop/")
(synopsis "Tools & library for data backup and distributed storage")
(description
@@ -740,16 +727,14 @@ detection, and lossless compression.")
(string-append share "/fish/vendor_completions.d")))
#t))))))
(native-inputs
- `(("python-cython" ,python-cython)
- ("python-setuptools-scm" ,python-setuptools-scm)
- ("python-pytest" ,python-pytest)))
+ (list python-cython python-setuptools-scm python-pytest))
(inputs
- `(("acl" ,acl)
- ("libb2" ,libb2)
- ("lz4" ,lz4)
- ("openssl" ,openssl)
- ("python-llfuse" ,python-llfuse)
- ("zstd" ,zstd "lib")))
+ (list acl
+ libb2
+ lz4
+ openssl
+ python-llfuse
+ `(,zstd "lib")))
(synopsis "Deduplicated, encrypted, authenticated and compressed backups")
(description "Borg is a deduplicating backup program. Optionally, it
supports compression and authenticated encryption. The main goal of Borg is to
@@ -773,12 +758,9 @@ to not fully trusted targets. Borg is a fork of Attic.")
"04ny5s5z05gk6davbwkjkraan781k2xzw6kjwp75h6ncv45dv1sb"))))
(build-system gnu-build-system)
(native-inputs
- `(("pkg-config" ,pkg-config)))
+ (list pkg-config))
(inputs
- `(("fuse" ,fuse)
- ("libxml2" ,libxml2)
- ("ntfs-3g" ,ntfs-3g)
- ("openssl" ,openssl)))
+ (list fuse libxml2 ntfs-3g openssl))
(arguments
`(#:configure-flags
(list "--disable-static"
@@ -889,10 +871,7 @@ NTFS volumes using @code{ntfs-3g}, preserving NTFS-specific attributes.")
(for-each write-man man-pages)
#t))))))
(inputs
- `(("perl" ,perl)
- ("rsync" ,rsync)
- ("perl-libtime-period" ,perl-libtime-period)
- ("perl-libtime-parsedate" ,perl-libtime-parsedate)))
+ (list perl rsync perl-libtime-period perl-libtime-parsedate))
(home-page "http://dirvish.org/")
(synopsis "Fast, disk based, rotating network backup system")
(description
@@ -1038,11 +1017,7 @@ precious backup space.
(arguments
`(#:tests? #f)) ;no test
(inputs
- `(("lzo" ,lzo)
- ("libressl" ,libressl)
- ("protobuf" ,protobuf)
- ("xz" ,xz)
- ("zlib" ,zlib)))
+ (list lzo libressl protobuf xz zlib))
(home-page "http://zbackup.org")
(synopsis "Versatile deduplicating backup tool")
(description
@@ -1076,12 +1051,10 @@ is format-agnostic, so you can feed virtually any files to it.")
"--disable-readline"
"--disable-rmt")))
(native-inputs
- `(("pkg-config" ,pkg-config)))
+ (list pkg-config))
(inputs
- `(("openssl" ,openssl)
- ("zlib" ,zlib)
- ("util-linux" ,util-linux "lib")
- ("e2fsprogs" ,e2fsprogs)))
+ (list openssl zlib
+ `(,util-linux "lib") e2fsprogs))
(home-page "https://dump.sourceforge.io/")
(synopsis "Ext2/3/4 file system dump/restore utilities")
(description "Dump examines files in a file system, determines which ones
@@ -1118,17 +1091,14 @@ interactive mode.")
(string-append prefix " 3600" suffix "\n")))
#t)))))
(inputs
- `(("acl" ,acl)
- ("librsync" ,librsync)
- ("ncurses" ,ncurses) ; for the live status monitor
- ("openssl" ,openssl)
- ("uthash" ,uthash)
- ("zlib" ,zlib)))
+ (list acl
+ librsync
+ ncurses ; for the live status monitor
+ openssl
+ uthash
+ zlib))
(native-inputs
- `(("autoconf" ,autoconf)
- ("automake" ,automake)
- ("check" ,check-0.14)
- ("pkg-config" ,pkg-config)))
+ (list autoconf automake check-0.14 pkg-config))
(home-page "https://burp.grke.org")
(synopsis "Differential backup and restore")
(description "Burp is a network backup and restore program. It attempts
@@ -1149,17 +1119,16 @@ backup.")
"0jgc53rrbas8i4z13l2ii99cpav1ma73spsjg70ygihf0635r3dh"))))
(build-system gnu-build-system)
(native-inputs
- `(("autoconf" ,autoconf)
- ("automake" ,automake)
- ("pkg-config" ,pkg-config)
- ("guile" ,guile-3.0) ;for cross-compilation
- ("guile-gcrypt" ,guile-gcrypt)
- ("guile-quickcheck" ,guile-quickcheck)))
+ (list autoconf
+ automake
+ pkg-config
+ guile-3.0 ;for cross-compilation
+ guile-gcrypt
+ guile-quickcheck))
(inputs
- `(("guile" ,guile-3.0)
- ("zlib" ,zlib)))
+ (list guile-3.0 zlib))
(propagated-inputs
- `(("guile-gcrypt" ,guile-gcrypt)))
+ (list guile-gcrypt))
(home-page "https://ngyro.com/software/disarchive.html")
(synopsis "Software archive disassembler")
(description "Disarchive can disassemble software archives into data
@@ -1200,15 +1169,10 @@ compression parameters used by Gzip.")
":" (getenv "PATH")))
(invoke "pytest")))))))
(inputs
- `(("borg" ,borg)
- ("python-colorama" ,python-colorama)
- ("python-jsonschema" ,python-jsonschema)
- ("python-requests" ,python-requests)
- ("python-ruamel.yaml" ,python-ruamel.yaml)))
+ (list borg python-colorama python-jsonschema python-requests
+ python-ruamel.yaml))
(native-inputs
- `(("python-flexmock" ,python-flexmock)
- ("python-pytest" ,python-pytest)
- ("python-pytest-cov" ,python-pytest-cov)))
+ (list python-flexmock python-pytest python-pytest-cov))
(home-page "https://torsion.org/borgmatic/")
(synopsis "Simple, configuration-driven backup software")
(description