diff options
| author | David Mitchell <davem@iabyn.com> | 2011-02-16 17:17:18 +0000 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2011-02-16 17:34:08 +0000 |
| commit | ef07e810699a20ac03620e091b78c1c6ef971c32 (patch) | |
| tree | a8a2b4336cee567c62d4edd14b95b9532df16cd9 /regexp.h | |
| parent | 20be6587f85cec282e10810718c869dd958afe43 (diff) | |
| download | perl-ef07e810699a20ac03620e091b78c1c6ef971c32.tar.gz | |
document how tainting works with pattern matching
Diffstat (limited to 'regexp.h')
| -rw-r--r-- | regexp.h | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -365,8 +365,12 @@ get_regex_charset_name(const U32 flags, STRLEN* const lenp) /* Copy and tainted info */ #define RXf_COPY_DONE (1<<(RXf_BASE_SHIFT+16)) + +/* during execution: pattern temporarily tainted by executing locale ops; + * post-execution: $1 et al are tainted */ #define RXf_TAINTED_SEEN (1<<(RXf_BASE_SHIFT+17)) -#define RXf_TAINTED (1<<(RXf_BASE_SHIFT+18)) /* this pattern is tainted */ +/* this pattern was tainted during compilation */ +#define RXf_TAINTED (1<<(RXf_BASE_SHIFT+18)) /* Flags indicating special patterns */ #define RXf_START_ONLY (1<<(RXf_BASE_SHIFT+19)) /* Pattern is /^/ */ |