1 ;;; GNU Guix --- Functional package management for GNU
2 ;;; Copyright © 2013, 2015 Andreas Enge <andreas@enge.fr>
3 ;;; Copyright © 2013 Aljosha Papsch <misc@rpapsch.de>
4 ;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019, 2020 Ludovic Courtès <ludo@gnu.org>
5 ;;; Copyright © 2014, 2015, 2016 Mark H Weaver <mhw@netris.org>
6 ;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020 Ricardo Wurmus <rekado@elephly.net>
7 ;;; Copyright © 2018 Raoul Jean Pierre Bonnal <ilpuccio.febo@gmail.com>
8 ;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
9 ;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020 Eric Bavier <bavier@posteo.net>
10 ;;; Copyright © 2015 Eric Dvorsak <eric@dvorsak.fr>
11 ;;; Copyright © 2016 Sou Bunnbu <iyzsong@gmail.com>
12 ;;; Copyright © 2016 Jelle Licht <jlicht@fsfe.org>
13 ;;; Copyright © 2016, 2017, 2018, 2019, 2020, 2021 Efraim Flashner <efraim@flashner.co.il>
14 ;;; Copyright © 2016 Rene Saavedra <rennes@openmailbox.org>
15 ;;; Copyright © 2016 Ben Woodcroft <donttrustben@gmail.com>
16 ;;; Copyright © 2016 Clément Lassieur <clement@lassieur.org>
17 ;;; Copyright © 2016, 2017 Nikita <nikita@n0.is>
18 ;;; Copyright © 2016, 2017, 2018, 2019 Arun Isaac <arunisaac@systemreboot.net>
19 ;;; Copyright © 2016–2021 Tobias Geerinckx-Rice <me@tobias.gr>
20 ;;; Copyright © 2016 Bake Timmons <b3timmons@speedymail.org>
21 ;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be>
22 ;;; Copyright © 2017, 2018, 2020 Marius Bakke <mbakke@fastmail.com>
23 ;;; Copyright © 2017 Kei Kebreau <kkebreau@posteo.net>
24 ;;; Copyright © 2017 Petter <petter@mykolab.ch>
25 ;;; Copyright © 2017 Pierre Langlois <pierre.langlois@gmx.com>
26 ;;; Copyright © 2017 Rutger Helling <rhelling@mykolab.com>
27 ;;; Copyright © 2017, 2019, 2020 Christopher Baines <mail@cbaines.net>
28 ;;; Copyright © 2018, 2019 Julien Lepiller <julien@lepiller.eu>
29 ;;; Copyright © 2018 Pierre-Antoine Rouby <pierre-antoine.rouby@inria.fr>
30 ;;; Copyright © 2018 Gábor Boskovits <boskovits@gmail.com>
31 ;;; Copyright © 2018 Mădălin Ionel Patrașcu <madalinionel.patrascu@mdc-berlin.de>
32 ;;; Copyright © 2018 Alex Vong <alexvong1995@gmail.com>
33 ;;; Copyright © 2019, 2020, 2021 Nicolas Goaziou <mail@nicolasgoaziou.fr>
34 ;;; Copyright © 2019 Brendan Tildesley <mail@brendan.scot>
35 ;;; Copyright © 2019 Alex Griffin <a@ajgrf.com>
36 ;;; Copyright © 2019 Hartmut Goebel <h.goebel@crazy-compilers.com>
37 ;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.org>
38 ;;; Copyright © 2019 Mathieu Othacehe <m.othacehe@gmail.com>
39 ;;; Copyright © 2019 Pierre-Moana Levesque <pierre.moana.levesque@gmail.com>
40 ;;; Copyright © 2019, 2020 Florian Pelz <pelzflorian@pelzflorian.de>
41 ;;; Copyright © 2020 Timotej Lazar <timotej.lazar@araneo.si>
42 ;;; Copyright © 2020 Alexandros Theodotou <alex@zrythm.org>
43 ;;; Copyright © 2020 Pierre Neidhardt <mail@ambrevar.xyz>
44 ;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
45 ;;; Copyright © 2018, 2019, 2020 Björn Höfling <bjoern.hoefling@bjoernhoefling.de>
46 ;;; Copyright © 2020, 2021 Paul Garlick <pgarlick@tourbillion-technology.com>
47 ;;; Copyright © 2020 Michael Rohleder <mike@rohleder.de>
48 ;;; Copyright © 2020, 2021 Ryan Prior <rprior@protonmail.com>
49 ;;; Copyright © 2020 Alexandru-Sergiu Marton <brown121407@posteo.ro>
50 ;;; Copyright © 2021 Stefan Reichör <stefan@xsteve.at>
52 ;;; This file is part of GNU Guix.
54 ;;; GNU Guix is free software; you can redistribute it and/or modify it
55 ;;; under the terms of the GNU General Public License as published by
56 ;;; the Free Software Foundation; either version 3 of the License, or (at
57 ;;; your option) any later version.
59 ;;; GNU Guix is distributed in the hope that it will be useful, but
60 ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
61 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
62 ;;; GNU General Public License for more details.
64 ;;; You should have received a copy of the GNU General Public License
65 ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
67 (define-module (gnu packages web)
68 #:use-module (ice-9 match)
69 #:use-module ((guix licenses) #:prefix license:)
70 #:use-module (guix packages)
71 #:use-module (guix download)
72 #:use-module (guix gexp)
73 #:use-module (guix cvs-download)
74 #:use-module (guix hg-download)
75 #:use-module (guix git-download)
76 #:use-module (guix utils)
77 #:use-module (guix build-system ant)
78 #:use-module (guix build-system cargo)
79 #:use-module (guix build-system cmake)
80 #:use-module (guix build-system copy)
81 #:use-module (guix build-system glib-or-gtk)
82 #:use-module (guix build-system gnu)
83 #:use-module (guix build-system go)
84 #:use-module (guix build-system meson)
85 #:use-module (guix build-system perl)
86 #:use-module (guix build-system python)
87 #:use-module (guix build-system qt)
88 #:use-module (guix build-system scons)
89 #:use-module (guix build-system trivial)
90 #:use-module (gnu packages)
91 #:use-module (gnu packages admin)
92 #:use-module (gnu packages adns)
93 #:use-module (gnu packages apr)
94 #:use-module (gnu packages autotools)
95 #:use-module (gnu packages base)
96 #:use-module (gnu packages bison)
97 #:use-module (gnu packages bittorrent)
98 #:use-module (gnu packages boost)
99 #:use-module (gnu packages check)
100 #:use-module (gnu packages compression)
101 #:use-module (gnu packages crates-gtk)
102 #:use-module (gnu packages crates-io)
103 #:use-module (gnu packages curl)
104 #:use-module (gnu packages cyrus-sasl)
105 #:use-module (gnu packages databases)
106 #:use-module (gnu packages docbook)
107 #:use-module (gnu packages documentation)
108 #:use-module (gnu packages emacs)
109 #:use-module (gnu packages emacs-xyz)
110 #:use-module (gnu packages flex)
111 #:use-module (gnu packages fontutils)
112 #:use-module (gnu packages freedesktop)
113 #:use-module (gnu packages gcc)
114 #:use-module (gnu packages gd)
115 #:use-module (gnu packages gettext)
116 #:use-module (gnu packages glib)
117 #:use-module (gnu packages gnome)
118 #:use-module (gnu packages gnu-doc)
119 #:use-module (gnu packages gnunet)
120 #:use-module (gnu packages gnupg)
121 #:use-module (gnu packages golang)
122 #:use-module (gnu packages gperf)
123 #:use-module (gnu packages graphviz)
124 #:use-module (gnu packages gtk)
125 #:use-module (gnu packages guile)
126 #:use-module (gnu packages guile-xyz)
127 #:use-module (gnu packages hurd)
128 #:use-module (gnu packages icu4c)
129 #:use-module (gnu packages image)
130 #:use-module (gnu packages java)
131 #:use-module (gnu packages jemalloc)
132 #:use-module (gnu packages imagemagick)
133 #:use-module (gnu packages kde)
134 #:use-module (gnu packages kerberos)
135 #:use-module (gnu packages libevent)
136 #:use-module (gnu packages libidn)
137 #:use-module (gnu packages libunistring)
138 #:use-module (gnu packages libunwind)
139 #:use-module (gnu packages linux)
140 #:use-module (gnu packages lisp-xyz)
141 #:use-module (gnu packages lsof)
142 #:use-module (gnu packages lua)
143 #:use-module (gnu packages mail)
144 #:use-module (gnu packages man)
145 #:use-module (gnu packages markup)
146 #:use-module (gnu packages ncurses)
147 #:use-module (gnu packages networking)
148 #:use-module (gnu packages nss)
149 #:use-module (gnu packages openldap)
150 #:use-module (gnu packages openstack)
151 #:use-module (gnu packages package-management)
152 #:use-module (gnu packages pcre)
153 #:use-module (gnu packages perl)
154 #:use-module (gnu packages perl-check)
155 #:use-module (gnu packages python)
156 #:use-module (gnu packages python-crypto)
157 #:use-module (gnu packages python-web)
158 #:use-module (gnu packages python-xyz)
159 #:use-module (gnu packages pkg-config)
160 #:use-module (gnu packages qt)
161 #:use-module (gnu packages re2c)
162 #:use-module (gnu packages readline)
163 #:use-module (gnu packages search)
164 #:use-module (gnu packages sphinx)
165 #:use-module (gnu packages texinfo)
166 #:use-module (gnu packages textutils)
167 #:use-module (gnu packages tls)
168 #:use-module (gnu packages valgrind)
169 #:use-module (gnu packages version-control)
170 #:use-module (gnu packages vim)
171 #:use-module (gnu packages xml)
172 #:use-module ((srfi srfi-1) #:select (delete-duplicates)))
183 (url "https://github.com/azadkuh/qhttp")
184 (commit (string-append "version-" version))))
185 (file-name (git-file-name name version))
187 (base32 "0cx23g4y4k4v9p5ph6h7gfhp8sfy1gcdv1g6bl44hppar1y0zfdq"))))
188 (build-system gnu-build-system)
190 `(#:tests? #f ; no target
192 ((guix build copy-build-system)
193 ,@%gnu-build-system-modules)
195 (((guix build copy-build-system) #:prefix copy:)
196 (guix build gnu-build-system)
199 (modify-phases %standard-phases
200 (add-after 'unpack 'patch-source
201 (lambda* (#:key outputs #:allow-other-keys)
202 (substitute* "commondir.pri"
203 (("\\$\\$PRJDIR/xbin")
204 (string-append (assoc-ref outputs "out") "/lib"))
207 (("\\$\\$PRJDIR/3rdparty")
209 (substitute* "src/src.pro"
210 (("SOURCES \\+= \\$\\$PRJDIR/3rdparty/http-parser/http_parser.c")
212 (("HEADERS \\+= \\$\\$PRJDIR/3rdparty/http-parser/http_parser.h")
214 (substitute* '("src/private/qhttpbase.hpp" "src/qhttpabstracts.cpp")
215 (("http-parser/http_parser.h")
219 (lambda _ (invoke "qmake")))
222 (apply (assoc-ref copy:%standard-phases 'install)
225 #:include-regexp ("\\.hpp$")))
227 (add-after 'install 'remove-examples
228 (lambda* (#:key outputs #:allow-other-keys)
229 (with-directory-excursion
230 (string-append (assoc-ref outputs "out") "/lib")
231 (for-each delete-file
238 `(("http-parser" ,http-parser)
240 (home-page "https://github.com/azadkuh/qhttp/")
241 (synopsis "Qt-based HTTP Library")
243 "Qhttp is a light-weight and asynchronous HTTP library
244 (both server & client) in Qt5 and C++14.")
245 (license license:expat)))
253 (uri (string-append "mirror://apache/httpd/httpd-"
257 "1sj1rwgbcjgkzac3ybjy7j68c9b3dv3ap71m48mrjhf6w7vds3kl"))))
258 (build-system gnu-build-system)
259 (native-inputs `(("pcre" ,pcre "bin"))) ;for 'pcre-config'
260 (inputs `(("apr" ,apr)
261 ("apr-util" ,apr-util)
263 ("perl" ,perl))) ; needed to run bin/apxs
265 `(#:test-target "test"
266 #:configure-flags (list "--enable-rewrite"
268 "--enable-vhost-alias"
270 "--enable-mime-magic"
271 (string-append "--sysconfdir="
272 (assoc-ref %outputs "out")
274 (synopsis "Featureful HTTP server")
276 "The Apache HTTP Server Project is a collaborative software development
277 effort aimed at creating a robust, commercial-grade, featureful, and
278 freely-available source code implementation of an HTTP (Web) server. The
279 project is jointly managed by a group of volunteers located around the world,
280 using the Internet and the Web to communicate, plan, and develop the server
281 and its related documentation.")
282 (license license:asl2.0)
283 (home-page "https://httpd.apache.org/")))
285 (define-public mod-wsgi
292 (url "https://github.com/GrahamDumpleton/mod_wsgi")
294 (file-name (git-file-name name version))
297 "1savh6h3qds20mwn1nqasmqzcp57pdhfc9v4b4k78d6q28y0r17s"))))
298 (build-system gnu-build-system)
300 '(#:tests? #f ; TODO: can't figure out if there are tests
302 (string-append "DESTDIR="
303 (assoc-ref %outputs "out"))
304 "LIBEXECDIR=/modules")))
307 ("python" ,python-wrapper)))
308 (synopsis "Apache HTTPD module for Python WSGI applications")
310 "The mod_wsgi module for the Apache HTTPD Server adds support for running
311 applications that support the Python @acronym{WSGI, Web Server Gateway
312 Interface} specification.")
313 (license license:asl2.0)
314 (home-page "https://modwsgi.readthedocs.io/")))
316 (define-public monolith
324 (url "https://github.com/Y2Z/monolith.git")
325 (commit (string-append "v" version))))
326 (file-name (git-file-name name version))
328 (base32 "1z0bcvk2cvx2cd0hs8addzcb070xvrkcxvg25691xw0ikiynpkwz"))))
329 (build-system cargo-build-system)
332 (("rust-atty" ,rust-atty-0.2)
333 ("rust-base64" ,rust-base64-0.13)
334 ("rust-chrono" ,rust-chrono-0.4)
335 ("rust-clap" ,rust-clap-2)
336 ("rust-cssparser" ,rust-cssparser-0.28)
337 ("rust-html5ever" ,rust-html5ever-0.24)
338 ("rust-regex" ,rust-regex-1)
339 ("rust-reqwest" ,rust-reqwest-0.11)
340 ("rust-sha2" ,rust-sha2-0.9)
341 ("rust-url" ,rust-url-2))
342 #:cargo-development-inputs
343 (("rust-assert-cmd" ,rust-assert-cmd-1)
344 ("rust-tempfile" ,rust-tempfile-3))))
346 `(("pkg-config" ,pkg-config)))
348 `(("openssl" ,openssl)))
349 (home-page "https://github.com/Y2Z/monolith")
350 (synopsis "Command line tool for saving web pages as a single HTML file")
352 "Monolith bundles any web page into a single HTML file.
354 Unlike conventional ``Save page as…'', Monolith not only saves the target
355 document, it embeds CSS, image, and JavaScript assets all at once, producing
356 a single HTML5 document.
358 If compared to saving websites with @samp{wget -mpk}, Monolith embeds
359 all assets as data URLs and therefore displays the saved page exactly
360 the same, being completely separated from the Internet.")
361 (license license:unlicense)))
366 ;; Track the ‘mainline’ branch. Upstream considers it more reliable than
367 ;; ’stable’ and recommends that “in general you deploy the NGINX mainline
368 ;; branch at all times” (https://www.nginx.com/blog/nginx-1-6-1-7-released/)
369 ;; Consider updating the nginx-documentation package together with this one.
373 (uri (string-append "https://nginx.org/download/nginx-"
377 "01cb6hsaik1sfjihbrldmwrcn54gk4plfy350sl1b4rml6qik29h"))))
378 (build-system gnu-build-system)
379 (inputs `(("openssl" ,openssl)
383 `(#:tests? #f ; no test target
385 (modify-phases %standard-phases
386 (add-before 'configure 'patch-/bin/sh
388 (substitute* "auto/feature"
389 (("/bin/sh") (which "sh")))
392 ;; The configure script is hand-written, not from GNU autotools.
393 (lambda* (#:key configure-flags outputs #:allow-other-keys)
395 (append (list (string-append "--prefix=" (assoc-ref outputs "out"))
396 "--with-http_ssl_module"
397 "--with-http_v2_module"
400 ;; Even when not cross-building, we pass the
401 ;; --crossbuild option to avoid customizing for the
402 ;; kernel version on the build machine.
403 ,(let ((system "Linux") ; uname -s
404 (release "3.2.0") ; uname -r
406 (machine (match (or (%current-target-system)
408 ("x86_64-linux" "x86_64")
409 ("i686-linux" "i686")
410 ("mips64el-linux" "mips64")
411 ;; Prevent errors when querying
412 ;; this package on unsupported
413 ;; platforms, e.g. when running
414 ;; "guix package --search="
416 (string-append "--crossbuild="
417 system ":" release ":" machine)))
420 (format #t "configure flags: ~s~%" flags)
421 (apply invoke "./configure" flags)
423 (add-after 'install 'install-man-page
424 (lambda* (#:key outputs #:allow-other-keys)
425 (let* ((out (assoc-ref outputs "out"))
426 (man (string-append out "/share/man")))
427 (install-file "objs/nginx.8" (string-append man "/man8"))
429 (add-after 'install 'fix-root-dirs
430 (lambda* (#:key outputs #:allow-other-keys)
431 ;; 'make install' puts things in strange places, so we need to
432 ;; clean it up ourselves.
433 (let* ((out (assoc-ref outputs "out"))
434 (share (string-append out "/share/nginx")))
435 ;; This directory is empty, so get rid of it.
436 (rmdir (string-append out "/logs"))
437 ;; Example configuration and HTML files belong in
440 (rename-file (string-append out "/conf")
441 (string-append share "/conf"))
442 (rename-file (string-append out "/html")
443 (string-append share "/html"))
445 (home-page "https://nginx.org")
446 (synopsis "HTTP and reverse proxy server")
448 "Nginx (\"engine X\") is a high-performance web and reverse proxy server
449 created by Igor Sysoev. It can be used both as a stand-alone web server
450 and as a proxy to reduce the load on back-end HTTP or mail servers.")
451 ;; Almost all of nginx is distributed under the bsd-2 license.
452 ;; The exceptions are:
453 ;; * The 'nginx-http-push' module is covered by the expat license.
454 ;; * The 'nginx-development-kit' module is mostly covered by bsd-3,
455 ;; except for two source files which are bsd-4 licensed.
456 (license (list license:bsd-2 license:expat license:bsd-3 license:bsd-4))))
458 (define-public nginx-documentation
459 ;; This documentation should be relevant for the current nginx package.
460 (let ((version "1.19.8")
462 (changeset "4398fd0f0341"))
464 (name "nginx-documentation")
465 (version (simple-format #f "~A-~A-~A" version revision changeset))
467 (origin (method hg-fetch)
469 (url "http://hg.nginx.org/nginx.org")
470 (changeset changeset)))
471 (file-name (string-append name "-" version))
474 "1pds76h19fadmymyr6pnfh72ql6vizpv2628lqcrpqhxgwa6hcbg"))))
475 (build-system gnu-build-system)
477 '(#:tests? #f ; no test suite
479 (modify-phases %standard-phases
480 (delete 'configure) ; no configure script
482 (lambda* (#:key outputs #:allow-other-keys)
483 (let ((output (assoc-ref outputs "out")))
484 (substitute* "umasked.sh"
485 ((" /bin/sh") (string-append " " (which "sh"))))
486 ;; The documentation includes a banner, which makes sense on
487 ;; the NGinx website, but doesn't make much sense when
488 ;; viewing locally. Therefore, modify the CSS to remove the
490 (substitute* "xslt/style.xslt"
491 (("#banner \\{ background: black;")
492 "#banner { display: none;"))
496 (lambda* (#:key outputs #:allow-other-keys)
497 (let ((output (assoc-ref outputs "out")))
499 (copy-recursively "libxslt" output)
502 `(("libxml2" ,libxml2)
504 ("nginx-xslscript" ,nginx-xslscript)))
505 (home-page "https://nginx.org")
506 (synopsis "Documentation for the nginx web server")
508 "This package provides HTML documentation for the nginx web server.")
509 (license license:bsd-2))))
511 (define-public nginx-accept-language-module
512 ;; Upstream has never made a release; use current commit instead.
513 (let ((commit "2f69842f83dac77f7d98b41a2b31b13b87aeaba7")
516 (name "nginx-accept-language-module")
517 (version (git-version "0.0.0" ;upstream has no version number
523 (url "https://github.com/giom/nginx_accept_language_module")
525 (file-name (git-file-name name version))
527 (base32 "1hjysrl15kh5233w7apq298cc2bp4q1z5mvaqcka9pdl90m0vhbw"))))
528 (build-system gnu-build-system)
529 (inputs `(("openssl" ,openssl)
531 ("nginx-sources" ,(package-source nginx))
534 `(#:tests? #f ; no test target
535 #:make-flags (list "modules")
536 #:modules ((guix build utils)
537 (guix build gnu-build-system)
540 (ice-9 textual-ports))
542 (modify-phases %standard-phases
543 (add-after 'unpack 'unpack-nginx-sources
544 (lambda* (#:key inputs native-inputs #:allow-other-keys)
546 ;; The nginx source code is part of the module’s source.
547 (format #t "decompressing nginx source code~%")
548 (let ((tar (assoc-ref inputs "tar"))
549 (nginx-srcs (assoc-ref inputs "nginx-sources")))
550 (invoke (string-append tar "/bin/tar")
551 "xvf" nginx-srcs "--strip-components=1"))
553 (add-after 'unpack 'convert-to-dynamic-module
556 (with-atomic-file-replacement "config"
558 ;; cf. https://www.nginx.com/resources/wiki/extending/new_config/
559 (format out "ngx_module_type=HTTP~%")
560 (format out "ngx_module_name=\
561 ngx_http_accept_language_module~%")
562 (let* ((str (get-string-all in))
564 "NGX_ADDON_SRCS=\"\\$NGX_ADDON_SRCS (.*)\""))
565 (m (regexp-exec rx str))
566 (srcs (match:substring m 1)))
567 (format out (string-append "ngx_module_srcs=\""
569 (format out ". auto/module~%")
570 (format out "ngx_addon_name=$ngx_module_name~%"))))))
571 (add-before 'configure 'patch-/bin/sh
573 (substitute* "auto/feature"
574 (("/bin/sh") (which "sh")))
577 ;; This phase is largely copied from the nginx package.
578 (lambda* (#:key outputs #:allow-other-keys)
580 (list ;; A copy of nginx’ flags follows, otherwise we
581 ;; get a binary compatibility error. FIXME: Code
582 ;; duplication is bad.
583 (string-append "--prefix=" (assoc-ref outputs "out"))
584 "--with-http_ssl_module"
585 "--with-http_v2_module"
588 ;; Even when not cross-building, we pass the
589 ;; --crossbuild option to avoid customizing for the
590 ;; kernel version on the build machine.
591 ,(let ((system "Linux") ; uname -s
592 (release "3.2.0") ; uname -r
594 (machine (match (or (%current-target-system)
596 ("x86_64-linux" "x86_64")
597 ("i686-linux" "i686")
598 ("mips64el-linux" "mips64")
599 ;; Prevent errors when querying
600 ;; this package on unsupported
601 ;; platforms, e.g. when running
602 ;; "guix package --search="
604 (string-append "--crossbuild="
605 system ":" release ":" machine))
606 ;; The following are the args decribed on
607 ;; <https://www.nginx.com/blog/compiling-dynamic-modules-nginx-plus>.
608 ;; Enabling --with-compat here and in the nginx package
609 ;; would ensure binary compatibility even when using
610 ;; different configure options from the main nginx
611 ;; package. This is not needed for Guix.
613 "--add-dynamic-module=.")))
615 (format #t "environment variable `CC' set to `gcc'~%")
616 (format #t "configure flags: ~s~%" flags)
617 (apply invoke "./configure" flags)
620 (lambda* (#:key outputs #:allow-other-keys)
621 (let* ((out (assoc-ref outputs "out"))
622 (modules-dir (string-append out "/etc/nginx/modules"))
623 (doc-dir (string-append
624 out "/share/doc/nginx-accept-language-module")))
625 (mkdir-p modules-dir)
626 (copy-file "objs/ngx_http_accept_language_module.so"
628 modules-dir "/ngx_http_accept_language_module.so"))
630 (copy-file "README.textile"
631 (string-append doc-dir "/README.textile"))
634 "https://www.nginx.com/resources/wiki/modules/accept_language/")
635 (synopsis "Nginx module for parsing the Accept-Language HTTP header")
637 "This nginx module parses the Accept-Language field in HTTP headers and
638 chooses the most suitable locale for the user from the list of locales
639 supported at your website.")
640 (license (delete-duplicates
641 (cons license:bsd-2 ;license of nginx-accept-language-module
642 ;; The module’s code is linked statically with nginx,
643 ;; therefore nginx’ other licenses may also apply to its
645 (package-license nginx)))))))
647 (define nginx-xslscript
649 (changeset "01dc9ba12e1b"))
651 (name "nginx-xslscript")
653 (simple-format #f "2014-03-31-~A-~A" revision changeset))
657 (url "http://hg.nginx.org/xslscript")
658 (changeset changeset)))
659 (file-name (string-append name "-" version))
662 "0am8zvdx3jmiwkg5q07qjaw5r26r4i2v5i4yr8a1k0jgib6ii08g"))))
663 (build-system gnu-build-system)
665 '(#:tests? #f ; No test suite
667 (modify-phases %standard-phases
671 (lambda* (#:key outputs #:allow-other-keys)
672 (let ((out-bin (string-append
673 (assoc-ref outputs "out")
676 (copy-file "xslscript.pl"
681 (home-page "http://hg.nginx.org/xslscript")
682 (synopsis "XSLScript with NGinx specific modifications")
684 "XSLScript is a terse notation for writing complex XSLT stylesheets.
685 This is modified version, specifically intended for use with the NGinx
687 (license license:bsd-2))))
689 (define nginx-socket-cloexec
692 (name "nginx-socket-cloexec") ;required for lua-resty-shell
695 (inherit (package-source nginx))
696 (patches (append (search-patches "nginx-socket-cloexec.patch")
697 (origin-patches (package-source nginx))))))))
699 (define-public nginx-lua-module
702 (name "nginx-lua-module")
708 (url "https://github.com/openresty/lua-nginx-module")
709 (commit (string-append "v" version))))
710 (file-name (git-file-name "lua-nginx-module" version))
712 (base32 "0nwcbqm1visg1dkxav7qa16w0d0n8cgqn4881xiqn88xfkxj0dyg"))))
713 (build-system gnu-build-system)
715 `(("nginx-sources" ,(package-source nginx-socket-cloexec))
717 ,@(package-inputs nginx)))
719 (substitute-keyword-arguments
720 `(#:configure-flags '("--add-dynamic-module=.")
721 #:make-flags '("modules")
722 #:modules ((guix build utils)
723 (guix build gnu-build-system)
726 (ice-9 textual-ports))
727 ,@(package-arguments nginx))
729 `(modify-phases ,phases
730 (add-after 'unpack 'unpack-nginx-sources
731 (lambda* (#:key inputs native-inputs #:allow-other-keys)
733 ;; The nginx source code is part of the module’s source.
734 (format #t "decompressing nginx source code~%")
735 (let ((tar (assoc-ref inputs "tar"))
736 (nginx-srcs (assoc-ref inputs "nginx-sources")))
737 (invoke (string-append tar "/bin/tar")
738 "xvf" nginx-srcs "--strip-components=1"))
740 (add-before 'configure 'set-luajit-env
741 (lambda* (#:key inputs #:allow-other-keys)
742 (let ((luajit (assoc-ref inputs "luajit")))
744 (string-append luajit "/lib"))
746 (string-append luajit "/include/luajit-2.1"))
749 (lambda* (#:key outputs #:allow-other-keys)
750 (let ((modules-dir (string-append (assoc-ref outputs "out")
751 "/etc/nginx/modules")))
752 (install-file "objs/ngx_http_lua_module.so" modules-dir)
754 (delete 'fix-root-dirs)
755 (delete 'install-man-page)))))
756 (synopsis "NGINX module for Lua programming language support")
757 (description "This NGINX module provides a scripting support with Lua
758 programming language.")))
760 (define-public lighttpd
766 (uri (string-append "https://download.lighttpd.net/lighttpd/"
767 "releases-" (version-major+minor version) ".x/"
768 "lighttpd-" version ".tar.xz"))
771 "1mc421yrbnq3k6yrc708svp0fgcamrn5a0p2nvnhivysffr3v5gv"))))
772 (build-system gnu-build-system)
783 (modify-phases %standard-phases
784 (add-after 'unpack 'embed-/bin/sh-reference
786 (substitute* "src/mod_ssi.c"
787 (("/bin/sh") (which "sh")))
789 (add-after 'unpack 'fix-tests
791 (setenv "SHELL" (which "sh"))
792 ;; gethostbyaddr fails
793 (substitute* "tests/LightyTest.pm"
794 (("\\{HOSTNAME\\} = \\$name;")
795 "{HOSTNAME} = \"127.0.0.1\";"))
798 `(("cyrus-sasl" ,cyrus-sasl)
800 ("libunwind" ,libunwind)
801 ("linux-pam" ,linux-pam)
802 ("mit-krb5" ,mit-krb5)
803 ("openldap" ,openldap)
806 ("pcre:bin" ,pcre "bin")
809 `(("perl" ,perl) ; for tests
810 ("pkg-config" ,pkg-config)
812 (home-page "https://www.lighttpd.net/")
813 (synopsis "Lightweight HTTP and reverse proxy server")
815 "Lighttpd is a secure, fast, compliant, and very flexible web-server that
816 has been optimized for high-performance environments. It has a very low
817 memory footprint compared to other webservers. Its features include FastCGI,
818 CGI, authentication, output compression, URL rewriting and many more.")
819 (license license:bsd-3)))
828 ;; Upstream has disappeared.
830 (url "https://github.com/FastCGI-Archives/fcgi2")
832 (file-name (git-file-name name version))
834 (base32 "1jhz6jfwv5kawa8kajvg18nfwc1b30f38zc0lggszd1vcmrwqkz1"))))
835 (build-system gnu-build-system)
836 ;; Parallel building is not supported.
837 (arguments `(#:parallel-build? #f))
839 `(("autoconf" ,autoconf)
840 ("automake" ,automake)
841 ("libtool" ,libtool)))
842 ;; This is an archived fork of the original home page, www.fastcgi.com.
843 (home-page "https://fastcgi-archives.github.io/")
844 (synopsis "Language-independent, high-performant extension to CGI")
845 (description "FastCGI is a language-independent, scalable extension to CGI
846 that provides high performance without the limitations of server specific
848 ;; This package is released under the Open Market License, a variant of
849 ;; the Expat license, incompatible with the GPL.
850 (license (license:non-copyleft "file://LICENSE.TERMS"))))
852 (define-public fcgiwrap
860 (url "https://github.com/gnosek/fcgiwrap")
862 (file-name (git-file-name name version))
864 (base32 "1ryw66h9aazi83amk8l7ha8k5g0c7qvk5g6jv376a1ws9xk2qw6f"))))
865 (build-system gnu-build-system)
867 `(#:tests? #f ; no tests included
868 #:make-flags (list "CC=gcc")
870 (modify-phases %standard-phases
871 (add-after 'unpack 'fix-CFLAGS
872 ;; Remove broken options unconditionally added to CFLAGS.
874 (substitute* "configure.ac"
878 `(("autoconf" ,autoconf)
879 ("automake" ,automake)
880 ("pkg-config" ,pkg-config)))
883 (home-page "https://nginx.localdomain.pl/wiki/FcgiWrap")
884 (synopsis "Simple server for running CGI applications over FastCGI")
885 (description "Fcgiwrap is a simple server for running CGI applications
886 over FastCGI. It hopes to provide clean CGI support to Nginx (and other web
887 servers that may need it).")
888 (license license:expat)))
890 (define-public starman
897 (uri (string-append "mirror://cpan/authors/id/M/MI/MIYAGAWA/"
898 "Starman-" version ".tar.gz"))
900 (base32 "1y1kn4929k299fbf6sw9lxcsdlq9fvq777p6yrzk591rr9xhkx8h"))))
901 (build-system perl-build-system)
903 `(("perl-libwww" ,perl-libwww)
904 ("perl-module-build-tiny" ,perl-module-build-tiny)
905 ("perl-test-requires" ,perl-test-requires)))
907 `(("perl-data-dump" ,perl-data-dump)
908 ("perl-http-date" ,perl-http-date)
909 ("perl-http-message" ,perl-http-message)
910 ("perl-http-parser-xs" ,perl-http-parser-xs)
911 ("perl-net-server" ,perl-net-server)
912 ("perl-plack" ,perl-plack)
913 ("perl-test-tcp" ,perl-test-tcp)))
914 (home-page "https://metacpan.org/release/Starman")
915 (synopsis "PSGI/Plack web server")
916 (description "Starman is a PSGI perl web server that has unique features
917 such as high performance, preforking, signal support, superdaemon awareness,
918 and UNIX socket support.")
919 (license license:perl-license)))
921 (define-public icedtea-web
928 "http://icedtea.wildebeest.org/download/source/"
929 name "-" version ".tar.gz"))
932 "004kwrngyxxlrlzby4vzxjr0xcyngcdc9dfgnvi61ffnjr006ryf"))))
933 (build-system gnu-build-system)
936 (list "--disable-plugin" ;NPAPI plugins are obsolete nowadays.
937 (string-append "BIN_BASH=" (assoc-ref %build-inputs "bash")
939 (string-append "--with-jdk-home=" (assoc-ref %build-inputs "jdk")))))
940 (outputs '("out" "doc"))
942 `(("pkg-config" ,pkg-config)
946 ("jdk" ,icedtea "jdk")))
947 (home-page "http://icedtea.classpath.org/wiki/IcedTea-Web")
948 (synopsis "Java Web Start")
950 "IcedTea-Web is an implementation of the @dfn{Java Network Launching
951 Protocol}, also known as Java Web Start. This package provides tools and
952 libraries for working with JNLP applets.")
953 ;; The program is mainly GPL2+, with some individual files under LGPL2.1+
955 (license license:gpl2+)))
957 (define-public jansson
964 (string-append "http://www.digip.org/jansson/releases/jansson-"
968 "1lp1mv8pjp5yziws66cy0dhpcam4bbjqhffk13v4vgdybp674pb4"))))
969 (build-system gnu-build-system)
971 `(#:configure-flags '("--disable-static")))
972 (home-page "http://www.digip.org/jansson/")
973 (synopsis "JSON C library")
975 "Jansson is a C library for encoding, decoding and manipulating JSON
977 (license license:expat)))
979 (define-public json-c
986 "https://s3.amazonaws.com/json-c_releases/releases/json-c-"
990 "0w381krr99q5a2rypx4g437fa7gzgl82i64sgnrs6g5jr44dwxxk"))
991 (patches (search-patches "json-c-CVE-2020-12762.patch"))))
992 (build-system cmake-build-system)
993 (home-page "https://github.com/json-c/json-c/wiki")
994 (synopsis "JSON implementation in C")
996 "JSON-C implements a reference counting object model that allows you to
997 easily construct JSON objects in C, output them as JSON-formatted strings and
998 parse JSON-formatted strings back into the C representation of JSON objects.
999 It aims to conform to RFC 7159.")
1000 (license license:x11)))
1002 ;; TODO: Remove these old versions when all dependents have been updated.
1003 (define-public json-c-0.13
1010 "https://s3.amazonaws.com/json-c_releases/releases/json-c-"
1013 (base32 "0ws8dz9nk8q2c0gbf66kg2r6mrkl7kamd3gpdv9zsyrz9n6n0zmq"))
1014 (patches (search-patches "json-c-0.13-CVE-2020-12762.patch"))
1015 (modules '((guix build utils)))
1018 ;; Somehow 'config.h.in' is older than
1019 ;; 'aclocal.m4', which would trigger a rule to
1020 ;; run 'autoheader'.
1021 (set-file-time "config.h.in"
1022 (stat "aclocal.m4"))
1024 (build-system gnu-build-system)))
1026 (define-public json-c-0.12
1028 (inherit json-c-0.13)
1033 "https://s3.amazonaws.com/json-c_releases/releases/json-c-"
1036 (base32 "08qibrq29a5v7g23wi5icy6l4fbfw90h9ccps6vq0bcklx8n84ra"))
1037 (patches (search-patches "json-c-0.12-CVE-2020-12762.patch"))
1038 (modules '((guix build utils)))
1041 ;; Somehow 'config.h.in' is older than
1042 ;; 'aclocal.m4', which would trigger a rule to
1043 ;; run 'autoheader'.
1044 (set-file-time "config.h.in"
1045 (stat "aclocal.m4"))
1047 ;; Don't try to build with -Werror.
1048 (substitute* (find-files "." "Makefile\\.in")
1052 (define-public json-parser
1054 (name "json-parser")
1057 ;; do not use auto-generated tarballs
1060 (url "https://github.com/udp/json-parser")
1061 (commit (string-append "v" version))))
1062 (file-name (git-file-name name version))
1065 "1ls7z4fx0sq633s5bc0j1gh36sv087gmrgr7rza22wjq2d4606yf"))))
1066 ;; FIXME: we should build the python bindings in a separate package
1067 (build-system gnu-build-system)
1068 ;; the tests are written for the python bindings which are not built here
1069 (arguments '(#:tests? #f))
1070 (home-page "https://github.com/udp/json-parser")
1071 (synopsis "JSON parser written in ANSI C")
1072 (description "This package provides a very low footprint JSON parser
1073 written in portable ANSI C.
1076 @item BSD licensed with no dependencies (i.e. just drop the C file into your
1078 @item Never recurses or allocates more memory than it needs
1079 @item Very simple API with operator sugar for C++
1081 (license license:bsd-2)))
1083 (define-public qjson
1090 (url "https://github.com/flavio/qjson")
1092 (file-name (git-file-name name version))
1095 "1f4wnxzx0qdmxzc7hqk28m0sva7z9p9xmxm6aifvjlp0ha6pmfxs"))))
1096 (build-system cmake-build-system)
1098 ;; The tests require a running X server.
1099 `(#:configure-flags '("-DQJSON_BUILD_TESTS=ON"
1100 "-DCMAKE_CXX_FLAGS=-std=gnu++11 -fPIC")
1102 (modify-phases %standard-phases
1103 (add-after 'unpack 'disable-broken-test
1105 ;; FIXME: One test fails. See
1106 ;; https://github.com/flavio/qjson/issues/105
1107 (substitute* "tests/scanner/testscanner.cpp"
1108 (("QTest::newRow\\(\"too large exponential\"\\)" line)
1109 (string-append "//" line)))
1111 (add-before 'check 'render-offscreen
1112 (lambda _ (setenv "QT_QPA_PLATFORM" "offscreen") #t)))))
1114 `(("qtbase" ,qtbase)))
1115 (home-page "http://qjson.sourceforge.net")
1116 (synopsis "Library that maps JSON data to QVariant objects")
1117 (description "QJson is a Qt-based library that maps JSON data to
1118 @code{QVariant} objects. JSON arrays will be mapped to @code{QVariantList}
1119 instances, while JSON's objects will be mapped to @code{QVariantMap}.")
1120 ;; Only version 2.1 of the license
1121 (license license:lgpl2.1)))
1123 (define-public qoauth
1130 (url "https://github.com/ayoy/qoauth")
1131 (commit (string-append "v" version))))
1132 (file-name (git-file-name name version))
1135 "1b2jdqs526ac635yb2whm049spcsk7almnnr6r5b4yqhq922anw3"))))
1136 (build-system gnu-build-system)
1139 ("qtbase" ,qtbase)))
1141 '(#:tests? #f ;FIXME: some tests are failing
1143 (modify-phases %standard-phases
1144 (add-after 'unpack 'patch-code
1146 (make-file-writable "src/qoauth.pc")
1147 (substitute* "src/src.pro"
1148 (("/lib64") "/lib"))
1150 (add-after 'unpack 'adjust-mkspecs-directory
1151 (lambda* (#:key outputs #:allow-other-keys)
1152 (substitute* "src/src.pro"
1153 ;; Do not attempt to install the .prf file into qtbase
1154 ;; "lib/qt5/mkspecs/features", ref <https://bugs.gnu.org/45031>.
1155 (("\\$\\$\\[QMAKE_MKSPECS\\]")
1156 (string-append (assoc-ref outputs "out") "/lib/qt5/mkspecs")))
1159 (lambda* (#:key inputs #:allow-other-keys)
1160 (let ((qca (assoc-ref inputs "qca")))
1163 (string-append "PREFIX=" (assoc-ref %outputs "out"))
1164 (string-append "QMAKE_INCDIR+=" qca "/include/Qca-qt5/QtCrypto")
1165 (string-append "LIBS+=-L" qca "/lib")
1166 (string-append "LIBS+=-lqca-qt5"))))))))
1167 (home-page "https://github.com/ayoy/qoauth")
1168 (synopsis "Qt-based C++ library for OAuth authorization scheme")
1169 (description "QOAuth is an attempt to support interaction with
1170 OAuth-powered network services in a Qt way, i.e. simply, clearly and
1171 efficiently. It gives the application developer no more than 4 methods.")
1172 (license license:lgpl2.1+)))
1174 (define-public krona-tools
1176 (name "krona-tools")
1181 "https://github.com/marbl/Krona/releases/download/v"
1182 version "/KronaTools-" version ".tar"))
1185 "0wvgllcqscsfb4xc09y3fqhx8i38pmr4w55vjs5y79wx56n710iq"))))
1186 (build-system perl-build-system)
1189 (modify-phases %standard-phases
1190 ;; There is no configure or build steps.
1193 ;; Install script "install.pl" expects the build directory to remain
1194 ;; after installation, creating symlinks etc., so re-implement it
1197 (lambda* (#:key outputs #:allow-other-keys)
1198 (let ((bin (string-append (assoc-ref outputs "out") "/bin"))
1199 (perl (string-append (assoc-ref outputs "out")
1200 "/lib/perl5/site_perl/krona-tools/lib")))
1204 (let* ((executable (string-append "scripts/" script ".pl")))
1205 ;; Prefix executables with 'kt' as install script does.
1206 (copy-file executable (string-append bin "/kt" script))))
1208 "GetContigMagnitudes"
1218 "ImportMETAREP-BLAST"
1223 "ImportRDPComparison"
1229 (copy-recursively directory
1230 (string-append perl "/../" directory)))
1231 (list "data" "img" "taxonomy" "src"))
1232 (install-file "lib/KronaTools.pm" perl))))
1233 (add-after 'install 'wrap-program
1234 (lambda* (#:key inputs outputs #:allow-other-keys)
1235 (let* ((out (assoc-ref outputs "out"))
1236 (path (getenv "PERL5LIB")))
1238 (lambda (executable)
1239 (wrap-program executable
1240 `("PERL5LIB" ":" prefix
1241 (,(string-append out "/lib/perl5/site_perl/krona-tools/lib")))))
1242 (find-files (string-append out "/bin/") ".*")))))
1244 (add-after 'wrap-program 'check
1245 (lambda* (#:key inputs outputs #:allow-other-keys)
1246 (with-directory-excursion "data"
1247 (invoke (string-append (assoc-ref outputs "out") "/bin/ktImportText")
1251 (home-page "https://github.com/marbl/Krona/wiki")
1252 (synopsis "Hierarchical data exploration with zoomable HTML5 pie charts")
1254 "Krona is a flexible tool for exploring the relative proportions of
1255 hierarchical data, such as metagenomic classifications, using a radial,
1256 space-filling display. It is implemented using HTML5 and JavaScript, allowing
1257 charts to be explored locally or served over the Internet, requiring only a
1258 current version of any major web browser.")
1259 (license license:bsd-3)))
1261 (define-public rapidjson
1268 (url "https://github.com/Tencent/rapidjson")
1269 (commit (string-append "v" version))))
1270 (file-name (git-file-name name version))
1273 "1jixgb8w97l9gdh3inihz7avz7i770gy2j2irvvlyrq3wi41f5ab"))
1274 (patches (search-patches "rapidjson-gcc-compat.patch"))
1275 (modules '((guix build utils)))
1278 ;; Remove code using the problematic JSON license (see
1279 ;; <https://www.gnu.org/licenses/license-list.html#JSON>).
1280 (delete-file-recursively "bin/jsonchecker")
1282 (build-system cmake-build-system)
1284 (if (string-prefix? "aarch64" (or (%current-target-system)
1287 (modify-phases %standard-phases
1288 (add-after 'unpack 'patch-aarch-march-detection
1290 (substitute* (find-files "." "^CMakeLists\\.txt$")
1291 (("native") "armv8-a"))
1293 ;; Disable CPU optimization for reproducibility.
1294 '(#:configure-flags '("-DRAPIDJSON_ENABLE_INSTRUMENTATION_OPT=OFF"))))
1295 (home-page "https://github.com/Tencent/rapidjson")
1296 (synopsis "JSON parser/generator for C++ with both SAX/DOM style API")
1298 "RapidJSON is a fast JSON parser/generator for C++ with both SAX/DOM
1300 (license license:expat)))
1302 (define-public libyajl
1309 (url "https://github.com/lloyd/yajl")
1311 (file-name (git-file-name name version))
1314 "00yj06drb6izcxfxfqlhimlrb089kka0w0x8k27pyzyiq7qzcvml"))))
1315 (build-system cmake-build-system)
1318 (modify-phases %standard-phases
1319 (add-after 'patch-source-shebangs 'patch-tests
1321 (substitute* "test/parsing/run_tests.sh"
1322 (("`which echo`") (which "echo")))
1324 (home-page "https://lloyd.github.io/yajl/")
1325 (synopsis "C library for parsing JSON")
1327 "Yet Another JSON Library (YAJL) is a small event-driven (SAX-style) JSON
1328 parser written in ANSI C and a small validating JSON generator.")
1329 (license license:isc)))
1331 (define-public libwebsockets
1333 (name "libwebsockets")
1336 ;; The project does not publish tarballs, so we have to take
1340 (url "https://github.com/warmcat/libwebsockets")
1341 (commit (string-append "v" version
1342 "-chrome37-firefox30"))))
1345 "12fqh2d2098mgf0ls19p9lzibpsqhv7mc5rn1yvrbfnazmcr40g4"))
1346 (file-name (string-append name "-" version))))
1348 (build-system cmake-build-system)
1350 ;; XXX: The thing lacks a 'make test' target, because CMakeLists.txt
1351 ;; doesn't use 'add_test', and it's unclear how to run the test suite.
1354 (native-inputs `(("perl" ,perl))) ; to build the HTML doc
1355 (inputs `(("zlib" ,zlib)
1356 ("openssl" ,openssl)))
1357 (synopsis "WebSockets library written in C")
1359 "Libwebsockets is a library that allows C programs to establish client
1360 and server WebSockets connections---a protocol layered above HTTP that allows
1361 for efficient socket-like bidirectional reliable communication channels.")
1362 (home-page "https://libwebsockets.org")
1364 ;; This is LGPLv2.1-only with extra exceptions specified in 'LICENSE'.
1365 (license license:lgpl2.1)))
1375 (url "https://github.com/WebAssembly/wabt")
1377 (file-name (git-file-name name version))
1379 (base32 "1zlv3740wkqj4mn6sr84h0x6wk2lcp4pwwmqsh5yyqp1j1glbsa0"))))
1380 (build-system cmake-build-system)
1382 `(#:configure-flags '("-DBUILD_TESTS=OFF")
1384 (inputs `(("python" ,python-2)
1386 (home-page "https://github.com/WebAssembly/wabt")
1387 (synopsis "WebAssembly Binary Toolkit")
1388 (description "WABT (pronounced: wabbit) is a suite of tools for
1389 WebAssembly, including:
1392 @item @command{wat2wasm} translates from WebAssembly text format to the
1393 WebAssembly binary format
1394 @item @command{wasm2wat} is the inverse; it translates from the binary format
1395 back to the text format (also known as a .wat)
1396 @item @command{wasm-objdump} prints information about a wasm binary, similarly
1397 to @command{objdump}.
1398 @item @command{wasm-interp} decodes ands run a WebAssembly binary file using a
1399 stack-based interpreter
1400 @item @command{wat-desugar} parses .wat text form as supported by the spec
1401 interpreter (s-expressions, flat syntax, or mixed) and prints the canonical
1403 @item @command{wasm2c} converts a WebAssembly binary file to a C source and
1407 These tools are intended for use in (or for development of) toolchains or
1408 other systems that want to manipulate WebAssembly files.")
1409 (license license:asl2.0)))
1411 (define-public websocketpp
1413 (name "websocketpp")
1419 (url "https://github.com/zaphoyd/websocketpp")
1421 (file-name (git-file-name name version))
1423 (base32 "1ww4fhl8qf12hkv6jaild8zzsygdspxm1gqpk2f63gv1xfi31wpm"))
1424 (patches (search-patches "websocketpp-fix-for-cmake-3.15.patch"))))
1425 (build-system cmake-build-system)
1426 (inputs `(("boost" ,boost)
1427 ("openssl" ,openssl)))
1428 (arguments '(#:configure-flags '("-DBUILD_TESTS=ON")
1430 (modify-phases %standard-phases
1431 (add-after 'install 'remove-tests
1432 (lambda* (#:key outputs #:allow-other-keys)
1433 (let* ((install-dir (assoc-ref outputs "out"))
1434 (bin-dir (string-append install-dir "/bin")))
1435 (delete-file-recursively bin-dir)
1437 (home-page "https://www.zaphoyd.com/websocketpp/")
1438 (synopsis "C++ library implementing the WebSocket protocol")
1439 (description "WebSocket++ is a C++ library that can be used to implement
1440 WebSocket functionality. The goals of the project are to provide a WebSocket
1441 implementation that is simple, portable, flexible, lightweight, low level, and
1443 (license license:bsd-3)))
1445 (define-public wslay
1453 (url "https://github.com/tatsuhiro-t/wslay")
1454 (commit (string-append "release-" version))))
1455 (file-name (git-file-name name version))
1457 (base32 "1w32iljg4inqf0712w5fxxhggvmjh6ipl2lnz0h36dv1xrj0d964"))))
1458 (build-system gnu-build-system)
1460 ;; Parallel builds don't reliably succeed.
1461 `(#:parallel-build? #f))
1463 `(("autoconf" ,autoconf)
1464 ("automake" ,automake)
1465 ("cunit" ,cunit) ; for tests
1466 ("libtool" ,libtool)
1467 ("pkg-config" ,pkg-config)
1468 ("python-sphinx" ,python-sphinx)))
1469 (home-page "https://tatsuhiro-t.github.io/wslay/")
1470 (synopsis "C WebSocket library")
1471 (description "@code{Wslay} is an event-based C library for the WebSocket
1472 protocol version 13, described in RFC 6455. Besides a high-level API it
1473 provides callbacks for sending and receiving frames directly. @code{Wslay}
1474 only supports the data transfer part of WebSocket protocol and does not
1475 perform the opening handshake in HTTP.")
1476 (license license:expat)))
1478 (define-public libpsl
1484 (uri (string-append "https://github.com/rockdaboot/libpsl/"
1485 "releases/download/" version
1486 "/libpsl-" version ".tar.gz"))
1489 "0k0d46bbh1jj2ll369f134vciplrzbqkg7fv9m62bl6lzghy2v5c"))))
1490 (build-system gnu-build-system)
1492 `(("pkg-config" ,pkg-config)
1495 ("python" ,python-wrapper)))
1497 `(("libidn2" ,libidn2)
1498 ("libunistring" ,libunistring)))
1499 (home-page "https://github.com/rockdaboot/libpsl")
1500 (synopsis "C library for the Publix Suffix List")
1502 "A \"public suffix\" is a domain name under which Internet users can
1503 directly register own names.
1505 Browsers and other web clients can use it to avoid privacy-leaking
1506 \"supercookies\", avoid privacy-leaking \"super domain\" certificates, domain
1507 highlighting parts of the domain in a user interface, and sorting domain lists
1510 Libpsl has built-in PSL data for fast access, allowing to load PSL data from
1511 files, checks if a given domain is a public suffix, provides immediate cookie
1512 domain verification, finds the longest public part of a given domain, finds
1513 the shortest private part of a given domain, works with international
1514 domains (UTF-8 and IDNA2008 Punycode), is thread-safe, and handles IDNA2008
1516 (license license:x11)))
1521 (version "20091223")
1526 ":pserver:anonymous@tidy.cvs.sourceforge.net:/cvsroot/tidy")
1528 (revision "2009-12-23")))
1529 (file-name (string-append name "-" version "-checkout"))
1532 "14dsnmirjcrvwsffqp3as70qr6bbfaig2fv3zvs5g7005jrsbvpb"))
1533 (patches (search-patches "tidy-CVE-2015-5522+5523.patch"))))
1534 (build-system gnu-build-system)
1536 '(#:phases (modify-phases %standard-phases
1538 (lambda* (#:key inputs #:allow-other-keys)
1539 ;; configure.in and Makefile.am aren't in the root of the
1541 (copy-recursively "build/gnuauto" ".")
1542 (setenv "AUTOMAKE" "automake --foreign")
1543 (invoke "autoreconf" "-vfi"))))))
1545 `(("automake" ,automake)
1546 ("autoconf" ,autoconf)
1547 ("libtool" ,libtool)))
1548 (synopsis "HTML validator and tidier")
1549 (description "HTML Tidy is a command-line tool and C library that can be
1550 used to validate and fix HTML data.")
1551 (home-page "http://tidy.sourceforge.net/")
1552 (license (license:x11-style "file:///include/tidy.h"))))
1554 (define-public esbuild
1562 (url "https://github.com/evanw/esbuild")
1563 (commit (string-append "v" version))))
1564 (file-name (git-file-name name version))
1566 (base32 "1j4qza2chng3az1h1fh9zbhxh99q7bfrqbgppyyq5947svi8fvaz"))
1567 (modules '((guix build utils)))
1570 ;; Remove prebuilt binaries
1571 (delete-file-recursively "npm")
1573 (build-system go-build-system)
1575 '(#:import-path "github.com/evanw/esbuild/cmd/esbuild"
1576 #:unpack-path "github.com/evanw/esbuild"
1578 (modify-phases %standard-phases
1580 (lambda* (#:key tests? unpack-path #:allow-other-keys)
1582 (with-directory-excursion (string-append "src/" unpack-path)
1583 (invoke "make" "test-go")))
1586 `(("golang.org/x/sys" ,go-golang-org-x-sys)))
1588 `(("github.com/kylelemons/godebug" ,go-github-com-kylelemons-godebug)))
1589 (home-page "https://esbuild.github.io/")
1590 (synopsis "Bundler and minifier tool for JavaScript and TypeScript")
1592 "The esbuild tool provides a unified bundler, transpiler and
1593 minifier. It packages up JavaScript and TypeScript code, along with JSON
1594 and other data, for distribution on the web.")
1595 (license license:expat)))
1597 (define-public tinyproxy
1603 (uri (string-append "https://github.com/tinyproxy/tinyproxy/"
1604 "releases/download/" version "/tinyproxy-"
1608 "10jnk6y2swld25mm47mjc0nkffyzsfysnsxwr7cs0ns1kil8ggjr"))))
1609 (build-system gnu-build-system)
1613 ;; For the log file, etc.
1614 "--localstatedir=/var")
1616 (modify-phases %standard-phases
1617 (add-before 'build 'pre-build
1618 (lambda* (#:key inputs #:allow-other-keys #:rest args)
1619 ;; Uncommenting the next two lines may assist in debugging
1620 ;; (substitute* "docs/man5/Makefile" (("a2x") "a2x -v"))
1621 ;; (setenv "XML_DEBUG_CATALOG" "1")
1623 (home-page "https://tinyproxy.github.io/")
1624 (synopsis "Light-weight HTTP/HTTPS proxy daemon")
1625 (description "Tinyproxy is a light-weight HTTP/HTTPS proxy
1626 daemon. Designed from the ground up to be fast and yet small, it is an ideal
1627 solution for use cases such as embedded deployments where a full featured HTTP
1628 proxy is required, but the system resources for a larger proxy are
1630 (license license:gpl2+)))
1632 (define-public polipo
1640 "http://www.pps.univ-paris-diderot.fr/~jch/software/files/polipo/polipo-"
1644 "05g09sg9qkkhnc2mxldm1w1xkxzs2ylybkjzs28w8ydbjc3pand2"))))
1645 (native-inputs `(("texinfo" ,texinfo)))
1646 (build-system gnu-build-system)
1648 `(#:phases (modify-phases %standard-phases
1649 (delete 'configure))
1650 #:make-flags (let ((out (assoc-ref %outputs "out")))
1651 (list (string-append "PREFIX=" out)
1652 (string-append "LOCAL_ROOT="
1653 out "/share/polipo/www")
1655 ;; No 'check' target.
1657 (home-page "https://www.pps.univ-paris-diderot.fr/~jch/software/polipo/")
1658 (synopsis "Small caching web proxy")
1660 "Polipo is a small caching web proxy (web cache, HTTP proxy, and proxy
1661 server). It was primarily designed to be used by one person or a small group
1663 (license license:expat)))
1665 (define-public websockify
1672 (url "https://github.com/novnc/websockify")
1673 (commit (string-append "v" version))))
1674 (file-name (git-file-name name version))
1677 "0pcic8qs0gdwrfjgfaf893jyddaw97wcjm2mmvwn0xyhmy8mbmw1"))))
1678 (build-system python-build-system)
1680 `(#:tests? #f)) ; FIXME: 2 out of 6 tests fail with "ImportError: No module
1681 ; named 'stubout'". The tests can be run by replacing the check phase with
1682 ; the command "python setup.py nosetests --verbosity=3".
1683 (native-inputs `(; Required for tests:
1684 ("python-mox3" ,python-mox3)
1685 ("python-nose" ,python-nose)))
1686 (propagated-inputs `(("python-numpy" ,python-numpy)))
1687 (home-page "https://github.com/novnc/websockify")
1688 (synopsis "WebSockets support for any application/server")
1689 (description "Websockify translates WebSockets traffic to normal socket
1690 traffic. Websockify accepts the WebSockets handshake, parses it, and then
1691 begins forwarding traffic between the client and the target in both
1693 (license license:lgpl3)))
1695 (define-public wwwoffle
1701 (uri (string-append "https://www.gedanken.org.uk/software/"
1702 "wwwoffle/download/wwwoffle-"
1706 "1ihil1xq9dp21hf108khxbw6f3baq0w5c0j3af038y6lkmad4vdi"))))
1707 (build-system gnu-build-system)
1709 `(#:configure-flags '("--with-gnutls")
1710 #:tests? #f)) ; no test target
1711 (native-inputs `(("flex" ,flex)))
1712 (inputs `(("gnutls" ,gnutls)
1713 ("libcrypt" ,libgcrypt)))
1714 (home-page "https://www.gedanken.org.uk/software/wwwoffle/")
1715 (synopsis "Caching web proxy optimized for intermittent internet links")
1716 (description "WWWOFFLE is a proxy web server that is especially good for
1717 intermittent internet links. It can cache HTTP, HTTPS, FTP, and finger
1718 protocols, and supports browsing and requesting pages while offline, indexing,
1719 modifying pages and incoming and outgoing headers, monitoring pages for
1720 changes, and much more.")
1721 (license license:gpl2+)))
1723 (define-public liboauth
1729 (uri (string-append "mirror://sourceforge/liboauth/liboauth-"
1733 "07w1aq8y8wld43wmbk2q8134p3bfkp2vma78mmsfgw2jn1bh3xhd"))))
1734 (build-system gnu-build-system)
1735 (arguments '(#:configure-flags '("--enable-nss")))
1736 (native-inputs `(("pkg-config" ,pkg-config)))
1740 (home-page "https://sourceforge.net/projects/liboauth")
1741 (synopsis "C library implementing the OAuth API")
1743 "liboauth is a collection of C functions implementing the OAuth API.
1744 liboauth provides functions to escape and encode strings according to OAuth
1745 specifications and offers high-level functionality built on top to sign
1746 requests or verify signatures using either NSS or OpenSSL for calculating the
1748 ;; Source code may be distributed under either license.
1749 (license (list license:expat license:gpl2+))))
1751 (define-public libyaml
1758 (uri (string-append "https://pyyaml.org/download/libyaml/yaml-"
1762 "1x4fcw13r3lqy8ndydr3ili87wicplw2awbcv6r21qgyfndswhn6"))))
1763 (build-system gnu-build-system)
1765 '(#:configure-flags '("--disable-static")))
1766 (home-page "https://pyyaml.org/wiki/LibYAML")
1767 (synopsis "YAML 1.1 parser and emitter written in C")
1769 "LibYAML is a YAML 1.1 parser and emitter written in C.")
1770 (license license:expat)))
1772 (define-public libyaml+static
1775 (name "libyaml+static")
1777 '(#:configure-flags '("--enable-static")))))
1779 (define-public libquvi-scripts
1781 (name "libquvi-scripts")
1787 "mirror://sourceforge/quvi/" (version-major+minor version) "/"
1788 name "/" name "-" version ".tar.xz"))
1790 (base32 "0d0giry6bb57pnidymvdl7i5x9bq3ljk3g4bs294hcr5mj3cq0kw"))))
1791 (build-system gnu-build-system)
1792 (home-page "http://quvi.sourceforge.net/")
1793 (synopsis "Media stream URL parser")
1794 (description "This package contains support scripts called by libquvi to
1795 parse media stream properties.")
1796 (license license:lgpl2.1+)))
1798 (define-public libquvi
1806 "mirror://sourceforge/quvi/" (version-major+minor version) "/" name "/"
1807 name "-" version ".tar.xz"))
1809 (base32 "00x9gbmzc5cns0gnfag0hsphcr3cb33vbbb9s7ppvvd6bxz2z1mm"))))
1810 (build-system gnu-build-system)
1811 (native-inputs `(("pkg-config" ,pkg-config)))
1814 ("cyrus-sasl" ,cyrus-sasl)
1815 ("libquvi-scripts" ,libquvi-scripts)
1817 ("openssl" ,openssl)
1820 ;; Lua provides no .pc file, so add CFLAGS/LIBS manually.
1822 (let ((lua (assoc-ref %build-inputs "lua")))
1824 (string-append "liblua_CFLAGS=-I" lua "/include")
1825 (string-append "liblua_LIBS=-L" lua "/libs -llua")))))
1826 (home-page "http://quvi.sourceforge.net/")
1827 (synopsis "Media stream URL parser")
1828 (description "libquvi is a library with a C API for parsing media stream
1829 URLs and extracting their actual media files.")
1830 (license license:lgpl2.1+)))
1840 "mirror://sourceforge/" name "/" (version-major+minor version)
1841 "/" name "/" name "-" version ".tar.xz"))
1843 (base32 "09lhl6dv5zpryasx7yjslfrcdcqlsbwapvd5lg7w6sm5x5n3k8ci"))))
1844 (build-system gnu-build-system)
1845 (native-inputs `(("pkg-config" ,pkg-config)))
1848 ("libquvi" ,libquvi)))
1849 (home-page "http://quvi.sourceforge.net/")
1850 (synopsis "Media stream URL parser")
1851 (description "quvi is a command-line-tool suite to extract media files
1852 from streaming URLs. It is a command-line wrapper for the libquvi library.")
1853 (license license:lgpl2.1+)))
1862 (uri (string-append "mirror://apache/serf/serf-"
1863 version ".tar.bz2"))
1864 (patches (search-patches "serf-python3.patch"))
1866 (base32 "1k47gbgpp52049andr28y28nbwh9m36bbb0g8p0aka3pqlhjv72l"))))
1867 (build-system scons-build-system)
1870 ("apr-util" ,apr-util)
1871 ("openssl" ,openssl)))
1873 `(;; TODO: Fix build with gss.
1877 `(#:scons-flags (list (string-append "APR=" (assoc-ref %build-inputs "apr"))
1878 (string-append "APU=" (assoc-ref %build-inputs "apr-util"))
1879 (string-append "OPENSSL=" (assoc-ref %build-inputs "openssl"))
1880 ;; (string-append "GSSAPI=" (assoc-ref %build-inputs "gss"))
1881 (string-append "ZLIB=" (assoc-ref %build-inputs "zlib"))
1882 (string-append "PREFIX=" %output))
1884 (modify-phases %standard-phases
1885 (add-after 'unpack 'scons-propagate-environment
1887 ;; By design, SCons does not, by default, propagate
1888 ;; environment variables to subprocesses. See:
1889 ;; <http://comments.gmane.org/gmane.linux.distributions.nixos/4969>
1890 ;; Here, we modify the SConstruct file to arrange for
1891 ;; environment variables to be propagated.
1892 (substitute* "SConstruct"
1893 (("^env = Environment\\(")
1894 "env = Environment(ENV=os.environ, "))))
1895 (add-before 'check 'disable-broken-tests
1897 ;; These tests rely on SSL certificates that expired 2017-04-18.
1898 ;; While there are newer certs available upstream, we don't want
1899 ;; this package to suddenly "expire" some time in the future.
1900 ;; https://bugs.gnu.org/26671
1902 '("test_ssl_trust_rootca"
1903 "test_ssl_certificate_chain_with_anchor"
1904 "test_ssl_certificate_chain_all_from_server"
1905 "test_ssl_no_servercert_callback_allok"
1906 "test_ssl_large_response"
1907 "test_ssl_large_request"
1908 "test_ssl_client_certificate"
1909 "test_ssl_future_server_cert"
1910 "test_setup_ssltunnel"
1911 "test_ssltunnel_basic_auth"
1912 "test_ssltunnel_basic_auth_server_has_keepalive_off"
1913 "test_ssltunnel_basic_auth_proxy_has_keepalive_off"
1914 "test_ssltunnel_basic_auth_proxy_close_conn_on_200resp"
1915 "test_ssltunnel_digest_auth")))
1918 (substitute* "test/test_context.c"
1919 (((string-append "SUITE_ADD_TEST\\(suite, " test "\\);")) "")))
1922 (home-page "https://serf.apache.org/")
1923 (synopsis "High-performance asynchronous HTTP client library")
1925 "serf is a C-based HTTP client library built upon the Apache Portable
1926 Runtime (APR) library. It multiplexes connections, running the read/write
1927 communication asynchronously. Memory copies and transformations are kept to a
1928 minimum to provide high performance operation.")
1929 ;; Most of the code is covered by the Apache License, Version 2.0, but the
1930 ;; bundled CuTest framework uses a different non-copyleft license.
1931 (license (list license:asl2.0 (license:non-copyleft "file://test/CuTest-README.txt")))))
1933 (define-public libsass
1936 ;; When updating, check whether sassc/libsass-3.5 is still needed.
1941 (url "https://github.com/sass/libsass")
1943 (file-name (git-file-name name version))
1946 "0r8lfqvr3rjhjd8r036zd1wc9q17gyiskppcw9m13jks9an7xp4j"))))
1947 (build-system gnu-build-system)
1950 (modify-phases %standard-phases
1951 (add-before 'bootstrap 'set-LIBSASS_VERSION
1953 (setenv "LIBSASS_VERSION" ,version)
1956 `(("autoconf" ,autoconf)
1957 ("automake" ,automake)
1958 ("libtool" ,libtool)))
1959 (home-page "https://sass-lang.com/libsass")
1960 (synopsis "SASS Compiler, implemented as a C/C++ library")
1962 "LibSass is a @acronym{SASS,Syntactically awesome style sheets} compiler
1963 library designed for portability and efficiency. To actually compile SASS
1964 stylesheets, you'll need to use another program that uses this library,
1965 @var{sassc} for example.")
1966 (license license:expat)))
1968 (define-public sassc
1975 (url "https://github.com/sass/sassc")
1977 (file-name (git-file-name name version))
1980 "1sxm54mkhs9m4vnl7vn11y17mhzamc403hv3966j1c7p2rbzg5pv"))))
1981 (build-system gnu-build-system)
1985 (string-append "PREFIX=" (assoc-ref %outputs "out")))
1986 #:tests? #f ; no test suite
1988 (modify-phases %standard-phases
1989 (add-after 'unpack 'patch-Makefile
1991 (substitute* "Makefile"
1992 (("build-shared: \\$\\(RESOURCES\\) \\$\\(OBJECTS\\) \\$\\(LIB_SHARED\\)")
1993 "build-shared: $(RESOURCES) $(OBJECTS)")
1994 (("\\$\\(SASSC_EXE\\): libsass build")
1995 "$(SASSC_EXE): build")
1996 (("install: libsass-install-\\$\\(BUILD\\) \\\\")
1999 ;; This phase fails for some reason.
2001 ;; There is no configure script.
2003 (add-before 'build 'setup-environment
2005 (setenv "BUILD" "shared")
2006 (setenv "SASSC_VERSION" ,version)
2009 `(("libsass" ,libsass)))
2010 (synopsis "CSS pre-processor")
2011 (description "SassC is a compiler written in C for the CSS pre-processor
2012 language known as SASS.")
2013 (home-page "https://sass-lang.com/libsass")
2014 (license license:expat)))
2016 (define-public sassc/libsass-3.5
2017 ;; Newer libsass versions suffor from a memory leak when building (some?)
2018 ;; GTK themes <https://github.com/sass/libsass/issues/3033>.
2032 (url "https://github.com/sass/libsass")
2034 (file-name (git-file-name name version))
2037 "0830pjcvhzxh6yixj82x5k5r1xnadjqzi16kp53213icbly0r9ma"))))))))
2038 (properties '((hidden? . #t)))))
2041 (define-public perl-apache-logformat-compiler
2043 (name "perl-apache-logformat-compiler")
2048 (uri (string-append "mirror://cpan/authors/id/K/KA/KAZEBURO/"
2049 "Apache-LogFormat-Compiler-" version ".tar.gz"))
2051 (base32 "05xcl7j65vakx7x79jqjikyw0nzf60bc2w6hhc0q5sklxq1ral4l"))))
2052 (build-system perl-build-system)
2054 `(("perl-http-message" ,perl-http-message)
2055 ("perl-module-build-tiny" ,perl-module-build-tiny)
2056 ("perl-test-mocktime" ,perl-test-mocktime)
2057 ("perl-try-tiny" ,perl-try-tiny)
2058 ("perl-uri" ,perl-uri)))
2060 `(("perl-posix-strftime-compiler" ,perl-posix-strftime-compiler)))
2061 (arguments `(#:tests? #f)) ; TODO: Timezone test failures
2062 (home-page "https://metacpan.org/release/Apache-LogFormat-Compiler")
2063 (synopsis "Compile a log format string to perl-code")
2064 (description "This module provides methods to compile a log format string
2065 to perl-code, for faster generation of access_log lines.")
2066 (license license:perl-license)))
2068 (define-public perl-authen-sasl
2070 (name "perl-authen-sasl")
2075 (uri (string-append "mirror://cpan/authors/id/G/GB/GBARR/"
2076 "Authen-SASL-" version ".tar.gz"))
2079 "02afhlrdq5hh5g8b32fa79fqq5i76qzwfqqvfi9zi57h31szl536"))))
2080 (build-system perl-build-system)
2083 (modify-phases %standard-phases
2084 (add-after 'unpack 'set-env
2085 ;; Fix the build with Perl 5.26.0. Try removing this phase for later
2086 ;; versions of perl-authen-sasl.
2087 (lambda _ (setenv "PERL_USE_UNSAFE_INC" "1") #t)))))
2089 `(("perl-digest-hmac" ,perl-digest-hmac)
2090 ("perl-gssapi" ,perl-gssapi)))
2091 (home-page "https://metacpan.org/release/Authen-SASL")
2092 (synopsis "SASL authentication framework")
2093 (description "Authen::SASL provides an SASL authentication framework.")
2094 (license license:perl-license)))
2096 (define-public perl-catalyst-action-renderview
2098 (name "perl-catalyst-action-renderview")
2103 (uri (string-append "mirror://cpan/authors/id/B/BO/BOBTFISH/"
2104 "Catalyst-Action-RenderView-"
2108 "0j1rrld13cjk7ks92b5hv3xw4rfm2lvmksb4rlzd8mx0a0wj0rc5"))))
2109 (build-system perl-build-system)
2111 `(("perl-http-request-ascgi" ,perl-http-request-ascgi)
2112 ("perl-module-install" ,perl-module-install)))
2114 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2115 ("perl-data-visitor" ,perl-data-visitor)
2116 ("perl-mro-compat" ,perl-mro-compat)))
2117 (home-page "https://metacpan.org/release/Catalyst-Action-RenderView")
2118 (synopsis "Sensible default Catalyst action")
2119 (description "This Catalyst action implements a sensible default end
2120 action, which will forward to the first available view.")
2121 (license license:perl-license)))
2123 (define-public perl-catalyst-action-rest
2125 (name "perl-catalyst-action-rest")
2129 (uri (string-append "mirror://cpan/authors/id/J/JJ/JJNAPIORK/"
2130 "Catalyst-Action-REST-" version ".tar.gz"))
2133 "086bykggzalbjfk0islac4b48g9s2ypj7y81d6ns1lq0aax1py6c"))))
2134 (build-system perl-build-system)
2136 `(("perl-test-requires" ,perl-test-requires)
2137 ("perl-module-install" ,perl-module-install)))
2139 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2140 ("perl-class-inspector" ,perl-class-inspector)
2141 ("perl-config-general" ,perl-config-general)
2142 ("perl-cpanel-json-xs" ,perl-cpanel-json-xs)
2143 ("perl-libwww" ,perl-libwww)
2144 ("perl-moose" ,perl-moose)
2145 ("perl-mro-compat" ,perl-mro-compat)
2146 ("perl-namespace-autoclean" ,perl-namespace-autoclean)
2147 ("perl-params-validate" ,perl-params-validate)
2148 ("perl-uri-find" ,perl-uri-find)
2149 ("perl-xml-simple" ,perl-xml-simple)))
2150 (home-page "https://metacpan.org/release/Catalyst-Action-REST")
2151 (synopsis "Automated REST Method Dispatching")
2152 (description "This Action handles doing automatic method dispatching for
2153 REST requests. It takes a normal Catalyst action, and changes the dispatch to
2154 append an underscore and method name. First it will try dispatching to an
2155 action with the generated name, and failing that it will try to dispatch to a
2157 (license license:perl-license)))
2159 (define-public perl-catalyst-authentication-store-dbix-class
2161 (name "perl-catalyst-authentication-store-dbix-class")
2166 (uri (string-append "mirror://cpan/authors/id/I/IL/ILMARI/"
2167 "Catalyst-Authentication-Store-DBIx-Class-"
2171 "0i5ja7690fs9nhxcij6lw51j804sm8s06m5mvk1n8pi8jljrymvw"))))
2172 (build-system perl-build-system)
2174 `(("perl-catalyst-plugin-authorization-roles"
2175 ,perl-catalyst-plugin-authorization-roles)
2176 ("perl-catalyst-plugin-session-state-cookie"
2177 ,perl-catalyst-plugin-session-state-cookie)
2178 ("perl-dbd-sqlite" ,perl-dbd-sqlite)
2179 ("perl-module-install" ,perl-module-install)
2180 ("perl-test-www-mechanize-catalyst" ,perl-test-www-mechanize-catalyst)))
2182 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2183 ("perl-catalyst-plugin-authentication"
2184 ,perl-catalyst-plugin-authentication)
2185 ("perl-dbix-class" ,perl-dbix-class)
2186 ("perl-catalyst-model-dbic-schema" ,perl-catalyst-model-dbic-schema)))
2188 "https://metacpan.org/release/Catalyst-Authentication-Store-DBIx-Class")
2189 (synopsis "Storage class for Catalyst authentication using DBIx::Class")
2190 (description "The Catalyst::Authentication::Store::DBIx::Class class
2191 provides access to authentication information stored in a database via
2193 (license license:perl-license)))
2195 (define-public perl-catalyst-component-instancepercontext
2197 (name "perl-catalyst-component-instancepercontext")
2198 (version "0.001001")
2202 (uri (string-append "mirror://cpan/authors/id/G/GR/GRODITI/"
2203 "Catalyst-Component-InstancePerContext-"
2207 "0wfj4vnn2cvk6jh62amwlg050p37fcwdgrn9amcz24z6w4qgjqvz"))))
2208 (build-system perl-build-system)
2210 `(("perl-module-install" ,perl-module-install)))
2212 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2213 ("perl-moose" ,perl-moose)))
2215 "https://metacpan.org/release/Catalyst-Component-InstancePerContext")
2216 (synopsis "Create only one instance of Moose component per context")
2217 (description "Catalyst::Component::InstancePerContext returns a new
2218 instance of a component on each request.")
2219 (license license:perl-license)))
2221 (define-public perl-catalyst-devel
2223 (name "perl-catalyst-devel")
2228 (uri (string-append "mirror://cpan/authors/id/H/HA/HAARG/"
2229 "Catalyst-Devel-" version ".tar.gz"))
2231 (base32 "1r8arq7sw37d0mjyfzkc3pg1a9plgydqbscryc8qpvba4swpljls"))))
2232 (build-system perl-build-system)
2234 `(("perl-test-fatal" ,perl-test-fatal)))
2236 `(("perl-catalyst-action-renderview" ,perl-catalyst-action-renderview)
2237 ("perl-catalyst-plugin-configloader" ,perl-catalyst-plugin-configloader)
2238 ("perl-catalyst-plugin-static-simple" ,perl-catalyst-plugin-static-simple)
2239 ("perl-catalyst-runtime" ,perl-catalyst-runtime)
2240 ("perl-config-general" ,perl-config-general)
2241 ("perl-file-changenotify" ,perl-file-changenotify)
2242 ("perl-file-copy-recursive" ,perl-file-copy-recursive)
2243 ("perl-file-sharedir" ,perl-file-sharedir)
2244 ("perl-module-install" ,perl-module-install)
2245 ("perl-moose" ,perl-moose)
2246 ("perl-moosex-emulate-class-accessor-fast"
2247 ,perl-moosex-emulate-class-accessor-fast)
2248 ("perl-namespace-autoclean" ,perl-namespace-autoclean)
2249 ("perl-namespace-clean" ,perl-namespace-clean)
2250 ("perl-path-class" ,perl-path-class)
2251 ("perl-template-toolkit" ,perl-template-toolkit)))
2252 (home-page "https://metacpan.org/release/Catalyst-Devel")
2253 (synopsis "Catalyst Development Tools")
2254 (description "The Catalyst-Devel distribution includes a variety of
2255 modules useful for the development of Catalyst applications, but not required
2256 to run them. Catalyst-Devel includes the Catalyst::Helper system, which
2257 autogenerates scripts and tests; Module::Install::Catalyst, a Module::Install
2258 extension for Catalyst; and requirements for a variety of development-related
2260 (license license:perl-license)))
2262 (define-public perl-catalyst-dispatchtype-regex
2264 (name "perl-catalyst-dispatchtype-regex")
2269 (uri (string-append "mirror://cpan/authors/id/M/MG/MGRIMES/"
2270 "Catalyst-DispatchType-Regex-" version ".tar.gz"))
2273 "06jq1lmpq88rmp9zik5gqczg234xac0hiyc3l698iif7zsgcyb80"))))
2274 (build-system perl-build-system)
2276 `(("perl-module-build" ,perl-module-build) ;needs Module::Build >= 0.4004
2277 ("perl-namespace-autoclean" ,perl-namespace-autoclean)
2278 ("perl-catalyst-runtime" ,perl-catalyst-runtime)))
2280 `(("perl-moose" ,perl-moose)
2281 ("perl-text-simpletable" ,perl-text-simpletable)))
2282 (home-page "https://metacpan.org/release/Catalyst-DispatchType-Regex")
2283 (synopsis "Regex DispatchType for Catalyst")
2284 (description "Dispatch type managing path-matching behaviour using
2285 regexes. Regex dispatch types have been deprecated and removed from Catalyst
2286 core. It is recommend that you use Chained methods or other techniques
2287 instead. As part of the refactoring, the dispatch priority of Regex vs Regexp
2288 vs LocalRegex vs LocalRegexp may have changed. Priority is now influenced by
2289 when the dispatch type is first seen in your application.")
2290 (license license:perl-license)))
2292 (define-public perl-catalyst-model-dbic-schema
2294 (name "perl-catalyst-model-dbic-schema")
2299 (uri (string-append "mirror://cpan/authors/id/G/GB/GBJK/"
2300 "Catalyst-Model-DBIC-Schema-"
2304 "1spfjcjc0b9dv3k2gbanqj1m1cqzyxb32p76dhdwizzpbvpi3a96"))))
2305 (build-system perl-build-system)
2307 `(("perl-dbd-sqlite" ,perl-dbd-sqlite)
2308 ("perl-module-install" ,perl-module-install)
2309 ("perl-test-exception" ,perl-test-exception)
2310 ("perl-test-requires" ,perl-test-requires)))
2312 `(("perl-carp-clan" ,perl-carp-clan)
2313 ("perl-catalyst-component-instancepercontext"
2314 ,perl-catalyst-component-instancepercontext)
2315 ("perl-catalyst-runtime" ,perl-catalyst-runtime)
2316 ("perl-catalystx-component-traits" ,perl-catalystx-component-traits)
2317 ("perl-dbix-class" ,perl-dbix-class)
2318 ("perl-dbix-class-cursor-cached" ,perl-dbix-class-cursor-cached)
2319 ("perl-dbix-class-schema-loader" ,perl-dbix-class-schema-loader)
2320 ("perl-hash-merge" ,perl-hash-merge)
2321 ("perl-list-moreutils" ,perl-list-moreutils)
2322 ("perl-module-runtime" ,perl-module-runtime)
2323 ("perl-moose" ,perl-moose)
2324 ("perl-moosex-markasmethods" ,perl-moosex-markasmethods)
2325 ("perl-moosex-nonmoose" ,perl-moosex-nonmoose)
2326 ("perl-moosex-types" ,perl-moosex-types)
2327 ("perl-moosex-types-loadableclass" ,perl-moosex-types-loadableclass)
2328 ("perl-namespace-autoclean" ,perl-namespace-autoclean)
2329 ("perl-namespace-clean" ,perl-namespace-clean)
2330 ("perl-tie-ixhash" ,perl-tie-ixhash)
2331 ("perl-try-tiny" ,perl-try-tiny)))
2332 (home-page "https://metacpan.org/release/Catalyst-Model-DBIC-Schema")
2333 (synopsis "DBIx::Class::Schema Model Class")
2334 (description "This is a Catalyst Model for DBIx::Class::Schema-based
2336 (license license:perl-license)))
2338 (define-public perl-catalyst-plugin-accesslog
2340 (name "perl-catalyst-plugin-accesslog")
2345 (uri (string-append "mirror://cpan/authors/id/A/AR/ARODLAND/"
2346 "Catalyst-Plugin-AccessLog-" version ".tar.gz"))
2349 "0811rj45q4v2y8wka3wb9d5m4vbyhcmkvddf2wz4x69awzjbhgc7"))))
2350 (build-system perl-build-system)
2352 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2353 ("perl-datetime" ,perl-datetime)
2354 ("perl-moose" ,perl-moose)
2355 ("perl-namespace-autoclean" ,perl-namespace-autoclean)))
2356 (home-page "https://metacpan.org/release/Catalyst-Plugin-AccessLog")
2357 (synopsis "Request logging from within Catalyst")
2358 (description "This Catalyst plugin enables you to create \"access logs\"
2359 from within a Catalyst application instead of requiring a webserver to do it
2360 for you. It will work even with Catalyst debug logging turned off.")
2361 (license license:perl-license)))
2363 (define-public perl-catalyst-plugin-authentication
2365 (name "perl-catalyst-plugin-authentication")
2370 (uri (string-append "mirror://cpan/authors/id/B/BO/BOBTFISH/"
2371 "Catalyst-Plugin-Authentication-"
2375 "0v6hb4r1wv3djrnqvnjcn3xx1scgqzx8nyjdg9lfc1ybvamrl0rn"))))
2376 (build-system perl-build-system)
2378 `(("perl-module-install" ,perl-module-install)))
2380 `(("perl-catalyst-plugin-session" ,perl-catalyst-plugin-session)
2381 ("perl-catalyst-runtime" ,perl-catalyst-runtime)
2382 ("perl-class-inspector" ,perl-class-inspector)
2383 ("perl-moose" ,perl-moose)
2384 ("perl-moosex-emulate-class-accessor-fast"
2385 ,perl-moosex-emulate-class-accessor-fast)
2386 ("perl-mro-compat" ,perl-mro-compat)
2387 ("perl-namespace-autoclean" ,perl-namespace-autoclean)
2388 ("perl-string-rewriteprefix" ,perl-string-rewriteprefix)
2389 ("perl-test-exception" ,perl-test-exception)
2390 ("perl-try-tiny" ,perl-try-tiny)))
2391 (home-page "https://metacpan.org/release/Catalyst-Plugin-Authentication")
2392 (synopsis "Infrastructure plugin for the Catalyst authentication framework")
2393 (description "The authentication plugin provides generic user support for
2394 Catalyst apps. It is the basis for both authentication (checking the user is
2395 who they claim to be), and authorization (allowing the user to do what the
2396 system authorises them to do).")
2397 (license license:perl-license)))
2399 (define-public perl-catalyst-plugin-authorization-roles
2401 (name "perl-catalyst-plugin-authorization-roles")
2406 (uri (string-append "mirror://cpan/authors/id/B/BO/BOBTFISH/"
2407 "Catalyst-Plugin-Authorization-Roles-"
2411 "0l83lkwmq0lngwh8b1rv3r719pn8w1gdbyhjqm74rnd0wbjl8h7f"))))
2412 (build-system perl-build-system)
2414 `(("perl-module-install" ,perl-module-install)
2415 ("perl-test-exception" ,perl-test-exception)))
2417 `(("perl-catalyst-plugin-authentication"
2418 ,perl-catalyst-plugin-authentication)
2419 ("perl-catalyst-runtime" ,perl-catalyst-runtime)
2420 ("perl-set-object" ,perl-set-object)
2421 ("perl-universal-isa" ,perl-universal-isa)))
2423 "https://metacpan.org/release/Catalyst-Plugin-Authorization-Roles")
2424 (synopsis "Role-based authorization for Catalyst")
2425 (description "Catalyst::Plugin::Authorization::Roles provides role-based
2426 authorization for Catalyst based on Catalyst::Plugin::Authentication.")
2427 (license license:perl-license)))
2429 (define-public perl-catalyst-plugin-captcha
2431 (name "perl-catalyst-plugin-captcha")
2436 (uri (string-append "mirror://cpan/authors/id/D/DI/DIEGOK/"
2437 "Catalyst-Plugin-Captcha-" version ".tar.gz"))
2440 "0llyj3v5nx9cx46jdbbvxf1lc9s9cxq5ml22xmx3wkb201r5qgaa"))))
2441 (build-system perl-build-system)
2443 `(("perl-catalyst-plugin-session" ,perl-catalyst-plugin-session)
2444 ("perl-catalyst-runtime" ,perl-catalyst-runtime)
2445 ("perl-gd-securityimage" ,perl-gd-securityimage)
2446 ("perl-http-date" ,perl-http-date)))
2447 (home-page "https://metacpan.org/release/Catalyst-Plugin-Captcha")
2448 (synopsis "Captchas for Catalyst")
2449 (description "This plugin creates and validates Captcha images for
2451 (license license:perl-license)))
2453 (define-public perl-catalyst-plugin-configloader
2455 (name "perl-catalyst-plugin-configloader")
2460 (uri (string-append "mirror://cpan/authors/id/H/HA/HAARG/"
2461 "Catalyst-Plugin-ConfigLoader-"
2464 (base32 "0w8r3bbxqnlykvra6sx3sh3wh8ylkj914xg5ql6nw11ddy56jaly"))))
2465 (build-system perl-build-system)
2467 `(("perl-path-class" ,perl-path-class)
2468 ("perl-module-install" ,perl-module-install)))
2470 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2471 ("perl-config-any" ,perl-config-any)
2472 ("perl-data-visitor" ,perl-data-visitor)
2473 ("perl-mro-compat" ,perl-mro-compat)))
2474 (home-page "https://metacpan.org/release/Catalyst-Plugin-ConfigLoader")
2475 (synopsis "Load config files of various types")
2476 (description "This module will attempt to load find and load configuration
2477 files of various types. Currently it supports YAML, JSON, XML, INI and Perl
2479 (license license:perl-license)))
2481 (define-public perl-catalyst-plugin-session
2483 (name "perl-catalyst-plugin-session")
2488 (uri (string-append "mirror://cpan/authors/id/J/JJ/JJNAPIORK/"
2489 "Catalyst-Plugin-Session-" version ".tar.gz"))
2491 (base32 "0a451997zc2vjx7rvndgx1ldbrpic8sfbddyvncynh0zr8bhlqc5"))))
2492 (build-system perl-build-system)
2494 `(("perl-module-install" ,perl-module-install)
2495 ("perl-test-deep" ,perl-test-deep)
2496 ("perl-test-exception" ,perl-test-exception)))
2498 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2499 ("perl-moose" ,perl-moose)
2500 ("perl-moosex-emulate-class-accessor-fast"
2501 ,perl-moosex-emulate-class-accessor-fast)
2502 ("perl-mro-compat" ,perl-mro-compat)
2503 ("perl-namespace-clean" ,perl-namespace-clean)
2504 ("perl-object-signature" ,perl-object-signature)
2505 ("perl-test-www-mechanize-psgi" ,perl-test-www-mechanize-psgi)))
2506 (home-page "https://metacpan.org/release/Catalyst-Plugin-Session")
2507 (synopsis "Catalyst generic session plugin")
2508 (description "This plugin links the two pieces required for session
2509 management in web applications together: the state, and the store.")
2510 (license license:perl-license)))
2512 (define-public perl-catalyst-plugin-session-state-cookie
2514 (name "perl-catalyst-plugin-session-state-cookie")
2519 (uri (string-append "mirror://cpan/authors/id/M/MS/MSTROUT/"
2520 "Catalyst-Plugin-Session-State-Cookie-"
2524 "1rvxbfnpf9x2pc2zgpazlcgdlr2dijmxgmcs0m5nazs0w6xikssb"))))
2525 (build-system perl-build-system)
2527 `(("perl-module-install" ,perl-module-install)))
2529 `(("perl-catalyst-plugin-session" ,perl-catalyst-plugin-session)
2530 ("perl-catalyst-runtime" ,perl-catalyst-runtime)
2531 ("perl-moose" ,perl-moose)
2532 ("perl-mro-compat" ,perl-mro-compat)
2533 ("perl-namespace-autoclean" ,perl-namespace-autoclean)))
2535 "https://metacpan.org/release/Catalyst-Plugin-Session-State-Cookie")
2536 (synopsis "Maintain session IDs using cookies")
2537 (description "In order for Catalyst::Plugin::Session to work, the session
2538 ID needs to be stored on the client, and the session data needs to be stored
2539 on the server. This plugin stores the session ID on the client using the
2541 (license license:perl-license)))
2543 (define-public perl-catalyst-plugin-session-store-fastmmap
2545 (name "perl-catalyst-plugin-session-store-fastmmap")
2550 (uri (string-append "mirror://cpan/authors/id/B/BO/BOBTFISH/"
2551 "Catalyst-Plugin-Session-Store-FastMmap-"
2555 "0x3j6zv3wr41jlwr6yb2jpmcx019ibyn11y8653ffnwhpzbpzsxs"))))
2556 (build-system perl-build-system)
2558 `(("perl-cache-fastmmap" ,perl-cache-fastmmap)
2559 ("perl-catalyst-plugin-session" ,perl-catalyst-plugin-session)
2560 ("perl-catalyst-runtime" ,perl-catalyst-runtime)
2561 ("perl-moosex-emulate-class-accessor-fast"
2562 ,perl-moosex-emulate-class-accessor-fast)
2563 ("perl-mro-compat" ,perl-mro-compat)
2564 ("perl-path-class" ,perl-path-class)))
2566 "https://metacpan.org/release/Catalyst-Plugin-Session-Store-FastMmap")
2567 (synopsis "FastMmap session storage backend")
2568 (description "Catalyst::Plugin::Session::Store::FastMmap is a fast session
2569 storage plugin for Catalyst that uses an mmap'ed file to act as a shared
2570 memory interprocess cache. It is based on Cache::FastMmap.")
2571 (license license:perl-license)))
2573 (define-public perl-catalyst-plugin-stacktrace
2575 (name "perl-catalyst-plugin-stacktrace")
2580 (uri (string-append "mirror://cpan/authors/id/B/BO/BOBTFISH/"
2581 "Catalyst-Plugin-StackTrace-" version ".tar.gz"))
2584 "1b2ksz74cpigxqzf63rddar3vfmnbpwpdcbs11v0ml89pb8ar79j"))))
2585 (build-system perl-build-system)
2587 `(("perl-module-install" ,perl-module-install)))
2589 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2590 ("perl-devel-stacktrace" ,perl-devel-stacktrace)
2591 ("perl-mro-compat" ,perl-mro-compat)))
2592 (home-page "https://metacpan.org/release/Catalyst-Plugin-StackTrace")
2593 (synopsis "Stack trace on the Catalyst debug screen")
2594 (description "This plugin enhances the standard Catalyst debug screen by
2595 including a stack trace of your application up to the point where the error
2596 occurred. Each stack frame is displayed along with the package name, line
2597 number, file name, and code context surrounding the line number.")
2598 (license license:perl-license)))
2600 (define-public perl-catalyst-plugin-static-simple
2602 (name "perl-catalyst-plugin-static-simple")
2607 (uri (string-append "mirror://cpan/authors/id/I/IL/ILMARI/"
2608 "Catalyst-Plugin-Static-Simple-" version ".tar.gz"))
2611 "0m4l627p2fvzr4i6sgdxhdvsx4wpa6qmaibsbxlg5x5yjs7k7drn"))))
2612 (build-system perl-build-system)
2614 `(("perl-module-install" ,perl-module-install)))
2616 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2617 ("perl-mime-types" ,perl-mime-types)
2618 ("perl-moose" ,perl-moose)
2619 ("perl-moosex-types" ,perl-moosex-types)
2620 ("perl-namespace-autoclean" ,perl-namespace-autoclean)))
2621 (home-page "https://metacpan.org/release/Catalyst-Plugin-Static-Simple")
2622 (synopsis "Simple serving of static pages")
2623 (description "The Static::Simple plugin is designed to make serving static
2624 content in your application during development quick and easy, without
2625 requiring a single line of code from you. This plugin detects static files by
2626 looking at the file extension in the URL (such as .css or .png or .js). The
2627 plugin uses the lightweight MIME::Types module to map file extensions to
2628 IANA-registered MIME types, and will serve your static files with the correct
2629 MIME type directly to the browser, without being processed through Catalyst.")
2630 (license license:perl-license)))
2632 (define-public perl-catalyst-runtime
2634 (name "perl-catalyst-runtime")
2639 (uri (string-append "mirror://cpan/authors/id/J/JJ/JJNAPIORK/"
2640 "Catalyst-Runtime-" version ".tar.gz"))
2643 "001yk1i0xwn4v308qx15nvnp6v9qfdigdlvz1rgw5zpnq7kwnq1a"))))
2644 (build-system perl-build-system)
2646 `(("perl-test-fatal" ,perl-test-fatal)))
2648 `(("perl-cgi-simple" ,perl-cgi-simple)
2649 ("perl-cgi-struct" ,perl-cgi-struct)
2650 ("perl-class-c3-adopt-next" ,perl-class-c3-adopt-next)
2651 ("perl-class-date" ,perl-class-date)
2652 ("perl-class-load" ,perl-class-load)
2653 ("perl-data-dump" ,perl-data-dump)
2654 ("perl-http-body" ,perl-http-body)
2655 ("perl-http-message" ,perl-http-message)
2656 ("perl-json-maybexs" ,perl-json-maybexs)
2657 ("perl-libwww" ,perl-libwww)
2658 ("perl-module-pluggable" ,perl-module-pluggable)
2659 ("perl-moose" ,perl-moose)
2660 ("perl-moosex-emulate-class-accessor-fast"
2661 ,perl-moosex-emulate-class-accessor-fast)
2662 ("perl-moosex-getopt" ,perl-moosex-getopt)
2663 ("perl-moosex-methodattributes" ,perl-moosex-methodattributes)
2664 ("perl-namespace-clean" ,perl-namespace-clean)
2665 ("perl-path-class" ,perl-path-class)
2666 ("perl-perlio-utf8-strict" ,perl-perlio-utf8_strict)
2667 ("perl-plack" ,perl-plack)
2668 ("perl-plack-middleware-fixmissingbodyinredirect"
2669 ,perl-plack-middleware-fixmissingbodyinredirect)
2670 ("perl-plack-middleware-methodoverride"
2671 ,perl-plack-middleware-methodoverride)
2672 ("perl-plack-middleware-removeredundantbody"
2673 ,perl-plack-middleware-removeredundantbody)
2674 ("perl-plack-middleware-reverseproxy"
2675 ,perl-plack-middleware-reverseproxy)
2676 ("perl-plack-test-externalserver" ,perl-plack-test-externalserver)
2677 ("perl-safe-isa" ,perl-safe-isa)
2678 ("perl-string-rewriteprefix" ,perl-string-rewriteprefix)
2679 ("perl-text-simpletable" ,perl-text-simpletable)
2680 ("perl-tree-simple" ,perl-tree-simple)
2681 ("perl-tree-simple-visitorfactory" ,perl-tree-simple-visitorfactory)
2682 ("perl-try-tiny" ,perl-try-tiny)
2683 ("perl-uri" ,perl-uri)
2684 ("perl-uri-ws" ,perl-uri-ws)))
2685 (home-page "https://metacpan.org/release/Catalyst-Runtime")
2686 (synopsis "The Catalyst Framework Runtime")
2687 (description "Catalyst is a modern framework for making web applications.
2688 It is designed to make it easy to manage the various tasks you need to do to
2689 run an application on the web, either by doing them itself, or by letting you
2690 \"plug in\" existing Perl modules that do what you need.")
2691 (license license:perl-license)))
2693 (define-public perl-catalyst-traitfor-request-proxybase
2695 (name "perl-catalyst-traitfor-request-proxybase")
2696 (version "0.000005")
2700 (uri (string-append "mirror://cpan/authors/id/B/BO/BOBTFISH/"
2701 "Catalyst-TraitFor-Request-ProxyBase-"
2705 "02kir63d5cs2ipj3fn1qlmmx3gqi1xqzrxfr4pv5vjhjgsm0zgx7"))))
2706 (build-system perl-build-system)
2708 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2709 ("perl-catalystx-roleapplicator" ,perl-catalystx-roleapplicator)
2710 ("perl-http-message" ,perl-http-message)
2711 ("perl-module-install" ,perl-module-install)))
2713 `(("perl-moose" ,perl-moose)
2714 ("perl-namespace-autoclean" ,perl-namespace-autoclean)
2715 ("perl-uri" ,perl-uri)))
2717 "https://metacpan.org/release/Catalyst-TraitFor-Request-ProxyBase")
2718 (synopsis "Replace request base with value passed by HTTP proxy")
2719 (description "This module is a Moose::Role which allows you more
2720 flexibility in your application's deployment configurations when deployed
2721 behind a proxy. Using this module, the request base ($c->req->base) is
2722 replaced with the contents of the X-Request-Base header.")
2723 (license license:perl-license)))
2725 (define-public perl-catalyst-view-download
2727 (name "perl-catalyst-view-download")
2732 (uri (string-append "mirror://cpan/authors/id/G/GA/GAUDEON/"
2733 "Catalyst-View-Download-" version ".tar.gz"))
2736 "1qgq6y9iwfbhbkbgpw9czang2ami6z8jk1zlagrzdisy4igqzkvs"))))
2737 (build-system perl-build-system)
2739 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2740 ("perl-module-install" ,perl-module-install)
2741 ("perl-test-simple" ,perl-test-simple)
2742 ("perl-test-www-mechanize-catalyst" ,perl-test-www-mechanize-catalyst)
2743 ("perl-text-csv" ,perl-text-csv)
2744 ("perl-xml-simple" ,perl-xml-simple)))
2745 (home-page "https://metacpan.org/release/Catalyst-View-Download")
2746 (synopsis "Download data in many formats")
2747 (description "The purpose of this module is to provide a method for
2748 downloading data into many supportable formats. For example, downloading a
2749 table based report in a variety of formats (CSV, HTML, etc.).")
2750 (license license:perl-license)))
2752 (define-public perl-catalyst-view-json
2754 (name "perl-catalyst-view-json")
2759 (uri (string-append "mirror://cpan/authors/id/H/HA/HAARG/"
2760 "Catalyst-View-JSON-" version ".tar.gz"))
2763 "1v4xkzazs743sc7cd1kxkbi99cf00a4dadyyancckcbpi9p3znn5"))))
2764 (build-system perl-build-system)
2766 `(("perl-module-install" ,perl-module-install)
2767 ("perl-yaml" ,perl-yaml)))
2769 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2770 ("perl-json-maybexs" ,perl-json-maybexs)
2771 ("perl-mro-compat" ,perl-mro-compat)))
2772 (home-page "https://metacpan.org/release/Catalyst-View-JSON")
2773 (synopsis "Catalyst JSON view")
2774 (description "Catalyst::View::JSON is a Catalyst View handler that returns
2775 stash data in JSON format.")
2776 (license license:perl-license)))
2778 (define-public perl-catalyst-view-tt
2780 (name "perl-catalyst-view-tt")
2785 (uri (string-append "mirror://cpan/authors/id/H/HA/HAARG/"
2786 "Catalyst-View-TT-" version ".tar.gz"))
2788 (base32 "0jzgpkgq5pwq82zlb0nykdyk40dfpsyn9ilz91d0wpixgi9i5pr8"))))
2789 (build-system perl-build-system)
2791 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2792 ("perl-class-accessor" ,perl-class-accessor)
2793 ("perl-data-dump" ,perl-data-dump)
2794 ("perl-mro-compat" ,perl-mro-compat)
2795 ("perl-path-class" ,perl-path-class)
2796 ("perl-template-timer" ,perl-template-timer)
2797 ("perl-template-toolkit" ,perl-template-toolkit)))
2798 (home-page "https://metacpan.org/release/Catalyst-View-TT")
2799 (synopsis "Template View Class")
2800 (description "This module is a Catalyst view class for the Template
2802 (license license:perl-license)))
2804 (define-public perl-catalystx-component-traits
2806 (name "perl-catalystx-component-traits")
2811 (uri (string-append "mirror://cpan/authors/id/R/RK/RKITOVER/"
2812 "CatalystX-Component-Traits-" version ".tar.gz"))
2815 "0iq4ci8m6g2c4g01fvdl568y7pjz28f3widk986v3pyhr7ll8j88"))))
2816 (build-system perl-build-system)
2818 `(("perl-moose" ,perl-moose)
2819 ("perl-catalyst-runtime" ,perl-catalyst-runtime)
2820 ("perl-moosex-methodattributes" ,perl-moosex-methodattributes)))
2822 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2823 ("perl-class-load" ,perl-class-load)
2824 ("perl-moose" ,perl-moose)
2825 ("perl-moosex-traits-pluggable" ,perl-moosex-traits-pluggable)
2826 ("perl-namespace-autoclean" ,perl-namespace-autoclean)
2827 ("perl-list-moreutils" ,perl-list-moreutils)))
2828 (home-page "https://metacpan.org/release/CatalystX-Component-Traits")
2829 (synopsis "Trait Loading and Resolution for Catalyst Components")
2830 (description "Adds a \"COMPONENT\" in Catalyst::Component method to your
2831 Catalyst component base class that reads the optional \"traits\" parameter
2832 from app and component config and instantiates the component subclass with
2833 those traits using \"new_with_traits\" in MooseX::Traits from
2834 MooseX::Traits::Pluggable.")
2835 (license license:perl-license)))
2837 (define-public perl-catalystx-roleapplicator
2839 (name "perl-catalystx-roleapplicator")
2844 (uri (string-append "mirror://cpan/authors/id/H/HD/HDP/"
2845 "CatalystX-RoleApplicator-" version ".tar.gz"))
2848 "0vwaapxn8g5hs2xp63c4dwv9jmapmji4272fakssvgc9frklg3p2"))))
2849 (build-system perl-build-system)
2851 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2852 ("perl-moose" ,perl-moose)
2853 ("perl-moosex-relatedclassroles" ,perl-moosex-relatedclassroles)))
2854 (home-page "https://metacpan.org/release/CatalystX-RoleApplicator")
2855 (synopsis "Apply roles to Catalyst classes")
2856 (description "CatalystX::RoleApplicator applies roles to Catalyst
2857 application classes.")
2858 (license license:perl-license)))
2860 (define-public perl-catalystx-script-server-starman
2862 (name "perl-catalystx-script-server-starman")
2867 (uri (string-append "mirror://cpan/authors/id/A/AB/ABRAXXA/"
2868 "CatalystX-Script-Server-Starman-"
2872 "08jvibq4v8xjj0c3cr93h0w8w0c88ajwjn37xjy7ygxl9krlffp6"))))
2873 (build-system perl-build-system)
2875 `(("perl-module-install" ,perl-module-install)
2876 ("perl-test-www-mechanize-catalyst" ,perl-test-www-mechanize-catalyst)))
2878 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
2879 ("perl-moose" ,perl-moose)
2880 ("perl-namespace-autoclean" ,perl-namespace-autoclean)
2881 ("starman" ,starman)))
2882 (home-page "https://metacpan.org/release/CatalystX-Script-Server-Starman")
2883 (synopsis "Catalyst development server with Starman")
2884 (description "This module provides a Catalyst extension to replace the
2885 development server with Starman.")
2886 (license license:perl-license)))
2888 (define-public perl-cgi
2895 (uri (string-append "mirror://cpan/authors/id/L/LE/LEEJO/"
2896 "CGI-" version ".tar.gz"))
2898 (base32 "02k0p8zwbn0fz9r39rg8jvbmky8fwdg6kznklzk557rg07kiblhb"))))
2899 (build-system perl-build-system)
2901 `(("perl-test-deep" ,perl-test-deep)
2902 ("perl-test-nowarnings" ,perl-test-nowarnings)
2903 ("perl-test-warn" ,perl-test-warn)))
2905 `(("perl-html-parser" ,perl-html-parser)))
2906 (home-page "https://metacpan.org/release/CGI")
2907 (synopsis "Handle Common Gateway Interface requests and responses")
2908 (description "CGI.pm is a stable, complete and mature solution for
2909 processing and preparing HTTP requests and responses. Major features include
2910 processing form submissions, file uploads, reading and writing cookies, query
2911 string generation and manipulation, and processing and preparing HTTP
2913 (license license:perl-license)))
2915 (define-public perl-cgi-formbuilder
2917 (name "perl-cgi-formbuilder")
2923 "https://cpan.metacpan.org/authors/id/B/BI/BIGPRESH/"
2924 "CGI-FormBuilder-" version ".tar.gz"))
2927 "163ixq9kninqq094z2rnkg9pv3bcmvjphlww4vksfrzhq3h9pjdf"))))
2928 (build-system perl-build-system)
2929 (inputs `(("perl-cgi" ,perl-cgi)))
2931 "https://metacpan.org/release/CGI-FormBuilder")
2933 "Generate and process stateful forms")
2935 "@code{CGI::FormBuilder} provides an easy way to generate and process CGI
2936 form-based applications.")
2937 (license license:perl-license)))
2939 (define-public perl-cgi-session
2941 (name "perl-cgi-session")
2947 "mirror://cpan/authors/id/M/MA/MARKSTOS/CGI-Session-"
2952 "1xsl2pz1jrh127pq0b01yffnj4mnp9nvkp88h5mndrscq9hn8xa6"))))
2953 (build-system perl-build-system)
2955 `(("perl-module-build" ,perl-module-build)))
2956 (inputs `(("perl-cgi" ,perl-cgi)))
2958 "https://metacpan.org/release/CGI-Session")
2960 "Persistent session data in CGI applications")
2962 "@code{CGI::Session} provides modular session management system across
2964 (license license:perl-license)))
2966 (define-public perl-cgi-simple
2968 (name "perl-cgi-simple")
2973 (uri (string-append "mirror://cpan/authors/id/M/MA/MANWAR/"
2974 "CGI-Simple-" version ".tar.gz"))
2976 (base32 "13c7iwnnavky10ab87pi8jc1kqph03s0rhvj7myn7szhbfisc4gn"))))
2977 (build-system perl-build-system)
2979 `(("perl-io-stringy" ,perl-io-stringy) ; for IO::Scalar
2980 ("perl-module-build" ,perl-module-build)
2981 ("perl-test-exception" ,perl-test-exception)
2982 ("perl-test-nowarnings" ,perl-test-nowarnings)))
2983 (home-page "https://metacpan.org/release/CGI-Simple")
2984 (synopsis "CGI interface that is CGI.pm compliant")
2985 (description "CGI::Simple provides a relatively lightweight drop in
2986 replacement for CGI.pm. It shares an identical OO interface to CGI.pm for
2987 parameter parsing, file upload, cookie handling and header generation.")
2988 (license license:perl-license)))
2990 (define-public perl-cgi-struct
2992 (name "perl-cgi-struct")
2997 (uri (string-append "mirror://cpan/authors/id/F/FU/FULLERMD/"
2998 "CGI-Struct-" version ".tar.gz"))
3001 "0v4xq2qpryr7i6jngw1wpn8yr2kiib10yxp4aih90vfdznkqsgfi"))))
3002 (build-system perl-build-system)
3004 `(("perl-test-deep" ,perl-test-deep)))
3005 (home-page "https://metacpan.org/release/CGI-Struct")
3006 (synopsis "Build structures from CGI data")
3007 (description "This is a module for building structured data from CGI
3008 inputs, in a manner reminiscent of how PHP does.")
3009 (license license:bsd-2)))
3011 (define-public perl-datetime-format-http
3013 (name "perl-datetime-format-http")
3018 (uri (string-append "mirror://cpan/authors/id/C/CK/CKRAS/"
3019 "DateTime-Format-HTTP-" version ".tar.gz"))
3022 "0h6qqdg1yzqkdxp7hqlp0qa7d1y64nilgimxs79dys2ryjfpcknh"))))
3023 (build-system perl-build-system)
3025 `(("perl-module-build" ,perl-module-build)))
3027 `(("perl-datetime" ,perl-datetime)
3028 ("perl-http-date" ,perl-http-date)))
3029 (home-page "https://metacpan.org/release/DateTime-Format-HTTP")
3030 (synopsis "Date conversion routines")
3031 (description "This module provides functions that deal with the date
3032 formats used by the HTTP protocol.")
3033 (license license:perl-license)))
3035 (define-public perl-digest-md5-file
3037 (name "perl-digest-md5-file")
3042 (uri (string-append "mirror://cpan/authors/id/D/DM/DMUEY/"
3043 "Digest-MD5-File-" version ".tar.gz"))
3046 "060jzf45dlwysw5wsm7av1wvpl06xgk415kwwpvv89r6wda3md5d"))))
3047 (build-system perl-build-system)
3049 `(("perl-libwww" ,perl-libwww)))
3050 (home-page "https://metacpan.org/release/Digest-MD5-File")
3051 (synopsis "MD5 sums for files and urls")
3052 (description "Digest::MD5::File is a Perl extension for getting MD5 sums
3053 for files and urls.")
3054 (license license:perl-license)))
3056 (define-public perl-encode-locale
3058 (name "perl-encode-locale")
3063 "mirror://cpan/authors/id/G/GA/GAAS/Encode-Locale-"
3067 "1h8fvcdg3n20c2yp7107yhdkkx78534s9hnvn7ps8hpmf4ks0vqp"))))
3068 (build-system perl-build-system)
3069 (license license:perl-license)
3070 (synopsis "Perl locale encoding determination")
3072 "The POSIX locale system is used to specify both the language
3073 conventions requested by the user and the preferred character set to
3074 consume and output. The Encode::Locale module looks up the charset and
3075 encoding (called a CODESET in the locale jargon) and arranges for the
3076 Encode module to know this encoding under the name \"locale\". It means
3077 bytes obtained from the environment can be converted to Unicode strings
3078 by calling Encode::encode(locale => $bytes) and converted back again
3079 with Encode::decode(locale => $string).")
3080 (home-page "https://metacpan.org/release/Encode-Locale")))
3082 (define-public perl-feed-find
3084 (name "perl-feed-find")
3088 (uri (string-append "mirror://cpan/authors/id/B/BT/BTROTT/"
3089 "Feed-Find-" version ".tar.gz"))
3092 "0sa33cm8ww55cymnl8j7b5yspi2y5xkkkgqqa4h6fs3wdqylz600"))))
3093 (build-system perl-build-system)
3095 ;; Tests expect to query files at http://stupidfool.org/perl/feeds/
3098 (modify-phases %standard-phases
3099 (add-after 'unpack 'set-env
3100 (lambda _ (setenv "PERL_USE_UNSAFE_INC" "1"))))))
3102 `(("perl-class-errorhandler" ,perl-class-errorhandler)
3103 ("perl-html-parser" ,perl-html-parser)
3104 ("perl-libwww" ,perl-libwww)
3105 ("perl-uri" ,perl-uri)))
3106 (home-page "https://metacpan.org/release/Feed-Find")
3107 (synopsis "Syndication feed auto-discovery")
3108 (description "@code{Feed::Find} implements feed auto-discovery for finding
3109 syndication feeds, given a URI. It will discover the following feed formats:
3110 RSS 0.91, RSS 1.0, RSS 2.0, Atom.")
3111 (license license:perl-license)))
3113 (define-public perl-file-listing
3115 (name "perl-file-listing")
3120 "mirror://cpan/authors/id/P/PL/PLICEASE/File-Listing-"
3124 "0vmzw1mhv580flzkla80gvwfpficnhlbqr1dnlf9x50bw7n18k62"))))
3125 (build-system perl-build-system)
3127 `(("perl-http-date" ,perl-http-date)))
3128 (license license:perl-license)
3129 (synopsis "Perl directory listing parser")
3131 "The File::Listing module exports a single function called parse_dir(),
3132 which can be used to parse directory listings.")
3133 (home-page "https://metacpan.org/release/File-Listing")))
3135 (define-public perl-finance-quote
3137 (name "perl-finance-quote")
3142 (uri (string-append "https://cpan.metacpan.org/authors/id/E/EC/ECOCODE/"
3143 "Finance-Quote-" version ".tar.gz"))
3145 (base32 "0gzbq85738f299jaw4nj3ljnka380j2y6yspmyl71rgfypqjvbr7"))
3146 (patches (search-patches
3147 "perl-finance-quote-unuse-mozilla-ca.patch"))))
3148 (build-system perl-build-system)
3150 `(("perl-cgi" ,perl-cgi)
3151 ("perl-datetime" ,perl-datetime)
3152 ("perl-html-parser" ,perl-html-parser)
3153 ("perl-html-tableextract" ,perl-html-tableextract)
3154 ("perl-html-tree" ,perl-html-tree)
3155 ("perl-http-cookies" ,perl-http-cookies)
3156 ("perl-http-message" ,perl-http-message)
3157 ("perl-json" ,perl-json)
3158 ("perl-libwww" ,perl-libwww)
3159 ("perl-lwp-protocol-https" ,perl-lwp-protocol-https)
3160 ("perl-uri" ,perl-uri)))
3161 (home-page "https://metacpan.org/release/Finance-Quote")
3162 (synopsis "Stock and mutual fund quotes")
3164 "Finance::Quote gets stock quotes from various internet sources, including
3165 Yahoo! Finance, Fidelity Investments, and the Australian Stock Exchange.")
3166 (license license:gpl2)))
3168 (define-public perl-gssapi
3170 (name "perl-gssapi")
3175 (uri (string-append "mirror://cpan/authors/id/A/AG/AGROLMS/"
3176 "GSSAPI-" version ".tar.gz"))
3179 "1mkhwxjjlhr58pd770i9gnf7zy7jj092iv6jfbnb8bvnc5xjr3vx"))))
3180 (build-system perl-build-system)
3181 (inputs `(("gssapi" ,mit-krb5)))
3183 `(#:make-maker-flags
3184 `(,(string-append "--gssapiimpl=" (assoc-ref %build-inputs "gssapi")))))
3185 (home-page "https://metacpan.org/release/GSSAPI")
3186 (synopsis "Perl extension providing access to the GSSAPIv2 library")
3187 (description "This is a Perl extension for using GSSAPI C bindings as
3188 described in RFC 2744.")
3189 (license license:perl-license)))
3191 (define-public perl-html-element-extended
3193 (name "perl-html-element-extended")
3198 (uri (string-append "mirror://cpan/authors/id/M/MS/MSISK/"
3199 "HTML-Element-Extended-" version ".tar.gz"))
3202 "0axknss8c368r5i082yhkfj8mq0w4nglfrpcxcayyzzj13qimvzk"))))
3203 (build-system perl-build-system)
3205 `(("perl-html-tree" ,perl-html-tree)))
3206 (home-page "https://metacpan.org/release/HTML-Element-Extended")
3207 (synopsis "Manipulate tables of HTML::Element")
3209 "HTML::Element::Extended is a Perl extension for manipulating a table
3210 composed of HTML::Element style components.")
3211 (license license:perl-license)))
3213 (define-public perl-html-form
3215 (name "perl-html-form")
3220 (uri (string-append "mirror://cpan/authors/id/O/OA/OALDERS/"
3221 "HTML-Form-" version ".tar.gz"))
3223 (base32 "14i4ldyvdvhdhvfhh9kiq6z853q2f84biq8vcpv1k5w2r80wdiin"))))
3224 (build-system perl-build-system)
3226 `(("perl-html-parser" ,perl-html-parser)
3227 ("perl-html-tagset" ,perl-html-tagset)
3228 ("perl-http-message" ,perl-http-message)
3229 ("perl-lwp-mediatypes" ,perl-lwp-mediatypes)
3230 ("perl-uri" ,perl-uri)))
3231 (home-page "https://metacpan.org/release/HTML-Form")
3232 (synopsis "Perl class representing an HTML form element")
3233 (description "Objects of the HTML::Form class represents a single HTML
3234 <form> ... </form> instance.")
3235 (license license:perl-license)))
3237 (define-public perl-html-scrubber
3239 (name "perl-html-scrubber")
3245 "mirror://cpan/authors/id/N/NI/NIGELM/HTML-Scrubber-"
3250 "06p7w4zd42b2yh541mlzyqj40lwmvvn3fyqi8big4mf34la7m2jm"))))
3251 (build-system perl-build-system)
3253 `(("perl-module-build" ,perl-module-build)
3254 ("perl-test-cpan-meta" ,perl-test-cpan-meta)
3255 ("perl-test-differences" ,perl-test-differences)
3256 ("perl-test-eol" ,perl-test-eol)
3257 ("perl-test-memory-cycle" ,perl-test-memory-cycle)
3258 ("perl-test-notabs" ,perl-test-notabs)))
3260 `(("perl-html-parser" ,perl-html-parser)))
3262 "https://metacpan.org/release/HTML-Scrubber")
3264 "Perl extension for scrubbing/sanitizing html")
3266 "@code{HTML::Scrubber} Perl extension for scrubbing/sanitizing HTML.")
3267 (license license:perl-license)))
3269 (define-public perl-html-lint
3271 (name "perl-html-lint")
3276 (uri (string-append "mirror://cpan/authors/id/P/PE/PETDANCE/"
3277 "HTML-Lint-" version ".tar.gz"))
3279 (base32 "0lk02xpfxcg7ij4dvpsa4wjlzhmiizj0jfr3rwmdpbj69nvc93br"))))
3280 (build-system perl-build-system)
3282 `(("perl-html-parser" ,perl-html-parser)
3283 ("perl-html-tagset" ,perl-html-tagset)
3284 ("perl-libwww" ,perl-libwww)))
3285 (home-page "https://metacpan.org/release/HTML-Lint")
3286 (synopsis "Check for HTML errors in a string or file")
3287 (description "HTML::Lint is a pure-Perl HTML parser and checker for
3288 syntactic legitmacy.")
3289 (license license:artistic2.0)))
3291 (define-public perl-html-tableextract
3293 (name "perl-html-tableextract")
3298 (uri (string-append "https://cpan.metacpan.org/authors/id/M/MS/MSISK/"
3299 "HTML-TableExtract-" version ".tar.gz"))
3302 "01jimmss3q68a89696wmclvqwb2ybz6xgabpnbp6mm6jcni82z8a"))))
3303 (build-system perl-build-system)
3305 `(("perl-html-element-extended" ,perl-html-element-extended)
3306 ("perl-html-parser" ,perl-html-parser)))
3307 (home-page "https://metacpan.org/release/HTML-TableExtract")
3308 (synopsis "Extract contents from HTML tables")
3310 "HTML::TableExtract is a Perl module for extracting the content contained
3311 in tables within an HTML document, either as text or encoded element trees.")
3312 (license license:perl-license)))
3314 (define-public perl-html-tree
3316 (name "perl-html-tree")
3321 (uri (string-append "mirror://cpan/authors/id/K/KE/KENTNL/"
3322 "HTML-Tree-" version ".tar.gz"))
3325 "1gyvm4qlwm9y6hczkpnrdfl303ggbybr0nqxdjw09hii8yw4sdzh"))))
3326 (build-system perl-build-system)
3328 `(("perl-module-build" ,perl-module-build)
3329 ("perl-test-fatal" ,perl-test-fatal)))
3331 `(("perl-html-parser" ,perl-html-parser)
3332 ("perl-html-tagset" ,perl-html-tagset)
3333 ("perl-libwww" ,perl-libwww)))
3334 (home-page "https://metacpan.org/release/HTML-Tree")
3335 (synopsis "Work with HTML in a DOM-like tree structure")
3336 (description "This distribution contains a suite of modules for
3337 representing, creating, and extracting information from HTML syntax trees.")
3338 (license license:perl-license)))
3340 (define-public perl-html-parser
3342 (name "perl-html-parser")
3347 "mirror://cpan/authors/id/G/GA/GAAS/HTML-Parser-"
3351 "12v05ywlnsi9lc17z32k9jxx3sj1viy7y1wpl7n4az76v7hwfa7c"))))
3352 (build-system perl-build-system)
3354 `(("perl-html-tagset" ,perl-html-tagset)
3355 ("perl-http-message" ,perl-http-message)))
3356 (license license:perl-license)
3357 (synopsis "Perl HTML parser class")
3359 "Objects of the HTML::Parser class will recognize markup and separate
3360 it from plain text (alias data content) in HTML documents. As different
3361 kinds of markup and text are recognized, the corresponding event handlers
3363 (home-page "https://metacpan.org/release/HTML-Parser")))
3365 (define-public perl-html-tagset
3367 (name "perl-html-tagset")
3372 "mirror://cpan/authors/id/P/PE/PETDANCE/HTML-Tagset-"
3376 "1qh8249wgr4v9vgghq77zh1d2zs176bir223a8gh3k9nksn7vcdd"))))
3377 (build-system perl-build-system)
3378 (license license:perl-license)
3379 (synopsis "Perl data tables useful in parsing HTML")
3381 "The HTML::Tagset module contains several data tables useful in various
3382 kinds of HTML parsing operations.")
3383 (home-page "https://metacpan.org/release/HTML-Tagset")))
3385 (define-public perl-html-template
3387 (name "perl-html-template")
3391 (uri (string-append "mirror://cpan/authors/id/S/SA/SAMTREGAR/"
3392 "HTML-Template-" version ".tar.gz"))
3395 "17qjw8swj2q4b1ic285pndgrkmvpsqw0j68nhqzpk1daydhsyiv5"))))
3396 (build-system perl-build-system)
3398 `(("perl-cgi" ,perl-cgi)))
3399 (home-page "https://metacpan.org/release/HTML-Template")
3400 (synopsis "HTML-like templates")
3402 "This module attempts to make using HTML templates simple and natural.
3403 It extends standard HTML with a few new HTML-esque tags: @code{<TMPL_VAR>},
3404 @code{<TMPL_LOOP>}, @code{<TMPL_INCLUDE>}, @code{<TMPL_IF>},
3405 @code{<TMPL_ELSE>} and @code{<TMPL_UNLESS>}. The file written with HTML and
3406 these new tags is called a template. Using this module you fill in the values
3407 for the variables, loops and branches declared in the template. This allows
3408 you to separate design from the data.")
3409 (license license:perl-license)))
3411 (define-public perl-http-body
3413 (name "perl-http-body")
3418 (uri (string-append "mirror://cpan/authors/id/G/GE/GETTY/"
3419 "HTTP-Body-" version ".tar.gz"))
3422 "15vj488i62mdp4ps9k77h39prj70i7anb6b0j8nm7l9vbdc2q3gw"))))
3423 (build-system perl-build-system)
3425 `(("perl-test-deep" ,perl-test-deep)))
3427 `(("perl-file-temp" ,perl-file-temp)
3428 ("perl-http-message" ,perl-http-message))) ;For HTTP::Headers
3429 (home-page "https://metacpan.org/release/HTTP-Body")
3430 (synopsis "HTTP Body Parser")
3431 (description "HTTP::Body parses chunks of HTTP POST data and supports
3432 application/octet-stream, application/json, application/x-www-form-urlencoded,
3433 and multipart/form-data.")
3434 (license license:perl-license)))
3436 (define-public perl-http-cookiejar
3438 (name "perl-http-cookiejar")
3443 (uri (string-append "mirror://cpan/authors/id/D/DA/DAGOLDEN/"
3444 "HTTP-CookieJar-" version ".tar.gz"))
3446 (base32 "1l7mqsca4fmls7agzwmp6yq1x16y9jwq4114i6i75n654gl37qsn"))))
3447 (build-system perl-build-system)
3449 `(("perl-test-deep" ,perl-test-deep)
3450 ("perl-test-requires" ,perl-test-requires)
3451 ("perl-time-mock" ,perl-time-mock)
3452 ("perl-uri" ,perl-uri)))
3454 `(("perl-time-local" ,perl-time-local)
3455 ("perl-http-date" ,perl-http-date)))
3456 (home-page "https://metacpan.org/release/HTTP-CookieJar")
3457 (synopsis "Minimalist HTTP user agent cookie jar")
3458 (description "This module implements a minimalist HTTP user agent cookie
3459 jar in conformance with RFC 6265 <http://tools.ietf.org/html/rfc6265>.")
3460 (license license:asl2.0)))
3462 (define-public perl-http-cookies
3464 (name "perl-http-cookies")
3469 "mirror://cpan/authors/id/O/OA/OALDERS/HTTP-Cookies-"
3473 "13rnz3233vbsfariya4njiyfaj6k94j6bvlyh3dmfmh24hpqgx77"))))
3474 (build-system perl-build-system)
3476 `(("perl-http-message" ,perl-http-message)))
3477 (license license:perl-license)
3478 (synopsis "Perl HTTP cookie jars")
3480 "The HTTP::Cookies class is for objects that represent a cookie jar,
3481 that is, a database of all the HTTP cookies that a given LWP::UserAgent
3482 object knows about.")
3483 (home-page "https://metacpan.org/release/GAAS/HTTP-Cookies-6.01")))
3485 (define-public perl-http-daemon
3487 (name "perl-http-daemon")
3492 "mirror://cpan/authors/id/G/GA/GAAS/HTTP-Daemon-"
3496 "1hmd2isrkilf0q0nkxms1q64kikjmcw9imbvrjgky6kh89vqdza3"))))
3497 (build-system perl-build-system)
3499 `(("perl-http-message" ,perl-http-message)
3500 ("perl-lwp-mediatypes" ,perl-lwp-mediatypes)))
3501 (license license:perl-license)
3502 (synopsis "Perl simple http server class")
3504 "Instances of the HTTP::Daemon class are HTTP/1.1 servers that listen
3505 on a socket for incoming requests. The HTTP::Daemon is a subclass of
3506 IO::Socket::INET, so you can perform socket operations directly on it too.")
3507 (home-page "https://metacpan.org/release/HTTP-Daemon")))
3509 (define-public perl-http-date
3511 (name "perl-http-date")
3516 "mirror://cpan/authors/id/O/OA/OALDERS/HTTP-Date-"
3520 "0awjdbz7x0jd5pna55dwxhs3k6xp3sw6b2zg3p2yndxxvya64p9n"))))
3521 (build-system perl-build-system)
3522 (license license:perl-license)
3523 (synopsis "Perl date conversion routines")
3525 "The HTTP::Date module provides functions that deal with date formats
3526 used by the HTTP protocol (and then some more).")
3527 (home-page "https://metacpan.org/release/HTTP-Date")))
3529 (define-public perl-http-lite
3531 (name "perl-http-lite")
3537 "mirror://cpan/authors/id/N/NE/NEILB/HTTP-Lite-"
3541 "0z77nflj8zdcfg70kc93glq5kmd6qxn2nf7h70x4xhfg25wkvr1q"))))
3542 (build-system perl-build-system)
3543 (native-inputs `(("perl-cgi" ,perl-cgi)))
3544 (home-page "https://metacpan.org/release/HTTP-Lite")
3545 (synopsis "Lightweight HTTP implementation")
3546 (description "@code{HTTP::Lite} is a stand-alone lightweight
3547 HTTP/1.1 implementation for perl. It is intended for use in
3548 situations where it is desirable to install the minimal number of
3549 modules to achieve HTTP support. @code{HTTP::Lite} is ideal for
3550 CGI (or mod_perl) programs or for bundling for redistribution with
3551 larger packages where only HTTP GET and POST functionality are
3552 necessary. @code{HTTP::Lite} is compliant with the Host header,
3553 necessary for name based virtual hosting, and supports proxies.
3554 Additionally, @code{HTTP::Lite} supports a callback to allow
3555 processing of request data as it arrives.")
3556 (license license:perl-license)))
3558 (define-public perl-http-message
3560 (name "perl-http-message")
3565 "mirror://cpan/authors/id/O/OA/OALDERS/HTTP-Message-"
3569 "04lih0fn89jpyk74c4aq1rzq18h8v4zd3x0lik2r9dl8sdqd2q6h"))))
3570 (build-system perl-build-system)
3572 `(("perl-try-tiny" ,perl-try-tiny)))
3574 `(("perl-encode-locale" ,perl-encode-locale)
3575 ("perl-http-date" ,perl-http-date)
3576 ("perl-io-html" ,perl-io-html)
3577 ("perl-lwp-mediatypes" ,perl-lwp-mediatypes)
3578 ("perl-uri" ,perl-uri)))
3579 (license license:perl-license)
3580 (synopsis "Perl HTTP style message")
3582 "An HTTP::Message object contains some headers and a content body.")
3583 (home-page "https://metacpan.org/release/ETHER/HTTP-Message-6.11")))
3585 (define-public perl-http-negotiate
3587 (name "perl-http-negotiate")
3592 "mirror://cpan/authors/id/G/GA/GAAS/HTTP-Negotiate-"
3596 "05p053vjs5g91v5cmjnny7a3xzddz5k7vnjw81wfh01ilqg9qwhw"))))
3597 (build-system perl-build-system)
3599 `(("perl-http-message" ,perl-http-message)))
3600 (license license:perl-license)
3601 (synopsis "Perl http content negotiation")
3603 "The HTTP::Negotiate module provides a complete implementation of the
3604 HTTP content negotiation algorithm specified in
3605 draft-ietf-http-v11-spec-00.ps chapter 12. Content negotiation allows for
3606 the selection of a preferred content representation based upon attributes
3607 of the negotiable variants and the value of the various Accept* header
3608 fields in the request.")
3609 (home-page "https://metacpan.org/release/HTTP-Negotiate")))
3611 (define-public perl-http-parser
3613 (name "perl-http-parser")
3618 (uri (string-append "mirror://cpan/authors/id/E/ED/EDECA/"
3619 "HTTP-Parser-" version ".tar.gz"))
3622 "0idwq3jk595xil65lmxz128ha7s3r2n5zknisddpgwnqrghs3igq"))))
3623 (build-system perl-build-system)
3625 `(("perl-http-message" ,perl-http-message)
3626 ("perl-uri" ,perl-uri)))
3627 (home-page "https://metacpan.org/release/HTTP-Parser")
3628 (synopsis "Parse HTTP/1.1 requests")
3629 (description "This is an HTTP request parser. It takes chunks of text as
3630 received and returns a @code{hint} as to what is required, or returns the
3631 HTTP::Request when a complete request has been read. HTTP/1.1 chunking is
3633 (license license:perl-license)))
3635 (define-public perl-http-parser-xs
3637 (name "perl-http-parser-xs")
3642 (uri (string-append "mirror://cpan/authors/id/K/KA/KAZUHO/"
3643 "HTTP-Parser-XS-" version ".tar.gz"))
3646 "02d84xq1mm53c7jl33qyb7v5w4372vydp74z6qj0vc96wcrnhkkr"))))
3647 (build-system perl-build-system)
3649 `(("perl-module-install" ,perl-module-install)))
3650 (home-page "https://metacpan.org/release/HTTP-Parser-XS")
3651 (synopsis "Fast HTTP request parser")
3652 (description "HTTP::Parser::XS is a fast, primitive HTTP request/response
3654 (license license:perl-license)))
3656 (define-public perl-http-request-ascgi
3658 (name "perl-http-request-ascgi")
3663 (uri (string-append "mirror://cpan/authors/id/F/FL/FLORA/"
3664 "HTTP-Request-AsCGI-" version ".tar.gz"))
3667 "1smwmiarwcgq7vjdblnb6ldi2x1s5sk5p15p7xvm5byiqq3znnwl"))))
3668 (build-system perl-build-system)
3670 `(("perl-class-accessor" ,perl-class-accessor)
3671 ("perl-http-message" ,perl-http-message)))
3672 (home-page "https://metacpan.org/release/HTTP-Request-AsCGI")
3673 (synopsis "Set up a CGI environment from an HTTP::Request")
3674 (description "This module provides a convenient way to set up a CGI
3675 environment from an HTTP::Request.")
3676 (license license:perl-license)))
3678 (define-public perl-http-server-simple
3680 (name "perl-http-server-simple")
3685 (uri (string-append "mirror://cpan/authors/id/B/BP/BPS/"
3686 "HTTP-Server-Simple-" version ".tar.gz"))
3689 "0k6bg7k6mjixfzxdkkdrhqvaqmdhjszx0zsk8g0bimiby6j9z4yq"))))
3690 (build-system perl-build-system)
3692 `(("perl-cgi" ,perl-cgi)))
3694 ;; See the discussion of a related tests issue at
3695 ;; https://lists.gnu.org/archive/html/guix-devel/2015-01/msg00346.html
3698 #:phases (modify-phases %standard-phases
3699 (add-before 'configure 'set-search-path
3701 ;; Work around "dotless @INC" build failure.
3703 (string-append (getcwd) ":"
3704 (getenv "PERL5LIB")))
3706 (home-page "https://metacpan.org/release/HTTP-Server-Simple")
3707 (synopsis "Lightweight HTTP server")
3708 (description "HTTP::Server::Simple is a simple standalone HTTP daemon with
3709 no non-core module dependencies. It can be used for building a standalone
3710 http-based UI to your existing tools.")
3711 (license license:perl-license)))
3713 (define-public perl-http-tiny
3715 (name "perl-http-tiny")
3720 (uri (string-append "mirror://cpan/authors/id/D/DA/DAGOLDEN/"
3721 "HTTP-Tiny-" version ".tar.gz"))
3724 "11wkxxqj3ff84rgj9q2gzkdgscwp3fzj205846k9ycqinlpsmgfx"))))
3725 (build-system perl-build-system)
3727 `(("perl-http-cookiejar" ,perl-http-cookiejar)
3728 ("perl-io-socket-ip" ,perl-io-socket-ip)
3729 ("perl-io-socket-ssl" ,perl-io-socket-ssl)
3730 ("perl-mozilla-ca" ,perl-mozilla-ca)
3731 ("perl-net-ssleay" ,perl-net-ssleay)))
3732 (home-page "https://metacpan.org/release/HTTP-Tiny")
3733 (synopsis "HTTP/1.1 client")
3734 (description "This is a very simple HTTP/1.1 client, designed for doing
3735 simple requests without the overhead of a large framework like LWP::UserAgent.
3736 It supports proxies and redirection. It also correctly resumes after EINTR.")
3737 (license license:perl-license)))
3739 (define-public perl-http-tinyish
3741 (name "perl-http-tinyish")
3747 "mirror://cpan/authors/id/M/MI/MIYAGAWA/HTTP-Tinyish-"
3752 "199sa722amvwhq0czjfb7psj3hbqmvni5vxkrm579r5943pg0rax"))))
3753 (build-system perl-build-system)
3755 `(("perl-file-which" ,perl-file-which)
3756 ("perl-ipc-run3" ,perl-ipc-run3)))
3757 (home-page "https://metacpan.org/release/HTTP-Tinyish")
3758 (synopsis "@code{HTTP::Tiny} compatible HTTP client wrappers")
3760 "@code{HTTP::Tinyish} is a wrapper module for @acronym{LWP,libwww-perl},
3761 @code{HTTP::Tiny}, curl and wget.
3763 It provides an API compatible to HTTP::Tiny.")
3764 (license license:perl-license)))
3766 (define-public perl-io-html
3768 (name "perl-io-html")
3773 "mirror://cpan/authors/id/C/CJ/CJM/IO-HTML-"
3777 "06nj3a0xgp5jxwxx6ayglfk2v7npf5a7gwkqsjlkapjkybarzqh4"))))
3778 (build-system perl-build-system)
3779 (license license:perl-license)
3780 (synopsis "Perl module to open an HTML file with automatic charset detection")
3782 "IO::HTML provides an easy way to open a file containing HTML while
3783 automatically determining its encoding. It uses the HTML5 encoding sniffing
3784 algorithm specified in section 8.2.2.1 of the draft standard.")
3785 (home-page "https://metacpan.org/release/IO-HTML")))
3787 (define-public perl-io-socket-ip
3789 (name "perl-io-socket-ip")
3794 (uri (string-append "mirror://cpan/authors/id/P/PE/PEVANS/"
3795 "IO-Socket-IP-" version ".tar.gz"))
3797 (base32 "0ihlpxrkq1xrvhnq52nhghanskic718ch8kpp642afgq72i4b6l4"))))
3798 (build-system perl-build-system)
3799 (native-inputs `(("perl-module-build" ,perl-module-build)))
3800 (home-page "https://metacpan.org/release/IO-Socket-IP")
3801 (synopsis "Family-neutral IP socket supporting both IPv4 and IPv6")
3802 (description "This module provides a protocol-independent way to use IPv4
3803 and IPv6 sockets, intended as a replacement for IO::Socket::INET.")
3804 (license license:perl-license)))
3806 (define-public perl-io-socket-ssl
3808 (name "perl-io-socket-ssl")
3812 (uri (string-append "mirror://cpan/authors/id/S/SU/SULLR/"
3813 "IO-Socket-SSL-" version ".tar.gz"))
3816 "1kgbws7dwp2hh16qid7169dfkhmcwg7dz9ffbm6k0id5h53hciqd"))
3817 (patches (search-patches
3818 "perl-io-socket-ssl-openssl-1.0.2f-fix.patch"))))
3819 (build-system perl-build-system)
3821 `(("perl-net-ssleay" ,perl-net-ssleay)
3823 ("perl-uri" ,perl-uri)))
3824 (synopsis "Nearly transparent SSL encapsulation for IO::Socket::INET")
3826 "IO::Socket::SSL makes using SSL/TLS much easier by wrapping the
3827 necessary functionality into the familiar IO::Socket interface and providing
3828 secure defaults whenever possible. This way existing applications can be made
3829 SSL-aware without much effort, at least if you do blocking I/O and don't use
3831 (license license:perl-license)
3832 (home-page "https://github.com/noxxi/p5-io-socket-ssl")))
3834 (define-public perl-libwww
3836 (name "perl-libwww")
3841 "mirror://cpan/authors/id/O/OA/OALDERS/libwww-perl-"
3845 "19k0cg4j4qz005a4ngy48z4r8dc99dxlpq8kvj7qnk15mvgd1r63"))))
3846 (build-system perl-build-system)
3848 `(("perl-test-fatal" ,perl-test-fatal)
3849 ("perl-test-needs" ,perl-test-needs)
3850 ("perl-test-requiresinternet" ,perl-test-requiresinternet)))
3852 `(("perl-encode-locale" ,perl-encode-locale)
3853 ("perl-file-listing" ,perl-file-listing)
3854 ("perl-html-parser" ,perl-html-parser)
3855 ("perl-http-cookies" ,perl-http-cookies)
3856 ("perl-http-daemon" ,perl-http-daemon)
3857 ("perl-http-date" ,perl-http-date)
3858 ("perl-http-message" ,perl-http-message)
3859 ("perl-http-negotiate" ,perl-http-negotiate)
3860 ("perl-net-http" ,perl-net-http)
3861 ("perl-try-tiny" ,perl-try-tiny)
3862 ("perl-uri" ,perl-uri)
3863 ("perl-www-robotrules" ,perl-www-robotrules)))
3864 (license license:perl-license)
3865 (synopsis "Perl modules for the WWW")
3867 "The libwww-perl collection is a set of Perl modules which provides a
3868 simple and consistent application programming interface to the
3869 World-Wide Web. The main focus of the library is to provide classes
3870 and functions that allow you to write WWW clients. The library also
3871 contains modules that are of more general use and even classes that
3872 help you implement simple HTTP servers.")
3873 (home-page "https://metacpan.org/release/libwww-perl")))
3875 (define-public perl-lwp-online
3877 (name "perl-lwp-online")
3883 "mirror://cpan/authors/id/A/AD/ADAMK/LWP-Online-"
3887 "176f6vbk1018i0y7xj9d406ndbjgwzan2j9nihxnsahzg2vr2vz2"))))
3888 (build-system perl-build-system)
3890 `(("perl-libwww" ,perl-libwww)
3891 ("perl-uri" ,perl-uri)))
3893 `(("perl-module-install" ,perl-module-install)))
3894 (home-page "https://metacpan.org/release/LWP-Online")
3895 (synopsis "Checks whether your process has access to the web")
3896 (description "This module attempts to answer, as accurately as it can, one
3897 of the nastiest technical questions there is: am I on the internet?
3899 A host of networking and security issues make this problem very difficult.
3900 There are firewalls, proxies (both well behaved and badly behaved). We might
3901 not have DNS. We might not have a network card at all!")
3902 (license license:perl-license)))
3904 (define-public perl-lwp-mediatypes
3906 (name "perl-lwp-mediatypes")
3911 "mirror://cpan/authors/id/O/OA/OALDERS/LWP-MediaTypes-"
3915 "1n8rg6csv3dsvymg06cmxipimr6cb1g9r903ghm1qsmiv89cl6wg"))))
3916 (build-system perl-build-system)
3918 `(("perl-test-fatal" ,perl-test-fatal)))
3919 (license license:perl-license)
3920 (synopsis "Perl module to guess the media type for a file or a URL")
3922 "The LWP::MediaTypes module provides functions for handling media (also
3923 known as MIME) types and encodings. The mapping from file extensions to
3924 media types is defined by the media.types file. If the ~/.media.types file
3925 exists it is used instead.")
3926 (home-page "https://metacpan.org/release/LWP-MediaTypes")))
3928 (define-public perl-lwp-protocol-https
3930 (name "perl-lwp-protocol-https")
3935 (uri (string-append "mirror://cpan/authors/id/O/OA/OALDERS/"
3936 "LWP-Protocol-https-" version ".tar.gz"))
3938 (base32 "14pm785cgyrnppks6ccasb2vkqifh0a8fz36nmnhc2v926jy3kqn"))))
3939 (build-system perl-build-system)
3942 `(("perl-test-requiresinternet" ,perl-test-requiresinternet)))
3944 `(("perl-io-socket-ssl" ,perl-io-socket-ssl)
3945 ("perl-libwww" ,perl-libwww)
3946 ("perl-mozilla-ca" ,perl-mozilla-ca)
3947 ("perl-net-http" ,perl-net-http)))
3948 (home-page "https://metacpan.org/release/LWP-Protocol-https")
3949 (synopsis "HTTPS support for LWP::UserAgent")
3950 (description "The LWP::Protocol::https module provides support for using
3951 https schemed URLs with LWP.")
3952 (license license:perl-license)))
3954 (define-public perl-lwp-useragent-cached
3956 (name "perl-lwp-useragent-cached")
3961 (uri (string-append "mirror://cpan/authors/id/O/OL/OLEG/"
3962 "LWP-UserAgent-Cached-" version ".tar.gz"))
3965 "1hw7wy7f82kl61xjwkgmhv1ixgg56dhgfr45wxn6ahc0qys5mkix"))))
3966 (build-system perl-build-system)
3968 `(("perl-libwww" ,perl-libwww)))
3969 (home-page "https://metacpan.org/release/LWP-UserAgent-Cached")
3970 (synopsis "Simple caching for LWP::UserAgent")
3971 (description "LWP::UserAgent::Cached is an LWP::UserAgent subclass with
3972 cache support. It returns responses from the local file system, if available,
3973 instead of making an HTTP request.")
3974 (license license:perl-license)))
3976 (define-public perl-lwp-useragent-determined
3978 (name "perl-lwp-useragent-determined")
3983 (uri (string-append "mirror://cpan/authors/id/A/AL/ALEXMV/"
3984 "LWP-UserAgent-Determined-" version ".tar.gz"))
3987 "0lyvbpjng7yfvyha9rp2y2c6liz5hhplmd2grc8jlsfkih7dbn06"))))
3988 (build-system perl-build-system)
3990 `(("perl-libwww" ,perl-libwww)))
3991 (home-page "https://metacpan.org/release/LWP-UserAgent-Determined")
3992 (synopsis "Virtual browser that retries errors")
3993 (description "LWP::UserAgent::Determined works just like LWP::UserAgent,
3994 except that when you use it to get a web page but run into a
3995 possibly-temporary error (like a DNS lookup timeout), it'll wait a few seconds
3996 and retry a few times.")
3997 (license license:perl-license)))
3999 (define-public perl-lwpx-paranoidagent
4001 (name "perl-lwpx-paranoidagent")
4007 "mirror://cpan/authors/id/S/SA/SAXJAZMAN/lwp/LWPx-ParanoidAgent-"
4011 "0gfhw3jbs25yya2dryv8xvyn9myngcfcmsybj7gkq62fnznil16c"))))
4012 (build-system perl-build-system)
4014 `(("perl-libwww" ,perl-libwww)
4015 ;; Users should instead make sure SSL_ca_path is set properly.
4016 ;; ("perl-mozilla-ca" ,perl-mozilla-ca)
4017 ("perl-net-dns" ,perl-net-dns)))
4018 (home-page "https://metacpan.org/release/LWPx-ParanoidAgent")
4019 (synopsis "Security enhanced subclass of LWP::UserAgent")
4020 (description "@code{LWPx::ParanoidAgent} is a class subclassing
4021 @code{LWP::UserAgent} but paranoid against attackers. Its purpose is
4022 to vet requests for a remote resource on behalf of a possibly
4023 malicious user. The class can do the same as @code{LWP::UserAgent},
4024 except that proxy support has been removed. Support for URI schemes
4025 is limited to http and https.")
4026 (license license:perl-license)))
4028 (define-public perl-net-amazon-s3
4030 (name "perl-net-amazon-s3")
4035 (uri (string-append "mirror://cpan/authors/id/P/PF/PFIG/"
4036 "Net-Amazon-S3-" version ".tar.gz"))
4039 "10dcsq4s2kc9cb1vccx17r187c81drirc3s1hbxh3rb8489kg2b2"))
4040 (patches (search-patches
4041 "perl-net-amazon-s3-moose-warning.patch"))))
4042 (build-system perl-build-system)
4044 `(("perl-libwww" ,perl-libwww)
4045 ("perl-test-exception" ,perl-test-exception)))
4047 `(("perl-data-stream-bulk" ,perl-data-stream-bulk)
4048 ("perl-datetime-format-http" ,perl-datetime-format-http)
4049 ("perl-digest-hmac" ,perl-digest-hmac)
4050 ("perl-digest-md5-file" ,perl-digest-md5-file)
4051 ("perl-file-find-rule" ,perl-file-find-rule)
4052 ("perl-http-date" ,perl-http-date)
4053 ("perl-http-message" ,perl-http-message)
4054 ("perl-lwp-useragent-determined" ,perl-lwp-useragent-determined)
4055 ("perl-mime-types" ,perl-mime-types)
4056 ("perl-moose" ,perl-moose)
4057 ("perl-moosex-strictconstructor" ,perl-moosex-strictconstructor)
4058 ("perl-moosex-types-datetime-morecoercions"
4059 ,perl-moosex-types-datetime-morecoercions)
4060 ("perl-path-class" ,perl-path-class)
4061 ("perl-regexp-common" ,perl-regexp-common)
4062 ("perl-term-encoding" ,perl-term-encoding)
4063 ("perl-term-progressbar-simple" ,perl-term-progressbar-simple)
4064 ("perl-uri" ,perl-uri)
4065 ("perl-xml-libxml" ,perl-xml-libxml)))
4066 (home-page "https://metacpan.org/release/Net-Amazon-S3")
4067 (synopsis "Perl interface to Amazon S3")
4068 (description "This module provides a Perlish interface to Amazon S3.")
4069 (license license:perl-license)))
4071 (define-public perl-net-http
4073 (name "perl-net-http")
4078 "mirror://cpan/authors/id/O/OA/OALDERS/"
4079 "Net-HTTP-" version ".tar.gz"))
4082 "1i7fk6q1iaxzgf82mjd5hg77hvy7dbb79488cijg16dyfrds6nip"))))
4083 (build-system perl-build-system)
4085 `(("perl-io-socket-ssl" ,perl-io-socket-ssl)
4086 ("perl-uri" ,perl-uri)))
4087 (license license:perl-license)
4088 (synopsis "Perl low-level HTTP connection (client)")
4090 "The Net::HTTP class is a low-level HTTP client. An instance of the
4091 Net::HTTP class represents a connection to an HTTP server. The HTTP protocol
4092 is described in RFC 2616. The Net::HTTP class supports HTTP/1.0 and
4094 (home-page "https://metacpan.org/release/Net-HTTP")))
4096 (define-public perl-net-server
4098 (name "perl-net-server")
4103 (uri (string-append "mirror://cpan/authors/id/R/RH/RHANDOM/"
4104 "Net-Server-" version ".tar.gz"))
4107 "0gw1k9gcw7habbkxvsfa2gz34brlbwcidk6khgsf1qjm0dbccrw2"))))
4108 (build-system perl-build-system)
4109 (home-page "https://metacpan.org/release/Net-Server")
4110 (synopsis "Extensible Perl server engine")
4111 (description "Net::Server is an extensible, generic Perl server engine.
4112 It attempts to be a generic server as in Net::Daemon and NetServer::Generic.
4113 It includes with it the ability to run as an inetd
4114 process (Net::Server::INET), a single connection server (Net::Server or
4115 Net::Server::Single), a forking server (Net::Server::Fork), a preforking
4116 server which maintains a constant number of preforked
4117 children (Net::Server::PreForkSimple), or as a managed preforking server which
4118 maintains the number of children based on server load (Net::Server::PreFork).
4119 In all but the inetd type, the server provides the ability to connect to one
4120 or to multiple server ports.")
4121 (license license:perl-license)))
4123 (define-public perl-net-smtp-ssl
4125 (name "perl-net-smtp-ssl")
4130 (uri (string-append "mirror://cpan/authors/id/R/RJ/RJBS/"
4131 "Net-SMTP-SSL-" version ".tar.gz"))
4134 "001a6dcfahf7kkyirqkc8jd4fh4fkal7n7vm9c4dblqrvmdc8abv"))))
4135 (build-system perl-build-system)
4137 `(("perl-io-socket-ssl" ,perl-io-socket-ssl)))
4138 (home-page "https://metacpan.org/release/Net-SMTP-SSL")
4139 (synopsis "SSL support for Net::SMTP")
4140 (description "SSL support for Net::SMTP.")
4141 (license license:perl-license)))
4143 (define-public perl-plack
4150 (uri (string-append "mirror://cpan/authors/id/M/MI/MIYAGAWA/"
4151 "Plack-" version ".tar.gz"))
4154 "081jg0xddzpg2anmqi9i6d7vs6c8z7k557bf8xl6vgb3h95pin5w"))))
4155 (build-system perl-build-system)
4157 `(("perl-test-requires" ,perl-test-requires)
4158 ("perl-file-sharedir-install" ,perl-file-sharedir-install)))
4160 `(("perl-apache-logformat-compiler" ,perl-apache-logformat-compiler)
4161 ("perl-devel-stacktrace" ,perl-devel-stacktrace)
4162 ("perl-devel-stacktrace-ashtml" ,perl-devel-stacktrace-ashtml)
4163 ("perl-file-sharedir" ,perl-file-sharedir)
4164 ("perl-hash-multivalue" ,perl-hash-multivalue)
4165 ("perl-http-body" ,perl-http-body)
4166 ("perl-http-message" ,perl-http-message)
4167 ("perl-http-tiny" ,perl-http-tiny)
4168 ("perl-libwww" ,perl-libwww)
4169 ("perl-stream-buffered" ,perl-stream-buffered)
4170 ("perl-test-tcp" ,perl-test-tcp)
4171 ("perl-try-tiny" ,perl-try-tiny)
4172 ("perl-uri" ,perl-uri)))
4173 (home-page "https://metacpan.org/release/Plack")
4174 (synopsis "Perl Superglue for Web frameworks and servers (PSGI toolkit)")
4175 (description "Plack is a set of tools for using the PSGI stack. It
4176 contains middleware components, a reference server, and utilities for Web
4177 application frameworks. Plack is like Ruby's Rack or Python's Paste for
4179 (license license:perl-license)))
4181 (define-public perl-plack-middleware-deflater
4183 (name "perl-plack-middleware-deflater")
4189 "mirror://cpan/authors/id/K/KA/KAZEBURO/"
4190 "Plack-Middleware-Deflater-" version ".tar.gz"))
4193 "0xf2visi16hgwgyp9q0cjr10ikbn474hjia5mj8mb2scvbkrbni8"))))
4194 (build-system perl-build-system)
4196 `(("perl-module-install" ,perl-module-install)
4197 ("perl-test-requires" ,perl-test-requires)))
4199 `(("perl-plack" ,perl-plack)))
4200 (home-page "https://metacpan.org/release/Plack-Middleware-Deflater")
4201 (synopsis "Compress response body with Gzip or Deflate")
4203 "Plack::Middleware::Deflater is a middleware to encode your response body
4204 in gzip or deflate, based on \"Accept-Encoding\" HTTP request header. It
4205 would save the bandwidth a little bit but should increase the Plack server
4206 load, so ideally you should handle this on the frontend reverse proxy
4208 (license license:perl-license)))
4210 (define-public perl-plack-middleware-fixmissingbodyinredirect
4212 (name "perl-plack-middleware-fixmissingbodyinredirect")
4217 (uri (string-append "mirror://cpan/authors/id/S/SW/SWEETKID/"
4218 "Plack-Middleware-FixMissingBodyInRedirect-"
4222 "14dkrmccq7a5vpymx5dv8032gfcvhsw2i6v5sh3c4ym5ymlx08kc"))))
4223 (build-system perl-build-system)
4225 `(("perl-html-parser" ,perl-html-parser) ;for HTML::Entities
4226 ("perl-http-message" ,perl-http-message)
4227 ("perl-plack" ,perl-plack))) ;for Plack::Test
4229 "https://metacpan.org/release/Plack-Middleware-FixMissingBodyInRedirect")
4230 (synopsis "Plack::Middleware which sets body for redirect response")
4231 (description "This module sets the body in redirect response, if it's not
4233 (license license:perl-license)))
4235 (define-public perl-plack-middleware-methodoverride
4237 (name "perl-plack-middleware-methodoverride")
4242 (uri (string-append "mirror://cpan/authors/id/M/MI/MIYAGAWA/"
4243 "Plack-Middleware-MethodOverride-"
4246 (base32 "1wdmmav3rbhv49zpw311zrxxqmg1fz3f3q9src0ypgs8zcp5myyv"))))
4247 (build-system perl-build-system)
4249 `(("perl-module-build" ,perl-module-build)))
4251 `(("perl-plack" ,perl-plack)))
4252 (home-page "https://metacpan.org/release/Plack-Middleware-MethodOverride")
4253 (synopsis "Override REST methods to Plack apps via POST")
4254 (description "This middleware allows for POST requests that pretend to be
4255 something else: by adding either a header named X-HTTP-Method-Override to the
4256 request, or a query parameter named x-tunneled-method to the URI, the client
4257 can say what method it actually meant.")
4258 (license license:perl-license)))
4260 (define-public perl-plack-middleware-removeredundantbody
4262 (name "perl-plack-middleware-removeredundantbody")
4267 (uri (string-append "mirror://cpan/authors/id/S/SW/SWEETKID/"
4268 "Plack-Middleware-RemoveRedundantBody-"
4271 (base32 "1hz3kgb5vw4r02gfk9i911f5ykvz55lrsx45bdcllk2bszal3f34"))))
4272 (build-system perl-build-system)
4274 `(("perl-plack" ,perl-plack)))
4276 "https://metacpan.org/release/Plack-Middleware-RemoveRedundantBody")
4277 (synopsis "Plack::Middleware which removes body for HTTP response")
4278 (description "This module removes the body in an HTTP response if it's not
4280 (license license:perl-license)))
4282 (define-public perl-plack-middleware-reverseproxy
4284 (name "perl-plack-middleware-reverseproxy")
4289 (uri (string-append "mirror://cpan/authors/id/M/MI/MIYAGAWA/"
4290 "Plack-Middleware-ReverseProxy-"
4293 (base32 "0a512n62pnk5ayj3zdzyj50iy1qi8nwh6ygks2h7nrh7gp9k2jc7"))))
4294 (build-system perl-build-system)
4296 `(("perl-module-install" ,perl-module-install)))
4298 `(("perl-plack" ,perl-plack)))
4299 (home-page "https://metacpan.org/release/Plack-Middleware-ReverseProxy")
4300 (synopsis "Supports app to run as a reverse proxy backend")
4301 (description "Plack::Middleware::ReverseProxy resets some HTTP headers,
4302 which are changed by reverse-proxy. You can specify the reverse proxy address
4303 and stop fake requests using @code{enable_if} directive in your app.psgi.")
4304 (license license:perl-license)))
4306 (define-public perl-plack-test-externalserver
4308 (name "perl-plack-test-externalserver")
4313 (uri (string-append "mirror://cpan/authors/id/E/ET/ETHER/"
4314 "Plack-Test-ExternalServer-" version ".tar.gz"))
4316 (base32 "1l1yj1l25679x7cbpd27ii7s1f1ajpkspif9xqnl21hczrbmrbsv"))))
4317 (build-system perl-build-system)
4319 `(("perl-plack" ,perl-plack)))
4320 (home-page "https://metacpan.org/release/Plack-Test-ExternalServer")
4321 (synopsis "Run HTTP tests on external live servers")
4322 (description "This module allows your to run your Plack::Test tests
4323 against an external server instead of just against a local application through
4324 either mocked HTTP or a locally spawned server.")
4325 (license license:perl-license)))
4327 (define-public perl-test-tcp
4329 (name "perl-test-tcp")
4334 (uri (string-append "mirror://cpan/authors/id/M/MI/MIYAGAWA/"
4335 "Test-TCP-" version ".tar.gz"))
4337 (base32 "0mvv9rqwrwlcfh8qrs0s47p85rhlnw15d4gbpyi802bddp0c6lry"))))
4338 (build-system perl-build-system)
4340 `(("perl-test-sharedfork" ,perl-test-sharedfork)))
4341 (arguments `(#:tests? #f)) ;related to signaling in t/05_sigint.t
4342 (home-page "https://metacpan.org/release/Test-TCP")
4343 (synopsis "Testing TCP programs")
4344 (description "Test::TCP is test utilities for TCP/IP programs.")
4345 (license license:perl-license)))
4347 (define-public perl-test-www-mechanize
4349 (name "perl-test-www-mechanize")
4354 (uri (string-append "mirror://cpan/authors/id/P/PE/PETDANCE/"
4355 "Test-WWW-Mechanize-" version ".tar.gz"))
4357 (base32 "1jsywlbxhqw39ij7s8vmgff5vys58vlfaq27072awacnxc65aal4"))))
4358 (build-system perl-build-system)
4360 `(("perl-carp-assert-more" ,perl-carp-assert-more)
4361 ("perl-html-form" ,perl-html-form)
4362 ("perl-html-lint" ,perl-html-lint)
4363 ("perl-http-server-simple" ,perl-http-server-simple)
4364 ("perl-libwww" ,perl-libwww)
4365 ("perl-test-longstring" ,perl-test-longstring)
4366 ("perl-www-mechanize" ,perl-www-mechanize)))
4367 (home-page "https://metacpan.org/release/Test-WWW-Mechanize")
4368 (synopsis "Testing-specific WWW::Mechanize subclass")
4369 (description "Test::WWW::Mechanize is a subclass of the Perl module
4370 WWW::Mechanize that incorporates features for web application testing.")
4371 (license license:artistic2.0)))
4373 (define-public perl-test-www-mechanize-catalyst
4375 (name "perl-test-www-mechanize-catalyst")
4380 (uri (string-append "mirror://cpan/authors/id/M/MS/MSTROUT/"
4381 "Test-WWW-Mechanize-Catalyst-" version ".tar.gz"))
4383 (base32 "1cdc2q16vs6fb335pzaislz2rx1ph9acaxyp7v5hv9xbwwddwfqq"))))
4384 (build-system perl-build-system)
4386 `(("perl-catalyst-plugin-session" ,perl-catalyst-plugin-session)
4387 ("perl-catalyst-plugin-session-state-cookie"
4388 ,perl-catalyst-plugin-session-state-cookie)
4389 ("perl-module-install" ,perl-module-install)
4390 ("perl-test-exception" ,perl-test-exception)
4391 ("perl-test-pod" ,perl-test-pod)
4392 ("perl-test-utf8" ,perl-test-utf8)))
4394 `(("perl-catalyst-runtime" ,perl-catalyst-runtime)
4395 ("perl-class-load" ,perl-class-load)
4396 ("perl-libwww" ,perl-libwww)
4397 ("perl-moose" ,perl-moose)
4398 ("perl-namespace-clean" ,perl-namespace-clean)
4399 ("perl-test-www-mechanize" ,perl-test-www-mechanize)
4400 ("perl-www-mechanize" ,perl-www-mechanize)))
4401 (home-page "https://metacpan.org/release/Test-WWW-Mechanize-Catalyst")
4402 (synopsis "Test::WWW::Mechanize for Catalyst")
4403 (description "The Test::WWW::Mechanize::Catalyst module meshes the
4404 Test::WWW:Mechanize module and the Catalyst web application framework to allow
4405 testing of Catalyst applications without needing to start up a web server.")
4406 (license license:perl-license)))
4408 (define-public perl-test-www-mechanize-psgi
4410 (name "perl-test-www-mechanize-psgi")
4415 (uri (string-append "mirror://cpan/authors/id/O/OA/OALDERS/"
4416 "Test-WWW-Mechanize-PSGI-" version ".tar.gz"))
4419 "0fsh2i05kf1kfavv2r9kmnjl7qlyqrd11ikc0qcqzzxsqzzjkg9r"))))
4420 (build-system perl-build-system)
4422 `(("perl-test-pod" ,perl-test-pod)))
4424 `(("perl-plack" ,perl-plack)
4425 ("perl-test-www-mechanize" ,perl-test-www-mechanize)))
4426 (home-page "https://metacpan.org/release/Test-WWW-Mechanize-PSGI")
4427 (synopsis "Test PSGI programs using WWW::Mechanize")
4428 (description "PSGI is a specification to decouple web server environments
4429 from web application framework code. Test::WWW::Mechanize is a subclass of
4430 WWW::Mechanize that incorporates features for web application testing. The
4431 Test::WWW::Mechanize::PSGI module meshes the two to allow easy testing of PSGI
4433 (license license:perl-license)))
4435 (define-public perl-uri
4441 (uri (string-append "mirror://cpan/authors/id/O/OA/OALDERS/"
4442 "URI-" version ".tar.gz"))
4445 "0gj1aj18k43kmzc3y1zhj5giinf8rksacf757r475xfna0fqxjdj"))))
4446 (build-system perl-build-system)
4449 `(("perl-test-needs" ,perl-test-needs)))
4450 (license license:perl-license)
4451 (synopsis "Perl Uniform Resource Identifiers (absolute and relative)")
4453 "The URI module implements the URI class. Objects of this class
4454 represent \"Uniform Resource Identifier references\" as specified in RFC 2396
4455 and updated by RFC 2732.")
4456 (home-page "https://metacpan.org/release/URI")))
4458 (define-public perl-uri-fetch
4460 (name "perl-uri-fetch")
4464 (uri (string-append "mirror://cpan/authors/id/N/NE/NEILB/"
4465 "URI-Fetch-" version ".tar.gz"))
4468 "0rw6xiqm70s218aii9id3hf8j3pz6n22xnwd8v9m1ff2bnh63c0d"))))
4469 (build-system perl-build-system)
4471 `(#:tests? #f)) ; Tests require internet connection to succeed
4473 `(("perl-class-errorhandler" ,perl-class-errorhandler)
4474 ("perl-libwww" ,perl-libwww)
4475 ("perl-uri" ,perl-uri)))
4476 (home-page "https://metacpan.org/release/URI-Fetch")
4477 (synopsis "Smart URI fetching/caching")
4478 (description "@code{URI::Fetch} is a smart client for fetching HTTP pages,
4479 notably syndication feeds (RSS, Atom, and others), in an intelligent, bandwidth-
4480 and time-saving way.")
4481 (license license:perl-license)))
4483 (define-public perl-uri-find
4485 (name "perl-uri-find")
4486 (version "20160806")
4490 (uri (string-append "mirror://cpan/authors/id/M/MS/MSCHWERN/"
4491 "URI-Find-" version ".tar.gz"))
4494 "1mk3jv8x0mcq3ajrn9garnxd0jc7sw4pkwqi88r5apqvlljs84z2"))))
4495 (build-system perl-build-system)
4497 `(("perl-module-build" ,perl-module-build)))
4499 `(("perl-uri" ,perl-uri)))
4500 (home-page "https://metacpan.org/release/URI-Find")
4501 (synopsis "Find URIs in arbitrary text")
4502 (description "This module finds URIs and URLs (according to what URI.pm
4503 considers a URI) in plain text. It only finds URIs which include a
4504 scheme (http:// or the like), for something a bit less strict, consider
4505 URI::Find::Schemeless. For a command-line interface, urifind is provided.")
4506 (license license:perl-license)))
4508 (define-public perl-uri-ws
4510 (name "perl-uri-ws")
4515 (uri (string-append "mirror://cpan/authors/id/P/PL/PLICEASE/"
4516 "URI-ws-" version ".tar.gz"))
4519 "1vs1wm80sq685944g1l4a0fxcbccc00c0f9648yabdmcf90hwsvf"))))
4520 (build-system perl-build-system)
4522 `(("perl-uri" ,perl-uri)))
4523 (home-page "https://metacpan.org/release/URI-ws")
4524 (synopsis "WebSocket support for URI package")
4525 (description "With this module, the URI package provides the same set of
4526 methods for WebSocket URIs as it does for HTTP URIs.")
4527 (license license:perl-license)))
4529 (define-public perl-uri-template
4531 (name "perl-uri-template")
4535 (uri (string-append "mirror://cpan/authors/id/B/BR/BRICAS/URI-Template-"
4539 "1phibcmam2hklrddzj79l43va1gcqpyszbw21ynxq53ynmhjvbk8"))))
4540 (build-system perl-build-system)
4542 `(("perl-uri" ,perl-uri)))
4544 `(("perl-test-pod-coverage" ,perl-test-pod-coverage)
4545 ("perl-test-pod" ,perl-test-pod)
4546 ("perl-module-install" ,perl-module-install)
4547 ("perl-json" ,perl-json)))
4548 (home-page "https://metacpan.org/release/URI-Template")
4549 (synopsis "Object for handling URI templates")
4550 (description "This perl module provides a wrapper around URI templates as described in
4552 (license license:perl-license)))
4554 (define-public perl-www-curl
4556 (name "perl-www-curl")
4561 "mirror://cpan/authors/id/S/SZ/SZBALINT/WWW-Curl-"
4563 (patches (search-patches "perl-www-curl-fix-struct-void.patch"
4564 "perl-www-curl-remove-symbol.patch"))
4567 "1fmp9aib1kaps9vhs4dwxn7b15kgnlz9f714bxvqsd1j1q8spzsj"))))
4568 (build-system perl-build-system)
4570 '(#:tests? #f ;XXX: tests require network access
4571 #:phases (modify-phases %standard-phases
4572 (add-before 'configure 'set-search-path
4574 ;; Work around "dotless @INC" build failure.
4576 (string-append (getcwd) ":"
4577 (getenv "PERL5LIB")))
4580 `(("perl-module-install" ,perl-module-install)))
4581 (inputs `(("curl" ,curl)))
4582 (synopsis "Perl extension interface for libcurl")
4584 "This is a Perl extension interface for the libcurl file downloading
4586 (license license:perl-license)
4587 (home-page "https://metacpan.org/release/WWW-Curl")))
4589 (define-public perl-www-mechanize
4591 (name "perl-www-mechanize")
4596 (uri (string-append "mirror://cpan/authors/id/O/OA/OALDERS/"
4597 "WWW-Mechanize-" version ".tar.gz"))
4599 (base32 "0cb14m1vhaf0mgn2fqwi5hm72xhfi77hpq2g57swgy0w83x7m27b"))))
4600 (build-system perl-build-system)
4601 (native-inputs ;only for tests
4602 `(("perl-cgi" ,perl-cgi)
4603 ("perl-test-deep" ,perl-test-deep)
4604 ("perl-test-fatal" ,perl-test-fatal)
4605 ("perl-test-output" ,perl-test-output)
4606 ("perl-test-warnings" ,perl-test-warnings)))
4608 `(("perl-html-form" ,perl-html-form)
4609 ("perl-html-parser" ,perl-html-parser)
4610 ("perl-html-tree" ,perl-html-tree)
4611 ("perl-http-message" ,perl-http-message)
4612 ("perl-http-server-simple" ,perl-http-server-simple)
4613 ("perl-libwww" ,perl-libwww)
4614 ("perl-test-warn" ,perl-test-warn)
4615 ("perl-uri" ,perl-uri)))
4616 (home-page "https://metacpan.org/release/WWW-Mechanize")
4617 (synopsis "Web browsing in a Perl object")
4618 (description "WWW::Mechanize is a Perl module for stateful programmatic
4619 web browsing, used for automating interaction with websites.")
4620 (license license:perl-license)))
4622 (define-public perl-www-opensearch
4624 (name "perl-www-opensearch")
4628 (uri (string-append "mirror://cpan/authors/id/B/BR/BRICAS/"
4629 "WWW-OpenSearch-" version ".tar.gz"))
4632 "1yxplx1q1qk2fvnzqrbk01lz26fy1lyhay51a3ky7q3jgh9p01rb"))))
4633 (build-system perl-build-system)
4635 `(("perl-class-errorhandler" ,perl-class-errorhandler)
4636 ("perl-datetime" ,perl-datetime)
4637 ("perl-datetime-format-mail" ,perl-datetime-format-mail)
4638 ("perl-datetime-format-w3cdtf" ,perl-datetime-format-w3cdtf)
4639 ("perl-feed-find" ,perl-feed-find)
4640 ("perl-module-install" ,perl-module-install)
4641 ("perl-module-pluggable" ,perl-module-pluggable)
4642 ("perl-uri-fetch" ,perl-uri-fetch)
4643 ("perl-test-simple" ,perl-test-simple)
4644 ("perl-xml-atom" ,perl-xml-atom)
4645 ("perl-xml-rss" ,perl-xml-rss)))
4647 `(("perl-data-page" ,perl-data-page)
4648 ("perl-libwww" ,perl-libwww)
4649 ("perl-uri" ,perl-uri)
4650 ("perl-uri-template" ,perl-uri-template)
4651 ("perl-xml-feed" ,perl-xml-feed)
4652 ("perl-xml-libxml" ,perl-xml-libxml)))
4653 (home-page "https://metacpan.org/release/WWW-OpenSearch")
4654 (synopsis "Search A9 OpenSearch compatible engines")
4656 "@code{WWW::OpenSearch} is a module to search @url{A9's OpenSearch,
4657 http://opensearch.a9.com} compatible search engines.")
4658 (license license:perl-license)))
4660 (define-public perl-www-robotrules
4662 (name "perl-www-robotrules")
4667 "mirror://cpan/authors/id/G/GA/GAAS/WWW-RobotRules-"
4671 "07m50dp5n5jxv3m93i55qvnd67a6g7cvbvlik115kmc8lbkh5da6"))))
4672 (build-system perl-build-system)
4674 `(("perl-uri" ,perl-uri)))
4675 (license license:perl-license)
4676 (synopsis "Perl database of robots.txt-derived permissions")
4678 "The WWW::RobotRules module parses /robots.txt files as specified in
4679 \"A Standard for Robot Exclusion\", at
4680 <http://www.robotstxt.org/wc/norobots.html>. Webmasters can use the
4681 /robots.txt file to forbid conforming robots from accessing parts of
4683 (home-page "https://metacpan.org/release/WWW-RobotRules")))
4685 (define-public python-feedparser
4687 (name "python-feedparser")
4692 (uri (pypi-uri "feedparser" version ".tar.bz2"))
4695 "00hb4qg2am06g81mygfi1jsbx8830024jm45g6qp9g8fr6am91yf"))))
4696 (build-system python-build-system)
4700 "https://github.com/kurtmckee/feedparser")
4701 (synopsis "Parse feeds in Python")
4703 "Universal feed parser which handles RSS 0.9x, RSS 1.0, RSS 2.0,
4704 CDF, Atom 0.3, and Atom 1.0 feeds.")
4705 (license (list license:bsd-2 ; source code
4706 license:freebsd-doc)))) ; documentation
4708 (define-public python2-feedparser
4709 (package-with-python2 python-feedparser))
4711 (define-public guix-data-service
4712 (let ((commit "b7ba8d0c2ca3aca9ba5b5f9f27b9778ee949d20e")
4715 (name "guix-data-service")
4716 (version (string-append "0.0.1-" revision "." (string-take commit 7)))
4720 (url "https://git.savannah.gnu.org/git/guix/data-service.git/")
4722 (file-name (git-file-name name version))
4725 "0brv64bsqysl7dncz067blwvmqrlx99c2kwrgpz6k0nqv8nzsa28"))))
4726 (build-system gnu-build-system)
4728 '(#:modules ((guix build utils)
4729 (guix build gnu-build-system)
4734 #:test-target "check-with-tmp-database"
4736 (modify-phases %standard-phases
4737 (add-before 'build 'set-GUILE_AUTO_COMPILE
4739 ;; To avoid warnings relating to 'guild'.
4740 (setenv "GUILE_AUTO_COMPILE" "0")
4742 (add-after 'install 'wrap-executable
4743 (lambda* (#:key inputs outputs #:allow-other-keys)
4744 (let* ((out (assoc-ref outputs "out"))
4745 (bin (string-append out "/bin"))
4746 (guile (assoc-ref inputs "guile"))
4747 (guile-effective-version
4749 (open-pipe* OPEN_READ
4750 (string-append guile "/bin/guile")
4751 "-c" "(display (effective-version))")))
4752 (scm (string-append out "/share/guile/site/"
4753 guile-effective-version))
4754 (go (string-append out "/lib/guile/"
4755 guile-effective-version
4759 (simple-format (current-error-port)
4761 (string-append bin "/" file))
4762 (wrap-program (string-append bin "/" file)
4766 (map (lambda (input)
4768 (assoc-ref inputs input)
4773 `("GUILE_LOAD_PATH" ":" prefix
4774 (,scm ,(getenv "GUILE_LOAD_PATH")))
4775 `("GUILE_LOAD_COMPILED_PATH" ":" prefix
4776 (,go ,(getenv "GUILE_LOAD_COMPILED_PATH")))))
4782 (delete 'strip)))) ; As the .go files aren't compatible
4784 `(("guix" ,guile3.0-guix)
4785 ("guile-fibers" ,guile3.0-fibers)
4786 ("guile-json" ,guile3.0-json)
4787 ("guile-email" ,guile3.0-email)
4788 ("guile-prometheus" ,guile-prometheus)
4789 ("guile-squee" ,guile3.0-squee)
4790 ("ephemeralpg" ,ephemeralpg)
4791 ("util-linux" ,util-linux)
4792 ("postgresql" ,postgresql-11)
4793 ("sqitch" ,sqitch)))
4795 `(("guile" ,@(assoc-ref (package-native-inputs guix) "guile"))
4796 ("autoconf" ,autoconf)
4797 ("automake" ,automake)
4798 ("emacs-minimal" ,emacs-minimal)
4799 ("emacs-htmlize" ,emacs-htmlize)
4800 ("pkg-config" ,pkg-config)))
4801 (synopsis "Store and provide data about GNU Guix")
4803 "The Guix Data Service stores data about GNU Guix, and provides this
4804 through a web interface. It supports listening to the guix-commits mailing
4805 list to find out about new revisions, then loads the data from these in to a
4806 PostgreSQL database.")
4807 (home-page "https://data.guix.gnu.org/")
4808 (license license:agpl3+))))
4810 (define-public gumbo-parser
4812 (name "gumbo-parser")
4817 (url "https://github.com/google/gumbo-parser")
4818 (commit (string-append "v" version))))
4819 (file-name (git-file-name name version))
4822 "0xslckwdh2i0g2qjsb6rnm8mjmbagvziz0hjlf7d1lbljfms1iw1"))))
4823 (build-system gnu-build-system)
4825 `(#:tests? #f)) ;tests require bundling googletest sources
4826 ;; The release tarball lacks the generated files.
4828 `(("autoconf" ,autoconf)
4829 ("automake" ,automake)
4830 ("libtool" ,libtool)))
4831 (home-page "https://github.com/google/gumbo-parser")
4832 (synopsis "HTML5 parsing library")
4834 "Gumbo is an implementation of the HTML5 parsing algorithm implemented as
4835 a pure C99 library.")
4836 (license license:asl2.0)))
4838 (define-public uwsgi
4844 (uri (string-append "https://projects.unbit.it/downloads/uwsgi-"
4848 "10zmk4npknigmbqcq1wmhd461dk93159px172112vyq0i19sqwj9"))))
4849 (build-system gnu-build-system)
4850 (outputs '("out" "python"))
4852 '(;; XXX: The 'check' target runs cppcheck to do static code analysis.
4853 ;; But there is no obvious way to run the real tests.
4856 (modify-phases %standard-phases
4858 ;; Configuration is done by writing an ini file.
4859 (lambda* (#:key outputs #:allow-other-keys)
4860 (let* ((out (assoc-ref outputs "out"))
4861 (bindir (string-append out "/bin"))
4862 (plugindir (string-append out "/lib/uwsgi")))
4863 ;; The build phase outputs files to these directories directly.
4866 ;; XXX: Enable other plugins.
4867 (call-with-output-file "buildconf/guix.ini"
4869 (format port "[uwsgi]
4875 plugins = cgi,python
4877 " bindir plugindir))))
4878 (setenv "PROFILE" "guix")
4881 ;; Move plugins into their own output.
4882 (lambda* (#:key outputs #:allow-other-keys)
4883 (let* ((out (assoc-ref outputs "out"))
4884 (plugindir (string-append out "/lib/uwsgi"))
4885 (python-plugin (string-append
4886 plugindir "/python_plugin.so")))
4887 (install-file python-plugin
4889 (assoc-ref outputs "python") "/lib/uwsgi"))
4890 (delete-file python-plugin)
4893 `(("pkg-config" ,pkg-config)
4894 ("python" ,python-wrapper)))
4896 `(("jansson" ,jansson)
4897 ("libxml2" ,libxml2)
4898 ("libyaml" ,libyaml)
4899 ("openssl" ,openssl)
4903 ("python" ,python)))
4904 (home-page "https://uwsgi-docs.readthedocs.org/")
4905 (synopsis "Application container server")
4907 "uWSGI presents a complete stack for networked/clustered web applications,
4908 implementing message/object passing, caching, RPC and process management.
4909 It uses the uwsgi protocol for all the networking/interprocess communications.")
4910 (license license:gpl2+))) ; with linking exception
4919 (uri (string-append "https://github.com/stedolan/jq"
4920 "/releases/download/jq-" version
4921 "/jq-" version ".tar.gz"))
4923 (base32 "0wmapfskhzfwranf6515nzmm84r7kwljgfs7dg6bjgxakbicis2x"))
4924 (modules '((guix build utils)))
4927 ;; Remove bundled onigurama.
4928 (delete-file-recursively "modules")
4931 `(("oniguruma" ,oniguruma)))
4933 `(;; TODO fix gems to generate documentation
4935 ;;("bundler" ,bundler)
4936 ("valgrind" ,valgrind)))
4937 (build-system gnu-build-system)
4938 (home-page "https://stedolan.github.io/jq/")
4939 (synopsis "Command-line JSON processor")
4940 (description "jq is like sed for JSON data – you can use it to slice and
4941 filter and map and transform structured data with the same ease that sed, awk,
4942 grep and friends let you play with text. It is written in portable C. jq can
4943 mangle the data format that you have into the one that you want with very
4944 little effort, and the program to do so is often shorter and simpler than
4946 (license (list license:expat license:cc-by3.0))))
4949 (let ((revision "1")
4950 (commit "681d7bb639334bf485476f5872c5bdab10931f9a"))
4953 (version (git-version "0.4.0" revision commit))
4958 (url "https://github.com/ericchiang/pup")
4960 (file-name (git-file-name name version))
4962 (base32 "1hx1k0qlc1bq6gg5d4yprn4d7kvqzagg6mi5mvb39zdq6c4y17vr"))))
4963 (build-system go-build-system)
4965 `(#:import-path "github.com/ericchiang/pup"))
4966 (home-page "https://github.com/ericchiang/pup")
4967 (synopsis "Parse HTML at the command line")
4969 "@command{pup} is a command line tool for processing HTML. It reads
4970 from stdin, prints to stdout, and allows the user to filter parts of the page
4971 using CSS selectors. Inspired by @command{jq}, @command{pup} aims to be a
4972 fast and flexible way of exploring HTML from the terminal.")
4973 (license license:expat))))
4975 (define-public uhttpmock
4982 (uri (string-append "https://tecnocode.co.uk/downloads/uhttpmock/"
4983 "uhttpmock-" version ".tar.xz"))
4985 (base32 "0bqizz69hxk8rn4z57asz1d45vizl1rj6i5k3rzxn2x3qcik514h"))))
4986 (build-system glib-or-gtk-build-system)
4988 `(("gobject-introspection" ,gobject-introspection)
4990 ("glib-networking" ,glib-networking)
4991 ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
4992 ("pkg-config" ,pkg-config)))
4994 `(("libsoup" ,libsoup)))
4995 (home-page "https://gitlab.com/groups/uhttpmock")
4996 (synopsis "Library for mocking web service APIs which use HTTP or HTTPS")
4998 "Uhttpmock is a project for mocking web service APIs which use HTTP or
4999 HTTPS. It provides a library, libuhttpmock, which implements recording and
5000 playback of HTTP request/response traces.")
5001 (license license:lgpl2.1+)))
5006 (version "2012-05-31")
5010 "http://www.home.unix-ag.org/simon/woof-"
5014 "0wjmjhpg6xlid33yi59j47q2qadz20sijrqsjahj30vngz856hyq"))))
5015 (build-system trivial-build-system)
5017 '(#:modules ((guix build utils))
5020 (use-modules (guix build utils))
5021 (let* ((source (assoc-ref %build-inputs "source"))
5022 (out (assoc-ref %outputs "out"))
5023 (bin (string-append out "/bin"))
5024 (python (assoc-ref %build-inputs "python")))
5026 (with-directory-excursion bin
5027 (copy-file source "woof")
5028 (patch-shebang "woof" (list (string-append python "/bin")))
5029 (chmod "woof" #o555))
5031 (inputs `(("python" ,python-2)))
5032 (home-page "http://www.home.unix-ag.org/simon/woof.html")
5033 (synopsis "Single file web server")
5034 (description "Woof (Web Offer One File) is a small simple web server that
5035 can easily be invoked on a single file. Your partner can access the file with
5036 tools they trust (e.g. wget).")
5037 (license license:gpl2+)))
5039 (define netsurf-buildsystem
5041 (name "netsurf-buildsystem")
5046 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5047 "buildsystem-" version ".tar.gz"))
5050 "0alsmaig9ln8dgllb3z63gq90fiz75jz0ic71fi0k0k898qix14k"))))
5051 (build-system gnu-build-system)
5052 (inputs `(("perl" ,perl)))
5054 '(#:make-flags (list (string-append "PREFIX=" %output))
5055 #:tests? #f ;no tests
5056 #:phases (modify-phases %standard-phases
5059 (home-page "https://www.netsurf-browser.org")
5060 (synopsis "Build system for the Netsurf project")
5062 "This package provides the shared build system for Netsurf project
5064 (license license:expat)))
5066 (define netsurf-buildsystem-arguments
5067 `(#:make-flags `("COMPONENT_TYPE=lib-shared"
5068 "CC=gcc" "BUILD_CC=gcc"
5069 ,(string-append "PREFIX=" %output)
5070 ,(string-append "NSSHARED="
5071 (assoc-ref %build-inputs
5072 "netsurf-buildsystem")
5073 "/share/netsurf-buildsystem"))
5074 #:test-target "test"
5075 #:phases (modify-phases %standard-phases
5076 (delete 'configure))))
5078 (define-public libparserutils
5080 (name "libparserutils")
5085 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5086 name "-" version "-src.tar.gz"))
5089 "1n2794y2l0c8nv8z2pxwfnbn882987ifmxjv60zdxkhcndhswarj"))))
5090 (build-system gnu-build-system)
5092 `(("netsurf-buildsystem" ,netsurf-buildsystem)
5093 ("pkg-config" ,pkg-config)
5094 ("perl" ,perl))) ;for test harness
5095 (arguments netsurf-buildsystem-arguments)
5096 (home-page "https://www.netsurf-browser.org/projects/libparserutils/")
5097 (synopsis "Parser building library")
5099 "LibParserUtils is a library for building efficient parsers, written in
5100 C. It is developed as part of the NetSurf project.")
5101 (license license:expat)))
5103 (define-public hubbub
5110 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5111 "libhubbub-" version "-src.tar.gz"))
5114 "1dimfyblmym98qa1b80c5jslv2zk8r44xbdrgrsrw1n9wr9y4yly"))
5115 (patches (search-patches "hubbub-sort-entities.patch"))))
5116 (build-system gnu-build-system)
5118 `(("netsurf-buildsystem" ,netsurf-buildsystem)
5119 ("pkg-config" ,pkg-config)
5120 ("doxygen" ,doxygen)
5121 ("json-c" ,json-c-0.12) ; check whether json-c-0.12 can be removed
5124 `(("libparserutils" ,libparserutils))) ;for libhubbub.pc
5125 (arguments netsurf-buildsystem-arguments)
5126 (home-page "https://www.netsurf-browser.org/projects/hubbub/")
5127 (synopsis "HTML5 compliant parsing library")
5129 "Hubbub is an HTML5 compliant parsing library, written in C, which can
5130 parse both valid and invalid web content. It is developed as part of the
5132 (license license:expat)))
5134 (define-public ikiwiki
5137 (version "3.20200202.3")
5142 (url "git://git.ikiwiki.info/")
5144 (file-name (git-file-name name version))
5147 "0fphyqzlk9y8v9s89ypsmrnbhyymzrpc2w0liy0n4knc7kk2pabq"))
5150 ;; The POT file requires write permission during the build
5152 (chmod "po/ikiwiki.pot" #o644)
5154 (build-system perl-build-system)
5157 (modify-phases %standard-phases
5158 (add-after 'patch-source-shebangs 'patch-Makefiles
5160 (substitute* "Makefile.PL"
5161 (("SYSCONFDIR\\?=") "SYSCONFDIR?=$(PREFIX)"))
5162 (with-directory-excursion "po"
5163 (substitute* "Makefile"
5164 (("PERL5LIB=") "PERL5LIB=${PERL5LIB}:")))
5166 (add-before 'build 'set-modification-times
5167 ;; The wiki '--refresh' steps, which are executed during
5168 ;; the check phase, require recent timestamps on files in
5169 ;; the 'doc' and 'underlays' directories.
5171 (invoke "find" "doc" "underlays" "-type" "f" "-exec"
5174 (add-before 'check 'pre-check
5175 (lambda* (#:key inputs #:allow-other-keys)
5176 ;; Six tests use IPC::Run. For these tests the PERL5LIB
5177 ;; variable is needed in the runtime environment and also
5178 ;; in the search path list in the setup file.
5180 '("t/aggregate-file.t" "t/git-cgi.t" "t/git-untrusted.t"
5181 "t/passwordauth.t" "t/relativity.t" "t/wrapper-environ.t")
5182 (("(.*)\"perl\"(.*)$" _ prefix suffix)
5183 (string-append prefix "qw(env), 'PERL5LIB='.$ENV{PERL5LIB}"
5184 ", qw(perl)" suffix))
5185 (("(.*) PERL5LIB=(.*) perl(.*)$" _ prefix middle suffix)
5186 (string-append prefix "), 'PERL5LIB='.$ENV{PERL5LIB}.':"
5187 middle "', qw(perl" suffix))
5188 (("(.*)setup(.* )getcwd(.*)$" _ prefix middle suffix)
5189 (string-append prefix "setup" middle
5190 "$ENV{PERL5LIB}.':'.getcwd" suffix))
5191 (("^ENV(.*): '(.*)$" _ middle suffix)
5192 (string-append "ENV" middle
5193 ": '$ENV{PERL5LIB}:" suffix)))
5194 ;; XDG_DATA_DIRS is needed by the podcast.t test.
5195 (setenv "XDG_DATA_DIRS"
5196 (string-append (assoc-ref inputs "shared-mime-info")
5198 ;; CC is needed by IkiWiki/Wrapper.pm.
5201 (add-after 'install 'wrap-programs
5202 (lambda* (#:key outputs #:allow-other-keys)
5203 (let* ((out (assoc-ref outputs "out"))
5204 (bin (string-append out "/bin/"))
5205 (path (getenv "PERL5LIB")))
5206 (for-each (lambda (file)
5208 `("PERL5LIB" ":" prefix (,path))))
5213 ("gettext" ,gettext-minimal)
5214 ("subversion" ,subversion)
5218 ("mercurial" ,mercurial)))
5220 `(("python" ,python-wrapper)
5221 ("perl-authen-passphrase" ,perl-authen-passphrase)
5222 ("perl-cgi-simple" ,perl-cgi-simple)
5223 ("perl-db-file" ,perl-db-file)
5224 ("perl-file-mimeinfo" ,perl-file-mimeinfo)
5225 ("perl-html-tagset" ,perl-html-tagset)
5226 ("perl-image-magick" ,perl-image-magick)
5227 ("perl-ipc-run" ,perl-ipc-run)
5228 ("perl-lwpx-paranoidagent" ,perl-lwpx-paranoidagent)
5229 ("perl-xml-feed" ,perl-xml-feed)
5230 ("perl-xml-sax" ,perl-xml-sax)
5231 ("perl-xml-twig" ,perl-xml-twig)
5232 ("perl-yaml-tiny" ,perl-yaml-tiny)
5235 `(("perl-cgi-formbuilder" ,perl-cgi-formbuilder)
5236 ("perl-cgi-session" ,perl-cgi-session)
5237 ("perl-html-parser" ,perl-html-parser)
5238 ("perl-html-scrubber" ,perl-html-scrubber)
5239 ("perl-html-template" ,perl-html-template)
5240 ("perl-json" ,perl-json)
5241 ("perl-mail-sendmail" ,perl-mail-sendmail)
5242 ("perl-text-markdown-discount" ,perl-text-markdown-discount)
5243 ("perl-timedate" ,perl-timedate)
5244 ("perl-uri" ,perl-uri)
5245 ("perl-xml-simple" ,perl-xml-simple)
5246 ("perl-yaml-libyaml" ,perl-yaml-libyaml)))
5247 (home-page "https://ikiwiki.info/")
5248 (synopsis "Wiki compiler, capable of generating HTML")
5250 "Ikiwiki is a wiki compiler, capable of generating a static set of web
5251 pages, but also incorporating dynamic features like a web based editor and
5253 (license license:gpl2+)))
5255 (define-public libwapcaplet
5257 (name "libwapcaplet")
5262 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5263 "libwapcaplet-" version "-src.tar.gz"))
5266 "0p0c2q9lsj4vs97aa7vjllfhw33zv3dpysdkjblzhib6dpfs2alv"))))
5267 (build-system gnu-build-system)
5269 `(("netsurf-buildsystem" ,netsurf-buildsystem)
5270 ("pkg-config" ,pkg-config)
5271 ("check" ,check-0.14))) ;for tests
5272 (arguments netsurf-buildsystem-arguments)
5273 (home-page "https://www.netsurf-browser.org/projects/libwapcaplet/")
5274 (synopsis "String internment library")
5276 "LibWapcaplet provides a reference counted string internment system
5277 designed to store small strings and allow rapid comparison of them. It is
5278 developed as part of the Netsurf project.")
5279 (license license:expat)))
5281 (define-public libcss
5288 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5289 "libcss-" version "-src.tar.gz"))
5292 "1p66sdiiqm7w4jkq23hsf08khsnmq93hshh9f9m8sbirjdpf3p6j"))))
5293 (build-system gnu-build-system)
5295 `(("netsurf-buildsystem" ,netsurf-buildsystem)
5296 ("pkg-config" ,pkg-config)
5298 (propagated-inputs ;needed for libcss.pc
5299 `(("libparserutils" ,libparserutils)
5300 ("libwapcaplet" ,libwapcaplet)))
5301 (arguments netsurf-buildsystem-arguments)
5302 (home-page "https://www.netsurf-browser.org/projects/libcss/")
5303 (synopsis "CSS parser and selection library")
5305 "LibCSS is a CSS (Cascading Style Sheet) parser and selection engine,
5306 written in C. It is developed as part of the NetSurf project.")
5307 (license license:expat)))
5309 (define-public libcyaml
5317 (url "https://github.com/tlsa/libcyaml")
5318 (commit (string-append "v" version))))
5319 (file-name (git-file-name name version))
5320 (patches (search-patches "libcyaml-libyaml-compat.patch"))
5322 (base32 "0428p0rwq71nhh5nzcbapsbrjxa0x5l6h6ns32nxv7j624f0zd93"))))
5323 (build-system gnu-build-system)
5326 (list (string-append "PREFIX=" (assoc-ref %outputs "out"))
5327 (string-append "CC=gcc"))
5329 (modify-phases %standard-phases
5330 (delete 'configure) ; no configure script
5334 (invoke "make" "test"))))))
5336 `(("libyaml" ,libyaml)))
5338 `(("pkg-config" ,pkg-config)))
5339 (synopsis "C library for reading and writing YAML")
5341 "LibCYAML is a C library written in ISO C11 for reading and writing
5342 structured YAML documents. The fundamental idea behind CYAML is to allow
5343 applications to construct schemas which describe both the permissible
5344 structure of the YAML documents to read/write, and the C data structure(s)
5345 in which the loaded data is arranged in memory.")
5346 (home-page "https://github.com/tlsa/libcyaml")
5347 (license license:isc)))
5349 (define-public libdom
5356 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5357 "libdom-" version "-src.tar.gz"))
5360 "0jpg5hx3y0mdxk5szd47dyijqimd2321brbqk2620pp5f4j0gvlq"))))
5361 (build-system gnu-build-system)
5363 `(("netsurf-buildsystem" ,netsurf-buildsystem)
5364 ("pkg-config" ,pkg-config)
5365 ("perl" ,perl) ;for test harness
5366 ("perl-libxml" ,perl-libxml)
5367 ("perl-switch" ,perl-switch)
5368 ("perl-xml-xpath" ,perl-xml-xpath)))
5370 `(("libparserutils" ,libparserutils)
5371 ("libwapcaplet" ,libwapcaplet)))
5373 `(("expat" ,expat) ;needed for headers and linking
5374 ("hubbub" ,hubbub))) ;for libdom.pc
5376 `(#:tests? #f ;TODO: re-enable. tests take a looong time.
5377 ,@netsurf-buildsystem-arguments))
5378 (home-page "https://www.netsurf-browser.org/projects/libdom/")
5379 (synopsis "Implementation of the W3C DOM")
5381 "LibDOM is an implementation of the W3C DOM, written in C. It is
5382 developed as part of the NetSurf project.")
5383 (license license:expat)))
5385 (define-public libsvgtiny
5392 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5393 name "-" version "-src.tar.gz"))
5396 "10bpkmvfpydj74im3r6kqm9vnvgib6afy0alx71q5n0w5yawy39c"))))
5397 (build-system gnu-build-system)
5399 `(("netsurf-buildsystem" ,netsurf-buildsystem)
5400 ("pkg-config" ,pkg-config)
5401 ("gperf" ,gperf-3.0)))
5403 `(("libwapcaplet" ,libwapcaplet)))
5405 `(("libdom" ,libdom))) ;for libsvgtiny.pc
5406 (arguments netsurf-buildsystem-arguments)
5407 (home-page "https://www.netsurf-browser.org/projects/libsvgtiny/")
5408 (synopsis "Library for parsing SVG files")
5410 "Libsvgtiny takes some SVG as input and returns a list of paths and texts
5411 which can be rendered easily, as defined in
5412 @url{http://www.w3.org/TR/SVGMobile/}. It is developed as part of the NetSurf
5414 (license license:expat)))
5416 (define-public libnsbmp
5423 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5424 name "-" version "-src.tar.gz"))
5427 "0krjg69a2amxjsahdgm3wmy9ngnyr3gfs2a1zhdlbvb0z1jr7i3r"))))
5428 (build-system gnu-build-system)
5430 `(("netsurf-buildsystem" ,netsurf-buildsystem)))
5431 (arguments netsurf-buildsystem-arguments)
5432 (home-page "https://www.netsurf-browser.org/projects/libnsbmp/")
5433 (synopsis "Decoding library for BMP and ICO files")
5435 "Libnsbmp is a decoding library for BMP and ICO image file formats,
5436 written in C. It is developed as part of the NetSurf project.")
5437 (license license:expat)))
5439 (define-public libnsgif
5446 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5447 name "-" version "-src.tar.gz"))
5450 "0jwshypgmx16xlsbx3d8njk8a5khazlplca5mxd3rdbhrlsabbly"))))
5451 (build-system gnu-build-system)
5453 `(("netsurf-buildsystem" ,netsurf-buildsystem)))
5454 (arguments netsurf-buildsystem-arguments)
5455 (home-page "https://www.netsurf-browser.org/projects/libnsgif/")
5456 (synopsis "Decoding library for GIF files")
5458 "Libnsgif is a decoding library for the GIF image file format, written in
5459 C. It is developed as part of the NetSurf project.")
5460 (license license:expat)))
5462 (define-public libnslog
5469 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5470 "libnslog-" version "-src.tar.gz"))
5473 "1l2k0kdv9iv18svhv360vszjavhl4g09cp8a8yb719pgsylxr67w"))))
5474 (build-system gnu-build-system)
5476 `(("netsurf-buildsystem" ,netsurf-buildsystem)
5477 ("pkg-config" ,pkg-config)
5478 ("check" ,check) ; For tests
5481 (arguments netsurf-buildsystem-arguments)
5482 (home-page "https://www.netsurf-browser.org/")
5483 (synopsis "Logging library")
5485 "Libnslog provides a category-based logging library which supports
5486 complex logging filters, multiple log levels, and provides context through to
5487 client applications. It is developed as part of the NetSurf project.")
5488 (license license:expat)))
5490 (define-public libnsutils
5497 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5498 name "-" version "-src.tar.gz"))
5501 "1w5fyy2i60a3v3if3iqcn9sy9sycx6966rcx53v85gja6hb6a33r"))))
5502 (build-system gnu-build-system)
5504 `(("netsurf-buildsystem" ,netsurf-buildsystem)))
5505 (arguments netsurf-buildsystem-arguments)
5506 (home-page "https://www.netsurf-browser.org/")
5507 (synopsis "Utility library for NetSurf")
5509 "Libnsutils provides a small number of useful utility routines. It is
5510 developed as part of the NetSurf project.")
5511 (license license:expat)))
5513 (define-public libnspsl
5520 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5521 "libnspsl-" version "-src.tar.gz"))
5524 "02q28n5i6fwqcz1nn167rb71k1q95mx38mfah6zi1lvqrc2q5ifk"))))
5525 (build-system gnu-build-system)
5527 `(("netsurf-buildsystem" ,netsurf-buildsystem)))
5528 (arguments netsurf-buildsystem-arguments)
5529 (home-page "https://www.netsurf-browser.org/")
5530 (synopsis "Library to generate a static Public Suffix List")
5532 "Libnspsl is a library to generate a static code representation of the
5533 Public Suffix List. It is developed as part of the NetSurf project.")
5534 (license license:expat)))
5536 (define-public nsgenbind
5543 (uri (string-append "https://download.netsurf-browser.org/libs/releases/"
5544 "nsgenbind-" version "-src.tar.gz"))
5547 "1cqwgwca49jvmijwiyaab2bwxicgxdrnlpinf8kp3nha02nm73ad"))))
5548 (build-system gnu-build-system)
5550 `(("netsurf-buildsystem" ,netsurf-buildsystem)
5554 (substitute-keyword-arguments netsurf-buildsystem-arguments
5555 ((#:make-flags flags)
5556 `(delete "COMPONENT_TYPE=lib-shared" ,flags))))
5557 (home-page "https://www.netsurf-browser.org/")
5558 (synopsis "Generate JavaScript to DOM bindings")
5560 "@code{nsgenbind} is a tool to generate JavaScript to DOM bindings from
5561 w3c webidl files and a binding configuration file.")
5562 (license license:expat)))
5564 (define-public netsurf
5571 (uri (string-append "https://download.netsurf-browser.org/netsurf/"
5572 "releases/source/netsurf-" version "-src.tar.gz"))
5575 "0plra64c5xyiw12yx2q13brxsv8apmany97zqa2lcqckw4ll8j1n"))
5576 (patches (search-patches "netsurf-system-utf8proc.patch"
5577 "netsurf-y2038-tests.patch"
5578 "netsurf-longer-test-timeout.patch"
5579 "netsurf-message-timestamp.patch"))))
5580 (build-system glib-or-gtk-build-system)
5582 `(("netsurf-buildsystem" ,netsurf-buildsystem)
5583 ("nsgenbind" ,nsgenbind)
5584 ("libidn" ,libidn) ;only for tests
5587 ("perl-html-parser" ,perl-html-parser)
5588 ("pkg-config" ,pkg-config)
5593 ("openssl" ,openssl)
5594 ("utf8proc" ,utf8proc)
5596 ("libjpeg" ,libjpeg-turbo)
5599 ("libnsbmp" ,libnsbmp)
5600 ("libnsgif" ,libnsgif)
5601 ("libnslog" ,libnslog)
5602 ("libnspsl" ,libnspsl)
5603 ("libnsutils" ,libnsutils)
5604 ("libsvgtiny" ,libsvgtiny)
5605 ("miscfiles" ,miscfiles)))
5607 `(#:make-flags `("CC=gcc" "BUILD_CC=gcc"
5609 ,(string-append "PREFIX=" %output)
5610 ,(string-append "NSSHARED="
5611 (assoc-ref %build-inputs
5612 "netsurf-buildsystem")
5613 "/share/netsurf-buildsystem"))
5614 #:test-target "test"
5615 #:modules ((ice-9 rdelim)
5619 ,@%glib-or-gtk-build-system-modules)
5621 (modify-phases %standard-phases
5623 (add-after 'build 'adjust-welcome
5625 (substitute* "frontends/gtk/res/welcome.html"
5626 ;; Close some XHTML tags.
5627 (("<(img|input)([^>]*)>" _ tag contents)
5628 (string-append "<" tag contents " />"))
5629 ;; Increase freedom.
5630 ((" open source") ", free software")
5631 ;; Prefer a more privacy-respecting default search engine.
5632 (("www.google.co.uk") "www.duckduckgo.com/html")
5633 (("Google Search") "DuckDuckGo Search")
5634 (("name=\"btnG\"") ""))
5635 ;; Remove default links so it doesn't seem we're endorsing them.
5636 (with-atomic-file-replacement "frontends/gtk/res/welcome.html"
5638 ;; Leave the DOCTYPE header as is.
5639 (display (read-line in 'concat) out)
5641 (let rec ((sxml (xml->sxml in
5642 #:default-entity-handler
5644 (string-append "<ENTITY>"
5645 (symbol->string name)
5647 ;; We'd like to use sxml-match here, but it can't
5648 ;; match against generic tag symbols...
5650 (`(div (@ (class "links")) . ,rest)
5659 (add-before 'check 'patch-check
5660 (lambda* (#:key inputs #:allow-other-keys)
5661 (substitute* '("test/bloom.c" "test/hashtable.c")
5662 (("/usr/share/dict/words")
5663 (string-append (assoc-ref inputs "miscfiles") "/share/web2")))
5665 (add-after 'install 'install-more
5666 (lambda* (#:key outputs #:allow-other-keys)
5667 (let* ((out (assoc-ref outputs "out"))
5668 (desktop (string-append out "/share/applications/"
5669 "netsurf.desktop")))
5670 (mkdir-p (dirname desktop))
5671 (copy-file "frontends/gtk/res/netsurf-gtk.desktop"
5673 (substitute* desktop
5674 (("netsurf-gtk") (string-append out "/bin/netsurf-gtk3"))
5675 (("netsurf.png") (string-append out "/share/netsurf/"
5677 (install-file "docs/netsurf-gtk.1"
5678 (string-append out "/share/man/man1/"))
5680 (home-page "https://www.netsurf-browser.org")
5681 (synopsis "Web browser")
5683 "NetSurf is a lightweight web browser that has its own layout and
5684 rendering engine entirely written from scratch. It is small and capable of
5685 handling many of the web standards in use today.")
5686 (license license:gpl2+)))
5688 (define-public surfraw
5695 (uri (string-append "https://gitlab.com/surfraw/Surfraw/uploads/"
5696 "2de827b2786ef2fe43b6f07913ca7b7f/"
5697 "surfraw-" version ".tar.gz"))
5699 (base32 "099nbif0x5cbcf18snc58nx1a3q7z0v9br9p2jiq9pcc7ic2015d"))))
5700 (build-system gnu-build-system)
5703 (modify-phases %standard-phases
5704 (add-before 'configure 'patch-perl
5705 (lambda* (#:key inputs #:allow-other-keys)
5706 (let ((perl (assoc-ref inputs "perl")))
5707 (substitute* "surfraw.IN"
5709 (string-append perl "/bin/perl -e")))
5711 (add-after 'install 'compress-elvi.1sr
5712 (lambda* (#:key outputs #:allow-other-keys)
5713 ;; The manpages of the elvis are symlinks to elvi.1sr.gz
5714 ;; but elvi.1sr does not get compressed by our manpage phase.
5715 (let* ((out (assoc-ref %outputs "out"))
5716 (man (string-append out "/share/man/man1")))
5717 (with-directory-excursion man
5718 (invoke "gzip" "elvi.1sr"))))))))
5721 ("perl-www-opensearch" ,perl-www-opensearch)
5722 ("perl-html-parser" ,perl-html-parser)
5723 ("perl-libwww" ,perl-libwww)))
5724 (synopsis "Unix command line interface to the www")
5725 (description "Surfraw (Shell Users' Revolutionary Front Rage Against the Web)
5726 provides a unix command line interface to a variety of popular www search engines
5727 and similar services.")
5728 (home-page "https://surfraw.alioth.debian.org/")
5729 (license license:public-domain)))
5731 (define-public darkhttpd
5738 (uri (string-append "https://unix4lyfe.org/darkhttpd/darkhttpd-"
5739 version ".tar.bz2"))
5742 "0185wlyx4iqiwfigp1zvql14zw7gxfacncii3d15yaxk4av1f155"))))
5743 (build-system gnu-build-system)
5745 `(#:make-flags '("CC=gcc")
5746 #:tests? #f ; No test suite
5748 (modify-phases %standard-phases
5751 (lambda* (#:key outputs #:allow-other-keys)
5752 (install-file "darkhttpd"
5753 (string-append (assoc-ref outputs "out")
5756 (synopsis "Simple static web server")
5757 (description "darkhttpd is a simple static web server. It is
5758 standalone and does not need inetd or ucspi-tcp. It does not need any
5759 config files---you only have to specify the www root.")
5760 (home-page "https://unix4lyfe.org/darkhttpd/")
5761 (license license:isc)))
5763 (define-public goaccess
5769 (uri (string-append "http://tar.goaccess.io/goaccess-"
5773 "1w84y61f3ldg2f28q6qlyr1scn3mcx0bsbq3i5xi5w193wh3xa2q"))
5774 (modules '((guix build utils)))
5776 (substitute* "src/error.h"
5777 (("__DATE__") "\"1970-01-01\"")
5778 (("__TIME__") "\"00:00:00\""))
5780 (build-system gnu-build-system)
5782 ;; TODO: Add dependency on geoip-tools.
5784 ("ncurses" ,ncurses)))
5786 `(("pkg-config" ,pkg-config)))
5787 (home-page "https://goaccess.io")
5788 (synopsis "Analyze Web server logs in real time")
5790 "GoAccess is a real-time web log analyzer and interactive viewer that
5791 runs in a terminal or through your browser. It provides fast and valuable
5792 HTTP statistics for system administrators that require a visual server report
5794 (license license:x11)))
5796 (define-public hitch
5800 (home-page "https://hitch-tls.org/")
5803 (uri (string-append home-page "source/hitch-" version ".tar.gz"))
5806 "1i75giwyr66ip8xsvk3gg5xdbxnmcabgxz8dqi06c58mw7qzhzn9"))))
5807 (build-system gnu-build-system)
5809 `(#:phases (modify-phases %standard-phases
5810 (add-before 'check 'pre-check
5812 ;; Most tests attempts to access hitch-tls.org which is
5813 ;; unavailable in the build container. Run them against
5814 ;; a dummy local web server instead.
5815 (for-each (lambda (test)
5817 (("\\[hitch-tls\\.org\\]:80")
5818 "[localhost]:8000")))
5819 (find-files "src/tests" "\\.sh$"))
5820 (system "python3 -m http.server &")
5822 ;; The build container does not reap zombie processes,
5823 ;; causing stop_hitch to hang indefinitely while waiting
5824 ;; for the process to terminate because 'kill -0' never
5825 ;; succeeds. Use a different test to see whether the
5826 ;; process has shut down.
5827 (substitute* "src/tests/hitch_test.sh"
5828 (("kill -0 \"\\$HITCH_PID\"")
5829 "$(ps -p $HITCH_PID -o state= | grep -qv '^Z$')"))
5832 `(("pkg-config" ,pkg-config)
5838 ("python" ,python)))
5841 ("openssl" ,openssl)))
5842 (synopsis "Scalable TLS proxy")
5844 "Hitch is a performant TLS proxy based on @code{libev}. It terminates
5845 SSL/TLS connections and forwards the unencrypted traffic to a backend such
5846 as a web server. It is designed to handle many thousand connections on
5847 multicore machines.")
5848 (license license:bsd-2)))
5850 (define-public httptunnel
5857 (uri (string-append "http://www.nocrew.org/software/httptunnel/"
5858 name "-" version ".tar.gz"))
5861 "0mn5s6p68n32xzadz6ds5i6bp44dyxzkq68r1yljlv470jr84bql"))
5862 (modules '((guix build utils)))
5864 ;; Remove non-free IETF RFC documentation.
5865 (delete-file-recursively "doc")
5867 (build-system gnu-build-system)
5870 (modify-phases %standard-phases
5871 ;; The default configure phase tries to pass environment variables as
5872 ;; command-line arguments, which confuses the ./configure script.
5874 (lambda* (#:key outputs #:allow-other-keys)
5875 (let* ((out (assoc-ref outputs "out")))
5876 (setenv "CONFIG_SHELL" (which "bash"))
5877 (invoke "./configure"
5878 (string-append "--prefix=" out))))))))
5879 (home-page "http://www.nocrew.org/software/httptunnel.html")
5880 (synopsis "Tunnel data connections through HTTP requests")
5881 (description "httptunnel creates a bidirectional virtual data connection
5882 tunnelled through HTTP (HyperText Transfer Protocol) requests. This can be
5883 useful for users behind restrictive firewalls. As long as Web traffic is
5884 allowed, even through a HTTP-only proxy, httptunnel can be combined with other
5885 tools like SSH (Secure Shell) to reach the outside world.")
5886 (license license:gpl2+)))
5888 (define-public stunnel
5895 (uri (string-append "https://www.stunnel.org/downloads/stunnel-"
5898 (base32 "0y9vjzjqi340vy6h321r1cskb7l6a4prr9d2ysixqzjpjv04rhfl"))))
5899 (build-system gnu-build-system)
5902 `(("iproute" ,iproute)
5904 ("procps" ,procps)))
5905 (inputs `(("openssl" ,openssl)))
5908 (list (string-append "--with-ssl=" (assoc-ref %build-inputs "openssl")))
5910 (modify-phases %standard-phases
5911 (add-after 'unpack 'patch-output-directories
5913 ;; Some (not all) Makefiles have a hard-coded incorrect docdir.
5914 (substitute* (list "Makefile.in"
5916 "tools/Makefile.in")
5918 (string-append "/doc/" ,name "-" ,version)))
5920 (add-before 'check 'patch-tests
5922 (substitute* "tests/make_test"
5924 (string-append (which "sh") " ")))
5925 ;; test requires networking
5926 (delete-file "tests/recipes/055_socket_closed")
5928 (home-page "https://www.stunnel.org")
5929 (synopsis "TLS proxy for clients or servers")
5930 (description "Stunnel is a proxy designed to add TLS encryption
5931 functionality to existing clients and servers without any changes in the
5932 programs' code. Its architecture is optimized for security, portability, and
5933 scalability (including load-balancing), making it suitable for large
5935 (license license:gpl2+)))
5937 (define-public varnish
5940 (home-page "https://varnish-cache.org/")
5944 (uri (string-append home-page "_downloads/varnish-" version ".tgz"))
5947 "1dfdswri6lkfk6kml3szvffm91y49pajgqy1k5y26llqixl4r5hi"))))
5948 (build-system gnu-build-system)
5950 `(#:configure-flags (list (string-append "LDFLAGS=-Wl,-rpath=" %output "/lib")
5951 ;; Use absolute path of GCC so it's found at runtime.
5952 (string-append "PTHREAD_CC="
5953 (assoc-ref %build-inputs "gcc")
5955 "--localstatedir=/var")
5957 (modify-phases %standard-phases
5958 (add-after 'unpack 'use-absolute-file-names
5960 (substitute* '("bin/varnishtest/vtc_varnish.c"
5961 "bin/varnishtest/vtc_process.c"
5962 "bin/varnishd/mgt/mgt_vcc.c"
5963 "bin/varnishtest/tests/u00014.vtc")
5964 (("/bin/sh") (which "sh")))
5965 (substitute* "bin/varnishd/mgt/mgt_shmem.c"
5966 (("rm -rf") (string-append (which "rm") " -rf")))
5967 (substitute* "bin/varnishtest/vtc_main.c"
5968 (("/bin/rm") (which "rm")))
5970 (add-before 'install 'patch-Makefile
5972 (substitute* "Makefile"
5973 ;; Do not create /var/varnish during install.
5974 (("^install-data-am: install-data-local") "install-data-am: "))
5976 (add-after 'install 'wrap-varnishd
5977 ;; Varnish uses GCC to compile VCL, so wrap it with required GCC
5978 ;; environment variables to avoid propagating them to profiles.
5979 (lambda* (#:key inputs outputs #:allow-other-keys)
5980 (let* ((out (assoc-ref outputs "out"))
5981 (varnishd (string-append out "/sbin/varnishd"))
5982 (PATH (string-append (assoc-ref inputs "binutils") "/bin"))
5983 (LIBRARY_PATH (string-append (assoc-ref inputs "libc") "/lib")))
5984 (wrap-program varnishd
5985 ;; Add binutils to PATH so gcc finds the 'as' executable.
5986 `("PATH" ":" prefix (,PATH))
5987 ;; Make sure 'crti.o' et.al is found.
5988 `("LIBRARY_PATH" ":" prefix (,LIBRARY_PATH)))
5991 `(("pkg-config" ,pkg-config)
5992 ("python-sphinx" ,python-sphinx)
5993 ("rst2man" ,python-docutils)))
5995 `(("jemalloc" ,jemalloc)
5996 ("ncurses" ,ncurses)
5998 ("python" ,python-wrapper)
5999 ("readline" ,readline)))
6000 (synopsis "Web application accelerator")
6002 "Varnish is a high-performance HTTP accelerator. It acts as a caching
6003 reverse proxy and load balancer. You install it in front of any server that
6004 speaks HTTP and configure it to cache the contents through an extensive
6005 configuration language.")
6006 (license (list license:bsd-2 ;main distribution
6007 license:zlib ;lib/libvgz/*
6008 license:public-domain ;bin/varnishncsa/as64.c, include/miniobj.h
6009 license:bsd-3)))) ;include/vqueue.h, lib/libvarnishcompat/daemon.c
6011 (define-public varnish-modules
6013 (name "varnish-modules")
6014 (home-page "https://github.com/varnish/varnish-modules")
6018 (uri (git-reference (url home-page) (commit version)))
6019 (file-name (git-file-name name version))
6022 "1mzkad9r4rpm1fi7j7skwrsyzzbwcapfnlvvl1ls3rng2djcqb5j"))))
6023 (build-system gnu-build-system)
6025 `(("pkg-config" ,pkg-config)
6027 ;; For bootstrapping.
6028 ("autoconf" ,autoconf)
6029 ("automake" ,automake)
6030 ("libtool" ,libtool)
6032 ;; For generating manuals.
6033 ("rst2man" ,python-docutils)))
6035 `(("python" ,python)
6036 ("varnish" ,varnish)))
6037 (synopsis "Collection of Varnish modules")
6039 "This package provides a collection of modules (@dfn{vmods}) for the Varnish
6040 cache server, extending the @acronym{VCL, Varnish Configuration Language} with
6041 additional capabilities.")
6042 (license license:bsd-2)))
6044 (define-public xinetd
6047 ;; This is the maintenance fork currently used by openSUSE and Debian.
6048 (version "2.3.15.4")
6053 (url "https://github.com/openSUSE/xinetd")
6055 (file-name (git-file-name name version))
6057 (base32 "0lrp3lcj6azhjplwxws2rx40bkyp6i6bp7n77ndcisb7ninad30q"))))
6058 (build-system gnu-build-system)
6060 `(#:configure-flags '("--with-loadavg")
6061 #:tests? #f)) ; no tests
6063 `(("autoconf" ,autoconf)
6064 ("automake" ,automake)
6065 ("libtool" ,libtool)
6066 ("pkg-config" ,pkg-config)))
6067 (home-page "https://github.com/openSUSE/xinetd")
6068 (synopsis "Internet services daemon")
6069 (description "@code{xinetd}, a more secure replacement for @code{inetd},
6070 listens for incoming requests over a network and launches the appropriate
6071 service for that request. Requests are made using port numbers as identifiers
6072 and xinetd usually launches another daemon to handle the request. It can be
6073 used to start services with both privileged and non-privileged port numbers.")
6074 (license (license:fsf-free "file://COPYRIGHT"))))
6076 (define-public tidy-html
6084 (url "https://github.com/htacg/tidy-html5")
6086 (file-name (git-file-name name version))
6089 "01k5sqwgcsr26i8031v1yr2r8qcy9a5w7sj800660haszgfbjz2f"))))
6090 (build-system cmake-build-system)
6092 "static")) ; 1.3MiB of .a files
6094 `(#:tests? #f ; no tests available
6095 #:build-type "Release"
6097 (modify-phases %standard-phases
6098 (add-after 'install 'move-static-libraries
6099 (lambda* (#:key outputs #:allow-other-keys)
6100 ;; Move static libraries to the "static" output.
6101 (let* ((out (assoc-ref outputs "out"))
6102 (lib (string-append out "/lib"))
6103 (static (assoc-ref outputs "static"))
6104 (slib (string-append static "/lib")))
6106 (for-each (lambda (file)
6107 (install-file file slib)
6109 (find-files lib "\\.a$"))
6112 `(("libxslt" ,libxslt)))
6113 (home-page "http://www.html-tidy.org/")
6114 (synopsis "HTML Tidy with HTML5 support")
6116 "Tidy is a console application which corrects and cleans up
6117 HTML and XML documents by fixing markup errors and upgrading
6118 legacy code to modern standards.
6120 Tidy also provides @code{libtidy}, a C static and dynamic library that
6121 developers can integrate into their applications to make use of the
6122 functions of Tidy.")
6123 (license license:bsd-3)))
6125 (define-public hiawatha
6132 (uri (string-append "https://www.hiawatha-webserver.org/files/"
6133 "hiawatha-" version ".tar.gz"))
6134 (modules '((guix build utils)))
6136 ;; We use packaged libraries, so delete the bundled copies.
6137 (for-each delete-file-recursively
6138 (list "extra/nghttp2.tgz" "mbedtls"))
6141 (base32 "09wpgilbv13zal71v9lbsqr8c3fignygadykpd1p1pb8blb5vn3r"))))
6142 (build-system cmake-build-system)
6144 `(#:tests? #f ; no tests included
6145 #:configure-flags (list (string-append "-DUSE_SYSTEM_MBEDTLS=on")
6146 (string-append "-DENABLE_HTTP2=on")
6147 (string-append "-DUSE_SYSTEM_NGHTTP2=on")
6148 (string-append "-DENABLE_TOMAHAWK=on")
6149 (string-append "-DLOG_DIR=/var/log/hiawatha")
6150 (string-append "-DPID_DIR=/run")
6151 (string-append "-DWEBROOT_DIR="
6152 (assoc-ref %outputs "out")
6153 "/share/hiawatha/html")
6154 (string-append "-DWORK_DIR=/var/lib/hiawatha"))
6156 (modify-phases %standard-phases
6157 (add-after 'unpack 'install-no-empty-directories
6159 (substitute* "CMakeLists.txt"
6160 (("install\\(DIRECTORY DESTINATION" match)
6161 (string-append "#" match)))
6163 (add-after 'install 'wrap
6164 (lambda* (#:key inputs outputs #:allow-other-keys)
6165 ;; Make sure 'hiawatha' finds 'mbedtls'.
6166 (let* ((out (assoc-ref outputs "out"))
6167 (sbin (string-append out "/sbin"))
6168 (mbed (assoc-ref inputs "mbedtls-apache")))
6169 (wrap-program (string-append sbin "/hiawatha")
6170 `("PATH" ":" prefix (,mbed)))))))))
6172 ;; TODO: package "hiawatha-monitor", an optional dependency of "hiawatha".
6173 `(("libxslt" ,libxslt)
6174 ("libxml2" ,libxml2)
6175 ("mbedtls-apache" ,mbedtls-for-hiawatha)
6176 ("nghttp2" ,nghttp2 "lib")
6178 (home-page "https://www.hiawatha-webserver.org")
6179 (synopsis "Webserver with focus on security")
6181 "Hiawatha has been written with security in mind.
6182 Features include the ability to stop SQL injections, XSS and CSRF attacks and
6184 (license license:gpl2)))
6186 (define-public python-httpbin
6188 (name "python-httpbin")
6193 (uri (pypi-uri "httpbin" version))
6196 "1dc92lnk846hpilslrqnr63x55cxll4qx88gif8fm521gv9cbyvr"))))
6197 (build-system python-build-system)
6199 `(("python-decorator" ,python-decorator)
6200 ("python-flask" ,python-flask)
6201 ("python-itsdangerous" ,python-itsdangerous)
6202 ("python-markupsafe" ,python-markupsafe)
6203 ("python-six" ,python-six)))
6204 (home-page "https://github.com/Runscope/httpbin")
6205 (synopsis "HTTP request and response service")
6206 (description "Testing an HTTP Library can become difficult sometimes.
6207 @code{RequestBin} is fantastic for testing POST requests, but doesn't let you control the
6208 response. This exists to cover all kinds of HTTP scenarios. All endpoint responses are
6210 (license license:isc)))
6212 (define-public python-pytest-httpbin
6214 (name "python-pytest-httpbin")
6219 (uri (pypi-uri "pytest-httpbin" version))
6222 "1y0v2v7xpzpyd4djwp7ad8ifnlxp8r1y6dfbxg5ckzvllkgridn5"))))
6223 (build-system python-build-system)
6225 `(("python-six" ,python-six)
6226 ("python-httpbin" ,python-httpbin)
6227 ("python-pytest" ,python-pytest)))
6229 "https://github.com/kevin1024/pytest-httpbin")
6231 "Test your HTTP library against a local copy of httpbin")
6233 "@code{Pytest-httpbin} creates a @code{pytest} fixture that is dependency-injected
6234 into your tests. It automatically starts up a HTTP server in a separate thread running
6235 @code{httpbin} and provides your test with the URL in the fixture.")
6236 (license license:expat)))
6238 (define-public http-parser
6239 (let ((commit "ec8b5ee63f0e51191ea43bb0c6eac7bfbff3141d")
6242 (name "http-parser")
6243 (version (git-version "2.9.4" revision commit))
6244 (home-page "https://github.com/nodejs/http-parser")
6248 (uri (git-reference (url home-page)
6251 (base32 "0f297hrbx0kvy3qwgm9rhmbnjww6iljlcz9grsc9d4km1qj1071i"))
6252 (file-name (git-file-name name version))
6255 (search-patches "http-parser-CVE-2020-8287.patch")
6258 ;; Treat an empty port (e.g. `http://hostname:/`) when parsing
6259 ;; URLs as if no port were specified. This patch is applied
6260 ;; to Fedora's http-parser and to libgit2's bundled version.
6263 "https://src.fedoraproject.org/rpms/http-parser/raw/"
6264 "e89b4c4e2874c19079a5a1a2d2ccc61b551aa289/"
6265 "f/0001-url-treat-empty-port-as-default.patch"))
6268 "0pbxf2nq9pcn299k2b2ls8ldghaqln9glnp79gi57mamx4iy0f6g"))))))
6269 (modules '((guix build utils)))
6272 ;; This assertion fails when building for i686-linux.
6273 (substitute* "test.c"
6274 (("assert\\(sizeof\\(http_parser\\) == 32\\);")
6277 (build-system gnu-build-system)
6279 `(#:test-target "test"
6281 (list (string-append "PREFIX="
6282 (assoc-ref %outputs "out"))
6284 ,@(if (%current-target-system)
6288 (modify-phases %standard-phases
6289 ,@(if (%current-target-system)
6290 '((replace 'configure
6291 (lambda* (#:key target #:allow-other-keys)
6292 (substitute* (find-files "." "Makefile")
6294 (string-append "CC=" target "-gcc\n"))
6296 (string-append "AR=" target "-ar\n")))
6298 '((delete 'configure))))))
6299 (synopsis "HTTP request/response parser for C")
6300 (description "This is a parser for HTTP messages written in C. It
6301 parses both requests and responses. The parser is designed to be used in
6302 high-performance HTTP applications. It does not make any syscalls nor
6303 allocations, it does not buffer data, it can be interrupted at anytime.
6304 Depending on your architecture, it only requires about 40 bytes of data per
6305 message stream (in a web server that is per connection).")
6306 (license license:expat))))
6308 (define-public python-httpretty
6310 (name "python-httpretty")
6315 (uri (pypi-uri "httpretty" version))
6317 (base32 "1dg0nfl7i9kjnq98ww98x2afzav4mpgiwzvjc43ily1x9my94g75"))))
6318 (build-system python-build-system)
6320 `(#:tests? #f ; Tests require network access.
6322 (modify-phases %standard-phases
6324 (lambda* (#:key tests? #:allow-other-keys)
6326 (invoke "nosetests"))
6329 `(("python-coverage" ,python-coverage)
6330 ("python-eventlet" ,python-eventlet)
6331 ("python-nose" ,python-nose)
6332 ("python-rednose" ,python-rednose)
6333 ("python-requests" ,python-requests)
6334 ("python-sure" ,python-sure)
6335 ("python-tornado" ,python-tornado)))
6336 (home-page "https://httpretty.readthedocs.io")
6337 (synopsis "HTTP client mock for Python")
6338 (description "@code{httpretty} is a helper for faking web requests,
6339 inspired by Ruby's @code{fakeweb}.")
6340 (license license:expat)))
6349 (uri (string-append "https://github.com/jpmens/jo/releases/download/"
6350 version "/jo-" version ".tar.gz"))
6352 (base32 "18jna9xlpxci3cak3z85c448zv2zr41baclgym3hk433p0p4vii4"))))
6353 (build-system gnu-build-system)
6354 (home-page "https://github.com/jpmens/jo")
6355 (synopsis "Output JSON from a shell")
6356 (description "jo is a command-line utility to create JSON objects or
6357 arrays. It creates a JSON string on stdout from words provided as
6358 command-line arguments or read from stdin.")
6359 (license (list license:gpl2+
6360 license:expat)))) ; json.c, json.h
6362 (define-public python-internetarchive
6364 (name "python-internetarchive")
6370 (url "https://github.com/jjjake/internetarchive")
6371 (commit (string-append "v" version))))
6372 (file-name (git-file-name name version))
6375 "0ih7hplv92wbv6cmgc1gs0v35qkajwicalwcq8vcljw30plr24fp"))
6376 (modules '((guix build utils)))
6379 ;; Python 3.7 removed `_pattern_type'.
6380 (for-each (lambda (file)
6383 (("^import re\n" line)
6384 (string-append line "re._pattern_type = re.Pattern\n"))))
6385 (find-files "." "\\.py$"))
6387 (build-system python-build-system)
6390 (modify-phases %standard-phases
6392 (add-after 'install 'check
6393 (lambda* (#:key inputs outputs #:allow-other-keys)
6394 (add-installed-pythonpath inputs outputs)
6395 (setenv "PATH" (string-append (assoc-ref outputs "out") "/bin"
6396 ":" (getenv "PATH")))
6397 (invoke "py.test" "-v" "-k"
6399 ;; These tests attempt to make a connection to
6400 ;; an external web service.
6401 "not test_get_item_with_kwargs"
6402 " and not test_ia")))))))
6404 `(("python-requests" ,python-requests)
6405 ("python-jsonpatch" ,python-jsonpatch-0.4)
6406 ("python-docopt" ,python-docopt)
6407 ("python-clint" ,python-clint)
6408 ("python-six" ,python-six)
6409 ("python-schema" ,python-schema-0.5)
6410 ("python-backports-csv" ,python-backports-csv)))
6412 `(("python-pytest" ,python-pytest)
6413 ("python-pytest-capturelog" ,python-pytest-capturelog)
6414 ("python-responses" ,python-responses)))
6415 (home-page "https://github.com/jjjake/internetarchive")
6416 (synopsis "Command-line interface to archive.org")
6417 (description "@code{ia} is a command-line tool for using
6418 @url{archive.org} from the command-line. It also implements the
6419 internetarchive python module for programmatic access to archive.org.")
6420 (license license:agpl3+)))
6422 (define-public python-clf
6423 (let ((commit-test-clf "d01d25923c599d3261910f79fb948825b4270d07")) ; 0.5.7
6430 (uri (pypi-uri "clf" version))
6433 "0zlkzqnpz7a4iavsq5vaz0nf5nr7qm5znpg1vlpz6rwnx6hikjdb"))))
6434 (build-system python-build-system)
6436 `(("python-docopt" ,python-docopt)
6437 ("python-pygments" ,python-pygments)
6438 ("python-requests" ,python-requests)
6439 ("python-nose" ,python-nose)
6440 ("python-lxml" ,python-lxml)
6441 ("python-pyaml" ,python-pyaml)))
6446 (uri (string-append "https://raw.githubusercontent.com"
6447 "/ncrocfer/clf/" commit-test-clf
6451 "19lr5zdzsmxgkg7wrjq1yzkiahd03wi4k3dskssyhmjls8c10nqd"))))))
6454 (modify-phases %standard-phases
6455 (add-after 'unpack 'get-tests
6457 (copy-file (assoc-ref %build-inputs "test-clf") "test_clf.py")
6462 ;; These tests require an Internet connection.
6463 "--exclude=test_browse"
6464 "--exclude=test_command"
6465 "--exclude=test_search"))))))
6466 (home-page "https://github.com/ncrocfer/clf")
6467 (synopsis "Search code snippets on @url{https://commandlinefu.com}")
6468 (description "@code{clf} is a command line tool for searching code
6469 snippets on @url{https://commandlinefu.com}.")
6470 (license license:expat))))
6472 (define-public python2-clf
6473 (package-with-python2 python-clf))
6475 (define-public rss-bridge
6478 (version "2019-09-12")
6483 (url "https://github.com/RSS-Bridge/rss-bridge")
6485 (file-name (git-file-name name version))
6487 (base32 "1mx7f3l45nqhcrng531l4cq8kpzm164hhbwn26g5akb2pamdlnra"))))
6488 (build-system trivial-build-system)
6490 '(#:modules ((guix build utils))
6493 (use-modules (guix build utils)
6495 (let* ((out (assoc-ref %outputs "out"))
6496 (share-rss-bridge (string-append out "/share/rss-bridge")))
6497 (mkdir-p share-rss-bridge)
6498 (copy-recursively (assoc-ref %build-inputs "source") share-rss-bridge)
6500 (home-page "https://github.com/RSS-Bridge/rss-bridge")
6501 (synopsis "Generate Atom feeds for social networking websites")
6502 (description "rss-bridge generates Atom feeds for social networking
6503 websites lacking feeds. Supported websites include Facebook, Twitter,
6504 Instagram and YouTube.")
6505 (license (list license:public-domain
6506 license:expat)))) ; vendor/simplehtmldom/simple_html_dom.php
6508 (define-public linkchecker
6510 (name "linkchecker")
6516 (url "https://github.com/linkchecker/linkchecker")
6517 (commit (string-append "v" version))))
6519 (search-patches "linkchecker-tests-require-network.patch"))
6520 (file-name (git-file-name name version))
6523 "03ihjmc4bqxxqv71bb43r2f23sx0xnbq1k2fsg9fw05qa5s9x187"))))
6524 (build-system python-build-system)
6526 `(("python2-dnspython" ,python2-dnspython-1.16)
6527 ("python2-pyxdg" ,python2-pyxdg)
6528 ("python2-requests" ,python2-requests)))
6530 `(("gettext" ,gettext-minimal)
6531 ("python2-pytest" ,python2-pytest)
6532 ("python2-miniboa" ,python2-miniboa)
6533 ("python2-parameterized" ,python2-parameterized)))
6535 `(#:python ,python-2
6537 (modify-phases %standard-phases
6538 ;; Move the 'check phase to after 'install, so that the installed
6539 ;; library can be used
6541 (add-after 'install 'check
6542 (lambda* (#:key outputs #:allow-other-keys)
6543 (let ((out (assoc-ref outputs "out")))
6544 ;; Set PYTHONPATH so that the installed linkchecker is used
6545 (setenv "PYTHONPATH"
6546 (string-append out "/lib/python2.7/site-packages"
6548 (getenv "PYTHONPATH")))
6549 ;; Remove this directory to avoid it being used when running
6551 (delete-file-recursively "linkcheck")
6553 (invoke "py.test" "tests"))
6555 (home-page "https://linkcheck.github.io/linkchecker")
6556 (synopsis "Check websites for broken links")
6557 (description "LinkChecker is a website validator. It checks for broken
6558 links in websites. It is recursive and multithreaded providing output in
6559 colored or normal text, HTML, SQL, CSV, XML or as a sitemap graph. It
6560 supports checking HTTP/1.1, HTTPS, FTP, mailto, news, nntp, telnet and local
6562 (license (list license:gpl2+
6563 license:bsd-2 ; linkcheck/better_exchook2.py
6564 license:bsd-3 ; linkcheck/colorama.py
6565 license:psfl ; linkcheck/gzip2.py
6566 license:expat)))) ; linkcheck/mem.py
6568 (define-public cadaver
6575 (uri (string-append "http://www.webdav.org/cadaver/"
6576 name "-" version ".tar.gz"))
6579 "1jizq69ifrjbjvz5y79wh1ny94gsdby4gdxwjad4bfih6a5fck7x"))))
6580 (build-system gnu-build-system)
6581 ;; TODO: Unbundle libneon and make build succeed with new neon.
6583 `(#:configure-flags (list "--with-ssl=openssl")
6584 #:tests? #f)) ;No tests included
6586 `(("gettext" ,gettext-minimal)
6587 ("pkg-config" ,pkg-config)
6588 ("intltool" ,intltool)))
6591 ("openssl" ,openssl-1.0)))
6592 (home-page "http://www.webdav.org/cadaver/")
6593 (synopsis "Command-line WebDAV client")
6595 "Cadaver is a command-line WebDAV client for Unix. It supports
6596 file upload, download, on-screen display, namespace operations (move/copy),
6597 collection creation and deletion, and locking operations.")
6598 (license license:gpl2)))
6600 (define-public castor
6608 (url "https://git.sr.ht/~julienxx/castor")
6610 (file-name (git-file-name name version))
6612 (base32 "0rwg1w7srjwa23mkypl8zk6674nhph4xsc6nc01f6g5k959szylr"))))
6613 (build-system cargo-build-system)
6616 (("rust-ansi-parser" ,rust-ansi-parser-0.6)
6617 ("rust-dirs" ,rust-dirs-2)
6618 ("rust-gdk" ,rust-gdk-0.13)
6619 ("rust-gtk" ,rust-gtk-0.8)
6620 ("rust-linkify" ,rust-linkify-0.4)
6621 ("rust-native-tls" ,rust-native-tls-0.2)
6622 ("rust-open" ,rust-open-1)
6623 ("rust-percent-encoding" ,rust-percent-encoding-2)
6624 ("rust-url" ,rust-url-2))))
6626 `(("pkg-config" ,pkg-config)))
6630 ("gdk-pixbuf" ,gdk-pixbuf)
6632 ("libressl" ,libressl)
6634 (home-page "https://git.sr.ht/~julienxx/castor")
6635 (synopsis "Graphical client for plain-text protocols")
6637 "Castor is a graphical client for plain-text protocols written in
6638 Rust with GTK. It currently supports the Gemini, Gopher and Finger
6640 (license license:expat)))
6642 (define-public python-py-ubjson
6644 (name "python-py-ubjson")
6649 (uri (pypi-uri "py-ubjson" version))
6652 "03l9m9w5ip4hw0y69wlys5gzsfb7zcq3a77blj88grgiqhn5vm5n"))))
6653 (build-system python-build-system)
6654 (home-page "https://github.com/Iotic-Labs/py-ubjson")
6655 (synopsis "Universal Binary JSON encoder/decoder")
6657 "Py-ubjson is a Python module providing an Universal Binary JSON
6658 encoder/decoder based on the draft-12 specification for UBJSON.")
6659 (license license:asl2.0)))
6661 (define-public java-tomcat
6663 (name "java-tomcat")
6667 (uri (string-append "mirror://apache/tomcat/tomcat-8/v"
6668 version "/src/apache-tomcat-" version "-src.tar.gz"))
6671 "1wr6mpgbk2gs18vp8mdggiq6vifj68a875dd1fkdf7cs31q54rns"))
6672 (modules '((guix build utils)))
6673 ;; Delete bundled jars.
6676 (for-each delete-file (find-files "." "\\.jar$"))
6677 (for-each delete-file (find-files "." "\\.bat$"))
6679 (build-system ant-build-system)
6681 `(("java-commons-daemon" ,java-commons-daemon)
6682 ("java-ecj" ,java-ecj)))
6684 `(#:build-target "deploy"
6685 #:tests? #f; requires downloading some files.
6687 (modify-phases %standard-phases
6688 (add-after 'unpack 'prevent-download
6690 ;; This directory must exist
6692 ;; We patch build.xml so it doesn't download any dependency, because
6693 ;; we already have all of them.
6694 (substitute* "build.xml"
6695 (("download-compile,") "")
6696 (("depends=\"validate\"") "depends=\"build-prepare\"")
6697 ((",download-validate") ""))
6699 (add-after 'unpack 'strip-timestamps
6701 (substitute* "build.xml"
6702 (("<filter token=\"YEAR\" value=.*")
6703 "<filter token=\"YEAR\" value=\"1970\"/>")
6704 (("<filter token=\"VERSION_BUILT\" value=.*")
6705 "<filter token=\"VERSION_BUILT\" value=\"Jan 1 1970 00:00:00 UTC\"/>"))
6707 (add-after 'unpack 'modify-deploy
6709 ;; The Tomcat build downloads and copies these files to the
6710 ;; bin and lib directory.
6711 ;; We instead symlink to the input (see below).
6712 (substitute* "build.xml"
6713 (("<copy tofile=\"\\$\\{tomcat.build\\}/bin/commons-daemon.jar.*") "")
6714 (("<copy file=\"\\$\\{jdt.jar\\}\" todir=\"\\$\\{tomcat.build\\}/lib\"/>")
6717 (add-after 'install 'symlink-commons-daemon
6718 (lambda* (#:key inputs outputs #:allow-other-keys)
6719 (let* ((commons-daemon (assoc-ref inputs "java-commons-daemon"))
6720 (files (find-files commons-daemon "commons-daemon-.*\\.jar"))
6721 (daemon-jar (car files))
6722 (out-bin (string-append (assoc-ref outputs "out") "/bin"))
6723 (target (string-append out-bin "/commons-daemon.jar")))
6724 (symlink daemon-jar target)
6726 (add-after 'install 'symlink-java-ecj
6727 (lambda* (#:key inputs outputs #:allow-other-keys)
6728 (let* ((java-ecj (assoc-ref inputs "java-ecj"))
6729 (files (find-files java-ecj "ecj.*\\.jar"))
6730 (java-ecj-jar (car files))
6731 (out-lib (string-append (assoc-ref outputs "out") "/lib"))
6732 (target (string-append out-lib "/java-ecj.jar")))
6733 (symlink java-ecj-jar target)
6735 (add-after 'unpack 'generate-properties
6737 ;; This could have been passed to make-flags, but getcwd returns
6738 ;; a different directory then.
6739 (with-output-to-file "build.properties"
6742 (string-append "base.path=" (getcwd) "/downloads\n"))))
6745 (lambda* (#:key outputs #:allow-other-keys)
6746 (let ((out (assoc-ref outputs "out")))
6747 (copy-recursively "output/build" out))
6749 (properties '((cpe-name . "tomcat")))
6750 (home-page "https://tomcat.apache.org")
6751 (synopsis "Java Servlet, JavaServer Pages, Java Expression Language and Java
6753 (description "Apache Tomcat is a free implementation of the Java
6754 Servlet, JavaServer Pages, Java Expression Language and Java WebSocket
6756 (license license:asl2.0)))
6758 (define-public java-eclipse-jetty-test-helper
6760 (name "java-eclipse-jetty-test-helper")
6765 (url "https://github.com/eclipse/jetty.toolchain/")
6766 (commit (string-append "jetty-test-helper-" version))))
6767 (file-name (git-file-name name version))
6770 "1g7cdh03nfwbdxzvwm84ysgvw08xx7431lsjryj2gmf3lrqpizgb"))))
6771 (build-system ant-build-system)
6773 `(#:jar-name "eclipse-jetty-test-helper.jar"
6774 #:source-dir "src/main/java"
6775 #:test-dir "src/test"
6778 (modify-phases %standard-phases
6779 (add-before 'configure 'chdir
6781 (chdir "jetty-test-helper")
6783 (add-before 'build 'fix-paths
6786 ;; This file assumes that the build directory is named "target"
6787 ;; but it is not the case with our ant-build-system. Once we have
6788 ;; maven though, we will have to rebuild this package because this
6789 ;; assumption is correct with maven-build-system.
6791 "src/main/java/org/eclipse/jetty/toolchain/test/MavenTestingUtils.java"
6792 (("\"target\"") "\"build\"")
6793 (("\"tests\"") "\"test-classes\""))
6794 ;; Tests assume we are building with maven, so that the build
6795 ;; directory is named "target", and not "build".
6796 (with-directory-excursion "src/test/java/org/eclipse/jetty/toolchain/test"
6797 (substitute* '("FSTest.java" "OSTest.java" "TestingDirTest.java"
6798 "MavenTestingUtilsTest.java")
6799 (("target/tests") "build/test-classes")
6800 (("\"target") "\"build")))
6803 `(("junit" ,java-junit)
6804 ("hamcrest" ,java-hamcrest-all)))
6805 (home-page "https://www.eclipse.org/jetty/")
6806 (synopsis "Helper classes for jetty tests")
6807 (description "This package contains helper classes for testing the Jetty
6809 ;; This program is licensed under both epl and asl.
6810 (license (list license:epl1.0 license:asl2.0))))
6812 (define-public java-eclipse-jetty-perf-helper
6814 (inherit java-eclipse-jetty-test-helper)
6815 (name "java-eclipse-jetty-perf-helper")
6817 `(#:jar-name "eclipse-jetty-perf-helper.jar"
6818 #:source-dir "src/main/java"
6819 #:tests? #f; no tests
6822 (modify-phases %standard-phases
6823 (add-before 'configure 'chdir
6825 (chdir "jetty-perf-helper")
6828 `(("hdrhistogram" ,java-hdrhistogram)))))
6830 (define-public java-eclipse-jetty-util
6832 (name "java-eclipse-jetty-util")
6836 (uri (string-append "https://github.com/eclipse/jetty.project/"
6837 "archive/jetty-" version ".v20170531.tar.gz"))
6840 "0x7kbdvkmgr6kbsmbwiiyv3bb0d6wk25frgvld9cf8540136z9p1"))))
6841 (build-system ant-build-system)
6843 `(#:jar-name "eclipse-jetty-util.jar"
6844 #:source-dir "src/main/java"
6846 (list "**/Abstract*.java"
6848 "**/InetAddressSetTest.java"
6849 ;; Assumes we are using maven
6850 "**/TypeUtilTest.java"
6851 ;; Error on the style of log
6852 "**/StdErrLogTest.java")
6855 (modify-phases %standard-phases
6856 (add-before 'configure 'chdir
6858 (chdir "jetty-util")
6861 `(("slf4j" ,java-slf4j-api)
6862 ("servlet" ,java-javaee-servletapi)))
6864 `(("junit" ,java-junit)
6865 ("hamcrest" ,java-hamcrest-all)
6866 ("perf-helper" ,java-eclipse-jetty-perf-helper)
6867 ("test-helper" ,java-eclipse-jetty-test-helper)))
6868 (home-page "https://www.eclipse.org/jetty/")
6869 (synopsis "Utility classes for Jetty")
6870 (description "The Jetty Web Server provides an HTTP server and Servlet
6871 container capable of serving static and dynamic content either from a standalone
6872 or embedded instantiation. This package provides utility classes.")
6873 (license (list license:epl1.0 license:asl2.0))))
6875 ;; This version is required by maven-wagon
6876 (define-public java-eclipse-jetty-util-9.2
6878 (inherit java-eclipse-jetty-util)
6882 (uri (string-append "https://github.com/eclipse/jetty.project/"
6883 "archive/jetty-" version ".v20170606.tar.gz"))
6886 "1i51qlsd7h06d35kx5rqpzbfadbcszycx1iwr6vz7qc9gf9f29la"))))
6888 `(#:jar-name "eclipse-jetty-util.jar"
6889 #:source-dir "src/main/java"
6892 (list "**/Abstract*.java"
6894 "**/InetAddressSetTest.java"
6895 ;; Assumes we are using maven
6896 "**/TypeUtilTest.java"
6897 ;; We don't have an implementation for slf4j
6899 ;; Error on the style of log
6900 "**/StdErrLogTest.java")
6902 (modify-phases %standard-phases
6903 (add-before 'configure 'chdir
6905 (chdir "jetty-util")
6907 (add-before 'build 'fix-test-sources
6909 ;; We need to fix issues caused by changes in newer versions of
6910 ;; jetty-test-helper
6911 (let ((src "src/test/java/org/eclipse/jetty/util/resource"))
6912 (substitute* (string-append src "/AbstractFSResourceTest.java")
6913 (("testdir.getDir\\(\\)") "testdir.getPath().toFile()")
6914 (("testdir.getFile\\(\"foo\"\\)")
6915 "testdir.getPathFile(\"foo\").toFile()")
6916 (("testdir.getFile\\(name\\)")
6917 "testdir.getPathFile(name).toFile()")))
6920 (define-public java-eclipse-jetty-io
6922 (inherit java-eclipse-jetty-util)
6923 (name "java-eclipse-jetty-io")
6925 `(#:jar-name "eclipse-jetty-io.jar"
6926 #:source-dir "src/main/java"
6928 #:test-exclude (list "**/Abstract*.java"
6930 "**/EndPointTest.java")
6932 (modify-phases %standard-phases
6933 (add-before 'configure 'chdir
6938 `(("slf4j" ,java-slf4j-api)
6939 ("servlet" ,java-javaee-servletapi)
6940 ("util" ,java-eclipse-jetty-util)))
6941 (synopsis "Jetty :: IO Utility")
6942 (description "The Jetty Web Server provides an HTTP server and Servlet
6943 container capable of serving static and dynamic content either from a standalone
6944 or embedded instantiation. This package provides IO-related utility classes.")))
6946 (define-public java-eclipse-jetty-io-9.2
6948 (inherit java-eclipse-jetty-io)
6949 (version (package-version java-eclipse-jetty-util-9.2))
6950 (source (package-source java-eclipse-jetty-util-9.2))
6952 `(("util" ,java-eclipse-jetty-util-9.2)
6953 ,@(package-inputs java-eclipse-jetty-util-9.2)))
6955 `(("mockito" ,java-mockito-1)
6956 ("cglib" ,java-cglib)
6957 ("objenesis" ,java-objenesis)
6959 ,@(package-native-inputs java-eclipse-jetty-util-9.2)))))
6961 (define-public java-eclipse-jetty-http
6963 (inherit java-eclipse-jetty-util)
6964 (name "java-eclipse-jetty-http")
6966 `(#:jar-name "eclipse-jetty-http.jar"
6967 #:source-dir "src/main/java"
6970 (modify-phases %standard-phases
6971 (add-before 'configure 'chdir
6973 (chdir "jetty-http")
6975 (add-before 'build 'copy-resources
6977 (mkdir-p "build/classes")
6978 (copy-recursively "src/main/resources/" "build/classes/")
6981 `(("slf4j" ,java-slf4j-api)
6982 ("servlet" ,java-javaee-servletapi)
6983 ("io" ,java-eclipse-jetty-io)
6984 ("util" ,java-eclipse-jetty-util)))
6985 (synopsis "Jetty :: Http Utility")
6986 (description "The Jetty Web Server provides an HTTP server and Servlet
6987 container capable of serving static and dynamic content either from a standalone
6988 or embedded instantiation. This package provides HTTP-related utility classes.")))
6990 (define-public java-eclipse-jetty-http-9.2
6992 (inherit java-eclipse-jetty-http)
6993 (version (package-version java-eclipse-jetty-util-9.2))
6994 (source (package-source java-eclipse-jetty-util-9.2))
6996 `(("util" ,java-eclipse-jetty-util-9.2)
6997 ("io" ,java-eclipse-jetty-io-9.2)
6998 ,@(package-inputs java-eclipse-jetty-util-9.2)))))
7000 (define-public java-eclipse-jetty-jmx
7002 (inherit java-eclipse-jetty-util)
7003 (name "java-eclipse-jetty-jmx")
7005 `(#:jar-name "eclipse-jetty-jmx.jar"
7006 #:source-dir "src/main/java"
7008 #:tests? #f; FIXME: requires com.openpojo.validation
7010 (modify-phases %standard-phases
7011 (add-before 'configure 'chdir
7016 `(("slf4j" ,java-slf4j-api)
7017 ("servlet" ,java-javaee-servletapi)
7018 ("util" ,java-eclipse-jetty-util)))
7019 (synopsis "Jetty :: JMX Management")
7020 (description "The Jetty Web Server provides an HTTP server and Servlet
7021 container capable of serving static and dynamic content either from a standalone
7022 or embedded instantiation. This package provides the JMX management.")))
7024 (define-public java-eclipse-jetty-jmx-9.2
7026 (inherit java-eclipse-jetty-jmx)
7027 (version (package-version java-eclipse-jetty-util-9.2))
7028 (source (package-source java-eclipse-jetty-util-9.2))
7030 `(("util" ,java-eclipse-jetty-util-9.2)
7031 ,@(package-inputs java-eclipse-jetty-util-9.2)))))
7033 (define java-eclipse-jetty-http-test-classes
7035 (inherit java-eclipse-jetty-util)
7036 (name "java-eclipse-jetty-http-test-classes")
7038 `(#:jar-name "eclipse-jetty-http.jar"
7039 #:source-dir "src/test"
7043 (modify-phases %standard-phases
7044 (add-before 'configure 'chdir
7046 (chdir "jetty-http")
7049 `(("slf4j" ,java-slf4j-api)
7050 ("java-javaee-servletapi" ,java-javaee-servletapi)
7051 ("http" ,java-eclipse-jetty-http)
7052 ("io" ,java-eclipse-jetty-io)
7053 ("util" ,java-eclipse-jetty-util)))))
7055 (define java-eclipse-jetty-http-test-classes-9.2
7057 (inherit java-eclipse-jetty-http-test-classes)
7058 (version (package-version java-eclipse-jetty-util-9.2))
7059 (source (package-source java-eclipse-jetty-util-9.2))
7061 `(("http" ,java-eclipse-jetty-http-9.2)
7062 ,@(package-inputs java-eclipse-jetty-http-9.2)))))
7064 (define-public java-eclipse-jetty-server
7066 (inherit java-eclipse-jetty-util)
7067 (name "java-eclipse-jetty-server")
7069 `(#:jar-name "eclipse-jetty-server.jar"
7070 #:source-dir "src/main/java"
7072 #:tests? #f; requires a mockito version we don't have
7074 (modify-phases %standard-phases
7075 (add-before 'configure 'chdir
7077 (chdir "jetty-server")
7079 (add-before 'build 'fix-source
7081 ;; Explicit casts to prevent build failures
7082 (substitute* "src/main/java/org/eclipse/jetty/server/Request.java"
7083 (("append\\(LazyList")
7084 "append((CharSequence)LazyList"))
7086 "src/main/java/org/eclipse/jetty/server/handler/ContextHandler.java"
7088 "Class<\\? extends EventListener> clazz = _classLoader==null"
7089 "\\?Loader.loadClass\\(ContextHandler.class,className\\):"
7090 "_classLoader.loadClass\\(className\\);"))
7091 (string-append "Class<? extends EventListener> clazz = "
7092 "(Class<? extends EventListener>) "
7093 "(_classLoader==null?Loader.loadClass("
7094 "ContextHandler.class,className):"
7095 "_classLoader.loadClass(className));")))
7098 `(("slf4j" ,java-slf4j-api)
7099 ("servlet" ,java-javaee-servletapi)
7100 ("http" ,java-eclipse-jetty-http)
7101 ("io" ,java-eclipse-jetty-io)
7102 ("jmx" ,java-eclipse-jetty-jmx)
7103 ("util" ,java-eclipse-jetty-util)))
7105 `(("test-classes" ,java-eclipse-jetty-http-test-classes)
7106 ,@(package-native-inputs java-eclipse-jetty-util)))
7107 (synopsis "Core jetty server artifact")
7108 (description "The Jetty Web Server provides an HTTP server and Servlet
7109 container capable of serving static and dynamic content either from a standalone
7110 or embedded instantiation. This package provides the core jetty server
7113 (define-public java-eclipse-jetty-server-9.2
7115 (inherit java-eclipse-jetty-server)
7116 (version (package-version java-eclipse-jetty-util-9.2))
7117 (source (package-source java-eclipse-jetty-util-9.2))
7119 `(("util" ,java-eclipse-jetty-util-9.2)
7120 ("jmx" ,java-eclipse-jetty-jmx-9.2)
7121 ("io" ,java-eclipse-jetty-io-9.2)
7122 ("http" ,java-eclipse-jetty-http-9.2)
7123 ,@(package-inputs java-eclipse-jetty-util-9.2)))
7125 `(("test-classes" ,java-eclipse-jetty-http-test-classes-9.2)
7126 ,@(package-native-inputs java-eclipse-jetty-util-9.2)))))
7128 (define-public java-eclipse-jetty-security
7130 (inherit java-eclipse-jetty-util)
7131 (name "java-eclipse-jetty-security")
7133 `(#:jar-name "eclipse-jetty-security.jar"
7134 #:source-dir "src/main/java"
7136 #:test-exclude (list "**/ConstraintTest.*") ; This test fails
7138 (modify-phases %standard-phases
7139 (add-before 'configure 'chdir
7141 (chdir "jetty-security")
7144 `(("slf4j" ,java-slf4j-api)
7145 ("servlet" ,java-javaee-servletapi)
7146 ("http" ,java-eclipse-jetty-http)
7147 ("server" ,java-eclipse-jetty-server)
7148 ("util" ,java-eclipse-jetty-util)))
7150 `(("io" ,java-eclipse-jetty-io)
7151 ,@(package-native-inputs java-eclipse-jetty-util)))
7152 (synopsis "Jetty security infrastructure")
7153 (description "The Jetty Web Server provides an HTTP server and Servlet
7154 container capable of serving static and dynamic content either from a standalone
7155 or embedded instantiation. This package provides the core jetty security
7158 (define-public java-eclipse-jetty-security-9.2
7160 (inherit java-eclipse-jetty-security)
7161 (version (package-version java-eclipse-jetty-util-9.2))
7162 (source (package-source java-eclipse-jetty-util-9.2))
7164 `(("util" ,java-eclipse-jetty-util-9.2)
7165 ("http" ,java-eclipse-jetty-http-9.2)
7166 ("server" ,java-eclipse-jetty-server-9.2)
7167 ,@(package-inputs java-eclipse-jetty-util-9.2)))
7169 `(("io" ,java-eclipse-jetty-io-9.2)
7170 ,@(package-native-inputs java-eclipse-jetty-util-9.2)))))
7172 (define-public java-eclipse-jetty-servlet
7174 (inherit java-eclipse-jetty-util)
7175 (name "java-eclipse-jetty-servlet")
7177 `(#:jar-name "eclipse-jetty-servlet.jar"
7178 #:source-dir "src/main/java"
7181 (modify-phases %standard-phases
7182 (add-before 'configure 'chdir
7184 (chdir "jetty-servlet")
7187 `(("slf4j" ,java-slf4j-api)
7188 ("java-javaee-servletapi" ,java-javaee-servletapi)
7189 ("http" ,java-eclipse-jetty-http)
7190 ("http-test" ,java-eclipse-jetty-http-test-classes)
7191 ("io" ,java-eclipse-jetty-io)
7192 ("jmx" ,java-eclipse-jetty-jmx)
7193 ("security" ,java-eclipse-jetty-security)
7194 ("server" ,java-eclipse-jetty-server)
7195 ("util" ,java-eclipse-jetty-util)))
7196 (synopsis "Jetty Servlet Container")
7197 (description "The Jetty Web Server provides an HTTP server and Servlet
7198 container capable of serving static and dynamic content either from a standalone
7199 or embedded instantiation. This package provides the core jetty servlet
7202 (define-public java-eclipse-jetty-servlet-9.2
7204 (inherit java-eclipse-jetty-servlet)
7205 (version (package-version java-eclipse-jetty-util-9.2))
7206 (source (package-source java-eclipse-jetty-util-9.2))
7208 `(#:jar-name "eclipse-jetty-servlet.jar"
7209 #:source-dir "src/main/java"
7211 #:tests? #f; doesn't work
7213 (modify-phases %standard-phases
7214 (add-before 'configure 'chdir
7216 (chdir "jetty-servlet")
7219 `(("util" ,java-eclipse-jetty-util-9.2)
7220 ("jmx" ,java-eclipse-jetty-jmx-9.2)
7221 ("io" ,java-eclipse-jetty-io-9.2)
7222 ("http" ,java-eclipse-jetty-http-9.2)
7223 ("security" ,java-eclipse-jetty-security-9.2)
7224 ("http-test" ,java-eclipse-jetty-http-test-classes-9.2)
7225 ("server" ,java-eclipse-jetty-server-9.2)
7226 ,@(package-inputs java-eclipse-jetty-util-9.2)))))
7228 (define-public java-eclipse-jetty-xml
7230 (inherit java-eclipse-jetty-util)
7231 (name "java-eclipse-jetty-xml")
7233 `(#:jar-name "eclipse-jetty-xml.jar"
7234 #:source-dir "src/main/java"
7236 #:tests? #f; most tests require network
7238 (modify-phases %standard-phases
7239 (add-before 'configure 'chdir
7244 `(("java-eclipse-jetty-util" ,java-eclipse-jetty-util)))
7246 `(("java-eclipse-jetty-io" ,java-eclipse-jetty-io)
7247 ,@(package-native-inputs java-eclipse-jetty-util)))))
7249 (define-public java-eclipse-jetty-xml-9.2
7251 (inherit java-eclipse-jetty-xml)
7252 (version (package-version java-eclipse-jetty-util-9.2))
7253 (source (package-source java-eclipse-jetty-util-9.2))
7255 `(#:jar-name "eclipse-jetty-xml.jar"
7256 #:source-dir "src/main/java"
7258 #:tests? #f; most tests require network
7260 (modify-phases %standard-phases
7261 (add-before 'configure 'chdir
7266 `(("java-eclipse-jetty-util-9.2" ,java-eclipse-jetty-util-9.2)
7267 ,@(package-inputs java-eclipse-jetty-util-9.2)))
7269 `(("java-eclipse-jetty-io-9.2" ,java-eclipse-jetty-io-9.2)
7270 ,@(package-native-inputs java-eclipse-jetty-util-9.2)))))
7272 (define-public java-eclipse-jetty-webapp
7274 (inherit java-eclipse-jetty-util)
7275 (name "java-eclipse-jetty-webapp")
7277 `(#:jar-name "eclipse-jetty-webapp.jar"
7278 #:source-dir "src/main/java"
7281 #:test-exclude (list "**/WebAppContextTest.java")
7283 (modify-phases %standard-phases
7284 (add-before 'configure 'chdir
7286 (chdir "jetty-webapp")
7289 `(("java-eclipse-jetty-util" ,java-eclipse-jetty-util)
7290 ("java-eclipse-jetty-http" ,java-eclipse-jetty-http)
7291 ("java-eclipse-jetty-server" ,java-eclipse-jetty-server)
7292 ("java-eclipse-jetty-servlet" ,java-eclipse-jetty-servlet)
7293 ("java-eclipse-jetty-security" ,java-eclipse-jetty-security)
7294 ("java-eclipse-jetty-xml" ,java-eclipse-jetty-xml)
7295 ("java-javaee-servletapi" ,java-javaee-servletapi)))
7297 `(("java-eclipse-jetty-io" ,java-eclipse-jetty-io)
7298 ,@(package-native-inputs java-eclipse-jetty-util)))))
7300 (define-public java-eclipse-jetty-webapp-9.2
7302 (inherit java-eclipse-jetty-webapp)
7303 (version (package-version java-eclipse-jetty-util-9.2))
7304 (source (package-source java-eclipse-jetty-util-9.2))
7306 `(#:jar-name "eclipse-jetty-webapp.jar"
7307 #:source-dir "src/main/java"
7309 #:test-exclude (list "**/WebAppContextTest.java")
7311 (modify-phases %standard-phases
7312 (add-before 'configure 'chdir
7314 (chdir "jetty-webapp")
7317 `(("java-eclipse-jetty-util-9.2" ,java-eclipse-jetty-util-9.2)
7318 ("java-eclipse-jetty-http-9.2" ,java-eclipse-jetty-http-9.2)
7319 ("java-eclipse-jetty-server-9.2" ,java-eclipse-jetty-server-9.2)
7320 ("java-eclipse-jetty-servlet-9.2" ,java-eclipse-jetty-servlet-9.2)
7321 ("java-eclipse-jetty-security-9.2" ,java-eclipse-jetty-security-9.2)
7322 ("java-eclipse-jetty-xml-9.2" ,java-eclipse-jetty-xml-9.2)
7323 ("java-javaee-servletapi" ,java-javaee-servletapi)
7324 ,@(package-inputs java-eclipse-jetty-util-9.2)))
7326 `(("java-eclipse-jetty-io-9.2" ,java-eclipse-jetty-io-9.2)
7327 ,@(package-native-inputs java-eclipse-jetty-util-9.2)))))
7329 (define-public java-jsoup
7336 (url "https://github.com/jhy/jsoup")
7337 (commit (string-append "jsoup-" version))))
7338 (file-name (git-file-name name version))
7341 "1hdpdx0x140r5x3yc251v7dj1h4j5a7nh9k885aw9q5vvz49lkf4"))))
7342 (build-system ant-build-system)
7344 `(#:jar-name "jsoup.jar"
7345 #:source-dir "src/main/java"
7347 (modify-phases %standard-phases
7348 (add-before 'build 'copy-resources
7350 (let ((classes-dir (string-append (getcwd) "/build/classes")))
7351 (with-directory-excursion "src/main/java"
7352 (for-each (lambda (file)
7353 (let ((dist (string-append classes-dir "/" file)))
7354 (mkdir-p (dirname dist))
7355 (copy-file file dist)))
7356 (find-files "." ".*.properties"))))
7359 `(("java-junit" ,java-junit)
7360 ("java-hamcrest-core" ,java-hamcrest-core)
7361 ("java-gson" ,java-gson)))
7362 (home-page "https://jsoup.org")
7363 (synopsis "HTML parser")
7364 (description "Jsoup is a Java library for working with real-world HTML. It
7365 provides a very convenient API for extracting and manipulating data, using the
7366 best of DOM, CSS, and jQuery-like methods.")
7367 (license license:expat)))
7369 (define-public java-signpost-core
7371 (name "java-signpost-core")
7376 (url "https://github.com/mttkay/signpost")
7378 (file-name (git-file-name name version))
7381 "1l04yj2znch3hpyw90c4g4jan453w7d88l84bgl0c72i2kbb8z7h"))))
7382 (build-system ant-build-system)
7384 `(#:jar-name "signpost-core.jar"
7385 #:source-dir "signpost-core/src/main/java"
7386 #:test-dir "signpost-core/src/test"
7387 ;; Tests all fail with InstantiationException from mockito
7390 `(("java-commons-codec" ,java-commons-codec)))
7391 (home-page "https://github.com/mttkay/signpost")
7392 (synopsis "Lightweight client-side OAuth library for Java")
7393 (description "Signpost is the easy and intuitive solution for signing
7394 HTTP messages on the Java platform in conformance with the OAuth Core 1.0a
7395 standard. Signpost follows a modular and flexible design, allowing you to
7396 combine it with different HTTP messaging layers.")
7397 (license license:asl2.0)))
7399 (define-public tidyp
7406 (uri (string-append "https://github.com/downloads/petdance/tidyp/tidyp-"
7410 "0f5ky0ih4vap9c6j312jn73vn8m2bj69pl2yd3a5nmv35k9zmc10"))))
7411 (build-system gnu-build-system)
7412 ;; ./test-thing.sh tries to run ./testall.sh, which is not included.
7413 (arguments `(#:tests? #f))
7414 (home-page "http://www.tidyp.com/")
7415 (synopsis "Validate HTML")
7416 (description "Tidyp is a program that can validate your HTML, as well as
7417 modify it to be more clean and standard. tidyp does not validate HTML 5.
7419 libtidyp is the library on which the program is based. It can be used by any
7420 other program that can interface to it. The Perl module @code{HTML::Tidy} is
7421 based on this library, allowing Perl programmers to easily validate HTML.")
7422 ;; See htmldoc/license.html
7423 (license license:bsd-3)))
7425 (define-public perl-html-tidy
7427 (name "perl-html-tidy")
7432 (uri (string-append "mirror://cpan/authors/id/P/PE/PETDANCE/HTML-Tidy-"
7436 "1iyp2fd6j75cn1xvcwl2lxr8qpjxssy2360cyqn6g3kzd1fzdyxw"))))
7437 (build-system perl-build-system)
7440 (modify-phases %standard-phases
7441 (add-after 'unpack 'fix-tidyp-paths
7442 (lambda* (#:key inputs #:allow-other-keys)
7443 (substitute* "Makefile.PL"
7444 (("^my \\$inc = \"" line)
7446 "-I" (assoc-ref inputs "tidyp") "/include/tidyp "))
7449 "-L" (assoc-ref inputs "tidyp") "/lib")))
7452 `(("perl-libwww" ,perl-libwww)
7455 `(("perl-test-exception" ,perl-test-exception)))
7456 (home-page "https://metacpan.org/release/HTML-Tidy")
7457 (synopsis "(X)HTML validation in a Perl object")
7458 (description "@code{HTML::Tidy} is an HTML checker in a handy dandy
7459 object. It's meant as a replacement for @code{HTML::Lint}, which is written
7460 in Perl but is not nearly as capable as @code{HTML::Tidy}.")
7461 (license license:artistic2.0)))
7463 (define-public geomyidae
7471 (url "git://r-36.net/geomyidae")
7472 (commit (string-append "v" version))))
7473 (file-name (git-file-name name version))
7475 (base32 "02afgrk36wkdkflyqr2xgh49v9zq6ma454jshk7igvhpxfb5l3ks"))))
7476 (build-system gnu-build-system)
7478 `(#:make-flags (list "CC=gcc"
7479 (string-append "PREFIX="
7480 (assoc-ref %outputs "out")))
7481 #:tests? #f ; no tests
7482 #:phases (modify-phases %standard-phases
7483 (delete 'configure))))
7484 (home-page "http://r-36.net/scm/geomyidae/file/README.html")
7485 (synopsis "Small Gopher server")
7487 "Geomyidae is a server for distributed hypertext protocol Gopher. Its
7491 @item Gopher menus (see @file{index.gph} for an example);
7492 @item directory listings (if no @file{index.gph} was found);
7493 @item CGI support (@file{.cgi} files are executed);
7494 @item search support in CGI files;
7495 @item logging with multiple log levels.
7497 (license license:expat)))
7499 (define-public cat-avatar-generator
7501 (name "cat-avatar-generator")
7506 (url "https://framagit.org/Deevad/cat-avatar-generator.git")
7507 (commit "71c0c662742cafe8afd2d2d50ec84243113e35ad")))
7508 (file-name (string-append name "-" version))
7511 "0s7b5whqsmfa57prbgl66ym551kg6ly0z14h5dgrlx4lqm70y2yw"))))
7512 (build-system trivial-build-system)
7514 `(#:modules ((guix build utils))
7517 (use-modules (guix build utils)
7521 (let ((source (assoc-ref %build-inputs "source"))
7522 (php-dir (string-append %output "/share/web/" ,name "/")))
7523 ;; The cache directory must not be in the store, but in a writable
7524 ;; location. The webserver will give us this location.
7525 (copy-recursively source php-dir)
7526 (substitute* (string-append php-dir "/cat-avatar-generator.php")
7527 (("\\$cachepath = .*")
7528 "if(isset($_SERVER['CACHE_DIR']))
7529 $cachepath = $_SERVER['CACHE_DIR'];
7531 die('You need to set the CACHE_DIR variable first.');"))
7533 (home-page "https://framagit.org/Deevad/cat-avatar-generator")
7534 (synopsis "Random avatar generator")
7535 (description "Cat avatar generator is a generator of cat pictures optimised
7536 to generate random avatars, or defined avatar from a \"seed\". This is a
7537 derivation by David Revoy from the original MonsterID by Andreas Gohr.")
7538 ;; expat for the code, CC-BY 4.0 for the artwork
7539 (license (list license:expat
7540 license:cc-by4.0))))
7542 (define-public nghttp2
7549 (uri (string-append "https://github.com/nghttp2/nghttp2/"
7550 "releases/download/v" version "/"
7551 "nghttp2-" version ".tar.xz"))
7554 "1hk77vngjmvvzb5y1gi1aqwf6qywrc7yak08zvzb7x81qs6mphmb"))))
7555 (build-system gnu-build-system)
7556 (outputs (list "out"
7557 "lib")) ; only libnghttp2
7559 `(("pkg-config" ,pkg-config)
7561 ;; Required by tests.
7563 ("tzdata" ,tzdata-for-tests)))
7565 ;; Required to build the tools (i.e. without ‘--enable-lib-only’).
7566 `(("c-ares" ,c-ares)
7567 ("jansson" ,jansson) ; for HPACK tools
7568 ,@(if (hurd-target?) '()
7569 `(("jemalloc" ,jemalloc))) ; fight nghttpd{,x} heap fragmentation
7571 ("libxml2" ,libxml2) ; for ‘nghttp -a’
7572 ("openssl" ,openssl)
7573 ,@(if (hurd-target?)
7574 `(("openssl-static" ,openssl "static"))
7578 (list (string-append "--libdir=" (assoc-ref %outputs "lib") "/lib")
7579 "--enable-app" ; build all the tools
7580 "--enable-hpack-tools" ; ...all the tools
7581 "--disable-examples"
7582 "--disable-static") ; don't bother building .a files
7584 (modify-phases %standard-phases
7585 (add-after 'unpack 'break-circular-reference
7586 ;; libnghttp2.pc by default retains a reference to the ‘out’ output,
7587 ;; which is not allowed. Break this cycle. While we could install
7588 ;; only the library to ‘out’ and move everything else to a separate
7589 ;; output, this would inconvenience the majority of (human) users.
7590 (lambda* (#:key outputs #:allow-other-keys)
7591 (substitute* "lib/libnghttp2.pc.in"
7593 (assoc-ref outputs "lib")))
7595 (add-before 'check 'set-timezone-directory
7596 (lambda* (#:key inputs native-inputs #:allow-other-keys)
7597 (setenv "TZDIR" (string-append
7598 (assoc-ref (or native-inputs inputs) "tzdata")
7601 (home-page "https://nghttp2.org/")
7602 (synopsis "HTTP/2 protocol client, proxy, server, and library")
7604 "nghttp2 implements the Hypertext Transfer Protocol, version
7607 A reusable C library provides the HTTP/2 framing layer, with several tools built
7611 @item @command{nghttp}, a command-line HTTP/2 client. It exposes many advanced
7612 and low-level aspects of the protocol and is useful for debugging.
7613 @item @command{nghttpd}, a fast, multi-threaded HTTP/2 static web server that
7614 serves files from a local directory.
7615 @item @command{nghttpx}, a fast, multi-threaded HTTP/2 reverse proxy that can be
7616 deployed in front of existing web servers that don't support HTTP/2.
7617 Both @command{nghttpd} and @command{nghttpx} can fall back to HTTP/1.1 for
7618 backwards compatibility with clients that don't speak HTTP/2.
7619 @item @command{h2load} for benchmarking (only!) your own HTTP/2 servers.
7620 @item HTTP/2 uses a header compression method called @dfn{HPACK}.
7621 nghttp2 provides a HPACK encoder and decoder as part of its public API.
7622 @item @command{deflatehd} converts JSON data or HTTP/1-style header fields to
7623 compressed JSON header blocks.
7624 @item @command{inflatehd} converts such compressed headers back to JSON pairs.
7626 (license license:expat)))
7628 (define-public hpcguix-web
7629 (let ((commit "9de63562b06b4aef3a3afe5ecb18d3c91e57ee74")
7632 (name "hpcguix-web")
7633 (version (git-version "0.0.1" revision commit))
7637 (url "https://github.com/UMCUGenetics/hpcguix-web")
7639 (file-name (git-file-name name version))
7642 "0wjgj2s7v2cyz6dx24c111rxs99i84sfvxl4ch8brnh02j2606jz"))))
7643 (build-system gnu-build-system)
7645 `(#:modules ((guix build gnu-build-system)
7651 (modify-phases %standard-phases
7652 (add-before 'configure 'set-variables
7654 ;; This prevents a few warnings
7655 (setenv "GUILE_AUTO_COMPILE" "0")
7656 (setenv "XDG_CACHE_HOME" (getcwd))
7658 (add-after 'install 'wrap-program
7659 (lambda* (#:key inputs outputs #:allow-other-keys)
7660 (let* ((out (assoc-ref outputs "out"))
7661 (guix (assoc-ref inputs "guix"))
7662 (guile (assoc-ref inputs "guile"))
7663 (gcrypt (assoc-ref inputs "guile-gcrypt"))
7664 (git (assoc-ref inputs "guile-git"))
7665 (bs (assoc-ref inputs "guile-bytestructures"))
7666 (json (assoc-ref inputs "guile-json"))
7667 (guile-cm (assoc-ref inputs
7668 "guile-commonmark"))
7669 (deps (list guile gcrypt git bs guile-cm guix json))
7672 (open-pipe* OPEN_READ
7673 (string-append guile "/bin/guile")
7674 "-c" "(display (effective-version))")))
7676 (map (cut string-append <>
7677 "/share/guile/site/"
7681 (gopath (string-join
7682 (map (cut string-append <>
7683 "/lib/guile/" effective
7687 (wrap-program (string-append out "/bin/run")
7688 `("GUILE_LOAD_PATH" ":" prefix (,path))
7689 `("GUILE_LOAD_COMPILED_PATH" ":" prefix (,gopath)))
7693 `(("autoconf" ,autoconf)
7694 ("automake" ,automake)
7695 ("uglify-js" ,uglify-js)
7696 ("pkg-config" ,pkg-config)))
7698 `(("guile" ,@(assoc-ref (package-native-inputs guix) "guile"))
7701 `(("guile" ,@(assoc-ref (package-native-inputs guix) "guile"))
7702 ("guile-commonmark" ,guile-commonmark)
7703 ("guile-json" ,guile-json-4)))
7704 (home-page "https://github.com/UMCUGenetics/hpcguix-web")
7705 (synopsis "Web interface for cluster deployments of Guix")
7706 (description "Hpcguix-web provides a web interface to the list of packages
7707 provided by Guix. The list of packages is searchable and provides
7708 instructions on how to use Guix in a shared HPC environment.")
7709 (license license:agpl3+))))
7711 (define-public httrack
7717 (uri (string-append "https://mirror.httrack.com/historical/"
7718 "httrack-" version ".tar.gz"))
7721 "09a0gm67nml86qby1k1gh7rdxamnrnzwr6l9r5iiq94favjs0xrl"))))
7722 (build-system gnu-build-system)
7724 `(("libressl" ,libressl)
7726 (home-page "https://www.httrack.com/")
7727 (synopsis "Easy-to-use offline browser utility")
7728 (description "HTTrack allows you to download a World Wide Web site from
7729 the Internet to a local directory, building recursively all directories,
7730 getting HTML, images, and other files from the server to your computer.
7732 HTTrack arranges the original site's relative link-structure. Simply open
7733 a page of the @emph{mirrored} website in your browser, and you can browse the
7734 site from link to link, as if you were viewing it online. HTTrack can also
7735 update an existing mirrored site, and resume interrupted downloads.
7737 HTTrack is fully configurable, and has an integrated help system.")
7738 (license license:gpl3+)))
7747 (uri (pypi-uri "buku" version))
7748 (file-name (git-file-name name version))
7750 (base32 "1bk3h2ya34a5livyf6p7kawh50ikbix5szsq2rkb8cp5bwrzsj5i"))))
7751 (build-system python-build-system)
7753 `(#:tests? #f)) ;FIXME: many tests need network access
7755 `(("python-beautifulsoup4" ,python-beautifulsoup4)
7756 ("python-certifi" ,python-certifi)
7757 ("python-cryptography" ,python-cryptography)
7758 ("python-html5lib" ,python-html5lib)
7759 ("python-urllib3" ,python-urllib3)))
7760 (home-page "https://github.com/jarun/buku")
7761 (synopsis "Bookmark manager")
7763 "buku is a powerful bookmark manager written in Python3 and SQLite3.
7764 @command{buku} can auto-import bookmarks from your browser and present them
7765 in an interactive command-line interface that lets you compose and update
7766 bookmarks directly. It can also present them in a web interface with
7767 @command{bukuserver}.")
7768 (license license:gpl3+)))
7770 (define-public anonip
7776 (uri (pypi-uri "anonip" version))
7779 "0ckn9nnfhpdnz8b92q8pkysdqj6pdh71ckfqvfj0z01cq0hzbhd2"))))
7780 (build-system python-build-system)
7781 (home-page "https://github.com/DigitaleGesellschaft/Anonip")
7782 (synopsis "Anonymize IP addresses in log files")
7784 "Anonip masks the last bits of IPv4 and IPv6 addresses in log files.
7785 That way most of the relevant information is preserved, while the IP address
7786 does not match a particular individuum anymore.
7788 Depending on your Web server, the log entries may be piped to Anonip directly
7789 or via a FIFO (named pipe). Thus the unmasked IP addresses will never be
7790 written to any file.
7792 It's also possible to rewrite existing log files.
7794 Anonip can also be uses as a Python module in your own Python application.")
7795 (license license:bsd-3)))
7797 (define-public poussetaches
7799 (name "poussetaches")
7805 (url "https://github.com/tsileo/poussetaches")
7807 (file-name (git-file-name name version))
7810 "0kckcwvqklavd855np9aq5js6mg84isrlwchr504yigwma0sm7hm"))))
7811 (build-system go-build-system)
7813 `(("go-github-com-robfig-cron" ,go-github-com-robfig-cron)
7814 ("go-golang-org-x-time" ,go-golang-org-x-time)))
7816 `(#:import-path "github.com/tsileo/poussetaches"))
7817 (home-page "https://github.com/tsileo/poussetaches")
7818 (synopsis "Lightweight asynchronous task execution service")
7819 (description "Poussetaches (which literally means \"push tasks\" in
7820 French) is a lightweight asynchronous task execution service that aims to
7821 replace Celery and RabbitMQ for small Python applications.
7823 The app posts base64-encoded payload to poussetaches and specifies the
7824 endpoint that will be used to trigger the task. Poussetaches makes HTTP
7825 requests with the registered payload until the right status code is
7827 (license license:isc)))
7829 (define-public htmlcxx
7837 (string-append "mirror://sourceforge/htmlcxx/v"
7838 version "/htmlcxx-" version ".tar.gz"))
7840 (base32 "1j3mzjlczjrk4ahc43s6kzpvzypzjmqz4sillnca5yadrwwgjf2x"))))
7841 (build-system gnu-build-system)
7842 (home-page "http://htmlcxx.sourceforge.net/")
7843 (synopsis "Simple non-validating CSS1 and HTML parser for C++")
7844 (description "htmlcxx is a simple non-validating CSS1 and HTML parser for
7845 C++. Although there are several other HTML parsers available, htmlcxx has some
7846 characteristics that make it unique:
7848 @item STL like navigation of DOM tree, using excelent's tree.hh library from
7850 @item It is possible to reproduce exactly, character by character, the original
7851 document from the parse tree
7852 @item Bundled CSS parser
7853 @item Optional parsing of attributes
7854 @item C++ code that looks like C++ (not so true anymore)
7855 @item Offsets of tags/elements in the original document are stored in the nodes
7858 (license (list license:lgpl2.0
7862 (define-public librocket
7871 (url "https://github.com/libRocket/libRocket")
7872 (commit (string-append "release-" version))))
7873 (file-name (git-file-name name version))
7875 (base32 "1n6gq007vqijyfasfnfg6c8d2rc9qarl4bhzbgkz062m4h5izlfs"))))
7876 (build-system cmake-build-system)
7878 `(#:tests? #f ; No tests.
7880 (modify-phases %standard-phases
7881 (add-after 'unpack 'chdir
7883 (chdir "Build"))))))
7885 `(("freetype" ,freetype)))
7886 (home-page "https://github.com/libRocket/libRocket") ; http://librocket.com/ is down.
7887 (synopsis "HTML/CSS user interface library")
7888 (description "libRocket is a C++ user interface package based on the HTML
7889 and CSS standards. libRocket uses the open standards XHTML1.0 and
7890 CSS2.0 (while borrowing features from HTML5 and CSS3), and extends them with
7891 features suited towards real-time applications. It is designed as a complete
7892 solution for any project's interface needs:
7895 @item Dynamic layout system.
7896 @item Efficient application-wide styling, with a custom-built templating engine.
7897 @item Fully featured control set: buttons, sliders, drop-downs, etc.
7898 @item Runtime visual debugging suite.
7899 @item Easily integrated and extensible with Python or Lua scripting.
7901 (license license:expat)))
7903 (define-public gmnisrv
7904 (let ((commit "d484ba0ab0020866535a44be5948c9482b8f2b8d")
7908 (version (git-version "0" revision commit))
7909 (home-page "https://git.sr.ht/~sircmpwn/gmnisrv")
7917 "11phipixsxx1jgm42agp76p5s68l0zj65kgb41vzaymgwcq79ivn"))
7918 (file-name (git-file-name name version))))
7919 (build-system gnu-build-system)
7922 (modify-phases %standard-phases
7923 (add-before 'configure 'set-variables
7929 `(("openssl" ,openssl)))
7931 `(("pkg-config" ,pkg-config)
7934 `(("mailcap" ,mailcap)))
7935 (synopsis "Simple Gemini protocol server")
7936 (description "gmnisrv is a simple Gemini protocol server written in C.")
7937 (license (list license:gpl3+
7938 license:bsd-3))))) ;; for ini.c and ini.h
7940 (define-public libzim
7947 (url "https://github.com/openzim/libzim")
7951 "0iy0f1clhihq277x218ccx3mszgpr3h9l0by48b9ykr115nffw3s"))
7952 (file-name (git-file-name name version))))
7953 (build-system meson-build-system)
7955 ;; TODO: Find out why tests fail.
7960 ("libuuid" ,util-linux "lib")
7962 ("zstd" ,zstd "lib")))
7964 `(("pkg-config" ,pkg-config)
7965 ("googletest" ,googletest)))
7966 (home-page "https://wiki.openzim.org/wiki/Main_Page")
7967 (synopsis "Reference implementation of the ZIM specification")
7968 (description "The openZIM project proposes offline storage solutions for
7969 content coming from the Web. The zimlib is the standard implementation of the
7970 ZIM specification. It is a library which implements the read and write method
7972 (license license:gpl2)))
7974 (define-public kiwix-lib
7978 (home-page "https://github.com/kiwix/kiwix-lib/")
7986 "034nk6l623v78clrs2d0k1vg69sbzrd8c0q79qiqmlkinck1nkxw"))
7987 (file-name (git-file-name name version))))
7988 (build-system meson-build-system)
7991 (modify-phases %standard-phases
7992 (add-before 'configure 'fix-paths-and-includes
7993 (lambda* (#:key inputs #:allow-other-keys)
7994 (setenv "CPPFLAGS" (string-append "-I" (assoc-ref inputs "mustache")))
7995 (substitute* "src/aria2.cpp"
7996 (("ARIA2_CMD \"aria2c\"")
7997 (string-append "ARIA2_CMD \""
7998 (assoc-ref inputs "aria2")
8005 ("libmicrohttpd" ,libmicrohttpd)
8007 ("pugixml" ,pugixml)
8010 ("zstd" ,zstd "lib")))
8012 `(("mustache" ,(origin
8015 (url "https://github.com/kainjow/Mustache")
8016 ;; XXX: Readme says to use version 3. Can we use 3.2.1?
8018 (file-name (git-file-name "mustache" "4.1"))
8021 "0r9rbk6v1wpld2ismfsk2lkhbyv3dkf0p03hkjivbj05qkfhvlbb"))))
8022 ("pkg-config" ,pkg-config)))
8023 (synopsis "Common code base for all Kiwix ports")
8024 (description "The Kiwix library provides the Kiwix software suite core.
8025 It contains the code shared by all Kiwix ports.")
8026 (license license:gpl3)))
8028 (define-public kiwix-desktop
8030 (name "kiwix-desktop")
8035 "https://download.kiwix.org/release/kiwix-desktop/kiwix-desktop-"
8040 "1a9h4qmh6fkfscyp6lax0ri07dvvzw2wp4kr1sm86n0bdk3cwwha"))))
8041 (build-system gnu-build-system)
8044 (modify-phases %standard-phases
8046 (lambda* (#:key outputs #:allow-other-keys)
8048 (string-append "PREFIX="
8049 (assoc-ref outputs "out")))))
8050 (add-before 'configure 'enable-print-support
8052 (substitute* "kiwix-desktop.pro"
8053 (("webenginewidgets") "webenginewidgets printsupport"))
8055 (add-before 'configure 'substitute-source
8056 ;; Looks like .pro file is missing a feature.
8057 ;; See https://github.com/kiwix/kiwix-desktop/issues/556.
8058 (lambda* (#:key inputs #:allow-other-keys)
8059 (substitute* "kiwix-desktop.pro"
8060 (("webenginewidgets" all) (string-append all " printsupport")))
8062 (add-after 'install 'wrap-qt-process-path
8063 (lambda* (#:key inputs outputs #:allow-other-keys)
8064 (let* ((out (assoc-ref outputs "out"))
8065 (bin (string-append out "/bin/kiwix-desktop"))
8066 (qt-process-path (string-append
8067 (assoc-ref inputs "qtwebengine")
8068 "/lib/qt5/libexec/QtWebEngineProcess")))
8070 `("QTWEBENGINEPROCESS_PATH" = (,qt-process-path)))
8075 ("kiwix-lib" ,kiwix-lib)
8076 ("libmicrohttpd" ,libmicrohttpd)
8078 ("pugixml" ,pugixml)
8080 ("qtdeclarative" ,qtdeclarative)
8081 ("qtwebchannel" ,qtwebchannel)
8082 ("qtwebengine" ,qtwebengine)
8085 ("zstd" ,zstd "lib")))
8087 `(("pkg-config" ,pkg-config)
8089 (home-page "https://wiki.kiwix.org/wiki/Software")
8090 (synopsis "Viewer and manager of ZIM files")
8091 (description "Kiwix Desktop allows you to enjoy a lot of different content
8092 offline (such as Wikipedia), without any access to Internet.")
8093 (license license:gpl3)))
8095 (define-public uriparser
8096 (let ((commit "25dddb16cf044a7df27884e7ad3911baaaca3d7c")
8100 (version (git-version "0.9.4" revision commit))
8104 (url "https://github.com/uriparser/uriparser")
8106 (file-name (git-file-name name version))
8109 "1ffzia679axcsccx2fxjpxhb0i5xc42zxn446x6c1170w6v69qf6"))))
8110 (build-system cmake-build-system)
8111 (native-inputs `(("gtest" ,googletest)
8112 ("doxygen" ,doxygen)
8113 ("graphviz" ,graphviz)))
8114 (synopsis "Strictly RFC 3986 compliant URI parsing and handling library")
8115 (description "uriparser is a strictly RFC 3986 compliant URI parsing and
8116 handling library written in C89 (\"ANSI C\"). uriparser is fast and supports
8118 (home-page "https://uriparser.github.io/")
8119 (license license:bsd-3))))
8121 (define-public quark
8123 (let ((revision "0")
8124 (commit "c6a9055e5a30be570e30da8d216c39662c3a3f99"))
8127 (version (git-version "0.0.0" revision commit))
8131 (url "https://git.suckless.org/quark/")
8133 (file-name (git-file-name name version))
8136 "1znvnr30xi5vgd6n3wvgv9pwj992zpzzjk0fmq28ydf1l6kqvkm7"))))
8137 (build-system gnu-build-system)
8139 `(#:tests? #f ; no tests
8141 (list (string-append "CC=" ,(cc-for-target))
8142 (string-append "PREFIX=" %output))
8144 (modify-phases %standard-phases
8145 (delete 'configure)))) ; no configure script
8146 (home-page "https://tools.suckless.org/quark/")
8147 (synopsis "Small and simple HTTP GET/HEAD-only web server for static
8149 (description "Quark is an extremely small and simple HTTP GET/HEAD only
8150 web server for static content. TLS is not natively supported and should be
8151 provided by a TLS reverse proxy (e.g. tlstunnel, hitch or stunnel).")
8152 (license license:isc)
8154 ;; XXX: Ignore this CVE to work around a name clash with the unrelated
8155 ;; "cpe:2.3:a:comelz:quark" package. The proper fix is for (guix cve)
8156 ;; to account for "vendor names".
8157 (properties '((lint-hidden-cve . ("CVE-2019-15520")))))))