;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2015, 2016, 2021, 2022 Ludovic Courtès ;;; Copyright © 2015 Tomáš Čech ;;; Copyright © 2016, 2019 Leo Famulari ;;; Copyright © 2016, 2017, 2019, 2023 Ricardo Wurmus ;;; Copyright © 2016, 2018, 2021, 2023 Efraim Flashner ;;; Copyright © 2016 Andreas Enge ;;; Copyright © 2017 Manolis Fragkiskos Ragkousis ;;; Copyright © 2017, 2018 Ben Woodcroft ;;; Copyright © 2017–2021 Tobias Geerinckx-Rice ;;; Copyright © 2018 Mathieu Othacehe ;;; Copyright © 2018 Alex Kost ;;; Copyright © 2018 Kei Kebreau ;;; Copyright © 2019, 2020 Mark H Weaver ;;; Copyright © 2019 Carlo Zancanaro ;;; Copyright © 2019 Steve Sprang ;;; Copyright © 2019 John Soo ;;; Copyright © 2019 Pierre Neidhardt ;;; Copyright © 2019, 2020 Marius Bakke ;;; Copyright © 2019 Tanguy Le Carrour ;;; Copyright © 2020 Jakub Kądziołka ;;; Copyright © 2020, 2021 Nicolas Goaziou ;;; Copyright © 2020 Raghav Gururajan ;;; Copyright © 2020, 2021, 2022, 2023 Maxim Cournoyer ;;; Copyright © 2020 Gabriel Arazas ;;; Copyright © 2021 Antoine Côté ;;; Copyright © 2021 Andy Tai ;;; Copyright © 2021 Ekaitz Zarraga ;;; Copyright © 2021, 2022 Vinicius Monego ;;; Copyright © 2022 Michael Rohleder ;;; Copyright © 2022, 2023 John Kehayias ;;; Copyright © 2022 Zheng Junjie <873216071@qq.com> ;;; Copyright © 2022 Tobias Kortkamp ;;; Copyright © 2022 Paul A. Patience ;;; Copyright © 2022 dan ;;; Copyright © 2023 Sharlatan Hellseher ;;; Copyright © 2023 David Thompson ;;; Copyright © 2023 Eric Bavier ;;; Copyright © 2023 Artyom V. Poptsov ;;; ;;; 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 . (define-module (gnu packages graphics) #:use-module (gnu packages) #:use-module (gnu packages algebra) #:use-module (gnu packages audio) #:use-module (gnu packages autotools) #:use-module (gnu packages base) #:use-module (gnu packages bash) #:use-module (gnu packages bison) #:use-module (gnu packages boost) #:use-module (gnu packages build-tools) #:use-module (gnu packages cdrom) #:use-module (gnu packages check) #:use-module (gnu packages compression) #:use-module (gnu packages cpp) #:use-module (gnu packages crypto) #:use-module (gnu packages datastructures) #:use-module (gnu packages documentation) #:use-module (gnu packages flex) #:use-module (gnu packages fonts) #:use-module (gnu packages fontutils) #:use-module (gnu packages freedesktop) #:use-module (gnu packages gettext) #:use-module (gnu packages ghostscript) #:use-module (gnu packages gl) #:use-module (gnu packages glib) #:use-module (gnu packages gnome) #:use-module (gnu packages gnunet) #:use-module (gnu packages graphviz) #:use-module (gnu packages gstreamer) #:use-module (gnu packages gtk) #:use-module (gnu packages haskell-xyz) #:use-module (gnu packages icu4c) #:use-module (gnu packages image) #:use-module (gnu packages image-processing) #:use-module (gnu packages imagemagick) #:use-module (gnu packages jemalloc) #:use-module (gnu packages kde-frameworks) #:use-module (gnu packages libusb) #:use-module (gnu packages linux) #:use-module (gnu packages logging) #:use-module (gnu packages llvm) #:use-module (gnu packages lua) #:use-module (gnu packages man) #:use-module (gnu packages maths) #:use-module (gnu packages mp3) #:use-module (gnu packages multiprecision) #:use-module (gnu packages ninja) #:use-module (gnu packages pciutils) #:use-module (gnu packages pdf) #:use-module (gnu packages perl) #:use-module (gnu packages photo) #:use-module (gnu packages pkg-config) #:use-module (gnu packages plotutils) #:use-module (gnu packages pretty-print) #:use-module (gnu packages pth) #:use-module (gnu packages pulseaudio) ; libsndfile, libsamplerate #:use-module (gnu packages python) #:use-module (gnu packages python-build) #:use-module (gnu packages python-xyz) #:use-module (gnu packages qt) #:use-module (gnu packages readline) #:use-module (gnu packages sdl) #:use-module (gnu packages serialization) #:use-module (gnu packages stb) #:use-module (gnu packages swig) #:use-module (gnu packages tbb) #:use-module (gnu packages toolkits) #:use-module (gnu packages upnp) #:use-module (gnu packages version-control) #:use-module (gnu packages video) #:use-module (gnu packages vulkan) #:use-module (gnu packages xiph) #:use-module (gnu packages xml) #:use-module (gnu packages xorg) #:use-module (gnu packages xdisorg) #:use-module (guix build-system copy) #:use-module (guix build-system cmake) #:use-module (guix build-system gnu) #:use-module (guix build-system meson) #:use-module (guix build-system python) #:use-module (guix build-system qt) #:use-module (guix download) #:use-module (guix gexp) #:use-module (guix git-download) #:use-module (guix hg-download) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) #:use-module (guix deprecation) #:use-module (guix utils)) (define-public mmm (package (name "mmm") (version "0.1.1") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/hodefoting/mmm") (commit version))) (file-name (git-file-name name version)) (sha256 (base32 "1xmcv6rwinqsbr863rgl9005h2jlmd7k2qrwsc1h4fb8r61ykpjl")))) (build-system meson-build-system) (native-inputs (list luajit pkg-config)) (inputs (list alsa-lib sdl sdl2)) (synopsis "Memory Mapped Machine") (description "MMM is a shared memory protocol for virtualising access to framebuffer graphics, audio output and input event.") (home-page "https://github.com/hodefoting/mrg") (license license:isc))) (define-public directfb (package (name "directfb") (version "1.7.7") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/deniskropp/DirectFB") (commit "DIRECTFB_1_7_7"))) (file-name (git-file-name name version)) (sha256 (base32 "0bs3yzb7hy3mgydrj8ycg7pllrd2b6j0gxj596inyr7ihssr3i0y")))) (build-system gnu-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-after 'unpack 'remove-buildtime ;; Remove embedded build time for reproducible builds (lambda _ (substitute* "src/core/core.c" (("..BUILDTIME..") "")))) ;; TODO: Move patch to source. ,@(if (target-arm32?) `((add-after 'unpack 'patch-source (lambda* (#:key inputs #:allow-other-keys) (invoke "patch" "--force" "-p1" "-i" (assoc-ref inputs "patch-file"))))) '()) (add-after 'unpack 'disable-configure-during-bootstrap (lambda _ (substitute* "autogen.sh" (("^.*\\$srcdir/configure.*") "")) #t))))) (native-inputs `(("autoconf" ,autoconf) ("automake" ,automake) ("libtool" ,libtool) ("perl" ,perl) ("pkg-config" ,pkg-config) ,@(if (target-arm32?) `(("patch" ,patch) ("patch-file" ,(search-patch "directfb-davinci-glibc-228-compat.patch"))) '()))) (inputs (list alsa-lib ffmpeg freetype glu gstreamer imlib2 jasper libjpeg-turbo libcddb libdrm libtimidity libmad libmng libmpeg2 libmpeg3 mesa libpng sdl (librsvg-for-system) libtiff tslib libvdpau libvorbis wayland libwebp libx11 libxcomposite libxext xorgproto zlib)) (propagated-inputs (list flux)) (synopsis "DFB Graphics Library") (description "DirectFB is a graphics library which was designed with embedded systems in mind. It offers maximum hardware accelerated performance at a minimum of resource usage and overhead.") (home-page "https://github.com/deniskropp/DirectFB") (license license:lgpl2.1+))) (define-public minifb (let ((commit "43f8c1309341f4709a471b592d04434326042483") (revision "1")) (package (name "minifb") (version (git-version "0" revision commit)) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/emoon/minifb") (commit commit))) (file-name (git-file-name name version)) (sha256 (base32 "1z0720azsgi83yg4ysmfvpvsg0566s2cq59xx52w8w5rpkla4cjh")))) (build-system cmake-build-system) (arguments ;; Don't build examples. '(#:configure-flags '("-DMINIFB_BUILD_EXAMPLES=0") #:phases ;; There is no install target, so we have to copy the static library ;; and headers to the output directory ourselves. (modify-phases %standard-phases (replace 'install (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (includedir (string-append out "/include")) (libdir (string-append out "/lib"))) (mkdir-p includedir) (mkdir-p libdir) (for-each (lambda (header) (copy-file header (string-append includedir "/" (basename header)))) (find-files "../source/include" "\\.h$")) (copy-file "libminifb.a" (string-append libdir "/libminifb.a")))))) ;; No check target. #:tests? #f)) ;; libminifb.a won't work without these libraries, so propagate them. (propagated-inputs (list libx11 libxkbcommon mesa)) (synopsis "Small library for rendering pixels to a framebuffer") (description "MiniFB (Mini FrameBuffer) is a small, cross-platform library that makes it easy to render (32-bit) pixels in a window.") (home-page "https://github.com/emoon/minifb") (license license:expat)))) (define-public flux (package (name "flux") (version "1.4.4") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/deniskropp/flux") (commit "e45758a"))) (file-name (git-file-name name version)) (sha256 (base32 "11f3ypg0sdq5kj69zgz6kih1yrzgm48r16spyvzwvlswng147410")))) (build-system gnu-build-system) (native-inputs (list autoconf automake libtool pkg-config)) (synopsis "Interface description language") (description "Flux is an interface description language used by DirectFB. Fluxcomp compiles .flux files to .cpp or .c files.") (home-page "https://www.directfb.org/") (license license:lgpl2.1+))) ; Same as DirectFB (define-public fox (package (name "fox") (version "1.6.57") (source (origin (method url-fetch) (uri (string-append "https://fox-toolkit.org/ftp/fox-" version ".tar.gz")) (sha256 (base32 "08w98m6wjadraw1pi13igzagly4b2nfa57kdqdnkjfhgkvg1bvv5")))) (build-system gnu-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-after 'unpack 'patch (lambda _ (substitute* "configure" (("-I/usr/include/freetype2") (string-append "-I" (string-append (assoc-ref %build-inputs "freetype") "/include/freetype2")))) #t))))) (native-inputs (list doxygen)) (inputs `(("bzip2" ,lbzip2) ("freetype" ,freetype) ("gl" ,mesa) ("glu" ,glu) ("jpeg" ,libjpeg-turbo) ("png" ,libpng) ("tiff" ,libtiff) ("x11" ,libx11) ("xcursor" ,libxcursor) ("xext" ,libxext) ("xfixes" ,libxfixes) ("xft" ,libxft) ("xinput" ,libxi) ("xrandr" ,libxrandr) ("xrender" ,libxrender) ("xshm" ,libxshmfence) ("zlib" ,zlib))) (synopsis "Widget Toolkit for building GUI") (description"FOX (Free Objects for X) is a C++ based Toolkit for developing Graphical User Interfaces easily and effectively. It offers a wide, and growing, collection of Controls, and provides state of the art facilities such as drag and drop, selection, as well as OpenGL widgets for 3D graphical manipulation. FOX also implements icons, images, and user-convenience features such as status line help, and tooltips. Tooltips may even be used for 3D objects!") (home-page "http://www.fox-toolkit.org") (license license:lgpl2.1+))) (define-public autotrace (package (name "autotrace") (version "0.31.9") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/autotrace/autotrace") (commit version))) (file-name (git-file-name name version)) (sha256 (base32 "0fsg13pg72ac51l3fkzvyf7h9mzbvfxp9vfjfiwkyvx6hbm83apj")))) (build-system gnu-build-system) (arguments (list #:configure-flags #~'("--disable-static") #:phases #~(modify-phases %standard-phases (add-after 'unpack 'fix-pkg-config-file (lambda _ ;; autotrace can be built against either GraphicsMagick or ;; ImageMagick. However the pkg-config file refers to ;; non-existent MAGICK_ variables instead of GRAPHICSMAGICK_ ;; or IMAGEMAGICK_; fix that. (substitute* "autotrace.pc.in" (("@MAGICK_(LIBS|CFLAGS)@" _ var) (string-append "@IMAGEMAGICK_" var "@")))))))) (native-inputs (list which autoconf automake libtool intltool pkg-config procps)) ;for tests (inputs (list glib imagemagick libjpeg-turbo libpng pstoedit)) (home-page "https://github.com/autotrace/autotrace") (synopsis "Bitmap to vector graphics converter") (description "AutoTrace is a utility for converting bitmap into vector graphics. It can trace outlines and midlines, effect color reduction or despeckling and has support for many input and output formats. It can be used with the @command{autotrace} utility or as a C library, @code{libautotrace}.") (license (list license:gpl2+ ;for the utility itself license:lgpl2.1+)))) ;for use as a library (define-public embree (package (name "embree") (version "3.13.5") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/embree/embree") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "1kcvz7g6j56anv9zjyd3gidxl46vipw0gg82lns12m45cd43iwxm")))) (build-system cmake-build-system) (arguments `(#:tests? #f ; no tests (apparently) #:configure-flags (list "-DEMBREE_ISPC_SUPPORT=OFF"))) (inputs (list tbb glfw)) (home-page "https://www.embree.org/") (synopsis "High performance ray tracing kernels") (description "Embree is a collection of high-performance ray tracing kernels. Embree is meant to increase performance of photo-realistic rendering applications.") (license license:asl2.0))) (define-public openvdb (package (name "openvdb") (version "8.2.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/AcademySoftwareFoundation/openvdb/") (commit (string-append "v" version)) (recursive? #t))) (file-name (git-file-name name version)) (sha256 (base32 "0856697hnwk8xsp29kx8y2p1kliy0bdwfsznxm38v4690vna15rk")))) (build-system cmake-build-system) (arguments `(#:configure-flags (list (string-append "-DCMAKE_EXE_LINKER_FLAGS=-Wl,-rpath=" (assoc-ref %outputs "out") "/lib")))) (inputs (list boost c-blosc ilmbase tbb zlib)) (native-inputs (list pkg-config)) (home-page "https://www.openvdb.org/") (synopsis "Sparse volume data structure and tools") (description "OpenVDB is a C++ library comprising a hierarchical data structure and a large suite of tools for the efficient storage and manipulation of sparse volumetric data discretized on three-dimensional grids. It was developed by DreamWorks Animation for use in volumetric applications typically encountered in feature film production.") (license license:mpl2.0))) (define-public blender (package (name "blender") (version "3.3.5") ;3.3.x is the current LTS version (source (origin (method url-fetch) (uri (string-append "https://download.blender.org/source/" "blender-" version ".tar.xz")) (sha256 (base32 "1pwl4lbc00g0bj97rd8l9fnrv3w1gny9ci6mrma3pp2acgs56502")))) (build-system cmake-build-system) (arguments (list ;; Test files are very large and not included in the release tarball. #:tests? #f #:configure-flags (let ((python-version (version-major+minor (package-version python)))) #~(list "-DWITH_CODEC_FFMPEG=ON" "-DWITH_CODEC_SNDFILE=ON" "-DWITH_CYCLES=ON" "-DWITH_DOC_MANPAGE=ON" "-DWITH_FFTW3=ON" "-DWITH_IMAGE_OPENJPEG=ON" "-DWITH_INPUT_NDOF=ON" "-DWITH_INSTALL_PORTABLE=OFF" "-DWITH_JACK=ON" "-DWITH_MOD_OCEANSIM=ON" "-DWITH_OPENVDB=ON" "-DWITH_OPENSUBDIV=ON" "-DWITH_PYTHON_INSTALL=OFF" (string-append "-DPYTHON_LIBRARY=python" #$python-version) (string-append "-DPYTHON_LIBPATH=" (assoc-ref %build-inputs "python") "/lib") (string-append "-DPYTHON_INCLUDE_DIR=" (assoc-ref %build-inputs "python") "/include/python" #$python-version) (string-append "-DPYTHON_VERSION=" #$python-version) (string-append "-DPYTHON_NUMPY_INCLUDE_DIRS=" (assoc-ref %build-inputs "python-numpy") "/lib/python" #$python-version "/site-packages/numpy/core/include/") (string-append "-DPYTHON_NUMPY_PATH=" (assoc-ref %build-inputs "python-numpy") "/lib/python" #$python-version "/site-packages/") ;; OpenEXR propagates ilmbase, but its include files do not ;; appear in the C_INCLUDE_PATH, so we need to add ;; "$ilmbase/include/OpenEXR/" to the C_INCLUDE_PATH to ;; satisfy the dependency on "half.h" and "Iex.h". (string-append "-DCMAKE_CXX_FLAGS=-I" (search-input-directory %build-inputs "include/OpenEXR")))) #:phases #~(modify-phases %standard-phases (add-after 'unpack 'fix-broken-import (lambda _ (substitute* "release/scripts/addons/io_scene_fbx/json2fbx.py" (("import encode_bin") "from . import encode_bin"))))))) (inputs (list boost embree ffmpeg-5 fftw freetype glew gmp ;needed for boolean operations on meshes ilmbase jack-1 jemalloc libjpeg-turbo libpng libsndfile libtiff libx11 libxi libxrender openal opencolorio openexr-2 openimageio openjpeg opensubdiv openvdb pugixml python python-numpy tbb zlib `(,zstd "lib"))) (home-page "https://blender.org/") (synopsis "3D graphics creation suite") (description "Blender is a 3D graphics creation suite. It supports the entirety of the 3D pipeline—modeling, rigging, animation, simulation, rendering, compositing and motion tracking, even video editing and game creation. The application can be customized via its API for Python scripting.") (license license:gpl2+))) (define-public goxel (package (name "goxel") (version "0.10.8") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/guillaumechereau/goxel") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0qvz566awhp03yp696fn3c80hnky41fpbi4sqg4lx69ibx4zvl9k")))) (build-system gnu-build-system) (arguments '(#:tests? #f #:phases (modify-phases %standard-phases (delete 'configure)) #:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")) "release"))) (native-inputs (list pkg-config)) (inputs `(("gtk3" ,gtk+) ("glfw" ,glfw) ("scons" ,scons))) (home-page "https://goxel.xyz/") (synopsis "Voxel editor") (description "Goxel is a voxel editor that features unlimited scene size, unlimited history buffer, 24-bit RGB colors, layers, procedural rendering, ray tracing, and export to various formats including the format used by Magicavoxel.") (license license:gpl3+))) (define-public assimp (package (name "assimp") (version "5.2.5") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/assimp/assimp") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0j0pd279n6xyy95x782ha8j75kbx0ck7vs5wv3krhbyfim9bw64l")))) (build-system cmake-build-system) (inputs (list zlib)) (home-page "https://www.assimp.org/") (synopsis "Asset import library") (description "The Open Asset Import Library loads more than 40 3D file formats into one unified data structure. Additionally, assimp features various mesh post processing tools: normals and tangent space generation, triangulation, vertex cache locality optimization, removal of degenerate primitives and duplicate vertices, sorting by primitive type, merging of redundant materials and many more.") (license license:bsd-3))) (define-public assimp-5.0 (package (inherit assimp) (version "5.0.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/assimp/assimp") (commit (string-append "v" version)))) (file-name (git-file-name "assimp" version)) (sha256 (base32 "1w2484lg823bql7lpfq84vnsfsnag5v65qrbphslj866z9ia68l7")))))) (define-public mikktspace ;; The latest commit is used as there is no release. (let ((commit "3e895b49d05ea07e4c2133156cfa94369e19e409") (revision "0")) (package (name "mikktspace") (version (git-version "0.0.0" revision commit)) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/mmikk/MikkTSpace") (commit commit))) (file-name (git-file-name name version)) (sha256 (base32 "1rjh9zflx51hdhnfadal87v4hhkrbprkv692hjkg9wkxx0ch39zi")))) (build-system gnu-build-system) (arguments (list #:tests? #f #:phases #~(modify-phases %standard-phases (delete 'configure) (replace 'build (lambda* (#:key make-flags parallel-build? #:allow-other-keys) (invoke #$(cc-for-target) "mikktspace.c" "-O2" "-g" "-fPIC" "-shared" "-o" "libmikktspace.so"))) (replace 'install (lambda _ (install-file "mikktspace.h" (string-append #$output "/include")) (install-file "libmikktspace.so" (string-append #$output "/lib"))))))) (home-page "http://www.mikktspace.com/") (synopsis "Library for a common standard for tangent spaces") (description "This package provides a common standard tangent space library used in baking tools to produce normal maps.") (license license:zlib)))) (define-public openshadinglanguage (package (name "openshadinglanguage") (version "1.13.7.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/AcademySoftwareFoundation/OpenShadingLanguage") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0nb7kc7kh6k71wda3nzcwpiycx8lknl08y0c7ns6p7f4fab7kh1k")))) (build-system cmake-build-system) (arguments (list #:configure-flags #~(list "-DUSE_PARTIO=OFF" ; TODO: not packaged (string-append "-DLLVM_BC_GENERATOR=" #$(this-package-native-input "clang") "/bin/clang++")) #:phases #~(modify-phases %standard-phases (replace 'check (lambda* (#:key tests? #:allow-other-keys) (when tests? (invoke "ctest" "--exclude-regex" (string-join (list "osl-imageio" ; file does not exist "osl-imageio.opt" ; file does not exist "osl-imageio.opt.rs_bitcode" ; file does not exist "texture-udim" ; file does not exist "texture-udim.opt" ; file does not exist "texture-udim.opt.rs_bitcode" ; file does not exist "example-deformer" ; could not find OSLConfig "python-oslquery") ; no module oslquery "|")))))))) (native-inputs (list bison clang flex llvm pybind11 python-wrapper)) (inputs (list boost imath openexr openimageio pugixml qtbase zlib)) (home-page "https://github.com/AcademySoftwareFoundation/OpenShadingLanguage") (synopsis "Shading language for production GI renderers") (description "Open Shading Language (OSL) is a language for programmable shading in advanced renderers and other applications, ideal for describing materials, lights, displacement, and pattern generation.") (license license:bsd-3))) (define-public cgal (package (name "cgal") (version "5.2.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/CGAL/cgal/releases/download/v" version "/CGAL-" version ".tar.xz")) (sha256 (base32 "0yjzq12ivizp23y7zqm30x20psv9gzwbcdrhyd3f7h0ds94m1c40")))) (build-system cmake-build-system) (arguments `(#:configure-flags ;; Prevent two mostly-duplicate directories. Use Guix's versioned ;; default for licences instead of CGAL's unversioned one. (list (string-append "-DCGAL_INSTALL_DOC_DIR=share/doc/" ,name "-" ,version)) #:tests? #f)) ; no test target (inputs (list mpfr gmp boost)) (home-page "https://www.cgal.org/") (synopsis "Computational geometry algorithms library") (description "CGAL provides easy access to efficient and reliable geometric algorithms in the form of a C++ library. CGAL is used in various areas needing geometric computation, such as: computer graphics, scientific visualization, computer aided design and modeling, geographic information systems, molecular biology, medical imaging, robotics and motion planning, mesh generation, numerical methods, etc. It provides data structures and algorithms such as triangulations, Voronoi diagrams, polygons, polyhedra, mesh generation, and many more.") ;; The 'LICENSE' file explains that a subset is available under more ;; permissive licenses. (license license:gpl3+))) (define-public imath (package (name "imath") (version "3.1.3") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/AcademySoftwareFoundation/Imath") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "1nyld18mf220ghm1vidnfnn0rdns9z5i4l9s66xgd0kfdgarb31f")))) (build-system cmake-build-system) (arguments ;; XXX: On i686-linux, tests fail due to rounding issues (excess ;; precision), as was discussed and patched long ago: ;; . It seems the relevant fixes ;; didn't make it upstream, so skip tests. (list #:tests? (not (or (target-x86-32?) (%current-target-system))))) (home-page "https://github.com/AcademySoftwareFoundation/Imath") (synopsis "Library of math operations for computer graphics") (description "Imath is a C++ representation of 2D and 3D vectors and matrices and other mathematical objects, functions, and data types common in computer graphics applications, including the \"half\" 16-bit floating-point type.") (license license:bsd-3))) (define-public ilmbase (package (name "ilmbase") (version "2.5.7") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/openexr/openexr") (commit (string-append "v" version)))) (file-name (git-file-name "ilmbase" version)) (sha256 (base32 "1vja0rbilcd1wn184w8nbcmck00n7bfwlddwiaxw8dhj64nx4468")) (patches (search-patches "ilmbase-fix-tests.patch")))) (build-system cmake-build-system) (arguments (list #:phases #~(modify-phases %standard-phases (add-after 'unpack 'change-directory (lambda _ (chdir "IlmBase") #t)) #$@(if (target-x86-32?) #~((add-after 'change-directory 'skip-test (lambda _ ;; XXX: This test fails on i686, ;; possibly due to excess precision when ;; comparing floats. Skip it. (substitute* "ImathTest/testFun.cpp" (("assert \\(bit_cast.*" all) (string-append "// " all "\n")))))) #~())))) (home-page "https://www.openexr.com/") (synopsis "Utility C++ libraries for threads, maths, and exceptions") (description "IlmBase provides several utility libraries for C++. Half is a class that encapsulates ILM's 16-bit floating-point format. IlmThread is a thread abstraction. Imath implements 2D and 3D vectors, 3x3 and 4x4 matrices, quaternions and other useful 2D and 3D math functions. Iex is an exception-handling library.") (license license:bsd-3))) (define-public lib2geom (package (name "lib2geom") (version "1.2") (source (origin (method git-fetch) (uri (git-reference (url "https://gitlab.com/inkscape/lib2geom.git") (commit version))) (file-name (git-file-name name version)) (sha256 (base32 "0dq981g894hmvhd6rmfl1w32mksg9hpvpjs1qvfxrnz87rhkknj8")))) (build-system cmake-build-system) (arguments `(#:imported-modules ((guix build python-build-system) ,@%cmake-build-system-modules) #:configure-flags '("-D2GEOM_BUILD_SHARED=ON" "-D2GEOM_BOOST_PYTHON=ON" ;; Compiling the Cython bindings fail (see: ;; https://gitlab.com/inkscape/lib2geom/issues/21). "-D2GEOM_CYTHON_BINDINGS=OFF") #:phases (modify-phases %standard-phases (add-after 'unpack 'patch-python-lib-install-path (lambda* (#:key inputs outputs #:allow-other-keys) (let* ((python-version (@ (guix build python-build-system) python-version)) (python-maj-min-version (python-version (assoc-ref inputs "python"))) (site-package (string-append (assoc-ref outputs "out") "/lib/python" python-maj-min-version "/site-packages"))) (substitute* '("src/cython/CMakeLists.txt" "src/py2geom/CMakeLists.txt") (("PYTHON_LIB_INSTALL \"[^\"]*\"") (format #f "PYTHON_LIB_INSTALL ~s" site-package)))))) ,@(if (target-x86-32?) `((add-after 'unpack 'skip-faulty-test (lambda _ ;; This test fails on i686 when comparing floating point ;; values, probably due to excess precision. However, ;; '-fexcess-precision' is not implemented for C++ in ;; GCC 10 so just skip it. (substitute* "tests/CMakeLists.txt" (("bezier-test") ""))))) '())))) (native-inputs `(("python" ,python-wrapper) ("googletest" ,googletest) ("pkg-config" ,pkg-config))) (inputs `(("cairo" ,cairo) ("pycairo" ,python-pycairo) ("double-conversion" ,double-conversion) ("glib" ,glib) ("gsl" ,gsl))) (propagated-inputs (list boost)) ;referred to in 2geom/pathvector.h. (home-page "https://gitlab.com/inkscape/lib2geom/") (synopsis "C++ 2D graphics library") (description "2geom is a C++ library of mathematics for paths, curves, and other geometric calculations. Designed for vector graphics, it tackles Bézier curves, conic sections, paths, intersections, transformations, and basic geometries.") ;; Because the library is linked with the GNU Scientific Library ;; (GPLv3+), the combined work must be licensed as GPLv3+ (see: ;; https://gitlab.com/inkscape/inkscape/issues/784). (license license:gpl3+))) (define-public python-booleanoperations (package (name "python-booleanoperations") (version "0.9.0") (source (origin (method url-fetch) (uri (pypi-uri "booleanOperations" version ".zip")) (sha256 (base32 "1f41lb19m8azchl1aqz6j5ycbspb8jsf1cnn42hlydxd68f85ylc")))) (build-system python-build-system) (propagated-inputs (list python-fonttools-minimal python-pyclipper)) (native-inputs (list python-defcon-bootstrap python-fontpens-bootstrap python-setuptools-scm python-pytest python-wheel unzip)) (home-page "https://github.com/typemytype/booleanOperations") (synopsis "Boolean operations on paths") (description "Boolean operations on paths which uses a super fast @url{http://www.angusj.com/delphi/clipper.php, polygon clipper library by Angus Johnson}.") (license license:expat))) (define-public pstoedit (package (name "pstoedit") (version "3.77") (source (origin (method url-fetch) (uri (string-append "mirror://sourceforge/pstoedit/pstoedit/" version "/pstoedit-" version ".tar.gz")) (sha256 (base32 "02av76j75g5sq3bg353yl6dlllda9ihmmk4c8hvgiscix816nv4s")))) (build-system gnu-build-system) (native-inputs (list pkg-config)) (inputs `(("ghostscript" ,ghostscript) ("imagemagick" ,imagemagick) ("libplot" ,plotutils) ("libjpeg" ,libjpeg-turbo) ("zlib" ,zlib))) ;else libp2edrvmagick++.so fails to link (home-page "http://www.pstoedit.net/") (synopsis "Converter for PostScript and PDF graphics") (description "The @code{pstoedit} utility allows translating graphics in the PostScript or PDF (Portable Document Format) formats to various other vector formats such as: @itemize @item Tgif (.obj) @item gnuplot @item xfig (.fig) @item Flattened PostScript @item DXF, a CAD (Computed-Aided Design) exchange format @item PIC (for troff/groff) @item MetaPost (for usage with TeX/LaTeX) @item LaTeX2e picture @item GNU Metafile (for use with plotutils/libplot) @item Any format supported by ImageMagick @end itemize") (license license:gpl2+))) (define-public alembic (package (name "alembic") (version "1.8.4") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/alembic/alembic") (commit version))) (file-name (git-file-name name version)) (sha256 (base32 "04cvzr87zqx55si4j3dqiidbmfx92ja3mc1dj0v6ddvl0cwj3m7i")))) (build-system cmake-build-system) (arguments `(#:configure-flags (list "-DUSE_HDF5=ON"))) (inputs (list hdf5 imath zlib)) (home-page "https://www.alembic.io/") (synopsis "Framework for storing and sharing scene data") (description "Alembic is a computer graphics interchange framework. It distills complex, animated scenes into a set of baked geometric results.") (license license:bsd-3))) (define-public mangohud (package (name "mangohud") (version "0.7.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/flightlessmango/MangoHud/") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "1m4a2dqzqdhk9w1gvzppid7k0fxvplh5hmivvj9sda529s1g24rc")))) (build-system meson-build-system) (arguments (list #:build-type "release" #:configure-flags #~(list "-Duse_system_spdlog=enabled" "-Dwith_xnvctrl=disabled" "-Dappend_libdir_mangohud=false") #:phases #~(modify-phases %standard-phases ;; MangoHud tries to build the imgui library as a meson submodule, ;; so we change the dependency to the imgui input instead. (add-after 'unpack 'unbundle-imgui (lambda _ (substitute* "meson.build" (("dearimgui_sp = .*") "") (("dearimgui_sp.get_variable\\('imgui_dep'\\)") (string-append "declare_dependency(dependencies: " "cpp.find_library('imgui'), include_directories: '" #$(this-package-input "imgui") "/include/imgui')"))))) ;; Likewise, MangoHud bundles a Vulkan headers submodule to use a ;; specific version, which we provide as an input and adjust the ;; build accordingly. (add-after 'unbundle-imgui 'unbundle-vulkan-headers (lambda* (#:key inputs #:allow-other-keys) (substitute* "meson.build" (("vkh_sp = .*") "") (("vkh_sp.get_variable\\('vulkan_api_xml'\\)") (string-append "files('" (search-input-file inputs "registry/vk.xml") "')")) (("dep_vulkan = .*") "")) (substitute* "src/meson.build" (("dep_vulkan,") "")))) (add-after 'unpack 'patch-paths (lambda* (#:key inputs #:allow-other-keys) (substitute* "src/meson.build" (("\\\\\\$LIB") "lib")) (substitute* "src/overlay.cpp" (("glxinfo") (search-input-file inputs "bin/glxinfo"))) (substitute* "src/loaders/loader_x11.cpp" (("libX11.so.6") (search-input-file inputs "lib/libX11.so.6"))) (substitute* "src/pci_ids.cpp" (("/usr/share/hwdata/pci.ids") (search-input-file inputs "share/hwdata/pci.ids"))) (substitute* "src/dbus.cpp" (("libdbus-1.so.3") (search-input-file inputs "lib/libdbus-1.so.3")))))))) (inputs (list dbus glslang `(,hwdata "pci") imgui-1.86 libx11 mesa mesa-utils nlohmann-json python-mako spdlog (origin (method git-fetch) (uri (git-reference (url "https://github.com/KhronosGroup/Vulkan-Headers") (commit "v1.2.158"))) (file-name (git-file-name "vulkan" "v1.2.158")) (sha256 (base32 "0jvaqj87792yccpr290djb18pqaisspq9dw6bqim6mrhfgda9v76"))) vulkan-loader)) (native-inputs (list git-minimal/pinned pkg-config python)) (home-page "https://github.com/flightlessmango/MangoHud/") (synopsis "Vulkan and OpenGL overlay for monitoring performance and hardware") (description "MangoHud is a Vulkan and OpenGL overlay for monitoring frames per second (FPS), temperatures, CPU/GPU load and more.") (license license:expat))) (define-public ogre (package (name "ogre") (version "13.3.1") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/OGRECave/ogre") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "157vpfzivg2wf349glyd0cpbyaw1j3fm4nggban70pghql3x48kb")))) (build-system cmake-build-system) (arguments '(#:phases (modify-phases %standard-phases (add-before 'configure 'unpack-imgui (lambda* (#:key inputs #:allow-other-keys) (copy-recursively (assoc-ref inputs "imgui-source") "../imgui-source"))) (add-before 'configure 'pre-configure ;; CMakeLists.txt forces a CMAKE_INSTALL_RPATH value. As ;; a consequence, we cannot suggest ours in configure flags. Fix ;; it. (lambda* (#:key inputs outputs #:allow-other-keys) (substitute* "CMakeLists.txt" (("set\\(CMAKE_INSTALL_RPATH .*") ""))))) #:configure-flags (let* ((out (assoc-ref %outputs "out")) (runpath (string-join (list (string-append out "/lib") (string-append out "/lib/OGRE")) ";"))) (list (string-append "-DCMAKE_INSTALL_RPATH=" runpath) "-DIMGUI_DIR=../imgui-source" "-DOGRE_BUILD_DEPENDENCIES=OFF" "-DOGRE_BUILD_TESTS=TRUE" "-DOGRE_INSTALL_DOCS=TRUE" "-DOGRE_INSTALL_SAMPLES=TRUE" "-DOGRE_INSTALL_SAMPLES_SOURCE=TRUE")))) (native-inputs `(("doxygen" ,doxygen) ("imgui-source" ,(package-source imgui-1.86)) ("googletest" ,googletest) ("pkg-config" ,pkg-config) ("python" ,python))) (inputs (list freeimage freetype libxaw libxrandr libxt mesa pugixml sdl2 zlib)) (synopsis "Scene-oriented, flexible 3D engine written in C++") (description "OGRE (Object-Oriented Graphics Rendering Engine) is a scene-oriented, flexible 3D engine written in C++ designed to make it easier and more intuitive for developers to produce applications utilising hardware-accelerated 3D graphics.") (home-page "https://www.ogre3d.org/") (license license:expat))) (define-public openexr (package (name "openexr") (version "3.1.3") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/AcademySoftwareFoundation/openexr") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0c9vla0kbsbbhkk42jlbf94nzfb1anqh7dy9b0b3nna1qr6v4bh6")))) (build-system cmake-build-system) (arguments (list #:phases #~(modify-phases %standard-phases (add-after 'unpack 'patch-test-directory (lambda _ (substitute* (list "src/test/OpenEXRUtilTest/tmpDir.h" "src/test/OpenEXRFuzzTest/tmpDir.h" "src/test/OpenEXRTest/tmpDir.h" "src/test/OpenEXRCoreTest/main.cpp") (("/var/tmp") "/tmp")))) #$@(if (target-64bit?) #~() #~((add-after 'patch-test-directory 'disable-broken-tests (lambda _ ;; Disable tests that fail at least on i686-linux. (substitute* '("src/test/OpenEXRCoreTest/main.cpp" "src/test/OpenEXRTest/main.cpp") (("TEST \\(testCompression, \"basic\"\\);") "") (("TEST\\( testNoCompression, \"core_compression\" \\);") "") (("TEST\\( testRLECompression, \"core_compression\" \\);") "") (("TEST\\( testZIPCompression, \"core_compression\" \\);") "") (("TEST\\( testZIPSCompression, \"core_compression\" \\);") "") (("TEST\\( testB44Compression, \"core_compression\" \\);") "") (("TEST\\( testB44ACompression, \"core_compression\" \\);") "") (("TEST \\(testOptimizedInterleavePatterns, \"basic\"\\);") ""))))))))) (inputs (list imath zlib)) (home-page "https://www.openexr.com/") (synopsis "High-dynamic-range file format library") (description "OpenEXR provides the specification and reference implementation of the EXR file format. The purpose of EXR format is to accurately and efficiently represent high-dynamic-range scene-linear image data and associated metadata, with strong support for multi-part, multi-channel use cases.") (license license:bsd-3))) (define-public openexr-2 (package (name "openexr") (version (package-version ilmbase)) (source (origin (inherit (package-source ilmbase)) (file-name (git-file-name "openexr" version)))) (build-system cmake-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-after 'unpack 'change-directory (lambda _ (chdir "OpenEXR") #t)) (add-after 'change-directory 'patch-test-directory (lambda _ (substitute* '("IlmImfFuzzTest/tmpDir.h" "IlmImfTest/tmpDir.h" "IlmImfUtilTest/tmpDir.h") (("/var/tmp") "/tmp")))) (add-after 'change-directory 'increase-test-timeout (lambda _ ;; On some architectures, we need to override the CTest default ;; timeout of 1500 seconds for the OpenEXR.IlmImf test. (substitute* "IlmImfTest/CMakeLists.txt" (("add_test\\(NAME OpenEXR\\.IlmImf.*" all) (string-append all "set_tests_properties(OpenEXR.IlmImf PROPERTIES TIMEOUT 15000)"))) #t)) ,@(if (not (target-64bit?)) `((add-after 'change-directory 'disable-broken-test (lambda _ (substitute* "IlmImfTest/main.cpp" ;; This test fails on i686. Upstream developers suggest ;; that this test is broken on i686 and can be safely ;; disabled: ;; https://github.com/openexr/openexr/issues/67#issuecomment-21169748 ((".*testOptimizedInterleavePatterns.*") "") ;; This one fails similarly on i686. ((".*testCompression.*") ""))))) '())))) (native-inputs (list pkg-config)) (propagated-inputs (list ilmbase ;used in public headers zlib)) ;OpenEXR.pc reads "-lz" (home-page (package-home-page openexr)) (synopsis (package-synopsis openexr)) (description (package-description openexr)) (license (package-license openexr)))) (define-public openimageio (package (name "openimageio") (version "2.5.9.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/OpenImageIO/oiio") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "1djqna387vargrvf6dl53bsb7j36lvah4l9fvj0818s4sjkw4npd")))) (build-system cmake-build-system) ;; FIXME: To run all tests successfully, test image sets from multiple ;; third party sources have to be present. For details see ;; (arguments `(#:tests? #f #:configure-flags (list "-DUSE_EXTERNAL_PUGIXML=1"))) (native-inputs (list pkg-config)) (inputs (list boost fmt libheif libpng libjpeg-turbo libtiff giflib openexr imath pugixml python-wrapper pybind11 robin-map zlib)) (synopsis "C++ library for reading and writing images") (description "OpenImageIO is a library for reading and writing images, and a bunch of related classes, utilities, and applications. There is a particular emphasis on formats and functionality used in professional, large-scale animation and visual effects work for film.") (home-page "https://www.openimageio.org") (license license:bsd-3))) (define-public openscenegraph (package (name "openscenegraph") (version "3.6.5") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/openscenegraph/OpenSceneGraph") (commit (string-append "OpenSceneGraph-" version)))) (sha256 (base32 "00i14h82qg3xzcyd8p02wrarnmby3aiwmz0z43l50byc9f8i05n1")) (file-name (git-file-name name version)))) (properties `((upstream-name . "OpenSceneGraph") (output-synopsis "pluginlib" "Plugins as shared libraries"))) (build-system cmake-build-system) (outputs (list "out" "pluginlib")) (arguments (list #:tests? #f ; no test target available ;; Without this flag, 'rd' will be added to the name of the ;; library binaries and break linking with other programs. #:build-type "Release" #:configure-flags #~(list (string-append "-DCMAKE_INSTALL_RPATH=" #$output "/lib:" #$output "/lib64")) #:modules `((guix build cmake-build-system) (guix build utils) (ice-9 regex)) #:phases #~(modify-phases %standard-phases (add-after 'install 'copy-plugins (lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out")) (pluginlib (assoc-ref outputs "pluginlib"))) (mkdir-p (string-append pluginlib "/lib/pkgconfig")) (with-directory-excursion (string-append out "/lib/osgPlugins-" #$version) (for-each (lambda (lib) (let ((blib (basename lib)) (m (string-match "([^/]*)\\.so$" lib))) (symlink (canonicalize-path lib) (string-append pluginlib "/lib/lib" blib)) (call-with-output-file (string-append pluginlib "/lib/pkgconfig/" (match:substring m 1) ".pc") (lambda (port) (format port "libdir=~a/lib~%" pluginlib) (newline port) (format port "Name: ~a~%" (match:substring m 1)) (format port "Version: ~a~%" #$version) (display "Description: A plugin for openscenegraph\n" port) (display "Requires: openscenegraph\n" port) (format port "Libs: -L${libdir} -l~a~%" (match:substring m 1)))))) (find-files "." "\\.so"))))))))) (native-inputs (list pkg-config unzip)) (inputs `(("giflib" ,giflib) ("libjpeg" ,libjpeg-turbo) ; required for the JPEG texture plugin. ("jasper" ,jasper) ("librsvg" ,(librsvg-for-system)) ("libxrandr" ,libxrandr) ("ffmpeg" ,ffmpeg-4) ("mesa" ,mesa))) (synopsis "High-performance real-time graphics toolkit") (description "The OpenSceneGraph is a high-performance 3D graphics toolkit used by application developers in fields such as visual simulation, games, virtual reality, scientific visualization and modeling.") (home-page "http://www.openscenegraph.org") ;; The 'LICENSE' file explains that the source is licensed under ;; LGPL 2.1, but with 4 exceptions. This version is called OSGPL. (license license:lgpl2.1))) (define-public gr-framework (package (name "gr-framework") (version "0.69.1") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/sciapp/gr") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0kllbj4bj3f5w4wzg29ilac66fd0bslqq5srj845ssmzp4ynqglh")) (modules '((guix build utils))) (snippet '(begin (delete-file-recursively "3rdparty"))))) (build-system cmake-build-system) (arguments `(#:tests? #f)) ; no test target (inputs `(("bzip2" ,bzip2) ("cairo" ,cairo) ("fontconfig" ,fontconfig) ("ffmpeg" ,ffmpeg) ("freetype" ,freetype) ("ghostscript" ,ghostscript) ("glfw" ,glfw) ("libjpeg-turbo" ,libjpeg-turbo) ("libpng" ,libpng) ("libtiff" ,libtiff) ("libx11" ,libx11) ("libxft" ,libxft) ("libxt" ,libxt) ("pixman" ,pixman) ("qtbase" ,qtbase-5) ("qhull" ,qhull) ("zlib" ,zlib))) (home-page "https://gr-framework.org/") (synopsis "Graphics library for visualisation applications") (description "GR is a universal framework for cross-platform visualization applications. It offers developers a compact, portable and consistent graphics library for their programs. Applications range from publication quality 2D graphs to the representation of complex 3D scenes. GR is essentially based on an implementation of a @acronym{GKS, Graphical Kernel System}. As a self-contained system it can quickly and easily be integrated into existing applications (i.e. using the @code{ctypes} mechanism in Python or @code{ccall} in Julia).") (license license:expat))) (define-public openmw-openscenegraph ;; OpenMW prefers its own fork of openscenegraph: ;; https://wiki.openmw.org/index.php?title=Development_Environment_Setup#OpenSceneGraph. (let ((commit "68c5c573d47766507bfb191e0c8d213b1997ad20")) (hidden-package (package (inherit openscenegraph) (version (git-version "3.6" "3" commit)) (outputs (list "out")) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/OpenMW/osg/") (commit commit))) (file-name (git-file-name (package-name openscenegraph) version)) (sha256 (base32 "12xgdmymjh4rb7djzniy15lvi45y0x4i0l5swf031r8g4zn72v2n")))) (arguments (substitute-keyword-arguments (package-arguments openscenegraph) ((#:configure-flags flags) ;; As per the above wiki link, the following plugins are enough: #~(append '("-DBUILD_OSG_PLUGINS_BY_DEFAULT=0" "-DBUILD_OSG_PLUGIN_OSG=1" "-DBUILD_OSG_PLUGIN_DAE=1" "-DBUILD_OSG_PLUGIN_DDS=1" "-DBUILD_OSG_PLUGIN_TGA=1" "-DBUILD_OSG_PLUGIN_BMP=1" "-DBUILD_OSG_PLUGIN_JPEG=1" "-DBUILD_OSG_PLUGIN_PNG=1" "-DBUILD_OSG_PLUGIN_FREETYPE=1" "-DBUILD_OSG_DEPRECATED_SERIALIZERS=0") #$flags)) ((#:phases phases) #~(modify-phases #$phases (delete 'copy-plugins))))))))) (define-public povray (package (name "povray") (version "3.7.0.10") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/POV-Ray/povray") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "19bv962clwc6sk53kq8bqf77fh0v46afm2knjbki8yj0m1mnyyd0")) (modules '((guix build utils))) (snippet ;; Delete bundled libraries. '(delete-file-recursively "libraries")))) (build-system gnu-build-system) (native-inputs (list autoconf automake pkg-config)) (inputs (list boost libjpeg-turbo libpng libtiff openexr-2 sdl zlib)) (arguments (list #:configure-flags #~(list "COMPILED_BY=Guix" (string-append "--with-boost-libdir=" #$(this-package-input "boost") "/lib") "--disable-optimiz-arch") #:phases '(modify-phases %standard-phases (add-after 'unpack 'run-prebuild (lambda _ (setenv "HOME" (getcwd)) (with-directory-excursion "unix" (substitute* "prebuild.sh" (("/bin/sh") (which "sh"))) (invoke "sh" "prebuild.sh")))) ;; The bootstrap script is run by the prebuild script in the ;; "run-prebuild" phase. (delete 'bootstrap)))) (synopsis "Tool for creating three-dimensional graphics") (description "@code{POV-Ray} is short for the Persistence of Vision Raytracer, a tool for producing high-quality computer graphics. @code{POV-Ray} creates three-dimensional, photo-realistic images using a rendering technique called ray-tracing. It reads in a text file containing information describing the objects and lighting in a scene and generates an image of that scene from the view point of a camera also described in the text file. Ray-tracing is not a fast process by any means, but it produces very high quality images with realistic reflections, shading, perspective and other effects.") (home-page "http://www.povray.org/") (license license:agpl3+))) (define-public ctl (package (name "ctl") (version "1.5.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/ampas/CTL/archive/ctl-" version ".tar.gz")) (sha256 (base32 "1gg04pyvw0m398akn0s1l07g5b1haqv5na1wpi5dii1jjd1w3ynp")))) (build-system cmake-build-system) (arguments '(#:tests? #f)) ;no 'test' target ;; Headers include OpenEXR and IlmBase headers. (propagated-inputs (list openexr-2)) (home-page "https://ampasctl.sourceforge.net") (synopsis "Color Transformation Language") (description "The Color Transformation Language, or CTL, is a small programming language that was designed to serve as a building block for digital color management systems. CTL allows users to describe color transforms in a concise and unambiguous way by expressing them as programs. In order to apply a given transform to an image, the color management system instructs a CTL interpreter to load and run the CTL program that describes the transform. The original and the transformed image constitute the CTL program's input and output.") ;; The web site says it's under a BSD-3 license, but the 'LICENSE' file ;; and headers use different wording. (license (license:non-copyleft "file://LICENSE")))) (define-public brdf-explorer ;; There are no release tarballs, and not even tags in the repo, ;; so use the latest revision. (let ((commit "5b2cd46f38a06e47207fa7229b72d37beb945019") (revision "1")) (package (name "brdf-explorer") (version (string-append "1.0.0-" revision "." (string-take commit 9))) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/wdas/brdf") (commit commit))) (sha256 (base32 "06vzbiajzbi2xl8jlff5d45bc9wd68i3jdndfab1f3jgfrd8bsgx")) (file-name (string-append name "-" version "-checkout")))) (build-system gnu-build-system) (arguments `(#:phases (modify-phases %standard-phases (replace 'configure (lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) (invoke "qmake" (string-append "prefix=" out))))) (add-after 'install 'wrap-program (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (bin (string-append out "/bin")) (data (string-append out "/share/brdf"))) (with-directory-excursion bin (rename-file "brdf" ".brdf-real") (call-with-output-file "brdf" (lambda (port) (format port "#!/bin/sh # Run the thing from its home, otherwise it just bails out. cd \"~a\" exec -a \"$0\" ~a/.brdf-real~%" data bin))) (chmod "brdf" #o555))) #t))))) (native-inputs (list qttools-5)) ;for 'qmake' (inputs (list qtbase-5 mesa glew freeglut zlib)) (home-page (string-append "https://web.archive.org/web/20190115030100/" "https://www.disneyanimation.com/technology/brdf.html")) (synopsis "@acronym{BRDF, bidirectional reflectance distribution function} analyzer") (description "BRDF Explorer is an application that allows the development and analysis of @acronym{BRDF, bidirectional reflectance distribution functions}. It can load and plot analytic BRDF functions (coded as functions in OpenGL's GLSL shader language), measured material data from the MERL database, and anisotropic measured material data from MIT CSAIL. Graphs and visualizations update in real time as parameters are changed, making it a useful tool for evaluating and understanding different BRDFs (and other component functions).") (license license:ms-pl)))) (define-public agg (package (name "agg") (version "2.5") (source (origin (method url-fetch) (uri (list (string-append "ftp://ftp.fau.de/gentoo/distfiles/agg-" version ".tar.gz") (string-append "ftp://ftp.ula.ve/gentoo/distfiles/agg-" version ".tar.gz") ;; Site was discontinued. (string-append "http://www.antigrain.com/agg-" version ".tar.gz"))) (sha256 (base32 "07wii4i824vy9qsvjsgqxppgqmfdxq0xa87i5yk53fijriadq7mb")) (patches (search-patches "agg-am_c_prototype.patch" "agg-2.5-gcc8.patch")))) (build-system gnu-build-system) (arguments '(#:configure-flags (list (string-append "--x-includes=" (assoc-ref %build-inputs "libx11") "/include") (string-append "--x-libraries=" (assoc-ref %build-inputs "libx11") "/lib") "--disable-examples") #:phases (modify-phases %standard-phases (replace 'bootstrap (lambda _ ;; let's call configure from configure phase and not now (substitute* "autogen.sh" (("./configure") "# ./configure")) (invoke "sh" "autogen.sh")))))) (native-inputs (list pkg-config libtool autoconf automake)) (inputs (list libx11 freetype sdl)) ;; Antigrain.com was discontinued. (home-page "https://agg.sourceforge.net/antigrain.com/index.html") (synopsis "High-quality 2D graphics rendering engine for C++") (description "Anti-Grain Geometry is a high quality rendering engine written in C++. It supports sub-pixel resolutions and anti-aliasing. It is also a library for rendering @acronym{SVG, Scalable Vector Graphics}.") (license license:gpl2+))) (define-public python-pastel (package (name "python-pastel") (version "0.2.0") (source (origin (method url-fetch) (uri (pypi-uri "pastel" version)) (sha256 (base32 "0dnaw44ss10i10z4ksy0xljknvjap7rb7g0b8p6yzm5x4g2my5a6")))) (build-system python-build-system) (arguments `(#:phases (modify-phases %standard-phases (replace 'check (lambda _ (invoke "pytest" "pastel" "tests/")))))) (native-inputs (list python-pytest)) (home-page "https://github.com/sdispater/pastel") (synopsis "Library to colorize strings in your terminal") (description "Pastel is a simple library to help you colorize strings in your terminal.") (license license:expat))) (define-public facedetect (let ((commit "5f9b9121001bce20f7d87537ff506fcc90df48ca") (revision "0")) (package (name "facedetect") (version (git-version "0.1" revision commit)) (source (origin (method git-fetch) (uri (git-reference (url "https://gitlab.com/wavexx/facedetect") (commit commit))) (file-name (git-file-name name version)) (sha256 (base32 "1jiz72y3ykkxkiij1qqjf45gxg223sghkjir7sr663x91kviwkjd")))) (build-system copy-build-system) (arguments (list #:install-plan #~`(("facedetect" "bin/facedetect") ("README.rst" ,(string-append "share/doc/" #$name "-" #$version "/README.rst"))) #:phases #~(modify-phases %standard-phases (add-after 'unpack 'configure (lambda* (#:key inputs #:allow-other-keys) (substitute* "facedetect" (("^DATA_DIR = .*") (string-append "DATA_DIR = '" #$opencv "/share/opencv" #$(version-major (package-version opencv)) "'\n"))))) (add-after 'install 'wrap (lambda _ (let ((program (string-append #$output "/bin/facedetect"))) (patch-shebang program) (wrap-program program `("GUIX_PYTHONPATH" prefix ,(search-path-as-string->list (getenv "GUIX_PYTHONPATH")))))))))) (inputs (list bash-minimal opencv python python-numpy)) (home-page "https://www.thregr.org/~wavexx/software/facedetect/") (synopsis "Face detector") (description "@code{facedetect} is a face detector for batch processing. It answers the question: \"Is there a face in this image?\" and gives back either an exit code or the coordinates of each detect face in the standard output. @code{facedetect} is used in software such as @code{fgallery} to improve the thumbnail cutting region, so that faces are always centered.") (license license:gpl2+)))) (define-public fgallery (package (name "fgallery") (version "1.9.1") (source (origin (method url-fetch) (uri (string-append "https://www.thregr.org/~wavexx/software/fgallery/releases/" "fgallery-" version ".zip")) (sha256 (base32 "0zf6r88m2swgj1ylgh3qa1knzb4if501hzvga37h9psy8k179w8n")))) (build-system gnu-build-system) (arguments `(#:tests? #f ; no tests #:phases (modify-phases %standard-phases (delete 'configure) (delete 'build) (replace 'install (lambda* (#:key inputs outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (script (string-append out "/bin/fgallery")) (perl5lib (getenv "PERL5LIB"))) (define (bin-directory input-name) (string-append (assoc-ref inputs input-name) "/bin")) (invoke "make" "install" (string-append "PREFIX=" out)) ;; fgallery copies files from store when it is run. The ;; read-only permissions from the store directories will cause ;; fgallery to fail. Do not preserve file attributes when ;; copying files to prevent it. (substitute* script (("'cp'") "'cp', '--no-preserve=all'")) (wrap-program script `("PATH" ":" prefix ,(map bin-directory '("imagemagick" "lcms" "facedetect" "fbida" "libjpeg-turbo" "zip" "jpegoptim" "pngcrush" "p7zip"))) `("PERL5LIB" ":" prefix (,perl5lib))))))))) (native-inputs (list unzip)) (inputs (list bash-minimal imagemagick lcms facedetect fbida libjpeg-turbo zip perl perl-cpanel-json-xs perl-image-exiftool jpegoptim pngcrush p7zip)) (home-page "https://www.thregr.org/~wavexx/software/fgallery/") (synopsis "Static photo gallery generator") (description "FGallery is a static, JavaScript photo gallery generator with minimalist look. The result can be uploaded on any web server without additional requirements.") (license license:gpl2+))) (define-public opensubdiv (package (name "opensubdiv") (version "3.4.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/PixarAnimationStudios/OpenSubdiv") (commit (string-append "v" (string-join (string-split version #\.) "_"))))) (file-name (git-file-name name version)) (sha256 (base32 "0cippg6aqc5dlya1cmh3908pwssrg52fwgyylnvz5343yrxmgk12")))) (build-system cmake-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-before 'configure 'set-glew-location (lambda* (#:key inputs #:allow-other-keys) (setenv "GLEW_LOCATION" (assoc-ref inputs "glew")) #t)) (add-before 'check 'start-xorg-server (lambda* (#:key inputs #:allow-other-keys) ;; The test suite requires a running X server. (system "Xvfb :1 &") (setenv "DISPLAY" ":1") #t))))) (native-inputs (list xorg-server-for-tests)) (inputs (list glew libxrandr libxcursor libxinerama libxi zlib glfw)) (home-page "https://graphics.pixar.com/opensubdiv/") (synopsis "High performance subdivision surface evaluation") (description "OpenSubdiv is a set of libraries that implement high performance subdivision surface (subdiv) evaluation on massively parallel CPU and GPU architectures.") (license license:asl2.0))) (define-public opencsg (let ((dot-to-dash (lambda (c) (if (char=? c #\.) #\- c)))) (package (name "opencsg") (version "1.4.2") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/floriankirsch/OpenCSG") (commit (string-append "opencsg-" (string-map dot-to-dash version) "-release")))) (file-name (git-file-name name version)) (sha256 (base32 "00m4vs6jn3scqczscc4591l1d6zg6anqp9v1ldf9ymf70rdyvm7m")))) (build-system gnu-build-system) (arguments `(#:phases (modify-phases %standard-phases (replace 'configure (lambda* (#:key outputs #:allow-other-keys) (substitute* "src/Makefile" (("/usr/local") (assoc-ref outputs "out"))) #t)) (add-before 'build 'skip-example (lambda _ (chdir "src") #t))))) (inputs (list glew freeglut)) (synopsis "Library for rendering Constructive Solid Geometry (CSG)") (description "OpenCSG is a library for rendering Constructive Solid Geometry (CSG) using OpenGL. CSG is an approach for modeling complex 3D-shapes using simpler ones. For example, two shapes can be combined by uniting them, by intersecting them, or by subtracting one shape from the other.") (home-page "https://www.opencsg.org/") (license license:gpl2)))) (define-public coin3D (package (name "coin3D") (version "4.0.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/coin3d/coin") (commit (string-append "Coin-" version)) (recursive? #t))) (file-name (git-file-name name version)) (sha256 (base32 "1ayg0hl8wanhadahm5xbghghxw1qjwqbrs3dl3ngnff027hsyf8p")) (modules '((guix build utils))) (snippet '(begin ;; Delete binaries (for-each delete-file '("cfg/csubst.exe" "cfg/wrapmsvc.exe")) ;; Delete references to packaging tool cpack. Otherwise the build ;; fails with "add_subdirectory given source "cpack.d" which is not ;; an existing directory." (substitute* "CMakeLists.txt" ((".*cpack.d.*") "")) #t)))) (build-system cmake-build-system) (native-inputs (list doxygen graphviz)) (inputs (list boost freeglut glew)) (arguments `(#:configure-flags (list "-DCOIN_BUILD_DOCUMENTATION_MAN=ON" (string-append "-DBOOST_ROOT=" (assoc-ref %build-inputs "boost"))))) (home-page "https://github.com/coin3d/coin") (synopsis "High-level 3D visualization library with Open Inventor 2.1 API") (description "Coin is a 3D graphics library with an Application Programming Interface based on the Open Inventor 2.1 API. For those who are not familiar with Open Inventor, it is a scene-graph based retain-mode rendering and model interaction library, written in C++, which has become the de facto standard graphics library for 3D visualization and visual simulation software in the scientific and engineering community.") (license license:bsd-3))) (define-deprecated coin3D-4 coin3D) (export coin3D-4) (define-public skia ;; Releases follow those of Chromium, about every 6 weeks. The release ;; version can be found on this page: ;; https://skia.org/docs/user/release/release_notes/. The commit used ;; should be the last commit, as recommended at ;; https://skia.org/docs/user/release/. (let ((version "112") (revision "0") (commit "6d0b93856303fcf3021a8b40654d7739fda4dfb0")) (package (name "skia") (version (git-version version revision commit)) (source (origin (method git-fetch) (uri (git-reference (url "https://skia.googlesource.com/skia.git") (commit commit))) (file-name (git-file-name name version)) (sha256 (base32 "0g07xlvpbbxqmr9igvy5d1hy11z7dz9nzp2fd3ka9y2jqciniyz6")))) (build-system gnu-build-system) ;actually GN + Ninja (arguments (list #:phases #~(modify-phases %standard-phases (replace 'configure (lambda* (#:key inputs #:allow-other-keys) (substitute* "BUILD.gn" ;; Workaround a bug in the zlib third_party definition, that ;; fails the build even when zlib is found from the system. (("deps = \\[ \"//third_party/zlib\" ]") "deps = []")) (invoke "gn" "gen" "build" (string-append ;; "--args=" "cc=\"gcc\" " ;defaults to 'cc' "is_official_build=true " ;to use system libraries "is_component_build=true " ;build as a shared library "skia_use_system_zlib=true " ; use system zlib library ;; Specify where locate the harfbuzz and freetype ;; includes. (format #f "extra_cflags=[\"-I~a\",\"-I~a\"] " (search-input-directory inputs "include/harfbuzz") (search-input-directory inputs "include/freetype2")) ;; Otherwise the validate-runpath phase fails. "extra_ldflags=[\"-Wl,-rpath=" #$output "/lib\"] " ;; Disabled, otherwise the build system attempts to ;; download the SDK at build time. "skia_use_dng_sdk=false " ;; Wuffs is a google language that may improve performance ;; disabled while unpackaged "skia_use_wuffs=false ")))) (replace 'build (lambda* (#:key parallel-build? #:allow-other-keys) (let ((job-count (if parallel-build? (number->string (parallel-job-count)) "1"))) (invoke "ninja" "-j" job-count "-C" "build")))) (replace 'install (lambda _ ;; Install headers. (for-each (lambda (h) (install-file h (string-append #$output "/include/skia/" (dirname h)))) (find-files "." "\\.h$")) ;; Install libraries. (for-each (lambda (lib) (install-file lib (string-append #$output "/lib"))) (find-files "build" "^lib.*\\.(a|so)")) ;; This pkgconfig file is useful at least to the ;; python-skia-pathops package. (define skia.pc (string-append #$output "/lib/pkgconfig/skia.pc")) (mkdir-p (dirname skia.pc)) (call-with-output-file skia.pc (lambda (port) (format port "\ prefix=~a exec_prefix=${prefix} libdir=${prefix}/lib includedir=${prefix}/include/skia Name: skia Description: 2D graphic library for drawing text, geometries and images. URL: https://skia.org/ Version: ~a Libs: -L${libdir} -lskia Cflags: -I${includedir}~%" #$output #$version))))) (replace 'check (lambda* (#:key inputs native-inputs #:allow-other-keys) (let ((icu #$(this-package-native-input "icu4c-for-skia"))) ;; Unbundle SPIRV-Tools dependency. (substitute* "BUILD.gn" (("deps \\+= \\[ \"//third_party/externals/spirv-tools:spvtools_val\" \\]") "libs += [ \"SPIRV-Tools\" ]")) (substitute* "src/sksl/SkSLCompiler.cpp" (("\"spirv-tools/libspirv.hpp\"") "")) ;; Configure ICU dependency. (substitute* "third_party/icu/BUILD.gn" (("data_dir = \"\\.\\./externals/icu/\"") (string-append "data_dir = \"" icu "/share/data/\"")) (("script = \"\\.\\./externals/icu/scripts/") (string-append "script = \"" icu "/share/scripts/")) (("\\.\\./externals/icu/common/icudtl\\.dat") (string-append icu "/share/data/icudtl.dat")) (("sources = icu_sources") "") (("sources \\+= \\[ \"\\$data_assembly\" \\]") "sources = [ \"$data_assembly\" ]")) ;; Enable system libraries without is_official_build=true. ;; This is necessary because is_official_build prevents from ;; building dm. (for-each (lambda (libname) (let ((snake (string-join (string-split libname #\-) "_"))) (substitute* (string-append "third_party/" libname "/BUILD.gn") (((string-append "skia_use_system_" snake " = is_official_build.*")) (string-append "skia_use_system_" snake " = true"))))) '("zlib" "libjpeg-turbo" "harfbuzz" "libpng" "libwebp")) ;; Configure with gn. (invoke "gn" "gen" "out/Debug" (string-append "--args=" "cc=\"gcc\" " ;defaults to 'cc' "skia_compile_sksl_tests=false " ; disable some tests "skia_use_perfetto=false " ; disable performance tests "skia_use_wuffs=false " ; missing performance tool "skia_use_system_expat=true " ; use system expat library "skia_use_system_zlib=true " ; use system zlib library ;; Specify where to locate the includes. "extra_cflags=[" (string-join (map (lambda (lib) (string-append "\"-I" (search-input-directory inputs (string-append "include/" lib)) "\"")) '("harfbuzz" "freetype2" "spirv-tools" "spirv" "unicode")) ",") "] " ;; Otherwise the validate-runpath phase fails. "extra_ldflags=[" "\"-Wl,-rpath=" #$output "/lib\"" "] " ;; Disabled, otherwise the build system attempts to ;; download the SDK at build time. "skia_use_dng_sdk=false " "skia_use_runtime_icu=true ")) ;; Build dm testing tool. (symlink (string-append #$(this-package-native-input "gn") "/bin/gn") "./bin/gn") (invoke "ninja" "-C" "out/Debug" "dm") ;; The test suite requires an X server. (let ((xvfb (search-input-file (or native-inputs inputs) "bin/Xvfb")) (display ":1")) (setenv "DISPLAY" display) (system (string-append xvfb " " display " &"))) ;; Run tests. (invoke "out/Debug/dm" "-v" "-w" "dm_output" "--codecWritePath" "dm_output" "--simpleCodec" "--skip" ;; The underscores are part of the dm syntax for ;; skipping tests. ;; These tests fail with segmentation fault. "_" "_" "_" "Codec_trunc" "_" "_" "_" "AnimCodecPlayer" "_" "_" "_" "Codec_partialAnim" "_" "_" "_" "Codec_InvalidImages" "_" "_" "_" "Codec_GifInterlacedTruncated" ;; This test started failing possibly after mesa ;; being updated to 23.2.1 and possibly only on some ;; hardware. "_" "_" "_" "SkRuntimeBlender_GPU" "_" "_" "_" "SkText_UnicodeText_Flags" "_" "_" "_" "SkParagraph_FontStyle" "_" "_" "_" "flight_animated_image" ;; These tests fail because of Codec/Sk failure. "_" "_" "_" "AndroidCodec_computeSampleSize" "_" "_" "_" "AnimatedImage_invalidCrop" "_" "_" "_" "AnimatedImage_scaled" "_" "_" "_" "AnimatedImage_copyOnWrite" "_" "_" "_" "AnimatedImage" "_" "_" "_" "BRD_types" "_" "_" "_" "Codec_frames" "_" "_" "_" "Codec_partial" "_" "_" "_" "Codec_partialWuffs" "_" "_" "_" "Codec_requiredFrame" "_" "_" "_" "Codec_rewind" "_" "_" "_" "Codec_incomplete" "_" "_" "_" "Codec_InvalidAnimated" "_" "_" "_" "Codec_ossfuzz6274" "_" "_" "_" "Codec_gif_out_of_palette" "_" "_" "_" "Codec_xOffsetTooBig" "_" "_" "_" "Codec_gif" "_" "_" "_" "Codec_skipFullParse" "_" "_" "_" "AndroidCodec_animated_gif" ;; These fail for unknown reasons. "_" "_" "_" "Gif" "_" "_" "_" "Wuffs_seek_and_decode" "_" "_" "_" "Skottie_Shaper_ExplicitFontMgr" "8888" "skp" "_" "_" "8888" "lottie" "_" "_" "gl" "skp" "_" "_" "gl" "lottie" "_" "_" "_" "_" "_" "ES2BlendWithNoTexture"))))))) (native-inputs (list gn libjpeg-turbo ninja pkg-config python-wrapper spirv-tools spirv-headers icu4c-for-skia glu xorg-server-for-tests)) (inputs (list expat fontconfig freetype harfbuzz mesa libwebp zlib)) (home-page "https://skia.org/") (synopsis "2D graphics library") (description "Skia is a 2D graphics library for drawing text, geometries, and images. It supports: @itemize @item 3x3 matrices with perspective @item antialiasing, transparency, filters @item shaders, xfermodes, maskfilters, patheffects @item subpixel text @end itemize") (license license:bsd-3)))) (define-public superfamiconv (package (name "superfamiconv") (version "0.8.8") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/Optiroc/SuperFamiconv") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0848szv6a2b8wdganh6mw5i8vn8cqvn1kbwzx7mb9wlrf5wzqn37")))) (build-system gnu-build-system) (arguments `(#:tests? #f ; no tests #:phases (modify-phases %standard-phases (delete 'configure) (replace 'install (lambda* (#:key outputs #:allow-other-keys) (let* ((outdir (assoc-ref outputs "out")) (bindir (string-append outdir "/bin"))) (install-file "bin/superfamiconv" bindir) #t)))))) (home-page "https://github.com/Optiroc/SuperFamiconv") (synopsis "Tile graphics converter supporting SNES, Game Boy Color and PC Engine formats") (description "SuperFamiconv is a converter for tiled graphics, supporting the graphics formats of the SNES, Game Boy Color and PC Engine game consoles. Automated palette selection is supported.") (license license:expat))) (define-public drawpile ;; This commit fix building with libmicrohttpd>=0.71. (let ((commit "ed1a75deb113da2d1df91a28f557509c4897130e") (revision "1")) (package (name "drawpile") (version (string-append "2.1.17-" revision "." (string-take commit 9))) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/drawpile/Drawpile") (commit commit))) (file-name (git-file-name name version)) (sha256 (base32 "1y21h1hk9ipkjvhjgas0c5hkjyan92vsxbxrn60c906hzqln2fr1")))) (build-system qt-build-system) (arguments '(#:configure-flags (list "-DTESTS=ON" "-DTOOLS=ON" "-DKIS_TABLET=ON"))) (native-inputs (list extra-cmake-modules pkg-config)) (inputs (list giflib karchive kdnssd libmicrohttpd libsodium libvpx libxi ;; ("miniupnpc" ,miniupnpc) ;segfaults for some reason qtbase-5 qtkeychain qtmultimedia-5 qtsvg-5 qtx11extras)) (home-page "https://drawpile.net") (synopsis "Collaborative drawing program") (description "Drawpile is a drawing program that allows share the canvas with other users in real time. Some feature highlights: @itemize @item Shared canvas using the built-in server or a dedicated server @item Record, play back and export drawing sessions @item Simple animation support @item Layers and blending modes @item Text layers @item Supports pressure sensitive Wacom tablets @item Built-in chat @item Supports OpenRaster file format @item Encrypted connections using SSL @item Automatic port forwarding with UPnP @end itemize\n") (license license:gpl3+)))) (define-public openxr (package (name "openxr") (version "1.0.26") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/KhronosGroup/OpenXR-SDK") (commit (string-append "release-" version)))) (file-name (git-file-name name version)) (modules '((guix build utils))) (snippet '(begin ;; Delete bundled jsoncpp. (delete-file-recursively "src/external/jsoncpp"))) (sha256 (base32 "0s66xgwkdj5vn05l493hqydrxfpxxidd6mcb8l7l5awhn88cy16f")))) (build-system cmake-build-system) (arguments `(#:tests? #f)) ; there are no tests (native-inputs (list pkg-config python shaderc vulkan-headers)) (inputs (list jsoncpp mesa vulkan-loader wayland)) (home-page "https://www.khronos.org/openxr/") (synopsis "Generated headers and sources for OpenXR loader") (description "This package contains OpenXR headers, as well as source code and build scripts for the OpenXR loader.") ;; Dual licensed. Either license applies. (license (list license:asl2.0 license:expat)))) (define-public monado (package (name "monado") (version "21.0.0") (source (origin (method url-fetch) (uri (string-append "https://gitlab.freedesktop.org/" name "/" name "/-/archive/v" version "/" name "-v" version ".tar.bz2")) (sha256 (base32 "0n04k7a8b0i8ga0kbzh7qxmvni1ijawgk98s83519vxg4d0yyjbq")))) (build-system meson-build-system) (inputs (list ffmpeg glslang eudev libusb libxcb libxrandr mesa python v4l-utils vulkan-loader)) (native-inputs (list eigen pkg-config vulkan-headers)) (arguments `(#:configure-flags (list "-Dinstall-active-runtime=false"))) (home-page "https://monado.freedesktop.org/") (synopsis "OpenXR runtime") (description "Monado is an OpenXR runtime delivering immersive experiences such as VR and AR on mobile, PC/desktop, and any other device. Monado aims to be a complete and conforming implementation of the OpenXR API made by Khronos.") (license license:boost1.0))) (define-public azpainter (package (name "azpainter") (version "3.0.6") (source (origin (method git-fetch) (uri (git-reference (url "https://gitlab.com/azelpg/azpainter") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0lk74drrksk340fzyzvrq0ixwj498adshbp505cj163qsqnndj7y")))) (build-system gnu-build-system) ;actually a home grown build system (arguments (list #:tests? #f #:phases #~(modify-phases %standard-phases (replace 'configure (lambda _ (invoke "./configure" (string-append "--prefix=" #$output)))) (replace 'build (lambda* (#:key parallel-build? #:allow-other-keys) (let ((job-count (if parallel-build? (number->string (parallel-job-count)) "1"))) (invoke "ninja" "-j" job-count "-C" "build")))) (add-before 'install 'disable-cache-generation (lambda _ (setenv "DESTDIR" "/") #t)) (replace 'install (lambda _ (invoke "ninja" "-C" "build" "install")))))) (inputs (list fontconfig freetype libjpeg-turbo libpng libtiff libwebp libx11 libxcursor libxext libxi zlib)) (native-inputs (list ninja pkg-config)) (home-page "http://azsky2.html.xdomain.jp/soft/azpainter.html") (synopsis "Paint software for editing illustrations and images") (description "AzPainter is a lightweight full color painting application for editing illustrations and images. Features include: @itemize @item Layers @item Many artistic filters @item Good range of selection tools @item Pen pressure support with automatic brush size adjustment @item Support for 16-bit color images with transparency (RGBA) @item Support for image formats like PSD, PNG, JPEG, TIFF, WebP @end itemize ") (license license:gpl3+))) (define-public discregrid (let ((commit "4c27e1cc88be828c6ac5b8a05759ac7e01cf79e9") (revision "0")) (package (name "discregrid") (version (git-version "0.0.0" revision commit)) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/InteractiveComputerGraphics/Discregrid") (commit commit))) (file-name (git-file-name name version)) (sha256 (base32 "01cwfpw19rc9k5glx9dhnqpihd0is28a9b53qvzp5kgjmdq2v1p0")) (modules '((guix build utils))) (snippet #~(begin (delete-file-recursively "extern/cxxopts") (substitute* '("cmd/discrete_field_to_bitmap/main.cpp" "cmd/generate_density_map/main.cpp" "cmd/generate_sdf/main.cpp") (("^#include ") "#include ") (("cxxopts::OptionException") "cxxopts::exceptions::parsing")))))) (build-system cmake-build-system) (outputs '("out" "bin")) (arguments (list #:tests? #f ; No tests #:configure-flags #~(list (string-append "-DCMAKE_INSTALL_BINDIR=" #$output:bin "/bin") ;; Bespoke version of BUILD_SHARED_LIBS. "-DBUILD_AS_SHARED_LIBS=ON") #:phases #~(modify-phases %standard-phases (add-after 'unpack 'patch-cmake (lambda _ (let ((port (open-file "cmd/CMakeLists.txt" "a"))) (display "install(TARGETS DiscreteFieldToBitmap GenerateDensityMap GenerateSDF) " port) (close-port port))))))) (inputs (list cxxopts eigen)) (home-page "https://github.com/InteractiveComputerGraphics/Discregrid") (synopsis "Discretize functions on regular grids") (description "Discregrid is a C++ library for the parallel discretization of (preferably smooth) functions on regular grids. It generates a (cubic) polynomial discretization given a box-shaped domain, a grid resolution, and a 3D scalar field. The library can also serialize and deserialize the generated discrete grid, and compute and discretize the signed distance field corresponding to a triangle mesh. The following programs are included with Discregrid: @itemize @item @code{GenerateSDF}: Computes a discrete (cubic) signed distance field from a triangle mesh in OBJ format. @item @code{DiscreteFieldToBitmap}: Generates an image in bitmap format of a two-dimensional slice of a previously computed discretization. @item @code{GenerateDensityMap}: Generates a density map from a previously generated discrete signed distance field using the cubic spline kernel. @end itemize") (license license:expat)))) (define-public mmg (package (name "mmg") (version "5.7.2") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/MmgTools/mmg") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "007d0mvqhnxxj6dbcip9s615asrbpgrbkpm5xn6m8k3n9sljr153")))) (build-system cmake-build-system) (outputs '("out" "lib" "doc")) (arguments (list #:configure-flags #~(list (string-append "-DCMAKE_INSTALL_PREFIX=" #$output:lib) (string-append "-DCMAKE_INSTALL_RPATH=" #$output:lib "/lib") ;; The build doesn't honor -DCMAKE_INSTALL_BINDIR, hence ;; the adjust-bindir phase. ;;(string-append "-DCMAKE_INSTALL_BINDIR=" #$output "/bin") (string-append "-DCMAKE_INSTALL_MANDIR=" #$output "/share/man") "-DBUILD_SHARED_LIBS=ON" "-DBUILD_DOC=ON" "-DBUILD_TESTING=ON" ;; The longer tests are for continuous integration and ;; depend on input data which must be downloaded. "-DONLY_VERY_SHORT_TESTS=ON" "-DUSE_SCOTCH=ON" ;; TODO: Add Elas (from ;; https://github.com/ISCDtoolbox/LinearElasticity). "-DUSE_ELAS=OFF" ;; TODO: Figure out how to add VTK to inputs without ;; causing linking errors in ASLI of the form: ;; ;; ld: /gnu/store/…-vtk-9.0.1/lib/libvtkWrappingPythonCore-9.0.so.1: ;; undefined reference to `PyUnicode_InternFromString' ;; ;; Also, adding VTK to inputs requires adding these as well: ;; ;; double-conversion eigen expat freetype gl2ps glew hdf5 ;; jsoncpp libjpeg-turbo libpng libtheora libtiff libx11 ;; libxml2 lz4 netcdf proj python sqlite zlib "-DUSE_VTK=OFF") #:phases #~(modify-phases %standard-phases (add-after 'build 'build-doc (lambda _ ;; Fontconfig wants to write to a cache directory. (setenv "HOME" "/tmp") (invoke "make" "doc"))) (add-after 'install 'install-doc (lambda _ (copy-recursively "doc" (string-append #$output:doc "/share/doc/" #$name "-" #$version)))) (add-after 'install 'adjust-bindir (lambda _ (let ((src (string-append #$output:lib "/bin")) (dst (string-append #$output "/bin"))) (copy-recursively src dst) (delete-file-recursively src)))) ;; Suffixing program names with build information, i.e., ;; optimization flags and whether debug symbols were generated, ;; is unusual and fragilizes scripts calling these programs. (add-after 'adjust-bindir 'fix-program-names (lambda _ (with-directory-excursion (string-append #$output "/bin") (rename-file "mmg2d_O3d" "mmg2d") (rename-file "mmg3d_O3d" "mmg3d") (rename-file "mmgs_O3d" "mmgs"))))))) (native-inputs ;; For the documentation (list doxygen graphviz ;; TODO: Fix failing LaTeX invocation (which results in equations ;; being inserted literally into PNGs rather than being typeset). ;; (texlive-updmap.cfg) perl)) ;used to generate Fortran headers (inputs (list scotch)) (home-page "http://www.mmgtools.org/") (synopsis "Surface and volume remeshers") (description "Mmg is a collection of applications and libraries for bidimensional and tridimensional surface and volume remeshing. It consists of: @itemize @item the @code{mmg2d} application and library: mesh generation from a set of edges, adaptation and optimization of a bidimensional triangulation and isovalue discretization; @item the @code{mmgs} application and library: adaptation and optimization of a surface triangulation and isovalue discretization; @item the @code{mmg3d} application and library: adaptation and optimization of a tetrahedral mesh, isovalue discretization and Lagrangian movement; @item the @code{mmg} library gathering the @code{mmg2d}, @code{mmgs} and @code{mmg3d} libraries. @end itemize") (license license:lgpl3+))) (define-public nanosvg ;; There are no proper versions or releases; use the latest commit. (let ((commit "9da543e8329fdd81b64eb48742d8ccb09377aed1") (revision "0")) (package (name "nanosvg") (version (git-version "0.0.0" revision commit)) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/memononen/nanosvg") (commit commit))) (file-name (git-file-name name version)) (sha256 (base32 "1pkzv75kavkhrbdd2kvq755jyr0vamgrfr7lc33dq3ipkzmqvs2l")) ;; This patch required to build PrusaSlicer 2.6. ;; ;; It is taken from ;; (patches (search-patches "nanosvg-prusa-slicer.patch")))) (build-system cmake-build-system) (arguments (list #:tests? #f ;no test suite #:configure-flags #~(list "-DBUILD_SHARED_LIBS=ON"))) (home-page "https://github.com/memononen/nanosvg") (synopsis "Simple SVG parser") (description "NanoSVG is a simple single-header SVG parser. The output of the parser is a list of cubic bezier shapes. The library suits well for anything from rendering scalable icons in an editor application to prototyping a game.") (license license:zlib)))) (define-public asli (package (name "asli") (version "0.1") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/tpms-lattice/ASLI") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "02hwdavpsy3vmivd6prp03jn004ykrl11lbkvksy5i2zm38zbknr")) (patches (search-patches "asli-use-system-libs.patch")) (modules '((guix build utils))) (snippet ;; Remove bundled libraries except (the ones missing from Guix and) ;; KU Leuven's mTT, which is an obscure (i.e., unfindable by searching ;; online for “mTT KU Leuven”), BSD-3 licensed, header-only library. #~(begin ;;(delete-file-recursively "libs/AdaptTools") ; Missing from Guix (delete-file-recursively "libs/CGAL") ;;(delete-file-recursively "libs/alglib") ; Missing from Guix (delete-file-recursively "libs/eigen") (delete-file-recursively "libs/mmg") ;;(delete-file-recursively "libs/tetgen") ; Missing from Guix (delete-file-recursively "libs/yaml"))))) (build-system cmake-build-system) (inputs (list boost cgal eigen gmp `(,mmg "lib") mpfr tbb-2020 yaml-cpp)) (arguments (list #:tests? #f ; No tests #:configure-flags #~(list "-DCGAL_ACTIVATE_CONCURRENT_MESH_3=ON" (string-append "-DEIGEN3_INCLUDE_DIR=" #$(this-package-input "eigen") "/include/eigen3") (string-append "-DMMG_INCLUDE_DIR=" (ungexp (this-package-input "mmg") "lib") "/include") (string-append "-DMMG_LIBRARY_DIR=" (ungexp (this-package-input "mmg") "lib") "/lib")) #:phases #~(modify-phases %standard-phases (replace 'install ; No install phase (lambda _ (with-directory-excursion "../source/bin" (install-file "ASLI" (string-append #$output "/bin")) ;; The manual is included in the repository. ;; Building it requires -DASLI_DOC=ON, but this is marked ;; as unsupported (presumably for users). ;; Besides, some of the LaTeX packages it uses are ;; missing from Guix, for example emptypage, fvextra and ;; menukeys. (install-file "docs/ASLI [User Manual].pdf" (string-append #$output "/share/doc/" #$name "-" #$version)))))))) (home-page "http://www.biomech.ulg.ac.be/ASLI/") (synopsis "Create lattice infills with varying unit cell type, size and feature") (description "ASLI (A Simple Lattice Infiller) is a command-line tool that allows users to fill any 3D geometry with a functionally graded lattice. The lattice infill is constructed out of unit cells, described by implicit functions, whose type, size and feature can be varied locally to obtain the desired local properties.") (license license:agpl3+))) (define-public f3d (package (name "f3d") (version "2.2.1") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/f3d-app/f3d") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0f076754zsxb4gwk6bxj94iyjj0dfxmmc8w88f55xd6hbm3qdnwd")) (modules '((guix build utils))) (snippet #~(begin (delete-file-recursively "external/cxxopts") (delete-file-recursively "external/nlohmann_json"))))) (build-system cmake-build-system) ;; The package cannot easily be split into out and lib outputs because ;; VTK's vtkModule.cmake complains, and also the CMake files in ;; /lib/cmake/f3d expect the f3d executable and library to be available, ;; as they set up targets for both of them. (arguments (list ;; Many tests require files supplied by git-lfs. ;; Also, some tests segfault (after an exception?) but the tested ;; behavior, i.e., when the program is run manually, does not (for ;; example, TestNonExistentConfigFile and TestInvalidConfigFile). ;; Upstream is aware of occasionally flaky tests [1], but the tests ;; run in CI seem to be passing. ;; Anyway, the program runs and is able to open at least STL files ;; without issue. ;; ;; [1]: https://github.com/f3d-app/f3d/issues/92 #:tests? #f #:configure-flags #~(list (string-append "-DCMAKE_INSTALL_DOCDIR=" #$output "/share/doc/" #$name "-" #$version) "-DBUILD_TESTING=OFF" "-DF3D_LINUX_GENERATE_MAN=ON" "-DF3D_USE_EXTERNAL_CXXOPTS=ON" "-DF3D_USE_EXTERNAL_NLOHMANN_JSON=ON" "-DF3D_MODULE_EXTERNAL_RENDERING=ON" "-DF3D_MODULE_EXR=ON" "-DF3D_PLUGIN_BUILD_ALEMBIC=ON" "-DF3D_PLUGIN_BUILD_ASSIMP=ON" "-DF3D_PLUGIN_BUILD_OCCT=ON") #:phases #~(modify-phases %standard-phases (add-after 'unpack 'fix-cmake-rpath (lambda _ ;; Expand $ORIGIN, and add VTK to library RPATH, because it is ;; not added automatically. (substitute* "application/CMakeLists.txt" (("(set_target_properties.*PROPERTIES.*INSTALL_RPATH ).*" _ prefix) (string-append prefix "\"" #$output "/lib\")\n"))) (substitute* "library/CMakeLists.txt" (("(set_target_properties.*PROPERTIES.*INSTALL_RPATH ).*" _ prefix) (string-append prefix "\"" #$output "/lib:" #$(this-package-input "vtk") "/lib\")\n")))))))) (native-inputs (list cxxopts help2man nlohmann-json)) (inputs (list alembic assimp double-conversion eigen expat fontconfig freetype glew hdf5 imath jsoncpp libjpeg-turbo libpng libtiff libx11 lz4 netcdf opencascade-occt openexr vtk zlib)) (home-page "https://f3d-app.github.io/f3d/") (synopsis "VTK-based 3D viewer") (description "F3D (pronounced @samp{/fɛd/}) is a VTK-based 3D viewer with simple interaction mechanisms and which is fully controllable using arguments on the command line. It supports a range of file formats (including animated glTF, STL, STEP, PLY, OBJ, FBX), and provides numerous rendering and texturing options.") (license license:bsd-3))) (define-public gpaint (package (name "gpaint") (version "0.3.4") (source (origin (method url-fetch) (uri (string-append "http://alpha.gnu.org/gnu/" name "/" name "-2-" version ".tar.gz")) (sha256 (base32 "13jv0zqbnyxjw7fa9x0yl08rrkqq0mdvki0yzbj6vqifvs393v5h")))) (build-system gnu-build-system) (inputs (list gtk+-2 libglade)) (native-inputs (list gettext-minimal `(,glib "bin") pkg-config)) (synopsis "Simple paint program for GNOME") (description "GNU Paint is a simple, easy-to-use paint program for the GNOME environment. It supports drawing freehand as well as basic shapes and text. It features cut-and-paste for irregular regions or polygons.") (home-page "https://www.gnu.org/software/gpaint/") (license license:gpl3+)))