Bug#471572: SVN::Client still leaks file descriptors

2016-02-07 Thread James McCoy
On Sun, Jun 13, 2010 at 12:33:30AM +0900, Ansgar Burchardt wrote:
> I can still reproduce this problem in the latest version.
> If you run the attached script, you can see that SVN::Client opens ever
> more connections without closing them again.

This looks very similar to #520693.  Note that using a pool scoped to
the loop frees the handles for every loop rather than when $ctx is
destroyed.

> #! /usr/bin/perl
> 
> use strict;
> use warnings;
> 
  use SVN::Core;
> use SVN::Client;
> 
> my $url = 
> "svn://svn.debian.org/pkg-perl/trunk/libhtml-formfu-perl/debian/compat";
> 
> my $ctx = new SVN::Client;
> open my $null, ">", "/dev/null" or die "Could not open /dev/null: $!";
> 
> for (1..10) {
my $pool = SVN::Pool->new_default;
$ctx->cat($null, $url, 'HEAD', $pool);
>   system("ls", "-l", "/proc/$$/fd");
> }

Cheers,
-- 
James
GPG Key: 4096R/331BA3DB 2011-12-05 James McCoy 



Bug#471572: SVN::Client still leaks file descriptors

2010-06-12 Thread Ansgar Burchardt
Version: 1.6.11dfsg-1

Hi,

I can still reproduce this problem in the latest version.
If you run the attached script, you can see that SVN::Client opens ever
more connections without closing them again.

Regards,
Ansgar
#! /usr/bin/perl

use strict;
use warnings;

use SVN::Client;

my $url = svn://svn.debian.org/pkg-perl/trunk/libhtml-formfu-perl/debian/compat;

my $ctx = new SVN::Client;
open my $null, , /dev/null or die Could not open /dev/null: $!;

for (1..10) {
  $ctx-cat($null, $url, 'HEAD');
  system(ls, -l, /proc/$$/fd);
}