[jackhill/guix/guix.git] / gnu / packages / rpc.scm

;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2019 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2020 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com>
;;; Copyright © 2020 Brett Gilio <brettg@gnu.org>
;;; Copyright © 2021 Greg Hogan <code@greghogan.com>
;;; Copyright © 2021 Tobias Geerinckx-Rice <me@tobias.gr>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.

(define-module (gnu packages rpc)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix packages)
  #:use-module (guix git-download)
  #:use-module (guix download)
  #:use-module (guix utils)
  #:use-module (guix build-system cmake)
  #:use-module (guix build-system gnu)
  #:use-module (guix build-system python)
  #:use-module (gnu packages adns)
  #:use-module (gnu packages autotools)
  #:use-module (gnu packages bison)
  #:use-module (gnu packages boost)
  #:use-module (gnu packages compression)
  #:use-module (gnu packages cpp)
  #:use-module (gnu packages flex)
  #:use-module (gnu packages pkg-config)
  #:use-module (gnu packages protobuf)
  #:use-module (gnu packages python)
  #:use-module (gnu packages python-xyz)
  #:use-module (gnu packages regex)
  #:use-module (gnu packages tls))

(define-public grpc
  (package
    (name "grpc")
    (version "1.34.0")
    (outputs '("out" "static"))
    (source (origin
              (method git-fetch)
              (uri (git-reference
                    (url "https://github.com/grpc/grpc")
                    (commit (string-append "v" version))))
              (file-name (git-file-name name version))
              (sha256
               (base32
                "1fs407hnlnm0b8sncjwys9rc7ia5nb7wxrpx39nq3pzzfs1lv3vq"))))
    (build-system cmake-build-system)
    (arguments
     `(#:tests? #f ; no test target
       #:configure-flags
       (list "-DgRPC_ZLIB_PROVIDER=package"
             "-DgRPC_ABSL_PROVIDER=package"
             "-DgRPC_CARES_PROVIDER=package"
             "-DgRPC_SSL_PROVIDER=package"
             "-DgRPC_PROTOBUF_PROVIDER=package"
             "-DgRPC_RE2_PROVIDER=package"
             (string-append "-DCMAKE_INSTALL_PREFIX="
                            (assoc-ref %outputs "out"))
             "-DCMAKE_INSTALL_LIBDIR=lib"
             (string-append "-DCMAKE_INSTALL_RPATH="
                            (assoc-ref %outputs "out") "/lib")
             "-DCMAKE_VERBOSE_MAKEFILE=ON")
       #:phases
       (modify-phases %standard-phases
         (add-before 'configure 'configure-shared
           (lambda* (#:key (configure-flags '()) #:allow-other-keys)
             (mkdir "../build-shared")
             (with-directory-excursion "../build-shared"
               (apply invoke
                      "cmake" "../source"
                      "-DBUILD_SHARED_LIBS=ON"
                      configure-flags)
               (apply invoke "make"
                      `("-j" ,(number->string (parallel-job-count)))))))
         (add-after 'install 'install-shared-libraries
           (lambda _
             (with-directory-excursion "../build-shared"
               (invoke "make" "install"))))
         (add-before 'strip 'move-static-libs
           (lambda* (#:key outputs #:allow-other-keys)
             (let ((out (assoc-ref outputs "out"))
                   (static (assoc-ref outputs "static")))
               (mkdir-p (string-append static "/lib"))
               (with-directory-excursion
                 (string-append out "/lib")
                 (for-each
                   (lambda (file)
                     (rename-file file
                                  (string-append static "/lib/" file)))
                   (find-files "." "\\.a$"))))
             #t)))))
    (inputs
     `(("abseil-cpp" ,abseil-cpp)
       ("c-ares" ,c-ares/cmake)
       ("openssl" ,openssl)
       ("re2" ,re2)
       ("zlib" ,zlib)))
    (native-inputs
     `(("pkg-config" ,pkg-config)
       ("protobuf" ,protobuf)
       ("python" ,python-wrapper)))
    (home-page "https://grpc.io")
    (synopsis "High performance universal RPC framework")
    (description "gRPC is a modern high performance @dfn{Remote Procedure Call}
(RPC) framework that can run in any environment.  It can efficiently connect
services in and across data centers with pluggable support for load balancing,
tracing, health checking and authentication.  It is also applicable in last
mile of distributed computing to connect devices, mobile applications and
browsers to backend services.")
    (license license:asl2.0)))

;; Some packages require this older version.
(define-public grpc-1.16.1
  (package
    (inherit grpc)
    (version "1.16.1")
    (source (origin
              (method git-fetch)
              (uri (git-reference
                    (url "https://github.com/grpc/grpc")
                    (commit (string-append "v" version))))
              (file-name (git-file-name "grpc" version))
              (sha256
               (base32
                "1jimqz3115f9pli5w6ik9wi7mjc7ix6y7yrq4a1ab9fc3dalj7p2"))))
    (arguments
     (substitute-keyword-arguments (package-arguments grpc)
       ((#:phases phases)
        `(modify-phases ,phases
           ;; Note: This would be nicer as a snippet, but that creates a tarball
           ;; instead of a checkout and breaks assumptions made by the builder.
           (add-after 'unpack 'rename-gettid
             (lambda _
               ;; Rename custom gettid() syscall wrapper to avoid conflict
               ;; with gettid() from glibc 2.30.
               (substitute* '("src/core/lib/gpr/log_linux.cc"
                              "src/core/lib/gpr/log_posix.cc"
                              "src/core/lib/iomgr/ev_epollex_linux.cc")
                 (("gettid\\(")
                  "sys_gettid("))
               #t))))))))

(define-public python-grpcio
  (package
    (name "python-grpcio")
    (version "1.27.2")
    (source
     (origin
       (method url-fetch)
       (uri (pypi-uri "grpcio" version))
       (sha256
        (base32
         "0zl89jwcff9hkd8mi4yf3qbhns9vbv1s4x4vahm5mkpr7jwk5ras"))
       (modules '((guix build utils) (ice-9 ftw)))
       (snippet
        '(begin
           (with-directory-excursion "third_party"
             ;; Delete the bundled source code of libraries that are possible
             ;; to provide as inputs.
             (for-each delete-file-recursively
                       (scandir "."
                                (lambda (file)
                                  (not (member file
                                               '("." ".."
                                                 "abseil-cpp"
                                                 "address_sorting"
                                                 "upb")))))))
           #t))))
    (build-system python-build-system)
    (arguments
     '(#:phases (modify-phases %standard-phases
                  (add-before 'build 'use-system-libraries
                    (lambda _
                      (setenv "GRPC_PYTHON_BUILD_SYSTEM_CARES" "1")
                      (setenv "GRPC_PYTHON_BUILD_SYSTEM_OPENSSL" "1")
                      (setenv "GRPC_PYTHON_BUILD_SYSTEM_ZLIB" "1")
                      #t))
                  (add-before 'build 'configure-compiler
                    (lambda _
                      (substitute* '("setup.py" "src/python/grpcio/commands.py")
                        (("'cc'") "'gcc'"))
                      #t)))))
    (inputs
     `(("c-ares" ,c-ares)
       ("openssl" ,openssl)
       ("zlib" ,zlib)))
    (propagated-inputs
     `(("python-six" ,python-six)))
    (home-page "https://grpc.io")
    (synopsis "HTTP/2-based RPC framework")
    (description "This package provides a Python library for communicating
with the HTTP/2-based RPC framework gRPC.")
    (license license:asl2.0)))

(define-public apache-thrift
  (package
    (name "apache-thrift")
    (version "0.14.1")
    (source
     (origin
       (method git-fetch)
       (uri (git-reference
             (url "https://github.com/apache/thrift")
             (commit (string-append "v" version))))
       (file-name (git-file-name name version))
       (sha256
        (base32 "1mj3c5jhjbg2sfkx9k9jqg88h1c5rswr9b606s02ny9ydf3akcny"))))
    (build-system gnu-build-system)
    (arguments
     '(#:tests? #f
       #:configure-flags
       (list (string-append "--with-boost="
                            (assoc-ref %build-inputs "boost")))))
    (native-inputs
     `(("autoconf" ,autoconf)
       ("automake" ,automake)
       ("libtool" ,libtool)
       ("pkg-config" ,pkg-config)
       ("flex" ,flex)
       ("bison" ,bison)))
    (inputs
     `(("boost" ,boost)
       ("libressl" ,libressl)))
    (outputs '("out" "lib" "include"))
    (home-page "https://thrift.apache.org/")
    (synopsis
     "Lightweight, language-independent software stack for point-to-point
RPC")
    (description
     "Thrift provides clean abstractions and implementations for data
transport, data serialization, and application level processing.  The code
generation system takes a simple definition language as input and generates
code across programming languages that uses the abstracted stack to build
interoperable RPC clients and servers.")
    (license license:asl2.0)))
Commit	Line	Data
c61557b1 MB	1	;;; GNU Guix --- Functional package management for GNU
	2	;;; Copyright © 2019 Ricardo Wurmus <rekado@elephly.net>
	3	;;; Copyright © 2020 Efraim Flashner <efraim@flashner.co.il>
447fafe3	4	;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com>
f8549086	5	;;; Copyright © 2020 Brett Gilio <brettg@gnu.org>
bd32f85b	6	;;; Copyright © 2021 Greg Hogan <code@greghogan.com>
347cc542	7	;;; Copyright © 2021 Tobias Geerinckx-Rice <me@tobias.gr>
c61557b1 MB	8	;;;
	9	;;; This file is part of GNU Guix.
	10	;;;
	11	;;; GNU Guix is free software; you can redistribute it and/or modify it
	12	;;; under the terms of the GNU General Public License as published by
	13	;;; the Free Software Foundation; either version 3 of the License, or (at
	14	;;; your option) any later version.
	15	;;;
	16	;;; GNU Guix is distributed in the hope that it will be useful, but
	17	;;; WITHOUT ANY WARRANTY; without even the implied warranty of
	18	;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	19	;;; GNU General Public License for more details.
	20	;;;
	21	;;; You should have received a copy of the GNU General Public License
	22	;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
	23
	24	(define-module (gnu packages rpc)
	25	#:use-module ((guix licenses) #:prefix license:)
	26	#:use-module (guix packages)
	27	#:use-module (guix git-download)
f2c7513d	28	#:use-module (guix download)
8cc103cb	29	#:use-module (guix utils)
c61557b1	30	#:use-module (guix build-system cmake)
fbc1cbb5	31	#:use-module (guix build-system gnu)
f2c7513d	32	#:use-module (guix build-system python)
c61557b1	33	#:use-module (gnu packages adns)
fbc1cbb5 KCB	34	#:use-module (gnu packages autotools)
	35	#:use-module (gnu packages bison)
	36	#:use-module (gnu packages boost)
c61557b1	37	#:use-module (gnu packages compression)
447fafe3	38	#:use-module (gnu packages cpp)
fbc1cbb5 KCB	39	#:use-module (gnu packages flex)
fbc1cbb5 KCB	40	#:use-module (gnu packages pkg-config)
c61557b1 MB	41	#:use-module (gnu packages protobuf)
c61557b1 MB	42	#:use-module (gnu packages python)
f2c7513d	43	#:use-module (gnu packages python-xyz)
f8549086	44	#:use-module (gnu packages regex)
c61557b1 MB	45	#:use-module (gnu packages tls))
	46
	47	(define-public grpc
	48	(package
	49	(name "grpc")
dd31176b	50	(version "1.34.0")
c61557b1 MB	51	(outputs '("out" "static"))
	52	(source (origin
	53	(method git-fetch)
	54	(uri (git-reference
b0e7b699	55	(url "https://github.com/grpc/grpc")
c61557b1 MB	56	(commit (string-append "v" version))))
	57	(file-name (git-file-name name version))
	58	(sha256
	59	(base32
dd31176b	60	"1fs407hnlnm0b8sncjwys9rc7ia5nb7wxrpx39nq3pzzfs1lv3vq"))))
c61557b1 MB	61	(build-system cmake-build-system)
	62	(arguments
	63	`(#:tests? #f ; no test target
	64	#:configure-flags
	65	(list "-DgRPC_ZLIB_PROVIDER=package"
447fafe3	66	"-DgRPC_ABSL_PROVIDER=package"
c61557b1 MB	67	"-DgRPC_CARES_PROVIDER=package"
	68	"-DgRPC_SSL_PROVIDER=package"
	69	"-DgRPC_PROTOBUF_PROVIDER=package"
f8549086	70	"-DgRPC_RE2_PROVIDER=package"
c61557b1 MB	71	(string-append "-DCMAKE_INSTALL_PREFIX="
	72	(assoc-ref %outputs "out"))
	73	"-DCMAKE_INSTALL_LIBDIR=lib"
	74	(string-append "-DCMAKE_INSTALL_RPATH="
	75	(assoc-ref %outputs "out") "/lib")
	76	"-DCMAKE_VERBOSE_MAKEFILE=ON")
	77	#:phases
	78	(modify-phases %standard-phases
	79	(add-before 'configure 'configure-shared
	80	(lambda* (#:key (configure-flags '()) #:allow-other-keys)
	81	(mkdir "../build-shared")
	82	(with-directory-excursion "../build-shared"
	83	(apply invoke
	84	"cmake" "../source"
	85	"-DBUILD_SHARED_LIBS=ON"
	86	configure-flags)
	87	(apply invoke "make"
	88	`("-j" ,(number->string (parallel-job-count)))))))
	89	(add-after 'install 'install-shared-libraries
	90	(lambda _
	91	(with-directory-excursion "../build-shared"
	92	(invoke "make" "install"))))
	93	(add-before 'strip 'move-static-libs
	94	(lambda* (#:key outputs #:allow-other-keys)
	95	(let ((out (assoc-ref outputs "out"))
	96	(static (assoc-ref outputs "static")))
	97	(mkdir-p (string-append static "/lib"))
	98	(with-directory-excursion
	99	(string-append out "/lib")
	100	(for-each
	101	(lambda (file)
	102	(rename-file file
	103	(string-append static "/lib/" file)))
	104	(find-files "." "\\.a$"))))
	105	#t)))))
	106	(inputs
447fafe3 MB	107	`(("abseil-cpp" ,abseil-cpp)
447fafe3 MB	108	("c-ares" ,c-ares/cmake)
c61557b1	109	("openssl" ,openssl)
f8549086	110	("re2" ,re2)
c61557b1 MB	111	("zlib" ,zlib)))
c61557b1 MB	112	(native-inputs
f8549086 BG	113	`(("pkg-config" ,pkg-config)
f8549086 BG	114	("protobuf" ,protobuf)
c61557b1 MB	115	("python" ,python-wrapper)))
	116	(home-page "https://grpc.io")
	117	(synopsis "High performance universal RPC framework")
	118	(description "gRPC is a modern high performance @dfn{Remote Procedure Call}
	119	(RPC) framework that can run in any environment. It can efficiently connect
	120	services in and across data centers with pluggable support for load balancing,
	121	tracing, health checking and authentication. It is also applicable in last
	122	mile of distributed computing to connect devices, mobile applications and
	123	browsers to backend services.")
	124	(license license:asl2.0)))
f2c7513d	125
447fafe3 MB	126	;; Some packages require this older version.
	127	(define-public grpc-1.16.1
	128	(package
	129	(inherit grpc)
	130	(version "1.16.1")
	131	(source (origin
	132	(method git-fetch)
	133	(uri (git-reference
b0e7b699	134	(url "https://github.com/grpc/grpc")
447fafe3 MB	135	(commit (string-append "v" version))))
	136	(file-name (git-file-name "grpc" version))
	137	(sha256
	138	(base32
8cc103cb MB	139	"1jimqz3115f9pli5w6ik9wi7mjc7ix6y7yrq4a1ab9fc3dalj7p2"))))
	140	(arguments
	141	(substitute-keyword-arguments (package-arguments grpc)
	142	((#:phases phases)
	143	`(modify-phases ,phases
	144	;; Note: This would be nicer as a snippet, but that creates a tarball
	145	;; instead of a checkout and breaks assumptions made by the builder.
	146	(add-after 'unpack 'rename-gettid
	147	(lambda _
	148	;; Rename custom gettid() syscall wrapper to avoid conflict
	149	;; with gettid() from glibc 2.30.
	150	(substitute* '("src/core/lib/gpr/log_linux.cc"
	151	"src/core/lib/gpr/log_posix.cc"
	152	"src/core/lib/iomgr/ev_epollex_linux.cc")
	153	(("gettid\\(")
	154	"sys_gettid("))
	155	#t))))))))
447fafe3	156
f2c7513d MB	157	(define-public python-grpcio
	158	(package
	159	(name "python-grpcio")
9dec9122	160	(version "1.27.2")
f2c7513d MB	161	(source
	162	(origin
	163	(method url-fetch)
	164	(uri (pypi-uri "grpcio" version))
	165	(sha256
	166	(base32
9dec9122 MB	167	"0zl89jwcff9hkd8mi4yf3qbhns9vbv1s4x4vahm5mkpr7jwk5ras"))
	168	(modules '((guix build utils) (ice-9 ftw)))
	169	(snippet
	170	'(begin
	171	(with-directory-excursion "third_party"
	172	;; Delete the bundled source code of libraries that are possible
	173	;; to provide as inputs.
	174	(for-each delete-file-recursively
	175	(scandir "."
	176	(lambda (file)
	177	(not (member file
	178	'("." ".."
	179	"abseil-cpp"
	180	"address_sorting"
	181	"upb")))))))
	182	#t))))
f2c7513d	183	(build-system python-build-system)
9dec9122 MB	184	(arguments
	185	'(#:phases (modify-phases %standard-phases
	186	(add-before 'build 'use-system-libraries
	187	(lambda _
	188	(setenv "GRPC_PYTHON_BUILD_SYSTEM_CARES" "1")
	189	(setenv "GRPC_PYTHON_BUILD_SYSTEM_OPENSSL" "1")
	190	(setenv "GRPC_PYTHON_BUILD_SYSTEM_ZLIB" "1")
	191	#t))
	192	(add-before 'build 'configure-compiler
	193	(lambda _
	194	(substitute* '("setup.py" "src/python/grpcio/commands.py")
	195	(("'cc'") "'gcc'"))
	196	#t)))))
	197	(inputs
	198	`(("c-ares" ,c-ares)
	199	("openssl" ,openssl)
	200	("zlib" ,zlib)))
f2c7513d MB	201	(propagated-inputs
	202	`(("python-six" ,python-six)))
	203	(home-page "https://grpc.io")
	204	(synopsis "HTTP/2-based RPC framework")
	205	(description "This package provides a Python library for communicating
	206	with the HTTP/2-based RPC framework gRPC.")
	207	(license license:asl2.0)))
fbc1cbb5 KCB	208
	209	(define-public apache-thrift
	210	(package
	211	(name "apache-thrift")
347cc542	212	(version "0.14.1")
fbc1cbb5 KCB	213	(source
	214	(origin
	215	(method git-fetch)
	216	(uri (git-reference
b0e7b699	217	(url "https://github.com/apache/thrift")
fbc1cbb5 KCB	218	(commit (string-append "v" version))))
	219	(file-name (git-file-name name version))
	220	(sha256
347cc542	221	(base32 "1mj3c5jhjbg2sfkx9k9jqg88h1c5rswr9b606s02ny9ydf3akcny"))))
fbc1cbb5 KCB	222	(build-system gnu-build-system)
	223	(arguments
	224	'(#:tests? #f
	225	#:configure-flags
	226	(list (string-append "--with-boost="
	227	(assoc-ref %build-inputs "boost")))))
	228	(native-inputs
	229	`(("autoconf" ,autoconf)
	230	("automake" ,automake)
	231	("libtool" ,libtool)
	232	("pkg-config" ,pkg-config)
	233	("flex" ,flex)
	234	("bison" ,bison)))
	235	(inputs
	236	`(("boost" ,boost)
	237	("libressl" ,libressl)))
	238	(outputs '("out" "lib" "include"))
	239	(home-page "https://thrift.apache.org/")
	240	(synopsis
	241	"Lightweight, language-independent software stack for point-to-point
	242	RPC")
	243	(description
	244	"Thrift provides clean abstractions and implementations for data
	245	transport, data serialization, and application level processing. The code
	246	generation system takes a simple definition language as input and generates
	247	code across programming languages that uses the abstracted stack to build
	248	interoperable RPC clients and servers.")
	249	(license license:asl2.0)))