388N/A# include "incls/_precompiled.incl"

388N/A# include "incls/_jvmtiClassFileReconstituter.cpp.incl"

388N/A

388N/A

388N/A

928N/Avoid JvmtiClassFileReconstituter::write_field_infos() {

928N/A HandleMark hm(thread());

388N/A typeArrayHandle fields(thread(), ikh()->fields());

388N/A int fields_length = fields->length();

388N/A int num_fields = fields_length / instanceKlass::next_offset;

388N/A objArrayHandle fields_anno(thread(), ikh()->fields_annotations());

388N/A

388N/A write_u2(num_fields);

388N/A for (int index = 0; index < fields_length; index += instanceKlass::next_offset) {

388N/A AccessFlags access_flags;

0N/A int flags = fields->ushort_at(index + instanceKlass::access_flags_offset);

0N/A access_flags.set_flags(flags);

0N/A int name_index = fields->ushort_at(index + instanceKlass::name_index_offset);

0N/A int signature_index = fields->ushort_at(index + instanceKlass::signature_index_offset);

1190N/A int initial_value_index = fields->ushort_at(index + instanceKlass::initval_index_offset);

0N/A guarantee(name_index != 0 && signature_index != 0, "bad constant pool index for field");

0N/A int offset = ikh()->offset_from_fields( index );

1190N/A int generic_signature_index =

0N/A fields->ushort_at(index + instanceKlass::generic_signature_offset);

0N/A typeArrayHandle anno(thread(), fields_anno.not_null() ?

1190N/A (typeArrayOop)(fields_anno->obj_at(index / instanceKlass::next_offset)) :

0N/A (typeArrayOop)NULL);

368N/A

1190N/A // JVMSpec| field_info {

457N/A // JVMSpec| u2 access_flags;

1190N/A // JVMSpec| u2 name_index;

0N/A // JVMSpec| u2 descriptor_index;

368N/A // JVMSpec| u2 attributes_count;

0N/A // JVMSpec| attribute_info attributes[attributes_count];

0N/A // JVMSpec| }

1190N/A

0N/A write_u2(flags & JVM_RECOGNIZED_FIELD_MODIFIERS);

0N/A write_u2(name_index);

0N/A write_u2(signature_index);

0N/A int attr_count = 0;

344N/A if (initial_value_index != 0) {

457N/A ++attr_count;

457N/A }

0N/A if (access_flags.is_synthetic()) {

1190N/A // ++attr_count;

0N/A }

0N/A if (generic_signature_index != 0) {

0N/A ++attr_count;

0N/A }

0N/A if (anno.not_null()) {

1190N/A ++attr_count; // has RuntimeVisibleAnnotations attribute

0N/A }

0N/A

0N/A write_u2(attr_count);

0N/A

0N/A if (initial_value_index != 0) {

0N/A write_attribute_name_index("ConstantValue");

1190N/A write_u4(2); //length always 2

0N/A write_u2(initial_value_index);

0N/A }

0N/A if (access_flags.is_synthetic()) {

0N/A // write_synthetic_attribute();

0N/A }

0N/A if (generic_signature_index != 0) {

1190N/A write_signature_attribute(generic_signature_index);

0N/A }

0N/A if (anno.not_null()) {

0N/A write_annotations_attribute("RuntimeVisibleAnnotations", anno);

1190N/A }

0N/A }

0N/A}

0N/A

