From mboxrd@z Thu Jan 1 00:00:00 1970 From: Tobias Geerinckx-Rice Subject: [PATCH] gnu: Add iodine. Date: Mon, 4 Apr 2016 05:20:38 +0200 Message-ID: <1459740038-19354-1-git-send-email-tobias.geerinckx.rice@gmail.com> Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:45418) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1amv4U-0005Z7-EG for guix-devel@gnu.org; Sun, 03 Apr 2016 23:20:59 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1amv4R-00043U-87 for guix-devel@gnu.org; Sun, 03 Apr 2016 23:20:58 -0400 Received: from mail-lf0-x22f.google.com ([2a00:1450:4010:c07::22f]:36371) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1amv4R-00043Q-0T for guix-devel@gnu.org; Sun, 03 Apr 2016 23:20:55 -0400 Received: by mail-lf0-x22f.google.com with SMTP id g184so74996370lfb.3 for ; Sun, 03 Apr 2016 20:20:54 -0700 (PDT) List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org To: guix-devel@gnu.org * gnu/packages/networking.scm (iodine): New variable. --- Hullo, Here's another nice-to-have package for those who like to do weird stuff. Not much else to say, besides ‘wow, that is one ugly regex.’ Kind regards, T G-R gnu/packages/networking.scm | 43 ++++++++++++++++++++++++++++++++++++++++++- 1 file changed, 42 insertions(+), 1 deletion(-) diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm index ac7e4e7..17f55ad 100644 --- a/gnu/packages/networking.scm +++ b/gnu/packages/networking.scm @@ -4,6 +4,7 @@ ;;; Copyright © 2015 Mark H Weaver ;;; Copyright © 2015 Stefan Reichör ;;; Copyright © 2016 Raimon Grau +;;; Copyright © 2016 Tobias Geerinckx-Rice ;;; ;;; This file is part of GNU Guix. ;;; @@ -26,7 +27,10 @@ #:use-module (guix download) #:use-module (guix build-system gnu) #:use-module (gnu packages tls) - #:use-module (gnu packages ncurses)) + #:use-module (gnu packages ncurses) + #:use-module (gnu packages check) + #:use-module (gnu packages pkg-config) + #:use-module (gnu packages compression)) (define-public miredo (package @@ -210,3 +214,40 @@ bandwidth usage in real time. It visualizes the in- and outgoing traffic using two graphs and provides additional info like total amount of transfered data and min/max network usage.") (license license:gpl2+))) + +(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) + (add-before 'check 'delete-failing-tests + ;; Avoid https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=802105 + (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")) + (inputs `(("zlib" ,zlib))) + (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)))) -- 2.7.0