From mboxrd@z Thu Jan 1 00:00:00 1970 From: taylanbayirli@gmail.com (Taylan Ulrich =?utf-8?Q?Bay=C4=B1rl=C4=B1?= =?utf-8?Q?=2FKammer?=) Subject: [PATCH] gnu: Add quvi. Date: Wed, 04 Mar 2015 23:00:56 +0100 Message-ID: <87385ke82v.fsf@taylan.uni.cx> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:41036) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1YTHLg-00006V-OK for guix-devel@gnu.org; Wed, 04 Mar 2015 17:01:01 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1YTHLf-0001cW-Mb for guix-devel@gnu.org; Wed, 04 Mar 2015 17:01:00 -0500 Received: from mail-we0-x235.google.com ([2a00:1450:400c:c03::235]:46354) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1YTHLf-0001aa-Cb for guix-devel@gnu.org; Wed, 04 Mar 2015 17:00:59 -0500 Received: by wevm14 with SMTP id m14so49178484wev.13 for ; Wed, 04 Mar 2015 14:00:58 -0800 (PST) Received: from taylan.uni.cx (p200300514A4431520213E8FFFEED36FB.dip0.t-ipconnect.de. [2003:51:4a44:3152:213:e8ff:feed:36fb]) by mx.google.com with ESMTPSA id gi9sm11810935wib.21.2015.03.04.14.00.57 for (version=TLSv1.2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Wed, 04 Mar 2015 14:00:57 -0800 (PST) List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org To: guix-devel@gnu.org --=-=-= Content-Type: text/plain This actually adds three packages but they're closely tied together. --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=0004-gnu-Add-quvi.patch Content-Description: patch >From 5e10d1af45eceff13d764e6b13cc3498477b080d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Taylan=20Ulrich=20Bay=C4=B1rl=C4=B1/Kammer?= Date: Wed, 4 Mar 2015 22:35:53 +0100 Subject: [PATCH 4/5] gnu: Add quvi. * gnu/packages/web.scm (libquvi-scripts, libquvi, quvi): New variables. --- gnu/packages/web.scm | 76 ++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 76 insertions(+) diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm index 5f91751..d6144b9 100644 --- a/gnu/packages/web.scm +++ b/gnu/packages/web.scm @@ -36,11 +36,14 @@ #:use-module (gnu packages docbook) #:use-module (gnu packages autotools) #:use-module ((gnu packages compression) #:select (zlib)) + #:use-module (gnu packages cyrus-sasl) #:use-module (gnu packages openssl) #:use-module (gnu packages gettext) #:use-module (gnu packages icu4c) + #:use-module (gnu packages lua) #:use-module (gnu packages which) #:use-module (gnu packages pcre) + #:use-module (gnu packages pkg-config) #:use-module (gnu packages xml) #:use-module (gnu packages curl) #:use-module (gnu packages perl) @@ -817,3 +820,76 @@ of people.") (description "LibYAML is a YAML 1.1 parser and emitter written in C.") (license l:expat))) + +(define-public libquvi-scripts + (package + (name "libquvi-scripts") + (version "0.4.21") + (source + (origin + (method url-fetch) + (uri (string-append + "mirror://sourceforge/quvi/libquvi-scripts-" version ".tar.xz")) + (sha256 + (base32 "0d0giry6bb57pnidymvdl7i5x9bq3ljk3g4bs294hcr5mj3cq0kw")))) + (build-system gnu-build-system) + (home-page "http://quvi.sourceforge.net/") + (synopsis "Media stream URL parser") + (description "This package contains the support scripts called upon by +libquvi to parse media stream properties.") + (license l:lgpl2.1+))) + +(define-public libquvi + (package + (name "libquvi") + (version "0.4.1") + (source + (origin + (method url-fetch) + (uri (string-append + "mirror://sourceforge/quvi/libquvi-" version ".tar.xz")) + (sha256 + (base32 "00x9gbmzc5cns0gnfag0hsphcr3cb33vbbb9s7ppvvd6bxz2z1mm")))) + (build-system gnu-build-system) + (native-inputs `(("pkg-config" ,pkg-config))) + (inputs + `(("curl" ,curl) + ("cyrus-sasl" ,cyrus-sasl) + ("libquvi-scripts" ,libquvi-scripts) + ("lua" ,lua-5.1) + ("openssl" ,openssl) + ("zlib" ,zlib))) + (arguments + ;; Lua provides no .pc file, so add CFLAGS/LIBS manually. + '(#:configure-flags + (let ((lua (assoc-ref %build-inputs "lua"))) + (list + (string-append "liblua_CFLAGS=-I" lua "/include") + (string-append "liblua_LIBS=-L" lua "/libs -llua"))))) + (home-page "http://quvi.sourceforge.net/") + (synopsis "Media stream URL parser") + (description "libquvi is a library with a C API for parsing media stream +URLs and extracting their actual media files.") + (license l:lgpl2.1+))) + +(define-public quvi + (package + (name "quvi") + (version "0.4.2") + (source + (origin + (method url-fetch) + (uri (string-append + "mirror://sourceforge/quvi/quvi-" version ".tar.xz")) + (sha256 + (base32 "09lhl6dv5zpryasx7yjslfrcdcqlsbwapvd5lg7w6sm5x5n3k8ci")))) + (build-system gnu-build-system) + (native-inputs `(("pkg-config" ,pkg-config))) + (inputs + `(("curl" ,curl) + ("libquvi" ,libquvi))) + (home-page "http://quvi.sourceforge.net/") + (synopsis "Media stream URL parser") + (description "quvi is a command-line-tool suite to extract media files +from streaming URLs. It is a command-line wrapper for the libquvi library.") + (license l:lgpl2.1+))) -- 2.2.1 --=-=-=--