2014-12-08 23:28:48 +01:00
|
|
|
|
;;; GNU Guix --- Functional package management for GNU
|
2018-01-31 20:46:02 +01:00
|
|
|
|
;;; Copyright © 2014, 2017, 2018 Ludovic Courtès <ludo@gnu.org>
|
2018-07-31 13:19:33 +02:00
|
|
|
|
;;; Copyright © 2015, 2016, 2017, 2018 Ricardo Wurmus <rekado@elephly.net>
|
2015-07-27 20:52:56 +02:00
|
|
|
|
;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
|
2017-06-18 00:59:27 +02:00
|
|
|
|
;;; Copyright © 2015, 2016, 2017 Stefan Reichör <stefan@xsteve.at>
|
2016-03-10 13:47:56 +01:00
|
|
|
|
;;; Copyright © 2016 Raimon Grau <raimonster@gmail.com>
|
2018-02-06 19:23:55 +01:00
|
|
|
|
;;; Copyright © 2016, 2017, 2018 Tobias Geerinckx-Rice <me@tobias.gr>
|
2016-07-18 21:31:12 +02:00
|
|
|
|
;;; Copyright © 2016 John Darrington <jmd@gnu.org>
|
2018-03-03 14:21:20 +01:00
|
|
|
|
;;; Copyright © 2016, 2017, 2018 Nicolas Goaziou <mail@nicolasgoaziou.fr>
|
2016-08-11 14:56:13 +02:00
|
|
|
|
;;; Copyright © 2016 Eric Bavier <bavier@member.fsf.org>
|
Correct name and Email for ng0.
* .mailmap: Correct name and Email for ng0.
* Makefile.am, doc/guix.texi, etc/completion/fish/guix.fish
gnu/packages/accessibility.scm, gnu/packages/admin.scm,
gnu/packages/audio.scm, gnu/packages/autotools.scm,
gnu/packages/cdrom.scm, gnu/packages/check.scm,
gnu/packages/cinnamon.scm, gnu/packages/compression.scm,
gnu/packages/crypto.scm, gnu/packages/databases.scm,
gnu/packages/django.scm, gnu/packages/dns.scm,
gnu/packages/emacs.scm, gnu/packages/enlightenment.scm,
gnu/packages/fonts.scm, gnu/packages/fontutils.scm,
gnu/packages/forth.scm, gnu/packages/fvwm.scm,
gnu/packages/games.scm, gnu/packages/gl.scm,
gnu/packages/gnome.scm, gnu/packages/gnunet.scm,
gnu/packages/gnupg.scm, gnu/packages/gnuzilla.scm,
gnu/packages/gtk.scm, gnu/packages/guile-wm.scm,
gnu/packages/guile.scm, gnu/packages/haskell-check.scm,
gnu/packages/haskell-crypto.scm, gnu/packages/haskell.scm,
gnu/packages/image-viewers.scm, gnu/packages/image.scm,
gnu/packages/irc.scm, gnu/packages/language.scm,
gnu/packages/libcanberra.scm, gnu/packages/linux.scm,
gnu/packages/lisp.scm, gnu/packages/lolcode.scm,
gnu/packages/lxde.scm, gnu/packages/lxqt.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm,
gnu/packages/mate.scm, gnu/packages/maths.scm,
gnu/packages/mc.scm, gnu/packages/messaging.scm,
gnu/packages/music.scm, gnu/packages/ncurses.scm,
gnu/packages/networking.scm, gnu/packages/nickle.scm,
gnu/packages/openbox.scm, gnu/packages/pdf.scm,
gnu/packages/perl-check.scm, gnu/packages/perl.scm,
gnu/packages/python-crypto.scm, gnu/packages/python-web.scm,
gnu/packages/python.scm, gnu/packages/qt.scm,
gnu/packages/ruby.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/serialization.scm,
gnu/packages/shells.scm, gnu/packages/ssh.scm,
gnu/packages/suckless.scm, gnu/packages/tbb.scm,
gnu/packages/telephony.scm, gnu/packages/text-editors.scm,
gnu/packages/textutils.scm, gnu/packages/time.scm,
gnu/packages/tls.scm, gnu/packages/tor.scm,
gnu/packages/version-control.scm, gnu/packages/video.scm,
gnu/packages/vim.scm, gnu/packages/web.scm,
gnu/packages/wm.scm, gnu/packages/xdisorg.scm,
gnu/packages/xfce.scm, gnu/packages/xml.scm,
gnu/packages/xorg.scm, gnu/services/certbot.scm,
gnu/services/desktop.scm, gnu/services/version-control.scm,
gnu/services/web.scm, guix/import/hackage.scm,
guix/licenses.scm: Likewise.
Signed-off-by: Tobias Geerinckx-Rice <me@tobias.gr>
2018-03-20 16:39:45 +01:00
|
|
|
|
;;; Copyright © 2016, 2017 Nils Gillmann <ng0@n0.is>
|
2017-07-12 17:40:02 +02:00
|
|
|
|
;;; Copyright © 2016, 2017 Arun Isaac <arunisaac@systemreboot.net>
|
2016-10-18 17:28:23 +02:00
|
|
|
|
;;; Copyright © 2016 Benz Schenk <benz.schenk@uzh.ch>
|
2017-02-26 11:52:21 +01:00
|
|
|
|
;;; Copyright © 2016, 2017 Pjotr Prins <pjotr.guix@thebird.nl>
|
2017-04-14 16:16:42 +02:00
|
|
|
|
;;; Copyright © 2017 Mathieu Othacehe <m.othacehe@gmail.com>
|
2017-06-04 04:32:16 +02:00
|
|
|
|
;;; Copyright © 2017 Leo Famulari <leo@famulari.name>
|
2018-02-02 17:08:47 +01:00
|
|
|
|
;;; Copyright © 2017, 2018 Efraim Flashner <efraim@flashner.co.il>
|
2018-06-09 02:28:58 +02:00
|
|
|
|
;;; Copyright © 2017, 2018 Rutger Helling <rhelling@mykolab.com>
|
2017-06-26 17:51:33 +02:00
|
|
|
|
;;; Copyright © 2017 Gábor Boskovits <boskovits@gmail.com>
|
2017-04-26 20:18:56 +02:00
|
|
|
|
;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be>
|
2018-01-31 20:46:02 +01:00
|
|
|
|
;;; Copyright © 2018 Adam Van Ymeren <adam@vany.ca>
|
2018-04-06 21:44:36 +02:00
|
|
|
|
;;; Copyright © 2018 Fis Trivial <ybbs.daans@hotmail.com>
|
2018-05-17 17:50:33 +02:00
|
|
|
|
;;; Copyright © 2018 Tonton <tonton@riseup.net>
|
2018-05-28 23:03:19 +02:00
|
|
|
|
;;; Copyright © 2018 Clément Lassieur <clement@lassieur.org>
|
2018-07-08 19:39:24 +02:00
|
|
|
|
;;; Copyright © 2018 Theodoros Foradis <theodoros@foradis.org>
|
2018-07-31 13:19:33 +02:00
|
|
|
|
;;; Copyright © 2018 Marius Bakke <mbakke@fastmail.com>
|
|
|
|
|
;;; Copyright © 2018 Oleg Pykhalov <go.wigust@gmail.com>
|
2014-12-08 23:28:48 +01:00
|
|
|
|
;;;
|
|
|
|
|
;;; This file is part of GNU Guix.
|
|
|
|
|
;;;
|
|
|
|
|
;;; GNU Guix is free software; you can redistribute it and/or modify it
|
|
|
|
|
;;; under the terms of the GNU General Public License as published by
|
|
|
|
|
;;; the Free Software Foundation; either version 3 of the License, or (at
|
|
|
|
|
;;; your option) any later version.
|
|
|
|
|
;;;
|
|
|
|
|
;;; GNU Guix is distributed in the hope that it will be useful, but
|
|
|
|
|
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
|
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
|
;;; GNU General Public License for more details.
|
|
|
|
|
;;;
|
|
|
|
|
;;; You should have received a copy of the GNU General Public License
|
|
|
|
|
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
|
|
2015-04-29 16:26:34 +02:00
|
|
|
|
(define-module (gnu packages networking)
|
2014-12-08 23:28:48 +01:00
|
|
|
|
#:use-module ((guix licenses) #:prefix license:)
|
|
|
|
|
#:use-module (guix packages)
|
|
|
|
|
#:use-module (guix download)
|
2018-01-18 03:15:50 +01:00
|
|
|
|
#:use-module (guix git-download)
|
2017-04-26 20:18:56 +02:00
|
|
|
|
#:use-module (guix build-system cmake)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
#:use-module (guix build-system glib-or-gtk)
|
2014-12-08 23:28:48 +01:00
|
|
|
|
#:use-module (guix build-system gnu)
|
2017-06-12 09:32:16 +02:00
|
|
|
|
#:use-module (guix build-system perl)
|
2016-12-26 21:22:19 +01:00
|
|
|
|
#:use-module (guix build-system python)
|
2016-07-28 23:38:20 +02:00
|
|
|
|
#:use-module (gnu packages)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
#:use-module (gnu packages admin)
|
|
|
|
|
#:use-module (gnu packages adns)
|
2016-07-15 00:23:23 +02:00
|
|
|
|
#:use-module (gnu packages algebra)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
#:use-module (gnu packages audio)
|
2017-10-18 02:12:58 +02:00
|
|
|
|
#:use-module (gnu packages autotools)
|
2018-01-31 20:46:02 +01:00
|
|
|
|
#:use-module (gnu packages base)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
#:use-module (gnu packages bison)
|
2018-05-31 17:07:07 +02:00
|
|
|
|
#:use-module (gnu packages boost)
|
2016-04-04 05:20:38 +02:00
|
|
|
|
#:use-module (gnu packages check)
|
2016-09-11 15:41:07 +02:00
|
|
|
|
#:use-module (gnu packages code)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
#:use-module (gnu packages compression)
|
2018-04-06 21:44:36 +02:00
|
|
|
|
#:use-module (gnu packages crypto)
|
2016-12-26 21:22:19 +01:00
|
|
|
|
#:use-module (gnu packages curl)
|
2016-08-11 14:56:13 +02:00
|
|
|
|
#:use-module (gnu packages databases)
|
2017-06-26 17:51:33 +02:00
|
|
|
|
#:use-module (gnu packages dejagnu)
|
2017-10-18 02:12:58 +02:00
|
|
|
|
#:use-module (gnu packages documentation)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
#:use-module (gnu packages flex)
|
2016-07-15 00:23:23 +02:00
|
|
|
|
#:use-module (gnu packages gettext)
|
2017-08-18 00:48:25 +02:00
|
|
|
|
#:use-module (gnu packages glib)
|
2017-04-26 20:18:56 +02:00
|
|
|
|
#:use-module (gnu packages gnome)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
#:use-module (gnu packages gnupg)
|
|
|
|
|
#:use-module (gnu packages gtk)
|
2018-04-06 21:44:36 +02:00
|
|
|
|
#:use-module (gnu packages image)
|
2016-10-18 10:04:54 +02:00
|
|
|
|
#:use-module (gnu packages libidn)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
#:use-module (gnu packages linux)
|
|
|
|
|
#:use-module (gnu packages lua)
|
2018-01-31 20:46:02 +01:00
|
|
|
|
#:use-module (gnu packages multiprecision)
|
gnu: Move Kerberos implemetations to (gnu packages kerberos).
* gnu/packages/mit-krb5.scm: Remove.
* gnu/packages/shishi.scm: Remove.
* gnu/packages/kerberos.scm: New file, from the concatenation of these
two.
* gnu/local.mk (GNU_SYSTEM_MODULES): Adjust accordingly.
* gnu/packages/admin.scm, gnu/packages/cyrus-sasl.scm,
gnu/packages/gnome.scm, gnu/packages/gnuzilla.scm,
gnu/packages/gsasl.scm, gnu/packages/java.scm,
gnu/packages/networking.scm, gnu/packages/nfs.scm,
gnu/packages/onc-rpc.scm, gnu/packages/ssh.scm,
gnu/packages/web.scm: Adjust accordingly.
2017-01-18 09:57:43 +01:00
|
|
|
|
#:use-module (gnu packages kerberos)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
#:use-module (gnu packages ncurses)
|
2016-08-11 14:56:13 +02:00
|
|
|
|
#:use-module (gnu packages pcre)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
#:use-module (gnu packages perl)
|
gnu: Move test packages from perl to perl-check.
* gnu/packages/perl.scm (perl-test2-bundle-extended,
perl-test2-plugin-nowarnings, perl-test-base, perl-test-class,
perl-test-class-most, perl-test-cleannamespaces, perl-test-command,
perl-test-cpan-meta, perl-test-cpan-meta-json, perl-test-deep,
perl-test-differences, perl-test-directory, perl-test-eol,
perl-test-exception, perl-test-fatal, perl-test-file-sharedir-dist,
perl-test-files, perl-test-harness, perl-test-leaktrace,
perl-test-longstring, perl-test-manifest, perl-test-memory-cycle,
perl-test-mockobject, perl-test-mocktime, perl-test-most, perl-test-needs,
perl-test-notabs, perl-test-nowarnings, perl-test-number-delta,
perl-test-output, perl-test-pod, perl-test-pod-coverage, perl-test-requires,
perl-test-script, perl-test-sharedfork, perl-test-simple, perl-test-taint,
perl-test-tester, perl-test-trap, perl-test-utf8, perl-test-warn,
perl-test-warnings, perl-test-without-module, perl-test-writevariants,
perl-test-yaml, perl-test-trailingspace): Move variables to ...
* gnu/packages/perl-check.scm: ... this new file.
* gnu/local.mk (GNU_SYSTEM_MODULES): Add it.
* gnu/packages/admin.scm,
gnu/packages/bioinformatics.scm,
gnu/packages/crypto.scm,
gnu/packages/databases.scm,
gnu/packages/glib.scm,
gnu/packages/gnupg.scm,
gnu/packages/image-viewers.scm,
gnu/packages/language.scm,
gnu/packages/networking.scm,
gnu/packages/package-management.scm,
gnu/packages/perl.scm,
gnu/packages/terminals.scm,
gnu/packages/tex.scm,
gnu/packages/version-control.scm,
gnu/packages/web.scm,
gnu/packages/xml.scm,
gnu/packages/xorg.scm: Use perl-check module.
2017-11-13 23:03:01 +01:00
|
|
|
|
#:use-module (gnu packages perl-check)
|
2016-04-04 05:20:38 +02:00
|
|
|
|
#:use-module (gnu packages pkg-config)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
#:use-module (gnu packages python)
|
2017-08-18 00:17:24 +02:00
|
|
|
|
#:use-module (gnu packages qt)
|
2017-06-26 17:51:33 +02:00
|
|
|
|
#:use-module (gnu packages readline)
|
2017-08-18 00:17:24 +02:00
|
|
|
|
#:use-module (gnu packages ssh)
|
2016-09-11 15:41:07 +02:00
|
|
|
|
#:use-module (gnu packages textutils)
|
|
|
|
|
#:use-module (gnu packages tls)
|
2017-06-12 09:32:16 +02:00
|
|
|
|
#:use-module (gnu packages valgrind)
|
2017-07-12 17:40:02 +02:00
|
|
|
|
#:use-module (gnu packages wm)
|
2018-04-06 21:44:36 +02:00
|
|
|
|
#:use-module (gnu packages wxwidgets)
|
2017-06-16 14:38:59 +02:00
|
|
|
|
#:use-module (gnu packages xml)
|
2017-06-12 09:32:16 +02:00
|
|
|
|
#:use-module (ice-9 match))
|
2014-12-08 23:28:48 +01:00
|
|
|
|
|
2018-03-14 11:56:08 +01:00
|
|
|
|
;; The gnu.org ‘home’ for this GNU project is a directory listing with 1.6.0 as
|
|
|
|
|
;; the latest version. The author's git repository, mentioned in the 1.6.0
|
|
|
|
|
;; README and otherwise legit-looking, contains a proper 1.7.0 release tarball
|
|
|
|
|
;; with many OUI updates. Use it, even though it's also several years old now.
|
2016-04-07 12:59:35 +02:00
|
|
|
|
(define-public macchanger
|
|
|
|
|
(package
|
|
|
|
|
(name "macchanger")
|
2018-03-14 11:56:08 +01:00
|
|
|
|
(version "1.7.0")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/alobbs/macchanger/"
|
|
|
|
|
"releases/download/" version "/"
|
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32 "1gs5m0jxyprdp00w2qkbnaqm3ilkjz0q1gqdg4nzdm8g4xy73qns"))))
|
2016-04-07 12:59:35 +02:00
|
|
|
|
(build-system gnu-build-system)
|
2017-03-30 00:48:16 +02:00
|
|
|
|
(home-page "https://www.gnu.org/software/macchanger/")
|
2016-07-29 10:13:12 +02:00
|
|
|
|
(synopsis "Viewing and manipulating MAC addresses of network interfaces")
|
2016-04-07 12:59:35 +02:00
|
|
|
|
(description "GNU MAC Changer is a utility for viewing and changing MAC
|
|
|
|
|
addresses of networking devices. New addresses may be set explicitly or
|
|
|
|
|
randomly. They can include MAC addresses of the same or other hardware vendors
|
2017-02-26 11:52:21 +01:00
|
|
|
|
or, more generally, MAC addresses of the same category of hardware.")
|
2016-04-07 12:59:35 +02:00
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-05-12 15:29:06 +02:00
|
|
|
|
(define-public miredo
|
|
|
|
|
(package
|
|
|
|
|
(name "miredo")
|
|
|
|
|
(version "1.2.6")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://www.remlab.net/files/miredo/miredo-"
|
|
|
|
|
version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0j9ilig570snbmj48230hf7ms8kvcwi2wblycqrmhh85lksd49ps"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; The checkconf test in src/ requires network access.
|
|
|
|
|
(add-before
|
|
|
|
|
'check 'disable-checkconf-test
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "src/Makefile"
|
|
|
|
|
(("^TESTS = .*") "TESTS = \n")))))))
|
|
|
|
|
(home-page "http://www.remlab.net/miredo/")
|
|
|
|
|
(synopsis "Teredo IPv6 tunneling software")
|
|
|
|
|
(description
|
|
|
|
|
"Miredo is an implementation (client, relay, server) of the Teredo
|
|
|
|
|
specification, which provides IPv6 Internet connectivity to IPv6 enabled hosts
|
|
|
|
|
residing in IPv4-only networks, even when they are behind a NAT device.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2014-12-08 23:28:48 +01:00
|
|
|
|
(define-public socat
|
|
|
|
|
(package
|
|
|
|
|
(name "socat")
|
2018-02-19 22:21:34 +01:00
|
|
|
|
(version "1.7.3.2")
|
2014-12-08 23:28:48 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://www.dest-unreach.org/socat/download/socat-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-02-19 22:21:34 +01:00
|
|
|
|
"0lcj6zpra33xhgvhmz9l3cqz10v8ybafb8dd1yqkwf1rhy01ymp3"))))
|
2014-12-08 23:28:48 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments '(#:tests? #f)) ;no 'check' phase
|
|
|
|
|
(inputs `(("openssl" ,openssl)))
|
|
|
|
|
(home-page "http://www.dest-unreach.org/socat/")
|
|
|
|
|
(synopsis
|
|
|
|
|
"Open bidirectional communication channels from the command line")
|
|
|
|
|
(description
|
|
|
|
|
"socat is a relay for bidirectional data transfer between two independent
|
|
|
|
|
data channels---files, pipes, devices, sockets, etc. It can create
|
|
|
|
|
\"listening\" sockets, named pipes, and pseudo terminals.
|
|
|
|
|
|
|
|
|
|
socat can be used, for instance, as TCP port forwarder, as a shell interface
|
|
|
|
|
to UNIX sockets, IPv6 relay, for redirecting TCP oriented programs to a serial
|
|
|
|
|
line, to logically connect serial lines on different computers, or to
|
|
|
|
|
establish a relatively secure environment (su and chroot) for running client
|
gnu packages: Clean up synopses and descriptions.
* gnu/packages/admin.scm, gnu/packages/algebra.scm, gnu/packages/audio.scm,
gnu/packages/backup.scm, gnu/packages/base.scm, gnu/packages/bittorrent.scm,
gnu/packages/code.scm, gnu/packages/compression.scm,
gnu/packages/databases.scm, gnu/packages/enchant.scm,
gnu/packages/firmware.scm, gnu/packages/fonts.scm,
gnu/packages/freedesktop.scm, gnu/packages/games.scm, gnu/packages/gd.scm,
gnu/packages/gl.scm, gnu/packages/gnome.scm, gnu/packages/gsasl.scm,
gnu/packages/gstreamer.scm, gnu/packages/gtk.scm, gnu/packages/guile.scm,
gnu/packages/haskell.scm, gnu/packages/language.scm,
gnu/packages/lesstif.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/llvm.scm, gnu/packages/maths.scm,
gnu/packages/mcrypt.scm, gnu/packages/mit-krb5.scm, gnu/packages/mp3.scm,
gnu/packages/ncdu.scm, gnu/packages/networking.scm, gnu/packages/ntp.scm,
gnu/packages/ocaml.scm, gnu/packages/openbox.scm, gnu/packages/pdf.scm,
gnu/packages/perl.scm, gnu/packages/pretty-print.scm,
gnu/packages/pulseaudio.scm, gnu/packages/python.scm,
gnu/packages/rdesktop.scm, gnu/packages/rdf.scm, gnu/packages/ruby.scm,
gnu/packages/slang.scm, gnu/packages/slim.scm, gnu/packages/telephony.scm,
gnu/packages/tls.scm, gnu/packages/tmux.scm, gnu/packages/tre.scm,
gnu/packages/unrtf.scm, gnu/packages/version-control.scm,
gnu/packages/vpn.scm, gnu/packages/web.scm, gnu/packages/wget.scm,
gnu/packages/xdisorg.scm, gnu/packages/xfce.scm, gnu/packages/xiph.scm:
Fix typos. Trim long lines. Add missing periods in the end of sentences.
Use double spaces between sentences. Remove trailing whitespaces.
2015-07-17 14:16:07 +02:00
|
|
|
|
or server shell scripts with network connections.")
|
2014-12-08 23:28:48 +01:00
|
|
|
|
(license license:gpl2)))
|
2015-04-29 16:52:46 +02:00
|
|
|
|
|
2016-09-07 18:36:56 +02:00
|
|
|
|
(define-public tcp-wrappers
|
|
|
|
|
(package
|
|
|
|
|
(name "tcp-wrappers")
|
|
|
|
|
(version "7.6")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"ftp://ftp.porcupine.org/pub/security/tcp_wrappers_"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0p9ilj4v96q32klavx0phw9va21fjp8vpk11nbh6v2ppxnnxfhwm"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure) ; there is no configure script
|
|
|
|
|
(delete 'check) ; there are no tests
|
|
|
|
|
(replace 'build
|
|
|
|
|
(lambda _
|
|
|
|
|
(chmod "." #o755)
|
|
|
|
|
;; Upstream doesn't generate a shared library. So we have to do it.
|
|
|
|
|
(setenv "CC" "gcc -fno-builtin -fPIC")
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("^(all[^\n]*)" line) (string-append line " libwrap.so\n
|
|
|
|
|
libwrap.so: $(LIB_OBJ)\n
|
|
|
|
|
\tgcc -shared $^ -o $@\n")))
|
|
|
|
|
;; Deal with some gcc breakage.
|
|
|
|
|
(substitute* "percent_m.c"
|
|
|
|
|
(("extern char .sys_errlist.*;") ""))
|
|
|
|
|
(substitute* "scaffold.c"
|
|
|
|
|
(("extern char .malloc.*;") ""))
|
|
|
|
|
;; This, believe it or not, is the recommended way to build!
|
|
|
|
|
(zero? (system* "make" "REAL_DAEMON_DIR=/etc" "linux"))))
|
|
|
|
|
;; There is no make install stage, so we have to do it ourselves.
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda _
|
|
|
|
|
(let ((out (assoc-ref %outputs "out"))
|
|
|
|
|
(man-pages `("hosts_access.3"
|
|
|
|
|
"hosts_access.5"
|
|
|
|
|
"hosts_options.5"
|
|
|
|
|
"tcpd.8"
|
|
|
|
|
"tcpdchk.8"
|
|
|
|
|
"tcpdmatch.8"))
|
|
|
|
|
(libs `("libwrap.a"
|
|
|
|
|
"libwrap.so"))
|
|
|
|
|
(headers `("tcpd.h"))
|
|
|
|
|
(bins `("safe_finger"
|
|
|
|
|
"tcpd"
|
|
|
|
|
"tcpdchk"
|
|
|
|
|
"tcpdmatch"
|
|
|
|
|
"try-from")))
|
|
|
|
|
(for-each
|
|
|
|
|
(lambda (x)
|
|
|
|
|
(install-file x (string-append out "/include")))
|
|
|
|
|
headers)
|
|
|
|
|
(for-each
|
|
|
|
|
(lambda (x)
|
|
|
|
|
(install-file x (string-append out "/share/man/man"
|
|
|
|
|
(string-take-right x 1))))
|
|
|
|
|
man-pages)
|
|
|
|
|
(for-each
|
|
|
|
|
(lambda (x)
|
|
|
|
|
(install-file x (string-append out "/lib/")))
|
|
|
|
|
libs)
|
|
|
|
|
(for-each
|
|
|
|
|
(lambda (x)
|
|
|
|
|
(install-file x (string-append out "/bin/")))
|
|
|
|
|
bins)))))))
|
|
|
|
|
(home-page "http://www.porcupine.org")
|
|
|
|
|
(synopsis "Monitor and filter incoming requests for network services")
|
|
|
|
|
(description "With this package you can monitor and filter incoming requests for
|
|
|
|
|
network services. It includes a library which may be used by daemons to
|
|
|
|
|
transparently check connection attempts against an access control list.")
|
|
|
|
|
(license (license:non-copyleft "file://DISCLAIMER"
|
|
|
|
|
"See the file DISCLAIMER in the distribution."))))
|
|
|
|
|
|
|
|
|
|
|
2015-04-29 16:52:46 +02:00
|
|
|
|
(define-public zeromq
|
|
|
|
|
(package
|
|
|
|
|
(name "zeromq")
|
2016-05-29 19:31:29 +02:00
|
|
|
|
(version "4.0.7")
|
2015-04-29 16:52:46 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://download.zeromq.org/zeromq-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-05-29 19:31:29 +02:00
|
|
|
|
"00vvwhgcdr1lva2pavicvy92iad0hj8cf71n702hv6blw1kjj2z0"))))
|
2015-04-29 16:52:46 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://zeromq.org")
|
|
|
|
|
(synopsis "Library for message-based applications")
|
|
|
|
|
(description
|
|
|
|
|
"The 0MQ lightweight messaging kernel is a library which extends the
|
|
|
|
|
standard socket interfaces with features traditionally provided by specialized
|
|
|
|
|
messaging middle-ware products. 0MQ sockets provide an abstraction of
|
|
|
|
|
asynchronous message queues, multiple messaging patterns, message
|
|
|
|
|
filtering (subscriptions), seamless access to multiple transport protocols and
|
|
|
|
|
more.")
|
|
|
|
|
(license license:lgpl3+)))
|
2015-07-27 20:52:56 +02:00
|
|
|
|
|
2017-10-09 07:57:26 +02:00
|
|
|
|
(define-public czmq
|
|
|
|
|
(package
|
|
|
|
|
(name "czmq")
|
2018-04-05 05:29:17 +02:00
|
|
|
|
(version "4.1.1")
|
2017-10-09 07:57:26 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/zeromq/" name
|
|
|
|
|
"/releases/download/v" version
|
|
|
|
|
"/" name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-04-05 05:29:17 +02:00
|
|
|
|
"1h5hrcsc30fcwb032vy5gxkq4j4vv1y4dj460rfs1hhxi0cz83zh"))))
|
2017-10-09 07:57:26 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(;; TODO Tests fail for some reason:
|
|
|
|
|
;; * zauth: OK
|
|
|
|
|
;; * zbeacon: OK (skipping test, no UDP broadcasting)
|
|
|
|
|
;; E: (czmq_selftest) 18-02-24 16:25:52 No broadcast interface found, (ZSYS_INTERFACE=lo)
|
|
|
|
|
;; make[2]: *** [Makefile:2245: check-local] Segmentation fault
|
|
|
|
|
;; make[2]: Leaving directory '/tmp/guix-build-czmq-4.1.0.drv-0/czmq-4.1.0'
|
|
|
|
|
;; make[1]: *** [Makefile:2032: check-am] Error 2
|
|
|
|
|
;; make[1]: Leaving directory '/tmp/guix-build-czmq-4.1.0.drv-0/czmq-4.1.0'
|
|
|
|
|
;; make: *** [Makefile:1588: check-recursive] Error 1
|
|
|
|
|
;; phase `check' failed after 19.4 seconds
|
|
|
|
|
#:tests? #f
|
|
|
|
|
#:configure-flags '("--enable-drafts")))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("zeromq" ,zeromq)))
|
|
|
|
|
(home-page "http://zeromq.org")
|
|
|
|
|
(synopsis "High-level C bindings for ØMQ")
|
|
|
|
|
(description
|
|
|
|
|
"czmq provides bindings for the ØMQ core API that hides the differences
|
|
|
|
|
between different versions of ØMQ.")
|
|
|
|
|
(license license:mpl2.0)))
|
|
|
|
|
|
2018-07-08 19:39:24 +02:00
|
|
|
|
(define-public cppzmq
|
|
|
|
|
(let ((revision "0")
|
|
|
|
|
(commit "d9f0f016c07046742738c65e1eb84722ae32d7d4"))
|
|
|
|
|
(package
|
|
|
|
|
(name "cppzmq")
|
|
|
|
|
(version (string-append "4.2.2-" revision "."
|
|
|
|
|
(string-take commit 7)))
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/zeromq/cppzmq")
|
|
|
|
|
(commit commit)))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1gmqlm00y6xpa5m6d4ajq3ww63n2w7h4sy997wj81vcqmqx45b1f"))
|
|
|
|
|
(file-name (string-append name "-" version "-checkout"))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments '(#:tests? #f)) ; No tests.
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("zeromq" ,zeromq)))
|
|
|
|
|
(home-page "http://zeromq.org")
|
|
|
|
|
(synopsis "C++ bindings for the ØMQ messaging library")
|
|
|
|
|
(description
|
|
|
|
|
"This package provides header-only C++ bindings for ØMQ. The header
|
|
|
|
|
files contain direct mappings of the abstractions provided by the ØMQ C API.")
|
|
|
|
|
(license license:expat))))
|
|
|
|
|
|
2016-06-07 15:49:17 +02:00
|
|
|
|
(define-public librdkafka
|
|
|
|
|
(package
|
|
|
|
|
(name "librdkafka")
|
|
|
|
|
(version "0.9.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/edenhill/librdkafka/archive/"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"10ldx7g7ymmg17snzx78vy4n8ma1rjx0agzi34g15j2fk867xmas"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
;; its custom configure script doesn't understand 'CONFIG_SHELL'.
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
;; librdkafka++.so lacks RUNPATH for librdkafka.so
|
|
|
|
|
(setenv "LDFLAGS"
|
|
|
|
|
(string-append "-Wl,-rpath=" out "/lib"))
|
|
|
|
|
(zero? (system* "./configure"
|
|
|
|
|
(string-append "--prefix=" out)))))))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("python" ,python-wrapper)))
|
|
|
|
|
(propagated-inputs
|
|
|
|
|
`(("zlib" ,zlib))) ; in the Libs.private field of rdkafka.pc
|
|
|
|
|
(home-page "https://github.com/edenhill/librdkafka")
|
|
|
|
|
(synopsis "Apache Kafka C/C++ client library")
|
|
|
|
|
(description
|
|
|
|
|
"librdkafka is a C library implementation of the Apache Kafka protocol,
|
|
|
|
|
containing both Producer and Consumer support.")
|
|
|
|
|
(license license:bsd-2)))
|
|
|
|
|
|
2015-07-27 20:52:56 +02:00
|
|
|
|
(define-public libndp
|
|
|
|
|
(package
|
|
|
|
|
(name "libndp")
|
2018-06-11 18:05:54 +02:00
|
|
|
|
(version "1.7")
|
2015-07-27 20:52:56 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://libndp.org/files/"
|
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-11 18:05:54 +02:00
|
|
|
|
"1dlinhl39va00v55qygjc9ap77yqf7xvn4rwmvdr49xhzzxhlj1c"))))
|
2015-07-27 20:52:56 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://libndp.org/")
|
|
|
|
|
(synopsis "Library for Neighbor Discovery Protocol")
|
|
|
|
|
(description
|
|
|
|
|
"libndp contains a library which provides a wrapper for IPv6 Neighbor
|
|
|
|
|
Discovery Protocol. It also provides a tool named ndptool for sending and
|
|
|
|
|
receiving NDP messages.")
|
|
|
|
|
(license license:lgpl2.1+)))
|
2015-07-27 20:53:38 +02:00
|
|
|
|
|
|
|
|
|
(define-public ethtool
|
|
|
|
|
(package
|
|
|
|
|
(name "ethtool")
|
2018-04-17 03:18:00 +02:00
|
|
|
|
(version "4.16")
|
2015-07-27 20:53:38 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://kernel.org/software/network/"
|
|
|
|
|
name "/" name "-" version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-04-17 03:18:00 +02:00
|
|
|
|
"00ss07jc7p276d83f6jpafgwyc9yiribciyqcgx9j86v49kpm5py"))))
|
2015-07-27 20:53:38 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "https://www.kernel.org/pub/software/network/ethtool/")
|
|
|
|
|
(synopsis "Display or change Ethernet device settings")
|
|
|
|
|
(description
|
|
|
|
|
"ethtool can be used to query and change settings such as speed,
|
|
|
|
|
auto-negotiation and checksum offload on many network devices, especially
|
|
|
|
|
Ethernet devices.")
|
|
|
|
|
(license license:gpl2)))
|
2015-09-15 10:39:49 +02:00
|
|
|
|
|
|
|
|
|
(define-public ifstatus
|
|
|
|
|
(package
|
|
|
|
|
(name "ifstatus")
|
|
|
|
|
(version "1.1.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/ifstatus/ifstatus/"
|
|
|
|
|
"ifstatus%20v" version "/ifstatus-v"
|
2015-09-15 10:39:49 +02:00
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"045cbsq9ps32j24v8y5hpyqxnqn9mpaf3mgvirlhgpqyb9jsia0c"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
gnu: All snippets report errors using exceptions, else return #t.
* gnu/packages/admin.scm, gnu/packages/algebra.scm, gnu/packages/audio.scm,
gnu/packages/backup.scm, gnu/packages/base.scm,
gnu/packages/bioinformatics.scm, gnu/packages/cdrom.scm,
gnu/packages/chez.scm, gnu/packages/code.scm, gnu/packages/compression.scm,
gnu/packages/cross-base.scm, gnu/packages/crypto.scm, gnu/packages/cups.scm,
gnu/packages/databases.scm, gnu/packages/dns.scm, gnu/packages/emacs.scm,
gnu/packages/emulators.scm, gnu/packages/engineering.scm,
gnu/packages/enlightenment.scm, gnu/packages/fpga.scm,
gnu/packages/freedesktop.scm, gnu/packages/ftp.scm, gnu/packages/games.scm,
gnu/packages/gcc.scm, gnu/packages/geo.scm, gnu/packages/ghostscript.scm,
gnu/packages/gl.scm, gnu/packages/glib.scm, gnu/packages/gnome.scm,
gnu/packages/gnuzilla.scm, gnu/packages/graphics.scm, gnu/packages/gtk.scm,
gnu/packages/guile.scm, gnu/packages/irc.scm, gnu/packages/java.scm,
gnu/packages/kerberos.scm, gnu/packages/linux.scm, gnu/packages/lisp.scm,
gnu/packages/lxde.scm, gnu/packages/machine-learning.scm,
gnu/packages/mail.scm, gnu/packages/maths.scm, gnu/packages/messaging.scm,
gnu/packages/monitoring.scm, gnu/packages/mp3.scm, gnu/packages/music.scm,
gnu/packages/netpbm.scm, gnu/packages/networking.scm, gnu/packages/node.scm,
gnu/packages/nvi.scm, gnu/packages/ocaml.scm, gnu/packages/pdf.scm,
gnu/packages/perl.scm, gnu/packages/php.scm, gnu/packages/plotutils.scm,
gnu/packages/pretty-print.scm, gnu/packages/profiling.scm,
gnu/packages/pulseaudio.scm, gnu/packages/python-crypto.scm,
gnu/packages/python.scm, gnu/packages/qt.scm, gnu/packages/robotics.scm,
gnu/packages/sawfish.scm, gnu/packages/scanner.scm, gnu/packages/scheme.scm,
gnu/packages/scribus.scm, gnu/packages/sdl.scm,
gnu/packages/serialization.scm, gnu/packages/shells.scm,
gnu/packages/slang.scm, gnu/packages/smalltalk.scm, gnu/packages/ssh.scm,
gnu/packages/sync.scm, gnu/packages/syncthing.scm, gnu/packages/tbb.scm,
gnu/packages/terminals.scm, gnu/packages/texinfo.scm,
gnu/packages/text-editors.scm, gnu/packages/textutils.scm,
gnu/packages/tls.scm, gnu/packages/unrtf.scm,
gnu/packages/version-control.scm, gnu/packages/video.scm,
gnu/packages/vpn.scm, gnu/packages/web.scm, gnu/packages/wm.scm,
gnu/packages/wxwidgets.scm, gnu/packages/xdisorg.scm, gnu/packages/xorg.scm:
In all snippets, report errors using exceptions, or else return #t.
2018-03-16 12:47:34 +01:00
|
|
|
|
'(begin
|
|
|
|
|
(substitute* "Main.h"
|
|
|
|
|
(("#include <stdio.h>")
|
|
|
|
|
"#include <stdio.h>\n#include <stdlib.h>"))
|
|
|
|
|
#t))))
|
2015-09-15 10:39:49 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:tests? #f ; no "check" target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure) ; no configure script
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin")))
|
|
|
|
|
(mkdir-p bin)
|
|
|
|
|
(copy-file "ifstatus"
|
|
|
|
|
(string-append bin "/ifstatus"))))))))
|
|
|
|
|
(inputs `(("ncurses" ,ncurses)))
|
|
|
|
|
(home-page "http://ifstatus.sourceforge.net/graphic/index.html")
|
|
|
|
|
(synopsis "Text based network interface status monitor")
|
|
|
|
|
(description
|
|
|
|
|
"IFStatus is a simple, easy-to-use program for displaying commonly
|
2015-09-18 21:57:53 +02:00
|
|
|
|
needed/wanted real-time traffic statistics of multiple network
|
2015-09-15 10:39:49 +02:00
|
|
|
|
interfaces, with a simple and efficient view on the command line. It is
|
|
|
|
|
intended as a substitute for the PPPStatus and EthStatus projects.")
|
2015-09-18 21:57:53 +02:00
|
|
|
|
(license license:gpl2+)))
|
2016-03-10 13:47:56 +01:00
|
|
|
|
|
|
|
|
|
(define-public nload
|
|
|
|
|
(package
|
|
|
|
|
(name "nload")
|
|
|
|
|
(version "0.7.4")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/nload/nload/" version
|
|
|
|
|
"/nload-" version ".tar.gz"))
|
2016-03-10 13:47:56 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1rb9skch2kgqzigf19x8bzk211jdfjfdkrcvaqyj89jy2pkm3h61"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs `(("ncurses" ,ncurses)))
|
|
|
|
|
(home-page "http://www.roland-riegel.de/nload/")
|
|
|
|
|
(synopsis "Realtime console network usage monitor")
|
|
|
|
|
(description
|
|
|
|
|
"Nload is a console application which monitors network traffic and
|
|
|
|
|
bandwidth usage in real time. It visualizes the in- and outgoing traffic using
|
2017-04-16 18:06:57 +02:00
|
|
|
|
two graphs, and provides additional info like total amount of transferred data
|
2016-03-10 13:47:56 +01:00
|
|
|
|
and min/max network usage.")
|
|
|
|
|
(license license:gpl2+)))
|
2016-04-04 05:20:38 +02:00
|
|
|
|
|
|
|
|
|
(define-public iodine
|
|
|
|
|
(package
|
|
|
|
|
(name "iodine")
|
|
|
|
|
(version "0.7.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://code.kryo.se/" name "/"
|
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0gh17kcxxi37k65zm4gqsvbk3aw7yphcs3c02pn1c4s2y6n40axd"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)
|
2016-09-15 01:15:02 +02:00
|
|
|
|
(add-before 'build 'fix-ifconfig-path
|
|
|
|
|
;; This package works only with the net-tools version of ifconfig.
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(substitute* "src/tun.c"
|
|
|
|
|
(("PATH=[^ ]* ")
|
2017-08-27 22:23:45 +02:00
|
|
|
|
(string-append (assoc-ref inputs "net-tools") "/bin/")))))
|
2016-04-04 05:20:38 +02:00
|
|
|
|
(add-before 'check 'delete-failing-tests
|
2016-09-15 01:15:02 +02:00
|
|
|
|
;; Avoid https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=802105.
|
2016-04-04 05:20:38 +02:00
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "tests/common.c"
|
|
|
|
|
(("tcase_add_test\\(tc, \
|
|
|
|
|
test_parse_format_ipv(4(|_listen_all|_mapped_ipv6)|6)\\);")
|
|
|
|
|
"")))))
|
|
|
|
|
#:make-flags (list "CC=gcc"
|
|
|
|
|
(string-append "prefix=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:test-target "test"))
|
2016-09-15 01:15:02 +02:00
|
|
|
|
(inputs `(("net-tools" ,net-tools)
|
|
|
|
|
("zlib" ,zlib)))
|
2016-04-04 05:20:38 +02:00
|
|
|
|
(native-inputs `(("check" ,check)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "http://code.kryo.se/iodine/")
|
|
|
|
|
(synopsis "Tunnel IPv4 data through a DNS server")
|
|
|
|
|
(description "Iodine tunnels IPv4 data through a DNS server. This
|
|
|
|
|
can be useful in different situations where internet access is firewalled, but
|
|
|
|
|
DNS queries are allowed. The bandwidth is asymmetrical, with limited upstream
|
|
|
|
|
and up to 1 Mbit/s downstream.")
|
|
|
|
|
;; src/md5.[ch] is released under the zlib license
|
|
|
|
|
(license (list license:isc license:zlib))))
|
2016-06-02 21:02:14 +02:00
|
|
|
|
|
2016-10-18 10:04:54 +02:00
|
|
|
|
(define-public whois
|
|
|
|
|
(package
|
|
|
|
|
(name "whois")
|
2018-07-17 15:13:39 +02:00
|
|
|
|
(version "5.3.2")
|
2016-10-18 10:04:54 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://debian/pool/main/w/whois/"
|
|
|
|
|
name "_" version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-07-17 15:13:39 +02:00
|
|
|
|
"0m3352d5b0ragygbqjbaimghrbx4va2rixa34j5a1g3jj6l4nwbr"))))
|
2016-10-18 10:04:54 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
2018-02-06 19:23:55 +01:00
|
|
|
|
`(#:tests? #f ; no test suite
|
2016-10-18 10:04:54 +02:00
|
|
|
|
#:make-flags (list "CC=gcc"
|
|
|
|
|
(string-append "prefix=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
2018-02-06 19:23:55 +01:00
|
|
|
|
(delete 'configure) ; no configure script
|
2016-10-18 10:04:54 +02:00
|
|
|
|
(add-before 'build 'setenv
|
|
|
|
|
(lambda _
|
|
|
|
|
(setenv "HAVE_ICONV" "1")
|
2016-11-05 16:46:55 +01:00
|
|
|
|
#t)))))
|
2016-10-18 10:04:54 +02:00
|
|
|
|
(inputs
|
2018-05-26 16:08:33 +02:00
|
|
|
|
`(("libidn2" ,libidn2)))
|
2016-10-18 10:04:54 +02:00
|
|
|
|
(native-inputs
|
2016-11-18 18:26:08 +01:00
|
|
|
|
`(("gettext" ,gettext-minimal)
|
2017-12-12 00:58:05 +01:00
|
|
|
|
("perl" ,perl)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
2018-02-06 19:23:55 +01:00
|
|
|
|
(synopsis "Intelligent client for the WHOIS directory service")
|
|
|
|
|
(description
|
|
|
|
|
"whois searches for an object in a @dfn{WHOIS} (RFC 3912) database.
|
|
|
|
|
It is commonly used to look up the registered users or assignees of an Internet
|
|
|
|
|
resource, such as a domain name, an IP address block, or an autonomous system.
|
|
|
|
|
It can automatically select the appropriate server for most queries.
|
|
|
|
|
|
|
|
|
|
For historical reasons, this package also includes @command{mkpasswd}, which
|
|
|
|
|
encrypts passwords using @code{crypt(3)} and is unrelated to the Expect command
|
|
|
|
|
of the same name.")
|
2016-10-18 10:04:54 +02:00
|
|
|
|
(home-page "https://github.com/rfc1036/whois")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-06-02 21:02:14 +02:00
|
|
|
|
(define-public wireshark
|
|
|
|
|
(package
|
|
|
|
|
(name "wireshark")
|
2018-08-06 15:53:30 +02:00
|
|
|
|
(version "2.6.2")
|
2016-06-02 21:02:14 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://www.wireshark.org/download/src/wireshark-"
|
2017-08-18 00:17:24 +02:00
|
|
|
|
version ".tar.xz"))
|
2016-06-02 21:02:14 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-08-06 15:53:30 +02:00
|
|
|
|
"153h6prxamv5a62f3pfadkry0y57696xrgxfy2gfy5xswdg8kcj9"))))
|
2017-08-18 00:17:24 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs `(("c-ares" ,c-ares)
|
|
|
|
|
("glib" ,glib)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
("gnutls" ,gnutls)
|
|
|
|
|
("libcap" ,libcap)
|
|
|
|
|
("libgcrypt" ,libgcrypt)
|
|
|
|
|
("libnl" ,libnl)
|
|
|
|
|
("libpcap" ,libpcap)
|
2017-08-18 00:17:24 +02:00
|
|
|
|
("libssh" ,libssh)
|
|
|
|
|
("libxml2" ,libxml2)
|
2018-05-06 16:15:35 +02:00
|
|
|
|
("lz4" ,lz4)
|
2017-08-18 00:17:24 +02:00
|
|
|
|
("lua" ,lua-5.2) ;Lua 5.3 unsupported
|
2016-06-02 21:02:14 +02:00
|
|
|
|
("krb5" ,mit-krb5)
|
|
|
|
|
("portaudio" ,portaudio)
|
2017-08-18 00:17:24 +02:00
|
|
|
|
("qtbase" ,qtbase)
|
2018-05-06 16:15:35 +02:00
|
|
|
|
("qtmultimedia" ,qtmultimedia)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
("sbc" ,sbc)
|
2018-05-06 16:15:35 +02:00
|
|
|
|
("snappy" ,snappy)
|
2016-06-02 21:02:14 +02:00
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(native-inputs `(("perl" ,perl)
|
|
|
|
|
("pkg-config" ,pkg-config)
|
2017-10-12 20:32:09 +02:00
|
|
|
|
("python" ,python-wrapper)
|
|
|
|
|
("qttools" ,qttools)))
|
2016-06-02 21:02:14 +02:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
|
|
|
|
(list (string-append "--with-c-ares=" (assoc-ref %build-inputs "c-ares"))
|
|
|
|
|
(string-append "--with-krb5=" (assoc-ref %build-inputs "krb5"))
|
|
|
|
|
(string-append "--with-libcap=" (assoc-ref %build-inputs "libcap"))
|
2017-08-18 00:17:24 +02:00
|
|
|
|
(string-append "--with-libssh=" (assoc-ref %build-inputs "libssh"))
|
2016-06-02 21:02:14 +02:00
|
|
|
|
(string-append "--with-lua=" (assoc-ref %build-inputs "lua"))
|
2018-05-06 16:15:35 +02:00
|
|
|
|
(string-append "--with-lz4=" (assoc-ref %build-inputs "lz4"))
|
2016-06-02 21:02:14 +02:00
|
|
|
|
(string-append "--with-pcap=" (assoc-ref %build-inputs "libpcap"))
|
|
|
|
|
(string-append "--with-portaudio="
|
2017-08-18 00:17:24 +02:00
|
|
|
|
(assoc-ref %build-inputs "portaudio"))
|
2016-06-02 21:02:14 +02:00
|
|
|
|
(string-append "--with-sbc=" (assoc-ref %build-inputs "sbc"))
|
2018-05-06 16:15:35 +02:00
|
|
|
|
(string-append "--with-snappy=" (assoc-ref %build-inputs "snappy"))
|
2018-05-28 23:03:19 +02:00
|
|
|
|
(string-append "--with-zlib=" (assoc-ref %build-inputs "zlib")))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'patch-source
|
|
|
|
|
(lambda _
|
|
|
|
|
;; Fix build against Qt 5.11.
|
|
|
|
|
(substitute* "ui/qt/packet_format_group_box.cpp"
|
|
|
|
|
(("#include <QStyle>") "#include <QStyle>
|
|
|
|
|
#include <QStyleOption>"))
|
|
|
|
|
(substitute* "ui/qt/time_shift_dialog.cpp"
|
|
|
|
|
(("#include <ui/time_shift.h>") "#include <ui/time_shift.h>
|
|
|
|
|
#include <QStyleOption>"))
|
|
|
|
|
(substitute* "ui/qt/wireless_frame.cpp"
|
|
|
|
|
(("#include <QProcess>") "#include <QProcess>
|
2018-05-29 19:43:28 +02:00
|
|
|
|
#include <QAbstractItemView>"))
|
|
|
|
|
#t)))))
|
2017-08-18 00:17:24 +02:00
|
|
|
|
(synopsis "Network traffic analyzer")
|
2016-06-02 21:02:14 +02:00
|
|
|
|
(description "Wireshark is a network protocol analyzer, or @dfn{packet
|
|
|
|
|
sniffer}, that lets you capture and interactively browse the contents of
|
|
|
|
|
network frames.")
|
2017-08-18 00:17:24 +02:00
|
|
|
|
(home-page "https://www.wireshark.org/")
|
|
|
|
|
(license license:gpl2+)))
|
2016-07-15 00:23:23 +02:00
|
|
|
|
|
2017-06-18 00:59:27 +02:00
|
|
|
|
(define-public fping
|
|
|
|
|
(package
|
|
|
|
|
(name "fping")
|
|
|
|
|
(version "4.0")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://fping.org/dist/fping-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1kp81wchi79l8z8rrj602fpjrd8bi84y3i7fsaclzlwap5943sv7"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://fping.org/")
|
|
|
|
|
(synopsis "Send ICMP ECHO_REQUEST packets to network hosts")
|
|
|
|
|
(description
|
|
|
|
|
"fping is a ping like program which uses the Internet Control Message
|
|
|
|
|
Protocol (ICMP) echo request to determine if a target host is responding.
|
|
|
|
|
fping differs from ping in that you can specify any number of targets on the
|
|
|
|
|
command line, or specify a file containing the lists of targets to ping.
|
|
|
|
|
Instead of sending to one target until it times out or replies, fping will
|
|
|
|
|
send out a ping packet and move on to the next target in a round-robin
|
|
|
|
|
fashion.")
|
|
|
|
|
(license license:expat)))
|
|
|
|
|
|
2016-07-15 00:23:23 +02:00
|
|
|
|
(define-public httping
|
|
|
|
|
(package
|
|
|
|
|
(name "httping")
|
2016-10-13 16:58:08 +02:00
|
|
|
|
(version "2.5")
|
2016-07-15 00:23:23 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://www.vanheusden.com/httping/httping-"
|
|
|
|
|
version ".tgz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-10-13 16:58:08 +02:00
|
|
|
|
"1y7sbgkhgadmd93x1zafqc4yp26ssiv16ni5bbi9vmvvdl55m29y"))))
|
2016-07-15 00:23:23 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
2016-09-25 09:33:02 +02:00
|
|
|
|
`(("gettext" ,gettext-minimal)))
|
2016-07-15 00:23:23 +02:00
|
|
|
|
(inputs
|
|
|
|
|
`(("fftw" ,fftw)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("openssl" ,openssl)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags (list "CC=gcc"
|
|
|
|
|
(string-append "DESTDIR=" (assoc-ref %outputs "out"))
|
|
|
|
|
"PREFIX=")
|
|
|
|
|
#:tests? #f)) ; no tests
|
|
|
|
|
(home-page "https://www.vanheusden.com/httping/")
|
|
|
|
|
(synopsis "Web server latency and throughput monitor")
|
|
|
|
|
(description
|
|
|
|
|
"httping measures how long it takes to connect to a web server, send an
|
|
|
|
|
HTTP(S) request, and receive the reply headers. It is somewhat similar to
|
|
|
|
|
@command{ping}, but can be used even in cases where ICMP traffic is blocked
|
|
|
|
|
by firewalls or when you want to monitor the response time of the actual web
|
|
|
|
|
application stack itself.")
|
|
|
|
|
(license license:gpl2))) ; with permission to link with OpenSSL
|
2016-07-28 23:38:18 +02:00
|
|
|
|
|
2016-12-26 21:22:19 +01:00
|
|
|
|
(define-public httpstat
|
|
|
|
|
(package
|
|
|
|
|
(name "httpstat")
|
|
|
|
|
(version "1.2.1")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (pypi-uri "httpstat" version))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1chw2nk56vaq87aba012a270k9na06hfx1pfbsrc3jfvlc2kb9hb"))))
|
|
|
|
|
(build-system python-build-system)
|
|
|
|
|
(inputs `(("curl" ,curl)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before 'build 'fix-curl-path
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(substitute* "httpstat.py"
|
|
|
|
|
(("ENV_CURL_BIN.get\\('curl'\\)")
|
|
|
|
|
(string-append "ENV_CURL_BIN.get('"
|
|
|
|
|
(assoc-ref inputs "curl")
|
|
|
|
|
"/bin/curl')"))))))))
|
|
|
|
|
(home-page "https://github.com/reorx/httpstat")
|
|
|
|
|
(synopsis "Visualize curl statistics")
|
|
|
|
|
(description
|
|
|
|
|
"@command{httpstat} is a tool to visualize statistics from the
|
|
|
|
|
@command{curl} HTTP client. It acts as a wrapper for @command{curl} and
|
|
|
|
|
prints timing information for each step of the HTTP request (DNS lookup,
|
|
|
|
|
TCP connection, TLS handshake and so on) in the terminal.")
|
|
|
|
|
(license license:expat)))
|
|
|
|
|
|
2016-08-24 20:19:46 +02:00
|
|
|
|
(define-public bwm-ng
|
|
|
|
|
(package
|
|
|
|
|
(name "bwm-ng")
|
|
|
|
|
(version "0.6.1")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://www.gropp.org/bwm-ng/bwm-ng-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1w0dwpjjm9pqi613i8glxrgca3rdyqyp3xydzagzr5ndc34z6z02"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs `(("ncurses" ,ncurses)))
|
|
|
|
|
(synopsis "Console based live network and disk I/O bandwidth monitor")
|
|
|
|
|
(description "Bandwidth Monitor NG is a small and simple console based
|
|
|
|
|
live network and disk I/O bandwidth monitor.")
|
|
|
|
|
(home-page "https://www.gropp.org/?id=projects&sub=bwm-ng")
|
|
|
|
|
(license license:gpl2)))
|
|
|
|
|
|
2016-08-11 14:56:13 +02:00
|
|
|
|
(define-public aircrack-ng
|
|
|
|
|
(package
|
|
|
|
|
(name "aircrack-ng")
|
|
|
|
|
(version "1.2-rc4")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://download.aircrack-ng.org/aircrack-ng-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0dpzx9kddxpgzmgvdpl3rxn0jdaqhm5wxxndp1xd7d75mmmc2fnr"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libgcrypt" ,libgcrypt)
|
|
|
|
|
("libnl" ,libnl)
|
|
|
|
|
("ethtool" ,ethtool)
|
|
|
|
|
("pcre" ,pcre)
|
|
|
|
|
("sqlite" ,sqlite)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags `("sqlite=true"
|
|
|
|
|
"gcrypt=true"
|
|
|
|
|
"libnl=true"
|
|
|
|
|
"pcre=true"
|
|
|
|
|
"experimental=true" ;build wesside-ng, etc.
|
2017-06-12 09:32:16 +02:00
|
|
|
|
"AVX2FLAG=N" "AVX1FLAG=N"
|
|
|
|
|
,,@(match (%current-system)
|
|
|
|
|
((or "x86_64-linux" "i686-linux")
|
|
|
|
|
`("SSEFLAG=Y"))
|
|
|
|
|
(_
|
|
|
|
|
`("NEWSSE=false")))
|
2016-08-11 14:56:13 +02:00
|
|
|
|
,(string-append "prefix=" %output))
|
|
|
|
|
#:phases (modify-phases %standard-phases
|
|
|
|
|
(delete 'configure) ;no configure phase
|
|
|
|
|
(add-after 'build 'absolutize-tools
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(let ((ethtool (string-append (assoc-ref inputs "ethtool")
|
|
|
|
|
"/sbin/ethtool")))
|
|
|
|
|
(substitute* "scripts/airmon-ng"
|
|
|
|
|
(("\\[ ! -x \"\\$\\(command -v ethtool 2>&1)\" \\]")
|
|
|
|
|
(string-append "! " ethtool " --version "
|
|
|
|
|
">/dev/null 2>&1"))
|
|
|
|
|
(("\\$\\(ethtool")
|
|
|
|
|
(string-append "$(" ethtool)))
|
|
|
|
|
#t))))))
|
|
|
|
|
(home-page "http://www.aircrack-ng.org")
|
|
|
|
|
(synopsis "Assess WiFi network security")
|
|
|
|
|
(description
|
|
|
|
|
"Aircrack-ng is a complete suite of tools to assess WiFi network
|
|
|
|
|
security. It focuses on different areas of WiFi security: monitoring,
|
|
|
|
|
attacking, testing, and cracking. All tools are command-line driven, which
|
|
|
|
|
allows for heavy scripting.")
|
|
|
|
|
(license (list license:gpl2+ license:bsd-3))))
|
|
|
|
|
|
2016-07-28 23:38:18 +02:00
|
|
|
|
(define-public perl-net-dns
|
|
|
|
|
(package
|
|
|
|
|
(name "perl-net-dns")
|
2018-02-10 23:39:37 +01:00
|
|
|
|
(version "1.15")
|
2016-07-28 23:38:18 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"mirror://cpan/authors/id/N/NL/NLNETLABS/Net-DNS-"
|
|
|
|
|
version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-02-10 23:39:37 +01:00
|
|
|
|
"1l31kqrgjzq8zgpr86z12x550px5zpn563gmnja6m14b8fk6pm0s"))))
|
2016-07-28 23:38:18 +02:00
|
|
|
|
(build-system perl-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("perl-digest-hmac" ,perl-digest-hmac)))
|
|
|
|
|
(home-page "http://search.cpan.org/dist/Net-DNS")
|
|
|
|
|
(synopsis
|
|
|
|
|
"Perl Interface to the Domain Name System")
|
|
|
|
|
(description "Net::DNS is the Perl Interface to the Domain Name System.")
|
|
|
|
|
(license license:x11)))
|
2016-07-28 23:38:19 +02:00
|
|
|
|
|
|
|
|
|
(define-public perl-socket6
|
|
|
|
|
(package
|
|
|
|
|
(name "perl-socket6")
|
|
|
|
|
(version "0.28")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"mirror://cpan/authors/id/U/UM/UMEMOTO/Socket6-"
|
|
|
|
|
version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"11j5jzqbzmwlws9zals43ry2f1nw9qy6im7yhn9ck5rikywrmm5z"))))
|
|
|
|
|
(build-system perl-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(args `("Makefile.PL"
|
|
|
|
|
,(string-append "PREFIX=" out)
|
|
|
|
|
"INSTALLDIRS=site")))
|
|
|
|
|
(setenv "CONFIG_SHELL" (which "sh"))
|
|
|
|
|
(zero? (apply system* "perl" args))))))))
|
|
|
|
|
(home-page "http://search.cpan.org/dist/Socket6")
|
|
|
|
|
(synopsis
|
|
|
|
|
"IPv6 related part of the C socket.h defines and structure manipulators for Perl")
|
|
|
|
|
(description "Socket6 binds the IPv6 related part of the C socket header
|
|
|
|
|
definitions and structure manipulators for Perl.")
|
|
|
|
|
(license license:bsd-3)))
|
2016-07-28 23:38:20 +02:00
|
|
|
|
|
|
|
|
|
(define-public perl-net-dns-resolver-programmable
|
|
|
|
|
(package
|
|
|
|
|
(name "perl-net-dns-resolver-programmable")
|
|
|
|
|
(version "v0.003")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"mirror://cpan/authors/id/J/JM/JMEHNLE/net-dns-resolver-programmable/"
|
|
|
|
|
"Net-DNS-Resolver-Programmable-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1v3nl2kaj4fs55n1617n53q8sa3mir06898vpy1rq98zjih24h4d"))
|
|
|
|
|
(patches
|
2017-05-08 11:47:28 +02:00
|
|
|
|
(search-patches "perl-net-dns-resolver-programmable-fix.patch"))))
|
2016-07-28 23:38:20 +02:00
|
|
|
|
(build-system perl-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("perl-module-build" ,perl-module-build)))
|
|
|
|
|
(inputs `(("perl-net-dns" ,perl-net-dns)))
|
|
|
|
|
(home-page
|
|
|
|
|
"http://search.cpan.org/dist/Net-DNS-Resolver-Programmable")
|
|
|
|
|
(synopsis
|
|
|
|
|
"Programmable DNS resolver class for offline emulation of DNS")
|
|
|
|
|
(description "Net::DNS::Resolver::Programmable is a programmable DNS resolver for
|
|
|
|
|
offline emulation of DNS.")
|
2017-05-02 16:57:52 +02:00
|
|
|
|
(license license:perl-license)))
|
2016-07-28 23:38:21 +02:00
|
|
|
|
|
|
|
|
|
(define-public perl-netaddr-ip
|
|
|
|
|
(package
|
|
|
|
|
(name "perl-netaddr-ip")
|
|
|
|
|
(version "4.079")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"mirror://cpan/authors/id/M/MI/MIKER/NetAddr-IP-"
|
|
|
|
|
version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1rx0dinrz9fk9qcg4rwqq5n1dm3xv2arymixpclcv2q2nzgq4npc"))))
|
|
|
|
|
(build-system perl-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(args `("Makefile.PL"
|
|
|
|
|
,(string-append "PREFIX=" out)
|
|
|
|
|
"INSTALLDIRS=site")))
|
|
|
|
|
(setenv "CONFIG_SHELL" (which "sh"))
|
|
|
|
|
(zero? (apply system* "perl" args))))))))
|
|
|
|
|
(home-page
|
|
|
|
|
"http://search.cpan.org/dist/NetAddr-IP")
|
|
|
|
|
(synopsis
|
|
|
|
|
"Manages IPv4 and IPv6 addresses and subnets")
|
|
|
|
|
(description "NetAddr::IP manages IPv4 and IPv6 addresses and subsets.")
|
2017-05-02 16:57:52 +02:00
|
|
|
|
(license license:perl-license)))
|
2016-07-28 23:38:22 +02:00
|
|
|
|
|
|
|
|
|
(define-public perl-net-patricia
|
|
|
|
|
(package
|
|
|
|
|
(name "perl-net-patricia")
|
|
|
|
|
(version "1.22")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"mirror://cpan/authors/id/G/GR/GRUBER/Net-Patricia-"
|
|
|
|
|
version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0ln5f57vc8388kyh9vhx2infrdzfhbpgyby74h1qsnhwds95m0vh"))))
|
|
|
|
|
(build-system perl-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("perl-net-cidr-lite" ,perl-net-cidr-lite)
|
|
|
|
|
("perl-socket6" ,perl-socket6)))
|
|
|
|
|
(home-page
|
|
|
|
|
"http://search.cpan.org/dist/Net-Patricia")
|
|
|
|
|
(synopsis
|
|
|
|
|
"Patricia Trie Perl module for fast IP address lookups")
|
|
|
|
|
(description
|
|
|
|
|
"Net::Patricia does IP address lookups quickly in Perl.")
|
|
|
|
|
;; The bindings are licensed under GPL2 or later.
|
|
|
|
|
;; libpatricia is licensed under 2-clause BSD.
|
|
|
|
|
(license (list license:gpl2+ license:bsd-2))))
|
2016-07-28 23:38:27 +02:00
|
|
|
|
|
|
|
|
|
(define-public perl-net-cidr-lite
|
|
|
|
|
(package
|
|
|
|
|
(name "perl-net-cidr-lite")
|
|
|
|
|
(version "0.21")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"mirror://cpan/authors/id/D/DO/DOUGW/Net-CIDR-Lite-"
|
|
|
|
|
version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"14shj73zbqmfjbp0qz1fs9j4p2dpvz5hfkm4qfdjbydflbl2b8fg"))))
|
|
|
|
|
(build-system perl-build-system)
|
|
|
|
|
(home-page
|
|
|
|
|
"http://search.cpan.org/dist/Net-CIDR-Lite")
|
|
|
|
|
(synopsis
|
|
|
|
|
"Perl extension for merging IPv4 or IPv6 CIDR addresses")
|
|
|
|
|
(description "Net::CIDR::Lite merges IPv4 or IPv6 CIDR addresses.")
|
|
|
|
|
(license license:gpl1+)))
|
2016-07-28 23:38:28 +02:00
|
|
|
|
|
|
|
|
|
;; TODO: Use the geolite-mirror-simple.pl script from the example
|
|
|
|
|
;; directory to stay current with the databases. How?
|
|
|
|
|
(define-public perl-geo-ip
|
|
|
|
|
(package
|
|
|
|
|
(name "perl-geo-ip")
|
2017-10-21 16:27:34 +02:00
|
|
|
|
(version "1.51")
|
2016-07-28 23:38:28 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"mirror://cpan/authors/id/M/MA/MAXMIND/Geo-IP-"
|
|
|
|
|
version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-10-21 16:27:34 +02:00
|
|
|
|
"1fka8fr7fw6sh3xa9glhs1zjg3s2gfkhi7n7da1l2m2wblqj0c0n"))))
|
2016-07-28 23:38:28 +02:00
|
|
|
|
(build-system perl-build-system)
|
|
|
|
|
(home-page "http://search.cpan.org/dist/Geo-IP")
|
|
|
|
|
(synopsis
|
|
|
|
|
"Look up location and network information by IP Address in Perl")
|
|
|
|
|
(description "The Perl module 'Geo::IP'. It looks up location and network
|
|
|
|
|
information by IP Address.")
|
2017-05-02 16:57:52 +02:00
|
|
|
|
(license license:perl-license)))
|
2016-07-28 23:38:32 +02:00
|
|
|
|
|
|
|
|
|
(define-public perl-io-socket-inet6
|
|
|
|
|
(package
|
|
|
|
|
(name "perl-io-socket-inet6")
|
|
|
|
|
(version "2.72")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"mirror://cpan/authors/id/S/SH/SHLOMIF/IO-Socket-INET6-"
|
|
|
|
|
version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1fqypz6qa5rw2d5y2zq7f49frwra0aln13nhq5gi514j2zx21q45"))))
|
|
|
|
|
(build-system perl-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("perl-module-build" ,perl-module-build)
|
|
|
|
|
("perl-test-pod" ,perl-test-pod)
|
|
|
|
|
("perl-test-pod-coverage" ,perl-test-pod-coverage)))
|
|
|
|
|
(inputs `(("perl-socket6" ,perl-socket6)))
|
|
|
|
|
(arguments `(;; Need network socket API
|
|
|
|
|
#:tests? #f))
|
|
|
|
|
(home-page
|
|
|
|
|
"http://search.cpan.org/dist/IO-Socket-INET6")
|
|
|
|
|
(synopsis
|
|
|
|
|
"Perl object interface for AF_INET/AF_INET6 domain sockets")
|
|
|
|
|
(description "IO::Socket::INET6 is an interface for AF_INET/AF_INET6 domain
|
|
|
|
|
sockets in Perl.")
|
2017-05-02 16:57:52 +02:00
|
|
|
|
(license license:perl-license)))
|
2016-08-12 19:47:41 +02:00
|
|
|
|
|
2017-04-26 20:18:56 +02:00
|
|
|
|
(define-public libproxy
|
|
|
|
|
(package
|
|
|
|
|
(name "libproxy")
|
|
|
|
|
(version "0.4.15")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/libproxy/libproxy/"
|
|
|
|
|
"releases/download/" version "/libproxy-"
|
|
|
|
|
version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0kvdrazlzwia876w988cmlypp253gwy6idlh8mjk958c29jb8kb5"))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("dbus" ,dbus)
|
|
|
|
|
("zlib" ,zlib)
|
|
|
|
|
("network-manager" ,network-manager)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'check
|
|
|
|
|
(lambda _
|
|
|
|
|
(zero? (system* "ctest" "-E" "url-test")))))))
|
|
|
|
|
(synopsis "Library providing automatic proxy configuration management")
|
|
|
|
|
(description "Libproxy handles the details of HTTP/HTTPS proxy
|
|
|
|
|
configuration for applications across all scenarios. Applications using
|
|
|
|
|
libproxy only have to specify which proxy to use.")
|
|
|
|
|
(home-page "https://libproxy.github.io/libproxy")
|
|
|
|
|
(license license:lgpl2.1+)))
|
|
|
|
|
|
2016-08-12 19:47:41 +02:00
|
|
|
|
(define-public proxychains-ng
|
|
|
|
|
(package
|
|
|
|
|
(name "proxychains-ng")
|
2017-01-16 15:11:33 +01:00
|
|
|
|
(version "4.12")
|
2016-08-12 19:47:41 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/rofl0r/" name "/releases/"
|
|
|
|
|
"download/v" version "/" name "-" version
|
2017-01-16 15:11:33 +01:00
|
|
|
|
".tar.xz"))
|
2016-08-12 19:47:41 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-01-16 15:11:33 +01:00
|
|
|
|
"0kiss3ih6cwayzvqi5cx4kw4vh7r2kfxlbgk56v1f1066ncm8aj8"))))
|
2016-08-12 19:47:41 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; there are no tests
|
|
|
|
|
#:make-flags '("CC=gcc")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'fix-configure-script
|
|
|
|
|
(lambda _
|
|
|
|
|
;; The configure script is very intolerant to unknown arguments,
|
|
|
|
|
;; such as "CONFIG_SHELL".
|
|
|
|
|
(substitute* "configure"
|
|
|
|
|
(("\\*\\) break ;;" line)
|
|
|
|
|
(string-append "[A-Z]*) shift ;;\n"
|
|
|
|
|
line)))
|
|
|
|
|
#t)))))
|
|
|
|
|
(synopsis "Redirect any TCP connection through a proxy or proxy chain")
|
|
|
|
|
(description "Proxychains-ng is a preloader which hooks calls to sockets
|
|
|
|
|
in dynamically linked programs and redirects them through one or more SOCKS or
|
|
|
|
|
HTTP proxies.")
|
|
|
|
|
(home-page "https://github.com/rofl0r/proxychains-ng")
|
|
|
|
|
(license license:gpl2+)))
|
2016-09-15 17:01:14 +02:00
|
|
|
|
|
|
|
|
|
(define-public enet
|
|
|
|
|
(package
|
|
|
|
|
(name "enet")
|
|
|
|
|
(version "1.3.13")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://enet.bespin.org/download/"
|
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0p53mnmjbm56wizwraznynx13fcibcxiqny110dp6a5a3w174q73"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(synopsis
|
|
|
|
|
"Network communication layer on top of UDP")
|
|
|
|
|
(description
|
|
|
|
|
"ENet's purpose is to provide a relatively thin, simple and robust network
|
|
|
|
|
communication layer on top of UDP. The primary feature it provides is optional
|
|
|
|
|
reliable, in-order delivery of packets. ENet omits certain higher level
|
|
|
|
|
networking features such as authentication, server discovery, encryption, or
|
|
|
|
|
other similar tasks that are particularly application specific so that the
|
|
|
|
|
library remains flexible, portable, and easily embeddable.")
|
|
|
|
|
(home-page "http://enet.bespin.org")
|
|
|
|
|
(license license:expat)))
|
2016-09-11 15:41:07 +02:00
|
|
|
|
|
|
|
|
|
(define-public sslh
|
|
|
|
|
(package
|
|
|
|
|
(name "sslh")
|
2018-03-02 22:39:35 +01:00
|
|
|
|
(version "1.19c")
|
2016-09-11 15:41:07 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/yrutschle/sslh/archive/v"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-03-02 22:39:35 +01:00
|
|
|
|
"0pd8hifa9h0rm7vms3k6ic1k29xigrlv2idc5wgcafmb1v1243di"))))
|
2016-09-11 15:41:07 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
2018-02-01 13:19:06 +01:00
|
|
|
|
`(;; Test dependencies.
|
2016-09-11 15:41:07 +02:00
|
|
|
|
("lcov" ,lcov)
|
|
|
|
|
("perl" ,perl)
|
|
|
|
|
("perl-io-socket-inet6" ,perl-io-socket-inet6)
|
|
|
|
|
("perl-socket6" ,perl-socket6)
|
|
|
|
|
("psmisc" ,psmisc)
|
|
|
|
|
("valgrind" ,valgrind)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libcap" ,libcap)
|
|
|
|
|
("libconfig" ,libconfig)
|
2018-02-01 13:19:06 +01:00
|
|
|
|
("pcre" ,pcre)
|
2016-09-11 15:41:07 +02:00
|
|
|
|
("tcp-wrappers" ,tcp-wrappers)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure) ; no configure script
|
|
|
|
|
(add-before 'check 'fix-tests
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "./t"
|
|
|
|
|
(("\"/tmp") "$ENV{\"TMPDIR\"} . \"")
|
|
|
|
|
;; The Guix build environment lacks ‘ip6-localhost’.
|
|
|
|
|
(("ip6-localhost") "localhost"))
|
|
|
|
|
#t))
|
|
|
|
|
;; Many of these files are mentioned in the man page. Install them.
|
|
|
|
|
(add-after 'install 'install-documentation
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(doc (string-append out "/share/doc/sslh")))
|
|
|
|
|
(install-file "README.md" doc)
|
|
|
|
|
(for-each
|
|
|
|
|
(lambda (file)
|
|
|
|
|
(install-file file (string-append doc "/examples")))
|
|
|
|
|
(append (find-files "." "\\.cfg")
|
|
|
|
|
(find-files "scripts"))))
|
|
|
|
|
#t)))
|
|
|
|
|
#:make-flags (list "CC=gcc"
|
|
|
|
|
"USELIBCAP=1"
|
|
|
|
|
"USELIBWRAP=1"
|
|
|
|
|
(string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:test-target "test"))
|
2018-02-01 13:19:06 +01:00
|
|
|
|
(home-page "https://www.rutschle.net/tech/sslh/README.html")
|
2016-09-11 15:41:07 +02:00
|
|
|
|
(synopsis "Applicative network protocol demultiplexer")
|
|
|
|
|
(description
|
|
|
|
|
"sslh is a network protocol demultiplexer. It acts like a switchboard,
|
|
|
|
|
accepting connections from clients on one port and forwarding them to different
|
|
|
|
|
servers based on the contents of the first received data packet. Detection of
|
|
|
|
|
common protocols like HTTP(S), SSL, SSH, OpenVPN, tinc, and XMPP is already
|
|
|
|
|
implemented, but any other protocol that matches a regular expression can be
|
|
|
|
|
added. sslh's name comes from its original application of serving both SSH and
|
|
|
|
|
HTTPS on port 443, allowing SSH connections from inside corporate firewalls
|
|
|
|
|
that block port 22.")
|
|
|
|
|
(license (list license:bsd-2 ; tls.[ch]
|
|
|
|
|
license:gpl2+)))) ; everything else
|
2016-10-18 17:28:23 +02:00
|
|
|
|
|
|
|
|
|
(define-public iperf
|
|
|
|
|
(package
|
|
|
|
|
(name "iperf")
|
2017-03-08 17:37:51 +01:00
|
|
|
|
(version "3.1.7")
|
2016-10-18 17:28:23 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://downloads.es.net/pub/iperf"
|
|
|
|
|
"/iperf-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-03-08 17:37:51 +01:00
|
|
|
|
"0kvk8d0a3dcxc8fisyprbn01y8akxj4sx8ld5dh508p9dx077vx4"))))
|
2016-10-18 17:28:23 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(synopsis "TCP, UDP and SCTP bandwidth measurement tool")
|
|
|
|
|
(description
|
|
|
|
|
"iPerf is a tool to measure achievable bandwidth on IP networks. It
|
|
|
|
|
supports tuning of various parameters related to timing, buffers and
|
|
|
|
|
protocols (TCP, UDP, SCTP with IPv4 and IPv6). For each test it reports
|
|
|
|
|
the bandwidth, loss, and other parameters.")
|
|
|
|
|
(home-page "http://software.es.net/iperf/")
|
|
|
|
|
(license (list license:bsd-3 ; Main distribution.
|
|
|
|
|
license:ncsa ; src/{units,iperf_locale,tcp_window_size}.c
|
|
|
|
|
license:expat ; src/{cjson,net}.[ch]
|
|
|
|
|
license:public-domain)))) ; src/portable_endian.h
|
2016-10-30 17:44:27 +01:00
|
|
|
|
|
|
|
|
|
(define-public nethogs
|
|
|
|
|
(package
|
|
|
|
|
(name "nethogs")
|
|
|
|
|
(version "0.8.5")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/raboof/nethogs/archive/v"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1k4x8r7s4dgcb6n2rjn28h2yyij92mwm69phncl3597cdxr954va"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libpcap" ,libpcap)
|
|
|
|
|
("ncurses" ,ncurses)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags `("CC=gcc"
|
|
|
|
|
,(string-append "PREFIX=" %output))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)))) ; No ./configure script.
|
|
|
|
|
(home-page "https://github.com/raboof/nethogs")
|
|
|
|
|
(synopsis "Per-process bandwidth monitor")
|
|
|
|
|
(description "NetHogs is a small 'net top' tool for Linux. Instead of
|
|
|
|
|
breaking the traffic down per protocol or per subnet, like most tools do, it
|
|
|
|
|
groups bandwidth by process.
|
|
|
|
|
|
|
|
|
|
NetHogs does not rely on a special kernel module to be loaded. If there's
|
|
|
|
|
suddenly a lot of network traffic, you can fire up NetHogs and immediately see
|
|
|
|
|
which PID is causing this. This makes it easy to identify programs that have
|
|
|
|
|
gone wild and are suddenly taking up your bandwidth.")
|
|
|
|
|
(license license:gpl2+)))
|
2017-01-27 14:35:12 +01:00
|
|
|
|
|
2017-06-16 14:38:59 +02:00
|
|
|
|
(define-public nzbget
|
|
|
|
|
(package
|
|
|
|
|
(name "nzbget")
|
2018-06-09 02:28:58 +02:00
|
|
|
|
(version "20.0")
|
2017-06-16 14:38:59 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/nzbget/nzbget/archive/v"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-09 02:28:58 +02:00
|
|
|
|
"0q93aqqyzccn5r9sny38499rmg846qdh9pi2v5kvf9m23v54yk60"))
|
2017-07-16 08:49:23 +02:00
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
;; Reported upstream as <https://github.com/nzbget/nzbget/pull/414>.
|
|
|
|
|
'(begin
|
|
|
|
|
(substitute* "daemon/connect/TlsSocket.cpp"
|
|
|
|
|
(("gnutls_certificate-verification_status_print")
|
|
|
|
|
"gnutls_certificate_verification_status_print"))
|
|
|
|
|
#t))))
|
2017-06-16 14:38:59 +02:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
|
|
|
|
(list
|
2017-07-16 08:49:23 +02:00
|
|
|
|
(string-append "--with-libcurses-includes="
|
|
|
|
|
(assoc-ref %build-inputs "ncurses") "/include")
|
|
|
|
|
(string-append "--with-libcurses-libraries="
|
|
|
|
|
(assoc-ref %build-inputs "ncurses") "/lib")
|
2017-06-16 14:38:59 +02:00
|
|
|
|
(string-append "--with-tlslib=GnuTLS"))))
|
|
|
|
|
(build-system gnu-build-system)
|
2018-03-16 16:50:14 +01:00
|
|
|
|
(inputs `(("gnutls" ,gnutls)
|
|
|
|
|
("libxml2" ,libxml2)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
2017-06-16 14:38:59 +02:00
|
|
|
|
(home-page "https://github.com/nzbget/nzbget")
|
|
|
|
|
(synopsis "Usenet binary file downloader")
|
|
|
|
|
(description
|
|
|
|
|
"NZBGet is a binary newsgrabber, which downloads files from Usenet based
|
|
|
|
|
on information given in @code{nzb} files. NZBGet can be used in standalone
|
|
|
|
|
and in server/client modes. In standalone mode, you pass NZBGet @command{nzb}
|
|
|
|
|
files as command-line parameters and it downloads them and exits. NZBGet also
|
|
|
|
|
contains a Web interface. Its server can be controlled through remote
|
|
|
|
|
procedure calls (RPCs).")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2017-01-27 14:35:12 +01:00
|
|
|
|
(define-public openvswitch
|
|
|
|
|
(package
|
|
|
|
|
(name "openvswitch")
|
2017-12-31 04:59:33 +01:00
|
|
|
|
(version "2.8.1")
|
2017-01-27 14:35:12 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://openvswitch.org/releases/openvswitch-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-12-31 04:59:33 +01:00
|
|
|
|
"14rqqhfyv49irz8ag0qbv9jn8z0bn3qzxir3r074y16p4sg4674d"))))
|
2017-01-27 14:35:12 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(;; FIXME: many tests fail with:
|
|
|
|
|
;; […]
|
|
|
|
|
;; test -e $OVS_RUNDIR/ovs-vswitchd.pid
|
|
|
|
|
;; ovs-appctl -t ovs-vswitchd exit
|
|
|
|
|
;; hard failure
|
|
|
|
|
#:tests? #f
|
|
|
|
|
#:configure-flags
|
|
|
|
|
'("--enable-shared"
|
|
|
|
|
"--localstatedir=/var"
|
|
|
|
|
"--with-dbdir=/var/lib/openvswitch")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda _
|
|
|
|
|
(zero? (system* "make"
|
|
|
|
|
;; Don't try to create directories under /var.
|
|
|
|
|
"RUNDIR=/tmp"
|
|
|
|
|
"PKIDIR=/tmp"
|
|
|
|
|
"LOGDIR=/tmp"
|
|
|
|
|
"DBDIR=/tmp"
|
|
|
|
|
"install")))))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("perl" ,perl)
|
|
|
|
|
("pkg-config" ,pkg-config)
|
|
|
|
|
("python" ,python-2)
|
|
|
|
|
;; for testing
|
|
|
|
|
("util-linux" ,util-linux)))
|
|
|
|
|
(propagated-inputs
|
|
|
|
|
`(("python-six" ,python2-six)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libcap-ng" ,libcap-ng)
|
|
|
|
|
("openssl" ,openssl)))
|
|
|
|
|
(synopsis "Virtual network switch")
|
|
|
|
|
(home-page "http://www.openvswitch.org/")
|
|
|
|
|
(description
|
|
|
|
|
"Open vSwitch is a multilayer virtual switch. It is designed to enable
|
|
|
|
|
massive network automation through programmatic extension, while still
|
|
|
|
|
supporting standard management interfaces and protocols (e.g. NetFlow, sFlow,
|
|
|
|
|
IPFIX, RSPAN, CLI, LACP, 802.1ag).")
|
|
|
|
|
(license ; see debian/copyright for detail
|
|
|
|
|
(list license:lgpl2.1 ; xenserver and utilities/bugtool
|
|
|
|
|
license:gpl2 ; datapath
|
|
|
|
|
license:bsd-2 license:bsd-3
|
|
|
|
|
license:asl2.0)))) ; all other
|
2017-02-26 11:52:21 +01:00
|
|
|
|
|
2017-04-19 14:42:24 +02:00
|
|
|
|
(define-public python-ipy
|
|
|
|
|
(package
|
|
|
|
|
(name "python-ipy")
|
|
|
|
|
(version "0.83")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (pypi-uri "IPy" version))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1f6sdrxclifky4gvkf4gvyv5hx3fjh8vzspnfrqki6qm5d9mmnk1"))))
|
|
|
|
|
(build-system python-build-system)
|
|
|
|
|
(home-page "https://github.com/autocracy/python-ipy/")
|
|
|
|
|
(synopsis "Python class and tools for handling IP addresses and networks")
|
|
|
|
|
(description "The @code{IP} class allows a comfortable parsing and
|
|
|
|
|
handling for most notations in use for IPv4 and IPv6 addresses and
|
|
|
|
|
networks.")
|
|
|
|
|
(license license:bsd-3)))
|
|
|
|
|
|
2018-03-25 18:51:03 +02:00
|
|
|
|
(define-public python2-ipy
|
|
|
|
|
(package-with-python2 python-ipy))
|
|
|
|
|
|
2017-02-26 11:52:21 +01:00
|
|
|
|
(define-public speedtest-cli
|
|
|
|
|
(package
|
|
|
|
|
(name "speedtest-cli")
|
2018-06-12 09:45:47 +02:00
|
|
|
|
(version "2.0.2")
|
2017-02-26 11:52:21 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
2018-06-12 09:45:47 +02:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/sivel/speedtest-cli")
|
|
|
|
|
(commit (string-append "v" version))))
|
|
|
|
|
(file-name (git-file-name name version))
|
2017-02-26 11:52:21 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-12 09:45:47 +02:00
|
|
|
|
"0vv2z37g2kgm2dzkfa4bhri92hs0d1acxi8z66gznsl5148q7sdi"))))
|
2017-02-26 11:52:21 +01:00
|
|
|
|
(build-system python-build-system)
|
|
|
|
|
(home-page "https://github.com/sivel/speedtest-cli")
|
|
|
|
|
(synopsis "Internet bandwidth tester")
|
|
|
|
|
(description
|
|
|
|
|
"Command line interface for testing internet bandwidth using
|
|
|
|
|
speedtest.net.")
|
|
|
|
|
(license license:asl2.0)))
|
2017-03-15 23:14:43 +01:00
|
|
|
|
|
|
|
|
|
(define-public tftp-hpa
|
|
|
|
|
(package
|
|
|
|
|
(name "tftp-hpa")
|
|
|
|
|
(version "5.2")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://kernel.org/software/"
|
|
|
|
|
"network/tftp/tftp-hpa/tftp-hpa-" version
|
|
|
|
|
".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"12vidchglhyc20znq5wdsbhi9mqg90jnl7qr9qs8hbvaz4fkdvmg"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments `(#:tests? #f)) ; no test target
|
|
|
|
|
(synopsis "HPA's tftp client")
|
|
|
|
|
(description
|
|
|
|
|
"This is a tftp client derived from OpenBSD tftp with some extra options
|
|
|
|
|
added and bugs fixed. The source includes readline support but it is not
|
|
|
|
|
enabled due to license conflicts between the BSD advertising clause and the GPL.")
|
|
|
|
|
(home-page "http://git.kernel.org/cgit/network/tftp/tftp-hpa.git/about/")
|
|
|
|
|
;; Some source files are distributed under a 3-clause BSD license, and
|
|
|
|
|
;; others under a 4-clause BSD license. Refer to the files in the source
|
|
|
|
|
;; distribution for clarification.
|
|
|
|
|
(license (list license:bsd-3 license:bsd-4))))
|
2017-06-04 04:32:16 +02:00
|
|
|
|
|
2017-04-30 21:09:00 +02:00
|
|
|
|
(define-public pidentd
|
|
|
|
|
(package
|
|
|
|
|
(name "pidentd")
|
|
|
|
|
(version "3.0.19")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/ptrrkssn/pidentd/archive/"
|
|
|
|
|
"v" version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0y3kd1bkydqkpc1qdff24yswysamsqivvadjy0468qri5730izgc"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f)) ; No tests are included
|
|
|
|
|
(inputs
|
|
|
|
|
`(("openssl" ,openssl))) ; For the DES library
|
|
|
|
|
(home-page "https://www.lysator.liu.se/~pen/pidentd/")
|
|
|
|
|
(synopsis "Small Ident Daemon")
|
|
|
|
|
(description
|
|
|
|
|
"@dfn{Pidentd} (Peter's Ident Daemon) is a identd, which implements a
|
|
|
|
|
identification server. Pidentd looks up specific TCP/IP connections and
|
|
|
|
|
returns the user name and other information about the connection.")
|
|
|
|
|
(license license:public-domain)))
|
|
|
|
|
|
2017-06-04 04:32:16 +02:00
|
|
|
|
(define-public spiped
|
|
|
|
|
(package
|
|
|
|
|
(name "spiped")
|
|
|
|
|
(version "1.6.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://www.tarsnap.com/spiped/spiped-"
|
|
|
|
|
version ".tgz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1r51rdcl7nib1yv3yvgd5alwlkkwmr387brqavaklb0p2bwzixz6"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:test-target "test"
|
|
|
|
|
#:make-flags (let* ((out (assoc-ref %outputs "out"))
|
|
|
|
|
(bindir (string-append out "/bin"))
|
|
|
|
|
(man1dir (string-append out "/share/man/man1")))
|
|
|
|
|
(list "CC=gcc" ; It tries to invoke `c99`.
|
|
|
|
|
(string-append "BINDIR=" bindir)
|
|
|
|
|
(string-append "MAN1DIR=" man1dir)))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'patch-command-invocations
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* '("Makefile"
|
|
|
|
|
"libcperciva/cpusupport/Build/cpusupport.sh"
|
|
|
|
|
"libcperciva/POSIX/posix-cflags.sh"
|
|
|
|
|
"libcperciva/POSIX/posix-l.sh")
|
|
|
|
|
(("command -p") ""))
|
|
|
|
|
#t))
|
|
|
|
|
(delete 'configure) ; No ./configure script.
|
|
|
|
|
(add-after 'install 'install-more-docs
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref %outputs "out"))
|
|
|
|
|
(misc (string-append out "/share/doc/spiped")))
|
|
|
|
|
(install-file "DESIGN.md" misc)
|
|
|
|
|
#t))))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("procps" ,procps))) ; `ps` is used by the test suite.
|
|
|
|
|
(inputs
|
|
|
|
|
`(("openssl" ,openssl)))
|
|
|
|
|
(home-page "https://www.tarsnap.com/spiped.html")
|
|
|
|
|
(synopsis "Create secure pipes between sockets")
|
|
|
|
|
(description "Spiped (pronounced \"ess-pipe-dee\") is a utility for creating
|
|
|
|
|
symmetrically encrypted and authenticated pipes between socket addresses, so
|
|
|
|
|
that one may connect to one address (e.g., a UNIX socket on localhost) and
|
|
|
|
|
transparently have a connection established to another address (e.g., a UNIX
|
|
|
|
|
socket on a different system). This is similar to 'ssh -L' functionality, but
|
|
|
|
|
does not use SSH and requires a pre-shared symmetric key.")
|
|
|
|
|
(license license:bsd-2)))
|
2017-06-26 17:51:33 +02:00
|
|
|
|
|
|
|
|
|
(define-public quagga
|
|
|
|
|
(package
|
|
|
|
|
(name "quagga")
|
2018-03-03 02:50:09 +01:00
|
|
|
|
(version "1.2.4")
|
2017-06-26 17:51:33 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://savannah/quagga/quagga-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-03-03 02:50:09 +01:00
|
|
|
|
"1lsksqxij5f1llqn86pkygrf5672kvrqn1kvxghi169hqf1c0r73"))
|
2017-06-26 17:51:33 +02:00
|
|
|
|
(patches
|
|
|
|
|
(search-patches "quagga-reproducible-build.patch"))))
|
|
|
|
|
(build-system gnu-build-system)
|
2018-03-16 16:50:14 +01:00
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)
|
|
|
|
|
("perl" ,perl)
|
|
|
|
|
("dejagnu" ,dejagnu)))
|
|
|
|
|
(inputs `(("readline" ,readline)
|
|
|
|
|
("c-ares" ,c-ares)))
|
2017-06-26 17:51:33 +02:00
|
|
|
|
(synopsis "Routing Software Suite")
|
|
|
|
|
(description "Quagga is a routing software suite, providing implementations
|
|
|
|
|
of OSPFv2, OSPFv3, RIP v1 and v2, RIPng and BGP-4 for Unix platforms.
|
|
|
|
|
|
|
|
|
|
The Quagga architecture consists of a core daemon, @command{zebra}, which
|
|
|
|
|
acts as an abstraction layer to the underlying Unix kernel and presents the
|
|
|
|
|
Zserv API over a Unix or TCP stream to Quagga clients. It is these Zserv
|
|
|
|
|
clients which typically implement a routing protocol and communicate routing
|
|
|
|
|
updates to the zebra daemon.")
|
gnu: Use HTTPS for supported nongnu.org home pages.
* gnu/packages/acl.scm (acl)[home-page]: Use HTTPS.
* gnu/packages/admin.scm (dmidecode)[home-page]: Likewise.
* gnu/packages/attr.scm (attr)[home-page]: Likewise.
* gnu/packages/audio.scm (lash)[home-page]: Likewise.
* gnu/packages/avr.scm (avr-libc)[home-page]: Likewise.
* gnu/packages/backup.scm (rdiff-backup, libchop)[home-page]: Likewise.
* gnu/packages/compression.scm (fastjar, lzip, lziprecover, atool)
(lunzip, clzip, lzlib, plzip)[home-page]: Likewise.
* gnu/packages/emacs.scm (geiser, bbdb, m17n-lib, m17n-lib)[home-page]:
Likewise.
* gnu/packages/flashing-tools.scm (avrdude)[home-page]: Likewise.
* gnu/packages/fontutils.scm (libotf)[home-page]: Likewise.
* gnu/packages/game-development.scm (gzochi)[home-page]: Likewise.
* gnu/packages/games.scm (enigma)[home-page]: Likewise.
* gnu/packages/gsasl.scm (libntlm)[home-page]: Likewise.
* gnu/packages/gtk.scm (guile-cairo)[home-page]: Likewise.
* gnu/packages/guile.scm (guile-reader, guile-lib, guile-json)
(guile-redis, g-wrap)[home-page]: Likewise.
* gnu/packages/libunwind.scm (libunwind)[home-page]: Likewise.
* gnu/packages/lout.scm (lout)[home-page]: Likewise.
* gnu/packages/mpd.scm (sonata)[home-page]: Likewise.
* gnu/packages/networking.scm (quagga)[home-page]: Likewise.
* gnu/packages/ratpoison.scm (ratpoison)[home-page]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[home-page]: Likewise.
* gnu/packages/telephony.scm (exosip)[home-page]: Likewise.
* gnu/packages/texinfo.scm (texi2html)[home-page]: Likewise.
* gnu/packages/xdisorg.scm (xbindkeys)[home-page]: Likewise.
2018-02-16 04:20:44 +01:00
|
|
|
|
(home-page "https://www.nongnu.org/quagga/")
|
2017-06-26 17:51:33 +02:00
|
|
|
|
(license license:gpl2+)))
|
2017-06-26 04:41:21 +02:00
|
|
|
|
|
|
|
|
|
(define-public thc-ipv6
|
2018-01-18 03:15:50 +01:00
|
|
|
|
(let ((revision "0")
|
|
|
|
|
(commit "4bb72573e0950ce6f8ca2800a10748477020029e"))
|
|
|
|
|
(package
|
|
|
|
|
(name "thc-ipv6")
|
|
|
|
|
(version (git-version "3.4" revision commit))
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/vanhauser-thc/thc-ipv6.git")
|
|
|
|
|
(commit commit)))
|
|
|
|
|
(file-name (git-file-name name version))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1x5i6vbsddqc2yks7r1a2fw2fk16qxvd6hpzh1lykjfpkal8fdir"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:tests? #f ; No test suite.
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure) ; No ./configure script.
|
|
|
|
|
(add-before 'build 'patch-paths
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("/bin/echo") "echo"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'install 'install-more-docs
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(doc (string-append out "/share/thc-ipv6/doc")))
|
|
|
|
|
(install-file "README" doc)
|
|
|
|
|
(install-file "HOWTO-INJECT" doc)
|
|
|
|
|
#t))))))
|
|
|
|
|
;; TODO Add libnetfilter-queue once packaged.
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libpcap" ,libpcap)
|
|
|
|
|
("openssl" ,openssl)
|
|
|
|
|
("perl" ,perl)))
|
|
|
|
|
(home-page "https://github.com/vanhauser-thc/thc-ipv6")
|
|
|
|
|
(synopsis "IPv6 security research toolkit")
|
|
|
|
|
(description "The THC IPv6 Toolkit provides command-line tools and a library
|
2017-06-26 04:41:21 +02:00
|
|
|
|
for researching IPv6 implementations and deployments. It requires Linux 2.6 or
|
|
|
|
|
newer and only works on Ethernet network interfaces.")
|
2018-01-18 03:15:50 +01:00
|
|
|
|
;; AGPL 3 with exception for linking with OpenSSL. See the 'LICENSE' file in
|
|
|
|
|
;; the source distribution for more information.
|
|
|
|
|
(license license:agpl3))))
|
2017-07-12 17:40:02 +02:00
|
|
|
|
|
|
|
|
|
(define-public bmon
|
|
|
|
|
(package
|
|
|
|
|
(name "bmon")
|
|
|
|
|
(version "4.0")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/tgraf/bmon/releases/download/v"
|
|
|
|
|
version "/bmon-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0ylzriv4pwh76344abzl1w219x188gshbycbna35gsyfp09c7z82"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libconfuse" ,libconfuse)
|
|
|
|
|
("libnl" ,libnl)
|
|
|
|
|
("ncurses" ,ncurses)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(synopsis "Bandwidth monitor")
|
|
|
|
|
(description "bmon is a monitoring and debugging tool to capture
|
|
|
|
|
networking-related statistics and prepare them visually in a human-friendly
|
|
|
|
|
way. It features various output methods including an interactive curses user
|
|
|
|
|
interface and a programmable text output for scripting.")
|
|
|
|
|
(home-page "https://github.com/tgraf/bmon")
|
|
|
|
|
;; README.md mentions both the 2-clause BSD and expat licenses, but all
|
|
|
|
|
;; the source files only have expat license headers. Upstream has been
|
|
|
|
|
;; contacted for clarification: https://github.com/tgraf/bmon/issues/59
|
|
|
|
|
;; Update the license field when upstream responds.
|
|
|
|
|
(license (list license:bsd-2
|
|
|
|
|
license:expat))))
|
2017-10-18 02:12:58 +02:00
|
|
|
|
|
|
|
|
|
(define-public libnet
|
|
|
|
|
(package
|
|
|
|
|
(name "libnet")
|
|
|
|
|
(version "1.1.6")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/sam-github/libnet/"
|
|
|
|
|
"archive/libnet-" version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0l4gbzzvr199fzczzricjz7b825i7dlk6sgl5p5alnkcagmq0xys"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'chdir
|
|
|
|
|
(lambda _ (chdir "libnet") #t))
|
|
|
|
|
(add-before 'build 'build-doc
|
|
|
|
|
(lambda* (#:key make-flags #:allow-other-keys)
|
|
|
|
|
(zero? (apply system* "make" "-C" "doc" "doc"
|
|
|
|
|
make-flags)))))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("doxygen" ,doxygen)))
|
|
|
|
|
(home-page "https://sourceforge.net/projects/libnet-dev/")
|
|
|
|
|
(synopsis "Framework for low-level network packet construction")
|
|
|
|
|
(description
|
|
|
|
|
"Libnet provides a fairly portable framework for network packet
|
|
|
|
|
construction and injection. It features portable packet creation interfaces
|
|
|
|
|
at the IP layer and link layer, as well as a host of supplementary
|
|
|
|
|
functionality. Using libnet, quick and simple packet assembly applications
|
|
|
|
|
can be whipped up with little effort.")
|
|
|
|
|
(license license:bsd-2)))
|
2017-11-30 03:10:35 +01:00
|
|
|
|
|
|
|
|
|
(define-public mtr
|
|
|
|
|
(package
|
|
|
|
|
(name "mtr")
|
|
|
|
|
(version "0.92")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "ftp://ftp.bitwizard.nl/" name "/"
|
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32 "10j3ds3p27jygys4x08kj8fi3zlsgiv72xsfazkah6plwawrv5zj"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libcap" ,libcap)
|
|
|
|
|
("ncurses" ,ncurses)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
;; The 0.92 release tarball still requires the ‘autoheader’ tool.
|
|
|
|
|
`(("autoconf" ,autoconf)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f)) ; tests require network access
|
|
|
|
|
(home-page "https://www.bitwizard.nl/mtr/")
|
|
|
|
|
(synopsis "Network diagnostic tool")
|
|
|
|
|
(description
|
|
|
|
|
"@dfn{mtr} (My TraceRoute) combines the functionality of the
|
|
|
|
|
@command{traceroute} and @command{ping} programs in a single network diagnostic
|
2017-12-02 14:17:16 +01:00
|
|
|
|
tool. @command{mtr} can use several network protocols to detect intermediate
|
|
|
|
|
routers (or @dfn{hops}) between the local host and a user-specified destination.
|
|
|
|
|
It then continually measures the response time and packet loss at each hop, and
|
2017-11-30 03:10:35 +01:00
|
|
|
|
displays the results in real time.")
|
|
|
|
|
(license license:gpl2+)))
|
2018-01-31 20:46:02 +01:00
|
|
|
|
|
|
|
|
|
(define-public strongswan
|
|
|
|
|
(package
|
|
|
|
|
(name "strongswan")
|
2018-02-22 17:00:44 +01:00
|
|
|
|
(version "5.6.2")
|
2018-01-31 20:46:02 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://download.strongswan.org/strongswan-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
2018-02-22 17:00:44 +01:00
|
|
|
|
(base32 "14ifqay54brw2b2hbmm517bxw8bs9631d7jm4g139igkxcq0m9p0"))))
|
2018-01-31 20:46:02 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
2018-02-22 17:09:49 +01:00
|
|
|
|
(add-before 'build 'patch-command-file-names
|
2018-01-31 20:46:02 +01:00
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(substitute* "src/libstrongswan/utils/process.c"
|
|
|
|
|
(("/bin/sh")
|
|
|
|
|
(string-append (assoc-ref inputs "bash") "/bin/sh")))
|
|
|
|
|
|
|
|
|
|
(substitute* "src/libstrongswan/tests/suites/test_process.c"
|
|
|
|
|
(("/bin/sh") (which "sh"))
|
|
|
|
|
(("/bin/echo") (which "echo"))
|
|
|
|
|
(("cat") (which "cat")))
|
2018-02-22 17:09:49 +01:00
|
|
|
|
#t))
|
|
|
|
|
(add-before 'check 'set-up-test-environment
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
2018-01-31 20:46:02 +01:00
|
|
|
|
(setenv "TZDIR" (string-append (assoc-ref inputs "tzdata")
|
|
|
|
|
"/share/zoneinfo"))
|
|
|
|
|
#t)))
|
|
|
|
|
#:configure-flags
|
|
|
|
|
(list
|
|
|
|
|
;; Disable bsd-4 licensed plugins
|
|
|
|
|
"--disable-des"
|
|
|
|
|
"--disable-blowfish")))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("curl" ,curl)
|
|
|
|
|
("gmp" ,gmp)
|
|
|
|
|
("libgcrypt" ,libgcrypt)
|
|
|
|
|
("openssl" ,openssl)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("coreutils" ,coreutils)
|
2018-02-01 13:19:02 +01:00
|
|
|
|
("tzdata" ,tzdata-for-tests)))
|
2018-01-31 20:46:02 +01:00
|
|
|
|
(synopsis "IKEv1/v2 keying daemon")
|
|
|
|
|
(description "StrongSwan is an IPsec implementation originally based upon
|
|
|
|
|
the FreeS/WAN project. It contains support for IKEv1, IKEv2, MOBIKE, IPv6,
|
|
|
|
|
NAT-T and more.")
|
|
|
|
|
(home-page "https://strongswan.org/")
|
|
|
|
|
(license
|
|
|
|
|
(list license:gpl2+
|
|
|
|
|
;; src/aikgen/*
|
|
|
|
|
;; src/libcharon/plugins/dnscert/*
|
|
|
|
|
;; src/libcharon/plugins/ext_auth/*
|
|
|
|
|
;; src/libcharon/plugins/vici/ruby/*
|
|
|
|
|
;; src/libcharon/plugins/xauth_pam/xauth_pam_listener.[ch]
|
|
|
|
|
license:expat
|
|
|
|
|
;; src/inclue/sys/*
|
|
|
|
|
license:bsd-3
|
|
|
|
|
;; src/libstrongswan/plugins/sha3/sha3_keccak.c
|
|
|
|
|
license:public-domain
|
|
|
|
|
;; src/libstrongswan/plugins/pkcs11/pkcs11.h
|
|
|
|
|
(license:non-copyleft
|
|
|
|
|
"file://src/libstrongswan/plugins/pkcs11/pkcs11.h"
|
|
|
|
|
"pkcs11 contains a unknown permissive license. View the specific
|
|
|
|
|
file for more details.")
|
|
|
|
|
;; These files are not included in the
|
|
|
|
|
;; build, they are disabled through
|
|
|
|
|
;; options to ./configure
|
|
|
|
|
;;
|
|
|
|
|
;; src/libstrongswan/plugins/blowfish/bf_enc.c
|
|
|
|
|
;; src/libstrongswan/plugins/blowfish/bf_locl.h
|
|
|
|
|
;; src/libstrongswan/plugins/blowfish/bf_pi.h
|
|
|
|
|
;; src/libstrongswan/plugins/blowfish/bf_skey.c
|
|
|
|
|
;; src/libstrongswan/plugins/blowfish/blowfish_crypter.c
|
|
|
|
|
;; src/libstrongswan/plugins/des/des_crypter.c
|
|
|
|
|
license:bsd-4))))
|
2018-04-06 21:44:36 +02:00
|
|
|
|
|
|
|
|
|
(define-public amule
|
|
|
|
|
(package
|
|
|
|
|
(name "amule")
|
|
|
|
|
(version "2.3.2")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/amule-project/amule/archive/"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1wvcj0n9xz03xz5c2xwp6dwfp7sqjhhwbki3m0lwikskpn9lkzk2"))
|
|
|
|
|
;; Patch for adopting crypto++ >= 6.0.
|
|
|
|
|
(patches (search-patches "amule-crypto-6.patch"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'patch-source-shebangs 'autogen
|
|
|
|
|
(lambda _
|
|
|
|
|
(invoke "sh" "autogen.sh")
|
|
|
|
|
#t)))
|
|
|
|
|
#:configure-flags
|
|
|
|
|
'("--disable-rpath"
|
|
|
|
|
"--enable-wxcas"
|
|
|
|
|
"--enable-cas"
|
|
|
|
|
"--enable-alc"
|
|
|
|
|
"--enable-alcc"
|
|
|
|
|
"--enable-xas"
|
|
|
|
|
"--enable-amulecmd"
|
|
|
|
|
"--enable-geoip"
|
|
|
|
|
"--enable-ccache"
|
|
|
|
|
"--enable-nls"
|
|
|
|
|
"--enable-optimize"
|
|
|
|
|
"--enable-amule-gui"
|
|
|
|
|
"--enable-amule-daemon"
|
|
|
|
|
"--enable-webserver"
|
|
|
|
|
"--with-denoise-level=0")))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("gettext-minimal" ,gettext-minimal)
|
|
|
|
|
("perl" ,perl)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("zlib" ,zlib)
|
|
|
|
|
("crypto++" ,crypto++)
|
|
|
|
|
("libpng" ,libpng)
|
2018-06-20 01:03:47 +02:00
|
|
|
|
("wxwidgets-gtk2" ,wxwidgets-gtk2)))
|
2018-04-06 21:44:36 +02:00
|
|
|
|
(home-page "http://amule.org/")
|
|
|
|
|
(synopsis "Peer-to-peer client for the eD2K and Kademlia networks")
|
|
|
|
|
(description
|
|
|
|
|
"aMule is an eMule-like client for the eD2k and Kademlia peer-to-peer
|
|
|
|
|
file sharing networks. It includes a graphical user interface (GUI), a daemon
|
|
|
|
|
allowing you to run a client with no graphical interface, and a Web GUI for
|
|
|
|
|
remote access. The @command{amulecmd} command allows you to control aMule
|
|
|
|
|
remotely.")
|
|
|
|
|
(license license:gpl2+)))
|
2018-05-17 17:50:33 +02:00
|
|
|
|
|
|
|
|
|
(define-public zyre
|
|
|
|
|
(package
|
|
|
|
|
(name "zyre")
|
|
|
|
|
(version "2.0.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri
|
|
|
|
|
(string-append "https://github.com/zeromq/zyre/releases/download/v"
|
|
|
|
|
version "/" name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0qz2730bng1gs9xbqxhkw88qbsmszgmmrl2g9k6xrg6r3bqvsdc7"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs `(("zeromq" ,zeromq)
|
|
|
|
|
("czmq" ,czmq)
|
|
|
|
|
("libsodium" ,libsodium)))
|
|
|
|
|
(synopsis "Framework for proximity-based peer-to-peer applications")
|
|
|
|
|
(description "Zyre provides reliable group messaging over local area
|
|
|
|
|
networks using zeromq. It has these key characteristics:
|
|
|
|
|
|
|
|
|
|
@itemize
|
|
|
|
|
@item Zyre needs no administration or configuration.
|
|
|
|
|
@item Peers may join and leave the network at any time.
|
|
|
|
|
@item Peers talk to each other without any central brokers or servers.
|
|
|
|
|
@item Peers can talk directly to each other.
|
|
|
|
|
@item Peers can join groups, and then talk to groups.
|
|
|
|
|
@item Zyre is reliable, and loses no messages even when the network is heavily loaded.
|
|
|
|
|
@item Zyre is fast and has low latency, requiring no consensus protocols.
|
|
|
|
|
@item Zyre is designed for WiFi networks, yet also works well on Ethernet networks.
|
|
|
|
|
@end itemize")
|
|
|
|
|
(home-page "https://github.com/zeromq/zyre")
|
|
|
|
|
(license license:mpl2.0)))
|
2018-05-21 02:33:28 +02:00
|
|
|
|
|
|
|
|
|
(define-public can-utils
|
|
|
|
|
(package
|
|
|
|
|
(name "can-utils")
|
|
|
|
|
(version "2018.02.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/linux-can/can-utils.git")
|
|
|
|
|
(commit (string-append "v" version))))
|
|
|
|
|
(file-name (git-file-name name version))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0r0zkm67bdcmbfypjr7z041d4zp0xzb379dyl8cvhmflh12fd2jb"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; No tests exist.
|
|
|
|
|
#:make-flags (list "CC=gcc"
|
|
|
|
|
(string-append "PREFIX="
|
|
|
|
|
(assoc-ref %outputs "out")))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
2018-06-06 11:59:36 +02:00
|
|
|
|
(delete 'bootstrap)
|
2018-05-21 02:33:28 +02:00
|
|
|
|
(delete 'configure))))
|
|
|
|
|
(home-page "https://github.com/linux-can/can-utils")
|
|
|
|
|
(synopsis "CAN utilities")
|
|
|
|
|
(description "This package provides CAN utilities in the following areas:
|
|
|
|
|
|
|
|
|
|
@itemize
|
|
|
|
|
@item Basic tools to display, record, generate and replay CAN traffic
|
|
|
|
|
@item CAN access via IP sockets
|
|
|
|
|
@item CAN in-kernel gateway configuration
|
|
|
|
|
@item CAN bus measurement and testing
|
|
|
|
|
@item ISO-TP (ISO15765-2:2016 - this means messages with a body larger than
|
|
|
|
|
eight bytes) tools
|
|
|
|
|
@item Log file converters
|
|
|
|
|
@item Serial Line Discipline configuration for slcan driver
|
|
|
|
|
@end itemize")
|
|
|
|
|
;; Either BSD-3 or GPL-2 can be used.
|
|
|
|
|
(license (list license:bsd-3 license:gpl2))))
|
2018-05-31 17:07:07 +02:00
|
|
|
|
|
|
|
|
|
(define-public asio
|
|
|
|
|
(package
|
|
|
|
|
(name "asio")
|
|
|
|
|
(version "1.12.0")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/chriskohlhoff/asio.git")
|
|
|
|
|
(commit (string-join (cons name (string-split version #\.))
|
|
|
|
|
"-"))))
|
|
|
|
|
(file-name (git-file-name name version))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"04dg8kpgriay7q62mqcq2gl439k5y4mf761zghsd6wfl0farh3mx"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("boost" ,boost)
|
|
|
|
|
("openssl" ,openssl)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
|
|
|
|
(list
|
|
|
|
|
(string-append "--with-boost=" (assoc-ref %build-inputs "boost"))
|
|
|
|
|
(string-append "--with-openssl=" (assoc-ref %build-inputs "openssl")))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'chdir-to-asio
|
|
|
|
|
(lambda _
|
|
|
|
|
(chdir "asio")))
|
|
|
|
|
(add-before 'configure 'bootstrap
|
|
|
|
|
(lambda _
|
|
|
|
|
(invoke "sh" "autogen.sh"))))))
|
|
|
|
|
(home-page "https://think-async.com/Asio")
|
|
|
|
|
(synopsis "C++ library for ASynchronous network I/O")
|
|
|
|
|
(description "Asio is a cross-platform C++ library for network and
|
|
|
|
|
low-level I/O programming that provides developers with a consistent
|
|
|
|
|
asynchronous model using a modern C++ approach.")
|
|
|
|
|
(license license:boost1.0)))
|
2018-06-12 12:10:19 +02:00
|
|
|
|
|
|
|
|
|
(define-public shadowsocks
|
|
|
|
|
;; There are some security fixes after the last release.
|
|
|
|
|
(let* ((commit "e332ec93e9c90f1cbee676b022bf2c5d5b7b1239")
|
|
|
|
|
(revision "0")
|
|
|
|
|
(version (git-version "2.8.2" revision commit)))
|
|
|
|
|
(package
|
|
|
|
|
(name "shadowsocks")
|
|
|
|
|
(version version)
|
|
|
|
|
(home-page "https://github.com/shadowsocks/shadowsocks")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url home-page)
|
|
|
|
|
(commit commit)))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1idd9b4f2pnhcpk1bh030hqg5zq25gkwxd53xi3c0cj242w7sp2j"))
|
|
|
|
|
(file-name (git-file-name name version))))
|
|
|
|
|
(build-system python-build-system)
|
|
|
|
|
(synopsis "Fast tunnel proxy that helps you bypass firewalls")
|
|
|
|
|
(description
|
|
|
|
|
"This package is a fast tunnel proxy that helps you bypass firewalls.
|
|
|
|
|
|
|
|
|
|
Features:
|
|
|
|
|
@itemize
|
|
|
|
|
@item TCP & UDP support
|
|
|
|
|
@item User management API
|
|
|
|
|
@item TCP Fast Open
|
|
|
|
|
@item Workers and graceful restart
|
|
|
|
|
@item Destination IP blacklist
|
|
|
|
|
@end itemize")
|
|
|
|
|
(license license:asl2.0))))
|
2018-07-31 13:19:33 +02:00
|
|
|
|
|
|
|
|
|
(define-public net-snmp
|
|
|
|
|
(package
|
|
|
|
|
(name "net-snmp")
|
|
|
|
|
(version "5.8")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/net-snmp/net-snmp/"
|
|
|
|
|
version "/net-snmp-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1pvajzj9gmj56dmwix0ywmkmy2pglh6nny646hkm7ghfhh03bz5j"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
'(begin
|
|
|
|
|
;; Drop bundled libraries.
|
|
|
|
|
(delete-file-recursively "snmplib/openssl")
|
|
|
|
|
#t))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:test-target "test"
|
|
|
|
|
;; XXX: With parallel build enabled, Perl modules may not get linked with
|
|
|
|
|
;; libnetsnmp. See e.g. <https://bugzilla.novell.com/show_bug.cgi?id=819497>.
|
|
|
|
|
#:parallel-build? #f
|
|
|
|
|
#:configure-flags
|
|
|
|
|
(list (string-append "LDFLAGS=-Wl,-rpath="
|
|
|
|
|
(assoc-ref %outputs "out")
|
|
|
|
|
"/lib")
|
|
|
|
|
"--with-logfile=/var/log/snmpd.log")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'patch-tests
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(substitute* "testing/fulltests/support/simple_TESTCONF.sh"
|
|
|
|
|
(("NETSTAT=\"\"")
|
|
|
|
|
(string-append "NETSTAT=\"" (which "netstat") "\"")))
|
|
|
|
|
(substitute* '("testing/fulltests/default/T065agentextend_simple"
|
|
|
|
|
"testing/fulltests/default/T115agentxperl_simple")
|
|
|
|
|
(("/usr/bin/env") (which "env")))
|
|
|
|
|
(substitute* "testing/fulltests/default/T065agentextend_sh_simple"
|
|
|
|
|
(("/bin/sh") (which "sh")))
|
|
|
|
|
;; These tests require network access.
|
|
|
|
|
(for-each delete-file
|
|
|
|
|
'("testing/fulltests/default/T070com2sec_simple"
|
|
|
|
|
"testing/fulltests/default/T071com2sec6_simple"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'patch-Makefile.PL
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "Makefile.in"
|
|
|
|
|
(("Makefile.PL -NET")
|
|
|
|
|
(string-append "Makefile.PL PREFIX="
|
|
|
|
|
(assoc-ref outputs "out")
|
|
|
|
|
" INSTALLDIRS=site" " NO_PERLLOCAL=1"
|
|
|
|
|
" -NET")))
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("perl" ,perl)
|
|
|
|
|
("openssl" ,openssl)
|
|
|
|
|
("libnl" ,libnl)))
|
|
|
|
|
;; These inputs are only needed for tests.
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("net-tools" ,net-tools)
|
|
|
|
|
("coreutils" ,coreutils)
|
|
|
|
|
("grep" ,grep)))
|
|
|
|
|
(home-page "http://www.net-snmp.org/")
|
|
|
|
|
(synopsis "Simple Network Management Protocol library and tools")
|
|
|
|
|
(description "The @dfn{Simple Network Management Protocol} (SNMP) is a
|
|
|
|
|
widely used protocol for monitoring the health and welfare of network
|
|
|
|
|
equipment (e.g. routers), computer equipment and even devices like UPSs.
|
|
|
|
|
Net-SNMP is a suite of applications used to implement SNMP v1, SNMP v2c and
|
|
|
|
|
SNMP v3 using both IPv4 and IPv6.")
|
|
|
|
|
(license (list license:bsd-3
|
|
|
|
|
(license:non-copyleft
|
|
|
|
|
"http://www.net-snmp.org/about/license.html"
|
|
|
|
|
"CMU/UCD copyright notice")))))
|
2018-08-07 10:37:32 +02:00
|
|
|
|
|
|
|
|
|
(define-public ubridge
|
|
|
|
|
(package
|
|
|
|
|
(name "ubridge")
|
|
|
|
|
(version "0.9.14")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/GNS3/ubridge/archive/v"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1hivb8wqkk5047bdl2vbsbcvkmam1107hx1ahy4virq2bkqki1fj"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ;no tests
|
|
|
|
|
#:make-flags '("CC=gcc")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-before 'install 'set-bindir
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let ((bin (string-append (assoc-ref outputs "out")
|
|
|
|
|
"/bin")))
|
|
|
|
|
(mkdir-p bin)
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("\\$\\(BINDIR\\)") bin)
|
|
|
|
|
(("\tsetcap cap_net.*$") "")))
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libpcap" ,libpcap)))
|
|
|
|
|
(home-page "https://github.com/GNS3/ubridge/")
|
|
|
|
|
(synopsis "Bridge for UDP tunnels, Ethernet, TAP and VMnet interfaces")
|
|
|
|
|
(description "uBridge is a simple program to create user-land bridges
|
|
|
|
|
between various technologies. Currently, bridging between UDP tunnels,
|
|
|
|
|
Ethernet and TAP interfaces is supported. Packet capture is also supported.")
|
|
|
|
|
(license license:gpl3+)))
|