Package: release.debian.org
Severity: normal
Tags: wheezy
User: release.debian....@packages.debian.org
Usertags: pu

Hi,

Christoph Biedl reported that there is an interoperability problem
with a wheezy client using libdbd-pg-perl against a PostgreSQL server
running >= 9.2 so in particular this will be a problem if wheezy
clients try to connect to a Jessie running server with postgresql-9.4:

https://bugs.debian.org/781722

There is a upstream commit included in later libdbd-pg-perl versions
which address this, but this is missing in wheezy:

https://rt.cpan.org/Public/Bug/Display.html?id=77042

Attached debdiff adds the upstream commit as patch to the version in
wheezy. Could I upload this for the next wheezy point release?

Regards,
Salvatore
diff -Nru libdbd-pg-perl-2.19.2/debian/changelog libdbd-pg-perl-2.19.2/debian/changelog
--- libdbd-pg-perl-2.19.2/debian/changelog	2012-10-31 08:26:22.000000000 +0100
+++ libdbd-pg-perl-2.19.2/debian/changelog	2015-04-04 13:52:38.000000000 +0200
@@ -1,3 +1,12 @@
+libdbd-pg-perl (2.19.2-2+deb7u1) unstable; urgency=medium
+
+  * Add 0001-Adjustments-for-the-loss-of-spclocation-in-9.2.patch patch.
+    Fixes interoperability problem between wheezy clients using DBD::Pg
+    against newer PostgreSQL versions.
+    Thanks to Christoph Biedl <debian.a...@manchmal.in-ulm.de> (Closes: #781722)
+
+ -- Salvatore Bonaccorso <car...@debian.org>  Sat, 04 Apr 2015 13:15:47 +0200
+
 libdbd-pg-perl (2.19.2-2) unstable; urgency=low
 
   * debian/rules: Export LC_ALL=C to avoid build failure in non-English
diff -Nru libdbd-pg-perl-2.19.2/debian/patches/0001-Adjustments-for-the-loss-of-spclocation-in-9.2.patch libdbd-pg-perl-2.19.2/debian/patches/0001-Adjustments-for-the-loss-of-spclocation-in-9.2.patch
--- libdbd-pg-perl-2.19.2/debian/patches/0001-Adjustments-for-the-loss-of-spclocation-in-9.2.patch	1970-01-01 01:00:00.000000000 +0100
+++ libdbd-pg-perl-2.19.2/debian/patches/0001-Adjustments-for-the-loss-of-spclocation-in-9.2.patch	2015-04-04 13:52:38.000000000 +0200
@@ -0,0 +1,37 @@
+From 00f3d68a79beb31a06460dd8f7cb73168c33ca5c Mon Sep 17 00:00:00 2001
+From: Greg Sabino Mullane <g...@endpoint.com>
+Date: Thu, 31 May 2012 14:10:19 -0400
+Subject: [PATCH] Adjustments for the loss of spclocation in 9.2
+
+---
+ Pg.pm | 7 +++++++
+ 1 file changed, 7 insertions(+)
+
+diff --git a/Pg.pm b/Pg.pm
+index ef702d1..586d37f 100644
+--- a/Pg.pm
++++ b/Pg.pm
+@@ -740,6 +740,10 @@ use 5.006001;
+             $whereclause
+         };
+ 
++		if ($dbh->{private_dbdpg}{version} >= 90200) {
++			$pri_key_sql =~ s/t.spclocation/pg_tablespace_location(t.oid)/;
++		}
++
+ 		my $sth = $dbh->prepare($pri_key_sql) or return undef;
+ 		$sth->execute();
+ 		my $info = $sth->fetchall_arrayref()->[0];
+@@ -1152,6 +1156,9 @@ use 5.006001;
+ 			$extracols = q{,n.nspname AS pg_schema, c.relname AS pg_table};
+ 			my @search;
+ 			my $showtablespace = ', quote_ident(t.spcname) AS "pg_tablespace_name", quote_ident(t.spclocation) AS "pg_tablespace_location"';
++			if ($dbh->{private_dbdpg}{version} >= 90200) {
++				$showtablespace = ', quote_ident(t.spcname) AS "pg_tablespace_name", quote_ident(pg_tablespace_location(t.oid)) AS "pg_tablespace_location"';
++			}
+ 
+ 			## If the schema or table has an underscore or a %, use a LIKE comparison
+ 			if (defined $schema and length $schema) {
+-- 
+2.1.4
+
diff -Nru libdbd-pg-perl-2.19.2/debian/patches/series libdbd-pg-perl-2.19.2/debian/patches/series
--- libdbd-pg-perl-2.19.2/debian/patches/series	2011-09-22 21:46:09.000000000 +0200
+++ libdbd-pg-perl-2.19.2/debian/patches/series	2015-04-04 13:52:38.000000000 +0200
@@ -1,2 +1,3 @@
 pod-spelling.patch
 testdir.patch
+0001-Adjustments-for-the-loss-of-spclocation-in-9.2.patch

Reply via email to