1 /* Target-dependent globals.
2    Copyright (C) 2010-2018 Free Software Foundation, Inc.
3 
4 This file is part of GCC.
5 
6 GCC is free software; you can redistribute it and/or modify it under
7 the terms of the GNU General Public License as published by the Free
8 Software Foundation; either version 3, or (at your option) any later
9 version.
10 
11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
14 for more details.
15 
16 You should have received a copy of the GNU General Public License
17 along with GCC; see the file COPYING3.  If not see
18 <http://www.gnu.org/licenses/>.  */
19 
20 #include "config.h"
21 #include "system.h"
22 #include "coretypes.h"
23 #include "backend.h"
24 #include "rtl.h"
25 #include "tree.h"
26 #include "expmed.h"
27 #include "optabs-query.h"
28 #include "insn-config.h"
29 #include "regs.h"
30 #include "memmodel.h"
31 #include "ira.h"
32 #include "ira-int.h"
33 #include "toplev.h"
34 #include "target-globals.h"
35 #include "flags.h"
36 #include "reload.h"
37 #include "libfuncs.h"
38 #include "cfgloop.h"
39 #include "builtins.h"
40 #include "gcse.h"
41 #include "bb-reorder.h"
42 #include "lower-subreg.h"
43 
44 #if SWITCHABLE_TARGET
45 struct target_globals default_target_globals = {
46   &default_target_flag_state,
47   &default_target_regs,
48   &default_target_rtl,
49   &default_target_recog,
50   &default_target_hard_regs,
51   &default_target_reload,
52   &default_target_expmed,
53   &default_target_optabs,
54   &default_target_libfuncs,
55   &default_target_cfgloop,
56   &default_target_ira,
57   &default_target_ira_int,
58   &default_target_builtins,
59   &default_target_gcse,
60   &default_target_bb_reorder,
61   &default_target_lower_subreg
62 };
63 
64 struct target_globals *
65 save_target_globals (void)
66 {
67   struct target_globals *g = ggc_cleared_alloc <target_globals> ();
68   g->flag_state = XCNEW (struct target_flag_state);
69   g->regs = XCNEW (struct target_regs);
70   g->rtl = ggc_cleared_alloc<target_rtl> ();
71   g->recog = XCNEW (struct target_recog);
72   g->hard_regs = XCNEW (struct target_hard_regs);
73   g->reload = XCNEW (struct target_reload);
74   g->expmed = XCNEW (struct target_expmed);
75   g->optabs = XCNEW (struct target_optabs);
76   g->libfuncs = ggc_cleared_alloc<target_libfuncs> ();
77   g->cfgloop = XCNEW (struct target_cfgloop);
78   g->ira = XCNEW (struct target_ira);
79   g->ira_int = XCNEW (struct target_ira_int);
80   g->builtins = XCNEW (struct target_builtins);
81   g->gcse = XCNEW (struct target_gcse);
82   g->bb_reorder = XCNEW (struct target_bb_reorder);
83   g->lower_subreg = XCNEW (struct target_lower_subreg);
84   restore_target_globals (g);
85   init_reg_sets ();
86   target_reinit ();
87   return g;
88 }
89 
90 /* Like save_target_globals() above, but set *this_target_optabs
91    correctly when a previous function has changed
92    *this_target_optabs.  */
93 
94 struct target_globals *
95 save_target_globals_default_opts ()
96 {
97   struct target_globals *globals;
98 
99   if (optimization_current_node != optimization_default_node)
100     {
101       tree opts = optimization_current_node;
102       /* Temporarily switch to the default optimization node, so that
103 	 *this_target_optabs is set to the default, not reflecting
104 	 whatever a previous function used for the optimize
105 	 attribute.  */
106       optimization_current_node = optimization_default_node;
107       cl_optimization_restore
108 	(&global_options,
109 	 TREE_OPTIMIZATION (optimization_default_node));
110       globals = save_target_globals ();
111       optimization_current_node = opts;
112       cl_optimization_restore (&global_options,
113 			       TREE_OPTIMIZATION (opts));
114       return globals;
115     }
116   return save_target_globals ();
117 }
118 
119 target_globals::~target_globals ()
120 {
121   /* default_target_globals points to static data so shouldn't be freed.  */
122   if (this != &default_target_globals)
123     {
124       ira_int->~target_ira_int ();
125       hard_regs->finalize ();
126       XDELETE (flag_state);
127       XDELETE (regs);
128       XDELETE (recog);
129       XDELETE (hard_regs);
130       XDELETE (reload);
131       XDELETE (expmed);
132       XDELETE (optabs);
133       XDELETE (cfgloop);
134       XDELETE (ira);
135       XDELETE (ira_int);
136       XDELETE (builtins);
137       XDELETE (gcse);
138       XDELETE (bb_reorder);
139       XDELETE (lower_subreg);
140     }
141 }
142 
143 #endif
144