From mboxrd@z Thu Jan 1 00:00:00 1970 From: Nicolas Goaziou Subject: [PATCH] Add wireshark Date: Thu, 02 Jun 2016 22:09:18 +0200 Message-ID: <87zir35p5d.fsf@saiph.selenimh> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:55614) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1b8Yvr-0008Pv-Gi for guix-devel@gnu.org; Thu, 02 Jun 2016 16:09:32 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1b8Yvn-0004QB-79 for guix-devel@gnu.org; Thu, 02 Jun 2016 16:09:30 -0400 Received: from relay3-d.mail.gandi.net ([217.70.183.195]:43237) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1b8Yvn-0004Q3-0Y for guix-devel@gnu.org; Thu, 02 Jun 2016 16:09:27 -0400 Received: from saiph.selenimh (unknown [IPv6:2a03:a0a0:0:4301::b3c]) (Authenticated sender: mail@nicolasgoaziou.fr) by relay3-d.mail.gandi.net (Postfix) with ESMTPSA id 2FED1A80D3 for ; Thu, 2 Jun 2016 22:09:25 +0200 (CEST) List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: "Guix-devel" To: guix-devel@gnu.org --=-=-= Content-Type: text/plain Hello, Here is a new attempt to add a package: wireshark. I don't like the "python-wrapper" part because it implies a propagated python. OTOH, providing only "python" generates a lot of screaming during patch environment phase, but doesn't seem to alter the final executable. I'm not sure about the locations of plugins directory. Default is in the store, which means you cannot add more. I don't use this, so I don't know if there's a better place. Anyway, here comes the patch. Thank you in advance for any feedback. -- Nicolas Goaziou 0x80A93738 --=-=-= Content-Type: text/x-diff; charset=utf-8 Content-Disposition: attachment; filename=0001-gnu-Add-wireshark.patch Content-Transfer-Encoding: quoted-printable Content-Description: Add wireshark >From e31d8434e26100bc95e2c7fa8a98dafcb4b49c45 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Thu, 2 Jun 2016 21:02:14 +0200 Subject: [PATCH] gnu: Add wireshark. * gnu/packages/networking.scm (wireshark): New variable. --- gnu/packages/networking.scm | 71 +++++++++++++++++++++++++++++++++++++++++= ++-- 1 file changed, 68 insertions(+), 3 deletions(-) diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm index 6f4339a..b833e62 100644 --- a/gnu/packages/networking.scm +++ b/gnu/packages/networking.scm @@ -6,6 +6,7 @@ ;;; Copyright =C2=A9 2016 Raimon Grau ;;; Copyright =C2=A9 2016 Tobias Geerinckx-Rice ;;; Copyright 2016 John Darrington +;;; Copyright =C2=A9 2016 Nicolas Goaziou ;;; ;;; This file is part of GNU Guix. ;;; @@ -26,12 +27,25 @@ #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) #:use-module (guix download) + #:use-module (guix build-system glib-or-gtk) #:use-module (guix build-system gnu) - #:use-module (gnu packages tls) - #:use-module (gnu packages ncurses) + #:use-module (gnu packages admin) + #:use-module (gnu packages adns) + #:use-module (gnu packages audio) + #:use-module (gnu packages bison) #:use-module (gnu packages check) + #:use-module (gnu packages compression) + #:use-module (gnu packages flex) + #:use-module (gnu packages gnupg) + #:use-module (gnu packages gtk) + #:use-module (gnu packages linux) + #:use-module (gnu packages lua) + #:use-module (gnu packages mit-krb5) + #:use-module (gnu packages ncurses) + #:use-module (gnu packages perl) #:use-module (gnu packages pkg-config) - #:use-module (gnu packages compression)) + #:use-module (gnu packages python) + #:use-module (gnu packages tls)) =20 (define-public macchanger (package @@ -273,3 +287,54 @@ DNS queries are allowed. The bandwidth is asymmetrica= l, 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)))) + +(define-public wireshark + (package + (name "wireshark") + (version "2.0.3") + (synopsis "Network traffic analyzer") + (source + (origin + (method url-fetch) + (uri (string-append "https://www.wireshark.org/download/src/wiresha= rk-" + version ".tar.bz2")) + (sha256 + (base32 + "1z358k65frp9m0l07cppwxhvbcp1w9ya5sml87pzs8gyfmp3g5p1")))) + (build-system glib-or-gtk-build-system) + (inputs `(("bison" ,bison) + ("c-ares" ,c-ares) + ("flex" ,flex) + ("gnutls" ,gnutls) + ("gtk+" ,gtk+) + ("libcap" ,libcap) + ("libgcrypt" ,libgcrypt) + ("libnl" ,libnl) + ("libpcap" ,libpcap) + ("lua" ,lua) + ("krb5" ,mit-krb5) + ("openssl" ,openssl) + ("portaudio" ,portaudio) + ("sbc" ,sbc) + ("zlib" ,zlib))) + (native-inputs `(("perl" ,perl) + ("pkg-config" ,pkg-config) + ("python" ,python-wrapper))) + (arguments + `(#:configure-flags + `(,(string-append "--with-c-ares=3D" (assoc-ref %build-inputs "c-ar= es")) + ,(string-append "--with-krb5=3D" (assoc-ref %build-inputs "krb5")) + ,(string-append "--with-libcap=3D" (assoc-ref %build-inputs "libc= ap")) + ,(string-append "--with-lua=3D" (assoc-ref %build-inputs "lua")) + ,(string-append "--with-pcap=3D" (assoc-ref %build-inputs "libpca= p")) + ,(string-append "--with-portaudio=3D" + (assoc-ref %build-inputs "portaudio")) + ,(string-append "--with-sbc=3D" (assoc-ref %build-inputs "sbc")) + ,(string-append "--with-ssl=3D" (assoc-ref %build-inputs "openssl= ")) + ,(string-append "--with-zlib=3D" (assoc-ref %build-inputs "zlib")) + "--without-qt"))) + (description "Wireshark is a network protocol analyzer, or +\"packet sniffer\", that lets you capture and interactively browse the +contents of network frames.") + (license license:gpl2+) + (home-page "https://www.wireshark.org/"))) --=20 2.8.3 --=-=-=--