;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2012, 2013, 2014, 2015, 2016, 2018 Ludovic Courtès ;;; Copyright © 2012, 2013, 2014, 2015, 2016 Andreas Enge ;;; Copyright © 2013, 2017 Cyril Roelandt ;;; Copyright © 2014, 2016 David Thompson ;;; Copyright © 2014, 2015, 2016, 2018 Mark H Weaver ;;; Copyright © 2014, 2015 Eric Bavier ;;; Copyright © 2015, 2016 Sou Bunnbu ;;; Copyright © 2015 Leo Famulari ;;; Copyright © 2015 Eric Dvorsak ;;; Copyright © 2016 Hartmut Goebel ;;; Copyright © 2016 Christine Lemmer-Webber ;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020, 2021, 2022 Efraim Flashner ;;; Copyright © 2016, 2017 Nikita ;;; Copyright © 2016, 2017, 2018 Roel Janssen ;;; Copyright © 2016 David Craven ;;; Copyright © 2016 Jan Nieuwenhuizen ;;; Copyright © 2016 Andy Patterson ;;; Copyright © 2016 Danny Milosavljevic ;;; Copyright © 2016-2022 Marius Bakke ;;; Copyright © 2017, 2018 Julien Lepiller ;;; Copyright © 2017, 2020 Thomas Danckaert ;;; Copyright © 2017 Jelle Licht ;;; Copyright © 2017 Adriano Peluso ;;; Copyright © 2017, 2021 Arun Isaac ;;; Copyright © 2017–2022 Tobias Geerinckx-Rice ;;; Copyright © 2017, 2018 Alex Vong ;;; Copyright © 2017, 2018 Ben Woodcroft ;;; Copyright © 2017 Rutger Helling ;;; Copyright © 2017, 2018, 2019 Pierre Langlois ;;; Copyright © 2015, 2017, 2018, 2019, 2021, 2022 Ricardo Wurmus ;;; Copyright © 2017 Kristofer Buffington ;;; Copyright © 2018 Amirouche Boubekki ;;; Copyright © 2018 Joshua Sierles, Nextjournal ;;; Copyright © 2018, 2021, 2022 Maxim Cournoyer ;;; Copyright © 2019 Jack Hill ;;; Copyright © 2019 Alex Griffin ;;; Copyright © 2019 Gábor Boskovits ;;; Copyright © 2019, 2021, 2022 Guillaume Le Vaillant ;;; Copyright © 2020 Pierre Neidhardt ;;; Copyright © 2020, 2021 Nicolò Balzarotti ;;; Copyright © 2020 Tanguy Le Carrour ;;; Copyright © 2020 Lars-Dominik Braun ;;; Copyright © 2020 Guy Fleury Iteriteka ;;; Copyright © 2020 Michael Rohleder ;;; Copyright © 2020 Vinicius Monego ;;; Copyright © 2020 Vincent Legoll ;;; Copyright © 2021 Sharlatan Hellseher ;;; Copyright © 2021 Greg Hogan ;;; Copyright © 2021 David Larsson ;;; Copyright © 2021 Pjotr Prins ;;; Copyright © 2021 Bonface Munyoki Kilyungi ;;; Copyright © 2021 Simon Streit ;;; Copyright © 2021 Alexandre Hannud Abdo ;;; Copyright © 2021 Simon Tournier ;;; Copyright © 2021 jgart ;;; Copyright © 2021 Foo Chuan Wei ;;; Copyright © 2022 Zhu Zihao ;;; ;;; 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 . (define-module (gnu packages databases) #:use-module (gnu packages) #:use-module (gnu packages admin) #:use-module (gnu packages algebra) #:use-module (gnu packages autotools) #:use-module (gnu packages avahi) #:use-module (gnu packages base) #:use-module (gnu packages bash) #:use-module (gnu packages bison) #:use-module (gnu packages boost) #:use-module (gnu packages check) #:use-module (gnu packages cmake) #:use-module (gnu packages compression) #:use-module (gnu packages cpp) #:use-module (gnu packages crypto) #:use-module (gnu packages curl) #:use-module (gnu packages cyrus-sasl) #:use-module (gnu packages dbm) #:use-module (gnu packages emacs) #:use-module (gnu packages flex) #:use-module (gnu packages freedesktop) #:use-module (gnu packages gawk) #:use-module (gnu packages gcc) #:use-module (gnu packages gettext) #:use-module (gnu packages glib) #:use-module (gnu packages gnome) #:use-module (gnu packages gnupg) #:use-module (gnu packages golang) #:use-module (gnu packages gtk) #:use-module (gnu packages guile) #:use-module (gnu packages icu4c) #:use-module (gnu packages jemalloc) #:use-module (gnu packages language) #:use-module (gnu packages libedit) #:use-module (gnu packages libevent) #:use-module (gnu packages linux) #:use-module (gnu packages lisp) #:use-module (gnu packages lisp-xyz) #:use-module (gnu packages llvm) #:use-module (gnu packages logging) #:use-module (gnu packages man) #:use-module (gnu packages maths) #:use-module (gnu packages multiprecision) #:use-module (gnu packages ncurses) #:use-module (gnu packages networking) #:use-module (gnu packages onc-rpc) #:use-module (gnu packages pantheon) #:use-module (gnu packages parallel) #:use-module (gnu packages pcre) #:use-module (gnu packages perl) #:use-module (gnu packages perl-check) #:use-module (gnu packages perl-web) #:use-module (gnu packages pkg-config) #:use-module (gnu packages popt) #:use-module (gnu packages protobuf) #:use-module (gnu packages python) #:use-module (gnu packages python-check) #:use-module (gnu packages python-crypto) #:use-module (gnu packages python-science) #:use-module (gnu packages python-web) #:use-module (gnu packages python-xyz) #:use-module (gnu packages qt) #:use-module (gnu packages rdf) #:use-module (gnu packages readline) #:use-module (gnu packages regex) #:use-module (gnu packages rpc) #:use-module (gnu packages ruby) #:use-module (gnu packages serialization) #:use-module (gnu packages sphinx) #:use-module (gnu packages ssh) #:use-module (gnu packages sqlite) #:use-module (gnu packages tcl) #:use-module (gnu packages terminals) #:use-module (gnu packages texinfo) #:use-module (gnu packages textutils) #:use-module (gnu packages time) #:use-module (gnu packages tls) #:use-module (gnu packages valgrind) #:use-module (gnu packages web) #:use-module (gnu packages xdisorg) #:use-module (gnu packages xml) #:use-module (guix gexp) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) #:use-module (guix download) #:use-module (guix bzr-download) #:use-module (guix git-download) #:use-module (guix hg-download) #:use-module (guix build-system emacs) #: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 ruby) #:use-module (guix build-system cmake) #:use-module (guix build-system scons) #:use-module (guix build-system trivial) #:use-module (guix utils) #:use-module (srfi srfi-1) #:use-module (srfi srfi-26) #:use-module (ice-9 match)) (define-public 4store (package (name "4store") (version "1.1.6") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/4store/4store") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "1kzdfmwpzy64cgqlkcz5v4klwx99w0jk7afckyf7yqbqb4rydmpk")) (patches (search-patches "4store-unset-preprocessor-directive.patch" "4store-fix-buildsystem.patch")))) (build-system gnu-build-system) (native-inputs (list perl python-2 autoconf automake gettext-minimal libtool `(,pcre "bin") ;for 'pcre-config' pkg-config)) (inputs (list glib rasqal libxml2 raptor2 readline avahi cyrus-sasl openssl `(,util-linux "lib"))) ;; http://www.4store.org has been down for a while now. (home-page "https://github.com/4store/4store") (synopsis "Clustered RDF storage and query engine") (description "4store is a RDF/SPARQL store written in C, supporting either single machines or networked clusters.") (license license:gpl3+))) (define-public ephemeralpg (package (name "ephemeralpg") (version "3.1") (source (origin (method url-fetch) (uri (string-append "https://eradman.com/ephemeralpg/code/ephemeralpg-" version ".tar.gz")) (sha256 (base32 "1ap22ki8yz6agd0qybcjgs4b9izw1rwwcgpxn3jah2ccfyax34s6")))) (build-system gnu-build-system) (arguments `(#:make-flags (list (string-append "CC=" ,(cc-for-target)) (string-append "PREFIX=" %output)) #:phases (modify-phases %standard-phases (delete 'configure) ; no configure script (add-after 'install 'wrap (lambda* (#:key inputs outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) (wrap-program (string-append out "/bin/pg_tmp") `("PATH" ":" prefix (,(string-append (assoc-ref inputs "util-linux") "/bin") ,(string-append (assoc-ref inputs "postgresql") "/bin") ;; For getsocket. ,(string-append out "/bin"))))) #t))) #:test-target "test")) (inputs (list postgresql util-linux)) (native-inputs ;; For tests. (list ruby which)) (home-page "https://eradman.com/ephemeralpg/") (synopsis "Run temporary PostgreSQL databases") (description "@code{pg_tmp} creates temporary PostgreSQL databases, suitable for tasks like running software test suites. Temporary databases created with @code{pg_tmp} have a limited shared memory footprint and are automatically garbage-collected after a configurable number of seconds (the default is 60).") (license license:isc))) (define-public es-dump-restore (package (name "es-dump-restore") (version "2.1.0") (source (origin (method url-fetch) (uri (rubygems-uri "es_dump_restore" version)) (sha256 (base32 "020yk7f1hw48clmf5501z3xv9shsdchyymcv0y2cci2c1xvr1mim")))) (build-system ruby-build-system) (arguments '(#:tests? #f)) ;; No testsuite. (propagated-inputs (list ruby-httpclient ruby-multi-json ruby-progress_bar ruby-rubyzip ruby-thor)) (synopsis "Utility for dumping and restoring ElasticSearch indexes") (description "This package provides a utility for dumping the contents of an ElasticSearch index to a compressed file and restoring the dumpfile back to an ElasticSearch server") (home-page "https://github.com/patientslikeme/es_dump_restore") (license license:expat))) (define-public firebird (package (name "firebird") (version "3.0.7") (source (let ((revision "33374-0")) (origin (method url-fetch) (uri (string-append "https://github.com/FirebirdSQL/" "firebird/releases/download/R" (string-replace-substring version "." "_") "/" "Firebird-" version "." revision ".tar.bz2")) (sha256 (base32 "0xpy1bncz36c6n28y7kllm1dkrdkn4vb4gw2n43f2351mznmrf5c")) (modules '((guix build utils))) (snippet `(begin (for-each delete-file-recursively (list "extern/btyacc/test" ; TODO: package and remove entirely "extern/editline" "extern/icu" "extern/libtommath" "extern/zlib" "src/include/firebird/impl/boost" ;; Missing licence. "builds/install/arch-specific/solaris" "extern/SfIO" "src/msgs/templates.sql" ;; Generated files missing sources. "doc/Firebird-3-QuickStart.pdf" (string-append "doc/Firebird-" ,version "-ReleaseNotes.pdf") "doc/README.SecureRemotePassword.html")) #t))))) (build-system gnu-build-system) (outputs (list "debug" "out")) (arguments `(#:configure-flags (let ((out (assoc-ref %outputs "out"))) (list (string-append "--with-fbsbin=" out "/sbin") (string-append "--with-fbdoc=" out "/share/doc/" ,name "-" ,version) (string-append "--with-fbconf=" out "/lib/firebird") (string-append "--with-fbintl=" out "/lib/firebird/intl") (string-append "--with-fbmisc=" out "/lib/firebird/misc") (string-append "--with-fbmsg=" out "/lib/firebird") (string-append "--with-fbplugins=" out "/lib/firebird/plugins") (string-append "--with-fbudf=" out "/lib/firebird/UDF") "--with-fbglock=/run/firebird" "--with-fblog=/var/log/firebird" "--with-fbhelp=/var/lib/firebird/system" "--with-fbsecure-db=/var/lib/firebird/secure" "--without-fbsample" "--without-fbsample-db" "--with-system-editline")) #:make-flags (list (string-append "CC=" ,(cc-for-target)) ;; The plugins/ can't find libfbclient otherwise. (string-append "LDFLAGS=-Wl,-rpath=" (assoc-ref %outputs "out") "/lib")) #:tests? #f ; no test suite #:modules ((guix build gnu-build-system) (guix build utils) (srfi srfi-26)) #:phases (modify-phases %standard-phases (add-after 'unpack 'use-system-boost (lambda _ (substitute* "src/include/firebird/Message.h" (("\"\\./impl/boost/preprocessor/seq/for_each_i\\.hpp\"") "") (("FB_BOOST_") "BOOST_")) #t)) (add-after 'unpack 'patch-installation (lambda _ (substitute* "builds/install/arch-specific/linux/makeInstallImage.sh.in" (("/bin/sh") (which "bash")) ;; Remove shell script helpers from $PATH. (("(addLibs|cp) .*\\.sh .*@FB_SBINDIR@") ":") ;; Put files where Guix users expect them. (("(License\\.txt.*)@FB_CONFDIR" match) (string-append match "@FB_DOCDIR@")) (("@FB_CONFDIR@(.*License\\.txt.*)" match) (string-append "@FB_DOCDIR@" match)) (("(cp .*/doc/.*)@FB_CONFDIR@(.*)" _ head tail) (string-append head "@FB_DOCDIR@" tail "\n"))) (substitute* (list "builds/install/posix-common/changeServerMode.sh.in" "builds/install/posix-common/install.sh.in") ;; Skip phases that (could) cause problems in Guix. (("check(InstallUser|IfServerRunning|Libraries)|addFirebirdUser") ":") ;; Skip phases that are merely pointless on Guix. (("buildUninstallFile|installInitdScript|startFirebird") ":") ;; Omit randomly generated password with bonus timestamp. (("setDBAPassword") ":")) ;; These promote proprietary workflows not relevant on Guix. (for-each delete-file-recursively (find-files "doc" "README\\.(build\\.msvc|NT|Win)")) #t)) (add-after 'configure 'delete-init-scripts (lambda _ (delete-file-recursively "gen/install/misc") #t)) (add-before 'build 'set-build-environment-variables (lambda _ ;; ‘isql’ needs to run & find libfbclient.so during the build. ;; This doubles as a rudimentary test in lieu of a test suite. (setenv "LD_LIBRARY_PATH" (string-append (assoc-ref %build-inputs "icu4c") "/lib")) #t)) (add-before 'install 'keep-embedded-debug-symbols (lambda _ ;; Let the gnu-build-system separate & deal with them later. ;; XXX Upstream would use ‘--strip-unneeded’, shaving a whole ;; megabyte off Guix's 7.7M libEngine12.so, for example. (substitute* "gen/Makefile.install" (("readelf") "false")) #t)) (add-after 'install 'prune-undesirable-files (lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) (with-directory-excursion out ;; Remove example binaries. (for-each delete-file-recursively (find-files "." "example")) ;; Delete (now-)empty directories. (for-each rmdir (list "include/firebird/impl" "lib/firebird/plugins/udr")) #t))))))) (inputs (list boost editline icu4c-67 libtommath ncurses zlib)) (home-page "https://www.firebirdsql.org") (synopsis "Relational database with many ANSI SQL standard features") (description "Firebird is an SQL @acronym{RDBMS, relational database management system} with rich support for ANSI SQL (e.g., @code{INSERT...RETURNING}) including @acronym{UDFs, user-defined functions} and PSQL stored procedures, cursors, and triggers. Transactions provide full ACID-compliant referential integrity. The database requires very little manual maintenance once set up, making it ideal for small business or embedded use. When installed as a traditional local or remote (network) database server, Firebird can grow to terabyte scale with proper tuning---although PostgreSQL may be a better choice for such very large environments. Firebird can also be embedded into stand-alone applications that don't want or need a full client & server. Used in this manner, it offers richer SQL support than SQLite as well as the option to seamlessly migrate to a client/server database later.") (properties `((lint-hidden-cve . ("CVE-2017-6369")))) (license ;; See doc/license/README.license.usage.txt for rationale & details. (list license:bsd-3 ; src/common/sha2/ license:bsd-4 ; src/common/enc.cpp license:gpl2+ ; builds/posix/make.defaults (license:non-copyleft "file:///builds/install/misc/IPLicense.txt" "InterBase Public License v1.0") (license:non-copyleft "file:///builds/install/misc/IDPLicense.txt" "Initial Developer's Public License v1.0") license:lgpl2.1 ; exception for OSI-compatible licences license:mpl1.1 ; examples/interfaces/0{6,8}*.cpp license:public-domain)))) ; including files without explicit licence (define-public leveldb (package (name "leveldb") (version "1.23") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/google/leveldb") (commit version))) (file-name (git-file-name name version)) (sha256 (base32 "1chxkhb6ajdmj4p8535k4472fbmqvcismll6aapkarsr45yrvgs4")))) (build-system cmake-build-system) (arguments (list #:configure-flags #~(list "-DBUILD_SHARED_LIBS=ON" "-DLEVELDB_BUILD_TESTS=ON" ;; Don't install(!) the third_party test frameworks below. "-DINSTALL_GTEST=OFF" "-DBENCHMARK_ENABLE_INSTALL=OFF") #:phases #~(modify-phases %standard-phases ;; Ceph uses leveldb and depends on RTTI. (add-after 'unpack 'allow-RTTI (lambda _ (substitute* "CMakeLists.txt" (("set\\(CMAKE_CXX_FLAGS \"\\$\\{CMAKE_CXX_FLAGS\\} -fno-rtti\"\\)") "")))) (add-after 'unpack 'unpack-third_party-sources ;; These are only for testing, so copying source is fine. (lambda _ (copy-recursively #$(package-source googletest) "third_party/googletest") (copy-recursively #$(package-source googlebenchmark) "third_party/benchmark")))))) (inputs (list snappy)) (home-page "https://github.com/google/leveldb") (synopsis "Fast key-value storage library") (description "LevelDB is a fast key-value storage library that provides an ordered mapping from string keys to string values.") (license license:bsd-3))) (define-public memcached (package (name "memcached") (version "1.6.15") (source (origin (method url-fetch) (uri (string-append "https://memcached.org/files/memcached-" version ".tar.gz")) (sha256 (base32 "05fmds73hr71bha9gszjfp02lgyacqfyyhkgl6xysy4kchyvwyld")))) (build-system gnu-build-system) (inputs (list libevent cyrus-sasl)) (home-page "https://memcached.org/") (synopsis "In-memory caching service") (description "Memcached is an in-memory key-value store. It has a small and generic API, and was originally intended for use with dynamic web applications.") (license license:bsd-3))) (define-public libmemcached (package (name "libmemcached") (version "1.0.18") ;; We build from the sources since we want to build the extra HTML ;; documentation which is not included with the release. (source (origin (method bzr-fetch) (uri (bzr-reference (url "lp:libmemcached/1.0") (revision (string-append "tag:" version)))) (file-name (string-append name "-" version "-checkout")) (sha256 (base32 "1842s4dxdh21gdr46q4dgxigidcs6dkqnbnqjwb9l8r0bqx5nb10")) (patches (search-patches "libmemcached-build-with-gcc7.patch")))) (build-system gnu-build-system) (native-inputs (list memcached libtool autoconf automake bison flex perl python-sphinx)) ;to build the HTML doc. (inputs (list libevent cyrus-sasl)) (outputs '("out" "doc")) (arguments '(#:tests? #f ;many tests fail and use too much time #:phases (modify-phases %standard-phases (add-before 'bootstrap 'fix-configure.ac ;; Move the AC_CONFIG_AUX_DIR macro use under AC_INIT, otherwise we ;; get the error ``configure: error: cannot find install-sh, ;; install.sh, or shtool in "." "./.." "./../.."`` (see: ;; https://debbugs.gnu.org/cgi/bugreport.cgi?bug=19539 and ;; https://bugs.launchpad.net/libmemcached/+bug/1803922). (lambda _ (delete-file "bootstrap.sh") ;not useful in the context of Guix (substitute* "configure.ac" (("^AC_CONFIG_AUX_DIR\\(\\[build-aux\\]\\).*") "") (("^AC_INIT.*" anchor) (string-append anchor "AC_CONFIG_AUX_DIR([build-aux])\n"))))) (add-before 'build 'build-and-install-html-doc (lambda* (#:key outputs #:allow-other-keys) (let ((html (string-append (assoc-ref outputs "doc") "/share/doc/libmemcached/html/"))) (invoke "make" "install-html") ;; Cleanup useless files. (for-each delete-file-recursively (map (lambda (x) (string-append html x)) '("_sources" ".doctrees" ".buildinfo"))))))))) (home-page "https://libmemcached.org/libMemcached.html") (synopsis "C++ library for memcached") (description "libMemcached is a library to use memcached in C/C++ applications. It comes with a complete reference guide and documentation of the API, and provides features such as: @itemize @item Asynchronous and synchronous transport support @item Consistent hashing and distribution @item Tunable hashing algorithm to match keys @item Access to large object support @item Local replication @end itemize") (license license:bsd-3))) (define-public python-pylibmc (package (name "python-pylibmc") (version "1.6.1") (source (origin (method url-fetch) (uri (pypi-uri "pylibmc" version)) (sha256 (base32 "1sg7d9j0v6g3xg3finf4l1hb72c13vcyyi6rqrc9shbx903d93ca")))) (build-system python-build-system) (arguments '(#:phases (modify-phases %standard-phases (add-before 'check 'start-memcached-daemon ;; The test suite requires a memcached server. (lambda _ (invoke "memcached" "-d")))))) (native-inputs (list memcached python-nose)) (inputs (list libmemcached zlib cyrus-sasl)) (home-page "http://sendapatch.se/projects/pylibmc/") (synopsis "Python client for memcached") (description "@code{pylibmc} is a client in Python for memcached. It is a wrapper around TangentOrg’s libmemcached library, and can be used as a drop-in replacement for the code@{python-memcached} library.") (license license:bsd-3))) (define-public go-github-com-bradfitz-gomemcache (package (name "go-github-com-bradfitz-gomemcache") (version "0.0.0-20190913173617-a41fca850d0b") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/bradfitz/gomemcache") (commit (go-version->git-ref version)))) (file-name (git-file-name name version)) (sha256 (base32 "18qpds6xr73jy80pj7l3pc1l1ndcy3va2dl8fzk17bgwg49sxwfz")) (modules '((guix build utils))) (snippet '(begin ;; Fixes the 'untyped-int -> string of one rune' issue. ;; https://github.com/golang/go/issues/32479 (substitute* "memcache/memcache_test.go" (("string\\(0x7f") "string(rune(0x7f)")))))) (build-system go-build-system) (arguments '(#:unpack-path "github.com/bradfitz/gomemcache" #:import-path "github.com/bradfitz/gomemcache/memcache")) (home-page "https://github.com/bradfitz/gomemcache") (synopsis "Memcache client library in Go") (description "This is a memcache client library for the Go programming language.") (license license:asl2.0))) (define-public go-github-com-couchbase-gomemcached (package (name "go-github-com-couchbase-gomemcached") (version "0.1.4") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/couchbase/gomemcached") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "10w74gc05x5naspls39sv2r92krrg31mk266w3lyqqwc0s3fxysl")))) (build-system go-build-system) (arguments '(#:import-path "github.com/couchbase/gomemcached")) (native-inputs (list go-github-com-stretchr-testify)) (home-page "https://github.com/couchbase/gomemcached") (synopsis "Memcached binary protocol toolkit for go") (description "This package provides memcache client and server functionality.") (license license:expat))) (define-public litecli (package (name "litecli") (version "1.6.0") (source (origin (method url-fetch) (uri (pypi-uri "litecli" version)) (sha256 (base32 "1yb706mgzizzijm1k0fbny98jf58qh5q6f2870rbplxlfla4w9sd")))) (build-system python-build-system) (propagated-inputs (list python-cli-helpers python-click python-configobj python-prompt-toolkit python-pygments python-sqlparse)) (native-inputs (list python-mock python-pytest)) (home-page "https://litecli.com") (synopsis "CLI for SQLite databases") (description "@code{litecli} is a command-line client for SQLite databases that has auto-completion and syntax highlighting.") (license license:bsd-3))) (define-public python-pgspecial (package (name "python-pgspecial") (version "1.13.0") (source (origin (method url-fetch) (uri (pypi-uri "pgspecial" version)) (sha256 (base32 "00ddkf565rjcxmfml1z4mmkns1aq8x5s5g85xmnz2scln42y4irq")))) (build-system python-build-system) (propagated-inputs (list python-click python-sqlparse python-psycopg2)) (home-page "https://github.com/dbcli/pgspecial") (synopsis "Python implementation of PostgreSQL meta commands (backslash commands)") (description "This Python package provides an API to execute meta-commands (AKA \"special\", or \"backslash commands\") on PostgreSQL.") (license license:bsd-3))) (define-public pgcli (package (name "pgcli") (version "3.2.0") (source (origin (method url-fetch) (uri (pypi-uri "pgcli" version)) (sha256 (base32 "1dy6yzak696107pqv83296h0xhc3ahlfaydm80593gwn37krgpkc")))) (build-system python-build-system) (propagated-inputs (list python-cli-helpers python-click python-configobj python-pendulum python-pgspecial python-prompt-toolkit python-psycopg2 python-pygments python-setproctitle python-sqlparse)) (native-inputs (list python-ipython-sql)) (home-page "https://www.pgcli.com") (synopsis "PostgreSQL CLI with autocompletion and syntax highlighting") (description "@code{pgcli} is a command line interface for PostgreSQL with autocompletion and syntax highlighting.") (license license:bsd-3))) (define-public mycli (package (name "mycli") (version "1.24.1") (source (origin (method url-fetch) (uri (pypi-uri "mycli" version)) (sha256 (base32 "0rij9nw20zhqr7cqnkm8daw8b1wdc9zb6ny1ji9qz5557nz9i3bl")))) (build-system python-build-system) (arguments '(#:tests? #f ; tests expect a running MySQL #:phases (modify-phases %standard-phases (add-after 'unpack 'loosen-requirements (lambda _ ;; Permit newer versions of sqlparse. (substitute* "setup.py" (("<0\\.4\\.0") "<0.5.0"))))))) (propagated-inputs (list python-cli-helpers python-click python-configobj python-cryptography python-prompt-toolkit python-pyaes python-pygments python-pymysql python-pyperclip python-sqlparse)) (home-page "https://www.mycli.net") (synopsis "Terminal Client for MySQL with AutoCompletion and Syntax Highlighting") (description "MyCLI is a command line interface for MySQL, MariaDB, and Percona with auto-completion and syntax highlighting.") (license license:bsd-3))) ;; XXX When updating, check whether boost-for-mysql is still needed. ;; It might suffice to patch ‘cmake/boost.cmake’ as done in the past. (define-public mysql (package (name "mysql") (version "5.7.33") (source (origin (method url-fetch) (uri (list (string-append "https://dev.mysql.com/get/Downloads/MySQL-" (version-major+minor version) "/" name "-" version ".tar.gz") (string-append "https://downloads.mysql.com/archives/get/file/" name "-" version ".tar.gz"))) (sha256 (base32 "1bb343mf7n0qg2qz497gxjsqprygrjz1q1pbz76hgqxnsy08sfxd")))) (build-system cmake-build-system) (arguments `(#:configure-flags '("-DBUILD_CONFIG=mysql_release" "-DWITH_SSL=system" "-DWITH_ZLIB=system" "-DDEFAULT_CHARSET=utf8" "-DDEFAULT_COLLATION=utf8_general_ci" "-DMYSQL_DATADIR=/var/lib/mysql" "-DMYSQL_UNIX_ADDR=/run/mysqld/mysqld.sock" "-DINSTALL_INFODIR=share/mysql/docs" "-DINSTALL_MANDIR=share/man" "-DINSTALL_PLUGINDIR=lib/mysql/plugin" "-DINSTALL_SCRIPTDIR=bin" "-DINSTALL_INCLUDEDIR=include/mysql" "-DINSTALL_DOCREADMEDIR=share/mysql/docs" "-DINSTALL_SUPPORTFILESDIR=share/mysql" "-DINSTALL_MYSQLSHAREDIR=share/mysql" "-DINSTALL_DOCDIR=share/mysql/docs" "-DINSTALL_SHAREDIR=share/mysql" ;; Get rid of test data. "-DINSTALL_MYSQLTESTDIR=" "-DINSTALL_SQLBENCHDIR=") #:phases (modify-phases %standard-phases (add-after 'install 'remove-extra-binaries (lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) ;; Remove the 3 *_embedded files, which weigh in at ;; 14 MiB each. (for-each delete-file (find-files (string-append out "/bin") "_embedded$")) #t))) (add-after 'install 'wrap-mysql_helpers (lambda* (#:key inputs outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (bin (string-append out "/bin")) (awk (assoc-ref inputs "gawk")) (coreutils (assoc-ref inputs "coreutils")) (grep (assoc-ref inputs "grep")) (ps (assoc-ref inputs "procps")) (sed (assoc-ref inputs "sed"))) (wrap-program (string-append bin "/mysql_config") `("PATH" ":" suffix (,(string-append awk "/bin") ,(string-append coreutils "/bin") ,(string-append sed "/bin")))) (wrap-program (string-append bin "/mysqld_safe") `("PATH" ":" suffix (,(string-append awk "/bin") ,(string-append coreutils "/bin") ,(string-append grep "/bin") ,(string-append ps "/bin") ,(string-append sed "/bin")))) #t)))))) (native-inputs (list bison perl pkg-config)) (inputs (list boost-for-mysql coreutils gawk grep libaio libtirpc ncurses openssl procps rpcsvc-proto ; rpcgen sed zlib)) (home-page "https://www.mysql.com/") (synopsis "Fast, easy to use, and popular database") (description "MySQL is a fast, reliable, and easy to use relational database management system that supports the standardized Structured Query Language.") (license license:gpl2))) (define-public mariadb (package (name "mariadb") (version "10.5.12") (source (origin (method url-fetch) (uri (string-append "https://downloads.mariadb.com/MariaDB" "/mariadb-" version "/source/mariadb-" version ".tar.gz")) (sha256 (base32 "1gg4h9ahmk78cx01zyw0fqr6hhd78fsyhs0s34p3gi9hkak1qkxb")) (modules '((guix build utils))) (snippet '(begin ;; Delete bundled snappy and xz. (delete-file-recursively "storage/tokudb/PerconaFT/third_party") (substitute* "storage/tokudb/PerconaFT/CMakeLists.txt" ;; This file checks that the bundled sources are present and ;; declares build procedures for them. (("^include\\(TokuThirdParty\\)") "")) (substitute* "storage/tokudb/PerconaFT/ft/CMakeLists.txt" ;; Don't attempt to use the procedures we just removed. ((" build_lzma build_snappy") "")) ;; Preserve CMakeLists.txt for these. (for-each (lambda (file) (unless (string-suffix? "CMakeLists.txt" file) (delete-file file))) (append (find-files "extra/wolfssl") (find-files "zlib"))))))) (build-system cmake-build-system) (outputs '("out" "lib" "dev")) (arguments `(#:configure-flags (list "-DBUILD_CONFIG=mysql_release" ;; Linking with libarchive fails, like this: ;; ld: /gnu/store/...-libarchive-3.2.2/lib/libarchive.a(archive_entry.o): ;; relocation R_X86_64_32 against `.bss' can not be used when ;; making a shared object; recompile with -fPIC ;; For now, disable the features that that use libarchive (xtrabackup). "-DWITH_LIBARCHIVE=OFF" ;; Disable the TokuDB engine, because its test suite frequently fails, ;; and loading it crashes the server: . "-DTOKUDB_OK=OFF" ;; Ensure the system libraries are used. "-DWITH_JEMALLOC=yes" "-DWITH_PCRE=system" "-DWITH_SSL=system" "-DWITH_ZLIB=system" "-DDEFAULT_CHARSET=utf8" "-DDEFAULT_COLLATION=utf8_general_ci" "-DMYSQL_DATADIR=/var/lib/mysql" "-DMYSQL_UNIX_ADDR=/run/mysqld/mysqld.sock" ;; Do not install the benchmark suite. "-DINSTALL_SQLBENCHDIR=false" (string-append "-DCMAKE_INSTALL_PREFIX=" (assoc-ref %outputs "lib")) (string-append "-DCMAKE_INSTALL_RPATH=" (assoc-ref %outputs "lib") "/lib") (string-append "-DINSTALL_INFODIR=" (assoc-ref %outputs "out") "/share/mysql/docs") (string-append "-DINSTALL_MANDIR=" (assoc-ref %outputs "out") "/share/man") (string-append "-DINSTALL_SCRIPTDIR=" (assoc-ref %outputs "out") "/bin") (string-append "-DINSTALL_BINDIR=" (assoc-ref %outputs "out") "/bin") "-DCMAKE_INSTALL_LIBDIR=lib" "-DINSTALL_PLUGINDIR=lib/mysql/plugin" (string-append "-DINSTALL_INCLUDEDIR=" (assoc-ref %outputs "dev") "/include/mysql") (string-append "-DINSTALL_DOCREADMEDIR=" (assoc-ref %outputs "out") "/share/mysql/docs") (string-append "-DINSTALL_DOCDIR=" (assoc-ref %outputs "out") "/share/mysql/docs") (string-append "-DINSTALL_SUPPORTFILESDIR=" (assoc-ref %outputs "out") "/share/mysql/support-files") "-DINSTALL_MYSQLSHAREDIR=share/mysql" "-DINSTALL_SHAREDIR=share") ;; The test suite has spurious failures (mostly timeouts) if run in ;; parallel on various machines. Only enable parallel tests on ;; architectures which are likely to not have this issue. #:parallel-tests? ,(target-x86-64?) #:phases (modify-phases %standard-phases ,@(if (target-ppc32?) `((add-after 'unpack 'apply-libatomics-patch (lambda* (#:key inputs #:allow-other-keys) (let ((patch-file (assoc-ref inputs "mariadb-link-libatomic.patch"))) (invoke "patch" "-p1" "-i" patch-file))))) '()) (add-after 'unpack 'adjust-output-references (lambda _ ;; The build system invariably prepends $CMAKE_INSTALL_PREFIX ;; to other variables such as $INSTALL_INCLUDEDIR, which does ;; not work when the latter uses an absolute file name. (substitute* "libmariadb/mariadb_config/mariadb_config.c.in" (("%s/@INSTALL_INCLUDEDIR@") (string-append "@INSTALL_INCLUDEDIR@")) ;; As of 10.5.8, the mariadb_config program tries to be ;; clever and computes the installation directory relative ;; to /proc/self/exe when running on Linux. Make it fall ;; back to the old behaviour. (("defined\\(__linux__\\)") "0")) (substitute* "libmariadb/mariadb_config/libmariadb.pc.in" (("\\$\\{prefix\\}/@INSTALL_INCLUDEDIR@") "@INSTALL_INCLUDEDIR@")) (substitute* "support-files/mariadb.pc.in" (("^(include|bin|script|doc|man)dir=\\$\\{prefix\\}/" _ dir) (string-append dir "dir="))) (substitute* "include/CMakeLists.txt" (("\\\\\\$\\{CMAKE_INSTALL_PREFIX\\}/\\$\\{INSTALL_INCLUDEDIR\\}") "${INSTALL_INCLUDEDIR}")) (substitute* "cmake/mariadb_connector_c.cmake" (("\\\\\\$\\{CMAKE_INSTALL_PREFIX\\}/\\$\\{INSTALL_BINDIR\\}") "${INSTALL_BINDIR}")))) (add-after 'unpack 'adjust-tests (lambda _ (let ((disabled-tests '(;; These fail because root@hostname == root@localhost in ;; the build environment, causing a user count mismatch. ;; See . "main.explain_non_select" "main.upgrade_MDEV-19650" "roles.acl_statistics" ;; Probably same as above, test failure reported upstream: ;; . "main.selectivity_no_engine" ;; FIXME: This test checks various table encodings and ;; fails because Guix defaults to UTF8 instead of the ;; upstream default latin1_swedish_ci. It's not easily ;; substitutable because several encodings are tested. "main.system_mysql_db" ;; XXX: This test occasionally fails on i686-linux: ;; ,@(if (string-prefix? "i686" (%current-system)) '("main.myisampack") '()))) ;; This file contains a list of known-flaky tests for this ;; release. Append our own items. (unstable-tests (open-file "mysql-test/unstable-tests" "a"))) (for-each (lambda (test) (format unstable-tests "~a : ~a\n" test "Disabled in Guix")) disabled-tests) (close-port unstable-tests) ;; XXX: These fail because they expect a latin1 charset and ;; collation. See . (substitute* '("mysql-test/main/gis_notembedded.result" "mysql-test/main/system_mysql_db.result") (("latin1_swedish_ci") "utf8_general_ci") (("\tlatin1") "\tutf8")) (substitute* "mysql-test/suite/binlog/t/binlog_mysqlbinlog_stop_never.test" (("/bin/bash") (which "bash"))) (substitute* "mysql-test/mysql-test-run.pl" (("/bin/ls") (which "ls")) (("/bin/sh") (which "sh")))))) (add-before 'configure 'disable-plugins (lambda _ (let ((disable-plugin (lambda (name) (call-with-output-file (string-append "plugin/" name "/CMakeLists.txt") (lambda (port) (format port "\n"))))) (disabled-plugins '(;; XXX: Causes a test failure. "disks"))) (for-each disable-plugin disabled-plugins)))) (replace 'check (lambda* (#:key (tests? #t) parallel-tests? #:allow-other-keys) (if tests? (with-directory-excursion "mysql-test" (invoke "./mtr" "--verbose" "--retry=3" "--suite=main" "--testcase-timeout=40" "--suite-timeout=600" "--parallel" (number->string (if parallel-tests? (parallel-job-count) 1)) ;; Skip the replication tests: they are very I/O ;; intensive and frequently causes indeterministic ;; failures even on powerful hardware. "--skip-rpl" "--skip-test-list=unstable-tests")) (format #t "test suite not run~%")))) (add-after 'install 'post-install (lambda* (#:key inputs outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (dev (assoc-ref outputs "dev")) (lib (assoc-ref outputs "lib")) (openssl (assoc-ref inputs "openssl"))) (substitute* (list (string-append out "/bin/mariadb-install-db") (string-append out "/bin/mysql_install_db")) (("basedir=\"\"") (string-append "basedir=\"" out "\"")) (("\\$basedir/share/mysql") (string-append lib "/share/mysql"))) (with-directory-excursion lib ;; Remove tests. (delete-file-recursively "mysql-test") ;; Remove static libraries. (for-each delete-file (find-files "lib" "\\.a$"))) (with-directory-excursion out (delete-file "share/man/man1/mysql-test-run.pl.1") ;; Delete huge and unnecessary executables. (for-each delete-file (find-files "bin" "test$"))) (mkdir-p (string-append dev "/share")) (mkdir-p (string-append dev "/bin")) (rename-file (string-append lib "/bin/mariadbd") (string-append out "/bin/mariadbd")) (rename-file (string-append lib "/bin/mysqld") (string-append out "/bin/mysqld")) (mkdir-p (string-append dev "/lib")) (rename-file (string-append lib "/lib/pkgconfig") (string-append dev "/lib/pkgconfig")) (rename-file (string-append lib "/bin/mariadb_config") (string-append dev "/bin/mariadb_config")) (rename-file (string-append out "/bin/mysql_config") (string-append dev "/bin/mysql_config")) ;; Embed an absolute reference to OpenSSL in mysql_config ;; and the pkg-config file to avoid propagation. ;; XXX: how to do this for mariadb_config.c.in? (substitute* (list (string-append dev "/bin/mysql_config") (string-append dev "/lib/pkgconfig/mariadb.pc")) (("-lssl -lcrypto" all) (string-append "-L" openssl "/lib " all))))))))) (native-inputs (if (target-ppc32?) `(("mariadb-link-libatomic.patch" ,(search-patch "mariadb-link-libatomic.patch")) ("patch" ,patch) ("bison" ,bison) ("perl" ,perl)) (list bison perl))) (inputs `(("jemalloc" ,jemalloc) ("libaio" ,libaio) ("libxml2" ,libxml2) ("ncurses" ,ncurses) ("openssl" ,openssl) ("pam" ,linux-pam) ("pcre2" ,pcre2) ("xz" ,xz) ("zlib" ,zlib))) ;; The test suite is very resource intensive and can take more than three ;; hours on a x86_64 system. Give slow and busy machines some leeway. (properties '((timeout . 64800))) ;18 hours (home-page "https://mariadb.org/") (synopsis "SQL database server") (description "MariaDB is a multi-user and multi-threaded SQL database server, designed as a drop-in replacement of MySQL.") (license license:gpl2))) (define-public mariadb-connector-c (package (name "mariadb-connector-c") (version "3.1.13") (source (origin (method url-fetch) (uri (string-append "https://downloads.mariadb.org/f/connector-c-" version "/mariadb-connector-c-" version "-src.tar.gz" "/from/https%3A//mirrors.ukfast.co.uk/sites/mariadb/?serve")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0xb8fiissblxb319y5ifqqp86zblwis789ipb753pcb4zpnsaw82")))) (inputs (list openssl)) (build-system cmake-build-system) (arguments '(#:tests? #f)) ; no tests (home-page "https://mariadb.com/kb/en/mariadb-connector-c/") (synopsis "Client library to connect to MySQL or MariaDB") (description "The MariaDB Connector/C is used to connect applications developed in C/C++ to MariaDB and MySQL databases.") (license license:lgpl2.1+))) (define-public galera (package (name "galera") (version "26.4.10") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/codership/galera") (commit (string-append "release_" version)) (recursive? #t))) (file-name (git-file-name name version)) (sha256 (base32 "1n6zhzwj713ixyqvcjn4ldlq0y9fxqgvmqv3cj3h4207v9lwlxxz")))) (build-system cmake-build-system) (inputs (list check boost openssl)) (home-page "https://github.com/codership/galera/") (synopsis "Extension to the MariaDB database server") (description "Galera is a wsrep-provider that is used with MariaDB for load-balancing and high-availability (HA).") (license license:gpl2))) ;'COPYING' says "version 2" only ;; Don't forget to update the other postgresql packages when upgrading this one. (define-public postgresql-14 (package (name "postgresql") (version "14.2") (source (origin (method url-fetch) (uri (string-append "https://ftp.postgresql.org/pub/source/v" version "/postgresql-" version ".tar.bz2")) (sha256 (base32 "0ylpka64wli72jvjyqcayvlw44zk1hsbapb93l8gh4l98qp8pxrc")) (patches (search-patches "postgresql-disable-resolve_symlinks.patch")))) (build-system gnu-build-system) (arguments `(#:configure-flags '("--with-uuid=e2fs" "--with-openssl" ;; PostgreSQL installs its own Makefile (should it?). ;; Prevent it from retaining needless references to ;; the build tools in order to save size. "MKDIR_P=mkdir -p" "INSTALL_BIN=install -c" "LD=ld" "TAR=tar") #:phases (modify-phases %standard-phases (add-before 'configure 'patch-/bin/sh (lambda _ ;; Refer to the actual shell. (substitute* '("src/bin/pg_ctl/pg_ctl.c" "src/bin/psql/command.c") (("/bin/sh") (which "sh"))) #t)) (add-before 'configure 'set-socket-dir (lambda _ (substitute* '("src/include/pg_config_manual.h") (("DEFAULT_PGSOCKET_DIR[^\n]*") "DEFAULT_PGSOCKET_DIR \"/var/run/postgresql\"")) #t)) (add-after 'build 'build-contrib (lambda _ (invoke "make" "-C" "contrib"))) (add-after 'install 'install-contrib (lambda _ (invoke "make" "-C" "contrib" "install")))))) (inputs `(("readline" ,readline) ("libuuid" ,util-linux "lib") ("openssl" ,openssl) ("zlib" ,zlib))) (home-page "https://www.postgresql.org/") (synopsis "Powerful object-relational database system") (description "PostgreSQL is a powerful object-relational database system. It is fully ACID compliant, has full support for foreign keys, joins, views, triggers, and stored procedures (in multiple languages). It includes most SQL:2008 data types, including INTEGER, NUMERIC, BOOLEAN, CHAR, VARCHAR, DATE, INTERVAL, and TIMESTAMP. It also supports storage of binary large objects, including pictures, sounds, or video.") (license (license:x11-style "file://COPYRIGHT")))) (define-public postgresql-13 (package (inherit postgresql-14) (version "13.4") (source (origin (inherit (package-source postgresql-14)) (uri (string-append "https://ftp.postgresql.org/pub/source/v" version "/postgresql-" version ".tar.bz2")) (sha256 (base32 "1kf0gcsrl5n25rjlvkh87aywmn28kbwvakm5c7j1qpr4j01y34za")))) (arguments (if (target-riscv64?) `(,@(substitute-keyword-arguments (package-arguments postgresql-14) ((#:phases phases) #~(modify-phases #$phases (add-after 'unpack 'apply-riscv-spinlock-patch ;; The patch is applied in this custom phase and not via the ;; "origin" object above to avoid rebuilding a large number ;; of packages on other platforms. (lambda* (#:key inputs #:allow-other-keys) (let ((patch-file #$(local-file (search-patch "postgresql-riscv-spinlocks.patch")))) (invoke "patch" "-p1" "-i" patch-file)))))))) `(,@(package-arguments postgresql-14)))) (native-inputs (if (target-riscv64?) (list (local-file (search-patch "postgresql-riscv-spinlocks.patch")) patch) '())))) (define-public postgresql-11 (package (inherit postgresql-13) (name "postgresql") (version "11.15") (source (origin (inherit (package-source postgresql-13)) (uri (string-append "https://ftp.postgresql.org/pub/source/v" version "/postgresql-" version ".tar.bz2")) (sha256 (base32 "1qvrm0vhwnc5nijfbqybhwfjbq4r7vmk445sz7s6fiagpn78xxf8")))))) (define-public postgresql-10 (package (inherit postgresql-11) (version "10.20") (source (origin (inherit (package-source postgresql-11)) (uri (string-append "https://ftp.postgresql.org/pub/source/v" version "/postgresql-" version ".tar.bz2")) (sha256 (base32 "17v51a9vnz6lgbfmbdmcwsiyi572wndwa4n30nk2zr6gkgaidpl7")))))) (define-public postgresql postgresql-13) (define-public timescaledb (package (name "timescaledb") (version "2.5.1") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/timescale/timescaledb") (commit version))) (file-name (git-file-name name version)) (sha256 (base32 "174dm3higa0i7al9r2hdv5hk36pd0d5fnqj57w5a350kxshxyvyw")) (modules '((guix build utils))) (snippet ;; Remove files carrying the proprietary TIMESCALE license. '(begin (delete-file-recursively "tsl") (for-each delete-file '("test/perl/AccessNode.pm" "test/perl/DataNode.pm" "test/perl/TimescaleNode.pm")))))) (build-system cmake-build-system) (arguments (list #:imported-modules `((guix build union) ,@%cmake-build-system-modules) #:modules `(,@%cmake-build-system-modules (guix build union) (ice-9 match)) #:configure-flags #~(list "-DAPACHE_ONLY=ON" "-DSEND_TELEMETRY_DEFAULT=OFF") #:test-target "regresschecklocal" #:phases #~(modify-phases (@ (guix build cmake-build-system) %standard-phases) (add-after 'unpack 'patch-install-location (lambda _ ;; Install extension to the output instead of the ;; PostgreSQL store directory. (substitute* '("CMakeLists.txt" "cmake/GenerateScripts.cmake" "sql/CMakeLists.txt") (("\\$\\{PG_SHAREDIR\\}/extension") (string-append #$output "/share/extension"))) ;; Likewise for the library. (substitute* '("src/CMakeLists.txt" "src/loader/CMakeLists.txt") (("\\$\\{PG_PKGLIBDIR\\}") (string-append #$output "/lib"))))) ;; Run the tests after install to make it easier to create the ;; required PostgreSQL+TimescaleDB filesystem union. (delete 'check) (add-after 'install 'prepare-tests (lambda* (#:key inputs #:allow-other-keys) (let ((pg-data (string-append (getcwd) "/../pg-data")) (pg-union (string-append (getcwd) "/../pg-union"))) (match inputs (((names . directories) ...) (union-build pg-union (cons #$output directories)))) (setenv "PATH" (string-append pg-union "/bin:" (getenv "PATH"))) (invoke "initdb" "-D" pg-data) (copy-file "test/postgresql.conf" (string-append pg-data "/postgresql.conf")) (invoke "pg_ctl" "-D" pg-data "-o" (string-append "-k " pg-data) "-l" (string-append pg-data "/db.log") "start")))) (add-after 'prepare-tests 'check (assoc-ref %standard-phases 'check))))) (inputs (list openssl postgresql)) (home-page "https://www.timescale.com/") (synopsis "Time-series extension for PostgreSQL") (description "TimescaleDB is an database designed to make SQL scalable for time-series data. It is engineered up from PostgreSQL and packaged as a PostgreSQL extension, providing automatic partitioning across time and space (partitioning key), as well as full SQL support.") (license license:asl2.0))) (define-public pgloader (package (name "pgloader") (version "3.6.3") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/dimitri/pgloader") (commit (string-append "v" version)))) (sha256 (base32 "147dcf0rmi94p95dvifx8qy7602fvs041dv9wlg3q31ly13agwb5")) (file-name (git-file-name name version)))) (build-system gnu-build-system) (arguments ;; NOTE: (Sharlatan-20210119T211511+0000) Tests are disabled due to being ;; dependent on Quicklisp, main build target is `pgloader-standalone' which ;; does not require Quicklisp workarounds. There is no `install' target ;; configured in Makefile. (list #:tests? #f #:strip-binaries? #f #:make-flags #~(list "pgloader-standalone" "BUILDAPP_SBCL=buildapp") #:phases #~(modify-phases %standard-phases (delete 'configure) (add-after 'unpack 'set-home (lambda _ (setenv "HOME" "/tmp"))) (add-after 'unpack 'patch-Makefile (lambda _ (substitute* "Makefile" (("--sbcl.*") "--sbcl $(CL) --asdf-path . \\\n")))) (replace 'install (lambda* (#:key outputs #:allow-other-keys) (let ((bin (string-append #$output "/bin"))) (mkdir-p bin) (install-file "build/bin/pgloader" bin))))))) (native-inputs (list buildapp sbcl)) (inputs (list sbcl-alexandria sbcl-cl-abnf sbcl-cl-base64 sbcl-cl-csv sbcl-cl-fad sbcl-cl-log sbcl-cl-markdown sbcl-cl-mustache sbcl-cl-ppcre sbcl-cl-sqlite sbcl-closer-mop sbcl-command-line-arguments sbcl-db3 sbcl-drakma sbcl-esrap sbcl-flexi-streams sbcl-ixf sbcl-local-time sbcl-lparallel sbcl-metabang-bind sbcl-mssql sbcl-postmodern sbcl-py-configparser sbcl-qmynd sbcl-quri sbcl-split-sequence sbcl-trivial-backtrace sbcl-usocket sbcl-uuid sbcl-yason sbcl-zs3)) (home-page "https://pgloader.io/") (synopsis "Tool to migrate data to PostgreSQL") (description "@code{pgloader} is a program that can load data or migrate databases from CSV, DB3, iXF, SQLite, MS-SQL or MySQL to PostgreSQL.") (license (license:x11-style "file://LICENSE")))) (define-public python-pymysql (package (name "python-pymysql") (version "0.9.3") (source (origin (method url-fetch) (uri (pypi-uri "PyMySQL" version)) (sha256 (base32 "1ry8lxgdc1p3k7gbw20r405jqi5lvhi5wk83kxdbiv8xv3f5kh6q")))) (build-system python-build-system) (native-inputs (list python-unittest2)) (inputs (list python-cryptography)) (arguments `(#:tests? #f)) ; tests expect a running MySQL (home-page "https://github.com/PyMySQL/PyMySQL/") (synopsis "Pure-Python MySQL driver") (description "PyMySQL is a pure-Python MySQL client library, based on PEP 249. Most public APIs are compatible with @command{mysqlclient} and MySQLdb.") (license license:expat))) (define-public python2-pymysql (package-with-python2 python-pymysql)) (define-public qdbm (package (name "qdbm") (version "1.8.78") (source (origin (method url-fetch) (uri (string-append "http://fallabs.com/" name "/" name "-" version ".tar.gz")) (sha256 (base32 "0gmpvhn02pkq280ffmn4da1g4mdr1xxz7l80b7y4n7km1mrzwrml")))) (build-system gnu-build-system) (arguments `(#:configure-flags (list (string-append "LDFLAGS=-Wl,-rpath=" (assoc-ref %outputs "out") "/lib")) #:make-flags (list "CFLAGS=-fPIC"))) (home-page "https://fallabs.com/qdbm/") (synopsis "Key-value database") (description "QDBM is a library of routines for managing a database. The database is a simple data file containing key-value pairs. Every key and value is serial bytes with variable length. Binary data as well as character strings can be used as a key or a value. There is no concept of data tables or data types. Records are organized in a hash table or B+ tree.") (license license:lgpl2.1+))) (define-public recutils (package (name "recutils") (version "1.9") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/recutils/recutils-" version ".tar.gz")) (sha256 (base32 "03kf91f20brn2ffljfjzirxh5xj99m1mvvspcx2lph9000mmj0b3")))) (build-system gnu-build-system) (arguments (list #:configure-flags '(list "--disable-static" (string-append "--with-bash-headers=" (dirname (search-input-directory %build-inputs "include/bash")))))) (native-inputs ;; XXX Without labels, the default 'configure phase picks the wrong "bash". `(("bc" ,bc) ("bash:include" ,bash "include") ("check" ,check-0.14) ("pkg-config" ,pkg-config))) (inputs ;; TODO: Add more optional inputs. (list curl libgcrypt `(,util-linux "lib"))) (synopsis "Manipulate plain text files as databases") (description "GNU Recutils is a set of tools and libraries for creating and manipulating text-based, human-editable databases. Despite being text-based, databases created with Recutils carry all of the expected features such as unique fields, primary keys, time stamps and more. Many different field types are supported, as is encryption.") (license license:gpl3+) (home-page "https://www.gnu.org/software/recutils/"))) (define-public emacs-rec-mode (package (name "emacs-rec-mode") (version "1.8.2") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/" "rec-mode-" version ".tar")) (sha256 (base32 "06mjj1la2v8zdhsflj3mwcp7qnkj7gxzm8wbk2pli1h8vnq2zvd0")) (snippet '(begin (delete-file "rec-mode.info"))))) (build-system emacs-build-system) (arguments '(#:phases (modify-phases %standard-phases (add-before 'install 'make-info (lambda _ (invoke "makeinfo" "--no-split" "-o" "rec-mode.info" "rec-mode.texi")))))) (native-inputs `(("texinfo" ,texinfo))) (home-page "https://www.gnu.org/software/recutils/") (synopsis "Emacs mode for working with recutils database files") (description "This package provides an Emacs major mode @code{rec-mode} for working with GNU Recutils text-based, human-editable databases. It supports editing, navigation, and querying of recutils database files including field and record folding.") (license license:gpl3+))) (define-public emacs-recutils (deprecated-package "emacs-recutils" emacs-rec-mode)) (define-public rocksdb (package (name "rocksdb") (version "6.26.1") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/facebook/rocksdb") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0mylma106w93kxhj89g9y1ccdq7m9m94wrmv5nyr17yc1zsk87sg")) (modules '((guix build utils))) (snippet '(begin ;; TODO: unbundle gtest. (delete-file "build_tools/gnu_parallel") (substitute* "Makefile" (("build_tools/gnu_parallel") "parallel")))))) (build-system cmake-build-system) (arguments `(#:configure-flags (list "-DROCKSDB_BUILD_SHARED=1" ;; Ceph requires that RTTI is enabled. "-DUSE_RTTI=1" ;; Prevent the build from passing '-march=native' to the compiler. "-DPORTABLE=1") ;; Many tests fail on 32-bit platforms. There are multiple ;; reports about this upstream, but it's not going to be ;; supported any time soon. What's worse: Release builds don't ;; include tests, and overriding the build system to build ;; tests anyway fails with missing TEST_ symbols. #:tests? #false #:phases (modify-phases %standard-phases (add-after 'unpack 'patch-CMakeLists.txt (lambda _ (substitute* "CMakeLists.txt" ;; build reproducibly (("set\\(BUILD_DATE \"\\$\\{TS\\}\"") "set(BUILD_DATE \"1970-01-01\"")))) (add-after 'unpack 'build-generically (lambda _ (substitute* "CMakeLists.txt" (("if\\(HAVE_SSE42\\)") "if(FALSE)"))))))) (native-inputs (list parallel perl procps python which)) (inputs (list bzip2 gflags jemalloc lz4 snappy zlib)) (home-page "https://rocksdb.org/") (synopsis "Persistent key-value store for fast storage") (description "RocksDB is a library that forms the core building block for a fast key-value server, especially suited for storing data on flash drives. It has a @dfn{Log-Structured-Merge-Database} (LSM) design with flexible tradeoffs between @dfn{Write-Amplification-Factor} (WAF), @dfn{Read-Amplification-Factor} (RAF) and @dfn{Space-Amplification-Factor} (SAF). It has multi-threaded compactions, making it specially suitable for storing multiple terabytes of data in a single database. RocksDB is partially based on @code{LevelDB}.") ;; RocksDB is dual licensed under GPL2 and ASL 2.0. Some header ;; files carry the 3-clause BSD license. (license (list license:gpl2 license:asl2.0 license:bsd-3)))) (define-public sparql-query (package (name "sparql-query") (version "1.1") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/tialaramex/sparql-query") (commit version))) (sha256 (base32 "0a84a89idpjhj9w2y3fmvzv7ldps1cva1kxvfmh897k02kaniwxk")) (file-name (git-file-name name version)))) (build-system gnu-build-system) (inputs (list curl glib libxml2 ncurses readline)) (native-inputs (list pkg-config)) (arguments `(#:make-flags '("CC=gcc") #:phases (modify-phases %standard-phases (delete 'configure) ;; The Makefile uses git to obtain versioning information. This phase ;; substitutes the git invocation with the package version. (add-after 'unpack 'remove-git-dependency (lambda _ (substitute* "Makefile" (("^gitrev :=.*$") (string-append "gitrev = \"v" ,version "\""))) #t)) ;; The install phase of the Makefile assumes $PREFIX/usr/local/bin. ;; This replacement does the same thing, except for using $PREFIX/bin ;; instead. (replace 'install (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (bin (string-append out "/bin"))) (install-file "sparql-query" bin) (symlink (string-append bin "/sparql-query") (string-append bin "/sparql-update"))) #t)) (replace 'check (lambda* (#:key make-flags #:allow-other-keys) (apply invoke "make" `(,@make-flags "scan-test")) (invoke "./scan-test")))))) (home-page "https://github.com/tialaramex/sparql-query/") (synopsis "Command-line tool for accessing SPARQL endpoints over HTTP") (description "Sparql-query is a command-line tool for accessing SPARQL endpoints over HTTP. It has been intentionally designed to @code{feel} similar to tools for interrogating SQL databases. For example, you can enter a query over several lines, using a semi-colon at the end of a line to indicate the end of your query. It also supports readline so that you can more easily recall and edit previous queries, even across sessions. It can be used non-interactively, for example from a shell script.") ;; Some files (like scan-sparql.c) contain a GPLv3+ license header, while ;; others (like sparql-query.c) contain a GPLv2+ license header. (license (list license:gpl3+)))) (define-public sqitch (package (name "sqitch") (version "1.1.0") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/D/DW/DWHEELER/App-Sqitch-v" version ".tar.gz")) (sha256 (base32 "1ayiwg9kh3w0nbacbcln7h944z94vq5vnnd5diz86033bpbnq57f")))) (build-system perl-build-system) (arguments '(#:phases (modify-phases %standard-phases (add-before 'check 'set-check-environment (lambda _ (setenv "TZ" "UTC") (setenv "HOME" "/tmp") #t)) (add-after 'install 'wrap-program (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (path (getenv "PERL5LIB"))) (wrap-program (string-append out "/bin/sqitch") `("PERL5LIB" ":" prefix (,(string-append out "/lib/perl5/site_perl" ":" path))))) #t))))) (native-inputs (list perl-capture-tiny perl-io-pager perl-module-build perl-module-runtime perl-path-class perl-test-deep perl-test-dir perl-test-exception perl-test-file perl-test-file-contents perl-test-mockmodule perl-test-mockobject perl-test-nowarnings perl-test-warn)) (inputs `(("perl-class-xsaccessor" ,perl-class-xsaccessor) ("perl-clone" ,perl-clone) ("perl-config-gitlike" ,perl-config-gitlike) ("perl-datetime" ,perl-datetime) ("perl-datetime-timezone" ,perl-datetime-timezone) ("perl-dbd-mysql" ,perl-dbd-mysql) ("perl-dbd-pg" ,perl-dbd-pg) ("perl-dbd-sqlite" ,perl-dbd-sqlite) ("perl-dbi" ,perl-dbi) ("perl-devel-stacktrace" ,perl-devel-stacktrace) ("perl-encode-locale" ,perl-encode-locale) ("perl-hash-merge" ,perl-hash-merge) ("perl-ipc-run3" ,perl-ipc-run3) ("perl-ipc-system-simple" ,perl-ipc-system-simple) ("perl-libintl-perl" ,perl-libintl-perl) ("perl-list-moreutils" ,perl-list-moreutils) ("perl-moo" ,perl-moo) ("perl-mysql-config" ,perl-mysql-config) ("perl-namespace-autoclean" ,perl-namespace-autoclean) ("perl-path-class" ,perl-path-class) ("perl-perlio-utf8_strict" ,perl-perlio-utf8_strict) ("perl-string-formatter" ,perl-string-formatter) ("perl-string-shellquote" ,perl-string-shellquote) ("perl-sub-exporter" ,perl-sub-exporter) ("perl-template-tiny" ,perl-template-tiny) ("perl-template-toolkit" ,perl-template-toolkit) ("perl-throwable" ,perl-throwable) ("perl-try-tiny" ,perl-try-tiny) ("perl-type-tiny" ,perl-type-tiny) ("perl-type-tiny-xs" ,perl-type-tiny-xs) ("perl-uri" ,perl-uri) ("perl-uri-db" ,perl-uri-db))) (home-page "https://sqitch.org/") (synopsis "Database change management tool") (description "Sqitch is a standalone change management system for database schemas, which uses SQL to describe changes.") (license license:x11))) (define-public sqlcrush ;; Unfortunately, there is no proper upstream release and may never be. (let ((commit "b5f6868f189566a26eecc78d0f0659813c1aa98a") (revision "1")) (package (name "sqlcrush") (version (git-version "0.1.5" revision commit)) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/coffeeandscripts/sqlcrush") (commit commit))) (file-name (git-file-name name version)) (sha256 (base32 "0x3wy40r93p0jv3nbwj9a77wa4ff697d13r0wffmm7q9h3mzsww8")))) (build-system python-build-system) (inputs (list python-cryptography python-psycopg2 python-pymysql python-sqlalchemy)) (home-page "https://github.com/coffeeandscripts/sqlcrush") (synopsis "Text console-based database viewer and editor") (description "SQLcrush lets you view and edit a database directly from the text console through an ncurses interface. You can explore each table's structure, browse and edit the contents, add and delete entries, all while tracking your changes.") (license license:gpl3+)))) ; no headers, see README.md (define-public tdb (package (name "tdb") (version "1.4.5") (source (origin (method url-fetch) (uri (string-append "https://www.samba.org/ftp/tdb/tdb-" version ".tar.gz")) (sha256 (base32 "0h8fkblws3d4vf37yhbrbw2nfxg5vk2v3i5mk04hhcbh9y4fvz5w")))) (build-system gnu-build-system) (arguments '(#:phases (modify-phases %standard-phases (replace 'configure (lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) ;; The 'configure' script is a wrapper for Waf and ;; doesn't recognize things like '--enable-fast-install'. (invoke "./configure" (string-append "--prefix=" out)))))))) (native-inputs (list ;; TODO: Build the documentation. ;; ("docbook-xsl" ,docbook-xsl) ;; ("libxml2" ,libxml2) ;; ("libxslt" ,libxslt) python ;for the Waf build system which)) (home-page "https://tdb.samba.org/") (synopsis "Trivial database") (description "TDB is a Trivial Database. In concept, it is very much like GDBM, and BSD's DB except that it allows multiple simultaneous writers and uses locking internally to keep writers from trampling on each other. TDB is also extremely small.") (license license:lgpl3+))) (define-public perl-dbi (package (name "perl-dbi") (version "1.643") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/T/TI/TIMB/DBI-" version ".tar.gz")) (sha256 (base32 "1yinx39960y241vf2sknxj0dfz82a5m9gvklq5rw78k0nlyrjawa")))) (build-system perl-build-system) (synopsis "Database independent interface for Perl") (description "This package provides an database interface for Perl.") (home-page "https://metacpan.org/release/DBI") (license license:perl-license))) (define-public perl-dbix-class (package (name "perl-dbix-class") (version "0.082842") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/R/RI/RIBASUSHI/" "DBIx-Class-" version ".tar.gz")) (sha256 (base32 "1rh7idjjbibc1zmiaaarask434lh0lx7f2xyfwmy37k9fa0xcpmh")))) (build-system perl-build-system) (native-inputs (list perl-dbd-sqlite perl-file-temp perl-module-install perl-package-stash perl-test-deep perl-test-exception perl-test-warn)) (propagated-inputs (list perl-class-accessor-grouped perl-class-c3-componentised perl-class-inspector perl-config-any perl-context-preserve perl-data-dumper-concise perl-data-page perl-dbi perl-devel-globaldestruction perl-hash-merge perl-module-find perl-moo perl-mro-compat perl-namespace-clean perl-path-class perl-scalar-list-utils perl-scope-guard perl-sql-abstract-classic perl-sub-name perl-text-balanced perl-try-tiny)) (home-page "https://metacpan.org/release/DBIx-Class") (synopsis "Extensible and flexible object <-> relational mapper") (description "An SQL to OO mapper with an object API inspired by Class::DBI (with a compatibility layer as a springboard for porting) and a resultset API that allows abstract encapsulation of database operations. It aims to make representing queries in your code as perl-ish as possible while still providing access to as many of the capabilities of the database as possible, including retrieving related records from multiple tables in a single query, \"JOIN\", \"LEFT JOIN\", \"COUNT\", \"DISTINCT\", \"GROUP BY\", \"ORDER BY\" and \"HAVING\" support.") (license license:perl-license))) (define-public perl-dbix-class-cursor-cached (package (name "perl-dbix-class-cursor-cached") (version "1.001004") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/A/AR/ARCANEZ/" "DBIx-Class-Cursor-Cached-" version ".tar.gz")) (sha256 (base32 "09b2jahn2x12qm4f7qm1jzsxbz7qn1czp6a3fnl5l2i3l4r5421p")))) (build-system perl-build-system) (native-inputs (list perl-cache-cache perl-dbd-sqlite perl-module-install)) (propagated-inputs (list perl-carp-clan perl-dbix-class)) (home-page "https://metacpan.org/release/DBIx-Class-Cursor-Cached") (synopsis "Cursor with built-in caching support") (description "DBIx::Class::Cursor::Cached provides a cursor class with built-in caching support.") (license license:perl-license))) (define-public perl-dbix-class-introspectablem2m (package (name "perl-dbix-class-introspectablem2m") (version "0.001002") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/I/IL/ILMARI/" "DBIx-Class-IntrospectableM2M-" version ".tar.gz")) (sha256 (base32 "1w47rh2241iy5x3a9bqsyd5kdp9sk43dksr99frzv4qn4jsazfn6")))) (build-system perl-build-system) (native-inputs (list perl-module-install)) (propagated-inputs (list perl-dbix-class)) (home-page "https://metacpan.org/release/DBIx-Class-IntrospectableM2M") (synopsis "Introspect many-to-many relationships") (description "Because the many-to-many relationships are not real relationships, they can not be introspected with DBIx::Class. Many-to-many relationships are actually just a collection of convenience methods installed to bridge two relationships. This DBIx::Class component can be used to store all relevant information about these non-relationships so they can later be introspected and examined.") (license license:perl-license))) (define-public perl-dbix-class-schema-loader (package (name "perl-dbix-class-schema-loader") (version "0.07049") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/I/IL/ILMARI/" "DBIx-Class-Schema-Loader-" version ".tar.gz")) (sha256 (base32 "0r57fv71ypxafb85cpxph1hdqii7ipjwvc19yb6fpkvq2ggcssg8")))) (build-system perl-build-system) (native-inputs (list perl-config-any perl-config-general perl-dbd-sqlite perl-dbix-class-introspectablem2m perl-module-install perl-moose perl-moosex-markasmethods perl-moosex-nonmoose perl-namespace-autoclean perl-test-deep perl-test-differences perl-test-exception perl-test-pod perl-test-warn)) (propagated-inputs (list perl-class-unload perl-class-inspector perl-class-accessor-grouped perl-class-c3-componentised perl-carp-clan perl-data-dump perl-dbix-class perl-hash-merge perl-list-moreutils perl-lingua-en-inflect-phrase perl-lingua-en-inflect-number perl-lingua-en-tagger perl-namespace-clean perl-mro-compat perl-scope-guard perl-string-camelcase perl-string-toidentifier-en perl-sub-name perl-try-tiny)) (arguments `(#:tests? #f)) ;TODO: t/20invocations.t fails (home-page "https://metacpan.org/release/DBIx-Class-Schema-Loader") (synopsis "Create a DBIx::Class::Schema based on a database") (description "DBIx::Class::Schema::Loader automates the definition of a DBIx::Class::Schema by scanning database table definitions and setting up the columns, primary keys, unique constraints and relationships.") (license license:perl-license))) (define-public perl-dbd-pg (package (name "perl-dbd-pg") (version "3.14.2") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/T/TU/TURNSTEP/" "DBD-Pg-" version ".tar.gz")) (sha256 (base32 "0kcfqq7g3832wiix0sbyvlc885qghjrp2ah3akn7h2lnb22fjwy9")))) (build-system perl-build-system) (native-inputs (list perl-dbi)) (propagated-inputs (list perl-dbi postgresql)) (home-page "https://metacpan.org/release/DBD-Pg") (synopsis "DBI PostgreSQL interface") (description "This package provides a PostgreSQL driver for the Perl5 @dfn{Database Interface} (DBI).") (license license:perl-license))) (define-public perl-dbd-mysql (package (name "perl-dbd-mysql") (version "4.050") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/D/DV/DVEEDEN/" "DBD-mysql-" version ".tar.gz")) (sha256 (base32 "0y4djb048i09dk19av7mzfb3khr72vw11p3ayw2p82jsy4gm8j2g")))) (build-system perl-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-before 'configure 'skip-library-detection ;; Avoid depencies on perl-devel-checklib, openssl, and zlib. They ;; are really only needed for the test suite; their absence does not ;; affect the build or the end result. (lambda _ (substitute* "Makefile.PL" (("use Devel::CheckLib;" match) (string-append "# " match)) (("assert_lib") "print")) #t))) ;; Tests require running MySQL server. #:tests? #f)) (propagated-inputs `(("perl-dbi" ,perl-dbi) ("mysql" ,mariadb "lib") ("mysql-dev" ,mariadb "dev"))) (home-page "https://metacpan.org/release/DBD-mysql") (synopsis "DBI MySQL interface") (description "This package provides a MySQL driver for the Perl5 @dfn{Database Interface} (DBI).") (license license:perl-license))) (define-public perl-dbd-sqlite (package (name "perl-dbd-sqlite") (version "1.66") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/I/IS/ISHIGAKI/DBD-SQLite-" version ".tar.gz")) (sha256 (base32 "1zljln5nh61gj3k22a1fv2vhx5l83waizmarwkh77hk6kzzmvrw9")))) (build-system perl-build-system) (inputs (list sqlite)) (propagated-inputs (list perl-dbi)) (synopsis "SQlite interface for Perl") (description "DBD::SQLite is a Perl DBI driver for SQLite, that includes the entire thing in the distribution. So in order to get a fast transaction capable RDBMS working for your Perl project you simply have to install this module, and nothing else.") (license license:perl-license) (home-page "https://metacpan.org/release/DBD-SQLite"))) (define-public perl-mysql-config (package (name "perl-mysql-config") (version "1.04") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/D/DA/DARREN/MySQL-Config-" version ".tar.gz")) (sha256 (base32 "1svn7ccw2gc4cazvc58j84rxhnc9vs01zpird0l8460598j475qr")))) (build-system perl-build-system) (home-page "https://metacpan.org/release/MySQL-Config") (synopsis "Parse and utilize MySQL's /etc/my.cnf and ~/.my.cnf files") (description "@code{MySQL::Config} emulates the @code{load_defaults} function from libmysqlclient. It will fill an array with long options, ready to be parsed by @code{Getopt::Long}.") (license license:perl-license))) (define-public perl-sql-abstract (package (name "perl-sql-abstract") (version "1.87") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/I/IL/ILMARI/" "SQL-Abstract-" version ".tar.gz")) (sha256 (base32 "0jhw91b23wc9bkfwcgvka4x5ddxk58m9bcp5ay7a3vx77nla09p9")))) (build-system perl-build-system) (native-inputs (list perl-module-install perl-test-deep perl-test-exception perl-test-warn)) (propagated-inputs (list perl-hash-merge perl-moo perl-mro-compat perl-text-balanced)) (home-page "https://metacpan.org/release/SQL-Abstract") (synopsis "Generate SQL from Perl data structures") (description "This module was inspired by the excellent DBIx::Abstract. While based on the concepts used by DBIx::Abstract, the concepts used have been modified to make the SQL easier to generate from Perl data structures. The underlying idea is for this module to do what you mean, based on the data structures you provide it, so that you don't have to modify your code every time your data changes.") (license license:perl-license))) (define-public perl-sql-abstract-classic (package (name "perl-sql-abstract-classic") (version "1.91") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/R/RI/RIBASUSHI/" "SQL-Abstract-Classic-" version ".tar.gz")) (sha256 (base32 "0a7g13hs3kdxrjn43sfli09mgsi9d6w0dfw6hlk268av17yisgaf")))) (build-system perl-build-system) (native-inputs (list perl-test-deep perl-test-exception perl-test-warn)) (propagated-inputs (list perl-mro-compat perl-sql-abstract)) (home-page "https://metacpan.org/release/SQL-Abstract-Classic") (synopsis "Generate SQL from Perl data structures") (description "This module is nearly identical to @code{SQL::Abstract} 1.81, and exists to preserve the ability of users to opt into the new way of doing things in later versions according to their own schedules. It is an abstract SQL generation module based on the concepts used by @code{DBIx::Abstract}, with several important differences, especially when it comes to @code{WHERE} clauses. These concepts were modified to make the SQL easier to generate from Perl data structures. The underlying idea is for this module to do what you mean, based on the data structures you provide it. You shouldn't have to modify your code every time your data changes, as this module figures it out.") (license license:perl-license))) (define-public perl-sql-splitstatement (package (name "perl-sql-splitstatement") (version "1.00023") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/V/VE/VEESH/" "SQL-SplitStatement-" version ".tar.gz")) (sha256 (base32 "0ppkx46nydzlnsxf9a8pkyb74wggfrdiiwafab143lrarlh88x0s")))) (build-system perl-build-system) (native-inputs (list perl-test-differences perl-test-exception perl-test-script)) (propagated-inputs (list perl-class-accessor perl-list-moreutils perl-regexp-common perl-sql-tokenizer)) (home-page "https://metacpan.org/release/SQL-SplitStatement") (synopsis "Split SQL code into atomic statements") (description "This module tries to split any SQL code, even including non-standard extensions, into the atomic statements it is composed of.") (license license:perl-license))) (define-public perl-sql-tokenizer (package (name "perl-sql-tokenizer") (version "0.24") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/I/IZ/IZUT/" "SQL-Tokenizer-" version ".tar.gz")) (sha256 (base32 "1qa2dfbzdlr5qqdam9yn78z5w3al5r8577x06qan8wv58ay6ka7s")))) (build-system perl-build-system) (home-page "https://metacpan.org/release/SQL-Tokenizer") (synopsis "SQL tokenizer") (description "SQL::Tokenizer is a tokenizer for SQL queries. It does not claim to be a parser or query verifier. It just creates sane tokens from a valid SQL query.") (license license:perl-license))) (define-public unixodbc (package (name "unixodbc") (version "2.3.9") (source (origin (method url-fetch) (uri (string-append "ftp://ftp.unixodbc.org/pub/unixODBC/unixODBC-" version ".tar.gz")) (sha256 (base32 "01xj65d02i3yjy7p9z08y9jakcs5szmz4rask868n7387nn3x0sj")))) (build-system gnu-build-system) (synopsis "Data source abstraction library") (description "Unixodbc is a library providing an API with which to access data sources. Data sources include SQL Servers and any software with an ODBC Driver.") (license license:lgpl2.1+) ;; COPYING contains copy of lgpl2.1 - but copyright notices just say "LGPL" (home-page "http://www.unixodbc.org"))) (define-public nanodbc (package (name "nanodbc") (version "2.13.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/nanodbc/nanodbc") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "1q80p7yv9mcl4hyvnvcjdr70y8nc940ypf368lp97vpqn5yckkgm")))) (build-system cmake-build-system) (arguments `(#:configure-flags ;; The tests require ODBC backends to be installed. (list "-DNANODBC_DISABLE_TESTS=ON" "-DBUILD_SHARED_LIBS=ON") #:tests? #false)) (inputs (list unixodbc)) (home-page "https://nanodbc.io/") (synopsis "C++ wrapper for the native C ODBC API") (description "The goal for nanodbc is to make developers happy by providing a simpler and less verbose API for working with ODBC. Common tasks should be easy, requiring concise and simple code.") (license license:expat))) (define-public nanodbc-for-irods (package (inherit nanodbc) (arguments `(#:tests? #false #:configure-flags '("-DBUILD_SHARED_LIBS=ON" ;; The tests require ODBC backends to be installed. "-DNANODBC_DISABLE_TESTS=ON" "-DCMAKE_CXX_COMPILER=clang++" "-DCMAKE_CXX_FLAGS=-stdlib=libc++" "-DCMAKE_EXE_LINKER_FLAGS=-lc++abi") #:phases (modify-phases %standard-phases (add-after 'set-paths 'adjust-CPLUS_INCLUDE_PATH (lambda* (#:key inputs #:allow-other-keys) (let ((gcc (assoc-ref inputs "gcc"))) (setenv "CPLUS_INCLUDE_PATH" (string-join (cons (string-append (assoc-ref inputs "libcxx") "/include/c++/v1") ;; Hide GCC's C++ headers so that they do not interfere with ;; the Clang headers. (delete (string-append gcc "/include/c++") (string-split (getenv "CPLUS_INCLUDE_PATH") #\:))) ":")) (format #true "environment variable `CPLUS_INCLUDE_PATH' changed to ~a~%" (getenv "CPLUS_INCLUDE_PATH")))))))) (properties `((hidden? . #true))) (inputs `(("unixodbc" ,unixodbc) ("libcxx" ,libcxx+libcxxabi-6) ("libcxxabi" ,libcxxabi-6) ("clang" ,clang-6))))) (define-public unqlite (package (name "unqlite") (version "1.1.6") (source (origin (method url-fetch) ;; Contains bug fixes against the official release, and has an ;; autotooled build system. (uri (string-append "https://github.com/aidin36/tocc/releases/" "download/v1.0.0/" "unqlite-unofficial-" version ".tar.gz")) (sha256 (base32 "1sbpvhg15gadq0mpcy16q7k3rkg4b4dicpnn5xifpkpn02sqik3s")))) (build-system gnu-build-system) (arguments `(#:tests? #f)) ;No check target (home-page "https://www.unqlite.org") (synopsis "In-memory key/value and document store") (description "UnQLite is an in-process software library which implements a self-contained, serverless, zero-configuration, transactional NoSQL database engine. UnQLite is a document store database similar to Redis, CouchDB, etc., as well as a standard key/value store similar to BerkeleyDB, LevelDB, etc.") (license license:bsd-2))) (define-public redis (package (name "redis") (version "6.2.6") (source (origin (method url-fetch) (uri (string-append "http://download.redis.io/releases/redis-" version".tar.gz")) (sha256 (base32 "1ariw5x33hmmm3d5al0j3307l5kf3vhmn78wpyaz67hia1x8nasv")) (modules '((guix build utils))) (snippet ;; Delete bundled jemalloc, as the package will use the libc one '(begin (delete-file-recursively "deps/jemalloc"))))) (build-system gnu-build-system) (native-inputs (list procps ; for tests tcl)) ; for tests (arguments '(#:phases (modify-phases %standard-phases (delete 'configure) (add-after 'unpack 'use-correct-tclsh (lambda* (#:key inputs #:allow-other-keys) (substitute* "runtest" (("^TCLSH=.*") (string-append "TCLSH=" (assoc-ref inputs "tcl") "/bin/tclsh"))))) (add-after 'unpack 'adjust-tests (lambda _ ;; Disable failing tests (substitute* "tests/test_helper.tcl" (("integration/failover") "") (("integration/replication-4") "") (("integration/replication-psync") "") (("integration/replication[^-]") ""))))) #:make-flags `("CC=gcc" "MALLOC=libc" "LDFLAGS=-ldl" ,(string-append "PREFIX=" (assoc-ref %outputs "out"))))) (synopsis "Key-value cache and store") (description "Redis is an advanced key-value cache and store. Redis supports many data structures including strings, hashes, lists, sets, sorted sets, bitmaps and hyperloglogs.") (home-page "https://redis.io/") (license license:bsd-3))) (define-public ruby-redis (package (name "ruby-redis") (version "4.2.5") (source (origin (method url-fetch) (uri (rubygems-uri "redis" version)) (sha256 (base32 "15x2sr6h094rjbvg8pkq6m3lcd5abpyx93aifvfdz3wv6x55xa48")))) (build-system ruby-build-system) (arguments `(#:tests? #f)) ; Tests require a running redis server. (synopsis "Ruby client for Redis' API") (description "This package provides a Ruby client that tries to match Redis' API one-to-one, while still providing an idiomatic interface.") (home-page "https://github.com/redis/redis-rb") (license license:expat))) (define-public go-github-com-cupcake-rdb (package (name "go-github-com-cupcake-rdb") (version "0.0.0-20161107195141-43ba34106c76") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/tent/rdb") (commit (go-version->git-ref version)))) (file-name (git-file-name name version)) (sha256 (base32 "1l4bsn5yj8r875crz1rsk6dlvhv0bd8mgazsch5vl4c19v0fs2ib")))) (build-system go-build-system) (arguments '(#:import-path "github.com/cupcake/rdb")) (native-inputs (list go-gopkg-in-check-v1)) (home-page "https://github.com/tent/rdb") (synopsis "Redis RDB parser for Go") (description "Package rdb implements parsing and encoding of the Redis RDB file format.") (license license:expat))) (define-public go-github-com-gomodule-redigo (package (name "go-github-com-gomodule-redigo") (version "1.8.8") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/gomodule/redigo") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0wplaaxg7f6c6c08gdp33l48hygn8gq1rhlnjzr1c9qcggsm07k1")))) (build-system go-build-system) (arguments '(#:unpack-path "github.com/gomodule/redigo" #:import-path "github.com/gomodule/redigo/redis")) (native-inputs (list go-github-com-stretchr-testify redis)) (home-page "https://github.com/gomodule/redigo") (synopsis "Go client for Redis") (description "Redigo is a Go client for the Redis database.") (license license:asl2.0))) (define-public kyotocabinet (package (name "kyotocabinet") (version "1.2.79") (source (origin (method url-fetch) (uri (string-append "https://fallabs.com/kyotocabinet/pkg/" "kyotocabinet-" version ".tar.gz")) (sha256 (base32 "079ymsahlrijswgwfr2la9yw5h57l752cprhp5dz31iamsj1vyv7")))) (build-system gnu-build-system) (arguments `(#:configure-flags (list "--disable-opt" ;"-march=native". XXX this also turns off -O0. (string-append "LDFLAGS=-Wl,-rpath=" (assoc-ref %outputs "out") "/lib")))) (inputs (list zlib)) (home-page "https://fallabs.com/kyotocabinet/") (synopsis "Kyoto Cabinet is a modern implementation of the DBM database") (description "Kyoto Cabinet is a standalone file-based database that supports Hash and B+ Tree data storage models. It is a fast key-value lightweight database and supports many programming languages. It is a NoSQL database.") (license license:gpl3+))) (define-public tokyocabinet (package (name "tokyocabinet") (version "1.4.48") (source (origin (method url-fetch) (uri (string-append "http://fallabs.com/tokyocabinet/" name "-" version ".tar.gz")) (sha256 (base32 "140zvr0n8kvsl0fbn2qn3f2kh3yynfwnizn4dgbj47m975yg80x0")))) (build-system gnu-build-system) (arguments `(#:configure-flags (list "--enable-pthread" "--enable-off64" "--enable-fastest" (string-append "LDFLAGS=-Wl,-rpath=" (assoc-ref %outputs "out") "/lib")))) (inputs (list zlib)) (home-page "http://fallabs.com/tokyocabinet/") (synopsis "Tokyo Cabinet is a modern implementation of the DBM database") (description "Tokyo Cabinet is a library of routines for managing a database. The database is a simple data file containing records, each is a pair of a key and a value. Every key and value is serial bytes with variable length. Both binary data and character string can be used as a key and a value. There is neither concept of data tables nor data types. Records are organized in hash table, B+ tree, or fixed-length array.") (license license:lgpl2.1+))) (define-public wiredtiger (package (name "wiredtiger") (version "2.9.1") (source (origin (method url-fetch) (uri (string-append "http://source.wiredtiger.com/releases/wiredtiger-" version ".tar.bz2")) (sha256 (base32 "0krwnb2zfbhvjaskwl875qzd3y626s84zcciq2mxr5c5riw3yh6s")))) (build-system gnu-build-system) (arguments '(#:configure-flags '("--enable-lz4" "--with-builtins=snappy,zlib") #:phases (modify-phases %standard-phases (add-before 'check 'disable-test/fops (lambda _ ;; XXX: timed out after 3600 seconds of silence (substitute* "Makefile" (("test/fops") "")) #t))))) (inputs (list lz4 zlib snappy)) (home-page "http://source.wiredtiger.com/") (synopsis "NoSQL data engine") (description "WiredTiger is an extensible platform for data management. It supports row-oriented storage (where all columns of a row are stored together), column-oriented storage (where columns are stored in groups, allowing for more efficient access and storage of column subsets) and log-structured merge trees (LSM), for sustained throughput under random insert workloads.") (license license:gpl3) ; or GPL-2 ;; configure.ac: WiredTiger requires a 64-bit build. (supported-systems '("x86_64-linux" "mips64el-linux" "aarch64-linux")))) (define-public wiredtiger-3 (package (inherit wiredtiger) (name "wiredtiger") (version "3.1.0") (source (origin (method url-fetch) (uri (string-append "http://source.wiredtiger.com/releases/wiredtiger-" version ".tar.bz2")) (sha256 (base32 "014awypv579ascg4jbx4pndj2wld337m79yyzrzyr7hxrff139jx")))))) (define-public guile-wiredtiger (package (name "guile-wiredtiger") (version "0.7.0") (source (origin (method git-fetch) (uri (git-reference (url "https://framagit.org/a-guile-mind/guile-wiredtiger.git") (commit "340ad4bc2ff4dcc6216a2f5c6f9172ca320ac66b"))) (file-name (string-append name "-" version "-checkout")) (sha256 (base32 "15j36bvxxzil7qpwlmh1rffqpva3ynvrcpqhhqbj2c9208ayz595")))) (build-system gnu-build-system) (arguments '(#:parallel-tests? #f ;; tests can't be run in parallel, yet. #:configure-flags (list (string-append "--with-libwiredtiger-prefix=" (assoc-ref %build-inputs "wiredtiger"))) #:make-flags '("GUILE_AUTO_COMPILE=0"))) (native-inputs (list autoconf automake pkg-config)) (inputs (list wiredtiger-3 guile-2.2)) (propagated-inputs (list guile2.2-bytestructures)) (synopsis "WiredTiger bindings for GNU Guile") (description "This package provides Guile bindings to the WiredTiger ``NoSQL'' database.") (home-page "https://framagit.org/a-guile-mind/guile-wiredtiger") (license license:gpl3+))) (define-public perl-db-file (package (name "perl-db-file") (version "1.856") (source (origin (method url-fetch) (uri (string-append "mirror://cpan/authors/id/P/PM/PMQS/DB_File-" version ".tar.gz")) (sha256 (base32 "1ab6rm2b8lz0g3gc8k9y79gkgajyby0zpybkdg9mk4g35y9bmyfd")))) (build-system perl-build-system) (inputs (list bdb)) (native-inputs (list perl-test-pod)) (arguments `(#:phases (modify-phases %standard-phases (add-before 'configure 'modify-config.in (lambda* (#:key inputs #:allow-other-keys) (substitute* "config.in" (("/usr/local/BerkeleyDB") (assoc-ref inputs "bdb"))) #t))))) (home-page "https://metacpan.org/release/DB_File") (synopsis "Perl5 access to Berkeley DB version 1.x") (description "The DB::File module provides Perl bindings to the Berkeley DB version 1.x.") (license license:perl-license))) (define-public lmdb (package (name "lmdb") (version "0.9.29") (source (origin (method git-fetch) (uri (git-reference (url "https://git.openldap.org/openldap/openldap.git") (commit (string-append "LMDB_" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0airps4cd0d91nbgy7hgvifa801snxwxzwxyr6pdv61plsi7h8l3")))) (build-system gnu-build-system) (arguments `(#:test-target "test" #:phases (modify-phases %standard-phases (replace 'configure (lambda* (#:key outputs #:allow-other-keys) (chdir "libraries/liblmdb") (substitute* "Makefile" (("/usr/local") (assoc-ref outputs "out"))) #t)) (add-after 'install 'create-pkg-config-file (lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) (mkdir-p (string-append out "/lib/pkgconfig")) (with-output-to-file (string-append out "/lib/pkgconfig/liblmdb.pc") (lambda _ (format #t "prefix=~a~@ exec_prefix=~a~@ libdir=~a/lib~@ includedir=~a/include~@ ~@ Name: liblmdb~@ Version: ~a~@ Description: Lightning Memory-Mapped Database library~@ Libs: -L${libdir} -llmdb~@ Cflags: -I${includedir}~%" out out out out ,version))) #t)))))) (home-page "https://symas.com/lmdb/") (synopsis "Lightning Memory-Mapped Database library") (description "The @dfn{Lightning Memory-Mapped Database} (LMDB) is a high-performance transactional database. Unlike more complex relational databases, LMDB handles only key-value pairs (stored as arbitrary byte arrays) and relies on the underlying operating system for caching and locking, keeping the code small and simple. The use of ‘zero-copy’ memory-mapped files combines the persistence of classic disk-based databases with high read performance that scales linearly over multiple cores. The size of each database is limited only by the size of the virtual address space — not physical RAM.") (license license:openldap2.8))) (define-public lmdbxx (package (name "lmdbxx") (version "1.0.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/hoytech/lmdbxx") (commit version))) (file-name (git-file-name name version)) (sha256 (base32 "12k5rz74d1l0skcks9apry1svkl96g9lf5dcgylgjmh7v1jm0b7c")))) (arguments `(#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out"))) #:phases (modify-phases %standard-phases (delete 'configure)))) (build-system gnu-build-system) (inputs (list lmdb)) (home-page "https://github.com/hoytech/lmdbxx") (synopsis "C++11 wrapper for the LMDB embedded B+ tree database library") (description "@code{lmdbxx} is a comprehensive @code{C++} wrapper for the @code{LMDB} embedded database library, offering both an error-checked procedural interface and an object-oriented resource interface with RAII semantics.") (license license:unlicense))) (define-public libpqxx (package (name "libpqxx") (version "4.0.1") (source (origin (method url-fetch) (uri (string-append "http://pqxx.org/download/software/libpqxx/" name "-" version ".tar.gz")) (sha256 (base32 "0f6wxspp6rx12fkasanb0z2g2gc8dhcfwnxagx8wwqbpg6ifsz09")))) (build-system gnu-build-system) (native-inputs `(("python" ,python-2))) (inputs (list postgresql)) (arguments `(#:tests? #f ; # FAIL: 1 #:phases (modify-phases %standard-phases (add-before 'configure 'fix-sed-command (lambda _ ;; Newer sed versions error out if double brackets are not used. (substitute* "configure" (("\\[:space:\\]") "[[:space:]]")) #t))))) (synopsis "C++ connector for PostgreSQL") (description "Libpqxx is a C++ library to enable user programs to communicate with the PostgreSQL database back-end. The database back-end can be local or it may be on another machine, accessed via TCP/IP.") (home-page "http://pqxx.org/") (license license:bsd-3))) (define-public go-go-etcd-io-bbolt (package (name "go-go-etcd-io-bbolt") (version "1.3.6") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/etcd-io/bbolt") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0pj5245d417za41j6p09fmkbv05797vykr1bi9a6rnwddh1dbs8d")))) (build-system go-build-system) (arguments `(#:import-path "go.etcd.io/bbolt" ;; Extending the test timeout to 30 minutes still times out on aarch64. #:tests? ,(not target-arm?))) (propagated-inputs (list go-golang-org-x-sys)) (home-page "https://go.etcd.io/bbolt") (synopsis "Embedded key/value database for Go") (description "Bolt is a pure Go key/value store inspired by Howard Chu's LMDB project. The goal of the project is to provide a simple, fast, and reliable database for projects that don't require a full database server such as Postgres or MySQL.") (license license:expat))) (define-public python-peewee (package (name "python-peewee") (version "3.14.4") (source (origin (method url-fetch) (uri (pypi-uri "peewee" version)) (sha256 (base32 "18jidir2wid0cp8a61m9vf9mf0pdvm6nzspc8bfwdbifghr6ndcy")))) (build-system python-build-system) (arguments `(#:tests? #f)) ; fails to import test data (inputs (list sqlite)) (native-inputs (list python-cython)) (home-page "https://github.com/coleifer/peewee/") (synopsis "Small object-relational mapping utility") (description "Peewee is a simple and small ORM (object-relation mapping) tool. Peewee handles converting between pythonic values and those used by databases, so you can use Python types in your code without having to worry. It has built-in support for sqlite, mysql and postgresql. If you already have a database, you can autogenerate peewee models using @code{pwiz}, a model generator.") (license license:expat))) (define-public python-pypika-tortoise (package (name "python-pypika-tortoise") (version "0.1.1") (source (origin (method url-fetch) (uri (pypi-uri "pypika-tortoise" version)) (sha256 (base32 "0g4z0lz739nk04b405ynqpd3y1z5nfyxjz9hqgxcw3jydsjx0cb8")))) (build-system python-build-system) (home-page "https://github.com/tortoise/pypika-tortoise") (synopsis "Pypika fork for tortoise-orm") (description "Pypika-tortoise is a fork of pypika which has been streamlined for its use in the context of tortoise-orm. It removes support for many database kinds that tortoise-orm doesn't need, for example.") (license license:asl2.0))) (define-public python-sphinxcontrib-asyncio (package (name "python-sphinxcontrib-asyncio") (version "0.3.0") (source (origin (method url-fetch) (uri (pypi-uri "sphinxcontrib-asyncio" version)) (sha256 (base32 "0bkj010ygsr7m769llf2aq4bbjfhdwqrrabi98j8gpvyzvh2dzcr")))) (build-system python-build-system) (arguments '(#:tests? #f)) ;no test suite (propagated-inputs (list python-sphinx)) (home-page "https://github.com/aio-libs/sphinxcontrib-asyncio") (synopsis "Sphinx extension to support coroutines in markup") (description "This package is a Sphinx extension providing additional coroutine-specific markup.") (license license:asl2.0))) (define-public python-asyncpg (package (name "python-asyncpg") (version "0.24.0") (source (origin (method url-fetch) (uri (pypi-uri "asyncpg" version)) (sha256 (base32 "1in0q6iffpl8ag6ady4bvwnn40igh10cpp4xgm426j1lqdis0byx")))) (build-system python-build-system) (propagated-inputs (list python-typing-extensions)) (native-inputs (list postgresql python-cython python-flake8 python-pycodestyle python-pytest python-sphinx python-sphinx-rtd-theme python-sphinxcontrib-asyncio python-uvloop)) (home-page "https://github.com/MagicStack/asyncpg") (synopsis "Fast PostgreSQL database client library for Python") (description "@code{asyncpg} is a database interface library designed specifically for PostgreSQL and Python/asyncio. @code{asyncpg} is an efficient, clean implementation of PostgreSQL server binary protocol for use with Python's asyncio framework.") (license license:asl2.0))) (define-public python-asyncmy (package (name "python-asyncmy") (version "0.2.3") (source (origin (method url-fetch) (uri (pypi-uri "asyncmy" version)) (sha256 (base32 "19p81jd4w7m7v2x1jdrwibp67wzqx1a7rdw5n4qqmch3iffp97vn")))) (build-system python-build-system) (native-inputs (list python-cython)) (home-page "https://github.com/long2ice/asyncmy") (synopsis "Fast MySQL driver for Python") (description "@code{asyncmy} is a fast @code{asyncio} MySQL driver, which reuses most of @code{pymysql} and @code{aiomysql} but rewrites the core protocol with Cython for performance.") (license license:asl2.0))) (define-public python-aiomysql (package (name "python-aiomysql") (version "0.0.21") (source (origin (method url-fetch) (uri (pypi-uri "aiomysql" version)) (sha256 (base32 "0b442d0jb82z3lk19ylmm64ix88ppz7gay08bxld538ivg06j5c1")))) (build-system python-build-system) (arguments '(#:tests? #f)) ;test suite requires docker (propagated-inputs (list python-pymysql)) (home-page "https://github.com/aio-libs/aiomysql") (synopsis "MySQL driver for Python") (description "@code{aiomysql} is a driver for accessing a MySQL database from the @code{asyncio} Python framework. It depends on and reuses most parts of PyMySQL. @code{aiomysql} tries to preserve the same API as the @code{aiopg} library.") (license license:expat))) (define-public python-tortoise-orm (package (name "python-tortoise-orm") (version "0.17.8") (source (origin (method url-fetch) (uri (pypi-uri "tortoise-orm" version)) (sha256 (base32 "1gzgiypln7lck3p95vk3i8rdx1bjbmmlcpb8xpba8cjdjvlj0l0z")))) (build-system python-build-system) ;; The test suite relies on asynctest, which is abandoned and doesn't ;; support Python >= 3.8. (arguments '(#:tests? #f)) (propagated-inputs (list python-aiomysql python-aiosqlite python-asyncmy python-asyncpg python-ciso8601 python-iso8601 python-pypika-tortoise python-pytz python-rapidjson python-uvloop)) (home-page "https://github.com/tortoise/tortoise-orm") (synopsis "Asynchronous Object Relational Mapper (ORM) for Python") (description "Tortoise ORM is an easy-to-use asyncio ORM (Object Relational Mapper) inspired by Django. Tortoise ORM was built with relations in mind and admiration for the excellent and popular Django ORM. It's engraved in its design that you are working not with just tables, you work with relational data.") (license license:asl2.0))) (define-public sqlcipher (package (name "sqlcipher") (version "3.4.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/sqlcipher/" name "/archive/v" version ".tar.gz")) (sha256 (base32 "1nxarwbci8jx99f1d0y1ivxcv25s78l1p7q6qy28lkpkcx8pm2b9")) (file-name (string-append name "-" version ".tar.gz")))) (build-system gnu-build-system) (inputs `(("libcrypto" ,openssl) ("libtcl8.6" ,tcl))) ; required for running the tests (native-inputs (list tcl)) (arguments '(#:configure-flags '("--enable-tempstore=yes" "CFLAGS=-DSQLITE_HAS_CODEC -DSQLITE_ENABLE_FTS3" "LDFLAGS=-lcrypto -ltcl8.6" "--disable-tcl") ;; tests cannot be run from the Makefile ;; see: #:test-target "testfixture" #:phases (modify-phases %standard-phases (add-before 'check 'build-test-runner (assoc-ref %standard-phases 'check)) (replace 'check (lambda _ (invoke "./testfixture" "test/crypto.test")))))) (home-page "https://www.zetetic.net/sqlcipher/") (synopsis "Library providing transparent encryption of SQLite database files") (description "SQLCipher is an implementation of SQLite, extended to provide transparent 256-bit AES encryption of database files. Pages are encrypted before being written to disk and are decrypted when read back. It’s well suited for protecting embedded application databases and for mobile development.") ;; The source files ;; src/{crypto.c,crypto_impl.c,crypto.h,crypto_cc.c,crypto_libtomcrypt.c}, ;; src/{crypto_openssl.c,sqlcipher.h}, tool/crypto-speedtest.tcl, ;; test/crypto.test are licensed under a 3-clause BSD license. All other ;; source files are in the public domain. (license (list license:public-domain license:bsd-3)))) (define-public python-pyodbc-c (package (name "python-pyodbc-c") (version "3.1.4") (source (origin (method url-fetch) (uri (string-append "https://gitlab.com/daym/pyodbc-c/repository/" "archive.tar.gz?ref=v" version)) (sha256 (base32 "05aq2297k779xidmxcwkrrxjvj1bh2q7d9a1rcjv6zr15y764ga9")) (file-name (string-append name "-" version ".tar.gz")))) (build-system python-build-system) (inputs (list unixodbc)) (arguments `(;; No unit tests exist. #:tests? #f)) (home-page "https://github.com/mkleehammer/pyodbc") (synopsis "Python ODBC Library") (description "@code{python-pyodbc-c} provides a Python DB-API driver for ODBC.") (license (license:x11-style "file://LICENSE.TXT")))) (define-public python2-pyodbc-c (package-with-python2 python-pyodbc-c)) (define-public python-pyodbc (package (name "python-pyodbc") (version "4.0.30") (source (origin (method url-fetch) (uri (pypi-uri "pyodbc" version)) (sha256 (base32 "0skjpraar6hcwsy82612bpj8nw016ncyvvq88j5syrikxgp5saw5")) (file-name (string-append name "-" version ".tar.gz")))) (build-system python-build-system) (inputs (list unixodbc)) (arguments `(#:tests? #f)) ; no unit tests exist (home-page "https://github.com/mkleehammer/pyodbc") (synopsis "Python ODBC Library") (description "@code{python-pyodbc} provides a Python DB-API driver for ODBC.") (license (license:x11-style "file:///LICENSE.TXT")))) (define-public python2-pyodbc (package-with-python2 python-pyodbc)) (define-public mdbtools (package (name "mdbtools") (version "0.7.1") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/brianb/mdbtools") (commit version))) (file-name (git-file-name name version)) (sha256 (base32 "0gwcpp9y09xhs21g7my2fs8ncb8i6ahlyixcx8jd3q97jbzj441l")))) (build-system gnu-build-system) (inputs (list glib)) (native-inputs (list autoconf automake libtool pkg-config txt2man which)) (home-page "http://mdbtools.sourceforge.net/") (synopsis "Read Microsoft Access databases") (description "MDB Tools is a set of tools and applications to read the proprietary MDB file format used in Microsoft's Access database package. This includes programs to export schema and data from Microsoft's Access database file format to other databases such as MySQL, Oracle, Sybase, PostgreSQL, etc., and an SQL engine for performing simple SQL queries.") (license (list license:lgpl2.0 license:gpl2+)))) (define-public go-gopkg-in-mgo-v2 (package (name "go-gopkg-in-mgo-v2") (version "2.0.0-20190816093944-a6b53ec6cb22") (source (origin (method git-fetch) (uri (git-reference (url "https://gopkg.in/mgo.v2") (commit (go-version->git-ref version)))) (file-name (git-file-name name version)) (sha256 (base32 "1lgvwxsbmdrf4938qkxl56wbwgbphk2qqnmpf73qdmlv4qsg14na")))) (build-system go-build-system) (arguments '(#:tests? #f ; Tests try to use a running mongodb server. #:import-path "gopkg.in/mgo.v2")) (native-inputs (list go-gopkg-in-check-v1)) (home-page "https://gopkg.in/mgo.v2") (synopsis "MongoDB driver for Go") (description "This package provides a MongoDB driver for Go.") (license license:bsd-2))) (define-public python-lmdb (package (name "python-lmdb") (version "1.0.0") (source (origin (method url-fetch) (uri (pypi-uri "lmdb" version)) (sha256 (base32 "1di1gj2agbxwqqwrpk4w58dpfah0kl10ha20s63dlqdd1bgzydj1")) (modules '((guix build utils))) (snippet ;; Delete bundled lmdb source files. '(begin (for-each delete-file (list "lib/lmdb.h" "lib/mdb.c" "lib/midl.c" "lib/midl.h")) #t)))) (build-system python-build-system) (inputs (list lmdb)) (arguments `(#:phases (modify-phases %standard-phases (add-before 'build 'use-system-lmdb (lambda* (#:key inputs #:allow-other-keys) (let ((lmdb (assoc-ref inputs "lmdb"))) (setenv "LMDB_PURE" "set") ; don't apply env-copy-txn.patch (setenv "LMDB_FORCE_SYSTEM" "set") (setenv "LMDB_INCLUDEDIR" (string-append lmdb "/include")) (setenv "LMDB_LIBDIR" (string-append lmdb "/lib")) #t)))) ;; Tests fail with: ‘lmdb.tool: Please specify environment (--env)’. #:tests? #f)) (home-page "https://github.com/dw/py-lmdb") (synopsis "Python binding for the ‘Lightning’ database (LMDB)") (description "python-lmdb or py-lmdb is a Python binding for the @dfn{Lightning Memory-Mapped Database} (LMDB), a high-performance key-value store.") (license (list license:openldap2.8 ;; ‘lib/win32/inttypes.h’ and ‘lib/win32-stdint/stdint.h’ are BSD-3, ;; but not actually needed on platforms currently supported by Guix. license:bsd-3)))) (define-public virtuoso-ose (package (name "virtuoso-ose") (version "7.2.6") (source (origin (method url-fetch) (uri (string-append "mirror://sourceforge/virtuoso/virtuoso/" version "/" "virtuoso-opensource-" version ".tar.gz")) (sha256 (base32 "0ly7s7a3w2a2zhhi9rq9k2qlnzapqbbc1rcdqb3zqqpgg81krz9q")))) (build-system gnu-build-system) (arguments `(#:tests? #f ; Tests require a network connection. ;; TODO: Removing the libsrc/zlib source directory breaks the build. ;; This indicates that the internal zlib code may still be used. #:configure-flags '("--without-internal-zlib" "--with-readline" "--enable-static=no") #:phases (modify-phases %standard-phases ;; Even with "--enable-static=no", "libvirtuoso-t.a" is left in ;; the build output. The following phase removes it. (add-after 'install 'remove-static-libs (lambda* (#:key outputs #:allow-other-keys) (let ((lib (string-append (assoc-ref outputs "out") "/lib"))) (for-each (lambda (file) (delete-file (string-append lib "/" file))) '("libvirtuoso-t.a" "libvirtuoso-t.la")))))))) (inputs (list openssl net-tools readline zlib)) (home-page "http://vos.openlinksw.com/owiki/wiki/VOS/") (synopsis "Multi-model database system") (description "Virtuoso is a scalable cross-platform server that combines relational, graph, and document data management with web application server and web services platform functionality.") ;; configure: error: ... can only be build on 64bit platforms (supported-systems '("x86_64-linux" "mips64el-linux" "aarch64-linux")) (license license:gpl2))) (define-public python-ccm (package (name "python-ccm") (version "2.1.6") (source (origin (method url-fetch) (uri (pypi-uri "ccm" version)) (sha256 (base32 "177dfxsmk3k4cih6fh6v8d91bh4nqx7ns6pc07w7m7i3cvdx3c8n")))) (build-system python-build-system) (propagated-inputs (list python-pyyaml ;; Not listed in setup.py, but used in ccmlib/node.py for full ;; functionality python-psutil python-six)) (home-page "https://github.com/pcmanus/ccm") (synopsis "Cassandra Cluster Manager for Apache Cassandra clusters on localhost") (description "Cassandra Cluster Manager is a development tool for testing local Cassandra clusters. It creates, launches and removes Cassandra clusters on localhost.") (license license:asl2.0))) (define-public python2-pysqlite (package (name "python2-pysqlite") (version "2.8.3") (source (origin (method url-fetch) (uri (pypi-uri "pysqlite" version)) (sha256 (base32 "1424gwq9sil2ffmnizk60q36vydkv8rxs6m7xs987kz8cdc37lqp")))) (build-system python-build-system) (inputs (list sqlite)) (arguments `(#:python ,python-2 ; incompatible with Python 3 #:tests? #f)) ; no test target (home-page "https://github.com/ghaering/pysqlite") (synopsis "SQLite bindings for Python") (description "Pysqlite provides SQLite bindings for Python that comply to the Database API 2.0T.") (license license:zlib))) (define-public python-sqlalchemy (package (name "python-sqlalchemy") (version "1.4.35") (source (origin (method url-fetch) (uri (pypi-uri "SQLAlchemy" version)) (sha256 (base32 "1ddab00d5mpzg25r1qxccma2zb551hhmymsy1ycp6r6w04xq3z1g")))) (build-system python-build-system) (native-inputs (list python-cython ; for C extensions python-pytest python-mock python-pytest-xdist)) ; for tests (propagated-inputs (list python-greenlet)) (arguments (list #:phases #~(modify-phases %standard-phases (replace 'check (lambda* (#:key tests? #:allow-other-keys) (when tests? (invoke "pytest" "-vv" "-n" (number->string (parallel-job-count)) ;; The memory usage tests are very expensive and run in ;; sequence; skip them. "-k" "not test_memusage.py"))))))) (home-page "https://www.sqlalchemy.org") (synopsis "Database abstraction library") (description "SQLAlchemy is the Python SQL toolkit and Object Relational Mapper that gives application developers the full power and flexibility of SQL. It provides a full suite of well known enterprise-level persistence patterns, designed for efficient and high-performing database access, adapted into a simple and Pythonic domain language.") (license license:x11))) (define-public python2-sqlalchemy (let ((base (package-with-python2 python-sqlalchemy))) (package (inherit base) (arguments (substitute-keyword-arguments (package-arguments base) ((#:phases phases) #~(modify-phases #$phases (replace 'check (lambda* (#:key tests? #:allow-other-keys) (when tests? (invoke "pytest" "-vv" ;; The memory usage tests are very expensive and run in ;; sequence; skip them. "-k" (string-append "not test_memusage.py" ;; This test fails with "AssertionError: Warnings ;; were not seen [...]". " and not test_fixture_five"))))))))) ;; Do not use pytest-xdist, which is broken for Python 2. (native-inputs (modify-inputs (package-native-inputs base) (delete "python-pytest-xdist")))))) (define-public python-sqlalchemy-stubs (package (name "python-sqlalchemy-stubs") (version "0.4") (source (origin (method url-fetch) (uri (pypi-uri "sqlalchemy-stubs" version)) (sha256 (base32 "1bppjmv7v7m0q8gwg791pgxbx4ay7mna0zq204pn9vw28kfxcrf6")))) (build-system python-build-system) (propagated-inputs (list python-mypy python-typing-extensions)) (home-page "https://github.com/dropbox/sqlalchemy-stubs") (synopsis "SQLAlchemy stubs and mypy plugin") (description "This package contains type stubs and a mypy plugin to provide more precise static types and type inference for SQLAlchemy framework.") (license license:asl2.0))) (define-public python-sqlalchemy-utils (package (name "python-sqlalchemy-utils") (version "0.38.2") (source (origin (method url-fetch) (uri (pypi-uri "SQLAlchemy-Utils" version)) (sha256 (base32 "1d6fq81489kqzxmk3l6f39sinw206lzs392frmpr5lsjzg9xc0cy")))) (build-system python-build-system) (arguments '(#:tests? #f)) ; FIXME: Many tests require a running database server. ;; #:phases ;; (modify-phases %standard-phases ;; (replace 'check ;; (lambda _ ;; (zero? (system* "py.test" "sqlalchemy_utils" "tests"))))) (propagated-inputs (list python-six python-sqlalchemy)) (native-inputs (list python-dateutil python-flexmock python-psycopg2 python-pytest python-pytz)) (home-page "https://github.com/kvesteri/sqlalchemy-utils") (synopsis "Various utility functions for SQLAlchemy") (description "SQLAlchemy-utils provides various utility functions and custom data types for SQLAlchemy. SQLAlchemy is an SQL database abstraction library for Python. You might also want to install the following optional dependencies: @enumerate @item @code{python-passlib} @item @code{python-babel} @item @code{python-cryptography} @item @code{python-pytz} @item @code{python-psycopg2} @item @code{python-furl} @item @code{python-flask-babel} @end enumerate ") (license license:bsd-3))) (define-public python-alchemy-mock (package (name "python-alchemy-mock") (version "0.4.3") (home-page "https://github.com/miki725/alchemy-mock") (source (origin (method url-fetch) (uri (pypi-uri "alchemy-mock" version)) (sha256 (base32 "0ylxygl3bcdapzz529n8wgk7vx9gjwb3ism564ypkpd7dbsw653r")))) (build-system python-build-system) (arguments '(#:phases (modify-phases %standard-phases (replace 'check (lambda _ ;; Create pytest.ini that adds doctest options to ;; prevent test failure. Taken from tox.ini. (call-with-output-file "pytest.ini" (lambda (port) (format port "[pytest] doctest_optionflags=IGNORE_EXCEPTION_DETAIL "))) (invoke "pytest" "-vv" "--doctest-modules" "alchemy_mock/")))))) (native-inputs (list python-mock python-pytest)) (propagated-inputs (list python-six python-sqlalchemy)) (synopsis "Mock helpers for SQLAlchemy") (description "This package provides mock helpers for SQLAlchemy that makes it easy to mock an SQLAlchemy session while preserving the ability to do asserts. Normally Normally SQLAlchemy's expressions cannot be easily compared as comparison on binary expression produces yet another binary expression, but this library provides functions to facilitate such comparisons.") (license license:expat))) (define-public python-alembic (package (name "python-alembic") (version "1.7.5") (source (origin (method url-fetch) (uri (pypi-uri "alembic" version)) (sha256 (base32 "0lxi2g2025lz5k7k5dd5fc1lfijqi2yw6qqyjzp073z6laa8cckw")))) (build-system python-build-system) (arguments '(#:phases (modify-phases %standard-phases (replace 'check (lambda _ (invoke "pytest" "-vv")))))) (native-inputs (list python-mock python-pytest-cov)) (propagated-inputs (list python-dateutil python-sqlalchemy python-mako python-editor)) (home-page "https://bitbucket.org/zzzeek/alembic") (synopsis "Database migration tool for SQLAlchemy") (description "Alembic is a lightweight database migration tool for usage with the SQLAlchemy Database Toolkit for Python.") (license license:expat))) (define-public python-pickleshare (package (name "python-pickleshare") (version "0.7.5") (source (origin (method url-fetch) (uri (pypi-uri "pickleshare" version)) (sha256 (base32 "1jmghg3c53yp1i8cm6pcrm280ayi8621rwyav9fac7awjr3kss47")))) (build-system python-build-system) (arguments `(#:phases (modify-phases %standard-phases (replace 'check (lambda _ (invoke "pytest")))))) (native-inputs (list python-pytest)) (home-page "https://github.com/vivainio/pickleshare") (synopsis "Tiny key value database with concurrency support") (description "PickleShare is a small ‘shelve’-like datastore with concurrency support. Like shelve, a PickleShareDB object acts like a normal dictionary. Unlike shelve, many processes can access the database simultaneously. Changing a value in database is immediately visible to other processes accessing the same database. Concurrency is possible because the values are stored in separate files. Hence the “database” is a directory where all files are governed by PickleShare.") (properties `((python2-variant . ,(delay python2-pickleshare)))) (license license:expat))) (define-public python2-pickleshare (let ((pickleshare (package-with-python2 (strip-python2-variant python-pickleshare)))) (package (inherit pickleshare) (propagated-inputs (modify-inputs (package-propagated-inputs pickleshare) (prepend python2-pathlib2)))))) (define-public python-apsw (package (name "python-apsw") (version "3.36.0-r1") (source (origin (method url-fetch) (uri (string-append "https://github.com/rogerbinns/apsw/releases" "/download/" version "/apsw-" version ".zip")) (sha256 (base32 "0w8q73147hv77dlpqrx6h1gx03acc8xqhvdpfp6vkffdm0wmqd8p")))) (build-system python-build-system) (native-inputs (list unzip)) (inputs (list sqlite)) (arguments `(#:phases (modify-phases %standard-phases (replace 'build (lambda _ (invoke "python" "setup.py" "build" "--enable-all-extensions" "--enable=load_extension") #t)) (add-after 'build 'build-test-helper (lambda _ (invoke "gcc" "-fPIC" "-shared" "-o" "./testextension.sqlext" "-I." "-Isqlite3" "src/testextension.c") #t)) (replace 'check (lambda* (#:key inputs outputs #:allow-other-keys) (add-installed-pythonpath inputs outputs) (invoke "python" "setup.py" "test") #t))))) (home-page "https://github.com/rogerbinns/apsw/") (synopsis "Another Python SQLite Wrapper") (description "APSW is a Python wrapper for the SQLite embedded relational database engine. In contrast to other wrappers such as pysqlite it focuses on being a minimal layer over SQLite attempting just to translate the complete SQLite API into Python.") (license license:zlib))) (define-public python2-apsw (package-with-python2 python-apsw)) (define-public python-aiosqlite (package (name "python-aiosqlite") (version "0.17.0") (source (origin (method url-fetch) (uri (pypi-uri "aiosqlite" version)) (sha256 (base32 "0lgfpbkcd730hbgj3zlrbx2y8fzvdns2zj3s4r4l31n49g1arrph")))) (build-system python-build-system) (arguments '(#:phases (modify-phases %standard-phases (replace 'check (lambda* (#:key tests? #:allow-other-keys) (if tests? (invoke "python" "-m" "unittest" "aiosqlite.tests") (format #t "test suite not run~%")) #t))))) (propagated-inputs (list python-typing-extensions)) (native-inputs (list python-aiounittest)) (home-page "https://github.com/jreese/aiosqlite") (synopsis "Asyncio bridge for sqlite3") (description "The package aiosqlite replicates the standard sqlite3 module, but with async versions of all the standard connection and cursor methods, and context managers for automatically closing connections.") (license license:expat))) (define-public python-databases (package (name "python-databases") (version "0.5.5") (source (origin (method url-fetch) (uri (pypi-uri "databases" version)) (sha256 (base32 "0dzb998kg35xmd50ih168320vih2w3ich798r8fc4lf9q4bb1ih2")))) (build-system python-build-system) (propagated-inputs (list python-aiosqlite python-aiopg python-aiomysql python-asyncpg python-asyncmy python-sqlalchemy)) (home-page "https://github.com/encode/databases") (synopsis "Async database support for Python.") (description "This package implements async database support for Python.") (license license:bsd-3))) (define-public python2-py2neo (package (name "python2-py2neo") (version "3.1.2") (source (origin (method url-fetch) (uri (pypi-uri "py2neo" version)) (sha256 (base32 "1f1q95vqcvlc3nsc33p841swnjdcjazddlq2dzi3qfnjqjrajxw1")))) (build-system python-build-system) (arguments `(#:python ,python-2)) (home-page "https://py2neo.org") (synopsis "Library and toolkit for working with Neo4j in Python") (description "This package provides a client library and toolkit for working with Neo4j from within Python applications and from the command line. The core library has no external dependencies and has been carefully designed to be easy and intuitive to use.") (license license:asl2.0))) (define-public python-psycopg2 (package (name "python-psycopg2") (version "2.9.3") (source (origin (method url-fetch) (uri (pypi-uri "psycopg2" version)) (sha256 (base32 "1099as8ind9kpz30rmqzc3nir668fmpkxwayrj2sjka3ycdiv14f")))) (build-system python-build-system) (arguments ;; Tests would require a postgresql database "psycopg2_test" ;; and a running postgresql database management service. '(#:tests? #f)) ; TODO re-enable after providing a test-db. (inputs (list postgresql)) ; libpq (home-page "https://www.psycopg.org/") (synopsis "Python PostgreSQL adapter") (description "psycopg2 is a thread-safe PostgreSQL adapter that implements DB-API 2.0.") (license license:lgpl3+))) (define-public python-psycopg-pool (package (name "python-psycopg-pool") ;; The connection pooling code is on a different release cadence ;; from the driver code, so fetch the latest PyPI release. (version "3.0.3") (source (origin (method url-fetch) (uri (pypi-uri "psycopg-pool" version)) (sha256 (base32 "1nx139pwzsgrz253zjxw2sf8h713s79h4cp1falmpc39j08djb46")))) (build-system python-build-system) (arguments (list #:tests? #f ;run for psycopg below #:phases #~(modify-phases %standard-phases ;; This module requires 'psycopg', however psycopg needs this ;; for its tests. Disable sanity check to break the cycle. (delete 'sanity-check)))) (home-page "https://www.psycopg.org/") (synopsis "Connection pooler for psycopg") (description "This module provides connection pool implementations that can be used with the @code{psycopg} PostgreSQL driver.") (license license:lgpl3+))) (define-public python-psycopg (package (name "python-psycopg") (version "3.0.8") (source (origin ;; Fetch from git because PyPI contains only cythonized sources. (method git-fetch) (uri (git-reference (url "https://github.com/psycopg/psycopg") (commit version))) (file-name (git-file-name name version)) (sha256 (base32 "16i19jqd9lg9r7bc63ssh527cccrpf49g1nlayikk5qlswpzp75y")))) (build-system python-build-system) (arguments (list #:phases #~(modify-phases %standard-phases (add-before 'build 'change-directory (lambda _ (chdir "psycopg"))) (add-after 'build 'build-c-extensions (lambda _ (with-directory-excursion "../psycopg_c" ((assoc-ref %standard-phases 'build))))) (add-after 'install 'install-c-extensions (lambda* (#:key inputs outputs #:allow-other-keys) ;; For some reason setup.py refuses to install if the ;; installation directory is not on PYTHONPATH. (setenv "PYTHONPATH" (site-packages inputs outputs)) (with-directory-excursion "../psycopg_c" ((assoc-ref %standard-phases 'install) #:inputs inputs #:outputs outputs)))) (add-before 'check 'start-postgresql (lambda _ (let ((dbdir (string-append (getcwd) "/../pgdir"))) (invoke "initdb" "-D" dbdir) (invoke "pg_ctl" "-D" dbdir "-o" (string-append "-k " dbdir) "-l" (string-append dbdir "/db.log") "start") (invoke "psql" "-h" dbdir "-d" "postgres" "-c" "CREATE DATABASE nixbld;")))) (replace 'check (lambda* (#:key inputs tests? #:allow-other-keys) (when tests? (setenv "TZDIR" (search-input-directory inputs "share/zoneinfo")) (with-directory-excursion ".." (invoke "pytest" "-vv" "-o" "asyncio_mode=auto" ;; FIXME: Many of the typing tests are failing, ;; conveniently tagged as slow... "-k" "not slow")))))))) (native-inputs (list python-cython-3 python-mypy python-psycopg-pool python-pytest python-pytest-asyncio python-tenacity pproxy tzdata-for-tests)) (inputs (list postgresql)) (home-page "https://www.psycopg.org/") (synopsis "PostgreSQL driver for Python") (description "Psycopg 3 is a new implementation of the popular @code{psycopg2} database adapter for Python.") (license license:lgpl3+))) (define-public python-sadisplay (package (name "python-sadisplay") (version "0.4.9") (source (origin (method url-fetch) (uri (pypi-uri "sadisplay" version)) (sha256 (base32 "15jxwgla3q4xsp6rw8inqaiy1kdzc8l2cixj8amqcf0ji47icrxg")))) (build-system python-build-system) (arguments '(#:phases (modify-phases %standard-phases (replace 'check (lambda* (#:key tests? #:allow-other-keys) (if tests? (begin (setenv "PYTHONPATH" (string-append ".:" (or (getenv "PYTHONPATH") ""))) (invoke "pytest" "-vv")) (format #t "test suite not run~%"))))))) (propagated-inputs (list python-sqlalchemy)) (native-inputs ;; For tests. (list python-pytest)) (home-page "https://bitbucket.org/estin/sadisplay") (synopsis "SQLAlchemy schema displayer") (description "This package provides a program to build Entity Relationship diagrams from a SQLAlchemy model (or directly from the database).") (license license:bsd-3))) (define-public yoyo-migrations (package (name "yoyo-migrations") (version "7.2.0") (source (origin ;; We use the upstream repository, as the tests are not included in the ;; PyPI releases. (method hg-fetch) (uri (hg-reference (url "https://hg.sr.ht/~olly/yoyo") (changeset (string-append "v" version "-release")))) (file-name (string-append name "-" version "-checkout")) (sha256 (base32 "0q2z9bgdj3wyix7yvqsayfs21grp5av8ilh411lgmjhigszkvhcq")))) (build-system python-build-system) (arguments ;; XXX: Tests require a connection to some pgsql database and psycopg ;; fails to connect to it. '(#:tests? #f)) (propagated-inputs (list python-sqlparse python-tabulate)) (home-page "https://ollycope.com/software/yoyo/latest/") (synopsis "Database migrations with SQL") (description "Yoyo is a database schema migration tool. Migrations are written as SQL files or Python scripts that define a list of migration steps.") (license license:asl2.0))) (define-public python-mysqlclient (package (name "python-mysqlclient") (version "2.0.1") (source (origin (method url-fetch) (uri (pypi-uri "mysqlclient" version)) (sha256 (base32 "1rf5l8hazs3v18hmcrm90z3hi9wxv553ipwd5l6kj8j7l6p7abzv")))) (build-system python-build-system) (arguments '(#:tests? #f)) ;XXX: requires a live database (inputs `(("mysql-dev" ,mariadb "dev"))) (home-page "https://github.com/PyMySQL/mysqlclient-python") (synopsis "MySQLdb is an interface to the popular MySQL database server for Python") (description "MySQLdb is an interface to the popular MySQL database server for Python. The design goals are: @enumerate @item Compliance with Python database API version 2.0 [PEP-0249], @item Thread-safety, @item Thread-friendliness (threads will not block each other). @end enumerate") (license license:gpl2))) (define-public python-hiredis (package (name "python-hiredis") (version "0.2.0") (source (origin (method url-fetch) (uri (pypi-uri "hiredis" version)) (sha256 (base32 "1dfm2k9l9zar9nw9fwmm74zrgraxdxs04vx9li56fjcf289qx5fa")))) (build-system python-build-system) (arguments ;; no tests `(#:tests? #f)) (home-page "https://github.com/redis/hiredis-py") (synopsis "Python extension that wraps protocol parsing code in hiredis") (description "Python-hiredis is a python extension that wraps protocol parsing code in hiredis. It primarily speeds up parsing of multi bulk replies.") (license license:bsd-3))) (define-public python2-hiredis (package-with-python2 python-hiredis)) (define-public python-aioredis (package (name "python-aioredis") (version "2.0.1") (source (origin (method url-fetch) (uri (pypi-uri "aioredis" version)) (sha256 (base32 "13nrkk45az6qdiwfpbw80ls6bfip0i27qlkh9gsp2b9zk6pim9ga")))) (build-system python-build-system) (arguments (list #:phases #~(modify-phases %standard-phases (add-before 'check 'start-redis (lambda _ (invoke "redis-server" "--daemonize" "yes"))) (replace 'check (lambda* (#:key tests? #:allow-other-keys) (when tests? (invoke "pytest" "-vv"))))))) (native-inputs (list python-pytest python-pytest-asyncio python-uvloop redis)) (propagated-inputs (list python-async-timeout python-hiredis python-typing-extensions)) (home-page "https://github.com/aio-libs/aioredis-py") (synopsis "Redis support for Python's @code{asyncio} module") (description "This package provides Redis support for the Python @code{asyncio} (PEP 3156) module.") (license license:expat))) (define-public python-fakeredis (package (name "python-fakeredis") (version "1.7.1") (source (origin (method url-fetch) (uri (pypi-uri "fakeredis" version)) (sha256 (base32 "1v68my2v7fg44zwky3k5d52nn1bi0szpgdslghrpa2ifnjhlnb3w")))) (build-system python-build-system) (arguments ;; no tests `(#:tests? #f)) (propagated-inputs (list python-aioredis python-packaging python-redis python-sortedcontainers)) (home-page "https://github.com/jamesls/fakeredis") (synopsis "Fake implementation of redis API for testing purposes") (description "Fakeredis is a pure-Python implementation of the redis-py Python client that simulates talking to a redis server. It was created for a single purpose: to write unit tests. Setting up redis is not hard, but one often wants to write unit tests that don't talk to an external server such as redis. This module can be used as a reasonable substitute.") (license license:bsd-3))) (define-public python-redis (package (name "python-redis") (version "3.5.3") (source (origin (method url-fetch) (uri (pypi-uri "redis" version)) (sha256 (base32 "18h5b87g15x3j6pb1h2q27ri37p2qpvc9n2wgn5yl3b6m3y0qzhf")))) (build-system python-build-system) ;; Tests require a running Redis server. (arguments '(#:tests? #f)) ;; As long as we are not running test, we do not need this input :-) ;;(native-inputs ;; `(("python-pytest" ,python-pytest))) (home-page "https://github.com/andymccurdy/redis-py") (synopsis "Redis Python client") (description "This package provides a Python interface to the Redis key-value store.") (license license:expat))) (define-public python-rq (package (name "python-rq") (version "1.5.2") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/rq/rq") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0ikqmpq0g1qiqwd7ar1286l4hqjb6aj2wr844gihhb8ijzwhp8va")))) (build-system python-build-system) (arguments '(#:phases (modify-phases %standard-phases (add-before 'check 'start-redis (lambda _ (invoke "redis-server" "--daemonize" "yes"))) (replace 'check (lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) ;; Drop test that needs the SDK for Sentry.io. (delete-file "tests/test_sentry.py") ;; Ensure 'rq' and 'rqworker' ends up on PATH. (setenv "PATH" (string-append out "/bin:" (getenv "PATH"))) (invoke "pytest" "-vv"))))))) (native-inputs (list python-mock python-pytest redis)) (propagated-inputs (list python-click python-redis)) (home-page "https://python-rq.org/") (synopsis "Simple job queues for Python") (description "RQ (Redis Queue) is a simple Python library for queueing jobs and processing them in the background with workers. It is backed by Redis and it is designed to have a low barrier to entry.") (license license:bsd-2))) (define-public python-rq-scheduler (package (name "python-rq-scheduler") (version "0.10.0") (home-page "https://github.com/rq/rq-scheduler") (source (origin (method git-fetch) (uri (git-reference (url home-page) (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0xg6yazqs5kbr2ayvhvljs1h5vgx5k5dds613fmhswln7gglf9hk")))) (build-system python-build-system) (arguments '(#:phases (modify-phases %standard-phases (add-before 'check 'start-redis (lambda _ (invoke "redis-server" "--daemonize" "yes"))) (replace 'check (lambda _ (substitute* "run_tests.py" (("/usr/bin/env") (which "env"))) (invoke "./run_tests.py")))))) (native-inputs (list redis which)) (propagated-inputs (list python-croniter python-rq)) (synopsis "Job scheduling capabilities for RQ (Redis Queue)") (description "This package provides job scheduling capabilities to @code{python-rq} (Redis Queue).") (license license:expat))) (define-public python-trollius-redis (package (name "python-trollius-redis") (version "0.1.4") (source (origin (method url-fetch) (uri (pypi-uri "trollius_redis" version)) (sha256 (base32 "0k3vypszmgmaipgw9xscvgm79h2zd6p6ci8gdp5sxl6g5kbqr9fy")))) (build-system python-build-system) ;; TODO: Tests require packaging 'hiredis'. (arguments '(#:tests? #f)) (home-page "https://github.com/benjolitz/trollius-redis") (synopsis "Port of asyncio-redis to trollius") (description "@code{trollius-redis} is a Redis client for Python trollius. It is an asynchronous IO (PEP 3156) implementation of the Redis protocol.") (license license:bsd-2))) (define-public python-sqlparse (package (name "python-sqlparse") (version "0.4.2") (source (origin (method url-fetch) (uri (pypi-uri "sqlparse" version)) (sha256 (base32 "1bkx52c2jh28c528b69qfk2ijfzw1laxx6lim7jr8fi6fh67600c")))) (build-system python-build-system) (arguments `(#:phases (modify-phases %standard-phases (replace 'check (lambda _ (invoke "py.test"))) ;; XXX: The regular wrap phase ends up storing pytest as a runtime ;; dependency. See . (replace 'wrap (lambda* (#:key native-inputs inputs outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (python (assoc-ref (or native-inputs inputs) "python")) (sitedir (string-append "/lib/python" (python-version python) "/site-packages"))) (wrap-program (string-append out "/bin/sqlformat") `("PYTHONPATH" ":" prefix ,(map (lambda (output) (string-append output sitedir)) (list python out)))))))))) (native-inputs (list python-pytest)) (home-page "https://github.com/andialbrecht/sqlparse") (synopsis "Non-validating SQL parser") (description "Sqlparse is a non-validating SQL parser for Python. It provides support for parsing, splitting and formatting SQL statements.") (license license:bsd-3) (properties '((cpe-name . "sqlparse"))))) (define-public python-sql (package (name "python-sql") (version "1.3.0") (source (origin (method url-fetch) (uri (pypi-uri "python-sql" version)) (sha256 (base32 "0xnimfzlxj1ddrb5xj3s4gaii278a0gpxrvwmdmrdxgjfdi3lq4x")))) (build-system python-build-system) (home-page "https://python-sql.tryton.org/") (synopsis "Library to write SQL queries in a pythonic way") (description "@code{python-sql} is a library to write SQL queries, that transforms idiomatic python function calls to well-formed SQL queries.") (license license:bsd-3))) (define-public python-pypika (package (name "python-pypika") (version "0.47.6") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/kayak/pypika") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "001pg36sw9a36zdd1kccbymcxndphjcjbbrsy6ri7ng8h4dgz549")))) (build-system python-build-system) (native-inputs (list python-parameterized)) (home-page "https://github.com/kayak/pypika") (synopsis "SQL query builder API for Python") (description "PyPika is a python SQL query builder that exposes the full richness of the SQL language using a syntax that reflects the resulting query.") (license license:asl2.0))) ;; There are many wrappers for this in other languages. When touching, please ;; be sure to ensure all dependencies continue to build. (define-public apache-arrow (package (name "apache-arrow") (version "7.0.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/apache/arrow") (commit (string-append "apache-arrow-" version)))) (file-name (git-file-name name version)) (sha256 (base32 "19xx6mlddca79q6d3wga574m4y32ixmxx2rmk6j3f22i5c37mjzw")))) (build-system cmake-build-system) (arguments `(#:tests? #f #:phases (modify-phases %standard-phases (add-before 'configure 'enter-source-directory (lambda _ (chdir "cpp"))) (add-after 'unpack 'set-env (lambda _ (substitute* "cpp/cmake_modules/ThirdpartyToolchain.cmake" (("set\\(xsimd_SOURCE.*") "")) (setenv "BOOST_ROOT" (assoc-ref %build-inputs "boost")) (setenv "BROTLI_HOME" (assoc-ref %build-inputs "brotli")) (setenv "FLATBUFFERS_HOME" (assoc-ref %build-inputs "flatbuffers")) (setenv "RAPIDJSON_HOME" (assoc-ref %build-inputs "rapidjson"))))) #:build-type "Release" #:configure-flags (list "-DARROW_PYTHON=ON" "-DARROW_GLOG=ON" ;; Parquet options "-DARROW_PARQUET=ON" "-DPARQUET_BUILD_EXECUTABLES=ON" ;; The maintainers disallow using system versions of ;; jemalloc: ;; https://issues.apache.org/jira/browse/ARROW-3507. This ;; is unfortunate because jemalloc increases performance: ;; https://arrow.apache.org/blog/2018/07/20/jemalloc/. "-DARROW_JEMALLOC=OFF" ;; The CMake option ARROW_DEPENDENCY_SOURCE is a global ;; option that instructs the build system how to resolve ;; each dependency. SYSTEM = Finding the dependency in ;; system paths using CMake's built-in find_package ;; function, or using pkg-config for packages that do not ;; have this feature "-DARROW_DEPENDENCY_SOURCE=SYSTEM" "-Dxsimd_SOURCE=SYSTEM" "-DARROW_RUNTIME_SIMD_LEVEL=NONE" "-DARROW_SIMD_LEVEL=NONE" "-DARROW_PACKAGE_KIND=Guix" ;; Split output into its component packages. (string-append "-DCMAKE_INSTALL_PREFIX=" (assoc-ref %outputs "lib")) (string-append "-DCMAKE_INSTALL_RPATH=" (assoc-ref %outputs "lib") "/lib") (string-append "-DCMAKE_INSTALL_BINDIR=" (assoc-ref %outputs "out") "/bin") (string-append "-DCMAKE_INSTALL_INCLUDEDIR=" (assoc-ref %outputs "include") "/share/include") "-DARROW_WITH_SNAPPY=ON" "-DARROW_WITH_ZLIB=ON" "-DARROW_WITH_ZSTD=ON" "-DARROW_WITH_LZ4=ON" "-DARROW_COMPUTE=ON" "-DARROW_CSV=ON" "-DARROW_DATASET=ON" "-DARROW_FILESYSTEM=ON" "-DARROW_HDFS=ON" "-DARROW_JSON=ON" ;; Arrow Python C++ integration library (required for ;; building pyarrow). This library must be built against ;; the same Python version for which you are building ;; pyarrow. NumPy must also be installed. Enabling this ;; option also enables ARROW_COMPUTE, ARROW_CSV, ;; ARROW_DATASET, ARROW_FILESYSTEM, ARROW_HDFS, and ;; ARROW_JSON. "-DARROW_PYTHON=ON" ;; Building the tests forces on all the ;; optional features and the use of static ;; libraries. "-DARROW_BUILD_TESTS=OFF" "-DBENCHMARK_ENABLE_GTEST_TESTS=OFF" ;;"-DBENCHMARK_ENABLE_TESTING=OFF" "-DARROW_BUILD_STATIC=OFF"))) (inputs `(("boost" ,boost) ("brotli" ,brotli) ("bzip2" ,bzip2) ("double-conversion" ,double-conversion) ("gflags" ,gflags) ("glog" ,glog) ("grpc" ,grpc) ("protobuf" ,protobuf) ("python-3" ,python) ("python-numpy" ,python-numpy) ("rapidjson" ,rapidjson) ("re2" ,re2) ("snappy" ,snappy) ("xsimd" ,xsimd))) ;; These are all listed under Requires.private in arrow.pc (propagated-inputs (list `(,apache-thrift "lib") lz4 utf8proc zlib `(,zstd "lib"))) (native-inputs (list pkg-config)) (outputs '("out" "lib" "include")) (home-page "https://arrow.apache.org/") (synopsis "Columnar in-memory analytics") (description "Apache Arrow is a columnar in-memory analytics layer designed to accelerate big data. It houses a set of canonical in-memory representations of flat and hierarchical data along with multiple language-bindings for structure manipulation. It also provides IPC and common algorithm implementations.") (license license:asl2.0))) (define-public python-pyarrow (package (inherit apache-arrow) (name "python-pyarrow") (build-system python-build-system) (arguments '(#:tests? #f ; XXX There are no tests in the "python" directory #:phases (modify-phases %standard-phases (delete 'build) ; XXX the build is performed again during the install phase (add-after 'unpack 'enter-source-directory (lambda _ (chdir "python"))) (add-after 'unpack 'make-git-checkout-writable (lambda _ (for-each make-file-writable (find-files ".")))) (add-before 'install 'patch-cmake-variables (lambda* (#:key inputs #:allow-other-keys) ;; Replace cmake locations with hardcoded guix links for the ;; underlying C++ library and headers. This is a pretty awful ;; hack. (substitute* "cmake_modules/FindParquet.cmake" (("# Licensed to the Apache Software Foundation" m) (string-append "set(PARQUET_INCLUDE_DIR \"" (assoc-ref inputs "apache-arrow:include") "/share/include\")\n" m)) (("find_package_handle_standard_args" m) (string-append "set(PARQUET_LIB_DIR \"" (assoc-ref inputs "apache-arrow:lib") "/lib\")\n" m))))) (add-before 'install 'patch-parquet-library (lambda _ (substitute* "CMakeLists.txt" (("parquet_shared") "parquet")))) (add-before 'install 'set-PYARROW_WITH_PARQUET (lambda _ (setenv "PYARROW_WITH_PARQUET" "1")))))) (propagated-inputs `(("apache-arrow:lib" ,apache-arrow "lib") ("apache-arrow:include" ,apache-arrow "include") ("python-numpy" ,python-numpy) ("python-pandas" ,python-pandas) ("python-six" ,python-six))) (native-inputs `(("cmake" ,cmake-minimal) ("pkg-config" ,pkg-config) ("python-cython" ,python-cython) ("python-pytest" ,python-pytest) ("python-pytest-runner" ,python-pytest-runner) ("python-setuptools-scm" ,python-setuptools-scm))) (outputs '("out")) (home-page "https://arrow.apache.org/docs/python/") (synopsis "Python bindings for Apache Arrow") (description "This library provides a Pythonic API wrapper for the reference Arrow C++ implementation, along with tools for interoperability with pandas, NumPy, and other traditional Python scientific computing packages.") (license license:asl2.0))) (define-public python-crate (package (name "python-crate") (version "0.23.2") (source (origin (method url-fetch) (uri (pypi-uri "crate" version)) (sha256 (base32 "0ngmlvi320c5gsxab0s7qgq0ck4jdlcwvb6lbjhnfprafdp56vvx")))) (build-system python-build-system) (propagated-inputs (list python-urllib3)) (home-page "https://github.com/crate/crate-python") (synopsis "CrateDB Python client") (description "This package provides a Python client library for CrateDB. It implements the Python DB API 2.0 specification and includes support for SQLAlchemy.") (license license:asl2.0))) (define-public libdbi (package (name "libdbi") (version "0.9.0") (source (origin (method url-fetch) (uri (string-append "mirror://sourceforge/libdbi/libdbi/libdbi-" version "/libdbi-" version ".tar.gz")) (sha256 (base32 "00s5ra7hdlq25iv23nwf4h1v3kmbiyzx0v9bhggjiii4lpf6ryys")))) (build-system gnu-build-system) (synopsis "Database independent abstraction layer in C") (description "This library implements a database independent abstraction layer in C, similar to the DBI/DBD layer in Perl. Writing one generic set of code, programmers can leverage the power of multiple databases and multiple simultaneous database connections by using this framework.") (home-page "http://libdbi.sourceforge.net/") (license license:lgpl2.1+))) (define-public libdbi-drivers (package (name "libdbi-drivers") (version "0.9.0") (source (origin (method url-fetch) (uri (string-append "mirror://sourceforge/libdbi-drivers/" "libdbi-drivers/libdbi-drivers-" version "/libdbi-drivers-" version ".tar.gz")) (sha256 (base32 "0m680h8cc4428xin4p733azysamzgzcmv4psjvraykrsaz6ymlj3")))) (build-system gnu-build-system) (native-inputs (list ;; For tests. inetutils glibc-locales mariadb)) (inputs `(("libdbi" ,libdbi) ("mariadb:dev" ,mariadb "dev") ("mariadb:lib" ,mariadb "lib") ("postgresql" ,postgresql) ("sqlite" ,sqlite))) (arguments `(#:configure-flags (let ((libdbi (assoc-ref %build-inputs "libdbi")) (mysql:inc (assoc-ref %build-inputs "mariadb:dev")) (mysql:lib (assoc-ref %build-inputs "mariadb:lib")) (postgresql (assoc-ref %build-inputs "postgresql")) (sqlite (assoc-ref %build-inputs "sqlite"))) (list "--disable-docs" (string-append "--with-dbi-incdir=" libdbi "/include") (string-append "--with-dbi-libdir=" libdbi "/lib") "--with-mysql" (string-append "--with-mysql-incdir=" mysql:inc "/include/mysql") (string-append "--with-mysql-libdir=" mysql:lib "/lib") "--with-pgsql" (string-append "--with-pgsql-incdir=" postgresql "/include") (string-append "--with-pgsql-libdir=" postgresql "/lib") "--with-sqlite3" (string-append "--with-sqlite-incdir=" sqlite "/include") (string-append "--with-sqlite-libdir=" sqlite "/lib"))) #:tests? #f ; FIXME: Find why the tests get stuck forever. #:phases (modify-phases %standard-phases (add-after 'unpack 'fix-tests (lambda* (#:key inputs #:allow-other-keys) (substitute* "tests/test_mysql.sh" (("^MYMYSQLD=.*") (string-append "MYMYSQLD=" (assoc-ref inputs "mariadb") "/bin/mysqld"))) #t)) (add-after 'install 'remove-empty-directories (lambda* (#:key outputs #:allow-other-keys) (let ((var (string-append (assoc-ref outputs "out") "/var"))) (delete-file-recursively var)) #t))))) (synopsis "Database drivers for the libdbi framework") (description "The @code{libdbi-drivers} library provides the database specific drivers for the @code{libdbi} framework. The drivers officially supported by @code{libdbi} are: @itemize @item MySQL, @item PostgreSQL, @item SQLite. @end itemize") (home-page "http://libdbi-drivers.sourceforge.net/") (license license:lgpl2.1+))) (define-public soci (package (name "soci") (version "4.0.2") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/SOCI/soci/") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0qc6d71lyrfh5zb7pmfihd1hjyazlkgq6p0g06ans77wnnjh0k9l")))) (build-system cmake-build-system) (propagated-inputs ;; Headers of soci has include-references to headers of these inputs. `(("firebird" ,firebird) ("postgresql" ,postgresql) ("sqlite" ,sqlite) ("odbc" ,unixodbc) ("boost" ,boost) ("mariadb:dev" ,mariadb "dev"))) (arguments `(#:configure-flags ;; C++11 (-DSOCI_CXX11) is OFF by default. hyperledger-iroha needs it. (list "-DCMAKE_CXX_STANDARD=17" "-DSOCI_LIBDIR=lib") #:tests? #f)) ; may require running database management systems (synopsis "C++ Database Access Library") (description "SOCI is an abstraction layer for several database backends, including PostreSQL, SQLite, ODBC and MySQL.") (home-page "http://soci.sourceforge.net/") (license license:boost1.0))) (define-public freetds (package (name "freetds") (version "1.2.20") (source (origin (method url-fetch) (uri (string-append "https://www.freetds.org/files/stable/" "freetds-" version ".tar.gz")) (sha256 (base32 "11fzwcahc1bc8npxbif0448v9cwyf7k04167i7fcspmfw7a0hj0d")))) (build-system gnu-build-system) (arguments ;; NOTE: (Sharlatan-20210110213908+0000) some tests require DB connection, ;; disabled for now. `(#:tests? #f)) (home-page "https://www.freetds.org/") (synopsis "Client libraries for MS SQL and Sybase servers") (description "FreeTDS is an implementation of the Tabular DataStream protocol, used for connecting to MS SQL and Sybase servers over TCP/IP.") (license license:lgpl2.0+))) (define-public python-tinydb (package (name "python-tinydb") (version "4.5.2") (source (origin (method url-fetch) (uri (pypi-uri "tinydb" version)) (sha256 (base32 "1x9c4s42930wwal3ds0plwb57kg5c3gj7kbpy64c29vq478b463x")))) (build-system python-build-system) ;; PyPi tarball does not contain tests and github repository does not ;; have a setup.py file (only pyproject). (arguments `(#:tests? #f)) (propagated-inputs (list python-typing-extensions)) (home-page "https://github.com/msiemens/tinydb") (synopsis "TinyDB is a lightweight document oriented database") (description "TinyDB is a small document oriented database written in pure Python with no external dependencies. The targets are small apps that would be blown away by a SQL-DB or an external database server.") (license license:expat))) (define-public sequeler (package (name "sequeler") (version "0.8.2") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/Alecaddd/sequeler") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "0biggmsn8k7j6pdrwk29whl56qlfgvf5d9vjpgz4nyqih56wgh9j")))) (build-system meson-build-system) (arguments '(#:glib-or-gtk? #t #:phases (modify-phases %standard-phases (add-after 'unpack 'skip-gtk-update-icon-cache ;; Don't create 'icon-theme.cache'. (lambda _ (substitute* "build-aux/meson_post_install.py" (("gtk-update-icon-cache") "true") (("update-desktop-database") "true"))))))) (native-inputs `(;("appstream-glib" ,appstream-glib) ; validation fails for lack of network ("gettext-minimal" ,gettext-minimal) ("glib:bin" ,glib "bin") ; for glib-compile-resources ("gtk+" ,gtk+ "bin") ("pkg-config" ,pkg-config) ("vala" ,vala))) (inputs `(("glib" ,glib) ("granite" ,granite) ("gsettings-desktop-schemas" ,gsettings-desktop-schemas) ("gtk+" ,gtk+) ("gtksourceview-3" ,gtksourceview-3) ("libgda" ,libgda) ("libgee" ,libgee) ("libsecret" ,libsecret) ("libssh2" ,libssh2) ("libxml2" ,libxml2))) (synopsis "Friendly SQL Client") (description "Sequeler is a native Linux SQL client built in Vala and Gtk. It allows you to connect to your local and remote databases, write SQL in a handy text editor with language recognition, and visualize SELECT results in a Gtk.Grid Widget.") (home-page "https://github.com/Alecaddd/sequeler") (license license:gpl2+))) (define-public sqlitebrowser (package (name "sqlitebrowser") (version "3.12.2") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/sqlitebrowser/sqlitebrowser") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 "1ljqzcx388mmni8lv9jz5r58alhsjrrqi4nzjnbfki94rn4ray6z")) (modules '((guix build utils))) (snippet '(begin (delete-file-recursively "libs/qcustomplot-source/") (delete-file-recursively "libs/qhexedit/") (delete-file-recursively "libs/qscintilla"))))) (build-system qt-build-system) (arguments (list #:configure-flags ;; TODO: Unbundle json (json-modern-cxx). #~(list (string-append "-DQSCINTILLA_INCLUDE_DIR=" #$(this-package-input "qscintilla") "/include/Qsci") "-DFORCE_INTERNAL_QCUSTOMPLOT=OFF" "-DFORCE_INTERNAL_QHEXEDIT=OFF" "-DENABLE_TESTING=ON"))) (inputs (list qcustomplot qhexedit qscintilla qtbase-5 sqlite)) (native-inputs (list qttools)) (home-page "https://sqlitebrowser.org/") (synopsis "Database browser for SQLite") (description "Sqlitebrowser is a high quaility, visual, open source tool to create design, and edit database file compatible with SQLite.") (license ;; dual license (list license:gpl3+ license:mpl2.0))))