2020-06-17 Bill Schmidt <wschm...@linux.ibm.com>
* config/rs6000/rs6000-gen-builtins.c
(write_autogenerated_header): New function.
(write_bif_enum): Likewise.
(write_ovld_enum): Likewise.
(write_decls): Likewise.
(write_extern_fntype): Likewise.
(write_header_file): Implement.
---
gcc/config/rs6000/rs6000-gen-builtins.c | 169 ++++++++++++++++++++++++
1 file changed, 169 insertions(+)
diff --git a/gcc/config/rs6000/rs6000-gen-builtins.c
b/gcc/config/rs6000/rs6000-gen-builtins.c
index a54b522a6b3..f80cd61d6ec 100644
--- a/gcc/config/rs6000/rs6000-gen-builtins.c
+++ b/gcc/config/rs6000/rs6000-gen-builtins.c
@@ -1812,10 +1812,179 @@ parse_ovld ()
return result;
}
+/* Write a comment at the top of FILE about how the code was generated. */
+static void
+write_autogenerated_header (FILE *file)
+{
+ fprintf (file, "/* Automatically generated by the program '%s'\n",
+ pgm_path);
+ fprintf (file, " from the files '%s' and '%s'. */\n\n",
+ bif_path, ovld_path);
+}
+
+/* Callback functions used in creating enumerations. */
+void write_bif_enum (char *str)
+{
+ fprintf (header_file, " RS6000_BIF_%s,\n", str);
+}
+
+void write_ovld_enum (char *str)
+{
+ fprintf (header_file, " RS6000_OVLD_%s,\n", str);
+}
+
+/* Write declarations into the header file. */
+static void
+write_decls ()
+{
+ fprintf (header_file, "enum rs6000_gen_builtins\n{\n RS6000_BIF_NONE,\n");
+ rbt_inorder_callback (&bif_rbt, bif_rbt.rbt_root, write_bif_enum);
+ fprintf (header_file, " RS6000_BIF_MAX\n};\n\n");
+
+ fprintf (header_file, "enum restriction {\n");
+ fprintf (header_file, " RES_NONE,\n");
+ fprintf (header_file, " RES_BITS,\n");
+ fprintf (header_file, " RES_RANGE,\n");
+ fprintf (header_file, " RES_VAR_RANGE,\n");
+ fprintf (header_file, " RES_VALUES\n");
+ fprintf (header_file, "};\n\n");
+
+ fprintf (header_file, "struct bifdata\n");
+ fprintf (header_file, "{\n");
+ fprintf (header_file, " const char *bifname;\n");
+ fprintf (header_file, " HOST_WIDE_INT mask;\n");
+ fprintf (header_file, " tree fntype;\n");
+ fprintf (header_file, " insn_code icode;\n");
+ fprintf (header_file, " int nargs;\n");
+ fprintf (header_file, " int bifattrs;\n");
+ fprintf (header_file, " int restr_opnd[2];\n");
+ fprintf (header_file, " restriction restr[2];\n");
+ fprintf (header_file, " int restr_val1[2];\n");
+ fprintf (header_file, " int restr_val2[2];\n");
+ fprintf (header_file, "};\n\n");
+
+ fprintf (header_file, "#define bif_init_bit\t\t(0x00000001)\n");
+ fprintf (header_file, "#define bif_set_bit\t\t(0x00000002)\n");
+ fprintf (header_file, "#define bif_extract_bit\t\t(0x00000004)\n");
+ fprintf (header_file, "#define bif_nosoft_bit\t\t(0x00000008)\n");
+ fprintf (header_file, "#define bif_ldvec_bit\t\t(0x00000010)\n");
+ fprintf (header_file, "#define bif_stvec_bit\t\t(0x00000020)\n");
+ fprintf (header_file, "#define bif_reve_bit\t\t(0x00000040)\n");
+ fprintf (header_file, "#define bif_pred_bit\t\t(0x00000080)\n");
+ fprintf (header_file, "#define bif_htm_bit\t\t(0x00000100)\n");
+ fprintf (header_file, "#define bif_htmspr_bit\t\t(0x00000200)\n");
+ fprintf (header_file, "#define bif_htmcr_bit\t\t(0x00000400)\n");
+ fprintf (header_file, "#define bif_no32bit_bit\t\t(0x00000800)\n");
+ fprintf (header_file, "#define bif_cpu_bit\t\t(0x00001000)\n");
+ fprintf (header_file, "#define bif_ldstmask_bit\t(0x00002000)\n");
+ fprintf (header_file, "\n");
+ fprintf (header_file,
+ "#define bif_is_init(x)\t\t((x).bifattrs & bif_init_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_set(x)\t\t((x).bifattrs & bif_set_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_extract(x)\t((x).bifattrs & bif_extract_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_nosoft(x)\t((x).bifattrs & bif_nosoft_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_ldvec(x)\t\t((x).bifattrs & bif_ldvec_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_stvec(x)\t\t((x).bifattrs & bif_stvec_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_reve(x)\t\t((x).bifattrs & bif_reve_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_predicate(x)\t((x).bifattrs & bif_pred_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_htm(x)\t\t((x).bifattrs & bif_htm_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_htmspr(x)\t((x).bifattrs & bif_htmspr_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_htmcr(x)\t\t((x).bifattrs & bif_htmcr_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_no32bit(x)\t((x).bifattrs & bif_no32bit_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_cpu(x)\t\t((x).bifattrs & bif_cpu_bit)\n");
+ fprintf (header_file,
+ "#define bif_is_ldstmask(x)\t((x).bifattrs "
+ "& bif_ldstmask_bit)\n");
+ fprintf (header_file, "\n");
+
+ /* #### Note that the _x is added for now to avoid conflict with
+ the existing rs6000_builtin_info[] file while testing. It will
+ be removed as we progress. */
+ fprintf (header_file, "extern bifdata rs6000_builtin_info_x[];\n\n");
+
+ fprintf (header_file,
+ "struct rs6000_bif_hasher : nofree_ptr_hash<bifdata>\n");
+ fprintf (header_file, "{\n");
+ fprintf (header_file, " typedef const char *compare_type;\n\n");
+ fprintf (header_file, " static hashval_t hash (bifdata *);\n");
+ fprintf (header_file, " static bool equal (bifdata *, const char *);\n");
+ fprintf (header_file, "};\n\n");
+
+ fprintf (header_file, "extern hash_table<rs6000_bif_hasher> bif_hash;\n\n");
+
+ /* Right now we use nonoverlapping numbers for rs6000_gen_builtins
+ and rs6000_gen_overloads. In the old design, these were all in the
+ same enum, and I can't yet prove there isn't a dependency on these
+ numbers being distinct. Once this is more clear, I may change
+ this to start at zero. */
+ fprintf (header_file, "enum rs6000_gen_overloads\n{\n");
+ fprintf (header_file, " RS6000_OVLD_NONE = RS6000_BIF_MAX + 1,\n");
+ rbt_inorder_callback (&ovld_rbt, ovld_rbt.rbt_root, write_ovld_enum);
+ fprintf (header_file, " RS6000_OVLD_MAX\n};\n\n");
+
+ fprintf (header_file, "struct ovlddata\n");
+ fprintf (header_file, "{\n");
+ fprintf (header_file, " const char *bifname;\n");
+ fprintf (header_file, " rs6000_gen_builtins bifid;\n");
+ fprintf (header_file, " tree fntype;\n");
+ fprintf (header_file, " ovlddata *next;\n");
+ fprintf (header_file, "};\n\n");
+
+ fprintf (header_file, "extern ovlddata rs6000_overload_info[];\n\n");
+
+ fprintf (header_file,
+ "struct rs6000_ovld_hasher : nofree_ptr_hash<ovlddata>\n");
+ fprintf (header_file, "{\n");
+ fprintf (header_file, " typedef const char *compare_type;\n\n");
+ fprintf (header_file, " static hashval_t hash (ovlddata *);\n");
+ fprintf (header_file, " static bool equal (ovlddata *, const char *);\n");
+ fprintf (header_file, "};\n\n");
+
+ fprintf (header_file,
+ "extern hash_table<rs6000_ovld_hasher> ovld_hash;\n\n");
+
+ fprintf (header_file, "extern void rs6000_autoinit_builtins ();\n\n");
+}
+
+/* Callback functions used for generating trees for function types. */
+void
+write_extern_fntype (char *str)
+{
+ fprintf (header_file, "extern tree %s;\n", str);
+}
+
/* Write everything to the header file (rs6000-builtins.h). */
static int
write_header_file ()
{
+ write_autogenerated_header (header_file);
+ fprintf (header_file, "#include \"config.h\"\n");
+ fprintf (header_file, "#include \"system.h\"\n");
+ fprintf (header_file, "#include \"coretypes.h\"\n");
+ fprintf (header_file, "#include \"backend.h\"\n");
+ fprintf (header_file, "#include \"rtl.h\"\n");
+ fprintf (header_file, "#include \"tree.h\"\n");
+ fprintf (header_file, "\n");
+ fprintf (header_file, "extern int new_builtins_are_live;\n\n");
+
+ write_decls ();
+
+ /* Write function type list declarators to the header file. */
+ rbt_inorder_callback (&fntype_rbt, fntype_rbt.rbt_root, write_extern_fntype);
+ fprintf (header_file, "\n");
+
return 1;
}
--
2.17.1
