1 /* 2 * Copyright (c) 1999, 2012, Oracle and/or its affiliates. All rights reserved. 3 * Copyright 2009, 2010 Red Hat, Inc. 4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 5 * 6 * This code is free software; you can redistribute it and/or modify it 7 * under the terms of the GNU General Public License version 2 only, as 8 * published by the Free Software Foundation. 9 * 10 * This code is distributed in the hope that it will be useful, but WITHOUT 11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 13 * version 2 for more details (a copy is included in the LICENSE file that 14 * accompanied this code). 15 * 16 * You should have received a copy of the GNU General Public License version 17 * 2 along with this work; if not, write to the Free Software Foundation, 18 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. 19 * 20 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 21 * or visit www.oracle.com if you need additional information or have any 22 * questions. 23 * 24 */ 25 26 #include "precompiled.hpp" 27 #include "oops/arrayOop.hpp" 28 #include "oops/oop.hpp" 29 #include "shark/llvmHeaders.hpp" 30 #include "shark/sharkContext.hpp" 31 #include "utilities/globalDefinitions.hpp" 32 #include "memory/allocation.hpp" 33 34 using namespace llvm; 35 36 SharkContext::SharkContext(const char* name) 37 : LLVMContext(), 38 _free_queue(NULL) { 39 // Create a module to build our functions into 40 _module = new Module(name, *this); 41 42 // Create basic types 43 _void_type = Type::getVoidTy(*this); 44 _bit_type = Type::getInt1Ty(*this); 45 _jbyte_type = Type::getInt8Ty(*this); 46 _jshort_type = Type::getInt16Ty(*this); 47 _jint_type = Type::getInt32Ty(*this); 48 _jlong_type = Type::getInt64Ty(*this); 49 _jfloat_type = Type::getFloatTy(*this); 50 _jdouble_type = Type::getDoubleTy(*this); 51 52 // Create compound types 53 _itableOffsetEntry_type = PointerType::getUnqual( 54 ArrayType::get(jbyte_type(), itableOffsetEntry::size() * wordSize)); 55 56 _Metadata_type = PointerType::getUnqual( 57 ArrayType::get(jbyte_type(), sizeof(Metadata))); 58 59 _klass_type = PointerType::getUnqual( 60 ArrayType::get(jbyte_type(), sizeof(Klass))); 61 62 _jniEnv_type = PointerType::getUnqual( 63 ArrayType::get(jbyte_type(), sizeof(JNIEnv))); 64 65 _jniHandleBlock_type = PointerType::getUnqual( 66 ArrayType::get(jbyte_type(), sizeof(JNIHandleBlock))); 67 68 _Method_type = PointerType::getUnqual( 69 ArrayType::get(jbyte_type(), sizeof(Method))); 70 71 _monitor_type = ArrayType::get( 72 jbyte_type(), frame::interpreter_frame_monitor_size() * wordSize); 73 74 _oop_type = PointerType::getUnqual( 75 ArrayType::get(jbyte_type(), sizeof(oopDesc))); 76 77 _thread_type = PointerType::getUnqual( 78 ArrayType::get(jbyte_type(), sizeof(JavaThread))); 79 80 _zeroStack_type = PointerType::getUnqual( 81 ArrayType::get(jbyte_type(), sizeof(ZeroStack))); 82 83 std::vector<Type*> params; 84 params.push_back(Method_type()); 85 params.push_back(intptr_type()); 86 params.push_back(thread_type()); 87 _entry_point_type = FunctionType::get(jint_type(), params, false); 88 89 params.clear(); 90 params.push_back(Method_type()); 91 params.push_back(PointerType::getUnqual(jbyte_type())); 92 params.push_back(intptr_type()); 93 params.push_back(thread_type()); 94 _osr_entry_point_type = FunctionType::get(jint_type(), params, false); 95 96 // Create mappings 97 for (int i = 0; i < T_CONFLICT; i++) { 98 switch (i) { 99 case T_BOOLEAN: 100 _to_stackType[i] = jint_type(); 101 _to_arrayType[i] = jbyte_type(); 102 break; 103 104 case T_BYTE: 105 _to_stackType[i] = jint_type(); 106 _to_arrayType[i] = jbyte_type(); 107 break; 108 109 case T_CHAR: 110 _to_stackType[i] = jint_type(); 111 _to_arrayType[i] = jshort_type(); 112 break; 113 114 case T_SHORT: 115 _to_stackType[i] = jint_type(); 116 _to_arrayType[i] = jshort_type(); 117 break; 118 119 case T_INT: 120 _to_stackType[i] = jint_type(); 121 _to_arrayType[i] = jint_type(); 122 break; 123 124 case T_LONG: 125 _to_stackType[i] = jlong_type(); 126 _to_arrayType[i] = jlong_type(); 127 break; 128 129 case T_FLOAT: 130 _to_stackType[i] = jfloat_type(); 131 _to_arrayType[i] = jfloat_type(); 132 break; 133 134 case T_DOUBLE: 135 _to_stackType[i] = jdouble_type(); 136 _to_arrayType[i] = jdouble_type(); 137 break; 138 139 case T_OBJECT: 140 case T_ARRAY: 141 _to_stackType[i] = oop_type(); 142 _to_arrayType[i] = oop_type(); 143 break; 144 145 case T_ADDRESS: 146 _to_stackType[i] = intptr_type(); 147 _to_arrayType[i] = NULL; 148 break; 149 150 default: 151 _to_stackType[i] = NULL; 152 _to_arrayType[i] = NULL; 153 } 154 } 155 } 156 157 class SharkFreeQueueItem : public CHeapObj<mtNone> { 158 public: 159 SharkFreeQueueItem(llvm::Function* function, SharkFreeQueueItem *next) 160 : _function(function), _next(next) {} 161 162 private: 163 llvm::Function* _function; 164 SharkFreeQueueItem* _next; 165 166 public: 167 llvm::Function* function() const { 168 return _function; 169 } 170 SharkFreeQueueItem* next() const { 171 return _next; 172 } 173 }; 174 175 void SharkContext::push_to_free_queue(Function* function) { 176 _free_queue = new SharkFreeQueueItem(function, _free_queue); 177 } 178 179 Function* SharkContext::pop_from_free_queue() { 180 if (_free_queue == NULL) 181 return NULL; 182 183 SharkFreeQueueItem *item = _free_queue; 184 Function *function = item->function(); 185 _free_queue = item->next(); 186 delete item; 187 return function; 188 }