aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/crates-io.scm
blob: afd7cb586a51a6f12954296c23ca550477737c71 (about) (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2019 Ivan Petkov <ivanppetkov@gmail.com>
;;; Copyright © 2019 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; 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 crates-io)
  #:use-module (guix build-system cargo)
  #:use-module (guix download)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix packages))

;;;
;;; Please: Try to add new module packages in alphabetic order.
;;;

(define-public rust-autocfg
  (package
    (name "rust-autocfg")
    (version "0.1.5")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "autocfg" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "0asl6fnc35yk5l2rxwhp25v128jgm45dp754h9z8x51b6n90w4r2"))))
    (build-system cargo-build-system)
    (home-page "https://github.com/cuviper/autocfg")
    (synopsis "Automatic cfg for Rust compiler features")
    (description "Rust library for build scripts to automatically configure
code based on compiler support.  Code snippets are dynamically tested to see
if the @code{rustc} will accept them, rather than hard-coding specific version
support.")
    (license (list license:asl2.0
                   license:expat))))

(define-public rust-bencher
  (package
    (name "rust-bencher")
    (version "0.1.5")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "bencher" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "1x8p2xblgqssay8cdykp5pkfc0np0jk5bs5cx4f5av097aav9zbx"))))
    (build-system cargo-build-system)
    (home-page "https://github.com/bluss/bencher/")
    (synopsis "Port of the libtest benchmark runner to Rust stable")
    (description "This package provides a port of the libtest (unstable Rust)
benchmark runner to Rust stable releases.  Supports running benchmarks and
filtering based on the name.  Benchmark execution works exactly the same way
and no more (caveat: black_box is still missing!).")
    (license (list license:asl2.0
                   license:expat))))

(define-public rust-bitflags
  (package
    (name "rust-bitflags")
    (version "1.1.0")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "bitflags" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "1zc1qb1hwsnl2d8rhzicsv9kqd5b2hwbrscrcfw5as4sfr35659x"))))
    (build-system cargo-build-system)
    (home-page "https://github.com/bitflags/bitflags")
    (synopsis "Macro to generate structures which behave like bitflags")
    (description "This package provides a macro to generate structures which
behave like a set of bitflags.")
    (license (list license:asl2.0
                   license:expat))))

(define-public rust-cfg-if
  (package
    (name "rust-cfg-if")
    (version "0.1.9")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "cfg-if" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "0csygklgz3ybpr0670rkip49zh76m43ar3k7xgypkzbzrwycx1ml"))))
    (build-system cargo-build-system)
    (home-page "https://github.com/alexcrichton/cfg-if")
    (synopsis "Define an item depending on parameters")
    (description "This package provides a macro to ergonomically define an item
depending on a large number of #[cfg] parameters.  Structured like an
@code{if-else} chain, the first matching branch is the item that gets emitted.")
    (license (list license:asl2.0
                   license:expat))))

(define-public rust-discard
  (package
    (name "rust-discard")
    (version "1.0.4")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "discard" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "1h67ni5bxvg95s91wgicily4ix7lcw7cq0a5gy9njrybaibhyb91"))))
    (build-system cargo-build-system)
    (home-page "https://github.com/Pauan/rust-discard")
    (synopsis "Allow for intentionally leaking memory")
    (description "There are situations where you need to intentionally leak some
memory but not other memory.  This package provides a discard trait which allows
for intentionally leaking memory")
    (license license:expat)))

(define-public rust-doc-comment
  (package
    (name "rust-doc-comment")
    (version "0.3.1")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "doc-comment" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "15rsqxgarfpb1yim9sbp9yfgj7p2dq6v51c6bq1a62paii9ylgcj"))))
    (build-system cargo-build-system)
    (home-page "https://github.com/GuillaumeGomez/doc-comment")
    (synopsis "Macro to generate doc comments")
    (description "This package provides a way to generate doc comments
from macros.")
    (license license:expat)))

(define-public rust-dtoa
  (package
    (name "rust-dtoa")
    (version "0.4.4")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "dtoa" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "0phbm7i0dpn44gzi07683zxaicjap5064w62pidci4fhhciv8mza"))))
    (build-system cargo-build-system)
    (home-page "https://github.com/dtolnay/dtoa")
    (synopsis "Fast functions for printing floating-point primitives")
    (description "This crate provides fast functions for printing
floating-point primitives to an @code{io::Write}.")
    (license (list license:asl2.0
                   license:expat))))

