Bug#356894: [Swig-devel] Swig 1.3.28 and current CVS breaks subversion bindings

[Loïc Minier]

        Hi there,

 This is a followup for Debian bug <http://bugs.debian.org/356894>.

On Mon, Mar 20, 2006, Marcelo Matus wrote:
> subversion 1.3.0 has been tested against 1.3.28 and 1.3.29, and it seems 
> to be working,
> well, at least the internal subversion test-suites for perl, python and 
> ruby.
> 
> still, if you thing there is an issue, the best thing will be try to 
> isolate the problem
> in one small example that we could test over here.

 The exact error is thrown by the following line:
    $reporter->set_path ('', $start, @lock, 0);
 in SVN/Mirror/Ra.pm at line 524.

 However, while setting up a test case for you, I copy-pasted the
 SVN::Mirror example from the manual page:
    #!/usr/bin/perl -w

    use SVN::Mirror;

    my $url = 'svn://svn.debian.org/svn/pkg-madwifi';
    my $repos = '/tmp/foobar/repo';

    my $m = SVN::Mirror->new (source => $url,
                              repos => $repos,
                              target_path => '/mirror/pkg-madwifi',
                              repos_create => 1,
                              skip_to => 80
                             );

 % mkdir -p /tmp/foobar/repo; cd /tmp/foobar; perl ~/foo.pl
 % perl ~/foo.pl 
 Use of uninitialized value in -e at /usr/share/perl5/SVN/Mirror.pm line 86.
 zsh: segmentation fault  perl ~/foo.pl

 Looks to me as there's a couple of bugs here already:
 - documentation out of date
 - does not check whether repospath is defined prior to checking whether
   the file exists
 - perl segfaults

 Just adding a "target" to that call is enough to trigger the actual
 bug:
    #!/usr/bin/perl -w

    use SVN::Mirror;

    my $url = 'svn://svn.debian.org/svn/pkg-madwifi';
    my $repos = '/tmp/foobar/repo';

    my $m = SVN::Mirror->new (source => $url,
                              repos => $repos,
                              target => '/tmp/foobar/target',
                              target_path => '/mirror/pkg-madwifi',
                              repos_create => 1,
                              skip_to => 80
                             );
    $m->init;
    $m->run;
 % perl ~/foo.pl
 Committed revision 1.
 Syncing svn://svn.debian.org/svn/pkg-madwifi
 Retrieving log information from 80 to 89
 In SVN/Mirror/Ra.pm (reached)
 TypeError in method 'svn_ra_reporter2_invoke_set_path', argument 6 of
 type 'char const *'

    HTH,
-- 
Loïc Minier <lool at dooz.org>
Current Earth status:   NOT DESTROYED