1 /* 2 * Copyright (c) 2005, 2010, 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 "classfile/javaClasses.hpp" 27 #include "code/codeBlob.hpp" 28 #include "memory/allocation.hpp" 29 #include "prims/jvm.h" 30 #include "runtime/dtraceJSDT.hpp" 31 #include "runtime/jniHandles.hpp" 32 #include "runtime/os.hpp" 33 #include "runtime/signature.hpp" 34 #include "utilities/globalDefinitions.hpp" 35 36 #ifdef HAVE_DTRACE_H 37 38 #include <sys/types.h> 39 #include <sys/stat.h> 40 #include <fcntl.h> 41 #include <unistd.h> 42 #include <dtrace.h> 43 44 static const char* devname = "/dev/dtrace/helper"; 45 static const char* olddevname = "/devices/pseudo/dtrace@0:helper"; 46 47 static const char* string_sig = "uintptr_t"; 48 static const char* int_sig = "long"; 49 static const char* long_sig = "long long"; 50 51 static void printDOFHelper(dof_helper_t* helper); 52 53 static int dofhelper_open() { 54 int fd; 55 if ((fd = open64(devname, O_RDWR)) < 0) { 56 // Optimize next calls 57 devname = olddevname; 58 if ((fd = open64(devname, O_RDWR)) < 0) { 59 return -1; 60 } 61 } 62 return fd; 63 } 64 65 static jint dof_register(jstring module, uint8_t* dof, void* modaddr) { 66 int probe; 67 dof_helper_t dh; 68 int fd; 69 70 memset(&dh, 0, sizeof(dh)); 71 72 char* module_name = java_lang_String::as_utf8_string( 73 JNIHandles::resolve_non_null(module)); 74 jio_snprintf(dh.dofhp_mod, sizeof(dh.dofhp_mod), "%s", module_name); 75 dh.dofhp_dof = (uint64_t)dof; 76 dh.dofhp_addr = (uint64_t)modaddr; 77 78 fd = dofhelper_open(); 79 if (fd < 0) 80 return -1; 81 probe = ioctl(fd, DTRACEHIOC_ADDDOF, &dh); 82 close(fd); 83 if (PrintDTraceDOF) { 84 printDOFHelper(&dh); 85 tty->print_cr("DOF helper id = %d", probe); 86 } 87 return probe; 88 } 89 90 int DTraceJSDT::pd_activate( 91 void* moduleBaseAddress, jstring module, 92 jint providers_count, JVM_DTraceProvider* providers) { 93 94 // We need sections: 95 // (1) STRTAB 96 // ( 97 // (2) PROVIDER 98 // (3) PROBES 99 // (4) PROBOFFS 100 // (5) PROBARGS 101 // ) * Number of Providers 102 103 // Type of sections we create 104 enum { 105 STRTAB = 0, 106 PROVIDERS = 1, 107 PROBES = 2, 108 PROBE_OFFSETS = 3, 109 ARG_OFFSETS = 4, 110 NUM_SECTIONS = 5 111 }; 112 113 static int alignment_for[NUM_SECTIONS] = { 1, 4, 8, 4, 1 }; 114 115 ResourceMark rm; 116 117 uint32_t num_sections = 1 + 4 * providers_count; 118 uint32_t offset = sizeof(dof_hdr_t) + (num_sections * sizeof(dof_sec_t)); 119 uint32_t* secoffs = NEW_RESOURCE_ARRAY(uint32_t, num_sections); 120 uint32_t* secsize = NEW_RESOURCE_ARRAY(uint32_t, num_sections); 121 122 // Store offsets of all strings here in such order: 123 // zero-string (always 0) 124 // provider1-name 125 // probe1-function 126 // probe1-name 127 // arg-1 128 // arg-2 129 // ... 130 // probe2-function 131 // probe2-name 132 // arg-1 133 // arg-2 134 // provider2-name 135 // ... 136 137 uint32_t strcount = 0; 138 // Count the number of strings we'll need 139 for(int prvc = 0; prvc < providers_count; ++prvc) { 140 JVM_DTraceProvider* provider = &providers[prvc]; 141 // Provider name 142 ++strcount; 143 for(int prbc = 0; prbc < provider->probe_count; ++prbc) { 144 JVM_DTraceProbe* p = &(provider->probes[prbc]); 145 symbolOop sig = JNIHandles::resolve_jmethod_id(p->method)->signature(); 146 // function + name + one per argument 147 strcount += 2 + ArgumentCount(sig).size(); 148 } 149 } 150 151 // Create place for string offsets 152 uint32_t* stroffs = NEW_RESOURCE_ARRAY(uint32_t, strcount + 1); 153 uint32_t string_index = 0; 154 uint32_t curstr = 0; 155 156 // First we need an empty string: "" 157 stroffs[curstr++] = string_index; 158 string_index += strlen("") + 1; 159 160 for(int prvc = 0; prvc < providers_count; ++prvc) { 161 JVM_DTraceProvider* provider = &providers[prvc]; 162 char* provider_name = java_lang_String::as_utf8_string( 163 JNIHandles::resolve_non_null(provider->name)); 164 stroffs[curstr++] = string_index; 165 string_index += strlen(provider_name) + 1; 166 167 // All probes 168 for(int prbc = 0; prbc < provider->probe_count; ++prbc) { 169 JVM_DTraceProbe* p = &(provider->probes[prbc]); 170 171 char* function = java_lang_String::as_utf8_string( 172 JNIHandles::resolve_non_null(p->function)); 173 stroffs[curstr++] = string_index; 174 string_index += strlen(function) + 1; 175 176 char* name = java_lang_String::as_utf8_string( 177 JNIHandles::resolve_non_null(p->name)); 178 stroffs[curstr++] = string_index; 179 string_index += strlen(name) + 1; 180 181 symbolOop sig = JNIHandles::resolve_jmethod_id(p->method)->signature(); 182 SignatureStream ss(sig); 183 for ( ; !ss.at_return_type(); ss.next()) { 184 BasicType bt = ss.type(); 185 const char* t = NULL; 186 if (bt == T_OBJECT && 187 ss.as_symbol_or_null() == vmSymbols::java_lang_String()) { 188 t = string_sig; 189 } else if (bt == T_LONG) { 190 t = long_sig; 191 } else { 192 t = int_sig; 193 } 194 stroffs[curstr++] = string_index; 195 string_index += strlen(t) + 1; 196 } 197 } 198 } 199 secoffs[STRTAB] = offset; 200 secsize[STRTAB] = string_index; 201 offset += string_index; 202 203 // Calculate the size of the rest 204 for(int prvc = 0; prvc < providers_count; ++prvc) { 205 JVM_DTraceProvider* provider = &providers[prvc]; 206 size_t provider_sec = PROVIDERS + prvc * 4; 207 size_t probe_sec = PROBES + prvc * 4; 208 size_t probeoffs_sec = PROBE_OFFSETS + prvc * 4; 209 size_t argoffs_sec = ARG_OFFSETS + prvc * 4; 210 211 // Allocate space for the provider data struction 212 secoffs[provider_sec] = align_size_up(offset, alignment_for[PROVIDERS]); 213 secsize[provider_sec] = sizeof(dof_provider_t); 214 offset = secoffs[provider_sec] + secsize[provider_sec]; 215 216 // Allocate space for all the probes 217 secoffs[probe_sec] = align_size_up(offset, alignment_for[PROBES]); 218 secsize[probe_sec] = sizeof(dof_probe_t) * provider->probe_count; 219 offset = secoffs[probe_sec] + secsize[probe_sec]; 220 221 // Allocate space for the probe offsets 222 secoffs[probeoffs_sec] = align_size_up(offset, alignment_for[PROBE_OFFSETS]); 223 secsize[probeoffs_sec] = sizeof(uint32_t) * provider->probe_count; 224 offset = secoffs[probeoffs_sec] + secsize[probeoffs_sec]; 225 226 // We need number of arguments argoffs 227 uint32_t argscount = 0; 228 for(int prbc = 0; prbc < provider->probe_count; ++prbc) { 229 JVM_DTraceProbe* p = &(provider->probes[prbc]); 230 symbolOop sig = JNIHandles::resolve_jmethod_id(p->method)->signature(); 231 argscount += ArgumentCount(sig).size(); 232 } 233 secoffs[argoffs_sec] = align_size_up(offset, alignment_for[ARG_OFFSETS]); 234 secsize[argoffs_sec] = sizeof(uint8_t) * argscount; 235 offset = secoffs[argoffs_sec] + secsize[argoffs_sec]; 236 } 237 238 uint32_t size = offset; 239 240 uint8_t* dof = NEW_RESOURCE_ARRAY(uint8_t, size); 241 if (!dof) { 242 return -1; 243 } 244 memset((void*)dof, 0, size); 245 246 // Fill memory with proper values 247 dof_hdr_t* hdr = (dof_hdr_t*)dof; 248 hdr->dofh_ident[DOF_ID_MAG0] = DOF_MAG_MAG0; 249 hdr->dofh_ident[DOF_ID_MAG1] = DOF_MAG_MAG1; 250 hdr->dofh_ident[DOF_ID_MAG2] = DOF_MAG_MAG2; 251 hdr->dofh_ident[DOF_ID_MAG3] = DOF_MAG_MAG3; 252 hdr->dofh_ident[DOF_ID_MODEL] = DOF_MODEL_NATIVE; // No variants 253 hdr->dofh_ident[DOF_ID_ENCODING] = DOF_ENCODE_NATIVE; // No variants 254 hdr->dofh_ident[DOF_ID_VERSION] = DOF_VERSION_1; // No variants 255 hdr->dofh_ident[DOF_ID_DIFVERS] = DIF_VERSION_2; // No variants 256 // all other fields of ident to zero 257 258 hdr->dofh_flags = 0; 259 hdr->dofh_hdrsize = sizeof(dof_hdr_t); 260 hdr->dofh_secsize = sizeof(dof_sec_t); 261 hdr->dofh_secnum = num_sections; 262 hdr->dofh_secoff = sizeof(dof_hdr_t); 263 hdr->dofh_loadsz = size; 264 hdr->dofh_filesz = size; 265 266 // First section: STRTAB 267 dof_sec_t* sec = (dof_sec_t*)(dof + sizeof(dof_hdr_t)); 268 sec->dofs_type = DOF_SECT_STRTAB; 269 sec->dofs_align = alignment_for[STRTAB]; 270 sec->dofs_flags = DOF_SECF_LOAD; 271 sec->dofs_entsize = 0; 272 sec->dofs_offset = secoffs[STRTAB]; 273 sec->dofs_size = secsize[STRTAB]; 274 // Make data for this section 275 char* str = (char*)(dof + sec->dofs_offset); 276 277 *str = 0; str += 1; // "" 278 279 // Run through all strings again 280 for(int prvc = 0; prvc < providers_count; ++prvc) { 281 JVM_DTraceProvider* provider = &providers[prvc]; 282 char* provider_name = java_lang_String::as_utf8_string( 283 JNIHandles::resolve_non_null(provider->name)); 284 strcpy(str, provider_name); 285 str += strlen(provider_name) + 1; 286 287 // All probes 288 for(int prbc = 0; prbc < provider->probe_count; ++prbc) { 289 JVM_DTraceProbe* p = &(provider->probes[prbc]); 290 291 char* function = java_lang_String::as_utf8_string( 292 JNIHandles::resolve_non_null(p->function)); 293 strcpy(str, function); 294 str += strlen(str) + 1; 295 296 char* name = java_lang_String::as_utf8_string( 297 JNIHandles::resolve_non_null(p->name)); 298 strcpy(str, name); 299 str += strlen(name) + 1; 300 301 symbolOop sig = JNIHandles::resolve_jmethod_id(p->method)->signature(); 302 SignatureStream ss(sig); 303 for ( ; !ss.at_return_type(); ss.next()) { 304 BasicType bt = ss.type(); 305 const char* t; 306 if (bt == T_OBJECT && 307 ss.as_symbol_or_null() == vmSymbols::java_lang_String()) { 308 t = string_sig; 309 } else if (bt == T_LONG) { 310 t = long_sig; 311 } else { 312 t = int_sig; 313 } 314 strcpy(str, t); 315 str += strlen(t) + 1; 316 } 317 } 318 } 319 320 curstr = 1; 321 for(int prvc = 0; prvc < providers_count; ++prvc) { 322 JVM_DTraceProvider* provider = &providers[prvc]; 323 size_t provider_sec = PROVIDERS + prvc * 4; 324 size_t probe_sec = PROBES + prvc * 4; 325 size_t probeoffs_sec = PROBE_OFFSETS + prvc * 4; 326 size_t argoffs_sec = ARG_OFFSETS + prvc * 4; 327 328 // PROVIDER /////////////////////////////////////////////////////////////// 329 // Section header 330 sec = (dof_sec_t*) 331 (dof + sizeof(dof_hdr_t) + sizeof(dof_sec_t) * provider_sec); 332 sec->dofs_type = DOF_SECT_PROVIDER; 333 sec->dofs_align = alignment_for[PROVIDERS]; 334 sec->dofs_flags = DOF_SECF_LOAD; 335 sec->dofs_entsize = 0; 336 sec->dofs_offset = secoffs[provider_sec]; 337 sec->dofs_size = secsize[provider_sec]; 338 // Make provider decriiption 339 dof_provider_t* prv = (dof_provider_t*)(dof + sec->dofs_offset); 340 prv->dofpv_strtab = STRTAB; 341 prv->dofpv_probes = probe_sec; 342 prv->dofpv_prargs = argoffs_sec; 343 prv->dofpv_proffs = probeoffs_sec; 344 prv->dofpv_name = stroffs[curstr++]; // Index in string table 345 prv->dofpv_provattr = DOF_ATTR( 346 provider->providerAttributes.nameStability, 347 provider->providerAttributes.dataStability, 348 provider->providerAttributes.dependencyClass); 349 prv->dofpv_modattr = DOF_ATTR( 350 provider->moduleAttributes.nameStability, 351 provider->moduleAttributes.dataStability, 352 provider->moduleAttributes.dependencyClass); 353 prv->dofpv_funcattr = DOF_ATTR( 354 provider->functionAttributes.nameStability, 355 provider->functionAttributes.dataStability, 356 provider->functionAttributes.dependencyClass); 357 prv->dofpv_nameattr = DOF_ATTR( 358 provider->nameAttributes.nameStability, 359 provider->nameAttributes.dataStability, 360 provider->nameAttributes.dependencyClass); 361 prv->dofpv_argsattr = DOF_ATTR( 362 provider->argsAttributes.nameStability, 363 provider->argsAttributes.dataStability, 364 provider->argsAttributes.dependencyClass); 365 366 // PROBES ///////////////////////////////////////////////////////////////// 367 // Section header 368 sec = (dof_sec_t*) 369 (dof + sizeof(dof_hdr_t) + sizeof(dof_sec_t) * probe_sec); 370 sec->dofs_type = DOF_SECT_PROBES; 371 sec->dofs_align = alignment_for[PROBES]; 372 sec->dofs_flags = DOF_SECF_LOAD; 373 sec->dofs_entsize = sizeof(dof_probe_t); 374 sec->dofs_offset = secoffs[probe_sec]; 375 sec->dofs_size = secsize[probe_sec]; 376 // Make probes descriptions 377 uint32_t argsoffs = 0; 378 for(int prbc = 0; prbc < provider->probe_count; ++prbc) { 379 JVM_DTraceProbe* probe = &(provider->probes[prbc]); 380 methodOop m = JNIHandles::resolve_jmethod_id(probe->method); 381 int arg_count = ArgumentCount(m->signature()).size(); 382 assert(m->code() != NULL, "must have an nmethod"); 383 384 dof_probe_t* prb = 385 (dof_probe_t*)(dof + sec->dofs_offset + prbc * sizeof(dof_probe_t)); 386 387 prb->dofpr_addr = (uint64_t)m->code()->entry_point(); 388 prb->dofpr_func = stroffs[curstr++]; // Index in string table 389 prb->dofpr_name = stroffs[curstr++]; // Index in string table 390 prb->dofpr_nargv = stroffs[curstr ]; // Index in string table 391 // We spent siglen strings here 392 curstr += arg_count; 393 prb->dofpr_xargv = prb->dofpr_nargv; // Same bunch of strings 394 prb->dofpr_argidx = argsoffs; 395 prb->dofpr_offidx = prbc; 396 prb->dofpr_nargc = arg_count; 397 prb->dofpr_xargc = arg_count; 398 prb->dofpr_noffs = 1; // Number of offsets 399 // Next bunch of offsets 400 argsoffs += arg_count; 401 } 402 403 // PROFFS ///////////////////////////////////////////////////////////////// 404 // Section header 405 sec = (dof_sec_t*) 406 (dof + sizeof(dof_hdr_t) + sizeof(dof_sec_t) * probeoffs_sec); 407 sec->dofs_type = DOF_SECT_PROFFS; 408 sec->dofs_align = alignment_for[PROBE_OFFSETS]; 409 sec->dofs_flags = DOF_SECF_LOAD; 410 sec->dofs_entsize = sizeof(uint32_t); 411 sec->dofs_offset = secoffs[probeoffs_sec]; 412 sec->dofs_size = secsize[probeoffs_sec]; 413 // Make offsets 414 for (int prbc = 0; prbc < provider->probe_count; ++prbc) { 415 uint32_t* pof = 416 (uint32_t*)(dof + sec->dofs_offset + sizeof(uint32_t) * prbc); 417 JVM_DTraceProbe* probe = &(provider->probes[prbc]); 418 methodOop m = JNIHandles::resolve_jmethod_id(probe->method); 419 *pof = m->code()->trap_offset(); 420 } 421 422 // PRARGS ///////////////////////////////////////////////////////////////// 423 // Section header 424 sec = (dof_sec_t*) 425 (dof + sizeof(dof_hdr_t) + sizeof(dof_sec_t) * argoffs_sec); 426 sec->dofs_type = DOF_SECT_PRARGS; 427 sec->dofs_align = alignment_for[ARG_OFFSETS]; 428 sec->dofs_flags = DOF_SECF_LOAD; 429 sec->dofs_entsize = sizeof(uint8_t); 430 sec->dofs_offset = secoffs[argoffs_sec]; 431 sec->dofs_size = secsize[argoffs_sec]; 432 // Make arguments 433 uint8_t* par = (uint8_t*)(dof + sec->dofs_offset); 434 for (int prbc = 0; prbc < provider->probe_count; ++prbc) { 435 JVM_DTraceProbe* p = &(provider->probes[prbc]); 436 symbolOop sig = JNIHandles::resolve_jmethod_id(p->method)->signature(); 437 uint8_t count = (uint8_t)ArgumentCount(sig).size(); 438 for (uint8_t i = 0; i < count; ++i) { 439 *par++ = i; 440 } 441 } 442 } 443 444 // Register module 445 return dof_register(module, dof, moduleBaseAddress); 446 } 447 448 449 void DTraceJSDT::pd_dispose(int handle) { 450 int fd; 451 if (handle == -1) { 452 return; 453 } 454 fd = dofhelper_open(); 455 if (fd < 0) 456 return; 457 ioctl(fd, DTRACEHIOC_REMOVE, handle); 458 close(fd); 459 } 460 461 jboolean DTraceJSDT::pd_is_supported() { 462 int fd = dofhelper_open(); 463 if (fd < 0) { 464 return false; 465 } 466 close(fd); 467 return true; 468 } 469 470 static const char* dofSecTypeFor(uint32_t type) { 471 switch (type) { 472 case 0: return "DOF_SECT_NONE"; 473 case 1: return "DOF_SECT_COMMENTS"; 474 case 2: return "DOF_SECT_SOURCE"; 475 case 3: return "DOF_SECT_ECBDESC"; 476 case 4: return "DOF_SECT_PROBEDESC"; 477 case 5: return "DOF_SECT_ACTDESC"; 478 case 6: return "DOF_SECT_DIFOHDR"; 479 case 7: return "DOF_SECT_DIF"; 480 case 8: return "DOF_SECT_STRTAB"; 481 case 9: return "DOF_SECT_VARTAB"; 482 case 10: return "DOF_SECT_RELTAB"; 483 case 11: return "DOF_SECT_TYPETAB"; 484 case 12: return "DOF_SECT_URELHDR"; 485 case 13: return "DOF_SECT_KRELHDR"; 486 case 14: return "DOF_SECT_OPTDESC"; 487 case 15: return "DOF_SECT_PROVIDER"; 488 case 16: return "DOF_SECT_PROBES"; 489 case 17: return "DOF_SECT_PRARGS"; 490 case 18: return "DOF_SECT_PROFFS"; 491 case 19: return "DOF_SECT_INTTAB"; 492 case 20: return "DOF_SECT_UTSNAME"; 493 case 21: return "DOF_SECT_XLTAB"; 494 case 22: return "DOF_SECT_XLMEMBERS"; 495 case 23: return "DOF_SECT_XLIMPORT"; 496 case 24: return "DOF_SECT_XLEXPORT"; 497 case 25: return "DOF_SECT_PREXPORT"; 498 case 26: return "DOF_SECT_PRENOFFS"; 499 default: return "<unknown>"; 500 } 501 } 502 503 static void printDOFStringTabSec(void* dof, dof_sec_t* sec) { 504 size_t tab = sec->dofs_offset; 505 size_t limit = sec->dofs_size; 506 tty->print_cr("// String Table:"); 507 for (size_t idx = 0; idx < limit; /*empty*/) { 508 char* str = ((char*)dof) + tab + idx; 509 tty->print_cr("// [0x%x + 0x%x] '%s'", tab, idx, str); 510 idx += strlen(str) + 1; 511 } 512 } 513 514 static void printDOFProviderSec(void* dof, dof_sec_t* sec) { 515 dof_provider_t* prov = (dof_provider_t*)((char*)dof + sec->dofs_offset); 516 tty->print_cr("// dof_provider_t {"); 517 tty->print_cr("// dofpv_strtab = %d", prov->dofpv_strtab); 518 tty->print_cr("// dofpv_probes = %d", prov->dofpv_probes); 519 tty->print_cr("// dofpv_prargs = %d", prov->dofpv_prargs); 520 tty->print_cr("// dofpv_proffs = %d", prov->dofpv_proffs); 521 tty->print_cr("// dofpv_name = 0x%x", prov->dofpv_name); 522 tty->print_cr("// dofpv_provattr = 0x%08x", prov->dofpv_provattr); 523 tty->print_cr("// dofpv_modattr = 0x%08x", prov->dofpv_modattr); 524 tty->print_cr("// dofpv_funcattr = 0x%08x", prov->dofpv_funcattr); 525 tty->print_cr("// dofpv_nameattr = 0x%08x", prov->dofpv_nameattr); 526 tty->print_cr("// dofpv_argsattr = 0x%08x", prov->dofpv_argsattr); 527 tty->print_cr("// }"); 528 } 529 530 static void printDOFProbesSec(void* dof, dof_sec_t* sec) { 531 size_t idx = sec->dofs_offset; 532 size_t limit = idx + sec->dofs_size; 533 for (size_t idx = sec->dofs_offset; idx < limit; idx += sec->dofs_entsize) { 534 dof_probe_t* prb = (dof_probe_t*)((char*)dof + idx); 535 tty->print_cr("// dof_probe_t {"); 536 tty->print_cr("// dofpr_addr = 0x%016llx", prb->dofpr_addr); 537 tty->print_cr("// dofpr_func = 0x%x", prb->dofpr_func); 538 tty->print_cr("// dofpr_name = 0x%x", prb->dofpr_name); 539 tty->print_cr("// dofpr_nargv = 0x%x", prb->dofpr_nargv); 540 tty->print_cr("// dofpr_xargv = 0x%x", prb->dofpr_xargv); 541 tty->print_cr("// dofpr_argidx = 0x%x", prb->dofpr_argidx); 542 tty->print_cr("// dofpr_offidx = 0x%x", prb->dofpr_offidx); 543 tty->print_cr("// dofpr_nargc = %d", prb->dofpr_nargc); 544 tty->print_cr("// dofpr_xargc = %d", prb->dofpr_xargc); 545 tty->print_cr("// dofpr_noffs = %d", prb->dofpr_noffs); 546 tty->print_cr("// }"); 547 } 548 } 549 550 static void printDOFOffsetsSec(void* dof, dof_sec_t* sec) { 551 size_t tab = sec->dofs_offset; 552 size_t limit = sec->dofs_size; 553 tty->print_cr("// Offsets:"); 554 for (size_t idx = 0; idx < limit; idx += sec->dofs_entsize) { 555 uint32_t* off = (uint32_t*)((char*)dof + tab + idx); 556 tty->print_cr("// [0x%x + 0x%x]: %d", tab, idx, *off); 557 } 558 } 559 560 static void printDOFArgsSec(void* dof, dof_sec_t* sec) { 561 size_t tab = sec->dofs_offset; 562 size_t limit = sec->dofs_size; 563 tty->print_cr("// Arguments:"); 564 for (size_t idx = 0; idx < limit; idx += sec->dofs_entsize) { 565 uint8_t* arg = (uint8_t*)((char*)dof + tab + idx); 566 tty->print_cr("// [0x%x + 0x%x]: %d", tab, idx, *arg); 567 } 568 } 569 570 static void printDOFSection(void* dof, dof_sec_t* sec) { 571 tty->print_cr("// dof_sec_t {"); 572 tty->print_cr("// dofs_type = 0x%x /* %s */", 573 sec->dofs_type, dofSecTypeFor(sec->dofs_type)); 574 tty->print_cr("// dofs_align = %d", sec->dofs_align); 575 tty->print_cr("// dofs_flags = 0x%x", sec->dofs_flags); 576 tty->print_cr("// dofs_entsize = %d", sec->dofs_entsize); 577 tty->print_cr("// dofs_offset = 0x%llx", sec->dofs_offset); 578 tty->print_cr("// dofs_size = %lld", sec->dofs_size); 579 tty->print_cr("// }"); 580 switch (sec->dofs_type) { 581 case DOF_SECT_STRTAB: printDOFStringTabSec(dof, sec); break; 582 case DOF_SECT_PROVIDER: printDOFProviderSec(dof, sec); break; 583 case DOF_SECT_PROBES: printDOFProbesSec(dof, sec); break; 584 case DOF_SECT_PROFFS: printDOFOffsetsSec(dof, sec); break; 585 case DOF_SECT_PRARGS: printDOFArgsSec(dof, sec); break; 586 default: tty->print_cr("// <section type not recognized>"); 587 } 588 } 589 590 static void printDOFHeader(dof_hdr_t* hdr) { 591 tty->print_cr("// dof_hdr_t {"); 592 tty->print_cr("// dofh_ident[DOF_ID_MAG0] = 0x%x", 593 hdr->dofh_ident[DOF_ID_MAG0]); 594 tty->print_cr("// dofh_ident[DOF_ID_MAG1] = 0x%x", 595 hdr->dofh_ident[DOF_ID_MAG1]); 596 tty->print_cr("// dofh_ident[DOF_ID_MAG2] = 0x%x", 597 hdr->dofh_ident[DOF_ID_MAG2]); 598 tty->print_cr("// dofh_ident[DOF_ID_MAG3] = 0x%x", 599 hdr->dofh_ident[DOF_ID_MAG3]); 600 tty->print_cr("// dofh_ident[DOF_ID_MODEL] = 0x%x", 601 hdr->dofh_ident[DOF_ID_MODEL]); 602 tty->print_cr("// dofh_ident[DOF_ID_ENCODING] = 0x%x", 603 hdr->dofh_ident[DOF_ID_ENCODING]); 604 tty->print_cr("// dofh_ident[DOF_ID_VERSION] = 0x%x", 605 hdr->dofh_ident[DOF_ID_VERSION]); 606 tty->print_cr("// dofh_ident[DOF_ID_DIFVERS] = 0x%x", 607 hdr->dofh_ident[DOF_ID_DIFVERS]); 608 tty->print_cr("// dofh_flags = 0x%x", hdr->dofh_flags); 609 tty->print_cr("// dofh_hdrsize = %d", hdr->dofh_hdrsize); 610 tty->print_cr("// dofh_secsize = %d", hdr->dofh_secsize); 611 tty->print_cr("// dofh_secnum = %d", hdr->dofh_secnum); 612 tty->print_cr("// dofh_secoff = %lld", hdr->dofh_secoff); 613 tty->print_cr("// dofh_loadsz = %lld", hdr->dofh_loadsz); 614 tty->print_cr("// dofh_filesz = %lld", hdr->dofh_filesz); 615 tty->print_cr("// }"); 616 } 617 618 static void printDOF(void* dof) { 619 dof_hdr_t* hdr = (dof_hdr_t*)dof; 620 printDOFHeader(hdr); 621 for (int i = 0; i < hdr->dofh_secnum; ++i) { 622 dof_sec_t* sec = 623 (dof_sec_t*)((char*)dof + sizeof(dof_hdr_t) + i * sizeof(dof_sec_t)); 624 tty->print_cr("// [Section #%d]", i); 625 printDOFSection(dof, sec); 626 } 627 } 628 629 /** 630 * This prints out hex data in a 'windbg' or 'xxd' form, where each line is: 631 * <hex-address>: 8 * <hex-halfword> <ascii translation> 632 * example: 633 * 0000000: 7f44 4f46 0102 0102 0000 0000 0000 0000 .DOF............ 634 * 0000010: 0000 0000 0000 0040 0000 0020 0000 0005 .......@... .... 635 * 0000020: 0000 0000 0000 0040 0000 0000 0000 015d .......@.......] 636 * ... 637 */ 638 static void printDOFRawData(void* dof) { 639 size_t size = ((dof_hdr_t*)dof)->dofh_loadsz; 640 size_t limit = (size + 16) / 16 * 16; 641 for (size_t i = 0; i < limit; ++i) { 642 if (i % 16 == 0) { 643 tty->print("%07x:", i); 644 } 645 if (i % 2 == 0) { 646 tty->print(" "); 647 } 648 if (i < size) { 649 tty->print("%02x", ((unsigned char*)dof)[i]); 650 } else { 651 tty->print(" "); 652 } 653 if ((i + 1) % 16 == 0) { 654 tty->print(" "); 655 for (size_t j = 0; j < 16; ++j) { 656 size_t idx = i + j - 15; 657 char c = ((char*)dof)[idx]; 658 if (idx < size) { 659 tty->print("%c", c >= 32 && c <= 126 ? c : '.'); 660 } 661 } 662 tty->print_cr(""); 663 } 664 } 665 tty->print_cr(""); 666 } 667 668 static void printDOFHelper(dof_helper_t* helper) { 669 tty->print_cr("// dof_helper_t {"); 670 tty->print_cr("// dofhp_mod = \"%s\"", helper->dofhp_mod); 671 tty->print_cr("// dofhp_addr = 0x%016llx", helper->dofhp_addr); 672 tty->print_cr("// dofhp_dof = 0x%016llx", helper->dofhp_dof); 673 printDOF((void*)helper->dofhp_dof); 674 tty->print_cr("// }"); 675 printDOFRawData((void*)helper->dofhp_dof); 676 } 677 678 #else // ndef HAVE_DTRACE_H 679 680 // Get here if we're not building on at least Solaris 10 681 int DTraceJSDT::pd_activate( 682 void* baseAddress, jstring module, 683 jint provider_count, JVM_DTraceProvider* providers) { 684 return -1; 685 } 686 687 void DTraceJSDT::pd_dispose(int handle) { 688 } 689 690 jboolean DTraceJSDT::pd_is_supported() { 691 return false; 692 } 693 #endif