[Dovecot] Timeout leak in get quota
Nikita Koshikov
koshikov at gmail.com
Sat Oct 8 16:09:38 EEST 2011
On Thu, 29 Sep 2011 15:05:53 +0200
Danilo wrote:
> Hello!
> I wrote perl script for read current quota usage, it works but when I run the
> program I receive a warning in Dovecot log:
>
> 2011-09-29 14:45:30 doveadm(guest at testmail.com): Warning: Timeout leak:
> 0x7f14800ad970
>
> This is the script:
> ===============================
> #!/usr/bin/perl
>
> use strict;
> use Socket;
> use IO::Handle;
>
> socket(TSOCK, PF_UNIX, SOCK_STREAM,0);
> connect(TSOCK, sockaddr_un("/var/run/dovecot/doveadm-server")) or print("ERROR!");
>
> print "VERSION\tdoveadm-server\t1\t0\n";
> print "\tguest\@testmail.com\tquota get\n";
> print "=" x 20 . "\n";
>
> if (defined(my $messg = <TSOCK>)) {
>
> print $messg;
>
> print TSOCK "VERSION\tdoveadm-server\t1\t0\n";
> TSOCK->flush;
>
> print TSOCK "\tguest\@testmail.com\tquota get\n";
> TSOCK->flush;
>
> $messg = <TSOCK>;
> print $messg;
>
> $messg = <TSOCK>;
> print $messg;
>
> close TSOCK;
> }
> =============================
> I hope someone could help me to fix the warning.
> Thanks in advance,
> Dany
I'm using doveadm socket too for getting quota values. No warning. The main difference from yours script that I'm also using auth:
print TSOCK "VERSION\tdoveadm-server\t1\t0\n";
print TSOCK "PLAIN\tbase64_encoded_pass_here\n";
print TSOCK "\t$local_part\@$domain\tquota get\n";
TSOCK->flush;
Dovecot version 2.0.15
More information about the dovecot
mailing list