[Bug 55084] perl, NEW: "perl -c" segfaults with a namespace::alias file.

https://qa.mandriva.com/show_bug.cgi?id=55084


       RPM Package: perl-5.10.1-3mdv2010.0
           Summary: "perl -c" segfaults with a namespace::alias file.
    Classification: Mandriva Linux
           Product: Mandriva Linux
           Version: Cooker
          Platform: i586
        OS/Version: Linux
            Status: NEW
          Severity: critical
          Priority: normal
         Component: Core Packages
        AssignedTo: jquelin@...
        ReportedBy: shlomif@...
         QAContact: bugs@...


Description of problem:

Here's a shell session that segfaults - I'm attach the offending perl program
soon.

<<<<<<<<<<<<<
shlomi:~$ cat seg-fault.pl                                          
#!/usr/bin/perl                                                      

use namespace::alias 'Module::Build';

my $id_regex = '[a-zA-Z_\-]+';

sub _parse_opening_tag
{                    
    my $self = shift;

    return f(
        sub {
            my $l = shift;

            if ($$l !~ m{\G<($id_regex)}g)
            {
            }
            if ($$l =~ m{\G\s*/\s*>}cg)
            {
            }
            elsif ($$l !~ m{\G>}g)
            {
            }

            return
            {
                line => f()
            };
        }
    );
}
shlomi:~$ perl -c seg-fault.pl
Segmentation fault
shlomi:~$
>>>>>>>>>>>>>>>>>

I had to install namespace-alias for it to work.

Version-Release number of selected component (if applicable):


How reproducible:

Always.

Steps to Reproduce:
1. Install perl-namespace-alias using cpan2dist.
2. Download seg-fault.pl.
3. Run perl -c on it.


--
Configure bugmail: https://qa.mandriva.com/userprefs.cgi?tab=email
------- You are receiving this mail because: -------
You are the QA contact for the bug.

https://qa.mandriva.com/show_bug.cgi?id=55084

  Summary    : "perl -c" segfaults with a namespace::alias file.
  Product    : Mandriva Linux
  Component  : Core Packages
  Version    : Cooker
  RPM Package: perl-5.10.1-3mdv2010.0
  Status     : NEW
  Severity   : critical
  Priority   : normal
  Assigned To: jquelin@...
  Reported By: shlomif@...





--- Comment #1 from Shlomi Fish <shlomif@...>  2009-11-04 07:35:07 CEST ---
Created an attachment (id=15689)
 --> (https://qa.mandriva.com/attachment.cgi?id=15689)
The offending Perl program.

This is the offending perl program that causes the segfault. Use perl -c on it.



----------------------------------------------------------------------------
Original Bug Text:


Description of problem:

Here's a shell session that segfaults - I'm attach the offending perl program soon.

<<<<<<<<<<<<<
shlomi:~$ cat seg-fault.pl                                          
#!/usr/bin/perl                                                      

use namespace::alias 'Module::Build';

my $id_regex = '[a-zA-Z_\-]+';

sub _parse_opening_tag
{                    
    my $self = shift;

    return f(
        sub {
            my $l = shift;

            if ($$l !~ m{\G<($id_regex)}g)
            {
            }
            if ($$l =~ m{\G\s*/\s*>}cg)
            {
            }
            elsif ($$l !~ m{\G>}g)
            {
            }

            return
            {
                line => f()
            };
        }
    );
}
shlomi:~$ perl -c seg-fault.pl
Segmentation fault
shlomi:~$
>>>>>>>>>>>>>>>>>

I had to install namespace-alias for it to work.

Version-Release number of selected component (if applicable):


How reproducible:

Always.

Steps to Reproduce:
1. Install perl-namespace-alias using cpan2dist.
2. Download seg-fault.pl.
3. Run perl -c on it.



--
Configure bugmail: https://qa.mandriva.com/userprefs.cgi?tab=email
------- You are receiving this mail because: -------
You are the QA contact for the bug.

https://qa.mandriva.com/show_bug.cgi?id=55084

  Summary    : "perl -c" segfaults with a namespace::alias file.
  Product    : Mandriva Linux
  Component  : Core Packages
  Version    : Cooker
  RPM Package: perl-5.10.1-3mdv2010.0
  Status     : RESOLVED
  Severity   : critical
  Priority   : normal
  Assigned To: jquelin@...
  Reported By: shlomif@...


Thierry Vignaud <tvignaud@...> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|                            |INVALID




--- Comment #2 from Thierry Vignaud <tvignaud@...>  2009-11-04 13:10:27 CEST ---
I don't know what module it is but perl is obviously segfaulting in it (since
perl -c _executes_ the "use foobar" statements and since perl doesn't segfault
w/o it)



