gnu/packages/jami.scm

   1 ;;; GNU Guix --- Functional package management for GNU
   2 ;;; Copyright © 2019 Pierre Neidhardt <mail@ambrevar.xyz>
   3 ;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com>
   4 ;;; Copyright © 2019, 2020 Jan Wielkiewicz <tona_kosmicznego_smiecia@interia.pl>
   5 ;;;
   6 ;;; This file is part of GNU Guix.
   7 ;;;
   8 ;;; GNU Guix is free software; you can redistribute it and/or modify it
   9 ;;; under the terms of the GNU General Public License as published by
  10 ;;; the Free Software Foundation; either version 3 of the License, or (at
  11 ;;; your option) any later version.
  12 ;;;
  13 ;;; GNU Guix is distributed in the hope that it will be useful, but
  14 ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
  15 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16 ;;; GNU General Public License for more details.
  17 ;;;
  18 ;;; You should have received a copy of the GNU General Public License
  19 ;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
  20
  21 (define-module (gnu packages jami)
  22   #:use-module ((guix licenses) #:prefix license:)
  23   #:use-module (gnu packages aidc)
  24   #:use-module (gnu packages audio)
  25   #:use-module (gnu packages autotools)
  26   #:use-module (gnu packages backup)
  27   #:use-module (gnu packages base)
  28   #:use-module (gnu packages boost)
  29   #:use-module (gnu packages check)
  30   #:use-module (gnu packages compression)
  31   #:use-module (gnu packages crypto)
  32   #:use-module (gnu packages documentation)
  33   #:use-module (gnu packages gettext)
  34   #:use-module (gnu packages glib)
  35   #:use-module (gnu packages gnome)
  36   #:use-module (gnu packages gtk)
  37   #:use-module (gnu packages hurd)
  38   #:use-module (gnu packages libcanberra)
  39   #:use-module (gnu packages linux)
  40   #:use-module (gnu packages multiprecision)
  41   #:use-module (gnu packages networking)
  42   #:use-module (gnu packages pcre)
  43   #:use-module (gnu packages perl)
  44   #:use-module (gnu packages pkg-config)
  45   #:use-module (gnu packages pulseaudio)
  46   #:use-module (gnu packages python)
  47   #:use-module (gnu packages qt)
  48   #:use-module (gnu packages serialization)
  49   #:use-module (gnu packages sqlite)
  50   #:use-module (gnu packages telephony)
  51   #:use-module (gnu packages tls)
  52   #:use-module (gnu packages upnp)
  53   #:use-module (gnu packages video)
  54   #:use-module (gnu packages webkit)
  55   #:use-module (gnu packages xiph)
  56   #:use-module (gnu packages xorg)
  57   #:use-module (gnu packages)
  58   #:use-module (guix build-system cmake)
  59   #:use-module (guix build-system gnu)
  60   #:use-module (guix download)
  61   #:use-module (guix git-download)
  62   #:use-module (guix packages)
  63   #:use-module (guix utils)
  64   #:use-module (srfi srfi-1))
  65
  66 (define %jami-version "20200710.1.6bd18d2")
  67
  68 (define* (jami-source #:key without-daemon)
  69   (origin
  70     (method url-fetch)
  71     (uri (string-append "https://dl.jami.net/release/tarballs/jami_"
  72                         %jami-version
  73                         ".tar.gz"))
  74     (modules '((guix build utils)))
  75     (snippet
  76      (if without-daemon
  77          '(begin
  78             (delete-file-recursively "daemon/contrib"))
  79          #f))
  80     (sha256
  81      (base32
  82       "0lg61jv39x7kc9lq30by246xb6gcgp1rzj49ak7ff8nqpfzyfvva"))))
  83
  84 ;; Savoir-Faire Linux modifies many libraries to add features
  85 ;; to Jami. This procedure makes applying patches to a given
  86 ;; package easy.
  87 (define jami-apply-dependency-patches
  88   '(lambda* (#:key inputs dep-name patches)
  89      (let ((patches-directory "sfl-patches"))
  90        (mkdir-p patches-directory)
  91        (invoke "tar" "-xvf" (assoc-ref inputs "sfl-patches")
  92                "-C" patches-directory
  93                "--strip-components=5"
  94                (string-append "ring-project/daemon/contrib/src/"
  95                               dep-name))
  96        (for-each
  97         (lambda (file)
  98           (invoke "patch" "--force" "-p1" "-i"
  99                   (string-append patches-directory "/"
 100                                  file ".patch")))
 101         patches))))
 102
 103 (define-public pjproject-jami
 104   (package
 105     (inherit pjproject)
 106     (name "pjproject-jami")
 107     (native-inputs
 108      `(("sfl-patches" ,(jami-source))
 109        ,@(package-native-inputs pjproject)))
 110     (arguments
 111      `(#:tests? #f
 112        ;; See ring-project/daemon/contrib/src/pjproject/rules.mak.
 113        #:configure-flags
 114        (list "--disable-oss"
 115              "--disable-sound"
 116              "--disable-video"
 117              ;; The following flag is Linux specific.
 118              ,@(if (hurd-triplet? (or (%current-system)
 119                                       (%current-target-system)))
 120                    '()
 121                    '("--enable-epoll"))
 122              "--enable-ext-sound"
 123              "--disable-speex-aec"
 124              "--disable-g711-codec"
 125              "--disable-l16-codec"
 126              "--disable-gsm-codec"
 127              "--disable-g722-codec"
 128              "--disable-g7221-codec"
 129              "--disable-speex-codec"
 130              "--disable-ilbc-codec"
 131              "--disable-opencore-amr"
 132              "--disable-silk"
 133              "--disable-sdl"
 134              "--disable-ffmpeg"
 135              "--disable-v4l2"
 136              "--disable-openh264"
 137              "--disable-resample"
 138              "--disable-libwebrtc"
 139              "--with-gnutls"
 140              "--with-external-srtp"
 141              ;; We need -fPIC or else we get the following error when linking
 142              ;; against pjproject-jami:
 143              ;;   relocation R_X86_64_32S against `.rodata' can not be used when
 144              ;;   making a shared object;
 145              "CFLAGS=-fPIC"
 146              "CXXFLAGS=-fPIC")
 147        #:phases
 148        (modify-phases %standard-phases
 149          (add-after 'unpack 'make-git-checkout-writable
 150            (lambda _
 151              (for-each make-file-writable (find-files "."))
 152              #t))
 153          (add-after 'unpack 'apply-patches
 154            (lambda* (#:key inputs #:allow-other-keys)
 155              (let ((jami-apply-dependency-patches ,jami-apply-dependency-patches))
 156                ;; Comes from
 157                ;; "ring-project/daemon/contrib/src/pjproject/rules.mak".
 158                ;; WARNING: These amount for huge changes in pjproject.
 159                (jami-apply-dependency-patches
 160                 #:inputs inputs
 161                 #:dep-name "pjproject"
 162                 #:patches
 163                 '("0001-rfc6544"
 164                   "0002-rfc2466"
 165                   "0003-add-tcp-keep-alive"
 166                   "0004-multiple_listeners"
 167                   "0005-fix_ebusy_turn"
 168                   "0006-ignore_ipv6_on_transport_check"
 169                   "0007-pj_ice_sess"
 170                   "0008-fix_ioqueue_ipv6_sendto"
 171                   "0009-add-config-site"
 172                   "0010-fix-pkgconfig"
 173                   "0011-fix-tcp-death-detection"
 174                   "0012-fix-turn-shutdown-crash"))
 175                #t)))
 176          ;; TODO: We could use substitute-keyword-arguments instead of
 177          ;; repeating the phases from pjproject, but somehow it does
 178          ;; not work.
 179          (add-before 'build 'build-dep
 180            (lambda _ (invoke "make" "dep")))
 181          (add-before 'patch-source-shebangs 'autoconf
 182            (lambda _
 183              (invoke "autoconf" "-v" "-f" "-i" "-o"
 184                      "aconfigure" "aconfigure.ac")))
 185          (add-before 'autoconf 'disable-some-tests
 186            ;; Three of the six test programs fail due to missing network
 187            ;; access.
 188            (lambda _
 189              (substitute* "Makefile"
 190                (("selftest: pjlib-test pjlib-util-test pjnath-test pjmedia-test pjsip-test pjsua-test")
 191                 "selftest: pjlib-test pjlib-util-test pjmedia-test"))
 192              #t)))))))
 193
 194 ;; The following variables are configure flags used by ffmpeg-jami.  They're
 195 ;; from the ring-project/daemon/contrib/src/ffmpeg/rules.mak file. We try to
 196 ;; keep it as close to the official Jami package as possible, to provide all
 197 ;; the codecs and extra features that are expected.
 198 ;;
 199 ;; See:
 200 ;; https://review.jami.net/plugins/gitiles/ring-daemon/+/refs/heads/master/contrib/src/ffmpeg/rules.mak
 201
 202 (define %ffmpeg-default-configure-flags
 203   '("--disable-everything"
 204     "--enable-zlib"
 205     "--enable-gpl"
 206     "--enable-swscale"
 207     "--enable-bsfs"
 208     "--disable-filters"
 209     "--disable-programs"
 210     "--disable-postproc"
 211     "--disable-protocols"
 212     "--enable-protocol=crypto"
 213     "--enable-protocol=file"
 214     "--enable-protocol=rtp"
 215     "--enable-protocol=srtp"
 216     "--enable-protocol=tcp"
 217     "--enable-protocol=udp"
 218     "--enable-protocol=unix"
 219     "--enable-protocol=pipe"
 220
 221     ;; enable muxers/demuxers
 222     "--disable-demuxers"
 223     "--disable-muxers"
 224     "--enable-muxer=rtp"
 225     "--enable-muxer=g722"
 226     "--enable-muxer=h263"
 227     "--enable-muxer=h264"
 228     "--enable-muxer=hevc"
 229     "--enable-muxer=webm"
 230     "--enable-muxer=ogg"
 231     "--enable-muxer=pcm_s16be"
 232     "--enable-muxer=pcm_s16le"
 233     "--enable-demuxer=rtp"
 234     "--enable-demuxer=mjpeg"
 235     "--enable-demuxer=mjpeg_2000"
 236     "--enable-demuxer=mpegvideo"
 237     "--enable-demuxer=gif"
 238     "--enable-demuxer=image_jpeg_pipe"
 239     "--enable-demuxer=image_png_pipe"
 240     "--enable-demuxer=image_webp_pipe"
 241     "--enable-demuxer=matroska"
 242     "--enable-demuxer=m4v"
 243     "--enable-demuxer=mp3"
 244     "--enable-demuxer=ogg"
 245     "--enable-demuxer=flac"
 246     "--enable-demuxer=wav"
 247     "--enable-demuxer=ac3"
 248     "--enable-demuxer=g722"
 249     "--enable-demuxer=pcm_mulaw"
 250     "--enable-demuxer=pcm_alaw"
 251     "--enable-demuxer=pcm_s16be"
 252     "--enable-demuxer=pcm_s16le"
 253     "--enable-demuxer=h263"
 254     "--enable-demuxer=h264"
 255     "--enable-demuxer=hevc"
 256
 257     ;; enable parsers
 258     "--enable-parser=h263"
 259     "--enable-parser=h264"
 260     "--enable-parser=hevc"
 261     "--enable-parser=mpeg4video"
 262     "--enable-parser=vp8"
 263     "--enable-parser=vp9"
 264     "--enable-parser=opus"
 265
 266     ;; encoders/decoders
 267     "--enable-encoder=adpcm_g722"
 268     "--enable-decoder=adpcm_g722"
 269     "--enable-encoder=rawvideo"
 270     "--enable-decoder=rawvideo"
 271     "--enable-encoder=libx264"
 272     "--enable-decoder=h264"
 273     "--enable-encoder=pcm_alaw"
 274     "--enable-decoder=pcm_alaw"
 275     "--enable-encoder=pcm_mulaw"
 276     "--enable-decoder=pcm_mulaw"
 277     "--enable-encoder=mpeg4"
 278     "--enable-decoder=mpeg4"
 279     "--enable-encoder=libvpx_vp8"
 280     "--enable-decoder=vp8"
 281     "--enable-decoder=vp9"
 282     "--enable-encoder=h263"
 283     "--enable-encoder=h263p"
 284     "--enable-decoder=h263"
 285     "--enable-encoder=mjpeg"
 286     "--enable-decoder=mjpeg"
 287     "--enable-decoder=mjpegb"
 288     "--enable-libspeex"
 289     "--enable-libopus"
 290     "--enable-libvpx"
 291     "--enable-libx264"
 292     "--enable-encoder=libspeex"
 293     "--enable-decoder=libspeex"
 294     "--enable-encoder=libopus"
 295     "--enable-decoder=libopus"
 296
 297     ;; decoders for ringtones and audio streaming
 298     "--enable-decoder=flac"
 299     "--enable-decoder=vorbis"
 300     "--enable-decoder=aac"
 301     "--enable-decoder=ac3"
 302     "--enable-decoder=eac3"
 303     "--enable-decoder=mp3"
 304     "--enable-decoder=pcm_u24be"
 305     "--enable-decoder=pcm_u24le"
 306     "--enable-decoder=pcm_u32be"
 307     "--enable-decoder=pcm_u32le"
 308     "--enable-decoder=pcm_u8"
 309     "--enable-decoder=pcm_f16le"
 310     "--enable-decoder=pcm_f24le"
 311     "--enable-decoder=pcm_f32be"
 312     "--enable-decoder=pcm_f32le"
 313     "--enable-decoder=pcm_f64be"
 314     "--enable-decoder=pcm_f64le"
 315     "--enable-decoder=pcm_s16be"
 316     "--enable-decoder=pcm_s16be_planar"
 317     "--enable-decoder=pcm_s16le"
 318     "--enable-decoder=pcm_s16le_planar"
 319     "--enable-decoder=pcm_s24be"
 320     "--enable-decoder=pcm_s24le"
 321     "--enable-decoder=pcm_s24le_planar"
 322     "--enable-decoder=pcm_s32be"
 323     "--enable-decoder=pcm_s32le"
 324     "--enable-decoder=pcm_s32le_planar"
 325     "--enable-decoder=pcm_s64be"
 326     "--enable-decoder=pcm_s64le"
 327     "--enable-decoder=pcm_s8"
 328     "--enable-decoder=pcm_s8_planar"
 329     "--enable-decoder=pcm_u16be"
 330     "--enable-decoder=pcm_u16le"
 331
 332     ;; encoders/decoders for images
 333     "--enable-encoder=gif"
 334     "--enable-decoder=gif"
 335     "--enable-encoder=jpegls"
 336     "--enable-decoder=jpegls"
 337     "--enable-encoder=ljpeg"
 338     "--enable-decoder=jpeg2000"
 339     "--enable-encoder=png"
 340     "--enable-decoder=png"
 341     "--enable-encoder=bmp"
 342     "--enable-decoder=bmp"
 343     "--enable-encoder=tiff"
 344     "--enable-decoder=tiff"
 345
 346     ;; filters
 347     "--enable-filter=scale"
 348     "--enable-filter=overlay"
 349     "--enable-filter=amix"
 350     "--enable-filter=amerge"
 351     "--enable-filter=aresample"
 352     "--enable-filter=format"
 353     "--enable-filter=aformat"
 354     "--enable-filter=fps"
 355     "--enable-filter=transpose"
 356     "--enable-filter=pad"))
 357
 358 (define %ffmpeg-linux-configure-flags
 359   '("--enable-pic"
 360     "--extra-cxxflags=-fPIC"
 361     "--extra-cflags=-fPIC"
 362     "--target-os=linux"
 363     "--enable-indev=v4l2"
 364     "--enable-indev=xcbgrab"
 365     "--enable-vdpau"
 366     "--enable-hwaccel=h264_vdpau"
 367     "--enable-hwaccel=mpeg4_vdpau"
 368     "--enable-vaapi"
 369     "--enable-hwaccel=h264_vaapi"
 370     "--enable-hwaccel=mpeg4_vaapi"
 371     "--enable-hwaccel=h263_vaapi"
 372     "--enable-hwaccel=vp8_vaapi"
 373     "--enable-hwaccel=mjpeg_vaapi"
 374     "--enable-hwaccel=hevc_vaapi"
 375     "--enable-encoder=h264_vaapi"
 376     "--enable-encoder=vp8_vaapi"
 377     "--enable-encoder=mjpeg_vaapi"
 378     "--enable-encoder=hevc_vaapi"))
 379
 380 ;; ffnvcodec is not supported on ARM then we enable it here for i386 and
 381 ;; x86_64 architectures.
 382 (define %ffmpeg-linux-x86-configure-flags
 383   '("--arch=x86"
 384     "--enable-cuvid"
 385     "--enable-ffnvcodec"
 386     "--enable-nvdec"
 387     "--enable-nvenc"
 388     "--enable-hwaccel=h264_nvdec"
 389     "--enable-hwaccel=hevc_nvdec"
 390     "--enable-hwaccel=vp8_nvdec"
 391     "--enable-hwaccel=mjpeg_nvdec"
 392     "--enable-encoder=h264_nvenc"
 393     "--enable-encoder=hevc_nvenc"))
 394
 395 ;; This procedure composes the configure flags list for ffmpeg-jami.
 396 (define (ffmpeg-compose-configure-flags)
 397   (define (system=? s)
 398     (string-prefix? s (%current-system)))
 399
 400   `(,@%ffmpeg-default-configure-flags
 401     ,@(if (string-contains (%current-system) "linux")
 402           (if (or (system=? "i686")
 403                   (system=? "x86_64"))
 404               (append %ffmpeg-linux-configure-flags
 405                       %ffmpeg-linux-x86-configure-flags)
 406               %ffmpeg-linux-configure-flags)
 407           '())))
 408
 409 (define-public ffmpeg-jami
 410   (package
 411     (inherit ffmpeg)
 412     (name "ffmpeg-jami")
 413     (native-inputs
 414      `(("sfl-patches" ,(jami-source))
 415        ("libiconv" ,libiconv)
 416        ,@(package-native-inputs ffmpeg)))
 417     (supported-systems '("x86_64-linux" "i686-linux"
 418                          "aarch64-linux" "armhf-linux"))
 419     (arguments
 420      (append
 421       '(#:tests? #f)
 422       (substitute-keyword-arguments (package-arguments ffmpeg)
 423         ((#:configure-flags '())
 424          (ffmpeg-compose-configure-flags))
 425         ((#:phases phases)
 426          `(modify-phases ,phases
 427             (add-after 'unpack 'make-git-checkout-writable
 428               (lambda _
 429                 (for-each make-file-writable (find-files "."))
 430                 #t))
 431             (add-after 'unpack 'apply-patches
 432               (lambda* (#:key inputs #:allow-other-keys)
 433                 (let ((jami-apply-dependency-patches
 434                        ,jami-apply-dependency-patches))
 435                   ;; These patches come from:
 436                   ;; "ring-project/daemon/contrib/src/ffmpeg/rules.mak".
 437                   (jami-apply-dependency-patches #:inputs inputs
 438                                                  #:dep-name "ffmpeg"
 439                                                  #:patches
 440                                                  '("remove-mjpeg-log"
 441                                                    "change-RTCP-ratio"
 442                                                    "rtp_ext_abs_send_time"))
 443                   #t))))))))))
 444
 445 (define-public libring
 446   (package
 447     (name "libring")
 448     (version %jami-version)
 449     (source (jami-source #:without-daemon #t))
 450     (build-system gnu-build-system)
 451     (inputs
 452      `(("alsa-lib" ,alsa-lib)
 453        ("boost" ,boost)
 454        ("dbus-c++" ,dbus-c++)
 455        ("eudev" ,eudev)
 456        ("ffmpeg" ,ffmpeg-jami)
 457        ("flac" ,flac)
 458        ("gmp" ,gmp)
 459        ("gsm" ,gsm)
 460        ("jack" ,jack-1)
 461        ("jsoncpp" ,jsoncpp)
 462        ("libarchive" ,libarchive)
 463        ("libnatpmp" ,libnatpmp)
 464        ("libogg" ,libogg)
 465        ("libva" ,libva)
 466        ("opendht" ,opendht)
 467        ("opus" ,opus)
 468        ("pcre" ,pcre)
 469        ("pulseaudio" ,pulseaudio)
 470        ("libsamplerate" ,libsamplerate)
 471        ("libsndfile" ,libsndfile)
 472        ("speex" ,speex)
 473        ("speexdsp" ,speexdsp)
 474        ("libupnp" ,libupnp)
 475        ("libvorbis" ,libvorbis)
 476        ("libx264" ,libx264)
 477        ("libvdpau" ,libvdpau)
 478        ("yaml-cpp" ,yaml-cpp)
 479        ("zlib" ,zlib)
 480        ("openssl" ,openssl)
 481        ("libsecp256k1" ,libsecp256k1)
 482        ("python" ,python)
 483        ("python-wrapper" ,python-wrapper)
 484        ("restinio" ,restinio)
 485        ("libx11" ,libx11)
 486        ("asio" ,asio)
 487        ;; TODO: Upstream seems to rely on a custom pjproject (a.k.a. pjsip) version.
 488        ;; See https://git.jami.net/savoirfairelinux/ring-daemon/issues/24.
 489        ("pjproject" ,pjproject-jami)))
 490     (native-inputs
 491      `(("autoconf" ,autoconf)
 492        ("automake" ,automake)
 493        ("libtool" ,libtool)
 494        ("pkg-config" ,pkg-config)
 495        ("which" ,which)
 496        ("cppunit" ,cppunit)
 497        ("perl" ,perl)))                 ; Needed for documentation.
 498     (arguments
 499      `(#:tests? #f         ; The tests fail to compile due to missing headers.
 500        #:phases
 501        (modify-phases %standard-phases
 502          (add-after 'unpack 'change-directory
 503            (lambda _
 504              (chdir "daemon")
 505              #t))
 506          (add-before 'build 'add-lib-dir
 507            (lambda _
 508              (mkdir-p "src/lib")
 509              #t)))))
 510     (synopsis "Distributed multimedia communications platform")
 511     (description "Jami (formerly GNU Ring) is a secure and distributed voice,
 512 video and chat communication platform that requires no centralized server and
 513 leaves the power of privacy in the hands of the user.  It supports the SIP and
 514 IAX protocols, as well as decentralized calling using P2P-DHT.
 515
 516 This package provides a library and daemon implementing the Jami core
 517 functionality.")
 518     (home-page "https://jami.net/")
 519     (license license:gpl3+)))
 520
 521 (define-public libringclient
 522   (package
 523     (inherit libring)
 524     (name "libringclient")
 525     (build-system cmake-build-system)
 526     (propagated-inputs
 527      `(("libring" ,libring)     ; For 'dring'.
 528        ("qtbase" ,qtbase)       ; Qt is included in several installed headers.
 529        ("qttools" ,qttools)))
 530     (arguments
 531      `(#:tests? #f                      ; There is no testsuite.
 532        #:configure-flags
 533        (list (string-append "-DRING_BUILD_DIR="
 534                             (assoc-ref %build-inputs "libring") "/include"))
 535        #:phases
 536        (modify-phases %standard-phases
 537          (add-after 'unpack 'change-directory
 538            (lambda _
 539              (chdir "lrc")
 540              #t))
 541          (add-before 'configure 'fix-dbus-interfaces-path
 542            (lambda* (#:key inputs #:allow-other-keys)
 543              (substitute* "CMakeLists.txt"
 544                (("\\$\\{CMAKE_INSTALL_PREFIX\\}(/share/dbus-1/interfaces)" _ dbus-interfaces-path-suffix)
 545                 (string-append (assoc-ref inputs "libring")
 546                                dbus-interfaces-path-suffix))))))))
 547     (synopsis "Distributed multimedia communications platform")
 548     (description "Jami (formerly GNU Ring) is a secure and distributed voice,
 549 video and chat communication platform that requires no centralized server and
 550 leaves the power of privacy in the hands of the user.  It supports the SIP and
 551 IAX protocols, as well as decentralized calling using P2P-DHT.
 552
 553 This package provides a library common to all Jami clients.")
 554     (home-page "https://jami.net")
 555     (license license:gpl3+)))
 556
 557 (define-public jami
 558   (package
 559     (inherit libring)
 560     (name "jami")
 561     (build-system cmake-build-system)
 562     (inputs
 563      `(("libringclient" ,libringclient)
 564        ("gtk+" ,gtk+)
 565        ("qrencode" ,qrencode)
 566        ("libnotify" ,libnotify)
 567        ("clutter" ,clutter)
 568        ("clutter-gtk" ,clutter-gtk)
 569        ("libcanberra" ,libcanberra)
 570        ("webkitgtk" ,webkitgtk)
 571        ("sqlite" ,sqlite)))
 572     (native-inputs
 573      `(("pkg-config" ,pkg-config)
 574        ("gettext" ,gettext-minimal)
 575        ("glib:bin" ,glib "bin")
 576        ("doxygen" ,doxygen)))
 577     (propagated-inputs
 578      `(("libring" ,libring) ; Contains `dring', the daemon, which is automatically by d-bus.
 579        ("adwaita-icon-theme" ,adwaita-icon-theme)
 580        ("evolution-data-server" ,evolution-data-server)))
 581     (arguments
 582      `(#:tests? #f                      ; There is no testsuite.
 583        #:phases
 584        (modify-phases %standard-phases
 585          (add-after 'unpack 'change-directory
 586            (lambda _
 587              (chdir "client-gnome")
 588              #t)))))
 589     (synopsis "Distributed, privacy-respecting communication program")
 590     (description "Jami (formerly GNU Ring) is a secure and distributed voice,
 591 video and chat communication platform that requires no centralized server and
 592 leaves the power of privacy in the hands of the user.  It supports the SIP and
 593 IAX protocols, as well as decentralized calling using P2P-DHT.
 594
 595 This package provides the Jami client for the GNOME desktop.")
 596     (home-page "https://jami.net")
 597     (license license:gpl3+)))