gnu: Add chirp.

* gnu/packages/radio.scm (chirp): New variable.

gnu/packages/radio.scm

@@ -80,6 +80,7 @@ (define-module (gnu packages radio)
   #:use-module (gnu packages multiprecision)
   #:use-module (gnu packages ncurses)
   #:use-module (gnu packages networking)
+  #:use-module (gnu packages openstack)
   #:use-module (gnu packages perl)
   #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages popt)
@@ -87,6 +88,7 @@ (define-module (gnu packages radio)
   #:use-module (gnu packages protobuf)
   #:use-module (gnu packages pretty-print)
   #:use-module (gnu packages python)
+  #:use-module (gnu packages python-check)
   #:use-module (gnu packages python-science)
   #:use-module (gnu packages python-web)
   #:use-module (gnu packages python-xyz)
@@ -102,6 +104,7 @@ (define-module (gnu packages radio)
   #:use-module (gnu packages texinfo)
   #:use-module (gnu packages tls)
   #:use-module (gnu packages video)
+  #:use-module (gnu packages wxwidgets)
   #:use-module (gnu packages xiph)
   #:use-module (gnu packages xml)
   #:use-module (gnu packages xorg)
@@ -3088,6 +3091,53 @@ (define-public satdump
 satellites.")
     (license license:gpl3)))
 
+(define-public chirp
+  (let ((commit "f59b5b254c33be55c73368d6ab036eaadd9e5e76")
+        (revision "1"))
+    (package
+      (name "chirp")
+      (version (git-version "0.4.0" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/kk7ds/chirp")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "1s2qwz00nxqqfrs87ayjbdqg5i8mxf5xgxmqpincsn8rjxgw1s7x"))))
+      (build-system python-build-system)
+      (native-inputs
+       (list python-mock
+             python-mox3
+             python-pep8
+             python-pytest
+             python-pytest-mock
+             python-pyyaml
+             python-tox))
+      (inputs
+       (list python-future
+             python-importlib-resources
+             python-pyserial
+             python-requests
+             python-six
+             python-wxpython
+             python-yattag))
+      (arguments
+       (list ;; FIXME: How to run the tests? The default way crashes.
+             #:tests? #f
+             #:phases
+             #~(modify-phases %standard-phases
+                 (add-after 'build 'set-home-for-tests
+                   (lambda _
+                     (setenv "HOME" "/tmp"))))))
+      (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.")
+      (home-page "https://chirp.danplanet.com")
+      (license license:gpl3+))))
+
 (define-public qdmr
   (package
     (name "qdmr")