[bug#27691] [PATCH 2/2] gnu: Add t-engine.

[Oleg Pykhalov <go.wigust@gmail.com>]

* gnu/packages/games.scm (t-engine): New variable.
---
 gnu/packages/games.scm                             | 90 ++++++++++++++++++++++
 .../patches/t-engine-add-desktop-file.patch        | 27 +++++++
 .../t-engine-add-shell-wrapper-for-launching.patch | 23 ++++++
 gnu/packages/patches/t-engine-fix-sdl-h-path.patch | 39 ++++++++++
 4 files changed, 179 insertions(+)
 create mode 100644 gnu/packages/patches/t-engine-add-desktop-file.patch
 create mode 100644 gnu/packages/patches/t-engine-add-shell-wrapper-for-launching.patch
 create mode 100644 gnu/packages/patches/t-engine-fix-sdl-h-path.patch

diff --git a/gnu/packages/games.scm b/gnu/packages/games.scm
index 2bef92b93..fe08ffe5d 100644
--- a/gnu/packages/games.scm
+++ b/gnu/packages/games.scm
@@ -4578,3 +4578,93 @@ computer-hosted roleplaying games.  This is the last version released by
 Crowther & Woods, its original authors, in 1995.  It has been known as
 \"adventure 2.5\" and \"430-point adventure\".")
       (license license:bsd-2))))
