diff options
author | David Mitchell <davem@iabyn.com> | 2013-11-28 16:46:15 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2013-11-28 17:03:49 +0000 |
commit | 5d37acd6b65eb421e938a3fde62cc1edde467dae (patch) | |
tree | 905d9b7ae0be58425baa6f089e070f0cde45e713 /embed.fnc | |
parent | b56aac20bc53699e4a5ea975542404fb371cf085 (diff) | |
download | perl-5d37acd6b65eb421e938a3fde62cc1edde467dae.tar.gz |
silence -Wformat-nonliteral compiler warnings
Due to the security risks associated with user-supplied formats
being passed to C-level printf() style functions (eg %n),
gcc has a -Wformat-nonliteral warning that complains whenever such a
function is passed a non-literal format string.
This commit silences all such warnings in core and ext/.
The main changes are
1) the 'f' (format) flag in embed.fnc is now handled slightly more
cleverly. Rather than just applying to functions whose last arg is '...'
(and where the format arg is assumed to be the previous arg), it
can now handle non-'...' functions: arg checking is disabled, but format
checking is sill done: it works by assuming that an arg called 'fmt',
'pat' or 'f' is the format string (and dies if fails to find exactly one
such arg).
2) with the new embed.fnc functionally, more functions have been marked
with the 'f' flag. When such a function passes its fmt arg onto an inner
printf-like function, we simply disable the warning for that call using
GCC_DIAG_IGNORE(-Wformat-nonliteral), since we know that the caller must
have already checked it.
3) In quite a few places the format string isn't literal, but it *is*
constant (e.g. PL_warn_uninit_sv). For those cases, again disable the
warning.
4) In pp_formline(), a particular format was was one of several different
literal strings depending on circumstances. Rather than assigning this
string to a temporary variable, incorporate the ?: branches directly in
the function call arg. gcc is clever enough to decide the arg is then
always literal.
Diffstat (limited to 'embed.fnc')
-rw-r--r-- | embed.fnc | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1502,7 +1502,7 @@ EXMp |void |_invlist_dump |NN PerlIO *file|I32 level \ |NN SV* const invlist #endif Ap |void |taint_env -Ap |void |taint_proper |NULLOK const char* f|NN const char *const s +Afp |void |taint_proper |NULLOK const char* f|NN const char *const s Apd |UV |to_utf8_case |NN const U8 *p|NN U8* ustrp|NULLOK STRLEN *lenp \ |NN SV **swashp|NN const char *normal|NULLOK const char *special Abmd |UV |to_utf8_lower |NN const U8 *p|NN U8* ustrp|NULLOK STRLEN *lenp @@ -2319,7 +2319,7 @@ s |void |strip_return |NN SV *sv # endif # if defined(DEBUGGING) s |int |tokereport |I32 rv|NN const YYSTYPE* lvalp -s |void |printbuf |NN const char *const fmt|NN const char *const s +sf |void |printbuf |NN const char *const fmt|NN const char *const s # endif #endif EXMp |bool |validate_proto |NN SV *name|NULLOK SV *proto|bool warn |