mirror of
https://git.FreeBSD.org/ports.git
synced 2024-12-23 04:23:08 +00:00
263 lines
8.6 KiB
Plaintext
263 lines
8.6 KiB
Plaintext
--- gcc/c-common.c.orig Fri Aug 25 08:27:55 2000
|
|
+++ gcc/c-common.c Fri Sep 15 11:30:42 2000
|
|
@@ -157,7 +157,7 @@
|
|
int, int, int));
|
|
static void init_attributes PARAMS ((void));
|
|
static void record_function_format PARAMS ((tree, tree, enum format_type,
|
|
- int, int));
|
|
+ int, int, int));
|
|
static void record_international_format PARAMS ((tree, tree, int));
|
|
static int default_valid_lang_attribute PARAMS ((tree, tree, tree, tree));
|
|
|
|
@@ -827,6 +827,7 @@
|
|
enum format_type format_type;
|
|
tree argument;
|
|
unsigned int arg_num;
|
|
+ int null_format_ok;
|
|
|
|
if (TREE_CODE (decl) != FUNCTION_DECL)
|
|
{
|
|
@@ -837,7 +838,7 @@
|
|
|
|
if (TREE_CODE (format_type_id) != IDENTIFIER_NODE)
|
|
{
|
|
- error ("unrecognized format specifier");
|
|
+ error_with_decl (decl, "unrecognized format specifier");
|
|
continue;
|
|
}
|
|
else
|
|
@@ -845,12 +846,26 @@
|
|
const char *p = IDENTIFIER_POINTER (format_type_id);
|
|
|
|
if (!strcmp (p, "printf") || !strcmp (p, "__printf__"))
|
|
+ {
|
|
+ format_type = printf_format_type;
|
|
+ null_format_ok = 0;
|
|
+ }
|
|
+ else if (!strcmp (p, "printf0") || !strcmp (p, "__printf0__"))
|
|
+ {
|
|
format_type = printf_format_type;
|
|
+ null_format_ok = 1;
|
|
+ }
|
|
else if (!strcmp (p, "scanf") || !strcmp (p, "__scanf__"))
|
|
+ {
|
|
format_type = scanf_format_type;
|
|
+ null_format_ok = 0;
|
|
+ }
|
|
else if (!strcmp (p, "strftime")
|
|
|| !strcmp (p, "__strftime__"))
|
|
+ {
|
|
format_type = strftime_format_type;
|
|
+ null_format_ok = 0;
|
|
+ }
|
|
else
|
|
{
|
|
warning ("`%s' is an unrecognized format function type", p);
|
|
@@ -923,7 +938,8 @@
|
|
|
|
record_function_format (DECL_NAME (decl),
|
|
DECL_ASSEMBLER_NAME (decl),
|
|
- format_type, format_num, first_arg_num);
|
|
+ format_type, format_num, first_arg_num,
|
|
+ null_format_ok);
|
|
break;
|
|
}
|
|
|
|
@@ -1242,6 +1258,11 @@
|
|
} format_char_info;
|
|
|
|
static format_char_info print_char_table[] = {
|
|
+/* FreeBSD kernel extensions. */
|
|
+ { "D", 1, T_C, T_C, NULL, NULL, NULL, NULL, NULL, "-wp" },
|
|
+ { "b", 1, T_C, T_C, NULL, NULL, NULL, NULL, NULL, "-wp" },
|
|
+ { "rz", 0, NULL, T_I, T_I, T_L, NULL, NULL, NULL, "-wp0 +#" },
|
|
+#define unextended_print_char_table (print_char_table + 3)
|
|
{ "di", 0, T_I, T_I, T_I, T_L, T_LL, T_LL, T_SST, T_PD, T_IM, "-wp0 +'I" },
|
|
{ "oxX", 0, T_UI, T_UI, T_UI, T_UL, T_ULL, T_ULL, T_ST, T_UPD, T_UIM, "-wp0#" },
|
|
{ "u", 0, T_UI, T_UI, T_UI, T_UL, T_ULL, T_ULL, T_ST, T_UPD, T_UIM, "-wp0'I" },
|
|
@@ -1314,6 +1335,7 @@
|
|
enum format_type format_type; /* type of format (printf, scanf, etc.) */
|
|
int format_num; /* number of format argument */
|
|
int first_arg_num; /* number of first arg (zero for varargs) */
|
|
+ int null_format_ok; /* TRUE if the format string may be NULL */
|
|
} function_format_info;
|
|
|
|
static function_format_info *function_format_list = NULL;
|
|
@@ -1354,40 +1376,40 @@
|
|
{
|
|
/* Functions from ISO/IEC 9899:1990. */
|
|
record_function_format (get_identifier ("printf"), NULL_TREE,
|
|
- printf_format_type, 1, 2);
|
|
+ printf_format_type, 1, 2, 0);
|
|
record_function_format (get_identifier ("fprintf"), NULL_TREE,
|
|
- printf_format_type, 2, 3);
|
|
+ printf_format_type, 2, 3, 0);
|
|
record_function_format (get_identifier ("sprintf"), NULL_TREE,
|
|
- printf_format_type, 2, 3);
|
|
+ printf_format_type, 2, 3, 0);
|
|
record_function_format (get_identifier ("scanf"), NULL_TREE,
|
|
- scanf_format_type, 1, 2);
|
|
+ scanf_format_type, 1, 2, 0);
|
|
record_function_format (get_identifier ("fscanf"), NULL_TREE,
|
|
- scanf_format_type, 2, 3);
|
|
+ scanf_format_type, 2, 3, 0);
|
|
record_function_format (get_identifier ("sscanf"), NULL_TREE,
|
|
- scanf_format_type, 2, 3);
|
|
+ scanf_format_type, 2, 3, 0);
|
|
record_function_format (get_identifier ("vprintf"), NULL_TREE,
|
|
- printf_format_type, 1, 0);
|
|
+ printf_format_type, 1, 0, 0);
|
|
record_function_format (get_identifier ("vfprintf"), NULL_TREE,
|
|
- printf_format_type, 2, 0);
|
|
+ printf_format_type, 2, 0, 0);
|
|
record_function_format (get_identifier ("vsprintf"), NULL_TREE,
|
|
- printf_format_type, 2, 0);
|
|
+ printf_format_type, 2, 0, 0);
|
|
record_function_format (get_identifier ("strftime"), NULL_TREE,
|
|
- strftime_format_type, 3, 0);
|
|
+ strftime_format_type, 3, 0, 0);
|
|
}
|
|
|
|
if (flag_hosted && flag_isoc99)
|
|
{
|
|
/* ISO C99 adds the snprintf and vscanf family functions. */
|
|
record_function_format (get_identifier ("snprintf"), NULL_TREE,
|
|
- printf_format_type, 3, 4);
|
|
+ printf_format_type, 3, 4, 0);
|
|
record_function_format (get_identifier ("vsnprintf"), NULL_TREE,
|
|
- printf_format_type, 3, 0);
|
|
+ printf_format_type, 3, 0, 0);
|
|
record_function_format (get_identifier ("vscanf"), NULL_TREE,
|
|
- scanf_format_type, 1, 0);
|
|
+ scanf_format_type, 1, 0, 0);
|
|
record_function_format (get_identifier ("vfscanf"), NULL_TREE,
|
|
- scanf_format_type, 2, 0);
|
|
+ scanf_format_type, 2, 0, 0);
|
|
record_function_format (get_identifier ("vsscanf"), NULL_TREE,
|
|
- scanf_format_type, 2, 0);
|
|
+ scanf_format_type, 2, 0, 0);
|
|
}
|
|
|
|
if (flag_hosted && flag_noniso_default_format_attributes)
|
|
@@ -1410,12 +1432,13 @@
|
|
|
|
static void
|
|
record_function_format (name, assembler_name, format_type,
|
|
- format_num, first_arg_num)
|
|
+ format_num, first_arg_num, null_format_ok)
|
|
tree name;
|
|
tree assembler_name;
|
|
enum format_type format_type;
|
|
int format_num;
|
|
int first_arg_num;
|
|
+ int null_format_ok;
|
|
{
|
|
function_format_info *info;
|
|
|
|
@@ -1439,6 +1462,7 @@
|
|
info->format_type = format_type;
|
|
info->format_num = format_num;
|
|
info->first_arg_num = first_arg_num;
|
|
+ info->null_format_ok = null_format_ok;
|
|
}
|
|
|
|
/* Record information for the names of function that modify the format
|
|
@@ -1755,7 +1779,8 @@
|
|
|
|
if (integer_zerop (format_tree))
|
|
{
|
|
- warning ("null format string");
|
|
+ if (!info->null_format_ok)
|
|
+ warning ("null format string");
|
|
return;
|
|
}
|
|
if (TREE_CODE (format_tree) != ADDR_EXPR)
|
|
@@ -1981,12 +2006,13 @@
|
|
It will work on most machines, because size_t and int
|
|
have the same mode. But might as well warn anyway,
|
|
since it will fail on other machines. */
|
|
+ /* XXX should we allow unsigned ints here? */
|
|
if ((TYPE_MAIN_VARIANT (TREE_TYPE (cur_param))
|
|
!= integer_type_node)
|
|
&&
|
|
(TYPE_MAIN_VARIANT (TREE_TYPE (cur_param))
|
|
!= unsigned_type_node))
|
|
- warning ("field width is not type int (arg %d)", arg_num);
|
|
+ warning ("precision is not type int (arg %d)", arg_num);
|
|
}
|
|
}
|
|
else
|
|
@@ -2046,6 +2072,53 @@
|
|
}
|
|
}
|
|
}
|
|
+ if (*format_chars == 'b')
|
|
+ {
|
|
+ /* There should be an int arg to control the string arg. */
|
|
+ if (params == 0)
|
|
+ {
|
|
+ tfaff ();
|
|
+ return;
|
|
+ }
|
|
+ if (info->first_arg_num != 0)
|
|
+ {
|
|
+ cur_param = TREE_VALUE (params);
|
|
+ params = TREE_CHAIN (params);
|
|
+ ++arg_num;
|
|
+ if ((TYPE_MAIN_VARIANT (TREE_TYPE (cur_param))
|
|
+ != integer_type_node)
|
|
+ &&
|
|
+ (TYPE_MAIN_VARIANT (TREE_TYPE (cur_param))
|
|
+ != unsigned_type_node))
|
|
+ {
|
|
+ warning ("bitmap is not type int (arg %d)", arg_num);
|
|
+ }
|
|
+ }
|
|
+ }
|
|
+ if (*format_chars == 'D')
|
|
+ {
|
|
+ /* There should be an unsigned char * arg before the string arg. */
|
|
+ if (params == 0)
|
|
+ {
|
|
+ tfaff ();
|
|
+ return;
|
|
+ }
|
|
+ if (info->first_arg_num != 0)
|
|
+ {
|
|
+ cur_param = TREE_VALUE (params);
|
|
+ params = TREE_CHAIN (params);
|
|
+ ++arg_num;
|
|
+ cur_type = TREE_TYPE (cur_param);
|
|
+ if (TREE_CODE (cur_type) != POINTER_TYPE
|
|
+ || TYPE_MAIN_VARIANT (TREE_TYPE (cur_type))
|
|
+ != unsigned_char_type_node)
|
|
+ {
|
|
+ warning ("ethernet address is not type unsigned char *"
|
|
+ " (arg %d)",
|
|
+ arg_num);
|
|
+ }
|
|
+ }
|
|
+ }
|
|
|
|
aflag = 0;
|
|
|
|
@@ -2130,7 +2203,8 @@
|
|
switch (info->format_type)
|
|
{
|
|
case printf_format_type:
|
|
- fci = print_char_table;
|
|
+ fci = flag_format_extensions ? print_char_table
|
|
+ : unextended_print_char_table;
|
|
break;
|
|
case scanf_format_type:
|
|
fci = scan_char_table;
|
|
@@ -2174,7 +2248,7 @@
|
|
warning ("width used with `%c' format", format_char);
|
|
if (index (fci->flag_chars, '3') != 0
|
|
|| (format_char == 'y' && index (flag_chars, 'E')))
|
|
- warning ("`%%%c' yields only last 2 digits of year in some locales",
|
|
+ warning ("`%%%c' yields only last 2 digits of year in some locales on non-BSD systems",
|
|
format_char);
|
|
else if (index (fci->flag_chars, '2') != 0)
|
|
warning ("`%%%c' yields only last 2 digits of year", format_char);
|