TakeV/guix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

gnu: belle-sip: Update to 5.2.49.

Browse source 
* gnu/packages/linphone.scm (belle-sip): Update to 5.2.49.
[arguments]: Use G-expression; disable strict mode; disable unescape test; run
tests conditionally.
[inputs]: Add belr.
This commit is contained in:
Ricardo Wurmus 2023-04-06 21:44:03 +02:00
parent 142899cd69
commit 337f3941d8
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 68 additions and 55 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

51
gnu/packages/linphone.scm
View file

@ -478,7 +478,7 @@ (define-public bzrtp
(define-public belle-sip
(package
(name "belle-sip")
(version "4.4.34")
(version "5.2.49")
(source
(origin
(method git-fetch)
@ -487,14 +487,18 @@ (define-public belle-sip
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1kknnlczq7dpqaj1dwxvy092dzrqjy11ndkv90rqwmdryigkjk6z"))))
(base32 "0yx1qvzp11ysh24hxrvz7dm69j8zswa0xcx9m42vcv95z72166cq"))))
(build-system cmake-build-system)
(outputs '("out" "tester"))
(arguments
`(#:configure-flags (list "-DENABLE_STATIC=NO"
"-DENABLE_MDNS=ON")
(list
#:configure-flags '(list "-DENABLE_STATIC=NO"
"-DENABLE_MDNS=ON"
;; We skip a test and thus have an unused
;; procedure, so we need to disable -Werror.
"-DENABLE_STRICT=OFF")
#:phases
(modify-phases %standard-phases
#~(modify-phases %standard-phases
(add-after 'unpack 'patch
(lambda* (#:key inputs #:allow-other-keys)
;; Fix mDNS dependency.
@ -506,25 +510,34 @@ (define-public belle-sip
(string-append avahi "/include/avahi-compat-libdns_sd"))
(("\\$\\{DNSSD_LIBRARIES\\}")
"dns_sd")))
;; Disable broken test. This test uses
;; bctbx_unescaped_string_only_chars_in_rules from bctoolbox,
;; which unescapes too much.
(substitute* "tester/belle_sip_base_uri_tester.c"
(("[ \t]*TEST_NO_TAG.*test_unescaping_good_chars\\),")
""))
(substitute* "src/sdp/parser.cc"
(("load\\(\"sdp_grammar\"\\)")
(string-append "load(\"" #$output
"/share/belr/grammars/sdp_grammar\")")))
(substitute* "src/CMakeLists.txt"
;; ANTLR would use multithreaded DFA generation otherwise,
;; which would not be reproducible.
(("-Xmultithreaded ") ""))))
(delete 'check) ;move after install
(add-after 'install 'separate-outputs
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(tester (assoc-ref outputs "tester"))
(tester-name "belle_sip_tester"))
(for-each mkdir-p (list (string-append tester "/bin")
(string-append tester "/share")))
(rename-file (string-append out "/bin")
(string-append tester "/bin"))
(rename-file (string-append out "/share/" tester-name)
(string-append tester "/share/" tester-name)))))
(lambda _
(let ((tester-name "belle_sip_tester"))
(for-each mkdir-p (list (string-append #$output:tester "/bin")
(string-append #$output:tester "/share")))
(rename-file (string-append #$output "/bin")
(string-append #$output:tester "/bin"))
(rename-file (string-append #$output "/share/" tester-name)
(string-append #$output:tester "/share/" tester-name)))))
(add-after 'separate-outputs 'check
(lambda* (#:key outputs #:allow-other-keys)
(let ((tester (string-append (assoc-ref outputs "tester")
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(let ((tester (string-append #$output:tester
"/bin/belle_sip_tester")))
(for-each (lambda (suite-name)
(invoke tester "--suite" suite-name))
@ -543,9 +556,9 @@ (define-public belle-sip
;;"Dialog"
"Refresher"
;;"HTTP stack"
"Object"))))))))
"Object")))))))))
(inputs
(list avahi bctoolbox zlib))
(list avahi bctoolbox belr zlib))
(synopsis "Belledonne Communications SIP Library")
(description "Belle-sip is a modern library implementing SIP transport,
transaction and dialog layers. It is written in C, with an object-oriented