----------------------------------------------------------------------------
Original Bug Text:


Description of problem:

Here's a shell session that segfaults - I'm attach the offending perl program soon.

<<<<<<<<<<<<<
shlomi:~$ cat seg-fault.pl                                          
#!/usr/bin/perl                                                      

use namespace::alias 'Module::Build';

my $id_regex = '[a-zA-Z_\-]+';

sub _parse_opening_tag
{                    
    my $self = shift;

    return f(
        sub {
            my $l = shift;

            if ($$l !~ m{\G<($id_regex)}g)
            {
            }
            if ($$l =~ m{\G\s*/\s*>}cg)
            {
            }
            elsif ($$l !~ m{\G>}g)
            {
            }

            return
            {
                line => f()
            };
        }
    );
}
shlomi:~$ perl -c seg-fault.pl
Segmentation fault
shlomi:~$
>>>>>>>>>>>>>>>>>

I had to install namespace-alias for it to work.

Version-Release number of selected component (if applicable):


How reproducible:

Always.

Steps to Reproduce:
1. Install perl-namespace-alias using cpan2dist.
2. Download seg-fault.pl.
3. Run perl -c on it.



--
Configure bugmail: https://qa.mandriva.com/userprefs.cgi?tab=email
------- You are receiving this mail because: -------
You are the QA contact for the bug.

https://qa.mandriva.com/show_bug.cgi?id=55084

  Summary    : "perl -c" segfaults with a namespace::alias file.
  Product    : Mandriva Linux
  Component  : Core Packages
  Version    : Cooker
  RPM Package: perl-5.10.1-3mdv2010.0
  Status     : REOPENED
  Severity   : critical
  Priority   : normal
  Assigned To: jquelin@...
  Reported By: shlomif@...


Shlomi Fish <shlomif@...> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|RESOLVED                    |REOPENED
                 CC|                            |shlomif@...
         Resolution|INVALID                     |




--- Comment #3 from Shlomi Fish <shlomif@...>  2009-11-04 14:28:49 CEST ---
(In reply to comment #2)
> I don't know what module it is but perl is obviously segfaulting in it (since
> perl -c _executes_ the "use foobar" statements and since perl doesn't segfault
> w/o it)

This is this module:

http://search.cpan.org/dist/namespace-alias/

By FLORA:

http://search.cpan.org/~flora/

After I reported the problem to him on IRC he said he is unable to reproduce it
with all of the perl-5's that he tried. I tried it with a vanilla perl-5.10.x
and could not reproduce it either. So it seems to be a problem with the
Mandriva perl. Re-opening, while CCing Florian.



----------------------------------------------------------------------------
Original Bug Text:


Description of problem:

Here's a shell session that segfaults - I'm attach the offending perl program soon.

<<<<<<<<<<<<<
shlomi:~$ cat seg-fault.pl                                          
#!/usr/bin/perl                                                      

use namespace::alias 'Module::Build';

my $id_regex = '[a-zA-Z_\-]+';

sub _parse_opening_tag
{                    
    my $self = shift;

    return f(
        sub {
            my $l = shift;

            if ($$l !~ m{\G<($id_regex)}g)
            {
            }
            if ($$l =~ m{\G\s*/\s*>}cg)
            {
            }
            elsif ($$l !~ m{\G>}g)
            {
            }

            return
            {
                line => f()
            };
        }
    );
}
shlomi:~$ perl -c seg-fault.pl
Segmentation fault
shlomi:~$
>>>>>>>>>>>>>>>>>

I had to install namespace-alias for it to work.

Version-Release number of selected component (if applicable):


How reproducible:

Always.

Steps to Reproduce:
1. Install perl-namespace-alias using cpan2dist.
2. Download seg-fault.pl.
3. Run perl -c on it.



--
Configure bugmail: https://qa.mandriva.com/userprefs.cgi?tab=email
------- You are receiving this mail because: -------
You are the QA contact for the bug.

