From patchwork Mon Feb 1 22:08:18 2021 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Raghav Gururajan X-Patchwork-Id: 26816 Return-Path: X-Original-To: patchwork@mira.cbaines.net Delivered-To: patchwork@mira.cbaines.net Received: by mira.cbaines.net (Postfix, from userid 113) id C6FF727BC24; Mon, 1 Feb 2021 22:11:12 +0000 (GMT) X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on mira.cbaines.net X-Spam-Level: X-Spam-Status: No, score=-2.9 required=5.0 tests=BAYES_00,MAILING_LIST_MULTI, RCVD_IN_MSPIKE_H4,RCVD_IN_MSPIKE_WL,SPF_HELO_PASS,URIBL_BLOCKED autolearn=unavailable autolearn_force=no version=3.4.2 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) by mira.cbaines.net (Postfix) with ESMTPS id 5E36B27BC1D for ; Mon, 1 Feb 2021 22:11:11 +0000 (GMT) Received: from localhost ([::1]:34784 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1l6hPa-00010Z-7S for patchwork@mira.cbaines.net; Mon, 01 Feb 2021 17:11:10 -0500 Received: from eggs.gnu.org ([2001:470:142:3::10]:50596) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1l6hNW-0008LC-MO for guix-patches@gnu.org; Mon, 01 Feb 2021 17:09:02 -0500 Received: from debbugs.gnu.org ([209.51.188.43]:50138) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1l6hNW-0006Ib-Dq for guix-patches@gnu.org; Mon, 01 Feb 2021 17:09:02 -0500 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1l6hNW-0004dd-8o for guix-patches@gnu.org; Mon, 01 Feb 2021 17:09:02 -0500 X-Loop: help-debbugs@gnu.org Subject: [bug#45954] Telegram-CLI (v7) References: In-Reply-To: Resent-From: Raghav Gururajan Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Mon, 01 Feb 2021 22:09:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 45954 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: To: 45954@debbugs.gnu.org Received: via spool by 45954-submit@debbugs.gnu.org id=B45954.161221731317794 (code B ref 45954); Mon, 01 Feb 2021 22:09:02 +0000 Received: (at 45954) by debbugs.gnu.org; 1 Feb 2021 22:08:33 +0000 Received: from localhost ([127.0.0.1]:33451 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1l6hN1-0004cu-Ci for submit@debbugs.gnu.org; Mon, 01 Feb 2021 17:08:33 -0500 Received: from relay9-d.mail.gandi.net ([217.70.183.199]:54077) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1l6hMy-0004cd-CN for 45954@debbugs.gnu.org; Mon, 01 Feb 2021 17:08:29 -0500 X-Originating-IP: 76.68.120.100 Received: from [192.168.5.10] (bras-vprn-toroon474rw-lp130-08-76-68-120-100.dsl.bell.ca [76.68.120.100]) (Authenticated sender: rg@raghavgururajan.name) by relay9-d.mail.gandi.net (Postfix) with ESMTPSA id 433FCFF802; Mon, 1 Feb 2021 22:08:19 +0000 (UTC) From: Raghav Gururajan Message-ID: Date: Mon, 1 Feb 2021 17:08:18 -0500 User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:78.0) Gecko/20100101 Icedove/78.6.1 MIME-Version: 1.0 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: , Cc: Leo Prikler Errors-To: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org Sender: "Guix-patches" X-getmail-retrieved-from-mailbox: Patches From f7bb371f28dfac22dc52e2091c7fc5adb88dd3a4 Mon Sep 17 00:00:00 2001 From: Raghav Gururajan Date: Mon, 1 Feb 2021 16:49:04 -0500 Subject: [PATCH 3/3] gnu: Add telegram-cli. * gnu/packages/telegram.scm (telegram-cli): New variable. --- gnu/packages/telegram.scm | 120 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 120 insertions(+) diff --git a/gnu/packages/telegram.scm b/gnu/packages/telegram.scm index 2ff30c209e..1e83e33dfa 100644 --- a/gnu/packages/telegram.scm +++ b/gnu/packages/telegram.scm @@ -43,14 +43,19 @@ #:use-module (gnu packages libreoffice) #:use-module (gnu packages linux) #:use-module (gnu packages lxqt) + #:use-module (gnu packages lua) + #:use-module (gnu packages perl) #:use-module (gnu packages pkg-config) #:use-module (gnu packages protobuf) #:use-module (gnu packages pulseaudio) #:use-module (gnu packages python) #:use-module (gnu packages qt) + #:use-module (gnu packages readline) + #:use-module (gnu packages textutils) #:use-module (gnu packages telephony) #:use-module (gnu packages tls) #:use-module (gnu packages video) + #:use-module (gnu packages web) #:use-module (gnu packages xiph) #:use-module (gnu packages xorg) #:use-module ((guix licenses) #:prefix license:) @@ -704,3 +709,118 @@ a part of telegram-cli, but now being maintained separately.") (description "TGL is the telegram library for telegram-cli.") (home-page "https://github.com/vysheng/tgl") (license license:lgpl2.1+)))) + +(define-public telegram-cli + (let ((commit "6547c0b21b977b327b3c5e8142963f4bc246187a") + (revision "324")) + (package + (name "telegram-cli") + (version + (git-version "1.3.1" revision commit)) + (source + (origin + (method git-fetch) + (uri + (git-reference + (url "https://github.com/vysheng/tg.git") + (commit commit))) + (file-name + (git-file-name name version)) + (sha256 + (base32 "0c1w7jgska71jjbvg1y09v52549pwa4zkdjly18yxywn7gayd2p6")))) + (build-system gnu-build-system) + (arguments + `(#:tests? #f ; No target + #:configure-flags + (list + ;; Use gcrypt instead of openssl. + "--disable-openssl") + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'trigger-bootstrap + (lambda _ + (delete-file "configure") + #t)) + (add-after 'trigger-bootstrap 'patch-tgl-and-tlparser + (lambda* (#:key inputs #:allow-other-keys) + (for-each delete-file + (list + "Makefile.tgl" + "Makefile.tl-parser")) + (substitute* "Makefile.in" + (("include \\$\\{srcdir\\}/Makefile\\.tl-parser") + "") + (("include \\$\\{srcdir\\}/Makefile\\.tgl") + "") + (("-I\\$\\{srcdir\\}/tgl") + (string-append "-I" (assoc-ref inputs "tgl") + "/include/tgl")) + (("AUTO=auto") + (string-append "AUTO=" (assoc-ref inputs "tgl") + "/include/tgl/auto")) + (("LIB=libs") + (string-append "LIB=" (assoc-ref inputs "tgl") + "/lib/tgl"))) + #t)) + (replace 'install + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (source (string-append (getenv "TEMP") "/source"))) + ;; Install client. + (install-file + (string-append source "/bin/telegram-cli") + (string-append out "/bin")) + ;; Install daemon. + (install-file + (string-append source "/start-telegram-daemon") + (string-append out "/bin")) + ;; Install daemon script. + (install-file + (string-append source "/telegram-daemon") + (string-append out "/etc/init.d")) + ;; Install server public-key. + (install-file + (string-append source "/server.pub") + (string-append out "/etc/telegram-cli"))) + #t)) + (add-after 'install 'patch-daemon-files + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out"))) + (with-directory-excursion out + (substitute* "etc/init.d/telegram-daemon" + (("KOT\\'s meta engine") + "Telegram Messaging System") + (("/usr/local/sbin:/usr/local/bin:/sbin:/bin:/usr/sbin:/usr/bin") + "$PATH") + (("\\$ROOT/usr/share/telegram-daemon/bin") + (string-append out "/bin")) + (("/etc/init\\.d") + (string-append out "/etc/init.d"))) + (substitute* "bin/start-telegram-daemon" + (("msg-search-engine") + "telegram-cli") + (("\\$root/usr/share/telegram-daemon/bin") + (string-append out "/bin"))))) + #t))))) + (native-inputs + `(("autoconf" ,autoconf) + ("automake" ,automake) + ("libtool" ,libtool) + ("pkg-config" ,pkg-config))) + (inputs + `(("jansson" ,jansson) + ("libconfig" ,libconfig) + ("libevent" ,libevent) + ("libgcrypt" ,libgcrypt) + ("lua" ,lua) + ("openssl" ,openssl) + ("perl" ,perl) + ("python" ,python) + ("readline" ,readline) + ("tgl" ,tgl) + ("tl-parser" ,tl-parser) + ("zlib" ,zlib))) + (synopsis "Telegram Messenger CLI") + (description "TG is the command-line interface for Telegram Messenger.") + (home-page "https://github.com/vysheng/tg") + (license license:gpl2+)))) -- 2.30.0