0N/Avoid JvmtiClassFileReconstituter::write_code_attribute(methodHandle method) {

388N/A constMethodHandle const_method(thread(), method->constMethod());

388N/A u2 line_num_cnt = 0;

388N/A int stackmap_len = 0;

0N/A

0N/A // compute number and length of attributes -- FIXME: for now no LVT

0N/A int attr_count = 0;

460N/A int attr_size = 0;

1190N/A if (const_method->has_linenumber_table()) {

0N/A line_num_cnt = line_number_table_entries(method);

1190N/A if (line_num_cnt != 0) {

388N/A ++attr_count;

0N/A // Compute the complete size of the line number table attribute:

388N/A // LineNumberTable_attribute {

1190N/A // u2 attribute_name_index;

1190N/A // u4 attribute_length;

0N/A // u2 line_number_table_length;

0N/A // { u2 start_pc;

0N/A // u2 line_number;

421N/A // } line_number_table[line_number_table_length];

0N/A // }

460N/A attr_size += 2 + 4 + 2 + line_num_cnt * (2 + 2);

14N/A }

928N/A }

14N/A if (method->has_stackmap_table()) {

345N/A stackmap_len = method->stackmap_data()->length();

338N/A if (stackmap_len != 0) {

338N/A ++attr_count;

338N/A // Compute the size of the stack map table attribute (VM stores raw):

338N/A // StackMapTable_attribute {

338N/A // u2 attribute_name_index;

338N/A // u4 attribute_length;

338N/A // u2 number_of_entries;

338N/A // stack_map_frame_entries[number_of_entries];

338N/A // }

338N/A attr_size += 2 + 4 + stackmap_len;

345N/A }

345N/A }

345N/A

345N/A typeArrayHandle exception_table(thread(), const_method->exception_table());

388N/A int exception_table_length = exception_table->length();

345N/A int exception_table_entries = exception_table_length / 4;

388N/A int code_size = const_method->code_size();

1190N/A int size =

0N/A 2+2+4 + // max_stack, max_locals, code_length

0N/A code_size + // code

1190N/A 2 + // exception_table_length

0N/A (2+2+2+2) * exception_table_entries + // exception_table

0N/A 2 + // attributes_count

0N/A attr_size; // attributes

0N/A

1190N/A write_attribute_name_index("Code");

0N/A write_u4(size);

0N/A write_u2(method->max_stack());

0N/A write_u2(method->max_locals());

816N/A write_u4(code_size);

0N/A copy_bytecodes(method, (unsigned char*)writeable_address(code_size));

0N/A write_u2(exception_table_entries);

0N/A for (int index = 0; index < exception_table_length; ) {

0N/A write_u2(exception_table->int_at(index++));

0N/A write_u2(exception_table->int_at(index++));

0N/A write_u2(exception_table->int_at(index++));

0N/A write_u2(exception_table->int_at(index++));

0N/A }

1190N/A write_u2(attr_count);

0N/A if (line_num_cnt != 0) {

0N/A write_line_number_table_attribute(method, line_num_cnt);

0N/A }

0N/A if (stackmap_len != 0) {

0N/A write_stackmap_table_attribute(method, stackmap_len);

0N/A }

0N/A

0N/A // FIXME: write LVT attribute

0N/A}

1190N/A

0N/Avoid JvmtiClassFileReconstituter::write_exceptions_attribute(constMethodHandle const_method) {

0N/A CheckedExceptionElement* checked_exceptions = const_method->checked_exceptions_start();

0N/A int checked_exceptions_length = const_method->checked_exceptions_length();

816N/A int size =

816N/A 2 + // number_of_exceptions

0N/A 2 * checked_exceptions_length; // exception_index_table

0N/A

0N/A write_attribute_name_index("Exceptions");

0N/A write_u4(size);

0N/A write_u2(checked_exceptions_length);

1190N/A for (int index = 0; index < checked_exceptions_length; index++) {

0N/A write_u2(checked_exceptions[index].class_cp_index);

0N/A }

1190N/A}

0N/A

0N/Avoid JvmtiClassFileReconstituter::write_source_file_attribute() {

0N/A assert(ikh()->source_file_name() != NULL, "caller must check");

0N/A

0N/A write_attribute_name_index("SourceFile");

0N/A write_u4(2); // always length 2

0N/A write_u2(symbol_to_cpool_index(ikh()->source_file_name()));

0N/A}

1190N/A

0N/Avoid JvmtiClassFileReconstituter::write_source_debug_extension_attribute() {

0N/A assert(ikh()->source_debug_extension() != NULL, "caller must check");

0N/A

1190N/A write_attribute_name_index("SourceDebugExtension");

0N/A write_u4(2); // always length 2

0N/A write_u2(symbol_to_cpool_index(ikh()->source_debug_extension()));

0N/A}

0N/A

0N/Avoid JvmtiClassFileReconstituter::write_signature_attribute(u2 generic_signature_index) {

0N/A write_attribute_name_index("Signature");

0N/A write_u4(2); // always length 2

0N/A write_u2(generic_signature_index);

0N/A}

0N/A

0N/Au2 JvmtiClassFileReconstituter::inner_classes_attribute_length() {

0N/A typeArrayOop inner_class_list = ikh()->inner_classes();

0N/A return (inner_class_list == NULL) ? 0 : inner_class_list->length();

0N/A}

1190N/A

388N/Avoid JvmtiClassFileReconstituter::write_annotations_attribute(const char* attr_name,

0N/A typeArrayHandle annos) {

1190N/A u4 length = annos->length();

0N/A write_attribute_name_index(attr_name);

421N/A write_u4(length);

0N/A memcpy(writeable_address(length), annos->byte_at_addr(0), length);

0N/A}

