From f0215630412c195bee5c2bf53982911e2d155eff Mon Sep 17 00:00:00 2001
From: Lukas Gradl <lgradl@openmailbox.org>
Date: Sun, 28 Aug 2016 13:07:16 -0500
Subject: [PATCH 09/10] gnu: Add libringclient.

* gnu/packages/telephony.scm (libringclient): New variable.
---
 gnu/packages/telephony.scm | 48 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 48 insertions(+)

diff --git a/gnu/packages/telephony.scm b/gnu/packages/telephony.scm
index 96b7489..7acb2dc 100644
--- a/gnu/packages/telephony.scm
+++ b/gnu/packages/telephony.scm
@@ -40,6 +40,7 @@
   #:use-module (gnu packages pcre)
   #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages pulseaudio)
+  #:use-module (gnu packages qt)
   #:use-module (gnu packages serialization)
   #:use-module (gnu packages tls)
   #:use-module (gnu packages video)
@@ -48,6 +49,7 @@
   #:use-module (guix packages)
   #:use-module (guix download)
   #:use-module (guix git-download)
+  #:use-module (guix build-system cmake)
   #:use-module (guix build-system gnu))
 
 (define-public commoncpp
@@ -563,3 +565,49 @@ This package provides a library and daemon implementing the Ring core functional
       (home-page "https://ring.cx/")
       (license license:gpl3+))))
 
+(define-public libringclient
+  (let ((commit "9f223051f401185fdb6aaaaf5b842027555f9ea9")) ; This is the
+                                        ; commit used by the AUR package.
+    (package
+      (name "libringclient")
+      (version (string-append "1.0.0-1." (string-take commit 7)))
+      (source
+       (origin
+         (method git-fetch)
+         (uri
+          (git-reference
+           (url "https://gerrit-ring.savoirfairelinux.com/ring-lrc")
+           (commit commit)))
+         (sha256
+          (base32
+           "04j80ip7y0723dnasm45zdcrhhnp5fiqhb6d4zcppgp2gakhkxs5"))))
+      (build-system cmake-build-system)
+      (propagated-inputs
+       `(("libring" ,libring) ; For 'dring'.
+         ("qtbase" ,qtbase) ; Qt is included in several installed headers.
+         ("qttools" ,qttools)))
+      (arguments
+       `(#:tests? #f ; There is no testsuite.
+         #:configure-flags
+         (list (string-append
+                "-DRING_BUILD_DIR="
+                (assoc-ref %build-inputs "libring")
+                "/include"))
+         #:phases
+         (modify-phases %standard-phases
+           (add-after 'configure 'find-dbus-interfaces
+             (lambda* (#:key inputs outputs #:allow-other-keys)
+               (substitute* "CMakeFiles/ringclient.dir/build.make"
+                 (((string-append (assoc-ref outputs "out")
+                                  "/share/dbus-1/interfaces"))
+                  (string-append (assoc-ref inputs "libring")
+                                 "/share/dbus-1/interfaces"))))))))
+      (synopsis "Distributed multimedia communications platform")
+      (description "Ring is a secure and distributed voice, video and chat
+communication platform that requires no centralized server and leaves the
+power of privacy in the hands of the user.  It supports the SIP and IAX
+protocols, as well as decentralized calling using P2P-DHT.
+
+This package provides a library common to all Ring clients.")
+      (home-page "https://ring.cx/")
+      (license license:gpl3+))))
-- 
2.9.0