2013-01-20 22:47:19 +01:00
|
|
|
;;; GNU Guix --- Functional package management for GNU
|
2018-03-09 23:11:48 +01:00
|
|
|
;;; Copyright © 2013, 2014, 2015, 2016, 2018 Ludovic Courtès <ludo@gnu.org>
|
2017-03-18 07:29:12 +01:00
|
|
|
;;; Copyright © 2015, 2017 Mark H Weaver <mhw@netris.org>
|
2015-08-17 22:06:02 +02:00
|
|
|
;;; Copyright © 2015 Eric Dvorsak <eric@dvorsak.fr>
|
2016-04-05 18:11:23 +02:00
|
|
|
;;; Copyright © 2016 David Thompson <davet@gnu.org>
|
2017-01-30 20:26:55 +01:00
|
|
|
;;; Copyright © 2017 Marius Bakke <mbakke@fastmail.com>
|
2017-04-24 16:51:47 +02:00
|
|
|
;;; Copyright © 2017 Efraim Flashner <efraim@flashner.co.il>
|
2013-01-20 22:47:19 +01:00
|
|
|
;;;
|
|
|
|
;;; 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 libevent)
|
|
|
|
#:use-module (gnu packages)
|
|
|
|
#:use-module (guix licenses)
|
|
|
|
#:use-module (guix packages)
|
|
|
|
#:use-module (guix download)
|
|
|
|
#:use-module (guix build-system gnu)
|
2016-12-09 18:13:58 +01:00
|
|
|
#:use-module (guix build-system perl)
|
2014-05-16 15:40:19 +02:00
|
|
|
#:use-module (gnu packages autotools)
|
gnu: Move 'which' to (gnu packages base).
* gnu/packages/which.scm: Remove.
* gnu-system.am (GNU_SYSTEM_MODULES): Remove it.
* gnu/packages/base.scm (which): New variable.
* gnu/packages/aspell.scm, gnu/packages/audio.scm,
gnu/packages/autogen.scm, gnu/packages/cdrom.scm,
gnu/packages/compression.scm, gnu/packages/datamash.scm,
gnu/packages/games.scm, gnu/packages/glib.scm,
gnu/packages/gnu-pw-mgr.scm, gnu/packages/gnutls.scm,
gnu/packages/gps.scm, gnu/packages/guile.scm,
gnu/packages/java.scm, gnu/packages/libevent.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm,
gnu/packages/node.scm, gnu/packages/ntp.scm,
gnu/packages/orpheus.scm, gnu/packages/pciutils.scm,
gnu/packages/python.scm, gnu/packages/qt.scm,
gnu/packages/rsync.scm, gnu/packages/sawfish.scm,
gnu/packages/scheme.scm, gnu/packages/ssh.scm,
gnu/packages/statistics.scm, gnu/packages/texlive.scm,
gnu/packages/wdiff.scm: Adjust accordingly.
2015-03-04 17:21:21 +01:00
|
|
|
#:use-module (gnu packages base)
|
2016-12-09 18:13:58 +01:00
|
|
|
#:use-module (gnu packages perl)
|
2016-12-09 17:26:00 +01:00
|
|
|
#:use-module (gnu packages pkg-config)
|
2014-05-16 15:40:19 +02:00
|
|
|
#:use-module (gnu packages python)
|
2016-12-09 17:26:00 +01:00
|
|
|
#:use-module (gnu packages tls))
|
2013-01-20 22:47:19 +01:00
|
|
|
|
|
|
|
(define-public libevent
|
|
|
|
(package
|
|
|
|
(name "libevent")
|
2017-01-30 20:26:55 +01:00
|
|
|
(version "2.1.8")
|
2013-01-20 22:47:19 +01:00
|
|
|
(source (origin
|
|
|
|
(method url-fetch)
|
|
|
|
(uri (string-append
|
2016-03-11 16:19:25 +01:00
|
|
|
"https://github.com/libevent/libevent/releases/download/release-"
|
|
|
|
version "-stable/libevent-" version "-stable.tar.gz"))
|
2013-01-20 22:47:19 +01:00
|
|
|
(sha256
|
|
|
|
(base32
|
2017-01-30 20:26:55 +01:00
|
|
|
"1hhxnxlr0fsdv7bdmzsnhdz16fxf3jg2r6vyljcl3kj6pflcap4n"))
|
2017-02-01 18:28:45 +01:00
|
|
|
(patches (search-patches "libevent-2.1-dns-tests.patch"
|
|
|
|
;; XXX: Try removing this for > 2.1.8.
|
|
|
|
;; https://github.com/libevent/libevent/issues/452
|
|
|
|
"libevent-2.1-skip-failing-test.patch"))))
|
2013-01-20 22:47:19 +01:00
|
|
|
(build-system gnu-build-system)
|
2017-04-24 16:51:47 +02:00
|
|
|
(arguments
|
|
|
|
;; This skips some of the tests which fail on armhf and aarch64.
|
|
|
|
'(#:configure-flags '("--disable-libevent-regress")))
|
2013-01-20 22:47:19 +01:00
|
|
|
(inputs
|
2017-01-30 20:26:55 +01:00
|
|
|
`(("python" ,python-2))) ; for 'event_rpcgen.py'
|
|
|
|
(native-inputs
|
|
|
|
`(("which" ,which)))
|
2013-01-20 22:47:19 +01:00
|
|
|
(home-page "http://libevent.org/")
|
gnu: Some cleanup based on lint checkers.
* gnu/packages/admin.scm, gnu/packages/aidc.scm, gnu/packages/algebra.scm,
gnu/packages/apr.scm, gnu/packages/avahi.scm, gnu/packages/backup.scm,
gnu/packages/base.scm, gnu/packages/calcurse.scm, gnu/packages/cdrom.scm,
gnu/packages/check.scm, gnu/packages/compression.scm, gnu/packages/cook.scm,
gnu/packages/crypto.scm, gnu/packages/cryptsetup.scm, gnu/packages/curl.scm,
gnu/packages/cyrus-sasl.scm, gnu/packages/databases.scm,
gnu/packages/doxygen.scm, gnu/packages/dwm.scm, gnu/packages/elf.scm,
gnu/packages/emacs.scm, gnu/packages/feh.scm, gnu/packages/file.scm,
gnu/packages/fish.scm, gnu/packages/flex.scm, gnu/packages/fltk.scm,
gnu/packages/fontutils.scm, gnu/packages/games.scm, gnu/packages/gcal.scm,
gnu/packages/gcc.scm, gnu/packages/geeqie.scm, gnu/packages/ghostscript.scm,
gnu/packages/gimp.scm, gnu/packages/gl.scm, gnu/packages/glib.scm,
gnu/packages/gnome.scm, gnu/packages/gnunet.scm, gnu/packages/gnupg.scm,
gnu/packages/gperf.scm, gnu/packages/grub.scm, gnu/packages/gsasl.scm,
gnu/packages/gtk.scm, gnu/packages/guile-wm.scm, gnu/packages/guile.scm,
gnu/packages/hurd.scm, gnu/packages/icu4c.scm, gnu/packages/image.scm,
gnu/packages/imagemagick.scm, gnu/packages/irssi.scm, gnu/packages/kde.scm,
gnu/packages/libdaemon.scm, gnu/packages/libevent.scm,
gnu/packages/libidn.scm, gnu/packages/libusb.scm, gnu/packages/linux.scm,
gnu/packages/lout.scm, gnu/packages/lsh.scm, gnu/packages/lsof.scm,
gnu/packages/lua.scm, gnu/packages/maths.scm, gnu/packages/mcrypt.scm,
gnu/packages/mp3.scm, gnu/packages/netpbm.scm, gnu/packages/noweb.scm,
gnu/packages/ocaml.scm, gnu/packages/openssl.scm, gnu/packages/pcre.scm,
gnu/packages/pdf.scm, gnu/packages/pkg-config.scm,
gnu/packages/pretty-print.scm, gnu/packages/python.scm, gnu/packages/qt.scm,
gnu/packages/rsync.scm, gnu/packages/scheme.scm, gnu/packages/scrot.scm,
gnu/packages/sdl.scm, gnu/packages/skribilo.scm, gnu/packages/ssh.scm,
gnu/packages/stalonetray.scm, gnu/packages/tcl.scm, gnu/packages/tcsh.scm,
gnu/packages/telephony.scm, gnu/packages/texlive.scm, gnu/packages/tor.scm,
gnu/packages/valgrind.scm, gnu/packages/version-control.scm,
gnu/packages/vim.scm, gnu/packages/vpn.scm, gnu/packages/w3m.scm,
gnu/packages/web.scm, gnu/packages/wordnet.scm, gnu/packages/xiph.scm,
gnu/packages/xml.scm, gnu/packages/xorg.scm, gnu/packages/zile.scm,
gnu/packages/zip.scm, gnu/packages/zsh.scm [synopsis, description]: Adjust
according to lint checkers.
* gnu/packages/fltk.scm (fltk)[source]: Wrap long line in uri.
* /gnu/packages/xiph.scm (libogg, libtheora, vorbis-tools)[source]: Same.
2014-10-24 06:46:59 +02:00
|
|
|
(synopsis "Event notification library")
|
2013-01-20 22:47:19 +01:00
|
|
|
(description
|
|
|
|
"The libevent API provides a mechanism to execute a callback
|
|
|
|
function when a specific event occurs on a file descriptor or after a
|
|
|
|
timeout has been reached. Furthermore, libevent also support callbacks
|
|
|
|
due to signals or regular timeouts.
|
|
|
|
|
|
|
|
libevent is meant to replace the event loop found in event driven
|
|
|
|
network servers. An application just needs to call event_dispatch() and
|
|
|
|
then add or remove events dynamically without having to change the event
|
|
|
|
loop.")
|
|
|
|
(license bsd-3)))
|
2014-05-16 15:40:19 +02:00
|
|
|
|
2017-01-30 20:26:55 +01:00
|
|
|
(define-public libevent-2.0
|
|
|
|
(package
|
|
|
|
(inherit libevent)
|
|
|
|
(version "2.0.22")
|
|
|
|
(source (origin
|
2017-03-18 07:29:12 +01:00
|
|
|
(method url-fetch)
|
|
|
|
(uri (string-append
|
|
|
|
"https://github.com/libevent/libevent/releases/download/release-"
|
|
|
|
version "-stable/libevent-" version "-stable.tar.gz"))
|
|
|
|
(sha256
|
|
|
|
(base32
|
|
|
|
"18qz9qfwrkakmazdlwxvjmw8p76g70n3faikwvdwznns1agw9hki"))
|
|
|
|
(patches
|
|
|
|
(search-patches
|
|
|
|
"libevent-dns-tests.patch"
|
2017-03-19 23:52:01 +01:00
|
|
|
"libevent-2.0-CVE-2016-10195.patch"
|
|
|
|
"libevent-2.0-CVE-2016-10196.patch"
|
|
|
|
"libevent-2.0-CVE-2016-10197.patch"
|
2017-04-24 16:51:47 +02:00
|
|
|
"libevent-2.0-evbuffer-add-use-last-with-datap.patch"))))
|
|
|
|
(arguments '())))
|
2017-01-30 20:26:55 +01:00
|
|
|
|
2015-08-17 22:06:02 +02:00
|
|
|
(define-public libev
|
|
|
|
(package
|
|
|
|
(name "libev")
|
2017-02-13 20:31:31 +01:00
|
|
|
(version "4.24")
|
2015-08-17 22:06:02 +02:00
|
|
|
(source (origin
|
|
|
|
(method url-fetch)
|
2015-12-24 18:38:23 +01:00
|
|
|
(uri (string-append "http://dist.schmorp.de/libev/Attic/libev-"
|
2015-08-17 22:06:02 +02:00
|
|
|
version
|
|
|
|
".tar.gz"))
|
|
|
|
(sha256
|
|
|
|
(base32
|
2017-02-13 20:31:31 +01:00
|
|
|
"08gqsza1czx0nf62nkk183jb0946yzjsymaacxbzdgcs8z9r6dcp"))))
|
2015-08-17 22:06:02 +02:00
|
|
|
(build-system gnu-build-system)
|
|
|
|
(home-page "http://software.schmorp.de/pkg/libev.html")
|
|
|
|
(synopsis "Event loop loosely modelled after libevent")
|
|
|
|
(description
|
2017-12-26 09:27:42 +01:00
|
|
|
"libev provides a full-featured and high-performance event loop that is
|
|
|
|
loosely modelled after libevent. It includes relative timers, absolute timers
|
|
|
|
with customized rescheduling, synchronous signals, process status change
|
|
|
|
events, event watchers dealing with the event loop itself, file watchers, and
|
|
|
|
limited support for fork events.")
|
2015-08-17 22:06:02 +02:00
|
|
|
(license
|
|
|
|
(list bsd-2 gpl2+))))
|
|
|
|
|
2014-05-16 15:40:19 +02:00
|
|
|
(define-public libuv
|
|
|
|
(package
|
|
|
|
(name "libuv")
|
2018-08-19 20:03:44 +02:00
|
|
|
(version "1.23.0")
|
2014-05-16 15:40:19 +02:00
|
|
|
(source (origin
|
|
|
|
(method url-fetch)
|
2017-09-21 21:10:28 +02:00
|
|
|
(uri (string-append "https://dist.libuv.org/dist/v" version
|
|
|
|
"/libuv-v" version ".tar.gz"))
|
2014-05-16 15:40:19 +02:00
|
|
|
(sha256
|
|
|
|
(base32
|
2018-08-19 20:03:44 +02:00
|
|
|
"09yf7c71n8b80nbsv4lsmq5nqmb0rylhpx3z9jgkv5za9lr6sx6i"))))
|
2014-05-16 15:40:19 +02:00
|
|
|
(build-system gnu-build-system)
|
|
|
|
(arguments
|
2018-07-19 14:44:10 +02:00
|
|
|
'(;; XXX: Some tests want /dev/tty, attempt to make connections, etc.
|
2014-05-16 15:40:19 +02:00
|
|
|
#:tests? #f))
|
2018-03-09 23:11:48 +01:00
|
|
|
(native-inputs `(("autoconf" ,autoconf-wrapper)
|
2014-05-16 15:40:19 +02:00
|
|
|
("automake" ,automake)
|
2015-01-07 09:44:10 +01:00
|
|
|
("libtool" ,libtool)
|
2014-05-16 15:40:19 +02:00
|
|
|
|
|
|
|
;; libuv.pc is installed only when pkg-config is found.
|
|
|
|
("pkg-config" ,pkg-config)))
|
2017-02-13 20:34:19 +01:00
|
|
|
(home-page "https://github.com/libuv/libuv")
|
2014-05-16 15:40:19 +02:00
|
|
|
(synopsis "Library for asynchronous I/O")
|
|
|
|
(description
|
|
|
|
"libuv is a multi-platform support library with a focus on asynchronous
|
|
|
|
I/O. Among other things, it supports event loops via epoll, kqueue, and
|
|
|
|
similar IOCP, and event ports, asynchronous TCP/UDP sockets, asynchronous DNS
|
|
|
|
resolution, asynchronous file system operations, and threading primitives.")
|
|
|
|
|
|
|
|
;; A few files fall under other non-copyleft licenses; see 'LICENSE' for
|
2017-06-03 04:31:15 +02:00
|
|
|
;; details. Documentation is CC-BY 4.0 as of 1.12.0; see 'LICENSE-docs'.
|
|
|
|
(license (list expat cc-by4.0))))
|
2016-12-09 18:13:58 +01:00
|
|
|
|
2016-12-09 17:26:00 +01:00
|
|
|
(define-public perl-anyevent
|
|
|
|
(package
|
|
|
|
(name "perl-anyevent")
|
2017-07-26 08:10:11 +02:00
|
|
|
(version "7.14")
|
2016-12-09 17:26:00 +01:00
|
|
|
(source (origin
|
|
|
|
(method url-fetch)
|
|
|
|
(uri (string-append "mirror://cpan/authors/id/M/ML/MLEHMANN/"
|
|
|
|
"AnyEvent-" version ".tar.gz"))
|
|
|
|
(sha256
|
|
|
|
(base32
|
2017-07-26 08:10:11 +02:00
|
|
|
"0akxr9y0q9yjkl614x4clbiiayvh5a67y8gmci54plxs4p95i4sk"))))
|
2016-12-09 17:26:00 +01:00
|
|
|
(build-system perl-build-system)
|
|
|
|
(native-inputs
|
|
|
|
`(("perl-canary-stability" ,perl-canary-stability)))
|
|
|
|
(propagated-inputs
|
|
|
|
`(("perl-async-interrupt" ,perl-async-interrupt)
|
|
|
|
("perl-ev" ,perl-ev)
|
|
|
|
("perl-guard" ,perl-guard)
|
|
|
|
("perl-json" ,perl-json)
|
|
|
|
("perl-json-xs" ,perl-json-xs)
|
|
|
|
("perl-net-ssleay" ,perl-net-ssleay)
|
|
|
|
("perl-task-weaken" ,perl-task-weaken)))
|
|
|
|
(home-page "http://search.cpan.org/dist/AnyEvent")
|
|
|
|
(synopsis
|
|
|
|
"API for I/O, timer, signal, child process and completion events")
|
|
|
|
(description
|
|
|
|
"This module allows using a variety of events without forcing module
|
2017-04-16 18:06:57 +02:00
|
|
|
authors to pick a specific event loop, and without noticeable overhead.
|
2016-12-09 17:26:00 +01:00
|
|
|
Currently supported event loops are EV, Event, Glib/Gtk2, Tk, Qt,
|
|
|
|
@code{Event::Lib}, Irssi, @code{IO::Async} and POE (and thus also WxWidgets
|
|
|
|
and Prima). It also comes with a very fast Pure Perl event loop that does
|
|
|
|
not rely on XS.")
|
2017-05-02 16:57:52 +02:00
|
|
|
(license perl-license)))
|
2016-12-09 17:26:00 +01:00
|
|
|
|
2016-12-09 18:13:58 +01:00
|
|
|
(define-public perl-ev
|
|
|
|
(package
|
|
|
|
(name "perl-ev")
|
|
|
|
(version "4.22")
|
|
|
|
(source (origin
|
|
|
|
(method url-fetch)
|
|
|
|
(uri (string-append "mirror://cpan/authors/id/M/ML/MLEHMANN/EV-"
|
|
|
|
version ".tar.gz"))
|
|
|
|
(sha256
|
|
|
|
(base32
|
|
|
|
"14d9115q8f2ca2q3vbcalm55zqsbx8xjq5aj098laj9f9rrzirra"))
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
(snippet
|
|
|
|
'(begin
|
|
|
|
;; Drop bundled libev.
|
|
|
|
(delete-file-recursively "libev")
|
|
|
|
#t))))
|
|
|
|
(build-system perl-build-system)
|
|
|
|
(arguments
|
|
|
|
'(#:phases
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
(add-after 'unpack 'unpack-libev
|
|
|
|
;; This package requires the libev *sources* in order
|
|
|
|
;; to build. Unpack system libev here...
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
(mkdir "./libev")
|
|
|
|
(zero? (system* "tar" "-xf" (assoc-ref inputs "libev-source")
|
|
|
|
"-C" "./libev" "--strip-components=1")))))))
|
|
|
|
(native-inputs
|
|
|
|
`(("libev-source" ,(package-source libev))
|
|
|
|
("perl-canary-stability" ,perl-canary-stability)))
|
|
|
|
(propagated-inputs
|
|
|
|
`(("perl-common-sense" ,perl-common-sense)))
|
|
|
|
(home-page "http://search.cpan.org/dist/EV")
|
|
|
|
(synopsis "Perl interface to libev")
|
|
|
|
(description
|
|
|
|
"This module provides an interface to @code{libev}, a high performance
|
|
|
|
full-featured event loop. It can be used through the @code{AnyEvent} module
|
|
|
|
and still be faster than other event loops currently supported in Perl.")
|
2017-05-02 16:57:52 +02:00
|
|
|
(license perl-license)))
|