| blob | b7a615bc10d9bee090b35d708423f72d80aa5904 |
1 ;;; GNU Guix --- Functional package management for GNU
2 ;;; Copyright © 2013, 2014, 2015 Andreas Enge <andreas@enge.fr>
3 ;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com>
4 ;;; Copyright © 2015 Ludovic Courtès <ludo@gnu.org>
5 ;;; Copyright © 2015, 2016, 2017 Efraim Flashner <efraim@flashner.co.il>
6 ;;; Copyright © 2016, 2017 ng0 <ng0@libertad.pw>
7 ;;; Copyright © 2016 Thomas Danckaert <post@thomasdanckaert.be>
8 ;;; Copyright © 2017 Ricardo Wurmus <rekado@elephly.net>
9 ;;; Copyright © 2017 Quiliro <quiliro@fsfla.org>
10 ;;;
11 ;;; This file is part of GNU Guix.
12 ;;;
13 ;;; GNU Guix is free software; you can redistribute it and/or modify it
14 ;;; under the terms of the GNU General Public License as published by
15 ;;; the Free Software Foundation; either version 3 of the License, or (at
16 ;;; your option) any later version.
17 ;;;
18 ;;; GNU Guix is distributed in the hope that it will be useful, but
19 ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
20 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 ;;; GNU General Public License for more details.
22 ;;;
23 ;;; You should have received a copy of the GNU General Public License
24 ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
26 (define-module (gnu packages qt)
27 #:use-module ((guix licenses) #:prefix license:)
28 #:use-module (guix packages)
29 #:use-module (guix download)
30 #:use-module (guix build utils)
31 #:use-module (guix build-system cmake)
32 #:use-module (guix build-system gnu)
33 #:use-module (guix build-system trivial)
34 #:use-module (guix packages)
35 #:use-module (guix utils)
36 #:use-module (gnu packages)
37 #:use-module (gnu packages bison)
38 #:use-module (gnu packages compression)
39 #:use-module (gnu packages cups)
40 #:use-module (gnu packages databases)
41 #:use-module (gnu packages documentation)
42 #:use-module (gnu packages fontutils)
43 #:use-module (gnu packages flex)
44 #:use-module (gnu packages freedesktop)
45 #:use-module (gnu packages gl)
46 #:use-module (gnu packages glib)
47 #:use-module (gnu packages gnuzilla)
48 #:use-module (gnu packages gperf)
49 #:use-module (gnu packages gstreamer)
50 #:use-module (gnu packages gtk)
51 #:use-module (gnu packages icu4c)
52 #:use-module (gnu packages image)
53 #:use-module (gnu packages linux)
54 #:use-module (gnu packages maths)
55 #:use-module (gnu packages pciutils)
56 #:use-module (gnu packages pcre)
57 #:use-module (gnu packages perl)
58 #:use-module (gnu packages pkg-config)
59 #:use-module (gnu packages pulseaudio)
60 #:use-module (gnu packages python)
61 #:use-module (gnu packages ruby)
62 #:use-module (gnu packages sdl)
63 #:use-module (gnu packages tls)
64 #:use-module (gnu packages xdisorg)
65 #:use-module (gnu packages xorg)
66 #:use-module (gnu packages xml))
68 (define-public grantlee
69 (package
70 (name "grantlee")
71 (version "5.1.0")
72 (source
73 (origin
74 (method url-fetch)
75 (uri (string-append "https://github.com/steveire/grantlee/archive/v"
76 version ".tar.gz"))
77 (file-name (string-append name "-" version ".tar.gz"))
78 (sha256
79 (base32 "1lf9rkv0i0kd7fvpgg5l8jb87zw8dzcwd1liv6hji7g4wlpmfdiq"))))
80 (native-inputs
81 ;; Optional: lcov and cccc, both are for code coverage
82 `(("doxygen" ,doxygen)))
83 (inputs
84 `(("qtbase" ,qtbase)
85 ("qtscript" ,qtscript)))
86 (build-system cmake-build-system)
87 (arguments
88 `(#:phases
89 (modify-phases %standard-phases
90 (add-before 'check 'check-setup
91 (lambda _
92 ;; make Qt render "offscreen", required for tests
93 (setenv "QT_QPA_PLATFORM" "offscreen")
94 #t)))))
95 (home-page "https://github.com/steveire/grantlee")
96 (synopsis "Libraries for text templating with Qt")
97 (description "Grantlee Templates can be used for theming and generation of
98 other text such as code. The syntax uses the syntax of the Django template
99 system, and the core design of Django is reused in Grantlee.")
100 (license license:lgpl2.0+)))
102 (define-public qt
103 (package
104 (name "qt")
105 (version "5.9.2")
106 (outputs '("out" "examples"))
107 (source (origin
108 (method url-fetch)
109 (uri
110 (string-append
111 "http://download.qt.io/official_releases/qt/"
112 (version-major+minor version)
113 "/" version
114 "/single/qt-everywhere-opensource-src-"
115 version ".tar.xz"))
116 (sha256
117 (base32
118 "1zr0hvhryn2ada53ln7cycymh602cncli86n291bsgzas6j72qbc"))
119 (modules '((guix build utils)))
120 (snippet
121 '(begin
122 ;; Remove qtwebengine, which relies on a bundled copy of
123 ;; chromium. Not only does it fail compilation in qt 5.5:
124 ;; 3rdparty/chromium/ui/gfx/codec/jpeg_codec.cc:362:10:
125 ;; error: cannot convert ‘bool’ to ‘boolean’ in return
126 ;; it might also pose security problems.
127 ;; Alternatively, we could use the "-skip qtwebengine"
128 ;; configuration option.
129 (delete-file-recursively "qtwebengine")
130 ;; The following snippets are copied from their mondular-qt counterparts.
131 (for-each
132 (lambda (dir)
133 (delete-file-recursively (string-append "qtbase/src/3rdparty/" dir)))
134 (list "double-conversion" "freetype" "harfbuzz-ng"
135 "libpng" "libjpeg" "pcre2" "sqlite" "xcb"
136 "xkbcommon" "zlib"))
137 (for-each
138 (lambda (dir)
139 (delete-file-recursively dir))
140 (list "qtimageformats/src/3rdparty"
141 "qtmultimedia/examples/multimedia/spectrum/3rdparty"
142 "qtwayland/examples"
143 "qtcanvas3d/examples/canvas3d/3rdparty"))
144 ;; Tests depend on this example, which depends on the 3rd party code.
145 (substitute* "qtmultimedia/examples/multimedia/multimedia.pro"
146 (("spectrum") "#"))))))
147 (build-system gnu-build-system)
148 (propagated-inputs
149 `(("mesa" ,mesa)))
150 (inputs
151 `(("alsa-lib" ,alsa-lib)
152 ("bluez" ,bluez)
153 ("cups" ,cups)
154 ("dbus" ,dbus)
155 ("double-conversion" ,double-conversion)
156 ("expat" ,expat)
157 ("fontconfig" ,fontconfig)
158 ("freetype" ,freetype)
159 ("glib" ,glib)
160 ("gstreamer" ,gstreamer)
161 ("gst-plugins-base" ,gst-plugins-base)
162 ("harfbuzz" ,harfbuzz)
163 ("icu4c" ,icu4c)
164 ("jasper" ,jasper)
165 ("libinput" ,libinput-minimal)
166 ("libjpeg" ,libjpeg)
167 ("libmng" ,libmng)
168 ("libpci" ,pciutils)
169 ("libpng" ,libpng)
170 ("libtiff" ,libtiff)
171 ("libwebp" ,libwebp)
172 ("libx11" ,libx11)
173 ("libxcomposite" ,libxcomposite)
174 ("libxcursor" ,libxcursor)
175 ("libxext" ,libxext)
176 ("libxfixes" ,libxfixes)
177 ("libxi" ,libxi)
178 ("libxinerama" ,libxinerama)
179 ("libxkbcommon" ,libxkbcommon)
180 ("libxml2" ,libxml2)
181 ("libxrandr" ,libxrandr)
182 ("libxrender" ,libxrender)
183 ("libxslt" ,libxslt)
184 ("libxtst" ,libxtst)
185 ("mtdev" ,mtdev)
186 ("mysql" ,mysql)
187 ("nss" ,nss)
188 ("openssl" ,openssl)
189 ("postgresql" ,postgresql)
190 ("pulseaudio" ,pulseaudio)
191 ("pcre2" ,pcre2)
192 ("sqlite" ,sqlite)
193 ("udev" ,eudev)
194 ("unixodbc" ,unixodbc)
195 ("wayland" ,wayland)
196 ("xcb-util" ,xcb-util)
197 ("xcb-util-image" ,xcb-util-image)
198 ("xcb-util-keysyms" ,xcb-util-keysyms)
199 ("xcb-util-renderutil" ,xcb-util-renderutil)
200 ("xcb-util-wm" ,xcb-util-wm)
201 ("zlib" ,zlib)))
202 (native-inputs
203 `(("bison" ,bison)
204 ("flex" ,flex)
205 ("gperf" ,gperf)
206 ("perl" ,perl)
207 ("pkg-config" ,pkg-config)
208 ("python" ,python-2)
209 ("ruby" ,ruby)
210 ("which" ,(@ (gnu packages base) which))))
211 (arguments
212 `(#:phases
213 (modify-phases %standard-phases
214 (add-after 'configure 'patch-bin-sh
215 (lambda _
216 (substitute* '("qtbase/configure"
217 "qtbase/mkspecs/features/qt_functions.prf"
218 "qtbase/qmake/library/qmakebuiltins.cpp")
219 (("/bin/sh") (which "sh")))
220 #t))
221 (replace 'configure
222 (lambda* (#:key outputs #:allow-other-keys)
223 (let ((out (assoc-ref outputs "out"))
224 (examples (assoc-ref outputs "examples")))
225 (substitute* '("configure" "qtbase/configure")
226 (("/bin/pwd") (which "pwd")))
227 (substitute* "qtbase/src/corelib/global/global.pri"
228 (("/bin/ls") (which "ls")))
229 ;; do not pass "--enable-fast-install", which makes the
230 ;; configure process fail
231 (zero? (system*
232 "./configure"
233 "-verbose"
234 "-prefix" out
235 "-examplesdir" examples ; 89MiB
236 "-opensource"
237 "-confirm-license"
238 ;; Do not build examples; for the time being, we
239 ;; prefer to save the space and build time.
240 "-no-compile-examples"
241 ;; Most "-system-..." are automatic, but some use
242 ;; the bundled copy by default.
243 "-system-sqlite"
244 "-system-harfbuzz"
245 ;; explicitly link with openssl instead of dlopening it
246 "-openssl-linked"
247 ;; explicitly link with dbus instead of dlopening it
248 "-dbus-linked"
249 ;; don't use the precompiled headers
250 "-no-pch"
251 ;; drop special machine instructions not supported
252 ;; on all instances of the target
253 ,@(if (string-prefix? "x86_64"
254 (or (%current-target-system)
255 (%current-system)))
256 '()
257 '("-no-sse2"))
258 "-no-mips_dsp"
259 "-no-mips_dspr2"))))))))
260 (home-page "https://www.qt.io/")
261 (synopsis "Cross-platform GUI library")
262 (description "Qt is a cross-platform application and UI framework for
263 developers using C++ or QML, a CSS & JavaScript like language.")
264 (license license:lgpl2.1)
266 ;; Qt 4: 'QBasicAtomicPointer' leads to build failures on MIPS;
267 ;; see <http://hydra.gnu.org/build/112828>.
268 ;; Qt 5: assembler error; see <http://hydra.gnu.org/build/112526>.
269 (supported-systems (delete "mips64el-linux" %supported-systems))))
271 (define-public qt-4
272 (package (inherit qt)
273 (version "4.8.7")
274 (source (origin
275 (method url-fetch)
276 (uri (string-append "http://download.qt-project.org/official_releases/qt/"
277 (string-copy version 0 (string-rindex version #\.))
278 "/" version
279 "/qt-everywhere-opensource-src-"
280 version ".tar.gz"))
281 (sha256
282 (base32
283 "183fca7n7439nlhxyg1z7aky0izgbyll3iwakw4gwivy16aj5272"))
284 (patches (search-patches "qt4-ldflags.patch"))
285 (modules '((guix build utils)))
286 (snippet
287 ;; Remove webkit module, which is not built.
288 '(delete-file-recursively "src/3rdparty/webkit"))))
289 (inputs `(,@(alist-delete "harfbuzz"
290 (alist-delete "libjpeg" (package-inputs qt)))
291 ("libjepg" ,libjpeg-8)
292 ("libsm" ,libsm)))
294 ;; Note: there are 37 MiB of examples and a '-exampledir' configure flags,
295 ;; but we can't make them a separate output because "out" and "examples"
296 ;; would refer to each other.
297 (outputs '("out" ;112MiB core + 37MiB examples
298 "doc")) ;280MiB of HTML + code
299 (arguments
300 `(#:phases
301 (modify-phases %standard-phases
302 (replace
303 'configure
304 (lambda* (#:key outputs #:allow-other-keys)
305 (let ((out (assoc-ref outputs "out"))
306 (doc (assoc-ref outputs "doc")))
307 (substitute* '("configure")
308 (("/bin/pwd") (which "pwd")))
310 (zero? (system*
311 "./configure"
312 "-verbose"
313 "-prefix" out
314 ;; Note: Don't pass '-docdir' since 'qmake' and
315 ;; libQtCore would record its value, thereby defeating
316 ;; the whole point of having a separate output.
317 "-datadir" (string-append out "/share/qt-" ,version
318 "/data")
319 "-importdir" (string-append out "/lib/qt-4"
320 "/imports")
321 "-plugindir" (string-append out "/lib/qt-4"
322 "/plugins")
323 "-translationdir" (string-append out "/share/qt-" ,version
324 "/translations")
325 "-demosdir" (string-append out "/share/qt-" ,version
326 "/demos")
327 "-examplesdir" (string-append out "/share/qt-" ,version
328 "/examples")
329 "-opensource"
330 "-confirm-license"
331 ;; explicitly link with dbus instead of dlopening it
332 "-dbus-linked"
333 ;; Skip the webkit module; it fails to build on armhf
334 ;; and, apart from that, may pose security risks.
335 "-no-webkit"
336 ;; drop special machine instructions not supported
337 ;; on all instances of the target
338 ,@(if (string-prefix? "x86_64"
339 (or (%current-target-system)
340 (%current-system)))
341 '()
342 '("-no-mmx"
343 "-no-3dnow"
344 "-no-sse"
345 "-no-sse2"))
346 "-no-sse3"
347 "-no-ssse3"
348 "-no-sse4.1"
349 "-no-sse4.2"
350 "-no-avx")))))
351 (add-after
352 'install 'move-doc
353 (lambda* (#:key outputs #:allow-other-keys)
354 ;; Because of qt4-documentation-path.patch, documentation ends up
355 ;; being installed in OUT. Move it to the right place.
356 (let* ((out (assoc-ref outputs "out"))
357 (doc (assoc-ref outputs "doc"))
358 (olddoc (string-append out "/doc"))
359 (docdir (string-append doc "/share/doc/qt-" ,version)))
360 (mkdir-p (dirname docdir))
362 ;; Note: We can't use 'rename-file' here because OUT and DOC are
363 ;; different "devices" due to bind-mounts.
364 (copy-recursively olddoc docdir)
365 (delete-file-recursively olddoc)
366 #t))))))))
368 (define-public qtbase
369 (package
370 (name "qtbase")
371 (version "5.9.2")
372 (source (origin
373 (method url-fetch)
374 (uri (string-append "https://download.qt.io/official_releases/qt/"
375 (version-major+minor version) "/" version
376 "/submodules/" name "-opensource-src-"
377 version ".tar.xz"))
378 (sha256
379 (base32
380 "16v0dny4rcyd5p8qsnsfg89w98k8kqk3rp9x3g3k7xjmi53bpqkz"))
381 (modules '((guix build utils)))
382 (snippet
383 ;; corelib uses bundled harfbuzz, md4, md5, sha3
384 '(begin
385 (for-each
386 (lambda (dir)
387 (delete-file-recursively (string-append "src/3rdparty/" dir)))
388 (list "double-conversion" "freetype" "harfbuzz-ng"
389 "libpng" "libjpeg" "pcre2" "sqlite" "xcb"
390 "xkbcommon" "zlib"))
391 #t))))
392 (build-system gnu-build-system)
393 (propagated-inputs
394 `(("mesa" ,mesa)
395 ("which" ,(@ (gnu packages base) which))))
396 (inputs
397 `(("alsa-lib" ,alsa-lib)
398 ("cups" ,cups)
399 ("dbus" ,dbus)
400 ("double-conversion" ,double-conversion)
401 ("eudev" ,eudev)
402 ("expat" ,expat)
403 ("fontconfig" ,fontconfig)
404 ("freetype" ,freetype)
405 ("glib" ,glib)
406 ("harfbuzz" ,harfbuzz)
407 ("icu4c" ,icu4c)
408 ("libinput" ,libinput-minimal)
409 ("libjpeg" ,libjpeg)
410 ("libmng" ,libmng)
411 ("libpng" ,libpng)
412 ("libx11" ,libx11)
413 ("libxcomposite" ,libxcomposite)
414 ("libxcursor" ,libxcursor)
415 ("libxfixes" ,libxfixes)
416 ("libxi" ,libxi)
417 ("libxinerama" ,libxinerama)
418 ("libxkbcommon" ,libxkbcommon)
419 ("libxml2" ,libxml2)
420 ("libxrandr" ,libxrandr)
421 ("libxrender" ,libxrender)
422 ("libxslt" ,libxslt)
423 ("libxtst" ,libxtst)
424 ("mtdev" ,mtdev)
425 ("mysql" ,mysql)
426 ("nss" ,nss)
427 ("openssl" ,openssl)
428 ("pcre2" ,pcre2)
429 ("postgresql" ,postgresql)
430 ("pulseaudio" ,pulseaudio)
431 ("sqlite" ,sqlite)
432 ("unixodbc" ,unixodbc)
433 ("xcb-util" ,xcb-util)
434 ("xcb-util-image" ,xcb-util-image)
435 ("xcb-util-keysyms" ,xcb-util-keysyms)
436 ("xcb-util-renderutil" ,xcb-util-renderutil)
437 ("xcb-util-wm" ,xcb-util-wm)
438 ("zlib" ,zlib)))
439 (native-inputs
440 `(("bison" ,bison)
441 ("flex" ,flex)
442 ("gperf" ,gperf)
443 ("perl" ,perl)
444 ("pkg-config" ,pkg-config)
445 ("python" ,python-2)
446 ("ruby" ,ruby)))
447 (arguments
448 `(#:phases
449 (modify-phases %standard-phases
450 (add-after 'configure 'patch-bin-sh
451 (lambda _
452 (substitute* '("config.status"
453 "configure"
454 "mkspecs/features/qt_functions.prf"
455 "qmake/library/qmakebuiltins.cpp")
456 (("/bin/sh") (which "sh")))
457 #t))
458 (replace 'configure
459 (lambda* (#:key outputs #:allow-other-keys)
460 (let ((out (assoc-ref outputs "out")))
461 (substitute* "configure"
462 (("/bin/pwd") (which "pwd")))
463 (substitute* "src/corelib/global/global.pri"
464 (("/bin/ls") (which "ls")))
465 ;; The configuration files for other Qt5 packages are searched
466 ;; through a call to "find_package" in Qt5Config.cmake, which
467 ;; disables the use of CMAKE_PREFIX_PATH via the parameter
468 ;; "NO_DEFAULT_PATH". Re-enable it so that the different
469 ;; components can be installed in different places.
470 (substitute* (find-files "." ".*\\.cmake")
471 (("NO_DEFAULT_PATH") ""))
472 ;; do not pass "--enable-fast-install", which makes the
473 ;; configure process fail
474 (zero? (system*
475 "./configure"
476 "-verbose"
477 "-prefix" out
478 "-docdir" (string-append out "/share/doc/qt5")
479 "-headerdir" (string-append out "/include/qt5")
480 "-archdatadir" (string-append out "/lib/qt5")
481 "-datadir" (string-append out "/share/qt5")
482 "-examplesdir" (string-append
483 out "/share/doc/qt5/examples")
484 "-opensource"
485 "-confirm-license"
486 ;; Do not build examples; if desired, these could go
487 ;; into a separate output, but for the time being, we
488 ;; prefer to save the space and build time.
489 "-no-compile-examples"
490 ;; Most "-system-..." are automatic, but some use
491 ;; the bundled copy by default.
492 "-system-sqlite"
493 "-system-harfbuzz"
494 "-system-pcre"
495 ;; explicitly link with openssl instead of dlopening it
496 "-openssl-linked"
497 ;; explicitly link with dbus instead of dlopening it
498 "-dbus-linked"
499 ;; don't use the precompiled headers
500 "-no-pch"
501 ;; drop special machine instructions that do not have
502 ;; runtime detection
503 ,@(if (string-prefix? "x86_64"
504 (or (%current-target-system)
505 (%current-system)))
506 '()
507 '("-no-sse2"))
508 "-no-mips_dsp"
509 "-no-mips_dspr2")))))
510 (add-after 'install 'patch-mkspecs
511 (lambda* (#:key outputs #:allow-other-keys)
512 (let* ((out (assoc-ref outputs "out"))
513 (archdata (string-append out "/lib/qt5"))
514 (mkspecs (string-append archdata "/mkspecs"))
515 (qt_config.prf (string-append
516 mkspecs "/features/qt_config.prf")))
517 ;; For each Qt module, let `qmake' uses search paths in the
518 ;; module directory instead of all in QT_INSTALL_PREFIX.
519 (substitute* qt_config.prf
520 (("\\$\\$\\[QT_INSTALL_HEADERS\\]")
521 "$$clean_path($$replace(dir, mkspecs/modules, ../../include/qt5))")
522 (("\\$\\$\\[QT_INSTALL_LIBS\\]")
523 "$$clean_path($$replace(dir, mkspecs/modules, ../../lib))")
524 (("\\$\\$\\[QT_HOST_LIBS\\]")
525 "$$clean_path($$replace(dir, mkspecs/modules, ../../lib))")
526 (("\\$\\$\\[QT_INSTALL_BINS\\]")
527 "$$clean_path($$replace(dir, mkspecs/modules, ../../bin))"))
529 ;; Searches Qt tools in the current PATH instead of QT_HOST_BINS.
530 (substitute* (string-append mkspecs "/features/qt_functions.prf")
531 (("cmd = \\$\\$\\[QT_HOST_BINS\\]/\\$\\$2")
532 "cmd = $$system(which $${2}.pl 2>/dev/null || which $${2})"))
534 ;; Resolve qmake spec files within qtbase by absolute paths.
535 (substitute*
536 (map (lambda (file)
537 (string-append mkspecs "/features/" file))
538 '("device_config.prf" "moc.prf" "qt_build_config.prf"
539 "qt_config.prf" "winrt/package_manifest.prf"))
540 (("\\$\\$\\[QT_HOST_DATA/get\\]") archdata)
541 (("\\$\\$\\[QT_HOST_DATA/src\\]") archdata))
542 #t))))))
543 (native-search-paths
544 (list (search-path-specification
545 (variable "QMAKEPATH")
546 (files '("lib/qt5")))
547 (search-path-specification
548 (variable "QML2_IMPORT_PATH")
549 (files '("lib/qt5/qml")))
550 (search-path-specification
551 (variable "QT_PLUGIN_PATH")
552 (files '("lib/qt5/plugins")))
553 (search-path-specification
554 (variable "XDG_DATA_DIRS")
555 (files '("share")))
556 (search-path-specification
557 (variable "XDG_CONFIG_DIRS")
558 (files '("etc/xdg")))))
559 (home-page "https://www.qt.io/")
560 (synopsis "Cross-platform GUI library")
561 (description "Qt is a cross-platform application and UI framework for
562 developers using C++ or QML, a CSS & JavaScript like language.")
563 (license (list license:lgpl2.1 license:lgpl3))))
565 (define-public qtsvg
566 (package (inherit qtbase)
567 (name "qtsvg")
568 (version "5.9.2")
569 (source (origin
570 (method url-fetch)
571 (uri (string-append "https://download.qt.io/official_releases/qt/"
572 (version-major+minor version) "/" version
573 "/submodules/" name "-opensource-src-"
574 version ".tar.xz"))
575 (sha256
576 (base32
577 "020icrl9vi8jh8ygsssqrx2bl8bx28m15dwmf9a969qdnvxyp5ms"))))
578 (propagated-inputs `())
579 (native-inputs `(("perl" ,perl)))
580 (inputs
581 `(("mesa" ,mesa)
582 ("qtbase" ,qtbase)
583 ("zlib" ,zlib)))
584 (arguments
585 `(#:phases
586 (modify-phases %standard-phases
587 (add-before 'configure 'configure-qmake
588 (lambda* (#:key inputs outputs #:allow-other-keys)
589 (let* ((out (assoc-ref outputs "out"))
590 (qtbase (assoc-ref inputs "qtbase"))
591 (tmpdir (string-append (getenv "TMPDIR")))
592 (qmake (string-append tmpdir "/qmake"))
593 (qt.conf (string-append tmpdir "/qt.conf")))
594 ;; Use qmake with a customized qt.conf to override install
595 ;; paths to $out.
596 (symlink (which "qmake") qmake)
597 (setenv "PATH" (string-append tmpdir ":" (getenv "PATH")))
598 (with-output-to-file qt.conf
599 (lambda ()
600 (format #t "[Paths]
601 Prefix=~a
602 ArchData=lib/qt5
603 Data=share/qt5
604 Documentation=share/doc/qt5
605 Headers=include/qt5
606 Libraries=lib
607 LibraryExecutables=lib/qt5/libexec
608 Binaries=bin
609 Tests=tests
610 Plugins=lib/qt5/plugins
611 Imports=lib/qt5/imports
612 Qml2Imports=lib/qt5/qml
613 Translations=share/qt5/translations
614 Settings=etc/xdg
615 Examples=share/doc/qt5/examples
616 HostPrefix=~a
617 HostData=lib/qt5
618 HostBinaries=bin
619 HostLibraries=lib
621 [EffectiveSourcePaths]
622 HostPrefix=~a
623 HostData=lib/qt5
624 " out out qtbase)))
625 #t)))
626 (replace 'configure
627 (lambda* (#:key inputs outputs #:allow-other-keys)
628 ;; Valid QT_BUILD_PARTS variables are:
629 ;; libs tools tests examples demos docs translations
630 (zero? (system* "qmake" "QT_BUILD_PARTS = libs tools tests"))))
631 (add-before 'check 'set-display
632 (lambda _
633 ;; make Qt render "offscreen", required for tests
634 (setenv "QT_QPA_PLATFORM" "offscreen")
635 #t)))))
636 (synopsis "Qt module for displaying SVGs")
637 (description "The QtSvg module provides classes for displaying the
638 contents of SVG files.")))
640 (define-public qtimageformats
641 (package (inherit qtsvg)
642 (name "qtimageformats")
643 (version "5.9.2")
644 (source (origin
645 (method url-fetch)
646 (uri (string-append "https://download.qt.io/official_releases/qt/"
647 (version-major+minor version) "/" version
648 "/submodules/" name "-opensource-src-"
649 version ".tar.xz"))
650 (sha256
651 (base32
652 "1wwxxcl24mk1p4w6knyfai09axmwqsm6cgsbkjsmdz3zmjh6qqis"))
653 (modules '((guix build utils)))
654 (snippet
655 '(delete-file-recursively "src/3rdparty"))))
656 (native-inputs `())
657 (inputs
658 `(("jasper" ,jasper)
659 ("libmng" ,libmng)
660 ("libtiff" ,libtiff)
661 ("libwebp" ,libwebp)
662 ("mesa" ,mesa)
663 ("qtbase" ,qtbase)
664 ("zlib" ,zlib)))
665 (synopsis "Additional Image Format plugins for Qt")
666 (description "The QtImageFormats module contains plugins for adding
667 support for MNG, TGA, TIFF and WBMP image formats.")))
669 (define-public qtx11extras
670 (package (inherit qtsvg)
671 (name "qtx11extras")
672 (version "5.9.2")
673 (source (origin
674 (method url-fetch)
675 (uri (string-append "https://download.qt.io/official_releases/qt/"
676 (version-major+minor version) "/" version
677 "/submodules/" name "-opensource-src-"
678 version ".tar.xz"))
679 (sha256
680 (base32
681 "1ias745j5lfnrfkgyk0pr8n8zlkqs08gq7yyzaj1c645sh54b1fv"))))
682 (arguments
683 (substitute-keyword-arguments (package-arguments qtsvg)
684 ((#:tests? _ #f) #f))) ; TODO: Enable the tests
685 (native-inputs `(("perl" ,perl)))
686 (inputs
687 `(("mesa" ,mesa)
688 ("qtbase" ,qtbase)))
689 (synopsis "Qt Extras for X11")
690 (description "The QtX11Extras module includes the library to access X11
691 from within Qt 5.")))
693 (define-public qtxmlpatterns
694 (package (inherit qtsvg)
695 (name "qtxmlpatterns")
696 (version "5.9.2")
697 (source (origin
698 (method url-fetch)
699 (uri (string-append "https://download.qt.io/official_releases/qt/"
700 (version-major+minor version) "/" version
701 "/submodules/" name "-opensource-src-"
702 version ".tar.xz"))
703 (sha256
704 (base32
705 "0knk4bplqhvsxar1wv16bzfw57q0aja12gdaxz7m8mvx121sm9ha"))))
706 (arguments
707 (substitute-keyword-arguments (package-arguments qtsvg)
708 ((#:phases phases)
709 `(modify-phases ,phases
710 (add-after 'unpack 'disable-network-tests
711 (lambda _ (substitute* "tests/auto/auto.pro"
712 (("qxmlquery") "# qxmlquery")
713 (("xmlpatterns ") "# xmlpatterns"))
714 #t))))))
715 (native-inputs `(("perl" ,perl)))
716 (inputs `(("qtbase" ,qtbase)))
717 (synopsis "Qt XML patterns module")
718 (description "The QtXmlPatterns module is a XQuery and XPath engine for
719 XML and custom data models. It contains programs such as xmlpatterns and
720 xmlpatternsvalidator.")))
722 (define-public qtdeclarative
723 (package (inherit qtsvg)
724 (name "qtdeclarative")
725 (version "5.9.2")
726 (source (origin
727 (method url-fetch)
728 (uri (string-append "https://download.qt.io/official_releases/qt/"
729 (version-major+minor version) "/" version
730 "/submodules/" name "-opensource-src-"
731 version ".tar.xz"))
732 (sha256
733 (base32
734 "020bha6q8byxc8cj5zw7gms5rgsjg71hv31hv1rr2fy7x56zsh0d"))))
735 (arguments
736 (substitute-keyword-arguments (package-arguments qtsvg)
737 ((#:tests? _ #f) #f))) ; TODO: Enable the tests
738 (native-inputs
739 `(("perl" ,perl)
740 ("pkg-config" ,pkg-config)
741 ("python" ,python-2)
742 ("qtsvg" ,qtsvg)
743 ("qtxmlpatterns" ,qtxmlpatterns)))
744 (inputs
745 `(("mesa" ,mesa)
746 ("qtbase" ,qtbase)))
747 (synopsis "Qt QML module (Quick 2)")
748 (description "The Qt QML module provides a framework for developing
749 applications and libraries with the QML language. It defines and implements the
750 language and engine infrastructure, and provides an API to enable application
751 developers to extend the QML language with custom types and integrate QML code
752 with JavaScript and C++.")))
754 (define-public qtconnectivity
755 (package (inherit qtsvg)
756 (name "qtconnectivity")
757 (version "5.9.2")
758 (source (origin
759 (method url-fetch)
760 (uri (string-append "https://download.qt.io/official_releases/qt/"
761 (version-major+minor version) "/" version
762 "/submodules/" name "-opensource-src-"
763 version ".tar.xz"))
764 (sha256
765 (base32
766 "1k7kjmlny0ykm40qx796wbsg3310v6b8hqizkbr597cmxjbrax9c"))))
767 (arguments
768 (substitute-keyword-arguments (package-arguments qtsvg)
769 ((#:phases phases)
770 `(modify-phases ,phases
771 (add-after 'unpack 'disable-failing-tests
772 ;; this test fails on armhf and aarch64
773 (lambda _
774 (substitute* "tests/auto/qndefnfcsmartposterrecord/tst_qndefnfcsmartposterrecord.cpp"
775 (("QCOMPARE\\(record.action\\(\\), QNdefNfcSmartPosterRecord::UnspecifiedAction")
776 "//QCOMPARE(record.action(), QNdefNfcSmartPosterRecord::UnspecifiedAction"))
777 #t))))))
778 (native-inputs
779 `(("perl" ,perl)
780 ("pkg-config" ,pkg-config)
781 ("qtdeclarative" ,qtdeclarative)))
782 (inputs
783 `(("bluez" ,bluez)
784 ("qtbase" ,qtbase)))
785 (synopsis "Qt Connectivity module")
786 (description "The Qt Connectivity modules provides modules for interacting
787 with Bluetooth and NFC.")))
789 (define-public qtwebsockets
790 (package (inherit qtsvg)
791 (name "qtwebsockets")
792 (version "5.9.2")
793 (source (origin
794 (method url-fetch)
795 (uri (string-append "https://download.qt.io/official_releases/qt/"
796 (version-major+minor version) "/" version
797 "/submodules/" name "-opensource-src-"
798 version ".tar.xz"))
799 (sha256
800 (base32
801 "0x0nx1ampqsgj9qlc3l32z3ham1a5vq7m2lnxk5pr92yj6yw3pdg"))))
802 (arguments
803 (substitute-keyword-arguments (package-arguments qtsvg)
804 ((#:tests? _ #f) #f))) ; TODO: Enable the tests
805 (native-inputs
806 `(("perl" ,perl)
807 ("qtdeclarative" ,qtdeclarative)))
808 (inputs `(("qtbase" ,qtbase)))
809 (synopsis "Qt Web Sockets module")
810 (description "WebSocket is a web-based protocol designed to enable two-way
811 communication between a client application and a remote host. The Qt
812 WebSockets module provides C++ and QML interfaces that enable Qt applications
813 to act as a server that can process WebSocket requests, or a client that can
814 consume data received from the server, or both.")))
816 (define-public qtsensors
817 (package (inherit qtsvg)
818 (name "qtsensors")
819 (version "5.9.2")
820 (source (origin
821 (method url-fetch)
822 (uri (string-append "https://download.qt.io/official_releases/qt/"
823 (version-major+minor version) "/" version
824 "/submodules/" name "-opensource-src-"
825 version ".tar.xz"))
826 (sha256
827 (base32
828 "1lxmhi19dbb8vjhpjph0l0ss6zh72hb4908lp4s1pgf8r641ai3r"))))
829 (arguments
830 (substitute-keyword-arguments (package-arguments qtsvg)
831 ((#:phases phases)
832 `(modify-phases ,phases
833 (add-after 'unpack 'lengthen-test-timeout
834 (lambda _
835 (substitute* "tests/auto/qsensorgestures_gestures/tst_sensorgestures_gestures.cpp"
836 (("2000") "5000"))
837 #t))))))
838 (native-inputs
839 `(("perl" ,perl)
840 ("qtdeclarative" ,qtdeclarative)))
841 (inputs `(("qtbase" ,qtbase)))
842 (synopsis "Qt Sensors module")
843 (description "The Qt Sensors API provides access to sensor hardware via QML
844 and C++ interfaces. The Qt Sensors API also provides a motion gesture
845 recognition API for devices.")))
847 (define-public qtmultimedia
848 (package (inherit qtsvg)
849 (name "qtmultimedia")
850 (version "5.9.2")
851 (source (origin
852 (method url-fetch)
853 (uri (string-append "https://download.qt.io/official_releases/qt/"
854 (version-major+minor version) "/" version
855 "/submodules/" name "-opensource-src-"
856 version ".tar.xz"))
857 (sha256
858 (base32
859 "0815hi3cxy5zy6yc5fkdpx2xd6rk7968j1ziwl2g4wa80802g9n9"))
860 (modules '((guix build utils)))
861 (snippet
862 '(begin
863 (delete-file-recursively
864 "examples/multimedia/spectrum/3rdparty")
865 ;; We also prevent the spectrum example from being built.
866 (substitute* "examples/multimedia/multimedia.pro"
867 (("spectrum") "#"))))))
868 (arguments
869 (substitute-keyword-arguments (package-arguments qtsvg)
870 ((#:phases phases)
871 `(modify-phases ,phases
872 (replace 'configure
873 (lambda* (#:key outputs #:allow-other-keys)
874 (let ((out (assoc-ref outputs "out")))
875 (zero? (system* "qmake" "QT_BUILD_PARTS = libs tools tests"
876 (string-append "QMAKE_LFLAGS_RPATH=-Wl,-rpath," out "/lib -Wl,-rpath,")
877 (string-append "PREFIX=" out))))))))
878 ((#:tests? _ #f) #f))) ; TODO: Enable the tests
879 (native-inputs
880 `(("perl" ,perl)
881 ("pkg-config" ,pkg-config)
882 ("python" ,python-2)
883 ("qtdeclarative" ,qtdeclarative)))
884 (inputs
885 `(("alsa-lib" ,alsa-lib)
886 ("mesa" ,mesa)
887 ("pulseaudio" ,pulseaudio)
888 ("qtbase" ,qtbase)
889 ;; Gstreamer is needed for the mediaplayer plugin
890 ("gstreamer" ,gstreamer)
891 ("gst-plugins-base" ,gst-plugins-base)))
892 (synopsis "Qt Multimedia module")
893 (description "The Qt Multimedia module provides set of APIs to play and
894 record media, and manage a collection of media content. It also contains a
895 set of plugins for interacting with pulseaudio and GStreamer.")))
897 (define-public qtwayland
898 (package (inherit qtsvg)
899 (name "qtwayland")
900 (version "5.9.2")
901 (source (origin
902 (method url-fetch)
903 (uri (string-append "https://download.qt.io/official_releases/qt/"
904 (version-major+minor version) "/" version
905 "/submodules/" name "-opensource-src-"
906 version ".tar.xz"))
907 (sha256
908 (base32
909 "1ipn4xh0dj1kjg5i4vfl4gpx3hg2377w5gls47xpv1ikz41lshzn"))
910 (modules '((guix build utils)))
911 (snippet
912 ;; The examples try to build and cause the build to fail
913 '(delete-file-recursively "examples"))))
914 (arguments
915 (substitute-keyword-arguments (package-arguments qtsvg)
916 ((#:phases phases)
917 `(modify-phases ,phases
918 (add-before 'check 'set-ld-library-path
919 ;; <https://lists.gnu.org/archive/html/guix-devel/2017-09/msg00019.html>
920 ;;
921 ;; Make the uninstalled libQt5WaylandClient.so.5 available to the
922 ;; wayland platform plugin.
923 (lambda _
924 (setenv "LD_LIBRARY_PATH" (string-append (getcwd) "/lib"))
925 #t))))))
926 (native-inputs
927 `(("glib" ,glib)
928 ("perl" ,perl)
929 ("pkg-config" ,pkg-config)
930 ("qtdeclarative" ,qtdeclarative)))
931 (inputs
932 `(("fontconfig" ,fontconfig)
933 ("freetype" ,freetype)
934 ("libx11" ,libx11)
935 ("libxcomposite" ,libxcomposite)
936 ("libxext" ,libxext)
937 ("libxkbcommon" ,libxkbcommon)
938 ("libxrender" ,libxrender)
939 ("mesa" ,mesa)
940 ("mtdev" ,mtdev)
941 ("qtbase" ,qtbase)
942 ("wayland" ,wayland)))
943 (synopsis "Qt Wayland module")
944 (description "The Qt Wayland module provides the QtWayland client and
945 compositor libraries.")))
947 (define-public qtserialport
948 (package (inherit qtsvg)
949 (name "qtserialport")
950 (version "5.9.2")
951 (source (origin
952 (method url-fetch)
953 (uri (string-append "https://download.qt.io/official_releases/qt/"
954 (version-major+minor version) "/" version
955 "/submodules/" name "-opensource-src-"
956 version ".tar.xz"))
957 (sha256
958 (base32
959 "0hndc9z7qzxazzjvc6k5yd58afw13444plk70b05nqdi5p19rvah"))))
960 (native-inputs `(("perl" ,perl)))
961 (inputs
962 `(("qtbase" ,qtbase)
963 ("eudev" ,eudev)))
964 (synopsis "Qt Serial Port module")
965 (description "The Qt Serial Port module provides the library for
966 interacting with serial ports from within Qt.")))
968 (define-public qtserialbus
969 (package (inherit qtsvg)
970 (name "qtserialbus")
971 (version "5.9.2")
972 (source (origin
973 (method url-fetch)
974 (uri (string-append "https://download.qt.io/official_releases/qt/"
975 (version-major+minor version) "/" version
976 "/submodules/" name "-opensource-src-"
977 version ".tar.xz"))
978 (sha256
979 (base32
980 "025yv7zajz5scrmkjkmgkyvxpgkliqvrzc88is0gr481zpd4phmv"))))
981 (inputs
982 `(("qtbase" ,qtbase)
983 ("qtserialport" ,qtserialport)))
984 (synopsis "Qt Serial Bus module")
985 (description "The Qt Serial Bus API provides classes and functions to
986 access the various industrial serial buses and protocols, such as CAN, ModBus,
987 and others.")))
989 (define-public qtwebchannel
990 (package (inherit qtsvg)
991 (name "qtwebchannel")
992 (version "5.9.2")
993 (source (origin
994 (method url-fetch)
995 (uri (string-append "https://download.qt.io/official_releases/qt/"
996 (version-major+minor version) "/" version
997 "/submodules/" name "-opensource-src-"
998 version ".tar.xz"))
999 (sha256
1000 (base32
1001 "09iss70c1iqgf8qpik35qlgrdw5y9935v0fm2ppgkmxdxkpls6ww"))))
1002 (native-inputs
1003 `(("perl" ,perl)
1004 ("qtdeclarative" ,qtdeclarative)
1005 ("qtwebsockets" ,qtwebsockets)))
1006 (inputs `(("qtbase" ,qtbase)))
1007 (synopsis "Web communication library for Qt")
1008 (description "The Qt WebChannel module enables peer-to-peer communication
1009 between the host (QML/C++ application) and the client (HTML/JavaScript
1010 application). The transport mechanism is supported out of the box by the two
1011 popular web engines, Qt WebKit 2 and Qt WebEngine.")))
1013 (define-public qtlocation
1014 (package (inherit qtsvg)
1015 (name "qtlocation")
1016 (version "5.9.2")
1017 (source (origin
1018 (method url-fetch)
1019 (uri (string-append "https://download.qt.io/official_releases/qt/"
1020 (version-major+minor version) "/" version
1021 "/submodules/" name "-opensource-src-"
1022 version ".tar.xz"))
1023 (sha256
1024 (base32
1025 "033b6l6jbvmc0k5qvbgh5vkzvfga7npqcphrywrrqkmx9vj446n8"))))
1026 (arguments
1027 (substitute-keyword-arguments (package-arguments qtsvg)
1028 ((#:tests? _ #f) #f))) ; TODO: Enable the tests
1029 (native-inputs
1030 `(("perl" ,perl)
1031 ("qtdeclarative" ,qtdeclarative)
1032 ("qtquickcontrols" ,qtquickcontrols)
1033 ("qtserialport" ,qtserialport)))
1034 (inputs
1035 `(("icu4c" ,icu4c)
1036 ("openssl" ,openssl)
1037 ("qtbase" ,qtbase)
1038 ("zlib" ,zlib)))
1039 (synopsis "Qt Location and Positioning modules")
1040 (description "The Qt Location module provides an interface for location,
1041 positioning and geolocation plugins.")))
1043 (define-public qttools
1044 (package (inherit qtsvg)
1045 (name "qttools")
1046 (version "5.9.2")
1047 (source (origin
1048 (method url-fetch)
1049 (uri (string-append "https://download.qt.io/official_releases/qt/"
1050 (version-major+minor version) "/" version
1051 "/submodules/" name "-opensource-src-"
1052 version ".tar.xz"))
1053 (sha256
1054 (base32
1055 "06nqsa5mj0mc9w9xbm7mgdkb66x4wlvkhnas32f97sb8ic8rdf9b"))))
1056 (arguments
1057 (substitute-keyword-arguments (package-arguments qtsvg)
1058 ((#:tests? _ #f) #f))) ; TODO: Enable the tests
1059 (native-inputs
1060 `(("perl" ,perl)
1061 ("qtdeclarative" ,qtdeclarative)))
1062 (inputs
1063 `(("mesa" ,mesa)
1064 ("qtbase" ,qtbase)))
1065 (synopsis "Qt Tools and Designer modules")
1066 (description "The Qt Tools module provides a set of applications to browse
1067 the documentation, translate applications, generate help files and other stuff
1068 that helps in Qt development.")))
1070 (define-public qtscript
1071 (package (inherit qtsvg)
1072 (name "qtscript")
1073 (version "5.9.2")
1074 (source (origin
1075 (method url-fetch)
1076 (uri (string-append "https://download.qt.io/official_releases/qt/"
1077 (version-major+minor version) "/" version
1078 "/submodules/" name "-opensource-src-"
1079 version ".tar.xz"))
1080 (sha256
1081 (base32
1082 "1wa0rnbphkhgydnwkf5bjwn0llskl6hgs0964nh0jik8qaspv027"))
1083 (patches (search-patches "qtscript-disable-tests.patch"))))
1084 (native-inputs
1085 `(("perl" ,perl)
1086 ("qttools" ,qttools)))
1087 (inputs
1088 `(("qtbase" ,qtbase)))
1089 (synopsis "Qt Script module")
1090 (description "Qt provides support for application scripting with ECMAScript.
1091 The following guides and references cover aspects of programming with
1092 ECMAScript and Qt.")))
1094 (define-public qtquickcontrols
1095 (package (inherit qtsvg)
1096 (name "qtquickcontrols")
1097 (version "5.9.2")
1098 (source (origin
1099 (method url-fetch)
1100 (uri (string-append "https://download.qt.io/official_releases/qt/"
1101 (version-major+minor version) "/" version
1102 "/submodules/" name "-opensource-src-"
1103 version ".tar.xz"))
1104 (sha256
1105 (base32
1106 "07xxhkfsljwdwlp9jfp88pwkrig02y2pnwhdsaz8mkcackwfq2az"))))
1107 (arguments
1108 (substitute-keyword-arguments (package-arguments qtsvg)
1109 ((#:tests? _ #f) #f))) ; TODO: Enable the tests
1110 (inputs
1111 `(("qtbase" ,qtbase)
1112 ("qtdeclarative" ,qtdeclarative)))
1113 (synopsis "Qt Quick Controls and other Quick modules")
1114 (description "The QtScript module provides classes for making Qt
1115 applications scriptable. This module provides a set of extra components that
1116 can be used to build complete interfaces in Qt Quick.")))
1118 (define-public qtquickcontrols2
1119 (package (inherit qtsvg)
1120 (name "qtquickcontrols2")
1121 (version "5.9.2")
1122 (source (origin
1123 (method url-fetch)
1124 (uri (string-append "https://download.qt.io/official_releases/qt/"
1125 (version-major+minor version) "/" version
1126 "/submodules/" name "-opensource-src-"
1127 version ".tar.xz"))
1128 (sha256
1129 (base32
1130 "1ln83afxyp5dmvdnq6n7as82xrd5k3xvfx7b1jxnljivslyxsm9b"))))
1131 (arguments
1132 (substitute-keyword-arguments (package-arguments qtsvg)
1133 ((#:tests? _ #f) #f))) ; TODO: Enable the tests
1134 (inputs
1135 `(("qtbase" ,qtbase)
1136 ("qtdeclarative" ,qtdeclarative)))
1137 (synopsis "Qt Quick Controls 2 and other Quick 2 modules")
1138 (description "The Qt Quick Controls 2 module contains the Qt Labs Platform
1139 module that provides platform integration: native dialogs, menus and menu bars,
1140 and tray icons. It falls back to Qt Widgets when a native implementation is
1141 not available.")))
1143 (define-public qtgraphicaleffects
1144 (package (inherit qtsvg)
1145 (name "qtgraphicaleffects")
1146 (version "5.9.2")
1147 (source (origin
1148 (method url-fetch)
1149 (uri (string-append "https://download.qt.io/official_releases/qt/"
1150 (version-major+minor version) "/" version
1151 "/submodules/" name "-opensource-src-"
1152 version ".tar.xz"))
1153 (sha256
1154 (base32
1155 "0xpvigfiqfqvf05ywj8x69y57rp8dwq2hs1kpxlxs15pniz4wn8l"))))
1156 (arguments
1157 (substitute-keyword-arguments (package-arguments qtsvg)
1158 ((#:tests? _ #f) #f))) ; TODO: Enable the tests
1159 (inputs
1160 `(("qtbase" ,qtbase)
1161 ("qtdeclarative" ,qtdeclarative)))
1162 (synopsis "Qt Graphical Effects module")
1163 (description "The Qt Graphical Effects module provides a set of QML types
1164 for adding visually impressive and configurable effects to user interfaces.
1165 Effects are visual items that can be added to Qt Quick user interface as UI
1166 components. The API consists of over 20 effects provided as separate QML
1167 types. The effects cover functional areas such as blending, masking, blurring,
1168 coloring, and many more.")))
1170 (define-public qtdeclarative-render2d
1171 ;; As of Qt-5.8.0 this module has been merged into qtdeclarative
1172 (package (inherit qtsvg)
1173 (name "qtdeclarative-render2d")
1174 (version "5.7.1")
1175 (source (origin
1176 (method url-fetch)
1177 (uri (string-append "https://download.qt.io/official_releases/qt/"
1178 (version-major+minor version) "/" version
1179 "/submodules/" name "-opensource-src-"
1180 version ".tar.xz"))
1181 (sha256
1182 (base32
1183 "0zwch9vn17f3bpy300jcfxx6cx9qymk5j7khx0x9k1xqid4166c3"))
1184 (modules '((guix build utils)))
1185 (snippet
1186 '(delete-file-recursively "tools/opengldummy/3rdparty"))))
1187 (native-inputs `())
1188 (inputs
1189 `(("qtbase" ,qtbase)
1190 ("qtdeclarative" ,qtdeclarative)))
1191 (synopsis "Qt Declarative Render module")
1192 (description "The Qt Declarative Render 2D module provides a Raster
1193 backend for QtQuick scene graph.")
1194 (properties `((superseded . ,qtdeclarative)))))
1196 (define-public qtgamepad
1197 (package (inherit qtsvg)
1198 (name "qtgamepad")
1199 (version "5.9.2")
1200 (source (origin
1201 (method url-fetch)
1202 (uri (string-append "https://download.qt.io/official_releases/qt/"
1203 (version-major+minor version) "/" version
1204 "/submodules/" name "-opensource-src-"
1205 version ".tar.xz"))
1206 (sha256
1207 (base32
1208 "0lm5v43psf7r8zc79dcjdmmdnz4jm30ylgkvsyv8k88mj06yklbn"))))
1209 (native-inputs
1210 `(("perl" ,perl)
1211 ("pkg-config" ,pkg-config)))
1212 (inputs
1213 `(("fontconfig" ,fontconfig)
1214 ("freetype" ,freetype)
1215 ("libxrender" ,libxrender)
1216 ("sdl2" ,sdl2)
1217 ("qtbase" ,qtbase)
1218 ("qtdeclarative" ,qtdeclarative)))
1219 (synopsis "Qt Gamepad module")
1220 (description "The Qt Gamepad module is an add-on library that enables Qt
1221 applications to support the use of gamepad hardware and in some cases remote
1222 control equipment. The module provides both QML and C++ interfaces. The
1223 primary target audience are embedded devices with fullscreen user interfaces,
1224 and mobile applications targeting TV-like form factors.")))
1226 (define-public qtscxml
1227 (package (inherit qtsvg)
1228 (name "qtscxml")
1229 (version "5.9.2")
1230 (source (origin
1231 (method url-fetch)
1232 (uri (string-append "https://download.qt.io/official_releases/qt/"
1233 (version-major+minor version) "/" version
1234 "/submodules/" name "-opensource-src-"
1235 version ".tar.xz"))
1236 (sha256
1237 (base32
1238 "0pdimqwdrj8hckm81lwy1z58ji4bdv0bzgv336m0a8v3pj914awx"))
1239 (modules '((guix build utils)))
1240 (snippet
1241 '(begin
1242 (delete-file-recursively "tests/3rdparty")
1243 ;; the scion test refers to the bundled 3rd party test code.
1244 (substitute* "tests/auto/auto.pro"
1245 (("scion") "#"))))))
1246 (inputs
1247 `(("qtbase" ,qtbase)
1248 ("qtdeclarative" ,qtdeclarative)))
1249 (synopsis "Qt SCXML module")
1250 (description "The Qt SCXML module provides functionality to create state
1251 machines from SCXML files. This includes both dynamically creating state
1252 machines (loading the SCXML file and instantiating states and transitions) and
1253 generating a C++ file that has a class implementing the state machine. It
1254 also contains functionality to support data models and executable content.")))
1256 (define-public qtpurchasing
1257 (package (inherit qtsvg)
1258 (name "qtpurchasing")
1259 (version "5.9.2")
1260 (source (origin
1261 (method url-fetch)
1262 (uri (string-append "https://download.qt.io/official_releases/qt/"
1263 (version-major+minor version) "/" version
1264 "/submodules/" name "-opensource-src-"
1265 version ".tar.xz"))
1266 (sha256
1267 (base32
1268 "04f28y7qcr4kd0pw26mm515qj7haxr0i8lijn1q47wkikxyhawca"))))
1269 (inputs
1270 `(("qtbase" ,qtbase)
1271 ("qtdeclarative" ,qtdeclarative)))
1272 (synopsis "Qt Purchasing module")
1273 (description "The Qt Purchasing module provides and in-app API for
1274 purchasing goods and services.")))
1276 (define-public qtcanvas3d
1277 (package (inherit qtsvg)
1278 (name "qtcanvas3d")
1279 (version "5.9.2")
1280 (source (origin
1281 (method url-fetch)
1282 (uri (string-append "https://download.qt.io/official_releases/qt/"
1283 (version-major+minor version) "/" version
1284 "/submodules/" name "-opensource-src-"
1285 version ".tar.xz"))
1286 (sha256
1287 (base32
1288 "1siyzgm1mjx90rwyzzq9vw2s2xzyf6n7q0vn8gw7mdim5indda44"))
1289 (modules '((guix build utils)))
1290 (snippet
1291 '(delete-file-recursively "examples/canvas3d/3rdparty"))))
1292 (arguments
1293 (substitute-keyword-arguments (package-arguments qtsvg)
1294 ;; Building the tests depends on the bundled 3rd party javascript files,
1295 ;; and the test phase fails to import QtCanvas3D, causing the phase to
1296 ;; fail, so we skip building them for now.
1297 ((#:phases phases)
1298 `(modify-phases ,phases
1299 (replace 'configure
1300 (lambda* (#:key outputs #:allow-other-keys)
1301 (let ((out (assoc-ref outputs "out")))
1302 (zero? (system* "qmake" "QT_BUILD_PARTS = libs tools"
1303 (string-append "PREFIX=" out))))))))
1304 ((#:tests? _ #f) #f))) ; TODO: Enable the tests
1305 (native-inputs `())
1306 (inputs
1307 `(("qtbase" ,qtbase)
1308 ("qtdeclarative" ,qtdeclarative)))
1309 (synopsis "Qt Canvas 3D module")
1310 (description "The Qt Canvas 3D module provides a way to make WebGL-like 3D
1311 drawing calls from Qt Quick JavaScript.")))
1313 (define-public qtcharts
1314 (package (inherit qtsvg)
1315 (name "qtcharts")
1316 (version "5.9.2")
1317 (source (origin
1318 (method url-fetch)
1319 (uri (string-append "https://download.qt.io/official_releases/qt/"
1320 (version-major+minor version) "/" version
1321 "/submodules/" name "-opensource-src-"
1322 version ".tar.xz"))
1323 (sha256
1324 (base32
1325 "193a3imkgryw42s0gbwaj9gpqd673h3jrg86jvmy33l2fc5gfyjf"))))
1326 (arguments
1327 (substitute-keyword-arguments (package-arguments qtsvg)
1328 ((#:tests? _ #f) #f))) ; TODO: Enable the tests
1329 (inputs
1330 `(("qtbase" ,qtbase)
1331 ("qtdeclarative" ,qtdeclarative)))
1332 (synopsis "Qt Charts module")
1333 (description "The Qt Charts module provides a set of easy to use chart
1334 components. It uses the Qt Graphics View Framework, therefore charts can be
1335 easily integrated to modern user interfaces. Qt Charts can be used as QWidgets,
1336 QGraphicsWidget, or QML types. Users can easily create impressive graphs by
1337 selecting one of the charts themes.")
1338 (license license:gpl3)))
1340 (define-public qtdatavis3d
1341 (package (inherit qtsvg)
1342 (name "qtdatavis3d")
1343 (version "5.9.2")
1344 (source (origin
1345 (method url-fetch)
1346 (uri (string-append "https://download.qt.io/official_releases/qt/"
1347 (version-major+minor version) "/" version
1348 "/submodules/" name "-opensource-src-"
1349 version ".tar.xz"))
1350 (sha256
1351 (base32
1352 "1cmjjbbmdqdix1f8b7qyc2vwhj9pvchc8r4lp65qw11dhycmdbh6"))))
1353 (arguments
1354 (substitute-keyword-arguments (package-arguments qtsvg)
1355 ((#:tests? _ #f) #f))) ; TODO: Enable the tests
1356 (inputs
1357 `(("qtbase" ,qtbase)
1358 ("qtdeclarative" ,qtdeclarative)))
1359 (synopsis "Qt Data Visualization module")
1360 (description "The Qt Data Visualization module provides a way to visualize
1361 data in 3D as bar, scatter, and surface graphs. It is especially useful for
1362 visualizing depth maps and large quantities of rapidly changing data, such as
1363 data received from multiple sensors. The look and feel of graphs can be
1364 customized by using themes or by adding custom items and labels to them.")
1365 (license license:gpl3)))
1367 (define-public qtnetworkauth
1368 (package (inherit qtsvg)
1369 (name "qtnetworkauth")
1370 (version "5.9.2")
1371 (source (origin
1372 (method url-fetch)
1373 (uri (string-append "https://download.qt.io/official_releases/qt/"
1374 (version-major+minor version) "/" version
1375 "/submodules/" name "-opensource-src-"
1376 version ".tar.xz"))
1377 (sha256
1378 (base32
1379 "16i33m8x5yii22ciq97bpfmnw0lwhvgv84i2az30a1ikm9dg00x0"))))
1380 (arguments
1381 (substitute-keyword-arguments (package-arguments qtsvg)
1382 ((#:phases phases)
1383 `(modify-phases ,phases
1384 (add-after 'unpack 'remove-failing-test
1385 (lambda _
1386 ;; These tests can't find their test data.
1387 (substitute* "tests/auto/auto.pro"
1388 (("oauth1 ") "# oauth1 "))
1389 #t))))))
1390 (inputs
1391 `(("qtbase" ,qtbase)))
1392 (synopsis "Qt Network Authorization module")
1393 (description "The Qt Network Authorization module provides an
1394 implementation of OAuth and OAuth2 authenticathon methods for Qt.")))
1396 (define-public qtremoteobjects
1397 (package (inherit qtsvg)
1398 (name "qtremoteobjects")
1399 (version "5.9.2")
1400 (source (origin
1401 (method url-fetch)
1402 (uri (string-append "https://download.qt.io/official_releases/qt/"
1403 (version-major+minor version) "/" version
1404 "/submodules/" name "-opensource-src-"
1405 version ".tar.xz"))
1406 (sha256
1407 (base32
1408 "1ylphdwis34y4pm9xiwh2xqfd0hh2gp8kkawlps2q5mh2bm11376"))))
1409 (inputs
1410 `(("qtbase" ,qtbase)
1411 ("qtdeclarative" ,qtdeclarative)))
1412 (synopsis "Qt Remote Objects module")
1413 (description "The Qt Remote Objects module is an @dfn{inter-process
1414 communication} (IPC) module developed for Qt. The idea is to extend existing
1415 Qt's functionalities to enable an easy exchange of information between
1416 processes or computers.")))
1418 (define-public qtspeech
1419 (package (inherit qtsvg)
1420 (name "qtspeech")
1421 (version "5.9.2")
1422 (source (origin
1423 (method url-fetch)
1424 (uri (string-append "https://download.qt.io/official_releases/qt/"
1425 (version-major+minor version) "/" version
1426 "/submodules/" name "-opensource-src-"
1427 version ".tar.xz"))
1428 (sha256
1429 (base32
1430 "0cq33dffi7q7dnvzhdivky5prakb8xnwap0b76fwgirhbbn88ypg"))))
1431 (inputs
1432 `(("qtbase" ,qtbase)))
1433 (native-inputs
1434 `(("perl" ,perl)
1435 ("qtdeclarative" ,qtdeclarative)
1436 ("qtmultimedia" ,qtmultimedia)
1437 ("qtxmlpatterns" ,qtxmlpatterns)))
1438 (synopsis "Qt Speech module")
1439 (description "The Qt Speech module enables a Qt application to support
1440 accessibility features such as text-to-speech, which is useful for end-users
1441 who are visually challenged or cannot access the application for whatever
1442 reason. The most common use case where text-to-speech comes in handy is when
1443 the end-user is driving and cannot attend the incoming messages on the phone.
1444 In such a scenario, the messaging application can read out the incoming
1445 message.")))
1447 (define-public python-sip
1448 (package
1449 (name "python-sip")
1450 (version "4.19.3")
1451 (source
1452 (origin
1453 (method url-fetch)
1454 (uri
1455 (string-append "mirror://sourceforge/pyqt/sip/"
1456 "sip-" version "/sip-" version ".tar.gz"))
1457 (sha256
1458 (base32
1459 "0x2bghbprwl3az1ni3p87i0bq8r99694la93kg65vi0cz12gh3bl"))))
1460 (build-system gnu-build-system)
1461 (native-inputs
1462 `(("python" ,python-wrapper)))
1463 (arguments
1464 `(#:tests? #f ; no check target
1465 #:modules ((srfi srfi-1)
1466 ,@%gnu-build-system-modules)
1467 #:phases
1468 (modify-phases %standard-phases
1469 (replace 'configure
1470 (lambda* (#:key inputs outputs #:allow-other-keys)
1471 (let* ((out (assoc-ref outputs "out"))
1472 (bin (string-append out "/bin"))
1473 (include (string-append out "/include"))
1474 (python (assoc-ref inputs "python"))
1475 (python-version
1476 (last (string-split python #\-)))
1477 (python-major+minor
1478 (string-join
1479 (take (string-split python-version #\.) 2)
1480 "."))
1481 (lib (string-append out "/lib/python"
1482 python-major+minor
1483 "/site-packages")))
1484 (zero?
1485 (system* "python" "configure.py"
1486 "--bindir" bin
1487 "--destdir" lib
1488 "--incdir" include))))))))
1489 (home-page "https://www.riverbankcomputing.com/software/sip/intro")
1490 (synopsis "Python binding creator for C and C++ libraries")
1491 (description
1492 "SIP is a tool to create Python bindings for C and C++ libraries. It
1493 was originally developed to create PyQt, the Python bindings for the Qt
1494 toolkit, but can be used to create bindings for any C or C++ library.
1496 SIP comprises a code generator and a Python module. The code generator
1497 processes a set of specification files and generates C or C++ code, which
1498 is then compiled to create the bindings extension module. The SIP Python
1499 module provides support functions to the automatically generated code.")
1500 ;; There is a choice between a python like license, gpl2 and gpl3.
1501 ;; For compatibility with pyqt, we need gpl3.
1502 (license license:gpl3)))
1504 (define-public python2-sip
1505 (package (inherit python-sip)
1506 (name "python2-sip")
1507 (native-inputs
1508 `(("python" ,python-2)))))
1510 (define-public python-pyqt
1511 (package
1512 (name "python-pyqt")
1513 (version "5.9")
1514 (source
1515 (origin
1516 (method url-fetch)
1517 (uri
1518 (string-append "mirror://sourceforge/pyqt/PyQt5/"
1519 "PyQt-" version "/PyQt5_gpl-"
1520 version ".tar.gz"))
1521 (sha256
1522 (base32
1523 "15hh4z5vd45dcswjla58q6rrfr6ic7jfz2n7c8lwfb10rycpj3mb"))
1524 (patches (search-patches "pyqt-configure.patch"))))
1525 (build-system gnu-build-system)
1526 (native-inputs
1527 `(("qtbase" ,qtbase))) ; for qmake
1528 (propagated-inputs
1529 `(("python-sip" ,python-sip)))
1530 (inputs
1531 `(("python" ,python-wrapper)
1532 ("qtbase" ,qtbase)
1533 ("qtconnectivity" ,qtconnectivity)
1534 ("qtdeclarative" ,qtdeclarative)
1535 ("qtlocation" ,qtlocation)
1536 ("qtmultimedia" ,qtmultimedia)
1537 ("qtsensors" ,qtsensors)
1538 ("qtserialport" ,qtserialport)
1539 ("qtsvg" ,qtsvg)
1540 ("qttools" ,qttools)
1541 ("qtwebchannel" ,qtwebchannel)
1542 ("qtwebkit" ,qtwebkit)
1543 ("qtwebsockets" ,qtwebsockets)
1544 ("qtx11extras" ,qtx11extras)
1545 ("qtxmlpatterns" ,qtxmlpatterns)))
1546 (arguments
1547 `(#:modules ((srfi srfi-1)
1548 ,@%gnu-build-system-modules)
1549 #:phases
1550 (modify-phases %standard-phases
1551 (replace 'configure
1552 (lambda* (#:key inputs outputs #:allow-other-keys)
1553 (let* ((out (assoc-ref outputs "out"))
1554 (bin (string-append out "/bin"))
1555 (sip (string-append out "/share/sip"))
1556 (plugins (string-append out "/plugins"))
1557 (designer (string-append plugins "/designer"))
1558 (qml (string-append plugins "/PyQt5"))
1559 (python (assoc-ref inputs "python"))
1560 (python-version
1561 (last (string-split python #\-)))
1562 (python-major+minor
1563 (string-join
1564 (take (string-split python-version #\.) 2)
1565 "."))
1566 (lib (string-append out "/lib/python"
1567 python-major+minor
1568 "/site-packages"))
1569 (stubs (string-append lib "/PyQt5")))
1570 (zero? (system* "python" "configure.py"
1571 "--confirm-license"
1572 "--bindir" bin
1573 "--destdir" lib
1574 "--designer-plugindir" designer
1575 "--qml-plugindir" qml
1576 ; Where to install the PEP 484 Type Hints stub
1577 ; files. Without this the stubs are tried to be
1578 ; installed into the python package's
1579 ; site-package directory, which is read-only.
1580 "--stubsdir" stubs
1581 "--sipdir" sip))))))))
1582 (home-page "https://www.riverbankcomputing.com/software/pyqt/intro")
1583 (synopsis "Python bindings for Qt")
1584 (description
1585 "PyQt is a set of Python v2 and v3 bindings for the Qt application
1586 framework. The bindings are implemented as a set of Python modules and
1587 contain over 620 classes.")
1588 (license license:gpl3)))
1590 (define-public python2-pyqt
1591 (package (inherit python-pyqt)
1592 (name "python2-pyqt")
1593 (native-inputs
1594 `(("python-sip" ,python2-sip)
1595 ("qtbase" ,qtbase)))
1596 (inputs
1597 `(("python" ,python-2)
1598 ,@(alist-delete "python" (package-inputs python-pyqt))))))
1600 (define-public python-pyqt-4
1601 (package (inherit python-pyqt)
1602 (name "python-pyqt")
1603 (version "4.12")
1604 (source
1605 (origin
1606 (method url-fetch)
1607 (uri
1608 (string-append "mirror://sourceforge/pyqt/PyQt4/"
1609 "PyQt-" version "/PyQt4_gpl_x11-"
1610 version ".tar.gz"))
1611 (sha256
1612 (base32
1613 "1nw8r88a5g2d550yvklawlvns8gd5slw53yy688kxnsa65aln79w"))))
1614 (native-inputs
1615 `(("python-sip" ,python-sip)
1616 ("qt" ,qt-4)))
1617 (inputs `(("python" ,python-wrapper)))
1618 (arguments
1619 `(#:tests? #f ; no check target
1620 #:modules ((srfi srfi-1)
1621 ,@%gnu-build-system-modules)
1622 #:phases
1623 (modify-phases %standard-phases
1624 (replace 'configure
1625 (lambda* (#:key inputs outputs #:allow-other-keys)
1626 (let* ((out (assoc-ref outputs "out"))
1627 (bin (string-append out "/bin"))
1628 (sip (string-append out "/share/sip"))
1629 (python (assoc-ref inputs "python"))
1630 (python-version
1631 (last (string-split python #\-)))
1632 (python-major+minor
1633 (string-join
1634 (take (string-split python-version #\.) 2)
1635 "."))
1636 (lib (string-append out "/lib/python"
1637 python-major+minor
1638 "/site-packages")))
1639 (zero? (system* "python" "configure.py"
1640 "--confirm-license"
1641 "--bindir" bin
1642 "--destdir" lib
1643 "--sipdir" sip))))))))
1644 (license (list license:gpl2 license:gpl3)))) ; choice of either license
1646 (define-public python2-pyqt-4
1647 (package (inherit python-pyqt-4)
1648 (name "python2-pyqt")
1649 (native-inputs
1650 `(("python-sip" ,python2-sip)
1651 ("qt" ,qt-4)))
1652 (inputs
1653 `(("python" ,python-2)))))
1655 (define-public qscintilla
1656 (package
1657 (name "qscintilla")
1658 (version "2.10.1")
1659 (source (origin
1660 (method url-fetch)
1661 (uri (string-append "mirror://sourceforge/pyqt/QScintilla2/"
1662 "QScintilla-" version "/QScintilla_gpl-"
1663 version ".tar.gz"))
1664 (sha256
1665 (base32
1666 "0r7s7ndblv3jc0xig1y4l64b6mfr879cdv3zwdndn27rj6fqmycp"))))
1667 (build-system gnu-build-system)
1668 (arguments
1669 `(#:phases
1670 (modify-phases %standard-phases
1671 (replace 'configure
1672 (lambda* (#:key outputs #:allow-other-keys)
1673 (let ((out (assoc-ref outputs "out")))
1674 (chdir "Qt4Qt5")
1675 (substitute* "qscintilla.pro"
1676 (("\\$\\$\\[QT_INSTALL_LIBS\\]")
1677 (string-append out "/lib"))
1678 (("\\$\\$\\[QT_INSTALL_HEADERS\\]")
1679 (string-append out "/include"))
1680 (("\\$\\$\\[QT_INSTALL_TRANSLATIONS\\]")
1681 (string-append out "/translations"))
1682 (("\\$\\$\\[QT_INSTALL_DATA\\]")
1683 (string-append out "/lib/qt$${QT_MAJOR_VERSION}"))
1684 (("\\$\\$\\[QT_HOST_DATA\\]")
1685 (string-append out "/lib/qt$${QT_MAJOR_VERSION}")))
1686 (zero? (system* "qmake"))))))))
1687 (native-inputs `(("qtbase" ,qtbase)))
1688 (home-page "http://www.riverbankcomputing.co.uk/software/qscintilla/intro")
1689 (synopsis "Qt port of the Scintilla C++ editor control")
1690 (description "QScintilla is a port to Qt of Neil Hodgson's Scintilla C++
1691 editor control. QScintilla includes features especially useful when editing
1692 and debugging source code. These include support for syntax styling, error
1693 indicators, code completion and call tips.")
1694 (license license:gpl3+)))
1696 (define-public python-qscintilla
1697 (package (inherit qscintilla)
1698 (name "python-qscintilla")
1699 (arguments
1700 `(#:configure-flags
1701 (list "--pyqt=PyQt5"
1702 (string-append "--pyqt-sipdir="
1703 (assoc-ref %build-inputs "python-pyqt")
1704 "/share/sip")
1705 (string-append "--qsci-incdir="
1706 (assoc-ref %build-inputs "qscintilla")
1707 "/include")
1708 (string-append "--qsci-libdir="
1709 (assoc-ref %build-inputs "qscintilla")
1710 "/lib"))
1711 #:phases
1712 (modify-phases %standard-phases
1713 (replace 'configure
1714 (lambda* (#:key outputs configure-flags #:allow-other-keys)
1715 (chdir "Python")
1716 (and (zero? (apply system* "python3" "configure.py"
1717 configure-flags))
1718 ;; Install to the right directory
1719 (begin
1720 (substitute* '("Makefile"
1721 "Qsci/Makefile")
1722 (("\\$\\(INSTALL_ROOT\\)/gnu/store/[^/]+")
1723 (assoc-ref outputs "out")))
1724 #t)))))))
1725 (inputs
1726 `(("qscintilla" ,qscintilla)
1727 ("python" ,python)
1728 ("python-pyqt" ,python-pyqt)))
1729 (description "QScintilla is a port to Qt of Neil Hodgson's Scintilla C++
1730 editor control. QScintilla includes features especially useful when editing
1731 and debugging source code. These include support for syntax styling, error
1732 indicators, code completion and call tips.
1734 This package provides the Python bindings.")))
1736 ;; PyQt only looks for modules in its own directory. It ignores environment
1737 ;; variables such as PYTHONPATH, so we need to build a union package to make
1738 ;; it work.
1739 (define-public python-pyqt+qscintilla
1740 (package (inherit python-pyqt)
1741 (name "python-pyqt+qscintilla")
1742 (source #f)
1743 (build-system trivial-build-system)
1744 (arguments
1745 '(#:modules ((guix build union))
1746 #:builder (begin
1747 (use-modules (ice-9 match)
1748 (guix build union))
1749 (match %build-inputs
1750 (((names . directories) ...)
1751 (union-build (assoc-ref %outputs "out")
1752 directories))))))
1753 (inputs
1754 `(("python-pyqt" ,python-pyqt)
1755 ("python-qscintilla" ,python-qscintilla)))
1756 (synopsis "Union of PyQt and the Qscintilla extension")
1757 (description
1758 "This package contains the union of PyQt and the Qscintilla extension.")))
1760 (define-public qtkeychain
1761 (package
1762 (name "qtkeychain")
1763 (version "0.8.0")
1764 (source
1765 (origin
1766 (method url-fetch)
1767 (uri (string-append "https://github.com/frankosterfeld/qtkeychain/"
1768 "archive/v" version ".tar.gz"))
1769 (file-name (string-append name "-" version ".tar.gz"))
1770 (sha256
1771 (base32 "0bxi5pfhxdvwk8yxa06lk2d7lcibmfqhahbin82bqf3m341zd4ml"))))
1772 (build-system cmake-build-system)
1773 (native-inputs
1774 `(("pkg-config" ,pkg-config)
1775 ("qttools" ,qttools)))
1776 (inputs
1777 `(("qtbase" ,qtbase)))
1778 (arguments
1779 `(#:tests? #f ; No tests included
1780 #:phases
1781 (modify-phases %standard-phases
1782 (add-before
1783 'configure 'set-qt-trans-dir
1784 (lambda _
1785 (substitute* "CMakeLists.txt"
1786 (("\\$\\{qt_translations_dir\\}")
1787 "${CMAKE_INSTALL_PREFIX}/share/qt/translations"))
1788 #t)))))
1789 (home-page "https://github.com/frankosterfeld/qtkeychain")
1790 (synopsis "Qt API to store passwords")
1791 (description
1792 "QtKeychain is a Qt library to store passwords and other secret data
1793 securely. It will not store any data unencrypted unless explicitly requested.")
1794 (license license:bsd-3)))
1796 (define-public qwt
1797 (package
1798 (name "qwt")
1799 (version "6.1.3")
1800 (source
1801 (origin
1802 (method url-fetch)
1803 (uri
1804 (string-append "mirror://sourceforge/qwt/qwt/"
1805 version "/qwt-" version ".tar.bz2"))
1806 (sha256
1807 (base32 "0cwp63s03dw351xavb3pzbjlqvx7kj88wv7v4a2b18m9f97d7v7k"))))
1808 (build-system gnu-build-system)
1809 (inputs
1810 `(("qtbase" ,qtbase)
1811 ("qtsvg" ,qtsvg)
1812 ("qttools" ,qttools)))
1813 (arguments
1814 `(#:phases
1815 (modify-phases %standard-phases
1816 (replace 'configure
1817 (lambda* (#:key outputs #:allow-other-keys)
1818 (let* ((out (assoc-ref outputs "out"))
1819 (docdir (string-append out "/share/doc/qwt"))
1820 (incdir (string-append out "/include/qwt"))
1821 (pluginsdir (string-append out "/lib/qt5/plugins/designer"))
1822 (featuresdir (string-append out "/lib/qt5/mkspecs/features")))
1823 (substitute* '("qwtconfig.pri")
1824 (("^(\\s*QWT_INSTALL_PREFIX)\\s*=.*" _ x)
1825 (format #f "~a = ~a\n" x out))
1826 (("^(QWT_INSTALL_DOCS)\\s*=.*" _ x)
1827 (format #f "~a = ~a\n" x docdir))
1828 (("^(QWT_INSTALL_HEADERS)\\s*=.*" _ x)
1829 (format #f "~a = ~a\n" x incdir))
1830 (("^(QWT_INSTALL_PLUGINS)\\s*=.*" _ x)
1831 (format #f "~a = ~a\n" x pluginsdir))
1832 (("^(QWT_INSTALL_FEATURES)\\s*=.*" _ x)
1833 (format #f "~a = ~a\n" x featuresdir)))
1834 (substitute* '("doc/doc.pro")
1835 ;; We'll install them in the 'install-man-pages' phase.
1836 (("^unix:doc\\.files.*") ""))
1837 (zero? (system* "qmake")))))
1838 (add-after 'install 'install-man-pages
1839 (lambda* (#:key outputs #:allow-other-keys)
1840 (let* ((out (assoc-ref outputs "out"))
1841 (man (string-append out "/share/man")))
1842 ;; Remove some incomplete manual pages.
1843 (for-each delete-file (find-files "doc/man/man3" "^_tmp.*"))
1844 (mkdir-p man)
1845 (copy-recursively "doc/man" man)
1846 #t))))))
1847 (home-page "http://qwt.sourceforge.net")
1848 (synopsis "Qt widgets for plots, scales, dials and other technical software
1849 GUI components")
1850 (description
1851 "The Qwt library contains widgets and components which are primarily useful
1852 for technical and scientific purposes. It includes a 2-D plotting widget,
1853 different kinds of sliders, and much more.")
1854 (license
1855 (list
1856 ;; The Qwt license is LGPL2.1 with some exceptions.
1857 (license:non-copyleft "http://qwt.sourceforge.net/qwtlicense.html")
1858 ;; textengines/mathml/qwt_mml_document.{cpp,h} is dual LGPL2.1/GPL3 (either).
1859 license:lgpl2.1 license:gpl3))))
1861 (define-public qtwebkit
1862 (package
1863 (name "qtwebkit")
1864 (version "5.9.1")
1865 (source
1866 (origin
1867 (method url-fetch)
1868 (uri (string-append "https://download.qt.io/official_releases/qt/"
1869 (version-major+minor version) "/" version
1870 "/submodules/" name "-opensource-src-"
1871 version ".tar.xz"))
1872 (sha256
1873 (base32
1874 "1ksjn1vjbfhdm4y4rg08ag4krk87ahp7qcdcpwll42l0rnz61998"))))
1875 (build-system gnu-build-system)
1876 (native-inputs
1877 `(("perl" ,perl)
1878 ("python" ,python-2.7)
1879 ("ruby" ,ruby)
1880 ("bison" ,bison)
1881 ("flex" ,flex)
1882 ("gperf" ,gperf)
1883 ("pkg-config" ,pkg-config)))
1884 (inputs
1885 `(("icu" ,icu4c)
1886 ("libjpeg" ,libjpeg)
1887 ("libpng" ,libpng)
1888 ("libwebp" ,libwebp)
1889 ("sqlite" ,sqlite)
1890 ("fontconfig" ,fontconfig)
1891 ("libxrender", libxrender)
1892 ("qtbase" ,qtbase)
1893 ("qtdeclarative" ,qtdeclarative)
1894 ("qtmultimedia" ,qtmultimedia)
1895 ("libxml2" ,libxml2)
1896 ("libxslt" ,libxslt)
1897 ("libx11" ,libx11)
1898 ("libxcomposite" ,libxcomposite)))
1899 (arguments
1900 `(#:phases
1901 (modify-phases %standard-phases
1902 (add-before 'configure 'fix-qmlwebkit-plugins-rpath
1903 (lambda _
1904 (substitute* "Source/WebKit/qt/declarative/experimental/experimental.pri"
1905 (("RPATHDIR_RELATIVE_TO_DESTDIR = \\.\\./\\.\\./lib")
1906 "RPATHDIR_RELATIVE_TO_DESTDIR = ../../../../../lib"))
1907 (substitute* "Source/WebKit/qt/declarative/public.pri"
1908 (("RPATHDIR_RELATIVE_TO_DESTDIR = \\.\\./\\.\\./lib")
1909 "RPATHDIR_RELATIVE_TO_DESTDIR = ../../../../lib"))
1910 #t))
1911 (replace 'configure
1912 (lambda* (#:key outputs #:allow-other-keys)
1913 (let ((out (assoc-ref outputs "out")))
1914 (setenv "QMAKEPATH"
1915 (string-append (getcwd) "/Tools/qmake:"
1916 (getenv "QMAKEPATH")))
1917 (system* "qmake"))))
1918 ;; prevent webkit from trying to install into the qtbase store directory,
1919 ;; and replace references to the build directory in linker options:
1920 (add-before 'build 'patch-installpaths
1921 (lambda* (#:key outputs inputs #:allow-other-keys)
1922 (let* ((out (assoc-ref outputs "out"))
1923 (qtbase (assoc-ref inputs "qtbase"))
1924 (builddir (getcwd))
1925 (linkbuild (string-append "-L" builddir))
1926 (linkout (string-append "-L" out))
1927 (makefiles
1928 (map-in-order
1929 (lambda (i)
1930 (let* ((in (car i))
1931 (mf (string-append (dirname in) "/"
1932 (cdr i))))
1933 ;; by default, these Makefiles are
1934 ;; generated during install, but we need
1935 ;; to generate them now
1936 (system* "qmake" in "-o" mf)
1937 mf))
1938 '(("Source/api.pri" . "Makefile.api")
1939 ("Source/widgetsapi.pri"
1940 . "Makefile.widgetsapi")
1941 ("Source/WebKit2/WebProcess.pro"
1942 . "Makefile.WebProcess")
1943 ("Source/WebKit2/PluginProcess.pro"
1944 . "Makefile.PluginProcess")
1945 ("Source/WebKit/qt/declarative/public.pri"
1946 . "Makefile.declarative.public")
1947 ("Source/WebKit/qt/declarative/experimental/experimental.pri"
1948 . "Makefile.declarative.experimental")
1949 ("Source/WebKit/qt/examples/platformplugin/platformplugin.pro"
1950 . "Makefile")))))
1951 ;; Order of qmake calls and substitutions matters here.
1952 (system* "qmake" "-prl" "Source/widgetsapi.pri"
1953 "-o" "Source/Makefile")
1954 (substitute* (find-files "lib" "libQt5.*\\.prl")
1955 ((linkbuild) linkout))
1956 (substitute* (find-files "lib"
1957 "libQt5WebKit.*\\.la")
1958 (("libdir='.*'")
1959 (string-append "libdir='" out "/lib'"))
1960 ((linkbuild) linkout))
1961 (substitute* (find-files "lib/pkgconfig"
1962 "Qt5WebKit.*\\.pc")
1963 (((string-append "prefix=" qtbase))
1964 (string-append "prefix=" out))
1965 ((linkbuild) linkout))
1966 ;; Makefiles must be modified after .prl/.la/.pc
1967 ;; files, lest they get rebuilt:
1968 (substitute* makefiles
1969 (((string-append "\\$\\(INSTALL_ROOT\\)" qtbase))
1970 out )
1971 (((string-append "-Wl,-rpath," builddir))
1972 (string-append "-Wl,-rpath," out)))))))))
1973 (home-page "https://www.webkit.org")
1974 (synopsis "Web browser engine and classes to render and interact with web
1975 content")
1976 (description "QtWebKit provides a Web browser engine that makes it easy to
1977 embed content from the World Wide Web into your Qt application. At the same
1978 time Web content can be enhanced with native controls.")
1980 (license license:lgpl2.1+)))
1982 (define-public dotherside
1983 (package
1984 (name "dotherside")
1985 (version "0.5.2")
1986 (source
1987 (origin
1988 (method url-fetch)
1989 (uri (string-append "https://github.com/filcuc/DOtherSide/"
1990 "archive/v" version ".tar.gz"))
1991 (file-name (string-append name "-" version ".tar.gz"))
1992 (sha256
1993 (base32
1994 "0pqlrvy4ajjir80ra79ka3n0rjj0ir0f0m91cq86iz3nnw8w148z"))))
1995 (build-system cmake-build-system)
1996 (native-inputs
1997 `(("qttools" ,qttools)))
1998 (inputs
1999 `(("qtbase" ,qtbase)
2000 ("qtdeclarative" ,qtdeclarative)))
2001 (home-page "https://github.com/frankosterfeld/qtkeychain")
2002 (synopsis "C language library for creating bindings for the Qt QML language")
2003 (description
2004 "DOtherSide is a C language library for creating bindings for the
2005 QT QML language. The following features are implementable from
2006 a binding language:
2007 @itemize
2008 @item Creating custom QObject
2009 @item Creating custom QAbstractListModels
2010 @item Creating custom properties, signals and slots
2011 @item Creating from QML QObject defined in the binded language
2012 @item Creating from Singleton QML QObject defined in the binded language
2013 @end itemize\n")
2014 (license license:lgpl3))) ;version 3 only (+ exception)