Mercurial > hg > truffle
annotate graal/com.oracle.graal.hotspot/src/com/oracle/graal/hotspot/nodes/G1PreWriteBarrier.java @ 19526:8fc336a04d77
Create TYPE fields for LIRInstruction and CompositeValue. Renaming NodeClass#get to NodeClass#create.
author | Thomas Wuerthinger <thomas.wuerthinger@oracle.com> |
---|---|
date | Fri, 20 Feb 2015 22:22:55 +0100 |
parents | 61d3cb8e1280 |
children | a858c5f56d8a |
rev | line source |
---|---|
11779
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
1 /* |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
2 * Copyright (c) 2013, Oracle and/or its affiliates. All rights reserved. |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
4 * |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
5 * This code is free software; you can redistribute it and/or modify it |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
6 * under the terms of the GNU General Public License version 2 only, as |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
7 * published by the Free Software Foundation. |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
8 * |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
9 * This code is distributed in the hope that it will be useful, but WITHOUT |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
12 * version 2 for more details (a copy is included in the LICENSE file that |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
13 * accompanied this code). |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
14 * |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
15 * You should have received a copy of the GNU General Public License version |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
16 * 2 along with this work; if not, write to the Free Software Foundation, |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
18 * |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
20 * or visit www.oracle.com if you need additional information or have any |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
21 * questions. |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
22 */ |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
23 package com.oracle.graal.hotspot.nodes; |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
24 |
19396
7e2c87dae93e
Create static final NodeClass field named TYPE in Node subclasses.
Thomas Wuerthinger <thomas.wuerthinger@oracle.com>
parents:
18998
diff
changeset
|
25 import com.oracle.graal.graph.*; |
16841
cbd42807a31f
moved NodeInfo and friends into separate com.oracle.graal.nodeinfo project so that annotation processor can be applied to the base Node class
Doug Simon <doug.simon@oracle.com>
parents:
16822
diff
changeset
|
26 import com.oracle.graal.nodeinfo.*; |
11779
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
27 import com.oracle.graal.nodes.*; |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
28 import com.oracle.graal.nodes.extended.*; |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
29 |
16822
5d468add216f
added @NodeInfo annotations to all Node classes
Doug Simon <doug.simon@oracle.com>
parents:
16332
diff
changeset
|
30 @NodeInfo |
18998
ec0733b5a90a
Allow final modifier on node subclasses and start adding the modifier to leaf classes.
Thomas Wuerthinger <thomas.wuerthinger@oracle.com>
parents:
18845
diff
changeset
|
31 public final class G1PreWriteBarrier extends WriteBarrier implements DeoptimizingNode.DeoptBefore { |
11779
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
32 |
19526
8fc336a04d77
Create TYPE fields for LIRInstruction and CompositeValue. Renaming NodeClass#get to NodeClass#create.
Thomas Wuerthinger <thomas.wuerthinger@oracle.com>
parents:
19403
diff
changeset
|
33 public static final NodeClass<G1PreWriteBarrier> TYPE = NodeClass.create(G1PreWriteBarrier.class); |
19396
7e2c87dae93e
Create static final NodeClass field named TYPE in Node subclasses.
Thomas Wuerthinger <thomas.wuerthinger@oracle.com>
parents:
18998
diff
changeset
|
34 |
16897
f90dcdbbb75e
switched to using new NodeFieldIterator and NodeFieldIterable for traversing Node inputs and successors
Doug Simon <doug.simon@oracle.com>
parents:
16895
diff
changeset
|
35 @OptionalInput(InputType.State) FrameState stateBefore; |
17328
c9bb0da795d4
Backed out of changeset 17322:655f3e6b467b
Doug Simon <doug.simon@oracle.com>
parents:
17327
diff
changeset
|
36 protected final boolean nullCheck; |
c9bb0da795d4
Backed out of changeset 17322:655f3e6b467b
Doug Simon <doug.simon@oracle.com>
parents:
17327
diff
changeset
|
37 protected final boolean doLoad; |
11779
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
38 |
18845
f57d86eb036f
removed Node factory methods
Doug Simon <doug.simon@oracle.com>
parents:
17450
diff
changeset
|
39 public G1PreWriteBarrier(ValueNode object, ValueNode expectedObject, LocationNode location, boolean doLoad, boolean nullCheck) { |
19396
7e2c87dae93e
Create static final NodeClass field named TYPE in Node subclasses.
Thomas Wuerthinger <thomas.wuerthinger@oracle.com>
parents:
18998
diff
changeset
|
40 super(TYPE, object, expectedObject, location, true); |
11780
f517fefa7545
Refactor write barriers
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
11779
diff
changeset
|
41 this.doLoad = doLoad; |
f517fefa7545
Refactor write barriers
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
11779
diff
changeset
|
42 this.nullCheck = nullCheck; |
f517fefa7545
Refactor write barriers
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
11779
diff
changeset
|
43 } |
11779
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
44 |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
45 public ValueNode getExpectedObject() { |
11780
f517fefa7545
Refactor write barriers
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
11779
diff
changeset
|
46 return getValue(); |
11779
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
47 } |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
48 |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
49 public boolean doLoad() { |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
50 return doLoad; |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
51 } |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
52 |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
53 public boolean getNullCheck() { |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
54 return nullCheck; |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
55 } |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
56 |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
57 @Override |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
58 public boolean canDeoptimize() { |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
59 return nullCheck; |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
60 } |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
61 |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
62 @Override |
14734
6ae9af961b7c
Introduce separate interfaces for deoptimizing nodes that deopt to a state before, during or after their execution.
Roland Schatz <roland.schatz@oracle.com>
parents:
11834
diff
changeset
|
63 public FrameState stateBefore() { |
14783
01786db19f7d
Rename deoptState fields to reflect whether they refer to a state before or during.
Roland Schatz <roland.schatz@oracle.com>
parents:
14734
diff
changeset
|
64 return stateBefore; |
11779
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
65 } |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
66 |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
67 @Override |
14734
6ae9af961b7c
Introduce separate interfaces for deoptimizing nodes that deopt to a state before, during or after their execution.
Roland Schatz <roland.schatz@oracle.com>
parents:
11834
diff
changeset
|
68 public void setStateBefore(FrameState state) { |
14783
01786db19f7d
Rename deoptState fields to reflect whether they refer to a state before or during.
Roland Schatz <roland.schatz@oracle.com>
parents:
14734
diff
changeset
|
69 updateUsages(stateBefore, state); |
01786db19f7d
Rename deoptState fields to reflect whether they refer to a state before or during.
Roland Schatz <roland.schatz@oracle.com>
parents:
14734
diff
changeset
|
70 stateBefore = state; |
11779
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
71 } |
d55fb90c1f12
Move barriers in hotspot specific package
Christos Kotselidis <christos.kotselidis@oracle.com>
parents:
diff
changeset
|
72 } |