2014-03-06 01:12:19 +01:00
|
|
|
|
;;; GNU Guix --- Functional package management for GNU
|
2016-01-21 16:23:19 +01:00
|
|
|
|
;;; Copyright © 2014, 2015, 2016 Mark H Weaver <mhw@netris.org>
|
2017-04-30 19:21:46 +02:00
|
|
|
|
;;; Copyright © 2014, 2017 Julien Lepiller <julien@lepiller.eu>
|
2015-01-31 22:03:25 +01:00
|
|
|
|
;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
|
2015-05-23 16:43:18 +02:00
|
|
|
|
;;; Copyright © 2015 Andreas Enge <andreas@enge.fr>
|
2018-03-29 22:43:37 +02:00
|
|
|
|
;;; Copyright © 2015, 2016, 2017, 2018 Ricardo Wurmus <rekado@elephly.net>
|
2018-07-29 18:21:08 +02:00
|
|
|
|
;;; Copyright © 2015, 2018 Efraim Flashner <efraim@flashner.co.il>
|
Correct name and Email for ng0.
* .mailmap: Correct name and Email for ng0.
* Makefile.am, doc/guix.texi, etc/completion/fish/guix.fish
gnu/packages/accessibility.scm, gnu/packages/admin.scm,
gnu/packages/audio.scm, gnu/packages/autotools.scm,
gnu/packages/cdrom.scm, gnu/packages/check.scm,
gnu/packages/cinnamon.scm, gnu/packages/compression.scm,
gnu/packages/crypto.scm, gnu/packages/databases.scm,
gnu/packages/django.scm, gnu/packages/dns.scm,
gnu/packages/emacs.scm, gnu/packages/enlightenment.scm,
gnu/packages/fonts.scm, gnu/packages/fontutils.scm,
gnu/packages/forth.scm, gnu/packages/fvwm.scm,
gnu/packages/games.scm, gnu/packages/gl.scm,
gnu/packages/gnome.scm, gnu/packages/gnunet.scm,
gnu/packages/gnupg.scm, gnu/packages/gnuzilla.scm,
gnu/packages/gtk.scm, gnu/packages/guile-wm.scm,
gnu/packages/guile.scm, gnu/packages/haskell-check.scm,
gnu/packages/haskell-crypto.scm, gnu/packages/haskell.scm,
gnu/packages/image-viewers.scm, gnu/packages/image.scm,
gnu/packages/irc.scm, gnu/packages/language.scm,
gnu/packages/libcanberra.scm, gnu/packages/linux.scm,
gnu/packages/lisp.scm, gnu/packages/lolcode.scm,
gnu/packages/lxde.scm, gnu/packages/lxqt.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm,
gnu/packages/mate.scm, gnu/packages/maths.scm,
gnu/packages/mc.scm, gnu/packages/messaging.scm,
gnu/packages/music.scm, gnu/packages/ncurses.scm,
gnu/packages/networking.scm, gnu/packages/nickle.scm,
gnu/packages/openbox.scm, gnu/packages/pdf.scm,
gnu/packages/perl-check.scm, gnu/packages/perl.scm,
gnu/packages/python-crypto.scm, gnu/packages/python-web.scm,
gnu/packages/python.scm, gnu/packages/qt.scm,
gnu/packages/ruby.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/serialization.scm,
gnu/packages/shells.scm, gnu/packages/ssh.scm,
gnu/packages/suckless.scm, gnu/packages/tbb.scm,
gnu/packages/telephony.scm, gnu/packages/text-editors.scm,
gnu/packages/textutils.scm, gnu/packages/time.scm,
gnu/packages/tls.scm, gnu/packages/tor.scm,
gnu/packages/version-control.scm, gnu/packages/video.scm,
gnu/packages/vim.scm, gnu/packages/web.scm,
gnu/packages/wm.scm, gnu/packages/xdisorg.scm,
gnu/packages/xfce.scm, gnu/packages/xml.scm,
gnu/packages/xorg.scm, gnu/services/certbot.scm,
gnu/services/desktop.scm, gnu/services/version-control.scm,
gnu/services/web.scm, guix/import/hackage.scm,
guix/licenses.scm: Likewise.
Signed-off-by: Tobias Geerinckx-Rice <me@tobias.gr>
2018-03-20 16:39:45 +01:00
|
|
|
|
;;; Copyright © 2016, 2017 Nils Gillmann <ng0@n0.is>
|
2016-09-22 05:58:29 +02:00
|
|
|
|
;;; Copyright © 2016 Andy Patterson <ajpatter@uwaterloo.ca>
|
2018-04-14 23:50:37 +02:00
|
|
|
|
;;; Copyright © 2016, 2017, 2018 Clément Lassieur <clement@lassieur.org>
|
2017-03-02 23:30:18 +01:00
|
|
|
|
;;; Copyright © 2017 Mekeor Melire <mekeor.melire@gmail.com>
|
2018-07-04 19:24:09 +02:00
|
|
|
|
;;; Copyright © 2017, 2018 Arun Isaac <arunisaac@systemreboot.net>
|
2018-01-26 22:55:57 +01:00
|
|
|
|
;;; Copyright © 2017, 2018 Tobias Geerinckx-Rice <me@tobias.gr>
|
2017-09-29 12:36:20 +02:00
|
|
|
|
;;; Copyright © 2017 Theodoros Foradis <theodoros@foradis.org>
|
2018-07-23 11:00:30 +02:00
|
|
|
|
;;; Copyright © 2017, 2018 Rutger Helling <rhelling@mykolab.com>
|
2018-03-19 17:56:32 +01:00
|
|
|
|
;;; Copyright © 2018 Leo Famulari <leo@famulari.name>
|
2018-05-07 11:44:00 +02:00
|
|
|
|
;;; Copyright © 2018 Pierre-Antoine Rouby <contact@parouby.fr>
|
2014-03-06 01:12: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 messaging)
|
2016-08-23 13:07:17 +02:00
|
|
|
|
#:use-module ((guix licenses) #:prefix license:)
|
2015-08-04 06:12:16 +02:00
|
|
|
|
#:use-module (guix utils)
|
2014-03-06 01:12:19 +01:00
|
|
|
|
#:use-module (guix packages)
|
|
|
|
|
#:use-module (guix download)
|
2016-08-21 00:14:17 +02:00
|
|
|
|
#:use-module (guix git-download)
|
2014-03-06 01:12:19 +01:00
|
|
|
|
#:use-module (guix build-system gnu)
|
2015-08-04 06:12:16 +02:00
|
|
|
|
#:use-module (guix build-system glib-or-gtk)
|
2018-03-19 17:56:32 +01:00
|
|
|
|
#:use-module (guix build-system meson)
|
2015-09-23 21:29:06 +02:00
|
|
|
|
#:use-module (guix build-system python)
|
2016-11-23 20:04:37 +01:00
|
|
|
|
#:use-module (guix build-system perl)
|
2016-12-18 21:10:16 +01:00
|
|
|
|
#:use-module (guix build-system cmake)
|
2014-03-06 06:07:07 +01:00
|
|
|
|
#:use-module (gnu packages)
|
2016-09-22 05:58:29 +02:00
|
|
|
|
#:use-module (gnu packages aidc)
|
2017-01-18 13:34:25 +01:00
|
|
|
|
#:use-module (gnu packages aspell)
|
2015-08-04 06:12:16 +02:00
|
|
|
|
#:use-module (gnu packages autotools)
|
|
|
|
|
#:use-module (gnu packages avahi)
|
2017-01-08 20:08:15 +01:00
|
|
|
|
#:use-module (gnu packages base)
|
2015-08-04 06:12:16 +02:00
|
|
|
|
#:use-module (gnu packages check)
|
2016-08-21 00:14:17 +02:00
|
|
|
|
#:use-module (gnu packages crypto)
|
2017-03-02 23:31:50 +01:00
|
|
|
|
#:use-module (gnu packages curl)
|
2015-08-04 06:12:16 +02:00
|
|
|
|
#:use-module (gnu packages cyrus-sasl)
|
|
|
|
|
#:use-module (gnu packages databases)
|
gnu: Update module imports for asciidoc and doxygen.
This is a followup to commit 0573a923def01e54bf104e0015ade44ab42f694f.
* gnu/packages/algebra.scm, gnu/packages/bioinformatics.scm,
gnu/packages/fcitx.scm, gnu/packages/fish.scm,
gnu/packages/freedesktop.scm, gnu/packages/game-development.scm,
gnu/packages/gcc.scm, gnu/packages/graphics.scm, gnu/packages/image.scm,
gnu/packages/kodi.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/messaging.scm,
gnu/packages/mpd.scm, gnu/packages/music.scm, gnu/packages/rdf.scm,
gnu/packages/serialization.scm, gnu/packages/version-control.scm,
gnu/packages/web.scm, gnu/packages/wm.scm, gnu/packages/xdisorg.scm,
gnu/packages/xiph.scm: Change imports of (gnu packages asciidoc) or
(gnu packages doxygen) to (gnu packages documentation).
2016-05-13 02:18:15 +02:00
|
|
|
|
#:use-module (gnu packages documentation)
|
2014-11-21 18:39:39 +01:00
|
|
|
|
#:use-module (gnu packages enchant)
|
2016-11-23 20:04:37 +01:00
|
|
|
|
#:use-module (gnu packages gettext)
|
2014-11-21 18:39:39 +01:00
|
|
|
|
#:use-module (gnu packages gnome)
|
|
|
|
|
#:use-module (gnu packages gtk)
|
2017-07-02 20:24:16 +02:00
|
|
|
|
#:use-module (gnu packages image)
|
2015-08-04 06:12:16 +02:00
|
|
|
|
#:use-module (gnu packages xorg)
|
|
|
|
|
#:use-module (gnu packages xdisorg)
|
2014-11-21 18:39:39 +01:00
|
|
|
|
#:use-module (gnu packages libcanberra)
|
2016-11-23 20:04:37 +01:00
|
|
|
|
#:use-module (gnu packages man)
|
2016-09-07 18:37:38 +02:00
|
|
|
|
#:use-module (gnu packages networking)
|
2015-08-04 06:12:16 +02:00
|
|
|
|
#:use-module (gnu packages libidn)
|
2016-08-22 21:35:26 +02:00
|
|
|
|
#:use-module (gnu packages lua)
|
2014-11-21 18:39:39 +01:00
|
|
|
|
#:use-module (gnu packages xml)
|
2014-03-06 06:07:07 +01:00
|
|
|
|
#:use-module (gnu packages gnupg)
|
2015-08-04 06:12:16 +02:00
|
|
|
|
#:use-module (gnu packages ncurses)
|
2014-03-06 06:07:07 +01:00
|
|
|
|
#:use-module (gnu packages pkg-config)
|
|
|
|
|
#:use-module (gnu packages glib)
|
|
|
|
|
#:use-module (gnu packages python)
|
gnu: Move crypto packages from python to python-crypto.
* gnu/packages/python.scm (python-passlib, python2-passlib)
(python-py-bcrypt, python2-py-bcrypt)
(python-paramiko, python2-paramiko, python-ecdsa, python2-ecdsa)
(python-pycrypto, python2-pycrypto, python-keyring, python2-keyring)
(python-certifi, python2-certifi)
(python-cryptography-vectors, python2-cryptography-vectors)
(python-cryptography, python2-cryptography)
(python-pyopenssl, python2-pyopenssl)
(python-axolotl-curve25519, python2-axolotl-curve25519)
(python-axolotl, python2-axolotl, python2-slowaes)
(python-pyaes, python2-pyaes): Move to...
* gnu/packages/python-crypto.scm: ... here. New file.
* gnu/local.mk (GNU_SYSTEM_MODULES): Add it.
* gnu/packages/admin.scm, gnu/packages/backup.scm,
gnu/packages/crypto.scm, gnu/packages/finance.scm,
gnu/packages/irc.scm, gnu/packages/jrnl.scm,
gnu/packages/messaging.scm, gnu/packages/openstack.scm,
gnu/packages/python-web.scm, gnu/packages/tls.scm,
gnu/packages/xorg.scm: Adjust accordingly.
2017-11-15 14:10:30 +01:00
|
|
|
|
#:use-module (gnu packages python-crypto)
|
2016-11-23 20:04:37 +01:00
|
|
|
|
#:use-module (gnu packages pcre)
|
2014-03-06 06:07:07 +01:00
|
|
|
|
#:use-module (gnu packages perl)
|
2015-01-31 22:03:25 +01:00
|
|
|
|
#:use-module (gnu packages tcl)
|
2014-03-06 06:07:07 +01:00
|
|
|
|
#:use-module (gnu packages compression)
|
2015-01-31 22:03:25 +01:00
|
|
|
|
#:use-module (gnu packages check)
|
|
|
|
|
#:use-module (gnu packages admin)
|
gnu: Rename module gnutls to tls.
* gnu/packages/gnutls.scm: Rename to...
* gnu/packages/tls.scm: ... this. Change module name accordingly.
* gnu/packages/{admin.scm, cups.scm, curl.scm, dc.scm, dns.scm, emacs.scm,
ftp.scm, gnome.scm, gnunet.scm, gnupg.scm, gsasl.scm, lynx.scm,
mail.scm, messaging.scm, package-management.scm, shishi.scm,
task-management.scm, version-control.scm, video.scm, vpn.scm,
webkit.scm, weechat.scm, wget.scm, wine.scm, xml.scm}: Adapt module
import to new name.
* gnu-system.am (GNU_SYSTEM_MODULES): Rename gnutls module to tls.
2015-07-03 21:41:22 +02:00
|
|
|
|
#:use-module (gnu packages linux)
|
2017-07-02 20:24:16 +02:00
|
|
|
|
#:use-module (gnu packages textutils)
|
2015-08-13 23:29:35 +02:00
|
|
|
|
#:use-module (gnu packages tls)
|
2016-08-21 00:14:17 +02:00
|
|
|
|
#:use-module (gnu packages icu4c)
|
2016-08-23 13:51:24 +02:00
|
|
|
|
#:use-module (gnu packages qt)
|
2016-08-21 00:14:17 +02:00
|
|
|
|
#:use-module (gnu packages video)
|
2016-11-23 20:04:37 +01:00
|
|
|
|
#:use-module (gnu packages web)
|
2016-09-09 03:02:31 +02:00
|
|
|
|
#:use-module (gnu packages xiph)
|
|
|
|
|
#:use-module (gnu packages audio)
|
2016-11-23 20:04:37 +01:00
|
|
|
|
#:use-module (gnu packages bison)
|
2017-01-28 17:05:15 +01:00
|
|
|
|
#:use-module (gnu packages fontutils)
|
|
|
|
|
#:use-module (gnu packages bash)
|
|
|
|
|
#:use-module (gnu packages guile)
|
|
|
|
|
#:use-module (gnu packages less)
|
|
|
|
|
#:use-module (gnu packages readline)
|
2017-10-03 08:46:19 +02:00
|
|
|
|
#:use-module (gnu packages photo)
|
2017-01-28 17:05:15 +01:00
|
|
|
|
#:use-module (gnu packages texinfo))
|
2014-03-06 01:12:19 +01:00
|
|
|
|
|
|
|
|
|
(define-public libotr
|
|
|
|
|
(package
|
|
|
|
|
(name "libotr")
|
2016-03-09 21:19:50 +01:00
|
|
|
|
(version "4.1.1")
|
2014-03-06 01:12:19 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://otr.cypherpunks.ca/libotr-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
2016-03-09 21:19:50 +01:00
|
|
|
|
(base32
|
2016-03-18 00:03:15 +01:00
|
|
|
|
"1x8rliydhbibmzwdbyr7pd7n87m2jmxnqkpvaalnf4154hj1hfwb"))
|
2016-04-08 14:18:13 +02:00
|
|
|
|
(patches (search-patches "libotr-test-auth-fix.patch"))))
|
2014-03-06 01:12:19 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(propagated-inputs
|
|
|
|
|
`(("libgcrypt" ,libgcrypt))) ; libotr headers include gcrypt.h
|
|
|
|
|
(inputs `(("libgpg-error" ,libgpg-error)))
|
2016-03-09 21:19:50 +01:00
|
|
|
|
(native-inputs `(("perl" ,perl))) ; for the test suite
|
2014-03-06 01:12:19 +01:00
|
|
|
|
(synopsis "Off-the-Record (OTR) Messaging Library and Toolkit")
|
|
|
|
|
(description
|
|
|
|
|
"OTR allows you to have private conversations over instant messaging by
|
2015-08-04 22:10:42 +02:00
|
|
|
|
providing: (1) Encryption: No one else can read your instant messages. (2)
|
|
|
|
|
Authentication: You are assured the correspondent is who you think it is. (3)
|
|
|
|
|
Deniability: The messages you send do not have digital signatures that are
|
|
|
|
|
checkable by a third party. Anyone can forge messages after a conversation to
|
|
|
|
|
make them look like they came from you. However, during a conversation, your
|
|
|
|
|
correspondent is assured the messages he sees are authentic and
|
|
|
|
|
unmodified. (4) Perfect forward secrecy: If you lose control of your private
|
|
|
|
|
keys, no previous conversation is compromised.")
|
2014-03-06 01:12:19 +01:00
|
|
|
|
(home-page "https://otr.cypherpunks.ca/")
|
2016-08-23 13:07:17 +02:00
|
|
|
|
(license (list license:lgpl2.1 license:gpl2))))
|
2014-03-06 01:12:19 +01:00
|
|
|
|
|
2017-11-15 08:26:17 +01:00
|
|
|
|
(define-public libsignal-protocol-c
|
|
|
|
|
(package
|
|
|
|
|
(name "libsignal-protocol-c")
|
2018-05-19 05:46:39 +02:00
|
|
|
|
(version "2.3.2")
|
2017-11-15 08:26:17 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/WhisperSystems/"
|
|
|
|
|
"libsignal-protocol-c/archive/v" version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-05-19 05:46:39 +02:00
|
|
|
|
"0380hl6fw3ppf265fg897pyrpqygpx4m9j8ifq118bim8lq6z0pk"))))
|
2017-11-15 08:26:17 +01:00
|
|
|
|
(arguments
|
|
|
|
|
`(;; Required for proper linking and for tests to run.
|
|
|
|
|
#:configure-flags '("-DBUILD_SHARED_LIBS=on" "-DBUILD_TESTING=1")))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(inputs `( ;; Required for tests:
|
2018-03-16 16:50:14 +01:00
|
|
|
|
("check" ,check)
|
|
|
|
|
("openssl" ,openssl)))
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
2017-11-15 08:26:17 +01:00
|
|
|
|
(home-page "https://github.com/WhisperSystems/libsignal-protocol-c")
|
|
|
|
|
(synopsis "Implementation of a ratcheting forward secrecy protocol")
|
|
|
|
|
(description "libsignal-protocol-c is an implementation of a ratcheting
|
|
|
|
|
forward secrecy protocol that works in synchronous and asynchronous
|
|
|
|
|
messaging environments. It can be used with messaging software to provide
|
|
|
|
|
end-to-end encryption.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2014-03-06 06:07:07 +01:00
|
|
|
|
(define-public bitlbee
|
|
|
|
|
(package
|
|
|
|
|
(name "bitlbee")
|
2017-01-30 19:45:30 +01:00
|
|
|
|
(version "3.5.1")
|
2014-03-06 06:07:07 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-02-28 03:05:45 +01:00
|
|
|
|
(uri (string-append "https://get.bitlbee.org/src/bitlbee-"
|
2014-03-06 06:07:07 +01:00
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
2017-01-30 19:45:30 +01:00
|
|
|
|
(base32 "0sgsn0fv41rga46mih3fyv65cvfa6rvki8x92dn7bczbi7yxfdln"))))
|
2014-03-06 06:07:07 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)
|
|
|
|
|
("check" ,check)))
|
|
|
|
|
(inputs `(("glib" ,glib)
|
2014-07-07 07:19:17 +02:00
|
|
|
|
("libotr" ,libotr)
|
2014-03-06 06:07:07 +01:00
|
|
|
|
("gnutls" ,gnutls)
|
|
|
|
|
("python" ,python-2)
|
|
|
|
|
("perl" ,perl)))
|
|
|
|
|
(arguments
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'install 'install-etc
|
|
|
|
|
(lambda* (#:key (make-flags '()) #:allow-other-keys)
|
|
|
|
|
(zero? (apply system* "make" "install-etc" make-flags))))
|
2018-05-07 11:44:00 +02:00
|
|
|
|
(add-after 'install-etc 'install-lib
|
|
|
|
|
(lambda* (#:key (make-flags '()) #:allow-other-keys)
|
|
|
|
|
(zero? (apply system* "make" "install-dev" make-flags))))
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
(replace 'configure
|
|
|
|
|
;; bitlbee's configure script does not tolerate many of the
|
|
|
|
|
;; variable settings that Guix would pass to it.
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(zero? (system* "./configure"
|
|
|
|
|
(string-append "--prefix="
|
|
|
|
|
(assoc-ref outputs "out"))
|
|
|
|
|
"--otr=1")))))))
|
2014-03-06 06:07:07 +01:00
|
|
|
|
(synopsis "IRC to instant messaging gateway")
|
|
|
|
|
(description "BitlBee brings IM (instant messaging) to IRC clients, for
|
|
|
|
|
people who have an IRC client running all the time and don't want to run an
|
|
|
|
|
additional IM client. BitlBee currently supports XMPP/Jabber (including
|
|
|
|
|
Google Talk), MSN Messenger, Yahoo! Messenger, AIM and ICQ, and the Twitter
|
|
|
|
|
microblogging network (plus all other Twitter API compatible services like
|
|
|
|
|
identi.ca and status.net).")
|
|
|
|
|
(home-page "http://www.bitlbee.org/")
|
2016-08-23 13:07:17 +02:00
|
|
|
|
(license (list license:gpl2+ license:bsd-2))))
|
2014-03-06 06:07:07 +01:00
|
|
|
|
|
2018-05-07 11:47:04 +02:00
|
|
|
|
(define-public bitlbee-discord
|
|
|
|
|
(package
|
|
|
|
|
(name "bitlbee-discord")
|
|
|
|
|
(version "0.4.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri
|
|
|
|
|
(string-append "https://github.com/sm00th/bitlbee-discord/"
|
|
|
|
|
"archive/" version ".tar.gz"))
|
|
|
|
|
(file-name (git-file-name name version))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1bwqxlg6fwj3749y7w69n9jwsdzf5nl9xqiszbpv9k8x1422i1y1"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'autogen
|
|
|
|
|
(lambda _
|
|
|
|
|
(let ((sh (which "sh")))
|
|
|
|
|
(substitute* "autogen.sh" (("/bin/sh") sh))
|
|
|
|
|
(setenv "CONFIG_SHELL" sh)
|
|
|
|
|
(zero? (system* "./autogen.sh")))))
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(invoke "./configure"
|
|
|
|
|
(string-append "--with-plugindir="
|
|
|
|
|
(assoc-ref outputs "out")
|
|
|
|
|
"/lib/bitlbee/")))))))
|
|
|
|
|
(inputs `(("glib" ,glib)))
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)
|
|
|
|
|
("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("texinfo" ,texinfo)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("bitlbee" ,bitlbee) ;needs bitlbee headers
|
|
|
|
|
("bash" ,bash)))
|
|
|
|
|
(synopsis "Discord plugin for Bitlbee")
|
|
|
|
|
(description "Bitlbee-discord is a plugin for Bitlbee witch provides
|
|
|
|
|
access to servers running the Discord protocol.")
|
|
|
|
|
(home-page "https://github.com/sm00th/bitlbee-discord/")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2014-11-21 18:39:39 +01:00
|
|
|
|
(define-public hexchat
|
|
|
|
|
(package
|
|
|
|
|
(name "hexchat")
|
2018-10-10 23:57:29 +02:00
|
|
|
|
(version "2.14.2")
|
2014-11-21 18:39:39 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://dl.hexchat.net/hexchat/hexchat-"
|
|
|
|
|
version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-10-10 23:57:29 +02:00
|
|
|
|
"064nq151nzsljv97dmkifyl162d2738vbgvm1phx7yv04pjvk4kp"))))
|
2018-03-19 17:56:32 +01:00
|
|
|
|
(build-system meson-build-system)
|
|
|
|
|
(native-inputs `(("gettext" ,gettext-minimal)
|
|
|
|
|
("perl" ,perl)
|
2017-04-30 19:21:46 +02:00
|
|
|
|
("pkg-config" ,pkg-config)))
|
2014-11-21 18:39:39 +01:00
|
|
|
|
(inputs `(("dbus-glib" ,dbus-glib)
|
|
|
|
|
("dbus" ,dbus)
|
|
|
|
|
("enchant" ,enchant)
|
|
|
|
|
("glib:bin" ,glib "bin") ;need glib-genmarshal
|
|
|
|
|
("gtk" ,gtk+-2)
|
|
|
|
|
("libcanberra" ,libcanberra)
|
|
|
|
|
("libnotify" ,libnotify)
|
2018-03-19 17:56:32 +01:00
|
|
|
|
("libproxy" ,libproxy)
|
2014-11-21 18:39:39 +01:00
|
|
|
|
("openssl" ,openssl)
|
2016-09-15 00:38:27 +02:00
|
|
|
|
|
|
|
|
|
;; Bindings for add-on scripts.
|
|
|
|
|
("luajit" ,luajit)
|
|
|
|
|
("perl-xml-parser" ,perl-xml-parser)
|
|
|
|
|
("python-2" ,python-2)))
|
2017-04-30 19:21:46 +02:00
|
|
|
|
(arguments
|
2018-03-19 17:56:32 +01:00
|
|
|
|
`(#:phases
|
2017-04-30 19:21:46 +02:00
|
|
|
|
(modify-phases %standard-phases
|
2018-03-19 17:56:32 +01:00
|
|
|
|
(add-after 'unpack 'skip-desktop-database-updates
|
|
|
|
|
(lambda _
|
|
|
|
|
;; The build scripts update icon and desktop file databases when
|
|
|
|
|
;; DESTDIR is not set. We can't update these databases from
|
|
|
|
|
;; within the build chroot, but we also don't set DESTDIR. So, we
|
|
|
|
|
;; just skip this code.
|
|
|
|
|
(substitute* "meson_post_install.py"
|
|
|
|
|
(("if 'DESTDIR' not in os.environ:")
|
|
|
|
|
"if False:"))
|
2018-03-11 21:46:30 +01:00
|
|
|
|
#t)))))
|
2014-11-21 18:39:39 +01:00
|
|
|
|
(synopsis "Graphical IRC Client")
|
|
|
|
|
(description
|
2016-09-15 00:38:27 +02:00
|
|
|
|
"HexChat lets you connect to multiple IRC networks at once. The main
|
|
|
|
|
window shows the list of currently connected networks and their channels, the
|
|
|
|
|
current conversation and the list of users. It uses colors to differentiate
|
|
|
|
|
between users and to highlight messages. It checks spelling using available
|
2014-11-21 18:39:39 +01:00
|
|
|
|
dictionaries. HexChat can be extended with multiple addons.")
|
2018-10-10 23:58:03 +02:00
|
|
|
|
(home-page "https://hexchat.net/")
|
2016-08-23 13:07:17 +02:00
|
|
|
|
(license license:gpl2+)))
|
2014-11-21 18:39:39 +01:00
|
|
|
|
|
2015-01-31 22:03:25 +01:00
|
|
|
|
(define-public ngircd
|
|
|
|
|
(package
|
|
|
|
|
(name "ngircd")
|
2017-03-20 22:26:51 +01:00
|
|
|
|
(version "24")
|
2015-01-31 22:03:25 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2017-03-20 22:37:34 +01:00
|
|
|
|
(uri (string-append "https://arthur.barton.de/pub/ngircd/ngircd-"
|
2015-01-31 22:03:25 +01:00
|
|
|
|
version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-03-20 22:26:51 +01:00
|
|
|
|
"020h9d1awyxqr0l42x1fhs47q7cmm17fdxzjish8p2kq23ma0gqp"))
|
|
|
|
|
(patches (search-patches "ngircd-handle-zombies.patch"))))
|
2015-01-31 22:03:25 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
;; Needed for the test suite.
|
|
|
|
|
(native-inputs `(("procps" ,procps)
|
|
|
|
|
("expect" ,expect)
|
|
|
|
|
("inetutils" ,inetutils)))
|
2016-09-07 18:37:38 +02:00
|
|
|
|
;; XXX Add libident.
|
2015-01-31 22:03:25 +01:00
|
|
|
|
(inputs `(("zlib" ,zlib)
|
2016-09-07 18:37:38 +02:00
|
|
|
|
("libwrap" ,tcp-wrappers)
|
2015-01-31 22:03:25 +01:00
|
|
|
|
("gnutls" ,gnutls)
|
|
|
|
|
,@(if (string-suffix? "-linux"
|
|
|
|
|
(or (%current-target-system)
|
|
|
|
|
(%current-system)))
|
|
|
|
|
`(("linux-pam" ,linux-pam))
|
|
|
|
|
'())))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
2016-09-07 18:37:38 +02:00
|
|
|
|
'("--with-gnutls" "--with-iconv" "--enable-ipv6" "--with-tcp-wrappers"
|
2015-01-31 22:03:25 +01:00
|
|
|
|
,@(if (string-suffix? "-linux"
|
|
|
|
|
(or (%current-target-system)
|
|
|
|
|
(%current-system)))
|
|
|
|
|
'("--with-pam")
|
|
|
|
|
'()))
|
|
|
|
|
#:phases
|
2017-03-20 22:32:58 +01:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; Necessary for the test suite.
|
|
|
|
|
(add-after 'configure 'post-configure
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "src/ngircd/Makefile"
|
|
|
|
|
(("/bin/sh") (which "sh")))
|
|
|
|
|
;; The default getpid.sh does a sloppy grep over 'ps -ax' output,
|
|
|
|
|
;; which fails arbitrarily.
|
|
|
|
|
(with-output-to-file "src/testsuite/getpid.sh"
|
|
|
|
|
(lambda ()
|
|
|
|
|
(display
|
|
|
|
|
(string-append
|
|
|
|
|
"#!" (which "sh") "\n"
|
|
|
|
|
"ps -C \"$1\" -o pid=\n"))))
|
|
|
|
|
;; Our variant of getpid.sh does not match interpreter names
|
|
|
|
|
;; when the script's shebang is invoked directly as "./foo".
|
|
|
|
|
;; Patch cases where the test suite relies on this.
|
|
|
|
|
(substitute* "src/testsuite/start-server.sh"
|
|
|
|
|
;; It runs 'getpid.sh sh' to test if it works at all. Run it on
|
|
|
|
|
;; 'make' instead.
|
|
|
|
|
(("getpid.sh sh") "getpid.sh make")))))))
|
2017-03-20 22:37:34 +01:00
|
|
|
|
(home-page "https://ngircd.barton.de/")
|
2015-01-31 22:03:25 +01:00
|
|
|
|
(synopsis "Lightweight Internet Relay Chat server for small networks")
|
|
|
|
|
(description
|
2017-03-20 22:33:20 +01:00
|
|
|
|
"ngIRCd is a lightweight @dfn{Internet Relay Chat} (IRC) server for small
|
|
|
|
|
or private networks. It is easy to configure, can cope with dynamic IP
|
|
|
|
|
addresses, and supports IPv6, SSL-protected connections, as well as PAM for
|
|
|
|
|
authentication.")
|
2016-08-23 13:07:17 +02:00
|
|
|
|
(license license:gpl2+)))
|
2015-01-31 22:03:25 +01:00
|
|
|
|
|
2015-08-04 06:12:16 +02:00
|
|
|
|
(define-public pidgin
|
|
|
|
|
(package
|
|
|
|
|
(name "pidgin")
|
2017-03-10 07:44:08 +01:00
|
|
|
|
(version "2.12.0")
|
2015-08-04 06:12:16 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/pidgin/Pidgin/"
|
|
|
|
|
version "/" name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-03-10 07:44:08 +01:00
|
|
|
|
"1y5p2mq3bfw35b66jsafmbva0w5gg1k99y9z8fyp3jfksqv3agcc"))
|
2016-04-08 14:18:13 +02:00
|
|
|
|
(patches (search-patches "pidgin-add-search-path.patch"))))
|
2015-08-04 06:12:16 +02:00
|
|
|
|
(build-system glib-or-gtk-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
|
|
|
|
("check" ,check)
|
|
|
|
|
("intltool" ,intltool)
|
|
|
|
|
("gconf" ,gconf)
|
|
|
|
|
("python" ,python-2)
|
|
|
|
|
("doxygen" ,doxygen)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("gtk+" ,gtk+-2)
|
|
|
|
|
("libgcrypt" ,libgcrypt)
|
|
|
|
|
("gnutls" ,gnutls)
|
|
|
|
|
("cyrus-sasl" ,cyrus-sasl)
|
|
|
|
|
("dbus" ,dbus)
|
|
|
|
|
("dbus-glib" ,dbus-glib)
|
|
|
|
|
("python2-dbus" ,python2-dbus)
|
|
|
|
|
("libidn" ,libidn)
|
|
|
|
|
("libltdl" ,libltdl)
|
|
|
|
|
("libxml2" ,libxml2)
|
|
|
|
|
;; TODO: gstreamer: patches needed to support gstreamer-1.0 or later
|
|
|
|
|
;; TODO: farstream
|
|
|
|
|
;; TODO: meanwhile
|
|
|
|
|
;; TODO: network-manager
|
|
|
|
|
;; TODO: gtkspell
|
|
|
|
|
;; TODO: libxephyr
|
|
|
|
|
;; TODO: libgadu
|
|
|
|
|
("libxslt" ,libxslt)
|
|
|
|
|
("avahi" ,avahi)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("sqlite" ,sqlite)
|
|
|
|
|
("libice" ,libice)
|
|
|
|
|
("libsm" ,libsm)
|
|
|
|
|
("libxscrnsaver" ,libxscrnsaver)
|
|
|
|
|
("startup-notification" ,startup-notification)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
|
|
|
|
(list "--disable-gtkspell"
|
|
|
|
|
"--disable-tcl"
|
|
|
|
|
"--disable-meanwhile"
|
|
|
|
|
"--disable-nm" ; XXX remove when we have network-manager
|
|
|
|
|
"--disable-vv" ; XXX remove when we have farstream and gstreamer
|
|
|
|
|
"--disable-gstreamer" ; XXX patches needed to support gstreamer-1.0
|
|
|
|
|
"--enable-cyrus-sasl"
|
|
|
|
|
(string-append "--with-ncurses-headers="
|
|
|
|
|
(assoc-ref %build-inputs "ncurses")
|
|
|
|
|
"/include"))))
|
|
|
|
|
(native-search-paths
|
|
|
|
|
(list (search-path-specification
|
|
|
|
|
(variable "PURPLE_PLUGIN_PATH")
|
|
|
|
|
(files (list (string-append "lib/purple-"
|
2017-12-01 08:58:24 +01:00
|
|
|
|
(version-major version))
|
2015-08-04 06:12:16 +02:00
|
|
|
|
"lib/pidgin")))))
|
|
|
|
|
(home-page "http://www.pidgin.im/")
|
|
|
|
|
(synopsis "Graphical multi-protocol instant messaging client")
|
|
|
|
|
(description
|
|
|
|
|
"Pidgin is a modular instant messaging client that supports many popular
|
|
|
|
|
chat protocols.")
|
|
|
|
|
(license
|
|
|
|
|
(list
|
2016-08-23 13:07:17 +02:00
|
|
|
|
license:gpl2+ ; Most of the code
|
|
|
|
|
license:lgpl2.1 ; GG protocol plugin (libpurple/protocols/gg/lib)
|
|
|
|
|
license:lgpl2.0+ ; OSCAR protocol plugin (libpurple/protocols/oscar)
|
2015-08-04 06:12:16 +02:00
|
|
|
|
;; The following licenses cover the zephyr protocol plugin:
|
2016-08-23 13:07:17 +02:00
|
|
|
|
(license:non-copyleft
|
2015-08-04 06:12:16 +02:00
|
|
|
|
"file://libpurple/protocols/zephyr/mit-copyright.h"
|
|
|
|
|
"See libpurple/protocols/zephyr/mit-copyright.h in the distribution.")
|
2016-08-23 13:07:17 +02:00
|
|
|
|
(license:non-copyleft
|
2015-08-04 06:12:16 +02:00
|
|
|
|
"file://libpurple/protocols/zephyr/mit-sipb-copyright.h"
|
|
|
|
|
"See libpurple/protocols/zephyr/mit-sipb-copyright.h in the distribution.")))))
|
|
|
|
|
|
2015-08-04 18:04:09 +02:00
|
|
|
|
(define-public pidgin-otr
|
|
|
|
|
(package
|
|
|
|
|
(name "pidgin-otr")
|
2016-03-09 21:49:33 +01:00
|
|
|
|
(version "4.0.2")
|
2015-08-04 18:04:09 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://otr.cypherpunks.ca/"
|
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-03-09 21:49:33 +01:00
|
|
|
|
"1i5s9rrgbyss9rszq6c6y53hwqyw1k86s40cpsfx5ccl9bprxdgl"))))
|
2015-08-04 18:04:09 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
|
|
|
|
("intltool" ,intltool)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("pidgin" ,pidgin)
|
|
|
|
|
("libotr" ,libotr)
|
|
|
|
|
("libgpg-error" ,libgpg-error)
|
|
|
|
|
("libgcrypt" ,libgcrypt)
|
|
|
|
|
("glib" ,glib)
|
|
|
|
|
("gtk+" ,gtk+-2)))
|
|
|
|
|
(home-page "https://otr.cypherpunks.ca/")
|
|
|
|
|
(synopsis "Off-the-Record Messaging plugin for Pidgin")
|
|
|
|
|
(description
|
|
|
|
|
"Pidgin-OTR is a plugin that adds support for OTR to the Pidgin instant
|
|
|
|
|
messaging client. OTR (Off-the-Record) Messaging allows you to have private
|
|
|
|
|
conversations over instant messaging by providing: (1) Encryption: No one else
|
|
|
|
|
can read your instant messages. (2) Authentication: You are assured the
|
|
|
|
|
correspondent is who you think it is. (3) Deniability: The messages you send
|
|
|
|
|
do not have digital signatures that are checkable by a third party. Anyone
|
|
|
|
|
can forge messages after a conversation to make them look like they came from
|
|
|
|
|
you. However, during a conversation, your correspondent is assured the
|
|
|
|
|
messages he sees are authentic and unmodified. (4) Perfect forward secrecy:
|
|
|
|
|
If you lose control of your private keys, no previous conversation is
|
|
|
|
|
compromised.")
|
2016-08-23 13:07:17 +02:00
|
|
|
|
(license license:gpl2)))
|
2015-08-04 18:04:09 +02:00
|
|
|
|
|
2015-08-13 23:29:35 +02:00
|
|
|
|
(define-public znc
|
|
|
|
|
(package
|
|
|
|
|
(name "znc")
|
2018-07-18 19:30:33 +02:00
|
|
|
|
(version "1.7.1")
|
2015-08-13 23:29:35 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2015-12-26 08:32:32 +01:00
|
|
|
|
(uri (string-append "http://znc.in/releases/archive/znc-"
|
2015-08-13 23:29:35 +02:00
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-07-18 19:30:33 +02:00
|
|
|
|
"1i1r1lh9q2mr1bg520zrvrlwhrhy6wibrin78wjxq1gab1qymks4"))))
|
2018-05-02 21:27:51 +02:00
|
|
|
|
;; TODO: autotools support has been deprecated, and new features like i18n
|
|
|
|
|
;; are only supported when building with cmake.
|
2015-08-13 23:29:35 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
2017-03-17 02:05:00 +01:00
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'unpack-googletest
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
2018-05-02 21:27:51 +02:00
|
|
|
|
(mkdir-p "googletest")
|
|
|
|
|
(copy-recursively (assoc-ref inputs "googletest-source")
|
|
|
|
|
"googletest")
|
2018-05-02 15:19:11 +02:00
|
|
|
|
#t)))
|
2015-08-13 23:29:35 +02:00
|
|
|
|
#:configure-flags '("--enable-python"
|
|
|
|
|
"--enable-perl"
|
2017-03-17 02:05:00 +01:00
|
|
|
|
"--enable-cyrus"
|
2018-05-02 21:27:51 +02:00
|
|
|
|
"--with-gmock=googletest/googlemock"
|
|
|
|
|
"--with-gtest=googletest/googletest")
|
2017-03-17 02:05:00 +01:00
|
|
|
|
#:test-target "test"))
|
2015-08-13 23:29:35 +02:00
|
|
|
|
(native-inputs
|
2018-05-02 21:27:51 +02:00
|
|
|
|
`(("googletest-source"
|
|
|
|
|
;; ZNC 1.7 needs a newer, unreleased googletest (a release is planned
|
|
|
|
|
;; <https://github.com/google/googletest/issues/1583>, so don't update
|
|
|
|
|
;; the public GOOGLETEST to an unstable version). The commit is taken
|
|
|
|
|
;; from ‘third_party/googletest’ in the ZNC git repository.
|
|
|
|
|
,(let ((commit "9737e63c69e94ac5777caa0bc77c77d5206467f3"))
|
|
|
|
|
(origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/google/googletest")
|
|
|
|
|
(commit commit)))
|
|
|
|
|
(file-name (git-file-name "googletest-for-znc" commit))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0ya36n8d62zbxk6p22yffgx43mqhx2fz41gqqwbpdshjryf3wvxj")))))
|
2017-03-17 02:05:00 +01:00
|
|
|
|
("pkg-config" ,pkg-config)
|
2015-08-13 23:29:35 +02:00
|
|
|
|
("perl" ,perl)
|
|
|
|
|
("python" ,python)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("openssl" ,openssl)
|
|
|
|
|
("zlib" ,zlib)
|
|
|
|
|
("icu4c" ,icu4c)
|
|
|
|
|
("cyrus-sasl" ,cyrus-sasl)))
|
2018-01-26 03:38:39 +01:00
|
|
|
|
(home-page "https://znc.in")
|
2015-08-13 23:29:35 +02:00
|
|
|
|
(synopsis "IRC network bouncer")
|
2018-05-02 21:29:08 +02:00
|
|
|
|
(description "ZNC is an @dfn{IRC network bouncer} or @dfn{BNC}. It can
|
|
|
|
|
detach the client from the actual IRC server, and also from selected channels.
|
|
|
|
|
Multiple clients from different locations can connect to a single ZNC account
|
2015-08-13 23:29:35 +02:00
|
|
|
|
simultaneously and therefore appear under the same nickname on IRC.")
|
2016-08-23 13:07:17 +02:00
|
|
|
|
(license license:asl2.0)))
|
2015-08-13 23:29:35 +02:00
|
|
|
|
|
2015-09-23 21:29:06 +02:00
|
|
|
|
(define-public python-nbxmpp
|
|
|
|
|
(package
|
|
|
|
|
(name "python-nbxmpp")
|
2018-08-31 10:24:21 +02:00
|
|
|
|
(version "0.6.7")
|
2015-09-23 21:29:06 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
2017-04-20 00:18:31 +02:00
|
|
|
|
(uri (pypi-uri "nbxmpp" version))
|
2015-09-23 21:29:06 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-08-31 10:24:21 +02:00
|
|
|
|
"0fas4iawjfdmkz8vr042wpq6b2qispi6fy35g4a62jw50jb1saav"))))
|
2015-09-23 21:29:06 +02:00
|
|
|
|
(build-system python-build-system)
|
2017-04-20 00:18:31 +02:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f)) ; no tests
|
|
|
|
|
(home-page "https://dev.gajim.org/gajim/python-nbxmpp")
|
2015-09-23 21:29:06 +02:00
|
|
|
|
(synopsis "Non-blocking Jabber/XMPP module")
|
|
|
|
|
(description
|
|
|
|
|
"The goal of this python library is to provide a way for Python
|
|
|
|
|
applications to use Jabber/XMPP networks in a non-blocking way. This library
|
2017-04-20 00:18:31 +02:00
|
|
|
|
was initially a fork of xmpppy, but uses non-blocking sockets.")
|
2016-08-23 13:07:17 +02:00
|
|
|
|
(license license:gpl3+)))
|
2015-09-23 21:29:06 +02:00
|
|
|
|
|
|
|
|
|
(define-public python2-nbxmpp
|
|
|
|
|
(package-with-python2 python-nbxmpp))
|
|
|
|
|
|
2015-09-23 21:50:27 +02:00
|
|
|
|
(define-public gajim
|
|
|
|
|
(package
|
|
|
|
|
(name "gajim")
|
2018-05-28 16:38:20 +02:00
|
|
|
|
(version "1.0.3")
|
2015-09-23 21:50:27 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://gajim.org/downloads/"
|
|
|
|
|
(version-major+minor version)
|
|
|
|
|
"/gajim-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-05-28 16:38:20 +02:00
|
|
|
|
"0ds4rqwfrpj89a489w6yih8gx5zi7qa4ffgld950fk7s0qxvcfnb"))))
|
gnu: gajim: Update to 1.0.1.
* gnu/packages/messaging.scm (gajim): Update to 1.0.1.
[build-system]: Change to PYTHON-BUILD-SYSTEM.
[arguments]: Remove the PYTHONPATH wrapper. Don't override "APP". Add a
GI_TYPELIB_PATH wrapper. Add 'remove-test-resolver, 'start-xserver and
'install-icons phases.
[native-inputs]: Add XORG-SERVER.
[inputs]: Remove PYTHON2-AXOLOTL, PYTHON2-NBXMPP, PYTHON2-PYOPENSSL,
PYTHON2-GNUPG, PYTHON2-PYGTK, PYTHON-2. Add ADWAITA-ICON-THEME,
GNOME-KEYRING, GTK+, GTKSPELL3, HICOLOR-ICON-THEME, LIBSECRET, PYTHON-AXOLOTL,
PYTHON-DBUS, PYTHON-DOCUTILS, PYTHON-GNUPG, PYTHON-NBXMPP, PYTHON-PILLOW,
PYTHON-PYASN1, PYTHON-PYCAIRO, PYTHON-PYGOBJECT, PYTHON-PYOPENSSL,
PYTHON-QRCODE.
2018-04-14 20:08:53 +02:00
|
|
|
|
(build-system python-build-system)
|
2015-09-23 21:50:27 +02:00
|
|
|
|
(arguments
|
2016-10-20 13:02:37 +02:00
|
|
|
|
`(#:phases
|
2015-09-23 21:50:27 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'install 'wrap-program
|
2016-10-20 13:02:37 +02:00
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
gnu: gajim: Update to 1.0.1.
* gnu/packages/messaging.scm (gajim): Update to 1.0.1.
[build-system]: Change to PYTHON-BUILD-SYSTEM.
[arguments]: Remove the PYTHONPATH wrapper. Don't override "APP". Add a
GI_TYPELIB_PATH wrapper. Add 'remove-test-resolver, 'start-xserver and
'install-icons phases.
[native-inputs]: Add XORG-SERVER.
[inputs]: Remove PYTHON2-AXOLOTL, PYTHON2-NBXMPP, PYTHON2-PYOPENSSL,
PYTHON2-GNUPG, PYTHON2-PYGTK, PYTHON-2. Add ADWAITA-ICON-THEME,
GNOME-KEYRING, GTK+, GTKSPELL3, HICOLOR-ICON-THEME, LIBSECRET, PYTHON-AXOLOTL,
PYTHON-DBUS, PYTHON-DOCUTILS, PYTHON-GNUPG, PYTHON-NBXMPP, PYTHON-PILLOW,
PYTHON-PYASN1, PYTHON-PYCAIRO, PYTHON-PYGOBJECT, PYTHON-PYOPENSSL,
PYTHON-QRCODE.
2018-04-14 20:08:53 +02:00
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(for-each
|
|
|
|
|
(lambda (name)
|
|
|
|
|
(let ((file (string-append out "/bin/" name))
|
|
|
|
|
(gi-typelib-path (getenv "GI_TYPELIB_PATH")))
|
|
|
|
|
(wrap-program file
|
|
|
|
|
`("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path)))))
|
|
|
|
|
'("gajim" "gajim-remote" "gajim-history-manager")))
|
|
|
|
|
#t))
|
|
|
|
|
(add-before 'check 'remove-test-resolver
|
|
|
|
|
;; This test requires network access.
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "test/runtests.py"
|
|
|
|
|
(("'integration.test_resolver',") ""))
|
|
|
|
|
#t))
|
|
|
|
|
(add-before 'check 'start-xserver
|
|
|
|
|
;; Tests require a running X server.
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(let ((xorg-server (assoc-ref inputs "xorg-server"))
|
|
|
|
|
(display ":1"))
|
|
|
|
|
(setenv "DISPLAY" display)
|
|
|
|
|
(zero? (system (string-append xorg-server "/bin/Xvfb "
|
|
|
|
|
display " &"))))))
|
|
|
|
|
(add-after 'install 'install-icons
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(adwaita (string-append
|
|
|
|
|
(assoc-ref inputs "adwaita-icon-theme")
|
|
|
|
|
"/share/icons/Adwaita"))
|
|
|
|
|
(hicolor (string-append
|
|
|
|
|
(assoc-ref inputs "hicolor-icon-theme")
|
|
|
|
|
"/share/icons/hicolor"))
|
|
|
|
|
(icons (string-append
|
|
|
|
|
out "/lib/python"
|
|
|
|
|
,(version-major+minor (package-version python))
|
|
|
|
|
"/site-packages/gajim/data/icons")))
|
|
|
|
|
(with-directory-excursion icons
|
|
|
|
|
(symlink adwaita "Adwaita")
|
|
|
|
|
(copy-recursively hicolor "hicolor")))
|
2018-05-10 14:41:26 +02:00
|
|
|
|
#t))
|
|
|
|
|
(add-after 'install-icons 'wrap-program
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(wrap-program (string-append (assoc-ref outputs "out")
|
|
|
|
|
"/bin/gajim")
|
|
|
|
|
;; For GtkFileChooserDialog.
|
|
|
|
|
`("GSETTINGS_SCHEMA_DIR" =
|
|
|
|
|
(,(string-append (assoc-ref inputs "gtk+")
|
|
|
|
|
"/share/glib-2.0/schemas")))))))))
|
2015-09-23 21:50:27 +02:00
|
|
|
|
(native-inputs
|
gnu: gajim: Update to 1.0.1.
* gnu/packages/messaging.scm (gajim): Update to 1.0.1.
[build-system]: Change to PYTHON-BUILD-SYSTEM.
[arguments]: Remove the PYTHONPATH wrapper. Don't override "APP". Add a
GI_TYPELIB_PATH wrapper. Add 'remove-test-resolver, 'start-xserver and
'install-icons phases.
[native-inputs]: Add XORG-SERVER.
[inputs]: Remove PYTHON2-AXOLOTL, PYTHON2-NBXMPP, PYTHON2-PYOPENSSL,
PYTHON2-GNUPG, PYTHON2-PYGTK, PYTHON-2. Add ADWAITA-ICON-THEME,
GNOME-KEYRING, GTK+, GTKSPELL3, HICOLOR-ICON-THEME, LIBSECRET, PYTHON-AXOLOTL,
PYTHON-DBUS, PYTHON-DOCUTILS, PYTHON-GNUPG, PYTHON-NBXMPP, PYTHON-PILLOW,
PYTHON-PYASN1, PYTHON-PYCAIRO, PYTHON-PYGOBJECT, PYTHON-PYOPENSSL,
PYTHON-QRCODE.
2018-04-14 20:08:53 +02:00
|
|
|
|
`(("intltool" ,intltool)
|
|
|
|
|
("xorg-server" ,xorg-server)))
|
2017-02-13 22:13:03 +01:00
|
|
|
|
(inputs
|
gnu: gajim: Update to 1.0.1.
* gnu/packages/messaging.scm (gajim): Update to 1.0.1.
[build-system]: Change to PYTHON-BUILD-SYSTEM.
[arguments]: Remove the PYTHONPATH wrapper. Don't override "APP". Add a
GI_TYPELIB_PATH wrapper. Add 'remove-test-resolver, 'start-xserver and
'install-icons phases.
[native-inputs]: Add XORG-SERVER.
[inputs]: Remove PYTHON2-AXOLOTL, PYTHON2-NBXMPP, PYTHON2-PYOPENSSL,
PYTHON2-GNUPG, PYTHON2-PYGTK, PYTHON-2. Add ADWAITA-ICON-THEME,
GNOME-KEYRING, GTK+, GTKSPELL3, HICOLOR-ICON-THEME, LIBSECRET, PYTHON-AXOLOTL,
PYTHON-DBUS, PYTHON-DOCUTILS, PYTHON-GNUPG, PYTHON-NBXMPP, PYTHON-PILLOW,
PYTHON-PYASN1, PYTHON-PYCAIRO, PYTHON-PYGOBJECT, PYTHON-PYOPENSSL,
PYTHON-QRCODE.
2018-04-14 20:08:53 +02:00
|
|
|
|
`(("adwaita-icon-theme" ,adwaita-icon-theme)
|
|
|
|
|
("gnome-keyring" ,gnome-keyring)
|
|
|
|
|
("gtk+" ,gtk+)
|
|
|
|
|
("gtkspell3" ,gtkspell3)
|
|
|
|
|
("hicolor-icon-theme" ,hicolor-icon-theme)
|
|
|
|
|
("libsecret" ,libsecret)
|
|
|
|
|
("python-axolotl" ,python-axolotl)
|
|
|
|
|
("python-dbus" ,python-dbus)
|
|
|
|
|
("python-docutils" ,python-docutils)
|
|
|
|
|
("python-gnupg" ,python-gnupg)
|
|
|
|
|
("python-nbxmpp" ,python-nbxmpp)
|
|
|
|
|
("python-pillow" ,python-pillow)
|
|
|
|
|
("python-pyasn1" ,python-pyasn1)
|
|
|
|
|
("python-pycairo" ,python-pycairo)
|
|
|
|
|
("python-pygobject" ,python-pygobject)
|
|
|
|
|
("python-pyopenssl" ,python-pyopenssl)
|
|
|
|
|
("python-qrcode" ,python-qrcode)))
|
2015-09-23 21:50:27 +02:00
|
|
|
|
(home-page "https://gajim.org/")
|
|
|
|
|
(synopsis "Jabber (XMPP) client")
|
|
|
|
|
(description "Gajim is a feature-rich and easy to use Jabber/XMPP client.
|
|
|
|
|
Among its features are: a tabbed chat window and single window modes; support
|
|
|
|
|
for group chat (with Multi-User Chat protocol), invitation, chat to group chat
|
|
|
|
|
transformation; audio and video conferences; file transfer; TLS, GPG and
|
|
|
|
|
end-to-end encryption support; XML console.")
|
2016-10-19 06:50:04 +02:00
|
|
|
|
(license license:gpl3)))
|
2015-09-23 21:50:27 +02:00
|
|
|
|
|
2017-09-26 12:07:26 +02:00
|
|
|
|
(define-public dino
|
|
|
|
|
;; The only release tarball is for version 0.0, but it is very old and fails
|
|
|
|
|
;; to build.
|
2017-12-18 18:30:12 +01:00
|
|
|
|
(let ((commit "f25fadde2d6c9492b9cafe2cddbcc7b966942e47")
|
|
|
|
|
(revision "3"))
|
2017-09-26 12:07:26 +02:00
|
|
|
|
(package
|
|
|
|
|
(name "dino")
|
|
|
|
|
(version (string-append "0.0-" revision "." (string-take commit 9)))
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/dino/dino.git")
|
2017-11-17 23:26:03 +01:00
|
|
|
|
(commit commit)))
|
2017-09-26 12:07:26 +02:00
|
|
|
|
(file-name (string-append name "-" version "-checkout"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-12-18 18:30:12 +01:00
|
|
|
|
"1nhzrw3pbpybn9qclckk6z427vbgnqd0y1l63zd1rfw4zw099mzs"))))
|
2017-09-26 12:07:26 +02:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; there are no tests
|
|
|
|
|
#:parallel-build? #f ; not supported
|
2017-11-08 11:18:38 +01:00
|
|
|
|
; Use our libsignal-protocol-c instead of the git submodule.
|
|
|
|
|
#:configure-flags '("-DSHARED_SIGNAL_PROTOCOL=yes")
|
2017-09-26 12:07:26 +02:00
|
|
|
|
#:modules ((guix build cmake-build-system)
|
|
|
|
|
((guix build glib-or-gtk-build-system) #:prefix glib-or-gtk:)
|
|
|
|
|
(guix build utils))
|
|
|
|
|
#:imported-modules (,@%gnu-build-system-modules
|
|
|
|
|
(guix build cmake-build-system)
|
|
|
|
|
(guix build glib-or-gtk-build-system))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
2017-11-17 23:26:03 +01:00
|
|
|
|
;; The signal-protocol plugin accesses internal headers of
|
|
|
|
|
;; libsignal-protocol-c, so we need to put the sources there.
|
|
|
|
|
(add-after 'unpack 'unpack-sources
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(let ((unpack (lambda (source target)
|
|
|
|
|
(with-directory-excursion target
|
|
|
|
|
(zero? (system* "tar" "xvf"
|
|
|
|
|
(assoc-ref inputs source)
|
|
|
|
|
"--strip-components=1"))))))
|
|
|
|
|
(unpack "libsignal-protocol-c-source"
|
|
|
|
|
"plugins/signal-protocol/libsignal-protocol-c")
|
|
|
|
|
#t)))
|
2017-09-26 12:07:26 +02:00
|
|
|
|
(add-after 'install 'glib-or-gtk-wrap
|
|
|
|
|
(assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-wrap)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libgee" ,libgee)
|
2018-03-16 16:50:14 +01:00
|
|
|
|
("libsignal-protocol-c" ,libsignal-protocol-c)
|
|
|
|
|
("libgcrypt" ,libgcrypt)
|
2017-09-26 12:07:26 +02:00
|
|
|
|
("libsoup" ,libsoup)
|
|
|
|
|
("sqlite" ,sqlite)
|
|
|
|
|
("gpgme" ,gpgme)
|
|
|
|
|
("gtk+" ,gtk+)
|
|
|
|
|
("glib-networking" ,glib-networking)
|
|
|
|
|
("gsettings-desktop-schemas" ,gsettings-desktop-schemas)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
2018-03-16 16:50:14 +01:00
|
|
|
|
("libsignal-protocol-c-source" ,(package-source libsignal-protocol-c))
|
2017-09-26 12:07:26 +02:00
|
|
|
|
("glib" ,glib "bin")
|
|
|
|
|
("vala" ,vala)
|
|
|
|
|
("gettext" ,gettext-minimal)))
|
|
|
|
|
(home-page "https://dino.im")
|
|
|
|
|
(synopsis "Graphical Jabber (XMPP) client")
|
|
|
|
|
(description "Dino is a Jabber (XMPP) client which aims to fit well into
|
|
|
|
|
a graphical desktop environment like GNOME.")
|
|
|
|
|
(license license:gpl3+))))
|
|
|
|
|
|
2016-08-22 21:35:26 +02:00
|
|
|
|
(define-public prosody
|
|
|
|
|
(package
|
|
|
|
|
(name "prosody")
|
2018-05-31 23:56:38 +02:00
|
|
|
|
(version "0.10.2")
|
2016-08-22 21:35:26 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://prosody.im/downloads/source/"
|
|
|
|
|
"prosody-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-05-31 23:56:38 +02:00
|
|
|
|
"13knr7izscw0zx648b9582dx11aap4cq9bzfiqh5ykd7wwsz1dbm"))))
|
2016-08-22 21:35:26 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
2016-09-16 01:44:24 +02:00
|
|
|
|
#:configure-flags (list "--no-example-certs")
|
2016-08-22 21:35:26 +02:00
|
|
|
|
#:modules ((ice-9 match)
|
|
|
|
|
(srfi srfi-1)
|
|
|
|
|
(guix build gnu-build-system)
|
|
|
|
|
(guix build utils))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'fix-configure-script
|
|
|
|
|
(lambda _
|
|
|
|
|
;; The configure script aborts when it encounters unexpected
|
|
|
|
|
;; arguments. Make it more tolerant.
|
|
|
|
|
(substitute* "configure"
|
|
|
|
|
(("exit 1") ""))
|
|
|
|
|
#t))
|
2017-01-08 20:08:16 +01:00
|
|
|
|
(add-after 'unpack 'fix-makefile
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
;; prosodyctl needs to read the configuration file.
|
|
|
|
|
(("^INSTALLEDCONFIG =.*") "INSTALLEDCONFIG = /etc/prosody\n")
|
|
|
|
|
;; prosodyctl needs a place to put auto-generated certificates.
|
|
|
|
|
(("^INSTALLEDDATA =.*") "INSTALLEDDATA = /var/lib/prosody\n"))
|
|
|
|
|
#t))
|
2016-08-22 21:35:26 +02:00
|
|
|
|
(add-after 'install 'wrap-programs
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
;; Make sure all executables in "bin" find the required Lua
|
|
|
|
|
;; modules at runtime.
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin/"))
|
|
|
|
|
(deps (delete #f (map (match-lambda
|
|
|
|
|
((label . directory)
|
|
|
|
|
(if (string-prefix? "lua" label)
|
|
|
|
|
directory #f)))
|
|
|
|
|
inputs)))
|
2017-01-08 20:08:15 +01:00
|
|
|
|
(lua-path (string-join
|
|
|
|
|
(map (lambda (path)
|
|
|
|
|
(string-append
|
|
|
|
|
path "/share/lua/5.1/?.lua;"
|
|
|
|
|
path "/share/lua/5.1/?/?.lua"))
|
|
|
|
|
(cons out deps))
|
|
|
|
|
";"))
|
|
|
|
|
(lua-cpath (string-join
|
|
|
|
|
(map (lambda (path)
|
|
|
|
|
(string-append
|
|
|
|
|
path "/lib/lua/5.1/?.so;"
|
|
|
|
|
path "/lib/lua/5.1/?/?.so"))
|
|
|
|
|
(cons out deps))
|
|
|
|
|
";"))
|
|
|
|
|
(openssl (assoc-ref inputs "openssl"))
|
|
|
|
|
(coreutils (assoc-ref inputs "coreutils"))
|
|
|
|
|
(path (map (lambda (dir)
|
|
|
|
|
(string-append dir "/bin"))
|
|
|
|
|
(list openssl coreutils))))
|
2016-08-22 21:35:26 +02:00
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(wrap-program file
|
2017-01-08 20:08:15 +01:00
|
|
|
|
`("LUA_PATH" ";" = (,lua-path))
|
|
|
|
|
`("LUA_CPATH" ";" = (,lua-cpath))
|
|
|
|
|
`("PATH" ":" prefix ,path)))
|
2016-08-22 21:35:26 +02:00
|
|
|
|
(find-files bin ".*"))
|
|
|
|
|
#t))))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libidn" ,libidn)
|
|
|
|
|
("openssl" ,openssl)
|
2017-11-09 14:02:29 +01:00
|
|
|
|
;; Lua 5.1 is still recommended for production usage.
|
|
|
|
|
;; See https://prosody.im/doc/packagers.
|
2016-08-22 21:35:26 +02:00
|
|
|
|
("lua" ,lua-5.1)
|
2017-11-24 17:20:15 +01:00
|
|
|
|
("lua5.1-bitop" ,lua5.1-bitop)
|
2016-08-22 21:35:26 +02:00
|
|
|
|
("lua5.1-expat" ,lua5.1-expat)
|
|
|
|
|
("lua5.1-socket" ,lua5.1-socket)
|
|
|
|
|
("lua5.1-filesystem" ,lua5.1-filesystem)
|
2017-02-22 20:51:59 +01:00
|
|
|
|
("lua5.1-sec" ,lua5.1-sec)))
|
2016-08-22 21:35:26 +02:00
|
|
|
|
(home-page "https://prosody.im/")
|
|
|
|
|
(synopsis "Jabber (XMPP) server")
|
|
|
|
|
(description "Prosody is a modern XMPP communication server. It aims to
|
|
|
|
|
be easy to set up and configure, and efficient with system resources.
|
|
|
|
|
Additionally, for developers it aims to be easy to extend and give a flexible
|
|
|
|
|
system on which to rapidly develop added functionality, or prototype new
|
|
|
|
|
protocols.")
|
2016-08-23 13:07:17 +02:00
|
|
|
|
(license license:x11)))
|
2016-08-22 21:35:26 +02:00
|
|
|
|
|
2016-08-21 00:14:17 +02:00
|
|
|
|
(define-public libtoxcore
|
|
|
|
|
(let ((revision "1")
|
|
|
|
|
(commit "755f084e8720b349026c85afbad58954cb7ff1d4"))
|
|
|
|
|
(package
|
|
|
|
|
(name "libtoxcore")
|
|
|
|
|
(version (string-append "0.0.0" "-"
|
|
|
|
|
revision "."(string-take commit 7)))
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/irungentoo/toxcore.git")
|
|
|
|
|
(commit commit)))
|
|
|
|
|
(file-name (string-append name "-" version "-checkout"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0ap1gvlyihnfivv235dbrgsxsiiz70bhlmlr5gn1027w3h5kqz8w"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
;; TODO: Add when test suite is capable of passing.
|
|
|
|
|
;; ("check" ,check)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libsodium" ,libsodium)
|
|
|
|
|
("opus" ,opus)
|
|
|
|
|
("libvpx" ,libvpx)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'autoconf
|
|
|
|
|
(lambda _
|
|
|
|
|
(zero? (system* "autoreconf" "-vfi")))))
|
|
|
|
|
#:tests? #f)) ; FIXME: Testsuite fails, reasons unspecific.
|
|
|
|
|
(synopsis "Library for the Tox encrypted messenger protocol")
|
|
|
|
|
(description
|
|
|
|
|
"C library implementation of the Tox encrypted messenger protocol.")
|
2016-08-23 13:07:17 +02:00
|
|
|
|
(license license:gpl3+)
|
2016-08-21 00:14:17 +02:00
|
|
|
|
(home-page "https://tox.chat"))))
|
|
|
|
|
|
2016-12-18 21:10:15 +01:00
|
|
|
|
;; Some tox clients move to c-toxcore, which seems to be where all the
|
|
|
|
|
;; recent development happens. It is run by the same developers as toxcore,
|
|
|
|
|
;; forked into a group namespace.
|
|
|
|
|
(define-public c-toxcore
|
|
|
|
|
(package
|
|
|
|
|
(name "c-toxcore")
|
2018-10-08 08:23:10 +02:00
|
|
|
|
(version "0.2.8")
|
2016-12-18 21:10:15 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/TokTok/c-toxcore/archive/v"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-10-08 08:23:10 +02:00
|
|
|
|
"0qlkimlvbd24nlj7w9b5rpz1r807magqxmfylc1mlxsqhmfi5zj7"))))
|
2018-04-24 10:03:05 +02:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f)) ; FIXME: Testsuite seems to stay stuck on test 3. Disable
|
|
|
|
|
; for now.
|
2017-07-18 09:37:25 +02:00
|
|
|
|
(build-system cmake-build-system)
|
2016-12-18 21:10:15 +01:00
|
|
|
|
(native-inputs
|
2017-07-18 09:37:25 +02:00
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(propagated-inputs
|
2016-12-18 21:10:15 +01:00
|
|
|
|
`(("libsodium" ,libsodium)
|
|
|
|
|
("opus" ,opus)
|
|
|
|
|
("libvpx" ,libvpx)))
|
2017-07-18 09:37:25 +02:00
|
|
|
|
(home-page "https://tox.chat")
|
2016-12-18 21:10:15 +01:00
|
|
|
|
(synopsis "Library for the Tox encrypted messenger protocol")
|
|
|
|
|
(description
|
2017-07-18 09:37:25 +02:00
|
|
|
|
"Official fork of the C library implementation of the Tox encrypted
|
|
|
|
|
messenger protocol.")
|
|
|
|
|
(license license:gpl3+)))
|
2016-12-18 21:10:15 +01:00
|
|
|
|
|
2016-09-09 03:02:31 +02:00
|
|
|
|
(define-public utox
|
|
|
|
|
(package
|
|
|
|
|
(name "utox")
|
2018-04-24 10:05:06 +02:00
|
|
|
|
(version "0.17.0")
|
2016-09-09 03:02:31 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
2018-04-24 10:05:06 +02:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/uTox/uTox.git")
|
|
|
|
|
(commit "v0.17.0")
|
|
|
|
|
(recursive? #t))) ;; Needed for 'minini' git submodule.
|
|
|
|
|
(file-name (string-append name "-" version "-checkout"))
|
2016-09-09 03:02:31 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-04-24 10:05:06 +02:00
|
|
|
|
"12wbq883il7ikldayh8hm0cjfrkp45vn05xx9s1jbfz6gmkidyar"))))
|
2016-12-18 21:10:16 +01:00
|
|
|
|
(build-system cmake-build-system)
|
2016-09-09 03:02:31 +02:00
|
|
|
|
(arguments
|
2018-04-24 10:05:06 +02:00
|
|
|
|
`(#:configure-flags '("-DENABLE_TESTS=on")
|
|
|
|
|
#:phases
|
2016-09-09 03:02:31 +02:00
|
|
|
|
(modify-phases %standard-phases
|
2017-11-22 14:01:15 +01:00
|
|
|
|
(add-before 'build 'patch-absolute-filename-libgtk-3
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
2018-04-24 10:05:06 +02:00
|
|
|
|
(substitute* "../source/src/xlib/gtk.c"
|
2017-11-22 14:01:15 +01:00
|
|
|
|
(("libgtk-3.so")
|
|
|
|
|
(string-append (assoc-ref inputs "gtk+")
|
|
|
|
|
"/lib/libgtk-3.so")))))
|
|
|
|
|
(add-after 'install 'wrap-program
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(wrap-program (string-append (assoc-ref outputs "out")
|
|
|
|
|
"/bin/utox")
|
|
|
|
|
;; For GtkFileChooserDialog.
|
|
|
|
|
`("GSETTINGS_SCHEMA_DIR" =
|
|
|
|
|
(,(string-append (assoc-ref inputs "gtk+")
|
|
|
|
|
"/share/glib-2.0/schemas")))))))))
|
2016-09-09 03:02:31 +02:00
|
|
|
|
(inputs
|
|
|
|
|
`(("dbus" ,dbus)
|
|
|
|
|
("filteraudio" ,filteraudio)
|
|
|
|
|
("fontconfig" ,fontconfig)
|
|
|
|
|
("freetype" ,freetype)
|
|
|
|
|
("libsodium" ,libsodium)
|
2016-12-18 21:10:16 +01:00
|
|
|
|
("c-toxcore" ,c-toxcore)
|
2017-11-22 14:01:15 +01:00
|
|
|
|
("gtk+" ,gtk+)
|
2016-09-09 03:02:31 +02:00
|
|
|
|
("libvpx" ,libvpx)
|
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("libxext" ,libxext)
|
|
|
|
|
("libxrender" ,libxrender)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("v4l-utils" ,v4l-utils)))
|
2017-11-25 16:46:52 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("check" ,check)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
2016-09-09 03:02:31 +02:00
|
|
|
|
(synopsis "Lightweight Tox client")
|
2016-12-18 21:10:17 +01:00
|
|
|
|
(description
|
|
|
|
|
"Utox is a lightweight Tox client. Tox is a distributed and secure
|
2016-09-09 03:02:31 +02:00
|
|
|
|
instant messenger with audio and video chat capabilities.")
|
|
|
|
|
(home-page "http://utox.org/")
|
2016-08-23 13:07:17 +02:00
|
|
|
|
(license license:gpl3)))
|
2016-12-18 21:10:16 +01:00
|
|
|
|
|
2016-09-22 05:58:29 +02:00
|
|
|
|
(define-public qtox
|
|
|
|
|
(package
|
|
|
|
|
(name "qtox")
|
2018-07-23 11:04:12 +02:00
|
|
|
|
(version "1.16.3")
|
2017-05-25 08:46:08 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/qTox/qTox/archive/v"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-07-23 11:04:12 +02:00
|
|
|
|
"10n3cgw9xaqin9la8wpd8v83bkjmimicgbyp5ninsdgsrgky4hmq"))
|
2017-05-25 08:46:08 +02:00
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'fix-reproducibility-issues
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "src/main.cpp"
|
|
|
|
|
(("__DATE__") "\"\"")
|
|
|
|
|
(("__TIME__") "\"\"")
|
|
|
|
|
(("TIMESTAMP") "\"\""))
|
2018-03-15 02:19:51 +01:00
|
|
|
|
#t))
|
|
|
|
|
;; Ensure that icons are found at runtime.
|
|
|
|
|
(add-after 'install 'wrap-executable
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(wrap-program (string-append out "/bin/qtox")
|
|
|
|
|
`("QT_PLUGIN_PATH" prefix
|
|
|
|
|
,(list (string-append (assoc-ref inputs "qtsvg")
|
|
|
|
|
"/lib/qt5/plugins/"))))))))))
|
2016-09-22 05:58:29 +02:00
|
|
|
|
(inputs
|
2018-07-23 11:04:12 +02:00
|
|
|
|
`(("ffmpeg" ,ffmpeg)
|
2018-03-15 02:19:51 +01:00
|
|
|
|
("filteraudio" ,filteraudio)
|
2016-09-22 05:58:29 +02:00
|
|
|
|
("glib" ,glib)
|
|
|
|
|
("gtk+" ,gtk+-2)
|
|
|
|
|
("libsodium" ,libsodium)
|
2017-05-25 08:46:08 +02:00
|
|
|
|
("c-toxcore" ,c-toxcore)
|
2016-09-22 05:58:29 +02:00
|
|
|
|
("libvpx" ,libvpx)
|
|
|
|
|
("libxscrnsaver" ,libxscrnsaver)
|
|
|
|
|
("libx11" ,libx11)
|
2017-10-03 08:46:19 +02:00
|
|
|
|
("libexif" ,libexif)
|
|
|
|
|
("sqlite" ,sqlite)
|
2016-09-22 05:58:29 +02:00
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("qrencode" ,qrencode)
|
2017-05-25 08:46:08 +02:00
|
|
|
|
("qtbase" ,qtbase)
|
|
|
|
|
("qtsvg" ,qtsvg)
|
2016-09-22 05:58:29 +02:00
|
|
|
|
("sqlcipher" ,sqlcipher)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
2017-05-25 08:46:08 +02:00
|
|
|
|
("qmake" ,qttools)))
|
2016-09-22 05:58:29 +02:00
|
|
|
|
(home-page "https://qtox.github.io/")
|
|
|
|
|
(synopsis "Tox chat client using Qt")
|
|
|
|
|
(description "qTox is a Tox client that follows the Tox design
|
|
|
|
|
guidelines. It provides an easy to use application that allows you to
|
|
|
|
|
connect with friends and family without anyone else listening in.")
|
|
|
|
|
(license license:gpl3+)))
|
2016-09-09 03:02:31 +02:00
|
|
|
|
|
2016-08-23 13:51:24 +02:00
|
|
|
|
(define-public pybitmessage
|
|
|
|
|
(package
|
|
|
|
|
(name "pybitmessage")
|
2018-03-29 22:43:37 +02:00
|
|
|
|
(version "0.6.3.2")
|
2016-08-23 13:51:24 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
2018-03-29 22:43:37 +02:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/Bitmessage/PyBitmessage.git")
|
|
|
|
|
(commit version)))
|
|
|
|
|
(file-name (string-append name "-" version "-checkout"))
|
2016-08-23 13:51:24 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-03-29 22:43:37 +02:00
|
|
|
|
"1lmhbpwsqh1v93krlqqhafw2pc3y0qp8zby186yllbph6s8kdp35"))))
|
2017-08-29 15:05:40 +02:00
|
|
|
|
(propagated-inputs
|
|
|
|
|
;; TODO:
|
|
|
|
|
;; Package "pyopencl", required in addition to numpy for OpenCL support.
|
|
|
|
|
;; Package "gst123", required in addition to alsa-utils and
|
|
|
|
|
;; mpg123 for sound support.
|
|
|
|
|
`(("python2-msgpack" ,python2-msgpack)
|
|
|
|
|
("python2-pythondialog" ,python2-pythondialog)
|
2016-08-23 13:51:24 +02:00
|
|
|
|
("python2-pyqt-4" ,python2-pyqt-4)
|
|
|
|
|
("python2-sip" ,python2-sip)
|
|
|
|
|
("python2-pysqlite" ,python2-pysqlite)
|
|
|
|
|
("python2-pyopenssl" ,python2-pyopenssl)))
|
|
|
|
|
(native-inputs
|
2017-08-29 15:05:40 +02:00
|
|
|
|
`(("openssl" ,openssl)))
|
|
|
|
|
(build-system python-build-system)
|
2016-08-23 13:51:24 +02:00
|
|
|
|
(arguments
|
2017-08-29 15:05:40 +02:00
|
|
|
|
`(#:modules ((guix build python-build-system)
|
|
|
|
|
(guix build utils))
|
|
|
|
|
#:tests? #f ;no test target
|
|
|
|
|
#:python ,python-2
|
2016-08-23 13:51:24 +02:00
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'fix-unmatched-python-shebangs
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(substitute* "src/bitmessagemain.py"
|
|
|
|
|
(("#!/usr/bin/env python2.7")
|
|
|
|
|
(string-append "#!" (which "python"))))
|
|
|
|
|
(substitute* "src/bitmessagecli.py"
|
|
|
|
|
(("#!/usr/bin/env python2.7.x")
|
|
|
|
|
(string-append "#!" (which "python"))))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'fix-depends
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(substitute* "src/depends.py"
|
|
|
|
|
(("libcrypto.so")
|
|
|
|
|
(string-append (assoc-ref inputs "openssl")
|
|
|
|
|
"/lib/libcrypto.so")))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'fix-local-files-in-paths
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "src/proofofwork.py"
|
|
|
|
|
(("bitmsghash.so")
|
|
|
|
|
(string-append (assoc-ref outputs "out")
|
|
|
|
|
"/lib/bitmsghash.so")))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'fix-pyelliptic
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(substitute* "src/pyelliptic/openssl.py"
|
|
|
|
|
(("libcrypto.so")
|
|
|
|
|
(string-append (assoc-ref inputs "openssl")
|
|
|
|
|
"/lib/libcrypto.so"))
|
|
|
|
|
(("libssl.so")
|
|
|
|
|
(string-append (assoc-ref inputs "openssl")
|
|
|
|
|
"/lib/libssl.so")))
|
|
|
|
|
#t))
|
2017-08-29 15:05:40 +02:00
|
|
|
|
(add-after 'unpack 'noninteractive-build
|
|
|
|
|
;; This applies upstream commit 4c597d3f7cf9f83a763472aa165a1a4292019f20
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "setup.py"
|
|
|
|
|
(("except NameError")
|
|
|
|
|
"except EOFError, NameError"))
|
|
|
|
|
#t))
|
|
|
|
|
;; XXX: python setup.py does not build and install bitmsghash,
|
|
|
|
|
;; without it PyBitmessage tries to compile it at first run
|
|
|
|
|
;; in the store, which due to obvious reasons fails. Do it
|
2016-08-23 13:51:24 +02:00
|
|
|
|
;; and place it in /lib.
|
2017-08-29 15:05:40 +02:00
|
|
|
|
(add-after 'unpack 'build-and-install-bitmsghash
|
2016-08-23 13:51:24 +02:00
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
2017-08-29 15:05:40 +02:00
|
|
|
|
(with-directory-excursion "src/bitmsghash"
|
|
|
|
|
(system* "make")
|
|
|
|
|
(install-file "bitmsghash.so"
|
|
|
|
|
(string-append (assoc-ref outputs "out") "/lib")))
|
|
|
|
|
#t)))))
|
2016-08-23 13:51:24 +02:00
|
|
|
|
(license license:expat)
|
|
|
|
|
(description
|
|
|
|
|
"Distributed and trustless peer-to-peer communications protocol
|
|
|
|
|
for sending encrypted messages to one person or many subscribers.")
|
|
|
|
|
(synopsis "Distributed peer-to-peer communication")
|
|
|
|
|
(home-page "https://bitmessage.org/")))
|
|
|
|
|
|
2016-09-22 21:00:43 +02:00
|
|
|
|
(define-public ytalk
|
|
|
|
|
(package
|
|
|
|
|
(name "ytalk")
|
|
|
|
|
(version "3.3.0")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "ftp://ftp.ourproject.org/pub/ytalk/ytalk-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1d3jhnj8rgzxyxjwfa22vh45qwzjvxw1qh8fz6b7nfkj3zvk9jvf"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("ncurses" ,ncurses)))
|
|
|
|
|
(home-page "http://ytalk.ourproject.org")
|
|
|
|
|
(synopsis "Multi-user chat program")
|
|
|
|
|
(description "Ytalk is a replacement for the BSD talk program. Its main
|
|
|
|
|
advantage is the ability to communicate with any arbitrary number of users at
|
|
|
|
|
once. It supports both talk protocols (\"talk\" and \"ntalk\") and can communicate
|
|
|
|
|
with several different talk daemons at the same time.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-09-15 23:46:46 +02:00
|
|
|
|
(define-public gloox
|
|
|
|
|
(package
|
|
|
|
|
(name "gloox")
|
2018-09-24 01:35:17 +02:00
|
|
|
|
(version "1.0.21")
|
2016-09-15 23:46:46 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://camaya.net/download/gloox-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-09-24 01:35:17 +02:00
|
|
|
|
"1k57qgif1yii515m6jaqaibkdysfab6394bpawd2l67321f1a4rw"))))
|
2016-09-15 23:46:46 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libidn" ,libidn)
|
|
|
|
|
("gnutls" ,gnutls)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(synopsis "Portable high-level Jabber/XMPP library for C++")
|
|
|
|
|
(description
|
|
|
|
|
"gloox is a full-featured Jabber/XMPP client library,
|
|
|
|
|
written in ANSI C++. It makes writing spec-compliant clients easy
|
|
|
|
|
and allows for hassle-free integration of Jabber/XMPP functionality
|
|
|
|
|
into existing applications.")
|
|
|
|
|
(home-page "https://camaya.net/gloox")
|
|
|
|
|
(license license:gpl3)))
|
2016-09-22 21:00:43 +02:00
|
|
|
|
|
2016-11-23 20:04:37 +01:00
|
|
|
|
(define-public perl-net-psyc
|
|
|
|
|
(package
|
|
|
|
|
(name "perl-net-psyc")
|
|
|
|
|
(version "1.1")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://perlpsyc.psyc.eu/"
|
|
|
|
|
"perlpsyc-" version ".zip"))
|
|
|
|
|
(file-name (string-append name "-" version ".zip"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1lw6807qrbmvzbrjn1rna1dhir2k70xpcjvyjn45y35hav333a42"))
|
|
|
|
|
;; psycmp3 currently depends on MP3::List and rxaudio (shareware),
|
|
|
|
|
;; we can add it back when this is no longer the case.
|
gnu: All snippets report errors using exceptions, else return #t.
* gnu/packages/admin.scm, gnu/packages/algebra.scm, gnu/packages/audio.scm,
gnu/packages/backup.scm, gnu/packages/base.scm,
gnu/packages/bioinformatics.scm, gnu/packages/cdrom.scm,
gnu/packages/chez.scm, gnu/packages/code.scm, gnu/packages/compression.scm,
gnu/packages/cross-base.scm, gnu/packages/crypto.scm, gnu/packages/cups.scm,
gnu/packages/databases.scm, gnu/packages/dns.scm, gnu/packages/emacs.scm,
gnu/packages/emulators.scm, gnu/packages/engineering.scm,
gnu/packages/enlightenment.scm, gnu/packages/fpga.scm,
gnu/packages/freedesktop.scm, gnu/packages/ftp.scm, gnu/packages/games.scm,
gnu/packages/gcc.scm, gnu/packages/geo.scm, gnu/packages/ghostscript.scm,
gnu/packages/gl.scm, gnu/packages/glib.scm, gnu/packages/gnome.scm,
gnu/packages/gnuzilla.scm, gnu/packages/graphics.scm, gnu/packages/gtk.scm,
gnu/packages/guile.scm, gnu/packages/irc.scm, gnu/packages/java.scm,
gnu/packages/kerberos.scm, gnu/packages/linux.scm, gnu/packages/lisp.scm,
gnu/packages/lxde.scm, gnu/packages/machine-learning.scm,
gnu/packages/mail.scm, gnu/packages/maths.scm, gnu/packages/messaging.scm,
gnu/packages/monitoring.scm, gnu/packages/mp3.scm, gnu/packages/music.scm,
gnu/packages/netpbm.scm, gnu/packages/networking.scm, gnu/packages/node.scm,
gnu/packages/nvi.scm, gnu/packages/ocaml.scm, gnu/packages/pdf.scm,
gnu/packages/perl.scm, gnu/packages/php.scm, gnu/packages/plotutils.scm,
gnu/packages/pretty-print.scm, gnu/packages/profiling.scm,
gnu/packages/pulseaudio.scm, gnu/packages/python-crypto.scm,
gnu/packages/python.scm, gnu/packages/qt.scm, gnu/packages/robotics.scm,
gnu/packages/sawfish.scm, gnu/packages/scanner.scm, gnu/packages/scheme.scm,
gnu/packages/scribus.scm, gnu/packages/sdl.scm,
gnu/packages/serialization.scm, gnu/packages/shells.scm,
gnu/packages/slang.scm, gnu/packages/smalltalk.scm, gnu/packages/ssh.scm,
gnu/packages/sync.scm, gnu/packages/syncthing.scm, gnu/packages/tbb.scm,
gnu/packages/terminals.scm, gnu/packages/texinfo.scm,
gnu/packages/text-editors.scm, gnu/packages/textutils.scm,
gnu/packages/tls.scm, gnu/packages/unrtf.scm,
gnu/packages/version-control.scm, gnu/packages/video.scm,
gnu/packages/vpn.scm, gnu/packages/web.scm, gnu/packages/wm.scm,
gnu/packages/wxwidgets.scm, gnu/packages/xdisorg.scm, gnu/packages/xorg.scm:
In all snippets, report errors using exceptions, or else return #t.
2018-03-16 12:47:34 +01:00
|
|
|
|
(snippet '(begin
|
|
|
|
|
(delete-file "contrib/psycmp3")
|
|
|
|
|
#t))))
|
2016-11-23 20:04:37 +01:00
|
|
|
|
(build-system perl-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("perl-curses" ,perl-curses)
|
|
|
|
|
("perl-io-socket-ssl" ,perl-io-socket-ssl)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure) ; No configure script
|
|
|
|
|
;; There is a Makefile, but it does not install everything
|
|
|
|
|
;; (leaves out psycion) and says
|
|
|
|
|
;; "# Just to give you a rough idea". XXX: Fix it upstream.
|
|
|
|
|
(replace 'build
|
|
|
|
|
(lambda _
|
|
|
|
|
(zero? (system* "make" "manuals"))))
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(doc (string-append out "/share/doc/perl-net-psyc"))
|
|
|
|
|
(man1 (string-append out "/share/man/man1"))
|
|
|
|
|
(man3 (string-append out "/share/man/man3"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
|
|
|
|
(libpsyc (string-append out "/lib/psyc/ion"))
|
|
|
|
|
(libperl (string-append out "/lib/perl5/site_perl/"
|
|
|
|
|
,(package-version perl))))
|
|
|
|
|
|
|
|
|
|
(copy-recursively "lib/perl5" libperl)
|
|
|
|
|
(copy-recursively "lib/psycion" libpsyc)
|
|
|
|
|
(copy-recursively "bin" bin)
|
|
|
|
|
(install-file "cgi/psycpager" (string-append doc "/cgi"))
|
|
|
|
|
(copy-recursively "contrib" (string-append doc "/contrib"))
|
|
|
|
|
(copy-recursively "hooks" (string-append doc "/hooks"))
|
|
|
|
|
(copy-recursively "sdj" (string-append doc "/sdj"))
|
|
|
|
|
(install-file "README.txt" doc)
|
|
|
|
|
(install-file "TODO.txt" doc)
|
|
|
|
|
(copy-recursively "share/man/man1" man1)
|
|
|
|
|
(copy-recursively "share/man/man3" man3)
|
|
|
|
|
#t)))
|
|
|
|
|
(add-after 'install 'wrap-programs
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
;; Make sure all executables in "bin" find the Perl modules
|
|
|
|
|
;; provided by this package at runtime.
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin/"))
|
|
|
|
|
(path (getenv "PERL5LIB")))
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(wrap-program file
|
|
|
|
|
`("PERL5LIB" ":" prefix (,path))))
|
|
|
|
|
(find-files bin "\\.*$"))
|
|
|
|
|
#t))))))
|
|
|
|
|
(description
|
|
|
|
|
"@code{Net::PSYC} with support for TCP, UDP, Event.pm, @code{IO::Select} and
|
|
|
|
|
Gtk2 event loops. This package includes 12 applications and additional scripts:
|
|
|
|
|
psycion (a @uref{http://about.psyc.eu,PSYC} chat client), remotor (a control console
|
|
|
|
|
for @uref{https://torproject.org,tor} router) and many more.")
|
|
|
|
|
(synopsis "Perl implementation of PSYC protocol")
|
|
|
|
|
(home-page "http://perlpsyc.psyc.eu/")
|
|
|
|
|
(license (list license:gpl2
|
2017-05-02 16:57:52 +02:00
|
|
|
|
license:perl-license
|
2016-11-23 20:04:37 +01:00
|
|
|
|
;; contrib/irssi-psyc.pl:
|
|
|
|
|
license:public-domain
|
|
|
|
|
;; bin/psycplay states AGPL with no version:
|
|
|
|
|
license:agpl3+))))
|
|
|
|
|
|
|
|
|
|
(define-public libpsyc
|
|
|
|
|
(package
|
|
|
|
|
(name "libpsyc")
|
|
|
|
|
(version "20160913")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://www.psyced.org/files/"
|
|
|
|
|
name "-" version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"14q89fxap05ajkfn20rnhc6b1h4i3i2adyr7y6hs5zqwb2lcmc1p"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("perl" ,perl)
|
|
|
|
|
("netcat" ,netcat)
|
|
|
|
|
("procps" ,procps)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags
|
|
|
|
|
(list "CC=gcc"
|
|
|
|
|
(string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; The rust bindings are the only ones in use, the lpc bindings
|
|
|
|
|
;; are in psyclpc. The other bindings are not used by anything,
|
|
|
|
|
;; the chances are high that the bindings do not even work,
|
|
|
|
|
;; therefore we do not include them.
|
|
|
|
|
;; TODO: Get a cargo build system in Guix.
|
|
|
|
|
(delete 'configure)))) ; no configure script
|
|
|
|
|
(home-page "http://about.psyc.eu/libpsyc")
|
|
|
|
|
(description
|
|
|
|
|
"@code{libpsyc} is a PSYC library in C which implements
|
|
|
|
|
core aspects of PSYC, useful for all kinds of clients and servers
|
|
|
|
|
including psyced.")
|
|
|
|
|
(synopsis "PSYC library in C")
|
|
|
|
|
(license license:agpl3+)))
|
|
|
|
|
|
2016-11-26 19:25:08 +01:00
|
|
|
|
;; This commit removes the historic bundled pcre and makes psyclpc reproducible.
|
2016-11-23 20:04:37 +01:00
|
|
|
|
(define-public psyclpc
|
|
|
|
|
(let* ((commit "61cf9aa81297085e5c40170fd01221c752f8deba")
|
|
|
|
|
(revision "2"))
|
|
|
|
|
(package
|
|
|
|
|
(name "psyclpc")
|
|
|
|
|
(version (string-append "20160821-" revision "." (string-take commit 7)))
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "git://git.psyced.org/git/psyclpc")
|
|
|
|
|
(commit commit)))
|
|
|
|
|
(file-name (string-append name "-" version "-checkout"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1viwqymbhn3cwvx0zl58rlzl5gw47zxn0ldg2nbi55ghm5zxl1z5"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; There are no tests/checks.
|
|
|
|
|
#:configure-flags
|
|
|
|
|
;; If you have questions about this part, look at
|
|
|
|
|
;; "src/settings/psyced" and the ebuild.
|
|
|
|
|
(list
|
|
|
|
|
"--enable-use-tls=yes"
|
|
|
|
|
"--enable-use-mccp" ; Mud Client Compression Protocol, leave this enabled.
|
|
|
|
|
(string-append "--prefix="
|
|
|
|
|
(assoc-ref %outputs "out"))
|
|
|
|
|
;; src/Makefile: Set MUD_LIB to the directory which contains
|
|
|
|
|
;; the mud data. defaults to MUD_LIB = @libdir@
|
|
|
|
|
(string-append "--libdir="
|
|
|
|
|
(assoc-ref %outputs "out")
|
|
|
|
|
"/opt/psyced/world")
|
|
|
|
|
(string-append "--bindir="
|
|
|
|
|
(assoc-ref %outputs "out")
|
|
|
|
|
"/opt/psyced/bin")
|
|
|
|
|
;; src/Makefile: Set ERQ_DIR to directory which contains the
|
|
|
|
|
;; stuff which ERQ can execute (hopefully) savely. Was formerly
|
|
|
|
|
;; defined in config.h. defaults to ERQ_DIR= @libexecdir@
|
|
|
|
|
(string-append "--libexecdir="
|
|
|
|
|
(assoc-ref %outputs "out")
|
|
|
|
|
"/opt/psyced/run"))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before 'configure 'chdir-to-src
|
|
|
|
|
;; We need to pass this as env variables
|
|
|
|
|
;; and manually change the directory.
|
|
|
|
|
(lambda _
|
|
|
|
|
(chdir "src")
|
|
|
|
|
(setenv "CONFIG_SHELL" (which "sh"))
|
|
|
|
|
(setenv "SHELL" (which "sh"))
|
|
|
|
|
#t)))
|
|
|
|
|
#:make-flags (list "install-all")))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("zlib" ,zlib)
|
|
|
|
|
("openssl" ,openssl)
|
|
|
|
|
("pcre" ,pcre)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
|
|
|
|
("bison" ,bison)
|
|
|
|
|
("gettext" ,gettext-minimal)
|
|
|
|
|
("help2man" ,help2man)
|
|
|
|
|
("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)))
|
|
|
|
|
(home-page "http://lpc.psyc.eu/")
|
|
|
|
|
(synopsis "psycLPC is a multi-user network server programming language")
|
|
|
|
|
(description
|
|
|
|
|
"LPC is a bytecode language, invented to specifically implement
|
|
|
|
|
multi user virtual environments on the internet. This technology is used for
|
|
|
|
|
MUDs and also the psyced implementation of the Protocol for SYnchronous
|
|
|
|
|
Conferencing (PSYC). psycLPC is a fork of LDMud with some new features and
|
|
|
|
|
many bug fixes.")
|
|
|
|
|
(license license:gpl2))))
|
|
|
|
|
|
2017-01-18 13:34:24 +01:00
|
|
|
|
(define-public loudmouth
|
|
|
|
|
(package
|
|
|
|
|
(name "loudmouth")
|
|
|
|
|
(version "1.5.3")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://mcabber.com/files/loudmouth/"
|
|
|
|
|
name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0b6kd5gpndl9nzis3n6hcl0ldz74bnbiypqgqa1vgb0vrcar8cjl"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("glib" ,glib)
|
|
|
|
|
("gnutls" ,gnutls)
|
|
|
|
|
("libidn" ,libidn)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
|
|
|
|
("check" ,check)
|
|
|
|
|
("glib" ,glib "bin") ; gtester
|
|
|
|
|
("gtk-doc" ,gtk-doc)))
|
|
|
|
|
(home-page "https://mcabber.com/")
|
|
|
|
|
(description
|
|
|
|
|
"Loudmouth is a lightweight and easy-to-use C library for programming
|
|
|
|
|
with the XMPP (formerly known as Jabber) protocol. It is designed to be
|
|
|
|
|
easy to get started with and yet extensible to let you do anything the XMPP
|
|
|
|
|
protocol allows.")
|
|
|
|
|
(synopsis "Asynchronous XMPP library")
|
|
|
|
|
;; The files have LGPL2.0+ headers, but COPYING specifies LGPL2.1.
|
|
|
|
|
(license license:lgpl2.0+)))
|
|
|
|
|
|
2017-01-18 13:34:25 +01:00
|
|
|
|
(define-public mcabber
|
|
|
|
|
(package
|
|
|
|
|
(name "mcabber")
|
2018-09-28 17:18:01 +02:00
|
|
|
|
(version "1.1.0")
|
2017-01-18 13:34:25 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://mcabber.com/files/"
|
|
|
|
|
name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-09-28 17:18:01 +02:00
|
|
|
|
"1ggh865p1rf10ffsnf4g6qv9i8bls36dxdb1nzs5r9vdqci2rz04"))))
|
2017-01-18 13:34:25 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:configure-flags (list "--enable-otr"
|
|
|
|
|
"--enable-aspell")))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("gpgme" ,gpgme)
|
|
|
|
|
("libotr" ,libotr)
|
|
|
|
|
("aspell" ,aspell)
|
|
|
|
|
("libidn" ,libidn)
|
|
|
|
|
("glib" ,glib)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("loudmouth" ,loudmouth)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "https://mcabber.com")
|
|
|
|
|
(description
|
|
|
|
|
"Mcabber is a small XMPP (Jabber) console client, which includes features
|
|
|
|
|
such as SASL and TLS support, @dfn{Multi-User Chat} (MUC) support, logging,
|
|
|
|
|
command-completion, OpenPGP encryption, @dfn{Off-the-Record Messaging} (OTR)
|
|
|
|
|
support, and more.")
|
|
|
|
|
(synopsis "Small XMPP console client")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2017-01-28 17:05:15 +01:00
|
|
|
|
(define-public freetalk
|
|
|
|
|
(package
|
|
|
|
|
(name "freetalk")
|
|
|
|
|
(version "4.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://gnu/freetalk/freetalk-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1rmrn7a1bb7vm26yaklrvx008a9qhwc32s57dwrlf40lv9gffwny"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
gnu: Put autoconf-related phases immediately after the 'unpack phase.
* gnu/packages/audio.scm (audacity, rtmidi)[arguments]: Correct phases
accordingly.
* gnu/packages/bioinformatics.scm (mash, seek, vsearch, emboss,
htslib-for-sambamba)[arguments]: Likewise.
* gnu/packages/ci.scm (cuirass)[arguments]: Likewise.
* gnu/packages/compression.scm (minizip, xdelta)[arguments]: Likewise.
* gnu/packages/cpp.scm (libzen)[arguments]: Likewise.
* gnu/packages/crypto.scm (opendht)[arguments]: Likewise.
* gnu/packages/databases.scm (4store, mdbtools)[arguments]: Likewise.
* gnu/packages/debug.scm (stress-make)[arguments]: Likewise.
* gnu/packages/dns.scm (dnscrypt-proxy, dnscrypt-wrapper)[arguments]:
Likewise.
* gnu/packages/emacs.scm (emacs-pdf-tools)[arguments]: Likewise.
* gnu/packages/embedded.scm (libjaylink, openocd)[arguments]: Likewise.
* gnu/packages/engineering.scm (gerbv)[arguments]: Likewise.
* gnu/packages/erlang.scm (erlang)[arguments]: Likewise.
* gnu/packages/ftp.scm (weex)[arguments]: Likewise.
* gnu/packages/gnome.scm (dia)[arguments]: Likewise.
* gnu/packages/gnunet.scm (gnurl, guile-gnunet)[arguments]: Likewise.
* gnu/packages/gtk.scm (guile-rsvg, graphene)[arguments]: Likewise.
* gnu/packages/guile.scm (guildhall, guile-ics, guile-sqlite3)[arguments]:
Likewise.
* gnu/packages/ibus.scm (ibus-libpinyin)[arguments]: Likewise.
* gnu/packages/irc.scm (weechat)[arguments]: Likewise.
* gnu/packages/java.scm (classpath-devel)[arguments]: Likewise.
* gnu/packages/libreoffice.scm (libetonyek)[arguments]: Likewise.
* gnu/packages/libusb.scm (hidapi)[arguments]: Likewise.
* gnu/packages/linux.scm (gpm)[arguments]: Likewise.
* gnu/packages/logging.scm (glog)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (ghmm)[arguments]: Likewise.
* gnu/packages/mail.scm (dovecot-trees, dovecot-libsodium-plugin, esmtp)
[arguments]: Likewise.
* gnu/packages/messaging.scm (freetalk, libmesode, libstrophe)[arguments]:
Likewise.
* gnu/packages/microcom.scm (microcom)[arguments]: Likewise.
* gnu/packages/ocaml.scm (ocaml-ssl)[arguments]: Likewise.
* gnu/packages/parallel.scm (slurm)[arguments]: Likewise.
* gnu/packages/pdf.scm (libharu)[arguments]: Likewise.
* gnu/packages/samba.scm (cifs-utils)[arguments]: Likewise.
* gnu/packages/serialization.scm (msgpack)[arguments]: Likewise.
* gnu/packages/shells.scm (scsh)[arguments]: Likewise.
* gnu/packages/telephony.scm (libiax2)[arguments]: Likewise.
* gnu/packages/textutils.scm (dotconf)[arguments]: Likewise.
* gnu/packages/version-control.scm (findnewest)[arguments]: Likewise.
* gnu/packages/video.scm (libmediainfo, mediainfo)[arguments]: Likewise.
2017-07-31 03:02:35 +02:00
|
|
|
|
(add-after 'unpack 'autogen
|
2017-01-28 17:05:15 +01:00
|
|
|
|
(lambda _
|
|
|
|
|
(zero? (system* "sh" "autogen.sh"))))
|
|
|
|
|
;; For 'system' commands in Scheme code.
|
|
|
|
|
(add-after 'install 'wrap-program
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bash (assoc-ref inputs "bash"))
|
|
|
|
|
(coreutils (assoc-ref inputs "coreutils"))
|
|
|
|
|
(less (assoc-ref inputs "less")))
|
|
|
|
|
(wrap-program (string-append out "/bin/freetalk")
|
|
|
|
|
`("PATH" ":" prefix
|
|
|
|
|
,(map (lambda (dir)
|
|
|
|
|
(string-append dir "/bin"))
|
|
|
|
|
(list bash coreutils less))))
|
|
|
|
|
#t))))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("pkg-config" ,pkg-config)
|
|
|
|
|
("texinfo" ,texinfo)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("bash" ,bash)
|
|
|
|
|
("glib" ,glib)
|
|
|
|
|
("guile" ,guile-2.0)
|
|
|
|
|
("less" ,less)
|
|
|
|
|
("loudmouth" ,loudmouth)
|
|
|
|
|
("readline" ,readline)))
|
|
|
|
|
(synopsis "Extensible console-based Jabber client")
|
|
|
|
|
(description
|
|
|
|
|
"GNU Freetalk is a command-line Jabber/XMPP chat client. It notably uses
|
|
|
|
|
the Readline library to handle input, so it features convenient navigation of
|
|
|
|
|
text as well as tab-completion of buddy names, commands and English words. It
|
|
|
|
|
is also scriptable and extensible via Guile.")
|
2017-03-30 00:48:16 +02:00
|
|
|
|
(home-page "https://www.gnu.org/software/freetalk/")
|
2017-01-28 17:05:15 +01:00
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2017-03-02 23:30:18 +01:00
|
|
|
|
(define-public libmesode
|
|
|
|
|
(package
|
|
|
|
|
(name "libmesode")
|
2018-09-24 01:12:00 +02:00
|
|
|
|
(version "0.9.2")
|
2017-03-02 23:30:18 +01:00
|
|
|
|
(source (origin
|
2018-09-24 01:08:09 +02:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/boothj5/libmesode.git")
|
|
|
|
|
(commit version)))
|
|
|
|
|
(file-name (git-file-name name version))
|
2017-03-02 23:30:18 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-09-24 01:12:00 +02:00
|
|
|
|
"06f5nfaypvxrbsinxa1k2vrxrs7kqmg38g4wwwk5d63hpn1pj8ak"))))
|
2017-03-02 23:30:18 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("expat" ,expat)
|
|
|
|
|
("openssl" ,openssl)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(synopsis "C library for writing XMPP clients")
|
|
|
|
|
(description "Libmesode is a fork of libstrophe for use with Profanity
|
|
|
|
|
XMPP Client. In particular, libmesode provides extra TLS functionality such as
|
|
|
|
|
manual SSL certificate verification.")
|
|
|
|
|
(home-page "https://github.com/boothj5/libmesode")
|
|
|
|
|
;; Dual licensed.
|
|
|
|
|
(license (list license:gpl3+ license:x11))))
|
|
|
|
|
|
2017-03-02 23:31:09 +01:00
|
|
|
|
(define-public libstrophe
|
|
|
|
|
(package
|
|
|
|
|
(name "libstrophe")
|
2018-03-23 11:51:15 +01:00
|
|
|
|
(version "0.9.2")
|
2017-03-02 23:31:09 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/strophe/libstrophe/archive/"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-03-23 11:51:15 +01:00
|
|
|
|
"0vxfcyfnhnlaj6spm2b0ljw5i3knbphy6mvzpl5zv9b52ny4b08m"))))
|
2017-03-02 23:31:09 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("expat" ,expat)
|
|
|
|
|
("openssl" ,openssl)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(synopsis "C library for writing XMPP clients")
|
|
|
|
|
(description "Libstrophe is a minimal XMPP library written in C. It has
|
|
|
|
|
almost no external dependencies, only an XML parsing library (expat or libxml
|
|
|
|
|
are both supported).")
|
|
|
|
|
(home-page "http://strophe.im/libstrophe")
|
|
|
|
|
;; Dual licensed.
|
|
|
|
|
(license (list license:gpl3+ license:x11))))
|
|
|
|
|
|
2017-03-02 23:31:50 +01:00
|
|
|
|
(define-public profanity
|
|
|
|
|
(package
|
|
|
|
|
(name "profanity")
|
|
|
|
|
(version "0.5.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2017-03-15 22:18:47 +01:00
|
|
|
|
(uri (string-append "http://www.profanity.im/profanity-"
|
|
|
|
|
version ".tar.gz"))
|
2017-03-02 23:31:50 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1f7ylw3mhhnii52mmk40hyc4kqhpvjdr3hmsplzkdhsfww9kflg3"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("curl" ,curl)
|
|
|
|
|
("expat" ,expat)
|
|
|
|
|
("glib" ,glib)
|
|
|
|
|
("gpgme" ,gpgme)
|
|
|
|
|
("libmesode" ,libmesode)
|
|
|
|
|
("libotr" ,libotr)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("openssl" ,openssl)
|
|
|
|
|
("readline" ,readline)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("autoconf-archive" ,autoconf-archive)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("cmocka" ,cmocka)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(synopsis "Console-based XMPP client")
|
|
|
|
|
(description "Profanity is a console based XMPP client written in C
|
|
|
|
|
using ncurses and libmesode, inspired by Irssi.")
|
|
|
|
|
(home-page "http://www.profanity.im")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2017-03-18 17:07:37 +01:00
|
|
|
|
(define-public libircclient
|
|
|
|
|
(package
|
|
|
|
|
(name "libircclient")
|
2018-08-30 21:57:36 +02:00
|
|
|
|
(version "1.10")
|
2017-03-18 17:07:37 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/libircclient/libircclient/"
|
|
|
|
|
version "/libircclient-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-08-30 21:57:36 +02:00
|
|
|
|
"0b9wa0h3xc31wpqlvgxgnvqp5wgx3kwsf5s9432m5cj8ycx6zcmv"))))
|
2017-03-18 17:07:37 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("openssl" ,openssl)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
|
|
|
|
(list (string-append "--libdir="
|
|
|
|
|
(assoc-ref %outputs "out") "/lib")
|
|
|
|
|
"--enable-shared"
|
|
|
|
|
"--enable-ipv6"
|
|
|
|
|
"--enable-openssl")
|
2018-08-30 21:57:36 +02:00
|
|
|
|
#:tests? #f)) ; no test suite
|
2017-03-18 17:07:37 +01:00
|
|
|
|
(home-page "https://www.ulduzsoft.com/libircclient/")
|
|
|
|
|
(synopsis "Library implementing the client IRC protocol")
|
|
|
|
|
(description "Libircclient is a library which implements the client IRC
|
|
|
|
|
protocol. It is designed to be small, fast, portable and compatible with the
|
|
|
|
|
RFC standards as well as non-standard but popular features. It can be used for
|
|
|
|
|
building the IRC clients and bots.")
|
|
|
|
|
(license license:lgpl3+)))
|
|
|
|
|
|
2017-07-02 20:24:16 +02:00
|
|
|
|
(define-public toxic
|
|
|
|
|
(package
|
|
|
|
|
(name "toxic")
|
2018-04-24 10:06:32 +02:00
|
|
|
|
(version "0.8.2")
|
2017-07-02 20:24:16 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/JFreegman/toxic/archive/v"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-04-24 10:06:32 +02:00
|
|
|
|
"1dx6z7k0zpsd7dpysdy23f0hnm49qlikb0mq8fg0y01dsz9vxgak"))
|
2017-07-02 20:24:16 +02:00
|
|
|
|
(file-name (git-file-name name version))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no tests
|
|
|
|
|
#:make-flags
|
|
|
|
|
(list
|
|
|
|
|
"CC=gcc"
|
|
|
|
|
(string-append "PREFIX="
|
|
|
|
|
(assoc-ref %outputs "out")))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-before 'build 'enable-python-scripting
|
|
|
|
|
(lambda _
|
|
|
|
|
(setenv "ENABLE_PYTHON" "1")
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("c-toxcore" ,c-toxcore)
|
|
|
|
|
("curl" ,curl)
|
|
|
|
|
("freealut" ,freealut)
|
|
|
|
|
("gdk-pixbuf" ,gdk-pixbuf) ; for libnotify.pc
|
|
|
|
|
("libconfig" ,libconfig)
|
|
|
|
|
("libnotify" ,libnotify)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("libvpx" ,libvpx)
|
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("python" ,python)
|
|
|
|
|
("qrencode" ,qrencode)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "https://github.com/JFreegman/toxic")
|
|
|
|
|
(synopsis "Tox chat client using ncurses")
|
|
|
|
|
(description "Toxic is a console-based instant messaging client, using
|
|
|
|
|
c-toxcore and ncurses. It provides audio calls, sound and desktop
|
|
|
|
|
notifications, and Python scripting support.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2018-07-04 19:24:09 +02:00
|
|
|
|
(define-public libqmatrixclient
|
|
|
|
|
(package
|
|
|
|
|
(name "libqmatrixclient")
|
|
|
|
|
(version "0.3.0.2")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
2018-07-29 18:21:08 +02:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/QMatrixClient/libqmatrixclient")
|
|
|
|
|
(commit (string-append "v" version))))
|
|
|
|
|
(file-name (git-file-name name version))
|
2018-07-04 19:24:09 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-07-29 18:21:08 +02:00
|
|
|
|
"03pxmr4wa818fgqddkr2fkwz6pda538x3ic9yq7c40x98zqf55w5"))))
|
2018-07-04 19:24:09 +02:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(inputs
|
2018-07-29 18:28:23 +02:00
|
|
|
|
`(("qtbase" ,qtbase)))
|
2018-07-04 19:24:09 +02:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags (list "-DBUILD_SHARED_LIBS=ON")
|
|
|
|
|
#:tests? #f)) ; No tests
|
|
|
|
|
(home-page "https://matrix.org/docs/projects/sdk/libqmatrixclient.html")
|
|
|
|
|
(synopsis "Qt5 client library for the Matrix instant messaging protocol")
|
|
|
|
|
(description "libqmatrixclient is a Qt5 library to write clients for the
|
|
|
|
|
Matrix instant messaging protocol. Quaternion is the reference client
|
|
|
|
|
implementation. Quaternion and libqmatrixclient together form the
|
|
|
|
|
QMatrixClient project.")
|
|
|
|
|
(license license:lgpl2.1+)))
|
2018-07-04 19:24:55 +02:00
|
|
|
|
|
|
|
|
|
(define-public quaternion
|
|
|
|
|
(package
|
|
|
|
|
(name "quaternion")
|
|
|
|
|
(version "0.0.9.2")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
2018-07-29 18:22:36 +02:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/QMatrixClient/Quaternion")
|
|
|
|
|
(commit (string-append "v" version))))
|
|
|
|
|
(file-name (git-file-name name version))
|
2018-07-04 19:24:55 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-07-29 18:22:36 +02:00
|
|
|
|
"0zrr4khbbdf5ziq65gi0cb1yb1d0y5rv18wld22w1x96f7fkmrib"))))
|
2018-07-04 19:24:55 +02:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libqmatrixclient" ,libqmatrixclient)
|
2018-07-29 18:29:00 +02:00
|
|
|
|
("qtbase" ,qtbase)
|
|
|
|
|
("qtdeclarative" ,qtdeclarative)))
|
2018-07-04 19:24:55 +02:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; No tests
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'fix-libqmatrixclient-dynamic-linking
|
|
|
|
|
;; Upstream recommends statically linking with
|
|
|
|
|
;; libqmatrixclient. Patch the source so that we can dynamically
|
|
|
|
|
;; link instead. In a future release, when upstream moves to
|
|
|
|
|
;; dynamic linking, remove this phase.
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "CMakeLists.txt"
|
|
|
|
|
(("^add_subdirectory\\(lib\\)" all)
|
|
|
|
|
(string-append "#" all)))
|
|
|
|
|
(for-each
|
|
|
|
|
(lambda (file)
|
|
|
|
|
(substitute* file
|
|
|
|
|
(("#include \"lib/([^\"]*)\"" all header)
|
|
|
|
|
(string-append "#include <" header ">"))))
|
|
|
|
|
(find-files "client" "\\.(cpp|h)$"))
|
|
|
|
|
#t)))))
|
|
|
|
|
(home-page "https://matrix.org/docs/projects/client/quaternion.html")
|
|
|
|
|
(synopsis "Graphical client for the Matrix instant messaging protocol")
|
|
|
|
|
(description "Quaternion is a Qt5 desktop client for the Matrix instant
|
|
|
|
|
messaging protocol. It uses libqmatrixclient and is its reference client
|
|
|
|
|
implementation. Quaternion and libqmatriclient together form the
|
|
|
|
|
QMatrixClient project.")
|
|
|
|
|
(license (list license:gpl3+ ; all source code
|
|
|
|
|
license:lgpl3+)))) ; icons/breeze
|
|
|
|
|
|
2014-03-06 01:12:19 +01:00
|
|
|
|
;;; messaging.scm ends here
|