From 0493ead644196bb1c933719d4c0e63e665fd102d Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Fri, 10 Apr 2020 09:27:00 +0200 Subject: gnu: Merge ham-radio and sdr modules into radio module. * gnu/packages/ham-radio.scm: Rename to 'radio.scm'. * gnu/packages/sdr.scm: Remove file. (liquid-dsp): Move to ... * gnu/packages/radio.scm (liquid-dsp): ... here. * gnu/local.mk (GNU_SYSTEM_MODULES): Remove 'ham-radio.scm' and 'sdr.scm'. Add 'radio.scm'. --- gnu/packages/radio.scm | 514 +++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 514 insertions(+) create mode 100644 gnu/packages/radio.scm (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm new file mode 100644 index 0000000000..e1e5a98c68 --- /dev/null +++ b/gnu/packages/radio.scm @@ -0,0 +1,514 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright © 2017, 2018, 2019 Arun Isaac +;;; Copyright © 2019 Christopher Howard +;;; Copyright © 2019, 2020 Evan Straw +;;; Copyright © 2020 Guillaume Le Vaillant +;;; Copyright © 2020 Danny Milosavljevic +;;; Copyright © 2020 Charlie Ritter +;;; +;;; 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 . + +(define-module (gnu packages radio) + #:use-module ((guix licenses) #:prefix license:) + #:use-module (guix packages) + #:use-module (guix download) + #:use-module (guix git-download) + #:use-module (gnu packages algebra) + #:use-module (gnu packages audio) + #:use-module (gnu packages autotools) + #:use-module (gnu packages base) + #:use-module (gnu packages bash) + #:use-module (gnu packages boost) + #:use-module (gnu packages check) + #:use-module (gnu packages documentation) + #:use-module (gnu packages ghostscript) + #:use-module (gnu packages glib) + #:use-module (gnu packages gstreamer) + #:use-module (gnu packages gtk) + #:use-module (gnu packages image) + #:use-module (gnu packages libusb) + #:use-module (gnu packages linux) + #:use-module (gnu packages logging) + #:use-module (gnu packages maths) + #:use-module (gnu packages multiprecision) + #:use-module (gnu packages networking) + #:use-module (gnu packages pkg-config) + #:use-module (gnu packages pulseaudio) + #:use-module (gnu packages python) + #:use-module (gnu packages python-science) + #:use-module (gnu packages python-xyz) + #:use-module (gnu packages qt) + #:use-module (gnu packages sphinx) + #:use-module (gnu packages swig) + #:use-module (gnu packages tex) + #:use-module (gnu packages version-control) + #:use-module (gnu packages xml) + #:use-module (gnu packages xorg) + #:use-module (guix build-system cmake) + #:use-module (guix build-system glib-or-gtk) + #:use-module (guix build-system gnu) + #:use-module (guix build-system python) + #:use-module (guix build-system qt)) + +(define-public liquid-dsp + (package + (name "liquid-dsp") + (version "1.3.2") + (source + (origin (method git-fetch) + (uri (git-reference + (url "https://github.com/jgaeddert/liquid-dsp.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1n6dbg13q8ga5qhg1yiszwly4jj0rxqr6f1xwm9waaly5z493xsd")))) + (build-system gnu-build-system) + (native-inputs + `(("autoconf" ,autoconf))) + (inputs + `(("fftw" ,fftw) + ("fftwf" ,fftwf))) + (home-page "https://liquidsdr.org") + (synopsis "Signal processing library for software-defined radios") + (description + "Liquid DSP is a @dfn{digital signal processing} (DSP) library designed +specifically for software-defined radios on embedded platforms. The aim is to +provide a lightweight DSP library that does not rely on a myriad of external +dependencies or proprietary and otherwise cumbersome frameworks. All signal +processing elements are designed to be flexible, scalable, and dynamic, +including filters, filter design, oscillators, modems, synchronizers, complex +mathematical operations, and much more.") + (license license:expat))) + +(define-public rtl-sdr + (package + (name "rtl-sdr") + (version "0.6.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "git://git.osmocom.org/rtl-sdr.git") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0lmvsnb4xw4hmz6zs0z5ilsah5hjz29g1s0050n59fllskqr3b8k")))) + (build-system cmake-build-system) + (inputs + `(("libusb" ,libusb))) + (native-inputs + `(("pkg-config" ,pkg-config))) + (arguments + `(#:configure-flags '("-DDETACH_KERNEL_DRIVER=ON") + #:tests? #f)) ; No tests + (home-page "https://osmocom.org/projects/sdr/wiki/rtl-sdr") + (synopsis "Software defined radio driver for Realtek RTL2832U") + (description "DVB-T dongles based on the Realtek RTL2832U can be used as a +cheap software defined radio, since the chip allows transferring the raw I/Q +samples to the host. @code{rtl-sdr} provides drivers for this purpose.") + (license license:gpl2+))) + +(define-public chirp + (package + (name "chirp") + (version "20181205") + (source + (origin + (method url-fetch) + (uri (string-append "https://trac.chirp.danplanet.com/chirp_daily/daily-" + version "/chirp-daily-" version ".tar.gz")) + (sha256 + (base32 + "1cp280b95j39xaxs50zn55jigg7pyfpm9n098hmsyxrplqn8z43c")))) + (build-system python-build-system) + (inputs + `(("python2-libxml2" ,python2-libxml2) + ("python2-pygtk" ,python2-pygtk) + ("python2-pyserial" ,python2-pyserial))) + (arguments + `(#:python ,python-2)) + (home-page "https://chirp.danplanet.com") + (synopsis "Cross-radio programming tool") + (description "Chirp is a cross-radio programming tool. It supports a +growing list of radios across several manufacturers and allows transferring of +memory contents between them.") + (license (list license:gpl3+ + license:lgpl3+)))) ; chirp/elib_intl.py + +(define-public aptdec + (package + (name "aptdec") + (version "1.7") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/csete/aptdec") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1hf0zb51qc6fyhdjxyij1n3vgwnw3cwksc3r11szbhkml14qjnzk")))) + (build-system gnu-build-system) + (inputs + `(("libpng" ,libpng) + ("libsndfile" ,libsndfile))) + (arguments + `(#:make-flags (list "CC=gcc") + #:tests? #f ; no tests + #:phases + (modify-phases %standard-phases + (delete 'configure) + (replace 'install + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (install-file "atpdec" (string-append out "/bin"))) + #t))))) + (home-page "https://github.com/csete/aptdec") + (synopsis "NOAA Automatic Picture Transmission (APT) decoder") + (description "Aptdec decodes Automatic Picture Transmission (APT) images. +These are medium resolution images of the Earth transmitted by, among other +satellites, the POES NOAA weather satellite series. These transmissions are +on a frequency of 137 MHz. They can be received using an inexpensive antenna +and a dedicated receiver.") + (license license:gpl2+))) + +(define-public redsea + (package + (name "redsea") + (version "0.18") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/windytan/redsea") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1y96g0ra2krjb2kypm8s5gdfia45yci4f36klsvyzg8d53v5cwhn")))) + (build-system gnu-build-system) + (arguments + `(#:phases + (modify-phases %standard-phases + ;; The configure.ac file does not explicitly link against libiconv + ;; except on Mac OS, causing the build to fail. This phase comments + ;; out the original AC_SUBST macro (located inside a conditional) and + ;; adds an explicit use of it underneath, so that libiconv is always + ;; linked against. + (add-after 'unpack 'patch-libiconv + (lambda _ + (substitute* "configure.ac" + (("^ +AC_SUBST") + "# AC_SUBST") + (("esac") + "esac\nAC_SUBST([ICONV], [\"-liconv\"])")) + #t))))) + (inputs + `(("libiconv" ,libiconv) + ("libsndfile" ,libsndfile) + ("liquid-dsp" ,liquid-dsp))) + (native-inputs + `(("autoconf" ,autoconf) + ("automake" ,automake))) + (home-page "https://github.com/windytan/redsea") + (synopsis "Lightweight RDS to JSON decoder") + (description "redsea is a lightweight command-line @dfn{FM Radio Data +System} (FM-RDS) decoder. Redsea can be used with any RTL-SDR USB radio stick +with the rtl_fm tool, or any other @dfn{software-defined radio} (SDR) via +csdr, for example. It can also decode raw ASCII bitstream, the hex format +used by RDS Spy, and audio files containing @dfn{multiplex} signals (MPX).") + (license license:expat))) + +(define-public gnuradio + (package + (name "gnuradio") + (version "3.8.0.0") + (source + (origin + (method url-fetch) + (uri (string-append "https://www.gnuradio.org/releases/gnuradio/" + "gnuradio-" version ".tar.xz")) + (sha256 + (base32 "0aw55gf5549b0fz2qdi7vplcmaf92bj34h40s34b2ycnqasv900r")))) + (build-system cmake-build-system) + (native-inputs + `(("doxygen" ,doxygen) + ("git" ,git-minimal) + ("ghostscript" ,ghostscript) + ("orc" ,orc) + ("pkg-config" ,pkg-config) + ("python" ,python) + ("python-cheetah" ,python-cheetah) + ("python-mako" ,python-mako) + ("python-pyzmq" ,python-pyzmq) + ("python-scipy" ,python-scipy) + ("python-sphinx" ,python-sphinx) + ("swig" ,swig) + ("texlive" ,(texlive-union (list texlive-amsfonts + texlive-latex-amsmath + ;; TODO: Add newunicodechar. + texlive-latex-graphics))) + ("xorg-server" ,xorg-server-for-tests))) + (inputs + `(("alsa-lib" ,alsa-lib) + ("boost" ,boost) + ("cairo" ,cairo) + ("codec2" ,codec2) + ("cppzmq" ,cppzmq) + ("fftwf" ,fftwf) + ("gmp" ,gmp) + ("gsl" ,gsl) + ("gsm" ,gsm) + ("gtk+" ,gtk+) + ("jack" ,jack-1) + ("log4cpp" ,log4cpp) + ("pango" ,pango) + ("portaudio" ,portaudio) + ("python-click" ,python-click) + ("python-click-plugins" ,python-click-plugins) + ("python-lxml" ,python-lxml) + ("python-numpy" ,python-numpy) + ("python-pycairo" ,python-pycairo) + ("python-pygobject" ,python-pygobject) + ("python-pyqt" ,python-pyqt) + ("python-pyyaml" ,python-pyyaml) + ("qtbase" ,qtbase) + ("qwt" ,qwt) + ("zeromq" ,zeromq))) + (arguments + `(#:modules ((guix build cmake-build-system) + ((guix build glib-or-gtk-build-system) #:prefix glib-or-gtk:) + ((guix build python-build-system) #:prefix python:) + (guix build utils) + (ice-9 match)) + #:imported-modules (,@%cmake-build-system-modules + (guix build glib-or-gtk-build-system) + (guix build python-build-system)) + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'fix-paths + (lambda* (#:key inputs #:allow-other-keys) + (let ((qwt (assoc-ref inputs "qwt"))) + (substitute* "cmake/Modules/FindQwt.cmake" + (("/usr/include") + (string-append qwt "/include")) + (("/usr/lib") + (string-append qwt "/lib")) + (("qwt6-\\$\\{QWT_QT_VERSION\\}") + "qwt"))) + (substitute* "cmake/Modules/GrPython.cmake" + (("dist-packages") + "site-packages")) + (substitute* '("gr-vocoder/swig/vocoder_swig.i" + "gr-vocoder/include/gnuradio/vocoder/codec2.h" + "gr-vocoder/include/gnuradio/vocoder/freedv_api.h") + ((" Date: Wed, 15 Apr 2020 10:02:13 +0200 Subject: gnu: gnuradio: Use shared volk instead of bundled one. * gnu/packages/radio.scm (gnuradio)[source]: Add snippet to delete bundled volk. [inputs]: Add volk. [arguments]: Add "-DENABLE_INTERNAL_VOLK=OFF" to configure-flags. --- gnu/packages/radio.scm | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index e1e5a98c68..f047f5bb9d 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -34,6 +34,7 @@ #:use-module (gnu packages boost) #:use-module (gnu packages check) #:use-module (gnu packages documentation) + #:use-module (gnu packages engineering) #:use-module (gnu packages ghostscript) #:use-module (gnu packages glib) #:use-module (gnu packages gstreamer) @@ -243,7 +244,13 @@ used by RDS Spy, and audio files containing @dfn{multiplex} signals (MPX).") (uri (string-append "https://www.gnuradio.org/releases/gnuradio/" "gnuradio-" version ".tar.xz")) (sha256 - (base32 "0aw55gf5549b0fz2qdi7vplcmaf92bj34h40s34b2ycnqasv900r")))) + (base32 "0aw55gf5549b0fz2qdi7vplcmaf92bj34h40s34b2ycnqasv900r")) + (modules '((guix build utils))) + (snippet + '(begin + ;; Delete bundled volk to use the shared one. + (delete-file-recursively "volk") + #t)))) (build-system cmake-build-system) (native-inputs `(("doxygen" ,doxygen) @@ -288,6 +295,7 @@ used by RDS Spy, and audio files containing @dfn{multiplex} signals (MPX).") ("python-pyyaml" ,python-pyyaml) ("qtbase" ,qtbase) ("qwt" ,qwt) + ("volk" ,volk) ("zeromq" ,zeromq))) (arguments `(#:modules ((guix build cmake-build-system) @@ -298,6 +306,8 @@ used by RDS Spy, and audio files containing @dfn{multiplex} signals (MPX).") #:imported-modules (,@%cmake-build-system-modules (guix build glib-or-gtk-build-system) (guix build python-build-system)) + #:configure-flags + '("-DENABLE_INTERNAL_VOLK=OFF") #:phases (modify-phases %standard-phases (add-after 'unpack 'fix-paths -- cgit 1.4.1 From b39262021d4ffadae02e64058baf8a7255df8782 Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Wed, 15 Apr 2020 10:07:52 +0200 Subject: gnu: gnuradio-osmosdr: Add volk to inputs. * gnu/packages/radio.scm (gnuradio-osmosdr)[inputs]: Add volk. --- gnu/packages/radio.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index f047f5bb9d..7d5620d288 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -393,7 +393,8 @@ environment.") ("gnuradio" ,gnuradio) ("log4cpp" ,log4cpp) ;; TODO: Add more drivers. - ("rtl-sdr" ,rtl-sdr))) + ("rtl-sdr" ,rtl-sdr) + ("volk" ,volk))) (synopsis "GNU Radio block for interfacing with various radio hardware") (description "This is a block for GNU Radio allowing to use a common API to access different radio hardware.") -- cgit 1.4.1 From 29cab668f6e48d6bc02a3ac421e40cda5f3b3bfa Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Wed, 15 Apr 2020 10:10:58 +0200 Subject: gnu: gnuradio-iqbalance: Add volk to inputs. * gnu/packages/radio.scm (gnuradio-iqbalance)[inputs]: Add volk. --- gnu/packages/radio.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index 7d5620d288..7fa3e44aec 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -473,7 +473,8 @@ primitives for SDR (Software Defined Radio).") ("gmp" ,gmp) ("gnuradio" ,gnuradio) ("libosmo-dsp" ,libosmo-dsp) - ("log4cpp" ,log4cpp))) + ("log4cpp" ,log4cpp) + ("volk" ,volk))) (synopsis "GNU Radio block to correct IQ imbalance") (description "This is a GNU Radio block to correct IQ imbalance in quadrature -- cgit 1.4.1 From 01e62a022dbdf7ff935d1332a59c5b0c3e7d4a6b Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Wed, 15 Apr 2020 10:14:45 +0200 Subject: gnu: gqrx: Add volk to inputs. * gnu/packages/radio.scm (gqrx)[inputs]: Add volk. --- gnu/packages/radio.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index 7fa3e44aec..a84a31fd9c 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -516,7 +516,8 @@ to the fix block above. ("portaudio" ,portaudio) ("pulseaudio" ,pulseaudio) ("qtbase" ,qtbase) - ("qtsvg" ,qtsvg))) + ("qtsvg" ,qtsvg) + ("volk" ,volk))) (arguments `(#:tests? #f)) ; No tests (synopsis "Software defined radio receiver") -- cgit 1.4.1 From 72f6ee0e15a12a616cfe70805ce297aa9a66285d Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Wed, 15 Apr 2020 17:27:22 +0200 Subject: gnu: Add fldigi. * gnu/packages/radio.scm (fldigi): New variable. --- gnu/packages/radio.scm | 35 +++++++++++++++++++++++++++++++++++ 1 file changed, 35 insertions(+) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index a84a31fd9c..7afb06210d 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -35,6 +35,7 @@ #:use-module (gnu packages check) #:use-module (gnu packages documentation) #:use-module (gnu packages engineering) + #:use-module (gnu packages fltk) #:use-module (gnu packages ghostscript) #:use-module (gnu packages glib) #:use-module (gnu packages gstreamer) @@ -525,3 +526,37 @@ to the fix block above. using GNU Radio and the Qt GUI toolkit.") (home-page "https://gqrx.dk/") (license license:gpl3+))) + +(define-public fldigi + (package + (name "fldigi") + (version "4.1.11") + (source + (origin + (method url-fetch) + (uri (string-append "http://www.w1hkj.com/files/fldigi/fldigi-" + version ".tar.gz")) + (sha256 + (base32 "1y62xn1pim38ibaf2mbl8b7aq20jdaac6lgggb9r402w9bj5b196")))) + (build-system gnu-build-system) + (native-inputs + `(("pkg-config" ,pkg-config))) + (inputs + `(("alsa-lib" ,alsa-lib) + ("fltk" ,fltk) + ("libpng" ,libpng) + ("libsamplerate" ,libsamplerate) + ("libx11" ,libx11) + ("libxext" ,libxext) + ("libxfixes" ,libxfixes) + ("libxft" ,libxft) + ("portaudio" ,portaudio) + ("pulseaudio" ,pulseaudio))) + (synopsis "Software modem for amateur radio use") + (description + "Fldigi is a software modem for amateur radio use. It is a sound card +based program that is used for both transmitting and receiving data by +connecting the microphone and headphone connections of a computer to some radio +hardware.") + (home-page "http://www.w1hkj.com/") + (license license:gpl3+))) -- cgit 1.4.1 From 8080c03d14ccdd7897a902966ea4aeea8dbfd359 Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Wed, 15 Apr 2020 19:44:41 +0200 Subject: gnu: Add flrig. * gnu/packages/radio.scm (flrig): New variable. --- gnu/packages/radio.scm | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index 7afb06210d..1cee3ba594 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -560,3 +560,31 @@ connecting the microphone and headphone connections of a computer to some radio hardware.") (home-page "http://www.w1hkj.com/") (license license:gpl3+))) + +(define-public flrig + (package + (name "flrig") + (version "1.3.50") + (source + (origin + (method url-fetch) + (uri (string-append "http://www.w1hkj.com/files/flrig/flrig-" + version ".tar.gz")) + (sha256 + (base32 "0fzrknzzi8kmzmrcfpc8rxr7v4a4ny6z6z5q5qwh95sp2kn2qzp9")))) + (build-system gnu-build-system) + (native-inputs + `(("pkg-config" ,pkg-config))) + (inputs + `(("fltk" ,fltk) + ("libx11" ,libx11) + ("libxext" ,libxext) + ("libxfixes" ,libxfixes) + ("libxft" ,libxft))) + (synopsis "Radio transceiver control program") + (description + "Flrig is a transceiver control program for amateur radio use. +It provides computer aided control of various radios using a serial +or USB connection.") + (home-page "http://www.w1hkj.com/") + (license license:gpl3+))) -- cgit 1.4.1 From 660912a477d4b9145e0f0b6bc289555842aec3f6 Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Thu, 16 Apr 2020 14:53:50 +0200 Subject: gnu: Add flamp. * gnu/packages/radio.scm (flamp): New variable. --- gnu/packages/radio.scm | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index 1cee3ba594..417677ec04 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -588,3 +588,30 @@ It provides computer aided control of various radios using a serial or USB connection.") (home-page "http://www.w1hkj.com/") (license license:gpl3+))) + +(define-public flamp + (package + (name "flamp") + (version "2.2.05") + (source + (origin + (method url-fetch) + (uri (string-append "http://www.w1hkj.com/files/flamp/flamp-" + version ".tar.gz")) + (sha256 + (base32 "19z1kghhdf7bq6hi2j0mzlsn2nhpn3gl1a623x3inmsk80yw3ck4")))) + (build-system gnu-build-system) + (native-inputs + `(("pkg-config" ,pkg-config))) + (inputs + `(("fltk" ,fltk) + ("libx11" ,libx11) + ("libxext" ,libxext) + ("libxfixes" ,libxfixes) + ("libxft" ,libxft))) + (synopsis "Tool for AMP file transfer") + (description + "FLAMP is a program for transfering files by radio waves using AMP +(Amateur Multicast Protocol).") + (home-page "http://www.w1hkj.com/") + (license license:gpl3+))) -- cgit 1.4.1 From 90ec7085793700552359d9d409287528437f0280 Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Thu, 16 Apr 2020 15:08:53 +0200 Subject: gnu: Add flwrap. * gnu/packages/radio.scm (flwrap): New variable. --- gnu/packages/radio.scm | 29 +++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index 417677ec04..8f1562a176 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -615,3 +615,32 @@ or USB connection.") (Amateur Multicast Protocol).") (home-page "http://www.w1hkj.com/") (license license:gpl3+))) + +(define-public flwrap + (package + (name "flwrap") + (version "1.3.5") + (source + (origin + (method url-fetch) + (uri (string-append "http://www.w1hkj.com/files/flwrap/flwrap-" + version ".tar.gz")) + (sha256 + (base32 "0qqivqkkravcg7j45740xfky2q3k7czqpkj6y364qff424q2pppg")))) + (build-system gnu-build-system) + (native-inputs + `(("pkg-config" ,pkg-config))) + (inputs + `(("fltk" ,fltk) + ("libx11" ,libx11) + ("libxext" ,libxext) + ("libxfixes" ,libxfixes) + ("libxft" ,libxft))) + (synopsis "File encapsulation program") + (description + "Flwrap is a software utility for amateur radio use. Its purpose is to +encapsulate both text and binary files in a way that allows them to be +transmitted over any of several digital modes and verified at the receipt end +for correctness.") + (home-page "http://www.w1hkj.com/") + (license license:gpl3+))) -- cgit 1.4.1 From 409dfdf03d60cd7e2cf45897c5a19f7a1bd97ba3 Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Thu, 23 Apr 2020 16:13:18 +0200 Subject: gnu: Add hamlib. * gnu/packages/radio.scm (hamlib): New package. --- gnu/packages/radio.scm | 44 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 44 insertions(+) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index 8f1562a176..f2970eb77b 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -36,6 +36,7 @@ #:use-module (gnu packages documentation) #:use-module (gnu packages engineering) #:use-module (gnu packages fltk) + #:use-module (gnu packages gd) #:use-module (gnu packages ghostscript) #:use-module (gnu packages glib) #:use-module (gnu packages gstreamer) @@ -44,6 +45,7 @@ #:use-module (gnu packages libusb) #:use-module (gnu packages linux) #:use-module (gnu packages logging) + #:use-module (gnu packages lua) #:use-module (gnu packages maths) #:use-module (gnu packages multiprecision) #:use-module (gnu packages networking) @@ -53,8 +55,10 @@ #:use-module (gnu packages python-science) #:use-module (gnu packages python-xyz) #:use-module (gnu packages qt) + #:use-module (gnu packages readline) #:use-module (gnu packages sphinx) #:use-module (gnu packages swig) + #:use-module (gnu packages tcl) #:use-module (gnu packages tex) #:use-module (gnu packages version-control) #:use-module (gnu packages xml) @@ -644,3 +648,43 @@ transmitted over any of several digital modes and verified at the receipt end for correctness.") (home-page "http://www.w1hkj.com/") (license license:gpl3+))) + +(define-public hamlib + (package + (name "hamlib") + (version "3.3") + (source + (origin + (method url-fetch) + (uri (string-append + "https://github.com/Hamlib/Hamlib/releases/download/" + version "/hamlib-" version ".tar.gz")) + (sha256 + (base32 "10788mgrhbc57zpzakcxv5aqnr2819pcshml6fbh8zvnkja562y9")))) + (build-system gnu-build-system) + (native-inputs + `(("doxygen" ,doxygen) + ("lua" ,lua) + ("pkg-config" ,pkg-config) + ("python-wrapper" ,python-wrapper) + ("swig" ,swig) + ("tcl" ,tcl))) + (inputs + `(("gd" ,gd) + ("libusb" ,libusb) + ("libxml2" ,libxml2) + ("readline" ,readline))) + (arguments + `(#:configure-flags '("--disable-static" + "--with-lua-binding" + "--with-python-binding" + "--with-tcl-binding" + "--with-xml-support"))) + (synopsis "Tools and API to control radios") + (description + "The Ham Radio Control Library (Hamlib) is a project to provide programs +with a consistent Application Programming Interface (API) for controlling the +myriad of radios and rotators available to amateur radio and communications +users.") + (home-page "https://hamlib.github.io/") + (license (list license:gpl2+ license:lgpl2.1+)))) -- cgit 1.4.1 From e6d141652c27600ea8769456c8f3556073f191d3 Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Thu, 23 Apr 2020 17:35:19 +0200 Subject: gnu: fldigi: Add hamlib support. * gnu/packages/radio.scm (fldigi)[inputs]: Add hamlib and libusb. --- gnu/packages/radio.scm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index f2970eb77b..caaa87a9c8 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -548,8 +548,10 @@ using GNU Radio and the Qt GUI toolkit.") (inputs `(("alsa-lib" ,alsa-lib) ("fltk" ,fltk) + ("hamlib" ,hamlib) ("libpng" ,libpng) ("libsamplerate" ,libsamplerate) + ("libusb" ,libusb) ("libx11" ,libx11) ("libxext" ,libxext) ("libxfixes" ,libxfixes) -- cgit 1.4.1 From 5a915632210e7007d63aae7dcf1999323c69b4ab Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Thu, 23 Apr 2020 23:47:44 +0200 Subject: gnu: Add wsjtx. * gnu/packages/radio.scm (wsjtx-hamlib): New variable. (wsjtx): New variable. --- gnu/packages/radio.scm | 72 ++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 72 insertions(+) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index caaa87a9c8..fff68cf657 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -36,6 +36,7 @@ #:use-module (gnu packages documentation) #:use-module (gnu packages engineering) #:use-module (gnu packages fltk) + #:use-module (gnu packages gcc) #:use-module (gnu packages gd) #:use-module (gnu packages ghostscript) #:use-module (gnu packages glib) @@ -56,10 +57,12 @@ #:use-module (gnu packages python-xyz) #:use-module (gnu packages qt) #:use-module (gnu packages readline) + #:use-module (gnu packages ruby) #:use-module (gnu packages sphinx) #:use-module (gnu packages swig) #:use-module (gnu packages tcl) #:use-module (gnu packages tex) + #:use-module (gnu packages texinfo) #:use-module (gnu packages version-control) #:use-module (gnu packages xml) #:use-module (gnu packages xorg) @@ -690,3 +693,72 @@ myriad of radios and rotators available to amateur radio and communications users.") (home-page "https://hamlib.github.io/") (license (list license:gpl2+ license:lgpl2.1+)))) + +(define wsjtx-hamlib + ;; Fork of hamlib with custom patches used by wsjtx. + (package + (inherit hamlib) + (name "wsjtx-hamlib") + (version "2.1.2") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://git.code.sf.net/u/bsomervi/hamlib.git") + (commit (string-append "wsjtx-" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1ksv3cmr1dl45p0pp1panyc9dngd158gvv9ysv25lq4nqv1wn87i")))) + (native-inputs + `(("autoconf" ,autoconf) + ("automake" ,automake) + ("libtool" ,libtool) + ("texinfo" ,texinfo) + ,@(package-native-inputs hamlib))))) + +(define-public wsjtx + (package + (name "wsjtx") + (version "2.1.2") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://git.code.sf.net/p/wsjt/wsjtx.git") + (commit (string-append "wsjtx-" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1fnqzjd3dmxp3yjwjvwz2djk9gzb1y2cqfa188f3x8lynxhdhnfs")) + (modules '((guix build utils))) + (snippet + '(begin + ;; Delete bundled boost to use the shared one. + (delete-file-recursively "boost") + #t)))) + (build-system qt-build-system) + (native-inputs + `(("asciidoc" ,asciidoc) + ("gfortran" ,gfortran) + ("pkg-config" ,pkg-config) + ("qttools" ,qttools) + ("ruby-asciidoctor" ,ruby-asciidoctor))) + (inputs + `(("boost" ,boost) + ("fftw" ,fftw) + ("fftwf" ,fftwf) + ("hamlib" ,wsjtx-hamlib) + ("libusb" ,libusb) + ("qtbase" ,qtbase) + ("qtmultimedia" ,qtmultimedia) + ("qtserialport" ,qtserialport))) + (arguments + `(#:tests? #f)) ; No test suite + (synopsis "Weak-signal ham radio communication program") + (description + "WSJT-X implements communication protocols or modes called FT4, FT8, +JT4, JT9, JT65, QRA64, ISCAT, MSK144, and WSPR, as well as one called Echo for +detecting and measuring your own radio signals reflected from the Moon. These +modes were all designed for making reliable, confirmed QSOs under extreme +weak-signal conditions.") + (home-page "https://www.physics.princeton.edu/pulsar/k1jt/wsjtx.html") + (license license:gpl3))) -- cgit 1.4.1 From f38ba7b65dca8a4116ba8983357588f8a73a543f Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Mon, 27 Apr 2020 16:54:34 +0200 Subject: gnu: fldigi: Update to 4.1.12. * gnu/packages/radio.scm (fldigi): Update to 4.1.12. --- gnu/packages/radio.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index fff68cf657..b748aa4183 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -537,14 +537,14 @@ using GNU Radio and the Qt GUI toolkit.") (define-public fldigi (package (name "fldigi") - (version "4.1.11") + (version "4.1.12") (source (origin (method url-fetch) (uri (string-append "http://www.w1hkj.com/files/fldigi/fldigi-" version ".tar.gz")) (sha256 - (base32 "1y62xn1pim38ibaf2mbl8b7aq20jdaac6lgggb9r402w9bj5b196")))) + (base32 "1yjjv2ss84xfiaidypp476mhrbpnw4zf7mb5cdqwhdh604x0svr1")))) (build-system gnu-build-system) (native-inputs `(("pkg-config" ,pkg-config))) -- cgit 1.4.1 From 79c4fb4f366cff3ad75982b4a09c6bd82e604674 Mon Sep 17 00:00:00 2001 From: Christopher Howard Date: Tue, 28 Apr 2020 10:06:34 +0200 Subject: gnu: Add hackrf. * gnu/packages/radio.scm (hackrf): New variable. Co-authored-by: Guillaume Le Vaillant --- gnu/packages/radio.scm | 69 +++++++++++++++++++++++++++++++++++++++++++++++++- 1 file changed, 68 insertions(+), 1 deletion(-) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index b748aa4183..24ee67017a 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2017, 2018, 2019 Arun Isaac -;;; Copyright © 2019 Christopher Howard +;;; Copyright © 2019, 2020 Christopher Howard ;;; Copyright © 2019, 2020 Evan Straw ;;; Copyright © 2020 Guillaume Le Vaillant ;;; Copyright © 2020 Danny Milosavljevic @@ -654,6 +654,73 @@ for correctness.") (home-page "http://www.w1hkj.com/") (license license:gpl3+))) +(define-public hackrf + ;; Using a git commit because there have been many many commits + ;; since the relase two years ago, but no sign of a promised + ;; release for many months now. + (let ((commit "43e6f99fe8543094d18ff3a6550ed2066c398862") + (revision "0")) + (package + (name "hackrf") + (version (git-version "2018.01.1" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/mossmann/hackrf.git") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0avnv693xi0zsnrvkbfn0ln1r3s1iyj0bz7sc3gxay909av0pvbc")))) + (build-system cmake-build-system) + (arguments + '(#:configure-flags + (list "-DUDEV_RULES_GROUP=dialout" + (string-append "-DUDEV_RULES_PATH=" + (assoc-ref %outputs "out") + "/lib/udev/rules.d")) + #:phases + (modify-phases %standard-phases + (add-before 'configure 'enter-source-directory + (lambda _ + (chdir "host") + #t)) + (add-after 'install 'delete-static-library + (lambda* (#:key outputs #:allow-other-keys) + (delete-file (string-append (assoc-ref outputs "out") + "/lib/libhackrf.a")) + #t)) + (add-before 'install-license-files 'leave-source-directory + (lambda _ + (chdir "..") + #t))) + #:tests? #f)) ; no test suite + (native-inputs + `(("pkg-config" ,pkg-config))) + (inputs + `(("fftw" ,fftw) + ("fftwf" ,fftwf) + ("libusb" ,libusb))) + (home-page "https://greatscottgadgets.com/hackrf/") + (synopsis "User-space library and utilities for HackRF SDR") + (description + "Command line utilities and a C library for controlling the HackRF +Software Defined Radio (SDR) over USB. Installing this package installs +the userspace hackrf utilities and C library. To install the hackrf +udev rules, you must add this package as a system service via +modify-services. E.g.: + +@lisp +(services + (modify-services + %desktop-services + (udev-service-type config => + (udev-configuration (inherit config) + (rules (cons hackrf + (udev-configuration-rules config))))))) +@end lisp") + (license license:gpl2)))) + (define-public hamlib (package (name "hamlib") -- cgit 1.4.1 From 62d45e463c3b1ecad90004c47356cba342dd23d8 Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Tue, 28 Apr 2020 10:10:16 +0200 Subject: gnu: gnuradio-osmosdr: Add hackrf support. * gnu/packages/radio.scm (gnuradio-osmosdr)[inputs]: Add hackrf. --- gnu/packages/radio.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index 24ee67017a..4e11dda40a 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -399,8 +399,8 @@ environment.") ("fftwf" ,fftwf) ("gmp" ,gmp) ("gnuradio" ,gnuradio) + ("hackrf" ,hackrf) ("log4cpp" ,log4cpp) - ;; TODO: Add more drivers. ("rtl-sdr" ,rtl-sdr) ("volk" ,volk))) (synopsis "GNU Radio block for interfacing with various radio hardware") -- cgit 1.4.1 From f93eebbf9ca8477404827f44daf3121b11120e99 Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Wed, 29 Apr 2020 01:11:53 +0200 Subject: gnu: Add xnec2c. * gnu/packages/radio.scm (xnec2c): New variable. --- gnu/packages/radio.scm | 49 +++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 49 insertions(+) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index 4e11dda40a..b439e5feff 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -829,3 +829,52 @@ modes were all designed for making reliable, confirmed QSOs under extreme weak-signal conditions.") (home-page "https://www.physics.princeton.edu/pulsar/k1jt/wsjtx.html") (license license:gpl3))) + +(define-public xnec2c + (package + (name "xnec2c") + (version "4.1.1") + (source + (origin + (method url-fetch) + (uri (string-append "http://www.5b4az.org/pkg/nec2/xnec2c/xnec2c-" + version ".tar.bz2")) + (sha256 + (base32 "1myvlkfybb2ha8l0h96ca3iz206zzy9z5iizm0sbab2zzp78n1r9")))) + (build-system gnu-build-system) + (native-inputs + `(("pkg-config" ,pkg-config))) + (inputs + `(("gtk+" ,gtk+))) + (arguments + `(#:phases + (modify-phases %standard-phases + (add-after 'unpack 'fix-makefile + (lambda* (#:key outputs #:allow-other-keys) + (substitute* '("Makefile.am" "Makefile.in") + ;; The DESTDIR variable does not get replaced the prefix + ;; in the final Makefile, so let's do here. + (("\\$\\(DESTDIR\\)/usr") + (assoc-ref outputs "out"))) + #t)) + (add-after 'fix-makefile 'fix-paths + (lambda* (#:key outputs #:allow-other-keys) + ;; Increase the max length of the path to the glade file, + ;; so that the '/gnu/store/...' path can fit in. + (substitute* '("src/shared.c" "src/shared.h") + (("char xnec2c_glade\\[64\\];") + "char xnec2c_glade[256];")) + ;; Fix hard coded references to '/usr/...'. + (substitute* '("src/geom_edit.c" "src/main.c") + (("\"/usr") + (string-append "\"" (assoc-ref outputs "out")))) + #t))))) + (synopsis "Antenna modeling software") + (description + "Xnec2c is a GTK3-based graphical version of nec2c, a translation to the +C language of NEC2, the FORTRAN Numerical Electromagnetics Code commonly used +for antenna simulation and analysis. It can be used to define the geometry of +an antenna, and then plot the radiation pattern or frequency-related data like +gain and standing wave ratio.") + (home-page "http://www.5b4az.org/") + (license license:gpl3+))) -- cgit 1.4.1 From cf480830e22e7725b8607b5b895e49f74d4e1525 Mon Sep 17 00:00:00 2001 From: Guillaume Le Vaillant Date: Wed, 29 Apr 2020 10:15:57 +0200 Subject: gnu: gnuradio: Fix search paths for third-party blocks. * gnu/packages/radio.scm (gnuradio)[native-search-paths]: Add definition of the GRC_BLOCKS_PATH variable. --- gnu/packages/radio.scm | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'gnu/packages/radio.scm') diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index b439e5feff..935880780f 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -363,6 +363,10 @@ used by RDS Spy, and audio files containing @dfn{multiplex} signals (MPX).") (wrap-program (string-append out "/bin/gnuradio-companion") `("GI_TYPELIB_PATH" ":" prefix ,(filter identity paths)))) #t))))) + (native-search-paths + (list (search-path-specification + (variable "GRC_BLOCKS_PATH") + (files '("/share/gnuradio/grc/blocks"))))) (synopsis "Toolkit for software-defined radios") (description "GNU Radio is a development toolkit that provides signal processing blocks -- cgit 1.4.1