[FMT_MOD_I32] = "I32",
[FMT_MOD_I64] = "I64"
};
- assert(mod < lengthof(names));
+ assert((size_t)mod < lengthof(names));
return names[mod];
}
const format_length_modifier_t mod,
const utf32 conversion)
{
- warningf(pos,
- "invalid length modifier '%s' for conversion specifier '%%%c'",
- get_length_modifier_name(mod), conversion
- );
+ char const *const lmod = get_length_modifier_name(mod);
+ warningf(WARN_FORMAT, pos, "invalid length modifier '%s' for conversion specifier '%%%c'", lmod, conversion);
}
/**
fmt = *(++c);
if (fmt == '\0') {
- warningf(pos, "dangling %% in format string");
+ warningf(WARN_FORMAT, pos, "dangling %% in format string");
break;
}
if (fmt == '%')
case ' ':
if (fmt_flags & FMT_FLAG_PLUS) {
- warningf(pos, "' ' is overridden by prior '+' in conversion specification %u", num_fmt);
+ warningf(WARN_FORMAT, pos, "' ' is overridden by prior '+' in conversion specification %u", num_fmt);
}
flag = FMT_FLAG_SPACE;
break;
case '+':
if (fmt_flags & FMT_FLAG_SPACE) {
- warningf(pos, "'+' overrides prior ' ' in conversion specification %u", num_fmt);
+ warningf(WARN_FORMAT, pos, "'+' overrides prior ' ' in conversion specification %u", num_fmt);
}
flag = FMT_FLAG_PLUS;
break;
default: goto break_fmt_flags;
}
if (fmt_flags & flag) {
- warningf(pos, "repeated flag '%c' in conversion specification %u", (char)fmt, num_fmt);
+ warningf(WARN_FORMAT, pos, "repeated flag '%c' in conversion specification %u", (char)fmt, num_fmt);
}
fmt_flags |= flag;
fmt = *(++c);
++num_args;
fmt = *(++c);
if (arg == NULL) {
- warningf(pos, "missing argument for '*' field width in conversion specification %u", num_fmt);
+ warningf(WARN_FORMAT, pos, "missing argument for '*' field width in conversion specification %u", num_fmt);
return -1;
}
const type_t *const arg_type = arg->expression->base.type;
if (arg_type != type_int) {
- warningf(pos, "argument for '*' field width in conversion specification %u is not an 'int', but an '%T'", num_fmt, arg_type);
+ warningf(WARN_FORMAT, pos, "argument for '*' field width in conversion specification %u is not an 'int', but an '%T'", num_fmt, arg_type);
}
arg = arg->next;
} else {
if (fmt == '*') {
fmt = *(++c);
if (arg == NULL) {
- warningf(pos, "missing argument for '*' precision in conversion specification %u", num_fmt);
+ warningf(WARN_FORMAT, pos, "missing argument for '*' precision in conversion specification %u", num_fmt);
return -1;
}
const type_t *const arg_type = arg->expression->base.type;
if (arg_type != type_int) {
- warningf(pos, "argument for '*' precision in conversion specification %u is not an 'int', but an '%T'", num_fmt, arg_type);
+ warningf(WARN_FORMAT, pos, "argument for '*' precision in conversion specification %u is not an 'int', but an '%T'", num_fmt, arg_type);
}
arg = arg->next;
} else {
break;
default:
- warningf(pos, "encountered unknown conversion specifier '%%%c' at position %u", fmt, num_fmt);
+ warningf(WARN_FORMAT, pos, "encountered unknown conversion specifier '%%%c' at position %u", fmt, num_fmt);
if (arg == NULL) {
- warningf(pos, "too few arguments for format string");
+ warningf(WARN_FORMAT, pos, "too few arguments for format string");
return -1;
}
goto next_arg;
if (wrong_flags & FMT_FLAG_TICK) *p++ = '\'';
*p = '\0';
- warningf(pos, "invalid format flags \"%s\" in conversion specification %%%c at position %u", wrong, fmt, num_fmt);
+ warningf(WARN_FORMAT, pos, "invalid format flags \"%s\" in conversion specification %%%c at position %u", wrong, fmt, num_fmt);
}
if (arg == NULL) {
- warningf(pos, "too few arguments for format string");
+ warningf(WARN_FORMAT, pos, "too few arguments for format string");
return -1;
}
goto next_arg;
}
if (is_type_valid(arg_skip)) {
- warningf(pos,
- "argument type '%T' does not match conversion specifier '%%%s%c' at position %u",
- arg_type, get_length_modifier_name(fmt_mod), (char)fmt, num_fmt);
+ source_position_t const *const apos = &arg->expression->base.source_position;
+ char const *const mod = get_length_modifier_name(fmt_mod);
+ warningf(WARN_FORMAT, apos, "argument type '%T' does not match conversion specifier '%%%s%c' at position %u", arg_type, mod, (char)fmt, num_fmt);
}
}
next_arg:
}
assert(fmt == '\0');
if (c+1 < string + size) {
- warningf(pos, "format string contains '\\0'");
+ warningf(WARN_FORMAT, pos, "format string contains '\\0'");
}
return num_args;
}
for (; arg != NULL; arg = arg->next)
++num_args;
if (num_args > (size_t)num_fmt) {
- warningf(&fmt_expr->base.source_position,
- "%u argument%s but only %u format specifier%s",
- num_args, num_args != 1 ? "s" : "",
- num_fmt, num_fmt != 1 ? "s" : "");
+ source_position_t const *const pos = &fmt_expr->base.source_position;
+ warningf(WARN_FORMAT, pos, "%u argument%s but only %u format specifier%s", num_args, num_args != 1 ? "s" : "", num_fmt, num_fmt != 1 ? "s" : "");
}
}
continue;
fmt = *(++c);
if (fmt == '\0') {
- warningf(pos, "dangling '%%' in format string");
+ warningf(WARN_FORMAT, pos, "dangling '%%' in format string");
break;
}
if (fmt == '%')
}
if (fmt == '\0') {
- warningf(pos, "dangling % with conversion specififer in format string");
+ warningf(WARN_FORMAT, pos, "dangling %% with conversion specififer in format string");
break;
}
break;
default:
- warningf(pos, "encountered unknown conversion specifier '%%%c' at format %u",
- fmt, num_fmt);
+ warningf(WARN_FORMAT, pos, "encountered unknown conversion specifier '%%%c' at format %u", fmt, num_fmt);
if (arg == NULL) {
- warningf(pos, "too few arguments for format string");
+ warningf(WARN_FORMAT, pos, "too few arguments for format string");
return;
}
goto next_arg;
}
if (arg == NULL) {
- warningf(pos, "too few arguments for format string");
+ warningf(WARN_FORMAT, pos, "too few arguments for format string");
return;
}
}
error_arg_type:
if (is_type_valid(arg_skip)) {
- warningf(pos,
- "argument type '%T' does not match conversion specifier '%%%s%c' at position %u",
- arg_type, get_length_modifier_name(fmt_mod), (char)fmt, num_fmt);
+ source_position_t const *const apos = &arg->expression->base.source_position;
+ char const *const mod = get_length_modifier_name(fmt_mod);
+ warningf(WARN_FORMAT, apos, "argument type '%T' does not match conversion specifier '%%%s%c' at position %u", arg_type, mod, (char)fmt, num_fmt);
}
}
next_arg:
}
assert(fmt == '\0');
if (c+1 < string + size) {
- warningf(pos, "format string contains '\\0'");
+ warningf(WARN_FORMAT, pos, "format string contains '\\0'");
}
if (arg != NULL) {
unsigned num_args = num_fmt;
++num_args;
arg = arg->next;
}
- warningf(pos, "%u argument%s but only %u format specifier%s",
- num_args, num_args != 1 ? "s" : "",
- num_fmt, num_fmt != 1 ? "s" : "");
+ warningf(WARN_FORMAT, pos, "%u argument%s but only %u format specifier%s", num_args, num_args != 1 ? "s" : "", num_fmt, num_fmt != 1 ? "s" : "");
}
}
void check_format(const call_expression_t *const call)
{
- if (!warning.format)
+ if (!is_warn_on(WARN_FORMAT))
return;
const expression_t *const func_expr = call->function;
const entity_t *const entity = func_expr->reference.entity;
const call_argument_t * arg = call->arguments;
- if (false) {
- /* the declaration has a GNU format attribute, check it */
- } else {
- /*
- * For some functions we always check the format, even if it was not
- * specified. This allows to check format even in MS mode or without
- * header included.
- */
- const char *const name = entity->base.symbol->string;
- for (size_t i = 0; i < lengthof(builtin_table); ++i) {
- if (strcmp(name, builtin_table[i].name) == 0) {
- switch (builtin_table[i].fmt_kind) {
- case FORMAT_PRINTF:
- check_printf_format(arg, &builtin_table[i]);
- break;
- case FORMAT_SCANF:
- check_scanf_format(arg, &builtin_table[i]);
- break;
- case FORMAT_STRFTIME:
- case FORMAT_STRFMON:
- /* TODO: implement other cases */
- break;
- }
+ /*
+ * For some functions we always check the format, even if it was not
+ * specified. This allows to check format even in MS mode or without
+ * header included.
+ */
+ const char *const name = entity->base.symbol->string;
+ for (size_t i = 0; i < lengthof(builtin_table); ++i) {
+ if (strcmp(name, builtin_table[i].name) == 0) {
+ switch (builtin_table[i].fmt_kind) {
+ case FORMAT_PRINTF:
+ check_printf_format(arg, &builtin_table[i]);
+ break;
+ case FORMAT_SCANF:
+ check_scanf_format(arg, &builtin_table[i]);
+ break;
+ case FORMAT_STRFTIME:
+ case FORMAT_STRFMON:
+ /* TODO: implement other cases */
break;
}
+ break;
}
}
}