[prev in list] [next in list] [prev in thread] [next in thread]
List: apache-modperl
Subject: Re: Problem compiling 1.0 on linux
From: "Hans C. Poo" <hans () welinux ! cl>
Date: 2012-12-24 14:33:28
Message-ID: 1156814220.629.1356359608043.JavaMail.root () welinux ! cl
[Download RAW message or body]
Andreas,
Thanks for your correction and time, i hope your patch gets its way into main, for \
now will survive with the virtual machine solution until a patched 1.32 perl to be \
available for ubuntu/debian.
Bye
Hans
Hans Poo, Welinux S.A.
Bombero Ossa #1010, oficina 800,
+56-2-3729770, Movil: +56-9-3199305
Santiago, Chile
----- Mensaje original -----
> De: "Andreas Koenig" <andreas.koenig.7os6VVqR@franz.ak.mind.de>
> Para: "Hans C. Poo" <hans@welinux.cl>
> CC: "Fred Moyer" <fred@redhotpenguin.com>, "mod_perl list" \
> <modperl@perl.apache.org>
> Enviados: Lunes, 24 de Diciembre 2012 11:27:04
> Asunto: Re: Problem compiling 1.0 on linux
>
> "Hans C. Poo" <hans@welinux.cl> 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.
>
>
>
> [Documentos de texto:mp1+perl5.16.diff]
>
>
> --
> andreas
>
[Attachment #3 (text/x-diff)]
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)
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic