gnu: celestia: Update to 1.6.4-0.d3f4040.

This is a follow-up to 51640e4820.

Celestia is built from the latest commit providing Qt6 support and many
other new features.

* gnu/packages/astronomy.scm (celestia): Update to 1.6.4-0.d3f4040.
[buld-system]: Switch to cmake-build-system.
[arguments] <configure-flags>: Adjust it for the build.
<phases>: Remove 'patch-lua-version; add 'install-content.
[inputs]: Remove freeglut and libtheora; add eigen, ffmpeg, fmt,
freetype, gperf, libavif, libepoxy, qtbase, and qtwayland.
[propagated-inputs]: Add perl.
[native-inputs]: Remove autoconf, automake, libgit2, libtool, and perl;
add boost and celestia-content.

Change-Id: Ida03597bd9c2d5de31322b3aae88baa6b007889c

gnu/packages/astronomy.scm

@@ -78,12 +78,14 @@
   #:use-module (gnu packages golang)
   #:use-module (gnu packages golang-maths)
   #:use-module (gnu packages golang-xyz)
+  #:use-module (gnu packages gperf)
   #:use-module (gnu packages gps)
   #:use-module (gnu packages graph)
   #:use-module (gnu packages graphviz)
   #:use-module (gnu packages gtk)
   #:use-module (gnu packages image)
   #:use-module (gnu packages image-processing)
+  #:use-module (gnu packages imagemagick)
   #:use-module (gnu packages jupyter)
   #:use-module (gnu packages libevent)
   #:use-module (gnu packages libusb)
@@ -540,57 +542,64 @@ Library with namespaces, exception handling, and member template functions.")
                                    "See License.txt in the distribution."))))
 
 (define-public celestia
+  ;; 1.6.4 was placed in 2023 while master migrated to Qt6, use the lates
+  ;; commit for now.
+  (let ((commit "d3f4040401f5f71bcca79e55d53be75c05b867ef")
+        (revision "0"))
     (package
       (name "celestia")
-    (version "1.6.4")
+      (version (git-version "1.6.4" revision commit))
       (source
        (origin
          (method git-fetch)
          (uri (git-reference
                 (url "https://github.com/celestiaproject/celestia")
-             (commit version)))
+                (commit commit)))
          (file-name (git-file-name name version))
          (sha256
-        (base32 "0nz9k5nd2zmrbwj1qhsfwmvqymqk8c4yjxpybck44isrild2ah9j"))))
-    (build-system gnu-build-system)
+          (base32 "0rqkzxyf8gfjprhj1c19d7chhc3b94wlq2119wz0c344rx7hnh9l"))))
+      (build-system cmake-build-system)
       (arguments
        (list
-      #:modules
-      `((guix build gnu-build-system)
-        (guix build utils)
-        (srfi srfi-1)
-        (srfi srfi-71))
+        #:tests? #f     ;no tests were found
         #:configure-flags
-      #~(list "--with-glut"
-              (string-append "--with-lua=" #$(this-package-input "lua")))
+        #~(list "-DENABLE_FFMPEG=ON"
+                "-DENABLE_GLES=ON"
+                "-DENABLE_LIBAVIF=ON"
+                "-DENABLE_QT6=ON"
+                "-DENABLE_TOOLS=ON"
+                "-DUSE_QT6=ON")
         #:phases
         #~(modify-phases %standard-phases
-          (add-after 'unpack 'patch-lua-version
+            ;; TODO: Wrap celestia-content instead of copping it, if posible.
+            (add-after 'install 'install-content
               (lambda _
-              (let* ((_ version (package-name->name+version
-                                 #$(this-package-input "lua")))
-                     (components (string-split version #\.))
-                     (major+minor (string-join (take components 2) ".")))
-                (substitute* "configure.ac"
-                  (("lua5.3")
-                   (string-append "lua-" major+minor)))))))))
+                (copy-recursively
+                 (string-append #$(this-package-native-input "celestia-content")
+                                "/share")
+                 (string-append #$output "/share")))))))
       (native-inputs
-     (list autoconf
-           automake
+       (list boost
+             celestia-content
              gettext-minimal
-           libgit2
-           libtool
-           perl
              pkg-config))
       (inputs
-     (list freeglut
+       (list eigen
+             ffmpeg
+             fmt
+             freetype
              glu
+             gperf
+             libavif
+             libepoxy
              libjpeg-turbo
              libpng
-           libtheora
-           mesa))
+             mesa
+             qtbase
+             qtwayland))
       (propagated-inputs
-     (list lua))
+       (list lua
+             perl))
       (home-page "https://celestia.space/")
       (synopsis "Real-time 3D visualization of space")
       (description
@@ -600,7 +609,7 @@ From planets and moons to star clusters and galaxies, you can visit every
 object in the expandable database and view it from any point in space and
 time.  The position and movement of solar system objects is calculated
 accurately in real time at any rate desired.")
-    (license license:gpl2+)))
+      (license license:gpl2+))))
 
 (define-public celestia-content
   ;; No rleases or version tags.