1 ;;; GNU Guix --- Functional package management for GNU
2 ;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com>
3 ;;; Copyright © 2015 David Hashe <david.hashe@dhashe.com>
4 ;;; Copyright © 2015 Ricardo Wurmus <rekado@elephly.net>
5 ;;; Copyright © 2015, 2016, 2017, 2018, 2019 Mark H Weaver <mhw@netris.org>
6 ;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
7 ;;; Copyright © 2018 Pierre Neidhardt <mail@ambrevar.xyz>
8 ;;; Copyright © 2019 Marius Bakke <mbakke@fastmail.com>
10 ;;; This file is part of GNU Guix.
12 ;;; GNU Guix is free software; you can redistribute it and/or modify it
13 ;;; under the terms of the GNU General Public License as published by
14 ;;; the Free Software Foundation; either version 3 of the License, or (at
15 ;;; your option) any later version.
17 ;;; GNU Guix is distributed in the hope that it will be useful, but
18 ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
19 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 ;;; GNU General Public License for more details.
22 ;;; You should have received a copy of the GNU General Public License
23 ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
25 (define-module (gnu packages webkit)
26 #:use-module ((guix licenses) #:prefix license:)
27 #:use-module (guix packages)
28 #:use-module (guix download)
29 #:use-module (guix utils)
30 #:use-module (guix build-system cmake)
31 #:use-module (guix build-system gnu)
32 #:use-module (gnu packages)
33 #:use-module (gnu packages base)
34 #:use-module (gnu packages bison)
35 #:use-module (gnu packages docbook)
36 #:use-module (gnu packages enchant)
37 #:use-module (gnu packages flex)
38 #:use-module (gnu packages freedesktop)
39 #:use-module (gnu packages gcc)
40 #:use-module (gnu packages gettext)
41 #:use-module (gnu packages gl)
42 #:use-module (gnu packages glib)
43 #:use-module (gnu packages gnome)
44 #:use-module (gnu packages gnupg)
45 #:use-module (gnu packages gperf)
46 #:use-module (gnu packages gstreamer)
47 #:use-module (gnu packages gtk)
48 #:use-module (gnu packages icu4c)
49 #:use-module (gnu packages image)
50 #:use-module (gnu packages libreoffice)
51 #:use-module (gnu packages linux)
52 #:use-module (gnu packages perl)
53 #:use-module (gnu packages pkg-config)
54 #:use-module (gnu packages python)
55 #:use-module (gnu packages ruby)
56 #:use-module (gnu packages sqlite)
57 #:use-module (gnu packages tls)
58 #:use-module (gnu packages video)
59 #:use-module (gnu packages virtualization)
60 #:use-module (gnu packages xml)
61 #:use-module (gnu packages xdisorg)
62 #:use-module (gnu packages xorg))
70 (uri (string-append "https://wpewebkit.org/releases/libwpe-"
74 "1221vs72zs87anrzhbm6pf8jnii7s6ms7mkzj6nlds9zqd7lklz2"))))
75 (build-system cmake-build-system)
77 `(#:tests? #f)) ;no tests
79 `(("pkg-config" ,pkg-config)))
83 `(;; In Requires of wpe-1.0.pc.
84 ("libxkbcommon" ,libxkbcommon)))
85 (home-page "https://wpewebkit.org/")
86 (synopsis "Platform agnostic WebKit interfaces")
88 "@code{libwpe} is a small library that defines programming interfaces
89 for use by WebKit, and provides a mechanism for loading a platform-specific
90 backend which implements them.")
91 (license license:bsd-2)))
93 (define-public wpebackend-fdo
95 (name "wpebackend-fdo")
99 (uri (string-append "https://wpewebkit.org/releases/"
100 "wpebackend-fdo-" version ".tar.xz"))
103 "1bwbs47v4nlzhsqrw9fpyny5m3n9ry0kfzsvk90zjif4bd5cl6d9"))))
104 (build-system cmake-build-system)
106 `(#:tests? #f)) ;no tests
108 `(("pkg-config" ,pkg-config)))
113 ("wayland" ,wayland)))
114 (home-page "https://wpewebkit.org/")
115 (synopsis "Wayland WPE backend")
117 "This package provides a backend implementation for the WPE WebKit
118 engine that uses Wayland for graphics output.")
119 (license license:bsd-2)))
121 (define-public webkitgtk
127 (uri (string-append "https://www.webkitgtk.org/releases/"
128 "webkitgtk-" version ".tar.xz"))
131 "04g6y0sv04d20bw401myq3k828ikysjhx383ly81vh9wji9i3mdd"))))
132 (build-system cmake-build-system)
133 (outputs '("out" "doc"))
135 '(#:tests? #f ; no tests
136 #:build-type "Release" ; turn off debugging symbols to save space
137 #:configure-flags (list
139 "-DENABLE_GTKDOC=ON" ; No doc by default
140 (string-append ; uses lib64 by default
142 (assoc-ref %outputs "out") "/lib")
144 ;; XXX Adding GStreamer GL support would apparently
145 ;; require adding gst-plugins-bad to the inputs,
146 ;; which might entail a security risk as a result of
147 ;; the plugins of dubious code quality that are
148 ;; included. More investigation is needed. For
149 ;; now, we explicitly disable it to prevent an error
150 ;; at configuration time.
151 "-DUSE_GSTREAMER_GL=OFF"
153 ;; XXX Disable WOFF2 ‘web fonts’. These were never
154 ;; supported in our previous builds. Enabling them
155 ;; requires building libwoff2 and possibly woff2dec.
158 (modify-phases %standard-phases
159 (add-after 'unpack 'patch-gtk-doc-scan
160 (lambda* (#:key inputs #:allow-other-keys)
161 (for-each (lambda (file)
163 (("http://www.oasis-open.org/docbook/xml/4.1.2/docbookx.dtd")
164 (string-append (assoc-ref inputs "docbook-xml")
165 "/xml/dtd/docbook/docbookx.dtd"))))
166 (find-files "Source" "\\.sgml$"))
168 (add-after 'unpack 'embed-absolute-wpebackend-reference
169 (lambda* (#:key inputs #:allow-other-keys)
170 (let ((wpebackend-fdo (assoc-ref inputs "wpebackend-fdo")))
171 (substitute* "Source/WebKit/UIProcess/glib/WebProcessPoolGLib.cpp"
172 (("libWPEBackend-fdo-([\\.0-9]+)\\.so" all version)
173 (string-append wpebackend-fdo "/lib/" all)))
175 (add-after 'install 'move-doc-files
176 (lambda* (#:key outputs #:allow-other-keys)
177 (let ((out (assoc-ref outputs "out"))
178 (doc (assoc-ref outputs "doc")))
179 (mkdir-p (string-append doc "/share"))
180 (rename-file (string-append out "/share/gtk-doc")
181 (string-append doc "/share/gtk-doc"))
185 ("gettext" ,gettext-minimal)
186 ("glib:bin" ,glib "bin") ; for glib-mkenums, etc.
187 ("gobject-introspection" ,gobject-introspection)
190 ("pkg-config" ,pkg-config)
191 ("python" ,python-wrapper)
192 ("gtk-doc" ,gtk-doc) ; For documentation generation
193 ("docbook-xml" ,docbook-xml) ; For documentation generation
197 ("libsoup" ,libsoup)))
199 `(("at-spi2-core" ,at-spi2-core)
200 ("bubblewrap" ,bubblewrap)
203 ("gst-plugins-base" ,gst-plugins-base)
205 ("harfbuzz" ,harfbuzz)
208 ("libgcrypt" ,libgcrypt)
210 ("libnotify" ,libnotify)
212 ("libseccomp" ,libseccomp)
213 ("libsecret" ,libsecret)
214 ("libtasn1" ,libtasn1)
217 ("libxcomposite" ,libxcomposite)
222 ("openjpeg" ,openjpeg)
224 ("wpebackend-fdo" ,wpebackend-fdo)
225 ("xdg-dbus-proxy" ,xdg-dbus-proxy)))
226 (home-page "https://www.webkitgtk.org/")
227 (synopsis "Web content engine for GTK+")
229 "WebKitGTK+ is a full-featured port of the WebKit rendering engine,
230 suitable for projects requiring any kind of web integration, from hybrid
231 HTML/CSS applications to full-fledged web browsers.")
232 ;; WebKit's JavaScriptCore and WebCore components are available under
233 ;; the GNU LGPL, while the rest is available under a BSD-style license.
234 (license (list license:lgpl2.0