Tue, 14 May 2013 09:41:12 -0700
8012902: remove use of global operator new - take 2
Summary: The fix of 8010992, disable use of global operator new and new[] which caused failure on some tests. This takes two of the bugs also add ALLOW_OPERATOR_NEW_USAGE to prevent crash for third party code calling operator new of jvm on certain platforms.
Reviewed-by: coleenp, dholmes, zgu
Contributed-by: yumin.qi@oracle.com
1 /* Copyright (c) 2013, Oracle and/or its affiliates. All rights reserved.
2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
3 *
4 * This code is free software; you can redistribute it and/or modify it
5 * under the terms of the GNU General Public License version 2 only, as
6 * published by the Free Software Foundation.
7 *
8 * This code is distributed in the hope that it will be useful, but WITHOUT
9 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
10 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
11 * version 2 for more details (a copy is included in the LICENSE file that
12 * accompanied this code).
13 *
14 * You should have received a copy of the GNU General Public License version
15 * 2 along with this work; if not, write to the Free Software Foundation,
16 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
17 *
18 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
19 * or visit www.oracle.com if you need additional information or have any
20 * questions.
21 *
22 */
24 #include "precompiled.hpp"
25 #include "ci/ciMethodData.hpp"
26 #include "ci/ciReplay.hpp"
27 #include "ci/ciUtilities.hpp"
28 #include "compiler/compileBroker.hpp"
29 #include "memory/allocation.inline.hpp"
30 #include "memory/oopFactory.hpp"
31 #include "memory/resourceArea.hpp"
32 #include "utilities/copy.hpp"
33 #include "utilities/macros.hpp"
35 #ifndef PRODUCT
37 // ciReplay
39 typedef struct _ciMethodDataRecord {
40 const char* klass;
41 const char* method;
42 const char* signature;
43 int state;
44 int current_mileage;
45 intptr_t* data;
46 int data_length;
47 char* orig_data;
48 int orig_data_length;
49 int oops_length;
50 jobject* oops_handles;
51 int* oops_offsets;
52 } ciMethodDataRecord;
54 typedef struct _ciMethodRecord {
55 const char* klass;
56 const char* method;
57 const char* signature;
58 int instructions_size;
59 int interpreter_invocation_count;
60 int interpreter_throwout_count;
61 int invocation_counter;
62 int backedge_counter;
63 } ciMethodRecord;
65 class CompileReplay;
66 static CompileReplay* replay_state;
68 class CompileReplay : public StackObj {
69 private:
70 FILE* stream;
71 Thread* thread;
72 Handle protection_domain;
73 Handle loader;
75 GrowableArray<ciMethodRecord*> ci_method_records;
76 GrowableArray<ciMethodDataRecord*> ci_method_data_records;
78 const char* _error_message;
80 char* bufptr;
81 char* buffer;
82 int buffer_length;
83 int buffer_end;
84 int line_no;
86 public:
87 CompileReplay(const char* filename, TRAPS) {
88 thread = THREAD;
89 loader = Handle(thread, SystemDictionary::java_system_loader());
90 stream = fopen(filename, "rt");
91 if (stream == NULL) {
92 fprintf(stderr, "ERROR: Can't open replay file %s\n", filename);
93 }
94 buffer_length = 32;
95 buffer = NEW_RESOURCE_ARRAY(char, buffer_length);
96 _error_message = NULL;
98 test();
99 }
101 ~CompileReplay() {
102 if (stream != NULL) fclose(stream);
103 }
105 void test() {
106 strcpy(buffer, "1 2 foo 4 bar 0x9 \"this is it\"");
107 bufptr = buffer;
108 assert(parse_int("test") == 1, "what");
109 assert(parse_int("test") == 2, "what");
110 assert(strcmp(parse_string(), "foo") == 0, "what");
111 assert(parse_int("test") == 4, "what");
112 assert(strcmp(parse_string(), "bar") == 0, "what");
113 assert(parse_intptr_t("test") == 9, "what");
114 assert(strcmp(parse_quoted_string(), "this is it") == 0, "what");
115 }
117 bool had_error() {
118 return _error_message != NULL || thread->has_pending_exception();
119 }
121 bool can_replay() {
122 return !(stream == NULL || had_error());
123 }
125 void report_error(const char* msg) {
126 _error_message = msg;
127 // Restore the buffer contents for error reporting
128 for (int i = 0; i < buffer_end; i++) {
129 if (buffer[i] == '\0') buffer[i] = ' ';
130 }
131 }
133 int parse_int(const char* label) {
134 if (had_error()) {
135 return 0;
136 }
138 int v = 0;
139 int read;
140 if (sscanf(bufptr, "%i%n", &v, &read) != 1) {
141 report_error(label);
142 } else {
143 bufptr += read;
144 }
145 return v;
146 }
148 intptr_t parse_intptr_t(const char* label) {
149 if (had_error()) {
150 return 0;
151 }
153 intptr_t v = 0;
154 int read;
155 if (sscanf(bufptr, INTPTR_FORMAT "%n", &v, &read) != 1) {
156 report_error(label);
157 } else {
158 bufptr += read;
159 }
160 return v;
161 }
163 void skip_ws() {
164 // Skip any leading whitespace
165 while (*bufptr == ' ' || *bufptr == '\t') {
166 bufptr++;
167 }
168 }
171 char* scan_and_terminate(char delim) {
172 char* str = bufptr;
173 while (*bufptr != delim && *bufptr != '\0') {
174 bufptr++;
175 }
176 if (*bufptr != '\0') {
177 *bufptr++ = '\0';
178 }
179 if (bufptr == str) {
180 // nothing here
181 return NULL;
182 }
183 return str;
184 }
186 char* parse_string() {
187 if (had_error()) return NULL;
189 skip_ws();
190 return scan_and_terminate(' ');
191 }
193 char* parse_quoted_string() {
194 if (had_error()) return NULL;
196 skip_ws();
198 if (*bufptr == '"') {
199 bufptr++;
200 return scan_and_terminate('"');
201 } else {
202 return scan_and_terminate(' ');
203 }
204 }
206 const char* parse_escaped_string() {
207 char* result = parse_quoted_string();
208 if (result != NULL) {
209 unescape_string(result);
210 }
211 return result;
212 }
214 // Look for the tag 'tag' followed by an
215 bool parse_tag_and_count(const char* tag, int& length) {
216 const char* t = parse_string();
217 if (t == NULL) {
218 return false;
219 }
221 if (strcmp(tag, t) != 0) {
222 report_error(tag);
223 return false;
224 }
225 length = parse_int("parse_tag_and_count");
226 return !had_error();
227 }
229 // Parse a sequence of raw data encoded as bytes and return the
230 // resulting data.
231 char* parse_data(const char* tag, int& length) {
232 if (!parse_tag_and_count(tag, length)) {
233 return NULL;
234 }
236 char * result = NEW_RESOURCE_ARRAY(char, length);
237 for (int i = 0; i < length; i++) {
238 int val = parse_int("data");
239 result[i] = val;
240 }
241 return result;
242 }
244 // Parse a standard chunk of data emitted as:
245 // 'tag' <length> # # ...
246 // Where each # is an intptr_t item
247 intptr_t* parse_intptr_data(const char* tag, int& length) {
248 if (!parse_tag_and_count(tag, length)) {
249 return NULL;
250 }
252 intptr_t* result = NEW_RESOURCE_ARRAY(intptr_t, length);
253 for (int i = 0; i < length; i++) {
254 skip_ws();
255 intptr_t val = parse_intptr_t("data");
256 result[i] = val;
257 }
258 return result;
259 }
261 // Parse a possibly quoted version of a symbol into a symbolOop
262 Symbol* parse_symbol(TRAPS) {
263 const char* str = parse_escaped_string();
264 if (str != NULL) {
265 Symbol* sym = SymbolTable::lookup(str, (int)strlen(str), CHECK_NULL);
266 return sym;
267 }
268 return NULL;
269 }
271 // Parse a valid klass name and look it up
272 Klass* parse_klass(TRAPS) {
273 const char* str = parse_escaped_string();
274 Symbol* klass_name = SymbolTable::lookup(str, (int)strlen(str), CHECK_NULL);
275 if (klass_name != NULL) {
276 Klass* k = SystemDictionary::resolve_or_fail(klass_name, loader, protection_domain, true, THREAD);
277 if (HAS_PENDING_EXCEPTION) {
278 oop throwable = PENDING_EXCEPTION;
279 java_lang_Throwable::print(throwable, tty);
280 tty->cr();
281 report_error(str);
282 return NULL;
283 }
284 return k;
285 }
286 return NULL;
287 }
289 // Lookup a klass
290 Klass* resolve_klass(const char* klass, TRAPS) {
291 Symbol* klass_name = SymbolTable::lookup(klass, (int)strlen(klass), CHECK_NULL);
292 return SystemDictionary::resolve_or_fail(klass_name, loader, protection_domain, true, CHECK_NULL);
293 }
295 // Parse the standard tuple of <klass> <name> <signature>
296 Method* parse_method(TRAPS) {
297 InstanceKlass* k = (InstanceKlass*)parse_klass(CHECK_NULL);
298 Symbol* method_name = parse_symbol(CHECK_NULL);
299 Symbol* method_signature = parse_symbol(CHECK_NULL);
300 Method* m = k->find_method(method_name, method_signature);
301 if (m == NULL) {
302 report_error("can't find method");
303 }
304 return m;
305 }
307 // Process each line of the replay file executing each command until
308 // the file ends.
309 void process(TRAPS) {
310 line_no = 1;
311 int pos = 0;
312 int c = getc(stream);
313 while(c != EOF) {
314 if (pos + 1 >= buffer_length) {
315 int newl = buffer_length * 2;
316 char* newb = NEW_RESOURCE_ARRAY(char, newl);
317 memcpy(newb, buffer, pos);
318 buffer = newb;
319 buffer_length = newl;
320 }
321 if (c == '\n') {
322 // null terminate it, reset the pointer and process the line
323 buffer[pos] = '\0';
324 buffer_end = pos++;
325 bufptr = buffer;
326 process_command(CHECK);
327 if (had_error()) {
328 tty->print_cr("Error while parsing line %d: %s\n", line_no, _error_message);
329 tty->print_cr("%s", buffer);
330 return;
331 }
332 pos = 0;
333 buffer_end = 0;
334 line_no++;
335 } else if (c == '\r') {
336 // skip LF
337 } else {
338 buffer[pos++] = c;
339 }
340 c = getc(stream);
341 }
342 }
344 void process_command(TRAPS) {
345 char* cmd = parse_string();
346 if (cmd == NULL) {
347 return;
348 }
349 if (strcmp("#", cmd) == 0) {
350 // ignore
351 } else if (strcmp("compile", cmd) == 0) {
352 process_compile(CHECK);
353 } else if (strcmp("ciMethod", cmd) == 0) {
354 process_ciMethod(CHECK);
355 } else if (strcmp("ciMethodData", cmd) == 0) {
356 process_ciMethodData(CHECK);
357 } else if (strcmp("staticfield", cmd) == 0) {
358 process_staticfield(CHECK);
359 } else if (strcmp("ciInstanceKlass", cmd) == 0) {
360 process_ciInstanceKlass(CHECK);
361 } else if (strcmp("instanceKlass", cmd) == 0) {
362 process_instanceKlass(CHECK);
363 #if INCLUDE_JVMTI
364 } else if (strcmp("JvmtiExport", cmd) == 0) {
365 process_JvmtiExport(CHECK);
366 #endif // INCLUDE_JVMTI
367 } else {
368 report_error("unknown command");
369 }
370 }
372 // validation of comp_level
373 bool is_valid_comp_level(int comp_level) {
374 const int msg_len = 256;
375 char* msg = NULL;
376 if (!is_compile(comp_level)) {
377 msg = NEW_RESOURCE_ARRAY(char, msg_len);
378 jio_snprintf(msg, msg_len, "%d isn't compilation level", comp_level);
379 } else if (!TieredCompilation && (comp_level != CompLevel_highest_tier)) {
380 msg = NEW_RESOURCE_ARRAY(char, msg_len);
381 switch (comp_level) {
382 case CompLevel_simple:
383 jio_snprintf(msg, msg_len, "compilation level %d requires Client VM or TieredCompilation", comp_level);
384 break;
385 case CompLevel_full_optimization:
386 jio_snprintf(msg, msg_len, "compilation level %d requires Server VM", comp_level);
387 break;
388 default:
389 jio_snprintf(msg, msg_len, "compilation level %d requires TieredCompilation", comp_level);
390 }
391 }
392 if (msg != NULL) {
393 report_error(msg);
394 return false;
395 }
396 return true;
397 }
399 // compile <klass> <name> <signature> <entry_bci> <comp_level>
400 void process_compile(TRAPS) {
401 // methodHandle method;
402 Method* method = parse_method(CHECK);
403 int entry_bci = parse_int("entry_bci");
404 const char* comp_level_label = "comp_level";
405 int comp_level = parse_int(comp_level_label);
406 // old version w/o comp_level
407 if (had_error() && (error_message() == comp_level_label)) {
408 comp_level = CompLevel_full_optimization;
409 }
410 if (!is_valid_comp_level(comp_level)) {
411 return;
412 }
413 Klass* k = method->method_holder();
414 ((InstanceKlass*)k)->initialize(THREAD);
415 if (HAS_PENDING_EXCEPTION) {
416 oop throwable = PENDING_EXCEPTION;
417 java_lang_Throwable::print(throwable, tty);
418 tty->cr();
419 if (ReplayIgnoreInitErrors) {
420 CLEAR_PENDING_EXCEPTION;
421 ((InstanceKlass*)k)->set_init_state(InstanceKlass::fully_initialized);
422 } else {
423 return;
424 }
425 }
426 // Make sure the existence of a prior compile doesn't stop this one
427 nmethod* nm = (entry_bci != InvocationEntryBci) ? method->lookup_osr_nmethod_for(entry_bci, comp_level, true) : method->code();
428 if (nm != NULL) {
429 nm->make_not_entrant();
430 }
431 replay_state = this;
432 CompileBroker::compile_method(method, entry_bci, comp_level,
433 methodHandle(), 0, "replay", THREAD);
434 replay_state = NULL;
435 reset();
436 }
438 // ciMethod <klass> <name> <signature> <invocation_counter> <backedge_counter> <interpreter_invocation_count> <interpreter_throwout_count> <instructions_size>
439 //
440 //
441 void process_ciMethod(TRAPS) {
442 Method* method = parse_method(CHECK);
443 ciMethodRecord* rec = new_ciMethod(method);
444 rec->invocation_counter = parse_int("invocation_counter");
445 rec->backedge_counter = parse_int("backedge_counter");
446 rec->interpreter_invocation_count = parse_int("interpreter_invocation_count");
447 rec->interpreter_throwout_count = parse_int("interpreter_throwout_count");
448 rec->instructions_size = parse_int("instructions_size");
449 }
451 // ciMethodData <klass> <name> <signature> <state> <current mileage> orig <length> # # ... data <length> # # ... oops <length>
452 void process_ciMethodData(TRAPS) {
453 Method* method = parse_method(CHECK);
454 /* jsut copied from Method, to build interpret data*/
455 if (InstanceRefKlass::owns_pending_list_lock((JavaThread*)THREAD)) {
456 return;
457 }
458 // methodOopDesc::build_interpreter_method_data(method, CHECK);
459 {
460 // Grab a lock here to prevent multiple
461 // MethodData*s from being created.
462 MutexLocker ml(MethodData_lock, THREAD);
463 if (method->method_data() == NULL) {
464 ClassLoaderData* loader_data = method->method_holder()->class_loader_data();
465 MethodData* method_data = MethodData::allocate(loader_data, method, CHECK);
466 method->set_method_data(method_data);
467 }
468 }
470 // collect and record all the needed information for later
471 ciMethodDataRecord* rec = new_ciMethodData(method);
472 rec->state = parse_int("state");
473 rec->current_mileage = parse_int("current_mileage");
475 rec->orig_data = parse_data("orig", rec->orig_data_length);
476 if (rec->orig_data == NULL) {
477 return;
478 }
479 rec->data = parse_intptr_data("data", rec->data_length);
480 if (rec->data == NULL) {
481 return;
482 }
483 if (!parse_tag_and_count("oops", rec->oops_length)) {
484 return;
485 }
486 rec->oops_handles = NEW_RESOURCE_ARRAY(jobject, rec->oops_length);
487 rec->oops_offsets = NEW_RESOURCE_ARRAY(int, rec->oops_length);
488 for (int i = 0; i < rec->oops_length; i++) {
489 int offset = parse_int("offset");
490 if (had_error()) {
491 return;
492 }
493 Klass* k = parse_klass(CHECK);
494 rec->oops_offsets[i] = offset;
495 KlassHandle *kh = NEW_C_HEAP_OBJ(KlassHandle, mtCompiler);
496 ::new ((void*)kh) KlassHandle(THREAD, k);
497 rec->oops_handles[i] = (jobject)kh;
498 }
499 }
501 // instanceKlass <name>
502 //
503 // Loads and initializes the klass 'name'. This can be used to
504 // create particular class loading environments
505 void process_instanceKlass(TRAPS) {
506 // just load the referenced class
507 Klass* k = parse_klass(CHECK);
508 }
510 // ciInstanceKlass <name> <is_linked> <is_initialized> <length> tag # # # ...
511 //
512 // Load the klass 'name' and link or initialize it. Verify that the
513 // constant pool is the same length as 'length' and make sure the
514 // constant pool tags are in the same state.
515 void process_ciInstanceKlass(TRAPS) {
516 InstanceKlass* k = (InstanceKlass *)parse_klass(CHECK);
517 int is_linked = parse_int("is_linked");
518 int is_initialized = parse_int("is_initialized");
519 int length = parse_int("length");
520 if (is_initialized) {
521 k->initialize(THREAD);
522 if (HAS_PENDING_EXCEPTION) {
523 oop throwable = PENDING_EXCEPTION;
524 java_lang_Throwable::print(throwable, tty);
525 tty->cr();
526 if (ReplayIgnoreInitErrors) {
527 CLEAR_PENDING_EXCEPTION;
528 k->set_init_state(InstanceKlass::fully_initialized);
529 } else {
530 return;
531 }
532 }
533 } else if (is_linked) {
534 k->link_class(CHECK);
535 }
536 ConstantPool* cp = k->constants();
537 if (length != cp->length()) {
538 report_error("constant pool length mismatch: wrong class files?");
539 return;
540 }
542 int parsed_two_word = 0;
543 for (int i = 1; i < length; i++) {
544 int tag = parse_int("tag");
545 if (had_error()) {
546 return;
547 }
548 switch (cp->tag_at(i).value()) {
549 case JVM_CONSTANT_UnresolvedClass: {
550 if (tag == JVM_CONSTANT_Class) {
551 tty->print_cr("Resolving klass %s at %d", cp->unresolved_klass_at(i)->as_utf8(), i);
552 Klass* k = cp->klass_at(i, CHECK);
553 }
554 break;
555 }
556 case JVM_CONSTANT_Long:
557 case JVM_CONSTANT_Double:
558 parsed_two_word = i + 1;
560 case JVM_CONSTANT_ClassIndex:
561 case JVM_CONSTANT_StringIndex:
562 case JVM_CONSTANT_String:
563 case JVM_CONSTANT_UnresolvedClassInError:
564 case JVM_CONSTANT_Fieldref:
565 case JVM_CONSTANT_Methodref:
566 case JVM_CONSTANT_InterfaceMethodref:
567 case JVM_CONSTANT_NameAndType:
568 case JVM_CONSTANT_Utf8:
569 case JVM_CONSTANT_Integer:
570 case JVM_CONSTANT_Float:
571 if (tag != cp->tag_at(i).value()) {
572 report_error("tag mismatch: wrong class files?");
573 return;
574 }
575 break;
577 case JVM_CONSTANT_Class:
578 if (tag == JVM_CONSTANT_Class) {
579 } else if (tag == JVM_CONSTANT_UnresolvedClass) {
580 tty->print_cr("Warning: entry was unresolved in the replay data");
581 } else {
582 report_error("Unexpected tag");
583 return;
584 }
585 break;
587 case 0:
588 if (parsed_two_word == i) continue;
590 default:
591 fatal(err_msg_res("Unexpected tag: %d", cp->tag_at(i).value()));
592 break;
593 }
595 }
596 }
598 // Initialize a class and fill in the value for a static field.
599 // This is useful when the compile was dependent on the value of
600 // static fields but it's impossible to properly rerun the static
601 // initiailizer.
602 void process_staticfield(TRAPS) {
603 InstanceKlass* k = (InstanceKlass *)parse_klass(CHECK);
605 if (ReplaySuppressInitializers == 0 ||
606 ReplaySuppressInitializers == 2 && k->class_loader() == NULL) {
607 return;
608 }
610 assert(k->is_initialized(), "must be");
612 const char* field_name = parse_escaped_string();;
613 const char* field_signature = parse_string();
614 fieldDescriptor fd;
615 Symbol* name = SymbolTable::lookup(field_name, (int)strlen(field_name), CHECK);
616 Symbol* sig = SymbolTable::lookup(field_signature, (int)strlen(field_signature), CHECK);
617 if (!k->find_local_field(name, sig, &fd) ||
618 !fd.is_static() ||
619 fd.has_initial_value()) {
620 report_error(field_name);
621 return;
622 }
624 oop java_mirror = k->java_mirror();
625 if (field_signature[0] == '[') {
626 int length = parse_int("array length");
627 oop value = NULL;
629 if (field_signature[1] == '[') {
630 // multi dimensional array
631 ArrayKlass* kelem = (ArrayKlass *)parse_klass(CHECK);
632 int rank = 0;
633 while (field_signature[rank] == '[') {
634 rank++;
635 }
636 int* dims = NEW_RESOURCE_ARRAY(int, rank);
637 dims[0] = length;
638 for (int i = 1; i < rank; i++) {
639 dims[i] = 1; // These aren't relevant to the compiler
640 }
641 value = kelem->multi_allocate(rank, dims, CHECK);
642 } else {
643 if (strcmp(field_signature, "[B") == 0) {
644 value = oopFactory::new_byteArray(length, CHECK);
645 } else if (strcmp(field_signature, "[Z") == 0) {
646 value = oopFactory::new_boolArray(length, CHECK);
647 } else if (strcmp(field_signature, "[C") == 0) {
648 value = oopFactory::new_charArray(length, CHECK);
649 } else if (strcmp(field_signature, "[S") == 0) {
650 value = oopFactory::new_shortArray(length, CHECK);
651 } else if (strcmp(field_signature, "[F") == 0) {
652 value = oopFactory::new_singleArray(length, CHECK);
653 } else if (strcmp(field_signature, "[D") == 0) {
654 value = oopFactory::new_doubleArray(length, CHECK);
655 } else if (strcmp(field_signature, "[I") == 0) {
656 value = oopFactory::new_intArray(length, CHECK);
657 } else if (strcmp(field_signature, "[J") == 0) {
658 value = oopFactory::new_longArray(length, CHECK);
659 } else if (field_signature[0] == '[' && field_signature[1] == 'L') {
660 KlassHandle kelem = resolve_klass(field_signature + 1, CHECK);
661 value = oopFactory::new_objArray(kelem(), length, CHECK);
662 } else {
663 report_error("unhandled array staticfield");
664 }
665 }
666 java_mirror->obj_field_put(fd.offset(), value);
667 } else {
668 const char* string_value = parse_escaped_string();
669 if (strcmp(field_signature, "I") == 0) {
670 int value = atoi(string_value);
671 java_mirror->int_field_put(fd.offset(), value);
672 } else if (strcmp(field_signature, "B") == 0) {
673 int value = atoi(string_value);
674 java_mirror->byte_field_put(fd.offset(), value);
675 } else if (strcmp(field_signature, "C") == 0) {
676 int value = atoi(string_value);
677 java_mirror->char_field_put(fd.offset(), value);
678 } else if (strcmp(field_signature, "S") == 0) {
679 int value = atoi(string_value);
680 java_mirror->short_field_put(fd.offset(), value);
681 } else if (strcmp(field_signature, "Z") == 0) {
682 int value = atol(string_value);
683 java_mirror->bool_field_put(fd.offset(), value);
684 } else if (strcmp(field_signature, "J") == 0) {
685 jlong value;
686 if (sscanf(string_value, JLONG_FORMAT, &value) != 1) {
687 fprintf(stderr, "Error parsing long: %s\n", string_value);
688 return;
689 }
690 java_mirror->long_field_put(fd.offset(), value);
691 } else if (strcmp(field_signature, "F") == 0) {
692 float value = atof(string_value);
693 java_mirror->float_field_put(fd.offset(), value);
694 } else if (strcmp(field_signature, "D") == 0) {
695 double value = atof(string_value);
696 java_mirror->double_field_put(fd.offset(), value);
697 } else if (strcmp(field_signature, "Ljava/lang/String;") == 0) {
698 Handle value = java_lang_String::create_from_str(string_value, CHECK);
699 java_mirror->obj_field_put(fd.offset(), value());
700 } else if (field_signature[0] == 'L') {
701 Symbol* klass_name = SymbolTable::lookup(field_signature, (int)strlen(field_signature), CHECK);
702 KlassHandle kelem = resolve_klass(field_signature, CHECK);
703 oop value = ((InstanceKlass*)kelem())->allocate_instance(CHECK);
704 java_mirror->obj_field_put(fd.offset(), value);
705 } else {
706 report_error("unhandled staticfield");
707 }
708 }
709 }
711 #if INCLUDE_JVMTI
712 void process_JvmtiExport(TRAPS) {
713 const char* field = parse_string();
714 bool value = parse_int("JvmtiExport flag") != 0;
715 if (strcmp(field, "can_access_local_variables") == 0) {
716 JvmtiExport::set_can_access_local_variables(value);
717 } else if (strcmp(field, "can_hotswap_or_post_breakpoint") == 0) {
718 JvmtiExport::set_can_hotswap_or_post_breakpoint(value);
719 } else if (strcmp(field, "can_post_on_exceptions") == 0) {
720 JvmtiExport::set_can_post_on_exceptions(value);
721 } else {
722 report_error("Unrecognized JvmtiExport directive");
723 }
724 }
725 #endif // INCLUDE_JVMTI
727 // Create and initialize a record for a ciMethod
728 ciMethodRecord* new_ciMethod(Method* method) {
729 ciMethodRecord* rec = NEW_RESOURCE_OBJ(ciMethodRecord);
730 rec->klass = method->method_holder()->name()->as_utf8();
731 rec->method = method->name()->as_utf8();
732 rec->signature = method->signature()->as_utf8();
733 ci_method_records.append(rec);
734 return rec;
735 }
737 // Lookup data for a ciMethod
738 ciMethodRecord* find_ciMethodRecord(Method* method) {
739 const char* klass_name = method->method_holder()->name()->as_utf8();
740 const char* method_name = method->name()->as_utf8();
741 const char* signature = method->signature()->as_utf8();
742 for (int i = 0; i < ci_method_records.length(); i++) {
743 ciMethodRecord* rec = ci_method_records.at(i);
744 if (strcmp(rec->klass, klass_name) == 0 &&
745 strcmp(rec->method, method_name) == 0 &&
746 strcmp(rec->signature, signature) == 0) {
747 return rec;
748 }
749 }
750 return NULL;
751 }
753 // Create and initialize a record for a ciMethodData
754 ciMethodDataRecord* new_ciMethodData(Method* method) {
755 ciMethodDataRecord* rec = NEW_RESOURCE_OBJ(ciMethodDataRecord);
756 rec->klass = method->method_holder()->name()->as_utf8();
757 rec->method = method->name()->as_utf8();
758 rec->signature = method->signature()->as_utf8();
759 ci_method_data_records.append(rec);
760 return rec;
761 }
763 // Lookup data for a ciMethodData
764 ciMethodDataRecord* find_ciMethodDataRecord(Method* method) {
765 const char* klass_name = method->method_holder()->name()->as_utf8();
766 const char* method_name = method->name()->as_utf8();
767 const char* signature = method->signature()->as_utf8();
768 for (int i = 0; i < ci_method_data_records.length(); i++) {
769 ciMethodDataRecord* rec = ci_method_data_records.at(i);
770 if (strcmp(rec->klass, klass_name) == 0 &&
771 strcmp(rec->method, method_name) == 0 &&
772 strcmp(rec->signature, signature) == 0) {
773 return rec;
774 }
775 }
776 return NULL;
777 }
779 const char* error_message() {
780 return _error_message;
781 }
783 void reset() {
784 _error_message = NULL;
785 ci_method_records.clear();
786 ci_method_data_records.clear();
787 }
789 // Take an ascii string contain \u#### escapes and convert it to utf8
790 // in place.
791 static void unescape_string(char* value) {
792 char* from = value;
793 char* to = value;
794 while (*from != '\0') {
795 if (*from != '\\') {
796 *from++ = *to++;
797 } else {
798 switch (from[1]) {
799 case 'u': {
800 from += 2;
801 jchar value=0;
802 for (int i=0; i<4; i++) {
803 char c = *from++;
804 switch (c) {
805 case '0': case '1': case '2': case '3': case '4':
806 case '5': case '6': case '7': case '8': case '9':
807 value = (value << 4) + c - '0';
808 break;
809 case 'a': case 'b': case 'c':
810 case 'd': case 'e': case 'f':
811 value = (value << 4) + 10 + c - 'a';
812 break;
813 case 'A': case 'B': case 'C':
814 case 'D': case 'E': case 'F':
815 value = (value << 4) + 10 + c - 'A';
816 break;
817 default:
818 ShouldNotReachHere();
819 }
820 }
821 UNICODE::convert_to_utf8(&value, 1, to);
822 to++;
823 break;
824 }
825 case 't': *to++ = '\t'; from += 2; break;
826 case 'n': *to++ = '\n'; from += 2; break;
827 case 'r': *to++ = '\r'; from += 2; break;
828 case 'f': *to++ = '\f'; from += 2; break;
829 default:
830 ShouldNotReachHere();
831 }
832 }
833 }
834 *from = *to;
835 }
836 };
838 void ciReplay::replay(TRAPS) {
839 int exit_code = replay_impl(THREAD);
841 Threads::destroy_vm();
843 vm_exit(exit_code);
844 }
846 int ciReplay::replay_impl(TRAPS) {
847 HandleMark hm;
848 ResourceMark rm;
849 // Make sure we don't run with background compilation
850 BackgroundCompilation = false;
852 if (ReplaySuppressInitializers > 2) {
853 // ReplaySuppressInitializers > 2 means that we want to allow
854 // normal VM bootstrap but once we get into the replay itself
855 // don't allow any intializers to be run.
856 ReplaySuppressInitializers = 1;
857 }
859 if (FLAG_IS_DEFAULT(ReplayDataFile)) {
860 tty->print_cr("ERROR: no compiler replay data file specified (use -XX:ReplayDataFile=replay_pid12345.txt).");
861 return 1;
862 }
864 // Load and parse the replay data
865 CompileReplay rp(ReplayDataFile, THREAD);
866 int exit_code = 0;
867 if (rp.can_replay()) {
868 rp.process(THREAD);
869 } else {
870 exit_code = 1;
871 return exit_code;
872 }
874 if (HAS_PENDING_EXCEPTION) {
875 oop throwable = PENDING_EXCEPTION;
876 CLEAR_PENDING_EXCEPTION;
877 java_lang_Throwable::print(throwable, tty);
878 tty->cr();
879 java_lang_Throwable::print_stack_trace(throwable, tty);
880 tty->cr();
881 exit_code = 2;
882 }
884 if (rp.had_error()) {
885 tty->print_cr("Failed on %s", rp.error_message());
886 exit_code = 1;
887 }
888 return exit_code;
889 }
892 void ciReplay::initialize(ciMethodData* m) {
893 if (replay_state == NULL) {
894 return;
895 }
897 ASSERT_IN_VM;
898 ResourceMark rm;
900 Method* method = m->get_MethodData()->method();
901 ciMethodDataRecord* rec = replay_state->find_ciMethodDataRecord(method);
902 if (rec == NULL) {
903 // This indicates some mismatch with the original environment and
904 // the replay environment though it's not always enough to
905 // interfere with reproducing a bug
906 tty->print_cr("Warning: requesting ciMethodData record for method with no data: ");
907 method->print_name(tty);
908 tty->cr();
909 } else {
910 m->_state = rec->state;
911 m->_current_mileage = rec->current_mileage;
912 if (rec->data_length != 0) {
913 assert(m->_data_size == rec->data_length * (int)sizeof(rec->data[0]), "must agree");
915 // Write the correct ciObjects back into the profile data
916 ciEnv* env = ciEnv::current();
917 for (int i = 0; i < rec->oops_length; i++) {
918 KlassHandle *h = (KlassHandle *)rec->oops_handles[i];
919 *(ciMetadata**)(rec->data + rec->oops_offsets[i]) =
920 env->get_metadata((*h)());
921 }
922 // Copy the updated profile data into place as intptr_ts
923 #ifdef _LP64
924 Copy::conjoint_jlongs_atomic((jlong *)rec->data, (jlong *)m->_data, rec->data_length);
925 #else
926 Copy::conjoint_jints_atomic((jint *)rec->data, (jint *)m->_data, rec->data_length);
927 #endif
928 }
930 // copy in the original header
931 Copy::conjoint_jbytes(rec->orig_data, (char*)&m->_orig, rec->orig_data_length);
932 }
933 }
936 bool ciReplay::should_not_inline(ciMethod* method) {
937 if (replay_state == NULL) {
938 return false;
939 }
941 VM_ENTRY_MARK;
942 // ciMethod without a record shouldn't be inlined.
943 return replay_state->find_ciMethodRecord(method->get_Method()) == NULL;
944 }
947 void ciReplay::initialize(ciMethod* m) {
948 if (replay_state == NULL) {
949 return;
950 }
952 ASSERT_IN_VM;
953 ResourceMark rm;
955 Method* method = m->get_Method();
956 ciMethodRecord* rec = replay_state->find_ciMethodRecord(method);
957 if (rec == NULL) {
958 // This indicates some mismatch with the original environment and
959 // the replay environment though it's not always enough to
960 // interfere with reproducing a bug
961 tty->print_cr("Warning: requesting ciMethod record for method with no data: ");
962 method->print_name(tty);
963 tty->cr();
964 } else {
965 EXCEPTION_CONTEXT;
966 MethodCounters* mcs = method->method_counters();
967 // m->_instructions_size = rec->instructions_size;
968 m->_instructions_size = -1;
969 m->_interpreter_invocation_count = rec->interpreter_invocation_count;
970 m->_interpreter_throwout_count = rec->interpreter_throwout_count;
971 if (mcs == NULL) {
972 mcs = Method::build_method_counters(method, CHECK_AND_CLEAR);
973 }
974 mcs->invocation_counter()->_counter = rec->invocation_counter;
975 mcs->backedge_counter()->_counter = rec->backedge_counter;
976 }
977 }
979 bool ciReplay::is_loaded(Method* method) {
980 if (replay_state == NULL) {
981 return true;
982 }
984 ASSERT_IN_VM;
985 ResourceMark rm;
987 ciMethodRecord* rec = replay_state->find_ciMethodRecord(method);
988 return rec != NULL;
989 }
990 #endif // PRODUCT