0N/A

0N/A

938N/Avoid JvmtiClassFileReconstituter::write_inner_classes_attribute(int length) {

928N/A typeArrayOop inner_class_list = ikh()->inner_classes();

14N/A guarantee(inner_class_list != NULL && inner_class_list->length() == length,

368N/A "caller must check");

1185N/A typeArrayHandle inner_class_list_h(thread(), inner_class_list);

1185N/A assert (length % instanceKlass::inner_class_next_offset == 0, "just checking");

928N/A u2 entry_count = length / instanceKlass::inner_class_next_offset;

928N/A u4 size = 2 + entry_count * (2+2+2+2);

928N/A

1190N/A write_attribute_name_index("InnerClasses");

388N/A write_u4(size);

0N/A write_u2(entry_count);

1190N/A for (int i = 0; i < length; i += instanceKlass::inner_class_next_offset) {

1190N/A write_u2(inner_class_list_h->ushort_at(

0N/A i + instanceKlass::inner_class_inner_class_info_offset));

0N/A write_u2(inner_class_list_h->ushort_at(

0N/A i + instanceKlass::inner_class_outer_class_info_offset));

0N/A write_u2(inner_class_list_h->ushort_at(

0N/A i + instanceKlass::inner_class_inner_name_offset));

0N/A write_u2(inner_class_list_h->ushort_at(

1190N/A i + instanceKlass::inner_class_access_flags_offset));

0N/A }

388N/A}

0N/A

0N/Avoid JvmtiClassFileReconstituter::write_synthetic_attribute() {

388N/A write_attribute_name_index("Synthetic");

0N/A write_u4(0); //length always zero

388N/A}

0N/A

0N/Au2 JvmtiClassFileReconstituter::line_number_table_entries(methodHandle method) {

0N/A // The line number table is compressed so we don't know how big it is until decompressed.

0N/A // Decompression is really fast so we just do it twice.

99N/A u2 num_entries = 0;

99N/A CompressedLineNumberReadStream stream(method->compressed_linenumber_table());

99N/A while (stream.read_pair()) {

0N/A num_entries++;

0N/A }

1190N/A return num_entries;

0N/A}

1190N/A

0N/Avoid JvmtiClassFileReconstituter::write_line_number_table_attribute(methodHandle method,

0N/A u2 num_entries) {

0N/A

0N/A write_attribute_name_index("LineNumberTable");

0N/A write_u4(2 + num_entries * (2 + 2));

0N/A write_u2(num_entries);

0N/A

CompressedLineNumberReadStream stream(method->compressed_linenumber_table());

while (stream.read_pair()) {

write_u2(stream.bci());

write_u2(stream.line());

}

}

void JvmtiClassFileReconstituter::write_stackmap_table_attribute(methodHandle method,

int stackmap_len) {

write_attribute_name_index("StackMapTable");

write_u4(stackmap_len);

memcpy(

writeable_address(stackmap_len),

(void*)(method->stackmap_data()->byte_at_addr(0)),

stackmap_len);

}

void JvmtiClassFileReconstituter::write_method_info(methodHandle method) {

AccessFlags access_flags = method->access_flags();

constMethodHandle const_method(thread(), method->constMethod());

u2 generic_signature_index = const_method->generic_signature_index();

typeArrayHandle anno(thread(), method->annotations());

typeArrayHandle param_anno(thread(), method->parameter_annotations());

typeArrayHandle default_anno(thread(), method->annotation_default());

write_u2(access_flags.get_flags() & JVM_RECOGNIZED_METHOD_MODIFIERS);

write_u2(const_method->name_index());

write_u2(const_method->signature_index());

// write attributes in the same order javac does, so we can test with byte for

// byte comparison

int attr_count = 0;

if (const_method->code_size() != 0) {

++attr_count; // has Code attribute

}

if (const_method->has_checked_exceptions()) {

++attr_count; // has Exceptions attribute

}

if (default_anno.not_null()) {

++attr_count; // has AnnotationDefault attribute

}

// Deprecated attribute would go here

if (access_flags.is_synthetic()) { // FIXME

// ++attr_count;

}

if (generic_signature_index != 0) {

++attr_count;

}

if (anno.not_null()) {

++attr_count; // has RuntimeVisibleAnnotations attribute

}

if (param_anno.not_null()) {

++attr_count; // has RuntimeVisibleParameterAnnotations attribute

}

write_u2(attr_count);

if (const_method->code_size() > 0) {

write_code_attribute(method);

}

if (const_method->has_checked_exceptions()) {

write_exceptions_attribute(const_method);

}

if (default_anno.not_null()) {

write_annotations_attribute("AnnotationDefault", default_anno);

}

// Deprecated attribute would go here

if (access_flags.is_synthetic()) {

// write_synthetic_attribute();

}

if (generic_signature_index != 0) {

write_signature_attribute(generic_signature_index);

}

if (anno.not_null()) {

write_annotations_attribute("RuntimeVisibleAnnotations", anno);

}

if (param_anno.not_null()) {

write_annotations_attribute("RuntimeVisibleParameterAnnotations", param_anno);

}

}

