summaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2014-09-08 17:48:03 +0200
committerLudovic Courtès <ludo@gnu.org>2014-09-08 17:48:57 +0200
commit5f96f303eb9438d0395ad0b66e92e435531d7700 (patch)
tree543561461535bd69b0439babcc0c589fb0908afc /gnu
parent971863fb45af749639a556e905997f48e895cfa8 (diff)
gnu: Consolidate databases in (gnu packages databases).
* gnu/packages/databases.scm: New file, with the contents of the following deleted files. * gnu/packages/mysql.scm, gnu/packages/postgresql.scm, gnu/packages/recutils.scm, gnu/packages/sqlite.scm, gnu/packages/bdb.scm: Remove. * gnu-system.am (GNU_SYSTEM_MODULES): Adjust accordingly. * gnu/packages/apl.scm, gnu/packages/dc.scm, gnu/packages/games.scm, gnu/packages/gnunet.scm, gnu/packages/linux.scm, gnu/packages/mail.scm, gnu/packages/mpd.scm, gnu/packages/nvi.scm, gnu/packages/openldap.scm, gnu/packages/package-management.scm, gnu/packages/python.scm, gnu/packages/qt.scm, gnu/packages/rdf.scm, gnu/packages/version-control.scm: Adjust to new module name.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/apl.scm2
-rw-r--r--gnu/packages/bdb.scm68
-rw-r--r--gnu/packages/databases.scm245
-rw-r--r--gnu/packages/dc.scm2
-rw-r--r--gnu/packages/games.scm2
-rw-r--r--gnu/packages/gnunet.scm2
-rw-r--r--gnu/packages/linux.scm2
-rw-r--r--gnu/packages/mail.scm3
-rw-r--r--gnu/packages/mpd.scm2
-rw-r--r--gnu/packages/mysql.scm87
-rw-r--r--gnu/packages/nvi.scm2
-rw-r--r--gnu/packages/openldap.scm4
-rw-r--r--gnu/packages/package-management.scm2
-rw-r--r--gnu/packages/postgresql.scm52
-rw-r--r--gnu/packages/python.scm2
-rw-r--r--gnu/packages/qt.scm2
-rw-r--r--gnu/packages/rdf.scm2
-rw-r--r--gnu/packages/recutils.scm66
-rw-r--r--gnu/packages/sqlite.scm63
-rw-r--r--gnu/packages/version-control.scm2
20 files changed, 260 insertions, 352 deletions
diff --git a/gnu/packages/apl.scm b/gnu/packages/apl.scm
index a08886c252c..7da3b5eb4ae 100644
--- a/gnu/packages/apl.scm
+++ b/gnu/packages/apl.scm
@@ -24,7 +24,7 @@
24 #:use-module (guix build-system gnu) 24 #:use-module (guix build-system gnu)
25 #:use-module (gnu packages gettext) 25 #:use-module (gnu packages gettext)
26 #:use-module (gnu packages maths) 26 #:use-module (gnu packages maths)
27 #:use-module (gnu packages sqlite) 27 #:use-module (gnu packages databases)
28 #:use-module (gnu packages readline)) 28 #:use-module (gnu packages readline))
29 29
30(define-public apl 30(define-public apl
diff --git a/gnu/packages/bdb.scm b/gnu/packages/bdb.scm
deleted file mode 100644
index e82a6833321..00000000000
--- a/gnu/packages/bdb.scm
+++ /dev/null
@@ -1,68 +0,0 @@
1;;; GNU Guix --- Functional package management for GNU
2;;; Copyright © 2012 Andreas Enge <andreas@enge.fr>
3;;;
4;;; This file is part of GNU Guix.
5;;;
6;;; GNU Guix is free software; you can redistribute it and/or modify it
7;;; under the terms of the GNU General Public License as published by
8;;; the Free Software Foundation; either version 3 of the License, or (at
9;;; your option) any later version.
10;;;
11;;; GNU Guix is distributed in the hope that it will be useful, but
12;;; WITHOUT ANY WARRANTY; without even the implied warranty of
13;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14;;; GNU General Public License for more details.
15;;;
16;;; You should have received a copy of the GNU General Public License
17;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
18
19(define-module (gnu packages bdb)
20 #:use-module (gnu packages)
21 #:use-module (guix licenses)
22 #:use-module (guix packages)
23 #:use-module (guix download)
24 #:use-module (guix build-system gnu))
25
26(define-public bdb
27 (package
28 (name "bdb")
29 (version "5.3.21")
30 (source (origin
31 (method url-fetch)
32 (uri (string-append "http://download.oracle.com/berkeley-db/db-" version
33 ".tar.gz"))
34 (sha256 (base32
35 "1f2g2612lf8djbwbwhxsvmffmf9d7693kh2l20195pqp0f9jmnfx"))))
36 (build-system gnu-build-system)
37 (outputs '("out" ; programs, libraries, headers
38 "doc")) ; 94 MiB of HTML docs
39 (arguments
40 '(#:tests? #f ; no check target available
41 #:phases
42 (alist-replace
43 'configure
44 (lambda* (#:key outputs #:allow-other-keys)
45 (let ((out (assoc-ref outputs "out"))
46 (doc (assoc-ref outputs "doc")))
47 ;; '--docdir' is not honored, so we need to patch.
48 (substitute* "dist/Makefile.in"
49 (("docdir[[:blank:]]*=.*")
50 (string-append "docdir = " doc "/share/doc/bdb")))
51
52 (zero?
53 (system* "./dist/configure"
54 (string-append "--prefix=" out)
55 (string-append "CONFIG_SHELL=" (which "bash"))
56 (string-append "SHELL=" (which "bash"))
57
58 ;; The compatibility mode is needed by some packages,
59 ;; notably iproute2.
60 "--enable-compat185"))))
61 %standard-phases)))
62 (synopsis "db, the Berkeley database")
63 (description
64 "Berkeley DB is an embeddable database allowing developers the choice of
65SQL, Key/Value, XML/XQuery or Java Object storage for their data model.")
66 (license (bsd-style "file://LICENSE"
67 "See LICENSE in the distribution."))
68 (home-page "http://www.oracle.com/us/products/database/berkeley-db/overview/index.html")))
diff --git a/gnu/packages/databases.scm b/gnu/packages/databases.scm
new file mode 100644
index 00000000000..553a078a88b
--- /dev/null
+++ b/gnu/packages/databases.scm
@@ -0,0 +1,245 @@
1;;; GNU Guix --- Functional package management for GNU
2;;; Copyright © 2012, 2013, 2014 Ludovic Courtès <ludo@gnu.org>
3;;; Copyright © 2012 Andreas Enge <andreas@enge.fr>
4;;; Copyright © 2013 Cyril Roelandt <tipecaml@gmail.com>
5;;; Copyright © 2014 David Thompson <davet@gnu.org>
6;;; Copyright © 2014 Mark H Weaver <mhw@netris.org>
7;;;
8;;; This file is part of GNU Guix.
9;;;
10;;; GNU Guix is free software; you can redistribute it and/or modify it
11;;; under the terms of the GNU General Public License as published by
12;;; the Free Software Foundation; either version 3 of the License, or (at
13;;; your option) any later version.
14;;;
15;;; GNU Guix is distributed in the hope that it will be useful, but
16;;; WITHOUT ANY WARRANTY; without even the implied warranty of
17;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18;;; GNU General Public License for more details.
19;;;
20;;; You should have received a copy of the GNU General Public License
21;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
22
23(define-module (gnu packages databases)
24 #:use-module (gnu packages)
25 #:use-module (gnu packages perl)
26 #:use-module (gnu packages linux)
27 #:use-module (gnu packages openssl)
28 #:use-module (gnu packages compression)
29 #:use-module (gnu packages ncurses)
30 #:use-module (gnu packages readline)
31 #:use-module (gnu packages emacs)
32 #:use-module (gnu packages check)
33 #:use-module (gnu packages algebra)
34 #:use-module (gnu packages curl)
35 #:use-module (gnu packages gnupg)
36 #:use-module ((guix licenses)
37 #:select (gpl2 gpl3+ x11-style bsd-style
38 public-domain))
39 #:use-module (guix packages)
40 #:use-module (guix download)
41 #:use-module (guix build-system gnu)
42 #:use-module (srfi srfi-26)
43 #:use-module (ice-9 match))
44
45(define-public bdb
46 (package
47 (name "bdb")
48 (version "5.3.21")
49 (source (origin
50 (method url-fetch)
51 (uri (string-append "http://download.oracle.com/berkeley-db/db-" version
52 ".tar.gz"))
53 (sha256 (base32
54 "1f2g2612lf8djbwbwhxsvmffmf9d7693kh2l20195pqp0f9jmnfx"))))
55 (build-system gnu-build-system)
56 (outputs '("out" ; programs, libraries, headers
57 "doc")) ; 94 MiB of HTML docs
58 (arguments
59 '(#:tests? #f ; no check target available
60 #:phases
61 (alist-replace
62 'configure
63 (lambda* (#:key outputs #:allow-other-keys)
64 (let ((out (assoc-ref outputs "out"))
65 (doc (assoc-ref outputs "doc")))
66 ;; '--docdir' is not honored, so we need to patch.
67 (substitute* "dist/Makefile.in"
68 (("docdir[[:blank:]]*=.*")
69 (string-append "docdir = " doc "/share/doc/bdb")))
70
71 (zero?
72 (system* "./dist/configure"
73 (string-append "--prefix=" out)
74 (string-append "CONFIG_SHELL=" (which "bash"))
75 (string-append "SHELL=" (which "bash"))
76
77 ;; The compatibility mode is needed by some packages,
78 ;; notably iproute2.
79 "--enable-compat185"))))
80 %standard-phases)))
81 (synopsis "db, the Berkeley database")
82 (description
83 "Berkeley DB is an embeddable database allowing developers the choice of
84SQL, Key/Value, XML/XQuery or Java Object storage for their data model.")
85 (license (bsd-style "file://LICENSE"
86 "See LICENSE in the distribution."))
87 (home-page
88 "http://www.oracle.com/us/products/database/berkeley-db/overview/index.html")))
89
90(define-public mysql
91 (package
92 (name "mysql")
93 (version "5.1.73")
94 (source (origin
95 (method url-fetch)
96 (uri (string-append
97 "http://dev.mysql.com/get/Downloads/MySQL-5.1/mysql-"
98 version ".tar.gz"))
99 (sha256
100 (base32
101 "1dfwi4ck0vq6sdci6gz0031s7zz5lc3pddqlgm0292s00l9y5sq5"))))
102 (build-system gnu-build-system)
103 (inputs
104 `(("procps" ,procps)
105 ("openssl" ,openssl)
106 ("perl" ,perl)
107 ("zlib" ,zlib)
108 ("ncurses" ,ncurses)))
109 (arguments
110 '(#:modules ((guix build gnu-build-system)
111 (guix build utils)
112 (ice-9 ftw)) ; for "rm -rf"
113 #:phases (alist-cons-after
114 'install 'clean-up
115 (lambda* (#:key outputs #:allow-other-keys)
116 ;; Remove the 112 MiB of tests that get installed.
117 (let ((out (assoc-ref outputs "out")))
118 (define (rm-rf dir)
119 (file-system-fold (const #t) ; enter?
120 (lambda (file stat result) ; leaf
121 (delete-file file))
122 (const #t) ; down
123 (lambda (dir stat result) ; up
124 (rmdir dir))
125 (const #t)
126 (lambda (file stat errno result)
127 (format (current-error-port)
128 "error: ~a: ~a~%"
129 file (strerror errno)))
130 #t
131 (string-append out "/" dir)))
132 (rm-rf "mysql-test")
133 (rm-rf "sql-bench")
134
135 ;; Compress the 14 MiB Info file.
136 (zero?
137 (system* "gzip" "--best"
138 (string-append out "/share/info/mysql.info")))))
139 %standard-phases)))
140 (home-page "http://www.mysql.com/")
141 (synopsis "A fast, easy to use, and popular database")
142 (description
143 "MySQL is a fast, reliable, and easy to use relational database
144management system that supports the standardized Structured Query
145Language.")
146 (license gpl2)))
147
148(define-public postgresql
149 (package
150 (name "postgresql")
151 (version "9.3.5")
152 (source (origin
153 (method url-fetch)
154 (uri (string-append "http://ftp.postgresql.org/pub/source/v"
155 version "/postgresql-" version ".tar.gz"))
156 (sha256
157 (base32
158 "08kga00izykgvnx7hn995wc4zjqslspapaa8z63045p1ya14mr4g"))))
159 (build-system gnu-build-system)
160 (inputs
161 `(("readline" ,readline)
162 ("zlib" ,zlib)))
163 (home-page "http://www.postgresql.org/")
164 (synopsis "Powerful object-relational database system")
165 (description
166 "PostgreSQL is a powerful object-relational database system. It is fully
167ACID compliant, has full support for foreign keys, joins, views, triggers, and
168stored procedures (in multiple languages). It includes most SQL:2008 data
169types, including INTEGER, NUMERIC, BOOLEAN, CHAR, VARCHAR, DATE, INTERVAL, and
170TIMESTAMP. It also supports storage of binary large objects, including
171pictures, sounds, or video.")
172 (license (x11-style "file://COPYRIGHT"))))
173
174(define-public recutils
175 (package
176 (name "recutils")
177 (version "1.7")
178 (source (origin
179 (method url-fetch)
180 (uri (string-append "mirror://gnu/recutils/recutils-"
181 version ".tar.gz"))
182 (sha256
183 (base32
184 "0cdwa4094x3yx7vn98xykvnlp9rngvd58d19vs3vh5hrvggccg93"))))
185 (build-system gnu-build-system)
186
187 ;; Running tests in parallel leads to test failures and crashes in
188 ;; torture/utils.
189 (arguments '(#:parallel-tests? #f))
190
191 (native-inputs `(("emacs" ,emacs)
192 ("bc" ,bc)))
193
194 ;; TODO: Add more optional inputs.
195 ;; FIXME: Our Bash doesn't have development headers (need for the 'readrec'
196 ;; built-in command), but it's not clear how to get them installed.
197 ;; See <https://lists.gnu.org/archive/html/bug-bash/2014-03/msg00125.html>.
198 (inputs `(("curl" ,curl)
199 ("libgcrypt" ,libgcrypt)
200 ("check" ,check)))
201 (synopsis "Manipulate plain text files as databases")
202 (description
203 "GNU Recutils is a set of tools and libraries for creating and
204manipulating text-based, human-editable databases. Despite being text-based,
205databases created with Recutils carry all of the expected features such as
206unique fields, primary keys, time stamps and more. Many different field types
207are supported, as is encryption.")
208 (license gpl3+)
209 (home-page "http://www.gnu.org/software/recutils/")))
210
211(define-public sqlite
212 (package
213 (name "sqlite")
214 (version "3.8.4.3")
215 (source (origin
216 (method url-fetch)
217 ;; TODO: Download from sqlite.org once this bug :
218 ;; http://lists.gnu.org/archive/html/bug-guile/2013-01/msg00027.html
219 ;; has been fixed.
220 (uri (let ((numeric-version
221 (match (string-split version #\.)
222 ((first-digit other-digits ...)
223 (string-append first-digit
224 (string-pad-right
225 (string-concatenate
226 (map (cut string-pad <> 2 #\0)
227 other-digits))
228 6 #\0))))))
229 (string-append
230 "mirror://sourceforge/sqlite.mirror/SQLite%20" version
231 "/sqlite-autoconf-" numeric-version ".tar.gz")))
232 (sha256
233 (base32
234 "0rcdsk5sz34w8vy0g5yhfms4saiq81i872jxx5m5sjij7bi9bsg0"))
235 (patches
236 (list (search-patch "sqlite-large-page-size-fix.patch")))))
237 (build-system gnu-build-system)
238 (home-page "http://www.sqlite.org/")
239 (synopsis "The SQLite database management system")
240 (description
241 "SQLite is a software library that implements a self-contained, serverless,
242zero-configuration, transactional SQL database engine. SQLite is the most
243widely deployed SQL database engine in the world. The source code for SQLite is
244in the public domain.")
245 (license public-domain)))
diff --git a/gnu/packages/dc.scm b/gnu/packages/dc.scm
index 0cb7c5b4f0e..0e65d886d0f 100644
--- a/gnu/packages/dc.scm
+++ b/gnu/packages/dc.scm
@@ -23,7 +23,7 @@
23 #:use-module (gnu packages gnutls) 23 #:use-module (gnu packages gnutls)
24 #:use-module (gnu packages ncurses) 24 #:use-module (gnu packages ncurses)
25 #:use-module (gnu packages pkg-config) 25 #:use-module (gnu packages pkg-config)
26 #:use-module (gnu packages sqlite) 26 #:use-module (gnu packages databases)
27 #:use-module (guix packages) 27 #:use-module (guix packages)
28 #:use-module (guix download) 28 #:use-module (guix download)
29 #:use-module (guix build-system gnu) 29 #:use-module (guix build-system gnu)
diff --git a/gnu/packages/games.scm b/gnu/packages/games.scm
index 84e09aaee74..f3c88c92d48 100644
--- a/gnu/packages/games.scm
+++ b/gnu/packages/games.scm
@@ -38,7 +38,7 @@
38 #:use-module (gnu packages readline) 38 #:use-module (gnu packages readline)
39 #:use-module (gnu packages xorg) 39 #:use-module (gnu packages xorg)
40 #:use-module (gnu packages pkg-config) 40 #:use-module (gnu packages pkg-config)
41 #:use-module (gnu packages sqlite) 41 #:use-module (gnu packages databases)
42 #:use-module (gnu packages sdl) 42 #:use-module (gnu packages sdl)
43 #:use-module (gnu packages texinfo) 43 #:use-module (gnu packages texinfo)
44 #:use-module (guix build-system gnu)) 44 #:use-module (guix build-system gnu))
diff --git a/gnu/packages/gnunet.scm b/gnu/packages/gnunet.scm
index e4ef3d48713..d5a1930bbe3 100644
--- a/gnu/packages/gnunet.scm
+++ b/gnu/packages/gnunet.scm
@@ -38,7 +38,7 @@
38 #:use-module (gnu packages perl) 38 #:use-module (gnu packages perl)
39 #:use-module (gnu packages pulseaudio) 39 #:use-module (gnu packages pulseaudio)
40 #:use-module (gnu packages python) 40 #:use-module (gnu packages python)
41 #:use-module (gnu packages sqlite) 41 #:use-module (gnu packages databases)
42 #:use-module (gnu packages video) 42 #:use-module (gnu packages video)
43 #:use-module (gnu packages xiph) 43 #:use-module (gnu packages xiph)
44 #:use-module ((guix licenses) 44 #:use-module ((guix licenses)
diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index 442f80103a5..fbf70cca556 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -30,7 +30,7 @@
30 #:use-module (gnu packages libusb) 30 #:use-module (gnu packages libusb)
31 #:use-module (gnu packages ncurses) 31 #:use-module (gnu packages ncurses)
32 #:use-module (gnu packages pciutils) 32 #:use-module (gnu packages pciutils)
33 #:use-module (gnu packages bdb) 33 #:use-module (gnu packages databases)
34 #:use-module (gnu packages perl) 34 #:use-module (gnu packages perl)
35 #:use-module (gnu packages pkg-config) 35 #:use-module (gnu packages pkg-config)
36 #:use-module (gnu packages python) 36 #:use-module (gnu packages python)
diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm
index a9e862ac88b..2a742cdc56c 100644
--- a/gnu/packages/mail.scm
+++ b/gnu/packages/mail.scm
@@ -31,7 +31,7 @@
31 #:use-module (gnu packages guile) 31 #:use-module (gnu packages guile)
32 #:use-module (gnu packages linux) 32 #:use-module (gnu packages linux)
33 #:use-module (gnu packages m4) 33 #:use-module (gnu packages m4)
34 #:use-module (gnu packages mysql) 34 #:use-module (gnu packages databases)
35 #:use-module (gnu packages ncurses) 35 #:use-module (gnu packages ncurses)
36 #:use-module (gnu packages openssl) 36 #:use-module (gnu packages openssl)
37 #:use-module (gnu packages perl) 37 #:use-module (gnu packages perl)
@@ -43,7 +43,6 @@
43 #:use-module (gnu packages glib) 43 #:use-module (gnu packages glib)
44 #:use-module (gnu packages pkg-config) 44 #:use-module (gnu packages pkg-config)
45 #:use-module (gnu packages flex) 45 #:use-module (gnu packages flex)
46 #:use-module (gnu packages bdb)
47 #:use-module (gnu packages gdb) 46 #:use-module (gnu packages gdb)
48 #:use-module (gnu packages samba) 47 #:use-module (gnu packages samba)
49 #:use-module ((guix licenses) 48 #:use-module ((guix licenses)
diff --git a/gnu/packages/mpd.scm b/gnu/packages/mpd.scm
index a20103df4f8..634bc7c6bde 100644
--- a/gnu/packages/mpd.scm
+++ b/gnu/packages/mpd.scm
@@ -35,7 +35,7 @@
35 #:use-module (gnu packages ncurses) 35 #:use-module (gnu packages ncurses)
36 #:use-module (gnu packages pkg-config) 36 #:use-module (gnu packages pkg-config)
37 #:use-module (gnu packages pulseaudio) 37 #:use-module (gnu packages pulseaudio)
38 #:use-module (gnu packages sqlite) 38 #:use-module (gnu packages databases)
39 #:use-module (gnu packages video) 39 #:use-module (gnu packages video)
40 #:use-module (gnu packages xiph) 40 #:use-module (gnu packages xiph)
41 #:export (libmpdclient 41 #:export (libmpdclient
diff --git a/gnu/packages/mysql.scm b/gnu/packages/mysql.scm
deleted file mode 100644
index e89770e9074..00000000000
--- a/gnu/packages/mysql.scm
+++ /dev/null
@@ -1,87 +0,0 @@
1;;; GNU Guix --- Functional package management for GNU
2;;; Copyright © 2013 Ludovic Courtès <ludo@gnu.org>
3;;;
4;;; This file is part of GNU Guix.
5;;;
6;;; GNU Guix is free software; you can redistribute it and/or modify it
7;;; under the terms of the GNU General Public License as published by
8;;; the Free Software Foundation; either version 3 of the License, or (at
9;;; your option) any later version.
10;;;
11;;; GNU Guix is distributed in the hope that it will be useful, but
12;;; WITHOUT ANY WARRANTY; without even the implied warranty of
13;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14;;; GNU General Public License for more details.
15;;;
16;;; You should have received a copy of the GNU General Public License
17;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
18
19(define-module (gnu packages mysql)
20 #:use-module (gnu packages)
21 #:use-module (gnu packages perl)
22 #:use-module (gnu packages linux)
23 #:use-module (gnu packages openssl)
24 #:use-module (gnu packages compression)
25 #:use-module (gnu packages ncurses)
26 #:use-module ((guix licenses) #:select (gpl2))
27 #:use-module (guix packages)
28 #:use-module (guix download)
29 #:use-module (guix build-system gnu))
30
31(define-public mysql
32 (package
33 (name "mysql")
34 (version "5.1.73")
35 (source (origin
36 (method url-fetch)
37 (uri (string-append
38 "http://dev.mysql.com/get/Downloads/MySQL-5.1/mysql-"
39 version ".tar.gz"))
40 (sha256
41 (base32
42 "1dfwi4ck0vq6sdci6gz0031s7zz5lc3pddqlgm0292s00l9y5sq5"))))
43 (build-system gnu-build-system)
44 (inputs
45 `(("procps" ,procps)
46 ("openssl" ,openssl)
47 ("perl" ,perl)
48 ("zlib" ,zlib)
49 ("ncurses" ,ncurses)))
50 (arguments
51 '(#:modules ((guix build gnu-build-system)
52 (guix build utils)
53 (ice-9 ftw)) ; for "rm -rf"
54 #:phases (alist-cons-after
55 'install 'clean-up
56 (lambda* (#:key outputs #:allow-other-keys)
57 ;; Remove the 112 MiB of tests that get installed.
58 (let ((out (assoc-ref outputs "out")))
59 (define (rm-rf dir)
60 (file-system-fold (const #t) ; enter?
61 (lambda (file stat result) ; leaf
62 (delete-file file))
63 (const #t) ; down
64 (lambda (dir stat result) ; up
65 (rmdir dir))
66 (const #t)
67 (lambda (file stat errno result)
68 (format (current-error-port)
69 "error: ~a: ~a~%"
70 file (strerror errno)))
71 #t
72 (string-append out "/" dir)))
73 (rm-rf "mysql-test")
74 (rm-rf "sql-bench")
75
76 ;; Compress the 14 MiB Info file.
77 (zero?
78 (system* "gzip" "--best"
79 (string-append out "/share/info/mysql.info")))))
80 %standard-phases)))
81 (home-page "http://www.mysql.com/")
82 (synopsis "A fast, easy to use, and popular database")
83 (description
84 "MySQL is a fast, reliable, and easy to use relational database
85management system that supports the standardized Structured Query
86Language.")
87 (license gpl2)))
diff --git a/gnu/packages/nvi.scm b/gnu/packages/nvi.scm
index 3037e5bafca..8fd736d1808 100644
--- a/gnu/packages/nvi.scm
+++ b/gnu/packages/nvi.scm
@@ -18,7 +18,7 @@
18 18
19(define-module (gnu packages nvi) 19(define-module (gnu packages nvi)
20 #:use-module (gnu packages) 20 #:use-module (gnu packages)
21 #:use-module (gnu packages bdb) 21 #:use-module (gnu packages databases)
22 #:use-module (gnu packages ncurses) 22 #:use-module (gnu packages ncurses)
23 #:use-module (guix packages) 23 #:use-module (guix packages)
24 #:use-module (guix download) 24 #:use-module (guix download)
diff --git a/gnu/packages/openldap.scm b/gnu/packages/openldap.scm
index 574f11904ae..23c32488e96 100644
--- a/gnu/packages/openldap.scm
+++ b/gnu/packages/openldap.scm
@@ -1,5 +1,5 @@
1;;; GNU Guix --- Functional package management for GNU 1;;; GNU Guix --- Functional package management for GNU
2;;; Copyright © 2013 Ludovic Courtès <ludo@gnu.org> 2;;; Copyright © 2013, 2014 Ludovic Courtès <ludo@gnu.org>
3;;; Copyright © 2013 Andreas Enge <andreas@enge.fr> 3;;; Copyright © 2013 Andreas Enge <andreas@enge.fr>
4;;; 4;;;
5;;; This file is part of GNU Guix. 5;;; This file is part of GNU Guix.
@@ -19,7 +19,7 @@
19 19
20(define-module (gnu packages openldap) 20(define-module (gnu packages openldap)
21 #:use-module (gnu packages autotools) 21 #:use-module (gnu packages autotools)
22 #:use-module (gnu packages bdb) 22 #:use-module (gnu packages databases)
23 #:use-module (gnu packages compression) 23 #:use-module (gnu packages compression)
24 #:use-module (gnu packages cyrus-sasl) 24 #:use-module (gnu packages cyrus-sasl)
25 #:use-module (gnu packages gnupg) 25 #:use-module (gnu packages gnupg)
diff --git a/gnu/packages/package-management.scm b/gnu/packages/package-management.scm
index 66e71df2844..9f35de18194 100644
--- a/gnu/packages/package-management.scm
+++ b/gnu/packages/package-management.scm
@@ -27,7 +27,7 @@
27 #:use-module (gnu packages guile) 27 #:use-module (gnu packages guile)
28 #:use-module ((gnu packages compression) #:select (bzip2 gzip)) 28 #:use-module ((gnu packages compression) #:select (bzip2 gzip))
29 #:use-module (gnu packages gnupg) 29 #:use-module (gnu packages gnupg)
30 #:use-module (gnu packages sqlite) 30 #:use-module (gnu packages databases)
31 #:use-module (gnu packages graphviz) 31 #:use-module (gnu packages graphviz)
32 #:use-module (gnu packages pkg-config) 32 #:use-module (gnu packages pkg-config)
33 #:use-module (gnu packages autotools) 33 #:use-module (gnu packages autotools)
diff --git a/gnu/packages/postgresql.scm b/gnu/packages/postgresql.scm
deleted file mode 100644
index d6b505f6a26..00000000000
--- a/gnu/packages/postgresql.scm
+++ /dev/null
@@ -1,52 +0,0 @@
1;;; GNU Guix --- Functional package management for GNU
2;;; Copyright © 2014 David Thompson <davet@gnu.org>
3;;;
4;;; This file is part of GNU Guix.
5;;;
6;;; GNU Guix is free software; you can redistribute it and/or modify it
7;;; under the terms of the GNU General Public License as published by
8;;; the Free Software Foundation; either version 3 of the License, or (at
9;;; your option) any later version.
10;;;
11;;; GNU Guix is distributed in the hope that it will be useful, but
12;;; WITHOUT ANY WARRANTY; without even the implied warranty of
13;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14;;; GNU General Public License for more details.
15;;;
16;;; You should have received a copy of the GNU General Public License
17;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
18
19(define-module (gnu packages postgresql)
20 #:use-module ((guix licenses) #:select (x11-style))
21 #:use-module (guix packages)
22 #:use-module (guix download)
23 #:use-module (guix build-system gnu)
24 #:use-module (gnu packages)
25 #:use-module (gnu packages compression)
26 #:use-module (gnu packages readline))
27
28(define-public postgresql
29 (package
30 (name "postgresql")
31 (version "9.3.5")
32 (source (origin
33 (method url-fetch)
34 (uri (string-append "http://ftp.postgresql.org/pub/source/v"
35 version "/postgresql-" version ".tar.gz"))
36 (sha256
37 (base32
38 "08kga00izykgvnx7hn995wc4zjqslspapaa8z63045p1ya14mr4g"))))
39 (build-system gnu-build-system)
40 (inputs
41 `(("readline" ,readline)
42 ("zlib" ,zlib)))
43 (home-page "http://www.postgresql.org/")
44 (synopsis "Powerful object-relational database system")
45 (description
46 "PostgreSQL is a powerful object-relational database system. It is fully
47ACID compliant, has full support for foreign keys, joins, views, triggers, and
48stored procedures (in multiple languages). It includes most SQL:2008 data
49types, including INTEGER, NUMERIC, BOOLEAN, CHAR, VARCHAR, DATE, INTERVAL, and
50TIMESTAMP. It also supports storage of binary large objects, including
51pictures, sounds, or video.")
52 (license (x11-style "file://COPYRIGHT"))))
diff --git a/gnu/packages/python.scm b/gnu/packages/python.scm
index 81b6c956a9d..3046c3b1e1f 100644
--- a/gnu/packages/python.scm
+++ b/gnu/packages/python.scm
@@ -36,7 +36,7 @@
36 #:use-module (gnu packages openssl) 36 #:use-module (gnu packages openssl)
37 #:use-module (gnu packages elf) 37 #:use-module (gnu packages elf)
38 #:use-module (gnu packages pkg-config) 38 #:use-module (gnu packages pkg-config)
39 #:use-module (gnu packages sqlite) 39 #:use-module (gnu packages databases)
40 #:use-module (gnu packages zip) 40 #:use-module (gnu packages zip)
41 #:use-module (gnu packages multiprecision) 41 #:use-module (gnu packages multiprecision)
42 #:use-module (guix packages) 42 #:use-module (guix packages)
diff --git a/gnu/packages/qt.scm b/gnu/packages/qt.scm
index 4d367d8ab7a..ced7e905753 100644
--- a/gnu/packages/qt.scm
+++ b/gnu/packages/qt.scm
@@ -30,7 +30,7 @@
30 #:use-module (gnu packages icu4c) 30 #:use-module (gnu packages icu4c)
31 #:use-module (gnu packages image) 31 #:use-module (gnu packages image)
32 #:use-module (gnu packages linux) 32 #:use-module (gnu packages linux)
33 #:use-module (gnu packages mysql) 33 #:use-module (gnu packages databases)
34 #:use-module (gnu packages openssl) 34 #:use-module (gnu packages openssl)
35 #:use-module (gnu packages perl) 35 #:use-module (gnu packages perl)
36 #:use-module (gnu packages pkg-config) 36 #:use-module (gnu packages pkg-config)
diff --git a/gnu/packages/rdf.scm b/gnu/packages/rdf.scm
index 7634e48018e..19a68be229e 100644
--- a/gnu/packages/rdf.scm
+++ b/gnu/packages/rdf.scm
@@ -23,7 +23,7 @@
23 #:use-module (guix build-system cmake) 23 #:use-module (guix build-system cmake)
24 #:use-module (guix build-system gnu) 24 #:use-module (guix build-system gnu)
25 #:use-module (gnu packages) 25 #:use-module (gnu packages)
26 #:use-module (gnu packages bdb) 26 #:use-module (gnu packages databases)
27 #:use-module (gnu packages boost) 27 #:use-module (gnu packages boost)
28 #:use-module (gnu packages compression) 28 #:use-module (gnu packages compression)
29 #:use-module (gnu packages curl) 29 #:use-module (gnu packages curl)
diff --git a/gnu/packages/recutils.scm b/gnu/packages/recutils.scm
deleted file mode 100644
index 7e78ac121d5..00000000000
--- a/gnu/packages/recutils.scm
+++ /dev/null
@@ -1,66 +0,0 @@
1;;; GNU Guix --- Functional package management for GNU
2;;; Copyright © 2012, 2013, 2014 Ludovic Courtès <ludo@gnu.org>
3;;;
4;;; This file is part of GNU Guix.
5;;;
6;;; GNU Guix is free software; you can redistribute it and/or modify it
7;;; under the terms of the GNU General Public License as published by
8;;; the Free Software Foundation; either version 3 of the License, or (at
9;;; your option) any later version.
10;;;
11;;; GNU Guix is distributed in the hope that it will be useful, but
12;;; WITHOUT ANY WARRANTY; without even the implied warranty of
13;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14;;; GNU General Public License for more details.
15;;;
16;;; You should have received a copy of the GNU General Public License
17;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
18
19(define-module (gnu packages recutils)
20 #:use-module (guix licenses)
21 #:use-module (gnu packages)
22 #:use-module (guix packages)
23 #:use-module (guix download)
24 #:use-module (guix build-system gnu)
25 #:use-module (gnu packages emacs)
26 #:use-module (gnu packages check)
27 #:use-module (gnu packages algebra)
28 #:use-module (gnu packages curl)
29 #:use-module (gnu packages gnupg))
30
31(define-public recutils
32 (package
33 (name "recutils")
34 (version "1.7")
35 (source (origin
36 (method url-fetch)
37 (uri (string-append "mirror://gnu/recutils/recutils-"
38 version ".tar.gz"))
39 (sha256
40 (base32
41 "0cdwa4094x3yx7vn98xykvnlp9rngvd58d19vs3vh5hrvggccg93"))))
42 (build-system gnu-build-system)
43
44 ;; Running tests in parallel leads to test failures and crashes in
45 ;; torture/utils.
46 (arguments '(#:parallel-tests? #f))
47
48 (native-inputs `(("emacs" ,emacs)
49 ("bc" ,bc)))
50
51 ;; TODO: Add more optional inputs.
52 ;; FIXME: Our Bash doesn't have development headers (need for the 'readrec'
53 ;; built-in command), but it's not clear how to get them installed.
54 ;; See <https://lists.gnu.org/archive/html/bug-bash/2014-03/msg00125.html>.
55 (inputs `(("curl" ,curl)
56 ("libgcrypt" ,libgcrypt)
57 ("check" ,check)))
58 (synopsis "Manipulate plain text files as databases")
59 (description
60 "GNU Recutils is a set of tools and libraries for creating and
61manipulating text-based, human-editable databases. Despite being text-based,
62databases created with Recutils carry all of the expected features such as
63unique fields, primary keys, time stamps and more. Many different field types
64are supported, as is encryption.")
65 (license gpl3+)
66 (home-page "http://www.gnu.org/software/recutils/")))
diff --git a/gnu/packages/sqlite.scm b/gnu/packages/sqlite.scm
deleted file mode 100644
index e19160a864d..00000000000
--- a/gnu/packages/sqlite.scm
+++ /dev/null
@@ -1,63 +0,0 @@
1;;; GNU Guix --- Functional package management for GNU
2;;; Copyright © 2013 Cyril Roelandt <tipecaml@gmail.com>
3;;; Copyright © 2014 Mark H Weaver <mhw@netris.org>
4;;;
5;;; This file is part of GNU Guix.
6;;;
7;;; GNU Guix is free software; you can redistribute it and/or modify it
8;;; under the terms of the GNU General Public License as published by
9;;; the Free Software Foundation; either version 3 of the License, or (at
10;;; your option) any later version.
11;;;
12;;; GNU Guix is distributed in the hope that it will be useful, but
13;;; WITHOUT ANY WARRANTY; without even the implied warranty of
14;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15;;; GNU General Public License for more details.
16;;;
17;;; You should have received a copy of the GNU General Public License
18;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
19
20(define-module (gnu packages sqlite)
21 #:use-module (guix licenses)
22 #:use-module (guix packages)
23 #:use-module (guix download)
24 #:use-module (guix build-system gnu)
25 #:use-module (gnu packages)
26 #:use-module (srfi srfi-26)
27 #:use-module (ice-9 match))
28
29(define-public sqlite
30 (package
31 (name "sqlite")
32 (version "3.8.4.3")
33 (source (origin
34 (method url-fetch)
35 ;; TODO: Download from sqlite.org once this bug :
36 ;; http://lists.gnu.org/archive/html/bug-guile/2013-01/msg00027.html
37 ;; has been fixed.
38 (uri (let ((numeric-version
39 (match (string-split version #\.)
40 ((first-digit other-digits ...)
41 (string-append first-digit
42 (string-pad-right
43 (string-concatenate
44 (map (cut string-pad <> 2 #\0)
45 other-digits))
46 6 #\0))))))
47 (string-append
48 "mirror://sourceforge/sqlite.mirror/SQLite%20" version
49 "/sqlite-autoconf-" numeric-version ".tar.gz")))
50 (sha256
51 (base32
52 "0rcdsk5sz34w8vy0g5yhfms4saiq81i872jxx5m5sjij7bi9bsg0"))
53 (patches
54 (list (search-patch "sqlite-large-page-size-fix.patch")))))
55 (build-system gnu-build-system)
56 (home-page "http://www.sqlite.org/")
57 (synopsis "The SQLite database management system")
58 (description
59 "SQLite is a software library that implements a self-contained, serverless,
60zero-configuration, transactional SQL database engine. SQLite is the most
61widely deployed SQL database engine in the world. The source code for SQLite is
62in the public domain.")
63 (license public-domain)))
diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm
index 83ad35fb771..89b26e69df5 100644
--- a/gnu/packages/version-control.scm
+++ b/gnu/packages/version-control.scm
@@ -44,7 +44,7 @@
44 #:use-module (gnu packages perl) 44 #:use-module (gnu packages perl)
45 #:use-module (gnu packages pkg-config) 45 #:use-module (gnu packages pkg-config)
46 #:use-module (gnu packages python) 46 #:use-module (gnu packages python)
47 #:use-module (gnu packages sqlite) 47 #:use-module (gnu packages databases)
48 #:use-module (gnu packages admin) 48 #:use-module (gnu packages admin)
49 #:use-module (gnu packages xml) 49 #:use-module (gnu packages xml)
50 #:use-module (gnu packages emacs) 50 #:use-module (gnu packages emacs)