1*38fd1498Szrj /* Generate attribute information shared between driver and core
2*38fd1498Szrj compilers (insn-attr-common.h) from machine description. Split out
3*38fd1498Szrj of genattr.c.
4*38fd1498Szrj Copyright (C) 1991-2018 Free Software Foundation, Inc.
5*38fd1498Szrj
6*38fd1498Szrj This file is part of GCC.
7*38fd1498Szrj
8*38fd1498Szrj GCC is free software; you can redistribute it and/or modify it under
9*38fd1498Szrj the terms of the GNU General Public License as published by the Free
10*38fd1498Szrj Software Foundation; either version 3, or (at your option) any later
11*38fd1498Szrj version.
12*38fd1498Szrj
13*38fd1498Szrj GCC is distributed in the hope that it will be useful, but WITHOUT ANY
14*38fd1498Szrj WARRANTY; without even the implied warranty of MERCHANTABILITY or
15*38fd1498Szrj FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
16*38fd1498Szrj for more details.
17*38fd1498Szrj
18*38fd1498Szrj You should have received a copy of the GNU General Public License
19*38fd1498Szrj along with GCC; see the file COPYING3. If not see
20*38fd1498Szrj <http://www.gnu.org/licenses/>. */
21*38fd1498Szrj
22*38fd1498Szrj
23*38fd1498Szrj #include "bconfig.h"
24*38fd1498Szrj #include "system.h"
25*38fd1498Szrj #include "coretypes.h"
26*38fd1498Szrj #include "tm.h"
27*38fd1498Szrj #include "rtl.h"
28*38fd1498Szrj #include "errors.h"
29*38fd1498Szrj #include "read-md.h"
30*38fd1498Szrj #include "gensupport.h"
31*38fd1498Szrj
32*38fd1498Szrj static void
write_upcase(const char * str)33*38fd1498Szrj write_upcase (const char *str)
34*38fd1498Szrj {
35*38fd1498Szrj for (; *str; str++)
36*38fd1498Szrj putchar (TOUPPER (*str));
37*38fd1498Szrj }
38*38fd1498Szrj
39*38fd1498Szrj static void
gen_attr(md_rtx_info * info)40*38fd1498Szrj gen_attr (md_rtx_info *info)
41*38fd1498Szrj {
42*38fd1498Szrj const char *p, *tag;
43*38fd1498Szrj
44*38fd1498Szrj rtx attr = info->def;
45*38fd1498Szrj p = XSTR (attr, 1);
46*38fd1498Szrj if (*p != '\0')
47*38fd1498Szrj {
48*38fd1498Szrj printf ("enum attr_%s {", XSTR (attr, 0));
49*38fd1498Szrj
50*38fd1498Szrj while ((tag = scan_comma_elt (&p)) != 0)
51*38fd1498Szrj {
52*38fd1498Szrj write_upcase (XSTR (attr, 0));
53*38fd1498Szrj putchar ('_');
54*38fd1498Szrj while (tag != p)
55*38fd1498Szrj putchar (TOUPPER (*tag++));
56*38fd1498Szrj if (*p == ',')
57*38fd1498Szrj fputs (", ", stdout);
58*38fd1498Szrj }
59*38fd1498Szrj fputs ("};\n", stdout);
60*38fd1498Szrj }
61*38fd1498Szrj }
62*38fd1498Szrj
63*38fd1498Szrj int
main(int argc,const char ** argv)64*38fd1498Szrj main (int argc, const char **argv)
65*38fd1498Szrj {
66*38fd1498Szrj bool have_delay = false;
67*38fd1498Szrj bool have_sched = false;
68*38fd1498Szrj
69*38fd1498Szrj progname = "genattr-common";
70*38fd1498Szrj
71*38fd1498Szrj if (!init_rtx_reader_args (argc, argv))
72*38fd1498Szrj return (FATAL_EXIT_CODE);
73*38fd1498Szrj
74*38fd1498Szrj puts ("/* Generated automatically by the program `genattr-common'");
75*38fd1498Szrj puts (" from the machine description file `md'. */\n");
76*38fd1498Szrj puts ("#ifndef GCC_INSN_ATTR_COMMON_H");
77*38fd1498Szrj puts ("#define GCC_INSN_ATTR_COMMON_H\n");
78*38fd1498Szrj
79*38fd1498Szrj /* Read the machine description. */
80*38fd1498Szrj
81*38fd1498Szrj md_rtx_info info;
82*38fd1498Szrj while (read_md_rtx (&info))
83*38fd1498Szrj switch (GET_CODE (info.def))
84*38fd1498Szrj {
85*38fd1498Szrj case DEFINE_ATTR:
86*38fd1498Szrj gen_attr (&info);
87*38fd1498Szrj break;
88*38fd1498Szrj
89*38fd1498Szrj case DEFINE_DELAY:
90*38fd1498Szrj have_delay = true;
91*38fd1498Szrj break;
92*38fd1498Szrj
93*38fd1498Szrj case DEFINE_INSN_RESERVATION:
94*38fd1498Szrj if (!have_sched)
95*38fd1498Szrj {
96*38fd1498Szrj printf ("#define INSN_SCHEDULING\n");
97*38fd1498Szrj have_sched = true;
98*38fd1498Szrj }
99*38fd1498Szrj break;
100*38fd1498Szrj
101*38fd1498Szrj default:
102*38fd1498Szrj break;
103*38fd1498Szrj }
104*38fd1498Szrj
105*38fd1498Szrj printf ("#define DELAY_SLOTS %d\n", have_delay);
106*38fd1498Szrj puts ("\n#endif /* GCC_INSN_ATTR_COMMON_H */");
107*38fd1498Szrj
108*38fd1498Szrj if (ferror (stdout) || fflush (stdout) || fclose (stdout))
109*38fd1498Szrj return FATAL_EXIT_CODE;
110*38fd1498Szrj
111*38fd1498Szrj return SUCCESS_EXIT_CODE;
112*38fd1498Szrj }
113