~ruther/guix-local

351fdf69f737d09d24499d6c1ff70a2325fff0fa — Nicolas Graves 2 years ago 5034f2d
gnu: postgresql: Deprecate unsupported versions.

Versions 10 and 11 are unsupported according to
https://www.postgresql.org/support/versioning/

postgresql-10 also has a CVE.

* doc/guix.texi: Change default value of postgresql-service-type's
postgresql field.
* gnu/packages/databases.scm (postresql-10, postgresql-11): Use
define-deprecated/public to warn users.
* gnu/services/databases.scm (postgresql-configuration): Change the
default value of postgresql-configuration-postgresql.
* gnu/tests/guix.scm (%guix-data-service-os): Change the default value
of postgresql.

Signed-off-by: Andreas Enge <andreas@enge.fr>
Change-Id: Ie8744c8e1f246e9b45ff5e29d4e98214de3ca66a
4 files changed, 8 insertions(+), 7 deletions(-)

M doc/guix.texi
M gnu/packages/databases.scm
M gnu/services/databases.scm
M gnu/tests/guix.scm
M doc/guix.texi => doc/guix.texi +3 -3
@@ 26192,7 26192,7 @@ configuration.
@lisp
(service postgresql-service-type
         (postgresql-configuration
          (postgresql postgresql-10)))
          (postgresql postgresql)))
@end lisp

If the services fails to start, it may be due to an incompatible


@@ 26219,7 26219,7 @@ Data type representing the configuration for the
@code{postgresql-service-type}.

@table @asis
@item @code{postgresql} (default: @code{postgresql-10})
@item @code{postgresql} (default: @code{postgresql})
PostgreSQL package to use for the service.

@item @code{port} (default: @code{5432})


@@ 26261,7 26261,7 @@ configure the postgresql-service as in this example:
    (cons*
      (service postgresql-service-type
               (postgresql-configuration
                (postgresql postgresql-10)
                (postgresql postgresql)
                (extension-packages (list postgis))))
      %base-services)))
@end lisp

M gnu/packages/databases.scm => gnu/packages/databases.scm +3 -2
@@ 170,6 170,7 @@
  #:use-module (gnu packages web)
  #:use-module (gnu packages xdisorg)
  #:use-module (gnu packages xml)
  #:use-module (guix deprecation)
  #:use-module (guix gexp)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix packages)


@@ 1375,7 1376,7 @@ pictures, sounds, or video.")
               (base32
                "09f99rp5q1xp769r71if9ckb4cbm0nnx2xmy8b1bhcvd8hax9va2"))))))

(define-public postgresql-11
(define-deprecated/public postgresql-11 #f
  (package
    (inherit postgresql-13)
    (name "postgresql")


@@ 1391,7 1392,7 @@ pictures, sounds, or video.")
     (modify-inputs (package-native-inputs postgresql-13)
       (replace "docbook-xml" docbook-xml-4.2)))))

(define-public postgresql-10
(define-deprecated/public postgresql-10 #f
  (package
    (inherit postgresql-11)
    (version "10.23")

M gnu/services/databases.scm => gnu/services/databases.scm +1 -1
@@ 168,7 168,7 @@ host	all	all	::1/128 	md5"))
  postgresql-configuration make-postgresql-configuration
  postgresql-configuration?
  (postgresql         postgresql-configuration-postgresql ;file-like
                      (default postgresql-10))
                      (default postgresql))
  (port               postgresql-configuration-port
                      (default 5432))
  (locale             postgresql-configuration-locale

M gnu/tests/guix.scm => gnu/tests/guix.scm +1 -1
@@ 158,7 158,7 @@
   (service dhcp-client-service-type)
   (service postgresql-service-type
            (postgresql-configuration
             (postgresql postgresql-10)
             (postgresql postgresql)
             (config-file
              (postgresql-config-file
               (hba-file