1 /*
2 * Copyright (c) 2005, 2019, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation.
8 *
9 * This code is distributed in the hope that it will be useful, but WITHOUT
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
12 * version 2 for more details (a copy is included in the LICENSE file that
13 * accompanied this code).
14 *
15 * You should have received a copy of the GNU General Public License version
16 * 2 along with this work; if not, write to the Free Software Foundation,
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 *
23 */
24
25 #ifndef SHARE_OPTO_IDEALKIT_HPP
26 #define SHARE_OPTO_IDEALKIT_HPP
27
28 #include "opto/addnode.hpp"
29 #include "opto/cfgnode.hpp"
30 #include "opto/castnode.hpp"
31 #include "opto/connode.hpp"
32 #include "opto/divnode.hpp"
33 #include "opto/graphKit.hpp"
34 #include "opto/mulnode.hpp"
35 #include "opto/phaseX.hpp"
36 #include "opto/subnode.hpp"
37 #include "opto/type.hpp"
38
39 //-----------------------------------------------------------------------------
40 //----------------------------IdealKit-----------------------------------------
41 // Set of utilities for creating control flow and scalar SSA data flow.
42 // Control:
43 // if_then(left, relop, right)
44 // else_ (optional)
45 // end_if
46 // loop(iv variable, initial, relop, limit)
47 // - sets iv to initial for first trip
48 // - exits when relation on limit is true
49 // - the values of initial and limit should be loop invariant
50 // - no increment, must be explicitly coded
51 // - final value of iv is available after end_loop (until dead())
52 // end_loop
53 // make_label(number of gotos)
54 // goto_(label)
55 // bind(label)
56 // Data:
57 // ConI(integer constant) - create an integer constant
58 // set(variable, value) - assignment
59 // value(variable) - reference value
60 // dead(variable) - variable's value is no longer live
61 // increment(variable, value) - increment variable by value
62 // simple operations: AddI, SubI, AndI, LShiftI, etc.
63 // Example:
64 // Node* limit = ??
65 // IdealVariable i(kit), j(kit);
66 // declarations_done();
67 // Node* exit = make_label(1); // 1 goto
68 // set(j, ConI(0));
69 // loop(i, ConI(0), BoolTest::lt, limit); {
70 // if_then(value(i), BoolTest::gt, ConI(5)) {
71 // set(j, ConI(1));
72 // goto_(exit); dead(i);
73 // } end_if();
74 // increment(i, ConI(1));
75 // } end_loop(); dead(i);
76 // bind(exit);
77 //
78 // See string_indexOf for a more complete example.
79
80 class IdealKit;
81
82 // Variable definition for IdealKit
83 class IdealVariable: public StackObj {
84 friend class IdealKit;
85 private:
86 int _id;
87 void set_id(int id) { _id = id; }
88 public:
89 IdealVariable(IdealKit &k);
90 int id() { assert(has_id(),"uninitialized id"); return _id; }
91 bool has_id() { return _id >= 0; }
92 };
93
94 class IdealKit: public StackObj {
95 friend class IdealVariable;
96 // The main state (called a cvstate for Control and Variables)
97 // contains both the current values of the variables and the
98 // current set of predecessor control edges. The variable values
99 // are managed via a Node [in(1)..in(_var_ct)], and the predecessor
100 // control edges managed via a RegionNode. The in(0) of the Node
101 // for variables points to the RegionNode for the control edges.
102 protected:
103 Compile * const C;
104 PhaseGVN &_gvn;
105 GrowableArray<Node*>* _pending_cvstates; // stack of cvstates
106 Node* _cvstate; // current cvstate (control, memory and variables)
107 uint _var_ct; // number of variables
108 bool _delay_all_transforms; // flag forcing all transforms to be delayed
109 Node* _initial_ctrl; // saves initial control until variables declared
110 Node* _initial_memory; // saves initial memory until variables declared
111 Node* _initial_i_o; // saves initial i_o until variables declared
112
113 PhaseGVN& gvn() const { return _gvn; }
114 // Create a new cvstate filled with nulls
115 Node* new_cvstate(); // Create a new cvstate
116 Node* cvstate() { return _cvstate; } // current cvstate
117 Node* copy_cvstate(); // copy current cvstate
118
119 void set_memory(Node* mem, uint alias_idx );
120 void do_memory_merge(Node* merging, Node* join);
121 void clear(Node* m); // clear a cvstate
122 void stop() { clear(_cvstate); } // clear current cvstate
123 Node* delay_transform(Node* n);
124 Node* transform(Node* n); // gvn.transform or skip it
125 Node* promote_to_phi(Node* n, Node* reg);// Promote "n" to a phi on region "reg"
126 bool was_promoted_to_phi(Node* n, Node* reg) {
127 return (n->is_Phi() && n->in(0) == reg);
128 }
129 void declare(IdealVariable* v) { v->set_id(_var_ct++); }
130
131 void if_then_common(Node* bol, float prob = PROB_FAIR, float cnt = COUNT_UNKNOWN,
132 bool push_new_state = true);
133
134 // This declares the position where vars are kept in the cvstate
135 // For some degree of consistency we use the TypeFunc enum to
136 // soak up spots in the inputs even though we only use early Control
137 // and Memory slots. (So far.)
138 static const uint first_var; // = TypeFunc::Parms + 1;
139
140 #ifdef ASSERT
141 enum State { NullS=0, BlockS=1, LoopS=2, IfThenS=4, ElseS=8, EndifS= 16 };
142 GrowableArray<int>* _state;
143 State state() { return (State)(_state->top()); }
144 #endif
145
146 // Users should not care about slices only MergedMem so no access for them.
147 Node* memory(uint alias_idx);
148
149 public:
150 IdealKit(GraphKit* gkit, bool delay_all_transforms = false, bool has_declarations = false);
151 ~IdealKit() {
152 stop();
153 }
154 void sync_kit(GraphKit* gkit);
155
156 // Control
157 Node* ctrl() { return _cvstate->in(TypeFunc::Control); }
158 void set_ctrl(Node* ctrl) { _cvstate->set_req(TypeFunc::Control, ctrl); }
159 Node* top() { return C->top(); }
160 MergeMemNode* merged_memory() { return _cvstate->in(TypeFunc::Memory)->as_MergeMem(); }
161 void set_all_memory(Node* mem) { _cvstate->set_req(TypeFunc::Memory, mem); }
162 Node* i_o() { return _cvstate->in(TypeFunc::I_O); }
163 void set_i_o(Node* c) { _cvstate->set_req(TypeFunc::I_O, c); }
164 void set(IdealVariable& v, Node* rhs) { _cvstate->set_req(first_var + v.id(), rhs); }
165 Node* value(IdealVariable& v) { return _cvstate->in(first_var + v.id()); }
166 void dead(IdealVariable& v) { set(v, (Node*)NULL); }
167 void if_then(Node* left, BoolTest::mask relop, Node* right,
168 float prob = PROB_FAIR, float cnt = COUNT_UNKNOWN,
169 bool push_new_state = true);
170 void uif_then(Node* left, BoolTest::mask relop, Node* right,
171 float prob = PROB_FAIR, float cnt = COUNT_UNKNOWN,
172 bool push_new_state = true);
173 void else_();
174 void end_if();
175 void loop(GraphKit* gkit, int nargs, IdealVariable& iv, Node* init, BoolTest::mask cmp, Node* limit,
176 float prob = PROB_LIKELY(0.9), float cnt = COUNT_UNKNOWN);
177 void end_loop();
178 Node* make_label(int goto_ct);
179 void bind(Node* lab);
180 void goto_(Node* lab, bool bind = false);
181 void declarations_done();
182
183 Node* IfTrue(IfNode* iff) { return transform(new IfTrueNode(iff)); }
184 Node* IfFalse(IfNode* iff) { return transform(new IfFalseNode(iff)); }
185
186 // Data
187 Node* ConI(jint k) { return (Node*)gvn().intcon(k); }
188 Node* makecon(const Type *t) const { return _gvn.makecon(t); }
189
190 Node* AddI(Node* l, Node* r) { return transform(new AddINode(l, r)); }
191 Node* SubI(Node* l, Node* r) { return transform(new SubINode(l, r)); }
192 Node* SubL(Node* l, Node* r) { return transform(new SubLNode(l, r)); }
193 Node* AndI(Node* l, Node* r) { return transform(new AndINode(l, r)); }
194 Node* OrI(Node* l, Node* r) { return transform(new OrINode(l, r)); }
195 Node* MaxI(Node* l, Node* r) { return transform(new MaxINode(l, r)); }
196 Node* LShiftI(Node* l, Node* r) { return transform(new LShiftINode(l, r)); }
197 Node* CmpI(Node* l, Node* r) { return transform(new CmpINode(l, r)); }
198 Node* CmpU(Node* l, Node* r) { return transform(new CmpUNode(l, r)); }
199 Node* Bool(Node* cmp, BoolTest::mask relop) { return transform(new BoolNode(cmp, relop)); }
200 void increment(IdealVariable& v, Node* j) { set(v, AddI(value(v), j)); }
201 void decrement(IdealVariable& v, Node* j) { set(v, SubI(value(v), j)); }
202
203 Node* CmpL(Node* l, Node* r) { return transform(new CmpLNode(l, r)); }
204 Node* CmpUL(Node* l, Node* r) { return transform(new CmpULNode(l, r)); }
205
206 // TLS
207 Node* thread() { return gvn().transform(new ThreadLocalNode()); }
208
209 // Pointers
210
211 // Raw address should be transformed regardless 'delay_transform' flag
212 // to produce canonical form CastX2P(offset).
213 Node* AddP(Node *base, Node *ptr, Node *off) { return _gvn.transform(new AddPNode(base, ptr, off)); }
214
215 Node* CmpP(Node* l, Node* r) { return transform(new CmpPNode(l, r)); }
216 #ifdef _LP64
217 Node* XorX(Node* l, Node* r) { return transform(new XorLNode(l, r)); }
218 #else // _LP64
219 Node* XorX(Node* l, Node* r) { return transform(new XorINode(l, r)); }
220 #endif // _LP64
221 Node* URShiftX(Node* l, Node* r) { return transform(new URShiftXNode(l, r)); }
222 Node* ConX(jint k) { return (Node*)gvn().MakeConX(k); }
223 Node* CastPX(Node* ctl, Node* p) { return transform(new CastP2XNode(ctl, p)); }
224
225 // Memory operations
226
227 // This is the base version which is given an alias index.
228 Node* load(Node* ctl,
229 Node* adr,
230 const Type* t,
231 BasicType bt,
232 int adr_idx,
233 bool require_atomic_access = false);
234
235 // Return the new StoreXNode
236 Node* store(Node* ctl,
237 Node* adr,
238 Node* val,
239 BasicType bt,
240 int adr_idx,
241 MemNode::MemOrd mo,
242 bool require_atomic_access = false,
243 bool mismatched = false);
244
245 // Store a card mark ordered after store_oop
246 Node* storeCM(Node* ctl,
247 Node* adr,
248 Node* val,
249 Node* oop_store,
250 int oop_adr_idx,
251 BasicType bt,
252 int adr_idx);
253
254 // Trivial call
255 Node* make_leaf_call(const TypeFunc *slow_call_type,
256 address slow_call,
257 const char *leaf_name,
258 Node* parm0,
259 Node* parm1 = NULL,
260 Node* parm2 = NULL,
261 Node* parm3 = NULL);
262
263 void make_leaf_call_no_fp(const TypeFunc *slow_call_type,
264 address slow_call,
265 const char *leaf_name,
266 const TypePtr* adr_type,
267 Node* parm0,
268 Node* parm1,
269 Node* parm2,
270 Node* parm3);
271 };
272
273 #endif // SHARE_OPTO_IDEALKIT_HPP