gnu/packages/syncthing.scm

   1 ;;; GNU Guix --- Functional package management for GNU
   2 ;;; Copyright © 2016 Petter <petter@mykolab.ch>
   3 ;;; Copyright © 2016, 2017, 2018, 2019, 2020 Leo Famulari <leo@famulari.name>
   4 ;;; Copyright © 2020 Tobias Geerinckx-Rice <me@tobias.gr>
   5 ;;; Copyright © 2020 Efraim Flashner <efraim@flashner.co.il>
   6 ;;;
   7 ;;; This file is part of GNU Guix.
   8 ;;;
   9 ;;; GNU Guix is free software; you can redistribute it and/or modify it
  10 ;;; under the terms of the GNU General Public License as published by
  11 ;;; the Free Software Foundation; either version 3 of the License, or (at
  12 ;;; your option) any later version.
  13 ;;;
  14 ;;; GNU Guix is distributed in the hope that it will be useful, but
  15 ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
  16 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17 ;;; GNU General Public License for more details.
  18 ;;;
  19 ;;; You should have received a copy of the GNU General Public License
  20 ;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
  21
  22 (define-module (gnu packages syncthing)
  23   #:use-module (guix build-system go)
  24   #:use-module (guix build-system trivial)
  25   #:use-module (guix packages)
  26   #:use-module (guix download)
  27   #:use-module (guix git-download)
  28   #:use-module (guix licenses)
  29   #:use-module (gnu packages)
  30   #:use-module (gnu packages golang))
  31
  32 (define-public syncthing
  33   (package
  34     (name "syncthing")
  35     (version "1.5.0")
  36     (source (origin
  37               (method url-fetch)
  38               (uri (string-append "https://github.com/syncthing/syncthing"
  39                                   "/releases/download/v" version
  40                                   "/syncthing-source-v" version ".tar.gz"))
  41               (sha256
  42                (base32
  43                 "1394b8y4nllihnjngc0kjpdy7pvyh6v1h09hkn8rdmwxpsdkqkjb"))
  44               (modules '((guix build utils)))
  45               ;; Delete bundled ("vendored") free software source code.
  46               (snippet '(begin
  47                           (delete-file-recursively "vendor")
  48                           #t))))
  49     (build-system go-build-system)
  50     ;; The primary Syncthing executable goes to "out", while the auxiliary
  51     ;; server programs and utility tools go to "utils".  This reduces the size
  52     ;; of "out" by ~80 MiB.
  53     (outputs '("out" "utils"))
  54     ;; When updating Syncthing, check 'go.mod' in the source distribution to
  55     ;; ensure we are using the correct versions of these dependencies.
  56     (inputs
  57      `(("go-github-com-jackpal-go-nat-pmp"
  58         ,go-github-com-jackpal-go-nat-pmp)
  59        ("go-github-com-bkaradzic-go-lz4" ,go-github-com-bkaradzic-go-lz4)
  60        ("go-github-com-calmh-xdr" ,go-github-com-calmh-xdr)
  61        ("go-github-com-chmduquesne-rollinghash"
  62         ,go-github-com-chmduquesne-rollinghash)
  63        ("go-github-com-gobwas-glob" ,go-github-com-gobwas-glob)
  64        ("go-github-com-golang-groupcache-lru"
  65         ,go-github-com-golang-groupcache-lru)
  66        ("go-github-com-jackpal-gateway" ,go-github-com-jackpal-gateway)
  67        ("go-github-com-kballard-go-shellquote"
  68         ,go-github-com-kballard-go-shellquote)
  69        ("go-github-com-lib-pq" ,go-github-com-lib-pq)
  70        ("go-github-com-minio-sha256-simd" ,go-github-com-minio-sha256-simd)
  71        ("go-github-com-oschwald-geoip2-golang"
  72         ,go-github-com-oschwald-geoip2-golang)
  73        ("go-github-com-pkg-errors" ,go-github-com-pkg-errors)
  74        ("go-github-com-rcrowley-go-metrics" ,go-github-com-rcrowley-go-metrics)
  75        ("go-github-com-sasha-s-go-deadlock" ,go-github-com-sasha-s-go-deadlock)
  76        ("go-github-com-syncthing-notify" ,go-github-com-syncthing-notify)
  77        ("go-github-com-syndtr-goleveldb" ,go-github-com-syndtr-goleveldb)
  78        ("go-github-com-thejerf-suture" ,go-github-com-thejerf-suture)
  79        ("go-golang-org-x-time" ,go-golang-org-x-time)
  80        ("go-github-com-go-ldap-ldap" ,go-github-com-go-ldap-ldap)
  81        ("go-github-com-gogo-protobuf" ,go-github-com-gogo-protobuf)
  82        ("go-github-com-shirou-gopsutil" ,go-github-com-shirou-gopsutil)
  83        ("go-github-com-prometheus-client-golang"
  84         ,go-github-com-prometheus-client-golang)
  85        ("go-golang-org-x-net" ,go-golang-org-x-net)
  86        ("go-golang-org-x-text" ,go-golang-org-x-text)
  87        ("go-github-com-audriusbutkevicius-recli"
  88         ,go-github-com-audriusbutkevicius-recli)
  89        ("go-github-com-urfave-cli" ,go-github-com-urfave-cli)
  90        ("go-github-com-vitrun-qart" ,go-github-com-vitrun-qart)
  91        ("go-github-com-mattn-go-isatty" ,go-github-com-mattn-go-isatty)
  92        ("go-golang-org-x-crypto" ,go-golang-org-x-crypto)
  93        ("go-github-com-flynn-archive-go-shlex"
  94         ,go-github-com-flynn-archive-go-shlex)
  95        ("go-github-com-getsentry-raven-go" ,go-github-com-getsentry-raven-go)
  96        ("go-github-com-maruel-panicparse" ,go-github-com-maruel-panicparse)
  97        ("go-github-com-ccding-go-stun" ,go-github-com-ccding-go-stun)
  98        ("go-github-com-audriusbutkevicius-pfilter" ,go-github-com-audriusbutkevicius-pfilter)
  99        ("go-github-com-lucas-clemente-quic-go" ,go-github-com-lucas-clemente-quic-go)
 100        ("go-github-com-willf-bloom" ,go-github-com-willf-bloom)
 101
 102        ;; For tests.
 103        ("go-github-com-d4l3k-messagediff" ,go-github-com-d4l3k-messagediff)))
 104
 105     (arguments
 106      `(#:modules ((srfi srfi-26) ; for cut
 107                   (guix build utils)
 108                   (guix build go-build-system))
 109        #:import-path "github.com/syncthing/syncthing"
 110        ;; We don't need to install the source code for end-user applications.
 111        #:install-source? #f
 112        #:phases
 113        (modify-phases %standard-phases
 114          (add-before 'build 'increase-test-timeout
 115            (lambda _
 116              (substitute* "src/github.com/syncthing/syncthing/build.go"
 117                (("120s") "999s"))
 118              #t))
 119
 120          (replace 'build
 121            (lambda _
 122              (with-directory-excursion "src/github.com/syncthing/syncthing"
 123                ;; XXX The only way to build Syncthing without its automatic
 124                ;; updater and to build the utilities is to "build all" and then
 125                ;; "build syncthing" again with -no-upgrade.
 126                ;; https://github.com/syncthing/syncthing/issues/6118
 127                (invoke "go" "run" "build.go" "build" "all")
 128                (delete-file "syncthing")
 129                (invoke "go" "run" "build.go" "-no-upgrade" "build" "syncthing"))))
 130
 131          (replace 'check
 132            (lambda _
 133              (with-directory-excursion "src/github.com/syncthing/syncthing"
 134                (invoke "go" "run" "build.go" "test"))))
 135
 136          (replace 'install
 137            (lambda* (#:key outputs #:allow-other-keys)
 138              (let ((out (assoc-ref outputs "out"))
 139                    (utils (assoc-ref outputs "utils")))
 140                (with-directory-excursion "src/github.com/syncthing/syncthing"
 141                  (install-file "syncthing" (string-append out "/bin"))
 142                  (for-each (cut install-file <> (string-append utils "/bin/"))
 143                            '("stcli" "stcompdirs" "stcrashreceiver"
 144                              "stdisco" "stdiscosrv" "stevents" "stfileinfo"
 145                              "stfinddevice" "stfindignored" "stgenfiles"
 146                              "stindex" "strelaypoolsrv" "strelaysrv" "stsigtool"
 147                              "stvanity" "stwatchfile" "uraggregate" "ursrv"))
 148                  #t))))
 149
 150          (add-after 'install 'install-docs
 151            (lambda* (#:key outputs #:allow-other-keys)
 152              (let* ((out (assoc-ref outputs "out"))
 153                     (utils (assoc-ref outputs "utils"))
 154                     (man "/share/man")
 155                     (man-section (string-append man "/man"))
 156                     (src "src/github.com/syncthing/syncthing/man/"))
 157                ;; Install all the man pages to "out".
 158                (for-each
 159                  (lambda (file)
 160                    (install-file file
 161                                  (string-append out man-section
 162                                                 (string-take-right file 1))))
 163                  (find-files src "\\.[1-9]"))
 164                ;; Copy all the man pages to "utils"
 165                (copy-recursively (string-append out man)
 166                                  (string-append utils man))
 167                ;; Delete extraneous man pages from "out" and "utils",
 168                ;; respectively.
 169                (delete-file (string-append out man "/man1/stdiscosrv.1"))
 170                (delete-file (string-append out man "/man1/strelaysrv.1"))
 171                (delete-file (string-append utils man "/man1/syncthing.1"))
 172              #t))))))
 173     (synopsis "Decentralized continuous file system synchronization")
 174     (description "Syncthing is a peer-to-peer file synchronization tool that
 175 supports a wide variety of computing platforms.  It uses the Block Exchange
 176 Protocol.")
 177     (home-page "https://github.com/syncthing/syncthing")
 178     (license mpl2.0)))
 179
 180 (define-public go-github-com-jackpal-go-nat-pmp
 181   (package
 182     (name "go-github-com-jackpal-go-nat-pmp")
 183     (version "1.0.2")
 184     (source (origin
 185               (method git-fetch)
 186               (uri (git-reference
 187                     (url "https://github.com/jackpal/go-nat-pmp")
 188                     (commit (string-append "v" version))))
 189               (file-name (git-file-name name version))
 190               (sha256
 191                (base32
 192                 "1p2yrzfbkazc9nisr2iqjwzhb6q16zj6finyxxn2ikk7iiighl1g"))))
 193     (build-system go-build-system)
 194     (arguments
 195      `(#:import-path "github.com/jackpal/go-nat-pmp"))
 196     (synopsis "Port mapping and discovery of external IP address")
 197     (description "This package provides a Go client for the NAT-PMP internet
 198 protocol for port mapping and discovering the external IP address of a
 199 firewall.")
 200     (home-page "https://github.com/jackpal/go-nat-pmp")
 201     (license asl2.0)))
 202
 203 (define-public go-github-com-audriusbutkevicius-recli
 204   (package
 205     (name "go-github-com-audriusbutkevicius-recli")
 206     (version "0.0.5")
 207     (source (origin
 208               (method git-fetch)
 209               (uri (git-reference
 210                     (url "https://github.com/AudriusButkevicius/recli")
 211                     (commit (string-append "v" version))))
 212               (file-name (git-file-name name version))
 213               (sha256
 214                (base32
 215                 "1m1xna1kb78pkmr1lfmvvnpk9j7c4x71j3a7c6vj7zpzc4srpsmf"))))
 216     (build-system go-build-system)
 217     (inputs
 218      `(("go-github-com-pkg-errors" ,go-github-com-pkg-errors)
 219        ("go-github-com-urfave-cli" ,go-github-com-urfave-cli)))
 220     (arguments
 221      `(#:import-path "github.com/AudriusButkevicius/recli"))
 222     (synopsis "Reflection-based CLI generator")
 223     (description "For a given struct, @code{recli} builds a set of
 224 @code{urfave/cli} commands which allows you to modify it from the command line.
 225 It is useful for generating command line clients for your application
 226 configuration that is stored in a Go struct.")
 227     (home-page "https://github.com/AudriusButkevicius/recli")
 228     (license mpl2.0)))
 229
 230 (define-public go-github-com-bkaradzic-go-lz4
 231   (let ((commit "7224d8d8f27ef618c0a95f1ae69dbb0488abc33a")
 232         (revision "0"))
 233     (package
 234       (name "go-github-com-bkaradzic-go-lz4")
 235       (version (git-version "1.0.0" revision commit))
 236       (source (origin
 237                 (method git-fetch)
 238                 (uri (git-reference
 239                        (url "https://github.com/bkaradzic/go-lz4")
 240                        (commit commit)))
 241                 (file-name (git-file-name name version))
 242                 (sha256
 243                   (base32
 244                     "10lmya17vdqg2pvqni0p73iahni48s1v11ya9a0hcz4jh5vw4dkb"))))
 245       (build-system go-build-system)
 246       (arguments
 247         `(#:import-path "github.com/bkaradzic/go-lz4"))
 248       (synopsis "LZ4 compression algorithm")
 249       (description "This package provides @code{go-lz4}, a Go implementation of
 250 the LZ4 compression algorithm.")
 251       (home-page "https://github.com/bkaradzic/go-lz4")
 252       (license bsd-2))))
 253
 254 (define-public go-github-com-calmh-du
 255   (package
 256     (name "go-github-com-calmh-du")
 257     (version "1.0.1")
 258     (source (origin
 259               (method git-fetch)
 260               (uri (git-reference
 261                     (url "https://github.com/calmh/du")
 262                     (commit (string-append "v" version))))
 263               (file-name (git-file-name name version))
 264               (sha256
 265                (base32
 266                 "0qb3a6y3p9nkyn3s66k6zcm16y8n8578qh23ddj14cxf2scrr2n2"))))
 267     (build-system go-build-system)
 268     (arguments
 269      `(#:import-path "github.com/calmh/du"))
 270     (synopsis "Get total and available disk space of a given volume")
 271     (description "This is a Go implementation of `du`.  It provides disk usage
 272 information, such as how much storage space is available, free, and used.")
 273     (home-page "https://github.com/calmh/du")
 274     (license public-domain)))
 275
 276 (define-public go-github-com-calmh-xdr
 277   (package
 278     (name "go-github-com-calmh-xdr")
 279     (version "1.1.0")
 280     (source (origin
 281               (method git-fetch)
 282               (uri (git-reference
 283                     (url "https://github.com/calmh/xdr")
 284                     (commit (string-append "v" version))))
 285               (file-name (git-file-name name version))
 286               (sha256
 287                (base32
 288                 "072wqdncz3nd4a3zkhvzzx1y3in1lm29wfvl0d8wrnqs5pyqh0mh"))))
 289     (build-system go-build-system)
 290     (arguments
 291      `(#:import-path "github.com/calmh/xdr"))
 292     (synopsis "XDR marshalling and unmarshalling")
 293     (description "XDR is an External Data Representation (XDR)
 294 marshalling and unmarshalling library in Go.  It uses code generation and not
 295 reflection.")
 296     (home-page "https://github.com/calmh/xdr")
 297     (license expat)))
 298
 299 (define-public go-github-com-d4l3k-messagediff
 300   (package
 301     (name "go-github-com-d4l3k-messagediff")
 302     (version "1.2.1")
 303     (source (origin
 304               (method git-fetch)
 305               (uri (git-reference
 306                      (url "https://github.com/d4l3k/messagediff")
 307                      (commit (string-append "v" version))))
 308               (file-name (git-file-name name version))
 309               (sha256
 310                (base32
 311                 "104hl8x57ciaz7mzafg1vp9qggxcyfm8hsv9bmlihbz9ml3nyr8v"))))
 312     (build-system go-build-system)
 313     (arguments
 314       `(#:import-path "github.com/d4l3k/messagediff"))
 315     (synopsis "Diff arbitrary Go structs")
 316     (description "Messagediff is a library for calculating diffs of arbitrary
 317 structs in the Go programming language.")
 318     (home-page "https://github.com/d4l3k/messagediff")
 319     (license expat)))
 320
 321 (define-public go-github-com-gobwas-glob
 322   (package
 323     (name "go-github-com-gobwas-glob")
 324     (version "0.2.3")
 325     (source (origin
 326               (method git-fetch)
 327               (uri (git-reference
 328                      (url "https://github.com/gobwas/glob")
 329                      (commit (string-append "v" version))))
 330               (file-name (git-file-name name version))
 331               (sha256
 332                (base32
 333                 "0jxk1x806zn5x86342s72dq2qy64ksb3zrvrlgir2avjhwb18n6z"))))
 334     (build-system go-build-system)
 335     (arguments
 336       `(#:import-path "github.com/gobwas/glob"))
 337     (synopsis "Go globbing library")
 338     (description "This package provides a Go implementation of globs.")
 339     (home-page "https://github.com/gobwas/glob")
 340     (license expat)))
 341
 342
 343 (define-public go-github-com-golang-groupcache-lru
 344   (let ((commit "869f871628b6baa9cfbc11732cdf6546b17c1298")
 345         (revision "2"))
 346     (package
 347       (name "go-github-com-golang-groupcache-lru")
 348       (version (git-version "0.0.0" revision commit))
 349       (source (origin
 350                 (method git-fetch)
 351                 (uri (git-reference
 352                       (url "https://github.com/golang/groupcache")
 353                       (commit commit)))
 354                 (file-name (git-file-name name version))
 355                 (sha256
 356                  (base32
 357                   "0r4nk8129bvx50qb4xzjaay39b2h6k7cbdqqzdlanmc82ygczsbw"))))
 358       (build-system go-build-system)
 359       (arguments
 360        `(#:import-path "github.com/golang/groupcache/lru"
 361          #:unpack-path "github.com/golang/groupcache"))
 362       (synopsis "Groupcache is a caching and cache-filling library")
 363       (description "Groupcache is a caching and cache-filling library, intended
 364 as a replacement for memcached in many cases.  It provides a data loading
 365 mechanism with caching and de-duplication that works across a set of peer
 366 processes.")
 367       (home-page "https://github.com/golang/groupcache")
 368       (license asl2.0))))
 369
 370 (define-public go-github-com-golang-snappy
 371   (let ((commit "553a641470496b2327abcac10b36396bd98e45c9")
 372         (revision "0"))
 373     (package
 374       (name "go-github-com-golang-snappy")
 375       (version (git-version "0.0.0" revision commit))
 376       (source (origin
 377                 (method git-fetch)
 378                 (uri (git-reference
 379                       (url "https://github.com/golang/snappy")
 380                       (commit commit)))
 381                 (file-name (git-file-name name version))
 382                 (sha256
 383                  (base32
 384                   "0kssxnih1l722hx9219c7javganjqkqhvl3i0hp0hif6xm6chvqk"))))
 385       (build-system go-build-system)
 386       (arguments
 387        `(#:import-path "github.com/golang/snappy"))
 388       (synopsis "Snappy compression format in the Go programming language")
 389       (description "This package provides a Go implementation of the Snappy
 390 compression format.")
 391       (home-page "https://github.com/golang/snappy")
 392       (license bsd-3))))
 393
 394 (define-public go-github-com-jackpal-gateway
 395   (package
 396     (name "go-github-com-jackpal-gateway")
 397     (version "1.0.6")
 398     (source (origin
 399               (method git-fetch)
 400               (uri (git-reference
 401                     (url "https://github.com/jackpal/gateway")
 402                     (commit (string-append "v" version))))
 403               (file-name (git-file-name name version))
 404               (sha256
 405                (base32
 406                 "1yms2dw4dnz4cvj9vhwh6193d50jhvn5awsp2g3a4lcc3sjrgd6m"))))
 407     (build-system go-build-system)
 408     (arguments
 409      `(#:import-path "github.com/jackpal/gateway"))
 410     (synopsis "Discover the address of a LAN gateway")
 411     (description "@code{gateway} is a Go library for discovering the IP
 412 address of the default LAN gateway.")
 413     (home-page "https://github.com/jackpal/gateway")
 414     (license bsd-3)))
 415
 416 (define-public go-github-com-lib-pq
 417   (package
 418     (name "go-github-com-lib-pq")
 419     (version "1.5.2")
 420     (source (origin
 421               (method git-fetch)
 422               (uri (git-reference
 423                     (url "https://github.com/lib/pq")
 424                     (commit (string-append "v" version))))
 425               (file-name (git-file-name name version))
 426               (sha256
 427                (base32
 428                 "1wjw5pfjgc63n9934mgvg8hr1v9381mcdz62jkn9xqxqcv6b95lw"))))
 429     (build-system go-build-system)
 430     (arguments
 431      `(#:import-path "github.com/lib/pq"
 432        ;; The tests seem to fail without access to the network or a running
 433        ;; Postgres instance.
 434        #:tests? #f))
 435     (synopsis "Golang Postgres driver for Go's database/sql")
 436     (description "This package provides a pure Go Postgres driver for Go's
 437 database/sql package.")
 438     (home-page "https://github.com/lib/pq")
 439     (license expat)))
 440
 441 (define-public go-github-com-oschwald-geoip2-golang
 442   (package
 443     (name "go-github-com-oschwald-geoip2-golang")
 444     (version "1.4.0")
 445     (source (origin
 446               (method git-fetch)
 447               (uri (git-reference
 448                     (url "https://github.com/oschwald/geoip2-golang")
 449                     (commit (string-append "v" version))))
 450               (file-name (git-file-name name version))
 451               (sha256
 452                (base32
 453                 "1jj4rbdpy87rbl79czg5hs5dyn6xlbnk0bnvyzi71dsxan57nixw"))))
 454     (build-system go-build-system)
 455     (propagated-inputs
 456      `(("go-github-com-oschwald-maxminddb-golang"
 457         ,go-github-com-oschwald-maxminddb-golang)
 458        ("go-golang-org-x-sys" ,go-golang-org-x-sys)))
 459     (arguments
 460      `(#:import-path "github.com/oschwald/geoip2-golang"
 461        #:tests? #f)) ; Requires some unpackaged software and test data
 462     (synopsis "MaxMind GeoIP2 reader")
 463     (description "This package provides a library for reading MaxMind
 464 GeoLite2 and GeoIP2 databases in Go.")
 465     (home-page "https://github.com/oschwald/geoip2-golang")
 466     (license isc)))
 467
 468 (define-public go-github-com-oschwald-maxminddb-golang
 469   (package
 470     (name "go-github-com-oschwald-maxminddb-golang")
 471     (version "1.6.0")
 472     (source (origin
 473               (method git-fetch)
 474               (uri (git-reference
 475                     (url "https://github.com/oschwald/maxminddb-golang")
 476                     (commit (string-append "v" version))))
 477               (file-name (git-file-name name version))
 478               (sha256
 479                (base32
 480                 "1xdqaazxddnajh0qic1c70skad44kxxr7m46fypbnawn61v3f7gc"))))
 481     (build-system go-build-system)
 482     (propagated-inputs
 483      `(("go-golang-org-x-sys" ,go-golang-org-x-sys)))
 484     (arguments
 485      `(#:import-path "github.com/oschwald/maxminddb-golang"
 486        #:tests? #f)) ; Requires some unpackaged software and test data
 487     (synopsis "MaxMind DB Reader for Go")
 488     (description "This is a Go reader for the MaxMind DB format.  Although
 489 this can be used to read GeoLite2 and GeoIP2 databases, @code{geoip2} provides a
 490 higher-level API for doing so.")
 491     (home-page "https://github.com/oschwald/maxminddb-golang")
 492     (license isc)))
 493
 494 (define-public go-github-com-stathat-go
 495   (package
 496     (name "go-github-com-stathat-go")
 497     (version "1.0.0")
 498     (source (origin
 499               (method git-fetch)
 500               (uri (git-reference
 501                     (url "https://github.com/stathat/go")
 502                     (commit (string-append "v" version))))
 503               (file-name (git-file-name name version))
 504               (sha256
 505                (base32
 506                 "1zzlsl24dyr202qkr2pay22m6d0gb7ssms77wgdx0r0clgm7dihw"))))
 507     (build-system go-build-system)
 508     (arguments
 509      `(#:import-path "github.com/stathat/go"))
 510     (synopsis "Post statistics to StatHat")
 511     (description "This is a Go package for posting to a StatHat account.")
 512     (home-page "https://github.com/stathat/go")
 513     (license expat)))
 514
 515 (define-public go-github-com-rcrowley-go-metrics
 516   (let ((commit "cac0b30c2563378d434b5af411844adff8e32960")
 517         (revision "2"))
 518     (package
 519       (name "go-github-com-rcrowley-go-metrics")
 520       (version (git-version "0.0.0" revision commit))
 521       (source (origin
 522                 (method git-fetch)
 523                 (uri (git-reference
 524                       (url "https://github.com/rcrowley/go-metrics")
 525                       (commit commit)))
 526                 (file-name (git-file-name name version))
 527                 (sha256
 528                  (base32
 529                   "1hfxffnpaw49pr3wrkbzq3pnv3nyzsvk5dxndv0yz70xlrbg8a04"))))
 530       (build-system go-build-system)
 531       (arguments
 532        `(#:import-path "github.com/rcrowley/go-metrics"))
 533       (propagated-inputs
 534        `(("go-github-com-stathat-go" ,go-github-com-stathat-go)))
 535       (synopsis "Go port of Coda Hale's Metrics library")
 536       (description "This package provides a Go implementation of Coda Hale's
 537 Metrics library.")
 538       (home-page "https://github.com/rcrowley/go-metrics")
 539       (license bsd-2))))
 540
 541 (define-public go-github-com-sasha-s-go-deadlock
 542   (package
 543     (name "go-github-com-sasha-s-go-deadlock")
 544     (version "0.2.0")
 545     (source (origin
 546               (method git-fetch)
 547               (uri (git-reference
 548                     (url "https://github.com/sasha-s/go-deadlock")
 549                     (commit (string-append "v" version))))
 550               (file-name (git-file-name name version))
 551               (sha256
 552                (base32
 553                 "13p7b7pakd9k1c2k0fs1hfim3c8mivz679977ai6zb01s4aw7gyg"))))
 554     (build-system go-build-system)
 555     (arguments
 556      `(#:import-path "github.com/sasha-s/go-deadlock"))
 557     (propagated-inputs
 558      `(("go-github-com-petermattis-goid" ,go-github-com-petermattis-goid)))
 559     (synopsis "Deadlock detection in go")
 560     (description "This package provides tools for detecting deadlocks at
 561 run-time in Go.")
 562     (home-page "https://github.com/sasha-s/go-deadlock")
 563     (license asl2.0)))
 564
 565 (define-public go-github-com-syndtr-goleveldb
 566   (let ((commit "758128399b1df3a87e92df6c26c1d2063da8fabe")
 567         (revision "4"))
 568     (package
 569       (name "go-github-com-syndtr-goleveldb")
 570       (version (git-version "1.0.1" revision commit))
 571       (source (origin
 572                 (method git-fetch)
 573                 (uri (git-reference
 574                       (url "https://github.com/syndtr/goleveldb")
 575                       (commit commit)))
 576                 (file-name (git-file-name name version))
 577                 (sha256
 578                  (base32
 579                   "0mnkzrz4di13g6ggd54my7bkb9nwk8f5k672dyasn467wsg7bf8f"))))
 580       (build-system go-build-system)
 581       (propagated-inputs
 582        `(("go-github-com-golang-snappy" ,go-github-com-golang-snappy)))
 583       (arguments
 584        `(#:import-path "github.com/syndtr/goleveldb/leveldb"
 585          #:unpack-path "github.com/syndtr/goleveldb"
 586          #:tests? #f)) ; XXX needs 'github.com/onsi/gomega' package
 587       (synopsis "LevelDB key/value database")
 588       (description "This is an implementation of the LevelDB key / value
 589 database in Go.")
 590       (home-page "https://github.com/syndtr/goleveldb")
 591       (license bsd-2))))
 592
 593 (define-public go-github-com-thejerf-suture
 594   (package
 595     (name "go-github-com-thejerf-suture")
 596     (version "3.0.2")
 597     (source (origin
 598               (method git-fetch)
 599               (uri (git-reference
 600                     (url "https://github.com/thejerf/suture")
 601                     (commit (string-append "v" version))))
 602               (file-name (git-file-name name version))
 603               (sha256
 604                (base32
 605                 "03bdrl78jfwk0kw40lj63ga9cxhgccgss8yi9lp5j0m0ml7921gh"))))
 606     (build-system go-build-system)
 607     (arguments
 608      `(#:import-path "github.com/thejerf/suture"))
 609     (synopsis "Supervisor trees for Go")
 610     (description "Suture provides Erlang-ish supervisor trees for Go.
 611 \"Supervisor trees\" -> \"sutree\" -> \"suture\" -> holds your code together
 612 when it's trying to die.
 613
 614 It is intended to deal gracefully with the real failure cases that can occur
 615 with supervision trees (such as burning all your CPU time endlessly restarting
 616 dead services), while also making no unnecessary demands on the \"service\"
 617 code, and providing hooks to perform adequate logging with in a production
 618 environment")
 619     (home-page "https://github.com/thejerf/suture")
 620     (license expat)))
 621
 622 (define-public go-github-com-vitrun-qart
 623   (let ((commit "bf64b92db6b05651d6c25a3dabf2d543b360c0aa")
 624         (revision "0"))
 625     (package
 626       (name "go-github-com-vitrun-qart")
 627       (version (git-version "0.0.0" revision commit))
 628       (source (origin
 629                 (method git-fetch)
 630                 (uri (git-reference
 631                       (url "https://github.com/vitrun/qart")
 632                       (commit commit)))
 633                 (file-name (string-append "go-github-com-vitrun-qart-"
 634                                           version "-checkout"))
 635                 (sha256
 636                  (base32
 637                   "1xk7qki703xmay9ghi3kq2bjf1iw9dz8wik55739d6i7sn77vvkc"))))
 638       (build-system go-build-system)
 639       (arguments
 640        `(#:import-path "github.com/vitrun/qart"))
 641       (synopsis "Create QR codes with an embedded image")
 642       (description "This package provides a library for embedding
 643 human-meaningful graphics in QR codes.  However, instead of scribbling on
 644 redundant pieces and relying on error correction to preserve the meaning,
 645 @code{qart} engineers the encoded values to create the picture in a code with no
 646 inherent errors.")
 647       (home-page "https://github.com/vitrun/qart")
 648       (license bsd-3))))
 649
 650 (define-public go-github-com-chmduquesne-rollinghash
 651   (let ((commit "a60f8e7142b536ea61bb5d84014171189eeaaa81")
 652         (revision "0"))
 653     (package
 654       (name "go-github-com-chmduquesne-rollinghash")
 655       (version (git-version "4.0.0" revision commit))
 656       (source
 657         (origin
 658           (method git-fetch)
 659           (uri (git-reference
 660                  (url "https://github.com/chmduquesne/rollinghash.git")
 661                  (commit commit)))
 662           (file-name (git-file-name name version))
 663           (sha256
 664            (base32
 665             "0fpaqq4zb0wikgbhn7vwqqj1h865f5xy195vkhivsp922p7qwsjr"))))
 666       (build-system go-build-system)
 667       (arguments
 668        '(#:import-path "github.com/chmduquesne/rollinghash/"))
 669       (synopsis "Rolling hashes in Go")
 670       (description "This package provides a Go implementation of several rolling
 671 hashes.")
 672       (home-page "https://github.com/chmduquesne/rollinghash")
 673       (license expat))))
 674
 675 (define-public go-github-com-petermattis-goid
 676   (let ((commit "b0b1615b78e5ee59739545bb38426383b2cda4c9")
 677         (revision "1"))
 678     (package
 679       (name "go-github-com-petermattis-goid")
 680       (version (git-version "0.0.0" revision commit))
 681       (source (origin
 682                 (method git-fetch)
 683                 (uri (git-reference
 684                        (url "https://github.com/petermattis/goid.git")
 685                        (commit commit)))
 686                 (file-name (git-file-name name version))
 687                 (sha256
 688                  (base32
 689                   "0ghfxn045r0bbn2vszw897lxzmhnm4k59aypjvpxl0pbzsw9ab2c"))))
 690       (build-system go-build-system)
 691       (arguments
 692        '(#:import-path "github.com/petermattis/goid"))
 693       (synopsis "Identify the running goroutine")
 694       (description "This package offers a method of programmatically retrieving
 695 the current goroutine's ID.")
 696       (home-page "https://github.com/petermattis/goid")
 697       (license asl2.0))))
 698
 699 (define-public go-github-com-kballard-go-shellquote
 700   (let ((commit "95032a82bc518f77982ea72343cc1ade730072f0")
 701         (revision "1"))
 702     (package
 703       (name "go-github-com-kballard-go-shellquote")
 704       (version (git-version "0.0.0" revision commit))
 705       (source (origin
 706                 (method git-fetch)
 707                 (uri (git-reference
 708                        (url "https://github.com/kballard/go-shellquote.git")
 709                        (commit commit)))
 710                 (file-name (git-file-name name version))
 711                 (sha256
 712                  (base32
 713                   "1rspvmnsikdq95jmx3dykxd4k1rmgl98ryjrysvl0cf18hl1vq80"))))
 714       (build-system go-build-system)
 715       (arguments
 716        '(#:import-path "github.com/kballard/go-shellquote"))
 717       (synopsis "Shell-style string joins and splits")
 718       (description "Shellquote provides utilities for joining/splitting strings
 719 using sh's word-splitting rules.")
 720       (home-page "https://github.com/kballard/go-shellquote")
 721       (license expat))))
 722
 723 (define-public go-github-com-syncthing-notify
 724   (let ((commit "69c7a957d3e261f9744f46b3dd4d608d8480ad90")
 725         (revision "5"))
 726     (package
 727       (name "go-github-com-syncthing-notify")
 728       (version (git-version "0.0.0" revision commit))
 729       (source (origin
 730                 (method git-fetch)
 731                 (uri (git-reference
 732                        (url "https://github.com/syncthing/notify")
 733                        (commit commit)))
 734                 (file-name (git-file-name name version))
 735                 (sha256
 736                  (base32
 737                   "1mmdzyfnmjabyhbipl4bggw4w5nlxyyjp0d93qd824kj07kmsr1f"))))
 738       (build-system go-build-system)
 739       (arguments
 740        '(#:import-path "github.com/syncthing/notify"))
 741       (propagated-inputs
 742        `(("go-golang-org-x-sys" ,go-golang-org-x-sys)))
 743       (synopsis "File system event notification library")
 744       (description "This package provides @code{notify}, a file system event
 745 notification library in Go.")
 746       (home-page "https://github.com/syncthing/notify")
 747       (license expat))))
 748
 749 (define-public go-github-com-beorn7-perks-quantile
 750   (package
 751     (name "go-github-com-beorn7-perks-quantile")
 752     (version "1.0.1")
 753     (source (origin
 754               (method git-fetch)
 755               (uri (git-reference
 756                      (url "https://github.com/beorn7/perks.git")
 757                      (commit (string-append "v" version))))
 758               (file-name (git-file-name name version))
 759               (sha256
 760                (base32
 761                 "17n4yygjxa6p499dj3yaqzfww2g7528165cl13haj97hlx94dgl7"))))
 762     (build-system go-build-system)
 763     (arguments
 764      '(#:import-path "github.com/beorn7/perks/quantile"
 765        #:unpack-path "github.com/beorn7/perks"))
 766     (synopsis "Compute approximate quantiles over an unbounded data stream")
 767     (description "Perks contains the Go package @code{quantile} that computes
 768 approximate quantiles over an unbounded data stream within low memory and CPU
 769 bounds.")
 770     (home-page "https://github.com/beorn7/perks")
 771     (license expat)))
 772
 773 (define-public go-github-com-prometheus-client-model
 774   (let ((commit "14fe0d1b01d4d5fc031dd4bec1823bd3ebbe8016")
 775         (revision "2"))
 776     (package
 777       (name "go-github-com-prometheus-client-model")
 778       (version (git-version "0.0.2" revision commit))
 779       (source (origin
 780                 (method git-fetch)
 781                 (uri (git-reference
 782                        (url "https://github.com/prometheus/client_model.git")
 783                        (commit commit)))
 784                 (file-name (git-file-name name version))
 785                 (sha256
 786                  (base32
 787                   "0zdmk6rbbx39cvfz0r59v2jg5sg9yd02b4pds5n5llgvivi99550"))))
 788       (build-system go-build-system)
 789       (arguments
 790        '(#:import-path "github.com/prometheus/client_model"
 791          #:tests? #f
 792          #:phases
 793          (modify-phases %standard-phases
 794            ;; Source-only package
 795            (delete 'build))))
 796       (propagated-inputs
 797        `(("go-github-com-golang-protobuf-proto"
 798           ,go-github-com-golang-protobuf-proto)))
 799       (synopsis "Data model artifacts for Prometheus")
 800       (description "This package provides data model artifacts for Prometheus.")
 801       (home-page "https://github.com/prometheus/client_model")
 802       (license asl2.0))))
 803
 804 (define-public go-github-com-matttproud-golang-protobuf-extensions-pbutil
 805   (let ((commit "c12348ce28de40eed0136aa2b644d0ee0650e56c")
 806         (revision "0"))
 807     (package
 808       (name "go-github-com-matttproud-golang-protobuf-extensions-pbutil")
 809       (version (git-version "1.0.0" revision commit))
 810       (source
 811         (origin
 812           (method git-fetch)
 813           (uri
 814             (git-reference
 815               (url "https://github.com/matttproud/golang_protobuf_extensions.git")
 816               (commit commit)))
 817           (file-name (git-file-name name version))
 818           (sha256
 819            (base32
 820             "1d0c1isd2lk9pnfq2nk0aih356j30k3h1gi2w0ixsivi5csl7jya"))))
 821       (build-system go-build-system)
 822       (arguments
 823        '(#:import-path "github.com/matttproud/golang_protobuf_extensions/pbutil"
 824          #:unpack-path "github.com/matttproud/golang_protobuf_extensions"))
 825       (propagated-inputs
 826        `(("go-github-com-golang-protobuf-proto"
 827           ,go-github-com-golang-protobuf-proto)))
 828       (synopsis "Streaming Protocol Buffers in Go")
 829       (description "This package provides various Protocol Buffer
 830 extensions for the Go language, namely support for record length-delimited
 831 message streaming.")
 832       (home-page "https://github.com/matttproud/golang_protobuf_extensions")
 833       (license asl2.0))))
 834
 835 (define-public go-github-com-prometheus-common
 836     (package
 837       (name "go-github-com-prometheus-common")
 838       (version "0.4.1")
 839       (source (origin
 840                 (method git-fetch)
 841                 (uri (git-reference
 842                        (url "https://github.com/prometheus/common.git")
 843                        (commit (string-append "v" version))))
 844                 (file-name (git-file-name name version))
 845                 (sha256
 846                  (base32
 847                   "0sf4sjdckblz1hqdfvripk3zyp8xq89w7q75kbsyg4c078af896s"))))
 848       (build-system go-build-system)
 849       (arguments
 850        '(#:import-path "github.com/prometheus/common"
 851          #:tests? #f
 852          #:phases
 853          (modify-phases %standard-phases
 854            (add-before 'reset-gzip-timestamps 'make-gzip-archive-writable
 855              (lambda* (#:key outputs #:allow-other-keys)
 856                (map (lambda (file)
 857                       (make-file-writable file))
 858                     (find-files
 859                       (string-append (assoc-ref outputs "out")
 860                                      "/src/github.com/prometheus/common/expfmt/testdata/")
 861                       ".*\\.gz$"))
 862                #t))
 863            ;; Source-only package
 864            (delete 'build))))
 865       (propagated-inputs
 866        `(("go-github-com-golang-protobuf-proto"
 867           ,go-github-com-golang-protobuf-proto)
 868          ("go-github-com-matttproud-golang-protobuf-extensions-pbutil"
 869           ,go-github-com-matttproud-golang-protobuf-extensions-pbutil)
 870          ("go-github-com-prometheus-client-model"
 871           ,go-github-com-prometheus-client-model)))
 872       (synopsis "Prometheus metrics")
 873       (description "This package provides tools for reading and writing
 874 Prometheus metrics.")
 875       (home-page "https://github.com/prometheus/common")
 876       (license asl2.0)))
 877
 878 (define-public go-github-com-prometheus-procfs
 879   (package
 880     (name "go-github-com-prometheus-procfs")
 881     (version "0.0.11")
 882     (source (origin
 883               (method git-fetch)
 884               (uri (git-reference
 885                      (url "https://github.com/prometheus/procfs.git")
 886                      (commit (string-append "v" version))))
 887               (file-name (git-file-name name version))
 888               (sha256
 889                (base32
 890                 "1msc8bfywsmrgr2ryqjdqwkxiz1ll08r3qgvaka2507z1wpcpj2c"))))
 891     (build-system go-build-system)
 892     (arguments
 893      '(#:import-path "github.com/prometheus/procfs"
 894        ;; The tests require Go modules, which are not yet supported in Guix's
 895        ;; Go build system.
 896        #:tests? #f))
 897     (propagated-inputs
 898      `(("go-golang-org-x-sys" ,go-golang-org-x-sys)))
 899     (synopsis "Go library for reading @file{/proc}")
 900     (description "The @code{procfs} Go package provides functions to retrieve
 901 system, kernel, and process metrics from the @file{/proc} pseudo file system.")
 902     (home-page "https://github.com/prometheus/procfs")
 903     (license asl2.0)))
 904
 905 (define-public go-github-com-prometheus-client-golang
 906     (package
 907       (name "go-github-com-prometheus-client-golang")
 908       (version "1.2.1")
 909       (source (origin
 910                 (method git-fetch)
 911                 (uri (git-reference
 912                        (url "https://github.com/prometheus/client_golang.git")
 913                        (commit (string-append "v" version))))
 914                 (file-name (git-file-name name version))
 915                 (sha256
 916                  (base32
 917                   "0zs49psk23n9z8wrl02d5vib5wclpym8kaxcy6n5pk696i419065"))))
 918       (build-system go-build-system)
 919       (arguments
 920        '(#:tests? #f
 921          #:import-path "github.com/prometheus/client_golang"
 922          #:phases
 923          (modify-phases %standard-phases
 924            ;; Source-only package
 925            (delete 'build))))
 926       (propagated-inputs
 927        `(("go-github-com-beorn7-perks-quantile"
 928           ,go-github-com-beorn7-perks-quantile)
 929          ("go-github-com-golang-protobuf-proto"
 930           ,go-github-com-golang-protobuf-proto)
 931          ("go-github-com-prometheus-client-model"
 932           ,go-github-com-prometheus-client-model)
 933          ("go-github-com-prometheus-common"
 934           ,go-github-com-prometheus-common)
 935          ("go-github-com-prometheus-procfs" ,go-github-com-prometheus-procfs)
 936          ("go-github-com-cespare-xxhash" ,go-github-com-cespare-xxhash)))
 937       (synopsis "HTTP server and client tools for Prometheus")
 938       (description "This package @code{promhttp} provides HTTP client and
 939 server tools for Prometheus metrics.")
 940       (home-page "https://github.com/prometheus/client_golang")
 941       (license asl2.0)))
 942
 943 (define-public go-github-com-go-asn1-ber-asn1-ber
 944   (package
 945     (name "go-github-com-go-asn1-ber-asn1-ber")
 946     (version "1.4.1")
 947     (source (origin
 948               (method git-fetch)
 949               (uri (git-reference
 950                      (url "https://github.com/go-asn1-ber/asn1-ber")
 951                      (commit (string-append "v" version))))
 952               (file-name (git-file-name name version))
 953               (sha256
 954                (base32
 955                 "0d7yl1f7ak0djkflw8wx1wlhym2whg7bh57m419arfym9ncwrhg1"))))
 956     (build-system go-build-system)
 957     (arguments
 958      '(#:import-path "github.com/go-asn1-ber/asn1-ber"))
 959     (synopsis "ASN.1 BER encoding and decoding in Go")
 960     (description "This package provides ASN.1 BER encoding and decoding in the
 961 Go language.")
 962     (home-page "https://github.com/go-asn1-ber/asn1-ber")
 963     (license expat)))
 964
 965 (define-public go-github-com-go-ldap-ldap
 966   (package
 967     (name "go-github-com-go-ldap-ldap")
 968     (version "3.1.7")
 969     (source (origin
 970               (method git-fetch)
 971               (uri (git-reference
 972                      (url "https://github.com/go-ldap/ldap")
 973                      (commit (string-append "v" version))))
 974               (file-name (git-file-name name version))
 975               (sha256
 976                (base32
 977                 "1z6wxia7a1jkmasa9mm6g4n8f0qqbp5rw6vk0zyh4vzk7azklnj2"))))
 978     (build-system go-build-system)
 979     (arguments
 980      '(#:import-path "github.com/go-ldap/ldap/v3"
 981        #:tests? #f)) ; test suite requires internet access
 982     (propagated-inputs
 983      `(("go-github-com-go-asn1-ber-asn1-ber" ,go-github-com-go-asn1-ber-asn1-ber)))
 984     (home-page "https://github.com/go-ldap/ldap")
 985     (synopsis "LDAP v3 functionality for Go")
 986     (description "This package provides basic LDAP v3 functionality in the Go
 987 language.")
 988     (license expat)))
 989
 990 (define-public go-github-com-flynn-archive-go-shlex
 991   (let ((commit "3f9db97f856818214da2e1057f8ad84803971cff")
 992         (revision "0"))
 993     (package
 994       (name "go-github-com-flynn-archive-go-shlex")
 995       (version (git-version "0.0.0" revision commit))
 996       (source (origin
 997                 (method git-fetch)
 998                 (uri (git-reference
 999                        (url "https://github.com/flynn-archive/go-shlex.git")
1000                        (commit commit)))
1001                 (file-name (git-file-name name version))
1002                 (sha256
1003                  (base32
1004                   "1j743lysygkpa2s2gii2xr32j7bxgc15zv4113b0q9jhn676ysia"))))
1005       (build-system go-build-system)
1006       (arguments
1007        '(#:import-path "github.com/flynn-archive/go-shlex"))
1008       (synopsis "Go lexer")
1009       (description "Shlex is a simple lexer for go that supports shell-style
1010 quoting, commenting, and escaping.")
1011       (home-page "https://github.com/flynn-archive/go-shlex")
1012       (license asl2.0))))
1013
1014 (define-public go-github-com-audriusbutkevicius-pfilter
1015   (package
1016     (name "go-github-com-audriusbutkevicius-pfilter")
1017     (version "0.0.5")
1018     (source
1019       (origin
1020         (method git-fetch)
1021         (uri (git-reference
1022                (url "https://github.com/AudriusButkevicius/pfilter.git")
1023                (commit version)))
1024         (file-name (git-file-name name version))
1025         (sha256
1026          (base32
1027           "0xzhwyd0w21bhvzl5pinn22hp0y6h44rh3s2ppql69rafc6zd3c6"))))
1028     (build-system go-build-system)
1029     (arguments
1030      '(#:import-path "github.com/AudriusButkevicius/pfilter"))
1031     (synopsis "Filter packets into multiple virtual connections")
1032     (description "Pfilter is a Go package for filtering packets into multiple
1033 virtual connections from a single physical connection.")
1034     (home-page "https://github.com/AudriusButkevicius/pfilter")
1035     (license expat)))
1036
1037 (define-public go-github-com-ccding-go-stun
1038   (package
1039     (name "go-github-com-ccding-go-stun")
1040     (version "0.1.2")
1041     (source
1042       (origin
1043         (method git-fetch)
1044         (uri (git-reference
1045                (url "https://github.com/ccding/go-stun.git")
1046                (commit (string-append "v" version))))
1047         (file-name (git-file-name name version))
1048         (sha256
1049          (base32
1050           "133r2s4h9vv5lmjd680my2c5973gfi0gg5cxcwzjwdjad83a2dm0"))))
1051     (build-system go-build-system)
1052     (arguments
1053      '(#:import-path "github.com/ccding/go-stun"))
1054     (synopsis "STUN client implementation")
1055     (description "Go-stun is a go implementation of the STUN client (RFC 3489
1056 and RFC 5389).")
1057     (home-page "https://github.com/ccding/go-stun")
1058     (license asl2.0)))
1059
1060 (define-public go-github-com-cespare-xxhash
1061   (package
1062     (name "go-github-com-cespare-xxhash")
1063     (version "2.1.0")
1064     (source (origin
1065               (method git-fetch)
1066               (uri (git-reference
1067                      (url "https://github.com/cespare/xxhash")
1068                      (commit (string-append "v" version))))
1069               (file-name (git-file-name name version))
1070               (sha256
1071                (base32
1072                 "12ad3z7ki9j07c4kx3ywkl6188i2afsjg7sl60wd21p6zkkpfjxq"))))
1073     (build-system go-build-system)
1074     (arguments
1075      '(#:import-path "github.com/cespare/xxhash"))
1076     (synopsis "Go implementation of xxHash")
1077     (description "This package provides of Go implementation of the 64-bit
1078 xxHash algorithm (XXH64).")
1079     (home-page "https://github.com/cespare/xxhash/")
1080     (license expat)))