2013-12-28 08:19:43 +01:00
|
|
|
|
;;; GNU Guix --- Functional package management for GNU
|
|
|
|
|
;;; Copyright © 2013 John Darrington <jmd@gnu.org>
|
2016-07-11 10:54:57 +02:00
|
|
|
|
;;; Copyright © 2013 Nikita Karetnikov <nikita@karetnikov.org>
|
2018-02-22 13:54:05 +01:00
|
|
|
|
;;; Copyright © 2014, 2016 David Thompson <dthompson2@worcester.edu>
|
2017-12-11 01:24:42 +01:00
|
|
|
|
;;; Copyright © 2014, 2015, 2016, 2017 Eric Bavier <bavier@member.fsf.org>
|
2014-07-01 14:44:04 +02:00
|
|
|
|
;;; Copyright © 2014 Cyrill Schenkel <cyrill.schenkel@gmail.com>
|
2014-11-10 23:47:00 +01:00
|
|
|
|
;;; Copyright © 2014 Sylvain Beucler <beuc@beuc.net>
|
2018-03-11 21:46:30 +01:00
|
|
|
|
;;; Copyright © 2014, 2015, 2018 Ludovic Courtès <ludo@gnu.org>
|
2016-05-29 05:09:11 +02:00
|
|
|
|
;;; Copyright © 2014, 2015, 2016 Sou Bunnbu <iyzsong@gmail.com>
|
2015-10-22 00:37:53 +02:00
|
|
|
|
;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.org>
|
2016-03-05 18:40:00 +01:00
|
|
|
|
;;; Copyright © 2015, 2016 Andreas Enge <andreas@enge.fr>
|
2015-02-20 01:47:55 +01:00
|
|
|
|
;;; Copyright © 2015 David Hashe <david.hashe@dhashe.com>
|
2017-02-10 23:45:11 +01:00
|
|
|
|
;;; Copyright © 2015, 2017 Christopher Allan Webber <cwebber@dustycloud.org>
|
2018-02-10 23:53:34 +01:00
|
|
|
|
;;; Copyright © 2015, 2016, 2017, 2018 Ricardo Wurmus <rekado@elephly.net>
|
2017-01-27 19:16:32 +01:00
|
|
|
|
;;; Copyright © 2015, 2016, 2017 Alex Kost <alezost@gmail.com>
|
2015-10-19 15:24:45 +02:00
|
|
|
|
;;; Copyright © 2015 Paul van der Walt <paul@denknerd.org>
|
2017-02-18 05:01:37 +01:00
|
|
|
|
;;; Copyright © 2016, 2017 Rodger Fox <thylakoid@openmailbox.org>
|
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, 2018 Nils Gillmann <ng0@n0.is>
|
2016-04-13 03:50:36 +02:00
|
|
|
|
;;; Copyright © 2016 Albin Söderqvist <albin@fripost.org>
|
2018-01-20 04:53:50 +01:00
|
|
|
|
;;; Copyright © 2016, 2017, 2018 Kei Kebreau <kkebreau@posteo.net>
|
2016-05-06 01:25:45 +02:00
|
|
|
|
;;; Copyright © 2016 Alex Griffin <a@ajgrf.com>
|
2018-06-05 21:53:08 +02:00
|
|
|
|
;;; Copyright © 2016, 2017, 2018 Efraim Flashner <efraim@flashner.co.il>
|
2016-02-07 12:57:40 +01:00
|
|
|
|
;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org>
|
2016-10-16 22:04:35 +02:00
|
|
|
|
;;; Copyright © 2016 Steve Webber <webber.sl@gmail.com>
|
2017-08-20 20:28:20 +02:00
|
|
|
|
;;; Copyright © 2017 Adonay "adfeno" Felipe Nogueira <https://libreplanet.org/wiki/User:Adfeno> <adfeno@hyperbola.info>
|
2018-01-21 16:38:41 +01:00
|
|
|
|
;;; Copyright © 2017, 2018 Arun Isaac <arunisaac@systemreboot.net>
|
2018-03-27 03:05:52 +02:00
|
|
|
|
;;; Copyright © 2017, 2018 Tobias Geerinckx-Rice <me@tobias.gr>
|
2017-04-13 22:45:18 +02:00
|
|
|
|
;;; Copyright © 2017 nee <nee-git@hidamari.blue>
|
2017-04-14 00:37:40 +02:00
|
|
|
|
;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org>
|
2017-04-24 00:41:49 +02:00
|
|
|
|
;;; Copyright © 2017 Marius Bakke <mbakke@fastmail.com>
|
2018-01-30 08:26:17 +01:00
|
|
|
|
;;; Copyright © 2017, 2018 Rutger Helling <rhelling@mykolab.com>
|
2017-06-24 23:56:56 +02:00
|
|
|
|
;;; Copyright © 2017 Roel Janssen <roel@gnu.org>
|
2018-02-13 01:26:27 +01:00
|
|
|
|
;;; Copyright © 2017, 2018 Nicolas Goaziou <mail@nicolasgoaziou.fr>
|
2018-01-17 00:21:42 +01:00
|
|
|
|
;;; Copyright © 2018 okapi <okapi@firemail.cc>
|
2013-12-28 08:19:43 +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 games)
|
2016-04-23 07:58:55 +02:00
|
|
|
|
#:use-module (ice-9 match)
|
2014-11-16 18:56:12 +01:00
|
|
|
|
#:use-module ((guix licenses) #:prefix license:)
|
|
|
|
|
#:use-module (guix utils)
|
2013-12-28 08:19:43 +01:00
|
|
|
|
#:use-module (guix packages)
|
|
|
|
|
#:use-module (guix download)
|
2015-08-31 10:09:40 +02:00
|
|
|
|
#:use-module (guix git-download)
|
2015-10-19 15:24:45 +02:00
|
|
|
|
#:use-module (guix svn-download)
|
2017-04-14 00:37:40 +02:00
|
|
|
|
#:use-module (guix gexp)
|
2014-06-13 06:54:44 +02:00
|
|
|
|
#:use-module (gnu packages)
|
2015-11-19 05:17:02 +01:00
|
|
|
|
#:use-module (gnu packages algebra)
|
2015-10-19 15:24:45 +02:00
|
|
|
|
#:use-module (gnu packages autotools)
|
2015-11-01 19:38:53 +01:00
|
|
|
|
#:use-module (gnu packages backup)
|
2014-09-06 20:03:12 +02:00
|
|
|
|
#:use-module (gnu packages base)
|
2017-04-12 22:27:16 +02:00
|
|
|
|
#:use-module (gnu packages build-tools)
|
2014-10-13 12:33:39 +02:00
|
|
|
|
#:use-module (gnu packages admin)
|
2015-03-05 19:51:02 +01:00
|
|
|
|
#:use-module (gnu packages audio)
|
2016-02-16 02:07:04 +01:00
|
|
|
|
#:use-module (gnu packages avahi)
|
2014-06-13 06:54:44 +02:00
|
|
|
|
#:use-module (gnu packages boost)
|
2018-05-27 22:49:50 +02:00
|
|
|
|
#:use-module (gnu packages crypto)
|
2017-03-20 04:06:50 +01:00
|
|
|
|
#:use-module (gnu packages documentation)
|
2017-06-01 12:54:26 +02:00
|
|
|
|
#:use-module (gnu packages docbook)
|
2016-07-09 07:08:01 +02:00
|
|
|
|
#:use-module (gnu packages fltk)
|
2017-11-03 11:46:00 +01:00
|
|
|
|
#:use-module (gnu packages freedesktop)
|
2015-08-31 10:09:40 +02:00
|
|
|
|
#:use-module (gnu packages fribidi)
|
|
|
|
|
#:use-module (gnu packages game-development)
|
2013-12-28 08:19:43 +01:00
|
|
|
|
#:use-module (gnu packages gettext)
|
2016-07-09 03:13:58 +02:00
|
|
|
|
#:use-module (gnu packages ghostscript)
|
2017-06-18 19:45:18 +02:00
|
|
|
|
#:use-module (gnu packages gimp)
|
2013-12-28 08:19:43 +01:00
|
|
|
|
#:use-module (gnu packages gl)
|
2013-12-30 19:33:53 +01:00
|
|
|
|
#:use-module (gnu packages glib)
|
2013-12-28 08:19:43 +01:00
|
|
|
|
#:use-module (gnu packages gnome)
|
2016-07-09 03:13:58 +02:00
|
|
|
|
#:use-module (gnu packages gperf)
|
2017-12-11 01:24:42 +01:00
|
|
|
|
#:use-module (gnu packages graphics)
|
2013-12-28 08:19:43 +01:00
|
|
|
|
#:use-module (gnu packages gtk)
|
|
|
|
|
#:use-module (gnu packages guile)
|
2017-03-20 04:06:50 +01:00
|
|
|
|
#:use-module (gnu packages imagemagick)
|
2013-12-30 19:33:53 +01:00
|
|
|
|
#:use-module (gnu packages libcanberra)
|
2017-08-17 10:56:04 +02:00
|
|
|
|
#:use-module (gnu packages libedit)
|
2015-04-27 06:40:40 +02:00
|
|
|
|
#:use-module (gnu packages libunwind)
|
2015-10-16 15:00:06 +02:00
|
|
|
|
#:use-module (gnu packages haskell)
|
2015-08-31 10:09:40 +02:00
|
|
|
|
#:use-module (gnu packages mp3)
|
2017-03-16 04:14:42 +01:00
|
|
|
|
#:use-module (gnu packages music)
|
2018-05-26 18:11:11 +02:00
|
|
|
|
#:use-module (gnu packages multiprecision)
|
2016-04-13 03:50:36 +02:00
|
|
|
|
#:use-module (gnu packages icu4c)
|
gnu: Consolidate libjpeg, libpng, and libtiff into one module.
* gnu/packages/image.scm: New file.
* gnu-system.am (GNU_SYSTEM_MODULES): Add image.scm and remove libjpeg.scm,
libpng.scm, and libtiff.scm.
* gnu/packages/libjpeg.scm, gnu/packages/libpng.scm, gnu/packages/libtiff.scm:
Delete files.
* gnu/packages/emacs.scm gnu/packages/games.scm, gnu/packages/gd.scm,
gnu/packages/geeqie.scm, gnu/packages/ghostscript.scm,
gnu/packages/gimp.scm, gnu/packages/gnome.scm, gnu/packages/gnunet.scm,
gnu/packages/gnustep.scm, gnu/packages/gnuzilla.scm,
gnu/packages/graphviz.scm, gnu/packages/gtk.scm,
gnu/packages/imagemagick.scm, gnu/packages/inkscape.scm,
gnu/packages/netpbm.scm, gnu/packages/pdf.scm, gnu/packages/plotutils.scm,
gnu/packages/qemu.scm, gnu/packages/qt.scm, gnu/packages/scheme.scm,
gnu/packages/sdl.scm, gnu/packages/slim.scm, gnu/packages/tcl.scm,
gnu/packages/texlive.scm, gnu/packages/video.scm, gnu/packages/xiph.scm,
gnu/packages/xorg.scm: Use (gnu packages image) module.
2014-06-25 14:39:02 +02:00
|
|
|
|
#:use-module (gnu packages image)
|
2014-07-01 14:44:04 +02:00
|
|
|
|
#:use-module (gnu packages ncurses)
|
2016-07-09 03:13:58 +02:00
|
|
|
|
#:use-module (gnu packages netpbm)
|
2017-04-27 10:42:21 +02:00
|
|
|
|
#:use-module (gnu packages networking)
|
2016-02-07 12:57:40 +01:00
|
|
|
|
#:use-module (gnu packages ocaml)
|
2013-12-30 19:33:53 +01:00
|
|
|
|
#:use-module (gnu packages python)
|
|
|
|
|
#:use-module (gnu packages readline)
|
2017-04-24 00:41:49 +02:00
|
|
|
|
#:use-module (gnu packages textutils)
|
2013-12-28 08:19:43 +01:00
|
|
|
|
#:use-module (gnu packages xorg)
|
|
|
|
|
#:use-module (gnu packages pkg-config)
|
gnu: Consolidate databases in (gnu packages databases).
* gnu/packages/databases.scm: New file, with the contents of the
following deleted files.
* gnu/packages/mysql.scm, gnu/packages/postgresql.scm,
gnu/packages/recutils.scm, gnu/packages/sqlite.scm,
gnu/packages/bdb.scm: Remove.
* gnu-system.am (GNU_SYSTEM_MODULES): Adjust accordingly.
* gnu/packages/apl.scm, gnu/packages/dc.scm, gnu/packages/games.scm,
gnu/packages/gnunet.scm, gnu/packages/linux.scm, gnu/packages/mail.scm,
gnu/packages/mpd.scm, gnu/packages/nvi.scm, gnu/packages/openldap.scm,
gnu/packages/package-management.scm, gnu/packages/python.scm,
gnu/packages/qt.scm, gnu/packages/rdf.scm,
gnu/packages/version-control.scm: Adjust to new module name.
2014-09-08 17:48:03 +02:00
|
|
|
|
#:use-module (gnu packages databases)
|
2017-06-29 17:32:27 +02:00
|
|
|
|
#:use-module (gnu packages shells)
|
2014-05-01 02:36:32 +02:00
|
|
|
|
#:use-module (gnu packages sdl)
|
2017-04-12 11:28:01 +02:00
|
|
|
|
#:use-module (gnu packages swig)
|
2014-07-12 19:42:13 +02:00
|
|
|
|
#:use-module (gnu packages texinfo)
|
2014-11-10 23:47:00 +01:00
|
|
|
|
#:use-module (gnu packages check)
|
2016-03-05 18:40:00 +01:00
|
|
|
|
#:use-module (gnu packages fonts)
|
2014-11-10 23:47:00 +01:00
|
|
|
|
#:use-module (gnu packages fontutils)
|
2015-07-29 03:48:34 +02:00
|
|
|
|
#:use-module (gnu packages gstreamer)
|
2014-11-11 00:05:20 +01:00
|
|
|
|
#:use-module (gnu packages bash)
|
2014-11-12 13:28:51 +01:00
|
|
|
|
#:use-module (gnu packages perl)
|
2018-04-09 19:31:04 +02:00
|
|
|
|
#:use-module (gnu packages perl-check)
|
2014-11-13 15:50:57 +01:00
|
|
|
|
#:use-module (gnu packages qt)
|
|
|
|
|
#:use-module (gnu packages compression)
|
2014-07-19 05:19:30 +02:00
|
|
|
|
#:use-module (gnu packages pulseaudio)
|
|
|
|
|
#:use-module (gnu packages linux)
|
2014-09-05 20:46:44 +02:00
|
|
|
|
#:use-module (gnu packages xiph)
|
|
|
|
|
#:use-module (gnu packages curl)
|
|
|
|
|
#:use-module (gnu packages lua)
|
2015-01-16 12:53:00 +01:00
|
|
|
|
#:use-module (gnu packages video)
|
|
|
|
|
#:use-module (gnu packages xml)
|
2015-04-27 06:40:40 +02:00
|
|
|
|
#:use-module (gnu packages tcl)
|
2016-05-11 18:24:53 +02:00
|
|
|
|
#:use-module (gnu packages xdisorg)
|
2016-08-08 21:54:50 +02:00
|
|
|
|
#:use-module (gnu packages tls)
|
|
|
|
|
#:use-module (gnu packages pcre)
|
2017-02-01 18:13:13 +01:00
|
|
|
|
#:use-module (gnu packages cyrus-sasl)
|
2017-03-20 20:16:37 +01:00
|
|
|
|
#:use-module (gnu packages messaging)
|
|
|
|
|
#:use-module (gnu packages upnp)
|
|
|
|
|
#:use-module (gnu packages wxwidgets)
|
2017-04-13 22:45:18 +02:00
|
|
|
|
#:use-module (gnu packages bison)
|
|
|
|
|
#:use-module (gnu packages flex)
|
2017-04-14 00:37:40 +02:00
|
|
|
|
#:use-module (gnu packages cmake)
|
|
|
|
|
#:use-module (gnu packages gnuzilla)
|
|
|
|
|
#:use-module (gnu packages icu4c)
|
|
|
|
|
#:use-module (gnu packages networking)
|
2017-12-10 11:15:03 +01:00
|
|
|
|
#:use-module (gnu packages vulkan)
|
2017-10-12 10:22:27 +02:00
|
|
|
|
#:use-module (gnu packages web)
|
2014-11-11 00:05:20 +01:00
|
|
|
|
#:use-module (guix build-system gnu)
|
2018-01-17 23:42:55 +01:00
|
|
|
|
#:use-module (guix build-system go)
|
2015-10-16 15:00:06 +02:00
|
|
|
|
#:use-module (guix build-system haskell)
|
2016-08-30 22:40:27 +02:00
|
|
|
|
#:use-module (guix build-system python)
|
2014-07-19 05:19:30 +02:00
|
|
|
|
#:use-module (guix build-system cmake)
|
2014-11-11 00:05:20 +01:00
|
|
|
|
#:use-module (guix build-system trivial))
|
2013-12-28 08:19:43 +01:00
|
|
|
|
|
2017-06-24 23:56:56 +02:00
|
|
|
|
(define-public armagetronad
|
|
|
|
|
(package
|
|
|
|
|
(name "armagetronad")
|
|
|
|
|
(version "0.2.8.3.4")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/" name "/stable/"
|
|
|
|
|
version "/" name "-" version ".src.tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1pgy0r80z702qdv94aw3ywdn4ynnr4cdi86ml558pljfc5ygasj4"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libxml2" ,libxml2)
|
|
|
|
|
("sdl" ,sdl)
|
|
|
|
|
("sdl-image" ,sdl-image)
|
|
|
|
|
("freeglut" ,freeglut)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("libjpeg-turbo" ,libjpeg-turbo)))
|
|
|
|
|
(home-page "http://www.armagetronad.org")
|
|
|
|
|
(synopsis "Tron clone in 3D")
|
|
|
|
|
(description "Armagetron is a multiplayer game in 3d that attempts to
|
|
|
|
|
emulate and expand on the lightcycle sequence from the movie Tron. It's
|
|
|
|
|
an old school arcade game slung into the 21st century. Highlights include
|
|
|
|
|
a customizable playing arena, HUD, unique graphics, and AI bots. For the
|
|
|
|
|
more advanced player there are new game modes and a wide variety of physics
|
|
|
|
|
settings to tweak as well.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2017-05-01 19:16:04 +02:00
|
|
|
|
(define-public cataclysm-dda
|
|
|
|
|
(package
|
|
|
|
|
(name "cataclysm-dda")
|
|
|
|
|
(version "0.C")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/CleverRaven/Cataclysm-DDA/"
|
|
|
|
|
"archive/" version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1xlajmgl9cviqyjpp5g5q4rbljy9gqc49v54bi8gpzr68s14gsb9"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
;; Import cmath header for the std::pow function.
|
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
|
|
|
|
'(begin
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(substitute* file
|
|
|
|
|
(("#include <math.h>")
|
|
|
|
|
"#include <cmath>")))
|
|
|
|
|
(find-files "src"))
|
|
|
|
|
#t))))
|
2017-05-01 19:16:04 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out"))
|
|
|
|
|
"USE_HOME_DIR=1" "DYNAMIC_LINKING=1" "RELEASE=1")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("ncursesw5-config") "ncursesw6-config")
|
|
|
|
|
(("RELEASE_FLAGS = -Werror") "RELEASE_FLAGS ="))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'build 'build-tiles
|
|
|
|
|
(lambda* (#:key make-flags outputs #:allow-other-keys)
|
|
|
|
|
;; Change prefix directory and enable tile graphics and sound.
|
|
|
|
|
(zero?
|
|
|
|
|
(apply system* "make" "TILES=1" "SOUND=1"
|
|
|
|
|
(string-append "PREFIX="
|
|
|
|
|
(assoc-ref outputs "tiles"))
|
|
|
|
|
(cdr make-flags)))))
|
|
|
|
|
(add-after 'install 'install-tiles
|
|
|
|
|
(lambda* (#:key make-flags outputs #:allow-other-keys)
|
|
|
|
|
(zero?
|
|
|
|
|
(apply system* "make" "install" "TILES=1" "SOUND=1"
|
|
|
|
|
(string-append "PREFIX="
|
|
|
|
|
(assoc-ref outputs "tiles"))
|
|
|
|
|
(cdr make-flags))))))
|
|
|
|
|
;; TODO: Add libtap++ from https://github.com/cbab/libtappp as a native
|
|
|
|
|
;; input in order to support tests.
|
|
|
|
|
#:tests? #f))
|
|
|
|
|
(outputs '("out"
|
|
|
|
|
"tiles")) ; For tile graphics and sound support.
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("gettext" ,gettext-minimal)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("freetype" ,freetype)
|
|
|
|
|
("libogg" ,libogg)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("sdl2" ,sdl2)
|
2018-03-16 16:50:14 +01:00
|
|
|
|
("sdl2-image" ,sdl2-image)
|
2017-05-01 19:16:04 +02:00
|
|
|
|
("sdl2-ttf" ,sdl2-ttf)
|
|
|
|
|
("sdl2-mixer" ,sdl2-mixer)))
|
|
|
|
|
(home-page "http://en.cataclysmdda.com/")
|
|
|
|
|
(synopsis "Survival horror roguelike video game")
|
|
|
|
|
(description
|
|
|
|
|
"Cataclysm: Dark Days Ahead is a roguelike set in a post-apocalyptic world.
|
|
|
|
|
Struggle to survive in a harsh, persistent, procedurally generated world.
|
|
|
|
|
Scavenge the remnants of a dead civilization for food, equipment, or, if you are
|
|
|
|
|
lucky, a vehicle with a full tank of gas to get you out of Dodge. Fight to
|
|
|
|
|
defeat or escape from a wide variety of powerful monstrosities, from zombies to
|
|
|
|
|
giant insects to killer robots and things far stranger and deadlier, and against
|
|
|
|
|
the others like yourself, that want what you have.")
|
|
|
|
|
(license license:cc-by-sa3.0)))
|
|
|
|
|
|
2017-07-23 20:22:10 +02:00
|
|
|
|
(define-public cowsay
|
|
|
|
|
(package
|
|
|
|
|
(name "cowsay")
|
2017-10-20 01:33:02 +02:00
|
|
|
|
(version "3.04")
|
2017-07-23 20:22:10 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2017-10-20 01:33:02 +02:00
|
|
|
|
(uri (string-append "https://github.com/tnalpgge/"
|
|
|
|
|
"rank-amateur-cowsay/archive/"
|
|
|
|
|
name "-" version ".tar.gz"))
|
2017-07-23 20:22:10 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-10-20 01:33:02 +02:00
|
|
|
|
"12w7apbf6a9qffk92r32b16w22na2fjcqbl32rn0n7zw5hrp3f6q"))))
|
2017-07-23 20:22:10 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
2017-10-20 01:38:24 +02:00
|
|
|
|
(delete 'configure) ; no configure script
|
|
|
|
|
(delete 'build) ; nothing to be built
|
|
|
|
|
(replace 'install
|
2017-07-23 20:22:10 +02:00
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(zero? (system* "sh" "install.sh"
|
|
|
|
|
(assoc-ref outputs "out")))))
|
2017-10-23 10:44:04 +02:00
|
|
|
|
(delete 'check)
|
|
|
|
|
(add-after 'install 'check
|
2017-07-23 20:22:10 +02:00
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(zero? (system* (string-append (assoc-ref outputs "out")
|
|
|
|
|
"/bin/cowsay")
|
|
|
|
|
"We're done!")))))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("perl" ,perl)))
|
|
|
|
|
(home-page (string-append "https://web.archive.org/web/20071026043648/"
|
2017-10-20 01:33:02 +02:00
|
|
|
|
"http://www.nog.net:80/~tony/warez/cowsay.shtml"))
|
2017-07-23 20:22:10 +02:00
|
|
|
|
(synopsis "Speaking cow text filter")
|
|
|
|
|
(description "Cowsay is basically a text filter. Send some text into it,
|
|
|
|
|
and you get a cow saying your text. If you think a talking cow isn't enough,
|
2017-10-20 01:33:02 +02:00
|
|
|
|
cows can think too: all you have to do is run @command{cowthink}. If you're
|
|
|
|
|
tired of cows, a variety of other ASCII-art messengers are available.")
|
2017-07-23 20:22:10 +02:00
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2017-03-20 04:06:50 +01:00
|
|
|
|
(define-public freedoom
|
|
|
|
|
(package
|
|
|
|
|
(name "freedoom")
|
2017-08-06 20:08:02 +02:00
|
|
|
|
(version "0.11.3")
|
2017-03-20 04:06:50 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/" name "/" name
|
|
|
|
|
"/archive/v" version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-08-06 20:08:02 +02:00
|
|
|
|
"1bjijdfqhpazyifx1qda7scj7dry1azhjrnl8h8zn2vqfgdmlh0q"))))
|
2017-03-20 04:06:50 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:make-flags `(,(string-append "prefix=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:parallel-build? #f
|
|
|
|
|
#:tests? #f ; no check target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
2018-06-05 21:53:08 +02:00
|
|
|
|
(delete 'bootstrap)
|
2017-03-20 04:06:50 +01:00
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let* ((dejavu (assoc-ref inputs "font-dejavu"))
|
|
|
|
|
(freedoom (assoc-ref outputs "out"))
|
|
|
|
|
(wad-dir (string-append freedoom "/share/games/doom")))
|
|
|
|
|
;; Replace the font-searching function in a shell
|
|
|
|
|
;; script with a direct path to the required font.
|
|
|
|
|
;; This is necessary because ImageMagick can only find the
|
|
|
|
|
;; most basic fonts while in the build environment.
|
|
|
|
|
(substitute* "graphics/titlepic/create_caption"
|
|
|
|
|
(("font=\\$\\(find_font.*$")
|
|
|
|
|
(string-append
|
|
|
|
|
"font=" dejavu
|
|
|
|
|
"/share/fonts/truetype/DejaVuSansCondensed-Bold.ttf\n")))
|
|
|
|
|
;; Make icon creation reproducible.
|
|
|
|
|
(substitute* "dist/Makefile"
|
|
|
|
|
(("freedm.png")
|
|
|
|
|
"-define png:exclude-chunks=date freedm.png")
|
|
|
|
|
(("freedoom1.png")
|
|
|
|
|
"-define png:exclude-chunks=date freedoom1.png")
|
|
|
|
|
(("freedoom2.png")
|
|
|
|
|
"-define png:exclude-chunks=date freedoom2.png"))
|
|
|
|
|
;; Make sure that the install scripts know where to find
|
|
|
|
|
;; the appropriate WAD files.
|
|
|
|
|
(substitute* "dist/freedoom"
|
|
|
|
|
(("IWAD=freedm.wad")
|
|
|
|
|
(string-append "IWAD=" wad-dir "/freedm.wad"))
|
|
|
|
|
(("IWAD=freedoom1.wad")
|
|
|
|
|
(string-append "IWAD=" wad-dir "/freedoom1.wad"))
|
|
|
|
|
(("IWAD=freedoom2.wad")
|
|
|
|
|
(string-append "IWAD=" wad-dir "/freedoom2.wad")))
|
|
|
|
|
#t))))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("asciidoc" ,asciidoc)
|
|
|
|
|
("deutex" ,deutex)
|
|
|
|
|
("font-dejavu" ,font-dejavu)
|
|
|
|
|
("imagemagick" ,imagemagick)
|
|
|
|
|
("python" ,python-2)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("prboom-plus" ,prboom-plus)))
|
|
|
|
|
(home-page "https://freedoom.github.io/")
|
|
|
|
|
(synopsis "Free content game based on the Doom engine")
|
2018-01-15 23:21:19 +01:00
|
|
|
|
(native-search-paths
|
|
|
|
|
(list (search-path-specification
|
|
|
|
|
(variable "DOOMWADDIR")
|
|
|
|
|
(files '("share/games/doom")))
|
|
|
|
|
(search-path-specification
|
|
|
|
|
(variable "DOOMWADPATH")
|
|
|
|
|
(files '("share/games/doom")))))
|
2017-03-20 04:06:50 +01:00
|
|
|
|
(description
|
|
|
|
|
"The Freedoom project aims to create a complete free content first person
|
|
|
|
|
shooter game. Freedoom by itself is just the raw material for a game: it must
|
|
|
|
|
be paired with a compatible game engine (such as @code{prboom-plus}) to be
|
|
|
|
|
played. Freedoom complements the Doom engine with free levels, artwork, sound
|
|
|
|
|
effects and music to make a completely free game.")
|
|
|
|
|
(license license:bsd-3)))
|
|
|
|
|
|
2018-01-20 04:53:50 +01:00
|
|
|
|
(define-public golly
|
|
|
|
|
(package
|
|
|
|
|
(name "golly")
|
|
|
|
|
(version "3.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2018-03-01 18:00:30 +01:00
|
|
|
|
(uri (string-append "mirror://sourceforge/golly/golly/golly-"
|
2018-01-20 04:53:50 +01:00
|
|
|
|
version "/golly-" version
|
|
|
|
|
"-src.tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0dn74k3rylhx023n047lz4z6qrqijfcxi0b6jryqklhmm2n532f7"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:make-flags (list "CC=gcc"
|
|
|
|
|
(string-append "GOLLYDIR="
|
|
|
|
|
(assoc-ref %outputs "out")
|
|
|
|
|
"/share/golly"))
|
|
|
|
|
#:tests? #f ; no check target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
;; For some reason, setting the PYTHON_SHLIB make flag doesn't
|
|
|
|
|
;; properly set the path to the Python shared library. This
|
|
|
|
|
;; substitution acheives the same end by different means.
|
|
|
|
|
(substitute* "gui-wx/wxprefs.cpp"
|
|
|
|
|
(("pythonlib = wxT\\(STRINGIFY\\(PYTHON_SHLIB\\)\\)")
|
|
|
|
|
(string-append "pythonlib = \""
|
|
|
|
|
(assoc-ref inputs "python")
|
|
|
|
|
"/lib/libpython-2.7.so\"")))
|
|
|
|
|
#t))
|
|
|
|
|
(replace 'build
|
|
|
|
|
(lambda* (#:key make-flags outputs #:allow-other-keys)
|
|
|
|
|
(with-directory-excursion "gui-wx"
|
|
|
|
|
(apply invoke `("make" ,@make-flags "-f" "makefile-gtk")))))
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
|
|
|
|
(doc (string-append out "/share/doc/golly"))
|
|
|
|
|
(pixmaps (string-append out "/share/pixmaps"))
|
|
|
|
|
(share (string-append out "/share/golly")))
|
|
|
|
|
(for-each (lambda (binary)
|
|
|
|
|
(install-file binary bin))
|
|
|
|
|
'("bgolly" "golly"))
|
|
|
|
|
(for-each (lambda (document)
|
|
|
|
|
(install-file
|
|
|
|
|
(string-append "docs/" document ".html")
|
|
|
|
|
doc))
|
|
|
|
|
'("License" "ReadMe" "ToDo"))
|
|
|
|
|
(install-file "gui-wx/icons/appicon.xpm" pixmaps)
|
|
|
|
|
(for-each (lambda (folder)
|
|
|
|
|
(copy-recursively
|
|
|
|
|
folder
|
|
|
|
|
(string-append share "/" folder)))
|
|
|
|
|
'("Help" "Patterns" "Rules" "Scripts")))
|
|
|
|
|
#t)))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("lua" ,lua)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("glu" ,glu)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("python" ,python-2)
|
|
|
|
|
("wxwidgets" ,wxwidgets-gtk2)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(home-page "http://golly.sourceforge.net/")
|
|
|
|
|
(synopsis "Software for exploring cellular automata")
|
|
|
|
|
(description
|
|
|
|
|
"Golly simulates Conway's Game of Life and many other types of cellular
|
|
|
|
|
automata. The following features are available:
|
|
|
|
|
@enumerate
|
|
|
|
|
@item Support for bounded and unbounded universes, with cells of up to 256
|
|
|
|
|
states.
|
|
|
|
|
@item Support for multiple algorithms, including Bill Gosper's Hashlife
|
|
|
|
|
algorithm.
|
|
|
|
|
@item Loading patterns from BMP, PNG, GIF and TIFF image files.
|
|
|
|
|
@item Reading RLE, macrocell, Life 1.05/1.06, dblife and MCell files.
|
|
|
|
|
@item Scriptable via Lua or Python.
|
|
|
|
|
@item Extracting patterns, rules and scripts from zip files.
|
|
|
|
|
@item Downloading patterns, rules and scripts from online archives.
|
|
|
|
|
@item Pasting patterns from the clipboard.
|
|
|
|
|
@item Unlimited undo/redo.
|
|
|
|
|
@item Configurable keyboard shortcuts.
|
|
|
|
|
@item Auto fit option to keep patterns within the view.
|
|
|
|
|
@end enumerate")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2017-08-03 17:52:03 +02:00
|
|
|
|
(define-public meandmyshadow
|
|
|
|
|
(package
|
|
|
|
|
(name "meandmyshadow")
|
2018-06-20 04:41:42 +02:00
|
|
|
|
(version "0.4.1")
|
2017-08-03 17:52:03 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/meandmyshadow/"
|
|
|
|
|
version "/meandmyshadow-" version
|
|
|
|
|
"-src.tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-20 04:41:42 +02:00
|
|
|
|
"0wl5dc75qy001s6043cx0vr2l5y2qfv1cldqnwill9sfygqj9p95"))))
|
2017-08-03 17:52:03 +02:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:tests? #f ; there are no tests
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'set-sdl'paths
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(substitute* "cmake/Modules/FindSDL_gfx.cmake"
|
|
|
|
|
(("/usr/local/include/SDL")
|
|
|
|
|
(string-append (assoc-ref inputs "sdl")
|
|
|
|
|
"/include/SDL")))
|
|
|
|
|
;; Because SDL provides lib/libX11.so.6 we need to explicitly
|
|
|
|
|
;; link with libX11, even though we're using the GL backend.
|
|
|
|
|
(substitute* "CMakeLists.txt"
|
|
|
|
|
(("\\$\\{X11_LIBRARIES\\}") "-lX11"))
|
2018-06-20 04:42:50 +02:00
|
|
|
|
#t)))))
|
2017-08-03 17:52:03 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("sdl" ,(sdl-union (list sdl
|
|
|
|
|
sdl-image
|
|
|
|
|
sdl-gfx
|
|
|
|
|
sdl-mixer
|
|
|
|
|
sdl-ttf)))
|
|
|
|
|
("libx11" ,libx11) ; needed by sdl's libX11
|
|
|
|
|
("libarchive" ,libarchive)
|
|
|
|
|
("openssl" ,openssl)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("glu" ,glu)
|
|
|
|
|
("curl" ,curl)))
|
|
|
|
|
(home-page "http://meandmyshadow.sourceforge.net/")
|
|
|
|
|
(synopsis "Puzzle/platform game")
|
|
|
|
|
(description "Me and My Shadow is a puzzle/platform game in which you try
|
|
|
|
|
to reach the exit by solving puzzles. Spikes, moving blocks, fragile blocks
|
|
|
|
|
and much more stand between you and the exit. Record your moves and let your
|
|
|
|
|
shadow mimic them to reach blocks you couldn't reach alone.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2017-07-30 14:13:06 +02:00
|
|
|
|
(define-public knights
|
|
|
|
|
(package
|
|
|
|
|
(name "knights")
|
|
|
|
|
(version "025")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://www.knightsgame.org.uk/files/knights_"
|
|
|
|
|
version "_src.tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"18vp2ygvn0s0jz8rm585jqf6hjqkam1ximq81k0r9hpmfj7wb88f"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:make-flags
|
|
|
|
|
(list (string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; No configure script.
|
|
|
|
|
(delete 'configure))
|
|
|
|
|
#:tests? #f)) ;; No check target.
|
|
|
|
|
(inputs
|
|
|
|
|
`(("boost" ,boost)
|
|
|
|
|
("sdl-union" ,(sdl-union (list sdl sdl-image sdl-mixer)))
|
|
|
|
|
("freetype" ,freetype)
|
|
|
|
|
("fontconfig" ,fontconfig)
|
|
|
|
|
("curl" ,curl)))
|
2018-02-10 23:53:34 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
2017-07-30 14:13:06 +02:00
|
|
|
|
(home-page "http://www.knightsgame.org.uk/")
|
|
|
|
|
(synopsis "Multiplayer dungeon game involving knights and quests")
|
|
|
|
|
(description "Knights is a multiplayer game involving several knights who
|
|
|
|
|
must run around a dungeon and complete various quests. Each game revolves
|
|
|
|
|
around a quest – for example, you might have to find some items and carry them
|
|
|
|
|
back to your starting point. This may sound easy, but as there are only
|
|
|
|
|
enough items in the dungeon for one player to win, you may end up having to
|
|
|
|
|
kill your opponents to get their stuff! Other quests involve escaping from
|
|
|
|
|
the dungeon, fighting a duel to the death against the enemy knights, or
|
|
|
|
|
destroying an ancient book using a special wand.")
|
|
|
|
|
;; This package includes modified sources of lua (X11), enet (Expat), and
|
|
|
|
|
;; guichan (BSD-3). The "Coercri" library is released under the Boost
|
|
|
|
|
;; license. The whole package is released under GPLv3+.
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2013-12-30 19:33:53 +01:00
|
|
|
|
(define-public gnubg
|
|
|
|
|
(package
|
|
|
|
|
(name "gnubg")
|
2017-05-18 01:17:58 +02:00
|
|
|
|
(version "1.02")
|
2013-12-30 19:33:53 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://files.gnubg.org/media/sources/gnubg-release-"
|
|
|
|
|
version ".000-sources." "tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-05-18 01:17:58 +02:00
|
|
|
|
"015mvjk2iw1cg1kxwxfnvp2rxb9cylf6yc39i30fdy414k07zkky"))))
|
2013-12-30 19:33:53 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs `(("glib" ,glib)
|
|
|
|
|
("readline" ,readline)
|
|
|
|
|
("gtk+" ,gtk+-2)
|
|
|
|
|
("mesa" ,mesa)
|
2014-12-26 06:43:05 +01:00
|
|
|
|
("glu" ,glu)
|
2013-12-30 19:33:53 +01:00
|
|
|
|
("gtkglext" ,gtkglext)
|
|
|
|
|
("sqlite" ,sqlite)
|
|
|
|
|
("libcanberra" ,libcanberra)))
|
|
|
|
|
(native-inputs `(("python-2" ,python-2)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
2014-12-28 17:57:16 +01:00
|
|
|
|
(home-page "http://gnubg.org")
|
2013-12-30 19:33:53 +01:00
|
|
|
|
(synopsis "Backgammon game")
|
|
|
|
|
(description "The GNU backgammon application can be used for playing, analyzing and
|
|
|
|
|
teaching the game. It has an advanced evaluation engine based on artificial
|
|
|
|
|
neural networks suitable for both beginners and advanced players. In
|
|
|
|
|
addition to a command-line interface, it also features an attractive, 3D
|
|
|
|
|
representation of the playing board.")
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(license license:gpl3+)))
|
2013-12-30 19:33:53 +01:00
|
|
|
|
|
2013-12-28 08:19:43 +01:00
|
|
|
|
(define-public gnubik
|
|
|
|
|
(package
|
|
|
|
|
(name "gnubik")
|
2017-04-07 15:03:18 +02:00
|
|
|
|
(version "2.4.3")
|
2013-12-28 08:19:43 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://gnu/gnubik/gnubik-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-04-07 15:03:18 +02:00
|
|
|
|
"1vlf924mq8hg93bsjj0rzvs0crc6psmlxyc6zn0fr7msnmpx6gib"))))
|
2013-12-28 08:19:43 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs `(("gtk+" ,gtk+-2)
|
|
|
|
|
("mesa" ,mesa)
|
2014-12-26 06:43:47 +01:00
|
|
|
|
("glu" ,glu)
|
2013-12-28 08:19:43 +01:00
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("guile" ,guile-2.0)
|
|
|
|
|
("gtkglext" ,gtkglext)))
|
2016-09-25 09:33:02 +02:00
|
|
|
|
(native-inputs `(("gettext" ,gettext-minimal)
|
2013-12-28 08:19:43 +01:00
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "https://www.gnu.org/software/gnubik/")
|
2014-01-22 00:22:16 +01:00
|
|
|
|
(synopsis "3d Rubik's cube game")
|
|
|
|
|
(description
|
|
|
|
|
"GNUbik is a puzzle game in which you must manipulate a cube to make
|
2013-12-28 08:19:43 +01:00
|
|
|
|
each of its faces have a uniform color. The game is customizable, allowing
|
|
|
|
|
you to set the size of the cube (the default is 3x3) or to change the colors.
|
2014-09-13 15:31:31 +02:00
|
|
|
|
You may even apply photos to the faces instead of colors. The game is
|
2013-12-28 08:19:43 +01:00
|
|
|
|
scriptable with Guile.")
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(license license:gpl3+)))
|
2014-05-01 02:36:32 +02:00
|
|
|
|
|
2017-02-22 20:13:15 +01:00
|
|
|
|
(define-public gnushogi
|
|
|
|
|
(package
|
|
|
|
|
(name "gnushogi")
|
|
|
|
|
(version "1.4.2")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://gnu/gnushogi/gnushogi-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0a9bsl2nbnb138lq0h14jfc5xvz7hpb2bcsj4mjn6g1hcsl4ik0y"))))
|
|
|
|
|
(arguments `(#:tests? #f)) ;; No check target.
|
|
|
|
|
(build-system gnu-build-system)
|
2017-03-30 00:48:16 +02:00
|
|
|
|
(home-page "https://www.gnu.org/software/gnushogi/")
|
2017-02-22 20:13:15 +01:00
|
|
|
|
(synopsis "The game of Shogi (Japanese chess)")
|
|
|
|
|
(description "GNU Shogi is a program that plays the game Shogi (Japanese
|
|
|
|
|
Chess). It is similar to standard chess but this variant is far more complicated.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2017-08-07 01:58:55 +02:00
|
|
|
|
(define-public ltris
|
|
|
|
|
(package
|
|
|
|
|
(name "ltris")
|
|
|
|
|
(version "1.0.19")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://prdownloads.sourceforge.net/lgames/"
|
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1895wv1fqklrj4apkz47rnkcfhfav7zjknskw6p0886j35vrwslg"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(;; The code in LTris uses traditional GNU semantics for inline functions
|
|
|
|
|
#:configure-flags '("CFLAGS=-fgnu89-inline")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'set-paths 'set-sdl-paths
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(setenv "CPATH"
|
|
|
|
|
(string-append (assoc-ref inputs "sdl-union")
|
|
|
|
|
"/include/SDL"))
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("sdl-union" ,(sdl-union (list sdl sdl-mixer)))))
|
|
|
|
|
(home-page "http://lgames.sourceforge.net/LTris/")
|
|
|
|
|
(synopsis "Tetris clone based on the SDL library")
|
|
|
|
|
(description
|
|
|
|
|
"LTris is a tetris clone: differently shaped blocks are falling down the
|
|
|
|
|
rectangular playing field and can be moved sideways or rotated by 90 degree
|
|
|
|
|
units with the aim of building lines without gaps which then disappear (causing
|
|
|
|
|
any block above the deleted line to fall down). LTris has three game modes: In
|
|
|
|
|
Classic you play until the stack of blocks reaches the top of the playing field
|
|
|
|
|
and no new blocks can enter. In Figures the playing field is reset to a new
|
|
|
|
|
figure each level and later on tiles and lines suddenly appear. In Multiplayer
|
|
|
|
|
up to three players (either human or CPU) compete with each other sending
|
|
|
|
|
removed lines to all opponents. There is also a Demo mode in which you can
|
|
|
|
|
watch your CPU playing while enjoying a cup of tea!")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2017-03-16 04:14:42 +01:00
|
|
|
|
(define-public prboom-plus
|
|
|
|
|
(package
|
|
|
|
|
(name "prboom-plus")
|
|
|
|
|
(version "2.5.1.4")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/" name "/" name "/"
|
|
|
|
|
version "/" name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"151v6nign86m1a2vqz27krsccpc9m4d1jax4y43v2fa82wfj9qp0"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
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
|
|
|
|
'(begin
|
|
|
|
|
(substitute* "src/version.c"
|
|
|
|
|
(("__DATE__") "")
|
|
|
|
|
(("__TIME__") ""))
|
|
|
|
|
#t))))
|
2017-03-16 04:14:42 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:configure-flags '("--disable-cpu-opt")
|
|
|
|
|
#:make-flags `(,(string-append "gamesdir="
|
|
|
|
|
(assoc-ref %outputs "out") "/bin"))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'set-paths 'set-sdl'paths
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(setenv "CPATH"
|
|
|
|
|
(string-append (assoc-ref inputs "sdl-union")
|
|
|
|
|
"/include/SDL"))
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("fluidsynth" ,fluidsynth)
|
|
|
|
|
("glu" ,glu)
|
|
|
|
|
("libmad" ,libmad)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("pcre" ,pcre)
|
|
|
|
|
("portmidi" ,portmidi)
|
|
|
|
|
("sdl-union" ,(sdl-union (list sdl sdl-image sdl-mixer sdl-net)))))
|
|
|
|
|
(home-page "http://prboom-plus.sourceforge.net/")
|
|
|
|
|
(synopsis "Version of the classic 3D shoot'em'up game Doom")
|
|
|
|
|
(description
|
|
|
|
|
"PrBoom+ is a Doom source port developed from the original PrBoom project.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2017-06-01 19:48:44 +02:00
|
|
|
|
(define-public retux
|
|
|
|
|
(package
|
|
|
|
|
(name "retux")
|
2017-08-31 17:31:30 +02:00
|
|
|
|
(version "1.3.5")
|
2017-06-01 19:48:44 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://savannah/retux/"
|
|
|
|
|
(version-major+minor version) "/retux-"
|
|
|
|
|
version "-src.tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-08-31 17:31:30 +02:00
|
|
|
|
"1pcrh3z16fl412r3k7xccrgika19ahb1xh90jihgl8yy7zza2i6p"))))
|
2017-06-01 19:48:44 +02:00
|
|
|
|
(build-system python-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; no setup.py script
|
|
|
|
|
(delete 'build)
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
|
|
|
|
(data (string-append out "/share/retux"))
|
|
|
|
|
(doc (string-append out "/share/doc/retux")))
|
|
|
|
|
(mkdir-p bin)
|
|
|
|
|
|
|
|
|
|
(substitute* "retux.py"
|
|
|
|
|
;; Use the correct data directory.
|
|
|
|
|
(("os\\.path\\.join\\(os\\.path\\.dirname\\(__file__\\), \"data\"\\),")
|
|
|
|
|
(string-append "\"" data "\","))
|
|
|
|
|
;; Use Python 3 so the patch-shebangs phase works properly.
|
|
|
|
|
((".*python2.*") "#!/usr/bin/python3"))
|
|
|
|
|
|
|
|
|
|
(copy-file "retux.py" (string-append bin "/retux"))
|
|
|
|
|
|
|
|
|
|
(copy-recursively "data" data)
|
|
|
|
|
|
|
|
|
|
(install-file "COPYING" doc)))))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("python-sge-pygame" ,python-sge-pygame)
|
|
|
|
|
("python-six" ,python-six)
|
|
|
|
|
("python-xsge" ,python-xsge)))
|
|
|
|
|
(home-page "http://retux.nongnu.org")
|
|
|
|
|
(synopsis "Action platformer game")
|
|
|
|
|
(description
|
|
|
|
|
"ReTux is an action platformer loosely inspired by the Mario games,
|
|
|
|
|
utilizing the art assets from the @code{SuperTux} project.")
|
|
|
|
|
;; GPL version 3 or later is the license for the code and some art.
|
|
|
|
|
;; The rest of the licenses are for the art exclusively, as listed in
|
|
|
|
|
;; data/LICENSES.
|
|
|
|
|
(license (list license:cc0
|
|
|
|
|
license:cc-by3.0
|
|
|
|
|
license:cc-by-sa3.0
|
|
|
|
|
license:cc-by-sa4.0
|
|
|
|
|
license:gpl2+
|
|
|
|
|
license:gpl3+))))
|
2017-06-05 19:42:45 +02:00
|
|
|
|
|
|
|
|
|
(define-public roguebox-adventures
|
2018-04-30 17:20:15 +02:00
|
|
|
|
(package
|
|
|
|
|
(name "roguebox-adventures")
|
|
|
|
|
(version "2.2.1")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://download.tuxfamily.org/rba/RogueBoxAdventures_v"
|
|
|
|
|
(string-join (string-split version #\.) "_") "_Source.zip"))
|
|
|
|
|
(file-name (string-append name "-" version ".zip"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0kmzdgnik8fsf3bg55546l77p3mfxn2awkzfzzdn20n82rd2babw"))))
|
|
|
|
|
(build-system python-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'unpack
|
|
|
|
|
(lambda* (#:key source #:allow-other-keys)
|
|
|
|
|
(and (invoke "unzip" source)
|
|
|
|
|
;; The actual source is buried a few directories deep.
|
|
|
|
|
(chdir (string-append "RogueBoxAdventures_v"
|
|
|
|
|
(string-join
|
|
|
|
|
(string-split ,version #\.) "_")
|
|
|
|
|
"_Source")))))
|
|
|
|
|
;; no setup.py script
|
|
|
|
|
(replace 'build
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(data (string-append
|
|
|
|
|
out "/share/games/roguebox-adventures")))
|
|
|
|
|
;; Use the correct data directory.
|
|
|
|
|
(substitute* '("main.py" "LIB/getch.py" "LIB/getch_gcwz.py")
|
|
|
|
|
(("basic_path + os\\.sep + 'DATA'")
|
|
|
|
|
(string-append "'" data "'"))
|
|
|
|
|
(("^basic_path.*$")
|
|
|
|
|
(string-append "basic_path ='" data "'\n")))
|
|
|
|
|
(substitute* "LIB/gra_files.py"
|
|
|
|
|
(("basic_path = b_path\\.replace\\('/LIB',''\\)")
|
|
|
|
|
(string-append "basic_path ='" data "'\n")))
|
2017-06-05 19:42:45 +02:00
|
|
|
|
|
2018-04-30 17:20:15 +02:00
|
|
|
|
;; The game must save in the user's home directory because
|
|
|
|
|
;; the store is read-only.
|
|
|
|
|
(substitute* "main.py"
|
|
|
|
|
(("home_save = False") "home_save = True")
|
|
|
|
|
(("'icon_small.png'")
|
|
|
|
|
(string-append "'" data "/icon_small.png'"))))
|
|
|
|
|
#t))
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
|
|
|
|
(roguebox-adventures
|
|
|
|
|
(string-append bin "/roguebox-adventures"))
|
|
|
|
|
(data (string-append
|
|
|
|
|
out "/share/games/roguebox-adventures"))
|
|
|
|
|
(lib (string-append data "/LIB"))
|
|
|
|
|
(doc (string-append
|
|
|
|
|
out "/share/doc/roguebox-adventures")))
|
|
|
|
|
(mkdir-p bin)
|
|
|
|
|
(mkdir-p doc)
|
2017-06-05 19:42:45 +02:00
|
|
|
|
|
2018-04-30 17:20:15 +02:00
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(copy-recursively file
|
|
|
|
|
(string-append data "/" file)))
|
|
|
|
|
'("AUDIO" "FONT" "GRAPHIC" "LIB" "LICENSE"
|
|
|
|
|
"icon_big.png" "icon_small.png"))
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(chmod file #o555)
|
|
|
|
|
(install-file file lib))
|
|
|
|
|
'("main.py" "run.py"))
|
2017-06-05 19:42:45 +02:00
|
|
|
|
|
2018-04-30 17:20:15 +02:00
|
|
|
|
(copy-recursively "DOC" doc)
|
2017-06-05 19:42:45 +02:00
|
|
|
|
|
2018-04-30 17:20:15 +02:00
|
|
|
|
(call-with-output-file
|
|
|
|
|
roguebox-adventures
|
|
|
|
|
(lambda (p)
|
|
|
|
|
(format p "\
|
|
|
|
|
#!~a
|
|
|
|
|
export PYTHONPATH=~a/LIB:~a
|
|
|
|
|
exec -a \"~a\" ~a \"$@\"\n"
|
|
|
|
|
(which "bash") data (getenv "PYTHONPATH")
|
|
|
|
|
(which "python3")
|
|
|
|
|
(string-append lib "/main.py"))))
|
|
|
|
|
(chmod roguebox-adventures #o555))
|
|
|
|
|
#t)))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("unzip" ,unzip)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("python-pygame" ,python-pygame)
|
|
|
|
|
("python-tmx" ,python-tmx)))
|
|
|
|
|
(home-page "https://rogueboxadventures.tuxfamily.org")
|
|
|
|
|
(synopsis "A classical roguelike/sandbox game")
|
|
|
|
|
(description
|
|
|
|
|
"RogueBox Adventures is a graphical roguelike with strong influences
|
2017-06-05 19:42:45 +02:00
|
|
|
|
from sandbox games like Minecraft or Terraria. The main idea of RogueBox
|
|
|
|
|
Adventures is to offer the player a kind of roguelike toy-world. This world
|
|
|
|
|
can be explored and changed freely.")
|
2018-04-30 17:20:15 +02:00
|
|
|
|
;; The GPL3+ is for code, the rest are for art.
|
|
|
|
|
(license (list license:cc0
|
|
|
|
|
license:cc-by3.0
|
|
|
|
|
license:gpl3+
|
|
|
|
|
license:silofl1.1))))
|
2017-06-01 19:48:44 +02:00
|
|
|
|
|
2017-02-22 20:13:15 +01:00
|
|
|
|
(define-public xshogi
|
|
|
|
|
(package
|
|
|
|
|
(name "xshogi")
|
|
|
|
|
(version "1.4.2")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://gnu/gnushogi/xshogi-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1dns0nhymak44by18sv48m4xb2skiwbi2i3nb9hl6w9iwd2i2brf"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libxaw" ,libxaw)
|
|
|
|
|
("libxt" ,libxt)))
|
2017-03-30 00:48:16 +02:00
|
|
|
|
(home-page "https://www.gnu.org/software/gnushogi/")
|
2017-02-25 13:20:26 +01:00
|
|
|
|
(synopsis "User interface for gnushogi")
|
2017-02-22 20:13:15 +01:00
|
|
|
|
(description "A graphical user interface for the package @code{gnushogi}.")
|
|
|
|
|
;; Contains a copy of GPLv3 but the licence notices simply
|
|
|
|
|
;; state "GNU General Public Licence" without specifying a version.
|
|
|
|
|
(license license:gpl1+)))
|
|
|
|
|
|
2014-05-01 02:36:32 +02:00
|
|
|
|
(define-public abbaye
|
|
|
|
|
(package
|
|
|
|
|
(name "abbaye")
|
2017-01-14 19:42:05 +01:00
|
|
|
|
(version "2.0.1")
|
2014-05-01 02:36:32 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
2017-01-14 19:42:05 +01:00
|
|
|
|
(uri (string-append "https://github.com/nevat/abbayedesmorts-gpl/"
|
|
|
|
|
"archive/v" version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
2014-05-01 02:36:32 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-01-14 19:42:05 +01:00
|
|
|
|
"1a67b0hq6271dd7pvwndjq29cwn2n8gawwz17xafa3k1hrhf8vw3"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
;; Unbundle fonts.
|
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
|
|
|
|
'(begin
|
|
|
|
|
(delete-file-recursively "fonts")
|
|
|
|
|
#t))))
|
2014-05-01 02:36:32 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
2017-01-14 19:42:05 +01:00
|
|
|
|
'(#:make-flags '("CC=gcc")
|
2015-10-10 09:45:04 +02:00
|
|
|
|
#:phases (modify-phases %standard-phases
|
|
|
|
|
(add-after 'set-paths 'set-sdl-paths
|
2015-10-10 09:47:15 +02:00
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(setenv "CPATH"
|
|
|
|
|
(string-append (assoc-ref inputs "sdl-union")
|
|
|
|
|
"/include/SDL"))))
|
2015-10-10 09:45:04 +02:00
|
|
|
|
(add-after 'patch-source-shebangs 'patch-makefile
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
;; Replace /usr with package output directory.
|
2017-01-14 19:42:05 +01:00
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("/usr") (assoc-ref outputs "out")))))
|
2015-10-10 09:45:04 +02:00
|
|
|
|
(add-before 'install 'make-install-dirs
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((prefix (assoc-ref outputs "out")))
|
|
|
|
|
;; Create directories that the makefile assumes exist.
|
|
|
|
|
(mkdir-p (string-append prefix "/bin"))
|
|
|
|
|
(mkdir-p (string-append prefix "/share/applications"))
|
|
|
|
|
(mkdir-p (string-append prefix "/share/pixmaps")))))
|
|
|
|
|
;; No configure script.
|
|
|
|
|
(delete 'configure))
|
2014-05-01 02:36:32 +02:00
|
|
|
|
#:tests? #f)) ;; No check target.
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
2017-01-14 19:42:05 +01:00
|
|
|
|
(inputs `(("sdl-union" ,(sdl-union (list sdl2 sdl2-image sdl2-mixer)))))
|
|
|
|
|
(home-page "https://github.com/nevat/abbayedesmorts-gpl")
|
2014-05-01 02:36:32 +02:00
|
|
|
|
(synopsis "GNU/Linux port of the indie game \"l'Abbaye des Morts\"")
|
|
|
|
|
(description "L'Abbaye des Morts is a 2D platform game set in 13th century
|
|
|
|
|
France. The Cathars, who preach about good Christian beliefs, were being
|
|
|
|
|
expelled by the Catholic Church out of the Languedoc region in France. One of
|
|
|
|
|
them, called Jean Raymond, found an old church in which to hide, not knowing
|
|
|
|
|
that beneath its ruins lay buried an ancient evil.")
|
2017-01-14 19:42:05 +01:00
|
|
|
|
(license license:gpl3)))
|
2014-06-13 06:54:44 +02:00
|
|
|
|
|
2017-02-10 23:45:11 +01:00
|
|
|
|
(define-public angband
|
|
|
|
|
(package
|
|
|
|
|
(name "angband")
|
|
|
|
|
(version "4.0.5")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://rephial.org/downloads/4.0/"
|
|
|
|
|
"angband-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0lpq2kms7hp421vrasx2bkkn9w08kr581ldwik3v0hlq6h7rlxhd"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
;; So, some of the sounds/graphics/tilesets are under different
|
|
|
|
|
;; licenses... some of them even nonfree! This is a console-only
|
|
|
|
|
;; version of this package so we just remove them.
|
|
|
|
|
;; In the future, if someone tries to make a graphical variant of
|
|
|
|
|
;; this package, they can deal with that mess themselves. :)
|
|
|
|
|
'(begin
|
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
|
|
|
|
(for-each (lambda (subdir)
|
|
|
|
|
(let ((lib-subdir (string-append "lib/" subdir)))
|
|
|
|
|
(delete-file-recursively lib-subdir)))
|
|
|
|
|
'("fonts" "icons" "sounds" "tiles"))
|
2017-02-10 23:45:11 +01:00
|
|
|
|
(substitute* "lib/Makefile"
|
|
|
|
|
;; And don't try to invoke makefiles in the directories we removed
|
|
|
|
|
(("gamedata customize help screens fonts tiles sounds icons user")
|
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
|
|
|
|
"gamedata customize help screens user"))
|
|
|
|
|
#t))))
|
2017-02-10 23:45:11 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ;no check target
|
|
|
|
|
#:configure-flags (list (string-append "--bindir=" %output "/bin"))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'autogen.sh
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "acinclude.m4"
|
|
|
|
|
(("ncursesw5-config") "ncursesw6-config"))
|
2017-04-17 16:34:36 +02:00
|
|
|
|
(zero? (system* "sh" "autogen.sh")))))))
|
2017-02-10 23:45:11 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)))
|
|
|
|
|
(inputs `(("ncurses" ,ncurses)))
|
|
|
|
|
(home-page "http://rephial.org/")
|
|
|
|
|
(synopsis "Dungeon exploration roguelike")
|
|
|
|
|
(description "Angband is a Classic dungeon exploration roguelike. Explore
|
|
|
|
|
the depths below Angband, seeking riches, fighting monsters, and preparing to
|
|
|
|
|
fight Morgoth, the Lord of Darkness.")
|
|
|
|
|
(license license:gpl2)))
|
|
|
|
|
|
2014-06-13 06:54:44 +02:00
|
|
|
|
(define-public pingus
|
|
|
|
|
(package
|
|
|
|
|
(name "pingus")
|
|
|
|
|
(version "0.7.6")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
2016-11-06 12:29:35 +01:00
|
|
|
|
(uri (string-append "https://github.com/Pingus/pingus/archive/v"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
2014-06-13 06:54:44 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-11-06 12:29:35 +01:00
|
|
|
|
"0r9v6as5vi7skvvy7b0fcaimhdlzmik64pyy68plgljhsghqkkf4"))
|
2016-04-08 14:18:13 +02:00
|
|
|
|
(patches (search-patches "pingus-sdl-libs-config.patch"))))
|
2014-06-13 06:54:44 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)
|
2017-11-17 10:21:23 +01:00
|
|
|
|
("scons-python2" ,scons-python2)))
|
2014-06-13 06:54:44 +02:00
|
|
|
|
(inputs `(("sdl" ,sdl)
|
|
|
|
|
("sdl-image" ,sdl-image)
|
|
|
|
|
("sdl-mixer" ,sdl-mixer)
|
|
|
|
|
("mesa" ,mesa)
|
2014-12-26 06:51:56 +01:00
|
|
|
|
("glu" ,glu)
|
2014-06-13 06:54:44 +02:00
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("boost" ,boost)))
|
|
|
|
|
(arguments
|
2017-11-17 10:21:23 +01:00
|
|
|
|
'(#:make-flags (list (string-append "PREFIX=" %output))
|
|
|
|
|
#:tests? #f ; no check target
|
2014-06-13 06:54:44 +02:00
|
|
|
|
#:phases
|
2017-03-29 19:41:26 +02:00
|
|
|
|
(modify-phases %standard-phases
|
2017-11-17 10:21:23 +01:00
|
|
|
|
(delete 'configure)))) ; no configure script
|
2014-06-13 06:54:44 +02:00
|
|
|
|
(home-page "http://pingus.seul.org/welcome.html")
|
|
|
|
|
(synopsis "Lemmings clone")
|
|
|
|
|
(description
|
|
|
|
|
"Pingus is a free Lemmings-like puzzle game in which the player takes
|
|
|
|
|
command of a bunch of small animals and has to guide them through levels.
|
|
|
|
|
Since the animals walk on their own, the player can only influence them by
|
|
|
|
|
giving them commands, like build a bridge, dig a hole, or redirect all animals
|
|
|
|
|
in the other direction. Multiple such commands are necessary to reach the
|
|
|
|
|
level's exit. The game is presented in a 2D side view.")
|
|
|
|
|
;; Some source files are under bsd-3 and gpl2+ licenses.
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(license license:gpl3+)))
|
2014-06-27 10:33:08 +02:00
|
|
|
|
|
|
|
|
|
(define-public talkfilters
|
|
|
|
|
(package
|
|
|
|
|
(name "talkfilters")
|
|
|
|
|
(version "2.3.8")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://www.hyperrealm.com/" name "/"
|
2015-03-14 18:22:25 +01:00
|
|
|
|
name "-" version ".tar.gz"))
|
2014-06-27 10:33:08 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32 "19nc5vq4bnkjvhk8srqddzhcs93jyvpm9r6lzjzwc1mgf08yg0a6"))))
|
|
|
|
|
(build-system gnu-build-system)
|
2017-03-30 00:48:16 +02:00
|
|
|
|
(home-page "https://www.gnu.org/software/talkfilters/")
|
2014-06-27 10:33:08 +02:00
|
|
|
|
(synopsis "Convert English text to humorous dialects")
|
|
|
|
|
(description "The GNU Talk Filters are programs that convert English text
|
|
|
|
|
into stereotyped or otherwise humorous dialects. The filters are provided as
|
|
|
|
|
a C library, so they can easily be integrated into other programs.")
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2014-07-01 14:44:04 +02:00
|
|
|
|
(define-public cmatrix
|
|
|
|
|
(package
|
|
|
|
|
(name "cmatrix")
|
|
|
|
|
(version "1.2a")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://www.asty.org/cmatrix/dist/cmatrix-" version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0k06fw2n8nzp1pcdynhajp5prba03gfgsbj91bknyjr5xb5fd9hz"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
2017-03-29 19:41:26 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
;; This old ‘configure’ script doesn't support
|
|
|
|
|
;; variables passed as arguments.
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(setenv "CONFIG_SHELL" (which "bash"))
|
|
|
|
|
(zero?
|
|
|
|
|
(system* "./configure"
|
|
|
|
|
(string-append "--prefix=" out)))))))))
|
2014-07-01 14:44:04 +02:00
|
|
|
|
(inputs `(("ncurses" ,ncurses)))
|
2014-12-28 17:57:16 +01:00
|
|
|
|
(home-page "http://www.asty.org/cmatrix")
|
2014-07-01 14:44:04 +02:00
|
|
|
|
(synopsis "Simulate the display from \"The Matrix\"")
|
|
|
|
|
(description "CMatrix simulates the display from \"The Matrix\" and is
|
|
|
|
|
based on the screensaver from the movie's website. It works with terminal
|
|
|
|
|
settings up to 132x300 and can scroll lines all at the same rate or
|
|
|
|
|
asynchronously and at a user-defined speed.")
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(license license:gpl2+)))
|
2014-07-12 19:42:13 +02:00
|
|
|
|
|
|
|
|
|
(define-public chess
|
|
|
|
|
(package
|
|
|
|
|
(name "chess")
|
2017-07-25 23:06:45 +02:00
|
|
|
|
(version "6.2.5")
|
2014-07-12 19:42:13 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://gnu/chess/gnuchess-" version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-07-25 23:06:45 +02:00
|
|
|
|
"00j8s0npgfdi41a0mr5w9qbdxagdk2v41lcr42rwl1jp6miyk6cs"))))
|
2014-07-12 19:42:13 +02:00
|
|
|
|
(build-system gnu-build-system)
|
2017-03-30 00:48:16 +02:00
|
|
|
|
(home-page "https://www.gnu.org/software/chess/")
|
2014-07-12 19:42:13 +02:00
|
|
|
|
(synopsis "Full chess implementation")
|
|
|
|
|
(description "GNU Chess is a chess engine. It allows you to compete
|
|
|
|
|
against the computer in a game of chess, either through the default terminal
|
|
|
|
|
interface or via an external visual interface such as GNU XBoard.")
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(license license:gpl3+)))
|
2014-07-12 19:42:13 +02:00
|
|
|
|
|
2014-11-11 00:05:20 +01:00
|
|
|
|
(define freedink-engine
|
2014-11-10 23:47:00 +01:00
|
|
|
|
(package
|
|
|
|
|
(name "freedink-engine")
|
|
|
|
|
(version "108.4")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://gnu/freedink/freedink-" version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"08c51imfjfcydm7h0va09z8qfw5nc837bi2x754ni2z737hb5kw2"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments `(#:configure-flags '("--disable-embedded-resources")))
|
2016-09-25 09:33:02 +02:00
|
|
|
|
(native-inputs `(("gettext" ,gettext-minimal)
|
2014-11-10 23:47:00 +01:00
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs `(("sdl" ,sdl)
|
|
|
|
|
("sdl-image" ,sdl-image)
|
|
|
|
|
("sdl-mixer" ,sdl-mixer)
|
|
|
|
|
("sdl-ttf" ,sdl-ttf)
|
|
|
|
|
("sdl-gfx" ,sdl-gfx)
|
|
|
|
|
("fontconfig" ,fontconfig)
|
|
|
|
|
("check" ,check)))
|
2017-03-30 00:48:16 +02:00
|
|
|
|
(home-page "https://www.gnu.org/software/freedink/")
|
2014-11-10 23:47:00 +01:00
|
|
|
|
(synopsis "Twisted adventures of young pig farmer Dink Smallwood")
|
|
|
|
|
(description
|
|
|
|
|
"GNU FreeDink is a free and portable re-implementation of the engine
|
|
|
|
|
for the role-playing game Dink Smallwood. It supports not only the original
|
|
|
|
|
game data files but it also supports user-produced game mods or \"D-Mods\".
|
|
|
|
|
To that extent, it also includes a front-end for managing all of your D-Mods.")
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(license license:gpl3+)))
|
2014-11-10 23:47:00 +01:00
|
|
|
|
|
2014-11-11 00:05:20 +01:00
|
|
|
|
(define freedink-data
|
2014-11-10 23:47:00 +01:00
|
|
|
|
(package
|
|
|
|
|
(name "freedink-data")
|
2017-04-17 18:16:05 +02:00
|
|
|
|
(version "1.08.20170401")
|
2014-11-10 23:47:00 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://gnu/freedink/freedink-data-"
|
2017-04-17 18:16:05 +02:00
|
|
|
|
version ".tar.xz"))
|
2014-11-10 23:47:00 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-04-17 18:16:05 +02:00
|
|
|
|
"1zx7qywibhznj7bnz217404scr8dfh0xj24xjihnda5iapzz7lz8"))))
|
2014-11-10 23:47:00 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
2017-03-29 19:41:26 +02:00
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure) ; no configure script
|
|
|
|
|
(delete 'check)) ; no tests
|
2014-11-10 23:47:00 +01:00
|
|
|
|
#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")))))
|
2017-03-30 00:48:16 +02:00
|
|
|
|
(home-page "https://www.gnu.org/software/freedink/")
|
2014-11-10 23:47:00 +01:00
|
|
|
|
(synopsis "Game data for GNU Freedink")
|
|
|
|
|
(description
|
|
|
|
|
"This package contains the game data of GNU Freedink.")
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(license license:gpl3+)))
|
2014-11-10 23:47:00 +01:00
|
|
|
|
|
|
|
|
|
;; TODO: Add freedink-dfarc when there's a wxWidgets package.
|
|
|
|
|
|
2014-11-11 00:05:20 +01:00
|
|
|
|
(define-public freedink
|
|
|
|
|
;; This is a wrapper that tells the engine where to find the data.
|
|
|
|
|
(package (inherit freedink-engine)
|
|
|
|
|
(name "freedink")
|
|
|
|
|
(build-system trivial-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:builder (begin
|
|
|
|
|
(use-modules (guix build utils))
|
|
|
|
|
|
|
|
|
|
(let* ((output (assoc-ref %outputs "out"))
|
|
|
|
|
(bin (string-append output "/bin"))
|
|
|
|
|
(executable (string-append bin "/freedink")))
|
|
|
|
|
(mkdir-p bin)
|
|
|
|
|
(call-with-output-file executable
|
|
|
|
|
(lambda (port)
|
|
|
|
|
(format port "#!~a/bin/sh
|
|
|
|
|
exec ~a/bin/freedink -refdir ~a/share/dink\n"
|
|
|
|
|
(assoc-ref %build-inputs "bash")
|
|
|
|
|
(assoc-ref %build-inputs "engine")
|
|
|
|
|
(assoc-ref %build-inputs "data"))
|
gnu: Use invoke and return #t from all builders.
* gnu/packages/admin.scm, gnu/packages/android.scm, gnu/packages/audio.scm,
gnu/packages/avr.scm, gnu/packages/base.scm, gnu/packages/bioinformatics.scm,
gnu/packages/certs.scm, gnu/packages/check.scm, gnu/packages/code.scm,
gnu/packages/commencement.scm, gnu/packages/dictionaries.scm,
gnu/packages/docbook.scm, gnu/packages/emacs.scm, gnu/packages/embedded.scm,
gnu/packages/fonts.scm, gnu/packages/games.scm, gnu/packages/gnome.scm,
gnu/packages/gnu-doc.scm, gnu/packages/guile.scm, gnu/packages/hurd.scm,
gnu/packages/javascript.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm, gnu/packages/lxde.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm, gnu/packages/mate.scm,
gnu/packages/pkg-config.scm, gnu/packages/qt.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/sdl.scm, gnu/packages/statistics.scm,
gnu/packages/syncthing.scm, gnu/packages/tex.scm, gnu/packages/web.scm,
gnu/packages/wine.scm, gnu/packages/xfce.scm: In the builders of packages
using 'trivial-build-system', use invoke where appropriate, raise exceptions
on errors, and otherwise return #t.
2018-03-28 02:14:05 +02:00
|
|
|
|
(chmod port #o777)))
|
|
|
|
|
#t))
|
2014-11-11 00:05:20 +01:00
|
|
|
|
#:modules ((guix build utils))))
|
|
|
|
|
(inputs `(("engine" ,freedink-engine)
|
|
|
|
|
("data" ,freedink-data)
|
|
|
|
|
("bash" ,bash)))
|
|
|
|
|
(native-inputs '())))
|
|
|
|
|
|
2014-07-12 19:42:13 +02:00
|
|
|
|
(define-public xboard
|
|
|
|
|
(package
|
|
|
|
|
(name "xboard")
|
2016-10-09 08:18:51 +02:00
|
|
|
|
(version "4.9.1")
|
2014-07-12 19:42:13 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://gnu/xboard/xboard-" version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-10-09 08:18:51 +02:00
|
|
|
|
"1mkh36xnnacnz9r00b5f9ld9309k32jv6mcavklbdnca8bl56bib"))))
|
2014-07-12 19:42:13 +02:00
|
|
|
|
(build-system gnu-build-system)
|
2016-06-09 07:59:50 +02:00
|
|
|
|
(inputs
|
|
|
|
|
`(("gtk+" ,gtk+-2)
|
|
|
|
|
("librsvg" ,librsvg)))
|
2016-10-09 08:18:51 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("texinfo" ,texinfo)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
2017-03-30 00:48:16 +02:00
|
|
|
|
(home-page "https://www.gnu.org/software/xboard/")
|
2014-07-12 19:42:13 +02:00
|
|
|
|
(synopsis "Graphical user interface for chess programs")
|
|
|
|
|
(description "GNU XBoard is a graphical board for all varieties of chess,
|
|
|
|
|
including international chess, xiangqi (Chinese chess), shogi (Japanese chess)
|
|
|
|
|
and Makruk. Several lesser-known variants are also supported. It presents a
|
|
|
|
|
fully interactive graphical interface and it can load and save games in the
|
|
|
|
|
Portable Game Notation.")
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(license license:gpl3+)))
|
2014-10-13 12:33:39 +02:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
(define-public xboing
|
|
|
|
|
(package
|
|
|
|
|
(name "xboing")
|
|
|
|
|
(version "2.4")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://www.techrescue.org/xboing/xboing"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
2017-12-21 08:02:46 +01:00
|
|
|
|
(base32 "16m2si8wmshxpifk861vhpqviqxgcg8bxj6wfw8hpnm4r2w9q0b7"))
|
|
|
|
|
(patches (search-patches "xboing-CVE-2004-0149.patch"))))
|
2014-10-13 12:33:39 +02:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f
|
|
|
|
|
#:phases
|
2017-03-29 19:41:26 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
2015-03-14 18:22:25 +01:00
|
|
|
|
|
2017-03-29 19:41:26 +02:00
|
|
|
|
(substitute* "Imakefile"
|
|
|
|
|
(("XPMINCLUDE[\t ]*= -I/usr/X11/include/X11")
|
|
|
|
|
(string-append "XPMINCLUDE = -I"
|
|
|
|
|
(assoc-ref %build-inputs "libxpm")
|
|
|
|
|
"/include/X11")))
|
2015-03-14 18:22:25 +01:00
|
|
|
|
|
2017-03-29 19:41:26 +02:00
|
|
|
|
(substitute* "Imakefile"
|
|
|
|
|
(("XBOING_DIR = \\.") "XBOING_DIR=$(PROJECTROOT)"))
|
2015-03-14 18:22:25 +01:00
|
|
|
|
|
2017-03-29 19:41:26 +02:00
|
|
|
|
;; FIXME: HIGH_SCORE_FILE should be set to somewhere writeable
|
2015-03-14 18:22:25 +01:00
|
|
|
|
|
2017-03-29 19:41:26 +02:00
|
|
|
|
(zero? (system* "xmkmf" "-a"
|
|
|
|
|
(string-append "-DProjectRoot="
|
|
|
|
|
(assoc-ref outputs "out"))))))
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(and
|
|
|
|
|
(zero? (system* "make" "install.man"))
|
|
|
|
|
(zero? (system* "make" "install"))))))))
|
2014-10-13 12:33:39 +02:00
|
|
|
|
(inputs `(("libx11" ,libx11)
|
|
|
|
|
("libxext" ,libxext)
|
|
|
|
|
("libxpm" ,libxpm)))
|
|
|
|
|
(native-inputs `(("imake" ,imake)
|
|
|
|
|
("inetutils" ,inetutils)
|
|
|
|
|
("makedepend" ,makedepend)))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://www.techrescue.org/xboing")
|
|
|
|
|
(synopsis "Ball and paddle game")
|
|
|
|
|
(description "XBoing is a blockout type game where you have a paddle which
|
|
|
|
|
you control to bounce a ball around the game zone destroying blocks with a
|
gnu: Some cleanup based on lint checkers.
* gnu/packages/admin.scm, gnu/packages/aidc.scm, gnu/packages/algebra.scm,
gnu/packages/apr.scm, gnu/packages/avahi.scm, gnu/packages/backup.scm,
gnu/packages/base.scm, gnu/packages/calcurse.scm, gnu/packages/cdrom.scm,
gnu/packages/check.scm, gnu/packages/compression.scm, gnu/packages/cook.scm,
gnu/packages/crypto.scm, gnu/packages/cryptsetup.scm, gnu/packages/curl.scm,
gnu/packages/cyrus-sasl.scm, gnu/packages/databases.scm,
gnu/packages/doxygen.scm, gnu/packages/dwm.scm, gnu/packages/elf.scm,
gnu/packages/emacs.scm, gnu/packages/feh.scm, gnu/packages/file.scm,
gnu/packages/fish.scm, gnu/packages/flex.scm, gnu/packages/fltk.scm,
gnu/packages/fontutils.scm, gnu/packages/games.scm, gnu/packages/gcal.scm,
gnu/packages/gcc.scm, gnu/packages/geeqie.scm, gnu/packages/ghostscript.scm,
gnu/packages/gimp.scm, gnu/packages/gl.scm, gnu/packages/glib.scm,
gnu/packages/gnome.scm, gnu/packages/gnunet.scm, gnu/packages/gnupg.scm,
gnu/packages/gperf.scm, gnu/packages/grub.scm, gnu/packages/gsasl.scm,
gnu/packages/gtk.scm, gnu/packages/guile-wm.scm, gnu/packages/guile.scm,
gnu/packages/hurd.scm, gnu/packages/icu4c.scm, gnu/packages/image.scm,
gnu/packages/imagemagick.scm, gnu/packages/irssi.scm, gnu/packages/kde.scm,
gnu/packages/libdaemon.scm, gnu/packages/libevent.scm,
gnu/packages/libidn.scm, gnu/packages/libusb.scm, gnu/packages/linux.scm,
gnu/packages/lout.scm, gnu/packages/lsh.scm, gnu/packages/lsof.scm,
gnu/packages/lua.scm, gnu/packages/maths.scm, gnu/packages/mcrypt.scm,
gnu/packages/mp3.scm, gnu/packages/netpbm.scm, gnu/packages/noweb.scm,
gnu/packages/ocaml.scm, gnu/packages/openssl.scm, gnu/packages/pcre.scm,
gnu/packages/pdf.scm, gnu/packages/pkg-config.scm,
gnu/packages/pretty-print.scm, gnu/packages/python.scm, gnu/packages/qt.scm,
gnu/packages/rsync.scm, gnu/packages/scheme.scm, gnu/packages/scrot.scm,
gnu/packages/sdl.scm, gnu/packages/skribilo.scm, gnu/packages/ssh.scm,
gnu/packages/stalonetray.scm, gnu/packages/tcl.scm, gnu/packages/tcsh.scm,
gnu/packages/telephony.scm, gnu/packages/texlive.scm, gnu/packages/tor.scm,
gnu/packages/valgrind.scm, gnu/packages/version-control.scm,
gnu/packages/vim.scm, gnu/packages/vpn.scm, gnu/packages/w3m.scm,
gnu/packages/web.scm, gnu/packages/wordnet.scm, gnu/packages/xiph.scm,
gnu/packages/xml.scm, gnu/packages/xorg.scm, gnu/packages/zile.scm,
gnu/packages/zip.scm, gnu/packages/zsh.scm [synopsis, description]: Adjust
according to lint checkers.
* gnu/packages/fltk.scm (fltk)[source]: Wrap long line in uri.
* /gnu/packages/xiph.scm (libogg, libtheora, vorbis-tools)[source]: Same.
2014-10-24 06:46:59 +02:00
|
|
|
|
proton ball. Each block carries a different point value. The more blocks you
|
|
|
|
|
destroy, the better your score. The person with the highest score wins.")
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(license (license:x11-style "file://COPYING"
|
|
|
|
|
"Very similar to the X11 licence."))))
|
2014-11-12 13:28:51 +01:00
|
|
|
|
|
|
|
|
|
(define-public gtypist
|
|
|
|
|
(package
|
|
|
|
|
(name "gtypist")
|
|
|
|
|
(version "2.9.5")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://gnu/gtypist/gtypist-"
|
|
|
|
|
version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0xzrkkmj0b1dw3yr0m9hml2y634cc4h61im6zwcq57s7285z8fn1"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
;; We do not provide `ncurses.h' within an `ncursesw'
|
|
|
|
|
;; sub-directory, so patch the source accordingly. See
|
|
|
|
|
;; <http://bugs.gnu.org/19018>.
|
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
|
|
|
|
'(begin
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(substitute* file
|
|
|
|
|
(("ncursesw/ncurses.h")
|
|
|
|
|
"ncurses.h")))
|
|
|
|
|
(find-files "." "configure$|\\.c$"))
|
|
|
|
|
#t))))
|
2014-11-12 13:28:51 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs `(("ncurses" ,ncurses)
|
|
|
|
|
("perl" ,perl)))
|
2017-03-30 00:48:16 +02:00
|
|
|
|
(home-page "https://www.gnu.org/software/gtypist/")
|
2014-11-12 13:28:51 +01:00
|
|
|
|
(synopsis "Typing tutor")
|
|
|
|
|
(description
|
|
|
|
|
"GNU Typist is a universal typing tutor. It can be used to learn and
|
|
|
|
|
practice touch-typing. Several tutorials are included; in addition to
|
|
|
|
|
tutorials for the standard QWERTY layout, there are also tutorials for the
|
|
|
|
|
alternative layouts Dvorak and Colemak, as well as for the numpad. Tutorials
|
|
|
|
|
are primarily in English, however some in other languages are provided.")
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(license license:gpl3+)))
|
2014-11-13 15:50:57 +01:00
|
|
|
|
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(define-public irrlicht
|
|
|
|
|
(package
|
|
|
|
|
(name "irrlicht")
|
2016-10-17 08:48:06 +02:00
|
|
|
|
(version "1.8.4")
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"mirror://sourceforge/irrlicht/Irrlicht%20SDK/"
|
|
|
|
|
(version-major+minor version)
|
|
|
|
|
"/" version "/irrlicht-" version ".zip"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-10-17 08:48:06 +02:00
|
|
|
|
"0cz4z4dwrv5ypl19ll67wl6jjpy5k6ly4vr042w4br88qq5jhazl"))))
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
2017-03-29 19:41:26 +02:00
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'fix-build-env
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("INSTALL_DIR = /usr/local/lib")
|
|
|
|
|
(string-append "INSTALL_DIR = " out "/lib")))
|
|
|
|
|
;; The Makefile assumes these directories exist.
|
|
|
|
|
(mkdir-p (string-append out "/lib"))
|
|
|
|
|
(mkdir-p (string-append out "/include")))))
|
|
|
|
|
(replace 'unpack
|
|
|
|
|
(lambda* (#:key source #:allow-other-keys)
|
|
|
|
|
(and (zero? (system* "unzip" source))
|
|
|
|
|
;; The actual source is buried a few directories deep.
|
|
|
|
|
(chdir (string-append "irrlicht-" ,version
|
|
|
|
|
"/source/Irrlicht/")))))
|
|
|
|
|
(delete 'configure)) ; no configure script
|
|
|
|
|
#:tests? #f ; no check target
|
2014-11-16 18:56:12 +01:00
|
|
|
|
#:make-flags '("CC=gcc" "sharedlib")))
|
|
|
|
|
(native-inputs
|
2016-10-17 08:48:06 +02:00
|
|
|
|
`(("unzip" ,unzip)))
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(inputs
|
2014-12-26 21:48:26 +01:00
|
|
|
|
`(("mesa" ,mesa)
|
|
|
|
|
("glu" ,glu)))
|
2014-11-16 18:56:12 +01:00
|
|
|
|
(synopsis "3D game engine written in C++")
|
|
|
|
|
(description
|
|
|
|
|
"The Irrlicht Engine is a high performance realtime 3D engine written in
|
|
|
|
|
C++. Features include an OpenGL renderer, extensible materials, scene graph
|
|
|
|
|
management, character animation, particle and other special effects, support
|
|
|
|
|
for common mesh file formats, and collision detection.")
|
|
|
|
|
(home-page "http://irrlicht.sourceforge.net/")
|
|
|
|
|
(license license:zlib)))
|
2014-09-06 20:03:12 +02:00
|
|
|
|
|
2015-08-31 10:09:40 +02:00
|
|
|
|
(define-public mars
|
|
|
|
|
;; The latest release on SourceForge relies on an unreleased version of SFML
|
|
|
|
|
;; with a different API, so we take the latest version from the official
|
|
|
|
|
;; repository on Github.
|
2016-06-02 13:29:52 +02:00
|
|
|
|
(let ((commit "c855d044094a1d92317e38935d81ba938946132e")
|
2015-08-31 10:09:40 +02:00
|
|
|
|
(revision "1"))
|
|
|
|
|
(package
|
|
|
|
|
(name "mars")
|
2016-06-02 13:29:52 +02:00
|
|
|
|
(version (string-append "0.7.5." revision "." (string-take commit 7) ))
|
2015-08-31 10:09:40 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/thelaui/M.A.R.S..git")
|
|
|
|
|
(commit commit)))
|
|
|
|
|
(file-name (string-append name "-" version))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1r4c5gap1z2zsv4yjd34qriqkxaq4lb4rykapyzkkdf4g36lc3nh"))
|
2016-04-08 14:18:13 +02:00
|
|
|
|
(patches (search-patches "mars-sfml-2.3.patch"
|
|
|
|
|
"mars-install.patch"))))
|
2015-08-31 10:09:40 +02:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; There are no tests
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'fix-install-path
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "src/CMakeLists.txt"
|
|
|
|
|
(("\\$\\{CMAKE_INSTALL_PREFIX\\}/games")
|
|
|
|
|
"${CMAKE_INSTALL_PREFIX}/bin"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'fix-data-path
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "src/System/settings.cpp"
|
|
|
|
|
(("C_dataPath = \"./data/\";")
|
|
|
|
|
(string-append "C_dataPath = \""
|
|
|
|
|
(assoc-ref outputs "out")
|
|
|
|
|
"/share/games/marsshooter/\";")))
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("mesa" ,mesa)
|
|
|
|
|
("fribidi" ,fribidi)
|
|
|
|
|
("taglib" ,taglib)
|
|
|
|
|
("sfml" ,sfml)))
|
|
|
|
|
(home-page "http://marsshooter.org")
|
|
|
|
|
(synopsis "2D space shooter")
|
|
|
|
|
(description
|
|
|
|
|
"M.A.R.S. is a 2D space shooter with pretty visual effects and
|
|
|
|
|
attractive physics. Players can battle each other or computer controlled
|
|
|
|
|
enemies in different game modes such as space ball, death match, team death
|
|
|
|
|
match, cannon keep, and grave-itation pit.")
|
|
|
|
|
(license license:gpl3+))))
|
|
|
|
|
|
2014-09-06 20:03:12 +02:00
|
|
|
|
(define minetest-data
|
|
|
|
|
(package
|
|
|
|
|
(name "minetest-data")
|
2017-06-08 21:58:45 +02:00
|
|
|
|
(version "0.4.16")
|
2014-09-06 20:03:12 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/minetest/minetest_game/archive/"
|
|
|
|
|
version ".tar.gz"))
|
gnu: Add 'file-name' fields for github source tarballs without a name.
* gnu/packages/aarddict.scm (aarddict), gnu/packages/algebra.scm (arb),
gnu/packages/audio.scm (jack-2, lvtk),
gnu/packages/bioinformatics.scm (bedops, bedtools, bowtie),
gnu/packages/game-development.scm (tiled),
gnu/packages/games.scm (minetest-data, minetest, retroarch),
gnu/packages/jrnl.scm (jrnl), gnu/packages/kde.scm (qjson),
gnu/packages/libevent.scm (libuv), gnu/packages/linux.scm (pflask),
gnu/packages/mail.scm (offlineimap, libetpan),
gnu/packages/maths.scm (arpack-ng), gnu/packages/ninja.scm (ninja),
gnu/packages/nutrition.scm (gourmet),
gnu/packages/python.scm (python-cairocffi), gnu/packages/rdf.scm (lrdf),
gnu/packages/ruby.scm (ruby-i18n), gnu/packages/sxiv.scm (sxiv): Add
'file-name' field to origin.
2015-02-27 18:23:27 +01:00
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
2014-09-06 20:03:12 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-06-08 21:58:45 +02:00
|
|
|
|
"0nibpm600rbv9dg1zgcsl5grlbqx0b5l6cg1lp6sqkwvjialb4ga"))))
|
2014-09-06 20:03:12 +02:00
|
|
|
|
(build-system trivial-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("source" ,source)
|
|
|
|
|
("tar" ,tar)
|
|
|
|
|
("gzip" ,(@ (gnu packages compression) gzip))))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:modules ((guix build utils))
|
|
|
|
|
#:builder (begin
|
|
|
|
|
(use-modules (guix build utils))
|
|
|
|
|
(let ((tar (string-append (assoc-ref %build-inputs "tar")
|
|
|
|
|
"/bin/tar"))
|
|
|
|
|
(install-dir (string-append
|
|
|
|
|
%output
|
|
|
|
|
"/share/minetest/games/minetest_game"))
|
|
|
|
|
(path (string-append (assoc-ref %build-inputs
|
|
|
|
|
"gzip")
|
|
|
|
|
"/bin")))
|
|
|
|
|
(setenv "PATH" path)
|
gnu: Use invoke and return #t from all builders.
* gnu/packages/admin.scm, gnu/packages/android.scm, gnu/packages/audio.scm,
gnu/packages/avr.scm, gnu/packages/base.scm, gnu/packages/bioinformatics.scm,
gnu/packages/certs.scm, gnu/packages/check.scm, gnu/packages/code.scm,
gnu/packages/commencement.scm, gnu/packages/dictionaries.scm,
gnu/packages/docbook.scm, gnu/packages/emacs.scm, gnu/packages/embedded.scm,
gnu/packages/fonts.scm, gnu/packages/games.scm, gnu/packages/gnome.scm,
gnu/packages/gnu-doc.scm, gnu/packages/guile.scm, gnu/packages/hurd.scm,
gnu/packages/javascript.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm, gnu/packages/lxde.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm, gnu/packages/mate.scm,
gnu/packages/pkg-config.scm, gnu/packages/qt.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/sdl.scm, gnu/packages/statistics.scm,
gnu/packages/syncthing.scm, gnu/packages/tex.scm, gnu/packages/web.scm,
gnu/packages/wine.scm, gnu/packages/xfce.scm: In the builders of packages
using 'trivial-build-system', use invoke where appropriate, raise exceptions
on errors, and otherwise return #t.
2018-03-28 02:14:05 +02:00
|
|
|
|
(invoke tar "xvf" (assoc-ref %build-inputs "source"))
|
2014-09-06 20:03:12 +02:00
|
|
|
|
(chdir (string-append "minetest_game-" ,version))
|
|
|
|
|
(mkdir-p install-dir)
|
gnu: Use invoke and return #t from all builders.
* gnu/packages/admin.scm, gnu/packages/android.scm, gnu/packages/audio.scm,
gnu/packages/avr.scm, gnu/packages/base.scm, gnu/packages/bioinformatics.scm,
gnu/packages/certs.scm, gnu/packages/check.scm, gnu/packages/code.scm,
gnu/packages/commencement.scm, gnu/packages/dictionaries.scm,
gnu/packages/docbook.scm, gnu/packages/emacs.scm, gnu/packages/embedded.scm,
gnu/packages/fonts.scm, gnu/packages/games.scm, gnu/packages/gnome.scm,
gnu/packages/gnu-doc.scm, gnu/packages/guile.scm, gnu/packages/hurd.scm,
gnu/packages/javascript.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm, gnu/packages/lxde.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm, gnu/packages/mate.scm,
gnu/packages/pkg-config.scm, gnu/packages/qt.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/sdl.scm, gnu/packages/statistics.scm,
gnu/packages/syncthing.scm, gnu/packages/tex.scm, gnu/packages/web.scm,
gnu/packages/wine.scm, gnu/packages/xfce.scm: In the builders of packages
using 'trivial-build-system', use invoke where appropriate, raise exceptions
on errors, and otherwise return #t.
2018-03-28 02:14:05 +02:00
|
|
|
|
(copy-recursively "." install-dir)
|
|
|
|
|
#t))))
|
2014-09-06 20:03:12 +02:00
|
|
|
|
(synopsis "Main game data for the Minetest game engine")
|
|
|
|
|
(description
|
|
|
|
|
"Game data for the Minetest infinite-world block sandox game.")
|
|
|
|
|
(home-page "http://minetest.net")
|
|
|
|
|
(license license:lgpl2.1+)))
|
2014-09-05 20:46:44 +02:00
|
|
|
|
|
|
|
|
|
(define-public minetest
|
|
|
|
|
(package
|
|
|
|
|
(name "minetest")
|
2017-06-08 21:58:45 +02:00
|
|
|
|
(version "0.4.16")
|
2014-09-05 20:46:44 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/minetest/minetest/archive/"
|
|
|
|
|
version ".tar.gz"))
|
gnu: Add 'file-name' fields for github source tarballs without a name.
* gnu/packages/aarddict.scm (aarddict), gnu/packages/algebra.scm (arb),
gnu/packages/audio.scm (jack-2, lvtk),
gnu/packages/bioinformatics.scm (bedops, bedtools, bowtie),
gnu/packages/game-development.scm (tiled),
gnu/packages/games.scm (minetest-data, minetest, retroarch),
gnu/packages/jrnl.scm (jrnl), gnu/packages/kde.scm (qjson),
gnu/packages/libevent.scm (libuv), gnu/packages/linux.scm (pflask),
gnu/packages/mail.scm (offlineimap, libetpan),
gnu/packages/maths.scm (arpack-ng), gnu/packages/ninja.scm (ninja),
gnu/packages/nutrition.scm (gourmet),
gnu/packages/python.scm (python-cairocffi), gnu/packages/rdf.scm (lrdf),
gnu/packages/ruby.scm (ruby-i18n), gnu/packages/sxiv.scm (sxiv): Add
'file-name' field to origin.
2015-02-27 18:23:27 +01:00
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
2014-09-05 20:46:44 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-06-08 21:58:45 +02:00
|
|
|
|
"0mbnf1ma4gsw9ah68ply04059xkfx5psdxwalxp78sgmx4ypkwqf"))))
|
2014-09-05 20:46:44 +02:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
2015-03-14 18:22:25 +01:00
|
|
|
|
'(#:configure-flags
|
|
|
|
|
(list "-DRUN_IN_PLACE=0"
|
|
|
|
|
"-DENABLE_FREETYPE=1"
|
|
|
|
|
"-DENABLE_GETTEXT=1"
|
|
|
|
|
(string-append "-DIRRLICHT_INCLUDE_DIR="
|
|
|
|
|
(assoc-ref %build-inputs "irrlicht")
|
|
|
|
|
"/include/irrlicht")
|
|
|
|
|
(string-append "-DCURL_INCLUDE_DIR="
|
|
|
|
|
(assoc-ref %build-inputs "curl")
|
|
|
|
|
"/include/curl"))
|
2014-09-05 20:46:44 +02:00
|
|
|
|
#:tests? #f)) ; no check target
|
|
|
|
|
(native-search-paths
|
|
|
|
|
(list (search-path-specification
|
|
|
|
|
(variable "MINETEST_SUBGAME_PATH")
|
packages: Add 'file-type' field to 'search-path-specification'.
Fixes <http://bugs.gnu.org/18033>.
* guix/packages.scm (<search-path-specification>): Rename 'directories'
field to 'files'. Add 'file-type'.
(search-path-specification->sexp): Honor 'file-type'.
* gnu/packages/autotools.scm, gnu/packages/bootstrap.scm,
gnu/packages/cross-base.scm, gnu/packages/games.scm,
gnu/packages/gcc.scm, gnu/packages/glib.scm,
gnu/packages/guile.scm, gnu/packages/man.scm,
gnu/packages/perl.scm, gnu/packages/pkg-config.scm,
gnu/packages/python.scm, gnu/packages/ruby.scm,
gnu/packages/xfce.scm: Change 'directories' to 'files'.
* tests/packages.scm ("search paths"): Change 'directories' field to
'files'.
* guix/scripts/environment.scm (for-each-search-path): Likewise.
2014-12-27 23:22:08 +01:00
|
|
|
|
(files '("share/minetest/games")))))
|
2014-09-05 20:46:44 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("irrlicht" ,irrlicht)
|
|
|
|
|
("libpng" ,libpng)
|
2015-03-14 18:43:47 +01:00
|
|
|
|
("libjpeg" ,libjpeg)
|
2014-09-05 20:46:44 +02:00
|
|
|
|
("libxxf86vm" ,libxxf86vm)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("libogg" ,libogg)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("freetype" ,(@ (gnu packages fontutils) freetype))
|
|
|
|
|
("curl" ,curl)
|
|
|
|
|
("luajit" ,luajit)
|
2016-09-25 09:33:02 +02:00
|
|
|
|
("gettext" ,gettext-minimal)
|
2014-09-05 20:46:44 +02:00
|
|
|
|
("sqlite" ,sqlite)))
|
|
|
|
|
(propagated-inputs
|
|
|
|
|
`(("minetest-data" ,minetest-data)))
|
|
|
|
|
(synopsis "Infinite-world block sandbox game")
|
|
|
|
|
(description
|
|
|
|
|
"Minetest is a sandbox construction game. Players can create and destroy
|
|
|
|
|
various types of blocks in a three-dimensional open world. This allows
|
|
|
|
|
forming structures in every possible creation, on multiplayer servers or as a
|
|
|
|
|
single player. Mods and texture packs allow players to personalize the game
|
|
|
|
|
in different ways.")
|
|
|
|
|
(home-page "http://minetest.net")
|
|
|
|
|
(license license:lgpl2.1+)))
|
2014-11-18 16:58:02 +01:00
|
|
|
|
|
|
|
|
|
(define glkterm
|
|
|
|
|
(package
|
|
|
|
|
(name "glkterm")
|
|
|
|
|
(version "1.0.4")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://www.ifarchive.org/if-archive/programming/"
|
|
|
|
|
"glk/implementations/glkterm-104.tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0zlj9nlnkdlvgbiliczinirqygiq8ikg5hzh5vgcmnpg9pvnwga7"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(propagated-inputs `(("ncurses" ,ncurses))) ; required by Make.glkterm
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:tests? #f ; no check target
|
|
|
|
|
#:phases
|
2017-03-29 19:41:26 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(inc (string-append out "/include"))
|
|
|
|
|
(lib (string-append out "/lib")))
|
|
|
|
|
(for-each
|
|
|
|
|
(lambda (file)
|
|
|
|
|
(install-file file inc))
|
|
|
|
|
'("glk.h" "glkstart.h" "gi_blorb.h" "gi_dispa.h" "Make.glkterm"))
|
|
|
|
|
(install-file "libglkterm.a" lib))
|
|
|
|
|
#t))
|
|
|
|
|
(delete 'configure)))) ; no configure script
|
2014-11-18 16:58:02 +01:00
|
|
|
|
(home-page "http://www.eblong.com/zarf/glk/")
|
|
|
|
|
(synopsis "Curses Implementation of the Glk API")
|
|
|
|
|
(description
|
|
|
|
|
"Glk defines a portable API for applications with text UIs. It was
|
|
|
|
|
primarily designed for interactive fiction, but it should be suitable for many
|
|
|
|
|
interactive text utilities, particularly those based on a command line.
|
|
|
|
|
This is an implementation of the Glk library which runs in a terminal window,
|
2017-03-29 19:01:20 +02:00
|
|
|
|
using the @code{curses.h} library for screen control.")
|
2014-11-18 16:58:02 +01:00
|
|
|
|
(license (license:fsf-free "file://README"))))
|
|
|
|
|
|
|
|
|
|
(define-public glulxe
|
|
|
|
|
(package
|
|
|
|
|
(name "glulxe")
|
2017-03-04 10:05:49 +01:00
|
|
|
|
(version "0.5.4")
|
2014-11-18 16:58:02 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://www.ifarchive.org/if-archive/programming/"
|
2017-03-04 10:05:49 +01:00
|
|
|
|
"glulx/interpreters/glulxe/glulxe-054.tar.gz"))
|
2014-11-18 16:58:02 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-03-04 10:05:49 +01:00
|
|
|
|
"0vipydg6ra90yf9b3ipgppwxyb2xdhcxwvirgjy0v20wlf56zhhz"))))
|
2014-11-18 16:58:02 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs `(("glk" ,glkterm)))
|
|
|
|
|
(arguments
|
2017-03-29 19:41:26 +02:00
|
|
|
|
'(#:tests? #f ; no check target
|
2014-11-18 16:58:02 +01:00
|
|
|
|
#:make-flags
|
|
|
|
|
(let* ((glk (assoc-ref %build-inputs "glk")))
|
|
|
|
|
(list (string-append "GLKINCLUDEDIR=" glk "/include")
|
|
|
|
|
(string-append "GLKLIBDIR=" glk "/lib")
|
|
|
|
|
(string-append "GLKMAKEFILE=" "Make.glkterm")))
|
|
|
|
|
#:phases
|
2017-03-29 19:41:26 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin")))
|
|
|
|
|
(install-file "glulxe" bin))
|
|
|
|
|
#t))
|
|
|
|
|
(delete 'configure)))) ; no configure script
|
2014-11-18 16:58:02 +01:00
|
|
|
|
(home-page "http://www.eblong.com/zarf/glulx/")
|
|
|
|
|
(synopsis "Interpreter for Glulx VM")
|
|
|
|
|
(description
|
|
|
|
|
"Glulx is a 32-bit portable virtual machine intended for writing and
|
|
|
|
|
playing interactive fiction. It was designed by Andrew Plotkin to relieve
|
|
|
|
|
some of the restrictions in the venerable Z-machine format. This is the
|
2017-03-29 19:02:34 +02:00
|
|
|
|
reference interpreter, using the Glk API.")
|
2017-03-04 10:05:49 +01:00
|
|
|
|
(license license:expat)))
|
2015-01-16 12:53:00 +01:00
|
|
|
|
|
2015-05-21 14:13:41 +02:00
|
|
|
|
(define-public fizmo
|
|
|
|
|
(package
|
|
|
|
|
(name "fizmo")
|
2018-06-20 04:23:41 +02:00
|
|
|
|
(version "0.8.5")
|
2015-05-21 14:13:41 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2018-06-20 04:21:25 +02:00
|
|
|
|
(uri (string-append "https://fizmo.spellbreaker.org/source/"
|
2015-05-21 14:13:41 +02:00
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-20 04:23:41 +02:00
|
|
|
|
"1amyc4n41jf08kxmdgkk30bzzx54miaxa97w28f417qwn8lrl98w"))))
|
2015-05-21 14:13:41 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:configure-flags
|
|
|
|
|
(let ((libjpeg (assoc-ref %build-inputs "libjpeg"))
|
|
|
|
|
(ncurses (assoc-ref %build-inputs "ncurses")))
|
2018-06-20 04:23:41 +02:00
|
|
|
|
(list (string-append "--with-jpeg-includedir=" libjpeg "/include")))))
|
2015-05-21 14:13:41 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
2017-05-17 23:28:54 +02:00
|
|
|
|
`(("freetype" ,freetype)
|
|
|
|
|
("libjpeg" ,libjpeg)
|
2015-05-21 14:13:41 +02:00
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("libsndfile" ,libsndfile)
|
|
|
|
|
("libxml2" ,libxml2)
|
|
|
|
|
("ncurses" ,ncurses)
|
2017-05-17 23:28:54 +02:00
|
|
|
|
("sdl2" ,sdl2)))
|
2018-06-20 04:21:25 +02:00
|
|
|
|
(home-page "https://fizmo.spellbreaker.org/")
|
2015-05-21 14:13:41 +02:00
|
|
|
|
(synopsis "Z-machine interpreter")
|
|
|
|
|
(description
|
|
|
|
|
"Fizmo is a console-based Z-machine interpreter. It is used to play
|
gnu packages: Clean up synopses and descriptions.
* gnu/packages/admin.scm, gnu/packages/algebra.scm, gnu/packages/audio.scm,
gnu/packages/backup.scm, gnu/packages/base.scm, gnu/packages/bittorrent.scm,
gnu/packages/code.scm, gnu/packages/compression.scm,
gnu/packages/databases.scm, gnu/packages/enchant.scm,
gnu/packages/firmware.scm, gnu/packages/fonts.scm,
gnu/packages/freedesktop.scm, gnu/packages/games.scm, gnu/packages/gd.scm,
gnu/packages/gl.scm, gnu/packages/gnome.scm, gnu/packages/gsasl.scm,
gnu/packages/gstreamer.scm, gnu/packages/gtk.scm, gnu/packages/guile.scm,
gnu/packages/haskell.scm, gnu/packages/language.scm,
gnu/packages/lesstif.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/llvm.scm, gnu/packages/maths.scm,
gnu/packages/mcrypt.scm, gnu/packages/mit-krb5.scm, gnu/packages/mp3.scm,
gnu/packages/ncdu.scm, gnu/packages/networking.scm, gnu/packages/ntp.scm,
gnu/packages/ocaml.scm, gnu/packages/openbox.scm, gnu/packages/pdf.scm,
gnu/packages/perl.scm, gnu/packages/pretty-print.scm,
gnu/packages/pulseaudio.scm, gnu/packages/python.scm,
gnu/packages/rdesktop.scm, gnu/packages/rdf.scm, gnu/packages/ruby.scm,
gnu/packages/slang.scm, gnu/packages/slim.scm, gnu/packages/telephony.scm,
gnu/packages/tls.scm, gnu/packages/tmux.scm, gnu/packages/tre.scm,
gnu/packages/unrtf.scm, gnu/packages/version-control.scm,
gnu/packages/vpn.scm, gnu/packages/web.scm, gnu/packages/wget.scm,
gnu/packages/xdisorg.scm, gnu/packages/xfce.scm, gnu/packages/xiph.scm:
Fix typos. Trim long lines. Add missing periods in the end of sentences.
Use double spaces between sentences. Remove trailing whitespaces.
2015-07-17 14:16:07 +02:00
|
|
|
|
interactive fiction, also known as text adventures, which were implemented
|
2015-05-21 14:13:41 +02:00
|
|
|
|
either by Infocom or created using the Inform compiler.")
|
|
|
|
|
(license license:bsd-3)))
|
|
|
|
|
|
2015-02-20 01:47:55 +01:00
|
|
|
|
(define-public gnugo
|
|
|
|
|
(package
|
|
|
|
|
(name "gnugo")
|
|
|
|
|
(version "3.8")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://gnu/gnugo/gnugo-" version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0wkahvqpzq6lzl5r49a4sd4p52frdmphnqsfdv7gdp24bykdfs6s"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs `(("readline" ,readline)))
|
2015-02-24 23:12:16 +01:00
|
|
|
|
(synopsis "Play the game of Go")
|
2015-07-16 11:14:13 +02:00
|
|
|
|
(description
|
|
|
|
|
"GNU Go is a program that plays the game of Go, in which players
|
|
|
|
|
place stones on a grid to form territory or capture other stones. While
|
|
|
|
|
it can be played directly from the terminal, rendered in ASCII characters,
|
|
|
|
|
it is also possible to play GNU Go with 3rd party graphical interfaces or
|
|
|
|
|
even in Emacs. It supports the standard game storage format (SGF, Smart
|
|
|
|
|
Game Format) and inter-process communication format (GMP, Go Modem
|
|
|
|
|
Protocol).")
|
2017-03-30 00:48:16 +02:00
|
|
|
|
(home-page "https://www.gnu.org/software/gnugo/")
|
2015-02-20 01:47:55 +01:00
|
|
|
|
(license license:gpl3+)))
|
2015-04-27 06:40:40 +02:00
|
|
|
|
|
|
|
|
|
(define-public extremetuxracer
|
|
|
|
|
(package
|
|
|
|
|
(name "extremetuxracer")
|
2018-06-20 04:38:44 +02:00
|
|
|
|
(version "0.7.5")
|
2015-04-27 06:40:40 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
2016-11-19 18:42:12 +01:00
|
|
|
|
"mirror://sourceforge/extremetuxracer/releases/"
|
2015-04-27 06:40:40 +02:00
|
|
|
|
version "/etr-" version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-20 04:38:44 +02:00
|
|
|
|
"1ly63316c07i0gyqqmyzsyvygsvygn0fpk3bnbg25fi6li99rlsg"))))
|
2015-04-27 06:40:40 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
gnu: extremetuxracer: Update to 0.7.3.
* gnu/packages/games.scm (extremetuxracer): Update to 0.7.3.
[inputs]: Remove freetype, mesa, libice, libpng, sdl, sdl-mixer,
sdl-image, libsm, libunwind, libx11, libext, libxi, libxmu, libxt, tcl,
zlib; add sfml.
[arguments]: Remove field.
2016-10-16 20:16:19 +02:00
|
|
|
|
`(("glu" ,glu)
|
|
|
|
|
("sfml" ,sfml)))
|
2018-06-20 04:39:25 +02:00
|
|
|
|
(synopsis "High-speed arctic racing game based on Tux Racer")
|
|
|
|
|
;; Snarfed straight from Debian.
|
2015-04-27 06:40:40 +02:00
|
|
|
|
(description "Extreme Tux Racer, or etracer as it is called for short, is
|
|
|
|
|
a simple OpenGL racing game featuring Tux, the Linux mascot. The goal of the
|
|
|
|
|
game is to slide down a snow- and ice-covered mountain as quickly as possible,
|
|
|
|
|
avoiding the trees and rocks that will slow you down.
|
|
|
|
|
|
|
|
|
|
Collect herrings and other goodies while sliding down the hill, but avoid fish
|
|
|
|
|
bones.
|
|
|
|
|
|
|
|
|
|
This game is based on the GPL version of the famous game TuxRacer.")
|
gnu: Use HTTPS for all sourceforge.net home pages.
* gnu/packages/admin.scm (mingetty, clusterssh)[home-page]: Use HTTPS.
* gnu/packages/audio.scm (libbs2b, soxr)[home-page]: Likewise.
* gnu/packages/bioinformatics.scm (bless)[home-page]: Likewise.
* gnu/packages/display-managers.scm (slim)[home-page]: Likewise.
* gnu/packages/games.scm (extremetuxracer)[home-page]: Likewise.
* gnu/packages/ghostscript.scm (gs-fonts)[home-page]: Likewise.
* gnu/packages/haskell.scm (ghc-regex-base, ghc-regex-posix,
ghc-regex-compat)[home-page]: Likewise.
* gnu/packages/image.scm (imlib2)[home-page]: Likewise.
* gnu/packages/libreoffice.scm (librevenge, libcmis, libodfgen, libmwaw)
[home-page]: Likewise.
* gnu/packages/linux.scm (hdparm, acpid, libavc1394, rng-tools)
[home-page]: Likewise.
* gnu/packages/mail.scm (esmtp)[home-page]: Likewise.
* gnu/packages/mp3.scm (ripperx)[home-page]: Likewise.
* gnu/packages/onc-rpc.scm (libtirpc)[home-page]: Likewise.
* gnu/packages/perl.scm (perl-czplib)[home-page]: Likewise.
* gnu/packages/python.scm (python-pyasn1-modules)[home-page]: Likewise.
* gnu/packages/xdisorg.scm (xosd)[home-page]: Likewise.
2017-01-04 01:30:46 +01:00
|
|
|
|
(home-page "https://sourceforge.net/projects/extremetuxracer/")
|
2015-04-27 06:40:40 +02:00
|
|
|
|
(license license:gpl2+)))
|
2015-05-15 08:01:29 +02:00
|
|
|
|
|
2016-10-17 08:43:24 +02:00
|
|
|
|
(define-public supertuxkart
|
|
|
|
|
(package
|
|
|
|
|
(name "supertuxkart")
|
2017-11-22 10:07:59 +01:00
|
|
|
|
(version "0.9.3")
|
2016-10-17 08:43:24 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/supertuxkart/SuperTuxKart/"
|
|
|
|
|
version "/supertuxkart-" version "-src.tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-11-22 10:07:59 +01:00
|
|
|
|
"1c4w47ibj87lgwiqygq8qi7jiz6gklj4dwf5bs5zk15s0rqlw0fq"))
|
2016-10-17 08:43:24 +02:00
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
;; Delete bundled library sources
|
|
|
|
|
'(begin
|
|
|
|
|
;; FIXME: try to unbundle enet, and angelscript
|
|
|
|
|
(for-each delete-file-recursively
|
|
|
|
|
'("lib/zlib"
|
|
|
|
|
"lib/libpng"
|
|
|
|
|
"lib/jpeglib"
|
|
|
|
|
"lib/glew"
|
|
|
|
|
"lib/wiiuse"))
|
|
|
|
|
(substitute* "CMakeLists.txt"
|
|
|
|
|
;; Supertuxkart uses modified versions of the Irrlicht engine
|
|
|
|
|
;; and the bullet library. The developers gave an explanation here:
|
|
|
|
|
;; http://forum.freegamedev.net/viewtopic.php?f=17&t=3906
|
|
|
|
|
(("add_subdirectory\\(.*/(glew|zlib)\"\\)") ""))
|
|
|
|
|
#t))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:configure-flags
|
|
|
|
|
(list "-DUSE_WIIUSE=0"
|
|
|
|
|
;; Do not use the bundled zlib
|
|
|
|
|
"-DNO_IRR_COMPILE_WITH_ZLIB_=TRUE"
|
2017-11-22 10:07:59 +01:00
|
|
|
|
;; FIXME: needs libopenglrecorder
|
|
|
|
|
"-DBUILD_RECORDER=0"
|
2016-10-17 08:43:24 +02:00
|
|
|
|
;; Irrlicht returns an integer instead of a boolean
|
|
|
|
|
"-DCMAKE_C_FLAGS=-fpermissive")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'unbundle
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(substitute* "CMakeLists.txt"
|
|
|
|
|
(("glew")
|
|
|
|
|
(string-append (assoc-ref inputs "glew")
|
|
|
|
|
"/lib/libGLEW.a"))
|
|
|
|
|
(("include_directories\\(\"\\$\\{PROJECT_SOURCE_DIR\\}/lib/glew/include\"\\)")
|
|
|
|
|
(string-append "include_directories(\""
|
|
|
|
|
(assoc-ref inputs "glew")
|
|
|
|
|
"/include\")")))
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("glew" ,glew)
|
|
|
|
|
("zlib" ,zlib)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("freetype" ,freetype)
|
|
|
|
|
("fribidi" ,fribidi)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("libxrandr" ,libxrandr)
|
|
|
|
|
("curl" ,curl)
|
|
|
|
|
;; The following input is needed to build the bundled and modified
|
|
|
|
|
;; version of irrlicht.
|
|
|
|
|
("libjpeg" ,libjpeg)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
2018-01-26 03:36:10 +01:00
|
|
|
|
(home-page "https://supertuxkart.net/")
|
2016-10-17 08:43:24 +02:00
|
|
|
|
(synopsis "3D kart racing game")
|
|
|
|
|
(description "SuperTuxKart is a 3D kart racing game, with a focus on
|
|
|
|
|
having fun over realism. You can play with up to 4 friends on one PC, racing
|
|
|
|
|
against each other or just trying to beat the computer; single-player mode is
|
|
|
|
|
also available.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2015-05-15 08:01:29 +02:00
|
|
|
|
(define-public gnujump
|
|
|
|
|
(package
|
|
|
|
|
(name "gnujump")
|
|
|
|
|
(version "1.0.8")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://gnu/gnujump/gnujump-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"05syy9mzbyqcfnm0hrswlmhwlwx54f0l6zhcaq8c1c0f8dgzxhqk"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before
|
|
|
|
|
'configure 'link-libm
|
|
|
|
|
(lambda _ (setenv "LIBS" "-lm"))))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("glu" ,glu)
|
gnu: Fix misplaced commas (unquote).
Fix many occurrences of comma (unquote) being placed immediately after the
previous list item, e.g. ("ncurses", ncurses) in the inputs.
* gnu/packages/base.scm (patch, gnu-make),
gnu/packages/bioinformatics.scm (hmmer),
gnu/packages/bittorrent.scm (aria2),
gnu/packages/compression.scm (pbzip2),
gnu/packages/databases.scm (recutils),
gnu/packages/fonts.scm (font-terminus),
gnu/packages/freedesktop.scm (xdg-utils, elogind),
gnu/packages/games.scm (gnujump),
gnu/packages/gnome.scm (libidl, gnumeric, eog, gedit),
gnu/packages/gnunet.scm (gnunet),
gnu/packages/gnuzilla.scm (mozjs, nspr),
gnu/packages/gtk.scm (gtksourceview, gdk-pixbuf),
gnu/packages/lua.scm (lua),
gnu/packages/openstack.scm (python-swiftclient),
gnu/packages/perl.scm (perl-json-any),
gnu/packages/polkit.scm (polkit-qt),
gnu/packages/python.scm (wrap-python3, python-oauthlib)
(python-mccabe-0.2.1, python-contextlib2, python2-rauth),
gnu/packages/qt.scm (qtkeychain),
gnu/packages/ruby.scm (ruby-nokogiri),
gnu/packages/screen.scm (screen),
gnu/packages/ssh.scm (libssh),
gnu/packages/video.scm (ffmpeg, mplayer),
gnu/packages/vim.scm (vim),
gnu/packages/xdisorg.scm (redshift),
gnu/packages/xfce.scm (xfce4-panel, xfce4-settings),
gnu/packages/xnee.scm (xnee),
gnu/packages/xorg.scm (font-adobe100dpi, font-adobe75dpi),
gnu/packages/zsh.scm (zsh): Fix misplaced commas (unquote).
2016-02-27 14:37:28 +01:00
|
|
|
|
("mesa" ,mesa)
|
2015-05-15 08:01:29 +02:00
|
|
|
|
("sdl" ,sdl)
|
|
|
|
|
("sdl-image" ,sdl-image)
|
|
|
|
|
("sdl-mixer" ,sdl-mixer)))
|
|
|
|
|
(home-page "http://gnujump.es.gnu.org/")
|
|
|
|
|
(synopsis
|
|
|
|
|
"Game of jumping to the next floor, trying not to fall")
|
|
|
|
|
(description
|
|
|
|
|
"GNUjump is a simple, yet addictive game in which you must jump from
|
|
|
|
|
platform to platform to avoid falling, while the platforms drop at faster rates
|
|
|
|
|
the higher you go. The game features multiplayer, unlimited FPS, smooth floor
|
|
|
|
|
falling, themeable graphics and sounds, and replays.")
|
|
|
|
|
(license license:gpl3+)))
|
2015-08-13 11:48:43 +02:00
|
|
|
|
|
|
|
|
|
(define-public wesnoth
|
|
|
|
|
(package
|
|
|
|
|
(name "wesnoth")
|
2018-06-16 14:51:49 +02:00
|
|
|
|
(version "1.14.3")
|
2015-08-13 11:48:43 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/wesnoth/wesnoth-"
|
|
|
|
|
(version-major+minor version) "/wesnoth-"
|
|
|
|
|
version "/"
|
2015-08-13 11:48:43 +02:00
|
|
|
|
name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-16 14:51:49 +02:00
|
|
|
|
"06648041nr77sgzr7jpmcn37cma3hp41qynp50xzddx28l17zwg9"))))
|
2015-08-13 11:48:43 +02:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
2018-05-06 22:36:25 +02:00
|
|
|
|
`(#:tests? #f)) ; no check target
|
2015-08-13 11:48:43 +02:00
|
|
|
|
(native-inputs
|
2016-09-25 09:33:02 +02:00
|
|
|
|
`(("gettext" ,gettext-minimal)
|
2015-08-13 11:48:43 +02:00
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("boost" ,boost)
|
|
|
|
|
("dbus" ,dbus)
|
|
|
|
|
("fribidi" ,fribidi)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
2018-05-06 22:36:25 +02:00
|
|
|
|
("openssl" ,openssl)
|
2015-08-13 11:48:43 +02:00
|
|
|
|
("pango" ,pango)
|
2018-05-06 22:36:25 +02:00
|
|
|
|
("sdl-union" ,(sdl-union (list sdl2 sdl2-image sdl2-mixer sdl2-ttf)))))
|
|
|
|
|
(home-page "https://www.wesnoth.org/")
|
2015-08-13 11:48:43 +02:00
|
|
|
|
(synopsis "Turn-based strategy game")
|
|
|
|
|
(description
|
|
|
|
|
"The Battle for Wesnoth is a fantasy, turn based tactical strategy game,
|
|
|
|
|
with several single player campaigns, and multiplayer games (both networked and
|
|
|
|
|
local).
|
|
|
|
|
|
|
|
|
|
Battle for control on a range of maps, using variety of units which have
|
|
|
|
|
advantages and disadvantages against different types of attacks. Units gain
|
|
|
|
|
experience and advance levels, and are carried over from one scenario to the
|
|
|
|
|
next campaign.")
|
|
|
|
|
(license license:gpl2+)))
|
2015-07-29 03:48:34 +02:00
|
|
|
|
|
2018-01-21 16:38:41 +01:00
|
|
|
|
(define-public wesnoth-server
|
|
|
|
|
(package
|
|
|
|
|
(inherit wesnoth)
|
|
|
|
|
(name "wesnoth-server")
|
|
|
|
|
(inputs
|
|
|
|
|
`(("boost" ,boost)
|
2018-05-06 22:36:25 +02:00
|
|
|
|
("icu4c" ,icu4c)
|
|
|
|
|
("openssl" ,openssl)
|
|
|
|
|
("sdl2" ,sdl2)))
|
2018-01-21 16:38:41 +01:00
|
|
|
|
(arguments
|
2018-05-06 22:36:25 +02:00
|
|
|
|
`(#:configure-flags '("-DENABLE_GAME=OFF")
|
|
|
|
|
,@(package-arguments wesnoth)))
|
2018-01-21 16:38:41 +01:00
|
|
|
|
(synopsis "Dedicated @emph{Battle for Wesnoth} server")
|
|
|
|
|
(description "This package contains a dedicated server for @emph{The
|
|
|
|
|
Battle for Wesnoth}.")))
|
|
|
|
|
|
2015-07-29 03:48:34 +02:00
|
|
|
|
(define-public gamine
|
|
|
|
|
(package
|
|
|
|
|
(name "gamine")
|
2017-05-18 01:17:58 +02:00
|
|
|
|
(version "1.5")
|
2015-07-29 03:48:34 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/gamine-game/"
|
|
|
|
|
"gamine-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-05-18 01:17:58 +02:00
|
|
|
|
"08wnk7w84c2413hwny89j2cn89cvfdf67bfc6wl0bf475if0mf4h"))))
|
2015-07-29 03:48:34 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
|
|
|
|
("intltool" ,intltool)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("gstreamer" ,gstreamer)
|
|
|
|
|
("gst-plugins-base" ,gst-plugins-base) ;playbin plugin
|
|
|
|
|
("gst-plugins-good" ,gst-plugins-good) ;for wav playback
|
|
|
|
|
("gtk+" ,gtk+)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f
|
|
|
|
|
#:make-flags
|
|
|
|
|
(let ((out (assoc-ref %outputs "out")))
|
|
|
|
|
(list (string-append "PREFIX=" out)
|
|
|
|
|
(string-append "SYSCONFDIR=" out "/etc")))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-after
|
|
|
|
|
'install 'wrap-gamine
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out"))
|
|
|
|
|
(gst-plugin-path (getenv "GST_PLUGIN_SYSTEM_PATH")))
|
|
|
|
|
(wrap-program (string-append out "/bin/gamine")
|
|
|
|
|
`("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,gst-plugin-path))))
|
|
|
|
|
#t)))))
|
|
|
|
|
(home-page "http://gamine-game.sourceforge.net/")
|
|
|
|
|
(synopsis "Mouse and keyboard discovery for children")
|
|
|
|
|
(description
|
|
|
|
|
"Gamine is a game designed for young children who are learning to use the
|
|
|
|
|
mouse and keyboard. The child uses the mouse to draw colored dots and lines
|
|
|
|
|
on the screen and keyboard to display letters.")
|
|
|
|
|
;; Most files under gpl2+ or gpl3+, but eat.wav under gpl3
|
|
|
|
|
(license license:gpl3)))
|
|
|
|
|
|
2015-10-16 15:00:06 +02:00
|
|
|
|
(define-public raincat
|
|
|
|
|
(package
|
|
|
|
|
(name "raincat")
|
|
|
|
|
(version "1.1.1.3")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://hackage.haskell.org/package/Raincat/Raincat-"
|
|
|
|
|
version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1aalh68h6799mv4vyg30zpskl5jkn6x2j1jza7p4lrflyifxzar8"))))
|
|
|
|
|
(build-system haskell-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("ghc-extensible-exceptions" ,ghc-extensible-exceptions)
|
|
|
|
|
("ghc-mtl" ,ghc-mtl)
|
|
|
|
|
("ghc-random" ,ghc-random)
|
|
|
|
|
("ghc-glut" ,ghc-glut)
|
2016-10-04 08:48:03 +02:00
|
|
|
|
("freeglut" ,freeglut)
|
2015-10-16 15:00:06 +02:00
|
|
|
|
("ghc-opengl" ,ghc-opengl)
|
|
|
|
|
("ghc-sdl" ,ghc-sdl)
|
|
|
|
|
("ghc-sdl-image" ,ghc-sdl-image)
|
|
|
|
|
("ghc-sdl-mixer" ,ghc-sdl-mixer)))
|
2017-02-17 06:29:39 +01:00
|
|
|
|
(home-page "http://www.bysusanlin.com/raincat/")
|
2015-10-16 15:00:06 +02:00
|
|
|
|
(synopsis "Puzzle game with a cat in lead role")
|
|
|
|
|
(description "Project Raincat is a game developed by Carnegie Mellon
|
|
|
|
|
students through GCS during the Fall 2008 semester. Raincat features game
|
|
|
|
|
play inspired from classics Lemmings and The Incredible Machine. The project
|
|
|
|
|
proved to be an excellent learning experience for the programmers. Everything
|
|
|
|
|
is programmed in Haskell.")
|
|
|
|
|
(license license:bsd-3)))
|
|
|
|
|
|
2015-10-04 19:34:48 +02:00
|
|
|
|
(define-public manaplus
|
|
|
|
|
(package
|
|
|
|
|
(name "manaplus")
|
2017-06-12 22:13:41 +02:00
|
|
|
|
(version "1.7.6.10")
|
2015-10-04 19:34:48 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://repo.manaplus.org/manaplus/download/"
|
|
|
|
|
version "/manaplus-" version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-06-12 22:13:41 +02:00
|
|
|
|
"0l7swvpzq20am4w2rsjpp6fsvbjv07il6wbfy45a7h9zsdihmqhl"))))
|
2015-10-04 19:34:48 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:configure-flags
|
|
|
|
|
(list (string-append "CPPFLAGS=-I"
|
|
|
|
|
(assoc-ref %build-inputs "sdl-union")
|
|
|
|
|
"/include/SDL"))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("glu" ,glu)
|
|
|
|
|
("curl" ,curl)
|
|
|
|
|
("libxml2" ,libxml2)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("sdl-union" ,(sdl-union))))
|
|
|
|
|
(home-page "http://manaplus.org")
|
|
|
|
|
(synopsis "Client for 'The Mana World' and similar games")
|
|
|
|
|
(description
|
|
|
|
|
"ManaPlus is a 2D MMORPG client for game servers. It is the only
|
|
|
|
|
fully supported client for @uref{http://www.themanaworld.org, The mana
|
|
|
|
|
world}, @uref{http://evolonline.org, Evol Online} and
|
|
|
|
|
@uref{http://landoffire.org, Land of fire}.")
|
|
|
|
|
;; "src/debug/*" and "src/sdl2gfx/*" are under Zlib.
|
|
|
|
|
;; "data/themes/{golden-delicious,jewelry}/*" are under CC-BY-SA.
|
|
|
|
|
;; The rest is under GPL2+.
|
|
|
|
|
(license (list license:gpl2+ license:zlib license:cc-by-sa4.0))))
|
2015-11-01 19:38:53 +01:00
|
|
|
|
|
2016-04-13 03:50:36 +02:00
|
|
|
|
(define openttd-engine
|
|
|
|
|
(package
|
|
|
|
|
(name "openttd-engine")
|
2017-06-15 08:09:22 +02:00
|
|
|
|
(version "1.7.1")
|
2016-04-13 03:50:36 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin (method url-fetch)
|
|
|
|
|
(uri (string-append "http://binaries.openttd.org/releases/"
|
|
|
|
|
version "/openttd-" version "-source.tar.xz"))
|
2018-06-09 13:25:32 +02:00
|
|
|
|
(patches
|
|
|
|
|
(list
|
|
|
|
|
(origin (method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/OpenTTD/OpenTTD/commit/"
|
|
|
|
|
"19076c24c1f3baf2a22d1fa832d5688216cf54a3.patch"))
|
|
|
|
|
(file-name "openttd-fix-compilation-with-ICU-61.patch")
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"02d1xmb75yv4x6rfnvxk3vvq4l3lvvwr2pfsdzn7lzalic51ziqh")))))
|
2016-04-13 03:50:36 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-06-15 08:09:22 +02:00
|
|
|
|
"0dhv5bbbg1dmmq7fi3xss0a9jq2rqgb5sf9fsqzlsjcdm590j6b1"))
|
2016-04-13 03:50:36 +02:00
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
;; The DOS port contains proprietary software.
|
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
|
|
|
|
'(begin
|
|
|
|
|
(delete-file-recursively "os/dos")
|
|
|
|
|
#t))))
|
2016-04-13 03:50:36 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; The build process fails if the configure script is passed the
|
|
|
|
|
;; option "--enable-fast-install".
|
|
|
|
|
(replace 'configure
|
2017-09-14 00:49:26 +02:00
|
|
|
|
(lambda* (#:key inputs outputs (configure-flags '())
|
|
|
|
|
#:allow-other-keys)
|
2016-04-13 03:50:36 +02:00
|
|
|
|
(let ((out (assoc-ref outputs "out"))
|
|
|
|
|
(lzo (assoc-ref inputs "lzo")))
|
|
|
|
|
(zero?
|
2017-09-14 00:49:26 +02:00
|
|
|
|
(apply system* "./configure"
|
|
|
|
|
(string-append "--prefix=" out)
|
|
|
|
|
;; Provide the "lzo" path.
|
|
|
|
|
(string-append "--with-liblzo2="
|
|
|
|
|
lzo "/lib/liblzo2.a")
|
|
|
|
|
;; Put the binary in 'bin' instead of 'games'.
|
|
|
|
|
"--binary-dir=bin"
|
|
|
|
|
configure-flags))))))))
|
2016-04-13 03:50:36 +02:00
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("allegro" ,allegro-4)
|
|
|
|
|
("fontconfig" ,fontconfig)
|
|
|
|
|
("freetype" ,freetype)
|
|
|
|
|
("icu4c" ,icu4c)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("lzo" ,lzo)
|
|
|
|
|
("sdl" ,sdl)
|
|
|
|
|
("xz" ,xz)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(synopsis "Transportation economics simulator")
|
|
|
|
|
(description "OpenTTD is a game in which you transport goods and
|
|
|
|
|
passengers by land, water and air. It is a re-implementation of Transport
|
|
|
|
|
Tycoon Deluxe with many enhancements including multiplayer mode,
|
|
|
|
|
internationalization support, conditional orders and the ability to clone,
|
2017-05-18 03:52:27 +02:00
|
|
|
|
autoreplace and autoupdate vehicles. This package only includes the game
|
|
|
|
|
engine. When you start it you will be prompted to download a graphics set.")
|
2016-04-13 03:50:36 +02:00
|
|
|
|
(home-page "http://openttd.org/")
|
|
|
|
|
;; This package is GPLv2, except for a few files located in
|
|
|
|
|
;; "src/3rdparty/" which are under the 3-clause BSD, LGPLv2.1+ and Zlib
|
|
|
|
|
;; licenses. In addition, this software contains an in-game downloader
|
|
|
|
|
;; from which the user may find non-functional data licensed under
|
|
|
|
|
;; different terms.
|
|
|
|
|
(license (list license:bsd-3 license:gpl2 license:lgpl2.1+ license:zlib))))
|
|
|
|
|
|
2017-06-18 19:45:18 +02:00
|
|
|
|
(define openttd-opengfx
|
|
|
|
|
(package
|
|
|
|
|
(name "openttd-opengfx")
|
|
|
|
|
(version "0.5.2")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://binaries.openttd.org/extra/opengfx/"
|
|
|
|
|
version "/opengfx-" version "-source.tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0iz66q7p1mf00njfjbc4vibh3jaybki7armkl18iz7p6x4chp9zv"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:make-flags (list "CC=gcc"
|
|
|
|
|
(string-append "INSTALL_DIR="
|
|
|
|
|
(assoc-ref %outputs "out")
|
2017-09-14 00:49:26 +02:00
|
|
|
|
"/share/games/openttd/baseset/opengfx"))
|
2017-06-18 19:45:18 +02:00
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda _
|
|
|
|
|
;; Make sure HOME is writable for GIMP.
|
|
|
|
|
(setenv "HOME" (getcwd))
|
|
|
|
|
|
|
|
|
|
;; Redirect stdout, not stderr, to /dev/null. This prevents
|
|
|
|
|
;; dos2unix from receiving its version information as a flag.
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("\\$\\(UNIX2DOS\\) -q --version 2>/dev/null")
|
|
|
|
|
"$(UNIX2DOS) -q --version 1>/dev/null")))))
|
|
|
|
|
;; The check phase for this package only checks the md5sums of the built
|
|
|
|
|
;; GRF files against the md5sums of the release versions. Because we use
|
|
|
|
|
;; different software versions than upstream does, some of the md5sums
|
|
|
|
|
;; are different. However, the package is still reproducible, it's safe
|
|
|
|
|
;; to disable this test.
|
2017-09-19 14:40:27 +02:00
|
|
|
|
#:tests? #f
|
|
|
|
|
#:parallel-build? #f))
|
2017-06-18 19:45:18 +02:00
|
|
|
|
(native-inputs `(("dos2unix" ,dos2unix)
|
|
|
|
|
("gimp" ,gimp)
|
|
|
|
|
("grfcodec" ,grfcodec)
|
|
|
|
|
("nml" ,nml)
|
|
|
|
|
("python" ,python-2)))
|
|
|
|
|
(home-page "http://dev.openttdcoop.org/projects/opengfx")
|
|
|
|
|
(synopsis "Base graphics set for OpenTTD")
|
|
|
|
|
(description
|
|
|
|
|
"The OpenGFX projects is an implementation of the OpenTTD base grahics
|
|
|
|
|
set that aims to ensure the best possible out-of-the-box experience.
|
|
|
|
|
|
|
|
|
|
OpenGFX provides you with...
|
|
|
|
|
@enumerate
|
|
|
|
|
@item All graphics you need to enjoy OpenTTD.
|
|
|
|
|
@item Uniquely drawn rail vehicles for every climate.
|
|
|
|
|
@item Completely snow-aware rivers.
|
|
|
|
|
@item Different river and sea water.
|
|
|
|
|
@item Snow-aware buoys.
|
|
|
|
|
@end enumerate")
|
|
|
|
|
(license license:gpl2)))
|
|
|
|
|
|
2017-09-13 19:05:02 +02:00
|
|
|
|
(define openttd-opensfx
|
|
|
|
|
(package
|
|
|
|
|
(name "openttd-opensfx")
|
|
|
|
|
(version "0.2.3")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://binaries.openttd.org/extra/opensfx/"
|
|
|
|
|
version "/opensfx-" version "-source.tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"03jxgp02ks31hmsdh4xh0xcpkb70ds8jakc9pfc1y9vdrdavh4p5"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("catcodec" ,catcodec)
|
|
|
|
|
("python" ,python2-minimal)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags
|
|
|
|
|
(list (string-append "INSTALL_DIR=" %output
|
|
|
|
|
"/share/games/openttd/baseset/opensfx"))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'make-reproducible
|
|
|
|
|
(lambda _
|
|
|
|
|
;; Remove the time dependency of the installed tarball by setting
|
|
|
|
|
;; the modification times if its members to 0.
|
|
|
|
|
(substitute* "scripts/Makefile.def"
|
|
|
|
|
(("-cf") " --mtime=@0 -cf"))
|
|
|
|
|
#t))
|
|
|
|
|
(delete 'configure))))
|
|
|
|
|
(home-page "http://dev.openttdcoop.org/projects/opensfx")
|
|
|
|
|
(synopsis "Base sounds for OpenTTD")
|
|
|
|
|
(description "OpenSFX is a set of free base sounds for OpenTTD which make
|
|
|
|
|
it possible to play OpenTTD without requiring the proprietary sound files from
|
|
|
|
|
the original Transport Tycoon Deluxe.")
|
|
|
|
|
(license license:cc-sampling-plus-1.0)))
|
|
|
|
|
|
2017-09-14 00:48:03 +02:00
|
|
|
|
(define openttd-openmsx
|
|
|
|
|
(package
|
|
|
|
|
(name "openttd-openmsx")
|
|
|
|
|
(version "0.3.1")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://binaries.openttd.org/extra/openmsx/"
|
|
|
|
|
version "/openmsx-" version "-source.tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0nskq97a6fsv1v6d62zf3yb8whzhqnlh3lap3va3nzvj7csjgf7c"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("python" ,python2-minimal)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags
|
|
|
|
|
(list (string-append "INSTALL_DIR=" %output
|
|
|
|
|
"/share/games/openttd/baseset"))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-after 'install 'post-install
|
|
|
|
|
;; Rename openmsx-version to openmsx
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((install-directory (string-append (assoc-ref outputs "out")
|
|
|
|
|
"/share/games/openttd/baseset")))
|
|
|
|
|
(rename-file (string-append install-directory "/openmsx-" ,version)
|
|
|
|
|
(string-append install-directory "/openmsx"))
|
|
|
|
|
#t))))))
|
|
|
|
|
(home-page "http://dev.openttdcoop.org/projects/openmsx")
|
|
|
|
|
(synopsis "Music set for OpenTTD")
|
|
|
|
|
(description "OpenMSX is a music set for OpenTTD which makes it possible
|
|
|
|
|
to play OpenTTD without requiring the proprietary music from the original
|
|
|
|
|
Transport Tycoon Deluxe.")
|
|
|
|
|
(license license:gpl2)))
|
|
|
|
|
|
2016-04-13 03:50:36 +02:00
|
|
|
|
(define-public openttd
|
|
|
|
|
(package
|
|
|
|
|
(inherit openttd-engine)
|
2017-06-18 19:45:19 +02:00
|
|
|
|
(name "openttd")
|
|
|
|
|
(arguments
|
2017-09-14 00:49:26 +02:00
|
|
|
|
`(#:configure-flags
|
|
|
|
|
(list (string-append "--with-midi=" (assoc-ref %build-inputs "timidity++")
|
|
|
|
|
"/bin/timidity"))
|
|
|
|
|
,@(substitute-keyword-arguments (package-arguments openttd-engine)
|
|
|
|
|
((#:phases phases)
|
|
|
|
|
`(modify-phases ,phases
|
|
|
|
|
(add-after 'install 'install-data
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(for-each
|
|
|
|
|
(lambda (input)
|
|
|
|
|
(copy-recursively (assoc-ref inputs input)
|
|
|
|
|
(assoc-ref outputs "out")))
|
|
|
|
|
(list "opengfx" "openmsx" "opensfx"))
|
|
|
|
|
#t)))))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("timidity++" ,timidity++)
|
|
|
|
|
,@(package-inputs openttd-engine)))
|
2017-06-18 19:45:19 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("opengfx" ,openttd-opengfx)
|
2017-09-14 00:49:26 +02:00
|
|
|
|
("openmsx" ,openttd-openmsx)
|
|
|
|
|
("opensfx" ,openttd-opensfx)
|
2017-06-18 19:45:19 +02:00
|
|
|
|
,@(package-native-inputs openttd-engine)))))
|
2016-04-13 03:50:36 +02:00
|
|
|
|
|
2018-06-13 11:26:21 +02:00
|
|
|
|
(define openrct2-title-sequences
|
|
|
|
|
(package
|
|
|
|
|
(name "openrct2-title-sequences")
|
|
|
|
|
(version "0.1.2")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/OpenRCT2/title-sequences/releases/download/v"
|
|
|
|
|
version "/title-sequence-v" version ".zip"))
|
|
|
|
|
(file-name (string-append name "-" version ".zip"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0qbyxrsw8hlgaq0r5d7lx7an3idy4qbfv7yiw9byhldk763n9cfw"))))
|
|
|
|
|
(build-system trivial-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("bash" ,bash)
|
|
|
|
|
("coreutils" ,coreutils)
|
|
|
|
|
("unzip" ,unzip)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:modules ((guix build utils))
|
|
|
|
|
#:builder
|
|
|
|
|
(begin
|
|
|
|
|
(use-modules (guix build utils))
|
|
|
|
|
(let* ((out (assoc-ref %outputs "out"))
|
|
|
|
|
(openrct2-title-sequences (string-append out
|
|
|
|
|
"/share/openrct2/title-sequences"))
|
|
|
|
|
(source (assoc-ref %build-inputs "source"))
|
|
|
|
|
(unzip (string-append (assoc-ref %build-inputs "unzip") "/bin/unzip")))
|
|
|
|
|
(copy-file source (string-append ,name "-" ,version ".zip"))
|
|
|
|
|
(invoke unzip (string-append ,name "-" ,version ".zip"))
|
|
|
|
|
(delete-file (string-append ,name "-" ,version ".zip"))
|
|
|
|
|
(mkdir-p openrct2-title-sequences)
|
|
|
|
|
(copy-recursively "."
|
|
|
|
|
openrct2-title-sequences)
|
|
|
|
|
#t))))
|
|
|
|
|
(home-page "https://github.com/OpenRCT2/OpenRCT2")
|
|
|
|
|
(synopsis "Title sequences for OpenRCT2")
|
|
|
|
|
(description
|
|
|
|
|
"openrct2-title-sequences is a set of title sequences for OpenRCT2.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
|
|
|
|
(define openrct2-objects
|
|
|
|
|
(package
|
|
|
|
|
(name "openrct2-objects")
|
|
|
|
|
(version "1.0.2")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/OpenRCT2/objects/releases/download/v"
|
|
|
|
|
version "/objects.zip"))
|
|
|
|
|
(file-name (string-append name "-" version ".zip"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1z92afhbv13j1ig6fz0x8w9vdmfchssv16vwwhb0vj40pn1g1rwy"))))
|
|
|
|
|
(build-system trivial-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("bash" ,bash)
|
|
|
|
|
("coreutils" ,coreutils)
|
|
|
|
|
("unzip" ,unzip)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:modules ((guix build utils))
|
|
|
|
|
#:builder
|
|
|
|
|
(begin
|
|
|
|
|
(use-modules (guix build utils))
|
|
|
|
|
(let* ((out (assoc-ref %outputs "out"))
|
|
|
|
|
(openrct2-objects (string-append out
|
|
|
|
|
"/share/openrct2/objects"))
|
|
|
|
|
(source (assoc-ref %build-inputs "source"))
|
|
|
|
|
(unzip (string-append (assoc-ref %build-inputs "unzip") "/bin/unzip")))
|
|
|
|
|
(copy-file source (string-append ,name "-" ,version ".zip"))
|
|
|
|
|
(invoke unzip (string-append ,name "-" ,version ".zip"))
|
|
|
|
|
(delete-file (string-append ,name "-" ,version ".zip"))
|
|
|
|
|
(mkdir-p openrct2-objects)
|
|
|
|
|
(copy-recursively "."
|
|
|
|
|
openrct2-objects)
|
|
|
|
|
#t))))
|
|
|
|
|
(home-page "https://github.com/OpenRCT2/OpenRCT2")
|
|
|
|
|
(synopsis "Objects for OpenRCT2")
|
|
|
|
|
(description
|
|
|
|
|
"openrct2-objects is a set of objects for OpenRCT2.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2017-10-12 10:22:27 +02:00
|
|
|
|
(define-public openrct2
|
|
|
|
|
(package
|
|
|
|
|
(name "openrct2")
|
2018-06-14 18:09:55 +02:00
|
|
|
|
(version "0.1.1")
|
2017-10-12 10:22:27 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/OpenRCT2/OpenRCT2/archive/v"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-14 18:09:55 +02:00
|
|
|
|
"1bahkzlf9k92cc4zs4nk4wy59323kiw8d3wm0vjps3kp7iznqyjx"))
|
2017-10-12 10:22:27 +02:00
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
2018-06-14 18:09:55 +02:00
|
|
|
|
`(#:configure-flags '("-DDOWNLOAD_TITLE_SEQUENCES=OFF")
|
|
|
|
|
#:tests? #f ; Tests require network.
|
2017-10-12 10:22:27 +02:00
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
2018-06-13 11:26:21 +02:00
|
|
|
|
(add-after 'unpack 'fix-usr-share-paths&add-data
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let ((titles (assoc-ref inputs "openrct2-title-sequences"))
|
|
|
|
|
(objects (assoc-ref inputs "openrct2-objects")))
|
2017-10-21 10:33:30 +02:00
|
|
|
|
;; Fix some references to /usr/share.
|
2018-06-14 18:09:55 +02:00
|
|
|
|
;; Change to Platform.Linux.cpp on 0.1.2+
|
|
|
|
|
(substitute* "src/openrct2/platform/linux.c"
|
2017-10-21 10:33:30 +02:00
|
|
|
|
(("/usr/share")
|
2018-06-13 11:26:21 +02:00
|
|
|
|
(string-append (assoc-ref %outputs "out") "/share")))
|
|
|
|
|
(copy-recursively (string-append titles
|
|
|
|
|
"/share/openrct2/title-sequences") "data/title")
|
|
|
|
|
(copy-recursively (string-append objects
|
2018-06-14 18:09:55 +02:00
|
|
|
|
"/share/openrct2/objects") "data/object")))))))
|
2018-03-16 16:50:14 +01:00
|
|
|
|
(inputs `(("curl" ,curl)
|
|
|
|
|
("fontconfig" ,fontconfig)
|
|
|
|
|
("freetype" ,freetype)
|
2018-06-13 11:26:21 +02:00
|
|
|
|
("icu4c" ,icu4c)
|
2018-03-16 16:50:14 +01:00
|
|
|
|
("jansson" ,jansson)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("libzip" ,libzip)
|
|
|
|
|
("mesa" ,mesa)
|
2018-06-13 11:26:21 +02:00
|
|
|
|
("openrct2-objects" ,openrct2-objects)
|
|
|
|
|
("openrct2-title-sequences" ,openrct2-title-sequences)
|
2018-03-16 16:50:14 +01:00
|
|
|
|
("openssl" ,openssl)
|
|
|
|
|
("sdl2" ,sdl2)
|
|
|
|
|
("speexdsp" ,speexdsp)
|
|
|
|
|
("zlib" ,zlib)))
|
2017-10-12 10:22:27 +02:00
|
|
|
|
(native-inputs
|
2018-06-14 18:09:55 +02:00
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
2017-10-12 10:22:27 +02:00
|
|
|
|
(home-page "https://github.com/OpenRCT2/OpenRCT2")
|
|
|
|
|
(synopsis "Free software re-implementation of RollerCoaster Tycoon 2")
|
|
|
|
|
(description "OpenRCT2 is a free software re-implementation of
|
|
|
|
|
RollerCoaster Tycoon 2 (RCT2). The gameplay revolves around building and
|
|
|
|
|
maintaining an amusement park containing attractions, shops and facilities.
|
|
|
|
|
|
|
|
|
|
Note that this package does @emph{not} provide the game assets (sounds,
|
|
|
|
|
images, etc.)")
|
|
|
|
|
;; See <https://github.com/OpenRCT2/OpenRCT2/wiki/Required-RCT2-files>
|
|
|
|
|
;; regarding assets.
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2016-02-01 06:22:38 +01:00
|
|
|
|
(define-public pinball
|
|
|
|
|
(package
|
|
|
|
|
(name "pinball")
|
|
|
|
|
(version "0.3.1")
|
|
|
|
|
(source
|
|
|
|
|
(origin (method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/pinball/pinball/"
|
|
|
|
|
"pinball-" version "/"
|
|
|
|
|
"pinball-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1f2whlrfidwfh8lvr8cspcyirc6840r5d1ajm7x99qmngygrhixs"))
|
2016-04-08 14:18:13 +02:00
|
|
|
|
(patches (search-patches "pinball-const-fix.patch"
|
|
|
|
|
"pinball-cstddef.patch"
|
|
|
|
|
"pinball-missing-separators.patch"
|
|
|
|
|
"pinball-src-deps.patch"
|
|
|
|
|
"pinball-system-ltdl.patch"))))
|
2016-02-01 06:22:38 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("glu" ,glu)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("sdl" ,sdl)
|
|
|
|
|
("sdl-image" ,sdl-image)
|
|
|
|
|
("sdl-mixer" ,sdl-mixer)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:configure-flags
|
|
|
|
|
(list (string-append "CPPFLAGS=-I"
|
|
|
|
|
(assoc-ref %build-inputs "sdl-image")
|
|
|
|
|
"/include/SDL -I"
|
|
|
|
|
(assoc-ref %build-inputs "sdl-mixer")
|
|
|
|
|
"/include/SDL"))))
|
|
|
|
|
(home-page "http://pinball.sourceforge.net")
|
|
|
|
|
(synopsis "Pinball simulator")
|
|
|
|
|
(description "The Emilia Pinball Project is a pinball simulator. There
|
|
|
|
|
are only two levels to play with, but they are very addictive.")
|
|
|
|
|
(license license:gpl2)))
|
2016-02-16 02:07:04 +01:00
|
|
|
|
|
|
|
|
|
(define-public pioneers
|
|
|
|
|
(package
|
|
|
|
|
(name "pioneers")
|
2018-06-20 04:15:13 +02:00
|
|
|
|
(version "15.5")
|
2016-02-16 02:07:04 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://downloads.sourceforge.net/pio/"
|
|
|
|
|
"pioneers-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-20 04:15:13 +02:00
|
|
|
|
"037gdiiw690jw3wd1s9lxmkqx0caxyk0b4drpm7i9p28gig43q9y"))))
|
2016-02-16 02:07:04 +01:00
|
|
|
|
(build-system gnu-build-system)
|
2018-06-20 04:15:13 +02:00
|
|
|
|
(inputs `(("avahi" ,avahi)
|
|
|
|
|
("gtk+" ,gtk+)
|
|
|
|
|
("librsvg" ,librsvg)))
|
2016-02-16 02:07:04 +01:00
|
|
|
|
(native-inputs `(("intltool" ,intltool)
|
2018-06-20 04:15:13 +02:00
|
|
|
|
("itstool" ,itstool)
|
|
|
|
|
("libxml2" ,libxml2)
|
2016-02-16 02:07:04 +01:00
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(synopsis "Board game inspired by The Settlers of Catan")
|
|
|
|
|
(description "Pioneers is an emulation of the board game The Settlers of
|
|
|
|
|
Catan. It can be played on a local network, on the internet, and with AI
|
|
|
|
|
players.")
|
|
|
|
|
(home-page "http://pio.sourceforge.net/")
|
2016-02-16 03:14:18 +01:00
|
|
|
|
(license license:gpl2+)))
|
2016-02-29 21:20:16 +01:00
|
|
|
|
|
2016-03-05 18:40:00 +01:00
|
|
|
|
(define-public einstein
|
|
|
|
|
(package
|
|
|
|
|
(name "einstein")
|
|
|
|
|
(version "2.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://http.debian.net/debian/pool/main/e/"
|
|
|
|
|
"einstein/einstein_2.0.dfsg.2.orig.tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1hxrlv6n8py48j487i6wbb4n4vd55w0na69r7ccmmr9vmrsw5mlk"))
|
2016-04-08 14:18:13 +02:00
|
|
|
|
(patches (search-patches "einstein-build.patch"))))
|
2016-03-05 18:40:00 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("freetype" ,freetype)
|
|
|
|
|
("sdl" ,(sdl-union (list sdl sdl-mixer sdl-ttf)))
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("font-dejavu" ,font-dejavu)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key outputs inputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out"))
|
|
|
|
|
(dejavu (string-append (assoc-ref inputs "font-dejavu")
|
|
|
|
|
"/share/fonts/truetype/DejaVuSans.ttf")))
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("PREFIX=/usr/local") (string-append "PREFIX=" out)))
|
|
|
|
|
;; The patch above registers a free font for use by the binary,
|
|
|
|
|
;; but the font is copied during the compile phase into a
|
|
|
|
|
;; resources file, so we need to make the ttf file available.
|
|
|
|
|
(symlink dejavu "res/DejaVuSans.ttf")
|
|
|
|
|
#t))))))
|
|
|
|
|
(synopsis "Logic puzzle game")
|
|
|
|
|
(description "The goal of this logic game is to open all cards in a 6x6
|
|
|
|
|
grid, using a number of hints as to their relative position. The game idea
|
|
|
|
|
is attributed to Albert Einstein.")
|
|
|
|
|
;; The original home page has disappeared.
|
|
|
|
|
(home-page (string-append "http://web.archive.org/web/20120521062745/"
|
|
|
|
|
"http://games.flowix.com/en/index.html"))
|
|
|
|
|
;; License according to
|
|
|
|
|
;; http://web.archive.org/web/20150222180355/http://www.babichev.info/en/projects/index.html
|
|
|
|
|
;; The source code is a DFSG-sanitized tarball and does not contain any
|
|
|
|
|
;; license information.
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2016-03-03 12:41:08 +01:00
|
|
|
|
(define-public powwow
|
|
|
|
|
(package
|
|
|
|
|
(name "powwow")
|
|
|
|
|
(version "1.2.17")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
2016-08-02 11:21:00 +02:00
|
|
|
|
"https://www.hoopajoo.net/static/projects/powwow-"
|
2016-03-03 12:41:08 +01:00
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1xmsg2y7qcvj67i9ilnih0mvfxcpni7fzrz343x9rdfnkkzf3pp8"))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("ncurses" ,ncurses)))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://www.hoopajoo.net/projects/powwow.html")
|
|
|
|
|
(synopsis "MUD and telnet client")
|
|
|
|
|
(description
|
|
|
|
|
"POWWOW is a client software which can be used for telnet as well as for
|
|
|
|
|
@dfn{Multi-User Dungeon} (MUD). Additionally it can serve as a nice client for
|
|
|
|
|
the chat server psyced with the specific config located at
|
|
|
|
|
http://lavachat.symlynx.com/unix/")
|
|
|
|
|
(license license:gpl2+)))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
|
2016-05-03 21:25:31 +02:00
|
|
|
|
(define-public red-eclipse
|
2018-01-30 16:14:46 +01:00
|
|
|
|
(let ((release "1.6.0")
|
|
|
|
|
(revision 0)
|
2017-08-20 20:28:20 +02:00
|
|
|
|
(data-sources
|
2018-01-30 16:14:46 +01:00
|
|
|
|
'(("acerspyro" "07mzgdahnr3w3w7kf8nmy20r199rimfx9ryqxjdr793sw0vawqd3")
|
|
|
|
|
("actors" "1hkgscfhg0kmwgym0mw56fhcckzbb2hh3nsvd45v4mdfyk0xnrm7")
|
|
|
|
|
("appleflap" "1q4xs3x904mrrbxzv6lpr3lywm8p6i8339ijzy9j091s2wdl51ka")
|
|
|
|
|
("blendbrush" "004md2haysr9w8fj6l7bj9wcfjqrq9wx1rrjf9dv16k5sbrkqza9")
|
|
|
|
|
("caustics" "1qmmv8ds70j1ixy4rvli309vbcyjq1l5j1wri6nbnjay10f9fcgq")
|
|
|
|
|
("crosshairs" "0q1vadg5cai9i6igl6y08774fd05gav0kinbgb2757n47ig50bns")
|
|
|
|
|
("dziq" "1s9248ky2qqy24z9c2vgpisz500dvsaj249pv1fkrxgsypjm1z6v")
|
|
|
|
|
("elyvisions" "15synpms05996v4c4kdl0h899spl4z7si9kl8c4m7rvc2yvin1ga")
|
|
|
|
|
("fonts" "1l4727ai8mphi7n3wcjp2lh3p47nh6w82s5dpqbbjpqr9gilb69j")
|
|
|
|
|
("freezurbern" "0hcdbzs02mvpsfhmahhqjv6pd8lbsag1bm6rpy61ns5qwmhg96ys")
|
|
|
|
|
("john" "1whyvlx87mb83kfb7jhhnwz9s7lry4li8l3xar61vmlqgmsnz33d")
|
|
|
|
|
("jojo" "02wxa93f5al4rlnsdjpd0hlnca0ympnj8481lgdxx70hny8zi3qi")
|
|
|
|
|
("jwin" "1gb4l7lbhr150hml1y0wbyx7266q5nslh6n494wwrrsvp11s2qk8")
|
|
|
|
|
("luckystrike" "0wy2spvhx5k233fsl283250ym5bqvkk8i6i19sw3zvzyxp2p4yq9")
|
|
|
|
|
("maps" "1dmvp9mskval606z5srjd909jpm6qz4fdcpaszkkhfr5ajbj30vq")
|
|
|
|
|
("mayhem" "0hkzzx0rxda70ixw9lfh9v1dpsbn2dj86jrr3zxjgasbgaxw37ax")
|
|
|
|
|
("mikeplus64" "144fxhp4qjqjw3gvhf7ym6rnfxvxc0zvd3f54jg1jgnccc1hfyah")
|
|
|
|
|
("misc" "0bpvibyc6vjhbzsf67xxn85yq2h97xs96icbskwzs2wsd860kq8c")
|
|
|
|
|
("nieb" "0d72wsibk9sg9nhin3fwzz9zljiccyln0fn42y2q2xbd4my23b1k")
|
|
|
|
|
("nobiax" "19lr36ys98cmpp739svjar1j942fbxz6r062gi7ygh89zh9yrgfy")
|
|
|
|
|
("particles" "02pnq8ksl7f6kqxss3aza98jssdq2s41rhkhki71ynavp2a5akar")
|
|
|
|
|
("philipk" "1xkrb7wa1pyhbs4xxx7vnnzsxrqzswk7gjbdac7i7rj0lwnfaij2")
|
|
|
|
|
("projectiles" "1hra0f1ifiddh16fv4pqcr2amf046lf445v0653zkyri43zgrj5f")
|
|
|
|
|
("props" "0ff6a8pz62f4nsk4c9cr50kirw108a661y5j6fvlsjickw3xjmyv")
|
|
|
|
|
("skyboxes" "1lq58dhrdiivq7llkiyqwpi3bwa89r8hbi98p7zjhw7wdn34i6n2")
|
|
|
|
|
("snipergoth" "0d5qf01bxd4dlffgxf8i91zq6mbyjmfd00dpyligpfj6fdbz87gc")
|
|
|
|
|
("sounds" "0z6jmxsr3w735hrdnxypdb0gi399pwkaycv9grjpiqy43j3ic7gj")
|
|
|
|
|
("textures" "0k5a47g2z99xn17vw7bqbp0w726gxmk33g5gwmqvfhxxxzzwimvi")
|
|
|
|
|
("torley" "12x23l8xcv9ard5v76lb210lvp66whsns2p3k3xkd1sabp5ixbd5")
|
|
|
|
|
("trak" "03kmwj47yb3dqzb6k9kilna9ja8c6jcnblvbs72x15767fl496pb")
|
|
|
|
|
("ulukai" "0vvd016a7x981ixif6dnlg45s0ak7i89pgyrgwy2fpd94nl2am15")
|
|
|
|
|
("unnamed" "18sxvdha41njp6g8wn56mjy6w9x778c793gh8fr0h9cnysb5gfmi")
|
|
|
|
|
("vanities" "1p38mc2566bmb4vdyr9n9s6fkwmynp2xlpdq2a97gzgi4nmm0232")
|
|
|
|
|
("vegetation" "0pf3qvqzabdcri5za61z6m89b5hq7sd3q0idkazmx88a62mcclkb")
|
|
|
|
|
("weapons" "1jr05y9qhhx53plvir35srvv3cmn6wa065p3bskx6h1x6dcbx3c6")
|
|
|
|
|
("wicked" "14b9f92h8hccp7a015z6rqgbs8236sdyxnwsq991ylnap7cbwvam"))))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
(package
|
2016-05-03 18:04:38 +02:00
|
|
|
|
(name "red-eclipse")
|
2017-08-20 20:28:20 +02:00
|
|
|
|
(version (if (zero? revision)
|
|
|
|
|
release
|
|
|
|
|
(string-append release "-"
|
|
|
|
|
(number->string revision))))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/red-eclipse/base"
|
2017-08-20 20:28:20 +02:00
|
|
|
|
"/archive/v" release ".tar.gz"))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-01-30 16:14:46 +01:00
|
|
|
|
"1vs9k6f5fgsiy1n72imlqm8khjwm8cryc08zwd4gr7yxlxv45bs0"))))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:make-flags (list "CC=gcc" "-Csrc"
|
|
|
|
|
(string-append "INSTDIR="
|
2017-08-20 20:28:20 +02:00
|
|
|
|
(assoc-ref %outputs "out") "/bin")
|
|
|
|
|
(string-append "prefix="
|
|
|
|
|
(assoc-ref %outputs "out")))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'unpack-data
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(delete-file-recursively "data")
|
|
|
|
|
(mkdir "data")
|
|
|
|
|
(for-each (lambda (name)
|
2018-01-30 16:14:46 +01:00
|
|
|
|
(invoke "tar" "-xvf"
|
|
|
|
|
(assoc-ref inputs name)
|
|
|
|
|
"-Cdata"
|
|
|
|
|
"--transform"
|
|
|
|
|
(string-append "s/"
|
|
|
|
|
name "-" ,release "/"
|
|
|
|
|
name "/")))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
(list ,@(map car data-sources)))
|
|
|
|
|
#t))
|
2018-01-30 16:14:46 +01:00
|
|
|
|
(add-after 'unpack-data 'add-store-data-package-path-as-default
|
2017-08-20 20:28:20 +02:00
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "src/engine/server.cpp"
|
2018-01-30 16:14:46 +01:00
|
|
|
|
(("(else[[:space:]]*)((addpackagedir\\()\"data\"(\\);))"
|
|
|
|
|
_
|
|
|
|
|
else_part
|
|
|
|
|
addpackagedir_original
|
|
|
|
|
addpackagedir_open
|
|
|
|
|
addpackagedir_close)
|
2017-08-20 20:28:20 +02:00
|
|
|
|
(string-append else_part
|
|
|
|
|
"{ "
|
|
|
|
|
addpackagedir_open
|
|
|
|
|
"\""
|
|
|
|
|
(assoc-ref outputs "out")
|
|
|
|
|
"/share/redeclipse/data\""
|
|
|
|
|
addpackagedir_close
|
|
|
|
|
" "
|
|
|
|
|
addpackagedir_original
|
|
|
|
|
" }")))
|
|
|
|
|
#t))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
(delete 'configure) ; no configure script
|
|
|
|
|
(add-after 'set-paths 'set-sdl-paths
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(setenv "CPATH"
|
|
|
|
|
(string-append (assoc-ref inputs "sdl-union")
|
2016-08-01 17:47:18 +02:00
|
|
|
|
"/include/SDL2"))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
#t))
|
|
|
|
|
(add-after 'install 'copy-data
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(copy-recursively "config"
|
|
|
|
|
(string-append out "/config"))
|
2016-08-01 17:48:39 +02:00
|
|
|
|
(copy-file "doc/examples/servinit.cfg"
|
|
|
|
|
(string-append out "/config/servinit.cfg"))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
(copy-recursively "data"
|
2017-08-20 20:28:20 +02:00
|
|
|
|
(string-append out "/share/redeclipse/data"))
|
|
|
|
|
(mkdir-p (string-append out "/lib/redeclipse"))
|
2018-01-30 16:14:46 +01:00
|
|
|
|
(symlink (string-append out "/share/redeclipse/data")
|
|
|
|
|
(string-append out "/lib/redeclipse/data")))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
#t))
|
|
|
|
|
(add-after 'copy-data 'wrap-program
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin")))
|
|
|
|
|
(with-directory-excursion bin
|
|
|
|
|
(rename-file "redeclipse_linux"
|
|
|
|
|
".redeclipse_linux-real")
|
|
|
|
|
(rename-file "redeclipse_server_linux"
|
|
|
|
|
".redeclipse_server_linux-real")
|
|
|
|
|
(call-with-output-file "redeclipse_linux"
|
|
|
|
|
(lambda (port)
|
|
|
|
|
(format port "#!~a/bin/sh
|
|
|
|
|
# Run the thing from its home, otherwise it just bails out.
|
|
|
|
|
cd \"~a\"
|
|
|
|
|
exec -a \"$0\" ~a/.redeclipse_linux-real~%"
|
|
|
|
|
(assoc-ref inputs "bash") ;implicit input
|
|
|
|
|
(string-append out)
|
|
|
|
|
(string-append bin))))
|
|
|
|
|
(call-with-output-file "redeclipse_server_linux"
|
|
|
|
|
(lambda (port)
|
|
|
|
|
(format port "#!~a/bin/sh
|
|
|
|
|
# Run the thing from its home, otherwise it just bails out.
|
|
|
|
|
cd \"~a\"
|
|
|
|
|
exec -a \"$0\" ~a/.redeclipse_server_linux-real~%"
|
|
|
|
|
(assoc-ref inputs "bash") ;implicit input
|
|
|
|
|
(string-append out)
|
|
|
|
|
(string-append bin))))
|
|
|
|
|
(chmod "redeclipse_linux" #o555)
|
|
|
|
|
(chmod "redeclipse_server_linux" #o555)))
|
|
|
|
|
#t)))))
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("curl" ,curl)
|
|
|
|
|
("glu" ,glu)
|
2016-08-01 17:47:18 +02:00
|
|
|
|
("sdl-union" ,(sdl-union (list sdl2
|
|
|
|
|
sdl2-image
|
|
|
|
|
sdl2-mixer)))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
;; Create origin records for the many separate data packages.
|
|
|
|
|
,@(map (match-lambda
|
|
|
|
|
((name hash)
|
|
|
|
|
(list name
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/red-eclipse/"
|
2017-08-20 20:28:20 +02:00
|
|
|
|
name "/archive/v" release ".tar.gz"))
|
2016-04-23 07:58:55 +02:00
|
|
|
|
(sha256 (base32 hash))
|
|
|
|
|
(file-name (string-append name "-" version
|
|
|
|
|
".tar.gz"))))))
|
|
|
|
|
data-sources)))
|
|
|
|
|
(home-page "http://redeclipse.net/")
|
|
|
|
|
(synopsis "Arena shooter derived from the Cube 2 engine")
|
|
|
|
|
(description
|
|
|
|
|
"Red Eclipse is an arena shooter, created from the Cube2 engine.
|
|
|
|
|
Offering an innovative parkour system and distinct but all potent weapons,
|
|
|
|
|
Red Eclipse provides fast paced and accessible gameplay.")
|
|
|
|
|
;; The engine is under Zlib; data files are covered by the other
|
|
|
|
|
;; licenses. More details at <http://redeclipse.net/wiki/License>.
|
|
|
|
|
(license (list license:expat
|
|
|
|
|
license:zlib
|
|
|
|
|
license:cc-by-sa3.0
|
|
|
|
|
license:cc-by3.0
|
|
|
|
|
license:cc0)))))
|
2015-11-01 20:45:09 +01:00
|
|
|
|
|
2016-06-15 11:02:16 +02:00
|
|
|
|
(define-public grue-hunter
|
|
|
|
|
(package
|
|
|
|
|
(name "grue-hunter")
|
|
|
|
|
(version "1.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://jxself.org/" name ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1hjcpy5439qs3v2zykis7hsi0i17zjs62gks3zd8mnfw9ni4i2h3"))))
|
|
|
|
|
(build-system trivial-build-system) ; no Makefile.PL
|
|
|
|
|
(arguments `(#:modules ((guix build utils))
|
|
|
|
|
#:builder
|
|
|
|
|
(begin
|
|
|
|
|
(use-modules (guix build utils))
|
|
|
|
|
(use-modules (srfi srfi-1))
|
|
|
|
|
|
|
|
|
|
(let* ((tarball (assoc-ref %build-inputs "tarball"))
|
|
|
|
|
(perl (string-append (assoc-ref %build-inputs
|
|
|
|
|
"perl")
|
|
|
|
|
"/bin"))
|
2016-07-11 10:54:57 +02:00
|
|
|
|
(gzip (string-append (assoc-ref %build-inputs
|
2016-06-15 11:02:16 +02:00
|
|
|
|
"gzip")
|
2016-07-11 10:54:57 +02:00
|
|
|
|
"/bin/gzip"))
|
2016-06-15 11:02:16 +02:00
|
|
|
|
(tar (string-append (assoc-ref %build-inputs
|
|
|
|
|
"tar")
|
|
|
|
|
"/bin/tar"))
|
|
|
|
|
(out (assoc-ref %outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
2017-03-13 17:52:12 +01:00
|
|
|
|
(doc (string-append out
|
|
|
|
|
"/share/doc/grue-hunter")))
|
gnu: Use invoke and return #t from all builders.
* gnu/packages/admin.scm, gnu/packages/android.scm, gnu/packages/audio.scm,
gnu/packages/avr.scm, gnu/packages/base.scm, gnu/packages/bioinformatics.scm,
gnu/packages/certs.scm, gnu/packages/check.scm, gnu/packages/code.scm,
gnu/packages/commencement.scm, gnu/packages/dictionaries.scm,
gnu/packages/docbook.scm, gnu/packages/emacs.scm, gnu/packages/embedded.scm,
gnu/packages/fonts.scm, gnu/packages/games.scm, gnu/packages/gnome.scm,
gnu/packages/gnu-doc.scm, gnu/packages/guile.scm, gnu/packages/hurd.scm,
gnu/packages/javascript.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm, gnu/packages/lxde.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm, gnu/packages/mate.scm,
gnu/packages/pkg-config.scm, gnu/packages/qt.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/sdl.scm, gnu/packages/statistics.scm,
gnu/packages/syncthing.scm, gnu/packages/tex.scm, gnu/packages/web.scm,
gnu/packages/wine.scm, gnu/packages/xfce.scm: In the builders of packages
using 'trivial-build-system', use invoke where appropriate, raise exceptions
on errors, and otherwise return #t.
2018-03-28 02:14:05 +02:00
|
|
|
|
(copy-file tarball "grue-hunter.tar.gz")
|
|
|
|
|
(invoke gzip "-d" "grue-hunter.tar.gz")
|
|
|
|
|
(invoke tar "xvf" "grue-hunter.tar")
|
2016-06-15 11:02:16 +02:00
|
|
|
|
|
gnu: Use invoke and return #t from all builders.
* gnu/packages/admin.scm, gnu/packages/android.scm, gnu/packages/audio.scm,
gnu/packages/avr.scm, gnu/packages/base.scm, gnu/packages/bioinformatics.scm,
gnu/packages/certs.scm, gnu/packages/check.scm, gnu/packages/code.scm,
gnu/packages/commencement.scm, gnu/packages/dictionaries.scm,
gnu/packages/docbook.scm, gnu/packages/emacs.scm, gnu/packages/embedded.scm,
gnu/packages/fonts.scm, gnu/packages/games.scm, gnu/packages/gnome.scm,
gnu/packages/gnu-doc.scm, gnu/packages/guile.scm, gnu/packages/hurd.scm,
gnu/packages/javascript.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm, gnu/packages/lxde.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm, gnu/packages/mate.scm,
gnu/packages/pkg-config.scm, gnu/packages/qt.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/sdl.scm, gnu/packages/statistics.scm,
gnu/packages/syncthing.scm, gnu/packages/tex.scm, gnu/packages/web.scm,
gnu/packages/wine.scm, gnu/packages/xfce.scm: In the builders of packages
using 'trivial-build-system', use invoke where appropriate, raise exceptions
on errors, and otherwise return #t.
2018-03-28 02:14:05 +02:00
|
|
|
|
(mkdir-p bin)
|
|
|
|
|
(copy-file "grue-hunter/gh.pl"
|
|
|
|
|
(string-append bin "/grue-hunter"))
|
|
|
|
|
(patch-shebang (string-append bin "/grue-hunter")
|
|
|
|
|
(list perl))
|
|
|
|
|
|
|
|
|
|
(install-file "grue-hunter/AGPLv3.txt" doc)
|
2016-06-15 11:02:16 +02:00
|
|
|
|
|
gnu: Use invoke and return #t from all builders.
* gnu/packages/admin.scm, gnu/packages/android.scm, gnu/packages/audio.scm,
gnu/packages/avr.scm, gnu/packages/base.scm, gnu/packages/bioinformatics.scm,
gnu/packages/certs.scm, gnu/packages/check.scm, gnu/packages/code.scm,
gnu/packages/commencement.scm, gnu/packages/dictionaries.scm,
gnu/packages/docbook.scm, gnu/packages/emacs.scm, gnu/packages/embedded.scm,
gnu/packages/fonts.scm, gnu/packages/games.scm, gnu/packages/gnome.scm,
gnu/packages/gnu-doc.scm, gnu/packages/guile.scm, gnu/packages/hurd.scm,
gnu/packages/javascript.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm, gnu/packages/lxde.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm, gnu/packages/mate.scm,
gnu/packages/pkg-config.scm, gnu/packages/qt.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/sdl.scm, gnu/packages/statistics.scm,
gnu/packages/syncthing.scm, gnu/packages/tex.scm, gnu/packages/web.scm,
gnu/packages/wine.scm, gnu/packages/xfce.scm: In the builders of packages
using 'trivial-build-system', use invoke where appropriate, raise exceptions
on errors, and otherwise return #t.
2018-03-28 02:14:05 +02:00
|
|
|
|
#t))))
|
2016-06-15 11:02:16 +02:00
|
|
|
|
(inputs `(("perl" ,perl)
|
|
|
|
|
("tar" ,tar)
|
|
|
|
|
("gzip" ,gzip)
|
|
|
|
|
("tarball" ,source)))
|
|
|
|
|
(home-page "http://jxself.org/grue-hunter.shtml")
|
|
|
|
|
(synopsis "Text adventure game")
|
|
|
|
|
(description
|
|
|
|
|
"Grue Hunter is a text adventure game written in Perl. You must make
|
|
|
|
|
your way through an underground cave system in search of the Grue. Can you
|
|
|
|
|
capture it and get out alive?")
|
|
|
|
|
(license license:agpl3+)))
|
2016-06-20 01:00:09 +02:00
|
|
|
|
|
2017-04-24 00:41:49 +02:00
|
|
|
|
(define-public lierolibre
|
|
|
|
|
(package
|
|
|
|
|
(name "lierolibre")
|
|
|
|
|
(version "0.5")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://launchpad.net/lierolibre/trunk/"
|
|
|
|
|
version "/+download/lierolibre-"
|
|
|
|
|
version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1cf1gvsn4qq190lrf9k5bpjnqwlcfw7pajvdnh7z5r4jqw0rsbl9"))
|
|
|
|
|
(patches
|
|
|
|
|
(search-patches "lierolibre-check-unaligned-access.patch"
|
|
|
|
|
"lierolibre-try-building-other-arch.patch"
|
|
|
|
|
"lierolibre-remove-arch-warning.patch"
|
|
|
|
|
"lierolibre-newer-libconfig.patch"
|
|
|
|
|
"lierolibre-is-free-software.patch"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
'(begin
|
|
|
|
|
;; Delete pre-compiled files.
|
|
|
|
|
(delete-file "data/LIERO.CHR")
|
|
|
|
|
(delete-file "data/LIERO.SND")
|
|
|
|
|
#t))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("imagemagick" ,imagemagick)
|
|
|
|
|
("pkg-config" ,pkg-config)
|
|
|
|
|
("util-linux" ,util-linux)
|
|
|
|
|
("sox" ,sox)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("boost" ,boost)
|
|
|
|
|
("libconfig" ,libconfig)
|
|
|
|
|
("sdl-union" ,(sdl-union (list sdl sdl-image sdl-mixer)))
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(home-page "https://gitlab.com/lierolibre/lierolibre")
|
|
|
|
|
(synopsis "Old-school earthworm action game")
|
|
|
|
|
(description
|
|
|
|
|
"lierolibre is an earthworm action game where you fight another player
|
|
|
|
|
(or the computer) underground using a wide array of weapons.
|
|
|
|
|
|
|
|
|
|
Features:
|
|
|
|
|
@itemize
|
|
|
|
|
@item 2 worms, 40 weapons, great playability, two game modes: Kill'em All
|
|
|
|
|
and Game of Tag, plus AI-players without true intelligence!
|
|
|
|
|
@item Dat nostalgia.
|
|
|
|
|
@item Extensions via a hidden F1 menu:
|
|
|
|
|
@itemize
|
|
|
|
|
@item Replays
|
|
|
|
|
@item Game controller support
|
|
|
|
|
@item Powerlevel palettes
|
|
|
|
|
@end itemize
|
|
|
|
|
@item Ability to write game variables to plain text files.
|
|
|
|
|
@item Ability to load game variables from both EXE and plain text files.
|
|
|
|
|
@item Scripts to extract and repack graphics, sounds and levels.
|
|
|
|
|
@end itemize
|
|
|
|
|
|
|
|
|
|
To switch between different window sizes, use F6, F7 and F8, to switch to
|
|
|
|
|
fullscreen, use F5 or Alt+Enter.")
|
|
|
|
|
;; Code mainly BSD-2, some parts under Boost 1.0. All assets are WTFPL2.
|
|
|
|
|
(license (list license:bsd-2 license:boost1.0 license:wtfpl2))))
|
|
|
|
|
|
2016-06-20 01:00:09 +02:00
|
|
|
|
(define-public warzone2100
|
|
|
|
|
(package
|
|
|
|
|
(name "warzone2100")
|
2016-10-04 10:17:56 +02:00
|
|
|
|
(version "3.2.1")
|
2016-06-20 01:00:09 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/" name
|
|
|
|
|
"/releases/" version "/" name "-" version
|
|
|
|
|
".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-10-04 10:17:56 +02:00
|
|
|
|
"1nd609s0g4sya3r4amhkz3f4dpdmm94vsd2ii76ap665a1nbfrhg"))))
|
2016-06-20 01:00:09 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
2016-10-04 10:17:56 +02:00
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'link-tests-with-qt
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "tests/Makefile.in"
|
|
|
|
|
(("(framework_linktest_LDADD|maptest_LDADD) = " prefix)
|
|
|
|
|
(string-append prefix "$(QT5_LIBS) ")))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'remove-reference-to-missing-file
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "icons/Makefile.in"
|
|
|
|
|
(("\\$\\(INSTALL_DATA\\) \\$\\(srcdir\\)/warzone2100.appdata.xml.*") ""))
|
2017-05-25 10:26:58 +02:00
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'patch-for-qt5.8
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "lib/widget/editbox.cpp"
|
|
|
|
|
(("== '\\\\0'")
|
|
|
|
|
"== QChar('\\0')"))
|
2016-10-04 10:17:56 +02:00
|
|
|
|
#t)))))
|
2016-06-20 01:00:09 +02:00
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)
|
|
|
|
|
("unzip" ,unzip)
|
|
|
|
|
("zip" ,zip)))
|
|
|
|
|
(inputs `(("fontconfig" ,fontconfig)
|
|
|
|
|
("freetype" ,freetype)
|
|
|
|
|
("fribidi" ,fribidi)
|
|
|
|
|
("glew" ,glew)
|
|
|
|
|
("libtheora" ,libtheora)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("libxrandr" ,libxrandr)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("physfs" ,physfs)
|
2017-05-25 10:26:58 +02:00
|
|
|
|
("qtbase" ,qtbase)
|
|
|
|
|
("qtscript" ,qtscript)
|
2016-10-04 10:17:56 +02:00
|
|
|
|
("openssl" ,openssl)
|
2016-06-20 01:00:09 +02:00
|
|
|
|
("quesoglc" ,quesoglc)
|
2016-10-04 10:17:56 +02:00
|
|
|
|
("sdl2" ,sdl2)))
|
2016-06-20 01:00:09 +02:00
|
|
|
|
(home-page "http://wz2100.net")
|
|
|
|
|
(synopsis "3D Real-time strategy and real-time tactics game")
|
|
|
|
|
(description
|
|
|
|
|
"Warzone 2100 offers campaign, multi-player, and single-player skirmish
|
|
|
|
|
modes. An extensive tech tree with over 400 different technologies, combined
|
|
|
|
|
with the unit design system, allows for a wide variety of possible units and
|
|
|
|
|
tactics.")
|
|
|
|
|
; Everything is GPLv2+ unless otherwise specified in COPYING.NONGPL
|
|
|
|
|
(license (list license:bsd-3
|
|
|
|
|
license:cc0
|
|
|
|
|
license:cc-by-sa3.0
|
|
|
|
|
license:expat
|
|
|
|
|
license:gpl2+
|
|
|
|
|
license:lgpl2.1+))))
|
2016-06-26 14:31:21 +02:00
|
|
|
|
|
|
|
|
|
(define-public starfighter
|
|
|
|
|
(package
|
|
|
|
|
(name "starfighter")
|
2017-03-05 04:13:22 +01:00
|
|
|
|
(version "1.7")
|
2016-06-26 14:31:21 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"mirror://savannah/starfighter/"
|
|
|
|
|
(version-major+minor version) "/"
|
|
|
|
|
name "-" version "-src.tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-03-05 04:13:22 +01:00
|
|
|
|
"1646hpjq8bz2fkfkja1dah511hn7zd2r7da4w9c9blhad3p5732v"))))
|
2016-06-26 14:31:21 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("sdl2" ,sdl2)
|
|
|
|
|
("sdl2-image" ,sdl2-image)
|
|
|
|
|
("sdl2-mixer" ,sdl2-mixer)))
|
|
|
|
|
(home-page "http://starfighter.nongnu.org/")
|
|
|
|
|
(synopsis "2D scrolling shooter game")
|
|
|
|
|
(description
|
|
|
|
|
"In the year 2579, the intergalactic weapons corporation, WEAPCO, has
|
|
|
|
|
dominated the galaxy. Guide Chris Bainfield and his friend Sid Wilson on
|
|
|
|
|
their quest to liberate the galaxy from the clutches of WEAPCO. Along the
|
|
|
|
|
way, you will encounter new foes, make new allies, and assist local rebels
|
|
|
|
|
in strikes against the evil corporation.")
|
|
|
|
|
;; gfx and music are under CC-BY 3.0, CC-BY-SA 3.0, CC0 or Public Domain.
|
|
|
|
|
(license (list license:gpl3+
|
|
|
|
|
license:cc-by3.0
|
|
|
|
|
license:cc-by-sa3.0
|
|
|
|
|
license:cc0
|
|
|
|
|
license:public-domain))))
|
2016-07-04 17:35:14 +02:00
|
|
|
|
|
|
|
|
|
(define-public chromium-bsu
|
|
|
|
|
(package
|
|
|
|
|
(name "chromium-bsu")
|
2016-11-04 16:17:09 +01:00
|
|
|
|
(version "0.9.16.1")
|
2016-07-04 17:35:14 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/" name
|
|
|
|
|
"/Chromium B.S.U. source code/"
|
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-11-04 16:17:09 +01:00
|
|
|
|
"0jk2w5b6s6nkzri585bbz16cif2fhqcnl5l1mq3rd98r9nil3hd1"))))
|
2016-07-04 17:35:14 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
2016-11-18 18:26:08 +01:00
|
|
|
|
(inputs `(("gettext" ,gettext-minimal)
|
2016-11-04 16:17:09 +01:00
|
|
|
|
("glu" ,glu)
|
2016-07-04 17:35:14 +02:00
|
|
|
|
("quesoglc" ,quesoglc)
|
|
|
|
|
("sdl-union" ,(sdl-union (list sdl sdl-image sdl-mixer)))))
|
|
|
|
|
(home-page "http://chromium-bsu.sourceforge.net/")
|
|
|
|
|
(synopsis "Fast-paced, arcade-style, top-scrolling space shooter")
|
|
|
|
|
(description
|
|
|
|
|
"In this game you are the captain of the cargo ship Chromium B.S.U. and
|
|
|
|
|
are responsible for delivering supplies to the troops on the front line. Your
|
|
|
|
|
ship has a small fleet of robotic fighters which you control from the relative
|
|
|
|
|
safety of the Chromium vessel.")
|
|
|
|
|
;; Clarified Artistic License for everything but sound, which is covered
|
|
|
|
|
;; by the Expat License.
|
|
|
|
|
(license (list license:clarified-artistic license:expat))))
|
2016-07-09 03:13:58 +02:00
|
|
|
|
|
|
|
|
|
(define-public tuxpaint
|
|
|
|
|
(package
|
|
|
|
|
(name "tuxpaint")
|
|
|
|
|
(version "0.9.22") ;keep VER_DATE below in sync
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/tuxpaint/tuxpaint/"
|
|
|
|
|
version "/tuxpaint-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1qrbrdck9yxpcg3si6jb9i11w8lw9h4hqad0pfaxgyiniqpr7gca"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
'(begin
|
|
|
|
|
;; Remove win32 directory which contains binary dll's and the
|
|
|
|
|
;; deprecated visualc directory.
|
|
|
|
|
(for-each delete-file-recursively '("win32" "visualc"))
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
;; Do not rely on $(GPERF) being an absolute file name
|
|
|
|
|
(("\\[ -x \\$\\(GPERF\\) \\]")
|
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
|
|
|
|
"$(GPERF) --version >/dev/null 2>&1"))
|
|
|
|
|
#t))
|
2016-07-09 03:13:58 +02:00
|
|
|
|
(patches (search-patches "tuxpaint-stamps-path.patch"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("gperf" ,gperf)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("cairo" ,cairo)
|
|
|
|
|
("fribidi" ,fribidi)
|
2016-09-25 09:33:02 +02:00
|
|
|
|
("gettext" ,gettext-minimal)
|
2016-07-09 03:13:58 +02:00
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("librsvg" ,librsvg)
|
|
|
|
|
("libpaper" ,libpaper)
|
|
|
|
|
("netpbm" ,netpbm)
|
|
|
|
|
("sdl" ,(sdl-union (list sdl sdl-mixer sdl-ttf sdl-image)))))
|
|
|
|
|
;; TODO: Use system fonts rather than those in data/fonts
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags `("VER_DATE=2014-08-23"
|
|
|
|
|
"GPERF=gperf" "CC=gcc"
|
|
|
|
|
"SDL_PCNAME=sdl SDL_image SDL_mixer SDL_ttf"
|
|
|
|
|
,(string-append "PREFIX=" %output)
|
|
|
|
|
"GNOME_PREFIX=$(PREFIX)"
|
|
|
|
|
"COMPLETIONDIR=$(PREFIX)/etc/bash_completion.d")
|
2017-04-20 19:30:00 +02:00
|
|
|
|
#:parallel-build? #f ;fails on some systems
|
2016-07-09 03:13:58 +02:00
|
|
|
|
#:tests? #f ;No tests
|
|
|
|
|
#:phases (modify-phases %standard-phases
|
|
|
|
|
(delete 'configure) ;no configure phase
|
|
|
|
|
(add-after 'install 'fix-import
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(net (assoc-ref inputs "netpbm"))
|
|
|
|
|
(tpi (string-append out "/bin/tuxpaint-import")))
|
|
|
|
|
(substitute* tpi
|
|
|
|
|
;; Point to installation prefix so that the default
|
|
|
|
|
;; configure file is found.
|
|
|
|
|
(("/usr/local") out))
|
|
|
|
|
;; tuxpaint-import uses a bunch of programs from
|
|
|
|
|
;; netpbm, so make sure it knows where those are
|
|
|
|
|
(wrap-program tpi
|
|
|
|
|
`("PATH" ":" prefix
|
|
|
|
|
(,(string-append net "/bin"))))))))))
|
|
|
|
|
(native-search-paths
|
|
|
|
|
(list (search-path-specification
|
|
|
|
|
(variable "TUXPAINT_STAMPS_PATH")
|
|
|
|
|
(files '("share/tuxpaint/stamps")))))
|
|
|
|
|
(home-page "http://www.tuxpaint.org")
|
|
|
|
|
(synopsis "Drawing software for children")
|
|
|
|
|
(description
|
|
|
|
|
"Tux Paint is a free drawing program designed for young children (kids
|
|
|
|
|
ages 3 and up). It has a simple, easy-to-use interface; fun sound effects;
|
|
|
|
|
and an encouraging cartoon mascot who helps guide children as they use the
|
|
|
|
|
program. It provides a blank canvas and a variety of drawing tools to help
|
|
|
|
|
your child be creative.")
|
|
|
|
|
(license license:gpl2+)))
|
2016-07-09 03:15:43 +02:00
|
|
|
|
|
|
|
|
|
(define-public tuxpaint-stamps
|
|
|
|
|
(package
|
|
|
|
|
(name "tuxpaint-stamps")
|
|
|
|
|
(version "2014.08.23")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/tuxpaint/tuxpaint-stamps/"
|
|
|
|
|
(string-map (λ (x) (if (eq? x #\.) #\- x)) version)
|
|
|
|
|
"/tuxpaint-stamps-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0rhlwrjz44wp269v3rid4p8pi0i615pzifm1ym6va64gn1bms06q"))))
|
|
|
|
|
(build-system trivial-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("tar" ,tar)
|
|
|
|
|
("gzip" ,gzip)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:modules ((guix build utils))
|
|
|
|
|
#:builder (begin
|
|
|
|
|
(use-modules (guix build utils))
|
|
|
|
|
(setenv "PATH"
|
|
|
|
|
(string-append
|
|
|
|
|
(assoc-ref %build-inputs "tar") "/bin" ":"
|
|
|
|
|
(assoc-ref %build-inputs "gzip") "/bin"))
|
gnu: Use invoke and return #t from all builders.
* gnu/packages/admin.scm, gnu/packages/android.scm, gnu/packages/audio.scm,
gnu/packages/avr.scm, gnu/packages/base.scm, gnu/packages/bioinformatics.scm,
gnu/packages/certs.scm, gnu/packages/check.scm, gnu/packages/code.scm,
gnu/packages/commencement.scm, gnu/packages/dictionaries.scm,
gnu/packages/docbook.scm, gnu/packages/emacs.scm, gnu/packages/embedded.scm,
gnu/packages/fonts.scm, gnu/packages/games.scm, gnu/packages/gnome.scm,
gnu/packages/gnu-doc.scm, gnu/packages/guile.scm, gnu/packages/hurd.scm,
gnu/packages/javascript.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm, gnu/packages/lxde.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm, gnu/packages/mate.scm,
gnu/packages/pkg-config.scm, gnu/packages/qt.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/sdl.scm, gnu/packages/statistics.scm,
gnu/packages/syncthing.scm, gnu/packages/tex.scm, gnu/packages/web.scm,
gnu/packages/wine.scm, gnu/packages/xfce.scm: In the builders of packages
using 'trivial-build-system', use invoke where appropriate, raise exceptions
on errors, and otherwise return #t.
2018-03-28 02:14:05 +02:00
|
|
|
|
(invoke "tar" "xvf" (assoc-ref %build-inputs "source"))
|
2016-07-09 03:15:43 +02:00
|
|
|
|
(chdir (string-append ,name "-" ,version))
|
|
|
|
|
(let ((dir (string-append %output "/share/tuxpaint/stamps")))
|
|
|
|
|
(mkdir-p dir)
|
gnu: Use invoke and return #t from all builders.
* gnu/packages/admin.scm, gnu/packages/android.scm, gnu/packages/audio.scm,
gnu/packages/avr.scm, gnu/packages/base.scm, gnu/packages/bioinformatics.scm,
gnu/packages/certs.scm, gnu/packages/check.scm, gnu/packages/code.scm,
gnu/packages/commencement.scm, gnu/packages/dictionaries.scm,
gnu/packages/docbook.scm, gnu/packages/emacs.scm, gnu/packages/embedded.scm,
gnu/packages/fonts.scm, gnu/packages/games.scm, gnu/packages/gnome.scm,
gnu/packages/gnu-doc.scm, gnu/packages/guile.scm, gnu/packages/hurd.scm,
gnu/packages/javascript.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm, gnu/packages/lxde.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm, gnu/packages/mate.scm,
gnu/packages/pkg-config.scm, gnu/packages/qt.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/sdl.scm, gnu/packages/statistics.scm,
gnu/packages/syncthing.scm, gnu/packages/tex.scm, gnu/packages/web.scm,
gnu/packages/wine.scm, gnu/packages/xfce.scm: In the builders of packages
using 'trivial-build-system', use invoke where appropriate, raise exceptions
on errors, and otherwise return #t.
2018-03-28 02:14:05 +02:00
|
|
|
|
(copy-recursively "stamps" dir))
|
|
|
|
|
#t)))
|
2016-07-09 03:15:43 +02:00
|
|
|
|
(home-page (package-home-page tuxpaint))
|
|
|
|
|
(synopsis "Stamp images for Tux Paint")
|
|
|
|
|
(description
|
|
|
|
|
"This package contains a set of \"Rubber Stamp\" images which can be used
|
|
|
|
|
with the \"Stamp\" tool within Tux Paint.")
|
|
|
|
|
(license license:gpl2+)))
|
2016-07-09 07:08:01 +02:00
|
|
|
|
|
|
|
|
|
(define-public tuxpaint-config
|
|
|
|
|
(package
|
|
|
|
|
(name "tuxpaint-config")
|
|
|
|
|
(version "0.0.13") ;keep VER_DATE below in sync
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/tuxpaint/tuxpaint-config/"
|
|
|
|
|
version "/tuxpaint-config-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1z12s46mvy87qs3vgq9m0ki9pp21zqc52mmgphahpihw3s7haf6v"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
2016-09-25 09:33:02 +02:00
|
|
|
|
`(("gettext" ,gettext-minimal)))
|
2016-07-09 07:08:01 +02:00
|
|
|
|
(inputs
|
|
|
|
|
`(("fltk" ,fltk)
|
|
|
|
|
("libpaper" ,libpaper)
|
|
|
|
|
;; TODO: Should the following be propagated by fltk?
|
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("libxft" ,libxft)
|
|
|
|
|
("mesa" ,mesa)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags `("VER_DATE=2014-08-23"
|
|
|
|
|
"CONFDIR=/etc/tuxpaint" ;don't write to store
|
|
|
|
|
,(string-append "PREFIX=" %output)
|
|
|
|
|
"GNOME_PREFIX=$(PREFIX)")
|
2016-08-06 06:45:00 +02:00
|
|
|
|
#:parallel-build? #f ;race conditions
|
2016-07-09 07:08:01 +02:00
|
|
|
|
#:tests? #f ;no tests
|
|
|
|
|
#:phases (modify-phases %standard-phases
|
|
|
|
|
(delete 'configure) ;no configure phase
|
|
|
|
|
(add-before 'install 'gzip-no-name
|
|
|
|
|
(lambda* _
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
;; tuxpaint-config compresses its own documentation;
|
|
|
|
|
;; make sure it uses flags for reproducibility.
|
|
|
|
|
(("gzip") "gzip --no-name"))))
|
|
|
|
|
(add-before 'install 'make-install-dirs
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(mkdir-p (string-append out "/bin"))
|
|
|
|
|
#t))))))
|
|
|
|
|
(home-page (package-home-page tuxpaint))
|
|
|
|
|
(synopsis "Configure Tux Paint")
|
|
|
|
|
(description
|
|
|
|
|
"Tux Paint Config is a graphical configuration editor for Tux Paint.")
|
|
|
|
|
(license license:gpl2))) ;no "or later" present
|
2016-08-01 19:30:47 +02:00
|
|
|
|
|
|
|
|
|
(define-public supertux
|
|
|
|
|
(package
|
|
|
|
|
(name "supertux")
|
2017-01-04 00:06:34 +01:00
|
|
|
|
(version "0.5.1")
|
2016-08-01 19:30:47 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-10-04 08:28:53 +02:00
|
|
|
|
(uri (string-append "https://github.com/SuperTux/supertux/"
|
|
|
|
|
"releases/download/v" version "/SuperTux-v"
|
|
|
|
|
version "-Source.tar.gz"))
|
2016-08-01 19:30:47 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-01-04 00:06:34 +01:00
|
|
|
|
"1i8avad7w7ikj870z519j383ldy29r6f956bs38cbr8wk513pp69"))))
|
2016-10-04 08:28:53 +02:00
|
|
|
|
(arguments
|
|
|
|
|
'(#:tests? #f
|
|
|
|
|
#:configure-flags '("-DINSTALL_SUBDIR_BIN=bin"
|
|
|
|
|
"-DENABLE_BOOST_STATIC_LIBS=OFF")))
|
2016-08-01 19:30:47 +02:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(inputs `(("sdl2" ,sdl2)
|
|
|
|
|
("sdl2-image" ,sdl2-image)
|
|
|
|
|
("sdl2-mixer" ,sdl2-mixer)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("glew" ,glew)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("libogg" ,libogg)
|
|
|
|
|
("physfs" ,physfs)
|
|
|
|
|
("curl" ,curl)
|
|
|
|
|
("boost" ,boost)))
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
|
|
|
|
(synopsis "2D platformer game")
|
|
|
|
|
(description "SuperTux is a free classic 2D jump'n run sidescroller game
|
|
|
|
|
in a style similar to the original Super Mario games covered under
|
|
|
|
|
the GNU GPL.")
|
|
|
|
|
(home-page "https://supertuxproject.org/")
|
|
|
|
|
(license license:gpl3+)))
|
2016-02-07 12:57:40 +01:00
|
|
|
|
|
2016-08-08 21:54:50 +02:00
|
|
|
|
(define-public tintin++
|
|
|
|
|
(package
|
|
|
|
|
(name "tintin++")
|
2018-01-30 16:55:12 +01:00
|
|
|
|
(version "2.01.4")
|
2016-08-08 21:54:50 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2017-03-12 15:45:21 +01:00
|
|
|
|
(uri (string-append "mirror://sourceforge/tintin"
|
|
|
|
|
"/TinTin++ Source Code/" version
|
2016-08-08 21:54:50 +02:00
|
|
|
|
"/tintin" "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-01-30 16:55:12 +01:00
|
|
|
|
"1g7bh8xs1ml0iyraps3a3dzaycci922y7fk5j0wyr4ssyjzsy8nx"))))
|
2016-08-08 21:54:50 +02:00
|
|
|
|
(inputs
|
|
|
|
|
`(("gnutls" ,gnutls)
|
|
|
|
|
("pcre" ,pcre)
|
|
|
|
|
("readline" ,readline)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:tests? #f ; no test suite
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; The source is in tt/src.
|
|
|
|
|
(add-before 'configure 'chdir
|
|
|
|
|
(lambda _
|
|
|
|
|
(chdir "src")
|
|
|
|
|
#t)))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://tintin.sourceforge.net/")
|
|
|
|
|
(synopsis "MUD client")
|
|
|
|
|
(description
|
|
|
|
|
"TinTin++ is a MUD client which supports MCCP (Mud Client Compression Protocol),
|
|
|
|
|
MMCP (Mud Master Chat Protocol), xterm 256 colors, most TELNET options used by MUDs,
|
|
|
|
|
as well as those required to login via telnet on Linux / Mac OS X servers, and an
|
|
|
|
|
auto mapper with a VT100 map display.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-02-07 12:57:40 +01:00
|
|
|
|
(define-public laby
|
|
|
|
|
(package
|
|
|
|
|
(name "laby")
|
|
|
|
|
(version "0.6.4")
|
|
|
|
|
(source
|
|
|
|
|
(origin (method url-fetch)
|
|
|
|
|
(uri (string-append
|
2016-10-10 08:36:07 +02:00
|
|
|
|
"https://github.com/sgimenez/laby/archive/"
|
|
|
|
|
name "-" version ".tar.gz"))
|
2016-02-07 12:57:40 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-10-10 08:36:07 +02:00
|
|
|
|
"0gyrfa95l1qka7gbjf7l6mk7mbfvph00l0c995ia272qdw7rjhyf"))
|
2016-02-07 12:57:40 +01:00
|
|
|
|
(patches (search-patches "laby-make-install.patch"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("lablgtk" ,lablgtk)
|
|
|
|
|
("ocaml" ,ocaml)
|
|
|
|
|
("ocaml-findlib" ,ocaml-findlib)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-before 'build 'setenv
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(let ((lablgtk (assoc-ref inputs "lablgtk")))
|
|
|
|
|
(setenv "LD_LIBRARY_PATH"
|
|
|
|
|
(string-append lablgtk "/lib/ocaml/stublibs"))))))
|
|
|
|
|
#:tests? #f ; no 'check' target
|
|
|
|
|
#:make-flags
|
|
|
|
|
(list (string-append "PREFIX=" (assoc-ref %outputs "out")) "all")))
|
|
|
|
|
(home-page "https://sgimenez.github.io/laby/")
|
|
|
|
|
(synopsis "Programming game")
|
|
|
|
|
(description "Learn programming, playing with ants and spider webs ;-)
|
|
|
|
|
Your robot ant can be programmed in many languages: OCaml, Python, C, C++,
|
|
|
|
|
Java, Ruby, Lua, JavaScript, Pascal, Perl, Scheme, Vala, Prolog. Experienced
|
|
|
|
|
programmers may also add their own favorite language.")
|
|
|
|
|
(license license:gpl3+)))
|
2016-08-30 22:40:27 +02:00
|
|
|
|
|
|
|
|
|
(define-public bambam
|
|
|
|
|
(package
|
|
|
|
|
(name "bambam")
|
|
|
|
|
(version "0.5")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/porridge/bambam/archive/"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"10w110mjdwbvddzihh9rganvvjr5jfiz8cs9n7w12zndwwcc3ria"))))
|
|
|
|
|
(build-system python-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:python ,python-2
|
|
|
|
|
#:tests? #f ; no tests
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'build)
|
|
|
|
|
(add-before 'install 'patch-data-dir-location
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "bambam.py"
|
2016-08-31 19:16:19 +02:00
|
|
|
|
(("'data'") "'../share/bambam/data'"))
|
2016-08-30 22:40:27 +02:00
|
|
|
|
#t))
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
|
|
|
|
(share (string-append out "/share")))
|
|
|
|
|
(mkdir-p bin)
|
|
|
|
|
(copy-file "bambam.py" (string-append bin "/bambam"))
|
|
|
|
|
(install-file "bambam.6" (string-append share "/man/man6"))
|
|
|
|
|
(copy-recursively "data" (string-append share "/bambam/data")))
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("python-pygame" ,python-pygame)))
|
|
|
|
|
(home-page "https://github.com/porridge/bambam")
|
2016-08-31 19:16:19 +02:00
|
|
|
|
(synopsis "Keyboard mashing and doodling game for babies")
|
2016-08-30 22:40:27 +02:00
|
|
|
|
(description "Bambam is a simple baby keyboard (and gamepad) masher
|
|
|
|
|
application that locks the keyboard and mouse and instead displays bright
|
|
|
|
|
colors, pictures, and sounds.")
|
|
|
|
|
(license license:gpl3+)))
|
2016-09-17 07:38:58 +02:00
|
|
|
|
|
2018-06-18 17:55:27 +02:00
|
|
|
|
(define-public mrrescue
|
|
|
|
|
(package
|
|
|
|
|
(name "mrrescue")
|
|
|
|
|
(version "1.02e")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/SimonLarsen/mrrescue/releases/"
|
|
|
|
|
"download/" version "/" name version ".love"))
|
|
|
|
|
(file-name (string-append name "-" version ".love"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0jwzbwkgp1l5ia6c7s760gmdirbsncp6nfqp7vqdqsfb63la9gl2"))))
|
|
|
|
|
(build-system trivial-build-system)
|
|
|
|
|
(arguments
|
2018-06-19 04:49:33 +02:00
|
|
|
|
`(#:modules ((guix build utils))
|
2018-06-18 17:55:27 +02:00
|
|
|
|
#:builder
|
|
|
|
|
(begin
|
|
|
|
|
(use-modules (guix build utils))
|
2018-06-19 04:49:33 +02:00
|
|
|
|
(let* ((out (assoc-ref %outputs "out"))
|
|
|
|
|
(script (string-append out "/bin/" ,name))
|
|
|
|
|
(data (string-append out "/share/" ,name))
|
|
|
|
|
(source (assoc-ref %build-inputs "source"))
|
|
|
|
|
(unzip (string-append (assoc-ref %build-inputs "unzip")
|
|
|
|
|
"/bin/unzip"))
|
|
|
|
|
(patch (string-append (assoc-ref %build-inputs "patch")
|
|
|
|
|
"/bin/patch"))
|
|
|
|
|
(bash (string-append (assoc-ref %build-inputs "bash")
|
|
|
|
|
"/bin/bash"))
|
|
|
|
|
(love (string-append (assoc-ref %build-inputs "love")
|
|
|
|
|
"/bin/love")))
|
|
|
|
|
|
|
|
|
|
(mkdir-p (dirname script))
|
|
|
|
|
(with-output-to-file script
|
2018-06-18 17:55:27 +02:00
|
|
|
|
(lambda ()
|
|
|
|
|
(format #t "#!~a~%" bash)
|
2018-06-19 04:49:33 +02:00
|
|
|
|
(format #t "exec -a ~a \"~a\" \"~a\"~%" ,name love data)))
|
|
|
|
|
(chmod script #o755)
|
|
|
|
|
|
|
|
|
|
;; The better way to package this game would be to install *only* the
|
|
|
|
|
;; script above, pointing to the unextracted .love file in the store.
|
|
|
|
|
;; However, mrrescue 1.02e needs to be patched to work with Love 11.
|
|
|
|
|
;; Instead of extracting the .love file, patching it, and re-zipping
|
|
|
|
|
;; it to the store, simply point the script to the extracted patched
|
|
|
|
|
;; data directory directly.
|
|
|
|
|
(mkdir-p data)
|
|
|
|
|
(with-directory-excursion data
|
|
|
|
|
(invoke unzip source)
|
|
|
|
|
(invoke patch "-p1" "-i"
|
|
|
|
|
(assoc-ref %build-inputs "love-11.patch")))
|
2018-06-18 17:55:27 +02:00
|
|
|
|
#t))))
|
2018-06-19 04:49:33 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("unzip" ,unzip)
|
|
|
|
|
("patch" ,patch)
|
|
|
|
|
("love-11.patch" ,(search-patch "mrrescue-support-love-11.patch"))))
|
2018-06-18 17:55:27 +02:00
|
|
|
|
(inputs
|
|
|
|
|
`(("bash" ,bash)
|
|
|
|
|
("love" ,love)))
|
|
|
|
|
(home-page "http://tangramgames.dk/games/mrrescue")
|
|
|
|
|
(synopsis "Arcade-style fire fighting game")
|
|
|
|
|
(description
|
|
|
|
|
"Mr. Rescue is an arcade styled 2d action game centered around evacuating
|
2018-06-19 04:36:22 +02:00
|
|
|
|
civilians from burning buildings. The game features fast-paced fire
|
|
|
|
|
extinguishing action, intense boss battles, a catchy soundtrack, and lots of
|
2018-06-18 17:55:27 +02:00
|
|
|
|
throwing people around in pseudo-randomly generated buildings.")
|
|
|
|
|
(license (list license:zlib ; for source code
|
|
|
|
|
license:cc-by-sa3.0)))) ; for graphics and music assets
|
|
|
|
|
|
2016-10-05 16:09:54 +02:00
|
|
|
|
(define-public hyperrogue
|
|
|
|
|
(package
|
|
|
|
|
(name "hyperrogue")
|
2017-08-28 04:08:25 +02:00
|
|
|
|
(version "10.0g")
|
2017-03-27 22:40:17 +02:00
|
|
|
|
;; When updating this package, be sure to update the "hyperrogue-data"
|
|
|
|
|
;; origin in native-inputs.
|
2016-10-05 16:09:54 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://www.roguetemple.com/z/hyper/"
|
2017-03-27 22:40:17 +02:00
|
|
|
|
name (string-join (string-split version #\.) "")
|
|
|
|
|
"-src.tgz"))
|
2016-10-05 16:09:54 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-08-28 04:08:25 +02:00
|
|
|
|
"0f68pcnsgl406dhm91ckn3f364bar9m9i5njp9vrmvhvv9p2icy0"))))
|
2016-10-05 16:09:54 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
2017-03-27 22:40:17 +02:00
|
|
|
|
`(#:tests? #f ; no check target
|
2017-07-12 16:50:32 +02:00
|
|
|
|
#:make-flags '("CXXFLAGS=-std=c++11")
|
2016-10-05 16:09:54 +02:00
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'set-paths 'set-sdl-paths
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(setenv "CPATH"
|
|
|
|
|
(string-append (assoc-ref inputs "sdl-union")
|
|
|
|
|
"/include/SDL"))))
|
|
|
|
|
;; Fix font and music paths.
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
2017-03-27 22:40:17 +02:00
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(share-dir (string-append out "/share/hyperrogue"))
|
|
|
|
|
(dejavu-dir (string-append
|
|
|
|
|
(assoc-ref inputs "font-dejavu")
|
|
|
|
|
"/share/fonts/truetype"))
|
|
|
|
|
(dejavu-font "DejaVuSans-Bold.ttf")
|
|
|
|
|
(music-file "hyperrogue-music.txt"))
|
2017-08-01 18:14:54 +02:00
|
|
|
|
(substitute* "basegraph.cpp"
|
2017-03-27 22:40:17 +02:00
|
|
|
|
((dejavu-font)
|
|
|
|
|
(string-append dejavu-dir "/" dejavu-font)))
|
|
|
|
|
(substitute* "sound.cpp"
|
|
|
|
|
(((string-append "\\./" music-file))
|
|
|
|
|
(string-append share-dir "/" music-file))
|
|
|
|
|
(("sounds/")
|
|
|
|
|
(string-append share-dir "/sounds/")))
|
|
|
|
|
(substitute* music-file
|
|
|
|
|
(("\\*/")
|
|
|
|
|
(string-append share-dir "/sounds/"))))
|
2016-10-05 16:09:54 +02:00
|
|
|
|
#t))
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
|
|
|
|
(share-dir (string-append out "/share/hyperrogue")))
|
|
|
|
|
(mkdir-p bin)
|
2017-03-27 22:40:17 +02:00
|
|
|
|
(copy-file "hyper" (string-append bin "/hyperrogue"))
|
|
|
|
|
(install-file "hyperrogue-music.txt" share-dir))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'install 'install-data
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let* ((data (assoc-ref inputs "hyperrogue-data"))
|
|
|
|
|
(out (assoc-ref outputs "out"))
|
|
|
|
|
(sounds (string-append out "/share/hyperrogue/sounds"))
|
|
|
|
|
(unzip (string-append (assoc-ref inputs "unzip") "/bin/unzip")))
|
|
|
|
|
(and
|
|
|
|
|
;; Extract media license information into sounds directory.
|
|
|
|
|
(zero?
|
|
|
|
|
(system* unzip "-j" data
|
|
|
|
|
(string-append
|
|
|
|
|
"hyperrogue"
|
|
|
|
|
(string-join (string-split ,version #\.) "")
|
2017-04-22 19:57:55 +02:00
|
|
|
|
"/sounds/credits.txt") "-d" sounds))
|
2017-03-27 22:40:17 +02:00
|
|
|
|
;; Extract sounds and music into sounds directory.
|
|
|
|
|
(zero?
|
|
|
|
|
(system* "unzip" "-j" data
|
|
|
|
|
(string-append
|
|
|
|
|
"hyperrogue"
|
|
|
|
|
(string-join (string-split ,version #\.) "")
|
2017-04-22 19:57:55 +02:00
|
|
|
|
"/*.ogg") "-d" sounds)))))))))
|
2017-03-27 22:40:17 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("hyperrogue-data"
|
|
|
|
|
,(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri
|
|
|
|
|
(string-append
|
|
|
|
|
"http://www.roguetemple.com/z/hyper/" name
|
|
|
|
|
(string-join (string-split version #\.) "")
|
|
|
|
|
"-win.zip"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-08-28 04:08:25 +02:00
|
|
|
|
"0bnp077qvlmxjlz1jjd6kpghlv9flxc19ac1xq3m3wyq1w9p3pab"))))
|
2017-03-27 22:40:17 +02:00
|
|
|
|
("unzip" ,unzip)))
|
2016-10-05 16:09:54 +02:00
|
|
|
|
(inputs
|
|
|
|
|
`(("font-dejavu" ,font-dejavu)
|
|
|
|
|
("glew" ,glew)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("sdl-union" ,(sdl-union (list sdl
|
|
|
|
|
sdl-gfx
|
|
|
|
|
sdl-mixer
|
|
|
|
|
sdl-ttf)))))
|
|
|
|
|
(home-page "http://www.roguetemple.com/z/hyper/")
|
|
|
|
|
(synopsis "Non-euclidean graphical rogue-like game")
|
|
|
|
|
(description
|
|
|
|
|
"HyperRogue is a game in which the player collects treasures and fights
|
|
|
|
|
monsters -- rogue-like but for the fact that it is played on the hyperbolic
|
|
|
|
|
plane and not in euclidean space.
|
|
|
|
|
|
|
|
|
|
In HyperRogue, the player can move through different parts of the world, which
|
2017-03-29 17:45:50 +02:00
|
|
|
|
are home to particular creatures and may be subject to their own rules of
|
|
|
|
|
\"physics\".
|
2016-10-05 16:09:54 +02:00
|
|
|
|
|
2017-03-29 17:45:50 +02:00
|
|
|
|
While the game can use ASCII characters to display the the classical rogue
|
|
|
|
|
symbols, it still needs graphics to render the non-euclidean world.")
|
2017-03-27 22:40:17 +02:00
|
|
|
|
(license (list license:bsd-3 ; glew.c, mtrand.*
|
|
|
|
|
license:cc-by-sa3.0 ; music
|
|
|
|
|
license:cc-by-sa4.0 ; sounds
|
|
|
|
|
license:cc0
|
|
|
|
|
license:public-domain ; direntx.*, some sounds
|
|
|
|
|
license:zlib ; savepng.*
|
2016-10-05 16:09:54 +02:00
|
|
|
|
license:gpl2+)))) ; remaining files
|
2016-10-16 22:04:35 +02:00
|
|
|
|
|
|
|
|
|
(define-public kobodeluxe
|
|
|
|
|
(package
|
|
|
|
|
(name "kobodeluxe")
|
|
|
|
|
(version "0.5.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://olofson.net/kobodl/download/KoboDeluxe-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0b2wvdpnmaibsy419c16dfwj5kvd3pccby2aaqvm964x74592yqg"))
|
|
|
|
|
(patches (search-patches
|
|
|
|
|
"kobodeluxe-const-charp-conversion.patch"
|
|
|
|
|
"kobodeluxe-enemies-pipe-decl.patch"
|
|
|
|
|
"kobodeluxe-graphics-window-signed-char.patch"
|
|
|
|
|
"kobodeluxe-manpage-minus-not-hyphen.patch"
|
|
|
|
|
"kobodeluxe-midicon-segmentation-fault.patch"
|
|
|
|
|
"kobodeluxe-paths.patch"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:configure-flags
|
|
|
|
|
(list (string-append "CPPFLAGS=-I"
|
|
|
|
|
(assoc-ref %build-inputs "sdl-union")
|
|
|
|
|
"/include/SDL"))))
|
|
|
|
|
(inputs `(("sdl-union" ,(sdl-union (list sdl sdl-image)))))
|
|
|
|
|
(synopsis "Shooter with space station destruction")
|
|
|
|
|
(description
|
|
|
|
|
"Kobo Deluxe is an enhanced version of Akira Higuchi's XKobo graphical game
|
|
|
|
|
for Un*x systems with X11.")
|
|
|
|
|
(home-page "http://olofson.net/kobodl/")
|
|
|
|
|
(license license:gpl2+)))
|
2017-02-01 18:13:13 +01:00
|
|
|
|
|
|
|
|
|
(define-public freeciv
|
|
|
|
|
(package
|
|
|
|
|
(name "freeciv")
|
2017-06-03 21:44:37 +02:00
|
|
|
|
(version "2.5.7")
|
2017-02-01 18:13:13 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
2017-06-03 21:44:37 +02:00
|
|
|
|
(uri (list (string-append
|
|
|
|
|
"http://files.freeciv.org/stable/freeciv-"
|
|
|
|
|
version ".tar.bz2")
|
|
|
|
|
(string-append
|
|
|
|
|
"mirror://sourceforge/freeciv/Freeciv%20"
|
|
|
|
|
(version-major+minor version) "/" version
|
|
|
|
|
"/freeciv-" version ".tar.bz2")))
|
2017-02-01 18:13:13 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-06-03 21:44:37 +02:00
|
|
|
|
"1lmydnnqraa947l7gdz6xgm0bgks1ywsivp9h4v8jr3avcv6gqzz"))))
|
2017-02-01 18:13:13 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("curl" ,curl)
|
|
|
|
|
("cyrus-sasl" ,cyrus-sasl)
|
|
|
|
|
("gtk+" ,gtk+)
|
|
|
|
|
("sdl-mixer" ,sdl-mixer)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "http://www.freeciv.org/")
|
|
|
|
|
(synopsis "Turn based empire building strategy game")
|
|
|
|
|
(description "Freeciv is a turn based empire building strategy game
|
|
|
|
|
inspired by the history of human civilization. The game commences in
|
|
|
|
|
prehistory and your mission is to lead your tribe from the Stone Age
|
|
|
|
|
to the Space Age.")
|
|
|
|
|
(license license:gpl2+)))
|
2017-02-02 15:32:14 +01:00
|
|
|
|
|
|
|
|
|
(define-public no-more-secrets
|
|
|
|
|
(package
|
|
|
|
|
(name "no-more-secrets")
|
2017-10-09 20:47:54 +02:00
|
|
|
|
(version "0.3.3")
|
2017-02-02 15:32:14 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/bartobri/no-more-secrets/"
|
|
|
|
|
"archive/v" version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-10-09 20:47:54 +02:00
|
|
|
|
"1kpx1rirc3i7fb4lymp0hx5rqr0s2ay4za261rw3bcy6d23l1kyg"))))
|
2017-02-02 15:32:14 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f
|
|
|
|
|
#:make-flags (list "CC=gcc" "all-ncurses"
|
|
|
|
|
(string-append "prefix="
|
|
|
|
|
(assoc-ref %outputs "out")))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("ncurses" ,ncurses)))
|
|
|
|
|
(home-page "https://github.com/bartobri/no-more-secrets")
|
|
|
|
|
(synopsis "Recreation of data decryption effect in \"Sneakers\"")
|
|
|
|
|
(description
|
|
|
|
|
"@code{No More Secrets} provides a command line tool called \"nms\"
|
|
|
|
|
that recreates the famous data decryption effect seen on screen in the 1992
|
|
|
|
|
movie \"Sneakers\".
|
|
|
|
|
|
|
|
|
|
This command works on piped data. Pipe any ASCII or UTF-8 text to nms, and
|
|
|
|
|
it will apply the hollywood effect, initially showing encrypted data, then
|
|
|
|
|
starting a decryption sequence to reveal the original plaintext characters.")
|
|
|
|
|
(license license:expat)))
|
2017-03-20 20:16:36 +01:00
|
|
|
|
|
|
|
|
|
(define-public megaglest-data
|
|
|
|
|
(package
|
|
|
|
|
(name "megaglest-data")
|
|
|
|
|
(version "3.13.0")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/MegaGlest/megaglest-data"
|
|
|
|
|
"/releases/download/" version "/megaglest-data-"
|
|
|
|
|
version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0ipgza33z89fw3si32iafm981f3fvm0zldvbxj29whghd2k3rpj3"))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f))
|
|
|
|
|
(home-page "https://megaglest.org/")
|
|
|
|
|
(synopsis "Data files for MegaGlest")
|
|
|
|
|
(description "This package contains the data files required for MegaGlest.")
|
|
|
|
|
(license license:cc-by-sa3.0)))
|
2017-03-20 20:16:37 +01:00
|
|
|
|
|
|
|
|
|
(define-public megaglest
|
|
|
|
|
(package
|
|
|
|
|
(name "megaglest")
|
|
|
|
|
(version "3.13.0")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/MegaGlest/megaglest-source"
|
|
|
|
|
"/releases/download/" version "/megaglest-source-"
|
|
|
|
|
version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1ffck3ii1wp5k3nn5p0ga06jgp7pzk4zw0xln3xim2w7qrxzdzh9"))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("curl" ,curl)
|
|
|
|
|
("fontconfig" ,fontconfig)
|
|
|
|
|
("ftgl" ,ftgl)
|
|
|
|
|
("glew" ,glew)
|
|
|
|
|
("libjpeg-turbo" ,libjpeg-turbo)
|
|
|
|
|
("megaglest-data" ,megaglest-data)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("miniupnpc" ,miniupnpc)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("libircclient" ,libircclient)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("lua" ,lua)
|
|
|
|
|
("sdl2" ,sdl2)
|
|
|
|
|
("wxwidgets" ,wxwidgets)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("cppunit" ,cppunit)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
|
|
|
|
(list (string-append "-DCUSTOM_DATA_INSTALL_PATH="
|
|
|
|
|
(assoc-ref %build-inputs "megaglest-data")
|
|
|
|
|
"/share/megaglest")
|
|
|
|
|
"-DBUILD_MEGAGLEST_TESTS=ON")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'fix-ini-search-path
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "source/glest_game/global/config.cpp"
|
|
|
|
|
(("/usr/share/megaglest/")
|
|
|
|
|
(string-append (assoc-ref outputs "out")
|
|
|
|
|
"/share/megaglest/"))))))
|
|
|
|
|
#:test-target "megaglest_tests"))
|
|
|
|
|
(home-page "https://megaglest.org/")
|
|
|
|
|
(synopsis "3D real-time strategy (RTS) game")
|
|
|
|
|
(description "MegaGlest is a cross-platform 3D real-time strategy (RTS)
|
|
|
|
|
game, where you control the armies of one of seven different factions: Tech,
|
|
|
|
|
Magic, Egypt, Indians, Norsemen, Persian or Romans.")
|
|
|
|
|
(license license:gpl2+)))
|
2017-04-09 13:33:08 +02:00
|
|
|
|
|
|
|
|
|
(define-public freegish
|
|
|
|
|
(let ((commit "8795cd7adc95957883f2d3465eb9036a774667a7")
|
|
|
|
|
(revision "1"))
|
|
|
|
|
(package
|
|
|
|
|
(name "freegish")
|
|
|
|
|
(version (string-append "0-" revision "." (string-take commit 9)))
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/freegish/freegish.git")
|
|
|
|
|
(commit commit)))
|
2018-03-04 11:33:55 +01:00
|
|
|
|
(file-name (git-file-name name version))
|
2017-04-09 13:33:08 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1p1zf5qqagmcpi1db2bs02cnalpy3qiymp6yzan7k1bhmv859gsx"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
;; The audio files in the "music" directory are licensed under
|
|
|
|
|
;; CC-BY-NC, so we delete them.
|
|
|
|
|
(snippet
|
|
|
|
|
'(begin
|
|
|
|
|
(delete-file-recursively "music")
|
|
|
|
|
#t))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no tests included
|
|
|
|
|
#:configure-flags
|
|
|
|
|
(list "-DCMAKE_INSTALL_FHS=ON")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'set-DATAPATH
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "CMakeLists.txt"
|
|
|
|
|
(("^option\\(INSTALL_FHS" line)
|
|
|
|
|
(string-append "add_definitions(-DDATAPATH=\""
|
|
|
|
|
(assoc-ref outputs "out") "/share/freegish\")\n"
|
|
|
|
|
line)))
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("sdl-union" ,(sdl-union (list sdl sdl-mixer)))
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("libogg" ,libogg)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(home-page "https://github.com/freegish/freegish")
|
|
|
|
|
(synopsis "Side-scrolling physics platformer with a ball of tar")
|
|
|
|
|
(description "In FreeGish you control Gish, a ball of tar who lives
|
|
|
|
|
happily with his girlfriend Brea, until one day a mysterious dark creature
|
|
|
|
|
emerges from a sewer hole and pulls her below ground.")
|
|
|
|
|
;; The textures are available under the Expat license. All other assets
|
|
|
|
|
;; (including levels) are covered under CC-BY-SA or public domain. The
|
|
|
|
|
;; source code is under GPLv2+.
|
|
|
|
|
(license (list license:gpl2+
|
|
|
|
|
license:expat
|
|
|
|
|
license:public-domain
|
|
|
|
|
license:cc-by-sa3.0)))))
|
2017-04-10 21:38:49 +02:00
|
|
|
|
|
|
|
|
|
(define-public cdogs-sdl
|
2018-03-20 14:11:00 +01:00
|
|
|
|
;; XXX: Use version 0.6.7 when it's available.
|
|
|
|
|
(let ((commit "bab2031369b9ea2dbeb7eedbde10a43dd8ca83db")
|
|
|
|
|
(revision "1"))
|
|
|
|
|
(package
|
|
|
|
|
(name "cdogs-sdl")
|
|
|
|
|
(version (git-version "0.6.6" revision commit))
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/cxong/cdogs-sdl.git")
|
|
|
|
|
(commit commit)))
|
|
|
|
|
(file-name (git-file-name name version))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"09sfqhrrffhvxbhigvrxfmai52w01w3f9kjmixjhqvqlkhn77c9n"))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
|
|
|
|
(list (string-append "-DCDOGS_DATA_DIR="
|
|
|
|
|
(assoc-ref %outputs "out")
|
|
|
|
|
"/share/cdogs-sdl/"))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("mesa" ,mesa)
|
|
|
|
|
("sdl2" ,sdl2)
|
|
|
|
|
("sdl2-image" ,sdl2-image)
|
|
|
|
|
("sdl2-mixer" ,sdl2-mixer)))
|
|
|
|
|
(home-page "https://cxong.github.io/cdogs-sdl/")
|
|
|
|
|
(synopsis "Classic overhead run-and-gun game")
|
|
|
|
|
(description "C-Dogs SDL is a classic overhead run-and-gun game,
|
2017-04-10 21:38:49 +02:00
|
|
|
|
supporting up to 4 players in co-op and deathmatch modes. Customize your
|
|
|
|
|
player, choose from many weapons, and blast, slide and slash your way through
|
|
|
|
|
over 100 user-created campaigns.")
|
2018-03-20 14:11:00 +01:00
|
|
|
|
;; GPLv2+ for code (includes files under BSD-2 and BSD-3),
|
|
|
|
|
;; CC0/CC-BY/CC-BY-SA for assets.
|
|
|
|
|
(license (list license:gpl2+
|
|
|
|
|
license:bsd-2
|
|
|
|
|
license:bsd-3
|
|
|
|
|
license:cc0
|
|
|
|
|
license:cc-by3.0
|
|
|
|
|
license:cc-by-sa3.0)))))
|
2017-04-12 11:28:01 +02:00
|
|
|
|
|
|
|
|
|
(define-public kiki
|
|
|
|
|
(package
|
|
|
|
|
(name "kiki")
|
|
|
|
|
(version "1.0.2")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/kiki/kiki-src/"
|
|
|
|
|
version "/kiki-" version "-src.tgz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0ihjdsxbn8z3cz0gpcprafiipcqaiskgdnh1rhmw4qff8dszalbn"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
'(begin
|
|
|
|
|
(for-each delete-file (find-files "." "\\.dll$"))
|
|
|
|
|
#t))
|
|
|
|
|
(patches
|
|
|
|
|
(search-patches "kiki-level-selection-crash.patch"
|
|
|
|
|
"kiki-makefile.patch"
|
|
|
|
|
"kiki-missing-includes.patch"
|
|
|
|
|
"kiki-portability-64bit.patch"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; there are no tests
|
|
|
|
|
#:make-flags '("CXX=g++")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(setenv "CPLUS_INCLUDE_PATH"
|
|
|
|
|
(string-append (assoc-ref inputs "sdl-union")
|
|
|
|
|
"/include/SDL:"
|
|
|
|
|
(assoc-ref inputs "python")
|
|
|
|
|
"/include/python2.7:"
|
|
|
|
|
(getenv "CPLUS_INCLUDE_PATH")))
|
|
|
|
|
(substitute* "src/main/main.cpp"
|
|
|
|
|
(("#include <SDL.h>" line)
|
|
|
|
|
(string-append line "
|
|
|
|
|
#define K_INCLUDE_GLUT
|
|
|
|
|
#include \"KIncludeTools.h\""))
|
|
|
|
|
(("// initialize SDL" line)
|
|
|
|
|
(string-append "glutInit(&argc,argv);\n" line)))
|
|
|
|
|
(substitute* "src/main/KikiController.cpp"
|
|
|
|
|
(("getenv\\(\"KIKI_HOME\"\\)")
|
|
|
|
|
(string-append "\"" (assoc-ref outputs "out") "/share/kiki/\"")))
|
|
|
|
|
(substitute* "linux/Makefile"
|
|
|
|
|
(("CXXOPTS =" line)
|
|
|
|
|
(string-append line " -fpermissive"))
|
|
|
|
|
(("PYTHON_VERSION=.*") "PYTHON_VERSION=2.7")
|
|
|
|
|
(("PYTHONHOME =.*")
|
|
|
|
|
(string-append "PYTHONHOME = "
|
|
|
|
|
(assoc-ref inputs "python")
|
|
|
|
|
"/lib/python2.7/"))
|
|
|
|
|
(("\\$\\(GLLIBS\\)" line)
|
|
|
|
|
(string-append line " -lm -lpython2.7")))
|
|
|
|
|
(substitute* "src/main/KikiPythonWidget.h"
|
|
|
|
|
(("#define __KikiPythonWidget" line)
|
|
|
|
|
(string-append line "\n#include \"KikiPython.h\"")))
|
|
|
|
|
#t))
|
|
|
|
|
(add-before 'build 'build-kodilib
|
|
|
|
|
(lambda* (#:key make-flags #:allow-other-keys)
|
|
|
|
|
(with-directory-excursion "kodilib/linux"
|
|
|
|
|
(zero? (apply system* "make" make-flags)))))
|
|
|
|
|
(add-after 'build-kodilib 'chdir
|
|
|
|
|
(lambda _ (chdir "linux") #t))
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
|
|
|
|
(share (string-append out "/share/kiki")))
|
|
|
|
|
(mkdir-p bin)
|
|
|
|
|
(mkdir-p share)
|
|
|
|
|
(install-file "kiki" bin)
|
|
|
|
|
(copy-recursively "../py" (string-append share "/py"))
|
|
|
|
|
(copy-recursively "../sound" (string-append share "/sound"))
|
|
|
|
|
#t))))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("glu" ,glu)
|
|
|
|
|
;; Kiki builds fine with freeglut 3.0.0 but segfaults on start.
|
|
|
|
|
("freeglut" ,freeglut-2.8)
|
|
|
|
|
("sdl-union" ,(sdl-union (list sdl
|
|
|
|
|
sdl-mixer
|
|
|
|
|
sdl-image)))
|
|
|
|
|
("python" ,python-2)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("swig" ,swig)))
|
|
|
|
|
(home-page "http://kiki.sourceforge.net/")
|
|
|
|
|
(synopsis "3D puzzle game")
|
|
|
|
|
(description "Kiki the nano bot is a 3D puzzle game. It is basically a
|
|
|
|
|
mixture of the games Sokoban and Kula-World. Your task is to help Kiki, a
|
|
|
|
|
small robot living in the nano world, repair its maker.")
|
|
|
|
|
;; See <http://metadata.ftp-master.debian.org/changelogs/main/k/
|
|
|
|
|
;; kiki-the-nano-bot/kiki-the-nano-bot_1.0.2+dfsg1-4_copyright>
|
|
|
|
|
;; for a statement from the author.
|
|
|
|
|
(license license:public-domain)))
|
2017-04-12 22:27:16 +02:00
|
|
|
|
|
|
|
|
|
(define-public teeworlds
|
|
|
|
|
(package
|
|
|
|
|
(name "teeworlds")
|
|
|
|
|
(version "0.6.4")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/teeworlds/teeworlds/"
|
|
|
|
|
"archive/" version "-release.tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1mqhp6xjl75l49050cid36wxyjn1qr0vjx1c709dfg1lkvmgs6l3"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
'(begin
|
|
|
|
|
(for-each delete-file-recursively
|
|
|
|
|
'("src/engine/external/wavpack/"
|
|
|
|
|
"src/engine/external/zlib/"))
|
|
|
|
|
#t))
|
|
|
|
|
(patches
|
|
|
|
|
(search-patches "teeworlds-use-latest-wavpack.patch"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no tests included
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
;; Embed path to assets.
|
|
|
|
|
(substitute* "src/engine/shared/storage.cpp"
|
|
|
|
|
(("#define DATA_DIR.*")
|
|
|
|
|
(string-append "#define DATA_DIR \""
|
|
|
|
|
(assoc-ref outputs "out")
|
|
|
|
|
"/share/teeworlds/data"
|
|
|
|
|
"\"")))
|
|
|
|
|
|
|
|
|
|
;; Bam expects all files to have a recent time stamp.
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(utime file 1 1))
|
|
|
|
|
(find-files "."))
|
|
|
|
|
|
|
|
|
|
;; Do not use bundled libraries.
|
|
|
|
|
(substitute* "bam.lua"
|
|
|
|
|
(("if config.zlib.value == 1 then")
|
|
|
|
|
"if true then")
|
|
|
|
|
(("wavpack = .*")
|
|
|
|
|
"wavpack = {}
|
|
|
|
|
settings.link.libs:Add(\"wavpack\")\n"))
|
|
|
|
|
(substitute* "src/engine/client/sound.cpp"
|
|
|
|
|
(("#include <engine/external/wavpack/wavpack.h>")
|
|
|
|
|
"#include <wavpack/wavpack.h>"))
|
|
|
|
|
#t))
|
|
|
|
|
(replace 'build
|
|
|
|
|
(lambda _
|
|
|
|
|
(zero? (system* "bam" "-a" "-v" "release"))))
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
|
|
|
|
(data (string-append out "/share/teeworlds/data")))
|
|
|
|
|
(mkdir-p bin)
|
|
|
|
|
(mkdir-p data)
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(install-file file bin))
|
|
|
|
|
'("teeworlds" "teeworlds_srv"))
|
|
|
|
|
(copy-recursively "data" data)
|
|
|
|
|
#t))))))
|
|
|
|
|
;; FIXME: teeworlds bundles the sources of "pnglite", a two-file PNG
|
|
|
|
|
;; library without a build system.
|
|
|
|
|
(inputs
|
|
|
|
|
`(("freetype" ,freetype)
|
|
|
|
|
("glu" ,glu)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("sdl-union" ,(sdl-union (list sdl
|
|
|
|
|
sdl-mixer
|
|
|
|
|
sdl-image)))
|
|
|
|
|
("wavpack" ,wavpack)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("bam" ,bam)
|
|
|
|
|
("python" ,python-2)))
|
|
|
|
|
(home-page "https://www.teeworlds.com")
|
|
|
|
|
(synopsis "2D retro multiplayer shooter game")
|
|
|
|
|
(description "Teeworlds is an online multiplayer game. Battle with up to
|
|
|
|
|
16 players in a variety of game modes, including Team Deathmatch and Capture
|
|
|
|
|
The Flag. You can even design your own maps!")
|
|
|
|
|
(license license:bsd-3)))
|
2017-04-13 09:10:57 +02:00
|
|
|
|
|
2017-04-27 10:42:21 +02:00
|
|
|
|
(define-public enigma
|
|
|
|
|
(package
|
|
|
|
|
(name "enigma")
|
|
|
|
|
(version "1.21")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/enigma-game/"
|
|
|
|
|
"Release%20" version "/enigma-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"00ffh9pypj1948pg3q9sjp1nmiabh52p5c8wpg9n1dcfgl3cywnq"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
|
|
|
|
(list "--with-system-enet")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'find-sdl
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "configure"
|
|
|
|
|
(("SDL_ttf.h") "SDL/SDL_ttf.h"))
|
|
|
|
|
(substitute* '("tools/ttf2bmf.cc"
|
|
|
|
|
"lib-src/enigma-core/ecl_font.cc"
|
|
|
|
|
"lib-src/enigma-core/ecl_video.cc"
|
|
|
|
|
"lib-src/enigma-core/ecl_buffer.hh"
|
|
|
|
|
"src/SoundEngine.cc"
|
|
|
|
|
"src/SoundEngine.hh"
|
|
|
|
|
"src/MusicManager.cc"
|
|
|
|
|
"src/MusicManager.hh"
|
|
|
|
|
"src/d_models.cc"
|
|
|
|
|
"src/main.cc"
|
|
|
|
|
"src/network.cc")
|
|
|
|
|
(("#include \"SDL_(image|ttf|mixer|types|syswm|mutex).h\"" line header)
|
|
|
|
|
(string-append "#include \"SDL/SDL_" header ".h\"")))
|
|
|
|
|
(substitute* "src/main.cc"
|
|
|
|
|
(("#include <SDL_(image|ttf|mixer).h>" line header)
|
|
|
|
|
(string-append "#include \"SDL/SDL_" header ".h\"")))
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("xerces-c" ,xerces-c)
|
|
|
|
|
("sdl-union" ,(sdl-union (list sdl sdl-image sdl-mixer sdl-ttf)))
|
|
|
|
|
("curl" ,curl)
|
|
|
|
|
("enet" ,enet)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
|
|
|
|
("imagemagick" ,imagemagick)))
|
gnu: Use HTTPS for supported nongnu.org home pages.
* gnu/packages/acl.scm (acl)[home-page]: Use HTTPS.
* gnu/packages/admin.scm (dmidecode)[home-page]: Likewise.
* gnu/packages/attr.scm (attr)[home-page]: Likewise.
* gnu/packages/audio.scm (lash)[home-page]: Likewise.
* gnu/packages/avr.scm (avr-libc)[home-page]: Likewise.
* gnu/packages/backup.scm (rdiff-backup, libchop)[home-page]: Likewise.
* gnu/packages/compression.scm (fastjar, lzip, lziprecover, atool)
(lunzip, clzip, lzlib, plzip)[home-page]: Likewise.
* gnu/packages/emacs.scm (geiser, bbdb, m17n-lib, m17n-lib)[home-page]:
Likewise.
* gnu/packages/flashing-tools.scm (avrdude)[home-page]: Likewise.
* gnu/packages/fontutils.scm (libotf)[home-page]: Likewise.
* gnu/packages/game-development.scm (gzochi)[home-page]: Likewise.
* gnu/packages/games.scm (enigma)[home-page]: Likewise.
* gnu/packages/gsasl.scm (libntlm)[home-page]: Likewise.
* gnu/packages/gtk.scm (guile-cairo)[home-page]: Likewise.
* gnu/packages/guile.scm (guile-reader, guile-lib, guile-json)
(guile-redis, g-wrap)[home-page]: Likewise.
* gnu/packages/libunwind.scm (libunwind)[home-page]: Likewise.
* gnu/packages/lout.scm (lout)[home-page]: Likewise.
* gnu/packages/mpd.scm (sonata)[home-page]: Likewise.
* gnu/packages/networking.scm (quagga)[home-page]: Likewise.
* gnu/packages/ratpoison.scm (ratpoison)[home-page]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[home-page]: Likewise.
* gnu/packages/telephony.scm (exosip)[home-page]: Likewise.
* gnu/packages/texinfo.scm (texi2html)[home-page]: Likewise.
* gnu/packages/xdisorg.scm (xbindkeys)[home-page]: Likewise.
2018-02-16 04:20:44 +01:00
|
|
|
|
(home-page "https://www.nongnu.org/enigma")
|
2017-04-27 10:42:21 +02:00
|
|
|
|
(synopsis "Puzzle game with a dexterity component")
|
|
|
|
|
(description "Enigma is a puzzle game with 550 unique levels. The object
|
|
|
|
|
of the game is to find and uncover pairs of identically colored ‘Oxyd’ stones.
|
|
|
|
|
Simple? Yes. Easy? Certainly not! Hidden traps, vast mazes, laser beams,
|
|
|
|
|
and most of all, countless hairy puzzles usually block your direct way to the
|
|
|
|
|
Oxyd stones. Enigma’s game objects (and there are hundreds of them, lest you
|
|
|
|
|
get bored) interact in many unexpected ways, and since many of them follow the
|
|
|
|
|
laws of physics (Enigma’s special laws of physics, that is), controlling them
|
|
|
|
|
with the mouse isn’t always trivial.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2017-04-13 09:10:57 +02:00
|
|
|
|
(define-public fillets-ng
|
|
|
|
|
(package
|
|
|
|
|
(name "fillets-ng")
|
|
|
|
|
(version "1.0.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/fillets/"
|
|
|
|
|
"Fish%20Fillets%20-%20Next%20Generation/"
|
|
|
|
|
version "/fillets-ng-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1nljp75aqqb35qq3x7abhs2kp69vjcj0h1vxcpdyn2yn2nalv6ij"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
|
|
|
|
(list (string-append "--with-lua="
|
|
|
|
|
(assoc-ref %build-inputs "lua")))
|
|
|
|
|
#:make-flags
|
|
|
|
|
(list (string-append "CFLAGS=-I"
|
|
|
|
|
(assoc-ref %build-inputs "sdl-union")
|
|
|
|
|
"/include/SDL")
|
|
|
|
|
(string-append "CXXFLAGS=-I"
|
|
|
|
|
(assoc-ref %build-inputs "sdl-union")
|
|
|
|
|
"/include/SDL"))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; Lua 5.1 does not provide it.
|
|
|
|
|
(add-after 'unpack 'do-not-link-with-lualib
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "configure"
|
|
|
|
|
(("-llualib") ""))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'install 'install-data
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let ((data (string-append (assoc-ref outputs "out")
|
|
|
|
|
"/share/games/fillets-ng")))
|
|
|
|
|
(mkdir-p data)
|
|
|
|
|
(zero? (system* "tar" "-xvf"
|
|
|
|
|
(assoc-ref inputs "fillets-ng-data")
|
|
|
|
|
"--strip-components=1"
|
|
|
|
|
"-C" data))))))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("sdl-union" ,(sdl-union (list sdl
|
|
|
|
|
sdl-mixer
|
|
|
|
|
sdl-image
|
|
|
|
|
sdl-ttf)))
|
|
|
|
|
("fribidi" ,fribidi)
|
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("lua" ,lua-5.1)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
|
|
|
|
("fillets-ng-data"
|
|
|
|
|
,(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/fillets/"
|
|
|
|
|
"Fish%20Fillets%20-%20Next%20Generation/"
|
|
|
|
|
version "/fillets-ng-data-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"169p0yqh2gxvhdilvjc2ld8aap7lv2nhkhkg4i1hlmgc6pxpkjgh"))))))
|
|
|
|
|
(home-page "http://fillets.sourceforge.net/")
|
|
|
|
|
(synopsis "Puzzle game")
|
|
|
|
|
(description "Fish Fillets NG is strictly a puzzle game. The goal in
|
|
|
|
|
every of the seventy levels is always the same: find a safe way out. The fish
|
|
|
|
|
utter witty remarks about their surroundings, the various inhabitants of their
|
|
|
|
|
underwater realm quarrel among themselves or comment on the efforts of your
|
|
|
|
|
fish. The whole game is accompanied by quiet, comforting music.")
|
|
|
|
|
(license license:gpl2+)))
|
2017-04-13 22:45:18 +02:00
|
|
|
|
|
|
|
|
|
(define-public crawl
|
|
|
|
|
(package
|
|
|
|
|
(name "crawl")
|
2018-01-05 23:29:41 +01:00
|
|
|
|
(version "0.21.0")
|
2017-04-13 22:45:18 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (list
|
|
|
|
|
;; Older releases get moved into a versioned directory
|
|
|
|
|
(string-append "http://crawl.develz.org/release/"
|
|
|
|
|
(version-major+minor version) "/stone_soup-"
|
|
|
|
|
version "-nodeps.tar.xz")
|
|
|
|
|
;; Only the latest release is in this directory
|
|
|
|
|
(string-append "http://crawl.develz.org/release/stone_soup-"
|
|
|
|
|
version "-nodeps.tar.xz")))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-01-05 23:29:41 +01:00
|
|
|
|
"0mmnkch8s9l7dh136yjvcyjr0vmyzv7z370rlcyir91qz6gg82n1"))
|
2017-06-10 20:27:58 +02:00
|
|
|
|
(patches (search-patches "crawl-upgrade-saves.patch"))))
|
2017-04-13 22:45:18 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("lua51" ,lua-5.1)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("sqlite" ,sqlite)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("bison" ,bison)
|
|
|
|
|
("flex" ,flex)
|
|
|
|
|
("perl" ,perl)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:make-flags
|
|
|
|
|
(let* ((sqlite (assoc-ref %build-inputs "sqlite"))
|
|
|
|
|
(out (assoc-ref %outputs "out")))
|
|
|
|
|
(list (string-append "SQLITE_INCLUDE_DIR=" sqlite "/include")
|
|
|
|
|
(string-append "prefix=" out)
|
|
|
|
|
"SAVEDIR=~/.crawl"
|
|
|
|
|
;; don't build any bundled dependencies
|
|
|
|
|
"BUILD_LUA="
|
|
|
|
|
"BUILD_SQLITE="
|
|
|
|
|
"BUILD_ZLIB="
|
|
|
|
|
"-Csource"))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(delete 'check)
|
|
|
|
|
;; Test cases require the source to be rebuild with the -DDEBUG define.
|
|
|
|
|
;; Do 'check before 'build to avoid a 3rd build on make install.
|
|
|
|
|
(add-before 'build 'check
|
|
|
|
|
(lambda* (#:key inputs outputs make-flags #:allow-other-keys)
|
|
|
|
|
(setenv "HOME" (getcwd))
|
|
|
|
|
;; Fake a terminal for the test cases.
|
|
|
|
|
(setenv "TERM" "xterm-256color")
|
|
|
|
|
(zero? (apply system* "make" "debug" "test"
|
|
|
|
|
(format #f "-j~d" (parallel-job-count))
|
2017-05-22 23:34:22 +02:00
|
|
|
|
;; Force command line build for test cases.
|
|
|
|
|
(append make-flags '("GAME=crawl" "TILES=")))))))))
|
2017-04-13 22:45:18 +02:00
|
|
|
|
(synopsis "Roguelike dungeon crawler game")
|
|
|
|
|
(description "Dungeon Crawl Stone Soup is a roguelike adventure through
|
|
|
|
|
dungeons filled with dangerous monsters in a quest to find the mystifyingly
|
|
|
|
|
fabulous Orb of Zot.")
|
|
|
|
|
(home-page "https://crawl.develz.org")
|
|
|
|
|
(license (list license:gpl2+
|
|
|
|
|
license:bsd-2
|
|
|
|
|
license:bsd-3
|
|
|
|
|
license:cc0
|
|
|
|
|
license:expat
|
|
|
|
|
license:zlib
|
|
|
|
|
license:asl2.0))))
|
2017-04-21 21:30:03 +02:00
|
|
|
|
|
2017-06-10 20:27:58 +02:00
|
|
|
|
;; The linter here claims that patch file names should start with the package
|
|
|
|
|
;; name. But, in this case, the patches are inherited from crawl with the
|
|
|
|
|
;; "crawl-" prefix instead of "crawl-tiles-".
|
2017-05-22 23:34:22 +02:00
|
|
|
|
(define-public crawl-tiles
|
|
|
|
|
(package
|
|
|
|
|
(inherit crawl)
|
|
|
|
|
(name "crawl-tiles")
|
|
|
|
|
(arguments
|
|
|
|
|
(substitute-keyword-arguments
|
|
|
|
|
(package-arguments crawl)
|
|
|
|
|
((#:make-flags flags)
|
|
|
|
|
`(let ((dejavu (assoc-ref %build-inputs "font-dejavu")))
|
|
|
|
|
(cons*
|
|
|
|
|
(string-append "PROPORTIONAL_FONT=" dejavu
|
|
|
|
|
"/share/fonts/truetype/DejaVuSans.ttf")
|
|
|
|
|
(string-append "MONOSPACED_FONT=" dejavu
|
|
|
|
|
"/share/fonts/truetype/DejaVuSansMono.ttf")
|
|
|
|
|
"TILES=y"
|
|
|
|
|
;; Rename the executable to allow parallel installation with crawl.
|
|
|
|
|
"GAME=crawl-tiles"
|
|
|
|
|
,flags)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(,@(package-inputs crawl)
|
|
|
|
|
("font-dejavu" ,font-dejavu)
|
|
|
|
|
("freetype6" ,freetype)
|
|
|
|
|
("glu" ,glu)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("sdl2" ,sdl2)
|
|
|
|
|
("sdl2-image" ,sdl2-image)
|
|
|
|
|
("sdl2-mixer" ,sdl2-mixer)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(,@(package-native-inputs crawl)
|
2017-11-26 19:45:42 +01:00
|
|
|
|
("pngcrush" ,pngcrush)
|
2017-05-22 23:34:22 +02:00
|
|
|
|
("which" ,which)))
|
|
|
|
|
(synopsis "Graphical roguelike dungeon crawler game")))
|
|
|
|
|
|
2017-04-21 21:30:03 +02:00
|
|
|
|
(define-public lugaru
|
|
|
|
|
(package
|
|
|
|
|
(name "lugaru")
|
|
|
|
|
(version "1.2")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://bitbucket.org/osslugaru/lugaru/downloads/"
|
|
|
|
|
name "-" version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"15zgcshy22q51rm72zi6y9z7qlgnz5iw3gczjdlir4bqmxy4gspk"))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
|
|
|
|
(list "-DSYSTEM_INSTALL=ON")
|
|
|
|
|
;; no test target
|
|
|
|
|
#:tests? #f))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("sdl2" ,sdl2)
|
|
|
|
|
("glu" ,glu)
|
|
|
|
|
("libjpeg" ,libjpeg-turbo)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("vorbis" ,libvorbis)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(home-page "https://osslugaru.gitlab.io")
|
|
|
|
|
(synopsis "Cross-platform third-person action game")
|
|
|
|
|
(description "Lugaru is a third-person action game. The main character,
|
|
|
|
|
Turner, is an anthropomorphic rebel bunny rabbit with impressive combat skills.
|
|
|
|
|
In his quest to find those responsible for slaughtering his village, he uncovers
|
|
|
|
|
a far-reaching conspiracy involving the corrupt leaders of the rabbit republic
|
|
|
|
|
and the starving wolves from a nearby den. Turner takes it upon himself to
|
|
|
|
|
fight against their plot and save his fellow rabbits from slavery.")
|
|
|
|
|
(license (list license:gpl2+ ; code
|
|
|
|
|
;; assets:
|
|
|
|
|
license:cc-by-sa3.0
|
|
|
|
|
license:cc-by-sa4.0))))
|
2017-04-14 00:37:40 +02:00
|
|
|
|
|
|
|
|
|
(define-public 0ad-data
|
|
|
|
|
(package
|
|
|
|
|
(name "0ad-data")
|
2018-05-27 22:49:50 +02:00
|
|
|
|
(version "0.0.23-alpha")
|
2017-04-14 00:37:40 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
2018-05-27 22:49:50 +02:00
|
|
|
|
(uri (string-append "https://releases.wildfiregames.com/0ad-"
|
2017-04-14 00:37:40 +02:00
|
|
|
|
version "-unix-data.tar.xz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-05-27 22:49:50 +02:00
|
|
|
|
"1b6qcvd8yyyxavgdwpcs7asmln3xgnvjkglz6ggvwb956x37ggzx"))
|
2017-04-14 00:37:40 +02:00
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
#~(begin
|
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
|
|
|
|
(for-each (lambda (name)
|
|
|
|
|
(let* ((dir (string-append "binaries/data/mods/" name))
|
|
|
|
|
(file (string-append dir "/" name ".zip"))
|
|
|
|
|
(unzip #$(file-append unzip "/bin/unzip")))
|
2018-03-28 02:26:20 +02:00
|
|
|
|
(invoke unzip "-d" dir file)
|
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
|
|
|
|
(delete-file file)))
|
|
|
|
|
'("mod" "public"))
|
2017-04-14 00:37:40 +02:00
|
|
|
|
#t))))
|
|
|
|
|
(build-system trivial-build-system)
|
|
|
|
|
(native-inputs `(("tar" ,tar)
|
|
|
|
|
("xz" ,xz)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:modules ((guix build utils))
|
|
|
|
|
#:builder
|
|
|
|
|
(begin
|
|
|
|
|
(use-modules (guix build utils))
|
|
|
|
|
(let ((out (assoc-ref %outputs "out"))
|
|
|
|
|
(source (assoc-ref %build-inputs "source"))
|
|
|
|
|
(tar (string-append (assoc-ref %build-inputs "tar") "/bin/tar"))
|
|
|
|
|
(xz-path (string-append (assoc-ref %build-inputs "xz") "/bin")))
|
|
|
|
|
(setenv "PATH" xz-path)
|
|
|
|
|
(mkdir out)
|
gnu: Use invoke and return #t from all builders.
* gnu/packages/admin.scm, gnu/packages/android.scm, gnu/packages/audio.scm,
gnu/packages/avr.scm, gnu/packages/base.scm, gnu/packages/bioinformatics.scm,
gnu/packages/certs.scm, gnu/packages/check.scm, gnu/packages/code.scm,
gnu/packages/commencement.scm, gnu/packages/dictionaries.scm,
gnu/packages/docbook.scm, gnu/packages/emacs.scm, gnu/packages/embedded.scm,
gnu/packages/fonts.scm, gnu/packages/games.scm, gnu/packages/gnome.scm,
gnu/packages/gnu-doc.scm, gnu/packages/guile.scm, gnu/packages/hurd.scm,
gnu/packages/javascript.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm, gnu/packages/lxde.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm, gnu/packages/mate.scm,
gnu/packages/pkg-config.scm, gnu/packages/qt.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/sdl.scm, gnu/packages/statistics.scm,
gnu/packages/syncthing.scm, gnu/packages/tex.scm, gnu/packages/web.scm,
gnu/packages/wine.scm, gnu/packages/xfce.scm: In the builders of packages
using 'trivial-build-system', use invoke where appropriate, raise exceptions
on errors, and otherwise return #t.
2018-03-28 02:14:05 +02:00
|
|
|
|
(invoke tar "xvf" source "-C" out "--strip=3")))))
|
2017-04-14 00:37:40 +02:00
|
|
|
|
(synopsis "Data files for 0ad")
|
|
|
|
|
(description "0ad-data provides the data files required by the game 0ad.")
|
|
|
|
|
(home-page "https://play0ad.com")
|
|
|
|
|
(license (list (license:fsdg-compatible
|
|
|
|
|
"http://tavmjong.free.fr/FONTS/ArevCopyright.txt"
|
|
|
|
|
(license:license-comment
|
|
|
|
|
(package-license font-bitstream-vera)))
|
|
|
|
|
(package-license font-bitstream-vera)
|
|
|
|
|
license:cc-by-sa3.0
|
|
|
|
|
license:expat
|
|
|
|
|
license:gfl1.0
|
|
|
|
|
license:gpl2+
|
|
|
|
|
license:gpl3+))))
|
|
|
|
|
|
|
|
|
|
(define-public 0ad
|
|
|
|
|
(package
|
|
|
|
|
(name "0ad")
|
2018-05-27 22:49:50 +02:00
|
|
|
|
(version "0.0.23-alpha")
|
2017-04-14 00:37:40 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
2018-05-27 22:49:50 +02:00
|
|
|
|
(uri (string-append "https://releases.wildfiregames.com/0ad-"
|
2017-04-14 00:37:40 +02:00
|
|
|
|
version "-unix-build.tar.xz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-05-27 22:49:50 +02:00
|
|
|
|
"0qz1sg4n5y766qwgi63drrrx6k17kk0rcnn9a4a9crllk2vf78fg"))))
|
2017-04-14 00:37:40 +02:00
|
|
|
|
;; A snippet here would cause a build failure because of timestamps
|
|
|
|
|
;; reset. See https://bugs.gnu.org/26734.
|
|
|
|
|
(inputs
|
|
|
|
|
`(("0ad-data" ,0ad-data)
|
|
|
|
|
("curl" ,curl)
|
|
|
|
|
("enet" ,enet)
|
|
|
|
|
("gloox" ,gloox)
|
|
|
|
|
("icu4c" ,icu4c)
|
|
|
|
|
("libpng" ,libpng)
|
2018-05-27 22:49:50 +02:00
|
|
|
|
("libsodium" ,libsodium)
|
2017-04-14 00:37:40 +02:00
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("libxcursor" ,libxcursor)
|
|
|
|
|
("libxml2" ,libxml2)
|
|
|
|
|
("miniupnpc" ,miniupnpc)
|
|
|
|
|
("mozjs-38" ,mozjs-38)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("sdl2" ,sdl2)
|
|
|
|
|
("wxwidgets" ,wxwidgets)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("boost" ,boost)
|
|
|
|
|
("cmake" ,cmake)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("pkg-config" ,pkg-config)
|
|
|
|
|
("python-2" ,python-2)))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
2017-12-31 14:59:12 +01:00
|
|
|
|
`(#:make-flags '("config=release" "verbose=1" "-C" "build/workspaces/gcc")
|
|
|
|
|
#:phases
|
2017-04-14 00:37:40 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'delete-bundles
|
|
|
|
|
(lambda _
|
|
|
|
|
(delete-file-recursively "libraries/source/spidermonkey")
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'fix-x11-includes
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "source/lib/sysdep/os/unix/x/x.cpp"
|
|
|
|
|
(("<Xlib.h>") "<X11/Xlib.h>"))
|
|
|
|
|
(substitute* "source/lib/sysdep/os/unix/x/x.cpp"
|
|
|
|
|
(("<Xatom.h>") "<X11/Xatom.h>"))
|
|
|
|
|
(substitute* "source/lib/sysdep/os/unix/x/x.cpp"
|
|
|
|
|
(("<Xcursor/Xcursor.h>") "<X11/Xcursor/Xcursor.h>"))
|
|
|
|
|
#t))
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let* ((jobs (number->string (parallel-job-count)))
|
|
|
|
|
(out (assoc-ref outputs "out"))
|
|
|
|
|
(lib (string-append out "/lib"))
|
|
|
|
|
(data (string-append out "/share/0ad")))
|
|
|
|
|
(setenv "JOBS" (string-append "-j" jobs))
|
|
|
|
|
(setenv "CC" "gcc")
|
|
|
|
|
(with-directory-excursion "build/workspaces"
|
|
|
|
|
(zero? (system* "./update-workspaces.sh"
|
|
|
|
|
(string-append "--libdir=" lib)
|
|
|
|
|
(string-append "--datadir=" data)
|
|
|
|
|
;; TODO: "--with-system-nvtt"
|
|
|
|
|
"--with-system-mozjs38"))))))
|
|
|
|
|
(delete 'check)
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
2017-12-31 14:59:12 +01:00
|
|
|
|
(chdir "binaries")
|
2017-04-14 00:37:40 +02:00
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
|
|
|
|
(lib (string-append out "/lib"))
|
|
|
|
|
(data (string-append out "/share/0ad"))
|
|
|
|
|
(applications (string-append out "/share/applications"))
|
|
|
|
|
(pixmaps (string-append out "/share/pixmaps"))
|
|
|
|
|
(0ad-data (assoc-ref inputs "0ad-data")))
|
|
|
|
|
;; data
|
|
|
|
|
(copy-recursively "data" data)
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(symlink (string-append 0ad-data "/" file)
|
|
|
|
|
(string-append data "/" file)))
|
|
|
|
|
'("config" "mods/mod" "mods/public" "tools"))
|
|
|
|
|
;; libraries
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(install-file file lib))
|
|
|
|
|
(find-files "system" "\\.so$"))
|
|
|
|
|
;; binaries
|
|
|
|
|
(install-file "system/pyrogenesis" bin)
|
|
|
|
|
(with-directory-excursion bin
|
|
|
|
|
(symlink "pyrogenesis" "0ad"))
|
|
|
|
|
;; resources
|
|
|
|
|
(with-directory-excursion "../build/resources"
|
|
|
|
|
(install-file "0ad.desktop" applications)
|
|
|
|
|
(install-file "0ad.png" pixmaps))
|
|
|
|
|
#t)))
|
|
|
|
|
(add-after 'install 'check
|
|
|
|
|
(lambda _
|
|
|
|
|
(with-directory-excursion "system"
|
|
|
|
|
(zero? (system* "./test"))))))))
|
|
|
|
|
(home-page "https://play0ad.com")
|
|
|
|
|
(synopsis "3D real-time strategy game of ancient warfare")
|
|
|
|
|
(description "0 A.D. is a real-time strategy (RTS) game of ancient
|
|
|
|
|
warfare. It's a historically-based war/economy game that allows players to
|
|
|
|
|
relive or rewrite the history of twelve ancient civilizations, each depicted
|
|
|
|
|
at their peak of economic growth and military prowess.
|
|
|
|
|
|
|
|
|
|
0ad needs a window manager that supports 'Extended Window Manager Hints'.")
|
|
|
|
|
(license (list license:bsd-2
|
|
|
|
|
license:bsd-3
|
|
|
|
|
license:expat
|
|
|
|
|
license:gpl2+
|
|
|
|
|
license:ibmpl1.0
|
|
|
|
|
license:isc
|
|
|
|
|
license:lgpl2.1
|
|
|
|
|
license:lgpl3
|
|
|
|
|
license:mpl2.0
|
|
|
|
|
license:zlib))))
|
2017-06-01 12:54:26 +02:00
|
|
|
|
|
|
|
|
|
;; There have been no official releases.
|
|
|
|
|
(define-public open-adventure
|
2017-06-29 17:32:27 +02:00
|
|
|
|
(let* ((commit "d43854f0f6bb8e9eea7fbce80348150e7e7fc34d")
|
|
|
|
|
(revision "2"))
|
2017-06-01 12:54:26 +02:00
|
|
|
|
(package
|
|
|
|
|
(name "open-adventure")
|
|
|
|
|
(version (string-append "2.5-" revision "." (string-take commit 7)))
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://gitlab.com/esr/open-adventure")
|
|
|
|
|
(commit commit)))
|
|
|
|
|
(file-name (string-append name "-" version "-checkout"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-06-29 17:32:27 +02:00
|
|
|
|
"08bwrvf4axb1rsfd6ia1fddsky9pc1p350vjskhaakg2czc6dsk0"))))
|
2017-06-01 12:54:26 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags (list "CC=gcc")
|
|
|
|
|
#:parallel-build? #f ; not supported
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
2017-06-29 17:32:27 +02:00
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
2017-12-23 21:44:23 +01:00
|
|
|
|
;; Linenoise is meant to be included, so we have to
|
|
|
|
|
;; copy it into the working directory.
|
2017-06-29 17:32:27 +02:00
|
|
|
|
(let* ((linenoise (assoc-ref inputs "linenoise"))
|
|
|
|
|
(noisepath (string-append linenoise "/include/linenoise"))
|
|
|
|
|
(out (assoc-ref outputs "out")))
|
|
|
|
|
(copy-recursively noisepath "linenoise"))
|
|
|
|
|
#t))
|
2017-06-01 12:54:26 +02:00
|
|
|
|
(add-before 'build 'use-echo
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "tests/Makefile"
|
|
|
|
|
(("/bin/echo") (which "echo")))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'build 'build-manpage
|
|
|
|
|
(lambda _
|
|
|
|
|
;; This target is missing a dependency
|
|
|
|
|
(substitute* "Makefile"
|
2017-06-29 17:32:27 +02:00
|
|
|
|
((".adoc.6:" line)
|
|
|
|
|
(string-append line " advent.adoc")))
|
|
|
|
|
(zero? (system* "make" ".adoc.6"))))
|
2017-06-01 12:54:26 +02:00
|
|
|
|
;; There is no install target
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
|
|
|
|
(man (string-append out "/share/man/man6")))
|
|
|
|
|
(install-file "advent" bin)
|
|
|
|
|
(install-file "advent.6" man))
|
|
|
|
|
#t)))))
|
|
|
|
|
(native-inputs
|
2017-06-29 17:32:27 +02:00
|
|
|
|
`(("asciidoc" ,asciidoc)
|
|
|
|
|
("linenoise" ,linenoise)
|
|
|
|
|
("python" ,python)
|
|
|
|
|
("python-pyyaml" ,python-pyyaml)))
|
2017-06-01 12:54:26 +02:00
|
|
|
|
(home-page "https://gitlab.com/esr/open-adventure")
|
|
|
|
|
(synopsis "Colossal Cave Adventure")
|
|
|
|
|
(description "The original Colossal Cave Adventure from 1976 was the
|
|
|
|
|
origin of all text adventures, dungeon-crawl (computer) games, and
|
|
|
|
|
computer-hosted roleplaying games. This is the last version released by
|
|
|
|
|
Crowther & Woods, its original authors, in 1995. It has been known as
|
|
|
|
|
\"adventure 2.5\" and \"430-point adventure\".")
|
|
|
|
|
(license license:bsd-2))))
|
2017-07-25 18:27:47 +02:00
|
|
|
|
|
|
|
|
|
(define-public tome4
|
|
|
|
|
(package
|
|
|
|
|
(name "tome4")
|
2018-06-23 03:59:03 +02:00
|
|
|
|
(version "1.5.10")
|
2017-07-25 18:27:47 +02:00
|
|
|
|
(synopsis "Single-player, RPG roguelike game set in the world of Eyal")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://te4.org/dl/t-engine/t-engine4-src-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-23 03:59:03 +02:00
|
|
|
|
"0mc5dgh2x9nbili7gy6srjhb23ckalf08wqq2amyjr5rq392jvd7"))
|
2017-07-25 18:27:47 +02:00
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
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
|
|
|
|
'(begin
|
|
|
|
|
(substitute* '("src/music.h" "src/tSDL.h")
|
|
|
|
|
(("#elif defined(__FreeBSD__)" line)
|
|
|
|
|
(string-append
|
|
|
|
|
line " || defined(__GNUC__)")))
|
|
|
|
|
#t))))
|
2017-07-25 18:27:47 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("unzip" ,unzip)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("sdl-union" ,(sdl-union (list sdl2 sdl2-image sdl2-mixer sdl2-ttf)))
|
|
|
|
|
("glu" ,glu)
|
|
|
|
|
("premake4" ,premake4)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("vorbis" ,libvorbis)
|
|
|
|
|
("luajit" ,luajit)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags '("CC=gcc" "config=release")
|
|
|
|
|
#:phases (modify-phases %standard-phases
|
2018-06-23 03:59:03 +02:00
|
|
|
|
(delete 'bootstrap)
|
2017-07-25 18:27:47 +02:00
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda _
|
2018-06-23 03:59:27 +02:00
|
|
|
|
(invoke "premake4" "gmake")
|
2017-07-25 18:27:47 +02:00
|
|
|
|
#t))
|
|
|
|
|
(add-after 'set-paths 'set-sdl-paths
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(setenv "CPATH"
|
|
|
|
|
(string-append (assoc-ref inputs "sdl-union")
|
|
|
|
|
"/include/SDL2"))
|
|
|
|
|
#t))
|
|
|
|
|
(delete 'check)
|
|
|
|
|
;; premake doesn't provide install target
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(usr (string-append out "/usr"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
|
|
|
|
(licenses (string-append out "/share/licenses"))
|
|
|
|
|
(documents (string-append out "/share/doc"))
|
|
|
|
|
(pixmaps (string-append out "/share/pixmaps"))
|
|
|
|
|
(icon "te4-icon.png")
|
|
|
|
|
(data (string-append out "/share/" ,name))
|
|
|
|
|
(applications (string-append
|
|
|
|
|
out "/share/applications"))
|
|
|
|
|
(unzip (string-append
|
|
|
|
|
(assoc-ref inputs "unzip") "/bin/unzip"))
|
|
|
|
|
(wrapper (string-append bin "/" ,name)))
|
|
|
|
|
;; icon
|
|
|
|
|
(mkdir-p pixmaps)
|
|
|
|
|
(system* unzip "-j"
|
|
|
|
|
(string-append
|
|
|
|
|
"game/engines/te4-" ,version ".teae")
|
|
|
|
|
(string-append
|
|
|
|
|
"data/gfx/" icon) "-d" pixmaps)
|
|
|
|
|
;; game executable
|
|
|
|
|
(install-file "t-engine" data)
|
|
|
|
|
(mkdir-p bin)
|
|
|
|
|
(with-output-to-file wrapper
|
|
|
|
|
(lambda ()
|
|
|
|
|
(display
|
|
|
|
|
(string-append
|
|
|
|
|
"#!/bin/sh\n"
|
|
|
|
|
;; No bootstrap code found,
|
|
|
|
|
;; defaulting to working directory
|
|
|
|
|
;; for engine code!
|
|
|
|
|
"cd " data "\n"
|
|
|
|
|
"exec -a tome4 ./t-engine \"$@\"\n"))))
|
|
|
|
|
(chmod wrapper #o555)
|
|
|
|
|
;; licenses
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(install-file file licenses))
|
|
|
|
|
'("COPYING" "COPYING-MEDIA"))
|
|
|
|
|
;; documents
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(install-file file documents))
|
|
|
|
|
'("CONTRIBUTING" "CREDITS"))
|
|
|
|
|
;; data
|
|
|
|
|
(copy-recursively "bootstrap" (string-append
|
|
|
|
|
data "/bootstrap"))
|
|
|
|
|
(copy-recursively "game" (string-append data "/game"))
|
|
|
|
|
;; launcher
|
|
|
|
|
(mkdir-p applications)
|
|
|
|
|
(with-output-to-file (string-append applications "/"
|
|
|
|
|
,name ".desktop")
|
|
|
|
|
(lambda ()
|
|
|
|
|
(display
|
|
|
|
|
(string-append
|
|
|
|
|
"[Desktop Entry]
|
|
|
|
|
Name=ToME4
|
|
|
|
|
Comment=" ,synopsis "\n"
|
|
|
|
|
"Exec=" ,name "\n"
|
|
|
|
|
"Icon=" icon "\n"
|
|
|
|
|
"Terminal=false
|
|
|
|
|
Type=Application
|
|
|
|
|
Categories=Game;RolePlaying;\n")))))
|
|
|
|
|
#t)))))
|
|
|
|
|
(home-page "https://te4.org")
|
|
|
|
|
(description "Tales of Maj’Eyal (ToME) RPG, featuring tactical turn-based
|
|
|
|
|
combat and advanced character building. Play as one of many unique races and
|
|
|
|
|
classes in the lore-filled world of Eyal, exploring random dungeons, facing
|
|
|
|
|
challenging battles, and developing characters with your own tailored mix of
|
|
|
|
|
abilities and powers. With a modern graphical and customisable interface,
|
|
|
|
|
intuitive mouse control, streamlined mechanics and deep, challenging combat,
|
|
|
|
|
Tales of Maj’Eyal offers engaging roguelike gameplay for the 21st century.")
|
|
|
|
|
(license license:gpl3+)))
|
2017-12-07 22:25:26 +01:00
|
|
|
|
|
|
|
|
|
(define-public quakespasm
|
|
|
|
|
(package
|
|
|
|
|
(name "quakespasm")
|
2018-06-20 04:27:40 +02:00
|
|
|
|
(version "0.93.1")
|
2017-12-07 22:25:26 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/quakespasm/Source/quakespasm-"
|
|
|
|
|
version ".tgz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-20 04:27:40 +02:00
|
|
|
|
"1bimv18f6rzhyjz78yvw2vqr5n0kdqbcqmq7cb3m951xgsxfcgpd"))))
|
2017-12-07 22:25:26 +01:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f
|
|
|
|
|
#:make-flags '("CC=gcc"
|
|
|
|
|
"MP3LIB=mpg123"
|
|
|
|
|
"USE_CODEC_FLAC=1"
|
|
|
|
|
"USE_CODEC_MIKMOD=1"
|
|
|
|
|
"USE_SDL2=1"
|
|
|
|
|
"-CQuake")
|
|
|
|
|
#:phases (modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-after 'unpack 'fix-makefile-paths
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(mkdir-p (string-append out "/bin"))
|
|
|
|
|
(substitute* "Quake/Makefile"
|
|
|
|
|
(("/usr/local/games")
|
|
|
|
|
(string-append out "/bin")))
|
|
|
|
|
#t))))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs `(("libmikmod" ,libmikmod)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("flac" ,flac)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("mpg123" ,mpg123)
|
|
|
|
|
("sdl2" ,sdl2)))
|
|
|
|
|
(synopsis "First person shooter engine for Quake 1")
|
|
|
|
|
(description "Quakespasm is a modern engine for id software's Quake 1.
|
|
|
|
|
It includes support for 64 bit CPUs, custom music playback, a new sound driver,
|
|
|
|
|
some graphical niceities, and numerous bug-fixes and other improvements.")
|
|
|
|
|
(home-page "http://quakespasm.sourceforge.net/")
|
|
|
|
|
(license license:gpl2+)))
|
2017-12-23 17:51:19 +01:00
|
|
|
|
|
2018-02-01 10:25:53 +01:00
|
|
|
|
(define-public vkquake
|
|
|
|
|
(package
|
|
|
|
|
(inherit quakespasm)
|
|
|
|
|
(name "vkquake")
|
2018-06-13 08:46:24 +02:00
|
|
|
|
(version "1.00.0")
|
2018-02-01 10:25:53 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/Novum/vkQuake/archive/"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-13 08:46:24 +02:00
|
|
|
|
"0bviv18jvp41jvrabgl7l5kq4n1p6p3rywij481yswawdw6l5idh"))))
|
2018-02-01 10:25:53 +01:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags
|
|
|
|
|
(let ((vulkanlib (string-append (assoc-ref %build-inputs
|
2018-06-06 09:59:15 +02:00
|
|
|
|
"vulkan-loader") "/lib")))
|
2018-02-01 10:25:53 +01:00
|
|
|
|
(list "CC=gcc"
|
|
|
|
|
"MP3LIB=mpg123"
|
|
|
|
|
"USE_CODEC_FLAC=1"
|
|
|
|
|
"USE_CODEC_MIKMOD=1"
|
|
|
|
|
"USE_SDL2=1"
|
|
|
|
|
(string-append "LDFLAGS=-Wl,-rpath=" vulkanlib)
|
|
|
|
|
"-CQuake"))
|
|
|
|
|
#:phases (modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-after 'unpack 'fix-makefile-paths
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((vulkan (assoc-ref %build-inputs
|
2018-06-06 09:59:15 +02:00
|
|
|
|
"vulkan-loader"))
|
2018-02-01 10:25:53 +01:00
|
|
|
|
(out (assoc-ref outputs "out")))
|
|
|
|
|
(mkdir-p (string-append out "/bin"))
|
|
|
|
|
(substitute* "Quake/Makefile" ((" /usr")
|
|
|
|
|
(string-append " " out)))
|
|
|
|
|
(substitute* "Quake/Makefile" (("/games")
|
|
|
|
|
(string-append "/bin")))
|
|
|
|
|
(substitute* "Quake/Makefile" (("..VULKAN_SDK.") vulkan))
|
|
|
|
|
#t))))
|
|
|
|
|
,@(strip-keyword-arguments '(#:make-flags #:phases)
|
|
|
|
|
(package-arguments quakespasm))))
|
2018-06-06 09:59:15 +02:00
|
|
|
|
(inputs `(("vulkan-loader" ,vulkan-loader)
|
2018-02-01 10:25:53 +01:00
|
|
|
|
,@(package-inputs quakespasm)))
|
|
|
|
|
(description "vkquake is a modern engine for id software's Quake 1.
|
|
|
|
|
It includes support for 64 bit CPUs, custom music playback, a new sound driver,
|
|
|
|
|
some graphical niceities, and numerous bug-fixes and other improvements.")
|
|
|
|
|
(home-page "https://github.com/Novum/vkQuake")))
|
|
|
|
|
|
2017-12-23 17:51:19 +01:00
|
|
|
|
(define-public yamagi-quake2
|
|
|
|
|
(package
|
|
|
|
|
(name "yamagi-quake2")
|
|
|
|
|
(version "7.10")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://deponie.yamagi.org/quake2/quake2-"
|
|
|
|
|
version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0psinbg25mysd58k99s1n34w31w5hj1vppb39gdjb0zqi6sl6cps"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f
|
|
|
|
|
#:make-flags
|
|
|
|
|
(list "CC=gcc"
|
|
|
|
|
;; link openAL instead of using dlopen at runtime
|
|
|
|
|
"DLOPEN_OPENAL=\"no\""
|
|
|
|
|
;; an optional directory where it will look for quake2 data files
|
|
|
|
|
;; in addition to the current working directory
|
|
|
|
|
"WITH_SYSTEMWIDE=yes"
|
|
|
|
|
"WITH_SYSTEMDIR=\"/opt/quake2\"")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(mkdir-p (string-append out "/lib"))
|
|
|
|
|
(mkdir-p (string-append out "/bin"))
|
|
|
|
|
;; The yamagi-quake2 binary must be in the same directory
|
|
|
|
|
;; as it's engine libraries, but symlinking it to /bin is okay
|
|
|
|
|
;; https://github.com/yquake2/yquake2/blob/master/stuff/packaging.md
|
|
|
|
|
(copy-recursively "release"
|
|
|
|
|
(string-append out "/lib/yamagi-quake2"))
|
|
|
|
|
(symlink (string-append out "/lib/yamagi-quake2/quake2")
|
|
|
|
|
(string-append out "/bin/yamagi-quake2"))
|
|
|
|
|
(symlink (string-append out "/lib/yamagi-quake2/q2ded")
|
|
|
|
|
(string-append out "/bin/yamagi-q2ded"))))))))
|
|
|
|
|
(inputs `(("sdl2" ,sdl2)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("zlib" ,zlib)
|
|
|
|
|
("openal" ,openal)))
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
|
|
|
|
(synopsis "First person shooter engine based on quake2")
|
|
|
|
|
(description "Yamagi Quake II is an enhanced client for id Software's Quake II.
|
|
|
|
|
The main focus is an unchanged single player experience like back in 1997,
|
|
|
|
|
thus the gameplay and the graphics are unaltered. However the user may use one
|
|
|
|
|
of the unofficial retexturing packs. In comparison with the official client,
|
|
|
|
|
over 1000 bugs were fixed and an extensive code audit done,
|
|
|
|
|
making Yamagi Quake II one of the most solid Quake II implementations available.")
|
|
|
|
|
(home-page "https://www.yamagi.org/quake2/")
|
|
|
|
|
(license (list license:gpl2+ ; game and server
|
|
|
|
|
(license:non-copyleft ; info-zip
|
|
|
|
|
"file://LICENSE"
|
|
|
|
|
"See Info-Zip section.")
|
|
|
|
|
license:public-domain)))) ; stb
|
2017-12-24 23:36:32 +01:00
|
|
|
|
|
|
|
|
|
(define-public the-butterfly-effect
|
|
|
|
|
(package
|
|
|
|
|
(name "the-butterfly-effect")
|
|
|
|
|
(version "0.9.3.1")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/the-butterfly-effect/tbe/archive/"
|
|
|
|
|
"v" version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"18qkp7fgdvyl3haqqa693mgyic7afsznsxgz98z9wn4csaqxsnby"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
;; There is no "install" phase. By default, tbe is installed
|
|
|
|
|
;; in the build directory. Provide our own installation.
|
|
|
|
|
(replace 'install
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin"))
|
|
|
|
|
(share (string-append out "/share")))
|
|
|
|
|
(install-file "usr/games/tbe" bin)
|
|
|
|
|
(mkdir-p share)
|
|
|
|
|
(copy-recursively "usr/share" share)
|
|
|
|
|
#t))))
|
|
|
|
|
;; Test suite requires a running Xorg server. Even when
|
|
|
|
|
;; provided, it fails with "D-Bus library appears to be
|
|
|
|
|
;; incorrectly set up; failed to read machine uuid: Failed to
|
|
|
|
|
;; open "/etc/machine-id": No such file or directory" along
|
|
|
|
|
;; with multiple "QPainter:: ... Painter not active" warnings.
|
|
|
|
|
#:tests? #f))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("qtbase" ,qtbase)
|
|
|
|
|
("qtsvg" ,qtsvg)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("cmake" ,cmake)
|
|
|
|
|
("gettext-minimal" ,gettext-minimal)
|
|
|
|
|
("qttools" ,qttools)))
|
|
|
|
|
(synopsis "Realistic physics puzzle game")
|
|
|
|
|
(description "The Butterfly Effect (tbe) is a game that uses
|
|
|
|
|
realistic physics simulations to combine lots of simple mechanical
|
|
|
|
|
elements to achieve a simple goal in the most complex way possible.")
|
|
|
|
|
(home-page "http://the-butterfly-effect.org/")
|
|
|
|
|
;; Main license is GPL2-only. However, artwork is distributed
|
|
|
|
|
;; under various licenses, listed here.
|
|
|
|
|
(license (list license:gpl2 license:public-domain license:expat
|
|
|
|
|
license:cc-by-sa3.0 license:gpl3+ license:wtfpl2))))
|
2017-12-11 01:24:42 +01:00
|
|
|
|
|
|
|
|
|
(define-public pioneer
|
|
|
|
|
(package
|
|
|
|
|
(name "pioneer")
|
2018-04-13 05:03:51 +02:00
|
|
|
|
(version "20180203")
|
2017-12-11 01:24:42 +01:00
|
|
|
|
(source (origin
|
2018-04-13 05:03:51 +02:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/pioneerspacesim/pioneer.git")
|
|
|
|
|
(commit version)))
|
|
|
|
|
(file-name (git-file-name name version))
|
2017-12-11 01:24:42 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-04-13 05:03:51 +02:00
|
|
|
|
"0hp2mf36kj2v93hka8m8lxw2qhmnjc62wjlpw7c7ix0r8xa01i6h"))))
|
2017-12-11 01:24:42 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("assimp" ,assimp)
|
|
|
|
|
("curl" ,curl)
|
|
|
|
|
("freetype" ,freetype)
|
|
|
|
|
("glu" ,glu)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("libsigc++" ,libsigc++)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("lua" ,lua-5.2) ;not compatible with 5.3
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("sdl" ,(sdl-union (list sdl2 sdl2-image)))))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ;tests are broken
|
|
|
|
|
#:configure-flags (list "--with-external-liblua"
|
|
|
|
|
(string-append "PIONEER_DATA_DIR="
|
|
|
|
|
%output "/share/games/pioneer"))
|
|
|
|
|
#:phases (modify-phases %standard-phases
|
|
|
|
|
(add-before 'bootstrap 'fix-lua-check
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "configure.ac"
|
|
|
|
|
(("lua5.2")
|
|
|
|
|
(string-append "lua-" ,(version-major+minor
|
|
|
|
|
(package-version lua-5.2))))))))))
|
|
|
|
|
(home-page "http://pioneerspacesim.net")
|
|
|
|
|
(synopsis "Game of lonely space adventure")
|
|
|
|
|
(description
|
|
|
|
|
"Pioneer is a space adventure game set in our galaxy at the turn of the
|
|
|
|
|
31st century. The game is open-ended, and you are free to eke out whatever
|
|
|
|
|
kind of space-faring existence you can think of. Look for fame or fortune by
|
|
|
|
|
exploring the millions of star systems. Turn to a life of crime as a pirate,
|
|
|
|
|
smuggler or bounty hunter. Forge and break alliances with the various
|
|
|
|
|
factions fighting for power, freedom or self-determination. The universe is
|
|
|
|
|
whatever you make of it.")
|
|
|
|
|
(license license:gpl3)))
|
2018-01-17 23:42:55 +01:00
|
|
|
|
|
|
|
|
|
(define-public badass
|
|
|
|
|
(let ((commit "3c3cd669b4fc8f73a102e3702788f7b28dc47dbb")
|
|
|
|
|
(revision "0"))
|
|
|
|
|
(package
|
|
|
|
|
(name "badass")
|
|
|
|
|
(version (git-version "0.0" revision commit))
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/umayr/badass.git")
|
|
|
|
|
(commit commit)))
|
|
|
|
|
(file-name (git-file-name name version))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"05c9vdcb5ym3z0n5ll3v39mw4yl9jcjnlydmn0yl89ai9pv71zb6"))))
|
|
|
|
|
(build-system go-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:import-path "github.com/umayr/badass"))
|
|
|
|
|
(synopsis "Hacking contribution graphs in git")
|
|
|
|
|
(description
|
|
|
|
|
"Badass generates false commits for a range of dates, essentially
|
|
|
|
|
hacking the gamification of contribution graphs on platforms such as
|
|
|
|
|
Github or Gitlab.")
|
|
|
|
|
(home-page "https://github.com/umayr/badass")
|
|
|
|
|
(license license:expat))))
|
2018-02-13 01:26:27 +01:00
|
|
|
|
|
|
|
|
|
(define-public colobot
|
|
|
|
|
(package
|
|
|
|
|
(name "colobot")
|
2018-06-06 19:16:21 +02:00
|
|
|
|
(version "0.1.11.1-alpha")
|
2018-02-13 01:26:27 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/colobot/colobot/archive/"
|
|
|
|
|
"colobot-gold-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-06 19:16:21 +02:00
|
|
|
|
"0h6f4icarramhjkxxbzz6siv3v11z5r8ghqisgr1rscw217vhmwf"))))
|
2018-02-13 01:26:27 +01:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ;no test
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'unpack-data
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(let ((data (assoc-ref inputs "colobot-data")))
|
|
|
|
|
(invoke "tar" "-xvf" data "-Cdata" "--strip-components=1")
|
|
|
|
|
#t)))
|
|
|
|
|
(add-after 'unpack-data 'install-music
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
;; Installation process tries to download music files using
|
|
|
|
|
;; "wget" if not already present. Since we are going to install
|
|
|
|
|
;; them, skip "wget" command check.
|
|
|
|
|
(substitute* "data/music/CMakeLists.txt"
|
|
|
|
|
(("find_program\\(WGET wget\\)") ""))
|
|
|
|
|
;; Effectively install music.
|
|
|
|
|
(let ((data (assoc-ref inputs "colobot-music")))
|
|
|
|
|
(invoke "tar" "-xvf" data "-Cdata/music")
|
|
|
|
|
#t)))
|
|
|
|
|
(add-after 'install 'fix-install-directory
|
|
|
|
|
;; Move binary from "games/" to "bin/".
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(rename-file (string-append out "/games")
|
|
|
|
|
(string-append out "/bin"))
|
|
|
|
|
#t))))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("colobot-data"
|
|
|
|
|
,(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/colobot/colobot-data/archive/"
|
|
|
|
|
"colobot-gold-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-06-06 19:16:21 +02:00
|
|
|
|
"0riznycx2jbxmg4m9nn3mcpqws2c0s7cn2m9skz9zj1w39r5qpjy"))))
|
2018-02-13 01:26:27 +01:00
|
|
|
|
("colobot-music"
|
|
|
|
|
,(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://colobot.info/files/music/"
|
|
|
|
|
"colobot-music_ogg_" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1s86cd36rwkff329mb1ay1wi5qqyi35564ppgr3f4qqz9wj9vs2m"))))
|
|
|
|
|
("gettext" ,gettext-minimal)
|
|
|
|
|
("librsvg" ,librsvg)
|
|
|
|
|
("po4a" ,po4a)
|
|
|
|
|
("python" ,python-wrapper)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("boost" ,boost)
|
|
|
|
|
("glew" ,glew)
|
|
|
|
|
("libogg" ,libogg)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("libsndfile" ,libsndfile)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("physfs" ,physfs)
|
|
|
|
|
("sdl" ,(sdl-union (list sdl2 sdl2-image sdl2-ttf)))))
|
|
|
|
|
(synopsis "Educational programming strategy game")
|
|
|
|
|
(description "Colobot: Gold Edition is a real-time strategy game, where
|
|
|
|
|
you can program your units (bots) in a language called CBOT, which is similar
|
|
|
|
|
to C++ and Java. Your mission is to find a new planet to live and survive.
|
|
|
|
|
You can save humanity and get programming skills!")
|
|
|
|
|
(home-page "https://colobot.info")
|
|
|
|
|
(license license:gpl3+)))
|
2018-01-17 00:21:42 +01:00
|
|
|
|
|
|
|
|
|
(define-public gzdoom
|
|
|
|
|
(package
|
|
|
|
|
(name "gzdoom")
|
2018-03-27 03:05:52 +02:00
|
|
|
|
(version "3.3.0")
|
2018-01-17 00:21:42 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri
|
|
|
|
|
(string-append "https://zdoom.org/files/gzdoom/src/gzdoom-g"
|
|
|
|
|
version ".zip"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-03-27 03:05:52 +02:00
|
|
|
|
"09a4kx3ry8pc9r578m7yprwa7zsdqxjpn10lyc92r5g9sx4l1m1a"))
|
2018-01-17 00:21:42 +01:00
|
|
|
|
(patches (search-patches "gzdoom-search-in-installed-share.patch"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
'(begin
|
|
|
|
|
(delete-file-recursively "bzip2")
|
|
|
|
|
(delete-file-recursively "game-music-emu")
|
|
|
|
|
(delete-file-recursively "jpeg-6b")
|
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
|
|
|
|
(delete-file-recursively "zlib")
|
|
|
|
|
#t))))
|
2018-01-17 00:21:42 +01:00
|
|
|
|
(arguments
|
|
|
|
|
'(#:tests? #f
|
|
|
|
|
#:configure-flags
|
|
|
|
|
(let ((out (assoc-ref %outputs "out")))
|
|
|
|
|
(list
|
|
|
|
|
(string-append
|
|
|
|
|
"-DCMAKE_CXX_FLAGS:="
|
|
|
|
|
"-DSHARE_DIR=\\\"" out "/share/\\\" "
|
|
|
|
|
"-DGUIX_OUT_PK3=\\\"" out "/share/games/doom\\\"")
|
|
|
|
|
;; look for libraries at buildtime instead of
|
|
|
|
|
;; dynamically finding them at runtime
|
|
|
|
|
"-DDYN_OPENAL=OFF"
|
|
|
|
|
"-DDYN_FLUIDSYNTH=OFF"
|
|
|
|
|
"-DDYN_GTK=OFF"
|
|
|
|
|
"-DDYN_MPG123=OFF"
|
|
|
|
|
"-DDYN_SNDFILE=OFF"))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before 'configure 'fix-referenced-paths
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let ((fluid-3 (assoc-ref inputs "fluid-3"))
|
|
|
|
|
(timidity++ (assoc-ref inputs "timidity++"))
|
|
|
|
|
(out (assoc-ref outputs "out")))
|
|
|
|
|
|
|
|
|
|
(substitute*
|
|
|
|
|
"src/CMakeLists.txt"
|
|
|
|
|
(("COMMAND /bin/sh")
|
|
|
|
|
(string-append "COMMAND " (which "sh"))))
|
|
|
|
|
|
|
|
|
|
(substitute*
|
|
|
|
|
"src/sound/mididevices/music_fluidsynth_mididevice.cpp"
|
|
|
|
|
(("/usr/share/sounds/sf2/FluidR3_GM.sf2")
|
|
|
|
|
(string-append fluid-3 "/share/soundfonts/FluidR3Mono_GM.sf3")))
|
|
|
|
|
|
|
|
|
|
(substitute*
|
|
|
|
|
"src/sound/mididevices/music_timiditypp_mididevice.cpp"
|
|
|
|
|
(("exename = \"timidity\"")
|
|
|
|
|
(string-append "exename = \"" timidity++ "/bin/timidity\"")))
|
|
|
|
|
#t))))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(inputs `(("bzip2" ,bzip2)
|
|
|
|
|
("fluid-3" ,fluid-3)
|
|
|
|
|
("fluidsynth" ,fluidsynth)
|
|
|
|
|
("gtk+3" ,gtk+)
|
|
|
|
|
("libgme" ,libgme)
|
|
|
|
|
("libjpeg" ,libjpeg)
|
|
|
|
|
("libsndfile" ,libsndfile)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("mpg123" ,mpg123)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("sdl2" ,sdl2)
|
|
|
|
|
("timidity++" ,timidity++)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)
|
|
|
|
|
("unzip" ,unzip)))
|
|
|
|
|
(synopsis "Modern Doom 2 source port")
|
|
|
|
|
(description "GZdoom is a port of the Doom 2 game engine, with a modern
|
|
|
|
|
renderer. It improves modding support with ZDoom's advanced mapping features
|
|
|
|
|
and the new ZScript language. In addition to Doom, it supports Heretic, Hexen,
|
|
|
|
|
Strife, Chex Quest, and fan-created games like Harmony, Hacx and Freedoom.")
|
|
|
|
|
(home-page "https://zdoom.org/index")
|
|
|
|
|
(license (list license:gpl3+ ; gzdoom game
|
|
|
|
|
license:lgpl3+ ; gzdoom renderer
|
|
|
|
|
license:expat ; gdtoa
|
|
|
|
|
(license:non-copyleft ; modified dumb
|
|
|
|
|
"file://dumb/licence.txt"
|
|
|
|
|
"Dumb license, explicitly GPL compatible.")))))
|
2018-04-09 19:31:04 +02:00
|
|
|
|
|
|
|
|
|
(define-public fortune-mod
|
|
|
|
|
(package
|
|
|
|
|
(name "fortune-mod")
|
|
|
|
|
(version "2.4.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/shlomif/fortune-mod/"
|
|
|
|
|
"archive/" name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1hnqpkassh7fwg2jgvybr8mw7vzfikbrhb5r22367ilfwxnl9yd2"))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:test-target "check"
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'fix-build-env
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(use-modules (guix build utils))
|
|
|
|
|
(let* ((cmake-rules (assoc-ref inputs "cmake-rules")))
|
|
|
|
|
(copy-file cmake-rules
|
|
|
|
|
(string-append "fortune-mod/cmake/"
|
|
|
|
|
(strip-store-file-name cmake-rules)))
|
|
|
|
|
(chdir "fortune-mod"))))
|
|
|
|
|
(add-after 'install 'fix-install-directory
|
|
|
|
|
;; Move binary from "games/" to "bin/".
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(rename-file (string-append out "/games/fortune")
|
|
|
|
|
(string-append out "/bin/fortune"))
|
|
|
|
|
#t))))))
|
|
|
|
|
(inputs `(("recode" ,recode)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("perl" ,perl)
|
|
|
|
|
;; The following is only needed for tests.
|
|
|
|
|
("perl-file-find-object" ,perl-file-find-object)
|
|
|
|
|
("perl-test-differences" ,perl-test-differences)
|
|
|
|
|
("perl-class-xsaccessor" ,perl-class-xsaccessor)
|
|
|
|
|
("perl-io-all" ,perl-io-all)
|
|
|
|
|
("perl-test-runvalgrind" ,perl-test-runvalgrind)
|
|
|
|
|
("cmake-rules"
|
|
|
|
|
,(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://bitbucket.org/shlomif/shlomif-cmake-modules/"
|
2018-04-23 18:16:45 +02:00
|
|
|
|
"raw/c505713d7a7cda608f97f01577e5868a711b883e/"
|
|
|
|
|
"shlomif-cmake-modules/Shlomif_Common.cmake"))
|
2018-04-09 19:31:04 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32 "0kx9s1qqhhzprp1w3b67xmsns0n0v506bg5hgrshxaxpy6lqiwb2"))))))
|
|
|
|
|
(home-page "http://www.shlomifish.org/open-source/projects/fortune-mod/")
|
|
|
|
|
(synopsis "The Fortune Cookie program from BSD games")
|
|
|
|
|
(description "Fortune is a command-line utility which displays a random
|
|
|
|
|
quotation from a collection of quotes.")
|
|
|
|
|
(license license:bsd-4)))
|
2018-05-26 18:11:11 +02:00
|
|
|
|
|
|
|
|
|
(define xonotic-data
|
|
|
|
|
(package
|
|
|
|
|
(name "xonotic-data")
|
|
|
|
|
(version "0.8.2")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://dl.xonotic.org/xonotic-"
|
|
|
|
|
version ".zip"))
|
|
|
|
|
(file-name (string-append name "-" version ".zip"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1mcs6l4clvn7ibfq3q69k2p0z6ww75rxvnngamdq5ic6yhq74bx2"))))
|
|
|
|
|
(build-system trivial-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("unzip" ,unzip)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:modules ((guix build utils))
|
|
|
|
|
#:builder
|
|
|
|
|
(begin
|
|
|
|
|
(use-modules (guix build utils))
|
|
|
|
|
(let* ((out (assoc-ref %outputs "out"))
|
|
|
|
|
(xonotic (string-append out "/share/xonotic"))
|
|
|
|
|
(source (assoc-ref %build-inputs "source"))
|
|
|
|
|
(unzip (string-append (assoc-ref %build-inputs "unzip") "/bin/unzip")))
|
|
|
|
|
(copy-file source (string-append ,name "-" ,version ".zip"))
|
|
|
|
|
(invoke unzip (string-append ,name "-" ,version ".zip"))
|
|
|
|
|
(mkdir-p out)
|
|
|
|
|
(mkdir-p xonotic)
|
|
|
|
|
(chdir "Xonotic")
|
|
|
|
|
(copy-recursively "data"
|
|
|
|
|
(string-append xonotic "/data"))
|
|
|
|
|
(copy-recursively "server"
|
|
|
|
|
(string-append xonotic "/server"))
|
|
|
|
|
(install-file "key_0.d0pk" xonotic)))))
|
|
|
|
|
(home-page "http://xonotic.org")
|
|
|
|
|
(synopsis "Data files for Xonotic")
|
|
|
|
|
(description
|
|
|
|
|
"Xonotic-data provides the data files required by the game Xonotic.")
|
|
|
|
|
(license (list license:gpl2+
|
2018-05-27 10:21:03 +02:00
|
|
|
|
(license:x11-style "file://server/rcon.pl")))))
|
2018-05-26 18:11:11 +02:00
|
|
|
|
|
|
|
|
|
(define-public xonotic
|
|
|
|
|
(package
|
|
|
|
|
(name "xonotic")
|
|
|
|
|
(version "0.8.2")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://dl.xonotic.org/xonotic-"
|
|
|
|
|
version "-source.zip"))
|
|
|
|
|
(file-name (string-append name "-" version ".zip"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0axxw04fyz6jlfqd0kp7hdrqa0li31sx1pbipf2j5qp9wvqicsay"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags (list (string-append "--prefix="
|
|
|
|
|
(assoc-ref %outputs "out"))
|
|
|
|
|
"--disable-rijndael")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before 'configure 'make-darkplaces
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(sharedir (string-append out "/share/xonotic/")))
|
|
|
|
|
(invoke "make" "-C" "source/darkplaces"
|
|
|
|
|
(string-append "DP_FS_BASEDIR="
|
|
|
|
|
sharedir)
|
|
|
|
|
"DP_LINK_TO_LIBJPEG=1"
|
|
|
|
|
"DP_SOUND_API=ALSA"
|
|
|
|
|
"CC=gcc"
|
|
|
|
|
"-f" "makefile"
|
|
|
|
|
"cl-release")
|
|
|
|
|
(invoke "make" "-C" "source/darkplaces"
|
|
|
|
|
(string-append "DP_FS_BASEDIR="
|
|
|
|
|
sharedir)
|
|
|
|
|
"DP_LINK_TO_LIBJPEG=1"
|
|
|
|
|
"DP_SOUND_API=ALSA"
|
|
|
|
|
"CC=gcc"
|
|
|
|
|
"-f" "makefile"
|
|
|
|
|
"sdl-release")
|
|
|
|
|
(invoke "make" "-C" "source/darkplaces"
|
|
|
|
|
(string-append "DP_FS_BASEDIR="
|
|
|
|
|
sharedir)
|
|
|
|
|
"DP_LINK_TO_LIBJPEG=1"
|
|
|
|
|
"DP_SOUND_API=ALSA"
|
|
|
|
|
"CC=gcc"
|
|
|
|
|
"-f" "makefile"
|
|
|
|
|
"sv-release"))))
|
|
|
|
|
(add-before 'configure 'bootstrap
|
|
|
|
|
(lambda _
|
|
|
|
|
(chdir "source/d0_blind_id")
|
|
|
|
|
(invoke "sh" "autogen.sh")))
|
|
|
|
|
(add-after 'build 'install-desktop-entry
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
;; Add .desktop files for the 2 variants and the symlink
|
|
|
|
|
(let* ((output (assoc-ref outputs "out"))
|
|
|
|
|
(apps (string-append output "/share/applications")))
|
|
|
|
|
(mkdir-p apps)
|
|
|
|
|
(with-output-to-file
|
|
|
|
|
(string-append apps "/xonotic-glx.desktop")
|
|
|
|
|
(lambda _
|
|
|
|
|
(format #t
|
|
|
|
|
"[Desktop Entry]~@
|
|
|
|
|
Name=xonotic-glx~@
|
|
|
|
|
Comment=Xonotic glx~@
|
|
|
|
|
Exec=~a/bin/xonotic-glx~@
|
|
|
|
|
TryExec=~@*~a/bin/xonotic-glx~@
|
|
|
|
|
Icon=~@
|
|
|
|
|
Type=Application~%"
|
|
|
|
|
output)))
|
|
|
|
|
(with-output-to-file
|
|
|
|
|
(string-append apps "/xonotic-sdl.desktop")
|
|
|
|
|
(lambda _
|
|
|
|
|
(format #t
|
|
|
|
|
"[Desktop Entry]~@
|
|
|
|
|
Name=xonotic-sdl~@
|
|
|
|
|
Comment=Xonotic sdl~@
|
|
|
|
|
Exec=~a/bin/xonotic-sdl~@
|
|
|
|
|
TryExec=~@*~a/bin/xonotic-sdl~@
|
|
|
|
|
Icon=~@
|
|
|
|
|
Type=Application~%"
|
|
|
|
|
output)))
|
|
|
|
|
(with-output-to-file
|
|
|
|
|
(string-append apps "/xonotic.desktop")
|
|
|
|
|
(lambda _
|
|
|
|
|
(format #t
|
|
|
|
|
"[Desktop Entry]~@
|
|
|
|
|
Name=xonotic~@
|
|
|
|
|
Comment=Xonotic~@
|
|
|
|
|
Exec=~a/bin/xonotic-glx~@
|
|
|
|
|
TryExec=~@*~a/bin/xonotic~@
|
|
|
|
|
Icon=~@
|
|
|
|
|
Type=Application~%"
|
|
|
|
|
output)))
|
|
|
|
|
#t)))
|
|
|
|
|
(add-after 'install-desktop-entry 'install-icons
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(with-directory-excursion "../../misc/logos/icons_png/"
|
|
|
|
|
(for-each
|
|
|
|
|
(lambda (file)
|
|
|
|
|
(let* ((size (string-filter char-numeric? file))
|
|
|
|
|
(icons (string-append out "/share/icons/hicolor/"
|
|
|
|
|
size "x" size "/apps")))
|
|
|
|
|
(mkdir-p icons)
|
|
|
|
|
(copy-file file (string-append icons "/xonotic.png"))))
|
|
|
|
|
'("xonotic_16.png" "xonotic_22.png" "xonotic_24.png"
|
|
|
|
|
"xonotic_32.png" "xonotic_48.png" "xonotic_64.png"
|
|
|
|
|
"xonotic_128.png" "xonotic_256.png" "xonotic_512.png"))))))
|
|
|
|
|
(add-after 'install-icons 'install-binaries
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(define (install src dst)
|
|
|
|
|
(let ((dst (string-append out dst)))
|
|
|
|
|
(mkdir-p (dirname dst))
|
|
|
|
|
(copy-file src dst)))
|
|
|
|
|
(mkdir-p (string-append out "/bin"))
|
|
|
|
|
(install "../darkplaces/darkplaces-dedicated"
|
|
|
|
|
"/bin/xonotic-dedicated")
|
|
|
|
|
(install "../darkplaces/darkplaces-glx"
|
|
|
|
|
"/bin/xonotic-glx")
|
|
|
|
|
(install "../darkplaces/darkplaces-sdl"
|
|
|
|
|
"/bin/xonotic-sdl")
|
|
|
|
|
;; Provide a default xonotic executable, defaulting to SDL.
|
|
|
|
|
(symlink (string-append out "/bin/xonotic-sdl")
|
|
|
|
|
(string-append out "/bin/xonotic"))
|
|
|
|
|
#t)))
|
|
|
|
|
(add-after 'install-binaries 'install-data
|
|
|
|
|
(lambda* (#:key outputs inputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(data (assoc-ref inputs "xonotic-data")))
|
|
|
|
|
(copy-recursively (string-append data "/share/xonotic")
|
|
|
|
|
(string-append out "/share/xonotic"))
|
|
|
|
|
#t)))
|
|
|
|
|
(add-after 'install-binaries 'wrap-binaries
|
|
|
|
|
(lambda* (#:key outputs inputs #:allow-other-keys)
|
|
|
|
|
;; Curl and libvorbis need to be wrapped so that we get
|
|
|
|
|
;; sound and networking.
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(bin (string-append out "/bin/xonotic"))
|
|
|
|
|
(bin-sdl (string-append out "/bin/xonotic-sdl"))
|
|
|
|
|
(bin-glx (string-append out "/bin/xonotic-glx"))
|
|
|
|
|
(bin-dedicated (string-append out "/bin/xonotic-dedicated"))
|
|
|
|
|
(curl (assoc-ref inputs "curl"))
|
|
|
|
|
(vorbis (assoc-ref inputs "libvorbis")))
|
|
|
|
|
(wrap-program bin
|
|
|
|
|
`("LD_LIBRARY_PATH" ":" prefix
|
|
|
|
|
(,(string-append curl "/lib:" vorbis "/lib"))))
|
|
|
|
|
(wrap-program bin-sdl
|
|
|
|
|
`("LD_LIBRARY_PATH" ":" prefix
|
|
|
|
|
(,(string-append curl "/lib:" vorbis "/lib"))))
|
|
|
|
|
(wrap-program bin-glx
|
|
|
|
|
`("LD_LIBRARY_PATH" ":" prefix
|
|
|
|
|
(,(string-append curl "/lib:" vorbis "/lib"))))
|
|
|
|
|
(wrap-program bin-dedicated
|
|
|
|
|
`("LD_LIBRARY_PATH" ":" prefix
|
|
|
|
|
(,(string-append curl "/lib:" vorbis "/lib"))))
|
|
|
|
|
#t))))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("xonotic-data" ,xonotic-data)
|
|
|
|
|
("alsa-lib" ,alsa-lib)
|
|
|
|
|
("curl" ,curl)
|
|
|
|
|
("libjpeg" ,libjpeg)
|
|
|
|
|
("libmodplug" ,libmodplug)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("libogg" ,libogg)
|
|
|
|
|
("libxpm" ,libxpm)
|
|
|
|
|
("libxxf86dga" ,libxxf86dga)
|
|
|
|
|
("libxxf86vm" ,libxxf86vm)
|
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("libxext" ,libxext)
|
|
|
|
|
("libxau" ,libxau)
|
|
|
|
|
("libxdmcp" ,libxdmcp)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("glu" ,glu)
|
|
|
|
|
("freetype" ,freetype)
|
|
|
|
|
("sdl2" ,sdl2)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("hicolor-icon-theme" ,hicolor-icon-theme)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("unzip" ,unzip)
|
|
|
|
|
("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("pkg-config" ,pkg-config)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("gmp" ,gmp)))
|
|
|
|
|
(home-page "http://xonotic.org")
|
|
|
|
|
(synopsis "Fast-paced first-person shooter game")
|
|
|
|
|
(description
|
|
|
|
|
"Xonotic is a free, fast-paced first-person shooter.
|
|
|
|
|
The project is geared towards providing addictive arena shooter
|
|
|
|
|
gameplay which is all spawned and driven by the community itself.
|
|
|
|
|
Xonotic is a direct successor of the Nexuiz project with years of
|
|
|
|
|
development between them, and it aims to become the best possible
|
|
|
|
|
open-source FPS of its kind.")
|
|
|
|
|
(license (list license:gpl2+
|
|
|
|
|
license:bsd-3 ; /source/d0_blind_id folder and others
|
2018-05-27 10:21:03 +02:00
|
|
|
|
(license:x11-style "" "See file rcon.pl.")))))
|