+
+(define-public tome4
+  (package
+    (name "tome4")
+    (version "1.5.5")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "https://te4.org/dl/t-engine/t-engine4-src-"
+			   version ".tar.bz2"))
+       (sha256
+	(base32
+	 "0v2qgdfpvdzd1bcbp9v8pfahj1bgczsq2d4xfhh5wg11jgjcwz03"))
+       (patches (search-patches "t-engine-fix-sdl-h-path.patch"
+				"t-engine-add-shell-wrapper-for-launching.patch"
+				"t-engine-add-desktop-file.patch"))))
+    (build-system gnu-build-system)
+    (native-inputs
+     `(("unzip" ,unzip)))
+    (inputs
+     `(("sdl-union" ,(sdl-union (list sdl2 sdl2-image sdl2-mixer sdl2-ttf)))
+       ("glu" ,glu)
+       ("premake4" ,premake4)
+       ("openal" ,openal)
+       ("vorbis" ,libvorbis)
+       ("luajit" ,luajit)))
+    (arguments
+     `(#:make-flags '("CC=gcc" "config=release")
+       #:phases (modify-phases %standard-phases
+		  (replace 'configure
+		    (lambda _
+		      (zero? (system* "premake4" "gmake"))))
+		  (add-after 'set-paths 'set-sdl-paths
+		    (lambda* (#:key inputs #:allow-other-keys)
+		      (setenv "CPATH"
+			      (string-append (assoc-ref inputs "sdl-union")
+					     "/include/SDL2"))))
+		  (add-after 'unpack 'fix-path
+		    (lambda* (#:key inputs outputs #:allow-other-keys)
+		      (substitute* "tome4"
+			(("cd \"/opt")
+			 (string-append "cd \"" (assoc-ref outputs "out") "/usr/games")))
+		      (substitute* "tome4.desktop"
+			(("Exec=/usr")
+			 (string-append "Exec=" (assoc-ref outputs "out") "/usr")))
+		      #t))
+		  (delete 'check)
+		  ;; premake4 doesn't provide install target
+		  (replace 'install
+		    (lambda* (#:key inputs outputs #:allow-other-keys)
+		      (let* ((out (assoc-ref outputs "out"))
+			     (usr (string-append out "/usr"))
+			     (bin (string-append out "/bin"))
+			     (share (string-append usr "/share"))
+			     (pixmaps (string-append share "/pixmaps"))
+			     (data (string-append usr "/games/tome4"))
+			     (unzip (string-append (assoc-ref inputs "unzip") "/bin/unzip")))
+			;; icon
+			(mkdir-p pixmaps)
+			(system* unzip "-j" "game/engines/te4-1.5.5.teae"
+				 "data/gfx/te4-icon.png" "-d" pixmaps)
+			;; game executable
+			(install-file "t-engine" data)
+			;; licenses
+			(for-each (lambda (file)
+				    (install-file file (string-append share "/licenses")))
+				  '("COPYING" "COPYING-MEDIA"))
+			;; documents
+			(for-each (lambda (file)
+				    (install-file file (string-append share "/doc")))
+				  '("CONTRIBUTING" "CREDITS"))
+			;; data
+			(copy-recursively "bootstrap" (string-append data "/bootstrap"))
+			(copy-recursively "game" (string-append data "/game"))
+			;; launcher
+			(install-file "tome4" bin)
+			(chmod (string-append bin "/tome4") #o555)
+			(install-file "tome4.desktop" (string-append share "/applications")))
+		      #t)))))
+    (home-page "https://te4.org")
+    (synopsis "Roguelike RPG")
+    (description "Tales of Maj’Eyal (ToME) is a free, open source roguelike
+RPG, featuring tactical turn-based combat and advanced character building.
+Play as one of many unique races and classes in the lore-filled world of Eyal,
+exploring random dungeons, facing challenging battles, and developing
+characters with your own tailored mix of abilities and powers.  With a modern
+graphical and customisable interface, intuitive mouse control, streamlined
+mechanics and deep, challenging combat, Tales of Maj’Eyal offers engaging
+roguelike gameplay for the 21st century.")
+    (license license:gpl3+)))
diff --git a/gnu/packages/patches/t-engine-add-desktop-file.patch b/gnu/packages/patches/t-engine-add-desktop-file.patch
new file mode 100644
index 000000000..80fd82478
--- /dev/null
+++ b/gnu/packages/patches/t-engine-add-desktop-file.patch
@@ -0,0 +1,27 @@
+From b8e207e145938f7a0f23d1c5107d532ebb9de720 Mon Sep 17 00:00:00 2001
+From: Oleg Pykhalov <go.wigust@gmail.com>
+Date: Fri, 14 Jul 2017 11:19:37 +0300
+Subject: [PATCH] Add desktop file.
+
+---
+ tome4.desktop | 8 ++++++++
+ 1 file changed, 8 insertions(+)
+ create mode 100644 tome4.desktop
+
+diff --git a/tome4.desktop b/tome4.desktop
+new file mode 100644
+index 000000000..c5d67f0cf
+--- /dev/null
++++ b/tome4.desktop
+@@ -0,0 +1,8 @@
++[Desktop Entry]
++Name=ToME4
++Comment=An open-source, single-player, role-playing roguelike game set in the world of Eyal.
++Exec=/usr/bin/tome4
++Icon=tome4.png
++Terminal=false
++Type=Application
++Categories=Game;RolePlaying;
+-- 
+2.13.2
+
diff --git a/gnu/packages/patches/t-engine-add-shell-wrapper-for-launching.patch b/gnu/packages/patches/t-engine-add-shell-wrapper-for-launching.patch
new file mode 100644
index 000000000..4df93c057
--- /dev/null
+++ b/gnu/packages/patches/t-engine-add-shell-wrapper-for-launching.patch
@@ -0,0 +1,23 @@
+From f10d89912989e0f071855ab2c20d62b318d313fc Mon Sep 17 00:00:00 2001
+From: Oleg Pykhalov <go.wigust@gmail.com>
+Date: Fri, 14 Jul 2017 11:17:26 +0300
+Subject: [PATCH] Add shell wrapper for launching.
+
+---
+ tome4 | 4 ++++
+ 1 file changed, 4 insertions(+)
+ create mode 100644 tome4
+
+diff --git a/tome4 b/tome4
+new file mode 100644
+index 000000000..2b623e467
+--- /dev/null
++++ b/tome4
+@@ -0,0 +1,4 @@
++#!/usr/bin/sh
++cd "/opt/tome4"
++./t-engine &
++exit
+-- 
+2.13.2
+
diff --git a/gnu/packages/patches/t-engine-fix-sdl-h-path.patch b/gnu/packages/patches/t-engine-fix-sdl-h-path.patch
new file mode 100644
index 000000000..dd550632d
--- /dev/null
+++ b/gnu/packages/patches/t-engine-fix-sdl-h-path.patch
@@ -0,0 +1,39 @@
+From 2c3eedcccf2da85cffa08baefa6e437c819276e6 Mon Sep 17 00:00:00 2001
+From: Oleg Pykhalov <go.wigust@gmail.com>
+Date: Mon, 3 Apr 2017 16:20:48 +0300
+Subject: [PATCH] Fix make -k config=release for GNUC
+
+---
+ src/music.h | 2 +-
+ src/tSDL.h  | 2 +-
+ 2 files changed, 2 insertions(+), 2 deletions(-)
+
+diff --git a/src/music.h b/src/music.h
+index 894426cb8..c8490e456 100644
+--- a/src/music.h
++++ b/src/music.h
+@@ -27,7 +27,7 @@
+ #include <vorbis/vorbisfile.h>
+ #include <SDL2/SDL.h>
+ #include <SDL2/SDL_thread.h>
+-#elif defined(__FreeBSD__)
++#elif defined(__FreeBSD__) || defined(__GNUC__)
+ #include <AL/al.h>
+ #include <AL/alc.h>
+ #include <vorbis/vorbisfile.h>
+diff --git a/src/tSDL.h b/src/tSDL.h
+index a7d36c92f..4f7690255 100644
+--- a/src/tSDL.h
++++ b/src/tSDL.h
+@@ -3,7 +3,7 @@
+ #include <SDL2_ttf/SDL_ttf.h>
+ //#include <SDL2_mixer/SDL_mixer.h>
+ #include <SDL2_image/SDL_image.h>
+-#elif defined(__FreeBSD__)
++#elif defined(__FreeBSD__) || defined(__GNUC__)
+ #include <SDL2/SDL.h>
+ #include <SDL2/SDL_ttf.h>
+ //#include <SDL2/SDL_mixer.h>
+-- 
+2.13.2
+
-- 
2.13.2