void JvmtiClassFileReconstituter::write_class_attributes() {

u2 inner_classes_length = inner_classes_attribute_length();

symbolHandle generic_signature(thread(), ikh()->generic_signature());

typeArrayHandle anno(thread(), ikh()->class_annotations());

int attr_count = 0;

if (generic_signature() != NULL) {

++attr_count;

}

if (ikh()->source_file_name() != NULL) {

++attr_count;

}

if (ikh()->source_debug_extension() != NULL) {

++attr_count;

}

if (inner_classes_length > 0) {

++attr_count;

}

if (anno.not_null()) {

++attr_count; // has RuntimeVisibleAnnotations attribute

}

write_u2(attr_count);

if (generic_signature() != NULL) {

write_signature_attribute(symbol_to_cpool_index(generic_signature()));

}

if (ikh()->source_file_name() != NULL) {

write_source_file_attribute();

}

if (ikh()->source_debug_extension() != NULL) {

write_source_debug_extension_attribute();

}

if (inner_classes_length > 0) {

write_inner_classes_attribute(inner_classes_length);

}

if (anno.not_null()) {

write_annotations_attribute("RuntimeVisibleAnnotations", anno);

}

}

void JvmtiClassFileReconstituter::write_method_infos() {

HandleMark hm(thread());

objArrayHandle methods(thread(), ikh()->methods());

int num_methods = methods->length();

write_u2(num_methods);

if (JvmtiExport::can_maintain_original_method_order()) {

int index;

int original_index;

int* method_order = NEW_RESOURCE_ARRAY(int, num_methods);

// invert the method order mapping

for (index = 0; index < num_methods; index++) {

original_index = ikh()->method_ordering()->int_at(index);

assert(original_index >= 0 && original_index < num_methods,

"invalid original method index");

method_order[original_index] = index;

}

// write in original order

for (original_index = 0; original_index < num_methods; original_index++) {

index = method_order[original_index];

methodHandle method(thread(), (methodOop)(ikh()->methods()->obj_at(index)));

write_method_info(method);

}

} else {

// method order not preserved just dump the method infos

for (int index = 0; index < num_methods; index++) {

methodHandle method(thread(), (methodOop)(ikh()->methods()->obj_at(index)));

write_method_info(method);

}

}

}

void JvmtiClassFileReconstituter::write_class_file_format() {

ReallocMark();

// JVMSpec| ClassFile {

// JVMSpec| u4 magic;

write_u4(0xCAFEBABE);

// JVMSpec| u2 minor_version;

// JVMSpec| u2 major_version;

write_u2(ikh()->minor_version());

u2 major = ikh()->major_version();

write_u2(major);

// JVMSpec| u2 constant_pool_count;

// JVMSpec| cp_info constant_pool[constant_pool_count-1];

write_u2(cpool()->length());

copy_cpool_bytes(writeable_address(cpool_size()));

// JVMSpec| u2 access_flags;

write_u2(ikh()->access_flags().get_flags() & JVM_RECOGNIZED_CLASS_MODIFIERS);

// JVMSpec| u2 this_class;

// JVMSpec| u2 super_class;

write_u2(class_symbol_to_cpool_index(ikh()->name()));

klassOop super_class = ikh()->super();

write_u2(super_class == NULL? 0 : // zero for java.lang.Object

class_symbol_to_cpool_index(super_class->klass_part()->name()));

// JVMSpec| u2 interfaces_count;

// JVMSpec| u2 interfaces[interfaces_count];

objArrayHandle interfaces(thread(), ikh()->local_interfaces());

int num_interfaces = interfaces->length();

write_u2(num_interfaces);

for (int index = 0; index < num_interfaces; index++) {

HandleMark hm(thread());

instanceKlassHandle iikh(thread(), klassOop(interfaces->obj_at(index)));

write_u2(class_symbol_to_cpool_index(iikh->name()));

}

// JVMSpec| u2 fields_count;

// JVMSpec| field_info fields[fields_count];

write_field_infos();

// JVMSpec| u2 methods_count;

// JVMSpec| method_info methods[methods_count];

write_method_infos();

// JVMSpec| u2 attributes_count;

// JVMSpec| attribute_info attributes[attributes_count];

// JVMSpec| } /* end ClassFile 8?

write_class_attributes();

}

