aoqi@0: /*
aoqi@0:  * Copyright (c) 2002, 2013, Oracle and/or its affiliates. All rights reserved.
aoqi@0:  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
aoqi@0:  *
aoqi@0:  * This code is free software; you can redistribute it and/or modify it
aoqi@0:  * under the terms of the GNU General Public License version 2 only, as
aoqi@0:  * published by the Free Software Foundation.
aoqi@0:  *
aoqi@0:  * This code is distributed in the hope that it will be useful, but WITHOUT
aoqi@0:  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
aoqi@0:  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
aoqi@0:  * version 2 for more details (a copy is included in the LICENSE file that
aoqi@0:  * accompanied this code).
aoqi@0:  *
aoqi@0:  * You should have received a copy of the GNU General Public License version
aoqi@0:  * 2 along with this work; if not, write to the Free Software Foundation,
aoqi@0:  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
aoqi@0:  *
aoqi@0:  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
aoqi@0:  * or visit www.oracle.com if you need additional information or have any
aoqi@0:  * questions.
aoqi@0:  *
aoqi@0:  */
aoqi@0: 
aoqi@0: #include <jni.h>
aoqi@0: #include "libproc.h"
aoqi@0: 
aoqi@0: #include <elf.h>
aoqi@0: #include <sys/types.h>
aoqi@0: #include <sys/stat.h>
aoqi@0: #include <fcntl.h>
aoqi@0: #include <stdlib.h>
aoqi@0: #include <string.h>
aoqi@0: #include <limits.h>
aoqi@0: 
aoqi@0: #if defined(x86_64) && !defined(amd64)
aoqi@0: #define amd64 1
aoqi@0: #endif
aoqi@0: 
aoqi@0: #ifdef i386
aoqi@0: #include "sun_jvm_hotspot_debugger_x86_X86ThreadContext.h"
aoqi@0: #endif
aoqi@0: 
aoqi@0: #ifdef amd64
aoqi@0: #include "sun_jvm_hotspot_debugger_amd64_AMD64ThreadContext.h"
aoqi@0: #endif
aoqi@0: 
aoqi@0: #if defined(sparc) || defined(sparcv9)
aoqi@0: #include "sun_jvm_hotspot_debugger_sparc_SPARCThreadContext.h"
aoqi@0: #endif
aoqi@0: 
aoqi@0: static jfieldID p_ps_prochandle_ID = 0;
aoqi@0: static jfieldID threadList_ID = 0;
aoqi@0: static jfieldID loadObjectList_ID = 0;
aoqi@0: 
aoqi@0: static jmethodID createClosestSymbol_ID = 0;
aoqi@0: static jmethodID createLoadObject_ID = 0;
aoqi@0: static jmethodID getThreadForThreadId_ID = 0;
aoqi@0: static jmethodID listAdd_ID = 0;
aoqi@0: 
aoqi@0: #define CHECK_EXCEPTION_(value) if ((*env)->ExceptionOccurred(env)) { return value; }
aoqi@0: #define CHECK_EXCEPTION if ((*env)->ExceptionOccurred(env)) { return;}
aoqi@0: #define THROW_NEW_DEBUGGER_EXCEPTION_(str, value) { throw_new_debugger_exception(env, str); return value; }
aoqi@0: #define THROW_NEW_DEBUGGER_EXCEPTION(str) { throw_new_debugger_exception(env, str); return;}
aoqi@0: 
aoqi@0: void throw_new_debugger_exception(JNIEnv* env, const char* errMsg) {
aoqi@0:   (*env)->ThrowNew(env, (*env)->FindClass(env, "sun/jvm/hotspot/debugger/DebuggerException"), errMsg);
aoqi@0: }
aoqi@0: 
aoqi@0: struct ps_prochandle* get_proc_handle(JNIEnv* env, jobject this_obj) {
aoqi@0:   jlong ptr = (*env)->GetLongField(env, this_obj, p_ps_prochandle_ID);
aoqi@0:   return (struct ps_prochandle*)(intptr_t)ptr;
aoqi@0: }
aoqi@0: 
aoqi@0: /*
aoqi@0:  * Class:     sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal
aoqi@0:  * Method:    init0
aoqi@0:  * Signature: ()V
aoqi@0:  */
aoqi@0: JNIEXPORT void JNICALL Java_sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal_init0
aoqi@0:   (JNIEnv *env, jclass cls) {
aoqi@0:   jclass listClass;
aoqi@0: 
aoqi@0:   if (init_libproc(getenv("LIBSAPROC_DEBUG") != NULL) != true) {
aoqi@0:      THROW_NEW_DEBUGGER_EXCEPTION("can't initialize libproc");
aoqi@0:   }
aoqi@0: 
aoqi@0:   // fields we use
aoqi@0:   p_ps_prochandle_ID = (*env)->GetFieldID(env, cls, "p_ps_prochandle", "J");
aoqi@0:   CHECK_EXCEPTION;
aoqi@0:   threadList_ID = (*env)->GetFieldID(env, cls, "threadList", "Ljava/util/List;");
aoqi@0:   CHECK_EXCEPTION;
aoqi@0:   loadObjectList_ID = (*env)->GetFieldID(env, cls, "loadObjectList", "Ljava/util/List;");
aoqi@0:   CHECK_EXCEPTION;
aoqi@0: 
aoqi@0:   // methods we use
aoqi@0:   createClosestSymbol_ID = (*env)->GetMethodID(env, cls, "createClosestSymbol",
aoqi@0:                     "(Ljava/lang/String;J)Lsun/jvm/hotspot/debugger/cdbg/ClosestSymbol;");
aoqi@0:   CHECK_EXCEPTION;
aoqi@0:   createLoadObject_ID = (*env)->GetMethodID(env, cls, "createLoadObject",
aoqi@0:                     "(Ljava/lang/String;JJ)Lsun/jvm/hotspot/debugger/cdbg/LoadObject;");
aoqi@0:   CHECK_EXCEPTION;
aoqi@0:   getThreadForThreadId_ID = (*env)->GetMethodID(env, cls, "getThreadForThreadId",
aoqi@0:                                                      "(J)Lsun/jvm/hotspot/debugger/ThreadProxy;");
aoqi@0:   CHECK_EXCEPTION;
aoqi@0:   // java.util.List method we call
aoqi@0:   listClass = (*env)->FindClass(env, "java/util/List");
aoqi@0:   CHECK_EXCEPTION;
aoqi@0:   listAdd_ID = (*env)->GetMethodID(env, listClass, "add", "(Ljava/lang/Object;)Z");
aoqi@0:   CHECK_EXCEPTION;
aoqi@0: }
aoqi@0: 
aoqi@0: JNIEXPORT jint JNICALL Java_sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal_getAddressSize
aoqi@0:   (JNIEnv *env, jclass cls)
aoqi@0: {
aoqi@0: #ifdef _LP64
aoqi@0:  return 8;
aoqi@0: #else
aoqi@0:  return 4;
aoqi@0: #endif
aoqi@0: 
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: static void fillThreadsAndLoadObjects(JNIEnv* env, jobject this_obj, struct ps_prochandle* ph) {
aoqi@0:   int n = 0, i = 0;
aoqi@0: 
aoqi@0:   // add threads
aoqi@0:   n = get_num_threads(ph);
aoqi@0:   for (i = 0; i < n; i++) {
aoqi@0:     jobject thread;
aoqi@0:     jobject threadList;
aoqi@0:     lwpid_t lwpid;
aoqi@0: 
aoqi@0:     lwpid = get_lwp_id(ph, i);
aoqi@0:     thread = (*env)->CallObjectMethod(env, this_obj, getThreadForThreadId_ID,
aoqi@0:                                       (jlong)lwpid);
aoqi@0:     CHECK_EXCEPTION;
aoqi@0:     threadList = (*env)->GetObjectField(env, this_obj, threadList_ID);
aoqi@0:     CHECK_EXCEPTION;
aoqi@0:     (*env)->CallBooleanMethod(env, threadList, listAdd_ID, thread);
aoqi@0:     CHECK_EXCEPTION;
aoqi@0:   }
aoqi@0: 
aoqi@0:   // add load objects
aoqi@0:   n = get_num_libs(ph);
aoqi@0:   for (i = 0; i < n; i++) {
aoqi@0:      uintptr_t base;
aoqi@0:      const char* name;
aoqi@0:      jobject loadObject;
aoqi@0:      jobject loadObjectList;
aoqi@0: 
aoqi@0:      base = get_lib_base(ph, i);
aoqi@0:      name = get_lib_name(ph, i);
aoqi@0:      loadObject = (*env)->CallObjectMethod(env, this_obj, createLoadObject_ID,
aoqi@0:                                    (*env)->NewStringUTF(env, name), (jlong)0, (jlong)base);
aoqi@0:      CHECK_EXCEPTION;
aoqi@0:      loadObjectList = (*env)->GetObjectField(env, this_obj, loadObjectList_ID);
aoqi@0:      CHECK_EXCEPTION;
aoqi@0:      (*env)->CallBooleanMethod(env, loadObjectList, listAdd_ID, loadObject);
aoqi@0:      CHECK_EXCEPTION;
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: /*
aoqi@0:  * Verify that a named ELF binary file (core or executable) has the same
aoqi@0:  * bitness as ourselves.
aoqi@0:  * Throw an exception if there is a mismatch or other problem.
aoqi@0:  *
aoqi@0:  * If we proceed using a mismatched debugger/debuggee, the best to hope
aoqi@0:  * for is a missing symbol, the worst is a crash searching for debug symbols.
aoqi@0:  */
aoqi@0: void verifyBitness(JNIEnv *env, const char *binaryName) {
aoqi@0:   int fd = open(binaryName, O_RDONLY);
aoqi@0:   if (fd < 0) {
aoqi@0:     THROW_NEW_DEBUGGER_EXCEPTION("cannot open binary file");
aoqi@0:   }
aoqi@0:   unsigned char elf_ident[EI_NIDENT];
aoqi@0:   int i = read(fd, &elf_ident, sizeof(elf_ident));
aoqi@0:   close(fd);
aoqi@0: 
aoqi@0:   if (i < 0) {
aoqi@0:     THROW_NEW_DEBUGGER_EXCEPTION("cannot read binary file");
aoqi@0:   }
aoqi@0: #ifndef _LP64
aoqi@0:   if (elf_ident[EI_CLASS] == ELFCLASS64) {
aoqi@0:     THROW_NEW_DEBUGGER_EXCEPTION("debuggee is 64 bit, use 64-bit java for debugger");
aoqi@0:   }
aoqi@0: #else
aoqi@0:   if (elf_ident[EI_CLASS] != ELFCLASS64) {
aoqi@0:     THROW_NEW_DEBUGGER_EXCEPTION("debuggee is 32 bit, use 32 bit java for debugger");
aoqi@0:   }
aoqi@0: #endif
aoqi@0: }
aoqi@0: 
aoqi@0: 
aoqi@0: /*
aoqi@0:  * Class:     sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal
aoqi@0:  * Method:    attach0
aoqi@0:  * Signature: (I)V
aoqi@0:  */
aoqi@0: JNIEXPORT void JNICALL Java_sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal_attach0__I
aoqi@0:   (JNIEnv *env, jobject this_obj, jint jpid) {
aoqi@0: 
aoqi@0:   // For bitness checking, locate binary at /proc/jpid/exe
aoqi@0:   char buf[PATH_MAX];
aoqi@0:   snprintf((char *) &buf, PATH_MAX, "/proc/%d/exe", jpid);
aoqi@0:   verifyBitness(env, (char *) &buf);
aoqi@0:   CHECK_EXCEPTION;
aoqi@0: 
aoqi@0:   struct ps_prochandle* ph;
aoqi@0:   if ( (ph = Pgrab(jpid)) == NULL) {
aoqi@0:     THROW_NEW_DEBUGGER_EXCEPTION("Can't attach to the process");
aoqi@0:   }
aoqi@0:   (*env)->SetLongField(env, this_obj, p_ps_prochandle_ID, (jlong)(intptr_t)ph);
aoqi@0:   fillThreadsAndLoadObjects(env, this_obj, ph);
aoqi@0: }
aoqi@0: 
aoqi@0: /*
aoqi@0:  * Class:     sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal
aoqi@0:  * Method:    attach0
aoqi@0:  * Signature: (Ljava/lang/String;Ljava/lang/String;)V
aoqi@0:  */
aoqi@0: JNIEXPORT void JNICALL Java_sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal_attach0__Ljava_lang_String_2Ljava_lang_String_2
aoqi@0:   (JNIEnv *env, jobject this_obj, jstring execName, jstring coreName) {
aoqi@0:   const char *execName_cstr;
aoqi@0:   const char *coreName_cstr;
aoqi@0:   jboolean isCopy;
aoqi@0:   struct ps_prochandle* ph;
aoqi@0: 
aoqi@0:   execName_cstr = (*env)->GetStringUTFChars(env, execName, &isCopy);
aoqi@0:   CHECK_EXCEPTION;
aoqi@0:   coreName_cstr = (*env)->GetStringUTFChars(env, coreName, &isCopy);
aoqi@0:   CHECK_EXCEPTION;
aoqi@0: 
aoqi@0:   verifyBitness(env, execName_cstr);
aoqi@0:   CHECK_EXCEPTION;
aoqi@0: 
aoqi@0:   if ( (ph = Pgrab_core(execName_cstr, coreName_cstr)) == NULL) {
aoqi@0:     (*env)->ReleaseStringUTFChars(env, execName, execName_cstr);
aoqi@0:     (*env)->ReleaseStringUTFChars(env, coreName, coreName_cstr);
aoqi@0:     THROW_NEW_DEBUGGER_EXCEPTION("Can't attach to the core file");
aoqi@0:   }
aoqi@0:   (*env)->SetLongField(env, this_obj, p_ps_prochandle_ID, (jlong)(intptr_t)ph);
aoqi@0:   (*env)->ReleaseStringUTFChars(env, execName, execName_cstr);
aoqi@0:   (*env)->ReleaseStringUTFChars(env, coreName, coreName_cstr);
aoqi@0:   fillThreadsAndLoadObjects(env, this_obj, ph);
aoqi@0: }
aoqi@0: 
aoqi@0: /*
aoqi@0:  * Class:     sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal
aoqi@0:  * Method:    detach0
aoqi@0:  * Signature: ()V
aoqi@0:  */
aoqi@0: JNIEXPORT void JNICALL Java_sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal_detach0
aoqi@0:   (JNIEnv *env, jobject this_obj) {
aoqi@0:   struct ps_prochandle* ph = get_proc_handle(env, this_obj);
aoqi@0:   if (ph != NULL) {
aoqi@0:      Prelease(ph);
aoqi@0:   }
aoqi@0: }
aoqi@0: 
aoqi@0: /*
aoqi@0:  * Class:     sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal
aoqi@0:  * Method:    lookupByName0
aoqi@0:  * Signature: (Ljava/lang/String;Ljava/lang/String;)J
aoqi@0:  */
aoqi@0: JNIEXPORT jlong JNICALL Java_sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal_lookupByName0
aoqi@0:   (JNIEnv *env, jobject this_obj, jstring objectName, jstring symbolName) {
aoqi@0:   const char *objectName_cstr, *symbolName_cstr;
aoqi@0:   jlong addr;
aoqi@0:   jboolean isCopy;
aoqi@0:   struct ps_prochandle* ph = get_proc_handle(env, this_obj);
aoqi@0: 
aoqi@0:   objectName_cstr = NULL;
aoqi@0:   if (objectName != NULL) {
aoqi@0:     objectName_cstr = (*env)->GetStringUTFChars(env, objectName, &isCopy);
aoqi@0:     CHECK_EXCEPTION_(0);
aoqi@0:   }
aoqi@0:   symbolName_cstr = (*env)->GetStringUTFChars(env, symbolName, &isCopy);
aoqi@0:   CHECK_EXCEPTION_(0);
aoqi@0: 
aoqi@0:   addr = (jlong) lookup_symbol(ph, objectName_cstr, symbolName_cstr);
aoqi@0: 
aoqi@0:   if (objectName_cstr != NULL) {
aoqi@0:     (*env)->ReleaseStringUTFChars(env, objectName, objectName_cstr);
aoqi@0:   }
aoqi@0:   (*env)->ReleaseStringUTFChars(env, symbolName, symbolName_cstr);
aoqi@0:   return addr;
aoqi@0: }
aoqi@0: 
aoqi@0: /*
aoqi@0:  * Class:     sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal
aoqi@0:  * Method:    lookupByAddress0
aoqi@0:  * Signature: (J)Lsun/jvm/hotspot/debugger/cdbg/ClosestSymbol;
aoqi@0:  */
aoqi@0: JNIEXPORT jobject JNICALL Java_sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal_lookupByAddress0
aoqi@0:   (JNIEnv *env, jobject this_obj, jlong addr) {
aoqi@0:   uintptr_t offset;
aoqi@0:   const char* sym = NULL;
aoqi@0: 
aoqi@0:   struct ps_prochandle* ph = get_proc_handle(env, this_obj);
aoqi@0:   sym = symbol_for_pc(ph, (uintptr_t) addr, &offset);
aoqi@0:   if (sym == NULL) return 0;
aoqi@0:   return (*env)->CallObjectMethod(env, this_obj, createClosestSymbol_ID,
aoqi@0:                           (*env)->NewStringUTF(env, sym), (jlong)offset);
aoqi@0: }
aoqi@0: 
aoqi@0: /*
aoqi@0:  * Class:     sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal
aoqi@0:  * Method:    readBytesFromProcess0
aoqi@0:  * Signature: (JJ)Lsun/jvm/hotspot/debugger/ReadResult;
aoqi@0:  */
aoqi@0: JNIEXPORT jbyteArray JNICALL Java_sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal_readBytesFromProcess0
aoqi@0:   (JNIEnv *env, jobject this_obj, jlong addr, jlong numBytes) {
aoqi@0: 
aoqi@0:   jboolean isCopy;
aoqi@0:   jbyteArray array;
aoqi@0:   jbyte *bufPtr;
aoqi@0:   ps_err_e err;
aoqi@0: 
aoqi@0:   array = (*env)->NewByteArray(env, numBytes);
aoqi@0:   CHECK_EXCEPTION_(0);
aoqi@0:   bufPtr = (*env)->GetByteArrayElements(env, array, &isCopy);
aoqi@0:   CHECK_EXCEPTION_(0);
aoqi@0: 
aoqi@0:   err = ps_pdread(get_proc_handle(env, this_obj), (psaddr_t) (uintptr_t)addr, bufPtr, numBytes);
aoqi@0:   (*env)->ReleaseByteArrayElements(env, array, bufPtr, 0);
aoqi@0:   return (err == PS_OK)? array : 0;
aoqi@0: }
aoqi@0: 
aoqi@0: #if defined(i386) || defined(amd64) || defined(sparc) || defined(sparcv9)
aoqi@0: JNIEXPORT jlongArray JNICALL Java_sun_jvm_hotspot_debugger_linux_LinuxDebuggerLocal_getThreadIntegerRegisterSet0
aoqi@0:   (JNIEnv *env, jobject this_obj, jint lwp_id) {
aoqi@0: 
aoqi@0:   struct user_regs_struct gregs;
aoqi@0:   jboolean isCopy;
aoqi@0:   jlongArray array;
aoqi@0:   jlong *regs;
aoqi@0:   int i;
aoqi@0: 
aoqi@0:   struct ps_prochandle* ph = get_proc_handle(env, this_obj);
aoqi@0:   if (get_lwp_regs(ph, lwp_id, &gregs) != true) {
aoqi@0:      THROW_NEW_DEBUGGER_EXCEPTION_("get_thread_regs failed for a lwp", 0);
aoqi@0:   }
aoqi@0: 
aoqi@0: #undef NPRGREG
aoqi@0: #ifdef i386
aoqi@0: #define NPRGREG sun_jvm_hotspot_debugger_x86_X86ThreadContext_NPRGREG
aoqi@0: #endif
aoqi@0: #ifdef amd64
aoqi@0: #define NPRGREG sun_jvm_hotspot_debugger_amd64_AMD64ThreadContext_NPRGREG
aoqi@0: #endif
aoqi@0: #if defined(sparc) || defined(sparcv9)
aoqi@0: #define NPRGREG sun_jvm_hotspot_debugger_sparc_SPARCThreadContext_NPRGREG
aoqi@0: #endif
aoqi@0: 
aoqi@0:   array = (*env)->NewLongArray(env, NPRGREG);
aoqi@0:   CHECK_EXCEPTION_(0);
aoqi@0:   regs = (*env)->GetLongArrayElements(env, array, &isCopy);
aoqi@0: 
aoqi@0: #undef REG_INDEX
aoqi@0: 
aoqi@0: #ifdef i386
aoqi@0: #define REG_INDEX(reg) sun_jvm_hotspot_debugger_x86_X86ThreadContext_##reg
aoqi@0: 
aoqi@0:   regs[REG_INDEX(GS)]  = (uintptr_t) gregs.xgs;
aoqi@0:   regs[REG_INDEX(FS)]  = (uintptr_t) gregs.xfs;
aoqi@0:   regs[REG_INDEX(ES)]  = (uintptr_t) gregs.xes;
aoqi@0:   regs[REG_INDEX(DS)]  = (uintptr_t) gregs.xds;
aoqi@0:   regs[REG_INDEX(EDI)] = (uintptr_t) gregs.edi;
aoqi@0:   regs[REG_INDEX(ESI)] = (uintptr_t) gregs.esi;
aoqi@0:   regs[REG_INDEX(FP)] = (uintptr_t) gregs.ebp;
aoqi@0:   regs[REG_INDEX(SP)] = (uintptr_t) gregs.esp;
aoqi@0:   regs[REG_INDEX(EBX)] = (uintptr_t) gregs.ebx;
aoqi@0:   regs[REG_INDEX(EDX)] = (uintptr_t) gregs.edx;
aoqi@0:   regs[REG_INDEX(ECX)] = (uintptr_t) gregs.ecx;
aoqi@0:   regs[REG_INDEX(EAX)] = (uintptr_t) gregs.eax;
aoqi@0:   regs[REG_INDEX(PC)] = (uintptr_t) gregs.eip;
aoqi@0:   regs[REG_INDEX(CS)]  = (uintptr_t) gregs.xcs;
aoqi@0:   regs[REG_INDEX(SS)]  = (uintptr_t) gregs.xss;
aoqi@0: 
aoqi@0: #endif /* i386 */
aoqi@0: 
aoqi@0: #ifdef amd64
aoqi@0: #define REG_INDEX(reg) sun_jvm_hotspot_debugger_amd64_AMD64ThreadContext_##reg
aoqi@0: 
aoqi@0:   regs[REG_INDEX(R15)] = gregs.r15;
aoqi@0:   regs[REG_INDEX(R14)] = gregs.r14;
aoqi@0:   regs[REG_INDEX(R13)] = gregs.r13;
aoqi@0:   regs[REG_INDEX(R12)] = gregs.r12;
aoqi@0:   regs[REG_INDEX(RBP)] = gregs.rbp;
aoqi@0:   regs[REG_INDEX(RBX)] = gregs.rbx;
aoqi@0:   regs[REG_INDEX(R11)] = gregs.r11;
aoqi@0:   regs[REG_INDEX(R10)] = gregs.r10;
aoqi@0:   regs[REG_INDEX(R9)] = gregs.r9;
aoqi@0:   regs[REG_INDEX(R8)] = gregs.r8;
aoqi@0:   regs[REG_INDEX(RAX)] = gregs.rax;
aoqi@0:   regs[REG_INDEX(RCX)] = gregs.rcx;
aoqi@0:   regs[REG_INDEX(RDX)] = gregs.rdx;
aoqi@0:   regs[REG_INDEX(RSI)] = gregs.rsi;
aoqi@0:   regs[REG_INDEX(RDI)] = gregs.rdi;
aoqi@0:   regs[REG_INDEX(RIP)] = gregs.rip;
aoqi@0:   regs[REG_INDEX(CS)] = gregs.cs;
aoqi@0:   regs[REG_INDEX(RSP)] = gregs.rsp;
aoqi@0:   regs[REG_INDEX(SS)] = gregs.ss;
aoqi@0:   regs[REG_INDEX(FSBASE)] = gregs.fs_base;
aoqi@0:   regs[REG_INDEX(GSBASE)] = gregs.gs_base;
aoqi@0:   regs[REG_INDEX(DS)] = gregs.ds;
aoqi@0:   regs[REG_INDEX(ES)] = gregs.es;
aoqi@0:   regs[REG_INDEX(FS)] = gregs.fs;
aoqi@0:   regs[REG_INDEX(GS)] = gregs.gs;
aoqi@0: 
aoqi@0: #endif /* amd64 */
aoqi@0: 
aoqi@0: #if defined(sparc) || defined(sparcv9)
aoqi@0: 
aoqi@0: #define REG_INDEX(reg) sun_jvm_hotspot_debugger_sparc_SPARCThreadContext_##reg
aoqi@0: 
aoqi@0: #ifdef _LP64
aoqi@0:   regs[REG_INDEX(R_PSR)] = gregs.tstate;
aoqi@0:   regs[REG_INDEX(R_PC)]  = gregs.tpc;
aoqi@0:   regs[REG_INDEX(R_nPC)] = gregs.tnpc;
aoqi@0:   regs[REG_INDEX(R_Y)]   = gregs.y;
aoqi@0: #else
aoqi@0:   regs[REG_INDEX(R_PSR)] = gregs.psr;
aoqi@0:   regs[REG_INDEX(R_PC)]  = gregs.pc;
aoqi@0:   regs[REG_INDEX(R_nPC)] = gregs.npc;
aoqi@0:   regs[REG_INDEX(R_Y)]   = gregs.y;
aoqi@0: #endif
aoqi@0:   regs[REG_INDEX(R_G0)]  =            0 ;
aoqi@0:   regs[REG_INDEX(R_G1)]  = gregs.u_regs[0];
aoqi@0:   regs[REG_INDEX(R_G2)]  = gregs.u_regs[1];
aoqi@0:   regs[REG_INDEX(R_G3)]  = gregs.u_regs[2];
aoqi@0:   regs[REG_INDEX(R_G4)]  = gregs.u_regs[3];
aoqi@0:   regs[REG_INDEX(R_G5)]  = gregs.u_regs[4];
aoqi@0:   regs[REG_INDEX(R_G6)]  = gregs.u_regs[5];
aoqi@0:   regs[REG_INDEX(R_G7)]  = gregs.u_regs[6];
aoqi@0:   regs[REG_INDEX(R_O0)]  = gregs.u_regs[7];
aoqi@0:   regs[REG_INDEX(R_O1)]  = gregs.u_regs[8];
aoqi@0:   regs[REG_INDEX(R_O2)]  = gregs.u_regs[ 9];
aoqi@0:   regs[REG_INDEX(R_O3)]  = gregs.u_regs[10];
aoqi@0:   regs[REG_INDEX(R_O4)]  = gregs.u_regs[11];
aoqi@0:   regs[REG_INDEX(R_O5)]  = gregs.u_regs[12];
aoqi@0:   regs[REG_INDEX(R_O6)]  = gregs.u_regs[13];
aoqi@0:   regs[REG_INDEX(R_O7)]  = gregs.u_regs[14];
aoqi@0: #endif /* sparc */
aoqi@0: 
aoqi@0: 
aoqi@0:   (*env)->ReleaseLongArrayElements(env, array, regs, JNI_COMMIT);
aoqi@0:   return array;
aoqi@0: }
aoqi@0: #endif