[bug#46430] [PATCH 1/3] gnu: Add go-github-com-alexcesaro-log.

[bug#46430] [PATCH 1/3] gnu: Add go-github-com-alexcesaro-log.

[Stefan Reichör]

* gnu/packages/golang.scm (go-github-com-alexcesaro-log): New variable.
---
 gnu/packages/golang.scm | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)

diff --git a/gnu/packages/golang.scm b/gnu/packages/golang.scm
index d34bb1acb7..7c0d373a8b 100644
--- a/gnu/packages/golang.scm
+++ b/gnu/packages/golang.scm
@@ -23,6 +23,7 @@
 ;;; Copyright © 2020 Marius Bakke <marius@gnu.org>
 ;;; Copyright © 2020 raingloom <raingloom@riseup.net>
 ;;; Copyright © 2020 Martin Becze <mjbecze@riseup.net>
+;;; Copyright © 2021 Stefan Reichör <stefan@xsteve.at>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -1901,6 +1902,30 @@ applications as well as a program to generate applications and command files.")
     (description "Go logging library")
     (license license:expat)))
 
+(define-public go-github-com-alexcesaro-log
+  (let ((commit "61e686294e58a8698a9e1091268bb4ac1116bd5e")
+        (revision "0"))
+    (package
+      (name "go-github-com-alexcesaro-log")
+      (version (git-version "0.0.0" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/alexcesaro/log")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32
+           "1ckd5crq9rd12wpclahg2q0wprfg0whd6k9zbfzzkr6l1qpmmfam"))))
+      (build-system go-build-system)
+      (arguments
+       `(#:import-path "github.com/alexcesaro/log"))
+      (home-page "https://github.com/alexcesaro/log")
+      (synopsis "Several logging packages for Go")
+      (description "Several logging packages for Go")
+      (license license:expat))))
+
 (define-public go-github-com-spf13-pflag
   (package
     (name "go-github-com-spf13-pflag")
-- 
2.25.1

[bug#46431] [PATCH 2/3] gnu: Add go-github-com-shazow-rateio.

[Stefan Reichör]

* gnu/packages/golang.scm (go-github-com-shazow-rateio): New variable.
---
 gnu/packages/golang.scm | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

diff --git a/gnu/packages/golang.scm b/gnu/packages/golang.scm
index 7c0d373a8b..897a5d0d35 100644
--- a/gnu/packages/golang.scm
+++ b/gnu/packages/golang.scm
@@ -1926,6 +1926,30 @@ applications as well as a program to generate applications and command files.")
       (description "Several logging packages for Go")
       (license license:expat))))
 
+(define-public go-github-com-shazow-rateio
+  (let ((commit "4461efc8bdc4508e5ec6ac78fa2ff26d062ae678")
+        (revision "0"))
+    (package
+      (name "go-github-com-shazow-rateio")
+      (version (git-version "0.0.0" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/shazow/rateio")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32
+           "1isy75cmm71q18mvs6xaizgdjqnn6pllkj4yvd42brfgfj84qz0w"))))
+      (build-system go-build-system)
+      (arguments
+       `(#:import-path "github.com/shazow/rateio"))
+      (home-page "https://github.com/shazow/rateio")
+      (synopsis "Ratelimiting for io-style interfaces in Go")
+      (description "Ratelimiting for io-style interfaces in Go")
+      (license license:expat))))
+
 (define-public go-github-com-spf13-pflag
   (package
     (name "go-github-com-spf13-pflag")
-- 
2.25.1

[bug#46432] [PATCH 3/3] gnu: Add ssh-chat.

[Stefan Reichör]

* gnu/packages/ssh.scm (ssh-chat): New variable.
---
 gnu/packages/ssh.scm | 47 +++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 46 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/ssh.scm b/gnu/packages/ssh.scm
index 04c8c6ceaa..9e146ea03a 100644
--- a/gnu/packages/ssh.scm
+++ b/gnu/packages/ssh.scm
@@ -7,7 +7,7 @@
 ;;; Copyright © 2016, 2021 Nicolas Goaziou <mail@nicolasgoaziou.fr>
 ;;; Copyright © 2016 Christopher Allan Webber <cwebber@dustycloud.org>
 ;;; Copyright © 2017, 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
-;;; Copyright © 2017 Stefan Reichör <stefan@xsteve.at>
+;;; Copyright © 2017, 2021 Stefan Reichör <stefan@xsteve.at>
 ;;; Copyright © 2017 Ricardo Wurmus <rekado@elephly.net>
 ;;; Copyright © 2017 Nikita <nikita@n0.is>
 ;;; Copyright © 2018 Manuel Graf <graf@init.at>
@@ -41,6 +41,7 @@
   #:use-module (gnu packages crypto)
   #:use-module (gnu packages elf)
   #:use-module (gnu packages gnupg)
+  #:use-module (gnu packages golang)
   #:use-module (gnu packages gperf)
   #:use-module (gnu packages groff)
   #:use-module (gnu packages guile)
@@ -62,11 +63,13 @@
   #:use-module (gnu packages python-web)
   #:use-module (gnu packages python-xyz)
   #:use-module (gnu packages readline)
+  #:use-module (gnu packages terminals)
   #:use-module (gnu packages texinfo)
   #:use-module (gnu packages tls)
   #:use-module (gnu packages xorg)
   #:use-module (guix build-system cmake)
   #:use-module (guix build-system gnu)
+  #:use-module (guix build-system go)
   #:use-module (guix build-system python)
   #:use-module (guix download)
   #:use-module (guix git-download)
@@ -915,3 +918,45 @@ Ed25519 keys.
 @item Modern browsers are supported.
 @end itemize")
     (license license:expat)))
+
+(define-public ssh-chat
+  (package
+    (name "ssh-chat")
+    (version "1.10")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/shazow/ssh-chat")
+                    (commit (string-append "v" version))))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "15avqg9j7yx0cx1dvz46r0ipgqnq5i9lfv9rwy2fjqsy501qx03v"))))
+    (build-system go-build-system)
+    (propagated-inputs
+     `(("go-github-com-alexcesaro-log" ,go-github-com-alexcesaro-log)
+       ("go-github-com-shazow-rateio" ,go-github-com-shazow-rateio)
+       ("go-golang-org-x-crypto" ,go-golang-org-x-crypto)
+       ("go-golang-org-x-text" ,go-golang-org-x-text)
+       ("go-github.com-howeyc-gopass" ,go-github.com-howeyc-gopass)
+       ("go-github.com-jessevdk-go-flags" ,go-github.com-jessevdk-go-flags)))
+    (arguments
+     `(#:install-source? #f
+       #:import-path "github.com/shazow/ssh-chat"
+       #:phases
+       (modify-phases %standard-phases
+         (replace 'build
+           (lambda _
+             (with-directory-excursion "src/github.com/shazow/ssh-chat"
+               (invoke "make" "build")
+               #t)))
+         (replace 'install
+           (lambda* (#:key outputs import-path #:allow-other-keys)
+             (let ((dest    (string-append (assoc-ref outputs "out") "/bin"))
+                   (source  (string-append "src/" import-path "/")))
+               (install-file (string-append source "ssh-chat") dest)
+               #t))))))
+    (synopsis "Chat over SSH.")
+    (description "Custom SSH server written in Go. Instead of a shell, you get a chat prompt.")
+    (home-page "https://github.com/shazow/ssh-chat")
+    (license license:expat)))
-- 
2.25.1