From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp0 ([2001:41d0:8:6d80::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms0.migadu.com with LMTPS id +FAFDFDQxmB6ogAAgWs5BA (envelope-from ) for ; Mon, 14 Jun 2021 05:43:12 +0200 Received: from aspmx1.migadu.com ([2001:41d0:8:6d80::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp0 with LMTPS id IN1QB1DQxmCDKQAA1q6Kng (envelope-from ) for ; Mon, 14 Jun 2021 03:43:12 +0000 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id 975AD2639E for ; Mon, 14 Jun 2021 05:43:11 +0200 (CEST) Received: from localhost ([::1]:48104 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1lsdVG-0000G6-AZ for larch@yhetil.org; Sun, 13 Jun 2021 23:43:10 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:39012) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1lsdVA-0000Fv-8O for guix-patches@gnu.org; Sun, 13 Jun 2021 23:43:04 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:33081) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1lsdV8-00079r-R3 for guix-patches@gnu.org; Sun, 13 Jun 2021 23:43:03 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1lsdV8-0003xh-Kg for guix-patches@gnu.org; Sun, 13 Jun 2021 23:43:02 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#49013] [PATCH] gnu: Add tlf. Resent-From: Jack Hill Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Mon, 14 Jun 2021 03:43:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 49013 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 49013@debbugs.gnu.org X-Debbugs-Original-To: guix-patches@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.162364215015166 (code B ref -1); Mon, 14 Jun 2021 03:43:02 +0000 Received: (at submit) by debbugs.gnu.org; 14 Jun 2021 03:42:30 +0000 Received: from localhost ([127.0.0.1]:44627 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1lsdUY-0003wT-Kp for submit@debbugs.gnu.org; Sun, 13 Jun 2021 23:42:30 -0400 Received: from lists.gnu.org ([209.51.188.17]:35608) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1lsdUX-0003wL-8r for submit@debbugs.gnu.org; Sun, 13 Jun 2021 23:42:25 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:38886) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1lsdUX-0000E8-0c for guix-patches@gnu.org; Sun, 13 Jun 2021 23:42:25 -0400 Received: from minsky.hcoop.net ([104.248.1.95]:36320) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1lsdUU-0006dh-NL for guix-patches@gnu.org; Sun, 13 Jun 2021 23:42:24 -0400 Received: from [2001:470:8:9f5:f850:c9a2:75c6:a2d9] (helo=alperton.home.eronel.org) by minsky.hcoop.net with esmtpsa (TLS1.3:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1lsdUT-00037G-9a for guix-patches@gnu.org; Sun, 13 Jun 2021 23:42:21 -0400 From: Jack Hill Date: Sun, 13 Jun 2021 23:42:08 -0400 Message-Id: <20210614034208.15837-1-jackhill@jackhill.us> X-Mailer: git-send-email 2.32.0 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Received-SPF: pass client-ip=104.248.1.95; envelope-from=jackhill@jackhill.us; helo=minsky.hcoop.net X-Spam_score_int: -18 X-Spam_score: -1.9 X-Spam_bar: - X-Spam_report: (-1.9 / 5.0 requ) BAYES_00=-1.9, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+larch=yhetil.org@gnu.org Sender: "Guix-patches" X-Migadu-Flow: FLOW_IN ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1623642191; h=from:from:sender:sender:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc:mime-version:mime-version: content-type:content-type: content-transfer-encoding:content-transfer-encoding:resent-cc: resent-from:resent-sender:resent-message-id:list-id:list-help: list-unsubscribe:list-subscribe:list-post; bh=U4aDBynkaFK0tTstuN6UghzELY/LK3zrIeeUzDXm9CM=; b=WSvKFV1MS35jlZaUMo5ykqufxBfNqX0eTAqjRrPi9U5pXhrrzg2fJAIOmgot0zhxt9WDpZ cjfng0UH4kUvpAxkfELaUywfP23GW4/gmyV8u7fCESE1mQZD425WVMafImE1LSyusUX/3r 1XJOrhPfk5b23q+Uu7xrm+oDKJY/mvA8quCM9nc8WCEPgJyrgoakxFR7S1blPig39RS50Q OilxwI8+5+fGJfQy5s0H5+bXz22bB4Pgv3I13PLttvbmhcDsi+I5lNEqcCalv9uCCuQTPI 0PSFC1WoO5RlmbBQWeaMNCoOd2PAzaM7p4DXKvLNO1aeayYSbzc8tfaEM7OqIw== ARC-Seal: i=1; s=key1; d=yhetil.org; t=1623642191; a=rsa-sha256; cv=none; b=BqGFmKERqtJo+ie+gHbSM/1d6N2Em9KMRfpNmanFvFQYw927R0Zf8e2WLLV0EqpXlf3mm9 wzsiiCsHOL/LMBru89mE+4k8p2HC7phpRQCP8n94/eXPoJ8eWAAuGLdJ63sGNzkMEJKhdf SGpr63RjrBMMnnPUGHtPQk3nSl/JsBlZ2ocAQ81NHGveMS48Q0+8o9xjC2JwxQyYsJFp6E +/WY6FvknTYJG/TxFV7vqLUgisik19yVzxHjxDUbZRfFl/dYX0zDxQkBqMEZtS3TFI6aQQ 42jDy+7TnGi7uj7wwnsdqcUYxQGHQI1cCUuo5YC95CRTmdXn3KOeDvsRmve43A== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=none; dmarc=none; spf=pass (aspmx1.migadu.com: domain of guix-patches-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=guix-patches-bounces@gnu.org X-Migadu-Spam-Score: -1.42 Authentication-Results: aspmx1.migadu.com; dkim=none; dmarc=none; spf=pass (aspmx1.migadu.com: domain of guix-patches-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=guix-patches-bounces@gnu.org X-Migadu-Queue-Id: 975AD2639E X-Spam-Score: -1.42 X-Migadu-Scanner: scn0.migadu.com X-TUID: rkSxABH3onh5 * gnu/packages/patches/tlf-support-hamlib-4.2+.patch: New file. * gnu/local.mk: Add it. * gnu/packages/radio.scm (tlf): New variable. --- gnu/local.mk | 1 + .../patches/tlf-support-hamlib-4.2+.patch | 66 +++++++++++++++++++ gnu/packages/radio.scm | 64 +++++++++++++++++- 3 files changed, 130 insertions(+), 1 deletion(-) create mode 100644 gnu/packages/patches/tlf-support-hamlib-4.2+.patch diff --git a/gnu/local.mk b/gnu/local.mk index e889abb1a6..175d1a47b2 100644 --- a/gnu/local.mk +++ b/gnu/local.mk @@ -1744,6 +1744,7 @@ dist_patch_DATA = \ %D%/packages/patches/tipp10-qt5.patch \ %D%/packages/patches/tk-find-library.patch \ %D%/packages/patches/tla2tools-build-xml.patch \ + %D%/packages/patches/tlf-support-hamlib-4.2+.patch \ %D%/packages/patches/transcode-ffmpeg.patch \ %D%/packages/patches/transmission-honor-localedir.patch \ %D%/packages/patches/ttf2eot-cstddef.patch \ diff --git a/gnu/packages/patches/tlf-support-hamlib-4.2+.patch b/gnu/packages/patches/tlf-support-hamlib-4.2+.patch new file mode 100644 index 0000000000..3c5db10010 --- /dev/null +++ b/gnu/packages/patches/tlf-support-hamlib-4.2+.patch @@ -0,0 +1,66 @@ +From 295fa956f899af37acb6bda9c76ad77748eb9a4a Mon Sep 17 00:00:00 2001 +From: Ervin Hegedus +Date: Sat, 5 Jun 2021 09:23:06 +0200 +Subject: [PATCH] Quick fix for changing of Hamlib's FILPATHLEN macro + +This patch was prepared for Guix by Jack Hill by +squashing together the changes from upstream #268 +. + +It allows the released version of Tlf to build against the version 4.2 of +hamlib in Guix. + +--- + src/sendqrg.c | 6 +++--- + src/sendqrg.h | 10 ++++++++++ + 2 files changed, 13 insertions(+), 3 deletions(-) + +diff --git a/src/sendqrg.c b/src/sendqrg.c +index ceeb356..5d4420e 100644 +--- a/src/sendqrg.c ++++ b/src/sendqrg.c +@@ -87,7 +87,7 @@ int init_tlf_rig(void) { + + rigportname[strlen(rigportname) - 1] = '\0'; // remove '\n' + strncpy(my_rig->state.rigport.pathname, rigportname, +- FILPATHLEN - 1); ++ TLFFILPATHLEN - 1); + + caps = my_rig->caps; + +@@ -104,9 +104,9 @@ int init_tlf_rig(void) { + if (dcd_type != RIG_DCD_NONE) + my_rig->state.dcdport.type.dcd = dcd_type; + if (ptt_file) +- strncpy(my_rig->state.pttport.pathname, ptt_file, FILPATHLEN); ++ strncpy(my_rig->state.pttport.pathname, ptt_file, TLFFILPATHLEN); + if (dcd_file) +- strncpy(my_rig->state.dcdport.pathname, dcd_file, FILPATHLEN); ++ strncpy(my_rig->state.dcdport.pathname, dcd_file, TLFFILPATHLEN); + + my_rig->state.rigport.parm.serial.rate = serial_rate; + +diff --git a/src/sendqrg.h b/src/sendqrg.h +index 8c53f2e..1ef85a6 100644 +--- a/src/sendqrg.h ++++ b/src/sendqrg.h +@@ -23,6 +23,16 @@ + + #include + ++#ifdef HAMLIB_FILPATHLEN ++ #define TLFFILPATHLEN HAMLIB_FILPATHLEN ++#else ++ #ifdef FILPATHLEN ++ #define TLFFILPATHLEN FILPATHLEN ++ #else ++ #error "(HAMLIB_)FILPATHLEN macro not found" ++ #endif ++#endif ++ + int init_tlf_rig(void); + void close_tlf_rig(RIG *my_rig); + +-- +2.32.0 + diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index d0b7446c3c..5e6c324e8c 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -7,6 +7,7 @@ ;;; Copyright © 2020 Charlie Ritter ;;; Copyright © 2020, 2021 Tobias Geerinckx-Rice ;;; Copyright © 2021 João Pedro Simas +;;; Copyright © 2021 Jack Hill ;;; ;;; This file is part of GNU Guix. ;;; @@ -29,6 +30,7 @@ #:use-module (guix download) #:use-module (guix git-download) #:use-module (guix utils) + #:use-module (gnu packages) #:use-module (gnu packages admin) #:use-module (gnu packages algebra) #:use-module (gnu packages astronomy) @@ -68,6 +70,7 @@ #:use-module (gnu packages multiprecision) #:use-module (gnu packages ncurses) #:use-module (gnu packages networking) + #:use-module (gnu packages perl) #:use-module (gnu packages pkg-config) #:use-module (gnu packages pulseaudio) #:use-module (gnu packages python) @@ -1019,9 +1022,10 @@ you must extend 'udev-service-type' with this package. E.g.: ("tcl" ,tcl))) (inputs `(("gd" ,gd) - ("libusb" ,libusb) ("libxml2" ,libxml2) ("readline" ,readline))) + (propagated-inputs + `(("libusb" ,libusb))) (arguments `(#:configure-flags '("--disable-static" "--with-lua-binding" @@ -1065,6 +1069,64 @@ users.") "--with-tcl-binding" "--with-xml-support"))))) +(define-public tlf + (package + (name "tlf") + (version "1.4.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/airween/tlf") + (commit (string-append "tlf-" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1xpgs4k27pjd9mianfknknp6mf34365bcp96wrv5xh4dhph573rj")) + (patches + (search-patches "tlf-support-hamlib-4.2+.patch")))) + (build-system gnu-build-system) + (arguments + '(#:configure-flags + (list "--enable-fldigi-xmlrpc"))) + (native-inputs + `(("autoconf" ,autoconf) + ("automake" ,automake) + ("perl" ,perl) + ("pkg-config" ,pkg-config))) + (inputs + `(("cmocka" ,cmocka) + ("glib" ,glib) + ("hamlib" ,hamlib) + ("ncurses" ,ncurses) + ("xmlrpc-c" ,xmlrpc-c))) + (home-page "https://tlf.github.io/") + (synopsis "Amateur radio contest logging for the terminal") + (description "TLF is a @acronym{Text User Interface, TUI} amateur radio +contest logging program. It integrates with radios supported by hamlib and +other ham radio programs like fldigi. Many contests are supported including: + +@itemize +@item CQWW (SO, M/S and M/M) +@item WPX (SO, M/S and M/M) +@item ARRL Sweepstakes (SO, M/S ) +@item EU SPRINT +@item EUHFC +@item ARRL-DX (both sides) +@item ARRL-FD +@item ARRL 10m +@item ARRL 160m +@item Region1 field day +@item SP DX contest +@item PACC (both sides) +@item NRAU - scandinavian +@item Wysiwyg mults mode (per band or per contest) +@item WAEDX +@end itemize + +It also supports connecting to DX clusters, log synchronization with other TLF +instances over the network, and general QSO and DXpedition logging.") + (license license:gpl2+))) + (define-public wsjtx (package (name "wsjtx") -- 2.32.0