Re: Problem compiling 1.0 on linux

"Hans C. Poo" <[email protected]> writes:

> Fred,
>
> Yea, i know the platform is outdated, it is a very legacy system and
> we are planning a complete rebuild... finally i installed a virtual
> machine with ubuntu 10.04 (a two year old release of linux) and it
> compiled without problems, in this way we'll be able to cope with
> maintenance until the new system is ready. It was a gcc or glibc
> related issue.

It's not likely it was a gcc or glibc related issue. From all I can read
here it was a perl 5.14 issue and that has been addressed in the SVN
repository.

While we are at it, I tried 1.x with perl 5.16.2 and it compiled and
tested OK with the appended patch which goes on top of current
https://svn.apache.org/repos/asf/perl/modperl/branches/1.x. I haven't
yet tested it further but will do.

I would be glad to see this patch go into the repository and thus into
"1.32" whenever it happens. Or put another way, I would be glad to hear
of people having other relevent informations to share for running perl
5.16 with mp1.


-- 
andreas

Index: src/modules/perl/perl_util.c
===================================================================
--- src/modules/perl/perl_util.c	(revision 1425631)
+++ src/modules/perl/perl_util.c	(working copy)
@@ -670,6 +670,7 @@
     if(set_ids++) return;
     sv_setiv(GvSV(gv_fetchpv("$", TRUE, SVt_PV)), (I32)getpid());
 #ifndef WIN32
+#if (PERL_REVISION == 5) && (PERL_VERSION <= 15)
     uid  = (int)getuid(); 
     euid = (int)geteuid(); 
     gid  = (int)getgid(); 
@@ -678,6 +679,7 @@
 		     "perl_init_ids: uid=%d, euid=%d, gid=%d, egid=%d\n",
 		     uid, euid, gid, egid));
 #endif
+#endif
 }
 
 int perl_eval_ok(server_rec *s)