;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2017, 2018, 2019 Arun Isaac <arunisaac@systemreboot.net>
+;;; Copyright © 2017, 2018, 2019, 2020 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 2019, 2020 Christopher Howard <christopher@librehacker.com>
;;; Copyright © 2019, 2020 Evan Straw <evan.straw99@gmail.com>
;;; Copyright © 2020 Guillaume Le Vaillant <glv@posteo.net>
;;; Copyright © 2020 Danny Milosavljevic <dannym@scratchpost.org>
;;; Copyright © 2020 Charlie Ritter <chewzerita@posteo.net>
+;;; Copyright © 2020 Tobias Geerinckx-Rice <me@tobias.gr>
;;;
;;; This file is part of GNU Guix.
;;;
#:use-module (gnu packages lua)
#:use-module (gnu packages maths)
#:use-module (gnu packages multiprecision)
+ #:use-module (gnu packages ncurses)
#:use-module (gnu packages networking)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages pulseaudio)
#: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)
#:use-module (guix build-system cmake)
(source
(origin (method git-fetch)
(uri (git-reference
- (url "https://github.com/jgaeddert/liquid-dsp.git")
+ (url "https://github.com/jgaeddert/liquid-dsp")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(origin
(method git-fetch)
(uri (git-reference
- (url "git://git.osmocom.org/rtl-sdr.git")
+ (url "https://git.osmocom.org/rtl-sdr/")
(commit version)))
(file-name (git-file-name name version))
(sha256
(native-inputs
`(("pkg-config" ,pkg-config)))
(arguments
- `(#:configure-flags '("-DDETACH_KERNEL_DRIVER=ON")
- #:tests? #f)) ; No tests
+ `(#:configure-flags '("-DDETACH_KERNEL_DRIVER=ON"
+ "-DINSTALL_UDEV_RULES=ON")
+ #:tests? #f ; No tests
+ #:phases
+ (modify-phases %standard-phases
+ (add-after 'unpack 'fix-paths
+ (lambda* (#:key outputs #:allow-other-keys)
+ (substitute* "CMakeLists.txt"
+ (("DESTINATION \"/etc/udev/")
+ (string-append "DESTINATION \""
+ (assoc-ref outputs "out")
+ "/lib/udev/")))
+ #t)))))
(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.")
+samples to the host. @code{rtl-sdr} provides drivers for this purpose.
+
+The default Linux driver managing DVB-T dongles as TV devices doesn't work for
+SDR purposes and clashes with this package. Therefore you must prevent the
+kernel from loading it automatically by adding the following line to your
+system configuration:
+
+@lisp
+(kernel-arguments '(\"modprobe.blacklist=dvb_usb_rtl28xxu\"))
+@end lisp
+
+To install the rtl-sdr udev rules, you must extend 'udev-service-type' with
+this package. E.g.: @code{(udev-rules-service 'rtl-sdr rtl-sdr)}")
(license license:gpl2+)))
(define-public chirp
(package
(name "chirp")
- (version "20181205")
+ (version "20200430")
(source
(origin
(method url-fetch)
version "/chirp-daily-" version ".tar.gz"))
(sha256
(base32
- "1cp280b95j39xaxs50zn55jigg7pyfpm9n098hmsyxrplqn8z43c"))))
+ "060fzplgmpfrk6wkfaasx7phpfk90mmylk6drbwzk4f9r1655vda"))))
(build-system python-build-system)
(inputs
`(("python2-libxml2" ,python2-libxml2)
(origin
(method git-fetch)
(uri (git-reference
- (url "https://github.com/csete/aptdec")
+ (url "https://github.com/Xerbo/aptdec")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
`(("libpng" ,libpng)
("libsndfile" ,libsndfile)))
(arguments
- `(#:make-flags (list "CC=gcc")
+ `(#:make-flags
+ (list
+ (string-append "CC="
+ (if ,(%current-target-system)
+ (string-append (assoc-ref %build-inputs "cross-gcc")
+ "/bin/" ,(%current-target-system) "-gcc")
+ "gcc"))
+ (string-append "PREFIX=" %output)
+ (string-append "RPM_BUILD_ROOT=" %output))
#:tests? #f ; no tests
#:phases
(modify-phases %standard-phases
(let ((out (assoc-ref outputs "out")))
(install-file "atpdec" (string-append out "/bin")))
#t)))))
- (home-page "https://github.com/csete/aptdec")
+ (home-page "https://github.com/Xerbo/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
(build-system cmake-build-system)
(native-inputs
`(("doxygen" ,doxygen)
- ("git" ,git-minimal)
("ghostscript" ,ghostscript)
("orc" ,orc)
("pkg-config" ,pkg-config)
(define-public gnuradio-osmosdr
(package
(name "gnuradio-osmosdr")
- (version "0.2.0")
+ (version "0.2.2")
(source
(origin
(method git-fetch)
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
- (base32 "1rdx7fa0xiq0qmgrrbby7z1bblmqhl9qh9jqpsznzxkx91f17ypd"))))
+ (base32 "1aqj5cylipmmjh1x1kb2j8262hxq6mi86dgb2zphj94wvsab2ghx"))))
(build-system cmake-build-system)
(native-inputs
`(("doxygen" ,doxygen)
- ("git" ,git-minimal)
("pkg-config" ,pkg-config)
("python" ,python)
("python-mako" ,python-mako)
("automake" ,automake)
("bash-minimal" ,bash-minimal)
("doxygen" ,doxygen)
- ("git" ,git-minimal)
("libtool" ,libtool)
("pkg-config" ,pkg-config)
("texlive" ,(texlive-union (list texlive-amsfonts
(origin
(method git-fetch)
(uri (git-reference
- (url "https://github.com/csete/gqrx.git")
+ (url "https://github.com/csete/gqrx")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(define-public fldigi
(package
(name "fldigi")
- (version "4.1.12")
+ (version "4.1.14")
(source
(origin
(method url-fetch)
(uri (string-append "http://www.w1hkj.com/files/fldigi/fldigi-"
version ".tar.gz"))
(sha256
- (base32 "1yjjv2ss84xfiaidypp476mhrbpnw4zf7mb5cdqwhdh604x0svr1"))))
+ (base32 "0hr6xbv01xf7z4r2jxxhn8xjdmca2198q4m9glh4877dllvfq6xj"))))
(build-system gnu-build-system)
(native-inputs
`(("pkg-config" ,pkg-config)))
(define-public flrig
(package
(name "flrig")
- (version "1.3.50")
+ (version "1.3.51")
(source
(origin
(method url-fetch)
(uri (string-append "http://www.w1hkj.com/files/flrig/flrig-"
version ".tar.gz"))
(sha256
- (base32 "0fzrknzzi8kmzmrcfpc8rxr7v4a4ny6z6z5q5qwh95sp2kn2qzp9"))))
+ (base32 "0aq4x0ai9q08ypfhzfj2inc4z3q39zq1l6h9as1kil9yn4zbay61"))))
(build-system gnu-build-system)
(native-inputs
`(("pkg-config" ,pkg-config)))
("libxft" ,libxft)))
(synopsis "Tool for AMP file transfer")
(description
- "FLAMP is a program for transfering files by radio waves using AMP
+ "FLAMP is a program for transferring files by radio waves using AMP
(Amateur Multicast Protocol).")
(home-page "http://www.w1hkj.com/")
(license license:gpl3+)))
(origin
(method git-fetch)
(uri (git-reference
- (url "https://github.com/mossmann/hackrf.git")
+ (url "https://github.com/mossmann/hackrf")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(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")
+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 extend 'udev-service-type' with this package. E.g.:
+@code{(udev-rules-service 'hackrf hackrf #:groups '(\"dialout\"))}.")
(license license:gpl2))))
(define-public hamlib
(package
(inherit hamlib)
(name "wsjtx-hamlib")
- (version "2.1.2")
+ (version "2.2.2")
(source
(origin
(method git-fetch)
(commit (string-append "wsjtx-" version))))
(file-name (git-file-name name version))
(sha256
- (base32 "1ksv3cmr1dl45p0pp1panyc9dngd158gvv9ysv25lq4nqv1wn87i"))))
+ (base32 "01h5ps0yq5vi1x9rkw742gx6a5fj02zhbpi89i412qdfbnyk35cv"))))
(native-inputs
`(("autoconf" ,autoconf)
("automake" ,automake)
("libtool" ,libtool)
("texinfo" ,texinfo)
- ,@(package-native-inputs hamlib)))))
+ ,@(package-native-inputs hamlib)))
+ (arguments
+ `(#:configure-flags '("--disable-static"
+ "--with-lua-binding"
+ "--with-python-binding"
+ "--with-tcl-binding"
+ "--with-xml-support")
+ #:phases
+ (modify-phases %standard-phases
+ (add-after 'unpack 'fix-tests
+ (lambda _
+ (substitute* "tests/testloc.c"
+ (("dmmm2dec\\(deg, mmm, nesw\\);")
+ "dmmm2dec(deg, mmm, 0, nesw);"))
+ #t)))))))
(define-public wsjtx
(package
(name "wsjtx")
- (version "2.1.2")
+ (version "2.2.2")
(source
(origin
(method git-fetch)
(commit (string-append "wsjtx-" version))))
(file-name (git-file-name name version))
(sha256
- (base32 "1fnqzjd3dmxp3yjwjvwz2djk9gzb1y2cqfa188f3x8lynxhdhnfs"))
+ (base32 "0fhws44gg05d9y2al0pcdnxwxwh4bazcfl0g5mq2ks1r7w23wi5x"))
(modules '((guix build utils)))
(snippet
'(begin
("qtmultimedia" ,qtmultimedia)
("qtserialport" ,qtserialport)))
(arguments
- `(#:tests? #f)) ; No test suite
+ `(#:tests? #f ; No test suite
+ #:phases
+ (modify-phases %standard-phases
+ (add-after 'unpack 'work-around-runtime-bug
+ (lambda _
+ ;; Some of the programs in this package fail to find symbols
+ ;; in libm at runtime. Adding libm manually at the end of the
+ ;; library lists when linking the programs seems to help.
+ ;; TODO: find exactly what is wrong in the way the programs
+ ;; are built.
+ (substitute* "CMakeLists.txt"
+ (("target_link_libraries \\((.*)\\)" all libs)
+ (string-append "target_link_libraries (" libs " m)")))
+ #t)))))
(synopsis "Weak-signal ham radio communication program")
(description
"WSJT-X implements communication protocols or modes called FT4, FT8,
(home-page "https://www.physics.princeton.edu/pulsar/k1jt/wsjtx.html")
(license license:gpl3)))
+(define-public js8call
+ (package
+ (inherit wsjtx)
+ (name "js8call")
+ (version "2.2.0")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "http://files.js8call.com/" version
+ "/js8call-" version ".tgz"))
+ (sha256
+ (base32 "149sjwc4zg6ckgq26af93p4fxappa4k9dh7rdy67g8ajfjad4cd8"))
+ (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
+ #:phases
+ (modify-phases %standard-phases
+ (add-after 'unpack 'fix-paths
+ (lambda* (#:key outputs #:allow-other-keys)
+ (substitute* "CMakeLists.txt"
+ (("DESTINATION /usr/share")
+ (string-append "DESTINATION "
+ (assoc-ref outputs "out")
+ "/share")))
+ #t))
+ (add-after 'fix-paths 'work-around-runtime-bug
+ (lambda _
+ ;; Some of the programs in this package fail to find symbols
+ ;; in libm at runtime. Adding libm manually at the end of the
+ ;; library lists when linking the programs seems to help.
+ ;; TODO: find exactly what is wrong in the way the programs
+ ;; are built.
+ (substitute* "CMakeLists.txt"
+ (("target_link_libraries \\((.*)\\)" all libs)
+ (string-append "target_link_libraries (" libs " m)")))
+ #t))
+ (add-after 'unpack 'fix-hamlib
+ (lambda _
+ (substitute* "CMake/Modules/Findhamlib.cmake"
+ (("set \\(ENV\\{PKG_CONFIG_PATH\\}.*\\)")
+ "set (__pc_path $ENV{PKG_CONFIG_PATH})
+ list (APPEND __pc_path \"${__hamlib_pc_path}\")
+ set (ENV{PKG_CONFIG_PATH} \"${__pc_path}\")"))
+ (substitute* "HamlibTransceiver.hpp"
+ (("#ifdef JS8_USE_LEGACY_HAMLIB")
+ "#if 1"))
+ #t)))))
+ (synopsis "Weak-signal ham radio communication program")
+ (description
+ "JS8Call is a software using the JS8 digital mode (a derivative of the FT8
+mode) providing weak signal keyboard to keyboard messaging to amateur radio
+operators.")
+ (home-page "http://js8call.com/")
+ (license license:gpl3)))
+
(define-public xnec2c
(package
(name "xnec2c")
gain and standing wave ratio.")
(home-page "http://www.5b4az.org/")
(license license:gpl3+)))
+
+(define-public dump1090
+ (package
+ (name "dump1090")
+ (version "3.8.1")
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/flightaware/dump1090")
+ (commit (string-append "v" version))))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "0xg8rzrxqklx1m9ncxsd96dlkbjcsxfi2mrb859v50f07xysdyd8"))))
+ (build-system gnu-build-system)
+ (native-inputs
+ `(("pkg-config" ,pkg-config)))
+ (inputs
+ `(("libusb" ,libusb)
+ ("ncurses" ,ncurses)
+ ("rtl-sdr" ,rtl-sdr)))
+ (arguments
+ `(#:test-target "test"
+ #:make-flags
+ (list (string-append "CC=" ,(cc-for-target))
+ "BLADERF=no")
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'configure)
+ (replace 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((bin (string-append (assoc-ref outputs "out") "/bin/")))
+ (install-file "dump1090" bin)
+ (install-file "view1090" bin)
+ #t))))))
+ (synopsis "Mode S decoder for rtl-sdr devices")
+ (description
+ "Dump1090 is a Mode S decoder specifically designed for rtl-sdr devices.
+It can be used to decode the ADS-B signals that planes emit to indicate
+their position, altitude, speed, etc.")
+ (home-page "https://github.com/flightaware/dump1090")
+ (license license:bsd-3)))
+
+(define-public rtl-433
+ (package
+ (name "rtl-433")
+ (version "20.02")
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/merbanan/rtl_433")
+ (commit version)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "11991xky9gawkragdyg27qsf7kw5bhlg7ygvf3fn7ng00x4xbh1z"))))
+ (build-system cmake-build-system)
+ (native-inputs
+ `(("pkg-config" ,pkg-config)))
+ (inputs
+ `(("libusb" ,libusb)
+ ("rtl-sdr" ,rtl-sdr)))
+ (synopsis "Decoder for radio transmissions in ISM bands")
+ (description
+ "This is a generic data receiver, mainly for decoding radio transmissions
+from devices on the 433 MHz, 868 MHz, 315 MHz, 345 MHz and 915 MHz ISM bands.")
+ (home-page "https://github.com/merbanan/rtl_433")
+ (license license:gpl2+)))
+
+(define-public multimon-ng
+ (package
+ (name "multimon-ng")
+ (version "1.1.8")
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/EliasOenal/multimon-ng")
+ (commit version)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "1973xfyvzl1viz19zr83cgqlx5laxbjrca35rqabn6dlb6xb5xk8"))))
+ (build-system cmake-build-system)
+ (inputs
+ `(("libx11" ,libx11)
+ ("pulseaudio" ,pulseaudio)))
+ (arguments
+ '(#:tests? #f)) ; No test suite
+ (home-page "https://github.com/EliasOenal/multimon-ng")
+ (synopsis "Decoder for digital radio transmission modes")
+ (description "Multimon-ng can decode several digital radio transmission
+modes:
+@itemize
+@item POCSAG512, POCSAG1200, POCSAG2400
+@item FLEX
+@item EAS
+@item UFSK1200, CLIPFSK, AFSK1200, AFSK2400, AFSK2400_2, AFSK2400_3
+@item HAPN4800
+@item FSK9600
+@item DTMF
+@item ZVEI1, ZVEI2, ZVEI3, DZVEI, PZVEI
+@item EEA, EIA, CCIR
+@item MORSE CW
+@item X10
+@end itemize")
+ (license license:gpl2+)))