Fri, 13 Jun 2014 18:04:49 -0700
8043340: [macosx] Fix hard-wired paths to JavaVM.framework
Summary: Build system tweaks to allow building on OS X 10.9 and later
Reviewed-by: erikj, dholmes
dcubed@3202 | 1 | /* |
ddehaven@7562 | 2 | * Copyright (c) 2002, 2015, Oracle and/or its affiliates. All rights reserved. |
dcubed@3202 | 3 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
dcubed@3202 | 4 | * |
dcubed@3202 | 5 | * This code is free software; you can redistribute it and/or modify it |
dcubed@3202 | 6 | * under the terms of the GNU General Public License version 2 only, as |
dcubed@3202 | 7 | * published by the Free Software Foundation. |
dcubed@3202 | 8 | * |
dcubed@3202 | 9 | * This code is distributed in the hope that it will be useful, but WITHOUT |
dcubed@3202 | 10 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
dcubed@3202 | 11 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
dcubed@3202 | 12 | * version 2 for more details (a copy is included in the LICENSE file that |
dcubed@3202 | 13 | * accompanied this code). |
dcubed@3202 | 14 | * |
dcubed@3202 | 15 | * You should have received a copy of the GNU General Public License version |
dcubed@3202 | 16 | * 2 along with this work; if not, write to the Free Software Foundation, |
dcubed@3202 | 17 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
dcubed@3202 | 18 | * |
dcubed@3202 | 19 | * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
dcubed@3202 | 20 | * or visit www.oracle.com if you need additional information or have any |
dcubed@3202 | 21 | * questions. |
dcubed@3202 | 22 | * |
dcubed@3202 | 23 | */ |
dcubed@3202 | 24 | |
dcubed@3202 | 25 | #include <objc/objc-runtime.h> |
dcubed@3202 | 26 | #import <Foundation/Foundation.h> |
dcubed@3202 | 27 | #import <JavaNativeFoundation/JavaNativeFoundation.h> |
dcubed@3202 | 28 | |
ddehaven@7562 | 29 | #include <jni.h> |
dcubed@3202 | 30 | |
dcubed@3202 | 31 | #import <mach/mach.h> |
dcubed@3202 | 32 | #import <mach/mach_types.h> |
dcubed@3202 | 33 | #import <sys/sysctl.h> |
minqi@4093 | 34 | #import <stdio.h> |
minqi@4093 | 35 | #import <stdarg.h> |
dcubed@3202 | 36 | #import <stdlib.h> |
minqi@4093 | 37 | #import <strings.h> |
minqi@4093 | 38 | #import <dlfcn.h> |
minqi@4093 | 39 | #import <limits.h> |
minqi@4093 | 40 | #import <errno.h> |
sla@4603 | 41 | #import <sys/types.h> |
sla@4603 | 42 | #import <sys/ptrace.h> |
minqi@4750 | 43 | #include "libproc_impl.h" |
dcubed@3202 | 44 | |
minqi@4750 | 45 | #define UNSUPPORTED_ARCH "Unsupported architecture!" |
minqi@4750 | 46 | |
minqi@4750 | 47 | #if defined(x86_64) && !defined(amd64) |
minqi@4750 | 48 | #define amd64 1 |
minqi@4750 | 49 | #endif |
minqi@4750 | 50 | |
minqi@4750 | 51 | #if amd64 |
minqi@4750 | 52 | #include "sun_jvm_hotspot_debugger_amd64_AMD64ThreadContext.h" |
minqi@4750 | 53 | #else |
minqi@4750 | 54 | #error UNSUPPORTED_ARCH |
minqi@4750 | 55 | #endif |
dcubed@3202 | 56 | |
dcubed@3202 | 57 | static jfieldID symbolicatorID = 0; // set in _init0 |
dcubed@3202 | 58 | static jfieldID taskID = 0; // set in _init0 |
dcubed@3202 | 59 | |
minqi@4750 | 60 | static jfieldID p_ps_prochandle_ID = 0; |
minqi@4750 | 61 | static jfieldID loadObjectList_ID = 0; |
minqi@4750 | 62 | static jmethodID listAdd_ID = 0; |
minqi@4750 | 63 | |
minqi@4750 | 64 | static jmethodID createClosestSymbol_ID = 0; |
minqi@4750 | 65 | static jmethodID createLoadObject_ID = 0; |
minqi@4750 | 66 | static jmethodID getJavaThreadsInfo_ID = 0; |
minqi@4750 | 67 | |
minqi@4750 | 68 | // indicator if thread id (lwpid_t) was set |
minqi@4750 | 69 | static bool _threads_filled = false; |
minqi@4750 | 70 | |
dcubed@3202 | 71 | static void putSymbolicator(JNIEnv *env, jobject this_obj, id symbolicator) { |
dcubed@3202 | 72 | (*env)->SetLongField(env, this_obj, symbolicatorID, (jlong)(intptr_t)symbolicator); |
dcubed@3202 | 73 | } |
dcubed@3202 | 74 | |
dcubed@3202 | 75 | static id getSymbolicator(JNIEnv *env, jobject this_obj) { |
dcubed@3202 | 76 | jlong ptr = (*env)->GetLongField(env, this_obj, symbolicatorID); |
dcubed@3202 | 77 | return (id)(intptr_t)ptr; |
dcubed@3202 | 78 | } |
dcubed@3202 | 79 | |
dcubed@3202 | 80 | static void putTask(JNIEnv *env, jobject this_obj, task_t task) { |
dcubed@3202 | 81 | (*env)->SetLongField(env, this_obj, taskID, (jlong)task); |
dcubed@3202 | 82 | } |
dcubed@3202 | 83 | |
dcubed@3202 | 84 | static task_t getTask(JNIEnv *env, jobject this_obj) { |
dcubed@3202 | 85 | jlong ptr = (*env)->GetLongField(env, this_obj, taskID); |
dcubed@3202 | 86 | return (task_t)ptr; |
dcubed@3202 | 87 | } |
dcubed@3202 | 88 | |
dcubed@3202 | 89 | #define CHECK_EXCEPTION_(value) if ((*env)->ExceptionOccurred(env)) { return value; } |
dcubed@3202 | 90 | #define CHECK_EXCEPTION if ((*env)->ExceptionOccurred(env)) { return;} |
dcubed@3202 | 91 | #define THROW_NEW_DEBUGGER_EXCEPTION_(str, value) { throw_new_debugger_exception(env, str); return value; } |
dcubed@3202 | 92 | #define THROW_NEW_DEBUGGER_EXCEPTION(str) { throw_new_debugger_exception(env, str); return;} |
minqi@4093 | 93 | #define CHECK_EXCEPTION_CLEAR if ((*env)->ExceptionOccurred(env)) { (*env)->ExceptionClear(env); } |
minqi@4093 | 94 | #define CHECK_EXCEPTION_CLEAR_VOID if ((*env)->ExceptionOccurred(env)) { (*env)->ExceptionClear(env); return; } |
minqi@4093 | 95 | #define CHECK_EXCEPTION_CLEAR_(value) if ((*env)->ExceptionOccurred(env)) { (*env)->ExceptionClear(env); return value; } |
dcubed@3202 | 96 | |
dcubed@3202 | 97 | static void throw_new_debugger_exception(JNIEnv* env, const char* errMsg) { |
ccheung@6437 | 98 | jclass exceptionClass = (*env)->FindClass(env, "sun/jvm/hotspot/debugger/DebuggerException"); |
ccheung@6437 | 99 | CHECK_EXCEPTION; |
ccheung@6437 | 100 | (*env)->ThrowNew(env, exceptionClass, errMsg); |
dcubed@3202 | 101 | } |
dcubed@3202 | 102 | |
minqi@4750 | 103 | static struct ps_prochandle* get_proc_handle(JNIEnv* env, jobject this_obj) { |
minqi@4750 | 104 | jlong ptr = (*env)->GetLongField(env, this_obj, p_ps_prochandle_ID); |
minqi@4750 | 105 | return (struct ps_prochandle*)(intptr_t)ptr; |
minqi@4750 | 106 | } |
minqi@4750 | 107 | |
dcubed@3202 | 108 | #if defined(__i386__) |
dcubed@3202 | 109 | #define hsdb_thread_state_t x86_thread_state32_t |
dcubed@3202 | 110 | #define hsdb_float_state_t x86_float_state32_t |
dcubed@3202 | 111 | #define HSDB_THREAD_STATE x86_THREAD_STATE32 |
dcubed@3202 | 112 | #define HSDB_FLOAT_STATE x86_FLOAT_STATE32 |
dcubed@3202 | 113 | #define HSDB_THREAD_STATE_COUNT x86_THREAD_STATE32_COUNT |
dcubed@3202 | 114 | #define HSDB_FLOAT_STATE_COUNT x86_FLOAT_STATE32_COUNT |
dcubed@3202 | 115 | #elif defined(__x86_64__) |
dcubed@3202 | 116 | #define hsdb_thread_state_t x86_thread_state64_t |
dcubed@3202 | 117 | #define hsdb_float_state_t x86_float_state64_t |
dcubed@3202 | 118 | #define HSDB_THREAD_STATE x86_THREAD_STATE64 |
dcubed@3202 | 119 | #define HSDB_FLOAT_STATE x86_FLOAT_STATE64 |
dcubed@3202 | 120 | #define HSDB_THREAD_STATE_COUNT x86_THREAD_STATE64_COUNT |
dcubed@3202 | 121 | #define HSDB_FLOAT_STATE_COUNT x86_FLOAT_STATE64_COUNT |
dcubed@3202 | 122 | #else |
minqi@4750 | 123 | #error UNSUPPORTED_ARCH |
dcubed@3202 | 124 | #endif |
dcubed@3202 | 125 | |
dcubed@3202 | 126 | /* |
dcubed@3202 | 127 | * Class: sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal |
dcubed@3202 | 128 | * Method: init0 |
dcubed@3202 | 129 | * Signature: ()V |
dcubed@3202 | 130 | */ |
sla@4564 | 131 | JNIEXPORT void JNICALL |
sla@4564 | 132 | Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_init0(JNIEnv *env, jclass cls) { |
dcubed@3202 | 133 | symbolicatorID = (*env)->GetFieldID(env, cls, "symbolicator", "J"); |
ccheung@6437 | 134 | CHECK_EXCEPTION; |
dcubed@3202 | 135 | taskID = (*env)->GetFieldID(env, cls, "task", "J"); |
dcubed@3202 | 136 | CHECK_EXCEPTION; |
minqi@4750 | 137 | |
minqi@4750 | 138 | // for core file |
minqi@4750 | 139 | p_ps_prochandle_ID = (*env)->GetFieldID(env, cls, "p_ps_prochandle", "J"); |
minqi@4750 | 140 | CHECK_EXCEPTION; |
minqi@4750 | 141 | loadObjectList_ID = (*env)->GetFieldID(env, cls, "loadObjectList", "Ljava/util/List;"); |
minqi@4750 | 142 | CHECK_EXCEPTION; |
minqi@4750 | 143 | |
minqi@4750 | 144 | // methods we use |
minqi@4750 | 145 | createClosestSymbol_ID = (*env)->GetMethodID(env, cls, "createClosestSymbol", |
minqi@4750 | 146 | "(Ljava/lang/String;J)Lsun/jvm/hotspot/debugger/cdbg/ClosestSymbol;"); |
minqi@4750 | 147 | CHECK_EXCEPTION; |
minqi@4750 | 148 | createLoadObject_ID = (*env)->GetMethodID(env, cls, "createLoadObject", |
minqi@4750 | 149 | "(Ljava/lang/String;JJ)Lsun/jvm/hotspot/debugger/cdbg/LoadObject;"); |
minqi@4750 | 150 | CHECK_EXCEPTION; |
minqi@4750 | 151 | |
minqi@4750 | 152 | // java.util.List method we call |
minqi@4750 | 153 | jclass listClass = (*env)->FindClass(env, "java/util/List"); |
minqi@4750 | 154 | CHECK_EXCEPTION; |
minqi@4750 | 155 | listAdd_ID = (*env)->GetMethodID(env, listClass, "add", "(Ljava/lang/Object;)Z"); |
minqi@4750 | 156 | CHECK_EXCEPTION; |
minqi@4750 | 157 | getJavaThreadsInfo_ID = (*env)->GetMethodID(env, cls, "getJavaThreadsInfo", |
minqi@4750 | 158 | "()[J"); |
minqi@4750 | 159 | CHECK_EXCEPTION; |
minqi@4750 | 160 | |
minqi@4750 | 161 | init_libproc(getenv("LIBSAPROC_DEBUG") != NULL); |
minqi@4750 | 162 | } |
minqi@4750 | 163 | |
minqi@4750 | 164 | JNIEXPORT jint JNICALL Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_getAddressSize |
minqi@4750 | 165 | (JNIEnv *env, jclass cls) |
minqi@4750 | 166 | { |
minqi@4750 | 167 | #ifdef _LP64 |
minqi@4750 | 168 | return 8; |
minqi@4750 | 169 | #else |
minqi@4750 | 170 | #error UNSUPPORTED_ARCH |
minqi@4750 | 171 | #endif |
minqi@4750 | 172 | } |
minqi@4750 | 173 | |
minqi@4750 | 174 | /** called by Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_lookupByName0 */ |
minqi@4750 | 175 | jlong lookupByNameIncore( |
minqi@4750 | 176 | JNIEnv *env, struct ps_prochandle *ph, jobject this_obj, jstring objectName, jstring symbolName) |
minqi@4750 | 177 | { |
minqi@4750 | 178 | const char *objectName_cstr, *symbolName_cstr; |
minqi@4750 | 179 | jlong addr; |
minqi@4750 | 180 | jboolean isCopy; |
minqi@4750 | 181 | objectName_cstr = NULL; |
minqi@4750 | 182 | if (objectName != NULL) { |
minqi@4750 | 183 | objectName_cstr = (*env)->GetStringUTFChars(env, objectName, &isCopy); |
minqi@4750 | 184 | CHECK_EXCEPTION_(0); |
minqi@4750 | 185 | } |
minqi@4750 | 186 | symbolName_cstr = (*env)->GetStringUTFChars(env, symbolName, &isCopy); |
minqi@4750 | 187 | CHECK_EXCEPTION_(0); |
minqi@4750 | 188 | |
minqi@4750 | 189 | print_debug("look for %s \n", symbolName_cstr); |
minqi@4750 | 190 | addr = (jlong) lookup_symbol(ph, objectName_cstr, symbolName_cstr); |
minqi@4750 | 191 | |
minqi@4750 | 192 | if (objectName_cstr != NULL) { |
minqi@4750 | 193 | (*env)->ReleaseStringUTFChars(env, objectName, objectName_cstr); |
minqi@4750 | 194 | } |
minqi@4750 | 195 | (*env)->ReleaseStringUTFChars(env, symbolName, symbolName_cstr); |
minqi@4750 | 196 | return addr; |
dcubed@3202 | 197 | } |
dcubed@3202 | 198 | |
dcubed@3202 | 199 | /* |
dcubed@3202 | 200 | * Class: sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal |
dcubed@3202 | 201 | * Method: lookupByName0 |
dcubed@3202 | 202 | * Signature: (Ljava/lang/String;Ljava/lang/String;)J |
dcubed@3202 | 203 | */ |
sla@4564 | 204 | JNIEXPORT jlong JNICALL |
sla@4564 | 205 | Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_lookupByName0( |
sla@4564 | 206 | JNIEnv *env, jobject this_obj, |
sla@4564 | 207 | jstring objectName, jstring symbolName) |
sla@4564 | 208 | { |
minqi@4750 | 209 | struct ps_prochandle* ph = get_proc_handle(env, this_obj); |
sla@4990 | 210 | if (ph != NULL && ph->core != NULL) { |
minqi@4750 | 211 | return lookupByNameIncore(env, ph, this_obj, objectName, symbolName); |
minqi@4750 | 212 | } |
minqi@4750 | 213 | |
dcubed@3202 | 214 | jlong address = 0; |
dcubed@3202 | 215 | |
dcubed@3202 | 216 | JNF_COCOA_ENTER(env); |
dcubed@3202 | 217 | NSString *symbolNameString = JNFJavaToNSString(env, symbolName); |
dcubed@3202 | 218 | |
minqi@4750 | 219 | print_debug("lookupInProcess called for %s\n", [symbolNameString UTF8String]); |
dcubed@3202 | 220 | |
dcubed@3202 | 221 | id symbolicator = getSymbolicator(env, this_obj); |
dcubed@3202 | 222 | if (symbolicator != nil) { |
dcubed@3202 | 223 | uint64_t (*dynamicCall)(id, SEL, NSString *) = (uint64_t (*)(id, SEL, NSString *))&objc_msgSend; |
dcubed@3202 | 224 | address = (jlong) dynamicCall(symbolicator, @selector(addressForSymbol:), symbolNameString); |
dcubed@3202 | 225 | } |
dcubed@3202 | 226 | |
minqi@4750 | 227 | print_debug("address of symbol %s = %llx\n", [symbolNameString UTF8String], address); |
dcubed@3202 | 228 | JNF_COCOA_EXIT(env); |
dcubed@3202 | 229 | |
dcubed@3202 | 230 | return address; |
dcubed@3202 | 231 | } |
dcubed@3202 | 232 | |
dcubed@3202 | 233 | /* |
dcubed@3202 | 234 | * Class: sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal |
minqi@4750 | 235 | * Method: lookupByAddress0 |
minqi@4750 | 236 | * Signature: (J)Lsun/jvm/hotspot/debugger/cdbg/ClosestSymbol; |
minqi@4750 | 237 | */ |
minqi@4750 | 238 | JNIEXPORT jobject JNICALL Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_lookupByAddress0 |
minqi@4750 | 239 | (JNIEnv *env, jobject this_obj, jlong addr) { |
minqi@4750 | 240 | uintptr_t offset; |
minqi@4750 | 241 | const char* sym = NULL; |
ccheung@6437 | 242 | jstring sym_string; |
minqi@4750 | 243 | |
minqi@4750 | 244 | struct ps_prochandle* ph = get_proc_handle(env, this_obj); |
sla@4990 | 245 | if (ph != NULL && ph->core != NULL) { |
sla@4990 | 246 | sym = symbol_for_pc(ph, (uintptr_t) addr, &offset); |
sla@4990 | 247 | if (sym == NULL) return 0; |
ccheung@6437 | 248 | sym_string = (*env)->NewStringUTF(env, sym); |
ccheung@6437 | 249 | CHECK_EXCEPTION_(0); |
sla@4990 | 250 | return (*env)->CallObjectMethod(env, this_obj, createClosestSymbol_ID, |
ccheung@6437 | 251 | sym_string, (jlong)offset); |
sla@4990 | 252 | } |
sla@4990 | 253 | return 0; |
minqi@4750 | 254 | } |
minqi@4750 | 255 | |
minqi@4750 | 256 | /** called from Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_readBytesFromProcess0 */ |
minqi@4750 | 257 | jbyteArray readBytesFromCore( |
minqi@4750 | 258 | JNIEnv *env, struct ps_prochandle *ph, jobject this_obj, jlong addr, jlong numBytes) |
minqi@4750 | 259 | { |
minqi@4750 | 260 | jboolean isCopy; |
minqi@4750 | 261 | jbyteArray array; |
minqi@4750 | 262 | jbyte *bufPtr; |
minqi@4750 | 263 | ps_err_e err; |
minqi@4750 | 264 | |
minqi@4750 | 265 | array = (*env)->NewByteArray(env, numBytes); |
minqi@4750 | 266 | CHECK_EXCEPTION_(0); |
minqi@4750 | 267 | bufPtr = (*env)->GetByteArrayElements(env, array, &isCopy); |
minqi@4750 | 268 | CHECK_EXCEPTION_(0); |
minqi@4750 | 269 | |
minqi@4750 | 270 | err = ps_pread(ph, (psaddr_t) (uintptr_t)addr, bufPtr, numBytes); |
minqi@4750 | 271 | (*env)->ReleaseByteArrayElements(env, array, bufPtr, 0); |
minqi@4750 | 272 | return (err == PS_OK)? array : 0; |
minqi@4750 | 273 | } |
minqi@4750 | 274 | |
minqi@4750 | 275 | /* |
minqi@4750 | 276 | * Class: sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal |
dcubed@3202 | 277 | * Method: readBytesFromProcess0 |
dcubed@3202 | 278 | * Signature: (JJ)Lsun/jvm/hotspot/debugger/ReadResult; |
dcubed@3202 | 279 | */ |
sla@4564 | 280 | JNIEXPORT jbyteArray JNICALL |
sla@4564 | 281 | Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_readBytesFromProcess0( |
sla@4564 | 282 | JNIEnv *env, jobject this_obj, |
sla@4564 | 283 | jlong addr, jlong numBytes) |
sla@4564 | 284 | { |
minqi@4750 | 285 | print_debug("readBytesFromProcess called. addr = %llx numBytes = %lld\n", addr, numBytes); |
dcubed@3202 | 286 | |
dcubed@3202 | 287 | // must allocate storage instead of using former parameter buf |
dcubed@3202 | 288 | jbyteArray array; |
minqi@4750 | 289 | |
minqi@4750 | 290 | struct ps_prochandle* ph = get_proc_handle(env, this_obj); |
sla@4990 | 291 | if (ph != NULL && ph->core != NULL) { |
minqi@4750 | 292 | return readBytesFromCore(env, ph, this_obj, addr, numBytes); |
minqi@4750 | 293 | } |
dcubed@3202 | 294 | |
dcubed@3202 | 295 | array = (*env)->NewByteArray(env, numBytes); |
dcubed@3202 | 296 | CHECK_EXCEPTION_(0); |
dcubed@3202 | 297 | |
dcubed@3202 | 298 | unsigned long alignedAddress; |
morris@4688 | 299 | unsigned long alignedLength = 0; |
dcubed@3202 | 300 | kern_return_t result; |
dcubed@3202 | 301 | vm_offset_t *pages; |
dcubed@3202 | 302 | int *mapped; |
dcubed@3202 | 303 | long pageCount; |
dcubed@3202 | 304 | uint byteCount; |
dcubed@3202 | 305 | int i; |
dcubed@3202 | 306 | unsigned long remaining; |
dcubed@3202 | 307 | |
dcubed@3202 | 308 | alignedAddress = trunc_page(addr); |
dcubed@3202 | 309 | if (addr != alignedAddress) { |
dcubed@3202 | 310 | alignedLength += addr - alignedAddress; |
dcubed@3202 | 311 | } |
dcubed@3202 | 312 | alignedLength = round_page(numBytes); |
dcubed@3202 | 313 | pageCount = alignedLength/vm_page_size; |
dcubed@3202 | 314 | |
dcubed@3202 | 315 | // Allocate storage for pages and flags. |
dcubed@3202 | 316 | pages = malloc(pageCount * sizeof(vm_offset_t)); |
dcubed@3202 | 317 | mapped = calloc(pageCount, sizeof(int)); |
dcubed@3202 | 318 | |
dcubed@3202 | 319 | task_t gTask = getTask(env, this_obj); |
dcubed@3202 | 320 | // Try to read each of the pages. |
dcubed@3202 | 321 | for (i = 0; i < pageCount; i++) { |
dcubed@3202 | 322 | result = vm_read(gTask, alignedAddress + i*vm_page_size, vm_page_size, |
dcubed@3202 | 323 | &pages[i], &byteCount); |
dcubed@3202 | 324 | mapped[i] = (result == KERN_SUCCESS); |
dcubed@3202 | 325 | // assume all failures are unmapped pages |
dcubed@3202 | 326 | } |
dcubed@3202 | 327 | |
minqi@4750 | 328 | print_debug("%ld pages\n", pageCount); |
dcubed@3202 | 329 | |
dcubed@3202 | 330 | remaining = numBytes; |
dcubed@3202 | 331 | |
dcubed@3202 | 332 | for (i = 0; i < pageCount; i++) { |
dcubed@3202 | 333 | unsigned long len = vm_page_size; |
dcubed@3202 | 334 | unsigned long start = 0; |
dcubed@3202 | 335 | |
dcubed@3202 | 336 | if (i == 0) { |
dcubed@3202 | 337 | start = addr - alignedAddress; |
dcubed@3202 | 338 | len = vm_page_size - start; |
dcubed@3202 | 339 | } |
dcubed@3202 | 340 | |
dcubed@3202 | 341 | if (i == (pageCount - 1)) { |
dcubed@3202 | 342 | len = remaining; |
dcubed@3202 | 343 | } |
dcubed@3202 | 344 | |
dcubed@3202 | 345 | if (mapped[i]) { |
minqi@4750 | 346 | print_debug("page %d mapped (len %ld start %ld)\n", i, len, start); |
dcubed@3202 | 347 | (*env)->SetByteArrayRegion(env, array, 0, len, ((jbyte *) pages[i] + start)); |
dcubed@3202 | 348 | vm_deallocate(mach_task_self(), pages[i], vm_page_size); |
dcubed@3202 | 349 | } |
dcubed@3202 | 350 | |
dcubed@3202 | 351 | remaining -= len; |
dcubed@3202 | 352 | } |
dcubed@3202 | 353 | |
dcubed@3202 | 354 | free (pages); |
dcubed@3202 | 355 | free (mapped); |
dcubed@3202 | 356 | return array; |
dcubed@3202 | 357 | } |
dcubed@3202 | 358 | |
minqi@4750 | 359 | /** Only used for core file reading, set thread_id for threads which is got after core file parsed. |
minqi@4750 | 360 | * Thread context is available in Mach-O core file but thread id is not. We can get thread id |
minqi@4750 | 361 | * from Threads which store all java threads information when they are created. Here we can identify |
minqi@4750 | 362 | * them as java threads by checking if a thread's rsp or rbp within a java thread's stack. |
minqi@4750 | 363 | * Note Macosx uses unique_thread_id which is different from other platforms though printed ids |
minqi@4750 | 364 | * are still pthread id. Function BsdDebuggerLocal.getJavaThreadsInfo returns an array of long |
minqi@4750 | 365 | * integers to host all java threads' id, stack_start, stack_end as: |
minqi@4750 | 366 | * [uid0, stack_start0, stack_end0, uid1, stack_start1, stack_end1, ...] |
minqi@4750 | 367 | * |
minqi@4750 | 368 | * The work cannot be done at init0 since Threads is not available yet(VM not initialized yet). |
minqi@4750 | 369 | * This function should be called only once if succeeded |
minqi@4750 | 370 | */ |
minqi@4750 | 371 | bool fill_java_threads(JNIEnv* env, jobject this_obj, struct ps_prochandle* ph) { |
minqi@4750 | 372 | int n = 0, i = 0, j; |
minqi@4750 | 373 | struct reg regs; |
minqi@4750 | 374 | |
minqi@4750 | 375 | jlongArray thrinfos = (*env)->CallObjectMethod(env, this_obj, getJavaThreadsInfo_ID); |
minqi@4750 | 376 | CHECK_EXCEPTION_(false); |
minqi@4750 | 377 | int len = (int)(*env)->GetArrayLength(env, thrinfos); |
minqi@4750 | 378 | uint64_t* cinfos = (uint64_t *)(*env)->GetLongArrayElements(env, thrinfos, NULL); |
minqi@4750 | 379 | CHECK_EXCEPTION_(false); |
minqi@4750 | 380 | n = get_num_threads(ph); |
minqi@4750 | 381 | print_debug("fill_java_threads called, num_of_thread = %d\n", n); |
minqi@4750 | 382 | for (i = 0; i < n; i++) { |
minqi@4750 | 383 | if (!get_nth_lwp_regs(ph, i, ®s)) { |
minqi@4750 | 384 | print_debug("Could not get regs of thread %d, already set!\n", i); |
minqi@4750 | 385 | return false; |
minqi@4750 | 386 | } |
minqi@4750 | 387 | for (j = 0; j < len; j += 3) { |
minqi@4750 | 388 | lwpid_t uid = cinfos[j]; |
minqi@4750 | 389 | uint64_t beg = cinfos[j + 1]; |
minqi@4750 | 390 | uint64_t end = cinfos[j + 2]; |
minqi@4750 | 391 | if ((regs.r_rsp < end && regs.r_rsp >= beg) || |
minqi@4750 | 392 | (regs.r_rbp < end && regs.r_rbp >= beg)) { |
minqi@4750 | 393 | set_lwp_id(ph, i, uid); |
minqi@4750 | 394 | break; |
minqi@4750 | 395 | } |
minqi@4750 | 396 | } |
minqi@4750 | 397 | } |
minqi@4750 | 398 | (*env)->ReleaseLongArrayElements(env, thrinfos, (jlong*)cinfos, 0); |
minqi@4750 | 399 | CHECK_EXCEPTION_(false); |
minqi@4750 | 400 | return true; |
minqi@4750 | 401 | } |
minqi@4750 | 402 | |
minqi@4750 | 403 | /* For core file only, called from |
minqi@4750 | 404 | * Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_getThreadIntegerRegisterSet0 |
minqi@4750 | 405 | */ |
sla@4990 | 406 | jlongArray getThreadIntegerRegisterSetFromCore(JNIEnv *env, jobject this_obj, long lwp_id, struct ps_prochandle* ph) { |
minqi@4750 | 407 | if (!_threads_filled) { |
sla@4990 | 408 | if (!fill_java_threads(env, this_obj, ph)) { |
minqi@4750 | 409 | throw_new_debugger_exception(env, "Failed to fill in threads"); |
minqi@4750 | 410 | return 0; |
minqi@4750 | 411 | } else { |
minqi@4750 | 412 | _threads_filled = true; |
minqi@4750 | 413 | } |
minqi@4750 | 414 | } |
minqi@4750 | 415 | |
minqi@4750 | 416 | struct reg gregs; |
minqi@4750 | 417 | jboolean isCopy; |
minqi@4750 | 418 | jlongArray array; |
minqi@4750 | 419 | jlong *regs; |
minqi@4750 | 420 | |
minqi@4750 | 421 | if (get_lwp_regs(ph, lwp_id, &gregs) != true) { |
minqi@4750 | 422 | THROW_NEW_DEBUGGER_EXCEPTION_("get_thread_regs failed for a lwp", 0); |
minqi@4750 | 423 | } |
minqi@4750 | 424 | |
minqi@4750 | 425 | #undef NPRGREG |
minqi@4750 | 426 | #undef REG_INDEX |
minqi@4750 | 427 | #if amd64 |
minqi@4750 | 428 | #define NPRGREG sun_jvm_hotspot_debugger_amd64_AMD64ThreadContext_NPRGREG |
minqi@4750 | 429 | #define REG_INDEX(reg) sun_jvm_hotspot_debugger_amd64_AMD64ThreadContext_##reg |
minqi@4750 | 430 | |
minqi@4750 | 431 | array = (*env)->NewLongArray(env, NPRGREG); |
minqi@4750 | 432 | CHECK_EXCEPTION_(0); |
minqi@4750 | 433 | regs = (*env)->GetLongArrayElements(env, array, &isCopy); |
minqi@4750 | 434 | |
minqi@4750 | 435 | regs[REG_INDEX(R15)] = gregs.r_r15; |
minqi@4750 | 436 | regs[REG_INDEX(R14)] = gregs.r_r14; |
minqi@4750 | 437 | regs[REG_INDEX(R13)] = gregs.r_r13; |
minqi@4750 | 438 | regs[REG_INDEX(R12)] = gregs.r_r12; |
minqi@4750 | 439 | regs[REG_INDEX(RBP)] = gregs.r_rbp; |
minqi@4750 | 440 | regs[REG_INDEX(RBX)] = gregs.r_rbx; |
minqi@4750 | 441 | regs[REG_INDEX(R11)] = gregs.r_r11; |
minqi@4750 | 442 | regs[REG_INDEX(R10)] = gregs.r_r10; |
minqi@4750 | 443 | regs[REG_INDEX(R9)] = gregs.r_r9; |
minqi@4750 | 444 | regs[REG_INDEX(R8)] = gregs.r_r8; |
minqi@4750 | 445 | regs[REG_INDEX(RAX)] = gregs.r_rax; |
minqi@4750 | 446 | regs[REG_INDEX(RCX)] = gregs.r_rcx; |
minqi@4750 | 447 | regs[REG_INDEX(RDX)] = gregs.r_rdx; |
minqi@4750 | 448 | regs[REG_INDEX(RSI)] = gregs.r_rsi; |
minqi@4750 | 449 | regs[REG_INDEX(RDI)] = gregs.r_rdi; |
minqi@4750 | 450 | regs[REG_INDEX(RIP)] = gregs.r_rip; |
minqi@4750 | 451 | regs[REG_INDEX(CS)] = gregs.r_cs; |
minqi@4750 | 452 | regs[REG_INDEX(RSP)] = gregs.r_rsp; |
minqi@4750 | 453 | regs[REG_INDEX(SS)] = gregs.r_ss; |
minqi@4750 | 454 | regs[REG_INDEX(FSBASE)] = 0; |
minqi@4750 | 455 | regs[REG_INDEX(GSBASE)] = 0; |
minqi@4750 | 456 | regs[REG_INDEX(DS)] = gregs.r_ds; |
minqi@4750 | 457 | regs[REG_INDEX(ES)] = gregs.r_es; |
minqi@4750 | 458 | regs[REG_INDEX(FS)] = gregs.r_fs; |
minqi@4750 | 459 | regs[REG_INDEX(GS)] = gregs.r_gs; |
minqi@4750 | 460 | regs[REG_INDEX(TRAPNO)] = gregs.r_trapno; |
minqi@4750 | 461 | regs[REG_INDEX(RFL)] = gregs.r_rflags; |
minqi@4750 | 462 | |
minqi@4750 | 463 | #endif /* amd64 */ |
minqi@4750 | 464 | (*env)->ReleaseLongArrayElements(env, array, regs, JNI_COMMIT); |
minqi@4750 | 465 | return array; |
minqi@4750 | 466 | } |
sla@4564 | 467 | |
dcubed@3202 | 468 | /* |
sla@4564 | 469 | * Lookup the thread_t that corresponds to the given thread_id. |
sla@4564 | 470 | * The thread_id should be the result from calling thread_info() with THREAD_IDENTIFIER_INFO |
sla@4564 | 471 | * and reading the m_ident_info.thread_id returned. |
sla@4564 | 472 | * The returned thread_t is the mach send right to the kernel port for the corresponding thread. |
sla@4564 | 473 | * |
sla@4564 | 474 | * We cannot simply use the OSThread._thread_id field in the JVM. This is set to ::mach_thread_self() |
sla@4564 | 475 | * in the VM, but that thread port is not valid for a remote debugger to access the thread. |
sla@4564 | 476 | */ |
sla@4564 | 477 | thread_t |
sla@4564 | 478 | lookupThreadFromThreadId(task_t task, jlong thread_id) { |
minqi@4750 | 479 | print_debug("lookupThreadFromThreadId thread_id=0x%llx\n", thread_id); |
sla@4564 | 480 | |
sla@4564 | 481 | thread_array_t thread_list = NULL; |
sla@4564 | 482 | mach_msg_type_number_t thread_list_count = 0; |
sla@4564 | 483 | thread_t result_thread = 0; |
sla@4564 | 484 | int i; |
sla@4564 | 485 | |
sla@4564 | 486 | // get the list of all the send rights |
sla@4564 | 487 | kern_return_t result = task_threads(task, &thread_list, &thread_list_count); |
sla@4564 | 488 | if (result != KERN_SUCCESS) { |
minqi@4750 | 489 | print_debug("task_threads returned 0x%x\n", result); |
sla@4564 | 490 | return 0; |
sla@4564 | 491 | } |
sla@4564 | 492 | |
sla@4564 | 493 | for(i = 0 ; i < thread_list_count; i++) { |
sla@4564 | 494 | thread_identifier_info_data_t m_ident_info; |
sla@4564 | 495 | mach_msg_type_number_t count = THREAD_IDENTIFIER_INFO_COUNT; |
sla@4564 | 496 | |
sla@4564 | 497 | // get the THREAD_IDENTIFIER_INFO for the send right |
sla@4564 | 498 | result = thread_info(thread_list[i], THREAD_IDENTIFIER_INFO, (thread_info_t) &m_ident_info, &count); |
sla@4564 | 499 | if (result != KERN_SUCCESS) { |
minqi@4750 | 500 | print_debug("thread_info returned 0x%x\n", result); |
sla@4564 | 501 | break; |
sla@4564 | 502 | } |
sla@4564 | 503 | |
sla@4564 | 504 | // if this is the one we're looking for, return the send right |
sla@4564 | 505 | if (thread_id == m_ident_info.thread_id) |
sla@4564 | 506 | { |
sla@4564 | 507 | result_thread = thread_list[i]; |
sla@4564 | 508 | break; |
sla@4564 | 509 | } |
sla@4564 | 510 | } |
sla@4564 | 511 | |
sla@4564 | 512 | vm_size_t thread_list_size = (vm_size_t) (thread_list_count * sizeof (thread_t)); |
sla@4564 | 513 | vm_deallocate(mach_task_self(), (vm_address_t) thread_list, thread_list_count); |
sla@4564 | 514 | |
sla@4564 | 515 | return result_thread; |
sla@4564 | 516 | } |
sla@4564 | 517 | |
sla@4564 | 518 | |
sla@4564 | 519 | /* |
sla@4564 | 520 | * Class: sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal |
dcubed@3202 | 521 | * Method: getThreadIntegerRegisterSet0 |
sla@4564 | 522 | * Signature: (J)[J |
dcubed@3202 | 523 | */ |
sla@4564 | 524 | JNIEXPORT jlongArray JNICALL |
sla@4564 | 525 | Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_getThreadIntegerRegisterSet0( |
sla@4564 | 526 | JNIEnv *env, jobject this_obj, |
sla@4564 | 527 | jlong thread_id) |
sla@4564 | 528 | { |
minqi@4750 | 529 | print_debug("getThreadRegisterSet0 called\n"); |
minqi@4750 | 530 | |
minqi@4750 | 531 | struct ps_prochandle* ph = get_proc_handle(env, this_obj); |
sla@4990 | 532 | if (ph != NULL && ph->core != NULL) { |
sla@4990 | 533 | return getThreadIntegerRegisterSetFromCore(env, this_obj, thread_id, ph); |
minqi@4750 | 534 | } |
dcubed@3202 | 535 | |
dcubed@3202 | 536 | kern_return_t result; |
dcubed@3202 | 537 | thread_t tid; |
dcubed@3202 | 538 | mach_msg_type_number_t count = HSDB_THREAD_STATE_COUNT; |
dcubed@3202 | 539 | hsdb_thread_state_t state; |
dcubed@3202 | 540 | jlongArray registerArray; |
dcubed@3202 | 541 | jlong *primitiveArray; |
sla@4564 | 542 | task_t gTask = getTask(env, this_obj); |
dcubed@3202 | 543 | |
sla@4564 | 544 | tid = lookupThreadFromThreadId(gTask, thread_id); |
dcubed@3202 | 545 | |
dcubed@3202 | 546 | result = thread_get_state(tid, HSDB_THREAD_STATE, (thread_state_t)&state, &count); |
dcubed@3202 | 547 | |
dcubed@3202 | 548 | if (result != KERN_SUCCESS) { |
minqi@4750 | 549 | print_error("getregs: thread_get_state(%d) failed (%d)\n", tid, result); |
dcubed@3202 | 550 | return NULL; |
dcubed@3202 | 551 | } |
dcubed@3202 | 552 | |
minqi@4750 | 553 | #if amd64 |
minqi@4750 | 554 | #define NPRGREG sun_jvm_hotspot_debugger_amd64_AMD64ThreadContext_NPRGREG |
minqi@4750 | 555 | #undef REG_INDEX |
minqi@4750 | 556 | #define REG_INDEX(reg) sun_jvm_hotspot_debugger_amd64_AMD64ThreadContext_##reg |
dcubed@3202 | 557 | |
minqi@4750 | 558 | // 64 bit |
minqi@4750 | 559 | print_debug("Getting threads for a 64-bit process\n"); |
minqi@4750 | 560 | registerArray = (*env)->NewLongArray(env, NPRGREG); |
minqi@4750 | 561 | CHECK_EXCEPTION_(0); |
minqi@4750 | 562 | primitiveArray = (*env)->GetLongArrayElements(env, registerArray, NULL); |
dcubed@3202 | 563 | |
minqi@4750 | 564 | primitiveArray[REG_INDEX(R15)] = state.__r15; |
minqi@4750 | 565 | primitiveArray[REG_INDEX(R14)] = state.__r14; |
minqi@4750 | 566 | primitiveArray[REG_INDEX(R13)] = state.__r13; |
minqi@4750 | 567 | primitiveArray[REG_INDEX(R12)] = state.__r12; |
minqi@4750 | 568 | primitiveArray[REG_INDEX(R11)] = state.__r11; |
minqi@4750 | 569 | primitiveArray[REG_INDEX(R10)] = state.__r10; |
minqi@4750 | 570 | primitiveArray[REG_INDEX(R9)] = state.__r9; |
minqi@4750 | 571 | primitiveArray[REG_INDEX(R8)] = state.__r8; |
minqi@4750 | 572 | primitiveArray[REG_INDEX(RDI)] = state.__rdi; |
minqi@4750 | 573 | primitiveArray[REG_INDEX(RSI)] = state.__rsi; |
minqi@4750 | 574 | primitiveArray[REG_INDEX(RBP)] = state.__rbp; |
minqi@4750 | 575 | primitiveArray[REG_INDEX(RBX)] = state.__rbx; |
minqi@4750 | 576 | primitiveArray[REG_INDEX(RDX)] = state.__rdx; |
minqi@4750 | 577 | primitiveArray[REG_INDEX(RCX)] = state.__rcx; |
minqi@4750 | 578 | primitiveArray[REG_INDEX(RAX)] = state.__rax; |
minqi@4750 | 579 | primitiveArray[REG_INDEX(TRAPNO)] = 0; // trapno, not used |
minqi@4750 | 580 | primitiveArray[REG_INDEX(ERR)] = 0; // err, not used |
minqi@4750 | 581 | primitiveArray[REG_INDEX(RIP)] = state.__rip; |
minqi@4750 | 582 | primitiveArray[REG_INDEX(CS)] = state.__cs; |
minqi@4750 | 583 | primitiveArray[REG_INDEX(RFL)] = state.__rflags; |
minqi@4750 | 584 | primitiveArray[REG_INDEX(RSP)] = state.__rsp; |
minqi@4750 | 585 | primitiveArray[REG_INDEX(SS)] = 0; // We don't have SS |
minqi@4750 | 586 | primitiveArray[REG_INDEX(FS)] = state.__fs; |
minqi@4750 | 587 | primitiveArray[REG_INDEX(GS)] = state.__gs; |
minqi@4750 | 588 | primitiveArray[REG_INDEX(ES)] = 0; |
minqi@4750 | 589 | primitiveArray[REG_INDEX(DS)] = 0; |
minqi@4750 | 590 | primitiveArray[REG_INDEX(FSBASE)] = 0; |
minqi@4750 | 591 | primitiveArray[REG_INDEX(GSBASE)] = 0; |
minqi@4750 | 592 | print_debug("set registers\n"); |
dcubed@3202 | 593 | |
minqi@4750 | 594 | (*env)->ReleaseLongArrayElements(env, registerArray, primitiveArray, 0); |
minqi@4750 | 595 | |
dcubed@3202 | 596 | #else |
minqi@4750 | 597 | #error UNSUPPORTED_ARCH |
minqi@4750 | 598 | #endif /* amd64 */ |
dcubed@3202 | 599 | |
dcubed@3202 | 600 | return registerArray; |
dcubed@3202 | 601 | } |
dcubed@3202 | 602 | |
dcubed@3202 | 603 | /* |
sla@4564 | 604 | * Class: sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal |
dcubed@3202 | 605 | * Method: translateTID0 |
dcubed@3202 | 606 | * Signature: (I)I |
dcubed@3202 | 607 | */ |
dcubed@3202 | 608 | JNIEXPORT jint JNICALL |
sla@4564 | 609 | Java_sun_jvm_hotspot_debugger_macosx_MacOSXDebuggerLocal_translateTID0( |
sla@4564 | 610 | JNIEnv *env, jobject this_obj, jint tid) |
sla@4564 | 611 | { |
minqi@4750 | 612 | print_debug("translateTID0 called on tid = 0x%x\n", (int)tid); |
dcubed@3202 | 613 | |
dcubed@3202 | 614 | kern_return_t result; |
dcubed@3202 | 615 | thread_t foreign_tid, usable_tid; |
dcubed@3202 | 616 | mach_msg_type_name_t type; |
sla@4564 | 617 | |
dcubed@3202 | 618 | foreign_tid = tid; |
dcubed@3202 | 619 | |
dcubed@3202 | 620 | task_t gTask = getTask(env, this_obj); |
dcubed@3202 | 621 | result = mach_port_extract_right(gTask, foreign_tid, |
dcubed@3202 | 622 | MACH_MSG_TYPE_COPY_SEND, |
dcubed@3202 | 623 | &usable_tid, &type); |
dcubed@3202 | 624 | if (result != KERN_SUCCESS) |
dcubed@3202 | 625 | return -1; |
dcubed@3202 | 626 | |
minqi@4750 | 627 | print_debug("translateTID0: 0x%x -> 0x%x\n", foreign_tid, usable_tid); |
dcubed@3202 | 628 | |
dcubed@3202 | 629 | return (jint) usable_tid; |
dcubed@3202 | 630 | } |
dcubed@3202 | 631 | |
sla@4603 | 632 | |
sla@4603 | 633 | static bool ptrace_continue(pid_t pid, int signal) { |
sla@4603 | 634 | // pass the signal to the process so we don't swallow it |
sla@4603 | 635 | int res; |
sla@4603 | 636 | if ((res = ptrace(PT_CONTINUE, pid, (caddr_t)1, signal)) < 0) { |
minqi@4750 | 637 | print_error("attach: ptrace(PT_CONTINUE, %d) failed with %d\n", pid, res); |
sla@4603 | 638 | return false; |
sla@4603 | 639 | } |
sla@4603 | 640 | return true; |
sla@4603 | 641 | } |
sla@4603 | 642 | |
sla@4603 | 643 | // waits until the ATTACH has stopped the process |
sla@4603 | 644 | // by signal SIGSTOP |
sla@4603 | 645 | static bool ptrace_waitpid(pid_t pid) { |
sla@4603 | 646 | int ret; |
sla@4603 | 647 | int status; |
sla@4603 | 648 | while (true) { |
sla@4603 | 649 | // Wait for debuggee to stop. |
sla@4603 | 650 | ret = waitpid(pid, &status, 0); |
sla@4603 | 651 | if (ret >= 0) { |
sla@4603 | 652 | if (WIFSTOPPED(status)) { |
sla@4603 | 653 | // Any signal will stop the thread, make sure it is SIGSTOP. Otherwise SIGSTOP |
sla@4603 | 654 | // will still be pending and delivered when the process is DETACHED and the process |
sla@4603 | 655 | // will go to sleep. |
sla@4603 | 656 | if (WSTOPSIG(status) == SIGSTOP) { |
sla@4603 | 657 | // Debuggee stopped by SIGSTOP. |
sla@4603 | 658 | return true; |
sla@4603 | 659 | } |
sla@4603 | 660 | if (!ptrace_continue(pid, WSTOPSIG(status))) { |
minqi@4750 | 661 | print_error("attach: Failed to correctly attach to VM. VM might HANG! [PTRACE_CONT failed, stopped by %d]\n", WSTOPSIG(status)); |
sla@4603 | 662 | return false; |
sla@4603 | 663 | } |
sla@4603 | 664 | } else { |
minqi@4750 | 665 | print_error("attach: waitpid(): Child process exited/terminated (status = 0x%x)\n", status); |
sla@4603 | 666 | return false; |
sla@4603 | 667 | } |
sla@4603 | 668 | } else { |
sla@4603 | 669 | switch (errno) { |
sla@4603 | 670 | case EINTR: |
sla@4603 | 671 | continue; |
sla@4603 | 672 | break; |
sla@4603 | 673 | case ECHILD: |
minqi@4750 | 674 | print_error("attach: waitpid() failed. Child process pid (%d) does not exist \n", pid); |
sla@4603 | 675 | break; |
sla@4603 | 676 | case EINVAL: |
minqi@4750 | 677 | print_error("attach: waitpid() failed. Invalid options argument.\n"); |
sla@4603 | 678 | break; |
sla@4603 | 679 | default: |
minqi@4750 | 680 | print_error("attach: waitpid() failed. Unexpected error %d\n",errno); |
sla@4603 | 681 | break; |
sla@4603 | 682 | } |
sla@4603 | 683 | return false; |
sla@4603 | 684 | } |
sla@4603 | 685 | } |
sla@4603 | 686 | } |
sla@4603 | 687 | |
sla@4603 | 688 | // attach to a process/thread specified by "pid" |
sla@4603 | 689 | static bool ptrace_attach(pid_t pid) { |
sla@4603 | 690 | int res; |
sla@4603 | 691 | if ((res = ptrace(PT_ATTACH, pid, 0, 0)) < 0) { |
minqi@4750 | 692 | print_error("ptrace(PT_ATTACH, %d) failed with %d\n", pid, res); |
sla@4603 | 693 | return false; |
sla@4603 | 694 | } else { |
sla@4603 | 695 | return ptrace_waitpid(pid); |
sla@4603 | 696 | } |
sla@4603 | 697 | } |
sla@4603 | 698 | |
dcubed@3202 | 699 | /* |
dcubed@3202 | 700 | * Class: sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal |
dcubed@3202 | 701 | * Method: attach0 |
dcubed@3202 | 702 | * Signature: (I)V |
dcubed@3202 | 703 | */ |
minqi@4750 | 704 | JNIEXPORT void JNICALL |
sla@4564 | 705 | Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_attach0__I( |
minqi@4750 | 706 | JNIEnv *env, jobject this_obj, jint jpid) |
sla@4564 | 707 | { |
minqi@4750 | 708 | print_debug("attach0 called for jpid=%d\n", (int)jpid); |
minqi@4750 | 709 | |
dcubed@3202 | 710 | JNF_COCOA_ENTER(env); |
minqi@4750 | 711 | |
dcubed@3202 | 712 | kern_return_t result; |
dcubed@3202 | 713 | task_t gTask = 0; |
dcubed@3202 | 714 | result = task_for_pid(mach_task_self(), jpid, &gTask); |
dcubed@3202 | 715 | if (result != KERN_SUCCESS) { |
sla@4994 | 716 | print_error("attach: task_for_pid(%d) failed: '%s' (%d)\n", (int)jpid, mach_error_string(result), result); |
sla@4994 | 717 | THROW_NEW_DEBUGGER_EXCEPTION("Can't attach to the process. Could be caused by an incorrect pid or lack of privileges."); |
dcubed@3202 | 718 | } |
dcubed@3202 | 719 | putTask(env, this_obj, gTask); |
dcubed@3202 | 720 | |
sla@4603 | 721 | // use ptrace to stop the process |
sla@4603 | 722 | // on os x, ptrace only needs to be called on the process, not the individual threads |
sla@4603 | 723 | if (ptrace_attach(jpid) != true) { |
sla@4603 | 724 | mach_port_deallocate(mach_task_self(), gTask); |
sla@4603 | 725 | THROW_NEW_DEBUGGER_EXCEPTION("Can't attach to the process"); |
sla@4603 | 726 | } |
sla@4603 | 727 | |
dcubed@3202 | 728 | id symbolicator = nil; |
dcubed@3202 | 729 | id jrsSymbolicator = objc_lookUpClass("JRSSymbolicator"); |
dcubed@3202 | 730 | if (jrsSymbolicator != nil) { |
dcubed@3202 | 731 | id (*dynamicCall)(id, SEL, pid_t) = (id (*)(id, SEL, pid_t))&objc_msgSend; |
dcubed@3202 | 732 | symbolicator = dynamicCall(jrsSymbolicator, @selector(symbolicatorForPid:), (pid_t)jpid); |
dcubed@3202 | 733 | } |
dcubed@3202 | 734 | if (symbolicator != nil) { |
dcubed@3202 | 735 | CFRetain(symbolicator); // pin symbolicator while in java heap |
dcubed@3202 | 736 | } |
dcubed@3202 | 737 | |
dcubed@3202 | 738 | putSymbolicator(env, this_obj, symbolicator); |
dcubed@3202 | 739 | if (symbolicator == nil) { |
dcubed@3202 | 740 | THROW_NEW_DEBUGGER_EXCEPTION("Can't attach symbolicator to the process"); |
dcubed@3202 | 741 | } |
dcubed@3202 | 742 | |
dcubed@3202 | 743 | JNF_COCOA_EXIT(env); |
dcubed@3202 | 744 | } |
dcubed@3202 | 745 | |
minqi@4750 | 746 | /** For core file, |
minqi@4750 | 747 | called from Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_attach0__Ljava_lang_String_2Ljava_lang_String_2 */ |
minqi@4750 | 748 | static void fillLoadObjects(JNIEnv* env, jobject this_obj, struct ps_prochandle* ph) { |
minqi@4750 | 749 | int n = 0, i = 0; |
minqi@4750 | 750 | |
minqi@4750 | 751 | // add load objects |
minqi@4750 | 752 | n = get_num_libs(ph); |
minqi@4750 | 753 | for (i = 0; i < n; i++) { |
minqi@4750 | 754 | uintptr_t base; |
minqi@4750 | 755 | const char* name; |
minqi@4750 | 756 | jobject loadObject; |
minqi@4750 | 757 | jobject loadObjectList; |
ccheung@6437 | 758 | jstring nameString; |
minqi@4750 | 759 | |
minqi@4750 | 760 | base = get_lib_base(ph, i); |
minqi@4750 | 761 | name = get_lib_name(ph, i); |
ccheung@6437 | 762 | nameString = (*env)->NewStringUTF(env, name); |
ccheung@6437 | 763 | CHECK_EXCEPTION; |
minqi@4750 | 764 | loadObject = (*env)->CallObjectMethod(env, this_obj, createLoadObject_ID, |
ccheung@6437 | 765 | nameString, (jlong)0, (jlong)base); |
minqi@4750 | 766 | CHECK_EXCEPTION; |
minqi@4750 | 767 | loadObjectList = (*env)->GetObjectField(env, this_obj, loadObjectList_ID); |
minqi@4750 | 768 | CHECK_EXCEPTION; |
minqi@4750 | 769 | (*env)->CallBooleanMethod(env, loadObjectList, listAdd_ID, loadObject); |
minqi@4750 | 770 | CHECK_EXCEPTION; |
minqi@4750 | 771 | } |
minqi@4750 | 772 | } |
minqi@4750 | 773 | |
minqi@4750 | 774 | /* |
minqi@4750 | 775 | * Class: sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal |
minqi@4750 | 776 | * Method: attach0 |
minqi@4750 | 777 | * Signature: (Ljava/lang/String;Ljava/lang/String;)V |
minqi@4750 | 778 | */ |
minqi@4750 | 779 | JNIEXPORT void JNICALL |
minqi@4750 | 780 | Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_attach0__Ljava_lang_String_2Ljava_lang_String_2( |
minqi@4750 | 781 | JNIEnv *env, jobject this_obj, jstring execName, jstring coreName) |
minqi@4750 | 782 | { |
minqi@4750 | 783 | const char *execName_cstr; |
minqi@4750 | 784 | const char *coreName_cstr; |
minqi@4750 | 785 | jboolean isCopy; |
minqi@4750 | 786 | struct ps_prochandle* ph; |
minqi@4750 | 787 | |
minqi@4750 | 788 | execName_cstr = (*env)->GetStringUTFChars(env, execName, &isCopy); |
minqi@4750 | 789 | CHECK_EXCEPTION; |
minqi@4750 | 790 | coreName_cstr = (*env)->GetStringUTFChars(env, coreName, &isCopy); |
minqi@4750 | 791 | CHECK_EXCEPTION; |
minqi@4750 | 792 | |
minqi@4750 | 793 | print_debug("attach: %s %s\n", execName_cstr, coreName_cstr); |
minqi@4750 | 794 | |
minqi@4750 | 795 | if ( (ph = Pgrab_core(execName_cstr, coreName_cstr)) == NULL) { |
minqi@4750 | 796 | (*env)->ReleaseStringUTFChars(env, execName, execName_cstr); |
minqi@4750 | 797 | (*env)->ReleaseStringUTFChars(env, coreName, coreName_cstr); |
minqi@4750 | 798 | THROW_NEW_DEBUGGER_EXCEPTION("Can't attach to the core file"); |
minqi@4750 | 799 | } |
minqi@4750 | 800 | (*env)->SetLongField(env, this_obj, p_ps_prochandle_ID, (jlong)(intptr_t)ph); |
minqi@4750 | 801 | (*env)->ReleaseStringUTFChars(env, execName, execName_cstr); |
minqi@4750 | 802 | (*env)->ReleaseStringUTFChars(env, coreName, coreName_cstr); |
minqi@4750 | 803 | fillLoadObjects(env, this_obj, ph); |
minqi@4750 | 804 | } |
minqi@4750 | 805 | |
dcubed@3202 | 806 | /* |
dcubed@3202 | 807 | * Class: sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal |
dcubed@3202 | 808 | * Method: detach0 |
dcubed@3202 | 809 | * Signature: ()V |
dcubed@3202 | 810 | */ |
minqi@4750 | 811 | JNIEXPORT void JNICALL |
sla@4564 | 812 | Java_sun_jvm_hotspot_debugger_bsd_BsdDebuggerLocal_detach0( |
minqi@4750 | 813 | JNIEnv *env, jobject this_obj) |
sla@4564 | 814 | { |
minqi@4750 | 815 | print_debug("detach0 called\n"); |
minqi@4750 | 816 | struct ps_prochandle* ph = get_proc_handle(env, this_obj); |
minqi@4750 | 817 | if (ph != NULL && ph->core != NULL) { |
minqi@4750 | 818 | Prelease(ph); |
minqi@4750 | 819 | return; |
minqi@4750 | 820 | } |
dcubed@3202 | 821 | JNF_COCOA_ENTER(env); |
dcubed@3202 | 822 | task_t gTask = getTask(env, this_obj); |
sla@4603 | 823 | |
sla@4603 | 824 | // detach from the ptraced process causing it to resume execution |
sla@4603 | 825 | int pid; |
sla@4603 | 826 | kern_return_t k_res; |
sla@4603 | 827 | k_res = pid_for_task(gTask, &pid); |
sla@4603 | 828 | if (k_res != KERN_SUCCESS) { |
minqi@4750 | 829 | print_error("detach: pid_for_task(%d) failed (%d)\n", pid, k_res); |
sla@4603 | 830 | } |
sla@4603 | 831 | else { |
sla@4603 | 832 | int res = ptrace(PT_DETACH, pid, 0, 0); |
sla@4603 | 833 | if (res < 0) { |
minqi@4750 | 834 | print_error("detach: ptrace(PT_DETACH, %d) failed (%d)\n", pid, res); |
sla@4603 | 835 | } |
sla@4603 | 836 | } |
minqi@4750 | 837 | |
dcubed@3202 | 838 | mach_port_deallocate(mach_task_self(), gTask); |
dcubed@3202 | 839 | id symbolicator = getSymbolicator(env, this_obj); |
dcubed@3202 | 840 | if (symbolicator != nil) { |
dcubed@3202 | 841 | CFRelease(symbolicator); |
dcubed@3202 | 842 | } |
dcubed@3202 | 843 | JNF_COCOA_EXIT(env); |
dcubed@3202 | 844 | } |