;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012, 2013, 2015, 2021 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2018 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.

(define-module (gnu packages idutils)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix build-system gnu)
  #:use-module (guix licenses)
  #:use-module (gnu packages emacs)
  #:use-module (gnu packages))

(define-public idutils
  (package
    (name "idutils")
    (version "4.6")
    (source (origin
             (method url-fetch)
             (uri (string-append "mirror://gnu/idutils/idutils-"
                                 version ".tar.xz"))
             (sha256
              (base32
               "1hmai3422iaqnp34kkzxdnywl7n7pvlxp11vrw66ybxn9wxg90c1"))
             (modules '((guix build utils)))
             (snippet
              '(begin
                 (substitute* (find-files "lib" "\\.c$")
                   (("#if defined _IO_ftrylockfile")
                    "#if defined _IO_EOF_SEEN"))
                 (substitute* "lib/stdio-impl.h"
                   (("^/\\* BSD stdio derived implementations")
                    (string-append "#if !defined _IO_IN_BACKUP && defined _IO_EOF_SEEN\n"
                                   "# define _IO_IN_BACKUP 0x100\n"
                                   "#endif\n\n"
                                   "/* BSD stdio derived implementations")))

                 ;; 'gets' is deprecated in glibc 2.33 and its declaration is
                 ;; no longer visible by default from <stdio.h>.
                 (substitute* "lib/stdio.in.h"
                   (("_GL_WARN_ON_USE \\(gets.*") ""))))))
    (build-system gnu-build-system)
    (arguments
     ;; XXX: These Gnulib tests fail with GCC 10 and glibc 2.33; skip them.
     '(#:make-flags '("XFAIL_TESTS=test-sprintf-posix test-isnanl-nolibm")))
    (native-inputs `(("emacs" ,emacs-minimal)))
    (home-page "https://www.gnu.org/software/idutils/")
    (synopsis "Identifier database utilities")
    (description
     "The GNU idutils package includes tools to create an index of textual
tokens used in a list of file names and then to query that index.  Thus, it
allows the user to, for example, find all the uses of a particular function
in a large programming project.  In addition to handling textual tokens, it
can also handle numeric constants and the contents of character strings.")
    (license gpl3+)))
€™ field.
* gnu/services/security-token.scm (pcscd-shepherd-service): Remove
‘with-imported-modules’ form.
* gnu/services/web.scm (hpcguix-web-shepherd-service): Likewise.

Change-Id: Ieb817508f1751e0c1ff551a0e078789a4a813c1c
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2023-08-16 22:37:52 +0200'>2023-08-16</span></td><td><a href='/guix/commit/gnu/services/databases.scm?id=9dda7479755ba709bb9bb96614ea09ded566b6d3'>services: posgresql: Add option to specify UID/GID for postgres user.</a><span class='msg-avail'>...<span class='msg-tooltip'>Add 'createAccount?', 'uid' and 'gid' to &lt;postgresql-configuation&gt;.

Unlike other system daemons, the PostgreSQL data directory is typically
meant to persist across 'guix system reconfigure' and once created, you
don't want it's UID or GID to change anymore.

Furthermore, if you want to place the data directory on a network share
and use NFSv4 with idmap, then the 'postgres' user must exist when the
'rpc.idmapd' daemon is launched; prior to mounting the share.  And it
needs to be possible to mount the share without configuring PostgreSQL.

With NFSv3, the UID and GID typically needs to match those on the
server.

The added options allow for both of these scenarios:

You can either create the user in (operating-system (users)) completely
independently of the 'postgresql-service-type' (for instance to get your
NFS setup working first prior to configuring your databases) - or "pin"
it's UID / GID values.

* gnu/services/databases.scm (&lt;postgresql-configuration&gt;)[create-account?]
[uid, gid]: New fields.
(%postgresql-accounts): Remove.
(create-postgresql-account): New procedure.
(postgresql-service-type)[extensions]: Use it.
* doc/guix.texi (Database Services): Update accordingly.

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Martin Baulig</td></tr>
<tr><td><span title='2023-08-11 00:50:48 +0200'>2023-08-11</span></td><td><a href='/guix/commit/gnu/services/databases.scm?id=71aba798d3d586a42afe8a61e8e36b95ca41bc37'>services: postgresql: Add more role fields.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/databases.scm (postgresql-role): Add more role fields.
(postgresql-create-roles): Honor it.
* doc/guix.texi (Database Services): Document it.

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Miguel Moreno</td></tr>
<tr><td><span title='2023-04-21 16:16:37 +0200'>2023-04-21</span></td><td><a href='/guix/commit/gnu/services/databases.scm?id=e45306c1982aee194243cf661295c7ca776d879f'>services: postgresql: Add default package.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/databases.scm (&lt;postgresql-configuration&gt;)[postgresql]:
Add default value, moved from...
(postgresql-service-type)[default-value]: ... here.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2023-04-21 16:16:36 +0200'>2023-04-21</span></td><td><a href='/guix/commit/gnu/services/databases.scm?id=0ac2ada05abdc15e6b9d78782df843fdc0a6fbd6'>services: redis: Add 'configuration' action.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/databases.scm (redis-shepherd-service): Add 'actions'
field.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2023-04-21 16:16:36 +0200'>2023-04-21</span></td><td><a href='/guix/commit/gnu/services/databases.scm?id=97f91aa4ac5405e616d3499253269877c447157a'>services: mysql: Add 'configuration' action.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/databases.scm (mysql-shepherd-service): Add 'actions'
field.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2023-04-21 16:16:36 +0200'>2023-04-21</span></td><td><a href='/guix/commit/gnu/services/databases.scm?id=a5fc3fc921354a6f0e5585d85659a6a9d0848a85'>services: postgresql: Add 'configuration' action.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/databases.scm (postgresql-shepherd-service): Add
'actions' field.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2023-04-21 16:16:36 +0200'>2023-04-21</span></td><td><a href='/guix/commit/gnu/services/databases.scm?id=7aaf2782869a5dec11812825e06b3a92b4a74a3e'>services: postgresql: Add the 'postgresql' Shepherd service name.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/databases.scm (postgresql-shepherd-service): Add
'postgresql' to 'provision'.
</span></span></td><td>Ludovic Courtès</td></tr>