guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

branch master updated: gnu: twinkle: Update package definition.


From: guix-commits
Subject: branch master updated: gnu: twinkle: Update package definition.
Date: Fri, 08 May 2020 09:54:33 -0400

This is an automated email from the git hooks/post-receive script.

dannym pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new e5463ba  gnu: twinkle: Update package definition.
e5463ba is described below

commit e5463baf2ce21cd2abc7ac5576401ae7ee7eb28c
Author: Raghav Gururajan <address@hidden>
AuthorDate: Sun May 3 06:44:06 2020 -0400

    gnu: twinkle: Update package definition.
    
    * gnu/packages/patches/twinkle-bcg729.patch: New file.
    * gnu/packages/telephony.scm (twinkle)[source](patches): Use it.
    [build-system]: Change from cmake-build-system to qt-build-system.
    [arguments]<#:configure-flags>: Add "-DWITH_ZRTP", "-DWITH_G729".
    [arguments]<#:phases>[wrap-executable]: Delete phase.
    [native-inputs]: Move readline, file, ucommon, ccrtp, libxml2, speex,
    speexdsp, libsndfile, alsa-lib to ...
    [inputs]: ... here.  Add bcg729, zrtpcpp, libilbc.
    
    Signed-off-by: Danny Milosavljevic <address@hidden>
---
 gnu/packages/patches/twinkle-bcg729.patch | 176 ++++++++++++++++++++++++++++++
 gnu/packages/telephony.scm                |  85 +++++++--------
 2 files changed, 218 insertions(+), 43 deletions(-)

