Mailinglist Archive: opensuse (929 mails)

< Previous Next >
[opensuse] spamassassin or perl bug
  • From: "Carlos E. R." <carlos.e.r@xxxxxxxxxxxx>
  • Date: Mon, 3 Mar 2014 16:38:09 +0100 (CET)
  • Message-id: <alpine.LSU.2.11.1403031629230.5266@Telcontar.valinor>
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1



Hi,

I see hundreds of these in the warn log when I fetch email:


<2.4> 2014-03-03 16:29:26 Telcontar spamd 3567 - - message repeated 19 times:
[ Use of each() on hash after insertion without resetting hash iterator results in
undefined behavior, Perl interpreter: 0x10d0010 at
/usr/lib/perl5/vendor_perl/5.18.1/Mail/SpamAssassin/AsyncLoop.pm line 363.]
<2.4> 2014-03-03 16:29:27 Telcontar spamd 3567 - - Use of each() on hash after
insertion without resetting hash iterator results in undefined behavior, Perl interpreter:
0x10d0010 at /usr/lib/perl5/vendor_perl/5.18.1/Mail/SpamAssassin/AsyncLoop.pm line 363,
<GEN345> line 122.
<2.4> 2014-03-03 16:29:27 Telcontar spamd 3568 - - message repeated 20 times:
[ Use of each() on hash after insertion without resetting hash iterator results in
undefined behavior, Perl interpreter: 0x10d0010 at
/usr/lib/perl5/vendor_perl/5.18.1/Mail/SpamAssassin/AsyncLoop.pm line 363.]
<2.4> 2014-03-03 16:29:27 Telcontar spamd 3567 - - message repeated 2 times: [ Use
of each() on hash after insertion without resetting hash iterator results in undefined
behavior, Perl interpreter: 0x10d0010 at
/usr/lib/perl5/vendor_perl/5.18.1/Mail/SpamAssassin/AsyncLoop.pm line 363, <GEN345>
line 122.]
<2.4> 2014-03-03 16:29:27 Telcontar spamd 3567 - - Use of each() on hash after
insertion without resetting hash iterator results in undefined behavior, Perl
interpreter: 0x10d0010 at
/usr/lib/perl5/vendor_perl/5.18.1/Mail/SpamAssassin/AsyncLoop.pm line 363.
<2.4> 2014-03-03 16:29:27 Telcontar spamd 3568 - - Use of each() on hash after
insertion without resetting hash iterator results in undefined behavior, Perl interpreter:
0x10d0010 at /usr/lib/perl5/vendor_perl/5.18.1/Mail/SpamAssassin/AsyncLoop.pm line 363,
<GEN204> line 122.


/usr/lib/perl5/vendor_perl/5.18.1/Mail/SpamAssassin/AsyncLoop.pm lines
361-397/558 72%

while (my($key,$ent) = each %$pending) {
my $id = $ent->{id};
if (defined $ent->{poll_callback}) { # call a "poll_callback" if exists
# be nice, provide fresh info to a callback routine
$ent->{status} = 'FINISHED' if exists $self->{finished}->{$id};
# a callback might call set_response_packet() or report_id_complete()
# dbg("async: calling poll_callback on key $key");
$ent->{poll_callback}->($ent);
}


Can this be patched easily? I do not know perl.


- -- Cheers
Carlos E. R.

(from 13.1 x86_64 "Bottle" at Telcontar)
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v2.0.22 (GNU/Linux)

iEYEARECAAYFAlMUoeEACgkQtTMYHG2NR9XWwACeLDV8MbFul1rFTkbI8aftvoVV
FRoAn3m8Llcs1wxUemomxIt2CQabOYU/
=H21C
-----END PGP SIGNATURE-----
--
To unsubscribe, e-mail: opensuse+unsubscribe@xxxxxxxxxxxx
To contact the owner, e-mail: opensuse+owner@xxxxxxxxxxxx

< Previous Next >