(define-public rust-fallible-iterator
  (package
    (name "rust-fallible-iterator")
    (version "0.2.0")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "fallible-iterator" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "1xq759lsr8gqss7hva42azn3whgrbrs2sd9xpn92c5ickxm1fhs4"))))
    (build-system cargo-build-system)
    (home-page "https://github.com/sfackler/rust-fallible-iterator")
    (synopsis "Fallible iterator traits")
    (description "If the @code{std} or @code{alloc} features are enabled, this
crate provides implementations for @code{Box}, @code{Vec}, @code{BTreeMap}, and
@code{BTreeSet}.  If the @code{std} feature is enabled, this crate additionally
provides implementations for @code{HashMap} and @code{HashSet}.")
    (license (list license:asl2.0
                   license:expat))))

(define-public rust-fnv
  (package
    (name "rust-fnv")
    (version "1.0.6")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "fnv" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "1ww56bi1r5b8id3ns9j3qxbi7w5h005rzhiryy0zi9h97raqbb9g"))))
    (build-system cargo-build-system)
    (home-page "https://github.com/servo/rust-fnv")
    (synopsis "implementation of the Fowler-Noll-Vo hash function")
    (description "The @code{fnv} hash function is a custom @code{Hasher}
implementation that is more efficient for smaller hash keys.")
    (license (list license:asl2.0
                   license:expat))))

(define-public rust-fs-extra
  (package
    (name "rust-fs-extra")
    (version "1.1.0")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "fs_extra" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "0x6675wdhsx277k1k1235jwcv38naf20d8kwrk948ds26hh4lajz"))))
    (build-system cargo-build-system)
    (home-page "https://github.com/webdesus/fs_extra")
    (synopsis "Extra filesystem methods")
    (description "Expanding opportunities standard library @code{std::fs} and
@code{std::io}.  Recursively copy folders with recept information about
process and much more.")
    (license license:expat)))

(define-public rust-proc-macro2
  (package
    (name "rust-proc-macro2")
    (version "0.4.30")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "proc-macro2" version))
        (file-name
          (string-append name "-" version ".tar.gz"))
        (sha256
          (base32
            "0nd71fl24sys066jrha6j7i34nfkjv44yzw8yww9742wmc8j0gfg"))))
    (build-system cargo-build-system)
    (arguments
      `(#:cargo-inputs (("rust-unicode-xid" ,rust-unicode-xid))
        #:cargo-development-inputs (("rust-quote" ,rust-quote))))
    (home-page "https://github.com/alexcrichton/proc-macro2")
    (synopsis "Stable implementation of the upcoming new `proc_macro` API")
    (description "This package provides a stable implementation of the upcoming new
`proc_macro` API.  Comes with an option, off by default, to also reimplement itself
in terms of the upstream unstable API.")
    ;; Dual licensed.
    (license (list license:asl2.0 license:expat))))

(define-public rust-quote
  (package
    (name "rust-quote")
    (version "0.6.12")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "quote" version))
        (file-name
          (string-append name "-" version ".tar.gz"))
        (sha256
          (base32
            "1nw0klza45hf127kfyrpxsxd5jw2l6h21qxalil3hkr7bnf7kx7s"))))
    (build-system cargo-build-system)
    (arguments
      `(#:cargo-inputs (("rust-proc-macro2" ,rust-proc-macro2))))
    (home-page "https://github.com/dtolnay/quote")
    (synopsis "Quasi-quoting macro quote!(...)")
    (description "Quasi-quoting macro quote!(...)")
    ;; Dual licensed.
    (license (list license:asl2.0 license:expat))))

(define-public rust-unicode-xid
  (package
    (name "rust-unicode-xid")
    (version "0.1.0")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "unicode-xid" version))
        (file-name
          (string-append name "-" version ".tar.gz"))
        (sha256
          (base32
            "1z57lqh4s18rr4x0j4fw4fmp9hf9346h0kmdgqsqx0fhjr3k0wpw"))))
    (build-system cargo-build-system)
    (home-page
      "https://github.com/unicode-rs/unicode-xid")
    (synopsis "Determine Unicode XID related properties")
    (description "Determine whether characters have the XID_Start
or XID_Continue properties according to Unicode Standard Annex #31.")
    ;; Dual licensed.
    (license (list license:asl2.0 license:expat))))
