HCoop / jackhill / guix / guix.git / blame
| Commit | Line | Data |
|---|---|---|
| 18a5a9a1 FB |
1 | ;;; GNU Guix --- Functional package management for GNU |
| 2 | ;;; Copyright © 2015 Federico Beffa <beffa@fbengineering.ch> | |
| 3 | ;;; | |
| 4 | ;;; This file is part of GNU Guix. | |
| 5 | ;;; | |
| 6 | ;;; GNU Guix is free software; you can redistribute it and/or modify it | |
| 7 | ;;; under the terms of the GNU General Public License as published by | |
| 8 | ;;; the Free Software Foundation; either version 3 of the License, or (at | |
| 9 | ;;; your option) any later version. | |
| 10 | ;;; | |
| 11 | ;;; GNU Guix is distributed in the hope that it will be useful, but | |
| 12 | ;;; WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 13 | ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 14 | ;;; GNU General Public License for more details. | |
| 15 | ;;; | |
| 16 | ;;; You should have received a copy of the GNU General Public License | |
| 17 | ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. | |
| 18 | ||
| 19 | (define-module (gnu packages libupnp) | |
| 9e672bcc | 20 | #:use-module (gnu packages) |
| 18a5a9a1 FB |
21 | #:use-module (guix licenses) |
| 22 | #:use-module (guix packages) | |
| 23 | #:use-module (guix download) | |
| 24 | #:use-module (guix build-system gnu)) | |
| 25 | ||
| 26 | (define-public libupnp | |
| 27 | (package | |
| 28 | (name "libupnp") | |
| 9f20f7f8 | 29 | (version "1.6.20") |
| 18a5a9a1 FB |
30 | (source |
| 31 | (origin | |
| 32 | (method url-fetch) | |
| 33 | (uri (string-append "mirror://sourceforge/pupnp/pupnp/libUPnP%20" | |
| 34 | version "/" name "-" version ".tar.bz2")) | |
| f8faf537 LF |
35 | (patches (search-patches "libupnp-CVE-2016-6255.patch" |
| 36 | "libupnp-CVE-2016-8863.patch")) | |
| 18a5a9a1 FB |
37 | (sha256 |
| 38 | (base32 | |
| 9f20f7f8 | 39 | "0qrsdsb1qm85hc4jy04qph895613d148f0x1mmk6z99y3q43fdgf")))) |
| 18a5a9a1 FB |
40 | (build-system gnu-build-system) |
| 41 | (arguments | |
| 42 | ;; The tests require a network device capable of multicasting which is | |
| 43 | ;; not available in the build environment. See | |
| 44 | ;; https://lists.gnu.org/archive/html/guix-devel/2015-01/msg00312.html. | |
| 45 | `(#:tests? #f | |
| 46 | #:configure-flags '("--enable-ipv6"))) | |
| 47 | (home-page "http://pupnp.sourceforge.net") | |
| 48 | (synopsis "Portable SDK for UPnP Devices") | |
| 49 | (description | |
| 50 | "The portable SDK for UPnP Devices (libupnp) provides developers with an | |
| 51 | API and open source code for building control points, devices, and bridges | |
| 52 | that are compliant with Version 1.0 of the Universal Plug and Play Device | |
| 53 | Architecture Specification and support several operating systems like Linux, | |
| 54 | *BSD, Solaris and others.") | |
| 55 | (license bsd-3))) |