stas 2003/03/24 23:52:22
Modified: src/modules/perl mod_perl.c
. Changes
Log:
set the magic taint flags before modules are required
Revision Changes Path
1.162 +2 -2 modperl-2.0/src/modules/perl/mod_perl.c
Index: mod_perl.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/mod_perl.c,v
retrieving revision 1.161
retrieving revision 1.162
diff -u -r1.161 -r1.162
--- mod_perl.c 25 Mar 2003 07:51:08 -0000 1.161
+++ mod_perl.c 25 Mar 2003 07:52:22 -0000 1.162
@@ -211,6 +211,8 @@
PL_endav = endav;
+ set_taint_var(perl);
+
MP_TRACE_i(MP_FUNC, "constructed interpreter=0x%lx\n",
(unsigned long)perl);
@@ -234,8 +236,6 @@
modperl_shutdown, apr_pool_cleanup_null);
#endif
- set_taint_var(perl);
-
return perl;
}
1.159 +7 -0 modperl-2.0/Changes
Index: Changes
===================================================================
RCS file: /home/cvs/modperl-2.0/Changes,v
retrieving revision 1.158
retrieving revision 1.159
diff -u -r1.158 -r1.159
--- Changes 25 Mar 2003 04:54:09 -0000 1.158
+++ Changes 25 Mar 2003 07:52:22 -0000 1.159
@@ -10,6 +10,13 @@
=item 1.99_09-dev
+set the magic taint flags before modules are required [Stas]
+
+make sure to set base server's mip before any of the
+PerlRequire/PerlModule directives are called, since they may add
+add_config(), which in turn runs Perl sections or PerlLoadModule,
+which may need the scfg->mip to be set. [Stas]
+
ModPerl::MM is now ready to be used in Makefile.PL of 3rd party
mod_perl modules [Stas and Geoff]
