Bug#556577: pu: package libdbd-mysql-perl/4.007-1+lenny1

[Tim Retout <tim@retout.co.uk>]

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

I have prepared a patch on behalf of the pkg-perl team to fix #520406.
It backports a small fix which has been applied upstream, and has been
tested to fix the segmentation fault.  The diff is below.

This is also breaking Apache mod_perl installations which use MySQL,
according to the bug reports.

I'd like permission for this to be uploaded to
stable-proposed-updates.

Thanks,

Tim


Index: dbdimp.c
===================================================================
--- dbdimp.c    (revision 47144)
+++ dbdimp.c    (revision 47145)
@@ -4391,7 +4391,11 @@
   memcpy (&save_socket, imp_dbh->pmysql,sizeof(save_socket));
   memset (imp_dbh->pmysql,0,sizeof(*(imp_dbh->pmysql)));
 
-  if (!my_login(h, imp_dbh))
+  /* we should disconnect the db handle before reconnecting, this will
+   * prevent my_login from thinking it's adopting an active child which
+   * would prevent the handle from actually reconnecting
+   */
+  if (!dbd_db_disconnect(h, imp_dbh) || !my_login(h, imp_dbh))
   {
     do_error(h, mysql_errno(imp_dbh->pmysql), mysql_error(imp_dbh->pmysql),
              mysql_sqlstate(imp_dbh->pmysql));
Index: debian/changelog
===================================================================
--- debian/changelog    (revision 47144)
+++ debian/changelog    (revision 47145)
@@ -1,3 +1,10 @@
+libdbd-mysql-perl (4.007-1+lenny1) stable; urgency=low
+
+  * Apply patch from CPAN bug 37027 to stop auto_reconnect option causing
+    segmentation faults. (Closes: #520406)
+
+ -- Tim Retout <tim@retout.co.uk>  Sat, 14 Nov 2009 14:22:31 +0000
+
 libdbd-mysql-perl (4.007-1) unstable; urgency=low
 
   * New upstream release.