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 do...@apache.org on 2001/09/27 17:46:21 UTC
cvs commit: modperl-2.0/src/modules/perl mod_perl.c modperl_cmd.c modperl_cmd.h
dougm 01/09/27 08:46:21
Modified: src/modules/perl mod_perl.c modperl_cmd.c modperl_cmd.h
Log:
add PerlTaintCheck directive for backwards compat
Revision Changes Path
1.73 +2 -0 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.72
retrieving revision 1.73
diff -u -r1.72 -r1.73
--- mod_perl.c 2001/09/27 15:26:36 1.72
+++ mod_perl.c 2001/09/27 15:46:21 1.73
@@ -428,6 +428,8 @@
#ifdef MP_COMPAT_1X
MP_CMD_DIR_ITERATE("PerlHandler", response_handlers,
"Subroutine name"),
+ MP_CMD_SRV_FLAG("PerlTaintCheck", taint_check,
+ "Turn on -T switch"),
#endif
MP_CMD_ENTRIES,
{ NULL },
1.7 +14 -0 modperl-2.0/src/modules/perl/modperl_cmd.c
Index: modperl_cmd.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_cmd.c,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- modperl_cmd.c 2001/08/08 16:20:31 1.6
+++ modperl_cmd.c 2001/09/27 15:46:21 1.7
@@ -84,6 +84,20 @@
return NULL;
}
+
+#ifdef MP_COMPAT_1X
+
+MP_CMD_SRV_DECLARE_FLAG(taint_check)
+{
+ if (on) {
+ return modperl_cmd_switches(parms, dummy, "-T");
+ }
+
+ return NULL;
+}
+
+#endif /* MP_COMPAT_1X */
+
#ifdef USE_ITHREADS
#define MP_INTERP_SCOPE_USAGE "PerlInterpScope must be one of "
1.9 +6 -0 modperl-2.0/src/modules/perl/modperl_cmd.h
Index: modperl_cmd.h
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_cmd.h,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -r1.8 -r1.9
--- modperl_cmd.h 2001/09/27 15:39:57 1.8
+++ modperl_cmd.h 2001/09/27 15:46:21 1.9
@@ -23,6 +23,12 @@
MP_CMD_SRV_DECLARE(requires);
MP_CMD_SRV_DECLARE(options);
+#ifdef MP_COMPAT_1X
+
+MP_CMD_SRV_DECLARE_FLAG(taint_check);
+
+#endif /* MP_COMPAT_1X */
+
#ifdef USE_ITHREADS
MP_CMD_SRV_DECLARE(interp_start);
MP_CMD_SRV_DECLARE(interp_max);