621 lines
24 KiB
Scheme
621 lines
24 KiB
Scheme
;;; GNU Guix --- Functional package management for GNU
|
|
;;; Copyright © 2014 Tomáš Čech <sleep_walker@suse.cz>
|
|
;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
|
|
;;; Copyright © 2015 Ludovic Courtès <ludo@gnu.org>
|
|
;;; Copyright © 2015 Alex Kost <alezost@gmail.com>
|
|
;;; Copyright © 2015, 2016 David Thompson <davet@gnu.org>
|
|
;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
|
|
;;; Copyright © 2016 Kei Kebreau <kei@openmailbox.org>
|
|
;;; Copyright © 2016 Ricardo Wurmus <rekado@elephly.net>
|
|
;;; Copyright © 2016 Julian Graham <joolean@gmail.com>
|
|
;;;
|
|
;;; 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 game-development)
|
|
#:use-module ((guix licenses) #:prefix license:)
|
|
#:use-module (guix packages)
|
|
#:use-module (guix download)
|
|
#:use-module (guix git-download)
|
|
#:use-module (guix build-system cmake)
|
|
#:use-module (guix build-system gnu)
|
|
#:use-module (guix build-system python)
|
|
#:use-module (gnu packages)
|
|
#:use-module (gnu packages curl)
|
|
#:use-module (gnu packages databases)
|
|
#:use-module (gnu packages documentation)
|
|
#:use-module (gnu packages fontutils)
|
|
#:use-module (gnu packages fribidi)
|
|
#:use-module (gnu packages glib)
|
|
#:use-module (gnu packages gnunet)
|
|
#:use-module (gnu packages guile)
|
|
#:use-module (gnu packages multiprecision)
|
|
#:use-module (gnu packages music)
|
|
#:use-module (gnu packages ncurses)
|
|
#:use-module (gnu packages python)
|
|
#:use-module (gnu packages qt)
|
|
#:use-module (gnu packages video)
|
|
#:use-module (gnu packages compression)
|
|
#:use-module (gnu packages zip)
|
|
#:use-module (gnu packages gl)
|
|
#:use-module (gnu packages linux)
|
|
#:use-module (gnu packages xorg)
|
|
#:use-module (gnu packages xdisorg)
|
|
#:use-module (gnu packages fontutils)
|
|
#:use-module (gnu packages image)
|
|
#:use-module (gnu packages audio)
|
|
#:use-module (gnu packages pulseaudio)
|
|
#:use-module (gnu packages gnome)
|
|
#:use-module (gnu packages gtk)
|
|
#:use-module (gnu packages sdl)
|
|
#:use-module (gnu packages pkg-config)
|
|
#:use-module (gnu packages xiph)
|
|
#:use-module (gnu packages lua)
|
|
#:use-module (gnu packages mp3)
|
|
#:use-module (gnu packages xml))
|
|
|
|
(define-public bullet
|
|
(package
|
|
(name "bullet")
|
|
(version "2.85.1")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://github.com/bulletphysics/bullet3/"
|
|
"archive/" version ".tar.gz"))
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0qpd37ws0xlxwy55dg058a5b4yw2jxiz09yyc3lc0frpa05pq5bf"))))
|
|
(build-system cmake-build-system)
|
|
(arguments
|
|
'(#:configure-flags (list (string-append
|
|
"-DBUILD_SHARED_LIBS=ON "
|
|
"-DCMAKE_CXX_FLAGS=-fPIC "
|
|
(or (getenv "CXXFLAGS") "")))))
|
|
(inputs
|
|
`(("glu" ,glu)
|
|
("libx11" ,libx11)
|
|
("mesa" ,mesa)))
|
|
(home-page "http://bulletphysics.org/")
|
|
(synopsis "3D physics engine library")
|
|
(description
|
|
"Bullet is a physics engine library usable for collision detection. It
|
|
is used in some video games and movies.")
|
|
(license license:zlib)))
|
|
|
|
(define-public gzochi
|
|
(package
|
|
(name "gzochi")
|
|
(version "0.10.1")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "mirror://savannah/gzochi/gzochi-"
|
|
version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"166rawdal45kvanhvi0bkzy1d2pwf1p0lzslb287lcnm9vdw97yy"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
'(#:phases (modify-phases %standard-phases
|
|
(add-before 'configure 'remove-Werror
|
|
(lambda _
|
|
;; We can't build with '-Werror', notably
|
|
;; because deprecated functions of
|
|
;; libmicrohttpd are being used.
|
|
(substitute* (find-files "." "^Makefile\\.in$")
|
|
(("-Werror")
|
|
""))
|
|
#t)))))
|
|
(native-inputs `(("pkgconfig" ,pkg-config)))
|
|
(inputs `(("bdb" ,bdb)
|
|
("glib" ,glib)
|
|
("guile" ,guile-2.0)
|
|
("libmicrohttpd" ,libmicrohttpd)
|
|
("ncurses" ,ncurses)
|
|
("sdl" ,sdl)
|
|
("zlib" ,zlib)))
|
|
(home-page "http://www.nongnu.org/gzochi/")
|
|
(synopsis "Scalable middleware for multiplayer games")
|
|
(description
|
|
"gzochi is a framework for developing massively multiplayer online games.
|
|
A server container provides services to deployed games, which are written in
|
|
Guile Scheme, that abstract and simplify some of the most challenging and
|
|
error-prone aspects of online game development: Concurrency, data persistence,
|
|
and network communications. A very thin client library can be embedded to
|
|
provide connectivity for client applications written in any language.")
|
|
(license license:gpl3+)))
|
|
|
|
(define-public tiled
|
|
(package
|
|
(name "tiled")
|
|
(version "0.18.0")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://github.com/bjorn/tiled/archive/v"
|
|
version ".tar.gz"))
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0csrwf7k3fxv6bv580w6wxjk1q2j9mj9k0xba3nb1ms6jiz1bvzk"))))
|
|
(build-system gnu-build-system)
|
|
(inputs `(("qt" ,qt)
|
|
("zlib" ,zlib)))
|
|
(arguments
|
|
'(#:phases
|
|
(modify-phases %standard-phases
|
|
(replace 'configure
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(let ((out (assoc-ref outputs "out")))
|
|
(system* "qmake"
|
|
(string-append "PREFIX=" out))))))))
|
|
(home-page "http://www.mapeditor.org/")
|
|
(synopsis "Tile map editor")
|
|
(description
|
|
"Tiled is a general purpose tile map editor. It is meant to be used for
|
|
editing maps of any tile-based game, be it an RPG, a platformer or a Breakout
|
|
clone.")
|
|
|
|
;; As noted in 'COPYING', part of it is under GPLv2+, while the rest is
|
|
;; under BSD-2.
|
|
(license license:gpl2+)))
|
|
|
|
(define-public sfml
|
|
(package
|
|
(name "sfml")
|
|
(version "2.3.2")
|
|
(source (origin
|
|
(method url-fetch)
|
|
;; Do not fetch the archives from
|
|
;; http://mirror0.sfml-dev.org/files/ because files there seem
|
|
;; to be changed in place.
|
|
(uri (string-append "https://github.com/SFML/SFML/archive/"
|
|
version ".tar.gz"))
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0k2fl5xk3ni2q8bsxl0551inx26ww3w6cp6hssvww0wfjdjcirsm"))))
|
|
(build-system cmake-build-system)
|
|
(arguments
|
|
'(#:configure-flags
|
|
(list "-DSFML_INSTALL_PKGCONFIG_FILES=TRUE")
|
|
#:tests? #f)) ; no tests
|
|
(inputs
|
|
`(("mesa" ,mesa)
|
|
("glew" ,glew)
|
|
("flac" ,flac)
|
|
("libvorbis" ,libvorbis)
|
|
("libx11" ,libx11)
|
|
("xcb-util-image" ,xcb-util-image)
|
|
("libxrandr" ,libxrandr)
|
|
("eudev" ,eudev)
|
|
("freetype" ,freetype)
|
|
("libjpeg" ,libjpeg)
|
|
("libsndfile" ,libsndfile)
|
|
("openal" ,openal)))
|
|
(home-page "http://www.sfml-dev.org")
|
|
(synopsis "Simple and Fast Multimedia Library")
|
|
(description
|
|
"SFML provides a simple interface to the various computer components,
|
|
to ease the development of games and multimedia applications. It is composed
|
|
of five modules: system, window, graphics, audio and network.")
|
|
(license license:zlib)))
|
|
|
|
(define-public sfxr
|
|
(package
|
|
(name "sfxr")
|
|
(version "1.2.1")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "http://www.drpetter.se/files/sfxr-sdl-1.2.1.tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0dfqgid6wzzyyhc0ha94prxax59wx79hqr25r6if6by9cj4vx4ya"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
`(#:phases (modify-phases %standard-phases
|
|
(delete 'configure) ; no configure script
|
|
(add-before 'build 'patch-makefile
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(let ((out (assoc-ref outputs "out")))
|
|
(substitute* "Makefile"
|
|
(("\\$\\(DESTDIR\\)/usr") out))
|
|
(substitute* "main.cpp"
|
|
(("/usr/share")
|
|
(string-append out "/share")))
|
|
#t))))
|
|
#:tests? #f)) ; no tests
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)
|
|
("desktop-file-utils" ,desktop-file-utils)))
|
|
(inputs
|
|
`(("sdl" ,sdl)
|
|
("gtk+" ,gtk+)))
|
|
(synopsis "Simple sound effect generator")
|
|
(description "Sfxr is a tool for quickly generating simple sound effects.
|
|
Originally created for use in video game prototypes, it can generate random
|
|
sounds from presets such as \"explosion\" or \"powerup\".")
|
|
(home-page "http://www.drpetter.se/project_sfxr.html")
|
|
(license license:expat)))
|
|
|
|
(define-public physfs
|
|
(package
|
|
(name "physfs")
|
|
(version "2.0.3")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append
|
|
"http://icculus.org/physfs/downloads/physfs-"
|
|
version ".tar.bz2"))
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0sbbyqzqhyf0g68fcvvv20n3928j0x6ik1njmhn1yigvq2bj11na"))))
|
|
(build-system cmake-build-system)
|
|
(arguments
|
|
'(#:tests? #f)) ; no check target
|
|
(inputs
|
|
`(("zlib" ,zlib)))
|
|
(native-inputs
|
|
`(("doxygen" ,doxygen)))
|
|
(home-page "http://icculus.org/physfs")
|
|
(synopsis "File system abstraction library")
|
|
(description
|
|
"PhysicsFS is a library to provide abstract access to various archives.
|
|
It is intended for use in video games. For security, no file writing done
|
|
through the PhysicsFS API can leave a defined @emph{write directory}. For
|
|
file reading, a @emph{search path} with archives and directories is defined,
|
|
and it becomes a single, transparent hierarchical file system. So archive
|
|
files can be accessed in the same way as you access files directly on a disk,
|
|
and it makes it easy to ship a new archive that will override a previous
|
|
archive on a per-file basis.")
|
|
(license license:zlib)))
|
|
|
|
(define-public love
|
|
(package
|
|
(name "love")
|
|
(version "0.10.2")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://bitbucket.org/rude/love/downloads/"
|
|
"love-" version "-linux-src.tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"11x346pw0gqad8nmkmywzx4xpcbfc3dslbrdw5x94n1i25mk0sxj"))))
|
|
(build-system gnu-build-system)
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)))
|
|
(inputs
|
|
`(("devil" ,devil)
|
|
("freetype" ,freetype)
|
|
("libmodplug" ,libmodplug)
|
|
("libtheora" ,libtheora)
|
|
("libvorbis" ,libvorbis)
|
|
("luajit" ,luajit)
|
|
("mesa" ,mesa)
|
|
("mpg123" ,mpg123)
|
|
("openal" ,openal)
|
|
("physfs" ,physfs)
|
|
("sdl2" ,sdl2)
|
|
("zlib" ,zlib)))
|
|
(synopsis "2D game framework for Lua")
|
|
(description "LÖVE is a framework for making 2D games in the Lua
|
|
programming language.")
|
|
(home-page "https://love2d.org/")
|
|
(license license:zlib)))
|
|
|
|
(define-public allegro-4
|
|
(package
|
|
(name "allegro")
|
|
(version "4.4.2")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "http://download.gna.org/allegro/allegro/"
|
|
version "/allegro-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"1p0ghkmpc4kwij1z9rzxfv7adnpy4ayi0ifahlns1bdzgmbyf88v"))))
|
|
(build-system cmake-build-system)
|
|
(arguments
|
|
'(#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'unpack 'patch-build-system
|
|
(lambda _
|
|
;; Build addons as shared libraries. Trying to set ADDON_LINKAGE
|
|
;; via a command line option doesn't work because it is
|
|
;; unconditionally clobbered in the build script.
|
|
(substitute* '("CMakeLists.txt")
|
|
(("ADDON_LINKAGE STATIC")
|
|
"ADDON_LINKAGE SHARED"))
|
|
#t)))))
|
|
(inputs
|
|
`(("glu" ,glu)
|
|
("libpng" ,libpng)
|
|
("libvorbis" ,libvorbis)
|
|
("mesa" ,mesa)
|
|
("zlib" ,zlib)))
|
|
(synopsis "Game programming library")
|
|
(description "Allegro is a library mainly aimed at video game and
|
|
multimedia programming. It handles common, low-level tasks such as creating
|
|
windows, accepting user input, loading data, drawing images, playing sounds,
|
|
etc.")
|
|
(home-page "http://liballeg.org")
|
|
(license license:giftware)))
|
|
|
|
(define-public allegro
|
|
(package
|
|
(name "allegro")
|
|
(version "5.2.0")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "http://download.gna.org/allegro/allegro/"
|
|
version "/allegro-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"1mwzgzc4nb5k5zkbq7yrc6hg63yxq3wk69lmjag1h19x8b6njnmg"))))
|
|
(build-system cmake-build-system)
|
|
(arguments `(#:tests? #f)) ; there are no tests
|
|
(inputs
|
|
;; FIXME: Add the following optional inputs: xinput2, opensl, dumb
|
|
`(("flac" ,flac)
|
|
("freetype" ,freetype)
|
|
("glu" ,glu)
|
|
("gtk" ,gtk+-2)
|
|
("libjpeg" ,libjpeg)
|
|
("libpng" ,libpng)
|
|
("libtheora" ,libtheora)
|
|
("libvorbis" ,libvorbis)
|
|
("libxcursor" ,libxcursor)
|
|
("libxinerama" ,libxinerama)
|
|
("libxrandr" ,libxrandr)
|
|
("mesa" ,mesa)
|
|
("openal" ,openal)
|
|
("physfs" ,physfs)
|
|
("zlib" ,zlib)))
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)))
|
|
(synopsis "Game programming library")
|
|
(description "Allegro is a library mainly aimed at video game and
|
|
multimedia programming. It handles common, low-level tasks such as creating
|
|
windows, accepting user input, loading data, drawing images, playing sounds,
|
|
etc.")
|
|
(home-page "http://liballeg.org")
|
|
(license license:bsd-3)))
|
|
|
|
(define-public allegro-5.0
|
|
(package (inherit allegro)
|
|
(name "allegro")
|
|
(version "5.0.11")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "http://download.gna.org/allegro/allegro/"
|
|
version "/allegro-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0cd51qrh97jrr0xdmnivqgwljpmizg8pixsgvc4blqqlaz4i9zj9"))))))
|
|
|
|
(define-public aseprite
|
|
(package
|
|
(name "aseprite")
|
|
(version "1.1.1")
|
|
;; The release tarball isn't good enough because it's missing some
|
|
;; necessary code that is only in git submodules.
|
|
(source (origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/aseprite/aseprite.git")
|
|
(commit "v1.1.1")
|
|
(recursive? #t)))
|
|
(sha256
|
|
(base32
|
|
"1yr0l3bc68lyrffrzxgw98zznv8yz5ldl98lyvp6s5grny4s4jyk"))))
|
|
(build-system cmake-build-system)
|
|
(arguments
|
|
'(#:configure-flags
|
|
;; Use shared libraries instead of building bundled source.
|
|
(list "-DWITH_WEBP_SUPPORT=1"
|
|
"-DUSE_SHARED_CURL=1"
|
|
"-DUSE_SHARED_GIFLIB=1"
|
|
"-DUSE_SHARED_JPEGLIB=1"
|
|
"-DUSE_SHARED_ZLIB=1"
|
|
"-DUSE_SHARED_LIBPNG=1"
|
|
"-DUSE_SHARED_LIBLOADPNG=1"
|
|
"-DUSE_SHARED_LIBWEBP=1"
|
|
"-DUSE_SHARED_TINYXML=1"
|
|
"-DUSE_SHARED_PIXMAN=1"
|
|
"-DUSE_SHARED_FREETYPE=1"
|
|
"-DUSE_SHARED_ALLEGRO4=1"
|
|
"-DENABLE_UPDATER=0" ; no auto-updates
|
|
(string-append "-DFREETYPE_INCLUDE_DIR="
|
|
(assoc-ref %build-inputs "freetype")
|
|
"/include/freetype2"))))
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)))
|
|
;; TODO: Use a patched Allegro 4 that supports window resizing. This
|
|
;; patched version is bundled with Aseprite, but the patches should be
|
|
;; extracted and applied on top of a standalone Allegro 4 package.
|
|
(inputs
|
|
`(("allegro" ,allegro-4)
|
|
("curl" ,curl)
|
|
("freetype" ,freetype)
|
|
("giflib" ,giflib)
|
|
("libjpeg" ,libjpeg)
|
|
("libpng" ,libpng)
|
|
("libwebp" ,libwebp)
|
|
("libx11" ,libx11)
|
|
("libxext" ,libxext)
|
|
("libxxf86vm" ,libxxf86vm)
|
|
("pixman" ,pixman)
|
|
("tinyxml" ,tinyxml)
|
|
("zlib" ,zlib)))
|
|
(synopsis "Animated sprite editor and pixel art tool")
|
|
(description "Aseprite is a tool for creating 2D pixel art for video
|
|
games. In addition to basic pixel editing features, Aseprite can assist in
|
|
the creation of animations, tiled graphics, texture atlases, and more.")
|
|
(home-page "http://www.aseprite.org/")
|
|
(license license:gpl2+)))
|
|
|
|
(define-public qqwing
|
|
(package
|
|
(name "qqwing")
|
|
(version "1.3.4")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append
|
|
"https://qqwing.com/"
|
|
name "-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0bw0papyqjg22z6irf36gs54y8236wa37b6gyn2h1spy65n76lqp"))))
|
|
(build-system gnu-build-system)
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)))
|
|
(home-page "https://qqwing.com/")
|
|
(synopsis "Sudoku puzzle solver and generator")
|
|
(description
|
|
"QQWing is a Sudoku puzzle generator and solver.
|
|
It offers the following features:
|
|
@enumerate
|
|
@item Can solve 1000 puzzles in 1 second and generate 1000 puzzles in 25 seconds.
|
|
@item Uses logic. Uses as many solve techniques as possible when solving
|
|
puzzles rather than guessing.
|
|
@item Rates puzzles. Most generators don't give an indication of the difficulty
|
|
of a Sudoku puzzle. QQwing does.
|
|
@item Can print solve instructions for any puzzle.
|
|
@item Customizable output style, including a CSV style that is easy to
|
|
import into a database.
|
|
@end enumerate")
|
|
(license license:gpl2+)))
|
|
|
|
(define-public quesoglc
|
|
(package
|
|
(name "quesoglc")
|
|
(version "0.7.2")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "mirror://sourceforge/" name "/" version "/"
|
|
name "-" version "-free.tar.bz2"))
|
|
(sha256
|
|
(base32
|
|
"08ddhywdy2qg17m592ng3yr0p1ih96irg8wg729g75hsxxq9ipks"))))
|
|
(build-system gnu-build-system)
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
|
(inputs `(("fontconfig" ,fontconfig)
|
|
("freeglute" ,freeglut)
|
|
("fribidi" ,fribidi)
|
|
("glew" ,glew)))
|
|
(home-page "http://quesoglc.sourceforge.net")
|
|
(synopsis "Implementation of the OpenGL Character Renderer (GLC)")
|
|
(description
|
|
"The OpenGL Character Renderer (GLC) is a state machine that provides
|
|
OpenGL programs with character rendering services via an application programming
|
|
interface (API).")
|
|
(license (list license:expat license:lgpl2.1+))))
|
|
|
|
(define-public python-pygame
|
|
(package
|
|
(name "python-pygame")
|
|
(version "1.9.1")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "http://pygame.org/ftp/pygame-"
|
|
version "release.tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0cyl0ww4fjlf289pjxa53q4klyn55ajvkgymw0qrdgp4593raq52"))))
|
|
(build-system python-build-system)
|
|
(arguments
|
|
`(#:python ,python-2
|
|
#:tests? #f ; Tests require pygame to be installed first.
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
;; Set the paths to the dependencies manually because
|
|
;; the configure script does not allow passing them as
|
|
;; parameters. This also means we can skip the configure
|
|
;; phase.
|
|
(add-before 'build 'set-library-paths
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
(let ((sdl-ref (assoc-ref inputs "sdl"))
|
|
(font-ref (assoc-ref inputs "sdl-ttf"))
|
|
(image-ref (assoc-ref inputs "sdl-image"))
|
|
(mixer-ref (assoc-ref inputs "sdl-mixer"))
|
|
(smpeg-ref (assoc-ref inputs "libsmpeg"))
|
|
(png-ref (assoc-ref inputs "libpng"))
|
|
(jpeg-ref (assoc-ref inputs "libjpeg"))
|
|
(v4l-ref (assoc-ref inputs "v4l-utils"))
|
|
(out-ref (assoc-ref outputs "out")))
|
|
(substitute* "Setup.in"
|
|
(("SDL = -I/usr/include/SDL")
|
|
(string-append "SDL = -I" sdl-ref "/include/SDL -I.")))
|
|
(substitute* "Setup.in"
|
|
(("FONT = -lSDL_ttf")
|
|
(string-append "FONT = -I" font-ref "/include/SDL -L"
|
|
font-ref "/lib -lSDL_ttf")))
|
|
(substitute* "Setup.in"
|
|
(("IMAGE = -lSDL_image")
|
|
(string-append "IMAGE = -I" image-ref "/include/SDL -L"
|
|
image-ref "/lib -lSDL_image")))
|
|
(substitute* "Setup.in"
|
|
(("MIXER = -lSDL_mixer")
|
|
(string-append "MIXER = -I" mixer-ref "/include/SDL -L"
|
|
mixer-ref "/lib -lSDL_mixer")))
|
|
(substitute* "Setup.in"
|
|
(("SMPEG = -lsmpeg")
|
|
(string-append "SMPEG = -I" smpeg-ref "/include/smpeg -L"
|
|
smpeg-ref "/lib -lsmpeg")))
|
|
(substitute* "Setup.in"
|
|
(("PNG = -lpng")
|
|
(string-append "PNG = -I" png-ref "/include -L"
|
|
png-ref "/lib -lpng")))
|
|
(substitute* "Setup.in"
|
|
(("JPEG = -ljpeg")
|
|
(string-append "JPEG = -I" jpeg-ref "/include -L"
|
|
jpeg-ref "/lib -ljpeg")))
|
|
(substitute* "Setup.in"
|
|
(("^pypm") "#pypm"))
|
|
(substitute* "src/movie.c")
|
|
;; Create a path to a header file provided by v4l-utils.
|
|
(system* "mkdir" "linux")
|
|
(system* "ln" "--symbolic"
|
|
(string-append v4l-ref "/include/libv4l1-videodev.h")
|
|
"linux/videodev.h")
|
|
(system* "ln" "--symbolic" "Setup.in" "Setup")))))))
|
|
(inputs
|
|
`(("sdl" ,sdl)
|
|
("sdl-image" ,sdl-image)
|
|
("sdl-mixer" ,sdl-mixer)
|
|
("sdl-ttf" ,sdl-ttf)
|
|
("sdl-gfx" ,sdl-gfx)
|
|
("libjpeg" ,libjpeg)
|
|
("libpng" ,libpng)
|
|
("libX11" ,libx11)
|
|
("libsmpeg" ,libsmpeg)
|
|
("portmidi" ,portmidi)
|
|
("v4l-utils" ,v4l-utils)))
|
|
(home-page "http://www.pygame.org")
|
|
(synopsis "SDL wrapper for Python")
|
|
(description "Pygame is a set of Python modules designed for writing games.
|
|
Pygame adds functionality on top of the excellent SDL library. This allows you
|
|
to create fully featured games and multimedia programs in the python language.")
|
|
(license (list license:bsd-2
|
|
;; python numeric license as listed by Debian looks like
|
|
;; an Expat-style license with a warranty disclaimer for
|
|
;; the U.S. government and the University of California.
|
|
license:expat
|
|
license:lgpl2.0+
|
|
license:lgpl2.1+
|
|
license:gpl3+
|
|
license:psfl
|
|
license:public-domain
|
|
license:lgpl2.1+))))
|