Package: spamassassin
Version: 3.3.2-6.1
Severity: minor
Tags: patch
Syslog currently is filled with tons of annoying warnings like:
Sep 20 08:04:24 klecker spamd[27782]: Use of each() on hash
after insertion without resetting hash iterator results
in undefined behavior, Perl interpreter: 0x13ae010 at
/usr/share/perl5/Mail/SpamAssassin/AsyncLoop.pm line 363, <GEN231> line 184.
It can be fixed with the included patch.
-- System Information:
Debian Release: jessie/sid
APT prefers unstable
APT policy: (500, 'unstable'), (500, 'testing'), (1, 'experimental')
Architecture: amd64 (x86_64)
Foreign Architectures: i386
Kernel: Linux 3.9-1-amd64 (SMP w/4 CPU cores)
Locale: LANG=it_IT.UTF-8, LC_CTYPE=it_IT.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/dash
Versions of packages spamassassin depends on:
ii adduser 3.113+nmu3
pn libarchive-tar-perl <none>
ii libhtml-parser-perl 3.71-1+b1
ii libnet-dns-perl 0.68-1.2
ii libnetaddr-ip-perl 4.062+dfsg-1+b1
ii libsocket6-perl 0.23-1+b3
ii libsys-hostname-long-perl 1.4-2
ii libwww-perl 6.05-1
ii perl 5.18.1-4
ii perl-modules [libio-zlib-perl] 5.18.1-4
Versions of packages spamassassin recommends:
ii gcc 4:4.8.1-3
ii gnupg 1.4.14-1
ii libc6-dev 2.17-92+b1
ii libio-socket-inet6-perl 2.69-2
ii libmail-spf-perl 2.9.0-2
ii make 3.81-8.2
ii perl [libsys-syslog-perl] 5.18.1-4
ii re2c 0.13.5-1
ii spamc 3.3.2-6.1
Versions of packages spamassassin suggests:
ii libdbi-perl 1.628-1+b1
ii libio-compress-perl [libcompress-zlib-perl] 2.061-1
ii libio-socket-ssl-perl 1.954-1
pn libmail-dkim-perl <none>
pn libnet-ident-perl <none>
ii perl [libcompress-zlib-perl] 5.18.1-4
pn pyzor <none>
ii razor 1:2.85-4+b2
-- Configuration Files:
/etc/default/spamassassin changed [not included]
/etc/spamassassin/local.cf changed [not included]
/etc/spamassassin/v320.pre changed [not included]
-- no debconf information
-- debsums errors found:
debsums: changed file /usr/share/perl5/Mail/SpamAssassin/AsyncLoop.pm (from
spamassassin package)
--
Francesco P. Lovergine
--- AsyncLoop.pm.bak 2013-09-20 11:25:54.306894289 +0200
+++ AsyncLoop.pm 2013-09-20 11:25:07.925436408 +0200
@@ -360,7 +360,8 @@
}
$now = time; # capture new timestamp, after possible sleep in 'select'
- while (my($key,$ent) = each %$pending) {
+ my %p = %$pending;
+ while (my($key,$ent) = each %p) {
my $id = $ent->{id};
if (defined $ent->{poll_callback}) { # call a "poll_callback" if exists
# be nice, provide fresh info to a callback routine