360 lines
16 KiB
Scheme
360 lines
16 KiB
Scheme
;;; GNU Guix --- Functional package management for GNU
|
|
;;; Copyright © 2013 Cyril Roelandt <tipecaml@gmail.com>
|
|
;;; Copyright © 2014 Mark H Weaver <mhw@netris.org>
|
|
;;; Copyright © 2014 Eric Bavier <bavier@member.fsf.org>
|
|
;;; Copyright © 2014 Ian Denhardt <ian@zenhack.net>
|
|
;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com>
|
|
;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
|
|
;;; Copyright © 2017, 2018, 2020 Marius Bakke <mbakke@fastmail.com>
|
|
;;; Copyright © 2018 Arun Isaac <arunisaac@systemreboot.net>
|
|
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
|
|
;;; Copyright © 2019 Maxim Cournoyer <maxim.cournoyer@gmail.com>
|
|
;;; Copyright © 2019 Pierre-Moana Levesque <pierre.moana.levesque@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 cmake)
|
|
#:use-module ((guix licenses) #:prefix license:)
|
|
#:use-module (guix packages)
|
|
#:use-module (guix download)
|
|
#:use-module (guix utils)
|
|
#:use-module (guix deprecation)
|
|
#:use-module (guix build-system gnu)
|
|
#:use-module (guix build-system cmake)
|
|
#:use-module (guix build-system emacs)
|
|
#:use-module (gnu packages)
|
|
#:use-module (gnu packages backup)
|
|
#:use-module (gnu packages compression)
|
|
#:use-module (gnu packages crypto)
|
|
#:use-module (gnu packages curl)
|
|
#:use-module (gnu packages file)
|
|
#:use-module (gnu packages libevent)
|
|
#:use-module (gnu packages ncurses)
|
|
#:use-module (gnu packages serialization)
|
|
#:use-module (gnu packages sphinx)
|
|
#:use-module (gnu packages texinfo)
|
|
#:use-module (gnu packages xml)
|
|
#:use-module (ice-9 match)
|
|
#:use-module (srfi srfi-1))
|
|
|
|
;;; Build phases shared between 'cmake-bootstrap' and the later variants
|
|
;;; that use cmake-build-system.
|
|
(define %common-build-phases
|
|
`((add-after 'unpack 'split-package
|
|
;; Remove files that have been packaged in other package recipes.
|
|
(lambda _
|
|
(delete-file "Auxiliary/cmake-mode.el")
|
|
(substitute* "Auxiliary/CMakeLists.txt"
|
|
((".*cmake-mode.el.*") ""))
|
|
#t))
|
|
(add-after 'unpack 'use-system-libarchive
|
|
;; 'Source/cm_get_date.c' includes archive_getdate.c wholesale,
|
|
;; so it needs to be available along with the header file.
|
|
(lambda* (#:key native-inputs inputs #:allow-other-keys)
|
|
(let ((libarchive-source (assoc-ref (or native-inputs inputs)
|
|
"libarchive:source"))
|
|
;; XXX: We can not use ,(package-version libarchive) here due to
|
|
;; a cyclic module reference at the top-level.
|
|
(libarchive-version "3.4.1")
|
|
(files-to-unpack '("libarchive/archive_getdate.c"
|
|
"libarchive/archive_getdate.h")))
|
|
(mkdir-p "Utilities/cmlibarchive")
|
|
(apply invoke "tar" "-xvf" libarchive-source
|
|
"--strip-components=1"
|
|
"-C" "Utilities/cmlibarchive"
|
|
(map (lambda (file)
|
|
(string-append "libarchive-" libarchive-version
|
|
"/" file))
|
|
files-to-unpack))
|
|
#t)))
|
|
(add-before 'configure 'patch-bin-sh
|
|
(lambda _
|
|
;; Replace "/bin/sh" by the right path in... a lot of
|
|
;; files.
|
|
(substitute*
|
|
'("Modules/CompilerId/Xcode-3.pbxproj.in"
|
|
"Modules/Internal/CPack/CPack.RuntimeScript.in"
|
|
"Source/cmGlobalXCodeGenerator.cxx"
|
|
"Source/cmLocalUnixMakefileGenerator3.cxx"
|
|
"Source/cmExecProgramCommand.cxx"
|
|
"Utilities/Release/release_cmake.cmake"
|
|
"Tests/CMakeLists.txt"
|
|
"Tests/RunCMake/File_Generate/RunCMakeTest.cmake")
|
|
(("/bin/sh") (which "sh")))
|
|
#t))))
|
|
|
|
(define %common-disabled-tests
|
|
'(;; This test copies libgcc_s.so.1 from GCC and tries to modify its RPATH,
|
|
;; but does not cope with the file being read-only.
|
|
"BundleUtilities"
|
|
;; This test requires network access.
|
|
"CTestTestUpload"
|
|
;; This test requires 'ldconfig' which is not available in Guix.
|
|
"RunCMake.install"))
|
|
|
|
;;; The "bootstrap" CMake. It is used to build 'cmake-minimal' below, as well
|
|
;;; as any dependencies that need cmake-build-system.
|
|
(define-public cmake-bootstrap
|
|
(package
|
|
(name "cmake-bootstrap")
|
|
(version "3.16.3")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://www.cmake.org/files/v"
|
|
(version-major+minor version)
|
|
"/cmake-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0s06wrp0jnw2l4yq94skj53hwnz7lqrmhh96sq7w7njkkggickz5"))
|
|
(modules '((guix build utils)
|
|
(ice-9 ftw)))
|
|
(snippet
|
|
'(begin
|
|
(with-directory-excursion "Utilities"
|
|
;; CMake bundles its dependencies below "Utilities" with a
|
|
;; "cm" prefix in the directory name. Delete those to ensure
|
|
;; the system libraries are used.
|
|
(for-each delete-file-recursively
|
|
(scandir
|
|
"."
|
|
(lambda (file)
|
|
(and (string-prefix? "cm" file)
|
|
(eq? 'directory (stat:type (stat file)))
|
|
|
|
;; These inputs are required to bootstrap
|
|
;; the initial build system. They are
|
|
;; deleted in 'cmake-minimal' below.
|
|
;; TODO: Consider building jsoncpp with
|
|
;; Meson instead, once meson-build-system
|
|
;; learns cross-compilation.
|
|
(not (string=? "cmjsoncpp" file))
|
|
(not (string=? "cmlibuv" file)))))))
|
|
#t))
|
|
(patches (search-patches "cmake-curl-certificates.patch"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
`(#:test-target "test"
|
|
#:configure-flags
|
|
(let ((out (assoc-ref %outputs "out"))
|
|
(parallel-job-count (number->string (parallel-job-count))))
|
|
(list "--verbose"
|
|
(string-append "--parallel=" parallel-job-count)
|
|
(string-append "--prefix=" out)
|
|
"--system-libs"
|
|
"--no-system-jsoncpp"
|
|
;; By default, the man pages and other docs land
|
|
;; in PREFIX/man and PREFIX/doc, but we want them
|
|
;; in share/{man,doc}. Note that unlike
|
|
;; autoconf-generated configure scripts, cmake's
|
|
;; configure prepends "PREFIX/" to what we pass
|
|
;; to --mandir and --docdir.
|
|
"--mandir=share/man"
|
|
,(string-append "--docdir=share/doc/cmake-"
|
|
(version-major+minor version))
|
|
|
|
;; By default CMake is built without any optimizations. Use
|
|
;; the recommended Release target for a ~2.5x speedup.
|
|
"--" "-DCMAKE_BUILD_TYPE=Release"))
|
|
#:make-flags
|
|
(let ((skipped-tests
|
|
(list ,@%common-disabled-tests
|
|
"CTestTestSubdir" ; This test fails to build 2 of the 3 tests.
|
|
;; This test fails when ARGS (below) is in use, see
|
|
;; <https://gitlab.kitware.com/cmake/cmake/issues/17165>.
|
|
"CTestCoverageCollectGCOV")))
|
|
(list
|
|
(string-append
|
|
;; These arguments apply for the tests only.
|
|
"ARGS=-j " (number->string (parallel-job-count))
|
|
" --output-on-failure"
|
|
" --exclude-regex ^\\(" (string-join skipped-tests "\\|") "\\)$")))
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
,@%common-build-phases
|
|
(add-before 'configure 'set-paths
|
|
(lambda _
|
|
;; Help cmake's bootstrap process to find system libraries
|
|
(begin
|
|
(setenv "CMAKE_LIBRARY_PATH" (getenv "LIBRARY_PATH"))
|
|
(setenv "CMAKE_INCLUDE_PATH" (or (getenv "CPATH")
|
|
(getenv "C_INCLUDE_PATH")))
|
|
#t)))
|
|
;; CMake uses its own configure script.
|
|
(replace 'configure
|
|
(lambda* (#:key (configure-flags '()) #:allow-other-keys)
|
|
(apply invoke "./configure" configure-flags))))))
|
|
(native-inputs
|
|
`(("bzip2" ,bzip2)
|
|
("curl" ,curl-minimal)
|
|
("expat" ,expat)
|
|
("file" ,file)
|
|
("libarchive" ,libarchive)
|
|
("libarchive:source" ,(package-source libarchive))
|
|
("libuv" ,libuv)
|
|
("rhash" ,rhash)
|
|
("zlib" ,zlib)))
|
|
(inputs
|
|
`(("ncurses" ,ncurses))) ; required for ccmake
|
|
(native-search-paths
|
|
(list (search-path-specification
|
|
(variable "CMAKE_PREFIX_PATH")
|
|
(files '("")))
|
|
;; "cmake-curl-certificates.patch" changes CMake to honor 'SSL_CERT_DIR'
|
|
;; and 'SSL_CERT_FILE', hence these search path entries.
|
|
(search-path-specification
|
|
(variable "SSL_CERT_DIR")
|
|
(separator #f) ;single entry
|
|
(files '("etc/ssl/certs")))
|
|
(search-path-specification
|
|
(variable "SSL_CERT_FILE")
|
|
(file-type 'regular)
|
|
(separator #f) ;single entry
|
|
(files '("etc/ssl/certs/ca-certificates.crt")))))
|
|
(home-page "https://cmake.org/")
|
|
(synopsis "Cross-platform build system")
|
|
(description
|
|
"CMake is a family of tools designed to build, test and package software.
|
|
CMake is used to control the software compilation process using simple platform
|
|
and compiler independent configuration files. CMake generates native makefiles
|
|
and workspaces that can be used in the compiler environment of your choice.")
|
|
(properties '((hidden? . #t)))
|
|
(license (list license:bsd-3 ; cmake
|
|
license:expat ; cmjsoncpp is dual MIT/public domain
|
|
license:public-domain)))) ; cmlibarchive/archive_getdate.c
|
|
|
|
;;; This minimal variant of CMake does not include the documentation. It is
|
|
;;; used by the cmake-build-system.
|
|
(define-public cmake-minimal
|
|
(package
|
|
(inherit cmake-bootstrap)
|
|
(name "cmake-minimal")
|
|
(source (origin
|
|
(inherit (package-source cmake-bootstrap))
|
|
(snippet
|
|
(match (origin-snippet (package-source cmake-bootstrap))
|
|
((begin exp ...)
|
|
;; Now we can delete the remaining software bundles.
|
|
(append '(begin
|
|
(for-each delete-file-recursively
|
|
'("Utilities/cmjsoncpp"
|
|
"Utilities/cmlibuv")))
|
|
exp))))))
|
|
(native-inputs
|
|
`(("curl" ,curl)
|
|
("jsoncpp" ,jsoncpp)
|
|
,@(alist-delete "curl" (package-native-inputs cmake-bootstrap))))
|
|
(build-system cmake-build-system)
|
|
(arguments
|
|
`(#:configure-flags
|
|
(list "-DCMAKE_USE_SYSTEM_LIBRARIES=ON"
|
|
(string-append "-DCMAKE_DOC_DIR=share/doc/cmake-"
|
|
,(version-major+minor (package-version
|
|
cmake-bootstrap))))
|
|
|
|
;; This is the CMake used in cmake-build-system. Ensure compiler
|
|
;; optimizations are enabled to save size and CPU cycles.
|
|
#:build-type "Release"
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
,@%common-build-phases
|
|
(replace 'check
|
|
(lambda* (#:key tests? parallel-tests? #:allow-other-keys)
|
|
(let ((skipped-tests (list ,@%common-disabled-tests
|
|
;; This test requires the bundled libuv.
|
|
"BootstrapTest")))
|
|
(if tests?
|
|
(begin
|
|
(invoke "ctest" "-j" (if parallel-tests?
|
|
(number->string (parallel-job-count))
|
|
"1")
|
|
"--exclude-regex"
|
|
(string-append "^(" (string-join skipped-tests "|") ")$")))
|
|
(format #t "test suite not run~%"))
|
|
#t))))
|
|
,@(if (%current-target-system)
|
|
'()
|
|
`(#:cmake ,cmake-bootstrap))))))
|
|
|
|
;;; The "user-facing" CMake, now with manuals and HTML documentation.
|
|
(define-public cmake
|
|
(package
|
|
(inherit cmake-minimal)
|
|
(name "cmake")
|
|
(arguments
|
|
(substitute-keyword-arguments (package-arguments cmake-minimal)
|
|
;; Use cmake-minimal this time.
|
|
((#:cmake _ #f)
|
|
(if (%current-target-system)
|
|
cmake-minimal-cross
|
|
cmake-minimal))
|
|
((#:configure-flags flags ''())
|
|
`(append (list "-DSPHINX_INFO=ON" "-DSPHINX_MAN=ON" "-DSPHINX_HTML=ON"
|
|
(string-append "-DCMAKE_DOC_DIR=share/doc/cmake-"
|
|
,(version-major+minor (package-version
|
|
cmake-minimal)))
|
|
"-DCMAKE_INFO_DIR=share/info"
|
|
"-DCMAKE_MAN_DIR=share/man")
|
|
,flags))
|
|
((#:phases phases)
|
|
`(modify-phases ,phases
|
|
(add-after 'install 'move-html-doc
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(let ((out (assoc-ref outputs "out"))
|
|
(doc (assoc-ref outputs "doc"))
|
|
(html (string-append "/share/doc/cmake-"
|
|
,(version-major+minor
|
|
(package-version cmake-minimal))
|
|
"/html")))
|
|
(copy-recursively (string-append out html)
|
|
(string-append doc html))
|
|
(delete-file-recursively (string-append out html))
|
|
#t)))))))
|
|
;; Extra inputs required to build the documentation.
|
|
(native-inputs
|
|
`(,@(package-native-inputs cmake-minimal)
|
|
("python-sphinx" ,python-sphinx)
|
|
("texinfo" ,texinfo)))
|
|
(outputs '("out" "doc"))
|
|
(properties (alist-delete 'hidden? (package-properties cmake-minimal)))))
|
|
|
|
(define-public cmake-minimal-cross
|
|
(package
|
|
(inherit cmake-minimal)
|
|
(name "cmake-minimal-cross")
|
|
(native-search-paths '())
|
|
(search-paths
|
|
(package-native-search-paths cmake-minimal))))
|
|
|
|
(define-public emacs-cmake-mode
|
|
(package
|
|
(inherit cmake)
|
|
(name "emacs-cmake-mode")
|
|
(native-inputs '())
|
|
(inputs '())
|
|
(outputs '("out"))
|
|
(build-system emacs-build-system)
|
|
(arguments
|
|
`(#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'unpack 'chdir-elisp
|
|
;; Elisp directory is not in root of the source.
|
|
(lambda _
|
|
(chdir "Auxiliary")
|
|
#t)))))
|
|
(synopsis "Emacs major mode for editing Cmake expressions")
|
|
(description "@code{cmakeos-mode} provides an Emacs major mode for editing
|
|
Cmake files. It supports syntax highlighting, indenting and refilling of
|
|
comments.")))
|