You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by pg...@apache.org on 2009/06/05 07:57:18 UTC

svn commit: r781917 - in /perl/modperl/branches/1.x: Changes src/modules/perl/mod_perl.c

Author: pgollucci
Date: Fri Jun  5 05:57:17 2009
New Revision: 781917

URL: http://svn.apache.org/viewvc?rev=781917&view=rev
Log:
Address FreeBSD PR: ports/134749

This is actually a bug in gcc 4.2.1?x where
the array is optimized incorrectly causing
sefaults during startup.

Apparently the bug does not exist in FreeBSD 8
but is an issue in 7.x.

Reported by:    Troy <tr...@twisted.net>
Submitted by:   Tim Zingelman <zi...@fnal.gov>
Reviewed by:    myself


Modified:
    perl/modperl/branches/1.x/Changes
    perl/modperl/branches/1.x/src/modules/perl/mod_perl.c

Modified: perl/modperl/branches/1.x/Changes
URL: http://svn.apache.org/viewvc/perl/modperl/branches/1.x/Changes?rev=781917&r1=781916&r2=781917&view=diff
==============================================================================
--- perl/modperl/branches/1.x/Changes (original)
+++ perl/modperl/branches/1.x/Changes Fri Jun  5 05:57:17 2009
@@ -10,6 +10,10 @@
 
 =item 1.32-dev
 
+Work around a gcc optimization specific bug which
+cuased seg faults on FreeBSD 7.x during mod_perl startup.
+[Tim Zingelman <zi...@fnal.gov>]
+
 =item 1.31 May 11, 2009
 
 Fix static APACI build on Mac OS X. [Gozer]

