aboutsummaryrefslogtreecommitdiffstats
path: root/lang/gcc28
diff options
context:
space:
mode:
Diffstat (limited to 'lang/gcc28')
-rw-r--r--lang/gcc28/files/patch-0521
-rw-r--r--lang/gcc28/files/patch-0621
-rw-r--r--lang/gcc28/files/patch-14236
-rw-r--r--lang/gcc28/files/patch-1511
4 files changed, 283 insertions, 6 deletions
diff --git a/lang/gcc28/files/patch-05 b/lang/gcc28/files/patch-05
index 18beca382752..2ed03dce4d62 100644
--- a/lang/gcc28/files/patch-05
+++ b/lang/gcc28/files/patch-05
@@ -1,9 +1,21 @@
--- flags.h.orig Wed Dec 31 05:02:33 1997
-+++ flags.h Tue Aug 11 13:31:22 1998
-@@ -216,6 +216,20 @@
++++ flags.h Wed Mar 31 00:08:39 1999
+@@ -125,6 +125,10 @@
- extern int flag_unroll_all_loops;
+ extern int warn_aggregate_return;
+
++/* Nonzero means that -Wformat accepts certain non-ANSI formats. */
++
++extern int flag_format_extensions;
++
+ /* Nonzero if generating code to do profiling. */
+
+ extern int profile_flag;
+@@ -215,6 +219,20 @@
+ This is generally not a win. */
+ extern int flag_unroll_all_loops;
++
+/* Nonzero forces all invariant computations in loops to be moved
+ outside the loop. */
+
@@ -17,7 +29,6 @@
+/* Nonzero gets another run of loop_optimize performed. */
+
+extern int flag_rerun_loop_opt;
-+
+
/* Nonzero for -fcse-follow-jumps:
have cse follow jumps to do a more extensive job. */
-
diff --git a/lang/gcc28/files/patch-06 b/lang/gcc28/files/patch-06
index cb6f24719c89..adb068501f33 100644
--- a/lang/gcc28/files/patch-06
+++ b/lang/gcc28/files/patch-06
@@ -1,5 +1,5 @@
--- toplev.c.orig Wed Feb 25 18:04:46 1998
-+++ toplev.c Tue Aug 11 14:40:22 1998
++++ toplev.c Wed Mar 31 00:15:41 1999
@@ -463,6 +463,20 @@
int flag_unroll_all_loops;
@@ -21,3 +21,22 @@
/* Nonzero for -fwritable-strings:
store string constants in data segment and don't uniquize them. */
+@@ -691,6 +705,7 @@
+ {"stack-check", &flag_stack_check, 1},
+ {"bytecode", &output_bytecode, 1},
+ {"check-memory-usage", &flag_check_memory_usage, 1},
++ {"format-extensions", &flag_format_extensions, 1},
+ {"prefix-function-name", &flag_prefix_function_name, 1}
+ };
+
+@@ -880,6 +895,10 @@
+ {"uninitialized", &warn_uninitialized, 1},
+ {"inline", &warn_inline, 1}
+ };
++
++/* Nonzero means that -Wformat accepts certain system-dependent formats. */
++
++int flag_format_extensions = 0;
+
+ /* Output files for assembler code (real compiler output)
+ and debugging dumps. */
diff --git a/lang/gcc28/files/patch-14 b/lang/gcc28/files/patch-14
new file mode 100644
index 000000000000..6e0c0c03fb9c
--- /dev/null
+++ b/lang/gcc28/files/patch-14
@@ -0,0 +1,236 @@
+--- c-common.c.orig Wed Feb 18 19:16:13 1998
++++ c-common.c Tue Mar 30 14:42:30 1999
+@@ -623,6 +623,7 @@
+ int format_num;
+ int first_arg_num;
+ int is_scan;
++ int null_format_ok;
+ tree argument;
+ int arg_num;
+
+@@ -637,12 +638,26 @@
+ && (!strcmp (IDENTIFIER_POINTER (format_type), "printf")
+ || !strcmp (IDENTIFIER_POINTER (format_type),
+ "__printf__")))
+- is_scan = 0;
++ {
++ is_scan = 0;
++ null_format_ok = 0;
++ }
++ else if (TREE_CODE (format_type) == IDENTIFIER_NODE
++ && (!strcmp (IDENTIFIER_POINTER (format_type), "printf0")
++ || !strcmp (IDENTIFIER_POINTER (format_type),
++ "__printf0__")))
++ {
++ is_scan = 0;
++ null_format_ok = 1;
++ }
+ else if (TREE_CODE (format_type) == IDENTIFIER_NODE
+ && (!strcmp (IDENTIFIER_POINTER (format_type), "scanf")
+ || !strcmp (IDENTIFIER_POINTER (format_type),
+ "__scanf__")))
+- is_scan = 1;
++ {
++ is_scan = 1;
++ null_format_ok = 0;
++ }
+ else if (TREE_CODE (format_type) == IDENTIFIER_NODE)
+ {
+ error ("`%s' is an unrecognized format function type",
+@@ -651,7 +666,7 @@
+ }
+ else
+ {
+- error ("unrecognized format specifier");
++ error_with_decl (decl, "unrecognized format specifier");
+ continue;
+ }
+
+@@ -718,7 +733,8 @@
+
+ record_function_format (DECL_NAME (decl),
+ DECL_ASSEMBLER_NAME (decl),
+- is_scan, format_num, first_arg_num);
++ is_scan, null_format_ok, format_num,
++ first_arg_num);
+ break;
+ }
+
+@@ -906,6 +922,7 @@
+ int pointer_count;
+ /* Type of argument if no length modifier is used. */
+ tree *nolen;
++ /* EGCS has tree *hhlen -- length modifier for shortening to byte */
+ /* Type of argument if length modifier for shortening is used.
+ If NULL, then this modifier is not allowed. */
+ tree *hlen;
+@@ -926,6 +943,11 @@
+ } format_char_info;
+
+ static format_char_info print_char_table[] = {
++/* FreeBSD kernel extensions. */
++ { "D", 1, T_C, NULL, NULL, NULL, NULL, NULL, "-wp" },
++ { "b", 1, T_C, NULL, NULL, NULL, NULL, NULL, "-wp" },
++ { "rz", 0, NULL, T_I, T_L, NULL, NULL, NULL, "-wp0 +#" },
++#define unextended_print_char_table (print_char_table + 3)
+ { "di", 0, T_I, T_I, T_L, T_LL, T_LL, T_ST, "-wp0 +" },
+ { "oxX", 0, T_UI, T_UI, T_UL, T_ULL, T_ULL, T_ST, "-wp0#" },
+ { "u", 0, T_UI, T_UI, T_UL, T_ULL, T_ULL, T_ST, "-wp0" },
+@@ -960,6 +982,7 @@
+ tree name; /* identifier such as "printf" */
+ tree assembler_name; /* optional mangled identifier (for C++) */
+ int is_scan; /* TRUE if *scanf */
++ int null_format_ok; /* TRUE if the format string may be NULL */
+ int format_num; /* number of format argument */
+ int first_arg_num; /* number of first arg (zero for varargs) */
+ } function_format_info;
+@@ -991,15 +1014,15 @@
+ void
+ init_function_format_info ()
+ {
+- record_function_format (get_identifier ("printf"), NULL_TREE, 0, 1, 2);
+- record_function_format (get_identifier ("fprintf"), NULL_TREE, 0, 2, 3);
+- record_function_format (get_identifier ("sprintf"), NULL_TREE, 0, 2, 3);
+- record_function_format (get_identifier ("scanf"), NULL_TREE, 1, 1, 2);
+- record_function_format (get_identifier ("fscanf"), NULL_TREE, 1, 2, 3);
+- record_function_format (get_identifier ("sscanf"), NULL_TREE, 1, 2, 3);
+- record_function_format (get_identifier ("vprintf"), NULL_TREE, 0, 1, 0);
+- record_function_format (get_identifier ("vfprintf"), NULL_TREE, 0, 2, 0);
+- record_function_format (get_identifier ("vsprintf"), NULL_TREE, 0, 2, 0);
++ record_function_format (get_identifier ("printf"), NULL_TREE, 0, 0, 1, 2);
++ record_function_format (get_identifier ("fprintf"), NULL_TREE, 0, 0, 2, 3);
++ record_function_format (get_identifier ("sprintf"), NULL_TREE, 0, 0, 2, 3);
++ record_function_format (get_identifier ("scanf"), NULL_TREE, 1, 0, 1, 2);
++ record_function_format (get_identifier ("fscanf"), NULL_TREE, 1, 0, 2, 3);
++ record_function_format (get_identifier ("sscanf"), NULL_TREE, 1, 0, 2, 3);
++ record_function_format (get_identifier ("vprintf"), NULL_TREE, 0, 0, 1, 0);
++ record_function_format (get_identifier ("vfprintf"), NULL_TREE, 0, 0, 2, 0);
++ record_function_format (get_identifier ("vsprintf"), NULL_TREE, 0, 0, 2, 0);
+
+ record_international_format (get_identifier ("gettext"), NULL_TREE, 1);
+ record_international_format (get_identifier ("dgettext"), NULL_TREE, 2);
+@@ -1016,11 +1039,12 @@
+ (e.g. for varargs such as vfprintf). */
+
+ void
+-record_function_format (name, assembler_name, is_scan,
++record_function_format (name, assembler_name, is_scan, null_format_ok,
+ format_num, first_arg_num)
+ tree name;
+ tree assembler_name;
+ int is_scan;
++ int null_format_ok;
+ int format_num;
+ int first_arg_num;
+ {
+@@ -1044,6 +1068,7 @@
+ }
+
+ info->is_scan = is_scan;
++ info->null_format_ok = null_format_ok;
+ info->format_num = format_num;
+ info->first_arg_num = first_arg_num;
+ }
+@@ -1194,7 +1219,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)
+@@ -1329,6 +1355,7 @@
+ 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)
+ &&
+@@ -1336,7 +1363,7 @@
+ != unsigned_type_node))
+ {
+ sprintf (message,
+- "field width is not type int (arg %d)",
++ "precision is not type int (arg %d)",
+ arg_num);
+ warning (message);
+ }
+@@ -1371,6 +1398,7 @@
+ cur_param = TREE_VALUE (params);
+ params = TREE_CHAIN (params);
+ ++arg_num;
++ /* XXX should we allow unsigned ints here? */
+ if (TYPE_MAIN_VARIANT (TREE_TYPE (cur_param))
+ != integer_type_node)
+ {
+@@ -1388,6 +1416,56 @@
+ }
+ }
+ }
++ if (*format_chars == 'b')
++ {
++ /* There should be an int arg to control the string arg. */
++ if (params == 0)
++ {
++ warning (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))
++ {
++ sprintf (message, "bitmap is not type int (arg %d)",
++ arg_num);
++ warning (message);
++ }
++ }
++ }
++ if (*format_chars == 'D')
++ {
++ /* There should be an unsigned char * arg before the string arg. */
++ if (params == 0)
++ {
++ warning (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)
++ {
++ sprintf (message,
++ "ethernet address is not type unsigned char * (arg %d)",
++ arg_num);
++ warning (message);
++ }
++ }
++ }
+ if (*format_chars == 'h' || *format_chars == 'l')
+ length_char = *format_chars++;
+ else if (*format_chars == 'q' || *format_chars == 'L')
+@@ -1436,7 +1514,9 @@
+ continue;
+ }
+ format_chars++;
+- fci = info->is_scan ? scan_char_table : print_char_table;
++ fci = info->is_scan ? scan_char_table
++ : flag_format_extensions ? print_char_table
++ : unextended_print_char_table;
+ while (fci->format_chars != 0
+ && index (fci->format_chars, format_char) == 0)
+ ++fci;
diff --git a/lang/gcc28/files/patch-15 b/lang/gcc28/files/patch-15
new file mode 100644
index 000000000000..fb77dd09c9ac
--- /dev/null
+++ b/lang/gcc28/files/patch-15
@@ -0,0 +1,11 @@
+--- c-tree.h.orig Fri Aug 8 13:09:02 1997
++++ c-tree.h Tue Mar 30 14:14:51 1999
+@@ -162,7 +162,7 @@
+ extern void declare_function_name PROTO((void));
+ extern void decl_attributes PROTO((tree, tree, tree));
+ extern void init_function_format_info PROTO((void));
+-extern void record_function_format PROTO((tree, tree, int, int, int));
++extern void record_function_format PROTO((tree, tree, int, int, int, int));
+ extern void check_function_format PROTO((tree, tree, tree));
+ /* Print an error message for invalid operands to arith operation CODE.
+ NOP_EXPR is used as a special case (see truthvalue_conversion). */
generated by cgit (git 2.34.1) at 2024-12-24 06:31:01 +0800