address JvmtiClassFileReconstituter::writeable_address(size_t size) {

size_t used_size = _buffer_ptr - _buffer;

if (size + used_size >= _buffer_size) {

// compute the new buffer size: must be at least twice as big as before

// plus whatever new is being used; then convert to nice clean block boundary

size_t new_buffer_size = (size + _buffer_size*2 + 1) / initial_buffer_size

* initial_buffer_size;

// VM goes belly-up if the memory isn't available, so cannot do OOM processing

_buffer = REALLOC_RESOURCE_ARRAY(u1, _buffer, _buffer_size, new_buffer_size);

_buffer_size = new_buffer_size;

_buffer_ptr = _buffer + used_size;

}

u1* ret_ptr = _buffer_ptr;

_buffer_ptr += size;

return ret_ptr;

}

void JvmtiClassFileReconstituter::write_attribute_name_index(const char* name) {

unsigned int hash_ignored;

symbolOop sym = SymbolTable::lookup_only(name, (int)strlen(name), hash_ignored);

assert(sym != NULL, "attribute name symbol not found");

u2 attr_name_index = symbol_to_cpool_index(sym);

assert(attr_name_index != 0, "attribute name symbol not in constant pool");

write_u2(attr_name_index);

}

void JvmtiClassFileReconstituter::write_u1(u1 x) {

*writeable_address(1) = x;

}

void JvmtiClassFileReconstituter::write_u2(u2 x) {

Bytes::put_Java_u2(writeable_address(2), x);

}

void JvmtiClassFileReconstituter::write_u4(u4 x) {

Bytes::put_Java_u4(writeable_address(4), x);

}

void JvmtiClassFileReconstituter::write_u8(u8 x) {

Bytes::put_Java_u8(writeable_address(8), x);

}

void JvmtiClassFileReconstituter::copy_bytecodes(methodHandle mh,

unsigned char* bytecodes) {

// use a BytecodeStream to iterate over the bytecodes. JVM/fast bytecodes

// and the breakpoint bytecode are converted to their original bytecodes.

BytecodeStream bs(mh);

unsigned char* p = bytecodes;

Bytecodes::Code code;

bool is_rewritten = instanceKlass::cast(mh->method_holder())->is_rewritten();

while ((code = bs.next()) >= 0) {

assert(Bytecodes::is_java_code(code), "sanity check");

assert(code != Bytecodes::_breakpoint, "sanity check");

// length of bytecode (mnemonic + operands)

address bcp = bs.bcp();

int len = bs.next_bcp() - bcp;

assert(len > 0, "length must be > 0");

// copy the bytecodes

*p = (unsigned char) (bs.is_wide()? Bytecodes::_wide : code);

if (len > 1) {

memcpy(p+1, bcp+1, len-1);

}

// During linking the get/put and invoke instructions are rewritten

// with an index into the constant pool cache. The original constant

// pool index must be returned to caller. Rewrite the index.

if (is_rewritten && len >= 3) {

switch (code) {

case Bytecodes::_getstatic : // fall through

case Bytecodes::_putstatic : // fall through

case Bytecodes::_getfield : // fall through

case Bytecodes::_putfield : // fall through

case Bytecodes::_invokevirtual : // fall through

case Bytecodes::_invokespecial : // fall through

case Bytecodes::_invokestatic : // fall through

case Bytecodes::_invokeinterface :

assert(len == 3 || (code == Bytecodes::_invokeinterface && len ==5),

"sanity check");

// cache cannot be pre-fetched since some classes won't have it yet

ConstantPoolCacheEntry* entry =

mh->constants()->cache()->entry_at(Bytes::get_native_u2(bcp+1));

int i = entry->constant_pool_index();

assert(i < mh->constants()->length(), "sanity check");

Bytes::put_Java_u2((address)(p+1), (u2)i); // java byte ordering

break;

}

}

p += len;

}

}