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