diff --git a/gnu/packages/patches/twinkle-bcg729.patch 
b/gnu/packages/patches/twinkle-bcg729.patch
new file mode 100644
index 0000000..eb8667b
--- /dev/null
+++ b/gnu/packages/patches/twinkle-bcg729.patch
@@ -0,0 +1,176 @@
+From 46bee14d3cc49d4fb49eaf36a29dbcc7a11a5ab7 Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Bri=C3=A8re?= <address@hidden>
+Date: Sat, 6 Jul 2019 15:40:56 -0400
+Subject: [PATCH] Add support for the new bcg729 API, introduced in version
+ 1.0.2
+
+Starting with version 1.0.2, bcg729 has changed its API to add support
+for G.729B, thus requiring us to adjust our function calls depending on
+which version is installed.
+
+When dealing with the new API, we merely need to add a few parameters to
+disable all G.729B features, namely:
+
+* On the decoder side: When `SIDFrameFlag` is not set, the decoder will
+  behave just like before, decoding the payload as a standard G.729A
+  voice frame (or concealing an erased frame).  The other parameters,
+  `rfc3389PayloadFlag` and `bitStreamLength`, are only of use when
+  dealing with a SID frame sent as per RFC 3389, and are ignored if
+  `SIDFrameFlag` is not set.
+
+* On the encoder side: When `enableVAD` is disabled, the encoder will
+  behave just like before, producing only standard G.729A voice frames.
+  The only API difference is the introduction of `*bitStreamLength`, to
+  return the length of the encoded frame (0, 2 or 10 bytes).  In our
+  case, this will always be 10 bytes just like before; an assert() was
+  added to guarantee this.
+
+Closes #104
+---
+ CMakeLists.txt              |  4 ++++
+ cmake/FindG729.cmake        | 36 ++++++++++++++++++++++++++++++++++++
+ src/audio/audio_decoder.cpp |  8 ++++++++
+ src/audio/audio_encoder.cpp | 10 ++++++++++
+ twinkle_config.h.in         |  1 +
+ 5 files changed, 59 insertions(+)
+
+diff --git a/CMakeLists.txt b/CMakeLists.txt
+index 1dafe55..7e3fde0 100644
+--- a/CMakeLists.txt
++++ b/CMakeLists.txt
+@@ -116,6 +116,10 @@ if (WITH_G729)
+       if (G729_FOUND)
+               message(STATUS "bcg729 OK")
+               set(HAVE_BCG729 TRUE)
++
++              if (G729_ANNEX_B)
++                      set(HAVE_BCG729_ANNEX_B TRUE)
++              endif (G729_ANNEX_B)
+               
+               include_directories(${G729_INCLUDE_DIR})
+       else (G729_FOUND)
+diff --git a/cmake/FindG729.cmake b/cmake/FindG729.cmake
+index 4a30ba0..1fbfeeb 100644
+--- a/cmake/FindG729.cmake
++++ b/cmake/FindG729.cmake
+@@ -1,14 +1,50 @@
++INCLUDE(CMakePushCheckState)
++INCLUDE(CheckCSourceCompiles)
++
+ FIND_PATH(G729_INCLUDE_DIR bcg729/decoder.h)
+ FIND_LIBRARY(G729_LIBRARY NAMES bcg729)
+ 
+ IF(G729_INCLUDE_DIR AND G729_LIBRARY)
+       SET(G729_FOUND TRUE)
++
++      # The bcg729 API was changed in 1.0.2 to add support for G.729 Annex B.
++      # This checks whether we are dealing with the old or new API.
++      CMAKE_PUSH_CHECK_STATE()
++      SET(CMAKE_REQUIRED_INCLUDES "${INCLUDE_DIRECTORIES}" 
"${G729_INCLUDE_DIR}")
++      SET(CMAKE_REQUIRED_LIBRARIES "${G729_LIBRARY}")
++      SET(CMAKE_REQUIRED_QUIET TRUE)
++      # Try to compile something using the old (pre-1.0.2) API.
++      #
++      # We cannot do it the other way around, as initBcg729EncoderChannel()
++      # did not have a prototype before 1.0.2, thus compilation would not fail
++      # when passing it an extra argument.
++      CHECK_C_SOURCE_COMPILES("
++              #include <bcg729/encoder.h>
++
++              int main() {
++                      /* This function requires an argument since 1.0.2 */
++                      initBcg729EncoderChannel();
++                      return 0;
++              }
++      " G729_OLD_API)
++      CMAKE_POP_CHECK_STATE()
++
++      IF (G729_OLD_API)
++              SET(G729_ANNEX_B FALSE)
++      ELSE (G729_OLD_API)
++              SET(G729_ANNEX_B TRUE)
++      ENDIF (G729_OLD_API)
+ ENDIF(G729_INCLUDE_DIR AND G729_LIBRARY)
+ 
+ IF(G729_FOUND)
+       IF (NOT G729_FIND_QUIETLY)
+               MESSAGE(STATUS "Found bcg729 includes:  
${G729_INCLUDE_DIR}/bcg729/decoder.h")
+               MESSAGE(STATUS "Found bcg729 library: ${G729_LIBRARY}")
++              IF (G729_ANNEX_B)
++                      MESSAGE(STATUS "bcg729 supports Annex B; using the new 
(1.0.2) API")
++              ELSE (G729_ANNEX_B)
++                      MESSAGE(STATUS "bcg729 does not support Annex B; using 
the old (pre-1.0.2) API")
++              ENDIF (G729_ANNEX_B)
+       ENDIF (NOT G729_FIND_QUIETLY)
+ ELSE(G729_FOUND)
+       IF (G729_FIND_REQUIRED)
+diff --git a/src/audio/audio_decoder.cpp b/src/audio/audio_decoder.cpp
+index 65935dd..c661910 100644
+--- a/src/audio/audio_decoder.cpp
++++ b/src/audio/audio_decoder.cpp
+@@ -547,7 +547,11 @@ uint16 t_g729a_audio_decoder::decode(uint8 *payload, 
uint16 payload_size,
+ 
+       for (uint16 done = 0; done < payload_size; done += 10)
+       {
++#ifdef HAVE_BCG729_ANNEX_B
++              bcg729Decoder(_context, &payload[done], 0, false, false, false, 
&pcm_buf[done * 8]);
++#else
+               bcg729Decoder(_context, &payload[done], false, &pcm_buf[done * 
8]);
++#endif
+       }
+ 
+       return payload_size * 8;
+@@ -562,7 +566,11 @@ uint16 t_g729a_audio_decoder::conceal(int16 *pcm_buf, 
uint16 pcm_buf_size)
+ {
+       assert(pcm_buf_size >= 80);
+ 
++#ifdef HAVE_BCG729_ANNEX_B
++      bcg729Decoder(_context, nullptr, 0, true, false, false, pcm_buf);
++#else
+       bcg729Decoder(_context, nullptr, true, pcm_buf);
++#endif
+       return 80;
+ }
+ 
+diff --git a/src/audio/audio_encoder.cpp b/src/audio/audio_encoder.cpp
+index d6ff356..952b1ee 100644
+--- a/src/audio/audio_encoder.cpp
++++ b/src/audio/audio_encoder.cpp
+@@ -433,7 +433,11 @@ uint16 t_g726_audio_encoder::encode(int16 *sample_buf, 
uint16 nsamples,
+ t_g729a_audio_encoder::t_g729a_audio_encoder(uint16 payload_id, uint16 ptime, 
t_user *user_config)
+       : t_audio_encoder(payload_id, ptime, user_config)
+ {
++#ifdef HAVE_BCG729_ANNEX_B
++      _context = initBcg729EncoderChannel(false);
++#else
+       _context = initBcg729EncoderChannel();
++#endif
+ }
+ 
+ t_g729a_audio_encoder::~t_g729a_audio_encoder()
+@@ -451,7 +455,13 @@ uint16 t_g729a_audio_encoder::encode(int16 *sample_buf, 
uint16 nsamples,
+ 
+       for (uint16 done = 0; done < nsamples; done += 80)
+       {
++#ifdef HAVE_BCG729_ANNEX_B
++              uint8 frame_size = 10;
++              bcg729Encoder(_context, &sample_buf[done], &payload[done / 8], 
&frame_size);
++              assert(frame_size == 10);
++#else
+               bcg729Encoder(_context, &sample_buf[done], &payload[done / 8]);
++#endif
+       }
+ 
+       return nsamples / 8;
+diff --git a/twinkle_config.h.in b/twinkle_config.h.in
+index a1aa3b4..53a0426 100644
+--- a/twinkle_config.h.in
++++ b/twinkle_config.h.in
+@@ -4,6 +4,7 @@
+ #cmakedefine HAVE_ILBC_CPP
+ #cmakedefine HAVE_ZRTP
+ #cmakedefine HAVE_BCG729
++#cmakedefine HAVE_BCG729_ANNEX_B
+ #cmakedefine HAVE_GSM
+ 
+ #cmakedefine HAVE_UNISTD_H
diff --git a/gnu/packages/telephony.scm b/gnu/packages/telephony.scm
index dea775d..a866ecf 100644
--- a/gnu/packages/telephony.scm
+++ b/gnu/packages/telephony.scm
@@ -61,6 +61,7 @@
   #:use-module (gnu packages gtk)
   #:use-module (gnu packages image)
   #:use-module (gnu packages libcanberra)
+  #:use-module (gnu packages linphone)
   #:use-module (gnu packages linux)
   #:use-module (gnu packages multiprecision)
   #:use-module (gnu packages ncurses)
@@ -654,59 +655,57 @@ Mumble consists of two applications for separate usage:
   (package
     (name "twinkle")
     (version "1.10.2")
-    (source (origin
-              (method git-fetch)
-              (uri (git-reference
-                    (url "https://github.com/LubosD/twinkle";)
-                    (commit (string-append "v" version))))
-              (file-name (git-file-name name version))
-              (sha256
-               (base32
-                "0s0gi03xwvzp02ah4q6j33r9jx9nbayr6dxlg2ck9pwbay1nq1hx"))))
-    (build-system cmake-build-system)
+    (source
+     (origin
+       (method git-fetch)
+       (uri
+        (git-reference
+         (url "https://github.com/LubosD/twinkle";)
+         (commit
+          (string-append "v" version))))
+       (file-name
+        (git-file-name name version))
+       (patches
+        (search-patches "twinkle-bcg729.patch")) ; To support new BCG729 API.
+       (sha256
+        (base32
+         "0s0gi03xwvzp02ah4q6j33r9jx9nbayr6dxlg2ck9pwbay1nq1hx"))))
+    (build-system qt-build-system)
     (arguments
-     `(#:tests? #f                                ; no test target
-       #:configure-flags '("-DWITH_SPEEX=On")
-       #:phases
-       (modify-phases %standard-phases
-         (add-after 'install 'wrap-executable
-           (lambda* (#:key inputs outputs #:allow-other-keys)
-             (let ((out (assoc-ref outputs "out")))
-               (wrap-program (string-append out "/bin/twinkle")
-                 `("QT_PLUGIN_PATH" ":" prefix
-                   ,(map (lambda (label)
-                           (string-append (assoc-ref inputs label)
-                                          "/lib/qt5/plugins"))
-                         '("qtbase" "qtdeclarative")))
-                 `("QML2_IMPORT_PATH" ":" prefix
-                   ,(map (lambda (label)
-                           (string-append (assoc-ref inputs label)
-                                          "/lib/qt5/qml"))
-                         '("qtdeclarative" "qtquickcontrols"))))
-               #t))))))
+     `(#:tests? #f                      ; no test target
+       #:configure-flags
+       (list
+        ;; FIX-ME: Make Twinkle compatible with libre version of iLBC.
+        ;; "-DWITH_ILBC=On"                ; For iLBC Codec Support
+        "-DWITH_ZRTP=On"                ; For ZRTP Support
+        "-DWITH_G729=On"                ; For G729 Codec Support
+        "-DWITH_SPEEX=On")))            ; For Speex Codec Support
     (native-inputs
      `(("bison" ,bison)
        ("flex" ,flex)
-       ("readline" ,readline)
-       ("file" ,file)
-       ("ucommon" ,ucommon)
+       ("qttools" ,qttools)))
+    (inputs
+     `(("alsa-lib" ,alsa-lib)
+       ("bcg729" ,bcg729)
+       ("zrtpcpp" ,zrtpcpp)
        ("ccrtp" ,ccrtp)
+       ("file" ,file)
+       ("libilbc" ,libilbc)
+       ("libsndfile" ,libsndfile)
        ("libxml2" ,libxml2)
+       ("qtbase" ,qtbase)
+       ("qtdeclarative" ,qtdeclarative)
+       ("qtquickcontrols" ,qtquickcontrols)
+       ("readline" ,readline)
        ("speex" ,speex)
        ("speexdsp" ,speexdsp)
-       ("libsndfile" ,libsndfile)
-       ("alsa-lib" ,alsa-lib)
-       ("qttools" ,qttools)))
-    (inputs
-     `(("qtbase" ,qtbase)
-       ("qtdeclarative" ,qtdeclarative)
-       ("qtquickcontrols" ,qtquickcontrols)))
-    (home-page "http://twinkle.dolezel.info/";)
+       ("ucommon" ,ucommon)))
     (synopsis "Softphone for voice over IP and instant messaging")
     (description "Twinkle is a softphone for your voice over IP and instant
-messaging communcations using the SIP protocol.  You can use it for direct IP
-phone to IP phone communication or in a network using a SIP proxy to route your
-calls and messages")
+messaging communcations using the SIP protocol.  You can use it for direct
+IP phone to IP phone communication or in a network using a SIP proxy to route
+your calls and messages.")
+    (home-page "http://twinkle.dolezel.info/";)
     (license license:gpl2+)))
 
 (define-public pjproject



reply via email to

[Prev in Thread] Current Thread [Next in Thread]