From ac2f824c5621c60bf399cf7213de765cd1cb980b Mon Sep 17 00:00:00 2001
From: Patrick Norton <patrick.147.norton@gmail.com>
Date: Fri, 7 Nov 2025 07:52:03 -0500
Subject: [PATCH] gnu: Add freecell-solver.

* gnu/packages/games.scm (freecell-solver): New variable.

Change-Id: Ifa4306e228a8d51ac19116a5074b08cfb978e977
Signed-off-by: Liliana Marie Prikler <liliana.prikler@gmail.com>
---
 gnu/packages/games.scm | 62 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 62 insertions(+)

diff --git a/gnu/packages/games.scm b/gnu/packages/games.scm
index 8163373677f515bd5f30a8e2356e8945d8b565b9..60641b192603097e67007d2de61f20eb3bb677cc 100644
--- a/gnu/packages/games.scm
+++ b/gnu/packages/games.scm
@@ -187,6 +187,7 @@
   #:use-module (gnu packages lesstif)
   #:use-module (gnu packages libcanberra)
   #:use-module (gnu packages libedit)
+  #:use-module (gnu packages libffi)
   #:use-module (gnu packages libidn)
   #:use-module (gnu packages libunwind)
   #:use-module (gnu packages libusb)
@@ -2244,6 +2245,67 @@ kthieves, ktowers, xmille and xreversi.")
 similar variants of Card Solitaire such as Golf, and All in a Row.")
     (license license:expat)))
 
+(define-public freecell-solver
+  (package
+    (name "freecell-solver")
+    (version "6.14.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append
+             "https://fc-solve.shlomifish.org/downloads/fc-solve/freecell-solver-"
+             version ".tar.xz"))
+       (sha256
+        (base32 "1p775imxqycpky3j3pa5whzqcxjbr3kv2z1d20hxbg12akc2a48x"))))
+    (build-system cmake-build-system)
+    (arguments
+     (list
+      #:configure-flags
+      #~(list "-DFCS_DISABLE_PATSOLVE=1")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'delete-failing-tests
+            (lambda _
+              (delete-file "t/t/tidyall.t")
+              (delete-file "t/t/sh-shabang.t")
+              (delete-file "t/t/py-flake8.t")
+              (delete-file "t/t/style-trailing-space.t"))))))
+    ;; TODO: These inputs wind up propagating both perl-moo and perl-moo-2,
+    ;; which are mutually incompatible
+    (native-inputs
+     (list cmocka
+           `(,glib "bin")
+           gperf
+           perl
+           perl-chi
+           perl-file-find-object
+           perl-file-find-object-rule
+           perl-moo-2
+           perl-number-compare
+           perl-path-tiny-0.150
+           perl-task-freecellsolver-testing
+           perl-task-test-run-allplugins
+           perl-test-runvalgrind
+           perl-template-toolkit
+           perl-code-tidyall-plugin-testcount
+           pkg-config
+           python
+           python-cffi
+           python-freecell-solver
+           python-pycotap
+           python-six
+           the-silver-searcher
+           tidyall))
+    (inputs (list rinutils))
+    (propagated-inputs (list python-pysol-cards))
+    (home-page "https://fc-solve.shlomifish.org/")
+    (synopsis "Solver of various solitaire games")
+    (description
+     "Freecell Solver is a program that automatically solves layouts of Freecell and
+similar variants of Card Solitaire such as Eight Off, Forecell, and Seahaven Towers, as
+well as Simple Simon boards.")
+    (license license:expat)))
+
 (define-public knightsgame
   (package
     (name "knightsgame")