Mercurial > jdk8-mips64-public > hotspot / annotate

src/cpu/x86/vm/disassembler_x86.cpp@a61af66fc99e (annotated)

src/cpu/x86/vm/disassembler_x86.cpp

Sat, 01 Dec 2007 00:00:00 +0000

author
duke
date
Sat, 01 Dec 2007 00:00:00 +0000
changeset 435
a61af66fc99e
permissions
-rw-r--r--

Initial load

duke@435 1 /*
duke@435 2 * Copyright 1997-2007 Sun Microsystems, Inc. All Rights Reserved.
duke@435 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
duke@435 4 *
duke@435 5 * This code is free software; you can redistribute it and/or modify it
duke@435 6 * under the terms of the GNU General Public License version 2 only, as
duke@435 7 * published by the Free Software Foundation.
duke@435 8 *
duke@435 9 * This code is distributed in the hope that it will be useful, but WITHOUT
duke@435 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
duke@435 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
duke@435 12 * version 2 for more details (a copy is included in the LICENSE file that
duke@435 13 * accompanied this code).
duke@435 14 *
duke@435 15 * You should have received a copy of the GNU General Public License version
duke@435 16 * 2 along with this work; if not, write to the Free Software Foundation,
duke@435 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
duke@435 18 *
duke@435 19 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
duke@435 20 * CA 95054 USA or visit www.sun.com if you need additional information or
duke@435 21 * have any questions.
duke@435 22 *
duke@435 23 */
duke@435 24
duke@435 25 # include "incls/_precompiled.incl"
duke@435 26 # include "incls/_disassembler_x86.cpp.incl"
duke@435 27
duke@435 28 #ifndef PRODUCT
duke@435 29
duke@435 30 void* Disassembler::_library = NULL;
duke@435 31 Disassembler::decode_func Disassembler::_decode_instruction = NULL;
duke@435 32
duke@435 33 bool Disassembler::load_library() {
duke@435 34 if (_library == NULL) {
duke@435 35 char buf[1024];
duke@435 36 char ebuf[1024];
duke@435 37 sprintf(buf, "disassembler%s", os::dll_file_extension());
duke@435 38 _library = hpi::dll_load(buf, ebuf, sizeof ebuf);
duke@435 39 if (_library != NULL) {
duke@435 40 tty->print_cr("Loaded disassembler");
duke@435 41 _decode_instruction = CAST_TO_FN_PTR(Disassembler::decode_func, hpi::dll_lookup(_library, "decode_instruction"));
duke@435 42 }
duke@435 43 }
duke@435 44 return (_library != NULL) && (_decode_instruction != NULL);
duke@435 45 }
duke@435 46
duke@435 47 class x86_env : public DisassemblerEnv {
duke@435 48 private:
duke@435 49 nmethod* code;
duke@435 50 outputStream* output;
duke@435 51 public:
duke@435 52 x86_env(nmethod* rcode, outputStream* routput) {
duke@435 53 code = rcode;
duke@435 54 output = routput;
duke@435 55 }
duke@435 56 void print_label(intptr_t value);
duke@435 57 void print_raw(char* str) { output->print_raw(str); }
duke@435 58 void print(char* format, ...);
duke@435 59 char* string_for_offset(intptr_t value);
duke@435 60 char* string_for_constant(unsigned char* pc, intptr_t value, int is_decimal);
duke@435 61 };
duke@435 62
duke@435 63
duke@435 64 void x86_env::print_label(intptr_t value) {
duke@435 65 if (!Universe::is_fully_initialized()) {
duke@435 66 output->print(INTPTR_FORMAT, value);
duke@435 67 return;
duke@435 68 }
duke@435 69 address adr = (address) value;
duke@435 70 if (StubRoutines::contains(adr)) {
duke@435 71 StubCodeDesc* desc = StubCodeDesc::desc_for(adr);
duke@435 72 const char * desc_name = "unknown stub";
duke@435 73 if (desc != NULL) {
duke@435 74 desc_name = desc->name();
duke@435 75 }
duke@435 76 output->print("Stub::%s", desc_name);
duke@435 77 if (WizardMode) output->print(" " INTPTR_FORMAT, value);
duke@435 78 } else {
duke@435 79 output->print(INTPTR_FORMAT, value);
duke@435 80 }
duke@435 81 }
duke@435 82
duke@435 83 void x86_env::print(char* format, ...) {
duke@435 84 va_list ap;
duke@435 85 va_start(ap, format);
duke@435 86 output->vprint(format, ap);
duke@435 87 va_end(ap);
duke@435 88 }
duke@435 89
duke@435 90 char* x86_env::string_for_offset(intptr_t value) {
duke@435 91 stringStream st;
duke@435 92 if (!Universe::is_fully_initialized()) {
duke@435 93 st.print(INTX_FORMAT, value);
duke@435 94 return st.as_string();
duke@435 95 }
duke@435 96 BarrierSet* bs = Universe::heap()->barrier_set();
duke@435 97 BarrierSet::Name bsn = bs->kind();
duke@435 98 if (bs->kind() == BarrierSet::CardTableModRef &&
duke@435 99 (jbyte*) value == ((CardTableModRefBS*)(bs))->byte_map_base) {
duke@435 100 st.print("word_map_base");
duke@435 101 } else {
duke@435 102 st.print(INTX_FORMAT, value);
duke@435 103 }
duke@435 104 return st.as_string();
duke@435 105 }
duke@435 106
duke@435 107 char* x86_env::string_for_constant(unsigned char* pc, intptr_t value, int is_decimal) {
duke@435 108 stringStream st;
duke@435 109 oop obj = NULL;
duke@435 110 if (code && ((obj = code->embeddedOop_at(pc)) != NULL)) {
duke@435 111 obj->print_value_on(&st);
duke@435 112 } else {
duke@435 113 if (is_decimal == 1) {
duke@435 114 st.print(INTX_FORMAT, value);
duke@435 115 } else {
duke@435 116 st.print(INTPTR_FORMAT, value);
duke@435 117 }
duke@435 118 }
duke@435 119 return st.as_string();
duke@435 120 }
duke@435 121
duke@435 122
duke@435 123
duke@435 124 address Disassembler::decode_instruction(address start, DisassemblerEnv* env) {
duke@435 125 return ((decode_func) _decode_instruction)(start, env);
duke@435 126 }
duke@435 127
duke@435 128
duke@435 129 void Disassembler::decode(CodeBlob* cb, outputStream* st) {
duke@435 130 st = st ? st : tty;
duke@435 131 st->print_cr("Decoding CodeBlob " INTPTR_FORMAT, cb);
duke@435 132 decode(cb->instructions_begin(), cb->instructions_end(), st);
duke@435 133 }
duke@435 134
duke@435 135
duke@435 136 void Disassembler::decode(u_char* begin, u_char* end, outputStream* st) {
duke@435 137 st = st ? st : tty;
duke@435 138
duke@435 139 const int show_bytes = false; // for disassembler debugging
duke@435 140
duke@435 141 if (!load_library()) {
duke@435 142 st->print_cr("Could not load disassembler");
duke@435 143 return;
duke@435 144 }
duke@435 145
duke@435 146 x86_env env(NULL, st);
duke@435 147 unsigned char* p = (unsigned char*) begin;
duke@435 148 CodeBlob* cb = CodeCache::find_blob_unsafe(begin);
duke@435 149 while (p < (unsigned char*) end) {
duke@435 150 if (cb != NULL) {
duke@435 151 cb->print_block_comment(st, (intptr_t)(p - cb->instructions_begin()));
duke@435 152 }
duke@435 153
duke@435 154 unsigned char* p0 = p;
duke@435 155 st->print(" " INTPTR_FORMAT ": ", p);
duke@435 156 p = decode_instruction(p, &env);
duke@435 157 if (show_bytes) {
duke@435 158 st->print("\t\t\t");
duke@435 159 while (p0 < p) st->print("%x ", *p0++);
duke@435 160 }
duke@435 161 st->cr();
duke@435 162 }
duke@435 163 }
duke@435 164
duke@435 165
duke@435 166 void Disassembler::decode(nmethod* nm, outputStream* st) {
duke@435 167 st = st ? st : tty;
duke@435 168
duke@435 169 st->print_cr("Decoding compiled method " INTPTR_FORMAT ":", nm);
duke@435 170 st->print("Code:");
duke@435 171 st->cr();
duke@435 172
duke@435 173 if (!load_library()) {
duke@435 174 st->print_cr("Could not load disassembler");
duke@435 175 return;
duke@435 176 }
duke@435 177 x86_env env(nm, st);
duke@435 178 unsigned char* p = nm->instructions_begin();
duke@435 179 unsigned char* end = nm->instructions_end();
duke@435 180 while (p < end) {
duke@435 181 if (p == nm->entry_point()) st->print_cr("[Entry Point]");
duke@435 182 if (p == nm->verified_entry_point()) st->print_cr("[Verified Entry Point]");
duke@435 183 if (p == nm->exception_begin()) st->print_cr("[Exception Handler]");
duke@435 184 if (p == nm->stub_begin()) st->print_cr("[Stub Code]");
duke@435 185 if (p == nm->consts_begin()) st->print_cr("[Constants]");
duke@435 186 nm->print_block_comment(st, (intptr_t)(p - nm->instructions_begin()));
duke@435 187 unsigned char* p0 = p;
duke@435 188 st->print(" " INTPTR_FORMAT ": ", p);
duke@435 189 p = decode_instruction(p, &env);
duke@435 190 nm->print_code_comment_on(st, 40, p0, p);
duke@435 191 st->cr();
duke@435 192 // Output pc bucket ticks if we have any
duke@435 193 address bucket_pc = FlatProfiler::bucket_start_for(p);
duke@435 194 if (bucket_pc != NULL && bucket_pc > p0 && bucket_pc <= p) {
duke@435 195 int bucket_count = FlatProfiler::bucket_count_for(bucket_pc);
duke@435 196 tty->print_cr("[%d]", bucket_count);
duke@435 197 }
duke@435 198 }
duke@435 199 }
duke@435 200
duke@435 201 #endif // PRODUCT

Mercurial Repository: jdk8-mips64-public/hotspot

mercurial