diff options
author | Marius Bakke <mbakke@fastmail.com> | 2019-05-25 00:25:15 +0200 |
---|---|---|
committer | Marius Bakke <mbakke@fastmail.com> | 2019-05-25 00:25:15 +0200 |
commit | 57df83e07d4b5e78d9a54c1a88d05b4a9ed65714 (patch) | |
tree | 76684e63965e9ad6e37d9d45bc3159e6c9782cd0 /gnu/packages/zwave.scm | |
parent | 43d9ed7792808638eabb43aa6133f1d6186c520b (diff) | |
parent | 136b7d81f0eb713783e9ea7cf7f260a2b6252dfd (diff) | |
download | guix-patches-57df83e07d4b5e78d9a54c1a88d05b4a9ed65714.tar guix-patches-57df83e07d4b5e78d9a54c1a88d05b4a9ed65714.tar.gz |
Merge branch 'staging' into core-updates
Diffstat (limited to 'gnu/packages/zwave.scm')
-rw-r--r-- | gnu/packages/zwave.scm | 84 |
1 files changed, 84 insertions, 0 deletions
diff --git a/gnu/packages/zwave.scm b/gnu/packages/zwave.scm new file mode 100644 index 0000000000..43d1747332 --- /dev/null +++ b/gnu/packages/zwave.scm @@ -0,0 +1,84 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright © 2019 Ludovic Courtès <ludo@gnu.org> +;;; +;;; This file is part of GNU Guix. +;;; +;;; GNU Guix is free software; you can redistribute it and/or modify it +;;; under the terms of the GNU General Public License as published by +;;; the Free Software Foundation; either version 3 of the License, or (at +;;; your option) any later version. +;;; +;;; GNU Guix is distributed in the hope that it will be useful, but +;;; WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. + +(define-module (gnu packages zwave) + #:use-module (guix packages) + #:use-module ((guix licenses) #:prefix license:) + #:use-module (guix git-download) + #:use-module (guix build-system gnu) + #:use-module (gnu packages base) + #:use-module (gnu packages linux) + #:use-module (gnu packages perl) + #:use-module (gnu packages xml)) + +(define-public open-zwave + (package + (name "open-zwave") + (version "1.6") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/OpenZWave/open-zwave/") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0xgs4mmr0480c269wx9xkk67ikjzxkh8xcssrdx0f5xcl1lyd333")) + (modules '((guix build utils))) + (snippet + '(begin + ;; Set RUNPATH on the 'MinOZW' executable. + (substitute* "cpp/examples/MinOZW/Makefile" + (("\\$\\(LDFLAGS\\)") + "$(LDFLAGS) -Wl,-rpath=$(PREFIX)/lib")) + + ;; Delete the bundled TinyXML. + (delete-file-recursively "cpp/tinyxml") + (substitute* "cpp/build/Makefile" + (("LIBS \\+= -ludev") + "LIBS += -ludev -ltinyxml ")) + #t)))) + (build-system gnu-build-system) + (arguments + '(#:phases (modify-phases %standard-phases + (delete 'configure)) ;no 'configure' script + + #:make-flags (list "BUILD=debug" + (string-append "PREFIX=" + (assoc-ref %outputs "out")) + (string-append "pkgconfigdir=" + (assoc-ref %outputs "out") + "/lib/pkgconfig")) + + ;; "make check" and "make fulltest" are only concerned with checking + ;; the device XML database and it's not entirely clear what to get from + ;; them. + #:tests? #f)) + (native-inputs `(("which" ,which) + ("perl" ,perl) ;for tests + ("perl-xml-simple" ,perl-xml-simple))) + (inputs `(("tinyxml" ,tinyxml) + ("eudev" ,eudev))) + (home-page "http://www.openzwave.net/") + (synopsis "Access Z-Wave devices from C++ programs") + (description + "OpenZWave (or OZW) is a C++ library that interfaces with selected Z-Wave +PC controllers. It allows developers to create applications that manipulate +and respond to devices on a Z-Wave network, without requiring in-depth +knowledge of the Z-Wave protocol.") + (license license:lgpl3+))) |