uot; "-DWITH_INSTALL_PORTABLE=OFF" "-DWITH_JACK=ON" "-DWITH_MOD_OCEANSIM=ON" "-DWITH_OPENVDB=ON" "-DWITH_OPENSUBDIV=ON" "-DWITH_PYTHON_INSTALL=OFF" "-DWITH_SYSTEM_BULLET=ON" "-DWITH_SYSTEM_EIGEN3=ON" "-DWITH_SYSTEM_FREETYPE=ON" "-DWITH_SYSTEM_GLOG=ON" "-DWITH_SYSTEM_LZO=ON" (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/"))) #:phases #~(modify-phases %standard-phases (add-after 'install 'wrap-bin (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (python-path (getenv "GUIX_PYTHONPATH"))) (wrap-program (string-append out "/bin/blender") `("GUIX_PYTHONPATH" ":" prefix (,python-path))))))))) (inputs (list bash-minimal boost bullet eigen embree ffmpeg-5 fftw freetype-with-brotli glew glog gmp ;needed for boolean operations on meshes imath jack-1 jemalloc libepoxy libjpeg-turbo libpng libsndfile libtiff libx11 libxi libxrender lzo openal opencolorio openexr openimageio openjpeg opensubdiv openvdb pugixml python python-numpy tbb zlib `(,zstd "lib"))) (home-page "https://www.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.10.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 "1x97w4infifw33r4ii53q3v1ia0p21lbacd7z01vsz4vq7sy0dxn")))) (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.6.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/CGAL/cgal/releases/download/v" version "/CGAL-" version ".tar.xz")) (sha256 (base32 "0dsqvnyd2ic50pr28gfz34bpnyx3i2csf1rikmc661hywdz5xcfd")))) (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: ;; <https://issues.guix.gnu.org/22049>. 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<unsigned>.*" 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.3") (source (origin (method git-fetch) (uri (git-reference (url "https://gitlab.com/inkscape/lib2geom") (commit version))) (file-name (git-file-name "lib2geom" version)) (sha256 (base32 "1ypcn0yxk9ny7qg8s8h3px2wpimhfgkwk7x1548ky12iqmdjjmcn")))) (build-system cmake-build-system) (arguments (list #:imported-modules `((guix build python-build-system) ,@%cmake-build-system-modules) #:modules '((guix build cmake-build-system) (guix build utils) ((guix build python-build-system) #:prefix python:)) #:configure-flags #~(list "-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) (substitute* '("src/cython/CMakeLists.txt" "src/py2geom/CMakeLists.txt") (("PYTHON_LIB_INSTALL \"[^\"]*\"") (format #f "PYTHON_LIB_INSTALL ~s" (python:site-packages inputs outputs)))))) #$@(cond ((target-x86-32?) #~((add-after 'unpack 'skip-faulty-test (lambda _ (substitute* "tests/CMakeLists.txt" ;; 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. (("bezier-test") "") ;; https://gitlab.com/inkscape/lib2geom/-/issues/68 (("ellipse-test") "") ;; XXX: Additional unresolved test failures. (("elliptical-arc-test") "") (("self-intersections-test") "")))))) ;; See https://gitlab.com/inkscape/lib2geom/-/issues/63 ((target-aarch64?) #~((add-after 'unpack 'fix-aarch64-faulty-test (lambda _ (substitute* "tests/CMakeLists.txt" (("elliptical-arc-test") "")))))) (else #~()))))) (native-inputs (list python-wrapper googletest pkg-config)) (inputs (list cairo python-pycairo double-conversion glib gsl)) (propagated-inputs (list boost)) ;included 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") ;; Do not yet upgrade to 4.0.0, as its include file fails to compile for C ;; project (see: https://github.com/reviczky/pstoedit/issues/2). (version "4.00") (source (origin (method url-fetch) (uri (string-append "mirror://sourceforge/pstoedit/pstoedit/" version "/pstoedit-" version ".tar.gz")) (sha256 (base32 "1sk2mhrjgnlz4a1650p3qxrv6av6qc66ibmy48ckspx7mfp7snh7")) (patches (search-patches "pstoedit-fix-gcc12.patch" "pstoedit-fix-plainC.patch" "pstoedit-pkglibdir.patch")))) (build-system gnu-build-system) (arguments ;; Avoid keeping extraneous references to libtool exhaustively listed ;; dependencies. (list #:configure-flags #~(list "LDFLAGS=-Wl,--as-needed"))) (native-inputs (list pkg-config)) (inputs (list ghostscript imagemagick plotutils libjpeg-turbo libzip ;; The following inputs are pulled in by libtool, from the ;; imagemagick library files (.la), which records all its ;; transitive dependencies. glib pango)) (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 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.2.4") (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 "00s1a05kggk71vfbnsvykyjc2j7y6yyzgl63sy4yiddshz2k2mcr")))) (build-system cmake-build-system) (arguments (list #:configure-flags #~(list #$@(match (%current-system) ;; A test explicitly checks for SSE2 (would fail on ;; i686-linux), so make sure it is enabled for both C ;; and CPP. ((or "x86_64-linux" "i686-linux") '("-DCMAKE_CXX_FLAGS=-mfpmath=sse -msse2" "-DCMAKE_C_FLAGS=-mfpmath=sse -msse2")) (_ '()))) #:phases #~(modify-phases %standard-phases (add-after 'unpack 'patch-test-directory (lambda _ (substitute* (list "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)) (propagated-inputs ;; Marked as Requires.private in OpenEXR.pc. (list libdeflate)) (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.13.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/AcademySoftwareFoundation/OpenImageIO") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0bqalfcfjjk31a7zv2hyx0jz8jpdhpsmc3sqwmfl4zf431g45hpb")))) (build-system cmake-build-system) (arguments (list #:tests? #f ; half the tests require online data or use redirection #:configure-flags #~(list "-DUSE_EXTERNAL_PUGIXML=1" "-DOIIO_BUILD_TESTS=false") #:phases #~(modify-phases %standard-phases ; Work around a CMake Zlib-detection bug: ; https://issues.guix.gnu.org/72046 ; https://gitlab.kitware.com/cmake/cmake/-/issues/25200 (add-after 'configure 'fix-zlib-version (lambda _ (substitute* "include/imageio_pvt.h" (("#define ZLIB_VERSION \"1\\.3\"") "")))) (add-after 'install 'fix-OpenImageIOConfig (lambda _ (substitute* (string-append #$output "/lib/cmake/OpenImageIO/OpenImageIOConfig.cmake") (("#define ZLIB_VERSION \"1\\.3\"") ""))))))) (native-inputs (list pkg-config)) (inputs (list boost dcmtk fmt freetype giflib imath libglvnd libheif libjpeg-turbo libpng libraw libtiff libwebp opencolorio openexr openjpeg ;; openvdb ; OpenVDB needs OIIO to be built with C++17 or higher pugixml pybind11 python-wrapper 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://github.com/AcademySoftwareFoundation/OpenImageIO") (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.3") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/ampas/CTL") (commit (string-append "ctl-" version)))) (file-name (git-file-name name version)) (sha256 (base32 "1qhfp9b90czvxjkf66sbnqyw3wvmdvl1pkh6201fxhqg7grbfvwc")))) (build-system cmake-build-system) ;; Headers include OpenEXR and IlmBase headers. (propagated-inputs (list openexr-2)) (inputs (list libtiff)) (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.6.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 "0h9scxiigijzlpv4r0s0nhxlndhv1cmarb2bqgmlwcln1jjvlb4n")))) (build-system cmake-build-system) (arguments (list #:phases #~(modify-phases %standard-phases (add-before 'configure 'set-glew-location (lambda _ (setenv "GLEW_LOCATION" #$(this-package-input "glew")))) (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")))))) (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.2") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/coin3d/coin") (commit (string-append "v" version)) (recursive? #t))) (file-name (git-file-name name version)) (sha256 (base32 "1p59q67zc45pwicknsccvmby09snhz35725wr3xsh2v6kxza76a4")) (modules '((guix build utils))) (snippet #~(begin ;; Delete binaries (for-each delete-file '("cfg/csubst.exe" "cfg/wrapmsvc.exe")) ;; Unbundle expat. (delete-file-recursively "src/xml/expat") (substitute* "src/xml/document.cpp" (("expat/expat\\.h") "expat.h")) ;; 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.*") "")))))) (build-system cmake-build-system) (arguments (list #:configure-flags #~(list "-DCOIN_BUILD_DOCUMENTATION_MAN=ON" "-DUSE_EXTERNAL_EXPAT=ON" ;; Disable "runtime linking" of libraries, i.e. `dlopen`, ;; force to use libraries at build time. "-DFONTCONFIG_RUNTIME_LINKING=OFF" "-DFREETYPE_RUNTIME_LINKING=OFF" "-DLIBBZIP2_RUNTIME_LINKING=OFF" "-DOPENAL_RUNTIME_LINKING=OFF" ;"-DSIMAGE_RUNTIME_LINKING=OFF" -- Not packaged yet. "-DZLIB_RUNTIME_LINKING=OFF" "-DGLU_RUNTIME_LINKING=OFF" ;"-DSPIDERMONKEY_RUNTIME_LINKING=OFF" -- Can't find mozjs. (string-append "-DBOOST_ROOT=" #$(this-package-input "boost"))))) (native-inputs (list doxygen graphviz)) (inputs (list boost bzip2 expat fontconfig freeglut freetype glew libx11 openal zlib)) (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 coin3d) (export coin3D) (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\"") "<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-5 kdnssd-5 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 tinygltf (package (name "tinygltf") (version "2.8.21") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/syoyo/tinygltf") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "14712lndwlk4y001jxf2rxhwrw0w5gbc2hyh9kpik1galdzg41ii")) (modules '((guix build utils))) (snippet #~(begin (for-each delete-file-recursively (list "examples" ".github" "tools")) ;; tinygltf bundles json, stb-image and stb-image-write ;; headers. Delete those, and use symlink ours instead. (for-each delete-file (list "json.hpp" "stb_image.h" "stb_image_write.h" "tests/catch.hpp")))))) (build-system cmake-build-system) (arguments (list #:phases #~(modify-phases %standard-phases (add-after 'unpack 'use-our-packages (lambda* (#:key inputs #:allow-other-keys) (symlink (search-input-file inputs "include/nlohmann/json.hpp") "json.hpp") (symlink (search-input-file inputs "include/stb_image.h") "stb_image.h") (symlink (search-input-file inputs "include/stb_image_write.h") "stb_image_write.h") (symlink (search-input-file inputs "include/catch.hpp") "catch.hpp"))) (add-after 'install 'delete-static-lib (lambda _ (delete-file (string-append #$output "/lib/libtinygltf.a")))) (replace 'check (lambda* (#:key tests? #:allow-other-keys) (if tests? (with-directory-excursion "../source/tests" (invoke "make") (invoke "./tester") (invoke "./tester_noexcept")) (format #t "test suite not run~%"))))))) (inputs (list nlohmann-json stb-image stb-image-write)) (native-inputs (list catch-framework clang)) (home-page "https://github.com/syoyo/tinygltf") (synopsis "Header only GL Transmission Format library") (description "This package provides a header only C++11 @url{https://github.com/KhronosGroup/glTF, glTF} (GL Transmission Format) 2.0 library. GL Transmission Format (glTF) is a royalty-free specification for the efficient transmission and loading of 3D scenes and models by applications. glTF minimizes both the size of 3D assets, and the runtime processing needed to unpack and use those assets. glTF defines an extensible, common publishing format for 3D content tools and services that streamlines authoring workflows and enables interoperable use of content across the industry.") (license 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 <cxxopts/cxxopts\\.hpp>") "#include <cxxopts.hpp>") (("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 ;; <https://github.com/fltk/nanosvg/commit/abcd277ea45e9098bed752cf9c6875b533c0892f.patch> (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 ;; Use the newer version of ASLI that allows build with CGAL v5.6. (let ((commit "4f4ba142ea7db6eecfdb546538c88a38680a83c5") (revision "1")) (package (name "asli") (version (git-version "0.1" revision commit)) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/tpms-lattice/ASLI") (commit commit))) (file-name (git-file-name name version)) (sha256 (base32 "122xxnj3dckmg6mh07x490564b2z9gd38cd0wc5zz3p4nshcq7wy")) (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/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.4.0") (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 "1vls3jbq8r5ph937a2d1i8dv2zjhjjm9cmfgyap5424z7k5anv40")) (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/") (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+)))