* gnu/packages/web.scm (uriparser): New variable. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
8032 lines
315 KiB
Scheme
8032 lines
315 KiB
Scheme
;;; GNU Guix --- Functional package management for GNU
|
||
;;; Copyright © 2013, 2015 Andreas Enge <andreas@enge.fr>
|
||
;;; Copyright © 2013 Aljosha Papsch <misc@rpapsch.de>
|
||
;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019, 2020 Ludovic Courtès <ludo@gnu.org>
|
||
;;; Copyright © 2014, 2015, 2016 Mark H Weaver <mhw@netris.org>
|
||
;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020 Ricardo Wurmus <rekado@elephly.net>
|
||
;;; Copyright © 2018 Raoul Jean Pierre Bonnal <ilpuccio.febo@gmail.com>
|
||
;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
|
||
;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020 Eric Bavier <bavier@posteo.net>
|
||
;;; Copyright © 2015 Eric Dvorsak <eric@dvorsak.fr>
|
||
;;; Copyright © 2016 Sou Bunnbu <iyzsong@gmail.com>
|
||
;;; Copyright © 2016 Jelle Licht <jlicht@fsfe.org>
|
||
;;; Copyright © 2016, 2017, 2018, 2019, 2020 Efraim Flashner <efraim@flashner.co.il>
|
||
;;; Copyright © 2016 Rene Saavedra <rennes@openmailbox.org>
|
||
;;; Copyright © 2016 Ben Woodcroft <donttrustben@gmail.com>
|
||
;;; Copyright © 2016 Clément Lassieur <clement@lassieur.org>
|
||
;;; Copyright © 2016, 2017 Nikita <nikita@n0.is>
|
||
;;; Copyright © 2016, 2017, 2018, 2019 Arun Isaac <arunisaac@systemreboot.net>
|
||
;;; Copyright © 2016, 2017, 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
|
||
;;; Copyright © 2016 Bake Timmons <b3timmons@speedymail.org>
|
||
;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be>
|
||
;;; Copyright © 2017, 2018, 2020 Marius Bakke <mbakke@fastmail.com>
|
||
;;; Copyright © 2017 Kei Kebreau <kkebreau@posteo.net>
|
||
;;; Copyright © 2017 Petter <petter@mykolab.ch>
|
||
;;; Copyright © 2017 Pierre Langlois <pierre.langlois@gmx.com>
|
||
;;; Copyright © 2017 Rutger Helling <rhelling@mykolab.com>
|
||
;;; Copyright © 2017, 2019, 2020 Christopher Baines <mail@cbaines.net>
|
||
;;; Copyright © 2018, 2019 Julien Lepiller <julien@lepiller.eu>
|
||
;;; Copyright © 2018 Pierre-Antoine Rouby <pierre-antoine.rouby@inria.fr>
|
||
;;; Copyright © 2018 Gábor Boskovits <boskovits@gmail.com>
|
||
;;; Copyright © 2018 Mădălin Ionel Patrașcu <madalinionel.patrascu@mdc-berlin.de>
|
||
;;; Copyright © 2018 Alex Vong <alexvong1995@gmail.com>
|
||
;;; Copyright © 2019, 2020 Nicolas Goaziou <mail@nicolasgoaziou.fr>
|
||
;;; Copyright © 2019 Brendan Tildesley <mail@brendan.scot>
|
||
;;; Copyright © 2019 Alex Griffin <a@ajgrf.com>
|
||
;;; Copyright © 2019 Hartmut Goebel <h.goebel@crazy-compilers.com>
|
||
;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.org>
|
||
;;; Copyright © 2019 Mathieu Othacehe <m.othacehe@gmail.com>
|
||
;;; Copyright © 2019 Pierre-Moana Levesque <pierre.moana.levesque@gmail.com>
|
||
;;; Copyright © 2019, 2020 Florian Pelz <pelzflorian@pelzflorian.de>
|
||
;;; Copyright © 2020 Timotej Lazar <timotej.lazar@araneo.si>
|
||
;;; Copyright © 2020 Alexandros Theodotou <alex@zrythm.org>
|
||
;;; Copyright © 2020 Pierre Neidhardt <mail@ambrevar.xyz>
|
||
;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
|
||
;;; Copyright © 2018, 2019, 2020 Björn Höfling <bjoern.hoefling@bjoernhoefling.de>
|
||
;;; Copyright © 2020 Paul Garlick <pgarlick@tourbillion-technology.com>
|
||
;;; Copyright © 2020 Michael Rohleder <mike@rohleder.de>
|
||
;;; Copyright © 2020 Ryan Prior <rprior@protonmail.com>
|
||
;;; Copyright © 2020 Alexandru-Sergiu Marton <brown121407@posteo.ro>
|
||
;;;
|
||
;;; This file is part of GNU Guix.
|
||
;;;
|
||
;;; GNU Guix is free software; you can redistribute it and/or modify it
|
||
;;; under the terms of the GNU General Public License as published by
|
||
;;; the Free Software Foundation; either version 3 of the License, or (at
|
||
;;; your option) any later version.
|
||
;;;
|
||
;;; GNU Guix is distributed in the hope that it will be useful, but
|
||
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
;;; GNU General Public License for more details.
|
||
;;;
|
||
;;; You should have received a copy of the GNU General Public License
|
||
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
|
||
|
||
(define-module (gnu packages web)
|
||
#:use-module (ice-9 match)
|
||
#:use-module ((guix licenses) #:prefix license:)
|
||
#:use-module (guix packages)
|
||
#:use-module (guix download)
|
||
#:use-module (guix gexp)
|
||
#:use-module (guix cvs-download)
|
||
#:use-module (guix hg-download)
|
||
#:use-module (guix git-download)
|
||
#:use-module (guix utils)
|
||
#:use-module (guix build-system ant)
|
||
#:use-module (guix build-system cargo)
|
||
#:use-module (guix build-system cmake)
|
||
#:use-module (guix build-system glib-or-gtk)
|
||
#:use-module (guix build-system gnu)
|
||
#:use-module (guix build-system go)
|
||
#:use-module (guix build-system meson)
|
||
#:use-module (guix build-system perl)
|
||
#:use-module (guix build-system python)
|
||
#:use-module (guix build-system qt)
|
||
#:use-module (guix build-system scons)
|
||
#:use-module (guix build-system trivial)
|
||
#:use-module (gnu packages)
|
||
#:use-module (gnu packages admin)
|
||
#:use-module (gnu packages adns)
|
||
#:use-module (gnu packages apr)
|
||
#:use-module (gnu packages autotools)
|
||
#:use-module (gnu packages base)
|
||
#:use-module (gnu packages bison)
|
||
#:use-module (gnu packages bittorrent)
|
||
#:use-module (gnu packages boost)
|
||
#:use-module (gnu packages check)
|
||
#:use-module (gnu packages compression)
|
||
#:use-module (gnu packages crates-gtk)
|
||
#:use-module (gnu packages crates-io)
|
||
#:use-module (gnu packages curl)
|
||
#:use-module (gnu packages cyrus-sasl)
|
||
#:use-module (gnu packages databases)
|
||
#:use-module (gnu packages docbook)
|
||
#:use-module (gnu packages documentation)
|
||
#:use-module (gnu packages emacs)
|
||
#:use-module (gnu packages emacs-xyz)
|
||
#:use-module (gnu packages flex)
|
||
#:use-module (gnu packages fontutils)
|
||
#:use-module (gnu packages freedesktop)
|
||
#:use-module (gnu packages gcc)
|
||
#:use-module (gnu packages gd)
|
||
#:use-module (gnu packages gettext)
|
||
#:use-module (gnu packages glib)
|
||
#:use-module (gnu packages gnome)
|
||
#:use-module (gnu packages gnu-doc)
|
||
#:use-module (gnu packages gnunet)
|
||
#:use-module (gnu packages gnupg)
|
||
#:use-module (gnu packages golang)
|
||
#:use-module (gnu packages gperf)
|
||
#:use-module (gnu packages graphviz)
|
||
#:use-module (gnu packages gtk)
|
||
#:use-module (gnu packages guile)
|
||
#:use-module (gnu packages guile-xyz)
|
||
#:use-module (gnu packages hurd)
|
||
#:use-module (gnu packages icu4c)
|
||
#:use-module (gnu packages image)
|
||
#:use-module (gnu packages java)
|
||
#:use-module (gnu packages jemalloc)
|
||
#:use-module (gnu packages imagemagick)
|
||
#:use-module (gnu packages kde)
|
||
#:use-module (gnu packages kerberos)
|
||
#:use-module (gnu packages libevent)
|
||
#:use-module (gnu packages libidn)
|
||
#:use-module (gnu packages libunistring)
|
||
#:use-module (gnu packages libunwind)
|
||
#:use-module (gnu packages linux)
|
||
#:use-module (gnu packages lisp-xyz)
|
||
#:use-module (gnu packages lsof)
|
||
#:use-module (gnu packages lua)
|
||
#:use-module (gnu packages mail)
|
||
#:use-module (gnu packages man)
|
||
#:use-module (gnu packages markup)
|
||
#:use-module (gnu packages ncurses)
|
||
#:use-module (gnu packages networking)
|
||
#:use-module (gnu packages nss)
|
||
#:use-module (gnu packages openldap)
|
||
#:use-module (gnu packages openstack)
|
||
#:use-module (gnu packages package-management)
|
||
#:use-module (gnu packages pcre)
|
||
#:use-module (gnu packages perl)
|
||
#:use-module (gnu packages perl-check)
|
||
#:use-module (gnu packages python)
|
||
#:use-module (gnu packages python-crypto)
|
||
#:use-module (gnu packages python-web)
|
||
#:use-module (gnu packages python-xyz)
|
||
#:use-module (gnu packages pkg-config)
|
||
#:use-module (gnu packages qt)
|
||
#:use-module (gnu packages re2c)
|
||
#:use-module (gnu packages readline)
|
||
#:use-module (gnu packages search)
|
||
#:use-module (gnu packages sphinx)
|
||
#:use-module (gnu packages texinfo)
|
||
#:use-module (gnu packages textutils)
|
||
#:use-module (gnu packages tls)
|
||
#:use-module (gnu packages valgrind)
|
||
#:use-module (gnu packages version-control)
|
||
#:use-module (gnu packages vim)
|
||
#:use-module (gnu packages xml)
|
||
#:use-module ((srfi srfi-1) #:select (delete-duplicates)))
|
||
|
||
(define-public httpd
|
||
(package
|
||
(name "httpd")
|
||
(version "2.4.46")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://apache/httpd/httpd-"
|
||
version ".tar.bz2"))
|
||
(sha256
|
||
(base32
|
||
"1sj1rwgbcjgkzac3ybjy7j68c9b3dv3ap71m48mrjhf6w7vds3kl"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs `(("pcre" ,pcre "bin"))) ;for 'pcre-config'
|
||
(inputs `(("apr" ,apr)
|
||
("apr-util" ,apr-util)
|
||
("openssl" ,openssl)
|
||
("perl" ,perl))) ; needed to run bin/apxs
|
||
(arguments
|
||
`(#:test-target "test"
|
||
#:configure-flags (list "--enable-rewrite"
|
||
"--enable-userdir"
|
||
"--enable-vhost-alias"
|
||
"--enable-ssl"
|
||
"--enable-mime-magic"
|
||
(string-append "--sysconfdir="
|
||
(assoc-ref %outputs "out")
|
||
"/etc/httpd"))))
|
||
(synopsis "Featureful HTTP server")
|
||
(description
|
||
"The Apache HTTP Server Project is a collaborative software development
|
||
effort aimed at creating a robust, commercial-grade, featureful, and
|
||
freely-available source code implementation of an HTTP (Web) server. The
|
||
project is jointly managed by a group of volunteers located around the world,
|
||
using the Internet and the Web to communicate, plan, and develop the server
|
||
and its related documentation.")
|
||
(license license:asl2.0)
|
||
(home-page "https://httpd.apache.org/")))
|
||
|
||
(define-public mod-wsgi
|
||
(package
|
||
(name "mod-wsgi")
|
||
(version "4.7.1")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/GrahamDumpleton/mod_wsgi")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"1savh6h3qds20mwn1nqasmqzcp57pdhfc9v4b4k78d6q28y0r17s"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
'(#:tests? #f ; TODO: can't figure out if there are tests
|
||
#:make-flags (list
|
||
(string-append "DESTDIR="
|
||
(assoc-ref %outputs "out"))
|
||
"LIBEXECDIR=/modules")))
|
||
(inputs
|
||
`(("httpd" ,httpd)
|
||
("python" ,python-wrapper)))
|
||
(synopsis "Apache HTTPD module for Python WSGI applications")
|
||
(description
|
||
"The mod_wsgi module for the Apache HTTPD Server adds support for running
|
||
applications that support the Python @acronym{WSGI, Web Server Gateway
|
||
Interface} specification.")
|
||
(license license:asl2.0)
|
||
(home-page "https://modwsgi.readthedocs.io/")))
|
||
|
||
(define-public monolith
|
||
(package
|
||
(name "monolith")
|
||
(version "2.3.1")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/Y2Z/monolith.git")
|
||
(commit (string-append "v" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "16k5mp64a5l063rdj65hbpx414xv0bqdvhvz49k8018f2a2jj5xl"))))
|
||
(build-system cargo-build-system)
|
||
(arguments
|
||
`(#:cargo-inputs
|
||
(("rust-base64" ,rust-base64-0.13)
|
||
("rust-chrono" ,rust-chrono-0.4)
|
||
("rust-clap" ,rust-clap-2)
|
||
("rust-cssparser" ,rust-cssparser-0.27)
|
||
("rust-html5ever" ,rust-html5ever-0.24)
|
||
("rust-sha2" ,rust-sha2-0.9)
|
||
("rust-url" ,rust-url-2))
|
||
#:cargo-development-inputs
|
||
(("rust-assert-cmd" ,rust-assert-cmd-1)
|
||
("rust-reqwest" ,rust-reqwest-0.10)
|
||
("rust-tempfile" ,rust-tempfile-3))))
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)))
|
||
(inputs
|
||
`(("openssl" ,openssl)))
|
||
(home-page "https://github.com/Y2Z/monolith")
|
||
(synopsis "Command line tool for saving web pages as a single HTML file")
|
||
(description
|
||
"Monolith bundles any web page into a single HTML file.
|
||
|
||
Unlike conventional ``Save page as…'', Monolith not only saves the target
|
||
document, it embeds CSS, image, and JavaScript assets all at once, producing
|
||
a single HTML5 document.
|
||
|
||
If compared to saving websites with @samp{wget -mpk}, Monolith embeds
|
||
all assets as data URLs and therefore displays the saved page exactly
|
||
the same, being completely separated from the Internet.")
|
||
(license license:unlicense)))
|
||
|
||
(define-public nginx
|
||
(package
|
||
(name "nginx")
|
||
;; Track the ‘mainline’ branch. Upstream considers it more reliable than
|
||
;; ’stable’ and recommends that “in general you deploy the NGINX mainline
|
||
;; branch at all times” (https://www.nginx.com/blog/nginx-1-6-1-7-released/)
|
||
;; Consider updating the nginx-documentation package together with this one.
|
||
(version "1.19.6")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://nginx.org/download/nginx-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1d9kzks8x1226prjbpdin4dz93fjnv304zlqybfqachx5fh9a4di"))))
|
||
(build-system gnu-build-system)
|
||
(inputs `(("openssl" ,openssl)
|
||
("pcre" ,pcre)
|
||
("zlib" ,zlib)))
|
||
(arguments
|
||
`(#:tests? #f ; no test target
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'patch-/bin/sh
|
||
(lambda _
|
||
(substitute* "auto/feature"
|
||
(("/bin/sh") (which "sh")))
|
||
#t))
|
||
(replace 'configure
|
||
;; The configure script is hand-written, not from GNU autotools.
|
||
(lambda* (#:key configure-flags outputs #:allow-other-keys)
|
||
(let ((flags
|
||
(append (list (string-append "--prefix=" (assoc-ref outputs "out"))
|
||
"--with-http_ssl_module"
|
||
"--with-http_v2_module"
|
||
"--with-pcre-jit"
|
||
"--with-debug"
|
||
;; Even when not cross-building, we pass the
|
||
;; --crossbuild option to avoid customizing for the
|
||
;; kernel version on the build machine.
|
||
,(let ((system "Linux") ; uname -s
|
||
(release "3.2.0") ; uname -r
|
||
;; uname -m
|
||
(machine (match (or (%current-target-system)
|
||
(%current-system))
|
||
("x86_64-linux" "x86_64")
|
||
("i686-linux" "i686")
|
||
("mips64el-linux" "mips64")
|
||
;; Prevent errors when querying
|
||
;; this package on unsupported
|
||
;; platforms, e.g. when running
|
||
;; "guix package --search="
|
||
(_ "UNSUPPORTED"))))
|
||
(string-append "--crossbuild="
|
||
system ":" release ":" machine)))
|
||
configure-flags)))
|
||
(setenv "CC" "gcc")
|
||
(format #t "configure flags: ~s~%" flags)
|
||
(apply invoke "./configure" flags)
|
||
#t)))
|
||
(add-after 'install 'install-man-page
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(man (string-append out "/share/man")))
|
||
(install-file "objs/nginx.8" (string-append man "/man8"))
|
||
#t)))
|
||
(add-after 'install 'fix-root-dirs
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
;; 'make install' puts things in strange places, so we need to
|
||
;; clean it up ourselves.
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(share (string-append out "/share/nginx")))
|
||
;; This directory is empty, so get rid of it.
|
||
(rmdir (string-append out "/logs"))
|
||
;; Example configuration and HTML files belong in
|
||
;; /share.
|
||
(mkdir-p share)
|
||
(rename-file (string-append out "/conf")
|
||
(string-append share "/conf"))
|
||
(rename-file (string-append out "/html")
|
||
(string-append share "/html"))
|
||
#t))))))
|
||
(home-page "https://nginx.org")
|
||
(synopsis "HTTP and reverse proxy server")
|
||
(description
|
||
"Nginx (\"engine X\") is a high-performance web and reverse proxy server
|
||
created by Igor Sysoev. It can be used both as a stand-alone web server
|
||
and as a proxy to reduce the load on back-end HTTP or mail servers.")
|
||
;; Almost all of nginx is distributed under the bsd-2 license.
|
||
;; The exceptions are:
|
||
;; * The 'nginx-http-push' module is covered by the expat license.
|
||
;; * The 'nginx-development-kit' module is mostly covered by bsd-3,
|
||
;; except for two source files which are bsd-4 licensed.
|
||
(license (list license:bsd-2 license:expat license:bsd-3 license:bsd-4))))
|
||
|
||
(define-public nginx-documentation
|
||
;; This documentation should be relevant for the current nginx package.
|
||
(let ((version "1.19.6")
|
||
(revision 2636)
|
||
(changeset "a0824dab33ff"))
|
||
(package
|
||
(name "nginx-documentation")
|
||
(version (simple-format #f "~A-~A-~A" version revision changeset))
|
||
(source
|
||
(origin (method hg-fetch)
|
||
(uri (hg-reference
|
||
(url "http://hg.nginx.org/nginx.org")
|
||
(changeset changeset)))
|
||
(file-name (string-append name "-" version))
|
||
(sha256
|
||
(base32
|
||
"06w6fg33pnkqpaagzp9rqizill61vj7db7083mrd6i6by0j7cp1b"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
'(#:tests? #f ; no test suite
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(delete 'configure) ; no configure script
|
||
(replace 'build
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let ((output (assoc-ref outputs "out")))
|
||
(substitute* "umasked.sh"
|
||
((" /bin/sh") (string-append " " (which "sh"))))
|
||
;; The documentation includes a banner, which makes sense on
|
||
;; the NGinx website, but doesn't make much sense when
|
||
;; viewing locally. Therefore, modify the CSS to remove the
|
||
;; banner.
|
||
(substitute* "xslt/style.xslt"
|
||
(("#banner \\{ background: black;")
|
||
"#banner { display: none;"))
|
||
(invoke "make")
|
||
#t)))
|
||
(replace 'install
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let ((output (assoc-ref outputs "out")))
|
||
(mkdir-p output)
|
||
(copy-recursively "libxslt" output)
|
||
#t))))))
|
||
(native-inputs
|
||
`(("libxml2" ,libxml2)
|
||
("libxslt" ,libxslt)
|
||
("nginx-xslscript" ,nginx-xslscript)))
|
||
(home-page "https://nginx.org")
|
||
(synopsis "Documentation for the nginx web server")
|
||
(description
|
||
"This package provides HTML documentation for the nginx web server.")
|
||
(license license:bsd-2))))
|
||
|
||
(define-public nginx-accept-language-module
|
||
;; Upstream has never made a release; use current commit instead.
|
||
(let ((commit "2f69842f83dac77f7d98b41a2b31b13b87aeaba7")
|
||
(revision "1"))
|
||
(package
|
||
(name "nginx-accept-language-module")
|
||
(version (git-version "0.0.0" ;upstream has no version number
|
||
revision commit))
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/giom/nginx_accept_language_module")
|
||
(commit commit)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "1hjysrl15kh5233w7apq298cc2bp4q1z5mvaqcka9pdl90m0vhbw"))))
|
||
(build-system gnu-build-system)
|
||
(inputs `(("openssl" ,openssl)
|
||
("pcre" ,pcre)
|
||
("nginx-sources" ,(package-source nginx))
|
||
("zlib" ,zlib)))
|
||
(arguments
|
||
`(#:tests? #f ; no test target
|
||
#:make-flags (list "modules")
|
||
#:modules ((guix build utils)
|
||
(guix build gnu-build-system)
|
||
(ice-9 popen)
|
||
(ice-9 regex)
|
||
(ice-9 textual-ports))
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'unpack-nginx-sources
|
||
(lambda* (#:key inputs native-inputs #:allow-other-keys)
|
||
(begin
|
||
;; The nginx source code is part of the module’s source.
|
||
(format #t "decompressing nginx source code~%")
|
||
(let ((tar (assoc-ref inputs "tar"))
|
||
(nginx-srcs (assoc-ref inputs "nginx-sources")))
|
||
(invoke (string-append tar "/bin/tar")
|
||
"xvf" nginx-srcs "--strip-components=1"))
|
||
#t)))
|
||
(add-after 'unpack 'convert-to-dynamic-module
|
||
(lambda _
|
||
(begin
|
||
(with-atomic-file-replacement "config"
|
||
(lambda (in out)
|
||
;; cf. https://www.nginx.com/resources/wiki/extending/new_config/
|
||
(format out "ngx_module_type=HTTP~%")
|
||
(format out "ngx_module_name=\
|
||
ngx_http_accept_language_module~%")
|
||
(let* ((str (get-string-all in))
|
||
(rx (make-regexp
|
||
"NGX_ADDON_SRCS=\"\\$NGX_ADDON_SRCS (.*)\""))
|
||
(m (regexp-exec rx str))
|
||
(srcs (match:substring m 1)))
|
||
(format out (string-append "ngx_module_srcs=\""
|
||
srcs "\"~%")))
|
||
(format out ". auto/module~%")
|
||
(format out "ngx_addon_name=$ngx_module_name~%"))))))
|
||
(add-before 'configure 'patch-/bin/sh
|
||
(lambda _
|
||
(substitute* "auto/feature"
|
||
(("/bin/sh") (which "sh")))
|
||
#t))
|
||
(replace 'configure
|
||
;; This phase is largely copied from the nginx package.
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let ((flags
|
||
(list ;; A copy of nginx’ flags follows, otherwise we
|
||
;; get a binary compatibility error. FIXME: Code
|
||
;; duplication is bad.
|
||
(string-append "--prefix=" (assoc-ref outputs "out"))
|
||
"--with-http_ssl_module"
|
||
"--with-http_v2_module"
|
||
"--with-pcre-jit"
|
||
"--with-debug"
|
||
;; Even when not cross-building, we pass the
|
||
;; --crossbuild option to avoid customizing for the
|
||
;; kernel version on the build machine.
|
||
,(let ((system "Linux") ; uname -s
|
||
(release "3.2.0") ; uname -r
|
||
;; uname -m
|
||
(machine (match (or (%current-target-system)
|
||
(%current-system))
|
||
("x86_64-linux" "x86_64")
|
||
("i686-linux" "i686")
|
||
("mips64el-linux" "mips64")
|
||
;; Prevent errors when querying
|
||
;; this package on unsupported
|
||
;; platforms, e.g. when running
|
||
;; "guix package --search="
|
||
(_ "UNSUPPORTED"))))
|
||
(string-append "--crossbuild="
|
||
system ":" release ":" machine))
|
||
;; The following are the args decribed on
|
||
;; <https://www.nginx.com/blog/compiling-dynamic-modules-nginx-plus>.
|
||
;; Enabling --with-compat here and in the nginx package
|
||
;; would ensure binary compatibility even when using
|
||
;; different configure options from the main nginx
|
||
;; package. This is not needed for Guix.
|
||
;; "--with-compat"
|
||
"--add-dynamic-module=.")))
|
||
(setenv "CC" "gcc")
|
||
(format #t "environment variable `CC' set to `gcc'~%")
|
||
(format #t "configure flags: ~s~%" flags)
|
||
(apply invoke "./configure" flags)
|
||
#t)))
|
||
(replace 'install
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(modules-dir (string-append out "/etc/nginx/modules"))
|
||
(doc-dir (string-append
|
||
out "/share/doc/nginx-accept-language-module")))
|
||
(mkdir-p modules-dir)
|
||
(copy-file "objs/ngx_http_accept_language_module.so"
|
||
(string-append
|
||
modules-dir "/ngx_http_accept_language_module.so"))
|
||
(mkdir-p doc-dir)
|
||
(copy-file "README.textile"
|
||
(string-append doc-dir "/README.textile"))
|
||
#t))))))
|
||
(home-page
|
||
"https://www.nginx.com/resources/wiki/modules/accept_language/")
|
||
(synopsis "Nginx module for parsing the Accept-Language HTTP header")
|
||
(description
|
||
"This nginx module parses the Accept-Language field in HTTP headers and
|
||
chooses the most suitable locale for the user from the list of locales
|
||
supported at your website.")
|
||
(license (delete-duplicates
|
||
(cons license:bsd-2 ;license of nginx-accept-language-module
|
||
;; The module’s code is linked statically with nginx,
|
||
;; therefore nginx’ other licenses may also apply to its
|
||
;; binary:
|
||
(package-license nginx)))))))
|
||
|
||
(define nginx-xslscript
|
||
(let ((revision 11)
|
||
(changeset "01dc9ba12e1b"))
|
||
(package
|
||
(name "nginx-xslscript")
|
||
(version
|
||
(simple-format #f "2014-03-31-~A-~A" revision changeset))
|
||
(source (origin
|
||
(method hg-fetch)
|
||
(uri (hg-reference
|
||
(url "http://hg.nginx.org/xslscript")
|
||
(changeset changeset)))
|
||
(file-name (string-append name "-" version))
|
||
(sha256
|
||
(base32
|
||
"0am8zvdx3jmiwkg5q07qjaw5r26r4i2v5i4yr8a1k0jgib6ii08g"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
'(#:tests? #f ; No test suite
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(delete 'configure)
|
||
(delete 'build)
|
||
(replace 'install
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let ((out-bin (string-append
|
||
(assoc-ref outputs "out")
|
||
"/bin")))
|
||
(mkdir-p out-bin)
|
||
(copy-file "xslscript.pl"
|
||
(string-append
|
||
out-bin
|
||
"/xslscript.pl"))
|
||
#t))))))
|
||
(home-page "http://hg.nginx.org/xslscript")
|
||
(synopsis "XSLScript with NGinx specific modifications")
|
||
(description
|
||
"XSLScript is a terse notation for writing complex XSLT stylesheets.
|
||
This is modified version, specifically intended for use with the NGinx
|
||
documentation.")
|
||
(license license:bsd-2))))
|
||
|
||
(define nginx-socket-cloexec
|
||
(package
|
||
(inherit nginx)
|
||
(name "nginx-socket-cloexec") ;required for lua-resty-shell
|
||
(source
|
||
(origin
|
||
(inherit (package-source nginx))
|
||
(patches (append (search-patches "nginx-socket-cloexec.patch")
|
||
(origin-patches (package-source nginx))))))))
|
||
|
||
(define-public nginx-lua-module
|
||
(package
|
||
(inherit nginx)
|
||
(name "nginx-lua-module")
|
||
(version "0.10.16")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/openresty/lua-nginx-module")
|
||
(commit (string-append "v" version))))
|
||
(file-name (git-file-name "lua-nginx-module" version))
|
||
(sha256
|
||
(base32 "0nwcbqm1visg1dkxav7qa16w0d0n8cgqn4881xiqn88xfkxj0dyg"))))
|
||
(build-system gnu-build-system)
|
||
(inputs
|
||
`(("nginx-sources" ,(package-source nginx-socket-cloexec))
|
||
("luajit" ,luajit)
|
||
,@(package-inputs nginx)))
|
||
(arguments
|
||
(substitute-keyword-arguments
|
||
`(#:configure-flags '("--add-dynamic-module=.")
|
||
#:make-flags '("modules")
|
||
#:modules ((guix build utils)
|
||
(guix build gnu-build-system)
|
||
(ice-9 popen)
|
||
(ice-9 regex)
|
||
(ice-9 textual-ports))
|
||
,@(package-arguments nginx))
|
||
((#:phases phases)
|
||
`(modify-phases ,phases
|
||
(add-after 'unpack 'unpack-nginx-sources
|
||
(lambda* (#:key inputs native-inputs #:allow-other-keys)
|
||
(begin
|
||
;; The nginx source code is part of the module’s source.
|
||
(format #t "decompressing nginx source code~%")
|
||
(let ((tar (assoc-ref inputs "tar"))
|
||
(nginx-srcs (assoc-ref inputs "nginx-sources")))
|
||
(invoke (string-append tar "/bin/tar")
|
||
"xvf" nginx-srcs "--strip-components=1"))
|
||
#t)))
|
||
(add-before 'configure 'set-luajit-env
|
||
(lambda* (#:key inputs #:allow-other-keys)
|
||
(let ((luajit (assoc-ref inputs "luajit")))
|
||
(setenv "LUAJIT_LIB"
|
||
(string-append luajit "/lib"))
|
||
(setenv "LUAJIT_INC"
|
||
(string-append luajit "/include/luajit-2.1"))
|
||
#t)))
|
||
(replace 'install
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let ((modules-dir (string-append (assoc-ref outputs "out")
|
||
"/etc/nginx/modules")))
|
||
(install-file "objs/ngx_http_lua_module.so" modules-dir)
|
||
#t)))
|
||
(delete 'fix-root-dirs)
|
||
(delete 'install-man-page)))))
|
||
(synopsis "NGINX module for Lua programming language support")
|
||
(description "This NGINX module provides a scripting support with Lua
|
||
programming language.")))
|
||
|
||
(define-public lighttpd
|
||
(package
|
||
(name "lighttpd")
|
||
(version "1.4.57")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.lighttpd.net/lighttpd/"
|
||
"releases-" (version-major+minor version) ".x/"
|
||
"lighttpd-" version ".tar.xz"))
|
||
(sha256
|
||
(base32
|
||
"0zr1ssagirv5l4r2ii1k9v366a4vwylwbq74nb5pwby1i4drdjjj"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:configure-flags
|
||
(list "--with-krb5"
|
||
"--with-ldap"
|
||
"--with-libev"
|
||
"--with-libunwind"
|
||
"--with-openssl"
|
||
"--with-pam"
|
||
"--with-sasl")
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'embed-/bin/sh-reference
|
||
(lambda _
|
||
(substitute* "src/mod_ssi.c"
|
||
(("/bin/sh") (which "sh")))
|
||
#t))
|
||
(add-after 'unpack 'fix-tests
|
||
(lambda _
|
||
(setenv "SHELL" (which "sh"))
|
||
;; gethostbyaddr fails
|
||
(substitute* "tests/LightyTest.pm"
|
||
(("\\{HOSTNAME\\} = \\$name;")
|
||
"{HOSTNAME} = \"127.0.0.1\";"))
|
||
#t)))))
|
||
(inputs
|
||
`(("cyrus-sasl" ,cyrus-sasl)
|
||
("libev" ,libev)
|
||
("libunwind" ,libunwind)
|
||
("linux-pam" ,linux-pam)
|
||
("mit-krb5" ,mit-krb5)
|
||
("openldap" ,openldap)
|
||
("openssl" ,openssl)
|
||
("pcre" ,pcre)
|
||
("pcre:bin" ,pcre "bin")
|
||
("zlib" ,zlib)))
|
||
(native-inputs
|
||
`(("perl" ,perl) ; for tests
|
||
("pkg-config" ,pkg-config)
|
||
("which" ,which)))
|
||
(home-page "https://www.lighttpd.net/")
|
||
(synopsis "Lightweight HTTP and reverse proxy server")
|
||
(description
|
||
"Lighttpd is a secure, fast, compliant, and very flexible web-server that
|
||
has been optimized for high-performance environments. It has a very low
|
||
memory footprint compared to other webservers. Its features include FastCGI,
|
||
CGI, authentication, output compression, URL rewriting and many more.")
|
||
(license license:bsd-3)))
|
||
|
||
(define-public fcgi
|
||
(package
|
||
(name "fcgi")
|
||
(version "2.4.2")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
;; Upstream has disappeared.
|
||
(uri (git-reference
|
||
(url "https://github.com/FastCGI-Archives/fcgi2")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "1jhz6jfwv5kawa8kajvg18nfwc1b30f38zc0lggszd1vcmrwqkz1"))))
|
||
(build-system gnu-build-system)
|
||
;; Parallel building is not supported.
|
||
(arguments `(#:parallel-build? #f))
|
||
(native-inputs
|
||
`(("autoconf" ,autoconf)
|
||
("automake" ,automake)
|
||
("libtool" ,libtool)))
|
||
;; This is an archived fork of the original home page, www.fastcgi.com.
|
||
(home-page "https://fastcgi-archives.github.io/")
|
||
(synopsis "Language-independent, high-performant extension to CGI")
|
||
(description "FastCGI is a language-independent, scalable extension to CGI
|
||
that provides high performance without the limitations of server specific
|
||
APIs.")
|
||
;; This package is released under the Open Market License, a variant of
|
||
;; the Expat license, incompatible with the GPL.
|
||
(license (license:non-copyleft "file://LICENSE.TERMS"))))
|
||
|
||
(define-public fcgiwrap
|
||
(package
|
||
(name "fcgiwrap")
|
||
(version "1.1.0")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/gnosek/fcgiwrap")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "1ryw66h9aazi83amk8l7ha8k5g0c7qvk5g6jv376a1ws9xk2qw6f"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:tests? #f ; no tests included
|
||
#:make-flags (list "CC=gcc")
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'fix-CFLAGS
|
||
;; Remove broken options unconditionally added to CFLAGS.
|
||
(lambda _
|
||
(substitute* "configure.ac"
|
||
((" -Werror") ""))
|
||
#t)))))
|
||
(native-inputs
|
||
`(("autoconf" ,autoconf)
|
||
("automake" ,automake)
|
||
("pkg-config" ,pkg-config)))
|
||
(inputs
|
||
`(("fcgi" ,fcgi)))
|
||
(home-page "https://nginx.localdomain.pl/wiki/FcgiWrap")
|
||
(synopsis "Simple server for running CGI applications over FastCGI")
|
||
(description "Fcgiwrap is a simple server for running CGI applications
|
||
over FastCGI. It hopes to provide clean CGI support to Nginx (and other web
|
||
servers that may need it).")
|
||
(license license:expat)))
|
||
|
||
(define-public starman
|
||
(package
|
||
(name "starman")
|
||
(version "0.4015")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/M/MI/MIYAGAWA/"
|
||
"Starman-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1y1kn4929k299fbf6sw9lxcsdlq9fvq777p6yrzk591rr9xhkx8h"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-libwww" ,perl-libwww)
|
||
("perl-module-build-tiny" ,perl-module-build-tiny)
|
||
("perl-test-requires" ,perl-test-requires)))
|
||
(propagated-inputs
|
||
`(("perl-data-dump" ,perl-data-dump)
|
||
("perl-http-date" ,perl-http-date)
|
||
("perl-http-message" ,perl-http-message)
|
||
("perl-http-parser-xs" ,perl-http-parser-xs)
|
||
("perl-net-server" ,perl-net-server)
|
||
("perl-plack" ,perl-plack)
|
||
("perl-test-tcp" ,perl-test-tcp)))
|
||
(home-page "https://metacpan.org/release/Starman")
|
||
(synopsis "PSGI/Plack web server")
|
||
(description "Starman is a PSGI perl web server that has unique features
|
||
such as high performance, preforking, signal support, superdaemon awareness,
|
||
and UNIX socket support.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public icedtea-web
|
||
(package
|
||
(name "icedtea-web")
|
||
(version "1.6.2")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"http://icedtea.wildebeest.org/download/source/"
|
||
name "-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"004kwrngyxxlrlzby4vzxjr0xcyngcdc9dfgnvi61ffnjr006ryf"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:configure-flags
|
||
(list "--disable-plugin" ;NPAPI plugins are obsolete nowadays.
|
||
(string-append "BIN_BASH=" (assoc-ref %build-inputs "bash")
|
||
"/bin/bash")
|
||
(string-append "--with-jdk-home=" (assoc-ref %build-inputs "jdk")))))
|
||
(outputs '("out" "doc"))
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)
|
||
("zip" ,zip)))
|
||
(inputs
|
||
`(("gtk+" ,gtk+)
|
||
("jdk" ,icedtea "jdk")))
|
||
(home-page "http://icedtea.classpath.org/wiki/IcedTea-Web")
|
||
(synopsis "Java Web Start")
|
||
(description
|
||
"IcedTea-Web is an implementation of the @dfn{Java Network Launching
|
||
Protocol}, also known as Java Web Start. This package provides tools and
|
||
libraries for working with JNLP applets.")
|
||
;; The program is mainly GPL2+, with some individual files under LGPL2.1+
|
||
;; or dual licenses.
|
||
(license license:gpl2+)))
|
||
|
||
(define-public jansson
|
||
(package
|
||
(name "jansson")
|
||
(version "2.12")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri
|
||
(string-append "http://www.digip.org/jansson/releases/jansson-"
|
||
version ".tar.bz2"))
|
||
(sha256
|
||
(base32
|
||
"1lp1mv8pjp5yziws66cy0dhpcam4bbjqhffk13v4vgdybp674pb4"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:configure-flags '("--disable-static")))
|
||
(home-page "http://www.digip.org/jansson/")
|
||
(synopsis "JSON C library")
|
||
(description
|
||
"Jansson is a C library for encoding, decoding and manipulating JSON
|
||
data.")
|
||
(license license:expat)))
|
||
|
||
(define-public json-c
|
||
(package
|
||
(replacement json-c/fixed)
|
||
(name "json-c")
|
||
(version "0.14")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://s3.amazonaws.com/json-c_releases/releases/json-c-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0w381krr99q5a2rypx4g437fa7gzgl82i64sgnrs6g5jr44dwxxk"))))
|
||
(build-system cmake-build-system)
|
||
(home-page "https://github.com/json-c/json-c/wiki")
|
||
(synopsis "JSON implementation in C")
|
||
(description
|
||
"JSON-C implements a reference counting object model that allows you to
|
||
easily construct JSON objects in C, output them as JSON-formatted strings and
|
||
parse JSON-formatted strings back into the C representation of JSON objects.
|
||
It aims to conform to RFC 7159.")
|
||
(license license:x11)))
|
||
|
||
(define json-c/fixed
|
||
(package
|
||
(inherit json-c)
|
||
(name "json-c")
|
||
(version "0.14")
|
||
(source (origin
|
||
(inherit (package-source json-c))
|
||
(patches (search-patches "json-c-CVE-2020-12762.patch"))))))
|
||
|
||
;; TODO: Remove these old versions when all dependents have been updated.
|
||
(define-public json-c-0.13
|
||
(package
|
||
(inherit json-c)
|
||
(version "0.13.1")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://s3.amazonaws.com/json-c_releases/releases/json-c-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0ws8dz9nk8q2c0gbf66kg2r6mrkl7kamd3gpdv9zsyrz9n6n0zmq"))
|
||
(patches (search-patches "json-c-0.13-CVE-2020-12762.patch"))
|
||
(modules '((guix build utils)))
|
||
(snippet
|
||
'(begin
|
||
;; Somehow 'config.h.in' is older than
|
||
;; 'aclocal.m4', which would trigger a rule to
|
||
;; run 'autoheader'.
|
||
(set-file-time "config.h.in"
|
||
(stat "aclocal.m4"))
|
||
#t))))
|
||
(build-system gnu-build-system)))
|
||
|
||
(define-public json-c-0.12
|
||
(package
|
||
(inherit json-c-0.13)
|
||
(version "0.12.1")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://s3.amazonaws.com/json-c_releases/releases/json-c-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "08qibrq29a5v7g23wi5icy6l4fbfw90h9ccps6vq0bcklx8n84ra"))
|
||
(patches (search-patches "json-c-0.12-CVE-2020-12762.patch"))
|
||
(modules '((guix build utils)))
|
||
(snippet
|
||
'(begin
|
||
;; Somehow 'config.h.in' is older than
|
||
;; 'aclocal.m4', which would trigger a rule to
|
||
;; run 'autoheader'.
|
||
(set-file-time "config.h.in"
|
||
(stat "aclocal.m4"))
|
||
|
||
;; Don't try to build with -Werror.
|
||
(substitute* (find-files "." "Makefile\\.in")
|
||
(("-Werror") ""))
|
||
#t))))))
|
||
|
||
(define-public json-parser
|
||
(package
|
||
(name "json-parser")
|
||
(version "1.1.0")
|
||
(source (origin
|
||
;; do not use auto-generated tarballs
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/udp/json-parser")
|
||
(commit (string-append "v" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"1ls7z4fx0sq633s5bc0j1gh36sv087gmrgr7rza22wjq2d4606yf"))))
|
||
;; FIXME: we should build the python bindings in a separate package
|
||
(build-system gnu-build-system)
|
||
;; the tests are written for the python bindings which are not built here
|
||
(arguments '(#:tests? #f))
|
||
(home-page "https://github.com/udp/json-parser")
|
||
(synopsis "JSON parser written in ANSI C")
|
||
(description "This package provides a very low footprint JSON parser
|
||
written in portable ANSI C.
|
||
|
||
@itemize
|
||
@item BSD licensed with no dependencies (i.e. just drop the C file into your
|
||
project)
|
||
@item Never recurses or allocates more memory than it needs
|
||
@item Very simple API with operator sugar for C++
|
||
@end itemize")
|
||
(license license:bsd-2)))
|
||
|
||
(define-public qjson
|
||
(package
|
||
(name "qjson")
|
||
(version "0.9.0")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/flavio/qjson")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"1f4wnxzx0qdmxzc7hqk28m0sva7z9p9xmxm6aifvjlp0ha6pmfxs"))))
|
||
(build-system cmake-build-system)
|
||
(arguments
|
||
;; The tests require a running X server.
|
||
`(#:configure-flags '("-DQJSON_BUILD_TESTS=ON"
|
||
"-DCMAKE_CXX_FLAGS=-std=gnu++11 -fPIC")
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'disable-broken-test
|
||
(lambda _
|
||
;; FIXME: One test fails. See
|
||
;; https://github.com/flavio/qjson/issues/105
|
||
(substitute* "tests/scanner/testscanner.cpp"
|
||
(("QTest::newRow\\(\"too large exponential\"\\)" line)
|
||
(string-append "//" line)))
|
||
#t))
|
||
(add-before 'check 'render-offscreen
|
||
(lambda _ (setenv "QT_QPA_PLATFORM" "offscreen") #t)))))
|
||
(inputs
|
||
`(("qtbase" ,qtbase)))
|
||
(home-page "http://qjson.sourceforge.net")
|
||
(synopsis "Library that maps JSON data to QVariant objects")
|
||
(description "QJson is a Qt-based library that maps JSON data to
|
||
@code{QVariant} objects. JSON arrays will be mapped to @code{QVariantList}
|
||
instances, while JSON's objects will be mapped to @code{QVariantMap}.")
|
||
;; Only version 2.1 of the license
|
||
(license license:lgpl2.1)))
|
||
|
||
(define-public qoauth
|
||
(package
|
||
(name "qoauth")
|
||
(version "2.0.0")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/ayoy/qoauth")
|
||
(commit (string-append "v" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"1b2jdqs526ac635yb2whm049spcsk7almnnr6r5b4yqhq922anw3"))))
|
||
(build-system gnu-build-system)
|
||
(inputs
|
||
`(("qca" ,qca)
|
||
("qtbase" ,qtbase)))
|
||
(arguments
|
||
'(#:tests? #f ;FIXME: some tests are failing
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'patch-code
|
||
(lambda _
|
||
(make-file-writable "src/qoauth.pc")
|
||
(substitute* "src/src.pro"
|
||
(("/lib64") "/lib"))
|
||
#t))
|
||
(add-after 'unpack 'adjust-mkspecs-directory
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(substitute* "src/src.pro"
|
||
;; Do not attempt to install the .prf file into qtbase
|
||
;; "lib/qt5/mkspecs/features", ref <https://bugs.gnu.org/45031>.
|
||
(("\\$\\$\\[QMAKE_MKSPECS\\]")
|
||
(string-append (assoc-ref outputs "out") "/lib/qt5/mkspecs")))
|
||
#t))
|
||
(replace 'configure
|
||
(lambda* (#:key inputs #:allow-other-keys)
|
||
(let ((qca (assoc-ref inputs "qca")))
|
||
(invoke
|
||
"qmake"
|
||
(string-append "PREFIX=" (assoc-ref %outputs "out"))
|
||
(string-append "QMAKE_INCDIR+=" qca "/include/Qca-qt5/QtCrypto")
|
||
(string-append "LIBS+=-L" qca "/lib")
|
||
(string-append "LIBS+=-lqca-qt5"))))))))
|
||
(home-page "https://github.com/ayoy/qoauth")
|
||
(synopsis "Qt-based C++ library for OAuth authorization scheme")
|
||
(description "QOAuth is an attempt to support interaction with
|
||
OAuth-powered network services in a Qt way, i.e. simply, clearly and
|
||
efficiently. It gives the application developer no more than 4 methods.")
|
||
(license license:lgpl2.1+)))
|
||
|
||
(define-public krona-tools
|
||
(package
|
||
(name "krona-tools")
|
||
(version "2.7")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://github.com/marbl/Krona/releases/download/v"
|
||
version "/KronaTools-" version ".tar"))
|
||
(sha256
|
||
(base32
|
||
"0wvgllcqscsfb4xc09y3fqhx8i38pmr4w55vjs5y79wx56n710iq"))))
|
||
(build-system perl-build-system)
|
||
(arguments
|
||
`(#:phases
|
||
(modify-phases %standard-phases
|
||
;; There is no configure or build steps.
|
||
(delete 'configure)
|
||
(delete 'build)
|
||
;; Install script "install.pl" expects the build directory to remain
|
||
;; after installation, creating symlinks etc., so re-implement it
|
||
;; here.
|
||
(replace 'install
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let ((bin (string-append (assoc-ref outputs "out") "/bin"))
|
||
(perl (string-append (assoc-ref outputs "out")
|
||
"/lib/perl5/site_perl/krona-tools/lib")))
|
||
(mkdir-p bin)
|
||
(for-each
|
||
(lambda (script)
|
||
(let* ((executable (string-append "scripts/" script ".pl")))
|
||
;; Prefix executables with 'kt' as install script does.
|
||
(copy-file executable (string-append bin "/kt" script))))
|
||
'("ClassifyBLAST"
|
||
"GetContigMagnitudes"
|
||
"GetLCA"
|
||
"GetTaxIDFromAcc"
|
||
"GetTaxInfo"
|
||
"ImportBLAST"
|
||
"ImportDiskUsage"
|
||
"ImportEC"
|
||
"ImportFCP"
|
||
"ImportGalaxy"
|
||
"ImportKrona"
|
||
"ImportMETAREP-BLAST"
|
||
"ImportMETAREP-EC"
|
||
"ImportMGRAST"
|
||
"ImportPhymmBL"
|
||
"ImportRDP"
|
||
"ImportRDPComparison"
|
||
"ImportTaxonomy"
|
||
"ImportText"
|
||
"ImportXML"))
|
||
(for-each
|
||
(lambda (directory)
|
||
(copy-recursively directory
|
||
(string-append perl "/../" directory)))
|
||
(list "data" "img" "taxonomy" "src"))
|
||
(install-file "lib/KronaTools.pm" perl))))
|
||
(add-after 'install 'wrap-program
|
||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(path (getenv "PERL5LIB")))
|
||
(for-each
|
||
(lambda (executable)
|
||
(wrap-program executable
|
||
`("PERL5LIB" ":" prefix
|
||
(,(string-append out "/lib/perl5/site_perl/krona-tools/lib")))))
|
||
(find-files (string-append out "/bin/") ".*")))))
|
||
(delete 'check)
|
||
(add-after 'wrap-program 'check
|
||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||
(with-directory-excursion "data"
|
||
(invoke (string-append (assoc-ref outputs "out") "/bin/ktImportText")
|
||
"ec.tsv")))))))
|
||
(inputs
|
||
`(("perl" ,perl)))
|
||
(home-page "https://github.com/marbl/Krona/wiki")
|
||
(synopsis "Hierarchical data exploration with zoomable HTML5 pie charts")
|
||
(description
|
||
"Krona is a flexible tool for exploring the relative proportions of
|
||
hierarchical data, such as metagenomic classifications, using a radial,
|
||
space-filling display. It is implemented using HTML5 and JavaScript, allowing
|
||
charts to be explored locally or served over the Internet, requiring only a
|
||
current version of any major web browser.")
|
||
(license license:bsd-3)))
|
||
|
||
(define-public rapidjson
|
||
(package
|
||
(name "rapidjson")
|
||
(version "1.1.0")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/Tencent/rapidjson")
|
||
(commit (string-append "v" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"1jixgb8w97l9gdh3inihz7avz7i770gy2j2irvvlyrq3wi41f5ab"))
|
||
(patches (search-patches "rapidjson-gcc-compat.patch"))
|
||
(modules '((guix build utils)))
|
||
(snippet
|
||
'(begin
|
||
;; Remove code using the problematic JSON license (see
|
||
;; <https://www.gnu.org/licenses/license-list.html#JSON>).
|
||
(delete-file-recursively "bin/jsonchecker")
|
||
#t))))
|
||
(build-system cmake-build-system)
|
||
(arguments
|
||
(if (string-prefix? "aarch64" (or (%current-target-system)
|
||
(%current-system)))
|
||
'(#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'patch-aarch-march-detection
|
||
(lambda _
|
||
(substitute* (find-files "." "^CMakeLists\\.txt$")
|
||
(("native") "armv8-a"))
|
||
#t))))
|
||
;; Disable CPU optimization for reproducibility.
|
||
'(#:configure-flags '("-DRAPIDJSON_ENABLE_INSTRUMENTATION_OPT=OFF"))))
|
||
(home-page "https://github.com/Tencent/rapidjson")
|
||
(synopsis "JSON parser/generator for C++ with both SAX/DOM style API")
|
||
(description
|
||
"RapidJSON is a fast JSON parser/generator for C++ with both SAX/DOM
|
||
style API.")
|
||
(license license:expat)))
|
||
|
||
(define-public libyajl
|
||
(package
|
||
(name "libyajl")
|
||
(version "2.1.0")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/lloyd/yajl")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"00yj06drb6izcxfxfqlhimlrb089kka0w0x8k27pyzyiq7qzcvml"))))
|
||
(build-system cmake-build-system)
|
||
(arguments
|
||
'(#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'patch-source-shebangs 'patch-tests
|
||
(lambda _
|
||
(substitute* "test/parsing/run_tests.sh"
|
||
(("`which echo`") (which "echo")))
|
||
#t)))))
|
||
(home-page "https://lloyd.github.io/yajl/")
|
||
(synopsis "C library for parsing JSON")
|
||
(description
|
||
"Yet Another JSON Library (YAJL) is a small event-driven (SAX-style) JSON
|
||
parser written in ANSI C and a small validating JSON generator.")
|
||
(license license:isc)))
|
||
|
||
(define-public libwebsockets
|
||
(package
|
||
(name "libwebsockets")
|
||
(version "1.3")
|
||
(source (origin
|
||
;; The project does not publish tarballs, so we have to take
|
||
;; things from Git.
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/warmcat/libwebsockets")
|
||
(commit (string-append "v" version
|
||
"-chrome37-firefox30"))))
|
||
(sha256
|
||
(base32
|
||
"12fqh2d2098mgf0ls19p9lzibpsqhv7mc5rn1yvrbfnazmcr40g4"))
|
||
(file-name (string-append name "-" version))))
|
||
|
||
(build-system cmake-build-system)
|
||
(arguments
|
||
;; XXX: The thing lacks a 'make test' target, because CMakeLists.txt
|
||
;; doesn't use 'add_test', and it's unclear how to run the test suite.
|
||
'(#:tests? #f))
|
||
|
||
(native-inputs `(("perl" ,perl))) ; to build the HTML doc
|
||
(inputs `(("zlib" ,zlib)
|
||
("openssl" ,openssl)))
|
||
(synopsis "WebSockets library written in C")
|
||
(description
|
||
"Libwebsockets is a library that allows C programs to establish client
|
||
and server WebSockets connections---a protocol layered above HTTP that allows
|
||
for efficient socket-like bidirectional reliable communication channels.")
|
||
(home-page "https://libwebsockets.org")
|
||
|
||
;; This is LGPLv2.1-only with extra exceptions specified in 'LICENSE'.
|
||
(license license:lgpl2.1)))
|
||
|
||
(define-public wabt
|
||
(package
|
||
(name "wabt")
|
||
(version "1.0.12")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/WebAssembly/wabt")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "1zlv3740wkqj4mn6sr84h0x6wk2lcp4pwwmqsh5yyqp1j1glbsa0"))))
|
||
(build-system cmake-build-system)
|
||
(arguments
|
||
`(#:configure-flags '("-DBUILD_TESTS=OFF")
|
||
#:tests? #f))
|
||
(inputs `(("python" ,python-2)
|
||
("re2c" ,re2c)))
|
||
(home-page "https://github.com/WebAssembly/wabt")
|
||
(synopsis "WebAssembly Binary Toolkit")
|
||
(description "WABT (pronounced: wabbit) is a suite of tools for
|
||
WebAssembly, including:
|
||
|
||
@enumerate
|
||
@item @command{wat2wasm} translates from WebAssembly text format to the
|
||
WebAssembly binary format
|
||
@item @command{wasm2wat} is the inverse; it translates from the binary format
|
||
back to the text format (also known as a .wat)
|
||
@item @command{wasm-objdump} prints information about a wasm binary, similarly
|
||
to @command{objdump}.
|
||
@item @command{wasm-interp} decodes ands run a WebAssembly binary file using a
|
||
stack-based interpreter
|
||
@item @command{wat-desugar} parses .wat text form as supported by the spec
|
||
interpreter (s-expressions, flat syntax, or mixed) and prints the canonical
|
||
flat format
|
||
@item @command{wasm2c} converts a WebAssembly binary file to a C source and
|
||
header file.
|
||
@end enumerate
|
||
|
||
These tools are intended for use in (or for development of) toolchains or
|
||
other systems that want to manipulate WebAssembly files.")
|
||
(license license:asl2.0)))
|
||
|
||
(define-public websocketpp
|
||
(package
|
||
(name "websocketpp")
|
||
(version "0.8.2")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/zaphoyd/websocketpp")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "1ww4fhl8qf12hkv6jaild8zzsygdspxm1gqpk2f63gv1xfi31wpm"))
|
||
(patches (search-patches "websocketpp-fix-for-cmake-3.15.patch"))))
|
||
(build-system cmake-build-system)
|
||
(inputs `(("boost" ,boost)
|
||
("openssl" ,openssl)))
|
||
(arguments '(#:configure-flags '("-DBUILD_TESTS=ON")
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'install 'remove-tests
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let* ((install-dir (assoc-ref outputs "out"))
|
||
(bin-dir (string-append install-dir "/bin")))
|
||
(delete-file-recursively bin-dir)
|
||
#t))))))
|
||
(home-page "https://www.zaphoyd.com/websocketpp/")
|
||
(synopsis "C++ library implementing the WebSocket protocol")
|
||
(description "WebSocket++ is a C++ library that can be used to implement
|
||
WebSocket functionality. The goals of the project are to provide a WebSocket
|
||
implementation that is simple, portable, flexible, lightweight, low level, and
|
||
high performance.")
|
||
(license license:bsd-3)))
|
||
|
||
(define-public wslay
|
||
(package
|
||
(name "wslay")
|
||
(version "1.1.1")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/tatsuhiro-t/wslay")
|
||
(commit (string-append "release-" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "1w32iljg4inqf0712w5fxxhggvmjh6ipl2lnz0h36dv1xrj0d964"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
;; Parallel builds don't reliably succeed.
|
||
`(#:parallel-build? #f))
|
||
(native-inputs
|
||
`(("autoconf" ,autoconf)
|
||
("automake" ,automake)
|
||
("cunit" ,cunit) ; for tests
|
||
("libtool" ,libtool)
|
||
("pkg-config" ,pkg-config)
|
||
("python-sphinx" ,python-sphinx)))
|
||
(home-page "https://tatsuhiro-t.github.io/wslay/")
|
||
(synopsis "C WebSocket library")
|
||
(description "@code{Wslay} is an event-based C library for the WebSocket
|
||
protocol version 13, described in RFC 6455. Besides a high-level API it
|
||
provides callbacks for sending and receiving frames directly. @code{Wslay}
|
||
only supports the data transfer part of WebSocket protocol and does not
|
||
perform the opening handshake in HTTP.")
|
||
(license license:expat)))
|
||
|
||
(define-public libpsl
|
||
(package
|
||
(name "libpsl")
|
||
(version "0.21.1")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://github.com/rockdaboot/libpsl/"
|
||
"releases/download/" version
|
||
"/libpsl-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0k0d46bbh1jj2ll369f134vciplrzbqkg7fv9m62bl6lzghy2v5c"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)
|
||
|
||
;; For tests.
|
||
("python" ,python-wrapper)))
|
||
(inputs
|
||
`(("libidn2" ,libidn2)
|
||
("libunistring" ,libunistring)))
|
||
(home-page "https://github.com/rockdaboot/libpsl")
|
||
(synopsis "C library for the Publix Suffix List")
|
||
(description
|
||
"A \"public suffix\" is a domain name under which Internet users can
|
||
directly register own names.
|
||
|
||
Browsers and other web clients can use it to avoid privacy-leaking
|
||
\"supercookies\", avoid privacy-leaking \"super domain\" certificates, domain
|
||
highlighting parts of the domain in a user interface, and sorting domain lists
|
||
by site.
|
||
|
||
Libpsl has built-in PSL data for fast access, allowing to load PSL data from
|
||
files, checks if a given domain is a public suffix, provides immediate cookie
|
||
domain verification, finds the longest public part of a given domain, finds
|
||
the shortest private part of a given domain, works with international
|
||
domains (UTF-8 and IDNA2008 Punycode), is thread-safe, and handles IDNA2008
|
||
UTS#46.")
|
||
(license license:x11)))
|
||
|
||
(define-public tidy
|
||
(package
|
||
(name "tidy")
|
||
(version "20091223")
|
||
(source (origin
|
||
(method cvs-fetch)
|
||
(uri (cvs-reference
|
||
(root-directory
|
||
":pserver:anonymous@tidy.cvs.sourceforge.net:/cvsroot/tidy")
|
||
(module "tidy")
|
||
(revision "2009-12-23")))
|
||
(file-name (string-append name "-" version "-checkout"))
|
||
(sha256
|
||
(base32
|
||
"14dsnmirjcrvwsffqp3as70qr6bbfaig2fv3zvs5g7005jrsbvpb"))
|
||
(patches (search-patches "tidy-CVE-2015-5522+5523.patch"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
'(#:phases (modify-phases %standard-phases
|
||
(replace 'bootstrap
|
||
(lambda* (#:key inputs #:allow-other-keys)
|
||
;; configure.in and Makefile.am aren't in the root of the
|
||
;; source tree.
|
||
(copy-recursively "build/gnuauto" ".")
|
||
(setenv "AUTOMAKE" "automake --foreign")
|
||
(invoke "autoreconf" "-vfi"))))))
|
||
(native-inputs
|
||
`(("automake" ,automake)
|
||
("autoconf" ,autoconf)
|
||
("libtool" ,libtool)))
|
||
(synopsis "HTML validator and tidier")
|
||
(description "HTML Tidy is a command-line tool and C library that can be
|
||
used to validate and fix HTML data.")
|
||
(home-page "http://tidy.sourceforge.net/")
|
||
(license (license:x11-style "file:///include/tidy.h"))))
|
||
|
||
(define-public esbuild
|
||
(package
|
||
(name "esbuild")
|
||
(version "0.8.26")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/evanw/esbuild")
|
||
(commit (string-append "v" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "0zw68mgmmicbkvx7s22knvm8nng5qn41b1chn35prhkla3kx1jn1"))
|
||
(modules '((guix build utils)))
|
||
(snippet
|
||
'(begin
|
||
;; Remove prebuilt binaries
|
||
(delete-file-recursively "npm")
|
||
#t))))
|
||
(build-system go-build-system)
|
||
(arguments
|
||
'(#:import-path "github.com/evanw/esbuild/cmd/esbuild"
|
||
#:unpack-path "github.com/evanw/esbuild"
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(replace 'check
|
||
(lambda* (#:key tests? unpack-path #:allow-other-keys)
|
||
(when tests?
|
||
(with-directory-excursion (string-append "src/" unpack-path)
|
||
(invoke "make" "test-go")))
|
||
#t)))))
|
||
(inputs
|
||
`(("golang.org/x/sys" ,go-golang-org-x-sys)))
|
||
(native-inputs
|
||
`(("github.com/kylelemons/godebug" ,go-github-com-kylelemons-godebug)))
|
||
(home-page "https://esbuild.github.io/")
|
||
(synopsis "Bundler and minifier tool for JavaScript and TypeScript")
|
||
(description
|
||
"The esbuild tool provides a unified bundler, transpiler and
|
||
minifier. It packages up JavaScript and TypeScript code, along with JSON
|
||
and other data, for distribution on the web.")
|
||
(license license:expat)))
|
||
|
||
(define-public tinyproxy
|
||
(package
|
||
(name "tinyproxy")
|
||
(version "1.10.0")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://github.com/tinyproxy/tinyproxy/"
|
||
"releases/download/" version "/tinyproxy-"
|
||
version ".tar.xz"))
|
||
(sha256
|
||
(base32
|
||
"10jnk6y2swld25mm47mjc0nkffyzsfysnsxwr7cs0ns1kil8ggjr"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:configure-flags
|
||
(list
|
||
;; For the log file, etc.
|
||
"--localstatedir=/var")
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'build 'pre-build
|
||
(lambda* (#:key inputs #:allow-other-keys #:rest args)
|
||
;; Uncommenting the next two lines may assist in debugging
|
||
;; (substitute* "docs/man5/Makefile" (("a2x") "a2x -v"))
|
||
;; (setenv "XML_DEBUG_CATALOG" "1")
|
||
#t)))))
|
||
(home-page "https://tinyproxy.github.io/")
|
||
(synopsis "Light-weight HTTP/HTTPS proxy daemon")
|
||
(description "Tinyproxy is a light-weight HTTP/HTTPS proxy
|
||
daemon. Designed from the ground up to be fast and yet small, it is an ideal
|
||
solution for use cases such as embedded deployments where a full featured HTTP
|
||
proxy is required, but the system resources for a larger proxy are
|
||
unavailable.")
|
||
(license license:gpl2+)))
|
||
|
||
(define-public polipo
|
||
(package
|
||
(name "polipo")
|
||
(version "1.1.1")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"http://www.pps.univ-paris-diderot.fr/~jch/software/files/polipo/polipo-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"05g09sg9qkkhnc2mxldm1w1xkxzs2ylybkjzs28w8ydbjc3pand2"))))
|
||
(native-inputs `(("texinfo" ,texinfo)))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:phases (modify-phases %standard-phases
|
||
(delete 'configure))
|
||
#:make-flags (let ((out (assoc-ref %outputs "out")))
|
||
(list (string-append "PREFIX=" out)
|
||
(string-append "LOCAL_ROOT="
|
||
out "/share/polipo/www")
|
||
"CC=gcc"))
|
||
;; No 'check' target.
|
||
#:tests? #f))
|
||
(home-page "https://www.pps.univ-paris-diderot.fr/~jch/software/polipo/")
|
||
(synopsis "Small caching web proxy")
|
||
(description
|
||
"Polipo is a small caching web proxy (web cache, HTTP proxy, and proxy
|
||
server). It was primarily designed to be used by one person or a small group
|
||
of people.")
|
||
(license license:expat)))
|
||
|
||
(define-public websockify
|
||
(package
|
||
(name "websockify")
|
||
(version "0.8.0")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/novnc/websockify")
|
||
(commit (string-append "v" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"0pcic8qs0gdwrfjgfaf893jyddaw97wcjm2mmvwn0xyhmy8mbmw1"))))
|
||
(build-system python-build-system)
|
||
(arguments
|
||
`(#:tests? #f)) ; FIXME: 2 out of 6 tests fail with "ImportError: No module
|
||
; named 'stubout'". The tests can be run by replacing the check phase with
|
||
; the command "python setup.py nosetests --verbosity=3".
|
||
(native-inputs `(; Required for tests:
|
||
("python-mox3" ,python-mox3)
|
||
("python-nose" ,python-nose)))
|
||
(propagated-inputs `(("python-numpy" ,python-numpy)))
|
||
(home-page "https://github.com/novnc/websockify")
|
||
(synopsis "WebSockets support for any application/server")
|
||
(description "Websockify translates WebSockets traffic to normal socket
|
||
traffic. Websockify accepts the WebSockets handshake, parses it, and then
|
||
begins forwarding traffic between the client and the target in both
|
||
directions.")
|
||
(license license:lgpl3)))
|
||
|
||
(define-public wwwoffle
|
||
(package
|
||
(name "wwwoffle")
|
||
(version "2.9j")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://www.gedanken.org.uk/software/"
|
||
"wwwoffle/download/wwwoffle-"
|
||
version ".tgz"))
|
||
(sha256
|
||
(base32
|
||
"1ihil1xq9dp21hf108khxbw6f3baq0w5c0j3af038y6lkmad4vdi"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:configure-flags '("--with-gnutls")
|
||
#:tests? #f)) ; no test target
|
||
(native-inputs `(("flex" ,flex)))
|
||
(inputs `(("gnutls" ,gnutls)
|
||
("libcrypt" ,libgcrypt)))
|
||
(home-page "https://www.gedanken.org.uk/software/wwwoffle/")
|
||
(synopsis "Caching web proxy optimized for intermittent internet links")
|
||
(description "WWWOFFLE is a proxy web server that is especially good for
|
||
intermittent internet links. It can cache HTTP, HTTPS, FTP, and finger
|
||
protocols, and supports browsing and requesting pages while offline, indexing,
|
||
modifying pages and incoming and outgoing headers, monitoring pages for
|
||
changes, and much more.")
|
||
(license license:gpl2+)))
|
||
|
||
(define-public liboauth
|
||
(package
|
||
(name "liboauth")
|
||
(version "1.0.3")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://sourceforge/liboauth/liboauth-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"07w1aq8y8wld43wmbk2q8134p3bfkp2vma78mmsfgw2jn1bh3xhd"))))
|
||
(build-system gnu-build-system)
|
||
(arguments '(#:configure-flags '("--enable-nss")))
|
||
(native-inputs `(("pkg-config" ,pkg-config)))
|
||
(propagated-inputs
|
||
`(("curl" ,curl)
|
||
("nss" ,nss)))
|
||
(home-page "https://sourceforge.net/projects/liboauth")
|
||
(synopsis "C library implementing the OAuth API")
|
||
(description
|
||
"liboauth is a collection of C functions implementing the OAuth API.
|
||
liboauth provides functions to escape and encode strings according to OAuth
|
||
specifications and offers high-level functionality built on top to sign
|
||
requests or verify signatures using either NSS or OpenSSL for calculating the
|
||
hash/signatures.")
|
||
;; Source code may be distributed under either license.
|
||
(license (list license:expat license:gpl2+))))
|
||
|
||
(define-public libyaml
|
||
(package
|
||
(name "libyaml")
|
||
(version "0.2.5")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://pyyaml.org/download/libyaml/yaml-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1x4fcw13r3lqy8ndydr3ili87wicplw2awbcv6r21qgyfndswhn6"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
'(#:configure-flags '("--disable-static")))
|
||
(home-page "https://pyyaml.org/wiki/LibYAML")
|
||
(synopsis "YAML 1.1 parser and emitter written in C")
|
||
(description
|
||
"LibYAML is a YAML 1.1 parser and emitter written in C.")
|
||
(license license:expat)))
|
||
|
||
(define-public libyaml+static
|
||
(package
|
||
(inherit libyaml)
|
||
(name "libyaml+static")
|
||
(arguments
|
||
'(#:configure-flags '("--enable-static")))))
|
||
|
||
(define-public libquvi-scripts
|
||
(package
|
||
(name "libquvi-scripts")
|
||
(version "0.4.21")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://sourceforge/quvi/" (version-major+minor version) "/"
|
||
name "/" name "-" version ".tar.xz"))
|
||
(sha256
|
||
(base32 "0d0giry6bb57pnidymvdl7i5x9bq3ljk3g4bs294hcr5mj3cq0kw"))))
|
||
(build-system gnu-build-system)
|
||
(home-page "http://quvi.sourceforge.net/")
|
||
(synopsis "Media stream URL parser")
|
||
(description "This package contains support scripts called by libquvi to
|
||
parse media stream properties.")
|
||
(license license:lgpl2.1+)))
|
||
|
||
(define-public libquvi
|
||
(package
|
||
(name "libquvi")
|
||
(version "0.4.1")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://sourceforge/quvi/" (version-major+minor version) "/" name "/"
|
||
name "-" version ".tar.xz"))
|
||
(sha256
|
||
(base32 "00x9gbmzc5cns0gnfag0hsphcr3cb33vbbb9s7ppvvd6bxz2z1mm"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs `(("pkg-config" ,pkg-config)))
|
||
(inputs
|
||
`(("curl" ,curl)
|
||
("cyrus-sasl" ,cyrus-sasl)
|
||
("libquvi-scripts" ,libquvi-scripts)
|
||
("lua" ,lua-5.1)
|
||
("openssl" ,openssl)
|
||
("zlib" ,zlib)))
|
||
(arguments
|
||
;; Lua provides no .pc file, so add CFLAGS/LIBS manually.
|
||
'(#:configure-flags
|
||
(let ((lua (assoc-ref %build-inputs "lua")))
|
||
(list
|
||
(string-append "liblua_CFLAGS=-I" lua "/include")
|
||
(string-append "liblua_LIBS=-L" lua "/libs -llua")))))
|
||
(home-page "http://quvi.sourceforge.net/")
|
||
(synopsis "Media stream URL parser")
|
||
(description "libquvi is a library with a C API for parsing media stream
|
||
URLs and extracting their actual media files.")
|
||
(license license:lgpl2.1+)))
|
||
|
||
(define-public quvi
|
||
(package
|
||
(name "quvi")
|
||
(version "0.4.2")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://sourceforge/" name "/" (version-major+minor version)
|
||
"/" name "/" name "-" version ".tar.xz"))
|
||
(sha256
|
||
(base32 "09lhl6dv5zpryasx7yjslfrcdcqlsbwapvd5lg7w6sm5x5n3k8ci"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs `(("pkg-config" ,pkg-config)))
|
||
(inputs
|
||
`(("curl" ,curl)
|
||
("libquvi" ,libquvi)))
|
||
(home-page "http://quvi.sourceforge.net/")
|
||
(synopsis "Media stream URL parser")
|
||
(description "quvi is a command-line-tool suite to extract media files
|
||
from streaming URLs. It is a command-line wrapper for the libquvi library.")
|
||
(license license:lgpl2.1+)))
|
||
|
||
(define-public serf
|
||
(package
|
||
(name "serf")
|
||
(version "1.3.9")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://apache/serf/serf-"
|
||
version ".tar.bz2"))
|
||
(patches (search-patches "serf-python3.patch"))
|
||
(sha256
|
||
(base32 "1k47gbgpp52049andr28y28nbwh9m36bbb0g8p0aka3pqlhjv72l"))))
|
||
(build-system scons-build-system)
|
||
(propagated-inputs
|
||
`(("apr" ,apr)
|
||
("apr-util" ,apr-util)
|
||
("openssl" ,openssl)))
|
||
(inputs
|
||
`(;; TODO: Fix build with gss.
|
||
;;("gss" ,gss)
|
||
("zlib" ,zlib)))
|
||
(arguments
|
||
`(#:scons-flags (list (string-append "APR=" (assoc-ref %build-inputs "apr"))
|
||
(string-append "APU=" (assoc-ref %build-inputs "apr-util"))
|
||
(string-append "OPENSSL=" (assoc-ref %build-inputs "openssl"))
|
||
;; (string-append "GSSAPI=" (assoc-ref %build-inputs "gss"))
|
||
(string-append "ZLIB=" (assoc-ref %build-inputs "zlib"))
|
||
(string-append "PREFIX=" %output))
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'scons-propagate-environment
|
||
(lambda _
|
||
;; By design, SCons does not, by default, propagate
|
||
;; environment variables to subprocesses. See:
|
||
;; <http://comments.gmane.org/gmane.linux.distributions.nixos/4969>
|
||
;; Here, we modify the SConstruct file to arrange for
|
||
;; environment variables to be propagated.
|
||
(substitute* "SConstruct"
|
||
(("^env = Environment\\(")
|
||
"env = Environment(ENV=os.environ, "))))
|
||
(add-before 'check 'disable-broken-tests
|
||
(lambda _
|
||
;; These tests rely on SSL certificates that expired 2017-04-18.
|
||
;; While there are newer certs available upstream, we don't want
|
||
;; this package to suddenly "expire" some time in the future.
|
||
;; https://bugs.gnu.org/26671
|
||
(let ((broken-tests
|
||
'("test_ssl_trust_rootca"
|
||
"test_ssl_certificate_chain_with_anchor"
|
||
"test_ssl_certificate_chain_all_from_server"
|
||
"test_ssl_no_servercert_callback_allok"
|
||
"test_ssl_large_response"
|
||
"test_ssl_large_request"
|
||
"test_ssl_client_certificate"
|
||
"test_ssl_future_server_cert"
|
||
"test_setup_ssltunnel"
|
||
"test_ssltunnel_basic_auth"
|
||
"test_ssltunnel_basic_auth_server_has_keepalive_off"
|
||
"test_ssltunnel_basic_auth_proxy_has_keepalive_off"
|
||
"test_ssltunnel_basic_auth_proxy_close_conn_on_200resp"
|
||
"test_ssltunnel_digest_auth")))
|
||
(for-each
|
||
(lambda (test)
|
||
(substitute* "test/test_context.c"
|
||
(((string-append "SUITE_ADD_TEST\\(suite, " test "\\);")) "")))
|
||
broken-tests)
|
||
#t))))))
|
||
(home-page "https://serf.apache.org/")
|
||
(synopsis "High-performance asynchronous HTTP client library")
|
||
(description
|
||
"serf is a C-based HTTP client library built upon the Apache Portable
|
||
Runtime (APR) library. It multiplexes connections, running the read/write
|
||
communication asynchronously. Memory copies and transformations are kept to a
|
||
minimum to provide high performance operation.")
|
||
;; Most of the code is covered by the Apache License, Version 2.0, but the
|
||
;; bundled CuTest framework uses a different non-copyleft license.
|
||
(license (list license:asl2.0 (license:non-copyleft "file://test/CuTest-README.txt")))))
|
||
|
||
(define-public libsass
|
||
(package
|
||
(name "libsass")
|
||
;; When updating, check whether sassc/libsass-3.5 is still needed.
|
||
(version "3.6.4")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/sass/libsass")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"0r8lfqvr3rjhjd8r036zd1wc9q17gyiskppcw9m13jks9an7xp4j"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'bootstrap 'set-LIBSASS_VERSION
|
||
(lambda _
|
||
(setenv "LIBSASS_VERSION" ,version)
|
||
#t)))))
|
||
(native-inputs
|
||
`(("autoconf" ,autoconf)
|
||
("automake" ,automake)
|
||
("libtool" ,libtool)))
|
||
(home-page "https://sass-lang.com/libsass")
|
||
(synopsis "SASS Compiler, implemented as a C/C++ library")
|
||
(description
|
||
"LibSass is a @acronym{SASS,Syntactically awesome style sheets} compiler
|
||
library designed for portability and efficiency. To actually compile SASS
|
||
stylesheets, you'll need to use another program that uses this library,
|
||
@var{sassc} for example.")
|
||
(license license:expat)))
|
||
|
||
(define-public sassc
|
||
(package
|
||
(name "sassc")
|
||
(version "3.6.1")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/sass/sassc")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"1sxm54mkhs9m4vnl7vn11y17mhzamc403hv3966j1c7p2rbzg5pv"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:make-flags
|
||
(list "CC=gcc"
|
||
(string-append "PREFIX=" (assoc-ref %outputs "out")))
|
||
#:tests? #f ; no test suite
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'patch-Makefile
|
||
(lambda _
|
||
(substitute* "Makefile"
|
||
(("build-shared: \\$\\(RESOURCES\\) \\$\\(OBJECTS\\) \\$\\(LIB_SHARED\\)")
|
||
"build-shared: $(RESOURCES) $(OBJECTS)")
|
||
(("\\$\\(SASSC_EXE\\): libsass build")
|
||
"$(SASSC_EXE): build")
|
||
(("install: libsass-install-\\$\\(BUILD\\) \\\\")
|
||
"install: \\"))
|
||
#t))
|
||
;; This phase fails for some reason.
|
||
(delete 'bootstrap)
|
||
;; There is no configure script.
|
||
(delete 'configure)
|
||
(add-before 'build 'setup-environment
|
||
(lambda _
|
||
(setenv "BUILD" "shared")
|
||
(setenv "SASSC_VERSION" ,version)
|
||
#t)))))
|
||
(inputs
|
||
`(("libsass" ,libsass)))
|
||
(synopsis "CSS pre-processor")
|
||
(description "SassC is a compiler written in C for the CSS pre-processor
|
||
language known as SASS.")
|
||
(home-page "https://sass-lang.com/libsass")
|
||
(license license:expat)))
|
||
|
||
(define-public sassc/libsass-3.5
|
||
;; Newer libsass versions suffor from a memory leak when building (some?)
|
||
;; GTK themes <https://github.com/sass/libsass/issues/3033>.
|
||
(package
|
||
(inherit sassc)
|
||
(name "sassc")
|
||
(inputs
|
||
`(("libsass" ,
|
||
(package
|
||
(inherit libsass)
|
||
(name "libsass")
|
||
(version "3.5.5")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/sass/libsass")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"0830pjcvhzxh6yixj82x5k5r1xnadjqzi16kp53213icbly0r9ma"))))))))
|
||
(properties '((hidden? . #t)))))
|
||
|
||
|
||
(define-public perl-apache-logformat-compiler
|
||
(package
|
||
(name "perl-apache-logformat-compiler")
|
||
(version "0.36")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/K/KA/KAZEBURO/"
|
||
"Apache-LogFormat-Compiler-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "05xcl7j65vakx7x79jqjikyw0nzf60bc2w6hhc0q5sklxq1ral4l"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-http-message" ,perl-http-message)
|
||
("perl-module-build-tiny" ,perl-module-build-tiny)
|
||
("perl-test-mocktime" ,perl-test-mocktime)
|
||
("perl-try-tiny" ,perl-try-tiny)
|
||
("perl-uri" ,perl-uri)))
|
||
(propagated-inputs
|
||
`(("perl-posix-strftime-compiler" ,perl-posix-strftime-compiler)))
|
||
(arguments `(#:tests? #f)) ; TODO: Timezone test failures
|
||
(home-page "https://metacpan.org/release/Apache-LogFormat-Compiler")
|
||
(synopsis "Compile a log format string to perl-code")
|
||
(description "This module provides methods to compile a log format string
|
||
to perl-code, for faster generation of access_log lines.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-authen-sasl
|
||
(package
|
||
(name "perl-authen-sasl")
|
||
(version "2.16")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/G/GB/GBARR/"
|
||
"Authen-SASL-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"02afhlrdq5hh5g8b32fa79fqq5i76qzwfqqvfi9zi57h31szl536"))))
|
||
(build-system perl-build-system)
|
||
(arguments
|
||
'(#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'set-env
|
||
;; Fix the build with Perl 5.26.0. Try removing this phase for later
|
||
;; versions of perl-authen-sasl.
|
||
(lambda _ (setenv "PERL_USE_UNSAFE_INC" "1") #t)))))
|
||
(propagated-inputs
|
||
`(("perl-digest-hmac" ,perl-digest-hmac)
|
||
("perl-gssapi" ,perl-gssapi)))
|
||
(home-page "https://metacpan.org/release/Authen-SASL")
|
||
(synopsis "SASL authentication framework")
|
||
(description "Authen::SASL provides an SASL authentication framework.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-action-renderview
|
||
(package
|
||
(name "perl-catalyst-action-renderview")
|
||
(version "0.16")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/B/BO/BOBTFISH/"
|
||
"Catalyst-Action-RenderView-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0j1rrld13cjk7ks92b5hv3xw4rfm2lvmksb4rlzd8mx0a0wj0rc5"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-http-request-ascgi" ,perl-http-request-ascgi)
|
||
("perl-module-install" ,perl-module-install)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-data-visitor" ,perl-data-visitor)
|
||
("perl-mro-compat" ,perl-mro-compat)))
|
||
(home-page "https://metacpan.org/release/Catalyst-Action-RenderView")
|
||
(synopsis "Sensible default Catalyst action")
|
||
(description "This Catalyst action implements a sensible default end
|
||
action, which will forward to the first available view.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-action-rest
|
||
(package
|
||
(name "perl-catalyst-action-rest")
|
||
(version "1.21")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/J/JJ/JJNAPIORK/"
|
||
"Catalyst-Action-REST-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"086bykggzalbjfk0islac4b48g9s2ypj7y81d6ns1lq0aax1py6c"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-test-requires" ,perl-test-requires)
|
||
("perl-module-install" ,perl-module-install)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-class-inspector" ,perl-class-inspector)
|
||
("perl-config-general" ,perl-config-general)
|
||
("perl-cpanel-json-xs" ,perl-cpanel-json-xs)
|
||
("perl-libwww" ,perl-libwww)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-mro-compat" ,perl-mro-compat)
|
||
("perl-namespace-autoclean" ,perl-namespace-autoclean)
|
||
("perl-params-validate" ,perl-params-validate)
|
||
("perl-uri-find" ,perl-uri-find)
|
||
("perl-xml-simple" ,perl-xml-simple)))
|
||
(home-page "https://metacpan.org/release/Catalyst-Action-REST")
|
||
(synopsis "Automated REST Method Dispatching")
|
||
(description "This Action handles doing automatic method dispatching for
|
||
REST requests. It takes a normal Catalyst action, and changes the dispatch to
|
||
append an underscore and method name. First it will try dispatching to an
|
||
action with the generated name, and failing that it will try to dispatch to a
|
||
regular method.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-authentication-store-dbix-class
|
||
(package
|
||
(name "perl-catalyst-authentication-store-dbix-class")
|
||
(version "0.1506")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/I/IL/ILMARI/"
|
||
"Catalyst-Authentication-Store-DBIx-Class-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0i5ja7690fs9nhxcij6lw51j804sm8s06m5mvk1n8pi8jljrymvw"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-catalyst-plugin-authorization-roles"
|
||
,perl-catalyst-plugin-authorization-roles)
|
||
("perl-catalyst-plugin-session-state-cookie"
|
||
,perl-catalyst-plugin-session-state-cookie)
|
||
("perl-dbd-sqlite" ,perl-dbd-sqlite)
|
||
("perl-module-install" ,perl-module-install)
|
||
("perl-test-www-mechanize-catalyst" ,perl-test-www-mechanize-catalyst)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-catalyst-plugin-authentication"
|
||
,perl-catalyst-plugin-authentication)
|
||
("perl-dbix-class" ,perl-dbix-class)
|
||
("perl-catalyst-model-dbic-schema" ,perl-catalyst-model-dbic-schema)))
|
||
(home-page
|
||
"https://metacpan.org/release/Catalyst-Authentication-Store-DBIx-Class")
|
||
(synopsis "Storage class for Catalyst authentication using DBIx::Class")
|
||
(description "The Catalyst::Authentication::Store::DBIx::Class class
|
||
provides access to authentication information stored in a database via
|
||
DBIx::Class.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-component-instancepercontext
|
||
(package
|
||
(name "perl-catalyst-component-instancepercontext")
|
||
(version "0.001001")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/G/GR/GRODITI/"
|
||
"Catalyst-Component-InstancePerContext-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0wfj4vnn2cvk6jh62amwlg050p37fcwdgrn9amcz24z6w4qgjqvz"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-moose" ,perl-moose)))
|
||
(home-page
|
||
"https://metacpan.org/release/Catalyst-Component-InstancePerContext")
|
||
(synopsis "Create only one instance of Moose component per context")
|
||
(description "Catalyst::Component::InstancePerContext returns a new
|
||
instance of a component on each request.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-devel
|
||
(package
|
||
(name "perl-catalyst-devel")
|
||
(version "1.41")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/H/HA/HAARG/"
|
||
"Catalyst-Devel-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1r8arq7sw37d0mjyfzkc3pg1a9plgydqbscryc8qpvba4swpljls"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-test-fatal" ,perl-test-fatal)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-action-renderview" ,perl-catalyst-action-renderview)
|
||
("perl-catalyst-plugin-configloader" ,perl-catalyst-plugin-configloader)
|
||
("perl-catalyst-plugin-static-simple" ,perl-catalyst-plugin-static-simple)
|
||
("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-config-general" ,perl-config-general)
|
||
("perl-file-changenotify" ,perl-file-changenotify)
|
||
("perl-file-copy-recursive" ,perl-file-copy-recursive)
|
||
("perl-file-sharedir" ,perl-file-sharedir)
|
||
("perl-module-install" ,perl-module-install)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-moosex-emulate-class-accessor-fast"
|
||
,perl-moosex-emulate-class-accessor-fast)
|
||
("perl-namespace-autoclean" ,perl-namespace-autoclean)
|
||
("perl-namespace-clean" ,perl-namespace-clean)
|
||
("perl-path-class" ,perl-path-class)
|
||
("perl-template-toolkit" ,perl-template-toolkit)))
|
||
(home-page "https://metacpan.org/release/Catalyst-Devel")
|
||
(synopsis "Catalyst Development Tools")
|
||
(description "The Catalyst-Devel distribution includes a variety of
|
||
modules useful for the development of Catalyst applications, but not required
|
||
to run them. Catalyst-Devel includes the Catalyst::Helper system, which
|
||
autogenerates scripts and tests; Module::Install::Catalyst, a Module::Install
|
||
extension for Catalyst; and requirements for a variety of development-related
|
||
modules.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-dispatchtype-regex
|
||
(package
|
||
(name "perl-catalyst-dispatchtype-regex")
|
||
(version "5.90035")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/M/MG/MGRIMES/"
|
||
"Catalyst-DispatchType-Regex-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"06jq1lmpq88rmp9zik5gqczg234xac0hiyc3l698iif7zsgcyb80"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-build" ,perl-module-build) ;needs Module::Build >= 0.4004
|
||
("perl-namespace-autoclean" ,perl-namespace-autoclean)
|
||
("perl-catalyst-runtime" ,perl-catalyst-runtime)))
|
||
(propagated-inputs
|
||
`(("perl-moose" ,perl-moose)
|
||
("perl-text-simpletable" ,perl-text-simpletable)))
|
||
(home-page "https://metacpan.org/release/Catalyst-DispatchType-Regex")
|
||
(synopsis "Regex DispatchType for Catalyst")
|
||
(description "Dispatch type managing path-matching behaviour using
|
||
regexes. Regex dispatch types have been deprecated and removed from Catalyst
|
||
core. It is recommend that you use Chained methods or other techniques
|
||
instead. As part of the refactoring, the dispatch priority of Regex vs Regexp
|
||
vs LocalRegex vs LocalRegexp may have changed. Priority is now influenced by
|
||
when the dispatch type is first seen in your application.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-model-dbic-schema
|
||
(package
|
||
(name "perl-catalyst-model-dbic-schema")
|
||
(version "0.65")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/G/GB/GBJK/"
|
||
"Catalyst-Model-DBIC-Schema-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1spfjcjc0b9dv3k2gbanqj1m1cqzyxb32p76dhdwizzpbvpi3a96"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-dbd-sqlite" ,perl-dbd-sqlite)
|
||
("perl-module-install" ,perl-module-install)
|
||
("perl-test-exception" ,perl-test-exception)
|
||
("perl-test-requires" ,perl-test-requires)))
|
||
(propagated-inputs
|
||
`(("perl-carp-clan" ,perl-carp-clan)
|
||
("perl-catalyst-component-instancepercontext"
|
||
,perl-catalyst-component-instancepercontext)
|
||
("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-catalystx-component-traits" ,perl-catalystx-component-traits)
|
||
("perl-dbix-class" ,perl-dbix-class)
|
||
("perl-dbix-class-cursor-cached" ,perl-dbix-class-cursor-cached)
|
||
("perl-dbix-class-schema-loader" ,perl-dbix-class-schema-loader)
|
||
("perl-hash-merge" ,perl-hash-merge)
|
||
("perl-list-moreutils" ,perl-list-moreutils)
|
||
("perl-module-runtime" ,perl-module-runtime)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-moosex-markasmethods" ,perl-moosex-markasmethods)
|
||
("perl-moosex-nonmoose" ,perl-moosex-nonmoose)
|
||
("perl-moosex-types" ,perl-moosex-types)
|
||
("perl-moosex-types-loadableclass" ,perl-moosex-types-loadableclass)
|
||
("perl-namespace-autoclean" ,perl-namespace-autoclean)
|
||
("perl-namespace-clean" ,perl-namespace-clean)
|
||
("perl-tie-ixhash" ,perl-tie-ixhash)
|
||
("perl-try-tiny" ,perl-try-tiny)))
|
||
(home-page "https://metacpan.org/release/Catalyst-Model-DBIC-Schema")
|
||
(synopsis "DBIx::Class::Schema Model Class")
|
||
(description "This is a Catalyst Model for DBIx::Class::Schema-based
|
||
Models.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-plugin-accesslog
|
||
(package
|
||
(name "perl-catalyst-plugin-accesslog")
|
||
(version "1.10")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/A/AR/ARODLAND/"
|
||
"Catalyst-Plugin-AccessLog-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0811rj45q4v2y8wka3wb9d5m4vbyhcmkvddf2wz4x69awzjbhgc7"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-datetime" ,perl-datetime)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-namespace-autoclean" ,perl-namespace-autoclean)))
|
||
(home-page "https://metacpan.org/release/Catalyst-Plugin-AccessLog")
|
||
(synopsis "Request logging from within Catalyst")
|
||
(description "This Catalyst plugin enables you to create \"access logs\"
|
||
from within a Catalyst application instead of requiring a webserver to do it
|
||
for you. It will work even with Catalyst debug logging turned off.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-plugin-authentication
|
||
(package
|
||
(name "perl-catalyst-plugin-authentication")
|
||
(version "0.10023")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/B/BO/BOBTFISH/"
|
||
"Catalyst-Plugin-Authentication-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0v6hb4r1wv3djrnqvnjcn3xx1scgqzx8nyjdg9lfc1ybvamrl0rn"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-plugin-session" ,perl-catalyst-plugin-session)
|
||
("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-class-inspector" ,perl-class-inspector)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-moosex-emulate-class-accessor-fast"
|
||
,perl-moosex-emulate-class-accessor-fast)
|
||
("perl-mro-compat" ,perl-mro-compat)
|
||
("perl-namespace-autoclean" ,perl-namespace-autoclean)
|
||
("perl-string-rewriteprefix" ,perl-string-rewriteprefix)
|
||
("perl-test-exception" ,perl-test-exception)
|
||
("perl-try-tiny" ,perl-try-tiny)))
|
||
(home-page "https://metacpan.org/release/Catalyst-Plugin-Authentication")
|
||
(synopsis "Infrastructure plugin for the Catalyst authentication framework")
|
||
(description "The authentication plugin provides generic user support for
|
||
Catalyst apps. It is the basis for both authentication (checking the user is
|
||
who they claim to be), and authorization (allowing the user to do what the
|
||
system authorises them to do).")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-plugin-authorization-roles
|
||
(package
|
||
(name "perl-catalyst-plugin-authorization-roles")
|
||
(version "0.09")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/B/BO/BOBTFISH/"
|
||
"Catalyst-Plugin-Authorization-Roles-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0l83lkwmq0lngwh8b1rv3r719pn8w1gdbyhjqm74rnd0wbjl8h7f"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)
|
||
("perl-test-exception" ,perl-test-exception)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-plugin-authentication"
|
||
,perl-catalyst-plugin-authentication)
|
||
("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-set-object" ,perl-set-object)
|
||
("perl-universal-isa" ,perl-universal-isa)))
|
||
(home-page
|
||
"https://metacpan.org/release/Catalyst-Plugin-Authorization-Roles")
|
||
(synopsis "Role-based authorization for Catalyst")
|
||
(description "Catalyst::Plugin::Authorization::Roles provides role-based
|
||
authorization for Catalyst based on Catalyst::Plugin::Authentication.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-plugin-captcha
|
||
(package
|
||
(name "perl-catalyst-plugin-captcha")
|
||
(version "0.04")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/D/DI/DIEGOK/"
|
||
"Catalyst-Plugin-Captcha-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0llyj3v5nx9cx46jdbbvxf1lc9s9cxq5ml22xmx3wkb201r5qgaa"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-catalyst-plugin-session" ,perl-catalyst-plugin-session)
|
||
("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-gd-securityimage" ,perl-gd-securityimage)
|
||
("perl-http-date" ,perl-http-date)))
|
||
(home-page "https://metacpan.org/release/Catalyst-Plugin-Captcha")
|
||
(synopsis "Captchas for Catalyst")
|
||
(description "This plugin creates and validates Captcha images for
|
||
Catalyst.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-plugin-configloader
|
||
(package
|
||
(name "perl-catalyst-plugin-configloader")
|
||
(version "0.35")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/H/HA/HAARG/"
|
||
"Catalyst-Plugin-ConfigLoader-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0w8r3bbxqnlykvra6sx3sh3wh8ylkj914xg5ql6nw11ddy56jaly"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-path-class" ,perl-path-class)
|
||
("perl-module-install" ,perl-module-install)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-config-any" ,perl-config-any)
|
||
("perl-data-visitor" ,perl-data-visitor)
|
||
("perl-mro-compat" ,perl-mro-compat)))
|
||
(home-page "https://metacpan.org/release/Catalyst-Plugin-ConfigLoader")
|
||
(synopsis "Load config files of various types")
|
||
(description "This module will attempt to load find and load configuration
|
||
files of various types. Currently it supports YAML, JSON, XML, INI and Perl
|
||
formats.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-plugin-session
|
||
(package
|
||
(name "perl-catalyst-plugin-session")
|
||
(version "0.41")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/J/JJ/JJNAPIORK/"
|
||
"Catalyst-Plugin-Session-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0a451997zc2vjx7rvndgx1ldbrpic8sfbddyvncynh0zr8bhlqc5"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)
|
||
("perl-test-deep" ,perl-test-deep)
|
||
("perl-test-exception" ,perl-test-exception)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-moosex-emulate-class-accessor-fast"
|
||
,perl-moosex-emulate-class-accessor-fast)
|
||
("perl-mro-compat" ,perl-mro-compat)
|
||
("perl-namespace-clean" ,perl-namespace-clean)
|
||
("perl-object-signature" ,perl-object-signature)
|
||
("perl-test-www-mechanize-psgi" ,perl-test-www-mechanize-psgi)))
|
||
(home-page "https://metacpan.org/release/Catalyst-Plugin-Session")
|
||
(synopsis "Catalyst generic session plugin")
|
||
(description "This plugin links the two pieces required for session
|
||
management in web applications together: the state, and the store.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-plugin-session-state-cookie
|
||
(package
|
||
(name "perl-catalyst-plugin-session-state-cookie")
|
||
(version "0.17")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/M/MS/MSTROUT/"
|
||
"Catalyst-Plugin-Session-State-Cookie-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1rvxbfnpf9x2pc2zgpazlcgdlr2dijmxgmcs0m5nazs0w6xikssb"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-plugin-session" ,perl-catalyst-plugin-session)
|
||
("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-mro-compat" ,perl-mro-compat)
|
||
("perl-namespace-autoclean" ,perl-namespace-autoclean)))
|
||
(home-page
|
||
"https://metacpan.org/release/Catalyst-Plugin-Session-State-Cookie")
|
||
(synopsis "Maintain session IDs using cookies")
|
||
(description "In order for Catalyst::Plugin::Session to work, the session
|
||
ID needs to be stored on the client, and the session data needs to be stored
|
||
on the server. This plugin stores the session ID on the client using the
|
||
cookie mechanism.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-plugin-session-store-fastmmap
|
||
(package
|
||
(name "perl-catalyst-plugin-session-store-fastmmap")
|
||
(version "0.16")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/B/BO/BOBTFISH/"
|
||
"Catalyst-Plugin-Session-Store-FastMmap-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0x3j6zv3wr41jlwr6yb2jpmcx019ibyn11y8653ffnwhpzbpzsxs"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-cache-fastmmap" ,perl-cache-fastmmap)
|
||
("perl-catalyst-plugin-session" ,perl-catalyst-plugin-session)
|
||
("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-moosex-emulate-class-accessor-fast"
|
||
,perl-moosex-emulate-class-accessor-fast)
|
||
("perl-mro-compat" ,perl-mro-compat)
|
||
("perl-path-class" ,perl-path-class)))
|
||
(home-page
|
||
"https://metacpan.org/release/Catalyst-Plugin-Session-Store-FastMmap")
|
||
(synopsis "FastMmap session storage backend")
|
||
(description "Catalyst::Plugin::Session::Store::FastMmap is a fast session
|
||
storage plugin for Catalyst that uses an mmap'ed file to act as a shared
|
||
memory interprocess cache. It is based on Cache::FastMmap.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-plugin-stacktrace
|
||
(package
|
||
(name "perl-catalyst-plugin-stacktrace")
|
||
(version "0.12")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/B/BO/BOBTFISH/"
|
||
"Catalyst-Plugin-StackTrace-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1b2ksz74cpigxqzf63rddar3vfmnbpwpdcbs11v0ml89pb8ar79j"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-devel-stacktrace" ,perl-devel-stacktrace)
|
||
("perl-mro-compat" ,perl-mro-compat)))
|
||
(home-page "https://metacpan.org/release/Catalyst-Plugin-StackTrace")
|
||
(synopsis "Stack trace on the Catalyst debug screen")
|
||
(description "This plugin enhances the standard Catalyst debug screen by
|
||
including a stack trace of your application up to the point where the error
|
||
occurred. Each stack frame is displayed along with the package name, line
|
||
number, file name, and code context surrounding the line number.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-plugin-static-simple
|
||
(package
|
||
(name "perl-catalyst-plugin-static-simple")
|
||
(version "0.36")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/I/IL/ILMARI/"
|
||
"Catalyst-Plugin-Static-Simple-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0m4l627p2fvzr4i6sgdxhdvsx4wpa6qmaibsbxlg5x5yjs7k7drn"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-mime-types" ,perl-mime-types)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-moosex-types" ,perl-moosex-types)
|
||
("perl-namespace-autoclean" ,perl-namespace-autoclean)))
|
||
(home-page "https://metacpan.org/release/Catalyst-Plugin-Static-Simple")
|
||
(synopsis "Simple serving of static pages")
|
||
(description "The Static::Simple plugin is designed to make serving static
|
||
content in your application during development quick and easy, without
|
||
requiring a single line of code from you. This plugin detects static files by
|
||
looking at the file extension in the URL (such as .css or .png or .js). The
|
||
plugin uses the lightweight MIME::Types module to map file extensions to
|
||
IANA-registered MIME types, and will serve your static files with the correct
|
||
MIME type directly to the browser, without being processed through Catalyst.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-runtime
|
||
(package
|
||
(name "perl-catalyst-runtime")
|
||
(version "5.90124")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/J/JJ/JJNAPIORK/"
|
||
"Catalyst-Runtime-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"001yk1i0xwn4v308qx15nvnp6v9qfdigdlvz1rgw5zpnq7kwnq1a"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-test-fatal" ,perl-test-fatal)))
|
||
(propagated-inputs
|
||
`(("perl-cgi-simple" ,perl-cgi-simple)
|
||
("perl-cgi-struct" ,perl-cgi-struct)
|
||
("perl-class-c3-adopt-next" ,perl-class-c3-adopt-next)
|
||
("perl-class-date" ,perl-class-date)
|
||
("perl-class-load" ,perl-class-load)
|
||
("perl-data-dump" ,perl-data-dump)
|
||
("perl-http-body" ,perl-http-body)
|
||
("perl-http-message" ,perl-http-message)
|
||
("perl-json-maybexs" ,perl-json-maybexs)
|
||
("perl-libwww" ,perl-libwww)
|
||
("perl-module-pluggable" ,perl-module-pluggable)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-moosex-emulate-class-accessor-fast"
|
||
,perl-moosex-emulate-class-accessor-fast)
|
||
("perl-moosex-getopt" ,perl-moosex-getopt)
|
||
("perl-moosex-methodattributes" ,perl-moosex-methodattributes)
|
||
("perl-namespace-clean" ,perl-namespace-clean)
|
||
("perl-path-class" ,perl-path-class)
|
||
("perl-perlio-utf8-strict" ,perl-perlio-utf8_strict)
|
||
("perl-plack" ,perl-plack)
|
||
("perl-plack-middleware-fixmissingbodyinredirect"
|
||
,perl-plack-middleware-fixmissingbodyinredirect)
|
||
("perl-plack-middleware-methodoverride"
|
||
,perl-plack-middleware-methodoverride)
|
||
("perl-plack-middleware-removeredundantbody"
|
||
,perl-plack-middleware-removeredundantbody)
|
||
("perl-plack-middleware-reverseproxy"
|
||
,perl-plack-middleware-reverseproxy)
|
||
("perl-plack-test-externalserver" ,perl-plack-test-externalserver)
|
||
("perl-safe-isa" ,perl-safe-isa)
|
||
("perl-string-rewriteprefix" ,perl-string-rewriteprefix)
|
||
("perl-text-simpletable" ,perl-text-simpletable)
|
||
("perl-tree-simple" ,perl-tree-simple)
|
||
("perl-tree-simple-visitorfactory" ,perl-tree-simple-visitorfactory)
|
||
("perl-try-tiny" ,perl-try-tiny)
|
||
("perl-uri" ,perl-uri)
|
||
("perl-uri-ws" ,perl-uri-ws)))
|
||
(home-page "https://metacpan.org/release/Catalyst-Runtime")
|
||
(synopsis "The Catalyst Framework Runtime")
|
||
(description "Catalyst is a modern framework for making web applications.
|
||
It is designed to make it easy to manage the various tasks you need to do to
|
||
run an application on the web, either by doing them itself, or by letting you
|
||
\"plug in\" existing Perl modules that do what you need.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-traitfor-request-proxybase
|
||
(package
|
||
(name "perl-catalyst-traitfor-request-proxybase")
|
||
(version "0.000005")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/B/BO/BOBTFISH/"
|
||
"Catalyst-TraitFor-Request-ProxyBase-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"02kir63d5cs2ipj3fn1qlmmx3gqi1xqzrxfr4pv5vjhjgsm0zgx7"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-catalystx-roleapplicator" ,perl-catalystx-roleapplicator)
|
||
("perl-http-message" ,perl-http-message)
|
||
("perl-module-install" ,perl-module-install)))
|
||
(propagated-inputs
|
||
`(("perl-moose" ,perl-moose)
|
||
("perl-namespace-autoclean" ,perl-namespace-autoclean)
|
||
("perl-uri" ,perl-uri)))
|
||
(home-page
|
||
"https://metacpan.org/release/Catalyst-TraitFor-Request-ProxyBase")
|
||
(synopsis "Replace request base with value passed by HTTP proxy")
|
||
(description "This module is a Moose::Role which allows you more
|
||
flexibility in your application's deployment configurations when deployed
|
||
behind a proxy. Using this module, the request base ($c->req->base) is
|
||
replaced with the contents of the X-Request-Base header.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-view-download
|
||
(package
|
||
(name "perl-catalyst-view-download")
|
||
(version "0.09")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/G/GA/GAUDEON/"
|
||
"Catalyst-View-Download-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1qgq6y9iwfbhbkbgpw9czang2ami6z8jk1zlagrzdisy4igqzkvs"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-module-install" ,perl-module-install)
|
||
("perl-test-simple" ,perl-test-simple)
|
||
("perl-test-www-mechanize-catalyst" ,perl-test-www-mechanize-catalyst)
|
||
("perl-text-csv" ,perl-text-csv)
|
||
("perl-xml-simple" ,perl-xml-simple)))
|
||
(home-page "https://metacpan.org/release/Catalyst-View-Download")
|
||
(synopsis "Download data in many formats")
|
||
(description "The purpose of this module is to provide a method for
|
||
downloading data into many supportable formats. For example, downloading a
|
||
table based report in a variety of formats (CSV, HTML, etc.).")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-view-json
|
||
(package
|
||
(name "perl-catalyst-view-json")
|
||
(version "0.37")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/H/HA/HAARG/"
|
||
"Catalyst-View-JSON-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1v4xkzazs743sc7cd1kxkbi99cf00a4dadyyancckcbpi9p3znn5"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)
|
||
("perl-yaml" ,perl-yaml)))
|
||
(inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-json-maybexs" ,perl-json-maybexs)
|
||
("perl-mro-compat" ,perl-mro-compat)))
|
||
(home-page "https://metacpan.org/release/Catalyst-View-JSON")
|
||
(synopsis "Catalyst JSON view")
|
||
(description "Catalyst::View::JSON is a Catalyst View handler that returns
|
||
stash data in JSON format.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalyst-view-tt
|
||
(package
|
||
(name "perl-catalyst-view-tt")
|
||
(version "0.45")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/H/HA/HAARG/"
|
||
"Catalyst-View-TT-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0jzgpkgq5pwq82zlb0nykdyk40dfpsyn9ilz91d0wpixgi9i5pr8"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-class-accessor" ,perl-class-accessor)
|
||
("perl-data-dump" ,perl-data-dump)
|
||
("perl-mro-compat" ,perl-mro-compat)
|
||
("perl-path-class" ,perl-path-class)
|
||
("perl-template-timer" ,perl-template-timer)
|
||
("perl-template-toolkit" ,perl-template-toolkit)))
|
||
(home-page "https://metacpan.org/release/Catalyst-View-TT")
|
||
(synopsis "Template View Class")
|
||
(description "This module is a Catalyst view class for the Template
|
||
Toolkit.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalystx-component-traits
|
||
(package
|
||
(name "perl-catalystx-component-traits")
|
||
(version "0.19")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/R/RK/RKITOVER/"
|
||
"CatalystX-Component-Traits-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0iq4ci8m6g2c4g01fvdl568y7pjz28f3widk986v3pyhr7ll8j88"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-moose" ,perl-moose)
|
||
("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-moosex-methodattributes" ,perl-moosex-methodattributes)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-class-load" ,perl-class-load)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-moosex-traits-pluggable" ,perl-moosex-traits-pluggable)
|
||
("perl-namespace-autoclean" ,perl-namespace-autoclean)
|
||
("perl-list-moreutils" ,perl-list-moreutils)))
|
||
(home-page "https://metacpan.org/release/CatalystX-Component-Traits")
|
||
(synopsis "Trait Loading and Resolution for Catalyst Components")
|
||
(description "Adds a \"COMPONENT\" in Catalyst::Component method to your
|
||
Catalyst component base class that reads the optional \"traits\" parameter
|
||
from app and component config and instantiates the component subclass with
|
||
those traits using \"new_with_traits\" in MooseX::Traits from
|
||
MooseX::Traits::Pluggable.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalystx-roleapplicator
|
||
(package
|
||
(name "perl-catalystx-roleapplicator")
|
||
(version "0.005")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/H/HD/HDP/"
|
||
"CatalystX-RoleApplicator-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0vwaapxn8g5hs2xp63c4dwv9jmapmji4272fakssvgc9frklg3p2"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-moosex-relatedclassroles" ,perl-moosex-relatedclassroles)))
|
||
(home-page "https://metacpan.org/release/CatalystX-RoleApplicator")
|
||
(synopsis "Apply roles to Catalyst classes")
|
||
(description "CatalystX::RoleApplicator applies roles to Catalyst
|
||
application classes.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-catalystx-script-server-starman
|
||
(package
|
||
(name "perl-catalystx-script-server-starman")
|
||
(version "0.03")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/A/AB/ABRAXXA/"
|
||
"CatalystX-Script-Server-Starman-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"08jvibq4v8xjj0c3cr93h0w8w0c88ajwjn37xjy7ygxl9krlffp6"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)
|
||
("perl-test-www-mechanize-catalyst" ,perl-test-www-mechanize-catalyst)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-namespace-autoclean" ,perl-namespace-autoclean)
|
||
("starman" ,starman)))
|
||
(home-page "https://metacpan.org/release/CatalystX-Script-Server-Starman")
|
||
(synopsis "Catalyst development server with Starman")
|
||
(description "This module provides a Catalyst extension to replace the
|
||
development server with Starman.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-cgi
|
||
(package
|
||
(name "perl-cgi")
|
||
(version "4.51")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/L/LE/LEEJO/"
|
||
"CGI-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "02k0p8zwbn0fz9r39rg8jvbmky8fwdg6kznklzk557rg07kiblhb"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-test-deep" ,perl-test-deep)
|
||
("perl-test-nowarnings" ,perl-test-nowarnings)
|
||
("perl-test-warn" ,perl-test-warn)))
|
||
(propagated-inputs
|
||
`(("perl-html-parser" ,perl-html-parser)))
|
||
(home-page "https://metacpan.org/release/CGI")
|
||
(synopsis "Handle Common Gateway Interface requests and responses")
|
||
(description "CGI.pm is a stable, complete and mature solution for
|
||
processing and preparing HTTP requests and responses. Major features include
|
||
processing form submissions, file uploads, reading and writing cookies, query
|
||
string generation and manipulation, and processing and preparing HTTP
|
||
headers.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-cgi-formbuilder
|
||
(package
|
||
(name "perl-cgi-formbuilder")
|
||
(version "3.10")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://cpan.metacpan.org/authors/id/B/BI/BIGPRESH/"
|
||
"CGI-FormBuilder-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"163ixq9kninqq094z2rnkg9pv3bcmvjphlww4vksfrzhq3h9pjdf"))))
|
||
(build-system perl-build-system)
|
||
(inputs `(("perl-cgi" ,perl-cgi)))
|
||
(home-page
|
||
"https://metacpan.org/release/CGI-FormBuilder")
|
||
(synopsis
|
||
"Generate and process stateful forms")
|
||
(description
|
||
"@code{CGI::FormBuilder} provides an easy way to generate and process CGI
|
||
form-based applications.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-cgi-session
|
||
(package
|
||
(name "perl-cgi-session")
|
||
(version "4.48")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/M/MA/MARKSTOS/CGI-Session-"
|
||
version
|
||
".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1xsl2pz1jrh127pq0b01yffnj4mnp9nvkp88h5mndrscq9hn8xa6"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-build" ,perl-module-build)))
|
||
(inputs `(("perl-cgi" ,perl-cgi)))
|
||
(home-page
|
||
"https://metacpan.org/release/CGI-Session")
|
||
(synopsis
|
||
"Persistent session data in CGI applications")
|
||
(description
|
||
"@code{CGI::Session} provides modular session management system across
|
||
HTTP requests.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-cgi-simple
|
||
(package
|
||
(name "perl-cgi-simple")
|
||
(version "1.22")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/M/MA/MANWAR/"
|
||
"CGI-Simple-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "13c7iwnnavky10ab87pi8jc1kqph03s0rhvj7myn7szhbfisc4gn"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-io-stringy" ,perl-io-stringy) ; for IO::Scalar
|
||
("perl-module-build" ,perl-module-build)
|
||
("perl-test-exception" ,perl-test-exception)
|
||
("perl-test-nowarnings" ,perl-test-nowarnings)))
|
||
(home-page "https://metacpan.org/release/CGI-Simple")
|
||
(synopsis "CGI interface that is CGI.pm compliant")
|
||
(description "CGI::Simple provides a relatively lightweight drop in
|
||
replacement for CGI.pm. It shares an identical OO interface to CGI.pm for
|
||
parameter parsing, file upload, cookie handling and header generation.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-cgi-struct
|
||
(package
|
||
(name "perl-cgi-struct")
|
||
(version "1.21")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/F/FU/FULLERMD/"
|
||
"CGI-Struct-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0v4xq2qpryr7i6jngw1wpn8yr2kiib10yxp4aih90vfdznkqsgfi"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-test-deep" ,perl-test-deep)))
|
||
(home-page "https://metacpan.org/release/CGI-Struct")
|
||
(synopsis "Build structures from CGI data")
|
||
(description "This is a module for building structured data from CGI
|
||
inputs, in a manner reminiscent of how PHP does.")
|
||
(license license:bsd-2)))
|
||
|
||
(define-public perl-datetime-format-http
|
||
(package
|
||
(name "perl-datetime-format-http")
|
||
(version "0.42")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/C/CK/CKRAS/"
|
||
"DateTime-Format-HTTP-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0h6qqdg1yzqkdxp7hqlp0qa7d1y64nilgimxs79dys2ryjfpcknh"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-build" ,perl-module-build)))
|
||
(propagated-inputs
|
||
`(("perl-datetime" ,perl-datetime)
|
||
("perl-http-date" ,perl-http-date)))
|
||
(home-page "https://metacpan.org/release/DateTime-Format-HTTP")
|
||
(synopsis "Date conversion routines")
|
||
(description "This module provides functions that deal with the date
|
||
formats used by the HTTP protocol.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-digest-md5-file
|
||
(package
|
||
(name "perl-digest-md5-file")
|
||
(version "0.08")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/D/DM/DMUEY/"
|
||
"Digest-MD5-File-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"060jzf45dlwysw5wsm7av1wvpl06xgk415kwwpvv89r6wda3md5d"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-libwww" ,perl-libwww)))
|
||
(home-page "https://metacpan.org/release/Digest-MD5-File")
|
||
(synopsis "MD5 sums for files and urls")
|
||
(description "Digest::MD5::File is a Perl extension for getting MD5 sums
|
||
for files and urls.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-encode-locale
|
||
(package
|
||
(name "perl-encode-locale")
|
||
(version "1.05")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/G/GA/GAAS/Encode-Locale-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1h8fvcdg3n20c2yp7107yhdkkx78534s9hnvn7ps8hpmf4ks0vqp"))))
|
||
(build-system perl-build-system)
|
||
(license license:perl-license)
|
||
(synopsis "Perl locale encoding determination")
|
||
(description
|
||
"The POSIX locale system is used to specify both the language
|
||
conventions requested by the user and the preferred character set to
|
||
consume and output. The Encode::Locale module looks up the charset and
|
||
encoding (called a CODESET in the locale jargon) and arranges for the
|
||
Encode module to know this encoding under the name \"locale\". It means
|
||
bytes obtained from the environment can be converted to Unicode strings
|
||
by calling Encode::encode(locale => $bytes) and converted back again
|
||
with Encode::decode(locale => $string).")
|
||
(home-page "https://metacpan.org/release/Encode-Locale")))
|
||
|
||
(define-public perl-feed-find
|
||
(package
|
||
(name "perl-feed-find")
|
||
(version "0.07")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/B/BT/BTROTT/"
|
||
"Feed-Find-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0sa33cm8ww55cymnl8j7b5yspi2y5xkkkgqqa4h6fs3wdqylz600"))))
|
||
(build-system perl-build-system)
|
||
(arguments
|
||
;; Tests expect to query files at http://stupidfool.org/perl/feeds/
|
||
`(#:tests? #f
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'set-env
|
||
(lambda _ (setenv "PERL_USE_UNSAFE_INC" "1"))))))
|
||
(inputs
|
||
`(("perl-class-errorhandler" ,perl-class-errorhandler)
|
||
("perl-html-parser" ,perl-html-parser)
|
||
("perl-libwww" ,perl-libwww)
|
||
("perl-uri" ,perl-uri)))
|
||
(home-page "https://metacpan.org/release/Feed-Find")
|
||
(synopsis "Syndication feed auto-discovery")
|
||
(description "@code{Feed::Find} implements feed auto-discovery for finding
|
||
syndication feeds, given a URI. It will discover the following feed formats:
|
||
RSS 0.91, RSS 1.0, RSS 2.0, Atom.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-file-listing
|
||
(package
|
||
(name "perl-file-listing")
|
||
(version "6.11")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/P/PL/PLICEASE/File-Listing-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0vmzw1mhv580flzkla80gvwfpficnhlbqr1dnlf9x50bw7n18k62"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-http-date" ,perl-http-date)))
|
||
(license license:perl-license)
|
||
(synopsis "Perl directory listing parser")
|
||
(description
|
||
"The File::Listing module exports a single function called parse_dir(),
|
||
which can be used to parse directory listings.")
|
||
(home-page "https://metacpan.org/release/File-Listing")))
|
||
|
||
(define-public perl-finance-quote
|
||
(package
|
||
(name "perl-finance-quote")
|
||
(version "1.47")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://cpan.metacpan.org/authors/id/E/EC/ECOCODE/"
|
||
"Finance-Quote-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0gzbq85738f299jaw4nj3ljnka380j2y6yspmyl71rgfypqjvbr7"))
|
||
(patches (search-patches
|
||
"perl-finance-quote-unuse-mozilla-ca.patch"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-cgi" ,perl-cgi)
|
||
("perl-datetime" ,perl-datetime)
|
||
("perl-html-parser" ,perl-html-parser)
|
||
("perl-html-tableextract" ,perl-html-tableextract)
|
||
("perl-html-tree" ,perl-html-tree)
|
||
("perl-http-cookies" ,perl-http-cookies)
|
||
("perl-http-message" ,perl-http-message)
|
||
("perl-json" ,perl-json)
|
||
("perl-libwww" ,perl-libwww)
|
||
("perl-lwp-protocol-https" ,perl-lwp-protocol-https)
|
||
("perl-uri" ,perl-uri)))
|
||
(home-page "https://metacpan.org/release/Finance-Quote")
|
||
(synopsis "Stock and mutual fund quotes")
|
||
(description
|
||
"Finance::Quote gets stock quotes from various internet sources, including
|
||
Yahoo! Finance, Fidelity Investments, and the Australian Stock Exchange.")
|
||
(license license:gpl2)))
|
||
|
||
(define-public perl-gssapi
|
||
(package
|
||
(name "perl-gssapi")
|
||
(version "0.28")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/A/AG/AGROLMS/"
|
||
"GSSAPI-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1mkhwxjjlhr58pd770i9gnf7zy7jj092iv6jfbnb8bvnc5xjr3vx"))))
|
||
(build-system perl-build-system)
|
||
(inputs `(("gssapi" ,mit-krb5)))
|
||
(arguments
|
||
`(#:make-maker-flags
|
||
`(,(string-append "--gssapiimpl=" (assoc-ref %build-inputs "gssapi")))))
|
||
(home-page "https://metacpan.org/release/GSSAPI")
|
||
(synopsis "Perl extension providing access to the GSSAPIv2 library")
|
||
(description "This is a Perl extension for using GSSAPI C bindings as
|
||
described in RFC 2744.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-html-element-extended
|
||
(package
|
||
(name "perl-html-element-extended")
|
||
(version "1.18")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/M/MS/MSISK/"
|
||
"HTML-Element-Extended-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0axknss8c368r5i082yhkfj8mq0w4nglfrpcxcayyzzj13qimvzk"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-html-tree" ,perl-html-tree)))
|
||
(home-page "https://metacpan.org/release/HTML-Element-Extended")
|
||
(synopsis "Manipulate tables of HTML::Element")
|
||
(description
|
||
"HTML::Element::Extended is a Perl extension for manipulating a table
|
||
composed of HTML::Element style components.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-html-form
|
||
(package
|
||
(name "perl-html-form")
|
||
(version "6.05")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/O/OA/OALDERS/"
|
||
"HTML-Form-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "14i4ldyvdvhdhvfhh9kiq6z853q2f84biq8vcpv1k5w2r80wdiin"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-html-parser" ,perl-html-parser)
|
||
("perl-html-tagset" ,perl-html-tagset)
|
||
("perl-http-message" ,perl-http-message)
|
||
("perl-lwp-mediatypes" ,perl-lwp-mediatypes)
|
||
("perl-uri" ,perl-uri)))
|
||
(home-page "https://metacpan.org/release/HTML-Form")
|
||
(synopsis "Perl class representing an HTML form element")
|
||
(description "Objects of the HTML::Form class represents a single HTML
|
||
<form> ... </form> instance.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-html-scrubber
|
||
(package
|
||
(name "perl-html-scrubber")
|
||
(version "0.17")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/N/NI/NIGELM/HTML-Scrubber-"
|
||
version
|
||
".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"06p7w4zd42b2yh541mlzyqj40lwmvvn3fyqi8big4mf34la7m2jm"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-build" ,perl-module-build)
|
||
("perl-test-cpan-meta" ,perl-test-cpan-meta)
|
||
("perl-test-differences" ,perl-test-differences)
|
||
("perl-test-eol" ,perl-test-eol)
|
||
("perl-test-memory-cycle" ,perl-test-memory-cycle)
|
||
("perl-test-notabs" ,perl-test-notabs)))
|
||
(inputs
|
||
`(("perl-html-parser" ,perl-html-parser)))
|
||
(home-page
|
||
"https://metacpan.org/release/HTML-Scrubber")
|
||
(synopsis
|
||
"Perl extension for scrubbing/sanitizing html")
|
||
(description
|
||
"@code{HTML::Scrubber} Perl extension for scrubbing/sanitizing HTML.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-html-lint
|
||
(package
|
||
(name "perl-html-lint")
|
||
(version "2.32")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/P/PE/PETDANCE/"
|
||
"HTML-Lint-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0lk02xpfxcg7ij4dvpsa4wjlzhmiizj0jfr3rwmdpbj69nvc93br"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-html-parser" ,perl-html-parser)
|
||
("perl-html-tagset" ,perl-html-tagset)
|
||
("perl-libwww" ,perl-libwww)))
|
||
(home-page "https://metacpan.org/release/HTML-Lint")
|
||
(synopsis "Check for HTML errors in a string or file")
|
||
(description "HTML::Lint is a pure-Perl HTML parser and checker for
|
||
syntactic legitmacy.")
|
||
(license license:artistic2.0)))
|
||
|
||
(define-public perl-html-tableextract
|
||
(package
|
||
(name "perl-html-tableextract")
|
||
(version "2.13")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://cpan.metacpan.org/authors/id/M/MS/MSISK/"
|
||
"HTML-TableExtract-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"01jimmss3q68a89696wmclvqwb2ybz6xgabpnbp6mm6jcni82z8a"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-html-element-extended" ,perl-html-element-extended)
|
||
("perl-html-parser" ,perl-html-parser)))
|
||
(home-page "https://metacpan.org/release/HTML-TableExtract")
|
||
(synopsis "Extract contents from HTML tables")
|
||
(description
|
||
"HTML::TableExtract is a Perl module for extracting the content contained
|
||
in tables within an HTML document, either as text or encoded element trees.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-html-tree
|
||
(package
|
||
(name "perl-html-tree")
|
||
(version "5.07")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/K/KE/KENTNL/"
|
||
"HTML-Tree-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1gyvm4qlwm9y6hczkpnrdfl303ggbybr0nqxdjw09hii8yw4sdzh"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-build" ,perl-module-build)
|
||
("perl-test-fatal" ,perl-test-fatal)))
|
||
(propagated-inputs
|
||
`(("perl-html-parser" ,perl-html-parser)
|
||
("perl-html-tagset" ,perl-html-tagset)
|
||
("perl-libwww" ,perl-libwww)))
|
||
(home-page "https://metacpan.org/release/HTML-Tree")
|
||
(synopsis "Work with HTML in a DOM-like tree structure")
|
||
(description "This distribution contains a suite of modules for
|
||
representing, creating, and extracting information from HTML syntax trees.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-html-parser
|
||
(package
|
||
(name "perl-html-parser")
|
||
(version "3.72")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/G/GA/GAAS/HTML-Parser-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"12v05ywlnsi9lc17z32k9jxx3sj1viy7y1wpl7n4az76v7hwfa7c"))))
|
||
(build-system perl-build-system)
|
||
(inputs
|
||
`(("perl-html-tagset" ,perl-html-tagset)
|
||
("perl-http-message" ,perl-http-message)))
|
||
(license license:perl-license)
|
||
(synopsis "Perl HTML parser class")
|
||
(description
|
||
"Objects of the HTML::Parser class will recognize markup and separate
|
||
it from plain text (alias data content) in HTML documents. As different
|
||
kinds of markup and text are recognized, the corresponding event handlers
|
||
are invoked.")
|
||
(home-page "https://metacpan.org/release/HTML-Parser")))
|
||
|
||
(define-public perl-html-tagset
|
||
(package
|
||
(name "perl-html-tagset")
|
||
(version "3.20")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/P/PE/PETDANCE/HTML-Tagset-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1qh8249wgr4v9vgghq77zh1d2zs176bir223a8gh3k9nksn7vcdd"))))
|
||
(build-system perl-build-system)
|
||
(license license:perl-license)
|
||
(synopsis "Perl data tables useful in parsing HTML")
|
||
(description
|
||
"The HTML::Tagset module contains several data tables useful in various
|
||
kinds of HTML parsing operations.")
|
||
(home-page "https://metacpan.org/release/HTML-Tagset")))
|
||
|
||
(define-public perl-html-template
|
||
(package
|
||
(name "perl-html-template")
|
||
(version "2.97")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/S/SA/SAMTREGAR/"
|
||
"HTML-Template-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"17qjw8swj2q4b1ic285pndgrkmvpsqw0j68nhqzpk1daydhsyiv5"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-cgi" ,perl-cgi)))
|
||
(home-page "https://metacpan.org/release/HTML-Template")
|
||
(synopsis "HTML-like templates")
|
||
(description
|
||
"This module attempts to make using HTML templates simple and natural.
|
||
It extends standard HTML with a few new HTML-esque tags: @code{<TMPL_VAR>},
|
||
@code{<TMPL_LOOP>}, @code{<TMPL_INCLUDE>}, @code{<TMPL_IF>},
|
||
@code{<TMPL_ELSE>} and @code{<TMPL_UNLESS>}. The file written with HTML and
|
||
these new tags is called a template. Using this module you fill in the values
|
||
for the variables, loops and branches declared in the template. This allows
|
||
you to separate design from the data.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-http-body
|
||
(package
|
||
(name "perl-http-body")
|
||
(version "1.22")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/G/GE/GETTY/"
|
||
"HTTP-Body-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"15vj488i62mdp4ps9k77h39prj70i7anb6b0j8nm7l9vbdc2q3gw"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-test-deep" ,perl-test-deep)))
|
||
(propagated-inputs
|
||
`(("perl-file-temp" ,perl-file-temp)
|
||
("perl-http-message" ,perl-http-message))) ;For HTTP::Headers
|
||
(home-page "https://metacpan.org/release/HTTP-Body")
|
||
(synopsis "HTTP Body Parser")
|
||
(description "HTTP::Body parses chunks of HTTP POST data and supports
|
||
application/octet-stream, application/json, application/x-www-form-urlencoded,
|
||
and multipart/form-data.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-http-cookiejar
|
||
(package
|
||
(name "perl-http-cookiejar")
|
||
(version "0.010")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/D/DA/DAGOLDEN/"
|
||
"HTTP-CookieJar-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1l7mqsca4fmls7agzwmp6yq1x16y9jwq4114i6i75n654gl37qsn"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-test-deep" ,perl-test-deep)
|
||
("perl-test-requires" ,perl-test-requires)
|
||
("perl-time-mock" ,perl-time-mock)
|
||
("perl-uri" ,perl-uri)))
|
||
(inputs
|
||
`(("perl-time-local" ,perl-time-local)
|
||
("perl-http-date" ,perl-http-date)))
|
||
(home-page "https://metacpan.org/release/HTTP-CookieJar")
|
||
(synopsis "Minimalist HTTP user agent cookie jar")
|
||
(description "This module implements a minimalist HTTP user agent cookie
|
||
jar in conformance with RFC 6265 <http://tools.ietf.org/html/rfc6265>.")
|
||
(license license:asl2.0)))
|
||
|
||
(define-public perl-http-cookies
|
||
(package
|
||
(name "perl-http-cookies")
|
||
(version "6.06")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/O/OA/OALDERS/HTTP-Cookies-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"13rnz3233vbsfariya4njiyfaj6k94j6bvlyh3dmfmh24hpqgx77"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-http-message" ,perl-http-message)))
|
||
(license license:perl-license)
|
||
(synopsis "Perl HTTP cookie jars")
|
||
(description
|
||
"The HTTP::Cookies class is for objects that represent a cookie jar,
|
||
that is, a database of all the HTTP cookies that a given LWP::UserAgent
|
||
object knows about.")
|
||
(home-page "https://metacpan.org/release/GAAS/HTTP-Cookies-6.01")))
|
||
|
||
(define-public perl-http-daemon
|
||
(package
|
||
(name "perl-http-daemon")
|
||
(version "6.01")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/G/GA/GAAS/HTTP-Daemon-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1hmd2isrkilf0q0nkxms1q64kikjmcw9imbvrjgky6kh89vqdza3"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-http-message" ,perl-http-message)
|
||
("perl-lwp-mediatypes" ,perl-lwp-mediatypes)))
|
||
(license license:perl-license)
|
||
(synopsis "Perl simple http server class")
|
||
(description
|
||
"Instances of the HTTP::Daemon class are HTTP/1.1 servers that listen
|
||
on a socket for incoming requests. The HTTP::Daemon is a subclass of
|
||
IO::Socket::INET, so you can perform socket operations directly on it too.")
|
||
(home-page "https://metacpan.org/release/HTTP-Daemon")))
|
||
|
||
(define-public perl-http-date
|
||
(package
|
||
(name "perl-http-date")
|
||
(version "6.05")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/O/OA/OALDERS/HTTP-Date-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0awjdbz7x0jd5pna55dwxhs3k6xp3sw6b2zg3p2yndxxvya64p9n"))))
|
||
(build-system perl-build-system)
|
||
(license license:perl-license)
|
||
(synopsis "Perl date conversion routines")
|
||
(description
|
||
"The HTTP::Date module provides functions that deal with date formats
|
||
used by the HTTP protocol (and then some more).")
|
||
(home-page "https://metacpan.org/release/HTTP-Date")))
|
||
|
||
(define-public perl-http-lite
|
||
(package
|
||
(name "perl-http-lite")
|
||
(version "2.44")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/N/NE/NEILB/HTTP-Lite-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0z77nflj8zdcfg70kc93glq5kmd6qxn2nf7h70x4xhfg25wkvr1q"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs `(("perl-cgi" ,perl-cgi)))
|
||
(home-page "https://metacpan.org/release/HTTP-Lite")
|
||
(synopsis "Lightweight HTTP implementation")
|
||
(description "@code{HTTP::Lite} is a stand-alone lightweight
|
||
HTTP/1.1 implementation for perl. It is intended for use in
|
||
situations where it is desirable to install the minimal number of
|
||
modules to achieve HTTP support. @code{HTTP::Lite} is ideal for
|
||
CGI (or mod_perl) programs or for bundling for redistribution with
|
||
larger packages where only HTTP GET and POST functionality are
|
||
necessary. @code{HTTP::Lite} is compliant with the Host header,
|
||
necessary for name based virtual hosting, and supports proxies.
|
||
Additionally, @code{HTTP::Lite} supports a callback to allow
|
||
processing of request data as it arrives.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-http-message
|
||
(package
|
||
(name "perl-http-message")
|
||
(version "6.18")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/O/OA/OALDERS/HTTP-Message-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"04lih0fn89jpyk74c4aq1rzq18h8v4zd3x0lik2r9dl8sdqd2q6h"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-try-tiny" ,perl-try-tiny)))
|
||
(propagated-inputs
|
||
`(("perl-encode-locale" ,perl-encode-locale)
|
||
("perl-http-date" ,perl-http-date)
|
||
("perl-io-html" ,perl-io-html)
|
||
("perl-lwp-mediatypes" ,perl-lwp-mediatypes)
|
||
("perl-uri" ,perl-uri)))
|
||
(license license:perl-license)
|
||
(synopsis "Perl HTTP style message")
|
||
(description
|
||
"An HTTP::Message object contains some headers and a content body.")
|
||
(home-page "https://metacpan.org/release/ETHER/HTTP-Message-6.11")))
|
||
|
||
(define-public perl-http-negotiate
|
||
(package
|
||
(name "perl-http-negotiate")
|
||
(version "6.01")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/G/GA/GAAS/HTTP-Negotiate-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"05p053vjs5g91v5cmjnny7a3xzddz5k7vnjw81wfh01ilqg9qwhw"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-http-message" ,perl-http-message)))
|
||
(license license:perl-license)
|
||
(synopsis "Perl http content negotiation")
|
||
(description
|
||
"The HTTP::Negotiate module provides a complete implementation of the
|
||
HTTP content negotiation algorithm specified in
|
||
draft-ietf-http-v11-spec-00.ps chapter 12. Content negotiation allows for
|
||
the selection of a preferred content representation based upon attributes
|
||
of the negotiable variants and the value of the various Accept* header
|
||
fields in the request.")
|
||
(home-page "https://metacpan.org/release/HTTP-Negotiate")))
|
||
|
||
(define-public perl-http-parser
|
||
(package
|
||
(name "perl-http-parser")
|
||
(version "0.06")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/E/ED/EDECA/"
|
||
"HTTP-Parser-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0idwq3jk595xil65lmxz128ha7s3r2n5zknisddpgwnqrghs3igq"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-http-message" ,perl-http-message)
|
||
("perl-uri" ,perl-uri)))
|
||
(home-page "https://metacpan.org/release/HTTP-Parser")
|
||
(synopsis "Parse HTTP/1.1 requests")
|
||
(description "This is an HTTP request parser. It takes chunks of text as
|
||
received and returns a @code{hint} as to what is required, or returns the
|
||
HTTP::Request when a complete request has been read. HTTP/1.1 chunking is
|
||
supported.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-http-parser-xs
|
||
(package
|
||
(name "perl-http-parser-xs")
|
||
(version "0.17")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/K/KA/KAZUHO/"
|
||
"HTTP-Parser-XS-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"02d84xq1mm53c7jl33qyb7v5w4372vydp74z6qj0vc96wcrnhkkr"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)))
|
||
(home-page "https://metacpan.org/release/HTTP-Parser-XS")
|
||
(synopsis "Fast HTTP request parser")
|
||
(description "HTTP::Parser::XS is a fast, primitive HTTP request/response
|
||
parser.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-http-request-ascgi
|
||
(package
|
||
(name "perl-http-request-ascgi")
|
||
(version "1.2")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/F/FL/FLORA/"
|
||
"HTTP-Request-AsCGI-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1smwmiarwcgq7vjdblnb6ldi2x1s5sk5p15p7xvm5byiqq3znnwl"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-class-accessor" ,perl-class-accessor)
|
||
("perl-http-message" ,perl-http-message)))
|
||
(home-page "https://metacpan.org/release/HTTP-Request-AsCGI")
|
||
(synopsis "Set up a CGI environment from an HTTP::Request")
|
||
(description "This module provides a convenient way to set up a CGI
|
||
environment from an HTTP::Request.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-http-server-simple
|
||
(package
|
||
(name "perl-http-server-simple")
|
||
(version "0.52")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/B/BP/BPS/"
|
||
"HTTP-Server-Simple-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0k6bg7k6mjixfzxdkkdrhqvaqmdhjszx0zsk8g0bimiby6j9z4yq"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-cgi" ,perl-cgi)))
|
||
(arguments
|
||
;; See the discussion of a related tests issue at
|
||
;; https://lists.gnu.org/archive/html/guix-devel/2015-01/msg00346.html
|
||
`(#:tests? #f
|
||
|
||
#:phases (modify-phases %standard-phases
|
||
(add-before 'configure 'set-search-path
|
||
(lambda _
|
||
;; Work around "dotless @INC" build failure.
|
||
(setenv "PERL5LIB"
|
||
(string-append (getcwd) ":"
|
||
(getenv "PERL5LIB")))
|
||
#t)))))
|
||
(home-page "https://metacpan.org/release/HTTP-Server-Simple")
|
||
(synopsis "Lightweight HTTP server")
|
||
(description "HTTP::Server::Simple is a simple standalone HTTP daemon with
|
||
no non-core module dependencies. It can be used for building a standalone
|
||
http-based UI to your existing tools.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-http-tiny
|
||
(package
|
||
(name "perl-http-tiny")
|
||
(version "0.076")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/D/DA/DAGOLDEN/"
|
||
"HTTP-Tiny-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"11wkxxqj3ff84rgj9q2gzkdgscwp3fzj205846k9ycqinlpsmgfx"))))
|
||
(build-system perl-build-system)
|
||
(inputs
|
||
`(("perl-http-cookiejar" ,perl-http-cookiejar)
|
||
("perl-io-socket-ip" ,perl-io-socket-ip)
|
||
("perl-io-socket-ssl" ,perl-io-socket-ssl)
|
||
("perl-mozilla-ca" ,perl-mozilla-ca)
|
||
("perl-net-ssleay" ,perl-net-ssleay)))
|
||
(home-page "https://metacpan.org/release/HTTP-Tiny")
|
||
(synopsis "HTTP/1.1 client")
|
||
(description "This is a very simple HTTP/1.1 client, designed for doing
|
||
simple requests without the overhead of a large framework like LWP::UserAgent.
|
||
It supports proxies and redirection. It also correctly resumes after EINTR.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-http-tinyish
|
||
(package
|
||
(name "perl-http-tinyish")
|
||
(version "0.15")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/M/MI/MIYAGAWA/HTTP-Tinyish-"
|
||
version
|
||
".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"199sa722amvwhq0czjfb7psj3hbqmvni5vxkrm579r5943pg0rax"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-file-which" ,perl-file-which)
|
||
("perl-ipc-run3" ,perl-ipc-run3)))
|
||
(home-page "https://metacpan.org/release/HTTP-Tinyish")
|
||
(synopsis "@code{HTTP::Tiny} compatible HTTP client wrappers")
|
||
(description
|
||
"@code{HTTP::Tinyish} is a wrapper module for @acronym{LWP,libwww-perl},
|
||
@code{HTTP::Tiny}, curl and wget.
|
||
|
||
It provides an API compatible to HTTP::Tiny.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-io-html
|
||
(package
|
||
(name "perl-io-html")
|
||
(version "1.00")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/C/CJ/CJM/IO-HTML-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"06nj3a0xgp5jxwxx6ayglfk2v7npf5a7gwkqsjlkapjkybarzqh4"))))
|
||
(build-system perl-build-system)
|
||
(license license:perl-license)
|
||
(synopsis "Perl module to open an HTML file with automatic charset detection")
|
||
(description
|
||
"IO::HTML provides an easy way to open a file containing HTML while
|
||
automatically determining its encoding. It uses the HTML5 encoding sniffing
|
||
algorithm specified in section 8.2.2.1 of the draft standard.")
|
||
(home-page "https://metacpan.org/release/IO-HTML")))
|
||
|
||
(define-public perl-io-socket-ip
|
||
(package
|
||
(name "perl-io-socket-ip")
|
||
(version "0.41")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/P/PE/PEVANS/"
|
||
"IO-Socket-IP-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0ihlpxrkq1xrvhnq52nhghanskic718ch8kpp642afgq72i4b6l4"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs `(("perl-module-build" ,perl-module-build)))
|
||
(home-page "https://metacpan.org/release/IO-Socket-IP")
|
||
(synopsis "Family-neutral IP socket supporting both IPv4 and IPv6")
|
||
(description "This module provides a protocol-independent way to use IPv4
|
||
and IPv6 sockets, intended as a replacement for IO::Socket::INET.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-io-socket-ssl
|
||
(package
|
||
(name "perl-io-socket-ssl")
|
||
(version "2.066")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/S/SU/SULLR/"
|
||
"IO-Socket-SSL-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1kgbws7dwp2hh16qid7169dfkhmcwg7dz9ffbm6k0id5h53hciqd"))
|
||
(patches (search-patches
|
||
"perl-io-socket-ssl-openssl-1.0.2f-fix.patch"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-net-ssleay" ,perl-net-ssleay)
|
||
;; for IDN support
|
||
("perl-uri" ,perl-uri)))
|
||
(synopsis "Nearly transparent SSL encapsulation for IO::Socket::INET")
|
||
(description
|
||
"IO::Socket::SSL makes using SSL/TLS much easier by wrapping the
|
||
necessary functionality into the familiar IO::Socket interface and providing
|
||
secure defaults whenever possible. This way existing applications can be made
|
||
SSL-aware without much effort, at least if you do blocking I/O and don't use
|
||
select or poll.")
|
||
(license license:perl-license)
|
||
(home-page "https://github.com/noxxi/p5-io-socket-ssl")))
|
||
|
||
(define-public perl-libwww
|
||
(package
|
||
(name "perl-libwww")
|
||
(version "6.49")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/O/OA/OALDERS/libwww-perl-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"19k0cg4j4qz005a4ngy48z4r8dc99dxlpq8kvj7qnk15mvgd1r63"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-test-fatal" ,perl-test-fatal)
|
||
("perl-test-needs" ,perl-test-needs)
|
||
("perl-test-requiresinternet" ,perl-test-requiresinternet)))
|
||
(propagated-inputs
|
||
`(("perl-encode-locale" ,perl-encode-locale)
|
||
("perl-file-listing" ,perl-file-listing)
|
||
("perl-html-parser" ,perl-html-parser)
|
||
("perl-http-cookies" ,perl-http-cookies)
|
||
("perl-http-daemon" ,perl-http-daemon)
|
||
("perl-http-date" ,perl-http-date)
|
||
("perl-http-message" ,perl-http-message)
|
||
("perl-http-negotiate" ,perl-http-negotiate)
|
||
("perl-net-http" ,perl-net-http)
|
||
("perl-try-tiny" ,perl-try-tiny)
|
||
("perl-uri" ,perl-uri)
|
||
("perl-www-robotrules" ,perl-www-robotrules)))
|
||
(license license:perl-license)
|
||
(synopsis "Perl modules for the WWW")
|
||
(description
|
||
"The libwww-perl collection is a set of Perl modules which provides a
|
||
simple and consistent application programming interface to the
|
||
World-Wide Web. The main focus of the library is to provide classes
|
||
and functions that allow you to write WWW clients. The library also
|
||
contains modules that are of more general use and even classes that
|
||
help you implement simple HTTP servers.")
|
||
(home-page "https://metacpan.org/release/libwww-perl")))
|
||
|
||
(define-public perl-lwp-online
|
||
(package
|
||
(name "perl-lwp-online")
|
||
(version "1.08")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/A/AD/ADAMK/LWP-Online-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"176f6vbk1018i0y7xj9d406ndbjgwzan2j9nihxnsahzg2vr2vz2"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-libwww" ,perl-libwww)
|
||
("perl-uri" ,perl-uri)))
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)))
|
||
(home-page "https://metacpan.org/release/LWP-Online")
|
||
(synopsis "Checks whether your process has access to the web")
|
||
(description "This module attempts to answer, as accurately as it can, one
|
||
of the nastiest technical questions there is: am I on the internet?
|
||
|
||
A host of networking and security issues make this problem very difficult.
|
||
There are firewalls, proxies (both well behaved and badly behaved). We might
|
||
not have DNS. We might not have a network card at all!")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-lwp-mediatypes
|
||
(package
|
||
(name "perl-lwp-mediatypes")
|
||
(version "6.04")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/O/OA/OALDERS/LWP-MediaTypes-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1n8rg6csv3dsvymg06cmxipimr6cb1g9r903ghm1qsmiv89cl6wg"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-test-fatal" ,perl-test-fatal)))
|
||
(license license:perl-license)
|
||
(synopsis "Perl module to guess the media type for a file or a URL")
|
||
(description
|
||
"The LWP::MediaTypes module provides functions for handling media (also
|
||
known as MIME) types and encodings. The mapping from file extensions to
|
||
media types is defined by the media.types file. If the ~/.media.types file
|
||
exists it is used instead.")
|
||
(home-page "https://metacpan.org/release/LWP-MediaTypes")))
|
||
|
||
(define-public perl-lwp-protocol-https
|
||
(package
|
||
(name "perl-lwp-protocol-https")
|
||
(version "6.09")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/O/OA/OALDERS/"
|
||
"LWP-Protocol-https-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "14pm785cgyrnppks6ccasb2vkqifh0a8fz36nmnhc2v926jy3kqn"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
;; For tests.
|
||
`(("perl-test-requiresinternet" ,perl-test-requiresinternet)))
|
||
(propagated-inputs
|
||
`(("perl-io-socket-ssl" ,perl-io-socket-ssl)
|
||
("perl-libwww" ,perl-libwww)
|
||
;; Users should instead make sure SSL_ca_path is set properly.
|
||
;; ("perl-mozilla-ca" ,perl-mozilla-ca)
|
||
("perl-net-http" ,perl-net-http)))
|
||
(home-page "https://metacpan.org/release/LWP-Protocol-https")
|
||
(synopsis "HTTPS support for LWP::UserAgent")
|
||
(description "The LWP::Protocol::https module provides support for using
|
||
https schemed URLs with LWP.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-lwp-useragent-cached
|
||
(package
|
||
(name "perl-lwp-useragent-cached")
|
||
(version "0.08")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/O/OL/OLEG/"
|
||
"LWP-UserAgent-Cached-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1hw7wy7f82kl61xjwkgmhv1ixgg56dhgfr45wxn6ahc0qys5mkix"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-libwww" ,perl-libwww)))
|
||
(home-page "https://metacpan.org/release/LWP-UserAgent-Cached")
|
||
(synopsis "Simple caching for LWP::UserAgent")
|
||
(description "LWP::UserAgent::Cached is an LWP::UserAgent subclass with
|
||
cache support. It returns responses from the local file system, if available,
|
||
instead of making an HTTP request.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-lwp-useragent-determined
|
||
(package
|
||
(name "perl-lwp-useragent-determined")
|
||
(version "1.07")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/A/AL/ALEXMV/"
|
||
"LWP-UserAgent-Determined-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0lyvbpjng7yfvyha9rp2y2c6liz5hhplmd2grc8jlsfkih7dbn06"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-libwww" ,perl-libwww)))
|
||
(home-page "https://metacpan.org/release/LWP-UserAgent-Determined")
|
||
(synopsis "Virtual browser that retries errors")
|
||
(description "LWP::UserAgent::Determined works just like LWP::UserAgent,
|
||
except that when you use it to get a web page but run into a
|
||
possibly-temporary error (like a DNS lookup timeout), it'll wait a few seconds
|
||
and retry a few times.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-lwpx-paranoidagent
|
||
(package
|
||
(name "perl-lwpx-paranoidagent")
|
||
(version "1.12")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/S/SA/SAXJAZMAN/lwp/LWPx-ParanoidAgent-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0gfhw3jbs25yya2dryv8xvyn9myngcfcmsybj7gkq62fnznil16c"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-libwww" ,perl-libwww)
|
||
;; Users should instead make sure SSL_ca_path is set properly.
|
||
;; ("perl-mozilla-ca" ,perl-mozilla-ca)
|
||
("perl-net-dns" ,perl-net-dns)))
|
||
(home-page "https://metacpan.org/release/LWPx-ParanoidAgent")
|
||
(synopsis "Security enhanced subclass of LWP::UserAgent")
|
||
(description "@code{LWPx::ParanoidAgent} is a class subclassing
|
||
@code{LWP::UserAgent} but paranoid against attackers. Its purpose is
|
||
to vet requests for a remote resource on behalf of a possibly
|
||
malicious user. The class can do the same as @code{LWP::UserAgent},
|
||
except that proxy support has been removed. Support for URI schemes
|
||
is limited to http and https.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-net-amazon-s3
|
||
(package
|
||
(name "perl-net-amazon-s3")
|
||
(version "0.60")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/P/PF/PFIG/"
|
||
"Net-Amazon-S3-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"10dcsq4s2kc9cb1vccx17r187c81drirc3s1hbxh3rb8489kg2b2"))
|
||
(patches (search-patches
|
||
"perl-net-amazon-s3-moose-warning.patch"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-libwww" ,perl-libwww)
|
||
("perl-test-exception" ,perl-test-exception)))
|
||
(propagated-inputs
|
||
`(("perl-data-stream-bulk" ,perl-data-stream-bulk)
|
||
("perl-datetime-format-http" ,perl-datetime-format-http)
|
||
("perl-digest-hmac" ,perl-digest-hmac)
|
||
("perl-digest-md5-file" ,perl-digest-md5-file)
|
||
("perl-file-find-rule" ,perl-file-find-rule)
|
||
("perl-http-date" ,perl-http-date)
|
||
("perl-http-message" ,perl-http-message)
|
||
("perl-lwp-useragent-determined" ,perl-lwp-useragent-determined)
|
||
("perl-mime-types" ,perl-mime-types)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-moosex-strictconstructor" ,perl-moosex-strictconstructor)
|
||
("perl-moosex-types-datetime-morecoercions"
|
||
,perl-moosex-types-datetime-morecoercions)
|
||
("perl-path-class" ,perl-path-class)
|
||
("perl-regexp-common" ,perl-regexp-common)
|
||
("perl-term-encoding" ,perl-term-encoding)
|
||
("perl-term-progressbar-simple" ,perl-term-progressbar-simple)
|
||
("perl-uri" ,perl-uri)
|
||
("perl-xml-libxml" ,perl-xml-libxml)))
|
||
(home-page "https://metacpan.org/release/Net-Amazon-S3")
|
||
(synopsis "Perl interface to Amazon S3")
|
||
(description "This module provides a Perlish interface to Amazon S3.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-net-http
|
||
(package
|
||
(name "perl-net-http")
|
||
(version "6.19")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/O/OA/OALDERS/"
|
||
"Net-HTTP-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1i1gbcwdzx74whn5vn6xbr2cp7frldfz2rfrcjp2qljr770nxdsj"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-io-socket-ssl" ,perl-io-socket-ssl)
|
||
("perl-uri" ,perl-uri)))
|
||
(license license:perl-license)
|
||
(synopsis "Perl low-level HTTP connection (client)")
|
||
(description
|
||
"The Net::HTTP class is a low-level HTTP client. An instance of the
|
||
Net::HTTP class represents a connection to an HTTP server. The HTTP protocol
|
||
is described in RFC 2616. The Net::HTTP class supports HTTP/1.0 and
|
||
HTTP/1.1.")
|
||
(home-page "https://metacpan.org/release/Net-HTTP")))
|
||
|
||
(define-public perl-net-server
|
||
(package
|
||
(name "perl-net-server")
|
||
(version "2.009")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/R/RH/RHANDOM/"
|
||
"Net-Server-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0gw1k9gcw7habbkxvsfa2gz34brlbwcidk6khgsf1qjm0dbccrw2"))))
|
||
(build-system perl-build-system)
|
||
(home-page "https://metacpan.org/release/Net-Server")
|
||
(synopsis "Extensible Perl server engine")
|
||
(description "Net::Server is an extensible, generic Perl server engine.
|
||
It attempts to be a generic server as in Net::Daemon and NetServer::Generic.
|
||
It includes with it the ability to run as an inetd
|
||
process (Net::Server::INET), a single connection server (Net::Server or
|
||
Net::Server::Single), a forking server (Net::Server::Fork), a preforking
|
||
server which maintains a constant number of preforked
|
||
children (Net::Server::PreForkSimple), or as a managed preforking server which
|
||
maintains the number of children based on server load (Net::Server::PreFork).
|
||
In all but the inetd type, the server provides the ability to connect to one
|
||
or to multiple server ports.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-net-smtp-ssl
|
||
(package
|
||
(name "perl-net-smtp-ssl")
|
||
(version "1.04")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/R/RJ/RJBS/"
|
||
"Net-SMTP-SSL-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"001a6dcfahf7kkyirqkc8jd4fh4fkal7n7vm9c4dblqrvmdc8abv"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-io-socket-ssl" ,perl-io-socket-ssl)))
|
||
(home-page "https://metacpan.org/release/Net-SMTP-SSL")
|
||
(synopsis "SSL support for Net::SMTP")
|
||
(description "SSL support for Net::SMTP.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-plack
|
||
(package
|
||
(name "perl-plack")
|
||
(version "1.0033")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/M/MI/MIYAGAWA/"
|
||
"Plack-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"081jg0xddzpg2anmqi9i6d7vs6c8z7k557bf8xl6vgb3h95pin5w"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-test-requires" ,perl-test-requires)
|
||
("perl-file-sharedir-install" ,perl-file-sharedir-install)))
|
||
(propagated-inputs
|
||
`(("perl-apache-logformat-compiler" ,perl-apache-logformat-compiler)
|
||
("perl-devel-stacktrace" ,perl-devel-stacktrace)
|
||
("perl-devel-stacktrace-ashtml" ,perl-devel-stacktrace-ashtml)
|
||
("perl-file-sharedir" ,perl-file-sharedir)
|
||
("perl-hash-multivalue" ,perl-hash-multivalue)
|
||
("perl-http-body" ,perl-http-body)
|
||
("perl-http-message" ,perl-http-message)
|
||
("perl-http-tiny" ,perl-http-tiny)
|
||
("perl-libwww" ,perl-libwww)
|
||
("perl-stream-buffered" ,perl-stream-buffered)
|
||
("perl-test-tcp" ,perl-test-tcp)
|
||
("perl-try-tiny" ,perl-try-tiny)
|
||
("perl-uri" ,perl-uri)))
|
||
(home-page "https://metacpan.org/release/Plack")
|
||
(synopsis "Perl Superglue for Web frameworks and servers (PSGI toolkit)")
|
||
(description "Plack is a set of tools for using the PSGI stack. It
|
||
contains middleware components, a reference server, and utilities for Web
|
||
application frameworks. Plack is like Ruby's Rack or Python's Paste for
|
||
WSGI.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-plack-middleware-deflater
|
||
(package
|
||
(name "perl-plack-middleware-deflater")
|
||
(version "0.12")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/K/KA/KAZEBURO/"
|
||
"Plack-Middleware-Deflater-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0xf2visi16hgwgyp9q0cjr10ikbn474hjia5mj8mb2scvbkrbni8"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)
|
||
("perl-test-requires" ,perl-test-requires)))
|
||
(propagated-inputs
|
||
`(("perl-plack" ,perl-plack)))
|
||
(home-page "https://metacpan.org/release/Plack-Middleware-Deflater")
|
||
(synopsis "Compress response body with Gzip or Deflate")
|
||
(description
|
||
"Plack::Middleware::Deflater is a middleware to encode your response body
|
||
in gzip or deflate, based on \"Accept-Encoding\" HTTP request header. It
|
||
would save the bandwidth a little bit but should increase the Plack server
|
||
load, so ideally you should handle this on the frontend reverse proxy
|
||
servers.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-plack-middleware-fixmissingbodyinredirect
|
||
(package
|
||
(name "perl-plack-middleware-fixmissingbodyinredirect")
|
||
(version "0.12")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/S/SW/SWEETKID/"
|
||
"Plack-Middleware-FixMissingBodyInRedirect-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"14dkrmccq7a5vpymx5dv8032gfcvhsw2i6v5sh3c4ym5ymlx08kc"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-html-parser" ,perl-html-parser) ;for HTML::Entities
|
||
("perl-http-message" ,perl-http-message)
|
||
("perl-plack" ,perl-plack))) ;for Plack::Test
|
||
(home-page
|
||
"https://metacpan.org/release/Plack-Middleware-FixMissingBodyInRedirect")
|
||
(synopsis "Plack::Middleware which sets body for redirect response")
|
||
(description "This module sets the body in redirect response, if it's not
|
||
already set.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-plack-middleware-methodoverride
|
||
(package
|
||
(name "perl-plack-middleware-methodoverride")
|
||
(version "0.20")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/M/MI/MIYAGAWA/"
|
||
"Plack-Middleware-MethodOverride-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1wdmmav3rbhv49zpw311zrxxqmg1fz3f3q9src0ypgs8zcp5myyv"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-build" ,perl-module-build)))
|
||
(propagated-inputs
|
||
`(("perl-plack" ,perl-plack)))
|
||
(home-page "https://metacpan.org/release/Plack-Middleware-MethodOverride")
|
||
(synopsis "Override REST methods to Plack apps via POST")
|
||
(description "This middleware allows for POST requests that pretend to be
|
||
something else: by adding either a header named X-HTTP-Method-Override to the
|
||
request, or a query parameter named x-tunneled-method to the URI, the client
|
||
can say what method it actually meant.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-plack-middleware-removeredundantbody
|
||
(package
|
||
(name "perl-plack-middleware-removeredundantbody")
|
||
(version "0.07")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/S/SW/SWEETKID/"
|
||
"Plack-Middleware-RemoveRedundantBody-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1hz3kgb5vw4r02gfk9i911f5ykvz55lrsx45bdcllk2bszal3f34"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-plack" ,perl-plack)))
|
||
(home-page
|
||
"https://metacpan.org/release/Plack-Middleware-RemoveRedundantBody")
|
||
(synopsis "Plack::Middleware which removes body for HTTP response")
|
||
(description "This module removes the body in an HTTP response if it's not
|
||
required.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-plack-middleware-reverseproxy
|
||
(package
|
||
(name "perl-plack-middleware-reverseproxy")
|
||
(version "0.16")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/M/MI/MIYAGAWA/"
|
||
"Plack-Middleware-ReverseProxy-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0a512n62pnk5ayj3zdzyj50iy1qi8nwh6ygks2h7nrh7gp9k2jc7"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)))
|
||
(propagated-inputs
|
||
`(("perl-plack" ,perl-plack)))
|
||
(home-page "https://metacpan.org/release/Plack-Middleware-ReverseProxy")
|
||
(synopsis "Supports app to run as a reverse proxy backend")
|
||
(description "Plack::Middleware::ReverseProxy resets some HTTP headers,
|
||
which are changed by reverse-proxy. You can specify the reverse proxy address
|
||
and stop fake requests using @code{enable_if} directive in your app.psgi.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-plack-test-externalserver
|
||
(package
|
||
(name "perl-plack-test-externalserver")
|
||
(version "0.02")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/E/ET/ETHER/"
|
||
"Plack-Test-ExternalServer-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1l1yj1l25679x7cbpd27ii7s1f1ajpkspif9xqnl21hczrbmrbsv"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-plack" ,perl-plack)))
|
||
(home-page "https://metacpan.org/release/Plack-Test-ExternalServer")
|
||
(synopsis "Run HTTP tests on external live servers")
|
||
(description "This module allows your to run your Plack::Test tests
|
||
against an external server instead of just against a local application through
|
||
either mocked HTTP or a locally spawned server.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-test-tcp
|
||
(package
|
||
(name "perl-test-tcp")
|
||
(version "2.22")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/M/MI/MIYAGAWA/"
|
||
"Test-TCP-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0mvv9rqwrwlcfh8qrs0s47p85rhlnw15d4gbpyi802bddp0c6lry"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-test-sharedfork" ,perl-test-sharedfork)))
|
||
(arguments `(#:tests? #f)) ;related to signaling in t/05_sigint.t
|
||
(home-page "https://metacpan.org/release/Test-TCP")
|
||
(synopsis "Testing TCP programs")
|
||
(description "Test::TCP is test utilities for TCP/IP programs.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-test-www-mechanize
|
||
(package
|
||
(name "perl-test-www-mechanize")
|
||
(version "1.52")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/P/PE/PETDANCE/"
|
||
"Test-WWW-Mechanize-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1jsywlbxhqw39ij7s8vmgff5vys58vlfaq27072awacnxc65aal4"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-carp-assert-more" ,perl-carp-assert-more)
|
||
("perl-html-form" ,perl-html-form)
|
||
("perl-html-lint" ,perl-html-lint)
|
||
("perl-http-server-simple" ,perl-http-server-simple)
|
||
("perl-libwww" ,perl-libwww)
|
||
("perl-test-longstring" ,perl-test-longstring)
|
||
("perl-www-mechanize" ,perl-www-mechanize)))
|
||
(home-page "https://metacpan.org/release/Test-WWW-Mechanize")
|
||
(synopsis "Testing-specific WWW::Mechanize subclass")
|
||
(description "Test::WWW::Mechanize is a subclass of the Perl module
|
||
WWW::Mechanize that incorporates features for web application testing.")
|
||
(license license:artistic2.0)))
|
||
|
||
(define-public perl-test-www-mechanize-catalyst
|
||
(package
|
||
(name "perl-test-www-mechanize-catalyst")
|
||
(version "0.62")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/M/MS/MSTROUT/"
|
||
"Test-WWW-Mechanize-Catalyst-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1cdc2q16vs6fb335pzaislz2rx1ph9acaxyp7v5hv9xbwwddwfqq"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-catalyst-plugin-session" ,perl-catalyst-plugin-session)
|
||
("perl-catalyst-plugin-session-state-cookie"
|
||
,perl-catalyst-plugin-session-state-cookie)
|
||
("perl-module-install" ,perl-module-install)
|
||
("perl-test-exception" ,perl-test-exception)
|
||
("perl-test-pod" ,perl-test-pod)
|
||
("perl-test-utf8" ,perl-test-utf8)))
|
||
(propagated-inputs
|
||
`(("perl-catalyst-runtime" ,perl-catalyst-runtime)
|
||
("perl-class-load" ,perl-class-load)
|
||
("perl-libwww" ,perl-libwww)
|
||
("perl-moose" ,perl-moose)
|
||
("perl-namespace-clean" ,perl-namespace-clean)
|
||
("perl-test-www-mechanize" ,perl-test-www-mechanize)
|
||
("perl-www-mechanize" ,perl-www-mechanize)))
|
||
(home-page "https://metacpan.org/release/Test-WWW-Mechanize-Catalyst")
|
||
(synopsis "Test::WWW::Mechanize for Catalyst")
|
||
(description "The Test::WWW::Mechanize::Catalyst module meshes the
|
||
Test::WWW:Mechanize module and the Catalyst web application framework to allow
|
||
testing of Catalyst applications without needing to start up a web server.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-test-www-mechanize-psgi
|
||
(package
|
||
(name "perl-test-www-mechanize-psgi")
|
||
(version "0.38")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/O/OA/OALDERS/"
|
||
"Test-WWW-Mechanize-PSGI-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0fsh2i05kf1kfavv2r9kmnjl7qlyqrd11ikc0qcqzzxsqzzjkg9r"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-test-pod" ,perl-test-pod)))
|
||
(propagated-inputs
|
||
`(("perl-plack" ,perl-plack)
|
||
("perl-test-www-mechanize" ,perl-test-www-mechanize)))
|
||
(home-page "https://metacpan.org/release/Test-WWW-Mechanize-PSGI")
|
||
(synopsis "Test PSGI programs using WWW::Mechanize")
|
||
(description "PSGI is a specification to decouple web server environments
|
||
from web application framework code. Test::WWW::Mechanize is a subclass of
|
||
WWW::Mechanize that incorporates features for web application testing. The
|
||
Test::WWW::Mechanize::PSGI module meshes the two to allow easy testing of PSGI
|
||
applications.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-uri
|
||
(package
|
||
(name "perl-uri")
|
||
(version "1.76")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/O/OA/OALDERS/"
|
||
"URI-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0gj1aj18k43kmzc3y1zhj5giinf8rksacf757r475xfna0fqxjdj"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
;; For tests.
|
||
`(("perl-test-needs" ,perl-test-needs)))
|
||
(license license:perl-license)
|
||
(synopsis "Perl Uniform Resource Identifiers (absolute and relative)")
|
||
(description
|
||
"The URI module implements the URI class. Objects of this class
|
||
represent \"Uniform Resource Identifier references\" as specified in RFC 2396
|
||
and updated by RFC 2732.")
|
||
(home-page "https://metacpan.org/release/URI")))
|
||
|
||
(define-public perl-uri-fetch
|
||
(package
|
||
(name "perl-uri-fetch")
|
||
(version "0.13")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/N/NE/NEILB/"
|
||
"URI-Fetch-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0rw6xiqm70s218aii9id3hf8j3pz6n22xnwd8v9m1ff2bnh63c0d"))))
|
||
(build-system perl-build-system)
|
||
(arguments
|
||
`(#:tests? #f)) ; Tests require internet connection to succeed
|
||
(inputs
|
||
`(("perl-class-errorhandler" ,perl-class-errorhandler)
|
||
("perl-libwww" ,perl-libwww)
|
||
("perl-uri" ,perl-uri)))
|
||
(home-page "https://metacpan.org/release/URI-Fetch")
|
||
(synopsis "Smart URI fetching/caching")
|
||
(description "@code{URI::Fetch} is a smart client for fetching HTTP pages,
|
||
notably syndication feeds (RSS, Atom, and others), in an intelligent, bandwidth-
|
||
and time-saving way.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-uri-find
|
||
(package
|
||
(name "perl-uri-find")
|
||
(version "20160806")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/M/MS/MSCHWERN/"
|
||
"URI-Find-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1mk3jv8x0mcq3ajrn9garnxd0jc7sw4pkwqi88r5apqvlljs84z2"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-module-build" ,perl-module-build)))
|
||
(propagated-inputs
|
||
`(("perl-uri" ,perl-uri)))
|
||
(home-page "https://metacpan.org/release/URI-Find")
|
||
(synopsis "Find URIs in arbitrary text")
|
||
(description "This module finds URIs and URLs (according to what URI.pm
|
||
considers a URI) in plain text. It only finds URIs which include a
|
||
scheme (http:// or the like), for something a bit less strict, consider
|
||
URI::Find::Schemeless. For a command-line interface, urifind is provided.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-uri-ws
|
||
(package
|
||
(name "perl-uri-ws")
|
||
(version "0.03")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/P/PL/PLICEASE/"
|
||
"URI-ws-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1vs1wm80sq685944g1l4a0fxcbccc00c0f9648yabdmcf90hwsvf"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-uri" ,perl-uri)))
|
||
(home-page "https://metacpan.org/release/URI-ws")
|
||
(synopsis "WebSocket support for URI package")
|
||
(description "With this module, the URI package provides the same set of
|
||
methods for WebSocket URIs as it does for HTTP URIs.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-uri-template
|
||
(package
|
||
(name "perl-uri-template")
|
||
(version "0.24")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/B/BR/BRICAS/URI-Template-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1phibcmam2hklrddzj79l43va1gcqpyszbw21ynxq53ynmhjvbk8"))))
|
||
(build-system perl-build-system)
|
||
(inputs
|
||
`(("perl-uri" ,perl-uri)))
|
||
(native-inputs
|
||
`(("perl-test-pod-coverage" ,perl-test-pod-coverage)
|
||
("perl-test-pod" ,perl-test-pod)
|
||
("perl-module-install" ,perl-module-install)
|
||
("perl-json" ,perl-json)))
|
||
(home-page "https://metacpan.org/release/URI-Template")
|
||
(synopsis "Object for handling URI templates")
|
||
(description "This perl module provides a wrapper around URI templates as described in
|
||
RFC 6570.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-www-curl
|
||
(package
|
||
(name "perl-www-curl")
|
||
(version "4.17")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/S/SZ/SZBALINT/WWW-Curl-"
|
||
version".tar.gz"))
|
||
(patches (search-patches "perl-www-curl-fix-struct-void.patch"
|
||
"perl-www-curl-remove-symbol.patch"))
|
||
(sha256
|
||
(base32
|
||
"1fmp9aib1kaps9vhs4dwxn7b15kgnlz9f714bxvqsd1j1q8spzsj"))))
|
||
(build-system perl-build-system)
|
||
(arguments
|
||
'(#:tests? #f ;XXX: tests require network access
|
||
#:phases (modify-phases %standard-phases
|
||
(add-before 'configure 'set-search-path
|
||
(lambda _
|
||
;; Work around "dotless @INC" build failure.
|
||
(setenv "PERL5LIB"
|
||
(string-append (getcwd) ":"
|
||
(getenv "PERL5LIB")))
|
||
#t)))))
|
||
(native-inputs
|
||
`(("perl-module-install" ,perl-module-install)))
|
||
(inputs `(("curl" ,curl)))
|
||
(synopsis "Perl extension interface for libcurl")
|
||
(description
|
||
"This is a Perl extension interface for the libcurl file downloading
|
||
library.")
|
||
(license license:perl-license)
|
||
(home-page "https://metacpan.org/release/WWW-Curl")))
|
||
|
||
(define-public perl-www-mechanize
|
||
(package
|
||
(name "perl-www-mechanize")
|
||
(version "1.91")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/O/OA/OALDERS/"
|
||
"WWW-Mechanize-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0cb14m1vhaf0mgn2fqwi5hm72xhfi77hpq2g57swgy0w83x7m27b"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs ;only for tests
|
||
`(("perl-cgi" ,perl-cgi)
|
||
("perl-test-deep" ,perl-test-deep)
|
||
("perl-test-fatal" ,perl-test-fatal)
|
||
("perl-test-output" ,perl-test-output)
|
||
("perl-test-warnings" ,perl-test-warnings)))
|
||
(propagated-inputs
|
||
`(("perl-html-form" ,perl-html-form)
|
||
("perl-html-parser" ,perl-html-parser)
|
||
("perl-html-tree" ,perl-html-tree)
|
||
("perl-http-message" ,perl-http-message)
|
||
("perl-http-server-simple" ,perl-http-server-simple)
|
||
("perl-libwww" ,perl-libwww)
|
||
("perl-test-warn" ,perl-test-warn)
|
||
("perl-uri" ,perl-uri)))
|
||
(home-page "https://metacpan.org/release/WWW-Mechanize")
|
||
(synopsis "Web browsing in a Perl object")
|
||
(description "WWW::Mechanize is a Perl module for stateful programmatic
|
||
web browsing, used for automating interaction with websites.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-www-opensearch
|
||
(package
|
||
(name "perl-www-opensearch")
|
||
(version "0.17")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/B/BR/BRICAS/"
|
||
"WWW-OpenSearch-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1yxplx1q1qk2fvnzqrbk01lz26fy1lyhay51a3ky7q3jgh9p01rb"))))
|
||
(build-system perl-build-system)
|
||
(native-inputs
|
||
`(("perl-class-errorhandler" ,perl-class-errorhandler)
|
||
("perl-datetime" ,perl-datetime)
|
||
("perl-datetime-format-mail" ,perl-datetime-format-mail)
|
||
("perl-datetime-format-w3cdtf" ,perl-datetime-format-w3cdtf)
|
||
("perl-feed-find" ,perl-feed-find)
|
||
("perl-module-install" ,perl-module-install)
|
||
("perl-module-pluggable" ,perl-module-pluggable)
|
||
("perl-uri-fetch" ,perl-uri-fetch)
|
||
("perl-test-simple" ,perl-test-simple)
|
||
("perl-xml-atom" ,perl-xml-atom)
|
||
("perl-xml-rss" ,perl-xml-rss)))
|
||
(inputs
|
||
`(("perl-data-page" ,perl-data-page)
|
||
("perl-libwww" ,perl-libwww)
|
||
("perl-uri" ,perl-uri)
|
||
("perl-uri-template" ,perl-uri-template)
|
||
("perl-xml-feed" ,perl-xml-feed)
|
||
("perl-xml-libxml" ,perl-xml-libxml)))
|
||
(home-page "https://metacpan.org/release/WWW-OpenSearch")
|
||
(synopsis "Search A9 OpenSearch compatible engines")
|
||
(description
|
||
"@code{WWW::OpenSearch} is a module to search @url{A9's OpenSearch,
|
||
http://opensearch.a9.com} compatible search engines.")
|
||
(license license:perl-license)))
|
||
|
||
(define-public perl-www-robotrules
|
||
(package
|
||
(name "perl-www-robotrules")
|
||
(version "6.02")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"mirror://cpan/authors/id/G/GA/GAAS/WWW-RobotRules-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"07m50dp5n5jxv3m93i55qvnd67a6g7cvbvlik115kmc8lbkh5da6"))))
|
||
(build-system perl-build-system)
|
||
(propagated-inputs
|
||
`(("perl-uri" ,perl-uri)))
|
||
(license license:perl-license)
|
||
(synopsis "Perl database of robots.txt-derived permissions")
|
||
(description
|
||
"The WWW::RobotRules module parses /robots.txt files as specified in
|
||
\"A Standard for Robot Exclusion\", at
|
||
<http://www.robotstxt.org/wc/norobots.html>. Webmasters can use the
|
||
/robots.txt file to forbid conforming robots from accessing parts of
|
||
their web site.")
|
||
(home-page "https://metacpan.org/release/WWW-RobotRules")))
|
||
|
||
(define-public python-feedparser
|
||
(package
|
||
(name "python-feedparser")
|
||
(version "5.2.1")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (pypi-uri "feedparser" version ".tar.bz2"))
|
||
(sha256
|
||
(base32
|
||
"00hb4qg2am06g81mygfi1jsbx8830024jm45g6qp9g8fr6am91yf"))))
|
||
(build-system python-build-system)
|
||
(arguments
|
||
'(#:tests? #f))
|
||
(home-page
|
||
"https://github.com/kurtmckee/feedparser")
|
||
(synopsis "Parse feeds in Python")
|
||
(description
|
||
"Universal feed parser which handles RSS 0.9x, RSS 1.0, RSS 2.0,
|
||
CDF, Atom 0.3, and Atom 1.0 feeds.")
|
||
(license (list license:bsd-2 ; source code
|
||
license:freebsd-doc)))) ; documentation
|
||
|
||
(define-public python2-feedparser
|
||
(package-with-python2 python-feedparser))
|
||
|
||
(define-public guix-data-service
|
||
(let ((commit "c596a1c6a90bb2fe07da5339b8dc832b81d94194")
|
||
(revision "21"))
|
||
(package
|
||
(name "guix-data-service")
|
||
(version (string-append "0.0.1-" revision "." (string-take commit 7)))
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://git.savannah.gnu.org/git/guix/data-service.git")
|
||
(commit commit)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"09gn2imhh3aqkzray0xgkz7slriy567inh5lpkxm74bgmx862g3g"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
'(#:modules ((guix build utils)
|
||
(guix build gnu-build-system)
|
||
(ice-9 ftw)
|
||
(ice-9 match)
|
||
(ice-9 rdelim)
|
||
(ice-9 popen))
|
||
#:test-target "check-with-tmp-database"
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'build 'set-GUILE_AUTO_COMPILE
|
||
(lambda _
|
||
;; To avoid warnings relating to 'guild'.
|
||
(setenv "GUILE_AUTO_COMPILE" "0")
|
||
#t))
|
||
(add-after 'install 'wrap-executable
|
||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(bin (string-append out "/bin"))
|
||
(guile (assoc-ref inputs "guile"))
|
||
(guile-effective-version
|
||
(read-line
|
||
(open-pipe* OPEN_READ
|
||
(string-append guile "/bin/guile")
|
||
"-c" "(display (effective-version))")))
|
||
(scm (string-append out "/share/guile/site/"
|
||
guile-effective-version))
|
||
(go (string-append out "/lib/guile/"
|
||
guile-effective-version
|
||
"/site-ccache")))
|
||
(for-each
|
||
(lambda (file)
|
||
(simple-format (current-error-port)
|
||
"wrapping: ~A\n"
|
||
(string-append bin "/" file))
|
||
(wrap-program (string-append bin "/" file)
|
||
`("PATH" ":" prefix
|
||
,(cons*
|
||
bin
|
||
(map (lambda (input)
|
||
(string-append
|
||
(assoc-ref inputs input)
|
||
"/bin"))
|
||
'("ephemeralpg"
|
||
"util-linux"
|
||
"postgresql"))))
|
||
`("GUILE_LOAD_PATH" ":" prefix
|
||
(,scm ,(getenv "GUILE_LOAD_PATH")))
|
||
`("GUILE_LOAD_COMPILED_PATH" ":" prefix
|
||
(,go ,(getenv "GUILE_LOAD_COMPILED_PATH")))))
|
||
(scandir bin
|
||
(match-lambda
|
||
((or "." "..") #f)
|
||
(_ #t))))
|
||
#t)))
|
||
(delete 'strip)))) ; As the .go files aren't compatible
|
||
(inputs
|
||
`(("guix" ,guile3.0-guix)
|
||
("guile-fibers" ,guile3.0-fibers)
|
||
("guile-json" ,guile3.0-json)
|
||
("guile-email" ,guile3.0-email)
|
||
("guile-prometheus" ,guile-prometheus)
|
||
("guile-squee" ,guile3.0-squee)
|
||
("ephemeralpg" ,ephemeralpg)
|
||
("util-linux" ,util-linux)
|
||
("postgresql" ,postgresql-11)
|
||
("sqitch" ,sqitch)))
|
||
(native-inputs
|
||
`(("guile" ,@(assoc-ref (package-native-inputs guix) "guile"))
|
||
("autoconf" ,autoconf)
|
||
("automake" ,automake)
|
||
("emacs-minimal" ,emacs-minimal)
|
||
("emacs-htmlize" ,emacs-htmlize)
|
||
("pkg-config" ,pkg-config)))
|
||
(synopsis "Store and provide data about GNU Guix")
|
||
(description
|
||
"The Guix Data Service stores data about GNU Guix, and provides this
|
||
through a web interface. It supports listening to the guix-commits mailing
|
||
list to find out about new revisions, then loads the data from these in to a
|
||
PostgreSQL database.")
|
||
(home-page "http://data.guix.gnu.org/")
|
||
(license license:agpl3+))))
|
||
|
||
(define-public gumbo-parser
|
||
(package
|
||
(name "gumbo-parser")
|
||
(version "0.10.1")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/google/gumbo-parser")
|
||
(commit (string-append "v" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"0xslckwdh2i0g2qjsb6rnm8mjmbagvziz0hjlf7d1lbljfms1iw1"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:tests? #f)) ;tests require bundling googletest sources
|
||
;; The release tarball lacks the generated files.
|
||
(native-inputs
|
||
`(("autoconf" ,autoconf)
|
||
("automake" ,automake)
|
||
("libtool" ,libtool)))
|
||
(home-page "https://github.com/google/gumbo-parser")
|
||
(synopsis "HTML5 parsing library")
|
||
(description
|
||
"Gumbo is an implementation of the HTML5 parsing algorithm implemented as
|
||
a pure C99 library.")
|
||
(license license:asl2.0)))
|
||
|
||
(define-public uwsgi
|
||
(package
|
||
(name "uwsgi")
|
||
(version "2.0.18")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://projects.unbit.it/downloads/uwsgi-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"10zmk4npknigmbqcq1wmhd461dk93159px172112vyq0i19sqwj9"))))
|
||
(build-system gnu-build-system)
|
||
(outputs '("out" "python"))
|
||
(arguments
|
||
'(;; XXX: The 'check' target runs cppcheck to do static code analysis.
|
||
;; But there is no obvious way to run the real tests.
|
||
#:tests? #f
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(replace 'configure
|
||
;; Configuration is done by writing an ini file.
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(bindir (string-append out "/bin"))
|
||
(plugindir (string-append out "/lib/uwsgi")))
|
||
;; The build phase outputs files to these directories directly.
|
||
(mkdir-p bindir)
|
||
(mkdir-p plugindir)
|
||
;; XXX: Enable other plugins.
|
||
(call-with-output-file "buildconf/guix.ini"
|
||
(lambda (port)
|
||
(format port "[uwsgi]
|
||
yaml = libyaml
|
||
bin_name = ~a/uwsgi
|
||
plugin_dir = ~a
|
||
|
||
inherit = base
|
||
plugins = cgi,python
|
||
embedded_plugins =
|
||
" bindir plugindir))))
|
||
(setenv "PROFILE" "guix")
|
||
#t))
|
||
(replace 'install
|
||
;; Move plugins into their own output.
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(plugindir (string-append out "/lib/uwsgi"))
|
||
(python-plugin (string-append
|
||
plugindir "/python_plugin.so")))
|
||
(install-file python-plugin
|
||
(string-append
|
||
(assoc-ref outputs "python") "/lib/uwsgi"))
|
||
(delete-file python-plugin)
|
||
#t))))))
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)
|
||
("python" ,python-wrapper)))
|
||
(inputs
|
||
`(("jansson" ,jansson)
|
||
("libxml2" ,libxml2)
|
||
("libyaml" ,libyaml)
|
||
("openssl" ,openssl)
|
||
("pcre" ,pcre)
|
||
("zlib" ,zlib)
|
||
;; For plugins.
|
||
("python" ,python)))
|
||
(home-page "https://uwsgi-docs.readthedocs.org/")
|
||
(synopsis "Application container server")
|
||
(description
|
||
"uWSGI presents a complete stack for networked/clustered web applications,
|
||
implementing message/object passing, caching, RPC and process management.
|
||
It uses the uwsgi protocol for all the networking/interprocess communications.")
|
||
(license license:gpl2+))) ; with linking exception
|
||
|
||
(define-public jq
|
||
(package
|
||
(name "jq")
|
||
(version "1.6")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://github.com/stedolan/jq"
|
||
"/releases/download/jq-" version
|
||
"/jq-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0wmapfskhzfwranf6515nzmm84r7kwljgfs7dg6bjgxakbicis2x"))
|
||
(modules '((guix build utils)))
|
||
(snippet
|
||
'(begin
|
||
;; Remove bundled onigurama.
|
||
(delete-file-recursively "modules")
|
||
#t))))
|
||
(inputs
|
||
`(("oniguruma" ,oniguruma)))
|
||
(native-inputs
|
||
`(;; TODO fix gems to generate documentation
|
||
;;("ruby" ,ruby)
|
||
;;("bundler" ,bundler)
|
||
("valgrind" ,valgrind)))
|
||
(build-system gnu-build-system)
|
||
(home-page "https://stedolan.github.io/jq/")
|
||
(synopsis "Command-line JSON processor")
|
||
(description "jq is like sed for JSON data – you can use it to slice and
|
||
filter and map and transform structured data with the same ease that sed, awk,
|
||
grep and friends let you play with text. It is written in portable C. jq can
|
||
mangle the data format that you have into the one that you want with very
|
||
little effort, and the program to do so is often shorter and simpler than
|
||
you'd expect.")
|
||
(license (list license:expat license:cc-by3.0))))
|
||
|
||
(define-public uhttpmock
|
||
(package
|
||
(name "uhttpmock")
|
||
(version "0.5.3")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://tecnocode.co.uk/downloads/uhttpmock/"
|
||
"uhttpmock-" version ".tar.xz"))
|
||
(sha256
|
||
(base32 "0bqizz69hxk8rn4z57asz1d45vizl1rj6i5k3rzxn2x3qcik514h"))))
|
||
(build-system glib-or-gtk-build-system)
|
||
(native-inputs
|
||
`(("gobject-introspection" ,gobject-introspection)
|
||
;; For check phase.
|
||
("glib-networking" ,glib-networking)
|
||
("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
|
||
("pkg-config" ,pkg-config)))
|
||
(inputs
|
||
`(("libsoup" ,libsoup)))
|
||
(home-page "https://gitlab.com/groups/uhttpmock")
|
||
(synopsis "Library for mocking web service APIs which use HTTP or HTTPS")
|
||
(description
|
||
"Uhttpmock is a project for mocking web service APIs which use HTTP or
|
||
HTTPS. It provides a library, libuhttpmock, which implements recording and
|
||
playback of HTTP request/response traces.")
|
||
(license license:lgpl2.1+)))
|
||
|
||
(define-public woof
|
||
(package
|
||
(name "woof")
|
||
(version "2012-05-31")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"http://www.home.unix-ag.org/simon/woof-"
|
||
version ".py"))
|
||
(sha256
|
||
(base32
|
||
"0wjmjhpg6xlid33yi59j47q2qadz20sijrqsjahj30vngz856hyq"))))
|
||
(build-system trivial-build-system)
|
||
(arguments
|
||
'(#:modules ((guix build utils))
|
||
#:builder
|
||
(begin
|
||
(use-modules (guix build utils))
|
||
(let* ((source (assoc-ref %build-inputs "source"))
|
||
(out (assoc-ref %outputs "out"))
|
||
(bin (string-append out "/bin"))
|
||
(python (assoc-ref %build-inputs "python")))
|
||
(mkdir-p bin)
|
||
(with-directory-excursion bin
|
||
(copy-file source "woof")
|
||
(patch-shebang "woof" (list (string-append python "/bin")))
|
||
(chmod "woof" #o555))
|
||
#t))))
|
||
(inputs `(("python" ,python-2)))
|
||
(home-page "http://www.home.unix-ag.org/simon/woof.html")
|
||
(synopsis "Single file web server")
|
||
(description "Woof (Web Offer One File) is a small simple web server that
|
||
can easily be invoked on a single file. Your partner can access the file with
|
||
tools they trust (e.g. wget).")
|
||
(license license:gpl2+)))
|
||
|
||
(define netsurf-buildsystem
|
||
(package
|
||
(name "netsurf-buildsystem")
|
||
(version "1.9")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
"buildsystem-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0alsmaig9ln8dgllb3z63gq90fiz75jz0ic71fi0k0k898qix14k"))))
|
||
(build-system gnu-build-system)
|
||
(inputs `(("perl" ,perl)))
|
||
(arguments
|
||
'(#:make-flags (list (string-append "PREFIX=" %output))
|
||
#:tests? #f ;no tests
|
||
#:phases (modify-phases %standard-phases
|
||
(delete 'configure)
|
||
(delete 'build))))
|
||
(home-page "https://www.netsurf-browser.org")
|
||
(synopsis "Build system for the Netsurf project")
|
||
(description
|
||
"This package provides the shared build system for Netsurf project
|
||
libraries.")
|
||
(license license:expat)))
|
||
|
||
(define netsurf-buildsystem-arguments
|
||
`(#:make-flags `("COMPONENT_TYPE=lib-shared"
|
||
"CC=gcc" "BUILD_CC=gcc"
|
||
,(string-append "PREFIX=" %output)
|
||
,(string-append "NSSHARED="
|
||
(assoc-ref %build-inputs
|
||
"netsurf-buildsystem")
|
||
"/share/netsurf-buildsystem"))
|
||
#:test-target "test"
|
||
#:phases (modify-phases %standard-phases
|
||
(delete 'configure))))
|
||
|
||
(define-public libparserutils
|
||
(package
|
||
(name "libparserutils")
|
||
(version "0.2.4")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
name "-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1n2794y2l0c8nv8z2pxwfnbn882987ifmxjv60zdxkhcndhswarj"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)
|
||
("pkg-config" ,pkg-config)
|
||
("perl" ,perl))) ;for test harness
|
||
(arguments netsurf-buildsystem-arguments)
|
||
(home-page "https://www.netsurf-browser.org/projects/libparserutils/")
|
||
(synopsis "Parser building library")
|
||
(description
|
||
"LibParserUtils is a library for building efficient parsers, written in
|
||
C. It is developed as part of the NetSurf project.")
|
||
(license license:expat)))
|
||
|
||
(define-public hubbub
|
||
(package
|
||
(name "hubbub")
|
||
(version "0.3.7")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
"libhubbub-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1dimfyblmym98qa1b80c5jslv2zk8r44xbdrgrsrw1n9wr9y4yly"))
|
||
(patches (search-patches "hubbub-sort-entities.patch"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)
|
||
("pkg-config" ,pkg-config)
|
||
("doxygen" ,doxygen)
|
||
("json-c" ,json-c-0.12) ; check whether json-c-0.12 can be removed
|
||
("perl" ,perl)))
|
||
(propagated-inputs
|
||
`(("libparserutils" ,libparserutils))) ;for libhubbub.pc
|
||
(arguments netsurf-buildsystem-arguments)
|
||
(home-page "https://www.netsurf-browser.org/projects/hubbub/")
|
||
(synopsis "HTML5 compliant parsing library")
|
||
(description
|
||
"Hubbub is an HTML5 compliant parsing library, written in C, which can
|
||
parse both valid and invalid web content. It is developed as part of the
|
||
NetSurf project.")
|
||
(license license:expat)))
|
||
|
||
(define-public ikiwiki
|
||
(package
|
||
(name "ikiwiki")
|
||
(version "3.20200202.3")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "git://git.ikiwiki.info/")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"0fphyqzlk9y8v9s89ypsmrnbhyymzrpc2w0liy0n4knc7kk2pabq"))
|
||
(snippet
|
||
'(begin
|
||
;; The POT file requires write permission during the build
|
||
;; phase.
|
||
(chmod "po/ikiwiki.pot" #o644)
|
||
#t))))
|
||
(build-system perl-build-system)
|
||
(arguments
|
||
`(#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'patch-source-shebangs 'patch-Makefiles
|
||
(lambda _
|
||
(substitute* "Makefile.PL"
|
||
(("SYSCONFDIR\\?=") "SYSCONFDIR?=$(PREFIX)"))
|
||
(with-directory-excursion "po"
|
||
(substitute* "Makefile"
|
||
(("PERL5LIB=") "PERL5LIB=${PERL5LIB}:")))
|
||
#t))
|
||
(add-before 'build 'set-modification-times
|
||
;; The wiki '--refresh' steps, which are executed during
|
||
;; the check phase, require recent timestamps on files in
|
||
;; the 'doc' and 'underlays' directories.
|
||
(lambda _
|
||
(invoke "find" "doc" "underlays" "-type" "f" "-exec"
|
||
"touch" "{}" "+")
|
||
#t))
|
||
(add-before 'check 'pre-check
|
||
(lambda* (#:key inputs #:allow-other-keys)
|
||
;; Six tests use IPC::Run. For these tests the PERL5LIB
|
||
;; variable is needed in the runtime environment and also
|
||
;; in the search path list in the setup file.
|
||
(substitute*
|
||
'("t/aggregate-file.t" "t/git-cgi.t" "t/git-untrusted.t"
|
||
"t/passwordauth.t" "t/relativity.t" "t/wrapper-environ.t")
|
||
(("(.*)\"perl\"(.*)$" _ prefix suffix)
|
||
(string-append prefix "qw(env), 'PERL5LIB='.$ENV{PERL5LIB}"
|
||
", qw(perl)" suffix))
|
||
(("(.*) PERL5LIB=(.*) perl(.*)$" _ prefix middle suffix)
|
||
(string-append prefix "), 'PERL5LIB='.$ENV{PERL5LIB}.':"
|
||
middle "', qw(perl" suffix))
|
||
(("(.*)setup(.* )getcwd(.*)$" _ prefix middle suffix)
|
||
(string-append prefix "setup" middle
|
||
"$ENV{PERL5LIB}.':'.getcwd" suffix))
|
||
(("^ENV(.*): '(.*)$" _ middle suffix)
|
||
(string-append "ENV" middle
|
||
": '$ENV{PERL5LIB}:" suffix)))
|
||
;; XDG_DATA_DIRS is needed by the podcast.t test.
|
||
(setenv "XDG_DATA_DIRS"
|
||
(string-append (assoc-ref inputs "shared-mime-info")
|
||
"/share"))
|
||
;; CC is needed by IkiWiki/Wrapper.pm.
|
||
(setenv "CC" "gcc")
|
||
#t))
|
||
(add-after 'install 'wrap-programs
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(bin (string-append out "/bin/"))
|
||
(path (getenv "PERL5LIB")))
|
||
(for-each (lambda (file)
|
||
(wrap-program file
|
||
`("PERL5LIB" ":" prefix (,path))))
|
||
(find-files bin))
|
||
#t))))))
|
||
(native-inputs
|
||
`(("which" ,which)
|
||
("gettext" ,gettext-minimal)
|
||
("subversion" ,subversion)
|
||
("git" ,git)
|
||
("bazaar" ,bazaar)
|
||
("cvs" ,cvs)
|
||
("mercurial" ,mercurial)))
|
||
(inputs
|
||
`(("python" ,python-wrapper)
|
||
("perl-authen-passphrase" ,perl-authen-passphrase)
|
||
("perl-cgi-simple" ,perl-cgi-simple)
|
||
("perl-db-file" ,perl-db-file)
|
||
("perl-file-mimeinfo" ,perl-file-mimeinfo)
|
||
("perl-html-tagset" ,perl-html-tagset)
|
||
("perl-image-magick" ,perl-image-magick)
|
||
("perl-ipc-run" ,perl-ipc-run)
|
||
("perl-lwpx-paranoidagent" ,perl-lwpx-paranoidagent)
|
||
("perl-xml-feed" ,perl-xml-feed)
|
||
("perl-xml-sax" ,perl-xml-sax)
|
||
("perl-xml-twig" ,perl-xml-twig)
|
||
("po4a" ,po4a)))
|
||
(propagated-inputs
|
||
`(("perl-cgi-formbuilder" ,perl-cgi-formbuilder)
|
||
("perl-cgi-session" ,perl-cgi-session)
|
||
("perl-html-parser" ,perl-html-parser)
|
||
("perl-html-scrubber" ,perl-html-scrubber)
|
||
("perl-html-template" ,perl-html-template)
|
||
("perl-json" ,perl-json)
|
||
("perl-mail-sendmail" ,perl-mail-sendmail)
|
||
("perl-text-markdown-discount" ,perl-text-markdown-discount)
|
||
("perl-timedate" ,perl-timedate)
|
||
("perl-uri" ,perl-uri)
|
||
("perl-xml-simple" ,perl-xml-simple)
|
||
("perl-yaml-libyaml" ,perl-yaml-libyaml)))
|
||
(home-page "https://ikiwiki.info/")
|
||
(synopsis "Wiki compiler, capable of generating HTML")
|
||
(description
|
||
"Ikiwiki is a wiki compiler, capable of generating a static set of web
|
||
pages, but also incorporating dynamic features like a web based editor and
|
||
commenting.")
|
||
(license license:gpl2+)))
|
||
|
||
(define-public libwapcaplet
|
||
(package
|
||
(name "libwapcaplet")
|
||
(version "0.4.3")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
"libwapcaplet-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0p0c2q9lsj4vs97aa7vjllfhw33zv3dpysdkjblzhib6dpfs2alv"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)
|
||
("pkg-config" ,pkg-config)
|
||
("check" ,check-0.14))) ;for tests
|
||
(arguments netsurf-buildsystem-arguments)
|
||
(home-page "https://www.netsurf-browser.org/projects/libwapcaplet/")
|
||
(synopsis "String internment library")
|
||
(description
|
||
"LibWapcaplet provides a reference counted string internment system
|
||
designed to store small strings and allow rapid comparison of them. It is
|
||
developed as part of the Netsurf project.")
|
||
(license license:expat)))
|
||
|
||
(define-public libcss
|
||
(package
|
||
(name "libcss")
|
||
(version "0.9.1")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
"libcss-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1p66sdiiqm7w4jkq23hsf08khsnmq93hshh9f9m8sbirjdpf3p6j"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)
|
||
("pkg-config" ,pkg-config)
|
||
("perl" ,perl)))
|
||
(propagated-inputs ;needed for libcss.pc
|
||
`(("libparserutils" ,libparserutils)
|
||
("libwapcaplet" ,libwapcaplet)))
|
||
(arguments netsurf-buildsystem-arguments)
|
||
(home-page "https://www.netsurf-browser.org/projects/libcss/")
|
||
(synopsis "CSS parser and selection library")
|
||
(description
|
||
"LibCSS is a CSS (Cascading Style Sheet) parser and selection engine,
|
||
written in C. It is developed as part of the NetSurf project.")
|
||
(license license:expat)))
|
||
|
||
(define-public libcyaml
|
||
(package
|
||
(name "libcyaml")
|
||
(version "1.1.0")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/tlsa/libcyaml")
|
||
(commit (string-append "v" version))))
|
||
(file-name (git-file-name name version))
|
||
(patches (search-patches "libcyaml-libyaml-compat.patch"))
|
||
(sha256
|
||
(base32 "0428p0rwq71nhh5nzcbapsbrjxa0x5l6h6ns32nxv7j624f0zd93"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:make-flags
|
||
(list (string-append "PREFIX=" (assoc-ref %outputs "out"))
|
||
(string-append "CC=gcc"))
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(delete 'configure) ; no configure script
|
||
(replace 'check
|
||
(lambda _
|
||
(setenv "CC" "gcc")
|
||
(invoke "make" "test"))))))
|
||
(inputs
|
||
`(("libyaml" ,libyaml)))
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)))
|
||
(synopsis "C library for reading and writing YAML")
|
||
(description
|
||
"LibCYAML is a C library written in ISO C11 for reading and writing
|
||
structured YAML documents. The fundamental idea behind CYAML is to allow
|
||
applications to construct schemas which describe both the permissible
|
||
structure of the YAML documents to read/write, and the C data structure(s)
|
||
in which the loaded data is arranged in memory.")
|
||
(home-page "https://github.com/tlsa/libcyaml")
|
||
(license license:isc)))
|
||
|
||
(define-public libdom
|
||
(package
|
||
(name "libdom")
|
||
(version "0.4.1")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
"libdom-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0jpg5hx3y0mdxk5szd47dyijqimd2321brbqk2620pp5f4j0gvlq"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)
|
||
("pkg-config" ,pkg-config)
|
||
("perl" ,perl) ;for test harness
|
||
("perl-libxml" ,perl-libxml)
|
||
("perl-switch" ,perl-switch)
|
||
("perl-xml-xpath" ,perl-xml-xpath)))
|
||
(inputs
|
||
`(("libparserutils" ,libparserutils)
|
||
("libwapcaplet" ,libwapcaplet)))
|
||
(propagated-inputs
|
||
`(("expat" ,expat) ;needed for headers and linking
|
||
("hubbub" ,hubbub))) ;for libdom.pc
|
||
(arguments
|
||
`(#:tests? #f ;TODO: re-enable. tests take a looong time.
|
||
,@netsurf-buildsystem-arguments))
|
||
(home-page "https://www.netsurf-browser.org/projects/libdom/")
|
||
(synopsis "Implementation of the W3C DOM")
|
||
(description
|
||
"LibDOM is an implementation of the W3C DOM, written in C. It is
|
||
developed as part of the NetSurf project.")
|
||
(license license:expat)))
|
||
|
||
(define-public libsvgtiny
|
||
(package
|
||
(name "libsvgtiny")
|
||
(version "0.1.7")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
name "-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"10bpkmvfpydj74im3r6kqm9vnvgib6afy0alx71q5n0w5yawy39c"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)
|
||
("pkg-config" ,pkg-config)
|
||
("gperf" ,gperf-3.0)))
|
||
(inputs
|
||
`(("libwapcaplet" ,libwapcaplet)))
|
||
(propagated-inputs
|
||
`(("libdom" ,libdom))) ;for libsvgtiny.pc
|
||
(arguments netsurf-buildsystem-arguments)
|
||
(home-page "https://www.netsurf-browser.org/projects/libsvgtiny/")
|
||
(synopsis "Library for parsing SVG files")
|
||
(description
|
||
"Libsvgtiny takes some SVG as input and returns a list of paths and texts
|
||
which can be rendered easily, as defined in
|
||
@url{http://www.w3.org/TR/SVGMobile/}. It is developed as part of the NetSurf
|
||
project.")
|
||
(license license:expat)))
|
||
|
||
(define-public libnsbmp
|
||
(package
|
||
(name "libnsbmp")
|
||
(version "0.1.6")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
name "-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0krjg69a2amxjsahdgm3wmy9ngnyr3gfs2a1zhdlbvb0z1jr7i3r"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)))
|
||
(arguments netsurf-buildsystem-arguments)
|
||
(home-page "https://www.netsurf-browser.org/projects/libnsbmp/")
|
||
(synopsis "Decoding library for BMP and ICO files")
|
||
(description
|
||
"Libnsbmp is a decoding library for BMP and ICO image file formats,
|
||
written in C. It is developed as part of the NetSurf project.")
|
||
(license license:expat)))
|
||
|
||
(define-public libnsgif
|
||
(package
|
||
(name "libnsgif")
|
||
(version "0.2.1")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
name "-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0jwshypgmx16xlsbx3d8njk8a5khazlplca5mxd3rdbhrlsabbly"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)))
|
||
(arguments netsurf-buildsystem-arguments)
|
||
(home-page "https://www.netsurf-browser.org/projects/libnsgif/")
|
||
(synopsis "Decoding library for GIF files")
|
||
(description
|
||
"Libnsgif is a decoding library for the GIF image file format, written in
|
||
C. It is developed as part of the NetSurf project.")
|
||
(license license:expat)))
|
||
|
||
(define-public libnslog
|
||
(package
|
||
(name "libnslog")
|
||
(version "0.1.3")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
"libnslog-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1l2k0kdv9iv18svhv360vszjavhl4g09cp8a8yb719pgsylxr67w"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)
|
||
("pkg-config" ,pkg-config)
|
||
("check" ,check) ; For tests
|
||
("bison" ,bison)
|
||
("flex" ,flex)))
|
||
(arguments netsurf-buildsystem-arguments)
|
||
(home-page "https://www.netsurf-browser.org/")
|
||
(synopsis "Logging library")
|
||
(description
|
||
"Libnslog provides a category-based logging library which supports
|
||
complex logging filters, multiple log levels, and provides context through to
|
||
client applications. It is developed as part of the NetSurf project.")
|
||
(license license:expat)))
|
||
|
||
(define-public libnsutils
|
||
(package
|
||
(name "libnsutils")
|
||
(version "0.1.0")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
name "-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1w5fyy2i60a3v3if3iqcn9sy9sycx6966rcx53v85gja6hb6a33r"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)))
|
||
(arguments netsurf-buildsystem-arguments)
|
||
(home-page "https://www.netsurf-browser.org/")
|
||
(synopsis "Utility library for NetSurf")
|
||
(description
|
||
"Libnsutils provides a small number of useful utility routines. It is
|
||
developed as part of the NetSurf project.")
|
||
(license license:expat)))
|
||
|
||
(define-public libnspsl
|
||
(package
|
||
(name "libnspsl")
|
||
(version "0.1.6")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
"libnspsl-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"02q28n5i6fwqcz1nn167rb71k1q95mx38mfah6zi1lvqrc2q5ifk"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)))
|
||
(arguments netsurf-buildsystem-arguments)
|
||
(home-page "https://www.netsurf-browser.org/")
|
||
(synopsis "Library to generate a static Public Suffix List")
|
||
(description
|
||
"Libnspsl is a library to generate a static code representation of the
|
||
Public Suffix List. It is developed as part of the NetSurf project.")
|
||
(license license:expat)))
|
||
|
||
(define-public nsgenbind
|
||
(package
|
||
(name "nsgenbind")
|
||
(version "0.8")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/libs/releases/"
|
||
"nsgenbind-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1cqwgwca49jvmijwiyaab2bwxicgxdrnlpinf8kp3nha02nm73ad"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)
|
||
("bison" ,bison)
|
||
("flex" ,flex)))
|
||
(arguments
|
||
(substitute-keyword-arguments netsurf-buildsystem-arguments
|
||
((#:make-flags flags)
|
||
`(delete "COMPONENT_TYPE=lib-shared" ,flags))))
|
||
(home-page "https://www.netsurf-browser.org/")
|
||
(synopsis "Generate JavaScript to DOM bindings")
|
||
(description
|
||
"@code{nsgenbind} is a tool to generate JavaScript to DOM bindings from
|
||
w3c webidl files and a binding configuration file.")
|
||
(license license:expat)))
|
||
|
||
(define-public netsurf
|
||
(package
|
||
(name "netsurf")
|
||
(version "3.10")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://download.netsurf-browser.org/netsurf/"
|
||
"releases/source/netsurf-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0plra64c5xyiw12yx2q13brxsv8apmany97zqa2lcqckw4ll8j1n"))
|
||
(patches (search-patches "netsurf-system-utf8proc.patch"
|
||
"netsurf-y2038-tests.patch"
|
||
"netsurf-longer-test-timeout.patch"
|
||
"netsurf-message-timestamp.patch"))))
|
||
(build-system glib-or-gtk-build-system)
|
||
(native-inputs
|
||
`(("netsurf-buildsystem" ,netsurf-buildsystem)
|
||
("nsgenbind" ,nsgenbind)
|
||
("libidn" ,libidn) ;only for tests
|
||
("check" ,check)
|
||
("perl" ,perl)
|
||
("perl-html-parser" ,perl-html-parser)
|
||
("pkg-config" ,pkg-config)
|
||
("xxd" ,xxd)))
|
||
(inputs
|
||
`(("curl" ,curl)
|
||
("gtk+" ,gtk+)
|
||
("openssl" ,openssl)
|
||
("utf8proc" ,utf8proc)
|
||
("libpng" ,libpng)
|
||
("libjpeg" ,libjpeg-turbo)
|
||
("libcss" ,libcss)
|
||
("libdom" ,libdom)
|
||
("libnsbmp" ,libnsbmp)
|
||
("libnsgif" ,libnsgif)
|
||
("libnslog" ,libnslog)
|
||
("libnspsl" ,libnspsl)
|
||
("libnsutils" ,libnsutils)
|
||
("libsvgtiny" ,libsvgtiny)
|
||
("miscfiles" ,miscfiles)))
|
||
(arguments
|
||
`(#:make-flags `("CC=gcc" "BUILD_CC=gcc"
|
||
"TARGET=gtk3"
|
||
,(string-append "PREFIX=" %output)
|
||
,(string-append "NSSHARED="
|
||
(assoc-ref %build-inputs
|
||
"netsurf-buildsystem")
|
||
"/share/netsurf-buildsystem"))
|
||
#:test-target "test"
|
||
#:modules ((ice-9 rdelim)
|
||
(ice-9 match)
|
||
(srfi srfi-1)
|
||
(sxml simple)
|
||
,@%glib-or-gtk-build-system-modules)
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(delete 'configure)
|
||
(add-after 'build 'adjust-welcome
|
||
(lambda _
|
||
(substitute* "frontends/gtk/res/welcome.html"
|
||
;; Close some XHTML tags.
|
||
(("<(img|input)([^>]*)>" _ tag contents)
|
||
(string-append "<" tag contents " />"))
|
||
;; Increase freedom.
|
||
((" open source") ", free software")
|
||
;; Prefer a more privacy-respecting default search engine.
|
||
(("www.google.co.uk") "www.duckduckgo.com/html")
|
||
(("Google Search") "DuckDuckGo Search")
|
||
(("name=\"btnG\"") ""))
|
||
;; Remove default links so it doesn't seem we're endorsing them.
|
||
(with-atomic-file-replacement "frontends/gtk/res/welcome.html"
|
||
(lambda (in out)
|
||
;; Leave the DOCTYPE header as is.
|
||
(display (read-line in 'concat) out)
|
||
(sxml->xml
|
||
(let rec ((sxml (xml->sxml in
|
||
#:default-entity-handler
|
||
(lambda (port name)
|
||
(string-append "<ENTITY>"
|
||
(symbol->string name)
|
||
"</ENTITY>")))))
|
||
;; We'd like to use sxml-match here, but it can't
|
||
;; match against generic tag symbols...
|
||
(match sxml
|
||
(`(div (@ (class "links")) . ,rest)
|
||
'())
|
||
(`(ENTITY ,ent)
|
||
`(*ENTITY* ,ent))
|
||
((x ...)
|
||
(map rec x))
|
||
(x x)))
|
||
out)))
|
||
#t))
|
||
(add-before 'check 'patch-check
|
||
(lambda* (#:key inputs #:allow-other-keys)
|
||
(substitute* '("test/bloom.c" "test/hashtable.c")
|
||
(("/usr/share/dict/words")
|
||
(string-append (assoc-ref inputs "miscfiles") "/share/web2")))
|
||
#t))
|
||
(add-after 'install 'install-more
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(desktop (string-append out "/share/applications/"
|
||
"netsurf.desktop")))
|
||
(mkdir-p (dirname desktop))
|
||
(copy-file "frontends/gtk/res/netsurf-gtk.desktop"
|
||
desktop)
|
||
(substitute* desktop
|
||
(("netsurf-gtk") (string-append out "/bin/netsurf-gtk3"))
|
||
(("netsurf.png") (string-append out "/share/netsurf/"
|
||
"netsurf.xpm")))
|
||
(install-file "docs/netsurf-gtk.1"
|
||
(string-append out "/share/man/man1/"))
|
||
#t))))))
|
||
(home-page "https://www.netsurf-browser.org")
|
||
(synopsis "Web browser")
|
||
(description
|
||
"NetSurf is a lightweight web browser that has its own layout and
|
||
rendering engine entirely written from scratch. It is small and capable of
|
||
handling many of the web standards in use today.")
|
||
(license license:gpl2+)))
|
||
|
||
(define-public surfraw
|
||
(package
|
||
(name "surfraw")
|
||
(version "2.3.0")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://gitlab.com/surfraw/Surfraw/uploads/"
|
||
"2de827b2786ef2fe43b6f07913ca7b7f/"
|
||
"surfraw-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "099nbif0x5cbcf18snc58nx1a3q7z0v9br9p2jiq9pcc7ic2015d"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'patch-perl
|
||
(lambda* (#:key inputs #:allow-other-keys)
|
||
(let ((perl (assoc-ref inputs "perl")))
|
||
(substitute* "surfraw.IN"
|
||
(("perl -e")
|
||
(string-append perl "/bin/perl -e")))
|
||
#t)))
|
||
(add-after 'install 'compress-elvi.1sr
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
;; The manpages of the elvis are symlinks to elvi.1sr.gz
|
||
;; but elvi.1sr does not get compressed by our manpage phase.
|
||
(let* ((out (assoc-ref %outputs "out"))
|
||
(man (string-append out "/share/man/man1")))
|
||
(with-directory-excursion man
|
||
(invoke "gzip" "elvi.1sr"))))))))
|
||
(inputs
|
||
`(("perl" ,perl)
|
||
("perl-www-opensearch" ,perl-www-opensearch)
|
||
("perl-html-parser" ,perl-html-parser)
|
||
("perl-libwww" ,perl-libwww)))
|
||
(synopsis "Unix command line interface to the www")
|
||
(description "Surfraw (Shell Users' Revolutionary Front Rage Against the Web)
|
||
provides a unix command line interface to a variety of popular www search engines
|
||
and similar services.")
|
||
(home-page "https://surfraw.alioth.debian.org/")
|
||
(license license:public-domain)))
|
||
|
||
(define-public darkhttpd
|
||
(package
|
||
(name "darkhttpd")
|
||
(version "1.12")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://unix4lyfe.org/darkhttpd/darkhttpd-"
|
||
version ".tar.bz2"))
|
||
(sha256
|
||
(base32
|
||
"0185wlyx4iqiwfigp1zvql14zw7gxfacncii3d15yaxk4av1f155"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:make-flags '("CC=gcc")
|
||
#:tests? #f ; No test suite
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(delete 'configure)
|
||
(replace 'install
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(install-file "darkhttpd"
|
||
(string-append (assoc-ref outputs "out")
|
||
"/bin"))
|
||
#t)))))
|
||
(synopsis "Simple static web server")
|
||
(description "darkhttpd is a simple static web server. It is
|
||
standalone and does not need inetd or ucspi-tcp. It does not need any
|
||
config files---you only have to specify the www root.")
|
||
(home-page "https://unix4lyfe.org/darkhttpd/")
|
||
(license license:isc)))
|
||
|
||
(define-public goaccess
|
||
(package
|
||
(name "goaccess")
|
||
(version "1.0.2")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "http://tar.goaccess.io/goaccess-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1w84y61f3ldg2f28q6qlyr1scn3mcx0bsbq3i5xi5w193wh3xa2q"))
|
||
(modules '((guix build utils)))
|
||
(snippet '(begin
|
||
(substitute* "src/error.h"
|
||
(("__DATE__") "\"1970-01-01\"")
|
||
(("__TIME__") "\"00:00:00\""))
|
||
#t))))
|
||
(build-system gnu-build-system)
|
||
(inputs
|
||
;; TODO: Add dependency on geoip-tools.
|
||
`(("glib" ,glib)
|
||
("ncurses" ,ncurses)))
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)))
|
||
(home-page "https://goaccess.io")
|
||
(synopsis "Analyze Web server logs in real time")
|
||
(description
|
||
"GoAccess is a real-time web log analyzer and interactive viewer that
|
||
runs in a terminal or through your browser. It provides fast and valuable
|
||
HTTP statistics for system administrators that require a visual server report
|
||
on the fly.")
|
||
(license license:x11)))
|
||
|
||
(define-public hitch
|
||
(package
|
||
(name "hitch")
|
||
(version "1.7.0")
|
||
(home-page "https://hitch-tls.org/")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append home-page "source/hitch-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1i75giwyr66ip8xsvk3gg5xdbxnmcabgxz8dqi06c58mw7qzhzn9"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:phases (modify-phases %standard-phases
|
||
(add-before 'check 'pre-check
|
||
(lambda _
|
||
;; Most tests attempts to access hitch-tls.org which is
|
||
;; unavailable in the build container. Run them against
|
||
;; a dummy local web server instead.
|
||
(for-each (lambda (test)
|
||
(substitute* test
|
||
(("\\[hitch-tls\\.org\\]:80")
|
||
"[localhost]:8000")))
|
||
(find-files "src/tests" "\\.sh$"))
|
||
(system "python3 -m http.server &")
|
||
|
||
;; The build container does not reap zombie processes,
|
||
;; causing stop_hitch to hang indefinitely while waiting
|
||
;; for the process to terminate because 'kill -0' never
|
||
;; succeeds. Use a different test to see whether the
|
||
;; process has shut down.
|
||
(substitute* "src/tests/hitch_test.sh"
|
||
(("kill -0 \"\\$HITCH_PID\"")
|
||
"$(ps -p $HITCH_PID -o state= | grep -qv '^Z$')"))
|
||
#t)))))
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)
|
||
|
||
;; For tests.
|
||
("curl" ,curl)
|
||
("egrep" ,grep)
|
||
("lsof" ,lsof)
|
||
("python" ,python)))
|
||
(inputs
|
||
`(("libev" ,libev)
|
||
("openssl" ,openssl)))
|
||
(synopsis "Scalable TLS proxy")
|
||
(description
|
||
"Hitch is a performant TLS proxy based on @code{libev}. It terminates
|
||
SSL/TLS connections and forwards the unencrypted traffic to a backend such
|
||
as a web server. It is designed to handle many thousand connections on
|
||
multicore machines.")
|
||
(license license:bsd-2)))
|
||
|
||
(define-public httptunnel
|
||
(package
|
||
(name "httptunnel")
|
||
(version "3.3")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "http://www.nocrew.org/software/httptunnel/"
|
||
name "-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0mn5s6p68n32xzadz6ds5i6bp44dyxzkq68r1yljlv470jr84bql"))
|
||
(modules '((guix build utils)))
|
||
(snippet '(begin
|
||
;; Remove non-free IETF RFC documentation.
|
||
(delete-file-recursively "doc")
|
||
#t))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:phases
|
||
(modify-phases %standard-phases
|
||
;; The default configure phase tries to pass environment variables as
|
||
;; command-line arguments, which confuses the ./configure script.
|
||
(replace 'configure
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out")))
|
||
(setenv "CONFIG_SHELL" (which "bash"))
|
||
(invoke "./configure"
|
||
(string-append "--prefix=" out))))))))
|
||
(home-page "http://www.nocrew.org/software/httptunnel.html")
|
||
(synopsis "Tunnel data connections through HTTP requests")
|
||
(description "httptunnel creates a bidirectional virtual data connection
|
||
tunnelled through HTTP (HyperText Transfer Protocol) requests. This can be
|
||
useful for users behind restrictive firewalls. As long as Web traffic is
|
||
allowed, even through a HTTP-only proxy, httptunnel can be combined with other
|
||
tools like SSH (Secure Shell) to reach the outside world.")
|
||
(license license:gpl2+)))
|
||
|
||
(define-public stunnel
|
||
(package
|
||
(name "stunnel")
|
||
(version "5.57")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://www.stunnel.org/downloads/stunnel-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1q8gc05fiz7w55ws0whwzb94ffjnhzfppf1mhz1hf671vmrvjnmg"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
;; For tests.
|
||
`(("iproute" ,iproute)
|
||
("netcat" ,netcat)
|
||
("procps" ,procps)))
|
||
(inputs `(("openssl" ,openssl)))
|
||
(arguments
|
||
`(#:configure-flags
|
||
(list (string-append "--with-ssl=" (assoc-ref %build-inputs "openssl")))
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'patch-output-directories
|
||
(lambda _
|
||
;; Some (not all) Makefiles have a hard-coded incorrect docdir.
|
||
(substitute* (list "Makefile.in"
|
||
"doc/Makefile.in"
|
||
"tools/Makefile.in")
|
||
(("/doc/stunnel")
|
||
(string-append "/doc/" ,name "-" ,version)))
|
||
#t))
|
||
(add-before 'check 'patch-tests
|
||
(lambda _
|
||
(substitute* "tests/make_test"
|
||
(("/bin/sh ")
|
||
(string-append (which "sh") " ")))
|
||
#t)))))
|
||
(home-page "https://www.stunnel.org")
|
||
(synopsis "TLS proxy for clients or servers")
|
||
(description "Stunnel is a proxy designed to add TLS encryption
|
||
functionality to existing clients and servers without any changes in the
|
||
programs' code. Its architecture is optimized for security, portability, and
|
||
scalability (including load-balancing), making it suitable for large
|
||
deployments.")
|
||
(license license:gpl2+)))
|
||
|
||
(define-public varnish
|
||
(package
|
||
(name "varnish")
|
||
(home-page "https://varnish-cache.org/")
|
||
(version "6.5.1")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append home-page "_downloads/varnish-" version ".tgz"))
|
||
(sha256
|
||
(base32
|
||
"1dfdswri6lkfk6kml3szvffm91y49pajgqy1k5y26llqixl4r5hi"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:configure-flags (list (string-append "LDFLAGS=-Wl,-rpath=" %output "/lib")
|
||
;; Use absolute path of GCC so it's found at runtime.
|
||
(string-append "PTHREAD_CC="
|
||
(assoc-ref %build-inputs "gcc")
|
||
"/bin/gcc")
|
||
"--localstatedir=/var")
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'use-absolute-file-names
|
||
(lambda _
|
||
(substitute* '("bin/varnishtest/vtc_varnish.c"
|
||
"bin/varnishtest/vtc_process.c"
|
||
"bin/varnishd/mgt/mgt_vcc.c"
|
||
"bin/varnishtest/tests/u00014.vtc")
|
||
(("/bin/sh") (which "sh")))
|
||
(substitute* "bin/varnishd/mgt/mgt_shmem.c"
|
||
(("rm -rf") (string-append (which "rm") " -rf")))
|
||
(substitute* "bin/varnishtest/vtc_main.c"
|
||
(("/bin/rm") (which "rm")))
|
||
#t))
|
||
(add-before 'install 'patch-Makefile
|
||
(lambda _
|
||
(substitute* "Makefile"
|
||
;; Do not create /var/varnish during install.
|
||
(("^install-data-am: install-data-local") "install-data-am: "))
|
||
#t))
|
||
(add-after 'install 'wrap-varnishd
|
||
;; Varnish uses GCC to compile VCL, so wrap it with required GCC
|
||
;; environment variables to avoid propagating them to profiles.
|
||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(varnishd (string-append out "/sbin/varnishd"))
|
||
(PATH (string-append (assoc-ref inputs "binutils") "/bin"))
|
||
(LIBRARY_PATH (string-append (assoc-ref inputs "libc") "/lib")))
|
||
(wrap-program varnishd
|
||
;; Add binutils to PATH so gcc finds the 'as' executable.
|
||
`("PATH" ":" prefix (,PATH))
|
||
;; Make sure 'crti.o' et.al is found.
|
||
`("LIBRARY_PATH" ":" prefix (,LIBRARY_PATH)))
|
||
#t))))))
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)
|
||
("python-sphinx" ,python-sphinx)
|
||
("rst2man" ,python-docutils)))
|
||
(inputs
|
||
`(("jemalloc" ,jemalloc)
|
||
("ncurses" ,ncurses)
|
||
("pcre" ,pcre)
|
||
("python" ,python-wrapper)
|
||
("readline" ,readline)))
|
||
(synopsis "Web application accelerator")
|
||
(description
|
||
"Varnish is a high-performance HTTP accelerator. It acts as a caching
|
||
reverse proxy and load balancer. You install it in front of any server that
|
||
speaks HTTP and configure it to cache the contents through an extensive
|
||
configuration language.")
|
||
(license (list license:bsd-2 ;main distribution
|
||
license:zlib ;lib/libvgz/*
|
||
license:public-domain ;bin/varnishncsa/as64.c, include/miniobj.h
|
||
license:bsd-3)))) ;include/vqueue.h, lib/libvarnishcompat/daemon.c
|
||
|
||
(define-public varnish-modules
|
||
(package
|
||
(name "varnish-modules")
|
||
(home-page "https://github.com/varnish/varnish-modules")
|
||
(version "0.17.0")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference (url home-page) (commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"0zg8y2sgkygdani70zp9rbx278431fmssj26d47c5qsiw939i519"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)
|
||
|
||
;; For bootstrapping.
|
||
("autoconf" ,autoconf)
|
||
("automake" ,automake)
|
||
("libtool" ,libtool)
|
||
|
||
;; For generating manuals.
|
||
("rst2man" ,python-docutils)))
|
||
(inputs
|
||
`(("python" ,python)
|
||
("varnish" ,varnish)))
|
||
(synopsis "Collection of Varnish modules")
|
||
(description
|
||
"This package provides a collection of modules (@dfn{vmods}) for the Varnish
|
||
cache server, extending the @acronym{VCL, Varnish Configuration Language} with
|
||
additional capabilities.")
|
||
(license license:bsd-2)))
|
||
|
||
(define-public xinetd
|
||
(package
|
||
(name "xinetd")
|
||
;; This is the maintenance fork currently used by openSUSE and Debian.
|
||
(version "2.3.15.4")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/openSUSE/xinetd")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "0lrp3lcj6azhjplwxws2rx40bkyp6i6bp7n77ndcisb7ninad30q"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:configure-flags '("--with-loadavg")
|
||
#:tests? #f)) ; no tests
|
||
(native-inputs
|
||
`(("autoconf" ,autoconf)
|
||
("automake" ,automake)
|
||
("libtool" ,libtool)
|
||
("pkg-config" ,pkg-config)))
|
||
(home-page "https://github.com/openSUSE/xinetd")
|
||
(synopsis "Internet services daemon")
|
||
(description "@code{xinetd}, a more secure replacement for @code{inetd},
|
||
listens for incoming requests over a network and launches the appropriate
|
||
service for that request. Requests are made using port numbers as identifiers
|
||
and xinetd usually launches another daemon to handle the request. It can be
|
||
used to start services with both privileged and non-privileged port numbers.")
|
||
(license (license:fsf-free "file://COPYRIGHT"))))
|
||
|
||
(define-public tidy-html
|
||
(package
|
||
(name "tidy-html")
|
||
(version "5.7.28")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/htacg/tidy-html5")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"01k5sqwgcsr26i8031v1yr2r8qcy9a5w7sj800660haszgfbjz2f"))))
|
||
(build-system cmake-build-system)
|
||
(outputs '("out"
|
||
"static")) ; 1.3MiB of .a files
|
||
(arguments
|
||
`(#:tests? #f ; no tests available
|
||
#:build-type "Release"
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'install 'move-static-libraries
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
;; Move static libraries to the "static" output.
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(lib (string-append out "/lib"))
|
||
(static (assoc-ref outputs "static"))
|
||
(slib (string-append static "/lib")))
|
||
(mkdir-p slib)
|
||
(for-each (lambda (file)
|
||
(install-file file slib)
|
||
(delete-file file))
|
||
(find-files lib "\\.a$"))
|
||
#t))))))
|
||
(native-inputs
|
||
`(("libxslt" ,libxslt)))
|
||
(home-page "http://www.html-tidy.org/")
|
||
(synopsis "HTML Tidy with HTML5 support")
|
||
(description
|
||
"Tidy is a console application which corrects and cleans up
|
||
HTML and XML documents by fixing markup errors and upgrading
|
||
legacy code to modern standards.
|
||
|
||
Tidy also provides @code{libtidy}, a C static and dynamic library that
|
||
developers can integrate into their applications to make use of the
|
||
functions of Tidy.")
|
||
(license license:bsd-3)))
|
||
|
||
(define-public hiawatha
|
||
(package
|
||
(name "hiawatha")
|
||
(version "10.11")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://www.hiawatha-webserver.org/files/"
|
||
"hiawatha-" version ".tar.gz"))
|
||
(modules '((guix build utils)))
|
||
(snippet '(begin
|
||
;; We use packaged libraries, so delete the bundled copies.
|
||
(for-each delete-file-recursively
|
||
(list "extra/nghttp2.tgz" "mbedtls"))
|
||
#t))
|
||
(sha256
|
||
(base32 "09wpgilbv13zal71v9lbsqr8c3fignygadykpd1p1pb8blb5vn3r"))))
|
||
(build-system cmake-build-system)
|
||
(arguments
|
||
`(#:tests? #f ; no tests included
|
||
#:configure-flags (list (string-append "-DUSE_SYSTEM_MBEDTLS=on")
|
||
(string-append "-DENABLE_HTTP2=on")
|
||
(string-append "-DUSE_SYSTEM_NGHTTP2=on")
|
||
(string-append "-DENABLE_TOMAHAWK=on")
|
||
(string-append "-DLOG_DIR=/var/log/hiawatha")
|
||
(string-append "-DPID_DIR=/run")
|
||
(string-append "-DWEBROOT_DIR="
|
||
(assoc-ref %outputs "out")
|
||
"/share/hiawatha/html")
|
||
(string-append "-DWORK_DIR=/var/lib/hiawatha"))
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'install-no-empty-directories
|
||
(lambda _
|
||
(substitute* "CMakeLists.txt"
|
||
(("install\\(DIRECTORY DESTINATION" match)
|
||
(string-append "#" match)))
|
||
#t))
|
||
(add-after 'install 'wrap
|
||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||
;; Make sure 'hiawatha' finds 'mbedtls'.
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(sbin (string-append out "/sbin"))
|
||
(mbed (assoc-ref inputs "mbedtls-apache")))
|
||
(wrap-program (string-append sbin "/hiawatha")
|
||
`("PATH" ":" prefix (,mbed)))))))))
|
||
(inputs
|
||
;; TODO: package "hiawatha-monitor", an optional dependency of "hiawatha".
|
||
`(("libxslt" ,libxslt)
|
||
("libxml2" ,libxml2)
|
||
("mbedtls-apache" ,mbedtls-for-hiawatha)
|
||
("nghttp2" ,nghttp2 "lib")
|
||
("zlib" ,zlib)))
|
||
(home-page "https://www.hiawatha-webserver.org")
|
||
(synopsis "Webserver with focus on security")
|
||
(description
|
||
"Hiawatha has been written with security in mind.
|
||
Features include the ability to stop SQL injections, XSS and CSRF attacks and
|
||
exploit attempts.")
|
||
(license license:gpl2)))
|
||
|
||
(define-public python-httpbin
|
||
(package
|
||
(name "python-httpbin")
|
||
(version "0.5.0")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (pypi-uri "httpbin" version))
|
||
(sha256
|
||
(base32
|
||
"1dc92lnk846hpilslrqnr63x55cxll4qx88gif8fm521gv9cbyvr"))))
|
||
(build-system python-build-system)
|
||
(propagated-inputs
|
||
`(("python-decorator" ,python-decorator)
|
||
("python-flask" ,python-flask)
|
||
("python-itsdangerous" ,python-itsdangerous)
|
||
("python-markupsafe" ,python-markupsafe)
|
||
("python-six" ,python-six)))
|
||
(home-page "https://github.com/Runscope/httpbin")
|
||
(synopsis "HTTP request and response service")
|
||
(description "Testing an HTTP Library can become difficult sometimes.
|
||
@code{RequestBin} is fantastic for testing POST requests, but doesn't let you control the
|
||
response. This exists to cover all kinds of HTTP scenarios. All endpoint responses are
|
||
JSON-encoded.")
|
||
(license license:isc)))
|
||
|
||
(define-public python2-httpbin
|
||
(package-with-python2 python-httpbin))
|
||
|
||
(define-public python-pytest-httpbin
|
||
(package
|
||
(name "python-pytest-httpbin")
|
||
(version "0.2.3")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (pypi-uri "pytest-httpbin" version))
|
||
(sha256
|
||
(base32
|
||
"1y0v2v7xpzpyd4djwp7ad8ifnlxp8r1y6dfbxg5ckzvllkgridn5"))))
|
||
(build-system python-build-system)
|
||
(propagated-inputs
|
||
`(("python-six" ,python-six)
|
||
("python-httpbin" ,python-httpbin)
|
||
("python-pytest" ,python-pytest)))
|
||
(home-page
|
||
"https://github.com/kevin1024/pytest-httpbin")
|
||
(synopsis
|
||
"Test your HTTP library against a local copy of httpbin")
|
||
(description
|
||
"@code{Pytest-httpbin} creates a @code{pytest} fixture that is dependency-injected
|
||
into your tests. It automatically starts up a HTTP server in a separate thread running
|
||
@code{httpbin} and provides your test with the URL in the fixture.")
|
||
(license license:expat)))
|
||
|
||
(define-public http-parser
|
||
(package
|
||
(name "http-parser")
|
||
(version "2.9.4")
|
||
(home-page "https://github.com/nodejs/http-parser")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference (url home-page)
|
||
(commit (string-append "v" version))))
|
||
(sha256
|
||
(base32 "1vda4dp75pjf5fcph73sy0ifm3xrssrmf927qd1x8g3q46z0cv6c"))
|
||
(file-name (git-file-name name version))
|
||
(patches
|
||
(list
|
||
(origin
|
||
;; Treat an empty port (e.g. `http://hostname:/`) when parsing
|
||
;; URLs as if no port were specified. This patch is applied
|
||
;; to Fedora's http-parser and to libgit2's bundled version.
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://src.fedoraproject.org/rpms/http-parser/raw/"
|
||
"e89b4c4e2874c19079a5a1a2d2ccc61b551aa289/"
|
||
"f/0001-url-treat-empty-port-as-default.patch"))
|
||
(sha256
|
||
(base32
|
||
"0pbxf2nq9pcn299k2b2ls8ldghaqln9glnp79gi57mamx4iy0f6g")))))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:test-target "test"
|
||
#:make-flags
|
||
(list (string-append "PREFIX="
|
||
(assoc-ref %outputs "out"))
|
||
"library"
|
||
,@(if (%current-target-system)
|
||
'()
|
||
'("CC=gcc")))
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
,@(match (%current-system)
|
||
("armhf-linux"
|
||
'((add-before 'check 'apply-assertion.patch
|
||
(lambda* (#:key inputs #:allow-other-keys)
|
||
(let ((patch (assoc-ref inputs "assertion.patch")))
|
||
(invoke "patch" "-p1" "-i" patch)
|
||
#t)))))
|
||
(_ '()))
|
||
,@(if (%current-target-system)
|
||
'((replace 'configure
|
||
(lambda* (#:key target #:allow-other-keys)
|
||
(substitute* (find-files "." "Makefile")
|
||
(("CC\\?=.*$")
|
||
(string-append "CC=" target "-gcc\n"))
|
||
(("AR\\?=.*$")
|
||
(string-append "AR=" target "-ar\n")))
|
||
#t)))
|
||
'((delete 'configure))))))
|
||
(native-inputs
|
||
`(,@(match (%current-system)
|
||
("armhf-linux"
|
||
;; A fix for <https://issues.guix.gnu.org/40604> which in turn
|
||
;; breaks i686-linux builds.
|
||
`(("assertion.patch"
|
||
,@(search-patches "http-parser-fix-assertion-on-armhf.patch"))))
|
||
(_ '()))))
|
||
(synopsis "HTTP request/response parser for C")
|
||
(description "This is a parser for HTTP messages written in C. It parses
|
||
both requests and responses. The parser is designed to be used in
|
||
high-performance HTTP applications. It does not make any syscalls nor
|
||
allocations, it does not buffer data, it can be interrupted at anytime.
|
||
Depending on your architecture, it only requires about 40 bytes of data per
|
||
message stream (in a web server that is per connection).")
|
||
(license license:expat)))
|
||
|
||
(define-public python-httpretty
|
||
(package
|
||
(name "python-httpretty")
|
||
(version "0.9.6")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (pypi-uri "httpretty" version))
|
||
(sha256
|
||
(base32 "1p1rb4mpngh0632xrmdfhvc8yink519yfkqz97d2ww3y0x2jvd81"))))
|
||
(build-system python-build-system)
|
||
(propagated-inputs
|
||
`(("python-six" ,python-six)))
|
||
(native-inputs
|
||
`(("python-coverage" ,python-coverage)
|
||
("python-httplib2" ,python-httplib2)
|
||
("python-mock" ,python-mock)
|
||
("python-nose" ,python-nose)
|
||
("python-nose-randomly" ,python-nose-randomly)
|
||
("python-rednose" ,python-rednose)
|
||
("python-requests" ,python-requests)
|
||
("python-sure" ,python-sure)
|
||
("python-tornado" ,python-tornado)
|
||
("python-urllib3" ,python-urllib3)))
|
||
(home-page "https://httpretty.readthedocs.io")
|
||
(synopsis "HTTP client mock for Python")
|
||
(description "@code{httpretty} is a helper for faking web requests,
|
||
inspired by Ruby's @code{fakeweb}.")
|
||
(license license:expat)))
|
||
|
||
(define-public jo
|
||
(package
|
||
(name "jo")
|
||
(version "1.4")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://github.com/jpmens/jo/releases/download/"
|
||
version "/jo-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "18jna9xlpxci3cak3z85c448zv2zr41baclgym3hk433p0p4vii4"))))
|
||
(build-system gnu-build-system)
|
||
(home-page "https://github.com/jpmens/jo")
|
||
(synopsis "Output JSON from a shell")
|
||
(description "jo is a command-line utility to create JSON objects or
|
||
arrays. It creates a JSON string on stdout from words provided as
|
||
command-line arguments or read from stdin.")
|
||
(license (list license:gpl2+
|
||
license:expat)))) ; json.c, json.h
|
||
|
||
(define-public python-internetarchive
|
||
(package
|
||
(name "python-internetarchive")
|
||
(version "1.8.5")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/jjjake/internetarchive")
|
||
(commit (string-append "v" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"0ih7hplv92wbv6cmgc1gs0v35qkajwicalwcq8vcljw30plr24fp"))
|
||
(modules '((guix build utils)))
|
||
(snippet
|
||
'(begin
|
||
;; Python 3.7 removed `_pattern_type'.
|
||
(for-each (lambda (file)
|
||
(chmod file #o644)
|
||
(substitute* file
|
||
(("^import re\n" line)
|
||
(string-append line "re._pattern_type = re.Pattern\n"))))
|
||
(find-files "." "\\.py$"))
|
||
#t))))
|
||
(build-system python-build-system)
|
||
(arguments
|
||
`(#:phases
|
||
(modify-phases %standard-phases
|
||
(delete 'check)
|
||
(add-after 'install 'check
|
||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||
(add-installed-pythonpath inputs outputs)
|
||
(setenv "PATH" (string-append (assoc-ref outputs "out") "/bin"
|
||
":" (getenv "PATH")))
|
||
(invoke "py.test" "-v" "-k"
|
||
(string-append
|
||
;; These tests attempt to make a connection to
|
||
;; an external web service.
|
||
"not test_get_item_with_kwargs"
|
||
" and not test_ia")))))))
|
||
(propagated-inputs
|
||
`(("python-requests" ,python-requests)
|
||
("python-jsonpatch" ,python-jsonpatch-0.4)
|
||
("python-docopt" ,python-docopt)
|
||
("python-clint" ,python-clint)
|
||
("python-six" ,python-six)
|
||
("python-schema" ,python-schema-0.5)
|
||
("python-backports-csv" ,python-backports-csv)))
|
||
(native-inputs
|
||
`(("python-pytest" ,python-pytest)
|
||
("python-pytest-capturelog" ,python-pytest-capturelog)
|
||
("python-responses" ,python-responses)))
|
||
(home-page "https://github.com/jjjake/internetarchive")
|
||
(synopsis "Command-line interface to archive.org")
|
||
(description "@code{ia} is a command-line tool for using
|
||
@url{archive.org} from the command-line. It also implements the
|
||
internetarchive python module for programmatic access to archive.org.")
|
||
(license license:agpl3+)))
|
||
|
||
(define-public python-clf
|
||
(let ((commit-test-clf "d01d25923c599d3261910f79fb948825b4270d07")) ; 0.5.7
|
||
(package
|
||
(name "python-clf")
|
||
(version "0.5.7")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (pypi-uri "clf" version))
|
||
(sha256
|
||
(base32
|
||
"0zlkzqnpz7a4iavsq5vaz0nf5nr7qm5znpg1vlpz6rwnx6hikjdb"))))
|
||
(build-system python-build-system)
|
||
(propagated-inputs
|
||
`(("python-docopt" ,python-docopt)
|
||
("python-pygments" ,python-pygments)
|
||
("python-requests" ,python-requests)
|
||
("python-nose" ,python-nose)
|
||
("python-lxml" ,python-lxml)
|
||
("python-pyaml" ,python-pyaml)))
|
||
(inputs
|
||
`(("test-clf"
|
||
,(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://raw.githubusercontent.com"
|
||
"/ncrocfer/clf/" commit-test-clf
|
||
"/test_clf.py"))
|
||
(sha256
|
||
(base32
|
||
"19lr5zdzsmxgkg7wrjq1yzkiahd03wi4k3dskssyhmjls8c10nqd"))))))
|
||
(arguments
|
||
'(#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'get-tests
|
||
(lambda _
|
||
(copy-file (assoc-ref %build-inputs "test-clf") "test_clf.py")
|
||
#t))
|
||
(replace 'check
|
||
(lambda _
|
||
(invoke "nosetests"
|
||
;; These tests require an Internet connection.
|
||
"--exclude=test_browse"
|
||
"--exclude=test_command"
|
||
"--exclude=test_search"))))))
|
||
(home-page "https://github.com/ncrocfer/clf")
|
||
(synopsis "Search code snippets on @url{https://commandlinefu.com}")
|
||
(description "@code{clf} is a command line tool for searching code
|
||
snippets on @url{https://commandlinefu.com}.")
|
||
(license license:expat))))
|
||
|
||
(define-public python2-clf
|
||
(package-with-python2 python-clf))
|
||
|
||
(define-public rss-bridge
|
||
(package
|
||
(name "rss-bridge")
|
||
(version "2019-09-12")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/RSS-Bridge/rss-bridge")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "1mx7f3l45nqhcrng531l4cq8kpzm164hhbwn26g5akb2pamdlnra"))))
|
||
(build-system trivial-build-system)
|
||
(arguments
|
||
'(#:modules ((guix build utils))
|
||
#:builder
|
||
(begin
|
||
(use-modules (guix build utils)
|
||
(ice-9 match))
|
||
(let* ((out (assoc-ref %outputs "out"))
|
||
(share-rss-bridge (string-append out "/share/rss-bridge")))
|
||
(mkdir-p share-rss-bridge)
|
||
(copy-recursively (assoc-ref %build-inputs "source") share-rss-bridge)
|
||
#t))))
|
||
(home-page "https://github.com/RSS-Bridge/rss-bridge")
|
||
(synopsis "Generate Atom feeds for social networking websites")
|
||
(description "rss-bridge generates Atom feeds for social networking
|
||
websites lacking feeds. Supported websites include Facebook, Twitter,
|
||
Instagram and YouTube.")
|
||
(license (list license:public-domain
|
||
license:expat)))) ; vendor/simplehtmldom/simple_html_dom.php
|
||
|
||
(define-public linkchecker
|
||
(package
|
||
(name "linkchecker")
|
||
(version "9.4.0")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/linkchecker/linkchecker")
|
||
(commit (string-append "v" version))))
|
||
(patches
|
||
(search-patches "linkchecker-tests-require-network.patch"))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"03ihjmc4bqxxqv71bb43r2f23sx0xnbq1k2fsg9fw05qa5s9x187"))))
|
||
(build-system python-build-system)
|
||
(inputs
|
||
`(("python2-dnspython" ,python2-dnspython-1.16)
|
||
("python2-pyxdg" ,python2-pyxdg)
|
||
("python2-requests" ,python2-requests)))
|
||
(native-inputs
|
||
`(("gettext" ,gettext-minimal)
|
||
("python2-pytest" ,python2-pytest)
|
||
("python2-miniboa" ,python2-miniboa)
|
||
("python2-parameterized" ,python2-parameterized)))
|
||
(arguments
|
||
`(#:python ,python-2
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
;; Move the 'check phase to after 'install, so that the installed
|
||
;; library can be used
|
||
(delete 'check)
|
||
(add-after 'install 'check
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let ((out (assoc-ref outputs "out")))
|
||
;; Set PYTHONPATH so that the installed linkchecker is used
|
||
(setenv "PYTHONPATH"
|
||
(string-append out "/lib/python2.7/site-packages"
|
||
":"
|
||
(getenv "PYTHONPATH")))
|
||
;; Remove this directory to avoid it being used when running
|
||
;; the tests
|
||
(delete-file-recursively "linkcheck")
|
||
|
||
(invoke "py.test" "tests"))
|
||
#t)))))
|
||
(home-page "https://linkcheck.github.io/linkchecker")
|
||
(synopsis "Check websites for broken links")
|
||
(description "LinkChecker is a website validator. It checks for broken
|
||
links in websites. It is recursive and multithreaded providing output in
|
||
colored or normal text, HTML, SQL, CSV, XML or as a sitemap graph. It
|
||
supports checking HTTP/1.1, HTTPS, FTP, mailto, news, nntp, telnet and local
|
||
file links.")
|
||
(license (list license:gpl2+
|
||
license:bsd-2 ; linkcheck/better_exchook2.py
|
||
license:bsd-3 ; linkcheck/colorama.py
|
||
license:psfl ; linkcheck/gzip2.py
|
||
license:expat)))) ; linkcheck/mem.py
|
||
|
||
(define-public cadaver
|
||
(package
|
||
(name "cadaver")
|
||
(version "0.23.3")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "http://www.webdav.org/cadaver/"
|
||
name "-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1jizq69ifrjbjvz5y79wh1ny94gsdby4gdxwjad4bfih6a5fck7x"))))
|
||
(build-system gnu-build-system)
|
||
;; TODO: Unbundle libneon and make build succeed with new neon.
|
||
(arguments
|
||
`(#:configure-flags (list "--with-ssl=openssl")
|
||
#:tests? #f)) ;No tests included
|
||
(native-inputs
|
||
`(("gettext" ,gettext-minimal)
|
||
("pkg-config" ,pkg-config)
|
||
("intltool" ,intltool)))
|
||
(inputs
|
||
`(("expat" ,expat)
|
||
("openssl" ,openssl-1.0)))
|
||
(home-page "http://www.webdav.org/cadaver/")
|
||
(synopsis "Command-line WebDAV client")
|
||
(description
|
||
"Cadaver is a command-line WebDAV client for Unix. It supports
|
||
file upload, download, on-screen display, namespace operations (move/copy),
|
||
collection creation and deletion, and locking operations.")
|
||
(license license:gpl2)))
|
||
|
||
(define-public castor
|
||
(package
|
||
(name "castor")
|
||
(version "0.8.16")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://git.sr.ht/~julienxx/castor")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "0rwg1w7srjwa23mkypl8zk6674nhph4xsc6nc01f6g5k959szylr"))))
|
||
(build-system cargo-build-system)
|
||
(arguments
|
||
`(#:cargo-inputs
|
||
(("rust-ansi-parser" ,rust-ansi-parser-0.6)
|
||
("rust-dirs" ,rust-dirs-2.0)
|
||
("rust-gdk" ,rust-gdk-0.13)
|
||
("rust-gtk" ,rust-gtk-0.8)
|
||
("rust-linkify" ,rust-linkify-0.4)
|
||
("rust-native-tls" ,rust-native-tls-0.2)
|
||
("rust-open" ,rust-open-1)
|
||
("rust-percent-encoding" ,rust-percent-encoding-2)
|
||
("rust-url" ,rust-url-2))))
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)))
|
||
(inputs
|
||
`(("atk" ,atk)
|
||
("cairo" ,cairo)
|
||
("gdk-pixbuf" ,gdk-pixbuf)
|
||
("gtk+" ,gtk+)
|
||
("libressl" ,libressl)
|
||
("pango" ,pango)))
|
||
(home-page "https://git.sr.ht/~julienxx/castor")
|
||
(synopsis "Graphical client for plain-text protocols")
|
||
(description
|
||
"Castor is a graphical client for plain-text protocols written in
|
||
Rust with GTK. It currently supports the Gemini, Gopher and Finger
|
||
protocols.")
|
||
(license license:expat)))
|
||
|
||
(define-public python-py-ubjson
|
||
(package
|
||
(name "python-py-ubjson")
|
||
(version "0.10.0")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (pypi-uri "py-ubjson" version))
|
||
(sha256
|
||
(base32
|
||
"03l9m9w5ip4hw0y69wlys5gzsfb7zcq3a77blj88grgiqhn5vm5n"))))
|
||
(build-system python-build-system)
|
||
(home-page "https://github.com/Iotic-Labs/py-ubjson")
|
||
(synopsis "Universal Binary JSON encoder/decoder")
|
||
(description
|
||
"Py-ubjson is a Python module providing an Universal Binary JSON
|
||
encoder/decoder based on the draft-12 specification for UBJSON.")
|
||
(license license:asl2.0)))
|
||
|
||
(define-public java-tomcat
|
||
(package
|
||
(name "java-tomcat")
|
||
(version "8.5.53")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://apache/tomcat/tomcat-8/v"
|
||
version "/src/apache-tomcat-" version "-src.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"15lwq3clf21hzk7mma70sffpxjqn8ww5mjq6zhmwcp4m17m22z26"))
|
||
(modules '((guix build utils)))
|
||
;; Delete bundled jars.
|
||
(snippet
|
||
'(begin
|
||
(for-each delete-file (find-files "." "\\.jar$"))
|
||
(for-each delete-file (find-files "." "\\.bat$"))
|
||
#t))))
|
||
(build-system ant-build-system)
|
||
(inputs
|
||
`(("java-commons-daemon" ,java-commons-daemon)
|
||
("java-ecj" ,java-ecj)))
|
||
(arguments
|
||
`(#:build-target "deploy"
|
||
#:tests? #f; requires downloading some files.
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'prevent-download
|
||
(lambda _
|
||
;; This directory must exist
|
||
(mkdir "downloads")
|
||
;; We patch build.xml so it doesn't download any dependency, because
|
||
;; we already have all of them.
|
||
(substitute* "build.xml"
|
||
(("download-compile,") "")
|
||
(("depends=\"validate\"") "depends=\"build-prepare\"")
|
||
((",download-validate") ""))
|
||
#t))
|
||
(add-after 'unpack 'strip-timestamps
|
||
(lambda _
|
||
(substitute* "build.xml"
|
||
(("<filter token=\"YEAR\" value=.*")
|
||
"<filter token=\"YEAR\" value=\"1970\"/>")
|
||
(("<filter token=\"VERSION_BUILT\" value=.*")
|
||
"<filter token=\"VERSION_BUILT\" value=\"Jan 1 1970 00:00:00 UTC\"/>"))
|
||
#t))
|
||
(add-after 'unpack 'modify-deploy
|
||
(lambda _
|
||
;; The Tomcat build downloads and copies these files to the
|
||
;; bin and lib directory.
|
||
;; We instead symlink to the input (see below).
|
||
(substitute* "build.xml"
|
||
(("<copy tofile=\"\\$\\{tomcat.build\\}/bin/commons-daemon.jar.*") "")
|
||
(("<copy file=\"\\$\\{jdt.jar\\}\" todir=\"\\$\\{tomcat.build\\}/lib\"/>")
|
||
""))
|
||
#t))
|
||
(add-after 'install 'symlink-commons-daemon
|
||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||
(let* ((commons-daemon (assoc-ref inputs "java-commons-daemon"))
|
||
(files (find-files commons-daemon "commons-daemon-.*\\.jar"))
|
||
(daemon-jar (car files))
|
||
(out-bin (string-append (assoc-ref outputs "out") "/bin"))
|
||
(target (string-append out-bin "/commons-daemon.jar")))
|
||
(symlink daemon-jar target)
|
||
#t)))
|
||
(add-after 'install 'symlink-java-ecj
|
||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||
(let* ((java-ecj (assoc-ref inputs "java-ecj"))
|
||
(files (find-files java-ecj "ecj.*\\.jar"))
|
||
(java-ecj-jar (car files))
|
||
(out-lib (string-append (assoc-ref outputs "out") "/lib"))
|
||
(target (string-append out-lib "/java-ecj.jar")))
|
||
(symlink java-ecj-jar target)
|
||
#t)))
|
||
(add-after 'unpack 'generate-properties
|
||
(lambda _
|
||
;; This could have been passed to make-flags, but getcwd returns
|
||
;; a different directory then.
|
||
(with-output-to-file "build.properties"
|
||
(lambda _
|
||
(display
|
||
(string-append "base.path=" (getcwd) "/downloads\n"))))
|
||
#t))
|
||
(replace 'install
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let ((out (assoc-ref outputs "out")))
|
||
(copy-recursively "output/build" out))
|
||
#t)))))
|
||
(properties '((cpe-name . "tomcat")))
|
||
(home-page "https://tomcat.apache.org")
|
||
(synopsis "Java Servlet, JavaServer Pages, Java Expression Language and Java
|
||
WebSocket")
|
||
(description "Apache Tomcat is a free implementation of the Java
|
||
Servlet, JavaServer Pages, Java Expression Language and Java WebSocket
|
||
technologies.")
|
||
(license license:asl2.0)))
|
||
|
||
(define-public java-eclipse-jetty-test-helper
|
||
(package
|
||
(name "java-eclipse-jetty-test-helper")
|
||
(version "4.2")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/eclipse/jetty.toolchain/")
|
||
(commit (string-append "jetty-test-helper-" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"1g7cdh03nfwbdxzvwm84ysgvw08xx7431lsjryj2gmf3lrqpizgb"))))
|
||
(build-system ant-build-system)
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-test-helper.jar"
|
||
#:source-dir "src/main/java"
|
||
#:test-dir "src/test"
|
||
#:jdk ,icedtea-8
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-test-helper")
|
||
#t))
|
||
(add-before 'build 'fix-paths
|
||
(lambda _
|
||
;; TODO:
|
||
;; This file assumes that the build directory is named "target"
|
||
;; but it is not the case with our ant-build-system. Once we have
|
||
;; maven though, we will have to rebuild this package because this
|
||
;; assumption is correct with maven-build-system.
|
||
(substitute*
|
||
"src/main/java/org/eclipse/jetty/toolchain/test/MavenTestingUtils.java"
|
||
(("\"target\"") "\"build\"")
|
||
(("\"tests\"") "\"test-classes\""))
|
||
;; Tests assume we are building with maven, so that the build
|
||
;; directory is named "target", and not "build".
|
||
(with-directory-excursion "src/test/java/org/eclipse/jetty/toolchain/test"
|
||
(substitute* '("FSTest.java" "OSTest.java" "TestingDirTest.java"
|
||
"MavenTestingUtilsTest.java")
|
||
(("target/tests") "build/test-classes")
|
||
(("\"target") "\"build")))
|
||
#t)))))
|
||
(inputs
|
||
`(("junit" ,java-junit)
|
||
("hamcrest" ,java-hamcrest-all)))
|
||
(home-page "https://www.eclipse.org/jetty/")
|
||
(synopsis "Helper classes for jetty tests")
|
||
(description "This package contains helper classes for testing the Jetty
|
||
Web Server.")
|
||
;; This program is licensed under both epl and asl.
|
||
(license (list license:epl1.0 license:asl2.0))))
|
||
|
||
(define-public java-eclipse-jetty-perf-helper
|
||
(package
|
||
(inherit java-eclipse-jetty-test-helper)
|
||
(name "java-eclipse-jetty-perf-helper")
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-perf-helper.jar"
|
||
#:source-dir "src/main/java"
|
||
#:tests? #f; no tests
|
||
#:jdk ,icedtea-8
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-perf-helper")
|
||
#t)))))
|
||
(inputs
|
||
`(("hdrhistogram" ,java-hdrhistogram)))))
|
||
|
||
(define-public java-eclipse-jetty-util
|
||
(package
|
||
(name "java-eclipse-jetty-util")
|
||
(version "9.4.6")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://github.com/eclipse/jetty.project/"
|
||
"archive/jetty-" version ".v20170531.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0x7kbdvkmgr6kbsmbwiiyv3bb0d6wk25frgvld9cf8540136z9p1"))))
|
||
(build-system ant-build-system)
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-util.jar"
|
||
#:source-dir "src/main/java"
|
||
#:test-exclude
|
||
(list "**/Abstract*.java"
|
||
;; requires network
|
||
"**/InetAddressSetTest.java"
|
||
;; Assumes we are using maven
|
||
"**/TypeUtilTest.java"
|
||
;; Error on the style of log
|
||
"**/StdErrLogTest.java")
|
||
#:jdk ,icedtea-8
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-util")
|
||
#t)))))
|
||
(inputs
|
||
`(("slf4j" ,java-slf4j-api)
|
||
("servlet" ,java-javaee-servletapi)))
|
||
(native-inputs
|
||
`(("junit" ,java-junit)
|
||
("hamcrest" ,java-hamcrest-all)
|
||
("perf-helper" ,java-eclipse-jetty-perf-helper)
|
||
("test-helper" ,java-eclipse-jetty-test-helper)))
|
||
(home-page "https://www.eclipse.org/jetty/")
|
||
(synopsis "Utility classes for Jetty")
|
||
(description "The Jetty Web Server provides an HTTP server and Servlet
|
||
container capable of serving static and dynamic content either from a standalone
|
||
or embedded instantiation. This package provides utility classes.")
|
||
(license (list license:epl1.0 license:asl2.0))))
|
||
|
||
;; This version is required by maven-wagon
|
||
(define-public java-eclipse-jetty-util-9.2
|
||
(package
|
||
(inherit java-eclipse-jetty-util)
|
||
(version "9.2.22")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://github.com/eclipse/jetty.project/"
|
||
"archive/jetty-" version ".v20170606.tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1i51qlsd7h06d35kx5rqpzbfadbcszycx1iwr6vz7qc9gf9f29la"))))
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-util.jar"
|
||
#:source-dir "src/main/java"
|
||
#:jdk ,icedtea-8
|
||
#:test-exclude
|
||
(list "**/Abstract*.java"
|
||
;; requires network
|
||
"**/InetAddressSetTest.java"
|
||
;; Assumes we are using maven
|
||
"**/TypeUtilTest.java"
|
||
;; We don't have an implementation for slf4j
|
||
"**/LogTest.java"
|
||
;; Error on the style of log
|
||
"**/StdErrLogTest.java")
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-util")
|
||
#t))
|
||
(add-before 'build 'fix-test-sources
|
||
(lambda _
|
||
;; We need to fix issues caused by changes in newer versions of
|
||
;; jetty-test-helper
|
||
(let ((src "src/test/java/org/eclipse/jetty/util/resource"))
|
||
(substitute* (string-append src "/AbstractFSResourceTest.java")
|
||
(("testdir.getDir\\(\\)") "testdir.getPath().toFile()")
|
||
(("testdir.getFile\\(\"foo\"\\)")
|
||
"testdir.getPathFile(\"foo\").toFile()")
|
||
(("testdir.getFile\\(name\\)")
|
||
"testdir.getPathFile(name).toFile()")))
|
||
#t)))))))
|
||
|
||
(define-public java-eclipse-jetty-io
|
||
(package
|
||
(inherit java-eclipse-jetty-util)
|
||
(name "java-eclipse-jetty-io")
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-io.jar"
|
||
#:source-dir "src/main/java"
|
||
#:jdk ,icedtea-8
|
||
#:test-exclude (list "**/Abstract*.java"
|
||
;; Abstract class
|
||
"**/EndPointTest.java")
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-io")
|
||
#t)))))
|
||
(inputs
|
||
`(("slf4j" ,java-slf4j-api)
|
||
("servlet" ,java-javaee-servletapi)
|
||
("util" ,java-eclipse-jetty-util)))
|
||
(synopsis "Jetty :: IO Utility")
|
||
(description "The Jetty Web Server provides an HTTP server and Servlet
|
||
container capable of serving static and dynamic content either from a standalone
|
||
or embedded instantiation. This package provides IO-related utility classes.")))
|
||
|
||
(define-public java-eclipse-jetty-io-9.2
|
||
(package
|
||
(inherit java-eclipse-jetty-io)
|
||
(version (package-version java-eclipse-jetty-util-9.2))
|
||
(source (package-source java-eclipse-jetty-util-9.2))
|
||
(inputs
|
||
`(("util" ,java-eclipse-jetty-util-9.2)
|
||
,@(package-inputs java-eclipse-jetty-util-9.2)))
|
||
(native-inputs
|
||
`(("mockito" ,java-mockito-1)
|
||
("cglib" ,java-cglib)
|
||
("objenesis" ,java-objenesis)
|
||
("asm" ,java-asm)
|
||
,@(package-native-inputs java-eclipse-jetty-util-9.2)))))
|
||
|
||
(define-public java-eclipse-jetty-http
|
||
(package
|
||
(inherit java-eclipse-jetty-util)
|
||
(name "java-eclipse-jetty-http")
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-http.jar"
|
||
#:source-dir "src/main/java"
|
||
#:jdk ,icedtea-8
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-http")
|
||
#t))
|
||
(add-before 'build 'copy-resources
|
||
(lambda _
|
||
(mkdir-p "build/classes")
|
||
(copy-recursively "src/main/resources/" "build/classes/")
|
||
#t)))))
|
||
(inputs
|
||
`(("slf4j" ,java-slf4j-api)
|
||
("servlet" ,java-javaee-servletapi)
|
||
("io" ,java-eclipse-jetty-io)
|
||
("util" ,java-eclipse-jetty-util)))
|
||
(synopsis "Jetty :: Http Utility")
|
||
(description "The Jetty Web Server provides an HTTP server and Servlet
|
||
container capable of serving static and dynamic content either from a standalone
|
||
or embedded instantiation. This package provides HTTP-related utility classes.")))
|
||
|
||
(define-public java-eclipse-jetty-http-9.2
|
||
(package
|
||
(inherit java-eclipse-jetty-http)
|
||
(version (package-version java-eclipse-jetty-util-9.2))
|
||
(source (package-source java-eclipse-jetty-util-9.2))
|
||
(inputs
|
||
`(("util" ,java-eclipse-jetty-util-9.2)
|
||
("io" ,java-eclipse-jetty-io-9.2)
|
||
,@(package-inputs java-eclipse-jetty-util-9.2)))))
|
||
|
||
(define-public java-eclipse-jetty-jmx
|
||
(package
|
||
(inherit java-eclipse-jetty-util)
|
||
(name "java-eclipse-jetty-jmx")
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-jmx.jar"
|
||
#:source-dir "src/main/java"
|
||
#:jdk ,icedtea-8
|
||
#:tests? #f; FIXME: requires com.openpojo.validation
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-jmx")
|
||
#t)))))
|
||
(inputs
|
||
`(("slf4j" ,java-slf4j-api)
|
||
("servlet" ,java-javaee-servletapi)
|
||
("util" ,java-eclipse-jetty-util)))
|
||
(synopsis "Jetty :: JMX Management")
|
||
(description "The Jetty Web Server provides an HTTP server and Servlet
|
||
container capable of serving static and dynamic content either from a standalone
|
||
or embedded instantiation. This package provides the JMX management.")))
|
||
|
||
(define-public java-eclipse-jetty-jmx-9.2
|
||
(package
|
||
(inherit java-eclipse-jetty-jmx)
|
||
(version (package-version java-eclipse-jetty-util-9.2))
|
||
(source (package-source java-eclipse-jetty-util-9.2))
|
||
(inputs
|
||
`(("util" ,java-eclipse-jetty-util-9.2)
|
||
,@(package-inputs java-eclipse-jetty-util-9.2)))))
|
||
|
||
(define java-eclipse-jetty-http-test-classes
|
||
(package
|
||
(inherit java-eclipse-jetty-util)
|
||
(name "java-eclipse-jetty-http-test-classes")
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-http.jar"
|
||
#:source-dir "src/test"
|
||
#:tests? #f
|
||
#:jdk ,icedtea-8
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-http")
|
||
#t)))))
|
||
(inputs
|
||
`(("slf4j" ,java-slf4j-api)
|
||
("java-javaee-servletapi" ,java-javaee-servletapi)
|
||
("http" ,java-eclipse-jetty-http)
|
||
("io" ,java-eclipse-jetty-io)
|
||
("util" ,java-eclipse-jetty-util)))))
|
||
|
||
(define java-eclipse-jetty-http-test-classes-9.2
|
||
(package
|
||
(inherit java-eclipse-jetty-http-test-classes)
|
||
(version (package-version java-eclipse-jetty-util-9.2))
|
||
(source (package-source java-eclipse-jetty-util-9.2))
|
||
(inputs
|
||
`(("http" ,java-eclipse-jetty-http-9.2)
|
||
,@(package-inputs java-eclipse-jetty-http-9.2)))))
|
||
|
||
(define-public java-eclipse-jetty-server
|
||
(package
|
||
(inherit java-eclipse-jetty-util)
|
||
(name "java-eclipse-jetty-server")
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-server.jar"
|
||
#:source-dir "src/main/java"
|
||
#:jdk ,icedtea-8
|
||
#:tests? #f; requires a mockito version we don't have
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-server")
|
||
#t))
|
||
(add-before 'build 'fix-source
|
||
(lambda _
|
||
;; Explicit casts to prevent build failures
|
||
(substitute* "src/main/java/org/eclipse/jetty/server/Request.java"
|
||
(("append\\(LazyList")
|
||
"append((CharSequence)LazyList"))
|
||
(substitute*
|
||
"src/main/java/org/eclipse/jetty/server/handler/ContextHandler.java"
|
||
(((string-append
|
||
"Class<\\? extends EventListener> clazz = _classLoader==null"
|
||
"\\?Loader.loadClass\\(ContextHandler.class,className\\):"
|
||
"_classLoader.loadClass\\(className\\);"))
|
||
(string-append "Class<? extends EventListener> clazz = "
|
||
"(Class<? extends EventListener>) "
|
||
"(_classLoader==null?Loader.loadClass("
|
||
"ContextHandler.class,className):"
|
||
"_classLoader.loadClass(className));")))
|
||
#t)))))
|
||
(inputs
|
||
`(("slf4j" ,java-slf4j-api)
|
||
("servlet" ,java-javaee-servletapi)
|
||
("http" ,java-eclipse-jetty-http)
|
||
("io" ,java-eclipse-jetty-io)
|
||
("jmx" ,java-eclipse-jetty-jmx)
|
||
("util" ,java-eclipse-jetty-util)))
|
||
(native-inputs
|
||
`(("test-classes" ,java-eclipse-jetty-http-test-classes)
|
||
,@(package-native-inputs java-eclipse-jetty-util)))
|
||
(synopsis "Core jetty server artifact")
|
||
(description "The Jetty Web Server provides an HTTP server and Servlet
|
||
container capable of serving static and dynamic content either from a standalone
|
||
or embedded instantiation. This package provides the core jetty server
|
||
artifact.")))
|
||
|
||
(define-public java-eclipse-jetty-server-9.2
|
||
(package
|
||
(inherit java-eclipse-jetty-server)
|
||
(version (package-version java-eclipse-jetty-util-9.2))
|
||
(source (package-source java-eclipse-jetty-util-9.2))
|
||
(inputs
|
||
`(("util" ,java-eclipse-jetty-util-9.2)
|
||
("jmx" ,java-eclipse-jetty-jmx-9.2)
|
||
("io" ,java-eclipse-jetty-io-9.2)
|
||
("http" ,java-eclipse-jetty-http-9.2)
|
||
,@(package-inputs java-eclipse-jetty-util-9.2)))
|
||
(native-inputs
|
||
`(("test-classes" ,java-eclipse-jetty-http-test-classes-9.2)
|
||
,@(package-native-inputs java-eclipse-jetty-util-9.2)))))
|
||
|
||
(define-public java-eclipse-jetty-security
|
||
(package
|
||
(inherit java-eclipse-jetty-util)
|
||
(name "java-eclipse-jetty-security")
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-security.jar"
|
||
#:source-dir "src/main/java"
|
||
#:jdk ,icedtea-8
|
||
#:test-exclude (list "**/ConstraintTest.*") ; This test fails
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-security")
|
||
#t)))))
|
||
(inputs
|
||
`(("slf4j" ,java-slf4j-api)
|
||
("servlet" ,java-javaee-servletapi)
|
||
("http" ,java-eclipse-jetty-http)
|
||
("server" ,java-eclipse-jetty-server)
|
||
("util" ,java-eclipse-jetty-util)))
|
||
(native-inputs
|
||
`(("io" ,java-eclipse-jetty-io)
|
||
,@(package-native-inputs java-eclipse-jetty-util)))
|
||
(synopsis "Jetty security infrastructure")
|
||
(description "The Jetty Web Server provides an HTTP server and Servlet
|
||
container capable of serving static and dynamic content either from a standalone
|
||
or embedded instantiation. This package provides the core jetty security
|
||
infrastructure")))
|
||
|
||
(define-public java-eclipse-jetty-security-9.2
|
||
(package
|
||
(inherit java-eclipse-jetty-security)
|
||
(version (package-version java-eclipse-jetty-util-9.2))
|
||
(source (package-source java-eclipse-jetty-util-9.2))
|
||
(inputs
|
||
`(("util" ,java-eclipse-jetty-util-9.2)
|
||
("http" ,java-eclipse-jetty-http-9.2)
|
||
("server" ,java-eclipse-jetty-server-9.2)
|
||
,@(package-inputs java-eclipse-jetty-util-9.2)))
|
||
(native-inputs
|
||
`(("io" ,java-eclipse-jetty-io-9.2)
|
||
,@(package-native-inputs java-eclipse-jetty-util-9.2)))))
|
||
|
||
(define-public java-eclipse-jetty-servlet
|
||
(package
|
||
(inherit java-eclipse-jetty-util)
|
||
(name "java-eclipse-jetty-servlet")
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-servlet.jar"
|
||
#:source-dir "src/main/java"
|
||
#:jdk ,icedtea-8
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-servlet")
|
||
#t)))))
|
||
(inputs
|
||
`(("slf4j" ,java-slf4j-api)
|
||
("java-javaee-servletapi" ,java-javaee-servletapi)
|
||
("http" ,java-eclipse-jetty-http)
|
||
("http-test" ,java-eclipse-jetty-http-test-classes)
|
||
("io" ,java-eclipse-jetty-io)
|
||
("jmx" ,java-eclipse-jetty-jmx)
|
||
("security" ,java-eclipse-jetty-security)
|
||
("server" ,java-eclipse-jetty-server)
|
||
("util" ,java-eclipse-jetty-util)))
|
||
(synopsis "Jetty Servlet Container")
|
||
(description "The Jetty Web Server provides an HTTP server and Servlet
|
||
container capable of serving static and dynamic content either from a standalone
|
||
or embedded instantiation. This package provides the core jetty servlet
|
||
container.")))
|
||
|
||
(define-public java-eclipse-jetty-servlet-9.2
|
||
(package
|
||
(inherit java-eclipse-jetty-servlet)
|
||
(version (package-version java-eclipse-jetty-util-9.2))
|
||
(source (package-source java-eclipse-jetty-util-9.2))
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-servlet.jar"
|
||
#:source-dir "src/main/java"
|
||
#:jdk ,icedtea-8
|
||
#:tests? #f; doesn't work
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-servlet")
|
||
#t)))))
|
||
(inputs
|
||
`(("util" ,java-eclipse-jetty-util-9.2)
|
||
("jmx" ,java-eclipse-jetty-jmx-9.2)
|
||
("io" ,java-eclipse-jetty-io-9.2)
|
||
("http" ,java-eclipse-jetty-http-9.2)
|
||
("security" ,java-eclipse-jetty-security-9.2)
|
||
("http-test" ,java-eclipse-jetty-http-test-classes-9.2)
|
||
("server" ,java-eclipse-jetty-server-9.2)
|
||
,@(package-inputs java-eclipse-jetty-util-9.2)))))
|
||
|
||
(define-public java-eclipse-jetty-xml
|
||
(package
|
||
(inherit java-eclipse-jetty-util)
|
||
(name "java-eclipse-jetty-xml")
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-xml.jar"
|
||
#:source-dir "src/main/java"
|
||
#:jdk ,icedtea-8
|
||
#:tests? #f; most tests require network
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-xml")
|
||
#t)))))
|
||
(inputs
|
||
`(("java-eclipse-jetty-util" ,java-eclipse-jetty-util)))
|
||
(native-inputs
|
||
`(("java-eclipse-jetty-io" ,java-eclipse-jetty-io)
|
||
,@(package-native-inputs java-eclipse-jetty-util)))))
|
||
|
||
(define-public java-eclipse-jetty-xml-9.2
|
||
(package
|
||
(inherit java-eclipse-jetty-xml)
|
||
(version (package-version java-eclipse-jetty-util-9.2))
|
||
(source (package-source java-eclipse-jetty-util-9.2))
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-xml.jar"
|
||
#:source-dir "src/main/java"
|
||
#:jdk ,icedtea-8
|
||
#:tests? #f; most tests require network
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-xml")
|
||
#t)))))
|
||
(inputs
|
||
`(("java-eclipse-jetty-util-9.2" ,java-eclipse-jetty-util-9.2)
|
||
,@(package-inputs java-eclipse-jetty-util-9.2)))
|
||
(native-inputs
|
||
`(("java-eclipse-jetty-io-9.2" ,java-eclipse-jetty-io-9.2)
|
||
,@(package-native-inputs java-eclipse-jetty-util-9.2)))))
|
||
|
||
(define-public java-eclipse-jetty-webapp
|
||
(package
|
||
(inherit java-eclipse-jetty-util)
|
||
(name "java-eclipse-jetty-webapp")
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-webapp.jar"
|
||
#:source-dir "src/main/java"
|
||
#:jdk ,icedtea-8
|
||
;; One test fails
|
||
#:test-exclude (list "**/WebAppContextTest.java")
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-webapp")
|
||
#t)))))
|
||
(inputs
|
||
`(("java-eclipse-jetty-util" ,java-eclipse-jetty-util)
|
||
("java-eclipse-jetty-http" ,java-eclipse-jetty-http)
|
||
("java-eclipse-jetty-server" ,java-eclipse-jetty-server)
|
||
("java-eclipse-jetty-servlet" ,java-eclipse-jetty-servlet)
|
||
("java-eclipse-jetty-security" ,java-eclipse-jetty-security)
|
||
("java-eclipse-jetty-xml" ,java-eclipse-jetty-xml)
|
||
("java-javaee-servletapi" ,java-javaee-servletapi)))
|
||
(native-inputs
|
||
`(("java-eclipse-jetty-io" ,java-eclipse-jetty-io)
|
||
,@(package-native-inputs java-eclipse-jetty-util)))))
|
||
|
||
(define-public java-eclipse-jetty-webapp-9.2
|
||
(package
|
||
(inherit java-eclipse-jetty-webapp)
|
||
(version (package-version java-eclipse-jetty-util-9.2))
|
||
(source (package-source java-eclipse-jetty-util-9.2))
|
||
(arguments
|
||
`(#:jar-name "eclipse-jetty-webapp.jar"
|
||
#:source-dir "src/main/java"
|
||
#:jdk ,icedtea-8
|
||
#:test-exclude (list "**/WebAppContextTest.java")
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'chdir
|
||
(lambda _
|
||
(chdir "jetty-webapp")
|
||
#t)))))
|
||
(inputs
|
||
`(("java-eclipse-jetty-util-9.2" ,java-eclipse-jetty-util-9.2)
|
||
("java-eclipse-jetty-http-9.2" ,java-eclipse-jetty-http-9.2)
|
||
("java-eclipse-jetty-server-9.2" ,java-eclipse-jetty-server-9.2)
|
||
("java-eclipse-jetty-servlet-9.2" ,java-eclipse-jetty-servlet-9.2)
|
||
("java-eclipse-jetty-security-9.2" ,java-eclipse-jetty-security-9.2)
|
||
("java-eclipse-jetty-xml-9.2" ,java-eclipse-jetty-xml-9.2)
|
||
("java-javaee-servletapi" ,java-javaee-servletapi)
|
||
,@(package-inputs java-eclipse-jetty-util-9.2)))
|
||
(native-inputs
|
||
`(("java-eclipse-jetty-io-9.2" ,java-eclipse-jetty-io-9.2)
|
||
,@(package-native-inputs java-eclipse-jetty-util-9.2)))))
|
||
|
||
(define-public java-jsoup
|
||
(package
|
||
(name "java-jsoup")
|
||
(version "1.10.3")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/jhy/jsoup")
|
||
(commit (string-append "jsoup-" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"1hdpdx0x140r5x3yc251v7dj1h4j5a7nh9k885aw9q5vvz49lkf4"))))
|
||
(build-system ant-build-system)
|
||
(arguments
|
||
`(#:jar-name "jsoup.jar"
|
||
#:source-dir "src/main/java"
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'build 'copy-resources
|
||
(lambda _
|
||
(let ((classes-dir (string-append (getcwd) "/build/classes")))
|
||
(with-directory-excursion "src/main/java"
|
||
(for-each (lambda (file)
|
||
(let ((dist (string-append classes-dir "/" file)))
|
||
(mkdir-p (dirname dist))
|
||
(copy-file file dist)))
|
||
(find-files "." ".*.properties"))))
|
||
#t)))))
|
||
(native-inputs
|
||
`(("java-junit" ,java-junit)
|
||
("java-hamcrest-core" ,java-hamcrest-core)
|
||
("java-gson" ,java-gson)))
|
||
(home-page "https://jsoup.org")
|
||
(synopsis "HTML parser")
|
||
(description "Jsoup is a Java library for working with real-world HTML. It
|
||
provides a very convenient API for extracting and manipulating data, using the
|
||
best of DOM, CSS, and jQuery-like methods.")
|
||
(license license:expat)))
|
||
|
||
(define-public java-signpost-core
|
||
(package
|
||
(name "java-signpost-core")
|
||
(version "1.2.1.2")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/mttkay/signpost")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"1l04yj2znch3hpyw90c4g4jan453w7d88l84bgl0c72i2kbb8z7h"))))
|
||
(build-system ant-build-system)
|
||
(arguments
|
||
`(#:jar-name "signpost-core.jar"
|
||
#:source-dir "signpost-core/src/main/java"
|
||
#:test-dir "signpost-core/src/test"
|
||
;; Tests all fail with InstantiationException from mockito
|
||
#:tests? #f))
|
||
(propagated-inputs
|
||
`(("java-commons-codec" ,java-commons-codec)))
|
||
(home-page "https://github.com/mttkay/signpost")
|
||
(synopsis "Lightweight client-side OAuth library for Java")
|
||
(description "Signpost is the easy and intuitive solution for signing
|
||
HTTP messages on the Java platform in conformance with the OAuth Core 1.0a
|
||
standard. Signpost follows a modular and flexible design, allowing you to
|
||
combine it with different HTTP messaging layers.")
|
||
(license license:asl2.0)))
|
||
|
||
(define-public tidyp
|
||
(package
|
||
(name "tidyp")
|
||
(version "1.04")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://github.com/downloads/petdance/tidyp/tidyp-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0f5ky0ih4vap9c6j312jn73vn8m2bj69pl2yd3a5nmv35k9zmc10"))))
|
||
(build-system gnu-build-system)
|
||
;; ./test-thing.sh tries to run ./testall.sh, which is not included.
|
||
(arguments `(#:tests? #f))
|
||
(home-page "http://www.tidyp.com/")
|
||
(synopsis "Validate HTML")
|
||
(description "Tidyp is a program that can validate your HTML, as well as
|
||
modify it to be more clean and standard. tidyp does not validate HTML 5.
|
||
|
||
libtidyp is the library on which the program is based. It can be used by any
|
||
other program that can interface to it. The Perl module @code{HTML::Tidy} is
|
||
based on this library, allowing Perl programmers to easily validate HTML.")
|
||
;; See htmldoc/license.html
|
||
(license license:bsd-3)))
|
||
|
||
(define-public perl-html-tidy
|
||
(package
|
||
(name "perl-html-tidy")
|
||
(version "1.60")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "mirror://cpan/authors/id/P/PE/PETDANCE/HTML-Tidy-"
|
||
version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1iyp2fd6j75cn1xvcwl2lxr8qpjxssy2360cyqn6g3kzd1fzdyxw"))))
|
||
(build-system perl-build-system)
|
||
(arguments
|
||
'(#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'fix-tidyp-paths
|
||
(lambda* (#:key inputs #:allow-other-keys)
|
||
(substitute* "Makefile.PL"
|
||
(("^my \\$inc = \"" line)
|
||
(string-append line
|
||
"-I" (assoc-ref inputs "tidyp") "/include/tidyp "))
|
||
(("-L/usr/lib")
|
||
(string-append
|
||
"-L" (assoc-ref inputs "tidyp") "/lib")))
|
||
#t)))))
|
||
(inputs
|
||
`(("perl-libwww" ,perl-libwww)
|
||
("tidyp" ,tidyp)))
|
||
(native-inputs
|
||
`(("perl-test-exception" ,perl-test-exception)))
|
||
(home-page "https://metacpan.org/release/HTML-Tidy")
|
||
(synopsis "(X)HTML validation in a Perl object")
|
||
(description "@code{HTML::Tidy} is an HTML checker in a handy dandy
|
||
object. It's meant as a replacement for @code{HTML::Lint}, which is written
|
||
in Perl but is not nearly as capable as @code{HTML::Tidy}.")
|
||
(license license:artistic2.0)))
|
||
|
||
(define-public geomyidae
|
||
(package
|
||
(name "geomyidae")
|
||
(version "0.34")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "git://r-36.net/geomyidae")
|
||
(commit (string-append "v" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "02afgrk36wkdkflyqr2xgh49v9zq6ma454jshk7igvhpxfb5l3ks"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:make-flags (list "CC=gcc"
|
||
(string-append "PREFIX="
|
||
(assoc-ref %outputs "out")))
|
||
#:tests? #f ; no tests
|
||
#:phases (modify-phases %standard-phases
|
||
(delete 'configure))))
|
||
(home-page "http://r-36.net/scm/geomyidae/file/README.html")
|
||
(synopsis "Small Gopher server")
|
||
(description
|
||
"Geomyidae is a server for distributed hypertext protocol Gopher. Its
|
||
features include:
|
||
|
||
@enumerate
|
||
@item Gopher menus (see @file{index.gph} for an example);
|
||
@item directory listings (if no @file{index.gph} was found);
|
||
@item CGI support (@file{.cgi} files are executed);
|
||
@item search support in CGI files;
|
||
@item logging with multiple log levels.
|
||
@end enumerate\n")
|
||
(license license:expat)))
|
||
|
||
(define-public cat-avatar-generator
|
||
(package
|
||
(name "cat-avatar-generator")
|
||
(version "1")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://framagit.org/Deevad/cat-avatar-generator.git")
|
||
(commit "71c0c662742cafe8afd2d2d50ec84243113e35ad")))
|
||
(file-name (string-append name "-" version))
|
||
(sha256
|
||
(base32
|
||
"0s7b5whqsmfa57prbgl66ym551kg6ly0z14h5dgrlx4lqm70y2yw"))))
|
||
(build-system trivial-build-system)
|
||
(arguments
|
||
`(#:modules ((guix build utils))
|
||
#:builder
|
||
(begin
|
||
(use-modules (guix build utils)
|
||
(srfi srfi-1)
|
||
(srfi srfi-26))
|
||
|
||
(let ((source (assoc-ref %build-inputs "source"))
|
||
(php-dir (string-append %output "/share/web/" ,name "/")))
|
||
;; The cache directory must not be in the store, but in a writable
|
||
;; location. The webserver will give us this location.
|
||
(copy-recursively source php-dir)
|
||
(substitute* (string-append php-dir "/cat-avatar-generator.php")
|
||
(("\\$cachepath = .*")
|
||
"if(isset($_SERVER['CACHE_DIR']))
|
||
$cachepath = $_SERVER['CACHE_DIR'];
|
||
else
|
||
die('You need to set the CACHE_DIR variable first.');"))
|
||
#t))))
|
||
(home-page "https://framagit.org/Deevad/cat-avatar-generator")
|
||
(synopsis "Random avatar generator")
|
||
(description "Cat avatar generator is a generator of cat pictures optimised
|
||
to generate random avatars, or defined avatar from a \"seed\". This is a
|
||
derivation by David Revoy from the original MonsterID by Andreas Gohr.")
|
||
;; expat for the code, CC-BY 4.0 for the artwork
|
||
(license (list license:expat
|
||
license:cc-by4.0))))
|
||
|
||
(define-public nghttp2
|
||
(package
|
||
(name "nghttp2")
|
||
(version "1.40.0")
|
||
(replacement nghttp2-1.41)
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://github.com/nghttp2/nghttp2/"
|
||
"releases/download/v" version "/"
|
||
"nghttp2-" version ".tar.xz"))
|
||
(sha256
|
||
(base32
|
||
"0wwhwv7cvi1vxpdjwvg0kpa4jzhszclpnwrwfcw728zz53a47z09"))))
|
||
(build-system gnu-build-system)
|
||
(outputs (list "out"
|
||
"lib")) ; only libnghttp2
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)
|
||
|
||
;; Required by tests.
|
||
("cunit" ,cunit)
|
||
("tzdata" ,tzdata-for-tests)))
|
||
(inputs
|
||
;; Required to build the tools (i.e. without ‘--enable-lib-only’).
|
||
`(("c-ares" ,c-ares)
|
||
("jansson" ,jansson) ; for HPACK tools
|
||
,@(if (hurd-target?) '()
|
||
`(("jemalloc" ,jemalloc))) ; fight nghttpd{,x} heap fragmentation
|
||
("libev" ,libev)
|
||
("libxml2" ,libxml2) ; for ‘nghttp -a’
|
||
("openssl" ,openssl)
|
||
,@(if (hurd-target?)
|
||
`(("openssl-static" ,openssl "static"))
|
||
'())))
|
||
(arguments
|
||
`(#:configure-flags
|
||
(list (string-append "--libdir=" (assoc-ref %outputs "lib") "/lib")
|
||
"--enable-app" ; build all the tools
|
||
"--enable-hpack-tools" ; ...all the tools
|
||
"--disable-examples"
|
||
"--disable-static") ; don't bother building .a files
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'break-circular-reference
|
||
;; libnghttp2.pc by default retains a reference to the ‘out’ output,
|
||
;; which is not allowed. Break this cycle. While we could install
|
||
;; only the library to ‘out’ and move everything else to a separate
|
||
;; output, this would inconvenience the majority of (human) users.
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(substitute* "lib/libnghttp2.pc.in"
|
||
(("@prefix@")
|
||
(assoc-ref outputs "lib")))
|
||
#t))
|
||
(add-before 'check 'set-timezone-directory
|
||
(lambda* (#:key inputs native-inputs #:allow-other-keys)
|
||
(setenv "TZDIR" (string-append
|
||
(assoc-ref (or native-inputs inputs) "tzdata")
|
||
"/share/zoneinfo"))
|
||
#t)))))
|
||
(home-page "https://nghttp2.org/")
|
||
(synopsis "HTTP/2 protocol client, proxy, server, and library")
|
||
(description
|
||
"nghttp2 implements the Hypertext Transfer Protocol, version
|
||
2 (@dfn{HTTP/2}).
|
||
|
||
A reusable C library provides the HTTP/2 framing layer, with several tools built
|
||
on top of it:
|
||
|
||
@itemize
|
||
@item @command{nghttp}, a command-line HTTP/2 client. It exposes many advanced
|
||
and low-level aspects of the protocol and is useful for debugging.
|
||
@item @command{nghttpd}, a fast, multi-threaded HTTP/2 static web server that
|
||
serves files from a local directory.
|
||
@item @command{nghttpx}, a fast, multi-threaded HTTP/2 reverse proxy that can be
|
||
deployed in front of existing web servers that don't support HTTP/2.
|
||
Both @command{nghttpd} and @command{nghttpx} can fall back to HTTP/1.1 for
|
||
backwards compatibility with clients that don't speak HTTP/2.
|
||
@item @command{h2load} for benchmarking (only!) your own HTTP/2 servers.
|
||
@item HTTP/2 uses a header compression method called @dfn{HPACK}.
|
||
nghttp2 provides a HPACK encoder and decoder as part of its public API.
|
||
@item @command{deflatehd} converts JSON data or HTTP/1-style header fields to
|
||
compressed JSON header blocks.
|
||
@item @command{inflatehd} converts such compressed headers back to JSON pairs.
|
||
@end itemize\n")
|
||
(license license:expat)))
|
||
|
||
(define-public nghttp2-1.41 ;fixes CVE-2020-11080
|
||
(package
|
||
(inherit nghttp2)
|
||
(version "1.41.0")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://github.com/nghttp2/nghttp2/"
|
||
"releases/download/v" version "/"
|
||
"nghttp2-" version ".tar.xz"))
|
||
(sha256
|
||
(base32
|
||
"1hk77vngjmvvzb5y1gi1aqwf6qywrc7yak08zvzb7x81qs6mphmb"))))))
|
||
|
||
(define-public hpcguix-web
|
||
(let ((commit "9de63562b06b4aef3a3afe5ecb18d3c91e57ee74")
|
||
(revision "5"))
|
||
(package
|
||
(name "hpcguix-web")
|
||
(version (git-version "0.0.1" revision commit))
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/UMCUGenetics/hpcguix-web")
|
||
(commit commit)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"0wjgj2s7v2cyz6dx24c111rxs99i84sfvxl4ch8brnh02j2606jz"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:modules ((guix build gnu-build-system)
|
||
(guix build utils)
|
||
(srfi srfi-26)
|
||
(ice-9 popen)
|
||
(ice-9 rdelim))
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'set-variables
|
||
(lambda _
|
||
;; This prevents a few warnings
|
||
(setenv "GUILE_AUTO_COMPILE" "0")
|
||
(setenv "XDG_CACHE_HOME" (getcwd))
|
||
#t))
|
||
(add-after 'install 'wrap-program
|
||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||
(let* ((out (assoc-ref outputs "out"))
|
||
(guix (assoc-ref inputs "guix"))
|
||
(guile (assoc-ref inputs "guile"))
|
||
(gcrypt (assoc-ref inputs "guile-gcrypt"))
|
||
(git (assoc-ref inputs "guile-git"))
|
||
(bs (assoc-ref inputs "guile-bytestructures"))
|
||
(json (assoc-ref inputs "guile-json"))
|
||
(guile-cm (assoc-ref inputs
|
||
"guile-commonmark"))
|
||
(deps (list guile gcrypt git bs guile-cm guix json))
|
||
(effective
|
||
(read-line
|
||
(open-pipe* OPEN_READ
|
||
(string-append guile "/bin/guile")
|
||
"-c" "(display (effective-version))")))
|
||
(path (string-join
|
||
(map (cut string-append <>
|
||
"/share/guile/site/"
|
||
effective)
|
||
deps)
|
||
":"))
|
||
(gopath (string-join
|
||
(map (cut string-append <>
|
||
"/lib/guile/" effective
|
||
"/site-ccache")
|
||
deps)
|
||
":")))
|
||
(wrap-program (string-append out "/bin/run")
|
||
`("GUILE_LOAD_PATH" ":" prefix (,path))
|
||
`("GUILE_LOAD_COMPILED_PATH" ":" prefix (,gopath)))
|
||
|
||
#t))))))
|
||
(native-inputs
|
||
`(("autoconf" ,autoconf)
|
||
("automake" ,automake)
|
||
("uglify-js" ,uglify-js)
|
||
("pkg-config" ,pkg-config)))
|
||
(inputs
|
||
`(("guile" ,@(assoc-ref (package-native-inputs guix) "guile"))
|
||
("guix" ,guix)))
|
||
(propagated-inputs
|
||
`(("guile" ,@(assoc-ref (package-native-inputs guix) "guile"))
|
||
("guile-commonmark" ,guile-commonmark)
|
||
("guile-json" ,guile-json-4)))
|
||
(home-page "https://github.com/UMCUGenetics/hpcguix-web")
|
||
(synopsis "Web interface for cluster deployments of Guix")
|
||
(description "Hpcguix-web provides a web interface to the list of packages
|
||
provided by Guix. The list of packages is searchable and provides
|
||
instructions on how to use Guix in a shared HPC environment.")
|
||
(license license:agpl3+))))
|
||
|
||
(define-public httrack
|
||
(package
|
||
(name "httrack")
|
||
(version "3.49.2")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "https://mirror.httrack.com/historical/"
|
||
"httrack-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"09a0gm67nml86qby1k1gh7rdxamnrnzwr6l9r5iiq94favjs0xrl"))))
|
||
(build-system gnu-build-system)
|
||
(inputs
|
||
`(("libressl" ,libressl)
|
||
("zlib" ,zlib)))
|
||
(home-page "https://www.httrack.com/")
|
||
(synopsis "Easy-to-use offline browser utility")
|
||
(description "HTTrack allows you to download a World Wide Web site from
|
||
the Internet to a local directory, building recursively all directories,
|
||
getting HTML, images, and other files from the server to your computer.
|
||
|
||
HTTrack arranges the original site's relative link-structure. Simply open
|
||
a page of the @emph{mirrored} website in your browser, and you can browse the
|
||
site from link to link, as if you were viewing it online. HTTrack can also
|
||
update an existing mirrored site, and resume interrupted downloads.
|
||
|
||
HTTrack is fully configurable, and has an integrated help system.")
|
||
(license license:gpl3+)))
|
||
|
||
(define-public buku
|
||
(package
|
||
(name "buku")
|
||
(version "4.4")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (pypi-uri "buku" version))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"1g1xhdskfn72xaraqzz2v8dl2iza7bzfpn17z2wdrzkq3ih7yvgg"))))
|
||
(build-system python-build-system)
|
||
(arguments
|
||
`(#:tests? #f)) ;FIXME: many tests need network access
|
||
(inputs
|
||
`(("python-beautifulsoup4" ,python-beautifulsoup4)
|
||
("python-certifi" ,python-certifi)
|
||
("python-cryptography" ,python-cryptography)
|
||
("python-html5lib" ,python-html5lib)
|
||
("python-urllib3" ,python-urllib3)))
|
||
(home-page "https://github.com/jarun/buku")
|
||
(synopsis "Bookmark manager")
|
||
(description
|
||
"buku is a powerful bookmark manager written in Python3 and SQLite3.
|
||
@command{buku} can auto-import bookmarks from your browser and present them
|
||
in an interactive command-line interface that lets you compose and update
|
||
bookmarks directly. It can also present them in a web interface with
|
||
@command{bukuserver}.")
|
||
(license license:gpl3+)))
|
||
|
||
(define-public anonip
|
||
(package
|
||
(name "anonip")
|
||
(version "1.0.0")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (pypi-uri "anonip" version))
|
||
(sha256
|
||
(base32
|
||
"0ckn9nnfhpdnz8b92q8pkysdqj6pdh71ckfqvfj0z01cq0hzbhd2"))))
|
||
(build-system python-build-system)
|
||
(home-page "https://github.com/DigitaleGesellschaft/Anonip")
|
||
(synopsis "Anonymize IP addresses in log files")
|
||
(description
|
||
"Anonip masks the last bits of IPv4 and IPv6 addresses in log files.
|
||
That way most of the relevant information is preserved, while the IP address
|
||
does not match a particular individuum anymore.
|
||
|
||
Depending on your Web server, the log entries may be piped to Anonip directly
|
||
or via a FIFO (named pipe). Thus the unmasked IP addresses will never be
|
||
written to any file.
|
||
|
||
It's also possible to rewrite existing log files.
|
||
|
||
Anonip can also be uses as a Python module in your own Python application.")
|
||
(license license:bsd-3)))
|
||
|
||
(define-public poussetaches
|
||
(package
|
||
(name "poussetaches")
|
||
(version "0.0.2")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/tsileo/poussetaches")
|
||
(commit version)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"0kckcwvqklavd855np9aq5js6mg84isrlwchr504yigwma0sm7hm"))))
|
||
(build-system go-build-system)
|
||
(propagated-inputs
|
||
`(("go-github-com-robfig-cron" ,go-github-com-robfig-cron)
|
||
("go-golang-org-x-time" ,go-golang-org-x-time)))
|
||
(arguments
|
||
`(#:import-path "github.com/tsileo/poussetaches"))
|
||
(home-page "https://github.com/tsileo/poussetaches")
|
||
(synopsis "Lightweight asynchronous task execution service")
|
||
(description "Poussetaches (which literally means \"push tasks\" in
|
||
French) is a lightweight asynchronous task execution service that aims to
|
||
replace Celery and RabbitMQ for small Python applications.
|
||
|
||
The app posts base64-encoded payload to poussetaches and specifies the
|
||
endpoint that will be used to trigger the task. Poussetaches makes HTTP
|
||
requests with the registered payload until the right status code is
|
||
returned.")
|
||
(license license:isc)))
|
||
|
||
(define-public htmlcxx
|
||
(package
|
||
(name "htmlcxx")
|
||
(version "0.87")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri
|
||
(string-append "mirror://sourceforge/htmlcxx/v"
|
||
version "/htmlcxx-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1j3mzjlczjrk4ahc43s6kzpvzypzjmqz4sillnca5yadrwwgjf2x"))))
|
||
(build-system gnu-build-system)
|
||
(home-page "http://htmlcxx.sourceforge.net/")
|
||
(synopsis "Simple non-validating CSS1 and HTML parser for C++")
|
||
(description "htmlcxx is a simple non-validating CSS1 and HTML parser for
|
||
C++. Although there are several other HTML parsers available, htmlcxx has some
|
||
characteristics that make it unique:
|
||
@itemize
|
||
@item STL like navigation of DOM tree, using excelent's tree.hh library from
|
||
Kasper Peeters
|
||
@item It is possible to reproduce exactly, character by character, the original
|
||
document from the parse tree
|
||
@item Bundled CSS parser
|
||
@item Optional parsing of attributes
|
||
@item C++ code that looks like C++ (not so true anymore)
|
||
@item Offsets of tags/elements in the original document are stored in the nodes
|
||
of the DOM tree
|
||
@end itemize")
|
||
(license (list license:lgpl2.0
|
||
license:gpl2
|
||
license:asl2.0))))
|
||
|
||
(define-public librocket
|
||
(package
|
||
(name "librocket")
|
||
(version "1.3.0.0")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri
|
||
(git-reference
|
||
(url "https://github.com/libRocket/libRocket")
|
||
(commit (string-append "release-" version))))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32 "1n6gq007vqijyfasfnfg6c8d2rc9qarl4bhzbgkz062m4h5izlfs"))))
|
||
(build-system cmake-build-system)
|
||
(arguments
|
||
`(#:tests? #f ; No tests.
|
||
#:phases
|
||
(modify-phases %standard-phases
|
||
(add-after 'unpack 'chdir
|
||
(lambda _
|
||
(chdir "Build"))))))
|
||
(inputs
|
||
`(("freetype" ,freetype)))
|
||
(home-page "https://github.com/libRocket/libRocket") ; http://librocket.com/ is down.
|
||
(synopsis "HTML/CSS user interface library")
|
||
(description "libRocket is a C++ user interface package based on the HTML
|
||
and CSS standards. libRocket uses the open standards XHTML1.0 and
|
||
CSS2.0 (while borrowing features from HTML5 and CSS3), and extends them with
|
||
features suited towards real-time applications. It is designed as a complete
|
||
solution for any project's interface needs:
|
||
|
||
@itemize
|
||
@item Dynamic layout system.
|
||
@item Efficient application-wide styling, with a custom-built templating engine.
|
||
@item Fully featured control set: buttons, sliders, drop-downs, etc.
|
||
@item Runtime visual debugging suite.
|
||
@item Easily integrated and extensible with Python or Lua scripting.
|
||
@end itemize\n")
|
||
(license license:expat)))
|
||
|
||
(define-public gmnisrv
|
||
(let ((commit "d484ba0ab0020866535a44be5948c9482b8f2b8d")
|
||
(revision "1"))
|
||
(package
|
||
(name "gmnisrv")
|
||
(version (git-version "0" revision commit))
|
||
(home-page "https://git.sr.ht/~sircmpwn/gmnisrv")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url home-page)
|
||
(commit commit)))
|
||
(sha256
|
||
(base32
|
||
"11phipixsxx1jgm42agp76p5s68l0zj65kgb41vzaymgwcq79ivn"))
|
||
(file-name (git-file-name name version))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'set-variables
|
||
(lambda _
|
||
(setenv "CC" "gcc")
|
||
#t))
|
||
(delete 'check))))
|
||
(inputs
|
||
`(("openssl" ,openssl)))
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)
|
||
("scdoc" ,scdoc)))
|
||
(propagated-inputs
|
||
`(("mailcap" ,mailcap)))
|
||
(synopsis "Simple Gemini protocol server")
|
||
(description "gmnisrv is a simple Gemini protocol server written in C.")
|
||
(license (list license:gpl3+
|
||
license:bsd-3))))) ;; for ini.c and ini.h
|
||
|
||
(define-public libzim
|
||
(package
|
||
(name "libzim")
|
||
(version "6.2.2")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/openzim/libzim")
|
||
(commit version)))
|
||
(sha256
|
||
(base32
|
||
"0p2317cp19lx0hw9n4fsb3nw2vc4hc1yyi98k3yrs41pkr840kwa"))
|
||
(file-name (git-file-name name version))))
|
||
(build-system meson-build-system)
|
||
(arguments
|
||
;; TODO: Find out why tests fail.
|
||
'(#:tests? #f))
|
||
(inputs
|
||
`(("icu4c" ,icu4c)
|
||
("liblzma" ,xz)
|
||
("libuuid" ,util-linux "lib")
|
||
("xapian" ,xapian)
|
||
("zlib" ,zlib)
|
||
("zstd" ,zstd "lib")))
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)
|
||
("googletest" ,googletest)))
|
||
(home-page "https://wiki.openzim.org/wiki/Main_Page")
|
||
(synopsis "Reference implementation of the ZIM specification")
|
||
(description "The openZIM project proposes offline storage solutions for
|
||
content coming from the Web. The zimlib is the standard implementation of the
|
||
ZIM specification. It is a library which implements the read and write method
|
||
for ZIM files.")
|
||
(license license:gpl2)))
|
||
|
||
(define-public kiwix-lib
|
||
(package
|
||
(name "kiwix-lib")
|
||
(version "9.4.0")
|
||
(home-page "https://github.com/kiwix/kiwix-lib/")
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url home-page)
|
||
(commit version)))
|
||
(sha256
|
||
(base32
|
||
"0nsm4qgl0cb6wv983n0px1kf217k4kykb8q56b8j6ikp061lzamm"))
|
||
(file-name (git-file-name name version))))
|
||
(build-system meson-build-system)
|
||
(arguments
|
||
`(#:phases
|
||
(modify-phases %standard-phases
|
||
(add-before 'configure 'fix-paths-and-includes
|
||
(lambda* (#:key inputs #:allow-other-keys)
|
||
(setenv "CPPFLAGS" (string-append "-I" (assoc-ref inputs "mustache")))
|
||
(substitute* "src/aria2.cpp"
|
||
(("ARIA2_CMD \"aria2c\"")
|
||
(string-append "ARIA2_CMD \""
|
||
(assoc-ref inputs "aria2")
|
||
"/bin/aria2c\"")))
|
||
#t)))))
|
||
(inputs
|
||
`(("aria2" ,aria2)
|
||
("curl" ,curl)
|
||
("icu4c" ,icu4c)
|
||
("libmicrohttpd" ,libmicrohttpd)
|
||
("libzim" ,libzim)
|
||
("pugixml" ,pugixml)
|
||
("xapian" ,xapian)
|
||
("zlib" ,zlib)
|
||
("zstd" ,zstd "lib")))
|
||
(native-inputs
|
||
`(("mustache" ,(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/kainjow/Mustache")
|
||
;; XXX: Readme says to use version 3. Can we use 3.2.1?
|
||
(commit "v4.1")))
|
||
(file-name (git-file-name "mustache" "4.1"))
|
||
(sha256
|
||
(base32
|
||
"0r9rbk6v1wpld2ismfsk2lkhbyv3dkf0p03hkjivbj05qkfhvlbb"))))
|
||
("pkg-config" ,pkg-config)))
|
||
(synopsis "Common code base for all Kiwix ports")
|
||
(description "The Kiwix library provides the Kiwix software suite core.
|
||
It contains the code shared by all Kiwix ports.")
|
||
(license license:gpl3)))
|
||
|
||
(define-public kiwix-desktop
|
||
(package
|
||
(name "kiwix-desktop")
|
||
(version "2.0.5")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://download.kiwix.org/release/kiwix-desktop/kiwix-desktop-"
|
||
version
|
||
".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1a9h4qmh6fkfscyp6lax0ri07dvvzw2wp4kr1sm86n0bdk3cwwha"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
`(#:phases
|
||
(modify-phases %standard-phases
|
||
(replace 'configure
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(invoke "qmake"
|
||
(string-append "PREFIX="
|
||
(assoc-ref outputs "out")))))
|
||
(add-before 'configrue 'enable-print-support
|
||
(lambda _
|
||
(substitute* "kiwix-desktop.pro"
|
||
(("webenginewidgets") "webenginewidgets printsupport"))
|
||
#t))
|
||
(add-before 'configure 'substitute-source
|
||
;; Looks like .pro file is missing a feature.
|
||
;; See https://github.com/kiwix/kiwix-desktop/issues/556.
|
||
(lambda* (#:key inputs #:allow-other-keys)
|
||
(substitute* "kiwix-desktop.pro"
|
||
(("webenginewidgets" all) (string-append all " printsupport")))
|
||
#t)))))
|
||
(inputs
|
||
`(("curl" ,curl)
|
||
("icu4c" ,icu4c)
|
||
("kiwix-lib" ,kiwix-lib)
|
||
("libzim" ,libzim)
|
||
("pugixml" ,pugixml)
|
||
("qtbase" ,qtbase)
|
||
("qtdeclarative" ,qtdeclarative)
|
||
("qtwebchannel" ,qtwebchannel)
|
||
("qtwebengine" ,qtwebengine)
|
||
("xapian" ,xapian)
|
||
("zlib" ,zlib)
|
||
("zstd" ,zstd "lib")))
|
||
(native-inputs
|
||
`(("pkg-config" ,pkg-config)
|
||
("qmake" ,qtbase)))
|
||
(home-page "https://wiki.kiwix.org/wiki/Software")
|
||
(synopsis "Viewer and manager of ZIM files")
|
||
(description "Kiwix Desktop allows you to enjoy a lot of different content
|
||
offline (such as Wikipedia), without any access to Internet.")
|
||
(license license:gpl3)))
|
||
|
||
(define-public uriparser
|
||
(let ((commit "25dddb16cf044a7df27884e7ad3911baaaca3d7c")
|
||
(revision "1"))
|
||
(package
|
||
(name "uriparser")
|
||
(version (git-version "0.9.4" revision commit))
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/uriparser/uriparser")
|
||
(commit commit)))
|
||
(file-name (git-file-name name version))
|
||
(sha256
|
||
(base32
|
||
"1ffzia679axcsccx2fxjpxhb0i5xc42zxn446x6c1170w6v69qf6"))))
|
||
(build-system cmake-build-system)
|
||
(native-inputs `(("gtest" ,googletest)
|
||
("doxygen" ,doxygen)
|
||
("graphviz" ,graphviz)))
|
||
(synopsis "Strictly RFC 3986 compliant URI parsing and handling library")
|
||
(description "uriparser is a strictly RFC 3986 compliant URI parsing and
|
||
handling library written in C89 (\"ANSI C\"). uriparser is fast and supports
|
||
Unicode.")
|
||
(home-page "https://uriparser.github.io/")
|
||
(license license:bsd-3))))
|