HCoop / jackhill / guix / guix.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Merge branch 'master' into staging
[jackhill/guix/guix.git] / gnu / packages / game-development.scm
CommitLineData
6cb89466
TČ		 1;;; GNU Guix --- Functional package management for GNU
2;;; Copyright © 2014 Tomáš Čech <sleep_walker@suse.cz>
f586c877 3;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
189be331 4;;; Copyright © 2015, 2018 Ludovic Courtès <ludo@gnu.org>
a6dec13b 5;;; Copyright © 2015, 2018 Alex Kost <alezost@gmail.com>
68c6110c 6;;; Copyright © 2015, 2016, 2017 David Thompson <davet@gnu.org>
d5c60e0a 7;;; Copyright © 2016, 2017, 2018, 2019 Efraim Flashner <efraim@flashner.co.il>
3c8ba11a 8;;; Copyright © 2016, 2017 Kei Kebreau <kkebreau@posteo.net>
cd528946 9;;; Copyright © 2016, 2018, 2019 Ricardo Wurmus <rekado@elephly.net>
cd6ae1ce 10;;; Copyright © 2016, 2017, 2018 Julian Graham <joolean@gmail.com>
2702d665 11;;; Copyright © 2017, 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
42d0d13d 12;;; Copyright © 2017 Manolis Fragkiskos Ragkousis <manolis837@gmail.com>
194b4e7d 13;;; Copyright © 2017 Peter Mikkelsen <petermikkelsen10@gmail.com>
3c399e9b 14;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net>
6bc30a57 15;;; Copyright © 2017, 2019 Rutger Helling <rhelling@mykolab.com>
5b8d2ace 16;;; Copyright © 2018 Marius Bakke <mbakke@fastmail.com>
4041fabb 17;;; Copyright © 2019 Pierre Neidhardt <mail@ambrevar.xyz>
4337140c 18;;; Copyright © 2019, 2020 Leo Prikler <leo.prikler@student.tugraz.at>
328dd9b7 19;;; Copyright © 2019 Jethro Cao <jethrocao@gmail.com>
45c552ec 20;;; Copyright © 2020 Nicolas Goaziou <mail@nicolasgoaziou.fr>
d8682615 21;;; Copyright © 2020 Timotej Lazar <timotej.lazar@araneo.si>
2e0787a5 22;;; Copyright © 2020 Giacomo Leidi <goodoldpaul@autistici.org>
6cb89466
TČ		 23;;;
24;;; This file is part of GNU Guix.
25;;;
26;;; GNU Guix is free software; you can redistribute it and/or modify it
27;;; under the terms of the GNU General Public License as published by
28;;; the Free Software Foundation; either version 3 of the License, or (at
29;;; your option) any later version.
30;;;
31;;; GNU Guix is distributed in the hope that it will be useful, but
32;;; WITHOUT ANY WARRANTY; without even the implied warranty of
33;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
34;;; GNU General Public License for more details.
35;;;
36;;; You should have received a copy of the GNU General Public License
37;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
38
39(define-module (gnu packages game-development)
9fd50db3 40 #:use-module (srfi srfi-1)
0b5bf615 41 #:use-module (ice-9 match)
b0910aad 42 #:use-module ((guix licenses) #:prefix license:)
6cb89466
TČ		 43 #:use-module (guix packages)
44 #:use-module (guix download)
2a068aec 45 #:use-module (guix git-download)
4041fabb 46 #:use-module (guix svn-download)
be4d26f5 47 #:use-module (guix utils)
6cb89466 48 #:use-module (guix build-system cmake)
b0910aad 49 #:use-module (guix build-system gnu)
4bc37bf0 50 #:use-module (guix build-system python)
92b51d12 51 #:use-module (guix build-system scons)
b0910aad 52 #:use-module (gnu packages)
1297bc05 53 #:use-module (gnu packages audio)
c608fe8c 54 #:use-module (gnu packages autotools)
e4ff9dff 55 #:use-module (gnu packages base)
94a66dd9 56 #:use-module (gnu packages boost)
1297bc05 57 #:use-module (gnu packages compression)
2a068aec 58 #:use-module (gnu packages curl)
99828fa7 59 #:use-module (gnu packages documentation)
531003be 60 #:use-module (gnu packages fltk)
42d0d13d 61 #:use-module (gnu packages fonts)
d2cc38b7 62 #:use-module (gnu packages fontutils)
324b0040 63 #:use-module (gnu packages freedesktop)
d2cc38b7 64 #:use-module (gnu packages fribidi)
255d1bbe 65 #:use-module (gnu packages dbm)
1297bc05 66 #:use-module (gnu packages gl)
c24fff61 67 #:use-module (gnu packages glib)
1297bc05 68 #:use-module (gnu packages gnome)
c24fff61 69 #:use-module (gnu packages gnunet)
42d0d13d
MR		 70 #:use-module (gnu packages graphics)
71 #:use-module (gnu packages graphviz)
1297bc05 72 #:use-module (gnu packages gtk)
c24fff61 73 #:use-module (gnu packages guile)
1297bc05
EF		 74 #:use-module (gnu packages image)
75 #:use-module (gnu packages linux)
76 #:use-module (gnu packages lua)
c608fe8c 77 #:use-module (gnu packages m4)
7158fe4d 78 #:use-module (gnu packages mono)
1297bc05 79 #:use-module (gnu packages mp3)
c24fff61 80 #:use-module (gnu packages multiprecision)
4bc37bf0 81 #:use-module (gnu packages music)
c24fff61 82 #:use-module (gnu packages ncurses)
c1bc92c0 83 #:use-module (gnu packages pcre)
1297bc05
EF		 84 #:use-module (gnu packages pkg-config)
85 #:use-module (gnu packages pulseaudio)
4bc37bf0 86 #:use-module (gnu packages python)
44d10b1f 87 #:use-module (gnu packages python-xyz)
b0910aad 88 #:use-module (gnu packages qt)
1297bc05 89 #:use-module (gnu packages sdl)
45c552ec 90 #:use-module (gnu packages sphinx)
67c127c9 91 #:use-module (gnu packages stb)
00fca594 92 #:use-module (gnu packages texinfo)
2e0787a5 93 #:use-module (gnu packages textutils)
1297bc05 94 #:use-module (gnu packages tls)
4bc37bf0 95 #:use-module (gnu packages video)
451e1075 96 #:use-module (gnu packages web)
2a068aec 97 #:use-module (gnu packages xdisorg)
83a4a70b 98 #:use-module (gnu packages xiph)
194b4e7d 99 #:use-module (gnu packages xml)
1297bc05 100 #:use-module (gnu packages xorg))
6cb89466
TČ		 101
102(define-public bullet
103 (package
104 (name "bullet")
623a0d83 105 (version "2.89")
6cb89466 106 (source (origin
fbb456dd
EF		 107 (method git-fetch)
108 (uri (git-reference
109 (url "https://github.com/bulletphysics/bullet3/")
110 (commit version)))
111 (file-name (git-file-name name version))
6cb89466
TČ		 112 (sha256
113 (base32
623a0d83 114 "10ncf2z474jnv7p5lv01ak2mk2hib3rj5rz1zr8v2v5pnciqbijl"))
fbb456dd
EF		 115 (modules '((guix build utils)))
116 (snippet
117 '(begin
118 (for-each delete-file (find-files "build3" "premake*"))
119 (with-directory-excursion "examples/ThirdPartyLibs"
120 (for-each delete-file-recursively
121 '("Gwen" "clsocket" "enet" "glad" "imgui"
122 "lua-5.2.3" "midi" "minizip" "openvr"
123 "optionalX11" "serial" "zlib")))
623a0d83 124 ;; These need files from ThirdPartyLibs.
fbb456dd 125 (substitute* "Extras/CMakeLists.txt"
623a0d83
TGR		 126 (("BulletRobotics") ""))
127 ;; Tests fail on linking, cannot find -lBussIK.
fbb456dd
EF		 128 (substitute* "test/CMakeLists.txt"
129 ((" InverseDynamics")
130 "../examples/ThirdPartyLibs/BussIK InverseDynamics"))
131 ; (("SharedMemory") ""))
132 #t))))
6cb89466 133 (build-system cmake-build-system)
937bc2d1 134 (arguments
fbb456dd
EF		 135 '(#:configure-flags (list "-DBUILD_SHARED_LIBS=ON"
136 "-DBUILD_CPU_DEMOS=OFF"
137 "-DBUILD_OPENGL3_DEMOS=OFF"
138 "-DBUILD_BULLET2_DEMOS=OFF"
139 (string-append "-DCMAKE_CXX_FLAGS=-fPIC "
140 (or (getenv "CXXFLAGS") "")))
141 #:phases
142 (modify-phases %standard-phases
143 (add-after 'unpack 'remove-failing-tests
623a0d83 144 ;; These tests fail specifically after removing 3rd party code.
fbb456dd
EF		 145 (lambda _
146 (substitute* "test/SharedMemory/CMakeLists.txt"
147 (("ADD_TEST") "# ADD_TEST"))
148 (substitute* "test/InverseDynamics/CMakeLists.txt"
149 (("ADD_TEST\\(Test_BulletInverseForward")
150 "# ADD_TEST(Test_BulletInverseForward"))
151 #t)))))
937bc2d1
EF		 152 (inputs
153 `(("glu" ,glu)
154 ("libx11" ,libx11)
155 ("mesa" ,mesa)))
9b811f69 156 (home-page "https://pybullet.org/wordpress/")
6cb89466
TČ		 157 (synopsis "3D physics engine library")
158 (description
159 "Bullet is a physics engine library usable for collision detection. It
160is used in some video games and movies.")
b0910aad
DT		 161 (license license:zlib)))
162
1a0c4437
KK		 163(define-public deutex
164 (package
165 (name "deutex")
2702d665 166 (version "5.2.1")
1a0c4437
KK		 167 (source (origin
168 (method url-fetch)
5fbb9f0b 169 (uri (string-append "https://github.com/Doom-Utils/deutex"
f7b60fdc 170 "/releases/download/v" version "/"
5fbb9f0b 171 "deutex-" version ".tar.xz"))
1a0c4437
KK		 172 (sha256
173 (base32
2702d665 174 "07w3asqxx89wl2wfv1z3cak8v83h3ys3b39mq9qq4gyf3xdhs76n"))))
1a0c4437 175 (build-system gnu-build-system)
f7b60fdc 176 (native-inputs `(("asciidoc" ,asciidoc)))
1a0c4437
KK		 177 (home-page "https://github.com/Doom-Utils/deutex")
178 (synopsis "WAD file composer for Doom and related games")
179 (description
180 "DeuTex is a wad composer for Doom, Heretic, Hexen and Strife. It can be
181used to extract the lumps of a wad and save them as individual files.
182Conversely, it can also build a wad from separate files. When extracting a
183lump to a file, it does not just copy the raw data, it converts it to an
184appropriate format (such as PPM for graphics, Sun audio for samples, etc.).
185Conversely, when it reads files for inclusion in pwads, it does the necessary
186conversions (for example, from PPM to Doom picture format). In addition,
187DeuTex has functions such as merging wads, etc.")
188 (license license:gpl2+)))
189
94a66dd9
KK		 190(define-public grfcodec
191 (package
192 (name "grfcodec")
193 (version "6.0.6")
194 (source (origin
195 (method url-fetch)
196 (uri (string-append "http://binaries.openttd.org/extra/"
197 name "/" version "/" name "-" version
198 "-source.tar.xz"))
199 (sha256
200 (base32
201 "08admgnpqcsifpicbm56apgv360fxapqpbbsp10qyk8i22w1ivsk"))))
202 (build-system gnu-build-system)
203 (arguments
204 '(#:tests? #f ; no check target
205 #:phases
206 (modify-phases %standard-phases
207 (delete 'configure) ; no configure script
208 (replace 'install ; no install target
209 (lambda* (#:key outputs #:allow-other-keys)
210 (let* ((out (assoc-ref outputs "out"))
211 (bin (string-append out "/bin"))
212 (doc (string-append out "/share/doc"))
213 (man (string-append out "/share/man/man1")))
214 (for-each (lambda (file)
215 (install-file file bin))
216 '("grfcodec" "grfid" "grfstrip" "nforenum"))
217 (install-file "COPYING" doc)
218 (with-directory-excursion "docs"
219 (for-each (lambda (file)
220 (install-file (string-append file ".txt") doc))
221 '("auto_correct" "commands" "grf" "grfcodec" "grftut"
222 "readme" "readme.rpn"))
223 (for-each (lambda (file)
224 (install-file file man))
225 (find-files "." "\\.1"))))
226 #t)))))
227 (inputs
228 `(("boost" ,boost)
229 ("libpng" ,libpng)
230 ("zlib" ,zlib)))
231 (synopsis "GRF development tools")
232 (description
3d77785a 233 "The @dfn{Graphics Resource File} (GRF) development tools are a set of
94a66dd9
KK		 234tools for developing (New)GRFs. It includes a number of smaller programs, each
235with a specific task:
236@enumerate
237@item @code{grfcodec} decodes and encodes GRF files for OpenTTD.
238@item @code{grfid} extracts the so-called \"GRF ID\" from a GRF.
239@item @code{grfstrip} strips all sprites from a GRF.
240@item @code{nforenum} checks NFO code for errors, making corrections when
241necessary.
242@end enumerate")
243 (home-page "http://dev.openttdcoop.org/projects/grfcodec")
244 ;; GRFCodec, GRFID, and GRFStrip are exclusively under the GPL2.
245 ;; NFORenum is under the GPL2+.
246 ;; The MD5 implementation contained in GRFID is under the zlib license.
247 (license (list license:gpl2 license:gpl2+ license:zlib))))
248
3c399e9b
AI		 249(define-public catcodec
250 (package
251 (name "catcodec")
252 (version "1.0.5")
253 (source
254 (origin
255 (method url-fetch)
256 (uri (string-append "https://binaries.openttd.org/extra/catcodec/"
257 version "/catcodec-" version "-source.tar.xz"))
258 (sha256
259 (base32
260 "1qg0c2i4p29sxj0q6qp2jynlrzm5pphz2xhcjqlxa69ycrnlxzs7"))))
261 (build-system gnu-build-system)
262 (arguments
263 `(#:tests? #f ; no tests
264 #:make-flags (list (string-append "prefix=" %output))
265 #:phases (modify-phases %standard-phases
266 (delete 'configure))))
267 (home-page "http://dev.openttdcoop.org/projects/catcodec")
268 (synopsis "Encode/decode OpenTTD sounds")
269 (description "catcodec encodes and decodes sounds for OpenTTD. These
270sounds are not much more than some metadata (description and filename) and raw
271PCM data.")
272 (license license:gpl2)))
273
c24fff61
JG		 274(define-public gzochi
275 (package
276 (name "gzochi")
cd6ae1ce 277 (version "0.12")
c24fff61
JG		 278 (source (origin
279 (method url-fetch)
280 (uri (string-append "mirror://savannah/gzochi/gzochi-"
281 version ".tar.gz"))
282 (sha256
283 (base32
cd6ae1ce 284 "0h8yvk7154kd8zdfa9nqy73blrjq2x19kv305jcnwlmm09vvss59"))))
c24fff61 285 (build-system gnu-build-system)
1798e9ee
LC		 286 (arguments
287 '(#:phases (modify-phases %standard-phases
288 (add-before 'build 'no-Werror
289 (lambda _
290 ;; Don't abort builds due to things like GLib
291 ;; deprecation warnings.
292 (substitute* (find-files "." "^Makefile\\.in$")
293 (("-Werror") ""))
294 #t)))))
c24fff61
JG		 295 (native-inputs `(("pkgconfig" ,pkg-config)))
296 (inputs `(("bdb" ,bdb)
297 ("glib" ,glib)
0e4885af 298 ("guile" ,guile-2.2)
c24fff61
JG		 299 ("libmicrohttpd" ,libmicrohttpd)
300 ("ncurses" ,ncurses)
301 ("sdl" ,sdl)
302 ("zlib" ,zlib)))
340978d7 303 (home-page "https://www.nongnu.org/gzochi/")
c24fff61
JG		 304 (synopsis "Scalable middleware for multiplayer games")
305 (description
306 "gzochi is a framework for developing massively multiplayer online games.
307A server container provides services to deployed games, which are written in
308Guile Scheme, that abstract and simplify some of the most challenging and
309error-prone aspects of online game development: Concurrency, data persistence,
310and network communications. A very thin client library can be embedded to
311provide connectivity for client applications written in any language.")
312 (license license:gpl3+)))
313
7357fcf2
KK		 314(define-public nml
315 (package
316 (name "nml")
41770337 317 (version "0.4.5")
7357fcf2
KK		 318 (source
319 (origin
320 (method url-fetch)
321 (uri (string-append "http://bundles.openttdcoop.org/nml/releases/"
322 version "/nml-" version ".tar.gz"))
323 (sha256
324 (base32
41770337 325 "1pmvvm3sgnpngfa7884mqhq3fwdjh9sr0ca07ypnidcg0y341w53"))))
7357fcf2 326 (build-system python-build-system)
e877f4d0
JL		 327 (arguments
328 `(#:phases
329 (modify-phases %standard-phases
330 (add-before 'build 'fix-pillow
331 (lambda _
332 ;; pillow's version is not in PIL.Image.VERSION anymore
333 (substitute* "nml/version_info.py"
334 (("from PIL import Image") "import PIL")
335 (("Image.VERSION") "PIL.__version__"))
336 #t)))))
7357fcf2
KK		 337 (propagated-inputs
338 `(("python-pillow" ,python-pillow)
339 ("python-ply" ,python-ply)))
df0fd7bf 340 (home-page "https://dev.openttdcoop.org/projects/nml")
7357fcf2
KK		 341 (synopsis "NML compiler")
342 (description
a7cbe727 343 "@dfn{NewGRF Meta Language} (NML) is a python-based compiler, capable of
7357fcf2
KK		 344compiling NML files (along with their associated language, sound and graphic
345files) into @file{.grf} and/or @file{.nfo} files.")
346 (license license:gpl2+)))
347
45f8e7f7
KK		 348(define-public python-sge-pygame
349 (package
350 (name "python-sge-pygame")
b1d1a10c 351 (version "1.5.1")
45f8e7f7
KK		 352 (source
353 (origin
354 (method url-fetch)
7f652029
KK		 355 (uri (string-append "mirror://savannah/stellarengine/"
356 (version-major+minor version) "/sge-pygame-"
357 version ".tar.gz"))
358 (file-name (string-append name "-" version ".tar.gz"))
45f8e7f7
KK		 359 (sha256
360 (base32
b1d1a10c 361 "1rl3xjzh78sl0sq3xl8rl7cgp9v9v3h7s2pfwn7nj1vrmffzkcpd"))))
45f8e7f7
KK		 362 (build-system python-build-system)
363 (propagated-inputs
364 `(("python-pygame" ,python-pygame)
81353514
KK		 365 ("python-six" ,python-six)
366 ("python-uniseg" ,python-uniseg)))
45f8e7f7
KK		 367 (home-page "http://stellarengine.nongnu.org")
368 (synopsis "2D game engine for Python")
369 (description
370 "The SGE Game Engine (\"SGE\", pronounced like \"Sage\") is a
ffbe2dc1 371general-purpose 2D game engine. It takes care of several details for you so
45f8e7f7
KK		 372you can focus on the game itself. This makes more rapid game development
373possible, and it also makes the SGE easy to learn.")
374 (license license:lgpl3+)))
375
376(define-public python2-sge-pygame
377 (package-with-python2 python-sge-pygame))
378
1b775fd1
KK		 379(define-public python-tmx
380 (package
381 (name "python-tmx")
95c1324a 382 (version "1.10")
1b775fd1
KK		 383 (source
384 (origin
385 (method url-fetch)
be4d26f5
KK		 386 (uri (string-append "mirror://savannah/python-tmx/"
387 (version-major+minor version) "/tmx-"
1b775fd1
KK		 388 version ".tar.gz"))
389 (sha256
390 (base32
95c1324a 391 "073q0prg1nzlkga2b45vhscz374206qh4x68ccg00mxxwagn64z0"))))
1b775fd1
KK		 392 (build-system python-build-system)
393 (propagated-inputs
394 `(("python-six" ,python-six)))
395 (home-page "http://python-tmx.nongnu.org")
396 (synopsis "Python library for the @code{Tiled} TMX format")
397 (description
398 "Python TMX reads and writes the @code{Tiled} TMX format in a simple way.
399This is useful for map editors or generic level editors, and it's also useful
400for using a map editor or generic level editor like Tiled to edit your game's
401levels.")
402 (license (list license:asl2.0
403 ;; Documentation (only available in the source tarball) is
404 ;; under the CC0 license.
405 license:cc0))))
406
407(define-public python2-tmx
408 (let ((python2-tmx (package-with-python2 python-tmx)))
409 (package
410 (inherit python2-tmx)
411 (propagated-inputs
412 `(("python2-pathlib" ,python2-pathlib)
413 ,@(package-propagated-inputs python2-tmx))))))
414
e99039b5
KK		 415(define-public python-xsge
416 (package
417 (name "python-xsge")
6e92fba4 418 (version "2018.02.26")
e99039b5
KK		 419 (source (origin
420 (method url-fetch)
795f3a00 421 (uri (string-append "mirror://savannah/xsge/xsge/xsge-"
e99039b5
KK		 422 version ".tar.gz"))
423 (sha256
424 (base32
6e92fba4 425 "0bx93hgf7cgdw2gsygbh59y8vpw37pgsa279rajw3fkdpl8vrc40"))))
e99039b5
KK		 426 (build-system python-build-system)
427 (arguments
428 '(#:phases
429 (modify-phases %standard-phases
430 ;; xSGE's setup.py script does not support one of the Python build
431 ;; system's default flags, "--single-version-externally-managed".
432 (replace 'install
433 (lambda* (#:key outputs #:allow-other-keys)
6e92fba4
KK		 434 (invoke "python" "setup.py" "install"
435 (string-append "--prefix=" (assoc-ref outputs "out"))
436 "--root=/"))))
e99039b5
KK		 437 #:tests? #f)) ; no check target
438 (propagated-inputs
439 `(("python-sge-pygame" ,python-sge-pygame)
440 ("python-pygame" ,python-pygame)
441 ("python-six" ,python-six)
442 ("python-tmx" ,python-tmx)))
443 (home-page "http://xsge.nongnu.org")
444 (synopsis "Extensions for the SGE Game Engine")
445 (description
446 "xSGE is a collection of modules that make doing certain tasks with the SGE
447Game Engine easier. In addition to SGE's conveniences, the user has access to a
448GUI toolkit, lighting and physics frameworks and @code{Tiled} TMX format
449support.")
450 (license license:gpl3+)))
451
452(define-public python2-xsge
453 (package-with-python2 python-xsge))
454
b0910aad
DT		 455(define-public tiled
456 (package
457 (name "tiled")
b66f2211 458 (version "1.2.5")
b0910aad 459 (source (origin
902068b4
RW		 460 (method git-fetch)
461 (uri (git-reference
462 (url "https://github.com/bjorn/tiled.git")
463 (commit (string-append "v" version))))
464 (file-name (git-file-name name version))
b0910aad
DT		 465 (sha256
466 (base32
b66f2211 467 "14v2zfka2y3h0r0biw1rl59585lji5074x958s4xnb352jm5h9b9"))))
b0910aad 468 (build-system gnu-build-system)
864cc7ef
RW		 469 (inputs
470 `(("qtbase" ,qtbase)
471 ("qtsvg" ,qtsvg)
472 ("zlib" ,zlib)))
473 (native-inputs
474 `(("qttools" ,qttools)))
b0910aad
DT		 475 (arguments
476 '(#:phases
d06fc008
EF		 477 (modify-phases %standard-phases
478 (replace 'configure
864cc7ef
RW		 479 (lambda* (#:key inputs outputs #:allow-other-keys)
480 (substitute* "translations/translations.pro"
481 (("LRELEASE =.*")
482 (string-append "LRELEASE = "
483 (assoc-ref inputs "qttools")
484 "/bin/lrelease\n")))
d06fc008 485 (let ((out (assoc-ref outputs "out")))
9dafb647
KK		 486 (invoke "qmake"
487 (string-append "PREFIX=" out))))))))
88b028f3 488 (home-page "https://www.mapeditor.org/")
b0910aad
DT		 489 (synopsis "Tile map editor")
490 (description
491 "Tiled is a general purpose tile map editor. It is meant to be used for
492editing maps of any tile-based game, be it an RPG, a platformer or a Breakout
493clone.")
494
495 ;; As noted in 'COPYING', part of it is under GPLv2+, while the rest is
496 ;; under BSD-2.
497 (license license:gpl2+)))
5809ffcc
DT		 498
499(define-public sfml
500 (package
501 (name "sfml")
9ac59ad3 502 (version "2.5.1")
5809ffcc 503 (source (origin
95f6adae 504 (method git-fetch)
7d1b5022
RW		 505 ;; Do not fetch the archives from
506 ;; http://mirror0.sfml-dev.org/files/ because files there seem
507 ;; to be changed in place.
95f6adae
TGR		 508 (uri (git-reference
509 (url "https://github.com/SFML/SFML.git")
510 (commit version)))
511 (file-name (git-file-name name version))
5809ffcc
DT		 512 (sha256
513 (base32
9ac59ad3 514 "0abr8ri2ssfy9ylpgjrr43m6rhrjy03wbj9bn509zqymifvq5pay"))
67c127c9
MB		 515 (modules '((guix build utils)))
516 (snippet
517 '(begin
518 ;; Ensure system libraries are used.
519 (delete-file-recursively "extlibs")
520 #t))))
5809ffcc
DT		 521 (build-system cmake-build-system)
522 (arguments
a6e25a50 523 '(#:configure-flags
0bc27248
MB		 524 (list "-DSFML_INSTALL_PKGCONFIG_FILES=TRUE"
525 "-DSFML_OS_PKGCONFIG_DIR=lib/pkgconfig")
a6e25a50 526 #:tests? #f)) ; no tests
0bc27248
MB		 527 (native-inputs
528 `(("pkg-config" ,pkg-config)))
5809ffcc
DT		 529 (inputs
530 `(("mesa" ,mesa)
531 ("glew" ,glew)
532 ("libx11" ,libx11)
240f2785 533 ("xcb-util-image" ,xcb-util-image)
5809ffcc
DT		 534 ("libxrandr" ,libxrandr)
535 ("eudev" ,eudev)
4bd428a7 536 ("libjpeg" ,libjpeg-turbo)
67c127c9
MB		 537 ("libsndfile" ,libsndfile)
538 ("stb-image" ,stb-image)
539 ("stb-image-write" ,stb-image-write)))
0bc27248
MB		 540 (propagated-inputs
541 ;; In Requires.private of pkg-config files.
542 `(("flac" ,flac)
543 ("freetype" ,freetype)
544 ("libvorbis" ,libvorbis)
5809ffcc 545 ("openal" ,openal)))
167f0e82 546 (home-page "https://www.sfml-dev.org")
5809ffcc
DT		 547 (synopsis "Simple and Fast Multimedia Library")
548 (description
549 "SFML provides a simple interface to the various computer components,
550to ease the development of games and multimedia applications. It is composed
551of five modules: system, window, graphics, audio and network.")
552 (license license:zlib)))
d620ea88
DT		 553
554(define-public sfxr
555 (package
556 (name "sfxr")
557 (version "1.2.1")
558 (source (origin
559 (method url-fetch)
560 (uri (string-append "http://www.drpetter.se/files/sfxr-sdl-1.2.1.tar.gz"))
561 (sha256
562 (base32
563 "0dfqgid6wzzyyhc0ha94prxax59wx79hqr25r6if6by9cj4vx4ya"))))
564 (build-system gnu-build-system)
565 (arguments
566 `(#:phases (modify-phases %standard-phases
567 (delete 'configure) ; no configure script
568 (add-before 'build 'patch-makefile
569 (lambda* (#:key outputs #:allow-other-keys)
570 (let ((out (assoc-ref outputs "out")))
571 (substitute* "Makefile"
572 (("\\$\\(DESTDIR\\)/usr") out))
573 (substitute* "main.cpp"
574 (("/usr/share")
575 (string-append out "/share")))
576 #t))))
577 #:tests? #f)) ; no tests
578 (native-inputs
579 `(("pkg-config" ,pkg-config)
580 ("desktop-file-utils" ,desktop-file-utils)))
581 (inputs
582 `(("sdl" ,sdl)
583 ("gtk+" ,gtk+)))
584 (synopsis "Simple sound effect generator")
585 (description "Sfxr is a tool for quickly generating simple sound effects.
586Originally created for use in video game prototypes, it can generate random
587sounds from presets such as \"explosion\" or \"powerup\".")
588 (home-page "http://www.drpetter.se/project_sfxr.html")
589 (license license:expat)))
0f6139b1 590
540d41d8
TL		 591(define-public surgescript
592 (package
593 (name "surgescript")
594 (version "0.5.4.3")
595 (source
596 (origin
597 (method git-fetch)
598 (uri (git-reference
599 (url "https://github.com/alemart/surgescript.git")
600 (commit (string-append "v" version))))
601 (file-name (git-file-name name version))
602 (sha256
603 (base32 "13q81439zg1bn7gskligskjgcfq0rdapp6f3llmrlk48vnyq49s0"))))
604 (build-system cmake-build-system)
605 (arguments
606 '(#:configure-flags
607 (let ((share (string-append (assoc-ref %outputs "out") "/share")))
608 (list (string-append "-DICON_PATH=" share "/pixmaps")
609 (string-append "-DMETAINFO_PATH=" share "/metainfo")))
610 #:tests? #f))
611 (home-page "https://docs.opensurge2d.org")
612 (synopsis "Scripting language for games")
613 (description "@code{SurgeScript} is a dynamically typed object-oriented
614scripting language designed for games. Each object is a state machine that
615can be customized by attaching other objects. The language supports automatic
616garbage collection and can be extended with plugins.")
617 (license license:asl2.0)))
618
0f6139b1
AK		 619(define-public physfs
620 (package
621 (name "physfs")
d00a8b84 622 (version "3.0.2")
0f6139b1
AK		 623 (source (origin
624 (method url-fetch)
625 (uri (string-append
167f0e82 626 "https://icculus.org/physfs/downloads/physfs-"
0f6139b1
AK		 627 version ".tar.bz2"))
628 (file-name (string-append name "-" version ".tar.gz"))
629 (sha256
630 (base32
d00a8b84 631 "0qzqz4r88gvd8m7sh2z5hvqcr0jfr4wb2f77c19xycyn0rigfk9h"))))
0f6139b1
AK		 632 (build-system cmake-build-system)
633 (arguments
08e977d2
MB		 634 '(#:tests? #f ; no check target
635 #:phases (modify-phases %standard-phases
636 (add-after 'unpack 'patch-CMakeLists.txt
637 (lambda _
638 (substitute* "CMakeLists.txt"
639 ;; XXX: For some reason CMakeLists.txt disables
640 ;; RUNPATH manipulation when the compiler is GCC.
641 (("CMAKE_COMPILER_IS_GNUCC") "FALSE"))
642 #t)))))
0f6139b1
AK		 643 (inputs
644 `(("zlib" ,zlib)))
645 (native-inputs
646 `(("doxygen" ,doxygen)))
167f0e82 647 (home-page "https://icculus.org/physfs")
0f6139b1
AK		 648 (synopsis "File system abstraction library")
649 (description
650 "PhysicsFS is a library to provide abstract access to various archives.
651It is intended for use in video games. For security, no file writing done
652through the PhysicsFS API can leave a defined @emph{write directory}. For
653file reading, a @emph{search path} with archives and directories is defined,
654and it becomes a single, transparent hierarchical file system. So archive
655files can be accessed in the same way as you access files directly on a disk,
656and it makes it easy to ship a new archive that will override a previous
657archive on a per-file basis.")
658 (license license:zlib)))
83a4a70b
DT		 659
660(define-public love
661 (package
662 (name "love")
dd88c89e 663 (version "11.3")
83a4a70b
DT		 664 (source (origin
665 (method url-fetch)
666 (uri (string-append "https://bitbucket.org/rude/love/downloads/"
667 "love-" version "-linux-src.tar.gz"))
668 (sha256
669 (base32
dd88c89e 670 "0m8lvlabmcchskx4qpzkdlsm44360f3j0q3vvvj2388cfnvhv7v4"))))
83a4a70b
DT		 671 (build-system gnu-build-system)
672 (native-inputs
673 `(("pkg-config" ,pkg-config)))
674 (inputs
675 `(("devil" ,devil)
676 ("freetype" ,freetype)
677 ("libmodplug" ,libmodplug)
05d48c52 678 ("libtheora" ,libtheora)
83a4a70b
DT		 679 ("libvorbis" ,libvorbis)
680 ("luajit" ,luajit)
681 ("mesa" ,mesa)
682 ("mpg123" ,mpg123)
683 ("openal" ,openal)
684 ("physfs" ,physfs)
685 ("sdl2" ,sdl2)
686 ("zlib" ,zlib)))
687 (synopsis "2D game framework for Lua")
688 (description "LÖVE is a framework for making 2D games in the Lua
689programming language.")
690 (home-page "https://love2d.org/")
691 (license license:zlib)))
154f6156 692
328dd9b7
JC		 693(define-public love-nuklear
694 (let ((version "v2.6")
695 (commit "fef4e00a602efb16c57ae962850b6e7a01f7a29a"))
696 (package
697 (name "love-nuklear")
698 (version (git-version version "1" commit))
699 (source (origin
700 (method git-fetch)
701 (uri (git-reference
702 (url "https://github.com/keharriso/love-nuklear/")
703 (commit commit)
704 (recursive? #t)))
705 ;; NOTE: the HEAD of the Nuklear git-submodule is at commit
706 ;; "adc52d710fe3c87194b99f540c53e82eb75c2521" of Oct 1 2019
707 (file-name (git-file-name name version))
708 (sha256
709 (base32
710 "15qmy8mfwkxy2x9rmxs6f9cyvjvwwj6yf78bs863xmc56dmjzzbn"))))
711 (build-system cmake-build-system)
712 (arguments
713 `(#:build-type "Release"
714 #:tests? #f))
715 (inputs
716 `(("luajit" ,luajit)))
717 (synopsis "Lightweight immediate mode GUI for LÖVE games")
718 (description "LÖVE is a Lua framework for making 2D games. Nuklear
719is a minimal state immediate mode graphical user interface toolkit. This
720package is the Nuklear bindings for LÖVE created by Kevin Harrison.")
721 (home-page "https://github.com/keharriso/love-nuklear/")
722 (license license:expat))))
723
154f6156
DT		 724(define-public allegro-4
725 (package
726 (name "allegro")
b2cf5597 727 (version "4.4.3")
154f6156
DT		 728 (source (origin
729 (method url-fetch)
3a12e21c
EF		 730 (uri (string-append "https://github.com/liballeg/allegro5/"
731 "releases/download/" version "/allegro-"
732 version ".tar.gz"))
154f6156
DT		 733 (sha256
734 (base32
b2cf5597 735 "1d5ws3ihvpa6f4qc6a6drq31pajw6bblxifr4kcxzqj9br1nw28y"))))
154f6156
DT		 736 (build-system cmake-build-system)
737 (arguments
738 '(#:phases
739 (modify-phases %standard-phases
740 (add-after 'unpack 'patch-build-system
741 (lambda _
742 ;; Build addons as shared libraries. Trying to set ADDON_LINKAGE
743 ;; via a command line option doesn't work because it is
744 ;; unconditionally clobbered in the build script.
745 (substitute* '("CMakeLists.txt")
746 (("ADDON_LINKAGE STATIC")
747 "ADDON_LINKAGE SHARED"))
748 #t)))))
749 (inputs
750 `(("glu" ,glu)
751 ("libpng" ,libpng)
752 ("libvorbis" ,libvorbis)
753 ("mesa" ,mesa)
754 ("zlib" ,zlib)))
755 (synopsis "Game programming library")
756 (description "Allegro is a library mainly aimed at video game and
757multimedia programming. It handles common, low-level tasks such as creating
758windows, accepting user input, loading data, drawing images, playing sounds,
759etc.")
4968ea2c 760 (home-page "https://liballeg.org")
154f6156 761 (license license:giftware)))
2a068aec 762
19d311b4
RW		 763(define-public allegro
764 (package
765 (name "allegro")
49405aaf 766 (version "5.2.5.0")
19d311b4
RW		 767 (source (origin
768 (method url-fetch)
3a12e21c
EF		 769 (uri (string-append "https://github.com/liballeg/allegro5/releases"
770 "/download/" version "/allegro-"
b15a020d 771 version ".tar.gz"))
19d311b4
RW		 772 (sha256
773 (base32
49405aaf 774 "06dpkfnac8w3pq36834nn2iij3ajz6prladqd0w92lq39aiqv5jr"))))
19d311b4 775 (build-system cmake-build-system)
49405aaf 776 (arguments `(#:tests? #f)) ; there are no tests
19d311b4
RW		 777 (inputs
778 ;; FIXME: Add the following optional inputs: xinput2, opensl, dumb
779 `(("flac" ,flac)
780 ("freetype" ,freetype)
781 ("glu" ,glu)
782 ("gtk" ,gtk+-2)
4bd428a7 783 ("libjpeg" ,libjpeg-turbo)
19d311b4
RW		 784 ("libpng" ,libpng)
785 ("libtheora" ,libtheora)
786 ("libvorbis" ,libvorbis)
787 ("libxcursor" ,libxcursor)
788 ("libxinerama" ,libxinerama)
789 ("libxrandr" ,libxrandr)
790 ("mesa" ,mesa)
791 ("openal" ,openal)
792 ("physfs" ,physfs)
793 ("zlib" ,zlib)))
794 (native-inputs
795 `(("pkg-config" ,pkg-config)))
796 (synopsis "Game programming library")
797 (description "Allegro is a library mainly aimed at video game and
798multimedia programming. It handles common, low-level tasks such as creating
799windows, accepting user input, loading data, drawing images, playing sounds,
800etc.")
4968ea2c 801 (home-page "https://liballeg.org")
19d311b4
RW		 802 (license license:bsd-3)))
803
cdf8f391
RW		 804(define-public allegro-5.0
805 (package (inherit allegro)
806 (name "allegro")
807 (version "5.0.11")
808 (source (origin
809 (method url-fetch)
3a12e21c
EF		 810 (uri (string-append "https://github.com/liballeg/allegro5/releases"
811 "/download/" version "/allegro-"
812 (if (equal? "0" (string-take-right version 1))
813 (string-drop-right version 2)
814 version)
815 ".tar.gz"))
0109b89c
EF		 816 (patches (search-patches
817 "allegro-mesa-18.2.5-and-later.patch"))
cdf8f391
RW		 818 (sha256
819 (base32
820 "0cd51qrh97jrr0xdmnivqgwljpmizg8pixsgvc4blqqlaz4i9zj9"))))))
821
2a068aec
DT		 822(define-public aseprite
823 (package
824 (name "aseprite")
82654d95 825 (version "1.1.7") ; After 1.1.7 the source is no longer distributed under the GPL.
ff4dc16e 826 ;; TODO: Unbundle third party software.
2a068aec 827 (source (origin
ff4dc16e
MB		 828 (method url-fetch/zipbomb)
829 (uri (string-append "https://github.com/aseprite/aseprite"
830 "/releases/download/v" version
831 "/Aseprite-v" version "-Source.zip"))
2a068aec
DT		 832 (sha256
833 (base32
82654d95 834 "1plss4i1lfxcznv9p0pip1bkhj7ipw7jlhsh5avd6dzw079l4nvv"))))
2a068aec
DT		 835 (build-system cmake-build-system)
836 (arguments
837 '(#:configure-flags
838 ;; Use shared libraries instead of building bundled source.
839 (list "-DWITH_WEBP_SUPPORT=1"
840 "-DUSE_SHARED_CURL=1"
841 "-DUSE_SHARED_GIFLIB=1"
842 "-DUSE_SHARED_JPEGLIB=1"
843 "-DUSE_SHARED_ZLIB=1"
844 "-DUSE_SHARED_LIBPNG=1"
845 "-DUSE_SHARED_LIBLOADPNG=1"
846 "-DUSE_SHARED_LIBWEBP=1"
847 "-DUSE_SHARED_TINYXML=1"
848 "-DUSE_SHARED_PIXMAN=1"
849 "-DUSE_SHARED_FREETYPE=1"
850 "-DUSE_SHARED_ALLEGRO4=1"
851 "-DENABLE_UPDATER=0" ; no auto-updates
852 (string-append "-DFREETYPE_INCLUDE_DIR="
853 (assoc-ref %build-inputs "freetype")
de1d68a2 854 "/include/freetype2"))))
2a068aec
DT		 855 (native-inputs
856 `(("pkg-config" ,pkg-config)))
857 ;; TODO: Use a patched Allegro 4 that supports window resizing. This
858 ;; patched version is bundled with Aseprite, but the patches should be
859 ;; extracted and applied on top of a standalone Allegro 4 package.
860 (inputs
861 `(("allegro" ,allegro-4)
862 ("curl" ,curl)
863 ("freetype" ,freetype)
864 ("giflib" ,giflib)
4bd428a7 865 ("libjpeg" ,libjpeg-turbo)
2a068aec
DT		 866 ("libpng" ,libpng)
867 ("libwebp" ,libwebp)
868 ("libx11" ,libx11)
869 ("libxext" ,libxext)
870 ("libxxf86vm" ,libxxf86vm)
871 ("pixman" ,pixman)
872 ("tinyxml" ,tinyxml)
873 ("zlib" ,zlib)))
874 (synopsis "Animated sprite editor and pixel art tool")
875 (description "Aseprite is a tool for creating 2D pixel art for video
876games. In addition to basic pixel editing features, Aseprite can assist in
877the creation of animations, tiled graphics, texture atlases, and more.")
167f0e82 878 (home-page "https://www.aseprite.org/")
2a068aec 879 (license license:gpl2+)))
966dff3b
KY		 880
881(define-public qqwing
882 (package
883 (name "qqwing")
884 (version "1.3.4")
885 (source (origin
886 (method url-fetch)
887 (uri (string-append
888 "https://qqwing.com/"
889 name "-" version ".tar.gz"))
890 (sha256
891 (base32
892 "0bw0papyqjg22z6irf36gs54y8236wa37b6gyn2h1spy65n76lqp"))))
893 (build-system gnu-build-system)
894 (native-inputs
895 `(("pkg-config" ,pkg-config)))
896 (home-page "https://qqwing.com/")
897 (synopsis "Sudoku puzzle solver and generator")
898 (description
899 "QQWing is a Sudoku puzzle generator and solver.
900It offers the following features:
901@enumerate
902@item Can solve 1000 puzzles in 1 second and generate 1000 puzzles in 25 seconds.
903@item Uses logic. Uses as many solve techniques as possible when solving
904 puzzles rather than guessing.
905@item Rates puzzles. Most generators don't give an indication of the difficulty
906 of a Sudoku puzzle. QQwing does.
907@item Can print solve instructions for any puzzle.
908@item Customizable output style, including a CSV style that is easy to
909 import into a database.
910@end enumerate")
911 (license license:gpl2+)))
d2cc38b7
KK		 912
913(define-public quesoglc
914 (package
915 (name "quesoglc")
916 (version "0.7.2")
917 (source (origin
918 (method url-fetch)
919 (uri (string-append "mirror://sourceforge/" name "/" version "/"
920 name "-" version "-free.tar.bz2"))
921 (sha256
922 (base32
923 "08ddhywdy2qg17m592ng3yr0p1ih96irg8wg729g75hsxxq9ipks"))))
924 (build-system gnu-build-system)
925 (native-inputs `(("pkg-config" ,pkg-config)))
926 (inputs `(("fontconfig" ,fontconfig)
927 ("freeglute" ,freeglut)
928 ("fribidi" ,fribidi)
929 ("glew" ,glew)))
930 (home-page "http://quesoglc.sourceforge.net")
931 (synopsis "Implementation of the OpenGL Character Renderer (GLC)")
932 (description
933 "The OpenGL Character Renderer (GLC) is a state machine that provides
934OpenGL programs with character rendering services via an application programming
935interface (API).")
936 (license (list license:expat license:lgpl2.1+))))
4bc37bf0
KK		 937
938(define-public python-pygame
939 (package
940 (name "python-pygame")
a9db93c1 941 (version "1.9.4")
4bc37bf0
KK		 942 (source (origin
943 (method url-fetch)
052f75da 944 (uri (pypi-uri "pygame" version))
4bc37bf0
KK		 945 (sha256
946 (base32
a9db93c1 947 "1dn0nb86jl7yr8709cncxdr0yrmviqakw7zx3g8jbbwrr60if3bh"))))
4bc37bf0
KK		 948 (build-system python-build-system)
949 (arguments
a9db93c1 950 `(#:tests? #f ; tests require pygame to be installed first
4bc37bf0
KK		 951 #:phases
952 (modify-phases %standard-phases
953 ;; Set the paths to the dependencies manually because
954 ;; the configure script does not allow passing them as
955 ;; parameters. This also means we can skip the configure
956 ;; phase.
957 (add-before 'build 'set-library-paths
958 (lambda* (#:key inputs outputs #:allow-other-keys)
959 (let ((sdl-ref (assoc-ref inputs "sdl"))
960 (font-ref (assoc-ref inputs "sdl-ttf"))
961 (image-ref (assoc-ref inputs "sdl-image"))
962 (mixer-ref (assoc-ref inputs "sdl-mixer"))
963 (smpeg-ref (assoc-ref inputs "libsmpeg"))
964 (png-ref (assoc-ref inputs "libpng"))
965 (jpeg-ref (assoc-ref inputs "libjpeg"))
052f75da 966 (freetype-ref (assoc-ref inputs "freetype"))
4bc37bf0
KK		 967 (v4l-ref (assoc-ref inputs "v4l-utils"))
968 (out-ref (assoc-ref outputs "out")))
969 (substitute* "Setup.in"
970 (("SDL = -I/usr/include/SDL")
971 (string-append "SDL = -I" sdl-ref "/include/SDL -I.")))
972 (substitute* "Setup.in"
973 (("FONT = -lSDL_ttf")
974 (string-append "FONT = -I" font-ref "/include/SDL -L"
a9db93c1 975 font-ref "/lib -lSDL_ttf")))
4bc37bf0
KK		 976 (substitute* "Setup.in"
977 (("IMAGE = -lSDL_image")
978 (string-append "IMAGE = -I" image-ref "/include/SDL -L"
a9db93c1 979 image-ref "/lib -lSDL_image")))
4bc37bf0
KK		 980 (substitute* "Setup.in"
981 (("MIXER = -lSDL_mixer")
982 (string-append "MIXER = -I" mixer-ref "/include/SDL -L"
a9db93c1 983 mixer-ref "/lib -lSDL_mixer")))
4bc37bf0
KK		 984 (substitute* "Setup.in"
985 (("SMPEG = -lsmpeg")
986 (string-append "SMPEG = -I" smpeg-ref "/include/smpeg -L"
a9db93c1 987 smpeg-ref "/lib -lsmpeg")))
4bc37bf0
KK		 988 (substitute* "Setup.in"
989 (("PNG = -lpng")
990 (string-append "PNG = -I" png-ref "/include -L"
a9db93c1 991 png-ref "/lib -lpng")))
4bc37bf0
KK		 992 (substitute* "Setup.in"
993 (("JPEG = -ljpeg")
994 (string-append "JPEG = -I" jpeg-ref "/include -L"
995 jpeg-ref "/lib -ljpeg")))
052f75da
DM		 996
997 (substitute* "Setup.in"
998 (("FREETYPE = -lfreetype")
999 (string-append "FREETYPE = -I" freetype-ref "/include/freetype2 -L"
1000 freetype-ref "/lib -lfreetype")))
1001
4bc37bf0
KK		 1002 (substitute* "Setup.in"
1003 (("^pypm") "#pypm"))
4bc37bf0
KK		 1004 ;; Create a path to a header file provided by v4l-utils.
1005 (system* "mkdir" "linux")
1006 (system* "ln" "--symbolic"
1007 (string-append v4l-ref "/include/libv4l1-videodev.h")
1008 "linux/videodev.h")
1009 (system* "ln" "--symbolic" "Setup.in" "Setup")))))))
4bc37bf0 1010 (inputs
052f75da
DM		 1011 `(("freetype" ,freetype)
1012 ("sdl" ,sdl)
4bc37bf0
KK		 1013 ("sdl-image" ,sdl-image)
1014 ("sdl-mixer" ,sdl-mixer)
1015 ("sdl-ttf" ,sdl-ttf)
1016 ("sdl-gfx" ,sdl-gfx)
4bd428a7 1017 ("libjpeg" ,libjpeg-turbo)
4bc37bf0
KK		 1018 ("libpng" ,libpng)
1019 ("libX11" ,libx11)
1020 ("libsmpeg" ,libsmpeg)
1021 ("portmidi" ,portmidi)
1022 ("v4l-utils" ,v4l-utils)))
167f0e82 1023 (home-page "https://www.pygame.org")
4bc37bf0
KK		 1024 (synopsis "SDL wrapper for Python")
1025 (description "Pygame is a set of Python modules designed for writing games.
1026Pygame adds functionality on top of the excellent SDL library. This allows you
1027to create fully featured games and multimedia programs in the python language.")
1028 (license (list license:bsd-2
1029 ;; python numeric license as listed by Debian looks like
1030 ;; an Expat-style license with a warranty disclaimer for
1031 ;; the U.S. government and the University of California.
1032 license:expat
1033 license:lgpl2.0+
1034 license:lgpl2.1+
1035 license:gpl3+
1036 license:psfl
1037 license:public-domain
1038 license:lgpl2.1+))))
052f75da
DM		 1039
1040(define-public python2-pygame
1041 (package-with-python2 python-pygame))
68c6110c 1042
8476e585
CY		 1043(define-public python2-pygame-sdl2
1044 (let ((real-version "2.1.0")
1045 (renpy-version "7.3.5"))
1046 (package
1047 (inherit python2-pygame)
1048 (name "python2-pygame-sdl2")
1049 (version (string-append real-version "-for-renpy-" renpy-version))
1050 (source
1051 (origin
1052 (method url-fetch)
1053 (uri (string-append "https://www.renpy.org/dl/" renpy-version
1054 "/pygame_sdl2-" version ".tar.gz"))
1055 (sha256 (base32 "1bmr7j9mlsc4czpgw70ld15ymyp4wxrk9hdsqad40wjwdxvvg2dr"))))
1056 (build-system python-build-system)
1057 (arguments
1058 `(#:tests? #f ; tests require pygame to be installed first
1059 #:python ,python-2
1060 #:phases
1061 (modify-phases %standard-phases
1062 (add-after 'set-paths 'set-sdl-vars
1063 (lambda* (#:key inputs #:allow-other-keys)
1064 (setenv "PYGAME_SDL2_CFLAGS"
1065 (string-append "-I"
1066 (assoc-ref inputs "sdl-union")
1067 "/include/SDL2 -D_REENTRANT"))
1068 (setenv "PYGAME_SDL2_LDFLAGS"
1069 (string-append "-L"
1070 (assoc-ref inputs "sdl-union")
1071 "/lib -Wl,-rpath,"
1072 (assoc-ref inputs "sdl-union")
1073 "/lib -Wl,--enable-new-dtags -lSDL2"))
1074 #t))
1075 (add-before 'build 'drop-generated-files
1076 (lambda args
1077 (delete-file-recursively "gen")
1078 (delete-file-recursively "gen3")
1079 #t)))))
1080 (inputs
1081 `(("sdl-union"
1082 ,(sdl-union (list sdl2 sdl2-image sdl2-mixer sdl2-ttf)))))
1083 (native-inputs
1084 `(("python2-cython" ,python2-cython)))
1085 (home-page "http://www.renpy.org/")
1086 (synopsis "Reimplementation of the Pygame API using SDL2")
1087 (description "Pygame_SDL2 reimplements the Pygame API using SDL2,
1088staying close to the original, but also adding some SDL2-specific features.
1089While it aims to be used as a drop-in replacement, it appears to be
1090developed mainly for Ren'py.")
1091 (license (list license:lgpl2.1 license:zlib)))))
1092
1093(define-public python2-renpy
1094 (package
1095 (name "python2-renpy")
1096 (version "7.3.5")
1097 (source
1098 (origin
1099 (method url-fetch)
1100 (uri (string-append "https://www.renpy.org/dl/" version
1101 "/renpy-" version "-source.tar.bz2"))
1102 (sha256 (base32 "1anr5cfbvbsbik4v4rvrkdkciwhg700k4lydfbs4n85raimz9mw4"))))
1103 (build-system python-build-system)
1104 (arguments
1105 `(#:tests? #f ; Ren'py doesn't seem to package tests
1106 #:python ,python-2
1107 #:phases
1108 (modify-phases %standard-phases
1109 (add-after 'unpack 'fix-commands
1110 (lambda _
1111 (substitute* "renpy/editor.py"
1112 (("xdg-open")
1113 (which "xdg-open")))
1114 #t))
1115 (add-after 'set-paths 'set-build-vars
1116 (lambda* (#:key inputs #:allow-other-keys)
1117 (setenv "RENPY_CYTHON"
1118 (string-append (assoc-ref inputs "python2-cython")
1119 "/bin/cython"))
1120 (setenv "RENPY_DEPS_INSTALL" (string-join (map cdr inputs) ":"))
1121 #t))
1122 (replace 'build
37c52b5b
LP		 1123 (lambda* (#:key inputs outputs #:allow-other-keys #:rest args)
1124 ;; The "module" subdirectory contains a python (really cython)
1125 ;; project, which is built using a script, that is thankfully
1126 ;; named "setup.py".
1127 (with-directory-excursion "module"
1128 (apply (assoc-ref %standard-phases 'build) args))
1129 ;; the above causes renpy.__init__ to be compiled but does not
1130 ;; compile anything else, hence we do that here
1131 (delete-file "renpy/__init__.pyc")
1132 (invoke "python" "-m" "compileall" "renpy")
8476e585
CY		 1133 #t))
1134 (replace 'install
37c52b5b
LP		 1135 (lambda* (#:key inputs outputs #:allow-other-keys #:rest args)
1136 ;; Again, we have to wrap the module installation.
1137 ;; Additionally, we want to install the python code
1138 ;; (both source and compiled) in the same directory.
1139 (let* ((out (assoc-ref outputs "out"))
1140 (site (string-append "/lib/python"
1141 ,(version-major+minor
1142 (package-version python-2))
1143 "/site-packages")))
1144 (with-directory-excursion "module"
1145 (apply (assoc-ref %standard-phases 'install) args))
1146 (copy-recursively "renpy"
1147 (string-append out site "/renpy")))
8476e585
CY		 1148 #t)))))
1149 (inputs
1150 `(("ffmpeg" ,ffmpeg)
1151 ("freetype" ,freetype)
1152 ("glew" ,glew)
1153 ("libpng" ,libpng)
1154 ("python2-pygame" ,python2-pygame-sdl2)
1155 ("sdl-union"
1156 ,(sdl-union (list sdl2 sdl2-image sdl2-mixer sdl2-ttf)))))
1157 (native-inputs
1158 `(("python2-cython" ,python2-cython)
1159 ("xdg-utils" ,xdg-utils)))
1160 (home-page "http://www.renpy.org/")
1161 (synopsis "Ren'py python module")
1162 (description "This package contains the shared libraries and Python
1163modules of Ren'py.")
1164 (license license:expat)))
1165
1166(define-public renpy
1167 (package
1168 (inherit python2-renpy)
1169 (name "renpy")
1170 (version "7.3.5")
1171 (build-system python-build-system)
1172 (arguments
1173 `(#:tests? #f ; see python2-renpy
1174 #:python ,python-2
1175 #:phases
1176 (modify-phases %standard-phases
1177 (add-after 'unpack 'fix-commands
1178 (lambda* (#:key outputs #:allow-other-keys)
1179 (substitute* "launcher/game/choose_directory.rpy"
1180 (("/usr/bin/python") (which "python2")))
1181 (substitute* "launcher/game/front_page.rpy"
1182 (("xdg-open")
1183 (which "xdg-open")))
1184 (substitute* "launcher/game/project.rpy"
1185 (("cmd = \\[ executable, \"-EO\", sys.argv\\[0\\] \\]")
1186 (string-append "cmd = [ \"" (assoc-ref outputs "out")
1187 "/bin/renpy\" ]"))
1188 ;; Projects are still created in the usual style, so we need
1189 ;; to adjust the path.
1190 (("cmd.append\\(self.path\\)")
1191 "cmd.append(self.path + \"/game\")"))
1192 #t))
1193 (add-after 'unpack 'drop-game-from-paths
1194 (lambda _
1195 (substitute* (list "launcher/game/gui7.rpy"
1196 "launcher/game/gui7/images.py")
1197 ((", \"game\",") ","))
1198 #t))
1199 (add-before 'build 'start-xserver
1200 (lambda* (#:key inputs #:allow-other-keys)
1201 (let ((xorg-server (assoc-ref inputs "xorg-server")))
1202 (setenv "HOME" (getcwd))
1203 (system (format #f "~a/bin/Xvfb :1 &" xorg-server))
1204 (setenv "DISPLAY" ":1")
1205 #t)))
1206 (replace 'build
1207 (lambda _
1208 (invoke "python" "renpy.py" "launcher" "quit")
1209 (invoke "python" "renpy.py" "the_question" "quit")
1210 (invoke "python" "renpy.py" "tutorial" "quit")
1211 #t))
1212 (replace 'install
1213 (lambda* (#:key inputs outputs #:allow-other-keys)
1214 ;; Here we install our custom renpy program.
1215 ;; After finishing this step, "out" will have the following:
1216 ;; |-- bin/renpy
1217 ;; `-- share/renpy ; i.e. path_to_renpy_base()
1218 ;; `-- common
1219 ;;
1220 ;; Note that common is also a de facto unused directory in
1221 ;; python2-renpy. On other systems, renpy_base would point to
1222 ;; site-packages or even somewhere in /opt.
1223 ;; The former approach is not as straightforward as it seems
1224 ;; -- it causes renpy to load files twice for some weird reason --
1225 ;; and the latter is impossible on Guix. Hence the detour through
1226 ;; share/renpy and the custom renpy program.
1227 ;;
1228 ;; As a convention, other games should be installed as
1229 ;; subdirectories of share/renpy in their respective outputs as
1230 ;; well. This differs from the traditional layout, which is
1231 ;; roughly the following:
1232 ;; `-- Super Awesome Game
1233 ;; |-- game ; <- the folder we actually want
1234 ;; |-- lib ; compiled renpy module and dependencies
1235 ;; |-- renpy ; Ren'py python code (source + compiled)
1236 ;; |-- Super Awesome Game.py
1237 ;; `-- Super Awesome Game.sh
1238 (let* ((out (assoc-ref outputs "out"))
1239 (bin/renpy (string-append out "/bin/renpy")))
1240 (mkdir-p (string-append out "/bin"))
1241 (copy-recursively "renpy/common"
1242 (string-append out "/share/renpy/common"))
1243 (copy-recursively "gui"
1244 (string-append out "/share/renpy/gui"))
1245
1246 (call-with-output-file bin/renpy
1247 (lambda (port)
1248 (format port "#!~a~%" (which "python2"))
1249 (format port "
1250from __future__ import print_function
1251
1252import os
1253import sys
1254import warnings
1255
1256def path_to_common(renpy_base):
1257 return renpy_base + \"/common\"
1258
1259def path_to_saves(gamedir, save_directory=None):
1260 import renpy # @UnresolvedImport
1261
1262 if save_directory is None:
1263 save_directory = renpy.config.save_directory
1264 save_directory = renpy.exports.fsencode(save_directory)
1265
1266 if not save_directory:
1267 return gamedir + \"/saves\"
1268
1269 return os.path.expanduser(\"~~/.renpy/\" + save_directory)
1270
1271def path_to_renpy_base():
1272 return \"~a\"
1273
1274def main():
1275 renpy_base = path_to_renpy_base()
1276 try:
1277 import renpy.bootstrap
1278 import renpy.arguments
1279 except ImportError:
1280 print(\"\"\"Could not import renpy.bootstrap.
1281Please ensure you decompressed Ren'Py correctly, preserving the directory
1282structure.\"\"\", file=sys.stderr)
1283 raise
1284
1285 args = renpy.arguments.bootstrap()
1286 if not args.basedir:
1287 print(\"\"\"This Ren'py requires a basedir to launch.
1288The basedir is the directory, in which .rpy files live -- usually the 'game'
1289subdirectory of a game packaged by Ren'py.
1290
1291If you want the Ren'py launcher, use renpy-launcher instead.\"\"\",
1292 file=sys.stderr)
1293 sys.exit()
1294
1295 renpy.bootstrap.bootstrap(renpy_base)
1296
1297if __name__ == \"__main__\":
1298 main()
1299"
1300 (string-append out "/share/renpy"))))
1301 (chmod bin/renpy #o755)
1302 #t)))
1303
1304 (add-after 'install 'install-games
1305 (lambda* (#:key outputs #:allow-other-keys)
1306 (define renpy (assoc-ref outputs "out"))
1307 ;; TODO: We should offer a renpy-build-system to make the
1308 ;; installation of Ren'py games easier.
1309 (define* (install-renpy-game #:key output game name (renpy renpy)
1310 #:allow-other-keys)
1311 (let* ((name (or name (basename game)))
1312 (launcher (string-append output "/bin/renpy-" name))
1313 (share (string-append output "/share/renpy/" name)))
1314 (copy-recursively (string-append game "/game") share)
1315 (mkdir-p (string-append output "/bin"))
1316 (with-output-to-file launcher
1317 (lambda ()
1318 (format #t
1319 "#!~a~%~a ~a \"$@\""
1320 (which "bash")
1321 (string-append renpy "/bin/renpy")
1322 share)))
1323 (chmod launcher #o755)))
1324
1325 (install-renpy-game #:output (assoc-ref outputs "out")
1326 #:game "launcher")
1327
1328 (install-renpy-game #:output (assoc-ref outputs "the-question")
1329 #:game "the_question"
1330 #:name "the-question")
1331
1332 (install-renpy-game #:output (assoc-ref outputs "tutorial")
1333 #:game "tutorial")
1334 #t))
1335 (replace 'wrap
1336 (lambda* (#:key inputs outputs #:allow-other-keys)
1337 (wrap-program (string-append (assoc-ref outputs "out")
1338 "/bin/renpy")
1339 `("PYTHONPATH" = (,(getenv "PYTHONPATH"))))
1340 #t)))))
1341 (inputs
1342 `(("python2-tkinter" ,python-2 "tk")
1343 ("python2-pygame" ,python2-pygame-sdl2)
1344 ("python2-renpy" ,python2-renpy)
1345 ("xorg-server" ,xorg-server)))
1346 (outputs
1347 (list "out" "tutorial" "the-question"))
1348 (home-page "http://www.renpy.org/")
1349 (synopsis "Visual Novel Engine")
1350 (description "Ren'Py is a visual novel engine that helps you use words,
1351images, and sounds to tell interactive stories that run on computers and
1352mobile devices. These can be both visual novels and life simulation games.
1353The easy to learn script language allows anyone to efficiently write large
1354visual novels, while its Python scripting is enough for complex simulation
1355games.")
1356 (license license:expat)))
1357
68c6110c
DT		 1358(define-public grafx2
1359 (package
1360 (name "grafx2")
1361 (version "2.4")
1362 (source (origin
1363 (method url-fetch)
1364 ;; XXX: There is no URL that contains the version. :(
1365 (uri "http://pulkomandy.tk/projects/GrafX2/downloads/21")
1366 (sha256
1367 (base32
1368 "0svsy6rqmdj11b400c242i2ixihyz0hds0dgicqz6g6dcgmcl62q"))))
1369 (build-system gnu-build-system)
1370 (arguments
1371 '(#:phases
1372 (modify-phases %standard-phases
1373 (delete 'configure) ; no configure script
1374 (add-before 'build 'change-to-src-directory
1375 (lambda _
1376 (chdir "src")
1377 #t)))
1378 #:make-flags
1379 ;; SDL header files are referenced without the preceeding "SDL/".
1380 (list (string-append "CFLAGS=-I"
1381 (assoc-ref %build-inputs "sdl-union")
1382 "/include/SDL")
1383 (string-append "prefix="
1384 (assoc-ref %outputs "out")))
1385 #:tests? #f)) ; no check target
1386 (native-inputs
1387 `(("pkg-config" ,pkg-config)))
1388 (inputs
1389 `(("libpng" ,libpng)
1390 ("lua" ,lua-5.1)
1391 ("sdl-union" ,(sdl-union (list sdl sdl-image sdl-ttf)))))
1392 (synopsis "Bitmap paint program")
1393 (description "GrafX2 is a bitmap paint program inspired by the Amiga
7432d3ae 1394programs Deluxe Paint and Brilliance. Specializing in 256-color drawing, it
68c6110c
DT		 1395includes a very large number of tools and effects that make it particularly
1396suitable for pixel art, game graphics, and generally any detailed graphics
1397painted with a mouse.")
1398 (home-page "http://pulkomandy.tk/projects/GrafX2")
1399 (license license:gpl2))) ; GPLv2 only
c608fe8c
MR		 1400
1401(define-public ois
1402 (package
1403 (name "ois")
006345c1 1404 (version "1.5")
c608fe8c
MR		 1405 (source
1406 (origin
c608fe8c
MR		 1407 (method git-fetch)
1408 (uri (git-reference
1409 (url "https://github.com/wgois/OIS.git")
006345c1
TGR		 1410 (commit (string-append "v" version))))
1411 (file-name (git-file-name name version))
c608fe8c 1412 (sha256
006345c1
TGR		 1413 (base32 "0g8krgq5bdx2rw7ig0xva4kqv4x815672i7z6lljp3n8847wmypa"))))
1414 (build-system cmake-build-system)
1415 (arguments
1416 `(#:tests? #f)) ; no test suite
c608fe8c 1417 (inputs
006345c1 1418 `(("libx11" ,libx11)))
c608fe8c
MR		 1419 (synopsis "Object Oriented Input System")
1420 (description
1421 "Cross Platform Object Oriented Input Lib System is a cross platform,
1422simple solution for using all kinds of Input Devices (Keyboards, Mice,
1423Joysticks, etc) and feedback devices (e.g. force feedback). Meant to be very
1424robust and compatible with many systems and operating systems.")
1425 (home-page "https://github.com/wgois/OIS")
1426 (license license:zlib)))
42d0d13d
MR		 1427
1428(define-public mygui
1429 (package
1430 (name "mygui")
1431 (version "3.2.2")
1432 (source
1433 (origin
47f4d5d3
PN		 1434 (method git-fetch)
1435 (uri (git-reference
1436 (url "https://github.com/MyGUI/mygui")
1437 (commit (string-append "MyGUI" version))))
1438 (file-name (git-file-name name version))
42d0d13d
MR		 1439 (sha256
1440 (base32
47f4d5d3 1441 "1wk7jmwm55rhlqqcyvqsxdmwvl70bysl9azh4kd9n57qlmgk3zmw"))))
42d0d13d
MR		 1442 (build-system cmake-build-system)
1443 (arguments
1444 '(#:tests? #f ; No test target
1445 #:configure-flags
1446 (list "-DMYGUI_INSTALL_DOCS=TRUE"
1447 (string-append "-DOGRE_INCLUDE_DIR="
1448 (assoc-ref %build-inputs "ogre")
47f4d5d3
PN		 1449 "/include/OGRE")
1450 ;; Demos and tools are Windows-specific:
1451 ;; https://github.com/MyGUI/mygui/issues/24.
1452 "-DMYGUI_BUILD_DEMOS=FALSE"
1453 "-DMYGUI_BUILD_TOOLS=FALSE")))
42d0d13d
MR		 1454 (native-inputs
1455 `(("boost" ,boost)
1456 ("doxygen" ,doxygen)
1457 ("pkg-config" ,pkg-config)))
1458 (inputs
1459 `(("font-dejavu" ,font-dejavu)
1460 ("freetype" ,freetype)
1461 ("graphviz" ,graphviz)
1462 ("libx11" ,libx11)
1463 ("ogre" ,ogre)
1464 ("ois" ,ois)))
1465 (synopsis "Fast, flexible and simple GUI")
1466 (description
1467 "MyGUI is a library for creating Graphical User Interfaces (GUIs) for games
1468and 3D applications. The main goals of mygui are: speed, flexibility and ease
1469of use.")
1470 (home-page "http://mygui.info/")
1471 (license license:expat)))
e9a599cd 1472
9fd50db3
PN		 1473(define-public mygui-gl
1474 ;; Closure size is reduced by some 800 MiB.
1475 (package
1476 (inherit mygui)
1477 (name "mygui-gl")
1478 (version "3.2.2")
1479 (arguments
1480 (substitute-keyword-arguments (package-arguments mygui)
1481 ((#:configure-flags _)
1482 `(cons* "-DMYGUI_RENDERSYSTEM=4" ; 3 is Ogre, 4 is OpenGL.
1483 ;; We can't reuse the flags because of the mention to Ogre.
1484 (list "-DMYGUI_INSTALL_DOCS=TRUE"
1485 ;; Demos and tools are Windows-specific:
1486 ;; https://github.com/MyGUI/mygui/issues/24.
1487 "-DMYGUI_BUILD_DEMOS=FALSE"
1488 "-DMYGUI_BUILD_TOOLS=FALSE")))))
1489 (inputs
1490 `(("mesa" ,mesa)
1491 ("glu" ,glu)
1492 ,@(fold alist-delete (package-inputs mygui)
1493 '("ogre"))))
1494 (synopsis "Fast, flexible and simple GUI (OpenGL backend)")))
1495
e9a599cd
MR		 1496(define-public openmw
1497 (package
1498 (name "openmw")
6bc30a57 1499 (version "0.45.0")
e9a599cd
MR		 1500 (source
1501 (origin
8b1f8f64
AK		 1502 (method url-fetch)
1503 (uri
1504 (string-append "https://github.com/OpenMW/openmw/archive/"
37bf216d 1505 "openmw-" version ".tar.gz"))
e9a599cd
MR		 1506 (sha256
1507 (base32
6bc30a57 1508 "0r0wgvv1faan8z8lbply8lks4hcnppifjrcz04l5zvq6yiqzjg5n"))))
e9a599cd
MR		 1509 (build-system cmake-build-system)
1510 (arguments
1511 `(#:tests? #f ; No test target
1512 #:configure-flags
1513 (list "-DDESIRED_QT_VERSION=5")))
1514 (native-inputs
1515 `(("boost" ,boost)
1516 ("doxygen" ,doxygen)
1517 ("pkg-config" ,pkg-config)))
1518 (inputs
1519 `(("bullet" ,bullet)
1520 ("ffmpeg" ,ffmpeg)
1521 ("libxt" ,libxt)
0655c16e 1522 ("mygui" ,mygui-gl) ; OpenMW does not need Ogre.
e9a599cd 1523 ("openal" ,openal)
f95ec65b 1524 ("openscenegraph" ,openmw-openscenegraph)
e9a599cd
MR		 1525 ("qtbase" ,qtbase)
1526 ("sdl" ,sdl2)
1527 ("unshield" ,unshield)))
5a80c15c 1528 (synopsis "Re-implementation of the RPG Morrowind engine")
e9a599cd 1529 (description
5a80c15c
RW		 1530 "OpenMW is a game engine which reimplements and extends the one that runs
1531the 2002 open-world RPG Morrowind. The engine comes with its own editor,
1532called OpenMW-CS which allows the user to edit or create their own original
1533games.")
e9a599cd 1534 (home-page "https://openmw.org")
8b1f8f64 1535 (license license:gpl3)))
194b4e7d
PM		 1536
1537(define-public godot
1538 (package
1539 (name "godot")
dbe0e0db 1540 (version "3.2.1")
194b4e7d 1541 (source (origin
39f516cb
TGR		 1542 (method git-fetch)
1543 (uri (git-reference
1544 (url "https://github.com/godotengine/godot")
1545 (commit (string-append version "-stable"))))
1546 (file-name (git-file-name name version))
194b4e7d 1547 (sha256
9766c6e2 1548 (base32
dbe0e0db 1549 "1kndls0rklha7kz9l4i2ivjxab4jpk3b2j7dcgcg2qc3s81yd0r6"))
18f8e935
TL		 1550 (modules '((guix build utils)
1551 (ice-9 ftw)
1552 (srfi srfi-1)))
5b8d2ace
MB		 1553 (snippet
1554 '(begin
18f8e935
TL		 1555 ;; Keep only those bundled files we have not (yet) replaced
1556 ;; with Guix versions. Note that some of these may be
1557 ;; modified; see "thirdparty/README.md".
5b8d2ace 1558 (with-directory-excursion "thirdparty"
18f8e935
TL		 1559 (let* ((preserved-files
1560 '("README.md"
451e1075 1561 "assimp"
18f8e935
TL		 1562 "certs"
1563 "cvtt"
1564 "enet"
1565 "etc2comp"
1566 "fonts"
1567 "glad"
1568 "jpeg-compressor"
1569 "libsimplewebm"
18f8e935
TL		 1570 "miniupnpc"
1571 "minizip"
1572 "misc"
1573 "nanosvg"
1574 "pvrtccompressor"
1575 "recastnavigation"
1576 "squish"
18f8e935 1577 "tinyexr"
451e1075 1578 "vhacd"
18f8e935
TL		 1579 "xatlas")))
1580 (for-each delete-file-recursively
1581 (lset-difference string=?
1582 (scandir ".")
1583 (cons* "." ".." preserved-files)))))
1584 #t))))
92b51d12 1585 (build-system scons-build-system)
194b4e7d 1586 (arguments
92b51d12 1587 `(#:scons ,scons-python2
ab67f84b 1588 #:scons-flags (list "platform=x11" "target=release_debug"
92b51d12
AI		 1589 ;; Avoid using many of the bundled libs.
1590 ;; Note: These options can be found in the SConstruct file.
c1bc92c0 1591 "builtin_bullet=no"
92b51d12
AI		 1592 "builtin_freetype=no"
1593 "builtin_glew=no"
1594 "builtin_libmpdec=no"
1595 "builtin_libogg=no"
1596 "builtin_libpng=no"
1597 "builtin_libtheora=no"
1598 "builtin_libvorbis=no"
5b8d2ace 1599 "builtin_libvpx=no"
92b51d12 1600 "builtin_libwebp=no"
c1bc92c0 1601 "builtin_mbedtls=no"
92b51d12 1602 "builtin_opus=no"
c1bc92c0 1603 "builtin_pcre2=no"
451e1075 1604 "builtin_wslay=no"
c1bc92c0
TL		 1605 "builtin_zlib=no"
1606 "builtin_zstd=no")
545511df 1607 #:tests? #f ; There are no tests
194b4e7d
PM		 1608 #:phases
1609 (modify-phases %standard-phases
194b4e7d
PM		 1610 (add-after 'unpack 'scons-use-env
1611 (lambda _
1612 ;; Scons does not use the environment variables by default,
1613 ;; but this substitution makes it do so.
1614 (substitute* "SConstruct"
1615 (("env_base = Environment\\(tools=custom_tools\\)")
1616 (string-append
1617 "env_base = Environment(tools=custom_tools)\n"
1618 "env_base = Environment(ENV=os.environ)")))
1619 #t))
545511df
TL		 1620 ;; Build headless tools, used for packaging games without depending on X.
1621 (add-after 'build 'build-headless
1622 (lambda* (#:key scons-flags #:allow-other-keys)
1623 (apply invoke "scons"
1624 `(,(string-append "-j" (number->string (parallel-job-count)))
1625 "platform=server" ,@(delete "platform=x11" scons-flags)))))
194b4e7d 1626 (replace 'install
545511df 1627 (lambda* (#:key inputs outputs #:allow-other-keys)
194b4e7d 1628 (let* ((out (assoc-ref outputs "out"))
545511df
TL		 1629 (headless (assoc-ref outputs "headless"))
1630 (zenity (assoc-ref inputs "zenity")))
1631 ;; Strip build info from filenames.
194b4e7d 1632 (with-directory-excursion "bin"
545511df
TL		 1633 (for-each
1634 (lambda (file)
1635 (let ((dest (car (string-split (basename file) #\.))))
1636 (rename-file file dest)))
1637 (find-files "." "godot.*\\.x11\\.opt\\.tools.*"))
1638 (install-file "godot" (string-append out "/bin"))
1639 (install-file "godot_server" (string-append headless "/bin")))
1640 ;; Tell the editor where to find zenity for OS.alert().
1641 (wrap-program (string-append out "/bin/godot")
1642 `("PATH" ":" prefix (,(string-append zenity "/bin")))))
1643 #t))
194b4e7d
PM		 1644 (add-after 'install 'install-godot-desktop
1645 (lambda* (#:key outputs #:allow-other-keys)
1646 (let* ((out (assoc-ref outputs "out"))
bf076da9
TL		 1647 (applications (string-append out "/share/applications"))
1648 (icons (string-append out "/share/icons/hicolor")))
1649 (mkdir-p applications)
1650 (copy-file "misc/dist/linux/org.godotengine.Godot.desktop"
1651 (string-append applications "/godot.desktop"))
1652 (for-each (lambda (icon dest)
1653 (mkdir-p (dirname dest))
1654 (copy-file icon dest))
1655 '("icon.png" "icon.svg")
1656 `(,(string-append icons "/256x256/apps/godot.png")
1657 ,(string-append icons "/scalable/apps/godot.svg"))))
1658 #t)))))
545511df 1659 (outputs '("out" "headless"))
92b51d12 1660 (native-inputs `(("pkg-config" ,pkg-config)))
194b4e7d 1661 (inputs `(("alsa-lib" ,alsa-lib)
c1bc92c0 1662 ("bullet" ,bullet)
194b4e7d
PM		 1663 ("freetype" ,freetype)
1664 ("glew" ,glew)
1665 ("glu" ,glu)
1666 ("libtheora" ,libtheora)
1667 ("libvorbis" ,libvorbis)
5b8d2ace 1668 ("libvpx" ,libvpx)
194b4e7d
PM		 1669 ("libwebp" ,libwebp)
1670 ("libx11" ,libx11)
1671 ("libxcursor" ,libxcursor)
9766c6e2 1672 ("libxi" ,libxi)
194b4e7d
PM		 1673 ("libxinerama" ,libxinerama)
1674 ("libxrandr" ,libxrandr)
c1bc92c0 1675 ("mbedtls" ,mbedtls-apache)
194b4e7d 1676 ("mesa" ,mesa)
194b4e7d 1677 ("opusfile" ,opusfile)
c1bc92c0
TL		 1678 ("pcre2" ,pcre2)
1679 ("pulseaudio" ,pulseaudio)
451e1075 1680 ("wslay" ,wslay)
7b2ba609 1681 ("zenity" ,zenity)
c1bc92c0 1682 ("zstd" ,zstd "lib")))
194b4e7d
PM		 1683 (home-page "https://godotengine.org/")
1684 (synopsis "Advanced 2D and 3D game engine")
1685 (description
1686 "Godot is an advanced multi-platform game engine written in C++. If
1687features design tools such as a visual editor, can import 3D models and
1688provide high-quality 3D rendering, it contains an animation editor, and can be
1689scripted in a Python-like language.")
1690 (license license:expat)))
531003be 1691
1692(define-public eureka
1693 (package
1694 (name "eureka")
75f66e4a 1695 (version "1.24")
531003be 1696 (source (origin
1697 (method url-fetch)
1698 (uri (string-append "mirror://sourceforge/eureka-editor/Eureka/"
1699 version "/eureka-"
1700 ;; version without dots e.g 1.21 => 121
1701 (string-join (string-split version #\.) "")
1702 "-source.tar.gz"))
1703 (sha256
1704 (base32
75f66e4a 1705 "1x4idjniz9sma3j9ss6ni7fafmz22zs2jnpsqw4my9rsnmra5d9v"))))
531003be 1706 (build-system gnu-build-system)
1707 (arguments
1708 '(#:tests? #f
1709 #:make-flags
1710 (let ((out (assoc-ref %outputs "out")))
1711 (list (string-append "PREFIX=" out)))
1712 #:phases
1713 (modify-phases %standard-phases
1714 (delete 'configure)
1715 (add-before 'build 'prepare-install-directories
1716 (lambda* (#:key outputs #:allow-other-keys)
1717 (let ((out (assoc-ref outputs "out")))
1718 (mkdir-p (string-append out "/bin"))
1719 (mkdir-p (string-append out "/share"))
1720
1721 (with-fluids ((%default-port-encoding #f))
1722 (substitute* "./src/main.cc"
1723 (("/usr/local") out)))
1724
1725 (substitute* "Makefile"
1726 (("-o root") ""))))))))
1727 (inputs `(("mesa" ,mesa)
1728 ("libxft" ,libxft)
1729 ("libxinerama" ,libxinerama)
1730 ("libfontconfig" ,fontconfig)
4bd428a7 1731 ("libjpeg" ,libjpeg-turbo)
531003be 1732 ("libpng" ,libpng)
1733 ("fltk" ,fltk)
1734 ("zlib" ,zlib)))
1735 (native-inputs `(("pkg-config" ,pkg-config)
1736 ("xdg-utils" ,xdg-utils)))
1737 (synopsis "Doom map editor")
1738 (description "Eureka is a map editor for the classic DOOM games, and a few
1739related games such as Heretic and Hexen. It comes with a 3d preview mode and
1740a 2D editor view.")
1741 (home-page "http://eureka-editor.sourceforge.net/")
1742 (license license:gpl2+)))
00fca594
RW		 1743
1744(define-public guile-chickadee
1745 (package
1746 (name "guile-chickadee")
f6ea5237 1747 (version "0.4.0")
00fca594
RW		 1748 (source (origin
1749 (method url-fetch)
1750 (uri (string-append "https://files.dthompson.us/chickadee/"
1751 "chickadee-" version ".tar.gz"))
1752 (sha256
1753 (base32
f6ea5237 1754 "1fdicsgls5cp0yffcm5vjmav67gv9bxhz1s3jvdvinspxb485x7l"))))
00fca594 1755 (build-system gnu-build-system)
00fca594
RW		 1756 (propagated-inputs
1757 `(("guile-opengl" ,guile-opengl)
1758 ("guile-sdl2" ,guile-sdl2)))
1759 (inputs
1760 `(("guile" ,guile-2.2)))
1761 (native-inputs
1762 `(("pkg-config" ,pkg-config)
1763 ("texinfo" ,texinfo)))
1764 (home-page "https://dthompson.us/projects/chickadee.html")
1765 (synopsis "Game development toolkit for Guile Scheme with SDL2 and OpenGL")
1766 (description "Chickadee is a game development toolkit for Guile Scheme
1767built on top of SDL2 and OpenGL. Chickadee aims to provide all the features
1768that parenthetically inclined game developers need to make 2D (and eventually
17693D) games in Scheme, such as:
1770
abb0ff45
RW		 1771@enumerate
1772@item extensible, fixed-timestep game loop
1773@item OpenGL-based rendering engine
1774@item keyboard, mouse, controller input
1775@item REPL-driven development model
1776@end enumerate\n")
1777 (license license:gpl3+)))
1778
1779(define-public guile3.0-chickadee
1780 (package
1781 (inherit guile-chickadee)
f4762384 1782 (name "guile3.0-chickadee")
abb0ff45
RW		 1783 (version "0.4.0")
1784 (source (origin
1785 (method url-fetch)
1786 (uri (string-append "https://files.dthompson.us/chickadee/"
1787 "chickadee-" version ".tar.gz"))
1788 (sha256
1789 (base32
1790 "1fdicsgls5cp0yffcm5vjmav67gv9bxhz1s3jvdvinspxb485x7l"))))
1791 (build-system gnu-build-system)
1792 (propagated-inputs
1793 `(("guile-opengl" ,guile3.0-opengl)
1794 ("guile-sdl2" ,guile3.0-sdl2)))
1795 (inputs
1796 `(("guile" ,guile-3.0)))
1797 (native-inputs
1798 `(("pkg-config" ,pkg-config)
1799 ("texinfo" ,texinfo)))
1800 (home-page "https://dthompson.us/projects/chickadee.html")
1801 (synopsis "Game development toolkit for Guile Scheme with SDL2 and OpenGL")
1802 (description "Chickadee is a game development toolkit for Guile Scheme
1803built on top of SDL2 and OpenGL. Chickadee aims to provide all the features
1804that parenthetically inclined game developers need to make 2D (and eventually
18053D) games in Scheme, such as:
1806
00fca594
RW		 1807@enumerate
1808@item extensible, fixed-timestep game loop
1809@item OpenGL-based rendering engine
1810@item keyboard, mouse, controller input
1811@item REPL-driven development model
1812@end enumerate\n")
1813 (license license:gpl3+)))
4041fabb
PN		 1814
1815(define-public bennu-game-development
1816 (package
1817 (name "bennu-game-development")
1818 (version "348")
1819 (source (origin
1820 (method svn-fetch)
1821 (uri (svn-reference
1822 (url "http://svn.code.sf.net/p/bennugd/code")
1823 (revision (string->number version))))
1824 (file-name (string-append name "-" version))
1825 (sha256
1826 (base32
edf1ce60
EF		 1827 "0wpzsbh4zi3931493dnyl5ffmh1b7fj2sx3mzrq304z9zs4d6lqq"))
1828 (modules '((guix build utils)))
1829 (snippet
1830 '(begin
1831 (delete-file-recursively "3rdparty") #t))))
4041fabb
PN		 1832 (build-system gnu-build-system)
1833 (arguments
1834 '(#:phases
1835 (modify-phases %standard-phases
f0e4cfcb 1836 (add-after 'unpack 'patch-configure-to-use-openssl
4041fabb
PN		 1837 (lambda* (#:key outputs #:allow-other-keys)
1838 (chdir "core")
1839 (delete-file "configure")
1840 (substitute* "configure.in"
1841 (("i\\*86\\)")
f0e4cfcb 1842 "*)
4041fabb
PN		 1843 COMMON_CFLAGS=\"$COMMON_CFLAGS -DUSE_OPENSSL\"
1844 COMMON_LDFLAGS=\"$COMMON_LDFLAGS\"
1845 LIBSSL=\"crypto\"
1846 USE_OPENSSL=yes
1847 ;;
1848
f0e4cfcb
EF		 1849 i*86)"))
1850 #t)))))
4041fabb
PN		 1851 (inputs `(("openssl" ,openssl)
1852 ("zlib" ,zlib)))
1853 (native-inputs `(("pkg-config" ,pkg-config)
1854 ("autoconf" ,autoconf)
1855 ("automake" ,automake)
1856 ("libtool" ,libtool)))
1857 (synopsis "Programming language to create games")
1858 (description "Bennu Game Development, also known as bennudg, is a
1859programming language tailored at game development. It is the successor of
1860Fenix.")
1861 (home-page "https://sourceforge.net/projects/bennugd/")
1862 (license license:zlib)))
24c4b012
PN		 1863
1864(define-public bennu-game-development-modules
1865 (package
1866 (inherit bennu-game-development)
1867 (name "bennu-game-development-modules")
1868 (arguments
1869 '(#:phases
1870 (modify-phases %standard-phases
1871 (add-after 'unpack 'patch-conflicting-definitions
1872 (lambda _
1873 (with-fluids ((%default-port-encoding #f))
1874 (substitute* "core/include/fmath.h"
1875 (("extern fixed fmul\\( int x, int y \\);") "")
1876 (("extern fixed fdiv\\( int x, int y \\);") "")))
1877 (chdir "modules"))))))
1878 (inputs `(("zlib" ,zlib)
1879 ("libpng" ,libpng)
1880 ("openssl" ,openssl)
1881 ("sdl-mixer" ,sdl-mixer)
1882 ("bennu-game-development" ,bennu-game-development)))
0525864b 1883 (synopsis "Modules for the Bennu Game Development programming language")
24c4b012 1884 (description "This package contains a collection of modules for the Bennu
0525864b 1885Game Development programming language, from CD handling through SDL to
24c4b012 1886joystick support.")))
cd528946
RW		 1887
1888(define-public plib
1889 (package
1890 (name "plib")
1891 (version "1.8.5")
1892 (source (origin
1893 (method url-fetch)
1894 (uri (string-append "http://plib.sourceforge.net/dist/"
1895 "plib-" version ".tar.gz"))
1896 (sha256
1897 (base32
05f386f1
EF		 1898 "0cha71mflpa10vh2l7ipyqk67dq2y0k5xbafwdks03fwdyzj4ns8"))
1899 (patches (search-patches "plib-CVE-2011-4620.patch"
1900 "plib-CVE-2012-4552.patch"))))
cd528946
RW		 1901 (build-system gnu-build-system)
1902 (inputs
1903 `(("mesa" ,mesa)
1904 ("libxi" ,libxi)
1905 ("libxmu" ,libxmu)))
1906 (native-inputs
1907 `(("pkg-config" ,pkg-config)))
1908 (home-page "http://plib.sourceforge.net/")
1909 (synopsis "Suite of portable game libraries")
1910 (description "PLIB is a set of libraries that will permit programmers to
1911write games and other realtime interactive applications that are 100% portable
1912across a wide range of hardware and operating systems. PLIB includes sound
1913effects, music, a complete 3D engine, font rendering, a simple Windowing
1914library, a game scripting language, a GUI, networking, 3D math library and a
1915collection of handy utility functions. All are 100% portable across nearly
1916all modern computing platforms. Each library component is fairly independent
1917of the others")
1918 (license license:lgpl2.0+)))
e4ff9dff
PN		 1919
1920(define-public ioquake3
1921 ;; We follow master since it seems that there won't be releases after 1.3.6.
1922 (let ((commit "95b9cab4d644fa3bf757cfff821cc4f7d76e38b0"))
1923 (package
1924 (name "ioquake3")
1925 (version (git-version "1.3.6" "1" commit))
1926 (source
1927 (origin
1928 (method git-fetch)
1929 (uri (git-reference
1930 (url "https://github.com/ioquake/ioq3.git")
1931 (commit commit)))
1932 (file-name (git-file-name name version))
1933 (sha256
1934 (base32
1935 "1vflk028z9gccg5yfi5451y1k5wxjdh3qbhjf4x6r7w2pzlxh16z"))))
1936 (build-system gnu-build-system)
1937 (inputs
1938 `(("sdl2" ,sdl2)
4bd428a7 1939 ("libjpeg" ,libjpeg-turbo)
e4ff9dff
PN		 1940 ("openal" ,openal)
1941 ("curl" ,curl)
1942 ("opusfile" ,opusfile)
1943 ("opus" ,opus)
1944 ("libvorbis" ,libvorbis)
1945 ("freetype" ,freetype)
1946 ("libogg" ,libogg)))
1947 (native-inputs
1948 `(("which" ,which) ; Else SDL_version.h won't be found.
1949 ("pkg-config" ,pkg-config)))
1950 (arguments
1951 '(#:tests? #f ; No tests.
1952 #:make-flags '("CC=gcc"
1953 "USE_INTERNAL_LIBS=0"
1954 "USE_FREETYPE=1"
1955 "USE_RENDERER_DLOPEN=0"
1956 "USE_OPENAL_DLOPEN=0"
1957 "USE_CURL_DLOPEN=0")
1958 #:phases
1959 (modify-phases %standard-phases
1960 (delete 'configure)
1961 (replace 'install
1962 (lambda* (#:key outputs #:allow-other-keys)
1963 (invoke "make" "copyfiles" "CC=gcc"
1964 "USE_INTERNAL_LIBS=0"
1965 (string-append "COPYDIR="
1966 (assoc-ref outputs "out")
1967 "/bin")))))))
1968 (home-page "https://ioquake3.org/")
1969 (synopsis "FPS game engine based on Quake 3")
1970 (description "ioquake3 is a free software first person shooter engine
1971based on the Quake 3: Arena and Quake 3: Team Arena source code. Compared to
1972the original, ioquake3 has been cleaned up, bugs have been fixed and features
1973added. The permanent goal is to create the open source Quake 3 distribution
1974upon which people base their games, ports to new platforms, and other
1975projects.")
e4ff9dff 1976 (license license:gpl2))))
545946f6
PN		 1977
1978(define-public openvr
1979 (package
1980 (name "openvr")
1854a0ec 1981 (version "1.8.19")
545946f6
PN		 1982 (home-page "https://github.com/ValveSoftware/openvr/")
1983 (source
1984 (origin
1985 (method git-fetch)
1986 (uri (git-reference
1987 (url home-page)
1988 (commit (string-append "v" version))))
1989 (file-name (git-file-name name version))
1990 (sha256
1854a0ec 1991 (base32 "1b8cppvw6ib0kvx0vjq7jsk3plg1vh171w8xr230vjn05381wp52"))))
545946f6
PN		 1992 (build-system cmake-build-system)
1993 (arguments
1994 ;; No tests.
1995 '(#:tests? #f
1996 #:configure-flags (list "-DBUILD_SHARED=1")))
1997 (synopsis "Virtual reality software development kit")
1998 (description "OpenVR is an API and runtime that allows access to VR
1999hardware from multiple vendors without requiring that applications have
2000specific knowledge of the hardware they are targeting.")
2001 (license license:bsd-3)))
7158fe4d
PN		 2002
2003(define-public fna
2004 (package
2005 (name "fna")
2006 (version "19.12.01")
2007 (source
2008 (origin
2009 (method git-fetch)
2010 (uri (git-reference
2011 (url "https://github.com/FNA-XNA/FNA.git")
2012 (commit version)))
2013 (file-name (git-file-name name version))
2014 (sha256
2015 (base32 "1vdyi9hac24fqcs8kpj6yk36bf5rrl4dvlvdd9fc701fawcf6lrr"))))
2016 (build-system gnu-build-system)
2017 (arguments
2018 '(#:tests? #f ; No tests.
2019 #:phases
2020 (modify-phases %standard-phases
2021 (add-after 'unpack 'link-dep-src
2022 (lambda* (#:key inputs #:allow-other-keys)
2023 (let ((sdl2 (assoc-ref inputs "sdl2-cs-src"))
2024 (mojoshader (assoc-ref inputs "mojoshader-src"))
2025 (faudio (assoc-ref inputs "faudio-src"))
2026 (theorafile (assoc-ref inputs "theorafile-src")))
2027 (symlink (string-append sdl2 "/src") "lib/SDL2-CS/src")
2028 (symlink (string-append mojoshader "/csharp") "lib/MojoShader/csharp")
2029 (symlink (string-append faudio "/csharp") "lib/FAudio/csharp")
2030 (symlink (string-append theorafile "/csharp") "lib/Theorafile/csharp"))))
2031 (delete 'configure)
2032 (replace 'build
2033 (lambda _
2034 (invoke "make" "release")))
2035 (replace 'install
2036 (lambda* (#:key outputs #:allow-other-keys)
2037 (let ((out (assoc-ref outputs "out")))
2038 (install-file "bin/Release/FNA.dll" (string-append out "/lib"))
2039 #t))))))
2040 (native-inputs
2041 `(("mono" ,mono)))
2042 (inputs `(("sdl2-cs-src" ,(package-source sdl2-cs))
2043 ("mojoshader-src" ,(package-source mojoshader-cs))
2044 ("faudio-src" ,(package-source faudio))
2045 ("theorafile-src" ,(package-source theorafile))))
2046 (home-page "https://fna-xna.github.io/")
2047 (synopsis "Accuracy-focused XNA4 reimplementation")
2048 (description "FNA is a Microsoft XNA Game Studio 4.0 reimplementation that
2049focuses solely on developing a fully accurate XNA4 runtime for the desktop.")
2050 (license (list license:ms-pl ; FNA
2051 license:lgpl2.1 ; LzxDecoder.cs
2052 ;; Mono.Xna:
2053 license:expat))))
45c552ec
NG		 2054
2055(define-public libccd
2056 (package
2057 (name "libccd")
2058 (version "2.1")
2059 (source
2060 (origin
2061 (method git-fetch)
2062 (uri (git-reference
2063 (url "https://github.com/danfis/libccd.git")
2064 (commit (string-append "v" version))))
2065 (file-name (git-file-name name version))
2066 (sha256
2067 (base32 "0sfmn5pd7k5kyhbxnd689xmsa5v843r7sska96dlysqpljd691jc"))))
2068 (build-system cmake-build-system)
2069 (arguments
2070 `(#:configure-flags '("-DBUILD_DOCUMENTATION=ON"
2071 "-DBUILD_TESTING=ON"
2072 "-DENABLE_DOUBLE_PRECISION=ON")))
2073 (native-inputs
2074 `(("python-sphinx" ,python-sphinx)))
2075 (home-page "https://github.com/danfis/libccd")
2076 (synopsis "Library for collision detection between two convex shapes")
2077 (description "@code{libccd} is library for a collision detection
2078between two convex shapes. @code{libccd} implements variation on
2079Gilbert–Johnson–Keerthi algorithm plus Expand Polytope Algorithm (EPA)
2080and also implements algorithm Minkowski Portal Refinement (MPR,
2081a.k.a. XenoCollide) as described in Game Programming Gems 7.")
2082 (license license:expat)))
42399ad7
NG		 2083
2084(define-public ode
2085 (package
2086 (name "ode")
c4f197d5 2087 (version "0.16.1")
42399ad7
NG		 2088 (source
2089 (origin
2090 (method url-fetch)
2091 (uri (string-append "https://bitbucket.org/odedevs/ode/downloads/"
2092 "ode-" version ".tar.gz"))
2093 (sha256
c4f197d5 2094 (base32 "1flfdqgdbcn1bx8nrrd4qnp6cvsxrhvk8cdg7vaq2dzkh6nsqa5j"))
42399ad7
NG		 2095 (modules '((guix build utils)))
2096 (snippet
2097 '(begin
2098 (delete-file-recursively "libccd")
2099 #t))))
2100 (build-system cmake-build-system)
2101 (arguments
c4f197d5
NG		 2102 ;; Tests fail on all systems but x86_64. This is fixed upstream and can
2103 ;; be removed in 0.16.2+.
07a7cccb
NG		 2104 `(#:tests? ,(string-prefix? "x86_64-"
2105 (or (%current-target-system)
2106 (%current-system)))
049bdae5 2107 #:configure-flags '("-DODE_WITH_LIBCCD_SYSTEM=ON")
42399ad7
NG		 2108 #:phases
2109 (modify-phases %standard-phases
2110 (add-after 'unpack 'unbundle-libccd
2111 (lambda _
2112 (substitute* "CMakeLists.txt"
2113 (("configure_file\\(libccd/.*") ""))
2114 #t)))))
2115 (inputs
2116 `(("glu" ,glu)
2117 ("libccd" ,libccd)
2118 ("mesa" ,mesa)))
76fcbb78 2119 (home-page "https://www.ode.org/")
42399ad7
NG		 2120 (synopsis "High performance library for simulating rigid body dynamics")
2121 (description "ODE is a high performance library for simulating
2122rigid body dynamics. It is fully featured, stable, mature and
2123platform independent with an easy to use C/C++ API. It has advanced
2124joint types and integrated collision detection with friction. ODE is
2125useful for simulating vehicles, objects in virtual reality
2126environments and virtual creatures. It is currently used in many
2127computer games, 3D authoring tools and simulation tools.")
2128 ;; Software is dual-licensed.
2129 (license (list license:lgpl2.1+ license:expat))))
d6ab5f4f
NG		 2130
2131(define-public chipmunk
2132 (package
2133 (name "chipmunk")
2134 (version "7.0.3")
2135 (source
2136 (origin
2137 (method git-fetch)
2138 (uri (git-reference
2139 (url "https://github.com/slembcke/Chipmunk2D.git")
2140 (commit (string-append "Chipmunk-" version))))
2141 (file-name (git-file-name name version))
2142 (sha256
2143 (base32 "1qmkn01g06p3rnhmbyffmjns6wj5vhgf9cscigk3wzxcpwv1hyxb"))))
2144 (build-system cmake-build-system)
2145 (arguments
2146 `(#:tests? #f ;no test
2147 #:configure-flags '("-DBUILD_STATIC=OFF"
2148 "-DBUILD_DEMOS=OFF")))
2149 (inputs
2150 `(("freeglut" ,freeglut)
2151 ("libxmu" ,libxmu)
2152 ("libxrandr" ,libxrandr)))
d0bb1c2f 2153 (home-page "https://chipmunk-physics.net/")
d6ab5f4f
NG		 2154 (synopsis "Fast and lightweight 2D game physics library")
2155 (description "Chipmunk is a simple, lightweight, fast and portable 2D
2156rigid body physics library written in C.")
2157 (license license:expat)))
2e0787a5
GL		 2158
2159(define-public libtcod
2160 (package
2161 (name "libtcod")
2162 (version "1.15.1")
2163 (source (origin
2164 (method git-fetch)
2165 (uri (git-reference
2166 (url "https://github.com/libtcod/libtcod.git")
2167 (commit version)))
2168 (file-name (git-file-name name version))
2169 (sha256
2170 (base32
2171 "0pzr8ajmbqvh43ldjajx962xirj3rf8ayh344p6mqlrmb8gxrfr5"))
2172 (modules '((guix build utils)))
2173 (snippet '(begin
2174 (delete-file-recursively "src/vendor/utf8proc")
2175 (delete-file-recursively "src/vendor/zlib")
2176 (delete-file "src/vendor/stb_truetype.h")
2177 (delete-file "src/vendor/stb_sprintf.h")
2178 (delete-file "src/vendor/lodepng.cpp")
2179 (delete-file "src/vendor/lodepng.h")
2180
2181 (substitute* "buildsys/autotools/sources.am"
2182 (("\\.\\./\\.\\./src/vendor/lodepng\\.cpp \\\\\n") "")
2183 (("\\.\\./\\.\\./src/vendor/stb\\.c \\\\")
2184 "../../src/vendor/stb.c")
2185 (("\\.\\./\\.\\./src/vendor/utf8proc/utf8proc\\.c") ""))
2186
2187 (substitute* "src/libtcod/sys_sdl_img_png.cpp"
2188 (("\\.\\./vendor/") ""))
2189
2190 (substitute* '("src/libtcod/color/canvas.cpp"
2191 "src/libtcod/sys_sdl_img_png.cpp"
2192 "src/libtcod/tileset/truetype.cpp"
2193 "src/libtcod/tileset/tilesheet.cpp")
2194 (("\\.\\./\\.\\./vendor/") ""))
2195
2196 (substitute* "src/libtcod/console/printing.cpp"
2197 (("\\.\\./\\.\\./vendor/utf8proc/") ""))
2198 #t))))
2199 (build-system gnu-build-system)
2200 (arguments
2201 `(#:configure-flags '("--with-gnu-ld"
2202 "LIBS=-lutf8proc -llodepng")
2203 #:phases
2204 (modify-phases %standard-phases
2205 (add-after 'unpack 'change-to-build-dir
2206 (lambda _
2207 (chdir "buildsys/autotools")
2208 (patch-shebang "get_version.py")
2209 #t)))))
2210 (native-inputs
2211 `(("autoconf" ,autoconf)
2212 ("automake" ,automake)
2213 ("libtool" ,libtool)
2214 ("python" ,python)
2215 ("pkg-config" ,pkg-config)
2216 ("stb-sprintf" ,stb-sprintf)
2217 ("stb-truetype" ,stb-truetype)))
2218 (inputs
2219 `(("lodepng" ,lodepng)
2220 ("sdl2" ,sdl2)
2221 ("utf8proc" ,utf8proc)
2222 ("zlib" ,zlib)))
2223 (home-page "https://github.com/libtcod/libtcod")
2224 (synopsis "Library specifically designed for writing roguelikes")
2225 (description
2226 "libtcod is a fast, portable and uncomplicated API for roguelike
2227developers providing an advanced true color console, input, and lots of other
2228utilities frequently used in roguelikes.")
2229 (license license:bsd-3)))
0b5bf615
PN		 2230
2231(define-public warsow-qfusion
2232 ;; As of 2020-04-09, the latest stable version 2.1.0 is deprecated.
2233 ;; The 2.5 beta as published on the homepage is commit
2234 ;; c4de15df559410aff0ca6643724e24cddb0ecbbd
2235 (let ((commit "c4de15df559410aff0ca6643724e24cddb0ecbbd"))
2236 (package
2237 (name "warsow-qfusion")
2238 (version (git-version "2.5" "1" commit)) ; 2.5-beta
2239 (source (origin
2240 (method git-fetch)
2241 (uri (git-reference
2242 (url "https://github.com/Warsow/qfusion/")
2243 (commit commit)
2244 (recursive? #t)))
2245 (file-name (git-file-name name version))
2246 (sha256
2247 (base32
2248 "0xv2yycr43p3xmq7lm6j6zb3cpcr6w00x7qg918faq0mw9j7v48g"))
2249 ;; Issue reported here: https://github.com/Warsow/qfusion/issues/46
e5f1f5ce
PN		 2250 (patches (search-patches "warsow-qfusion-fix-bool-return-type.patch"))
2251 (modules '((guix build utils)))
2252 (snippet '(begin
2253 (delete-file-recursively "platforms")
2254 (delete-file-recursively "debian")
2255 (delete-file-recursively "libsrcs")
2256 #t))))
0b5bf615
PN		 2257 (build-system cmake-build-system)
2258 (arguments
2259 `(#:tests? #f ; No tests.
2260 #:configure-flags '("-DQFUSION_GAME=Warsow")
2261 #:modules
2262 ((guix build utils)
2263 (guix build cmake-build-system)
2264 (ice-9 match))
2265 #:phases
2266 (modify-phases %standard-phases
2267 (add-after 'unpack 'change-to-build-dir
2268 (lambda _
2269 (chdir "source")
2270 #t))
2271 (add-after 'install 'really-install
2272 (lambda* (#:key outputs system #:allow-other-keys)
2273 (let ((arch (match system
2274 ("x86_64-linux" "x86_64")
2275 ("i686-linux" "i386")))
2276 (out (assoc-ref outputs "out")))
2277 (install-file (string-append "../source/build/basewsw/libgame_"
2278 arch ".so")
2279 (string-append out "/lib/"))
2280 (install-file (string-append "../source/build/libui_" arch ".so")
2281 (string-append out "/lib/"))
2282 (for-each
2283 (lambda (file)
2284 (install-file file (string-append out "/bin/")))
2285 (append (find-files "../source/build" "warsow")
2286 (find-files "../source/build" "wsw_server."))))
2287 #t)))))
2288 (inputs
2289 `(("alsa-lib" ,alsa-lib)
2290 ("curl" ,curl)
2291 ("freetype" ,freetype)
2292 ("ffmpeg" ,ffmpeg)
c263cfdc 2293 ("libjpeg" ,libjpeg-turbo)
0b5bf615
PN		 2294 ("libogg" ,libogg)
2295 ("libpng" ,libpng)
2296 ("libtheora" ,libtheora)
2297 ("libvorbis" ,libvorbis)
2298 ("mesa" ,mesa)
2299 ("openal" ,openal)
2300 ("pulseaudio" ,pulseaudio)
2301 ("qtbase" ,qtbase)
2302 ("qtdeclarative" ,qtdeclarative)
2303 ("sdl2" ,sdl2)
c263cfdc 2304 ("uuid.h" ,util-linux "lib")
0b5bf615
PN		 2305 ("zlib" ,zlib)))
2306 (native-inputs
2307 `(("pkg-config" ,pkg-config)))
2308 (home-page "https://github.com/Warsow/qfusion")
2309 (supported-systems '("i686-linux" "x86_64-linux"))
2310 (synopsis "Warsow's fork of qfusion, the id Tech 2 derived game engine")
2311 (description
2312 "This package contains the game engine of Warsow, a first-person
2313shooter video game. The engine is based on qfusion, the id Tech 2 derived
2314game engine. id Tech 2 is the engine originally behind Quake 2.")
2315 (license license:gpl2+))))
jackhill's copy of GNU Guix: https://guix.gnu.org/