Modified: perl/modperl/branches/1.x/src/modules/perl/mod_perl.c
URL: http://svn.apache.org/viewvc/perl/modperl/branches/1.x/src/modules/perl/mod_perl.c?rev=781917&r1=781916&r2=781917&view=diff
==============================================================================
--- perl/modperl/branches/1.x/src/modules/perl/mod_perl.c (original)
+++ perl/modperl/branches/1.x/src/modules/perl/mod_perl.c Fri Jun  5 05:57:17 2009
@@ -596,6 +596,7 @@
 void perl_startup (server_rec *s, pool *p)
 {
     char *argv[] = { NULL, NULL, NULL, NULL, NULL, NULL, NULL };
+    char **temp_argv=argv;
     char **entries, *dstr;
     int status, i, argc=1;
     dPSRV(s);
@@ -679,7 +680,7 @@
     MP_TRACE_g(fprintf(stderr, "..."));
 
 #ifdef PERL_SYS_INIT
-    PERL_SYS_INIT(&argc,(char***)&argv);
+    PERL_SYS_INIT(&argc,(char***)&temp_argv);
 #endif
 
 #ifndef perl_init_i18nl10n



Re: svn commit: r781917 - in /perl/modperl/branches/1.x: Changes src/modules/perl/mod_perl.c

Posted by "Philip M. Gollucci" <pg...@p6m7g8.com>.
> Small nit, shouldn't it be :
>     char **temp_args = argv;
> 
> Also, feels like that bit of code needs a warning/comment to explain why
> it's there, otherwise, it's tempting to optimize/clean it away.

mumble /me hates 1.3


---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org


Re: svn commit: r781917 - in /perl/modperl/branches/1.x: Changes src/modules/perl/mod_perl.c

Posted by "Philippe M. Chiasson" <go...@apache.org>.

On 05/06/09 01:57 , pgollucci@apache.org wrote:
> Author: pgollucci
> Date: Fri Jun  5 05:57:17 2009
> New Revision: 781917
> 
> URL: http://svn.apache.org/viewvc?rev=781917&view=rev
> Log:
> Address FreeBSD PR: ports/134749
> 
> This is actually a bug in gcc 4.2.1?x where
> the array is optimized incorrectly causing
> sefaults during startup.
> 
> Apparently the bug does not exist in FreeBSD 8
> but is an issue in 7.x.
> 
> Reported by:    Troy <tr...@twisted.net>
> Submitted by:   Tim Zingelman <zi...@fnal.gov>
> Reviewed by:    myself
> 
> 
> Modified:
>     perl/modperl/branches/1.x/Changes
>     perl/modperl/branches/1.x/src/modules/perl/mod_perl.c
> 
> Modified: perl/modperl/branches/1.x/Changes
> URL: http://svn.apache.org/viewvc/perl/modperl/branches/1.x/Changes?rev=781917&r1=781916&r2=781917&view=diff
> ==============================================================================
> --- perl/modperl/branches/1.x/Changes (original)
> +++ perl/modperl/branches/1.x/Changes Fri Jun  5 05:57:17 2009
> @@ -10,6 +10,10 @@
>  
>  =item 1.32-dev
>  
> +Work around a gcc optimization specific bug which
> +cuased seg faults on FreeBSD 7.x during mod_perl startup.
> +[Tim Zingelman <zi...@fnal.gov>]
> +
>  =item 1.31 May 11, 2009
>  
>  Fix static APACI build on Mac OS X. [Gozer]
> 
> Modified: perl/modperl/branches/1.x/src/modules/perl/mod_perl.c
> URL: http://svn.apache.org/viewvc/perl/modperl/branches/1.x/src/modules/perl/mod_perl.c?rev=781917&r1=781916&r2=781917&view=diff
> ==============================================================================
> --- perl/modperl/branches/1.x/src/modules/perl/mod_perl.c (original)
> +++ perl/modperl/branches/1.x/src/modules/perl/mod_perl.c Fri Jun  5 05:57:17 2009
> @@ -596,6 +596,7 @@
>  void perl_startup (server_rec *s, pool *p)
>  {
>      char *argv[] = { NULL, NULL, NULL, NULL, NULL, NULL, NULL };
> +    char **temp_argv=argv;

Small nit, shouldn't it be :
    char **temp_args = argv;

Also, feels like that bit of code needs a warning/comment to explain why
it's there, otherwise, it's tempting to optimize/clean it away.

-- 
Philippe M. Chiasson     GPG: F9BFE0C2480E7680 1AE53631CB32A107 88C3A5A5
http://gozer.ectoplasm.org/       m/gozer\@(apache|cpan|ectoplasm)\.org/


Re: svn commit: r781917 - in /perl/modperl/branches/1.x: Changes src/modules/perl/mod_perl.c

Posted by "Philippe M. Chiasson" <go...@apache.org>.

On 05/06/09 01:57 , pgollucci@apache.org wrote:
> Author: pgollucci
> Date: Fri Jun  5 05:57:17 2009
> New Revision: 781917
> 
> URL: http://svn.apache.org/viewvc?rev=781917&view=rev
> Log:
> Address FreeBSD PR: ports/134749
> 
> This is actually a bug in gcc 4.2.1?x where
> the array is optimized incorrectly causing
> sefaults during startup.
> 
> Apparently the bug does not exist in FreeBSD 8
> but is an issue in 7.x.
> 
> Reported by:    Troy <tr...@twisted.net>
> Submitted by:   Tim Zingelman <zi...@fnal.gov>
> Reviewed by:    myself
> 
> 
> Modified:
>     perl/modperl/branches/1.x/Changes
>     perl/modperl/branches/1.x/src/modules/perl/mod_perl.c
> 
> Modified: perl/modperl/branches/1.x/Changes
> URL: http://svn.apache.org/viewvc/perl/modperl/branches/1.x/Changes?rev=781917&r1=781916&r2=781917&view=diff
> ==============================================================================
> --- perl/modperl/branches/1.x/Changes (original)
> +++ perl/modperl/branches/1.x/Changes Fri Jun  5 05:57:17 2009
> @@ -10,6 +10,10 @@
>  
>  =item 1.32-dev
>  
> +Work around a gcc optimization specific bug which
> +cuased seg faults on FreeBSD 7.x during mod_perl startup.
> +[Tim Zingelman <zi...@fnal.gov>]
> +
>  =item 1.31 May 11, 2009
>  
>  Fix static APACI build on Mac OS X. [Gozer]
> 
> Modified: perl/modperl/branches/1.x/src/modules/perl/mod_perl.c
> URL: http://svn.apache.org/viewvc/perl/modperl/branches/1.x/src/modules/perl/mod_perl.c?rev=781917&r1=781916&r2=781917&view=diff
> ==============================================================================
> --- perl/modperl/branches/1.x/src/modules/perl/mod_perl.c (original)
> +++ perl/modperl/branches/1.x/src/modules/perl/mod_perl.c Fri Jun  5 05:57:17 2009
> @@ -596,6 +596,7 @@
>  void perl_startup (server_rec *s, pool *p)
>  {
>      char *argv[] = { NULL, NULL, NULL, NULL, NULL, NULL, NULL };
> +    char **temp_argv=argv;

Small nit, shouldn't it be :
    char **temp_args = argv;

Also, feels like that bit of code needs a warning/comment to explain why
it's there, otherwise, it's tempting to optimize/clean it away.

-- 
Philippe M. Chiasson     GPG: F9BFE0C2480E7680 1AE53631CB32A107 88C3A5A5
http://gozer.ectoplasm.org/       m/gozer\@(apache|cpan|ectoplasm)\.org/