| 1 | ;;; GNU Guix --- Functional package management for GNU |
| 2 | ;;; Copyright © 2012, 2013, 2014, 2015, 2016 Ludovic Courtès <ludo@gnu.org> |
| 3 | ;;; Copyright © 2012, 2014, 2015 Andreas Enge <andreas@enge.fr> |
| 4 | ;;; Copyright © 2013 Cyril Roelandt <tipecaml@gmail.com> |
| 5 | ;;; Copyright © 2014, 2016 David Thompson <davet@gnu.org> |
| 6 | ;;; Copyright © 2014, 2015, 2016 Mark H Weaver <mhw@netris.org> |
| 7 | ;;; Copyright © 2015 Eric Bavier <bavier@member.fsf.org> |
| 8 | ;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com> |
| 9 | ;;; Copyright © 2015 Leo Famulari <leo@famulari.name> |
| 10 | ;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il> |
| 11 | ;;; Copyright © 2016, 2017 ng0 <contact.ng0@cryptolab.net> |
| 12 | ;;; Copyright © 2016 Roel Janssen <roel@gnu.org> |
| 13 | ;;; Copyright © 2016 David Craven <david@craven.ch> |
| 14 | ;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org> |
| 15 | ;;; Copyright © 2016 Andy Patterson <ajpatter@uwaterloo.ca> |
| 16 | ;;; Copyright © 2017 Marius Bakke <mbakke@fastmail.com> |
| 17 | ;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be> |
| 18 | ;;; |
| 19 | ;;; This file is part of GNU Guix. |
| 20 | ;;; |
| 21 | ;;; GNU Guix is free software; you can redistribute it and/or modify it |
| 22 | ;;; under the terms of the GNU General Public License as published by |
| 23 | ;;; the Free Software Foundation; either version 3 of the License, or (at |
| 24 | ;;; your option) any later version. |
| 25 | ;;; |
| 26 | ;;; GNU Guix is distributed in the hope that it will be useful, but |
| 27 | ;;; WITHOUT ANY WARRANTY; without even the implied warranty of |
| 28 | ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 29 | ;;; GNU General Public License for more details. |
| 30 | ;;; |
| 31 | ;;; You should have received a copy of the GNU General Public License |
| 32 | ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. |
| 33 | |
| 34 | (define-module (gnu packages databases) |
| 35 | #:use-module (gnu packages) |
| 36 | #:use-module (gnu packages algebra) |
| 37 | #:use-module (gnu packages autotools) |
| 38 | #:use-module (gnu packages avahi) |
| 39 | #:use-module (gnu packages base) |
| 40 | #:use-module (gnu packages bash) |
| 41 | #:use-module (gnu packages bison) |
| 42 | #:use-module (gnu packages boost) |
| 43 | #:use-module (gnu packages check) |
| 44 | #:use-module (gnu packages compression) |
| 45 | #:use-module (gnu packages crypto) |
| 46 | #:use-module (gnu packages curl) |
| 47 | #:use-module (gnu packages cyrus-sasl) |
| 48 | #:use-module (gnu packages emacs) |
| 49 | #:use-module (gnu packages gettext) |
| 50 | #:use-module (gnu packages glib) |
| 51 | #:use-module (gnu packages gnupg) |
| 52 | #:use-module (gnu packages jemalloc) |
| 53 | #:use-module (gnu packages language) |
| 54 | #:use-module (gnu packages linux) |
| 55 | #:use-module (gnu packages ncurses) |
| 56 | #:use-module (gnu packages parallel) |
| 57 | #:use-module (gnu packages pcre) |
| 58 | #:use-module (gnu packages perl) |
| 59 | #:use-module (gnu packages pkg-config) |
| 60 | #:use-module (gnu packages popt) |
| 61 | #:use-module (gnu packages python) |
| 62 | #:use-module (gnu packages rdf) |
| 63 | #:use-module (gnu packages readline) |
| 64 | #:use-module (gnu packages tcl) |
| 65 | #:use-module (gnu packages tls) |
| 66 | #:use-module (gnu packages xml) |
| 67 | #:use-module ((guix licenses) #:prefix license:) |
| 68 | #:use-module (guix packages) |
| 69 | #:use-module (guix download) |
| 70 | #:use-module (guix build-system gnu) |
| 71 | #:use-module (guix build-system perl) |
| 72 | #:use-module (guix build-system python) |
| 73 | #:use-module (guix build-system cmake) |
| 74 | #:use-module (guix utils) |
| 75 | #:use-module (srfi srfi-26) |
| 76 | #:use-module (ice-9 match)) |
| 77 | |
| 78 | (define-public 4store |
| 79 | (package |
| 80 | (name "4store") |
| 81 | (version "1.1.6") |
| 82 | (source (origin |
| 83 | (method url-fetch) |
| 84 | (uri (string-append "https://github.com/garlik/4store/archive/v" |
| 85 | version ".tar.gz")) |
| 86 | (file-name (string-append name "-" version ".tar.gz")) |
| 87 | (sha256 |
| 88 | (base32 "004fmcf1w75zhc1x3zc6kc97j4jqn2v5nhk6yb3z3cpfrhzi9j50")) |
| 89 | (patches (list (search-patch "4store-fix-buildsystem.patch"))))) |
| 90 | (build-system gnu-build-system) |
| 91 | (native-inputs |
| 92 | `(("perl" ,perl) |
| 93 | ("python" ,python-2) |
| 94 | ("autoconf" ,autoconf) |
| 95 | ("automake" ,automake) |
| 96 | ("gettext" ,gettext-minimal) |
| 97 | ("libtool" ,libtool) |
| 98 | ("pcre" ,pcre "bin") ;for 'pcre-config' |
| 99 | ("pkg-config" ,pkg-config))) |
| 100 | (inputs |
| 101 | `(("glib" ,glib) |
| 102 | ("rasqal" ,rasqal) |
| 103 | ("libxml2" ,libxml2) |
| 104 | ("raptor2" ,raptor2) |
| 105 | ("readline" ,readline) |
| 106 | ("avahi" ,avahi) |
| 107 | ("cyrus-sasl" ,cyrus-sasl) |
| 108 | ("openssl" ,openssl) |
| 109 | ("util-linux" ,util-linux))) |
| 110 | (arguments |
| 111 | `(#:phases |
| 112 | (modify-phases %standard-phases |
| 113 | (add-before 'configure 'generate-configure |
| 114 | (lambda _ |
| 115 | (zero? (system* "./autogen.sh"))))))) |
| 116 | ;; http://www.4store.org has been down for a while now. |
| 117 | (home-page "https://github.com/garlik/4store") |
| 118 | (synopsis "Clustered RDF storage and query engine") |
| 119 | (description "4store is a RDF/SPARQL store written in C, supporting |
| 120 | either single machines or networked clusters.") |
| 121 | (license license:gpl3+))) |
| 122 | |
| 123 | (define-public gdbm |
| 124 | (package |
| 125 | (name "gdbm") |
| 126 | (version "1.12") |
| 127 | (source (origin |
| 128 | (method url-fetch) |
| 129 | (uri (string-append "mirror://gnu/gdbm/gdbm-" |
| 130 | version ".tar.gz")) |
| 131 | (sha256 |
| 132 | (base32 |
| 133 | "1smwz4x5qa4js0zf1w3asq6z7mh20zlgwbh2bk5dczw6xrk22yyr")))) |
| 134 | (arguments `(#:configure-flags '("--enable-libgdbm-compat"))) |
| 135 | (build-system gnu-build-system) |
| 136 | (home-page "http://www.gnu.org/software/gdbm/") |
| 137 | (synopsis |
| 138 | "Hash library of database functions compatible with traditional dbm") |
| 139 | (description |
| 140 | "GDBM is a library for manipulating hashed databases. It is used to |
| 141 | store key/value pairs in a file in a manner similar to the Unix dbm library |
| 142 | and provides interfaces to the traditional file format.") |
| 143 | (license license:gpl3+))) |
| 144 | |
| 145 | (define-public bdb |
| 146 | (package |
| 147 | (name "bdb") |
| 148 | (version "6.2.23") |
| 149 | (source (origin |
| 150 | (method url-fetch) |
| 151 | (uri (string-append "http://download.oracle.com/berkeley-db/db-" |
| 152 | version ".tar.gz")) |
| 153 | (sha256 |
| 154 | (base32 |
| 155 | "1isxx4jfmnh913jzhp8hhfngbk6dsg46f4kjpvvc56maj64jqqa7")))) |
| 156 | (build-system gnu-build-system) |
| 157 | (outputs '("out" ; programs, libraries, headers |
| 158 | "doc")) ; 94 MiB of HTML docs |
| 159 | (arguments |
| 160 | '(#:tests? #f ; no check target available |
| 161 | #:disallowed-references ("doc") |
| 162 | #:phases |
| 163 | (alist-replace |
| 164 | 'configure |
| 165 | (lambda* (#:key outputs #:allow-other-keys) |
| 166 | (let ((out (assoc-ref outputs "out")) |
| 167 | (doc (assoc-ref outputs "doc"))) |
| 168 | ;; '--docdir' is not honored, so we need to patch. |
| 169 | (substitute* "dist/Makefile.in" |
| 170 | (("docdir[[:blank:]]*=.*") |
| 171 | (string-append "docdir = " doc "/share/doc/bdb"))) |
| 172 | |
| 173 | (zero? |
| 174 | (system* "./dist/configure" |
| 175 | (string-append "--prefix=" out) |
| 176 | (string-append "CONFIG_SHELL=" (which "bash")) |
| 177 | (string-append "SHELL=" (which "bash")) |
| 178 | |
| 179 | ;; Remove 7 MiB of .a files. |
| 180 | "--disable-static" |
| 181 | |
| 182 | ;; The compatibility mode is needed by some packages, |
| 183 | ;; notably iproute2. |
| 184 | "--enable-compat185" |
| 185 | |
| 186 | ;; The following flag is needed so that the inclusion |
| 187 | ;; of db_cxx.h into C++ files works; it leads to |
| 188 | ;; HAVE_CXX_STDHEADERS being defined in db_cxx.h. |
| 189 | "--enable-cxx")))) |
| 190 | %standard-phases))) |
| 191 | (synopsis "Berkeley database") |
| 192 | (description |
| 193 | "Berkeley DB is an embeddable database allowing developers the choice of |
| 194 | SQL, Key/Value, XML/XQuery or Java Object storage for their data model.") |
| 195 | ;; Starting with version 6, BDB is distributed under AGPL3. Many individual |
| 196 | ;; files are covered by the 3-clause BSD license. |
| 197 | (license (list license:agpl3+ license:bsd-3)) |
| 198 | (home-page |
| 199 | "http://www.oracle.com/us/products/database/berkeley-db/overview/index.html"))) |
| 200 | |
| 201 | (define-public bdb-5.3 |
| 202 | (package (inherit bdb) |
| 203 | (name "bdb") |
| 204 | (version "5.3.28") |
| 205 | (license (license:non-copyleft "file://LICENSE" |
| 206 | "See LICENSE in the distribution.")) |
| 207 | (source (origin |
| 208 | (method url-fetch) |
| 209 | (uri (string-append "http://download.oracle.com/berkeley-db/db-" |
| 210 | version ".tar.gz")) |
| 211 | (sha256 |
| 212 | (base32 |
| 213 | "0a1n5hbl7027fbz5lm0vp0zzfp1hmxnz14wx3zl9563h83br5ag0")))))) |
| 214 | |
| 215 | (define-public leveldb |
| 216 | (package |
| 217 | (name "leveldb") |
| 218 | (version "1.20") |
| 219 | (source (origin |
| 220 | (method url-fetch) |
| 221 | (uri (string-append "https://github.com/google/leveldb" |
| 222 | "/archive/v" version ".tar.gz")) |
| 223 | (file-name (string-append name "-" version ".tar.gz")) |
| 224 | (sha256 |
| 225 | (base32 |
| 226 | "0r36bcrj6b2afsp4aw1gjai3jbs1c7734pxpc1jz7hh9nasyiazm")))) |
| 227 | (build-system gnu-build-system) |
| 228 | (arguments |
| 229 | '(#:make-flags (list "CC=gcc") |
| 230 | #:phases |
| 231 | (modify-phases %standard-phases |
| 232 | (delete 'configure) |
| 233 | (replace 'install |
| 234 | ;; There is no install target, so we do it here. |
| 235 | (lambda* (#:key outputs #:allow-other-keys) |
| 236 | (let* ((out (assoc-ref outputs "out")) |
| 237 | (lib (string-append out "/lib")) |
| 238 | (include (string-append out "/include"))) |
| 239 | (for-each (lambda (file) |
| 240 | (install-file file lib)) |
| 241 | (find-files "out-shared" "^libleveldb\\.so.*$")) |
| 242 | (copy-recursively "include" include) |
| 243 | #t)))))) |
| 244 | (inputs |
| 245 | `(("snappy" ,snappy))) |
| 246 | (home-page "http://leveldb.org/") |
| 247 | (synopsis "Fast key-value storage library") |
| 248 | (description |
| 249 | "LevelDB is a fast key-value storage library that provides an ordered |
| 250 | mapping from string keys to string values.") |
| 251 | (license license:bsd-3))) |
| 252 | |
| 253 | (define-public mysql |
| 254 | (package |
| 255 | (name "mysql") |
| 256 | (version "5.7.17") |
| 257 | (source (origin |
| 258 | (method url-fetch) |
| 259 | (uri (list (string-append |
| 260 | "http://dev.mysql.com/get/Downloads/MySQL-" |
| 261 | (version-major+minor version) "/" |
| 262 | name "-" version ".tar.gz") |
| 263 | (string-append |
| 264 | "http://downloads.mysql.com/archives/get/file/" |
| 265 | name "-" version ".tar.gz"))) |
| 266 | (sha256 |
| 267 | (base32 |
| 268 | "0lcn9cm36n14g22bcppq5vf4nxbrl3khvlsp9hsixqdfb3l27gyf")))) |
| 269 | (build-system cmake-build-system) |
| 270 | (arguments |
| 271 | `(#:configure-flags |
| 272 | '("-DBUILD_CONFIG=mysql_release" |
| 273 | "-DWITH_SSL=system" |
| 274 | "-DWITH_ZLIB=system" |
| 275 | "-DDEFAULT_CHARSET=utf8" |
| 276 | "-DDEFAULT_COLLATION=utf8_general_ci" |
| 277 | "-DMYSQL_DATADIR=/var/lib/mysql" |
| 278 | "-DMYSQL_UNIX_ADDR=/run/mysqld/mysqld.sock" |
| 279 | "-DINSTALL_INFODIR=share/mysql/docs" |
| 280 | "-DINSTALL_MANDIR=share/man" |
| 281 | "-DINSTALL_PLUGINDIR=lib/mysql/plugin" |
| 282 | "-DINSTALL_SCRIPTDIR=bin" |
| 283 | "-DINSTALL_INCLUDEDIR=include/mysql" |
| 284 | "-DINSTALL_DOCREADMEDIR=share/mysql/docs" |
| 285 | "-DINSTALL_SUPPORTFILESDIR=share/mysql" |
| 286 | "-DINSTALL_MYSQLSHAREDIR=share/mysql" |
| 287 | "-DINSTALL_DOCDIR=share/mysql/docs" |
| 288 | "-DINSTALL_SHAREDIR=share/mysql" |
| 289 | ;; Get rid of test data. |
| 290 | "-DINSTALL_MYSQLTESTDIR=" |
| 291 | "-DINSTALL_SQLBENCHDIR=") |
| 292 | #:phases (modify-phases %standard-phases |
| 293 | (add-after |
| 294 | 'unpack 'patch-boost-version |
| 295 | (lambda _ |
| 296 | ;; Mysql wants boost-1.59.0 specifically |
| 297 | (substitute* "cmake/boost.cmake" |
| 298 | (("59") |
| 299 | ,(match (string-split (package-version boost) #\.) |
| 300 | ((_ minor . _) minor)))))) |
| 301 | (add-after |
| 302 | 'install 'remove-extra-binaries |
| 303 | (lambda* (#:key outputs #:allow-other-keys) |
| 304 | (let ((out (assoc-ref outputs "out"))) |
| 305 | ;; Remove the 3 *_embedded files, which weigh in at |
| 306 | ;; 14 MiB each. |
| 307 | (for-each delete-file |
| 308 | (find-files (string-append out "/bin") |
| 309 | "_embedded$")) |
| 310 | #t)))))) |
| 311 | (native-inputs |
| 312 | `(("bison" ,bison) |
| 313 | ("perl" ,perl))) |
| 314 | (inputs |
| 315 | `(("boost" ,boost) |
| 316 | ("libaio" ,libaio) |
| 317 | ("ncurses" ,ncurses) |
| 318 | ("openssl" ,openssl) |
| 319 | ("zlib" ,zlib))) |
| 320 | (home-page "http://www.mysql.com/") |
| 321 | (synopsis "Fast, easy to use, and popular database") |
| 322 | (description |
| 323 | "MySQL is a fast, reliable, and easy to use relational database |
| 324 | management system that supports the standardized Structured Query |
| 325 | Language.") |
| 326 | (license license:gpl2))) |
| 327 | |
| 328 | (define-public mariadb |
| 329 | (package |
| 330 | (name "mariadb") |
| 331 | (version "10.1.22") |
| 332 | (source (origin |
| 333 | (method url-fetch) |
| 334 | (uri (string-append "https://downloads.mariadb.org/f/" |
| 335 | name "-" version "/source/" |
| 336 | name "-" version ".tar.gz")) |
| 337 | (sha256 |
| 338 | (base32 |
| 339 | "1kk674mx2bf22yivvzv1al5gdg9kyxar47m282bylb6kg8p5gc5w")))) |
| 340 | (build-system cmake-build-system) |
| 341 | (arguments |
| 342 | '(#:configure-flags |
| 343 | '("-DBUILD_CONFIG=mysql_release" |
| 344 | "-DDEFAULT_CHARSET=utf8" |
| 345 | "-DDEFAULT_COLLATION=utf8_general_ci" |
| 346 | "-DMYSQL_DATADIR=/var/lib/mysql" |
| 347 | "-DMYSQL_UNIX_ADDR=/run/mysqld/mysqld.sock" |
| 348 | "-DINSTALL_INFODIR=share/mysql/docs" |
| 349 | "-DINSTALL_MANDIR=share/man" |
| 350 | "-DINSTALL_PLUGINDIR=lib/mysql/plugin" |
| 351 | "-DINSTALL_SCRIPTDIR=bin" |
| 352 | "-DINSTALL_INCLUDEDIR=include/mysql" |
| 353 | "-DINSTALL_DOCREADMEDIR=share/mysql/docs" |
| 354 | "-DINSTALL_SUPPORTFILESDIR=share/mysql/support-files" |
| 355 | "-DINSTALL_MYSQLSHAREDIR=share/mysql" |
| 356 | "-DINSTALL_DOCDIR=share/mysql/docs" |
| 357 | "-DINSTALL_SHAREDIR=share/mysql") |
| 358 | #:phases |
| 359 | (modify-phases %standard-phases |
| 360 | (add-before |
| 361 | 'configure 'pre-configure |
| 362 | (lambda _ |
| 363 | (setenv "CONFIG_SHELL" (which "sh")) |
| 364 | #t)) |
| 365 | (add-after |
| 366 | 'install 'post-install |
| 367 | (lambda* (#:key outputs #:allow-other-keys) |
| 368 | (let* ((out (assoc-ref outputs "out")) |
| 369 | (test (assoc-ref outputs "test"))) |
| 370 | (substitute* (string-append out "/bin/mysql_install_db") |
| 371 | (("basedir=\"\"") |
| 372 | (string-append "basedir=\"" out "\""))) |
| 373 | ;; Remove unneeded files for testing. |
| 374 | (with-directory-excursion out |
| 375 | (for-each delete-file-recursively |
| 376 | '("data" "mysql-test" "sql-bench" |
| 377 | "share/man/man1/mysql-test-run.pl.1"))))))))) |
| 378 | (native-inputs |
| 379 | `(("bison" ,bison) |
| 380 | ("perl" ,perl))) |
| 381 | (inputs |
| 382 | `(("jemalloc" ,jemalloc) |
| 383 | ("libaio" ,libaio) |
| 384 | ("libxml2" ,libxml2) |
| 385 | ("ncurses" ,ncurses) |
| 386 | ("openssl" ,openssl) |
| 387 | ("pcre" ,pcre) |
| 388 | ("zlib" ,zlib))) |
| 389 | (home-page "https://mariadb.org/") |
| 390 | (synopsis "SQL database server") |
| 391 | (description |
| 392 | "MariaDB is a multi-user and multi-threaded SQL database server, designed |
| 393 | as a drop-in replacement of MySQL.") |
| 394 | (license license:gpl2))) |
| 395 | |
| 396 | (define-public postgresql |
| 397 | (package |
| 398 | (name "postgresql") |
| 399 | (version "9.5.6") |
| 400 | (source (origin |
| 401 | (method url-fetch) |
| 402 | (uri (string-append "https://ftp.postgresql.org/pub/source/v" |
| 403 | version "/postgresql-" version ".tar.bz2")) |
| 404 | (sha256 |
| 405 | (base32 |
| 406 | "0bz1b9r249ffjfvldaiah2g78ccwq30ddh8hdvlq61z26inmz7mv")))) |
| 407 | (build-system gnu-build-system) |
| 408 | (arguments |
| 409 | `(#:phases |
| 410 | (modify-phases %standard-phases |
| 411 | (add-before 'configure 'patch-/bin/sh |
| 412 | (lambda _ |
| 413 | ;; Refer to the actual shell. |
| 414 | (substitute* '("src/bin/pg_ctl/pg_ctl.c" |
| 415 | "src/bin/psql/command.c") |
| 416 | (("/bin/sh") (which "sh"))) |
| 417 | #t))))) |
| 418 | (inputs |
| 419 | `(("readline" ,readline) |
| 420 | ("zlib" ,zlib))) |
| 421 | (home-page "https://www.postgresql.org/") |
| 422 | (synopsis "Powerful object-relational database system") |
| 423 | (description |
| 424 | "PostgreSQL is a powerful object-relational database system. It is fully |
| 425 | ACID compliant, has full support for foreign keys, joins, views, triggers, and |
| 426 | stored procedures (in multiple languages). It includes most SQL:2008 data |
| 427 | types, including INTEGER, NUMERIC, BOOLEAN, CHAR, VARCHAR, DATE, INTERVAL, and |
| 428 | TIMESTAMP. It also supports storage of binary large objects, including |
| 429 | pictures, sounds, or video.") |
| 430 | (license (license:x11-style "file://COPYRIGHT")))) |
| 431 | |
| 432 | (define-public qdbm |
| 433 | (package |
| 434 | (name "qdbm") |
| 435 | (version "1.8.78") |
| 436 | (source |
| 437 | (origin |
| 438 | (method url-fetch) |
| 439 | (uri (string-append "http://fallabs.com/" name "/" |
| 440 | name "-" version ".tar.gz")) |
| 441 | (sha256 |
| 442 | (base32 |
| 443 | "0gmpvhn02pkq280ffmn4da1g4mdr1xxz7l80b7y4n7km1mrzwrml")))) |
| 444 | (build-system gnu-build-system) |
| 445 | (arguments |
| 446 | `( #:configure-flags (list (string-append "LDFLAGS=-Wl,-rpath=" |
| 447 | (assoc-ref %outputs "out") |
| 448 | "/lib")))) |
| 449 | (home-page "http://fallabs.com/qdbm") |
| 450 | (synopsis "Key-value database") |
| 451 | (description "QDBM is a library of routines for managing a |
| 452 | database. The database is a simple data file containing key-value |
| 453 | pairs. Every key and value is serial bytes with variable length. |
| 454 | Binary data as well as character strings can be used as a key or a |
| 455 | value. There is no concept of data tables or data types. Records are |
| 456 | organized in a hash table or B+ tree.") |
| 457 | (license license:lgpl2.1+))) |
| 458 | |
| 459 | (define-public recutils |
| 460 | (package |
| 461 | (name "recutils") |
| 462 | (version "1.7") |
| 463 | (source (origin |
| 464 | (method url-fetch) |
| 465 | (uri (string-append "mirror://gnu/recutils/recutils-" |
| 466 | version ".tar.gz")) |
| 467 | (sha256 |
| 468 | (base32 |
| 469 | "0cdwa4094x3yx7vn98xykvnlp9rngvd58d19vs3vh5hrvggccg93")))) |
| 470 | (build-system gnu-build-system) |
| 471 | |
| 472 | ;; Running tests in parallel leads to test failures and crashes in |
| 473 | ;; torture/utils. |
| 474 | (arguments '(#:parallel-tests? #f |
| 475 | #:configure-flags |
| 476 | (list (string-append "--with-bash-headers=" |
| 477 | (assoc-ref %build-inputs "bash:include") |
| 478 | "/include/bash")) |
| 479 | |
| 480 | #:phases (modify-phases %standard-phases |
| 481 | (add-before 'build 'set-bash4.4-header-location |
| 482 | (lambda _ |
| 483 | (substitute* "bash/Makefile.in" |
| 484 | ;; Adjust the header search path for Bash |
| 485 | ;; 4.4 in accordance with 'bash.pc'. |
| 486 | (("AM_CPPFLAGS = (.*)$" _ rest) |
| 487 | (string-append "AM_CPPFLAGS = " |
| 488 | "-I$(BASH_HEADERS)/include " |
| 489 | rest)) |
| 490 | |
| 491 | ;; Install to PREFIX/lib/bash to match Bash |
| 492 | ;; 4.4's search path. |
| 493 | (("^libdir = .*$") |
| 494 | "libdir = @libdir@/bash\n")) |
| 495 | #t))))) |
| 496 | |
| 497 | (native-inputs `(("emacs" ,emacs-minimal) |
| 498 | ("bc" ,bc) |
| 499 | ("bash:include" ,bash "include") |
| 500 | ("libuuid" ,util-linux))) |
| 501 | |
| 502 | ;; TODO: Add more optional inputs. |
| 503 | (inputs `(("curl" ,curl) |
| 504 | ("libgcrypt" ,libgcrypt) |
| 505 | ("check" ,check))) |
| 506 | (synopsis "Manipulate plain text files as databases") |
| 507 | (description |
| 508 | "GNU Recutils is a set of tools and libraries for creating and |
| 509 | manipulating text-based, human-editable databases. Despite being text-based, |
| 510 | databases created with Recutils carry all of the expected features such as |
| 511 | unique fields, primary keys, time stamps and more. Many different field |
| 512 | types are supported, as is encryption.") |
| 513 | (license license:gpl3+) |
| 514 | (home-page "http://www.gnu.org/software/recutils/"))) |
| 515 | |
| 516 | (define-public rocksdb |
| 517 | (package |
| 518 | (name "rocksdb") |
| 519 | (version "5.1.4") |
| 520 | (source (origin |
| 521 | (method url-fetch) |
| 522 | (uri (string-append "https://github.com/facebook/rocksdb" |
| 523 | "/archive/v" version ".tar.gz")) |
| 524 | (file-name (string-append name "-" version ".tar.gz")) |
| 525 | (sha256 |
| 526 | (base32 |
| 527 | "0ddyj8lh5jk6vx675pdg4jhgs7c12ckw5j31rz85jlrds68ygrry")) |
| 528 | (modules '((guix build utils))) |
| 529 | (snippet |
| 530 | '(begin |
| 531 | ;; TODO: unbundle gtest. |
| 532 | (delete-file "build_tools/gnu_parallel") |
| 533 | #t)))) |
| 534 | (build-system gnu-build-system) |
| 535 | (arguments |
| 536 | '(#:make-flags (list "CC=gcc" |
| 537 | ;; Make the resulting library position-independent so the |
| 538 | ;; static version can be included in shared objects. |
| 539 | "EXTRA_CXXFLAGS=-fPIC" |
| 540 | (string-append "INSTALL_PATH=" |
| 541 | (assoc-ref %outputs "out"))) |
| 542 | #:phases |
| 543 | (modify-phases %standard-phases |
| 544 | (add-after 'unpack 'patch-Makefile |
| 545 | (lambda _ |
| 546 | (substitute* "Makefile" |
| 547 | (("build_tools/gnu_parallel") "parallel") |
| 548 | (("#!/bin/sh") (string-append "#!" (which "sh")))) |
| 549 | #t)) |
| 550 | (delete 'configure) |
| 551 | (add-before 'check 'disable-failing-tests |
| 552 | (lambda _ |
| 553 | (substitute* "Makefile" |
| 554 | ;; These tests reliably fail due to "Too many open files". |
| 555 | (("^[[:blank:]]+env_test[[:blank:]]+\\\\") "\\") |
| 556 | (("^[[:blank:]]+persistent_cache_test[[:blank:]]+\\\\") "\\")) |
| 557 | #t)) |
| 558 | (add-after |
| 559 | 'check 'build-release-libraries |
| 560 | ;; The 'check' target depends on the default target which is compiled |
| 561 | ;; with debug symbols. The 'install' target depends on shared and |
| 562 | ;; static release targets so we build them here for clarity. |
| 563 | ;; TODO: Add debug output. |
| 564 | (lambda* (#:key (make-flags '()) #:allow-other-keys) |
| 565 | ;; Prevent the build from adding machine-specific optimizations. |
| 566 | ;; This does not work if passed as a make flag... |
| 567 | (setenv "PORTABLE" "1") |
| 568 | (and (zero? (apply system* "make" "static_lib" make-flags)) |
| 569 | (zero? (apply system* "make" "shared_lib" make-flags))))) |
| 570 | (add-after 'install 'delete-static-library |
| 571 | (lambda* (#:key outputs #:allow-other-keys) |
| 572 | (let* ((out (assoc-ref outputs "out")) |
| 573 | (lib (string-append out "/lib"))) |
| 574 | (for-each (lambda (file) |
| 575 | (delete-file file)) |
| 576 | (find-files lib "\\.l?a$")) |
| 577 | #t)))))) |
| 578 | (native-inputs |
| 579 | `(("parallel" ,parallel) |
| 580 | ("perl" ,perl) |
| 581 | ("procps" ,procps) |
| 582 | ("python" ,python-2) |
| 583 | ("which" ,which))) |
| 584 | (inputs |
| 585 | `(("bzip2" ,bzip2) |
| 586 | ("gflags" ,gflags) |
| 587 | ("jemalloc" ,jemalloc) |
| 588 | ("lz4" ,lz4) |
| 589 | ("snappy" ,snappy) |
| 590 | ("zlib" ,zlib))) |
| 591 | (home-page "http://rocksdb.org/") |
| 592 | (synopsis "Persistent key-value store for fast storage") |
| 593 | (description |
| 594 | "RocksDB is a library that forms the core building block for a fast |
| 595 | key-value server, especially suited for storing data on flash drives. It |
| 596 | has a @dfn{Log-Structured-Merge-Database} (LSM) design with flexible tradeoffs |
| 597 | between @dfn{Write-Amplification-Factor} (WAF), @dfn{Read-Amplification-Factor} |
| 598 | (RAF) and @dfn{Space-Amplification-Factor} (SAF). It has multi-threaded |
| 599 | compactions, making it specially suitable for storing multiple terabytes of |
| 600 | data in a single database. RocksDB is partially based on @code{LevelDB}.") |
| 601 | ;; RocksDB is BSD-3 and the JNI adapter is Apache 2.0. |
| 602 | (license (list license:bsd-3 license:asl2.0)))) |
| 603 | |
| 604 | (define-public sparql-query |
| 605 | (package |
| 606 | (name "sparql-query") |
| 607 | (version "1.1") |
| 608 | (source (origin |
| 609 | (method url-fetch) |
| 610 | (uri (string-append "https://github.com/tialaramex/" |
| 611 | name "/archive/" version ".tar.gz")) |
| 612 | (sha256 |
| 613 | (base32 "0yq3k20472rv8npcc420q9ab6idy584g5y0q501d360k5q0ggr8w")) |
| 614 | (file-name (string-append name "-" version ".tar.gz")))) |
| 615 | (build-system gnu-build-system) |
| 616 | (inputs |
| 617 | `(("readline" ,readline) |
| 618 | ("ncurses" ,ncurses) |
| 619 | ("glib" ,glib) |
| 620 | ("libxml2" ,libxml2) |
| 621 | ("curl" ,curl))) |
| 622 | (native-inputs |
| 623 | `(("pkg-config" ,pkg-config))) |
| 624 | (arguments |
| 625 | `(#:make-flags '("CC=gcc") |
| 626 | #:phases |
| 627 | (modify-phases %standard-phases |
| 628 | (delete 'configure) |
| 629 | ;; The Makefile uses git to obtain versioning information. This phase |
| 630 | ;; substitutes the git invocation with the package version. |
| 631 | (add-after 'unpack 'remove-git-dependency |
| 632 | (lambda _ |
| 633 | (substitute* "Makefile" |
| 634 | (("^gitrev :=.*$") |
| 635 | (string-append "gitrev = \"v" ,version "\""))))) |
| 636 | ;; The install phase of the Makefile assumes $PREFIX/usr/local/bin. |
| 637 | ;; This replacement does the same thing, except for using $PREFIX/bin |
| 638 | ;; instead. |
| 639 | (replace 'install |
| 640 | (lambda* (#:key outputs #:allow-other-keys) |
| 641 | (let* ((out (assoc-ref outputs "out")) |
| 642 | (bin (string-append out "/bin"))) |
| 643 | (install-file "sparql-query" bin) |
| 644 | (system* "ln" "--symbolic" |
| 645 | (string-append bin "/sparql-query") |
| 646 | (string-append bin "/sparql-update"))))) |
| 647 | (replace 'check |
| 648 | (lambda* (#:key make-flags #:allow-other-keys) |
| 649 | (and |
| 650 | (zero? (apply system* "make" `(,@make-flags "scan-test"))) |
| 651 | (zero? (system "./scan-test")))))))) |
| 652 | (home-page "https://github.com/tialaramex/sparql-query/") |
| 653 | (synopsis "Command-line tool for accessing SPARQL endpoints over HTTP") |
| 654 | (description "Sparql-query is a command-line tool for accessing SPARQL |
| 655 | endpoints over HTTP. It has been intentionally designed to 'feel' similar to |
| 656 | tools for interrogating SQL databases. For example, you can enter a query over |
| 657 | several lines, using a semi-colon at the end of a line to indicate the end of |
| 658 | your query. It also supports readline so that you can more easily recall and |
| 659 | edit previous queries, even across sessions. It can be used non-interactively, |
| 660 | for example from a shell script.") |
| 661 | ;; Some files (like scan-sparql.c) contain a GPLv3+ license header, while |
| 662 | ;; others (like sparql-query.c) contain a GPLv2+ license header. |
| 663 | (license (list license:gpl3+)))) |
| 664 | |
| 665 | (define-public sqlite |
| 666 | (package |
| 667 | (name "sqlite") |
| 668 | (version "3.14.1") |
| 669 | (source (origin |
| 670 | (method url-fetch) |
| 671 | ;; TODO: Download from sqlite.org once this bug : |
| 672 | ;; http://lists.gnu.org/archive/html/bug-guile/2013-01/msg00027.html |
| 673 | ;; has been fixed. |
| 674 | (uri (let ((numeric-version |
| 675 | (match (string-split version #\.) |
| 676 | ((first-digit other-digits ...) |
| 677 | (string-append first-digit |
| 678 | (string-pad-right |
| 679 | (string-concatenate |
| 680 | (map (cut string-pad <> 2 #\0) |
| 681 | other-digits)) |
| 682 | 6 #\0)))))) |
| 683 | (list |
| 684 | (string-append |
| 685 | "https://fossies.org/linux/misc/sqlite-autoconf-" |
| 686 | numeric-version ".tar.gz") |
| 687 | (string-append |
| 688 | "http://distfiles.gentoo.org/distfiles/" |
| 689 | "/sqlite-autoconf-" numeric-version ".tar.gz")) |
| 690 | |
| 691 | ;; XXX: As of 2015-09-08, SourceForge is squatting the URL |
| 692 | ;; below, returning 200 and showing an advertising page. |
| 693 | ;; (string-append |
| 694 | ;; "mirror://sourceforge/sqlite.mirror/SQLite%20" version |
| 695 | ;; "/sqlite-autoconf-" numeric-version ".tar.gz") |
| 696 | )) |
| 697 | (sha256 |
| 698 | (base32 |
| 699 | "19j73j44akqgc6m82wm98yvnmm3mfzmfqr8mp3n7n080d53q4wdw")))) |
| 700 | (build-system gnu-build-system) |
| 701 | (inputs `(("readline" ,readline))) |
| 702 | (arguments |
| 703 | `(#:configure-flags |
| 704 | ;; Add -DSQLITE_SECURE_DELETE, -DSQLITE_ENABLE_UNLOCK_NOTIFY and |
| 705 | ;; -DSQLITE_ENABLE_DBSTAT_VTAB to CFLAGS. GNU Icecat will refuse |
| 706 | ;; to use the system SQLite unless these options are enabled. |
| 707 | (list (string-append "CFLAGS=-O2 -DSQLITE_SECURE_DELETE " |
| 708 | "-DSQLITE_ENABLE_UNLOCK_NOTIFY " |
| 709 | "-DSQLITE_ENABLE_DBSTAT_VTAB")))) |
| 710 | (home-page "http://www.sqlite.org/") |
| 711 | (synopsis "The SQLite database management system") |
| 712 | (description |
| 713 | "SQLite is a software library that implements a self-contained, serverless, |
| 714 | zero-configuration, transactional SQL database engine. SQLite is the most |
| 715 | widely deployed SQL database engine in the world. The source code for SQLite |
| 716 | is in the public domain.") |
| 717 | (license license:public-domain))) |
| 718 | |
| 719 | (define-public sqlite-3.15.1 |
| 720 | (package (inherit sqlite) |
| 721 | (version "3.15.1") |
| 722 | (source (origin |
| 723 | (method url-fetch) |
| 724 | (uri (let ((numeric-version |
| 725 | (match (string-split version #\.) |
| 726 | ((first-digit other-digits ...) |
| 727 | (string-append first-digit |
| 728 | (string-pad-right |
| 729 | (string-concatenate |
| 730 | (map (cut string-pad <> 2 #\0) |
| 731 | other-digits)) |
| 732 | 6 #\0)))))) |
| 733 | (string-append "https://sqlite.org/2016/sqlite-autoconf-" |
| 734 | numeric-version ".tar.gz"))) |
| 735 | (sha256 |
| 736 | (base32 |
| 737 | "1ig2d9jzzixiifmgqsl6kjcvy17jwxby3s24gfnc5qvyd6vqkyjx")))))) |
| 738 | |
| 739 | (define-public tdb |
| 740 | (package |
| 741 | (name "tdb") |
| 742 | (version "1.3.11") |
| 743 | (source (origin |
| 744 | (method url-fetch) |
| 745 | (uri (string-append "https://www.samba.org/ftp/tdb/tdb-" |
| 746 | version ".tar.gz")) |
| 747 | (sha256 |
| 748 | (base32 |
| 749 | "0i1l38h0vyck6zkcj4fn2l03spadlmyr1qa1xpdp9dy2ccbm3s1r")))) |
| 750 | (build-system gnu-build-system) |
| 751 | (arguments |
| 752 | '(#:phases |
| 753 | (modify-phases %standard-phases |
| 754 | (replace 'configure |
| 755 | (lambda* (#:key outputs #:allow-other-keys) |
| 756 | (let ((out (assoc-ref outputs "out"))) |
| 757 | ;; The 'configure' script is a wrapper for Waf and |
| 758 | ;; doesn't recognize things like '--enable-fast-install'. |
| 759 | (zero? (system* "./configure" |
| 760 | (string-append "--prefix=" out))))))))) |
| 761 | (native-inputs |
| 762 | `(;; TODO: Build the documentation. |
| 763 | ;; ("docbook-xsl" ,docbook-xsl) |
| 764 | ;; ("libxml2" ,libxml2) |
| 765 | ;; ("libxslt" ,libxslt) |
| 766 | ("python" ,python-2))) ;for the Waf build system |
| 767 | (home-page "https://tdb.samba.org/") |
| 768 | (synopsis "Trivial database") |
| 769 | (description |
| 770 | "TDB is a Trivial Database. In concept, it is very much like GDBM, |
| 771 | and BSD's DB except that it allows multiple simultaneous writers and uses |
| 772 | locking internally to keep writers from trampling on each other. TDB is also |
| 773 | extremely small.") |
| 774 | (license license:lgpl3+))) |
| 775 | |
| 776 | (define-public perl-dbi |
| 777 | (package |
| 778 | (name "perl-dbi") |
| 779 | (version "1.636") |
| 780 | (source (origin |
| 781 | (method url-fetch) |
| 782 | (uri (string-append |
| 783 | "mirror://cpan/authors/id/T/TI/TIMB/DBI-" |
| 784 | version ".tar.gz")) |
| 785 | (sha256 |
| 786 | (base32 |
| 787 | "0v37vnr5p0bx396cj0lb5kb69jbryq2mspp602hbgd04gklxqzcg")))) |
| 788 | (build-system perl-build-system) |
| 789 | (synopsis "Database independent interface for Perl") |
| 790 | (description "This package provides an database interface for Perl.") |
| 791 | (home-page "http://search.cpan.org/dist/DBI") |
| 792 | (license (package-license perl)))) |
| 793 | |
| 794 | (define-public perl-dbix-class |
| 795 | (package |
| 796 | (name "perl-dbix-class") |
| 797 | (version "0.082840") |
| 798 | (source |
| 799 | (origin |
| 800 | (method url-fetch) |
| 801 | (uri (string-append "mirror://cpan/authors/id/R/RI/RIBASUSHI/" |
| 802 | "DBIx-Class-" version ".tar.gz")) |
| 803 | (sha256 |
| 804 | (base32 |
| 805 | "1vw1f756g8m5hq11nqf5dk2cw2y4mqq91ca5p75fn5g3fp8syja0")))) |
| 806 | (build-system perl-build-system) |
| 807 | (native-inputs |
| 808 | `(("perl-dbd-sqlite" ,perl-dbd-sqlite) |
| 809 | ("perl-file-temp" ,perl-file-temp) |
| 810 | ("perl-package-stash" ,perl-package-stash) |
| 811 | ("perl-test-deep" ,perl-test-deep) |
| 812 | ("perl-test-exception" ,perl-test-exception) |
| 813 | ("perl-test-warn" ,perl-test-warn))) |
| 814 | (propagated-inputs |
| 815 | `(("perl-class-accessor-grouped" ,perl-class-accessor-grouped) |
| 816 | ("perl-class-c3-componentised" ,perl-class-c3-componentised) |
| 817 | ("perl-class-inspector" ,perl-class-inspector) |
| 818 | ("perl-config-any" ,perl-config-any) |
| 819 | ("perl-context-preserve" ,perl-context-preserve) |
| 820 | ("perl-data-dumper-concise" ,perl-data-dumper-concise) |
| 821 | ("perl-data-page" ,perl-data-page) |
| 822 | ("perl-dbi" ,perl-dbi) |
| 823 | ("perl-devel-globaldestruction" ,perl-devel-globaldestruction) |
| 824 | ("perl-hash-merge" ,perl-hash-merge) |
| 825 | ("perl-module-find" ,perl-module-find) |
| 826 | ("perl-moo" ,perl-moo) |
| 827 | ("perl-mro-compat" ,perl-mro-compat) |
| 828 | ("perl-namespace-clean" ,perl-namespace-clean) |
| 829 | ("perl-path-class" ,perl-path-class) |
| 830 | ("perl-scalar-list-utils" ,perl-scalar-list-utils) |
| 831 | ("perl-scope-guard" ,perl-scope-guard) |
| 832 | ("perl-sql-abstract" ,perl-sql-abstract) |
| 833 | ("perl-sub-name" ,perl-sub-name) |
| 834 | ("perl-text-balanced" ,perl-text-balanced) |
| 835 | ("perl-try-tiny" ,perl-try-tiny))) |
| 836 | (home-page "http://search.cpan.org/dist/DBIx-Class") |
| 837 | (synopsis "Extensible and flexible object <-> relational mapper") |
| 838 | (description "An SQL to OO mapper with an object API inspired by |
| 839 | Class::DBI (with a compatibility layer as a springboard for porting) and a |
| 840 | resultset API that allows abstract encapsulation of database operations. It |
| 841 | aims to make representing queries in your code as perl-ish as possible while |
| 842 | still providing access to as many of the capabilities of the database as |
| 843 | possible, including retrieving related records from multiple tables in a |
| 844 | single query, \"JOIN\", \"LEFT JOIN\", \"COUNT\", \"DISTINCT\", \"GROUP BY\", |
| 845 | \"ORDER BY\" and \"HAVING\" support.") |
| 846 | (license (package-license perl)))) |
| 847 | |
| 848 | (define-public perl-dbix-class-cursor-cached |
| 849 | (package |
| 850 | (name "perl-dbix-class-cursor-cached") |
| 851 | (version "1.001004") |
| 852 | (source |
| 853 | (origin |
| 854 | (method url-fetch) |
| 855 | (uri (string-append "mirror://cpan/authors/id/A/AR/ARCANEZ/" |
| 856 | "DBIx-Class-Cursor-Cached-" version ".tar.gz")) |
| 857 | (sha256 |
| 858 | (base32 |
| 859 | "09b2jahn2x12qm4f7qm1jzsxbz7qn1czp6a3fnl5l2i3l4r5421p")))) |
| 860 | (build-system perl-build-system) |
| 861 | (native-inputs |
| 862 | `(("perl-cache-cache" ,perl-cache-cache) |
| 863 | ("perl-dbd-sqlite" ,perl-dbd-sqlite))) |
| 864 | (propagated-inputs |
| 865 | `(("perl-carp-clan" ,perl-carp-clan) |
| 866 | ("perl-dbix-class" ,perl-dbix-class))) |
| 867 | (home-page "http://search.cpan.org/dist/DBIx-Class-Cursor-Cached") |
| 868 | (synopsis "Cursor with built-in caching support") |
| 869 | (description "DBIx::Class::Cursor::Cached provides a cursor class with |
| 870 | built-in caching support.") |
| 871 | (license (package-license perl)))) |
| 872 | |
| 873 | (define-public perl-dbix-class-introspectablem2m |
| 874 | (package |
| 875 | (name "perl-dbix-class-introspectablem2m") |
| 876 | (version "0.001002") |
| 877 | (source |
| 878 | (origin |
| 879 | (method url-fetch) |
| 880 | (uri (string-append "mirror://cpan/authors/id/I/IL/ILMARI/" |
| 881 | "DBIx-Class-IntrospectableM2M-" version ".tar.gz")) |
| 882 | (sha256 |
| 883 | (base32 |
| 884 | "1w47rh2241iy5x3a9bqsyd5kdp9sk43dksr99frzv4qn4jsazfn6")))) |
| 885 | (build-system perl-build-system) |
| 886 | (propagated-inputs |
| 887 | `(("perl-dbix-class" ,perl-dbix-class))) |
| 888 | (home-page "http://search.cpan.org/dist/DBIx-Class-IntrospectableM2M") |
| 889 | (synopsis "Introspect many-to-many relationships") |
| 890 | (description "Because the many-to-many relationships are not real |
| 891 | relationships, they can not be introspected with DBIx::Class. Many-to-many |
| 892 | relationships are actually just a collection of convenience methods installed |
| 893 | to bridge two relationships. This DBIx::Class component can be used to store |
| 894 | all relevant information about these non-relationships so they can later be |
| 895 | introspected and examined.") |
| 896 | (license (package-license perl)))) |
| 897 | |
| 898 | (define-public perl-dbix-class-schema-loader |
| 899 | (package |
| 900 | (name "perl-dbix-class-schema-loader") |
| 901 | (version "0.07046") |
| 902 | (source |
| 903 | (origin |
| 904 | (method url-fetch) |
| 905 | (uri (string-append "mirror://cpan/authors/id/I/IL/ILMARI/" |
| 906 | "DBIx-Class-Schema-Loader-" version ".tar.gz")) |
| 907 | (sha256 |
| 908 | (base32 |
| 909 | "08cgn0dx42y9xsxas9np7s55a7qmy4kf6sfmx0jmk4hryvbapml3")))) |
| 910 | (build-system perl-build-system) |
| 911 | (native-inputs |
| 912 | `(("perl-config-any" ,perl-config-any) |
| 913 | ("perl-config-general" ,perl-config-general) |
| 914 | ("perl-dbd-sqlite" ,perl-dbd-sqlite) |
| 915 | ("perl-dbix-class-introspectablem2m" ,perl-dbix-class-introspectablem2m) |
| 916 | ("perl-moose" ,perl-moose) |
| 917 | ("perl-moosex-markasmethods" ,perl-moosex-markasmethods) |
| 918 | ("perl-moosex-nonmoose" ,perl-moosex-nonmoose) |
| 919 | ("perl-namespace-autoclean" ,perl-namespace-autoclean) |
| 920 | ("perl-test-deep" ,perl-test-deep) |
| 921 | ("perl-test-differences" ,perl-test-differences) |
| 922 | ("perl-test-exception" ,perl-test-exception) |
| 923 | ("perl-test-pod" ,perl-test-pod) |
| 924 | ("perl-test-warn" ,perl-test-warn))) |
| 925 | (propagated-inputs |
| 926 | `(("perl-class-unload" ,perl-class-unload) |
| 927 | ("perl-class-inspector" ,perl-class-inspector) |
| 928 | ("perl-class-accessor-grouped" ,perl-class-accessor-grouped) |
| 929 | ("perl-class-c3-componentised" ,perl-class-c3-componentised) |
| 930 | ("perl-carp-clan" ,perl-carp-clan) |
| 931 | ("perl-data-dump" ,perl-data-dump) |
| 932 | ("perl-dbix-class" ,perl-dbix-class) |
| 933 | ("perl-hash-merge" ,perl-hash-merge) |
| 934 | ("perl-list-moreutils" ,perl-list-moreutils) |
| 935 | ("perl-lingua-en-inflect-phrase" ,perl-lingua-en-inflect-phrase) |
| 936 | ("perl-lingua-en-inflect-number" ,perl-lingua-en-inflect-number) |
| 937 | ("perl-lingua-en-tagger" ,perl-lingua-en-tagger) |
| 938 | ("perl-namespace-clean" ,perl-namespace-clean) |
| 939 | ("perl-mro-compat" ,perl-mro-compat) |
| 940 | ("perl-scope-guard" ,perl-scope-guard) |
| 941 | ("perl-string-camelcase" ,perl-string-camelcase) |
| 942 | ("perl-string-toidentifier-en" ,perl-string-toidentifier-en) |
| 943 | ("perl-sub-name" ,perl-sub-name) |
| 944 | ("perl-try-tiny" ,perl-try-tiny))) |
| 945 | (arguments `(#:tests? #f)) ;TODO: t/20invocations.t fails |
| 946 | (home-page "http://search.cpan.org/dist/DBIx-Class-Schema-Loader") |
| 947 | (synopsis "Create a DBIx::Class::Schema based on a database") |
| 948 | (description "DBIx::Class::Schema::Loader automates the definition of a |
| 949 | DBIx::Class::Schema by scanning database table definitions and setting up the |
| 950 | columns, primary keys, unique constraints and relationships.") |
| 951 | (license (package-license perl)))) |
| 952 | |
| 953 | (define-public perl-dbd-pg |
| 954 | (package |
| 955 | (name "perl-dbd-pg") |
| 956 | (version "3.5.1") |
| 957 | (source |
| 958 | (origin |
| 959 | (method url-fetch) |
| 960 | (uri (string-append "mirror://cpan/authors/id/T/TU/TURNSTEP/" |
| 961 | "DBD-Pg-" version ".tar.gz")) |
| 962 | (sha256 |
| 963 | (base32 |
| 964 | "0z0kf1kjgbi5f6nr63i2fnrx7629d9lvxg1q8sficwb3zdf1ggzx")))) |
| 965 | (build-system perl-build-system) |
| 966 | (native-inputs |
| 967 | `(("perl-dbi" ,perl-dbi))) |
| 968 | (propagated-inputs |
| 969 | `(("perl-dbi" ,perl-dbi) |
| 970 | ("postgresql" ,postgresql))) |
| 971 | (home-page "http://search.cpan.org/dist/DBD-Pg") |
| 972 | (synopsis "DBI PostgreSQL interface") |
| 973 | (description "This package provides a PostgreSQL driver for the Perl5 |
| 974 | @dfn{Database Interface} (DBI).") |
| 975 | (license (package-license perl)))) |
| 976 | |
| 977 | (define-public perl-dbd-mysql |
| 978 | (package |
| 979 | (name "perl-dbd-mysql") |
| 980 | (version "4.041") |
| 981 | (source |
| 982 | (origin |
| 983 | (method url-fetch) |
| 984 | (uri (string-append "mirror://cpan/authors/id/M/MI/MICHIELB/" |
| 985 | "DBD-mysql-" version ".tar.gz")) |
| 986 | (sha256 |
| 987 | (base32 |
| 988 | "0h4h6zwzj8fwh9ljb8svnsa0a3ch4p10hp59kpdibdb4qh8xwxs7")))) |
| 989 | (build-system perl-build-system) |
| 990 | ;; Tests require running MySQL server |
| 991 | (arguments `(#:tests? #f)) |
| 992 | (propagated-inputs |
| 993 | `(("perl-dbi" ,perl-dbi) |
| 994 | ("mysql" ,mysql))) |
| 995 | (home-page "http://search.cpan.org/dist/DBD-mysql") |
| 996 | (synopsis "DBI MySQL interface") |
| 997 | (description "This package provides a MySQL driver for the Perl5 |
| 998 | @dfn{Database Interface} (DBI).") |
| 999 | (license (package-license perl)))) |
| 1000 | |
| 1001 | (define-public perl-dbd-sqlite |
| 1002 | (package |
| 1003 | (name "perl-dbd-sqlite") |
| 1004 | (version "1.52") |
| 1005 | (source (origin |
| 1006 | (method url-fetch) |
| 1007 | (uri (string-append |
| 1008 | "mirror://cpan/authors/id/I/IS/ISHIGAKI/DBD-SQLite-" |
| 1009 | version ".tar.gz")) |
| 1010 | (sha256 |
| 1011 | (base32 |
| 1012 | "0kimb2qr1rh07yylbbfybwcizpmy61ck667amypn4clmkfg0knm6")))) |
| 1013 | (build-system perl-build-system) |
| 1014 | (inputs `(("sqlite" ,sqlite))) |
| 1015 | (propagated-inputs `(("perl-dbi" ,perl-dbi))) |
| 1016 | (synopsis "SQlite interface for Perl") |
| 1017 | (description "DBD::SQLite is a Perl DBI driver for SQLite, that includes |
| 1018 | the entire thing in the distribution. So in order to get a fast transaction |
| 1019 | capable RDBMS working for your Perl project you simply have to install this |
| 1020 | module, and nothing else.") |
| 1021 | (license (package-license perl)) |
| 1022 | (home-page "http://search.cpan.org/~ishigaki/DBD-SQLite/lib/DBD/SQLite.pm"))) |
| 1023 | |
| 1024 | (define-public perl-sql-abstract |
| 1025 | (package |
| 1026 | (name "perl-sql-abstract") |
| 1027 | (version "1.81") |
| 1028 | (source |
| 1029 | (origin |
| 1030 | (method url-fetch) |
| 1031 | (uri (string-append "mirror://cpan/authors/id/R/RI/RIBASUSHI/" |
| 1032 | "SQL-Abstract-" version ".tar.gz")) |
| 1033 | (sha256 |
| 1034 | (base32 |
| 1035 | "17sgwq3mvqjhv3b77cnvrq60xgp8harjhlnvpwmxc914rqc5ckaz")))) |
| 1036 | (build-system perl-build-system) |
| 1037 | (native-inputs |
| 1038 | `(("perl-test-deep" ,perl-test-deep) |
| 1039 | ("perl-test-exception" ,perl-test-exception) |
| 1040 | ("perl-test-warn" ,perl-test-warn))) |
| 1041 | (propagated-inputs |
| 1042 | `(("perl-hash-merge" ,perl-hash-merge) |
| 1043 | ("perl-moo" ,perl-moo) |
| 1044 | ("perl-mro-compat" ,perl-mro-compat) |
| 1045 | ("perl-text-balanced" ,perl-text-balanced))) |
| 1046 | (home-page "http://search.cpan.org/dist/SQL-Abstract") |
| 1047 | (synopsis "Generate SQL from Perl data structures") |
| 1048 | (description "This module was inspired by the excellent DBIx::Abstract. |
| 1049 | While based on the concepts used by DBIx::Abstract, the concepts used have |
| 1050 | been modified to make the SQL easier to generate from Perl data structures. |
| 1051 | The underlying idea is for this module to do what you mean, based on the data |
| 1052 | structures you provide it, so that you don't have to modify your code every |
| 1053 | time your data changes.") |
| 1054 | (license (package-license perl)))) |
| 1055 | |
| 1056 | (define-public perl-sql-splitstatement |
| 1057 | (package |
| 1058 | (name "perl-sql-splitstatement") |
| 1059 | (version "1.00020") |
| 1060 | (source |
| 1061 | (origin |
| 1062 | (method url-fetch) |
| 1063 | (uri (string-append "mirror://cpan/authors/id/E/EM/EMAZEP/" |
| 1064 | "SQL-SplitStatement-" version ".tar.gz")) |
| 1065 | (sha256 |
| 1066 | (base32 |
| 1067 | "0bqg45k4c9qkb2ypynlwhpvzsl4ssfagmsalys18s5c79ps30z7p")))) |
| 1068 | (build-system perl-build-system) |
| 1069 | (native-inputs |
| 1070 | `(("perl-test-exception" ,perl-test-exception))) |
| 1071 | (propagated-inputs |
| 1072 | `(("perl-class-accessor" ,perl-class-accessor) |
| 1073 | ("perl-list-moreutils" ,perl-list-moreutils) |
| 1074 | ("perl-regexp-common" ,perl-regexp-common) |
| 1075 | ("perl-sql-tokenizer" ,perl-sql-tokenizer))) |
| 1076 | (home-page "http://search.cpan.org/dist/SQL-SplitStatement") |
| 1077 | (synopsis "Split SQL code into atomic statements") |
| 1078 | (description "This module tries to split any SQL code, even including |
| 1079 | non-standard extensions, into the atomic statements it is composed of.") |
| 1080 | (license (package-license perl)))) |
| 1081 | |
| 1082 | (define-public perl-sql-tokenizer |
| 1083 | (package |
| 1084 | (name "perl-sql-tokenizer") |
| 1085 | (version "0.24") |
| 1086 | (source |
| 1087 | (origin |
| 1088 | (method url-fetch) |
| 1089 | (uri (string-append "mirror://cpan/authors/id/I/IZ/IZUT/" |
| 1090 | "SQL-Tokenizer-" version ".tar.gz")) |
| 1091 | (sha256 |
| 1092 | (base32 |
| 1093 | "1qa2dfbzdlr5qqdam9yn78z5w3al5r8577x06qan8wv58ay6ka7s")))) |
| 1094 | (build-system perl-build-system) |
| 1095 | (home-page "http://search.cpan.org/dist/SQL-Tokenizer") |
| 1096 | (synopsis "SQL tokenizer") |
| 1097 | (description "SQL::Tokenizer is a tokenizer for SQL queries. It does not |
| 1098 | claim to be a parser or query verifier. It just creates sane tokens from a |
| 1099 | valid SQL query.") |
| 1100 | (license (package-license perl)))) |
| 1101 | |
| 1102 | (define-public unixodbc |
| 1103 | (package |
| 1104 | (name "unixodbc") |
| 1105 | (version "2.3.4") |
| 1106 | (source (origin |
| 1107 | (method url-fetch) |
| 1108 | (uri |
| 1109 | (string-append |
| 1110 | "ftp://ftp.unixodbc.org/pub/unixODBC/unixODBC-" |
| 1111 | version ".tar.gz")) |
| 1112 | (sha256 |
| 1113 | (base32 "0f8y88rcc2akjvjv5y66yx7k0ms9h1s0vbcfy25j93didflhj59f")))) |
| 1114 | (build-system gnu-build-system) |
| 1115 | (synopsis "Data source abstraction library") |
| 1116 | (description "Unixodbc is a library providing an API with which to access |
| 1117 | data sources. Data sources include SQL Servers and any software with an ODBC |
| 1118 | Driver.") |
| 1119 | (license license:lgpl2.1+) |
| 1120 | ;; COPYING contains copy of lgpl2.1 - but copyright notices just say "LGPL" |
| 1121 | (home-page "http://www.unixodbc.org"))) |
| 1122 | |
| 1123 | (define-public unqlite |
| 1124 | (package |
| 1125 | (name "unqlite") |
| 1126 | (version "1.1.6") |
| 1127 | (source (origin |
| 1128 | (method url-fetch) |
| 1129 | ;; Contains bug fixes against the official release, and has an |
| 1130 | ;; autotooled build system. |
| 1131 | (uri (string-append "https://github.com/aidin36/tocc/releases/" |
| 1132 | "download/v1.0.0/" |
| 1133 | "unqlite-unofficial-" version ".tar.gz")) |
| 1134 | (sha256 |
| 1135 | (base32 |
| 1136 | "1sbpvhg15gadq0mpcy16q7k3rkg4b4dicpnn5xifpkpn02sqik3s")))) |
| 1137 | (build-system gnu-build-system) |
| 1138 | (arguments `(#:tests? #f)) ;No check target |
| 1139 | (home-page "http://www.unqlite.org") |
| 1140 | (synopsis "In-memory key/value and document store") |
| 1141 | (description |
| 1142 | "UnQLite is an in-process software library which implements a |
| 1143 | self-contained, serverless, zero-configuration, transactional NoSQL |
| 1144 | database engine. UnQLite is a document store database similar to |
| 1145 | MongoDB, Redis, CouchDB, etc. as well as a standard Key/Value store |
| 1146 | similar to BerkeleyDB, LevelDB, etc.") |
| 1147 | (license license:bsd-2))) |
| 1148 | |
| 1149 | (define-public redis |
| 1150 | (package |
| 1151 | (name "redis") |
| 1152 | (version "3.2.4") |
| 1153 | (source (origin |
| 1154 | (method url-fetch) |
| 1155 | (uri (string-append "http://download.redis.io/releases/redis-" |
| 1156 | version".tar.gz")) |
| 1157 | (sha256 |
| 1158 | (base32 |
| 1159 | "1wb9jd692a0y52bkkxr6815kk4g039mirjdrvqx24265lv2l5l1a")))) |
| 1160 | (build-system gnu-build-system) |
| 1161 | (arguments |
| 1162 | '(#:tests? #f ; tests related to master/slave and replication fail |
| 1163 | #:phases (modify-phases %standard-phases |
| 1164 | (delete 'configure)) |
| 1165 | #:make-flags `("CC=gcc" |
| 1166 | "MALLOC=libc" |
| 1167 | "LDFLAGS=-ldl" |
| 1168 | ,(string-append "PREFIX=" |
| 1169 | (assoc-ref %outputs "out"))))) |
| 1170 | (synopsis "Key-value cache and store") |
| 1171 | (description "Redis is an advanced key-value cache and store. Redis |
| 1172 | supports many data structures including strings, hashes, lists, sets, sorted |
| 1173 | sets, bitmaps and hyperloglogs.") |
| 1174 | (home-page "http://redis.io/") |
| 1175 | (license license:bsd-3))) |
| 1176 | |
| 1177 | (define-public kyotocabinet |
| 1178 | (package |
| 1179 | (name "kyotocabinet") |
| 1180 | (version "1.2.76") |
| 1181 | (source (origin |
| 1182 | (method url-fetch) |
| 1183 | (uri (string-append "http://fallabs.com/kyotocabinet/pkg/" |
| 1184 | name "-" version ".tar.gz")) |
| 1185 | (sha256 |
| 1186 | (base32 |
| 1187 | "0g6js20x7vnpq4p8ghbw3mh9wpqksya9vwhzdx6dnlf354zjsal1")))) |
| 1188 | (build-system gnu-build-system) |
| 1189 | (arguments |
| 1190 | `(#:configure-flags |
| 1191 | (list |
| 1192 | (string-append "LDFLAGS=-Wl,-rpath=" |
| 1193 | (assoc-ref %outputs "out") "/lib")))) |
| 1194 | (inputs `(("zlib" ,zlib))) |
| 1195 | (home-page "http://fallabs.com/kyotocabinet/") |
| 1196 | (synopsis |
| 1197 | "Kyoto Cabinet is a modern implementation of the DBM database") |
| 1198 | (description |
| 1199 | "Kyoto Cabinet is a standalone file-based database that supports Hash |
| 1200 | and B+ Tree data storage models. It is a fast key-value lightweight |
| 1201 | database and supports many programming languages. It is a NoSQL database.") |
| 1202 | (license license:gpl3+))) |
| 1203 | |
| 1204 | (define-public tokyocabinet |
| 1205 | (package |
| 1206 | (name "tokyocabinet") |
| 1207 | (version "1.4.48") |
| 1208 | (source |
| 1209 | (origin |
| 1210 | (method url-fetch) |
| 1211 | (uri (string-append "http://fallabs.com/tokyocabinet/" |
| 1212 | name "-" version ".tar.gz")) |
| 1213 | (sha256 |
| 1214 | (base32 |
| 1215 | "140zvr0n8kvsl0fbn2qn3f2kh3yynfwnizn4dgbj47m975yg80x0")))) |
| 1216 | (build-system gnu-build-system) |
| 1217 | (arguments |
| 1218 | `(#:configure-flags |
| 1219 | (list "--enable-pthread" "--enable-off64" "--enable-fastest" |
| 1220 | (string-append "LDFLAGS=-Wl,-rpath=" |
| 1221 | (assoc-ref %outputs "out") "/lib")))) |
| 1222 | (inputs |
| 1223 | `(("zlib" ,zlib))) |
| 1224 | (home-page "http://fallabs.com/tokyocabinet/") |
| 1225 | (synopsis "Tokyo Cabinet is a modern implementation of the DBM database") |
| 1226 | (description |
| 1227 | "Tokyo Cabinet is a library of routines for managing a database. |
| 1228 | The database is a simple data file containing records, each is a pair of a |
| 1229 | key and a value. Every key and value is serial bytes with variable length. |
| 1230 | Both binary data and character string can be used as a key and a value. |
| 1231 | There is neither concept of data tables nor data types. Records are |
| 1232 | organized in hash table, B+ tree, or fixed-length array.") |
| 1233 | (license license:lgpl2.1+))) |
| 1234 | |
| 1235 | (define-public wiredtiger |
| 1236 | (package |
| 1237 | (name "wiredtiger") |
| 1238 | (version "2.9.1") |
| 1239 | (source (origin |
| 1240 | (method url-fetch) |
| 1241 | (uri (string-append |
| 1242 | "http://source.wiredtiger.com/releases/wiredtiger-" |
| 1243 | version ".tar.bz2")) |
| 1244 | (sha256 |
| 1245 | (base32 |
| 1246 | "0krwnb2zfbhvjaskwl875qzd3y626s84zcciq2mxr5c5riw3yh6s")))) |
| 1247 | (build-system gnu-build-system) |
| 1248 | (arguments |
| 1249 | '(#:configure-flags '("--enable-lz4" "--enable-zlib") |
| 1250 | #:phases |
| 1251 | (modify-phases %standard-phases |
| 1252 | (add-before 'check 'disable-test/fops |
| 1253 | (lambda _ |
| 1254 | ;; XXX: timed out after 3600 seconds of silence |
| 1255 | (substitute* "Makefile" |
| 1256 | (("test/fops") "")) |
| 1257 | #t))))) |
| 1258 | (inputs |
| 1259 | `(("lz4" ,lz4) |
| 1260 | ("zlib" ,zlib))) |
| 1261 | (home-page "http://source.wiredtiger.com/") |
| 1262 | (synopsis "NoSQL data engine") |
| 1263 | (description |
| 1264 | "WiredTiger is an extensible platform for data management. It supports |
| 1265 | row-oriented storage (where all columns of a row are stored together), |
| 1266 | column-oriented storage (where columns are stored in groups, allowing for |
| 1267 | more efficient access and storage of column subsets) and log-structured merge |
| 1268 | trees (LSM), for sustained throughput under random insert workloads.") |
| 1269 | (license license:gpl3) ; or GPL-2 |
| 1270 | ;; configure.ac: WiredTiger requires a 64-bit build. |
| 1271 | (supported-systems '("x86_64-linux" "mips64el-linux")))) |
| 1272 | |
| 1273 | (define-public perl-db-file |
| 1274 | (package |
| 1275 | (name "perl-db-file") |
| 1276 | (version "1.838") |
| 1277 | (source |
| 1278 | (origin |
| 1279 | (method url-fetch) |
| 1280 | (uri (string-append |
| 1281 | "mirror://cpan/authors/id/P/PM/PMQS/DB_File-" |
| 1282 | version |
| 1283 | ".tar.gz")) |
| 1284 | (sha256 |
| 1285 | (base32 |
| 1286 | "0yp5d5zr8dk9g6xdh7ygi5bq63q7nxvhd58dk2i3ki4nb7yv2yh9")))) |
| 1287 | (build-system perl-build-system) |
| 1288 | (inputs `(("bdb" ,bdb))) |
| 1289 | (native-inputs `(("perl-test-pod" ,perl-test-pod))) |
| 1290 | (arguments |
| 1291 | `(#:phases (modify-phases %standard-phases |
| 1292 | (add-before |
| 1293 | 'configure 'modify-config.in |
| 1294 | (lambda* (#:key inputs #:allow-other-keys) |
| 1295 | (substitute* "config.in" |
| 1296 | (("/usr/local/BerkeleyDB") (assoc-ref inputs "bdb"))) |
| 1297 | #t))))) |
| 1298 | (home-page "http://search.cpan.org/dist/DB_File") |
| 1299 | (synopsis |
| 1300 | "Perl5 access to Berkeley DB version 1.x") |
| 1301 | (description |
| 1302 | "The DB::File module provides Perl bindings to the Berkeley DB version 1.x.") |
| 1303 | (license (package-license perl)))) |
| 1304 | |
| 1305 | (define-public lmdb |
| 1306 | (package |
| 1307 | (name "lmdb") |
| 1308 | (version "0.9.18") |
| 1309 | (source (origin |
| 1310 | (method url-fetch) |
| 1311 | (uri (string-append "https://github.com/LMDB/lmdb/archive/" |
| 1312 | "LMDB_" version ".tar.gz")) |
| 1313 | (sha256 |
| 1314 | (base32 |
| 1315 | "12crvzxky8in99ibh22k4ppmkgqs28yy3v7yy944za7fsrqv8dfx")))) |
| 1316 | (build-system gnu-build-system) |
| 1317 | (arguments |
| 1318 | `(#:test-target "test" |
| 1319 | #:phases |
| 1320 | (modify-phases %standard-phases |
| 1321 | (replace 'configure |
| 1322 | (lambda* (#:key outputs #:allow-other-keys) |
| 1323 | (chdir (string-append |
| 1324 | (getenv "PWD") "/lmdb-LMDB_" ,version "/libraries/liblmdb")) |
| 1325 | (substitute* "Makefile" |
| 1326 | (("/usr/local") (assoc-ref outputs "out"))) |
| 1327 | #t))))) |
| 1328 | (home-page "https://symas.com/products/lightning-memory-mapped-database") |
| 1329 | (synopsis "Lightning memory-mapped database library") |
| 1330 | (description "Lightning memory-mapped database library.") |
| 1331 | (license license:openldap2.8))) |
| 1332 | |
| 1333 | (define-public libpqxx |
| 1334 | (package |
| 1335 | (name "libpqxx") |
| 1336 | (version "4.0.1") |
| 1337 | (source (origin |
| 1338 | (method url-fetch) |
| 1339 | (uri (string-append |
| 1340 | "http://pqxx.org/download/software/libpqxx/" |
| 1341 | name "-" version ".tar.gz")) |
| 1342 | (sha256 |
| 1343 | (base32 |
| 1344 | "0f6wxspp6rx12fkasanb0z2g2gc8dhcfwnxagx8wwqbpg6ifsz09")))) |
| 1345 | (build-system gnu-build-system) |
| 1346 | (native-inputs |
| 1347 | `(("python" ,python-2))) |
| 1348 | (inputs `(("postgresql" ,postgresql))) |
| 1349 | (arguments |
| 1350 | `(#:tests? #f)) ; # FAIL: 1 |
| 1351 | (synopsis "C++ connector for PostgreSQL") |
| 1352 | (description |
| 1353 | "Libpqxx is a C++ library to enable user programs to communicate with the |
| 1354 | PostgreSQL database back-end. The database back-end can be local or it may be |
| 1355 | on another machine, accessed via TCP/IP.") |
| 1356 | (home-page "http://pqxx.org/") |
| 1357 | (license license:bsd-3))) |
| 1358 | |
| 1359 | (define-public python-peewee |
| 1360 | (package |
| 1361 | (name "python-peewee") |
| 1362 | (version "2.8.3") |
| 1363 | (source |
| 1364 | (origin |
| 1365 | (method url-fetch) |
| 1366 | (uri (pypi-uri "peewee" version)) |
| 1367 | (sha256 |
| 1368 | (base32 |
| 1369 | "1605bk11s7aap2q4qyba93rx7yfh8b11kk0cqi08z8klx2iar8yd")))) |
| 1370 | (build-system python-build-system) |
| 1371 | (arguments |
| 1372 | `(#:tests? #f)) ; Fails to import test data |
| 1373 | (native-inputs |
| 1374 | `(("python-cython" ,python-cython))) |
| 1375 | (home-page "https://github.com/coleifer/peewee/") |
| 1376 | (synopsis "Small object-relational mapping utility") |
| 1377 | (description |
| 1378 | "Peewee is a simple and small ORM (object-relation mapping) tool. Peewee |
| 1379 | handles converting between pythonic values and those used by databases, so you |
| 1380 | can use Python types in your code without having to worry. It has built-in |
| 1381 | support for sqlite, mysql and postgresql. If you already have a database, you |
| 1382 | can autogenerate peewee models using @code{pwiz}, a model generator.") |
| 1383 | (license license:expat))) |
| 1384 | |
| 1385 | (define-public python2-peewee |
| 1386 | (package-with-python2 python-peewee)) |
| 1387 | |
| 1388 | (define-public sqlcipher |
| 1389 | (package |
| 1390 | (name "sqlcipher") |
| 1391 | (version "3.3.1") |
| 1392 | (source |
| 1393 | (origin |
| 1394 | (method url-fetch) |
| 1395 | (uri (string-append "https://github.com/sqlcipher/" name |
| 1396 | "/archive/v" version ".tar.gz")) |
| 1397 | (sha256 |
| 1398 | (base32 "1gv58dlbpzrmznly52yqbxgvii0ib88zr3aszla1bsypwjr6flff")) |
| 1399 | (file-name (string-append name "-" version ".tar.gz")))) |
| 1400 | (build-system gnu-build-system) |
| 1401 | (inputs |
| 1402 | `(("libcrypto" ,openssl) |
| 1403 | ("libtcl8.6" ,tcl))) ; required for running the tests |
| 1404 | (native-inputs |
| 1405 | `(("tcl" ,tcl))) |
| 1406 | (arguments |
| 1407 | '(#:configure-flags |
| 1408 | '("--enable-tempstore=yes" |
| 1409 | "CFLAGS=-DSQLITE_HAS_CODEC -DSQLITE_ENABLE_FTS3" |
| 1410 | "LDFLAGS=-lcrypto -ltcl8.6" |
| 1411 | "--disable-tcl") |
| 1412 | ;; tests cannot be run from the Makefile |
| 1413 | ;; see: <https://github.com/sqlcipher/sqlcipher/issues/172> |
| 1414 | #:test-target "testfixture" |
| 1415 | #:phases |
| 1416 | (modify-phases %standard-phases |
| 1417 | (add-before 'check 'build-test-runner |
| 1418 | (assoc-ref %standard-phases 'check)) |
| 1419 | (replace 'check |
| 1420 | (lambda _ |
| 1421 | (zero? |
| 1422 | (system* "./testfixture" "test/crypto.test"))))))) |
| 1423 | (home-page "https://www.zetetic.net/sqlcipher/") |
| 1424 | (synopsis |
| 1425 | "Library providing transparent encryption of SQLite database files") |
| 1426 | (description "SQLCipher is an implementation of SQLite, extended to |
| 1427 | provide transparent 256-bit AES encryption of database files. Pages are |
| 1428 | encrypted before being written to disk and are decrypted when read back. It’s |
| 1429 | well suited for protecting embedded application databases and for mobile |
| 1430 | development.") |
| 1431 | ;; The source files |
| 1432 | ;; src/{crypto.c,crypto_impl.c,crypto.h,crypto_cc.c,crypto_libtomcrypt.c}, |
| 1433 | ;; src/{crypto_openssl.c,sqlcipher.h}, tool/crypto-speedtest.tcl, |
| 1434 | ;; test/crypto.test are licensed under a 3-clause BSD license. All other |
| 1435 | ;; source files are in the public domain. |
| 1436 | (license (list license:public-domain license:bsd-3)))) |
| 1437 | |
| 1438 | (define-public python-pyodbc-c |
| 1439 | (package |
| 1440 | (name "python-pyodbc-c") |
| 1441 | (version "3.1.4") |
| 1442 | (source |
| 1443 | (origin |
| 1444 | (method url-fetch) |
| 1445 | (uri (string-append "https://gitlab.com/daym/pyodbc-c/repository/" |
| 1446 | "archive.tar.gz?ref=v" version)) |
| 1447 | (sha256 |
| 1448 | (base32 |
| 1449 | "05aq2297k779xidmxcwkrrxjvj1bh2q7d9a1rcjv6zr15y764ga9")) |
| 1450 | (file-name (string-append name "-" version ".tar.gz")))) |
| 1451 | (build-system python-build-system) |
| 1452 | (inputs |
| 1453 | `(("unixodbc" ,unixodbc))) |
| 1454 | (arguments |
| 1455 | `(;; No unit tests exist. |
| 1456 | #:tests? #f)) |
| 1457 | (home-page "https://github.com/mkleehammer/pyodbc") |
| 1458 | (synopsis "Python ODBC Library") |
| 1459 | (description "@code{python-pyodbc-c} provides a Python DB-API driver |
| 1460 | for ODBC.") |
| 1461 | (license (license:x11-style "file://LICENSE.TXT")))) |
| 1462 | |
| 1463 | (define-public python2-pyodbc-c |
| 1464 | (package-with-python2 python-pyodbc-c)) |