Bug#459693: libmail-gnupg-perl: mime_encrypt fails on bigger messages

[Albert Dengg]

Package: libmail-gnupg-perl
Version: 0.10-2
Severity: normal

i wrote a little test application for encrypting mails through procmail
using Mail:GnuPG:

---
use Mail::GnuPG;
my $mg = new Mail::GnuPG;

my $parser = new MIME::Parser;
#$parser->output_under("/tmp");
$parser->output_to_core(True);
$parser->tmp_recycling(True);
$parser->tmp_to_core(True);
$parser->use_inner_files(True);

my $entity = $parser->parse(\*STDIN);

if(!$mg->is_encrypted($entity)) {
	if($mg->mime_encrypt (  $entity, ('0xF6D68F49') ) != 0) {
		die("some error in gpg");
	}
}
$entity->print(\*STDOUT);
---

however, with test messages larger then a few lines, i get timeout...
(it looks like it is in _maybe_print)
gpg does not consume any significant cpu resources though so there is
some problem in passing the data to/from gpg and perl.

and it does not seem to be a problem with keeping the message in ram as
the same with the tmp directory

yours
albert


-- System Information:
Debian Release: lenny/sid
  APT prefers unstable
  APT policy: (500, 'unstable'), (1, 'experimental')
Architecture: i386 (i686)

Kernel: Linux 2.6.23.12 (SMP w/2 CPU cores)
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/bash

Versions of packages libmail-gnupg-perl depends on:
ii  libgnupg-interface-perl       0.33-6     Perl interface to GnuPG
ii  libmailtools-perl             1.77-1     Manipulate email in perl programs
ii  libmime-perl                  5.425-1    Perl5 modules for MIME-compliant m
ii  perl                          5.8.8-12   Larry Wall's Practical Extraction 

libmail-gnupg-perl recommends no packages.

-- no debconf information
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 307 bytes
Desc: Digital signature
Url : http://lists.alioth.debian.org/pipermail/pkg-perl-maintainers/attachments/20080108/42faabac/attachment.pgp