me
/
guix
Archived
1
0
Fork 0
Code

gnu: rtmpdump: Update to 2.4-0.c5f04a5 [security fixes]. 

* gnu/packages/networking.scm (rtmpdump): Update to 2.4-0.c5f04a5.
[arguments]: Add phase prefer-gnutls.
[inputs]: Remove OPENSSL-1.0.  Add GNUTLS.
master
Marius Bakke 2020-12-20 16:56:39 +01:00
parent 6203b8e5bd
commit d0abf4523f
No known key found for this signature in database
GPG Key ID: A2A06DF2A33A54FA
1 changed files with 57 additions and 44 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
gnu/packages/networking.scm
View File

@ -294,18 +294,24 @@ GLib-based library, libnice, as well as GStreamer elements to use it.")
license:mpl1.1)))) license:mpl1.1))))
(define-public rtmpdump (define-public rtmpdump
;; There are no tags in the repository, and the project is unlikely to
;; make new releases. Take a recent commit for multiple security fixes
;; as well as GnuTLS compatibility.
(let ((commit "c5f04a58fc2aeea6296ca7c44ee4734c18401aa3")
(revision "0")
(version "2.4")) ;as mentioned in README and man pages
(package (package
(name "rtmpdump") (name "rtmpdump")
(version "2.4") (version (git-version version revision commit))
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://git.ffmpeg.org/rtmpdump") (url "https://git.ffmpeg.org/rtmpdump")
(commit "c28f1bab7822de97353849e7787b59e50bbb1428"))) (commit commit)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "1n3kdip83nvvs4sin30zpcdr5q711mqhq2lxrv5vgbc6lskpwzlj")))) (base32 "07ias612jgmxpam9h418kvlag32da914jsnjsfyafklpnh8gdzjb"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f ; no tests `(#:tests? #f ; no tests
@ -325,9 +331,16 @@ GLib-based library, libnice, as well as GStreamer elements to use it.")
(("librtmp\\.a ") ; don't build it (("librtmp\\.a ") ; don't build it
"")) ""))
#t)) #t))
(add-after 'unpack 'prefer-gnutls
(lambda _
(substitute* '("Makefile" "librtmp/Makefile")
(("CRYPTO=OPENSSL")
"#CRYPTO=OPENSSL")
(("#CRYPTO=GNUTLS")
"CRYPTO=GNUTLS"))))
(delete 'configure)))) (delete 'configure))))
(inputs (inputs
`(("openssl" ,openssl-1.0) `(("gnutls" ,gnutls)
("zlib" ,zlib))) ("zlib" ,zlib)))
(synopsis "Tools and library for handling RTMP streams") (synopsis "Tools and library for handling RTMP streams")
(description "RTMPdump is a toolkit for RTMP streams. All forms of RTMP are (description "RTMPdump is a toolkit for RTMP streams. All forms of RTMP are
@ -338,7 +351,7 @@ supported, including rtmp://, rtmpt://, rtmpe://, rtmpte://, and rtmps://.")
;; Library. ;; Library.
license:lgpl2.1+ license:lgpl2.1+
;; Others. ;; Others.
license:gpl2+)))) license:gpl2+)))))
(define-public srt (define-public srt
(package (package