https://qa.mandriva.com/show_bug.cgi?id=55084

  Summary    : "perl -c" segfaults with a namespace::alias file.
  Product    : Mandriva Linux
  Component  : Core Packages
  Version    : Cooker
  RPM Package: perl-5.10.1-3mdv2010.0
  Status     : REOPENED
  Severity   : critical
  Priority   : normal
  Assigned To: jquelin@...
  Reported By: shlomif@...





--- Comment #4 from Thierry Vignaud <tvignaud@...>  2009-11-04 16:00:07 CEST ---
Created an attachment (id=15691)
 --> (https://qa.mandriva.com/attachment.cgi?id=15691)
GDB trace

and yet it segfaults in namespace-alias.
The only code that is run is namespace-alias' initialization (perl -c
_executes_ the "use foobar" statements and since perl doesn't segfault w/o it)
which causes a NULL deref



----------------------------------------------------------------------------
Original Bug Text:


Description of problem:

Here's a shell session that segfaults - I'm attach the offending perl program soon.

<<<<<<<<<<<<<
shlomi:~$ cat seg-fault.pl                                          
#!/usr/bin/perl                                                      

use namespace::alias 'Module::Build';

my $id_regex = '[a-zA-Z_\-]+';

sub _parse_opening_tag
{                    
    my $self = shift;

    return f(
        sub {
            my $l = shift;

            if ($$l !~ m{\G<($id_regex)}g)
            {
            }
            if ($$l =~ m{\G\s*/\s*>}cg)
            {
            }
            elsif ($$l !~ m{\G>}g)
            {
            }

            return
            {
                line => f()
            };
        }
    );
}
shlomi:~$ perl -c seg-fault.pl
Segmentation fault
shlomi:~$
>>>>>>>>>>>>>>>>>

I had to install namespace-alias for it to work.

Version-Release number of selected component (if applicable):


How reproducible:

Always.

Steps to Reproduce:
1. Install perl-namespace-alias using cpan2dist.
2. Download seg-fault.pl.
3. Run perl -c on it.



--
Configure bugmail: https://qa.mandriva.com/userprefs.cgi?tab=email
------- You are receiving this mail because: -------
You are the QA contact for the bug.

https://qa.mandriva.com/show_bug.cgi?id=55084

  Summary    : "perl -c" segfaults with a namespace::alias file.
  Product    : Mandriva Linux
  Component  : Core Packages
  Version    : Cooker
  RPM Package: perl-5.10.1-3mdv2010.0
  Status     : RESOLVED
  Severity   : critical
  Priority   : normal
  Assigned To: jquelin@...
  Reported By: shlomif@...


Jerome Quelin <jquelin@...> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|REOPENED                    |RESOLVED
         Resolution|                            |INVALID




--- Comment #5 from Jerome Quelin <jquelin@...>  2009-11-05 12:55:29 CEST ---
sorry, this is not our perl which is at fault. it's upstream module that
doesn't like threads:

$ /opt/perl/5.10.1/bin/perl -c seg-fault.pl
seg-fault.pl syntax OK
$ /opt/perl/5.10.1-threads/bin/perl -c seg-fault.pl
Segmentation fault

closing bug as invalid.



----------------------------------------------------------------------------
Original Bug Text:


Description of problem:

Here's a shell session that segfaults - I'm attach the offending perl program soon.

<<<<<<<<<<<<<
shlomi:~$ cat seg-fault.pl                                          
#!/usr/bin/perl                                                      

use namespace::alias 'Module::Build';

my $id_regex = '[a-zA-Z_\-]+';

sub _parse_opening_tag
{                    
    my $self = shift;

    return f(
        sub {
            my $l = shift;

            if ($$l !~ m{\G<($id_regex)}g)
            {
            }
            if ($$l =~ m{\G\s*/\s*>}cg)
            {
            }
            elsif ($$l !~ m{\G>}g)
            {
            }

            return
            {
                line => f()
            };
        }
    );
}
shlomi:~$ perl -c seg-fault.pl
Segmentation fault
shlomi:~$
>>>>>>>>>>>>>>>>>

I had to install namespace-alias for it to work.

Version-Release number of selected component (if applicable):


How reproducible:

Always.

Steps to Reproduce:
1. Install perl-namespace-alias using cpan2dist.
2. Download seg-fault.pl.
3. Run perl -c on it.



--
Configure bugmail: https://qa.mandriva.com/userprefs.cgi?tab=email
------- You are receiving this mail because: -------
You are the QA contact for the bug.