• file
• revisions
• annotate
• diff
• comparison
• raw

src/cpu/sparc/vm/jniFastGetField_sparc.cpp@a1980da045cc (annotated)

src/cpu/sparc/vm/jniFastGetField_sparc.cpp

Fri, 07 Nov 2008 09:29:38 -0800

author

kvn

date

Fri, 07 Nov 2008 09:29:38 -0800

changeset 855

a1980da045cc

parent 435

a61af66fc99e

child 1162

6b2273dd6fa9

permissions

-rw-r--r--

6462850: generate biased locking code in C2 ideal graph
Summary: Inline biased locking code in C2 ideal graph during macro nodes expansion
Reviewed-by: never

duke@435	1	/*
duke@435	2	* Copyright 2004-2006 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/_jniFastGetField_sparc.cpp.incl"
duke@435	27
duke@435	28	// TSO ensures that loads are blocking and ordered with respect to
duke@435	29	// to earlier loads, so we don't need LoadLoad membars.
duke@435	30
duke@435	31	#define __ masm->
duke@435	32
duke@435	33	#define BUFFER_SIZE 30*sizeof(jint)
duke@435	34
duke@435	35	// Common register usage:
duke@435	36	// O0: env
duke@435	37	// O1: obj
duke@435	38	// O2: jfieldID
duke@435	39	// O4: offset (O2 >> 2)
duke@435	40	// G4: old safepoint counter
duke@435	41
duke@435	42	address JNI_FastGetField::generate_fast_get_int_field0(BasicType type) {
duke@435	43	const char *name;
duke@435	44	switch (type) {
duke@435	45	case T_BOOLEAN: name = "jni_fast_GetBooleanField"; break;
duke@435	46	case T_BYTE: name = "jni_fast_GetByteField"; break;
duke@435	47	case T_CHAR: name = "jni_fast_GetCharField"; break;
duke@435	48	case T_SHORT: name = "jni_fast_GetShortField"; break;
duke@435	49	case T_INT: name = "jni_fast_GetIntField"; break;
duke@435	50	default: ShouldNotReachHere();
duke@435	51	}
duke@435	52	ResourceMark rm;
duke@435	53	BufferBlob* b = BufferBlob::create(name, BUFFER_SIZE*wordSize);
duke@435	54	address fast_entry = b->instructions_begin();
duke@435	55	CodeBuffer cbuf(fast_entry, b->instructions_size());
duke@435	56	MacroAssembler* masm = new MacroAssembler(&cbuf);
duke@435	57
duke@435	58	Label label1, label2;
duke@435	59
duke@435	60	address cnt_addr = SafepointSynchronize::safepoint_counter_addr();
duke@435	61	Address ca(O3, cnt_addr);
duke@435	62	__ sethi (ca);
duke@435	63	__ ld (ca, G4);
duke@435	64	__ andcc (G4, 1, G0);
duke@435	65	__ br (Assembler::notZero, false, Assembler::pn, label1);
duke@435	66	__ delayed()->srl (O2, 2, O4);
duke@435	67	__ ld_ptr (O1, 0, O5);
duke@435	68
duke@435	69	assert(count < LIST_CAPACITY, "LIST_CAPACITY too small");
duke@435	70	speculative_load_pclist[count] = __ pc();
duke@435	71	switch (type) {
duke@435	72	case T_BOOLEAN: __ ldub (O5, O4, G3); break;
duke@435	73	case T_BYTE: __ ldsb (O5, O4, G3); break;
duke@435	74	case T_CHAR: __ lduh (O5, O4, G3); break;
duke@435	75	case T_SHORT: __ ldsh (O5, O4, G3); break;
duke@435	76	case T_INT: __ ld (O5, O4, G3); break;
duke@435	77	default: ShouldNotReachHere();
duke@435	78	}
duke@435	79
duke@435	80	__ ld (ca, O5);
duke@435	81	__ cmp (O5, G4);
duke@435	82	__ br (Assembler::notEqual, false, Assembler::pn, label2);
duke@435	83	__ delayed()->mov (O7, G1);
duke@435	84	__ retl ();
duke@435	85	__ delayed()->mov (G3, O0);
duke@435	86
duke@435	87	slowcase_entry_pclist[count++] = __ pc();
duke@435	88	__ bind (label1);
duke@435	89	__ mov (O7, G1);
duke@435	90
duke@435	91	address slow_case_addr;
duke@435	92	switch (type) {
duke@435	93	case T_BOOLEAN: slow_case_addr = jni_GetBooleanField_addr(); break;
duke@435	94	case T_BYTE: slow_case_addr = jni_GetByteField_addr(); break;
duke@435	95	case T_CHAR: slow_case_addr = jni_GetCharField_addr(); break;
duke@435	96	case T_SHORT: slow_case_addr = jni_GetShortField_addr(); break;
duke@435	97	case T_INT: slow_case_addr = jni_GetIntField_addr(); break;
duke@435	98	default: ShouldNotReachHere();
duke@435	99	}
duke@435	100	__ bind (label2);
duke@435	101	__ call (slow_case_addr, relocInfo::none);
duke@435	102	__ delayed()->mov (G1, O7);
duke@435	103
duke@435	104	__ flush ();
duke@435	105
duke@435	106	return fast_entry;
duke@435	107	}
duke@435	108
duke@435	109	address JNI_FastGetField::generate_fast_get_boolean_field() {
duke@435	110	return generate_fast_get_int_field0(T_BOOLEAN);
duke@435	111	}
duke@435	112
duke@435	113	address JNI_FastGetField::generate_fast_get_byte_field() {
duke@435	114	return generate_fast_get_int_field0(T_BYTE);
duke@435	115	}
duke@435	116
duke@435	117	address JNI_FastGetField::generate_fast_get_char_field() {
duke@435	118	return generate_fast_get_int_field0(T_CHAR);
duke@435	119	}
duke@435	120
duke@435	121	address JNI_FastGetField::generate_fast_get_short_field() {
duke@435	122	return generate_fast_get_int_field0(T_SHORT);
duke@435	123	}
duke@435	124
duke@435	125	address JNI_FastGetField::generate_fast_get_int_field() {
duke@435	126	return generate_fast_get_int_field0(T_INT);
duke@435	127	}
duke@435	128
duke@435	129	address JNI_FastGetField::generate_fast_get_long_field() {
duke@435	130	const char *name = "jni_fast_GetLongField";
duke@435	131	ResourceMark rm;
duke@435	132	BufferBlob* b = BufferBlob::create(name, BUFFER_SIZE*wordSize);
duke@435	133	address fast_entry = b->instructions_begin();
duke@435	134	CodeBuffer cbuf(fast_entry, b->instructions_size());
duke@435	135	MacroAssembler* masm = new MacroAssembler(&cbuf);
duke@435	136
duke@435	137	Label label1, label2;
duke@435	138
duke@435	139	address cnt_addr = SafepointSynchronize::safepoint_counter_addr();
duke@435	140	Address ca(G3, cnt_addr);
duke@435	141	__ sethi (ca);
duke@435	142	__ ld (ca, G4);
duke@435	143	__ andcc (G4, 1, G0);
duke@435	144	__ br (Assembler::notZero, false, Assembler::pn, label1);
duke@435	145	__ delayed()->srl (O2, 2, O4);
duke@435	146	__ ld_ptr (O1, 0, O5);
duke@435	147	__ add (O5, O4, O5);
duke@435	148
duke@435	149	#ifndef _LP64
duke@435	150	assert(count < LIST_CAPACITY-1, "LIST_CAPACITY too small");
duke@435	151	speculative_load_pclist[count++] = __ pc();
duke@435	152	__ ld (O5, 0, G2);
duke@435	153
duke@435	154	speculative_load_pclist[count] = __ pc();
duke@435	155	__ ld (O5, 4, O3);
duke@435	156	#else
duke@435	157	assert(count < LIST_CAPACITY, "LIST_CAPACITY too small");
duke@435	158	speculative_load_pclist[count] = __ pc();
duke@435	159	__ ldx (O5, 0, O3);
duke@435	160	#endif
duke@435	161
duke@435	162	__ ld (ca, G1);
duke@435	163	__ cmp (G1, G4);
duke@435	164	__ br (Assembler::notEqual, false, Assembler::pn, label2);
duke@435	165	__ delayed()->mov (O7, G1);
duke@435	166
duke@435	167	#ifndef _LP64
duke@435	168	__ mov (G2, O0);
duke@435	169	__ retl ();
duke@435	170	__ delayed()->mov (O3, O1);
duke@435	171	#else
duke@435	172	__ retl ();
duke@435	173	__ delayed()->mov (O3, O0);
duke@435	174	#endif
duke@435	175
duke@435	176	#ifndef _LP64
duke@435	177	slowcase_entry_pclist[count-1] = __ pc();
duke@435	178	slowcase_entry_pclist[count++] = __ pc() ;
duke@435	179	#else
duke@435	180	slowcase_entry_pclist[count++] = __ pc();
duke@435	181	#endif
duke@435	182
duke@435	183	__ bind (label1);
duke@435	184	__ mov (O7, G1);
duke@435	185
duke@435	186	address slow_case_addr = jni_GetLongField_addr();
duke@435	187	__ bind (label2);
duke@435	188	__ call (slow_case_addr, relocInfo::none);
duke@435	189	__ delayed()->mov (G1, O7);
duke@435	190
duke@435	191	__ flush ();
duke@435	192
duke@435	193	return fast_entry;
duke@435	194	}
duke@435	195
duke@435	196	address JNI_FastGetField::generate_fast_get_float_field0(BasicType type) {
duke@435	197	const char *name;
duke@435	198	switch (type) {
duke@435	199	case T_FLOAT: name = "jni_fast_GetFloatField"; break;
duke@435	200	case T_DOUBLE: name = "jni_fast_GetDoubleField"; break;
duke@435	201	default: ShouldNotReachHere();
duke@435	202	}
duke@435	203	ResourceMark rm;
duke@435	204	BufferBlob* b = BufferBlob::create(name, BUFFER_SIZE*wordSize);
duke@435	205	address fast_entry = b->instructions_begin();
duke@435	206	CodeBuffer cbuf(fast_entry, b->instructions_size());
duke@435	207	MacroAssembler* masm = new MacroAssembler(&cbuf);
duke@435	208
duke@435	209	Label label1, label2;
duke@435	210
duke@435	211	address cnt_addr = SafepointSynchronize::safepoint_counter_addr();
duke@435	212	Address ca(O3, cnt_addr);
duke@435	213	__ sethi (ca);
duke@435	214	__ ld (ca, G4);
duke@435	215	__ andcc (G4, 1, G0);
duke@435	216	__ br (Assembler::notZero, false, Assembler::pn, label1);
duke@435	217	__ delayed()->srl (O2, 2, O4);
duke@435	218	__ ld_ptr (O1, 0, O5);
duke@435	219
duke@435	220	assert(count < LIST_CAPACITY, "LIST_CAPACITY too small");
duke@435	221	speculative_load_pclist[count] = __ pc();
duke@435	222	switch (type) {
duke@435	223	case T_FLOAT: __ ldf (FloatRegisterImpl::S, O5, O4, F0); break;
duke@435	224	case T_DOUBLE: __ ldf (FloatRegisterImpl::D, O5, O4, F0); break;
duke@435	225	default: ShouldNotReachHere();
duke@435	226	}
duke@435	227
duke@435	228	__ ld (ca, O5);
duke@435	229	__ cmp (O5, G4);
duke@435	230	__ br (Assembler::notEqual, false, Assembler::pn, label2);
duke@435	231	__ delayed()->mov (O7, G1);
duke@435	232
duke@435	233	__ retl ();
duke@435	234	__ delayed()-> nop ();
duke@435	235
duke@435	236	slowcase_entry_pclist[count++] = __ pc();
duke@435	237	__ bind (label1);
duke@435	238	__ mov (O7, G1);
duke@435	239
duke@435	240	address slow_case_addr;
duke@435	241	switch (type) {
duke@435	242	case T_FLOAT: slow_case_addr = jni_GetFloatField_addr(); break;
duke@435	243	case T_DOUBLE: slow_case_addr = jni_GetDoubleField_addr(); break;
duke@435	244	default: ShouldNotReachHere();
duke@435	245	}
duke@435	246	__ bind (label2);
duke@435	247	__ call (slow_case_addr, relocInfo::none);
duke@435	248	__ delayed()->mov (G1, O7);
duke@435	249
duke@435	250	__ flush ();
duke@435	251
duke@435	252	return fast_entry;
duke@435	253	}
duke@435	254
duke@435	255	address JNI_FastGetField::generate_fast_get_float_field() {
duke@435	256	return generate_fast_get_float_field0(T_FLOAT);
duke@435	257	}
duke@435	258
duke@435	259	address JNI_FastGetField::generate_fast_get_double_field() {
duke@435	260	return generate_fast_get_float_field0(T_DOUBLE);
duke@435	261	}