1/*
2 * Copyright (c) 1999, 2017, 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#include "precompiled.hpp"
26#include "c1/c1_Compilation.hpp"
27#include "c1/c1_Compiler.hpp"
28#include "c1/c1_FrameMap.hpp"
29#include "c1/c1_GraphBuilder.hpp"
30#include "c1/c1_LinearScan.hpp"
31#include "c1/c1_MacroAssembler.hpp"
32#include "c1/c1_Runtime1.hpp"
33#include "c1/c1_ValueType.hpp"
34#include "compiler/compileBroker.hpp"
35#include "interpreter/linkResolver.hpp"
36#include "memory/allocation.hpp"
37#include "memory/allocation.inline.hpp"
38#include "memory/resourceArea.hpp"
39#include "prims/nativeLookup.hpp"
40#include "runtime/arguments.hpp"
41#include "runtime/interfaceSupport.hpp"
42#include "runtime/sharedRuntime.hpp"
43#include "utilities/bitMap.inline.hpp"
44
45
46Compiler::Compiler() : AbstractCompiler(compiler_c1) {
47}
48
49void Compiler::init_c1_runtime() {
50  BufferBlob* buffer_blob = CompilerThread::current()->get_buffer_blob();
51  Arena* arena = new (mtCompiler) Arena(mtCompiler);
52  Runtime1::initialize(buffer_blob);
53  FrameMap::initialize();
54  // initialize data structures
55  ValueType::initialize(arena);
56  GraphBuilder::initialize();
57  // note: to use more than one instance of LinearScan at a time this function call has to
58  //       be moved somewhere outside of this constructor:
59  Interval::initialize(arena);
60}
61
62
63void Compiler::initialize() {
64  // Buffer blob must be allocated per C1 compiler thread at startup
65  BufferBlob* buffer_blob = init_buffer_blob();
66
67  if (should_perform_init()) {
68    if (buffer_blob == NULL) {
69      // When we come here we are in state 'initializing'; entire C1 compilation
70      // can be shut down.
71      set_state(failed);
72    } else {
73      init_c1_runtime();
74      set_state(initialized);
75    }
76  }
77}
78
79int Compiler::code_buffer_size() {
80  assert(SegmentedCodeCache, "Should be only used with a segmented code cache");
81  return Compilation::desired_max_code_buffer_size() + Compilation::desired_max_constant_size();
82}
83
84BufferBlob* Compiler::init_buffer_blob() {
85  // Allocate buffer blob once at startup since allocation for each
86  // compilation seems to be too expensive (at least on Intel win32).
87  assert (CompilerThread::current()->get_buffer_blob() == NULL, "Should initialize only once");
88
89  // setup CodeBuffer.  Preallocate a BufferBlob of size
90  // NMethodSizeLimit plus some extra space for constants.
91  int code_buffer_size = Compilation::desired_max_code_buffer_size() +
92    Compilation::desired_max_constant_size();
93
94  BufferBlob* buffer_blob = BufferBlob::create("C1 temporary CodeBuffer", code_buffer_size);
95  if (buffer_blob != NULL) {
96    CompilerThread::current()->set_buffer_blob(buffer_blob);
97  }
98
99  return buffer_blob;
100}
101
102bool Compiler::is_intrinsic_supported(const methodHandle& method) {
103  vmIntrinsics::ID id = method->intrinsic_id();
104  assert(id != vmIntrinsics::_none, "must be a VM intrinsic");
105
106  if (method->is_synchronized()) {
107    // C1 does not support intrinsification of synchronized methods.
108    return false;
109  }
110
111  switch (id) {
112  case vmIntrinsics::_compareAndSetLong:
113    if (!VM_Version::supports_cx8()) return false;
114    break;
115  case vmIntrinsics::_getAndAddInt:
116    if (!VM_Version::supports_atomic_getadd4()) return false;
117    break;
118  case vmIntrinsics::_getAndAddLong:
119    if (!VM_Version::supports_atomic_getadd8()) return false;
120    break;
121  case vmIntrinsics::_getAndSetInt:
122    if (!VM_Version::supports_atomic_getset4()) return false;
123    break;
124  case vmIntrinsics::_getAndSetLong:
125    if (!VM_Version::supports_atomic_getset8()) return false;
126    break;
127  case vmIntrinsics::_getAndSetObject:
128#ifdef _LP64
129    if (!UseCompressedOops && !VM_Version::supports_atomic_getset8()) return false;
130    if (UseCompressedOops && !VM_Version::supports_atomic_getset4()) return false;
131#else
132    if (!VM_Version::supports_atomic_getset4()) return false;
133#endif
134    break;
135  case vmIntrinsics::_onSpinWait:
136    if (!VM_Version::supports_on_spin_wait()) return false;
137    break;
138  case vmIntrinsics::_arraycopy:
139  case vmIntrinsics::_currentTimeMillis:
140  case vmIntrinsics::_nanoTime:
141  case vmIntrinsics::_Reference_get:
142    // Use the intrinsic version of Reference.get() so that the value in
143    // the referent field can be registered by the G1 pre-barrier code.
144    // Also to prevent commoning reads from this field across safepoint
145    // since GC can change its value.
146  case vmIntrinsics::_loadFence:
147  case vmIntrinsics::_storeFence:
148  case vmIntrinsics::_fullFence:
149  case vmIntrinsics::_floatToRawIntBits:
150  case vmIntrinsics::_intBitsToFloat:
151  case vmIntrinsics::_doubleToRawLongBits:
152  case vmIntrinsics::_longBitsToDouble:
153  case vmIntrinsics::_getClass:
154  case vmIntrinsics::_isInstance:
155  case vmIntrinsics::_isPrimitive:
156  case vmIntrinsics::_currentThread:
157  case vmIntrinsics::_dabs:
158  case vmIntrinsics::_dsqrt:
159  case vmIntrinsics::_dsin:
160  case vmIntrinsics::_dcos:
161  case vmIntrinsics::_dtan:
162  case vmIntrinsics::_dlog:
163  case vmIntrinsics::_dlog10:
164  case vmIntrinsics::_dexp:
165  case vmIntrinsics::_dpow:
166  case vmIntrinsics::_fmaD:
167  case vmIntrinsics::_fmaF:
168  case vmIntrinsics::_getObject:
169  case vmIntrinsics::_getBoolean:
170  case vmIntrinsics::_getByte:
171  case vmIntrinsics::_getShort:
172  case vmIntrinsics::_getChar:
173  case vmIntrinsics::_getInt:
174  case vmIntrinsics::_getLong:
175  case vmIntrinsics::_getFloat:
176  case vmIntrinsics::_getDouble:
177  case vmIntrinsics::_putObject:
178  case vmIntrinsics::_putBoolean:
179  case vmIntrinsics::_putByte:
180  case vmIntrinsics::_putShort:
181  case vmIntrinsics::_putChar:
182  case vmIntrinsics::_putInt:
183  case vmIntrinsics::_putLong:
184  case vmIntrinsics::_putFloat:
185  case vmIntrinsics::_putDouble:
186  case vmIntrinsics::_getObjectVolatile:
187  case vmIntrinsics::_getBooleanVolatile:
188  case vmIntrinsics::_getByteVolatile:
189  case vmIntrinsics::_getShortVolatile:
190  case vmIntrinsics::_getCharVolatile:
191  case vmIntrinsics::_getIntVolatile:
192  case vmIntrinsics::_getLongVolatile:
193  case vmIntrinsics::_getFloatVolatile:
194  case vmIntrinsics::_getDoubleVolatile:
195  case vmIntrinsics::_putObjectVolatile:
196  case vmIntrinsics::_putBooleanVolatile:
197  case vmIntrinsics::_putByteVolatile:
198  case vmIntrinsics::_putShortVolatile:
199  case vmIntrinsics::_putCharVolatile:
200  case vmIntrinsics::_putIntVolatile:
201  case vmIntrinsics::_putLongVolatile:
202  case vmIntrinsics::_putFloatVolatile:
203  case vmIntrinsics::_putDoubleVolatile:
204  case vmIntrinsics::_getShortUnaligned:
205  case vmIntrinsics::_getCharUnaligned:
206  case vmIntrinsics::_getIntUnaligned:
207  case vmIntrinsics::_getLongUnaligned:
208  case vmIntrinsics::_putShortUnaligned:
209  case vmIntrinsics::_putCharUnaligned:
210  case vmIntrinsics::_putIntUnaligned:
211  case vmIntrinsics::_putLongUnaligned:
212  case vmIntrinsics::_checkIndex:
213  case vmIntrinsics::_updateCRC32:
214  case vmIntrinsics::_updateBytesCRC32:
215  case vmIntrinsics::_updateByteBufferCRC32:
216#if defined(SPARC) || defined(S390) || defined(PPC64)
217  case vmIntrinsics::_updateBytesCRC32C:
218  case vmIntrinsics::_updateDirectByteBufferCRC32C:
219#endif
220  case vmIntrinsics::_vectorizedMismatch:
221  case vmIntrinsics::_compareAndSetInt:
222  case vmIntrinsics::_compareAndSetObject:
223  case vmIntrinsics::_getCharStringU:
224  case vmIntrinsics::_putCharStringU:
225#ifdef TRACE_HAVE_INTRINSICS
226  case vmIntrinsics::_counterTime:
227  case vmIntrinsics::_getBufferWriter:
228#if defined(_LP64) || !defined(TRACE_ID_CLASS_SHIFT)
229  case vmIntrinsics::_getClassId:
230#endif
231#endif
232    break;
233  default:
234    return false; // Intrinsics not on the previous list are not available.
235  }
236
237  return true;
238}
239
240void Compiler::compile_method(ciEnv* env, ciMethod* method, int entry_bci, DirectiveSet* directive) {
241  BufferBlob* buffer_blob = CompilerThread::current()->get_buffer_blob();
242  assert(buffer_blob != NULL, "Must exist");
243  // invoke compilation
244  {
245    // We are nested here because we need for the destructor
246    // of Compilation to occur before we release the any
247    // competing compiler thread
248    ResourceMark rm;
249    Compilation c(this, env, method, entry_bci, buffer_blob, directive);
250  }
251}
252
253
254void Compiler::print_timers() {
255  Compilation::print_timers();
256}
257