Wed, 13 Jan 2010 23:05:52 -0800
6912065: final fields in objects need to support inlining optimizations for JSR 292
Reviewed-by: twisti, kvn
duke@435 | 1 | /* |
duke@435 | 2 | * Copyright 1997-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/_signature.cpp.incl" |
duke@435 | 27 | |
duke@435 | 28 | |
duke@435 | 29 | // Implementation of SignatureIterator |
duke@435 | 30 | |
duke@435 | 31 | // Signature syntax: |
duke@435 | 32 | // |
duke@435 | 33 | // Signature = "(" {Parameter} ")" ReturnType. |
duke@435 | 34 | // Parameter = FieldType. |
duke@435 | 35 | // ReturnType = FieldType | "V". |
duke@435 | 36 | // FieldType = "B" | "C" | "D" | "F" | "I" | "J" | "S" | "Z" | "L" ClassName ";" | "[" FieldType. |
duke@435 | 37 | // ClassName = string. |
duke@435 | 38 | |
duke@435 | 39 | |
duke@435 | 40 | SignatureIterator::SignatureIterator(symbolHandle signature) { |
duke@435 | 41 | assert(signature->is_symbol(), "not a symbol"); |
duke@435 | 42 | _signature = signature; |
duke@435 | 43 | _parameter_index = 0; |
duke@435 | 44 | } |
duke@435 | 45 | |
duke@435 | 46 | // Overloaded version called without handle |
duke@435 | 47 | SignatureIterator::SignatureIterator(symbolOop signature) { |
duke@435 | 48 | symbolHandle sh(Thread::current(), signature); |
duke@435 | 49 | _signature = sh; |
duke@435 | 50 | _parameter_index = 0; |
duke@435 | 51 | } |
duke@435 | 52 | |
duke@435 | 53 | SignatureIterator::SignatureIterator(Thread *thread, symbolOop signature) { |
duke@435 | 54 | symbolHandle sh(thread, signature); |
duke@435 | 55 | _signature = sh; |
duke@435 | 56 | _parameter_index = 0; |
duke@435 | 57 | } |
duke@435 | 58 | |
duke@435 | 59 | void SignatureIterator::expect(char c) { |
duke@435 | 60 | if (_signature->byte_at(_index) != c) fatal1("expecting %c", c); |
duke@435 | 61 | _index++; |
duke@435 | 62 | } |
duke@435 | 63 | |
duke@435 | 64 | |
duke@435 | 65 | void SignatureIterator::skip_optional_size() { |
duke@435 | 66 | symbolOop sig = _signature(); |
duke@435 | 67 | char c = sig->byte_at(_index); |
duke@435 | 68 | while ('0' <= c && c <= '9') c = sig->byte_at(++_index); |
duke@435 | 69 | } |
duke@435 | 70 | |
duke@435 | 71 | |
duke@435 | 72 | int SignatureIterator::parse_type() { |
duke@435 | 73 | // Note: This function could be simplified by using "return T_XXX_size;" |
duke@435 | 74 | // instead of the assignment and the break statements. However, it |
duke@435 | 75 | // seems that the product build for win32_i486 with MS VC++ 6.0 doesn't |
duke@435 | 76 | // work (stack underflow for some tests) - this seems to be a VC++ 6.0 |
duke@435 | 77 | // compiler bug (was problem - gri 4/27/2000). |
duke@435 | 78 | int size = -1; |
duke@435 | 79 | switch(_signature->byte_at(_index)) { |
duke@435 | 80 | case 'B': do_byte (); if (_parameter_index < 0 ) _return_type = T_BYTE; |
duke@435 | 81 | _index++; size = T_BYTE_size ; break; |
duke@435 | 82 | case 'C': do_char (); if (_parameter_index < 0 ) _return_type = T_CHAR; |
duke@435 | 83 | _index++; size = T_CHAR_size ; break; |
duke@435 | 84 | case 'D': do_double(); if (_parameter_index < 0 ) _return_type = T_DOUBLE; |
duke@435 | 85 | _index++; size = T_DOUBLE_size ; break; |
duke@435 | 86 | case 'F': do_float (); if (_parameter_index < 0 ) _return_type = T_FLOAT; |
duke@435 | 87 | _index++; size = T_FLOAT_size ; break; |
duke@435 | 88 | case 'I': do_int (); if (_parameter_index < 0 ) _return_type = T_INT; |
duke@435 | 89 | _index++; size = T_INT_size ; break; |
duke@435 | 90 | case 'J': do_long (); if (_parameter_index < 0 ) _return_type = T_LONG; |
duke@435 | 91 | _index++; size = T_LONG_size ; break; |
duke@435 | 92 | case 'S': do_short (); if (_parameter_index < 0 ) _return_type = T_SHORT; |
duke@435 | 93 | _index++; size = T_SHORT_size ; break; |
duke@435 | 94 | case 'Z': do_bool (); if (_parameter_index < 0 ) _return_type = T_BOOLEAN; |
duke@435 | 95 | _index++; size = T_BOOLEAN_size; break; |
duke@435 | 96 | case 'V': do_void (); if (_parameter_index < 0 ) _return_type = T_VOID; |
duke@435 | 97 | _index++; size = T_VOID_size; ; break; |
duke@435 | 98 | case 'L': |
duke@435 | 99 | { int begin = ++_index; |
duke@435 | 100 | symbolOop sig = _signature(); |
duke@435 | 101 | while (sig->byte_at(_index++) != ';') ; |
duke@435 | 102 | do_object(begin, _index); |
duke@435 | 103 | } |
duke@435 | 104 | if (_parameter_index < 0 ) _return_type = T_OBJECT; |
duke@435 | 105 | size = T_OBJECT_size; |
duke@435 | 106 | break; |
duke@435 | 107 | case '[': |
duke@435 | 108 | { int begin = ++_index; |
duke@435 | 109 | skip_optional_size(); |
duke@435 | 110 | symbolOop sig = _signature(); |
duke@435 | 111 | while (sig->byte_at(_index) == '[') { |
duke@435 | 112 | _index++; |
duke@435 | 113 | skip_optional_size(); |
duke@435 | 114 | } |
duke@435 | 115 | if (sig->byte_at(_index) == 'L') { |
duke@435 | 116 | while (sig->byte_at(_index++) != ';') ; |
duke@435 | 117 | } else { |
duke@435 | 118 | _index++; |
duke@435 | 119 | } |
duke@435 | 120 | do_array(begin, _index); |
duke@435 | 121 | if (_parameter_index < 0 ) _return_type = T_ARRAY; |
duke@435 | 122 | } |
duke@435 | 123 | size = T_ARRAY_size; |
duke@435 | 124 | break; |
duke@435 | 125 | default: |
duke@435 | 126 | ShouldNotReachHere(); |
duke@435 | 127 | break; |
duke@435 | 128 | } |
duke@435 | 129 | assert(size >= 0, "size must be set"); |
duke@435 | 130 | return size; |
duke@435 | 131 | } |
duke@435 | 132 | |
duke@435 | 133 | |
duke@435 | 134 | void SignatureIterator::check_signature_end() { |
duke@435 | 135 | if (_index < _signature->utf8_length()) { |
duke@435 | 136 | tty->print_cr("too many chars in signature"); |
duke@435 | 137 | _signature->print_value_on(tty); |
duke@435 | 138 | tty->print_cr(" @ %d", _index); |
duke@435 | 139 | } |
duke@435 | 140 | } |
duke@435 | 141 | |
duke@435 | 142 | |
duke@435 | 143 | void SignatureIterator::dispatch_field() { |
duke@435 | 144 | // no '(', just one (field) type |
duke@435 | 145 | _index = 0; |
duke@435 | 146 | _parameter_index = 0; |
duke@435 | 147 | parse_type(); |
duke@435 | 148 | check_signature_end(); |
duke@435 | 149 | } |
duke@435 | 150 | |
duke@435 | 151 | |
duke@435 | 152 | void SignatureIterator::iterate_parameters() { |
duke@435 | 153 | // Parse parameters |
duke@435 | 154 | _index = 0; |
duke@435 | 155 | _parameter_index = 0; |
duke@435 | 156 | expect('('); |
duke@435 | 157 | while (_signature->byte_at(_index) != ')') _parameter_index += parse_type(); |
duke@435 | 158 | expect(')'); |
duke@435 | 159 | _parameter_index = 0; |
duke@435 | 160 | } |
duke@435 | 161 | |
duke@435 | 162 | // Optimized version of iterat_parameters when fingerprint is known |
duke@435 | 163 | void SignatureIterator::iterate_parameters( uint64_t fingerprint ) { |
duke@435 | 164 | uint64_t saved_fingerprint = fingerprint; |
duke@435 | 165 | |
duke@435 | 166 | // Check for too many arguments |
duke@435 | 167 | if ( fingerprint == UCONST64(-1) ) { |
duke@435 | 168 | SignatureIterator::iterate_parameters(); |
duke@435 | 169 | return; |
duke@435 | 170 | } |
duke@435 | 171 | |
duke@435 | 172 | assert(fingerprint, "Fingerprint should not be 0"); |
duke@435 | 173 | |
duke@435 | 174 | _parameter_index = 0; |
duke@435 | 175 | fingerprint = fingerprint >> (static_feature_size + result_feature_size); |
duke@435 | 176 | while ( 1 ) { |
duke@435 | 177 | switch ( fingerprint & parameter_feature_mask ) { |
duke@435 | 178 | case bool_parm: |
duke@435 | 179 | do_bool(); |
duke@435 | 180 | _parameter_index += T_BOOLEAN_size; |
duke@435 | 181 | break; |
duke@435 | 182 | case byte_parm: |
duke@435 | 183 | do_byte(); |
duke@435 | 184 | _parameter_index += T_BYTE_size; |
duke@435 | 185 | break; |
duke@435 | 186 | case char_parm: |
duke@435 | 187 | do_char(); |
duke@435 | 188 | _parameter_index += T_CHAR_size; |
duke@435 | 189 | break; |
duke@435 | 190 | case short_parm: |
duke@435 | 191 | do_short(); |
duke@435 | 192 | _parameter_index += T_SHORT_size; |
duke@435 | 193 | break; |
duke@435 | 194 | case int_parm: |
duke@435 | 195 | do_int(); |
duke@435 | 196 | _parameter_index += T_INT_size; |
duke@435 | 197 | break; |
duke@435 | 198 | case obj_parm: |
duke@435 | 199 | do_object(0, 0); |
duke@435 | 200 | _parameter_index += T_OBJECT_size; |
duke@435 | 201 | break; |
duke@435 | 202 | case long_parm: |
duke@435 | 203 | do_long(); |
duke@435 | 204 | _parameter_index += T_LONG_size; |
duke@435 | 205 | break; |
duke@435 | 206 | case float_parm: |
duke@435 | 207 | do_float(); |
duke@435 | 208 | _parameter_index += T_FLOAT_size; |
duke@435 | 209 | break; |
duke@435 | 210 | case double_parm: |
duke@435 | 211 | do_double(); |
duke@435 | 212 | _parameter_index += T_DOUBLE_size; |
duke@435 | 213 | break; |
duke@435 | 214 | case done_parm: |
duke@435 | 215 | return; |
duke@435 | 216 | break; |
duke@435 | 217 | default: |
duke@435 | 218 | tty->print_cr("*** parameter is %d", fingerprint & parameter_feature_mask); |
duke@435 | 219 | tty->print_cr("*** fingerprint is " PTR64_FORMAT, saved_fingerprint); |
duke@435 | 220 | ShouldNotReachHere(); |
duke@435 | 221 | break; |
duke@435 | 222 | } |
duke@435 | 223 | fingerprint >>= parameter_feature_size; |
duke@435 | 224 | } |
duke@435 | 225 | _parameter_index = 0; |
duke@435 | 226 | } |
duke@435 | 227 | |
duke@435 | 228 | |
duke@435 | 229 | void SignatureIterator::iterate_returntype() { |
duke@435 | 230 | // Ignore parameters |
duke@435 | 231 | _index = 0; |
duke@435 | 232 | expect('('); |
duke@435 | 233 | symbolOop sig = _signature(); |
duke@435 | 234 | while (sig->byte_at(_index) != ')') _index++; |
duke@435 | 235 | expect(')'); |
duke@435 | 236 | // Parse return type |
duke@435 | 237 | _parameter_index = -1; |
duke@435 | 238 | parse_type(); |
duke@435 | 239 | check_signature_end(); |
duke@435 | 240 | _parameter_index = 0; |
duke@435 | 241 | } |
duke@435 | 242 | |
duke@435 | 243 | |
duke@435 | 244 | void SignatureIterator::iterate() { |
duke@435 | 245 | // Parse parameters |
duke@435 | 246 | _parameter_index = 0; |
duke@435 | 247 | _index = 0; |
duke@435 | 248 | expect('('); |
duke@435 | 249 | while (_signature->byte_at(_index) != ')') _parameter_index += parse_type(); |
duke@435 | 250 | expect(')'); |
duke@435 | 251 | // Parse return type |
duke@435 | 252 | _parameter_index = -1; |
duke@435 | 253 | parse_type(); |
duke@435 | 254 | check_signature_end(); |
duke@435 | 255 | _parameter_index = 0; |
duke@435 | 256 | } |
duke@435 | 257 | |
duke@435 | 258 | |
duke@435 | 259 | // Implementation of SignatureStream |
duke@435 | 260 | |
duke@435 | 261 | bool SignatureStream::is_done() const { |
duke@435 | 262 | return _end > _signature()->utf8_length(); |
duke@435 | 263 | } |
duke@435 | 264 | |
duke@435 | 265 | |
duke@435 | 266 | void SignatureStream::next_non_primitive(int t) { |
duke@435 | 267 | switch (t) { |
duke@435 | 268 | case 'L': { |
duke@435 | 269 | _type = T_OBJECT; |
duke@435 | 270 | symbolOop sig = _signature(); |
duke@435 | 271 | while (sig->byte_at(_end++) != ';'); |
duke@435 | 272 | break; |
duke@435 | 273 | } |
duke@435 | 274 | case '[': { |
duke@435 | 275 | _type = T_ARRAY; |
duke@435 | 276 | symbolOop sig = _signature(); |
duke@435 | 277 | char c = sig->byte_at(_end); |
duke@435 | 278 | while ('0' <= c && c <= '9') c = sig->byte_at(_end++); |
duke@435 | 279 | while (sig->byte_at(_end) == '[') { |
duke@435 | 280 | _end++; |
duke@435 | 281 | c = sig->byte_at(_end); |
duke@435 | 282 | while ('0' <= c && c <= '9') c = sig->byte_at(_end++); |
duke@435 | 283 | } |
duke@435 | 284 | switch(sig->byte_at(_end)) { |
duke@435 | 285 | case 'B': |
duke@435 | 286 | case 'C': |
duke@435 | 287 | case 'D': |
duke@435 | 288 | case 'F': |
duke@435 | 289 | case 'I': |
duke@435 | 290 | case 'J': |
duke@435 | 291 | case 'S': |
duke@435 | 292 | case 'Z':_end++; break; |
duke@435 | 293 | default: { |
duke@435 | 294 | while (sig->byte_at(_end++) != ';'); |
duke@435 | 295 | break; |
duke@435 | 296 | } |
duke@435 | 297 | } |
duke@435 | 298 | break; |
duke@435 | 299 | } |
duke@435 | 300 | case ')': _end++; next(); _at_return_type = true; break; |
duke@435 | 301 | default : ShouldNotReachHere(); |
duke@435 | 302 | } |
duke@435 | 303 | } |
duke@435 | 304 | |
duke@435 | 305 | |
duke@435 | 306 | bool SignatureStream::is_object() const { |
duke@435 | 307 | return _type == T_OBJECT |
duke@435 | 308 | || _type == T_ARRAY; |
duke@435 | 309 | } |
duke@435 | 310 | |
duke@435 | 311 | bool SignatureStream::is_array() const { |
duke@435 | 312 | return _type == T_ARRAY; |
duke@435 | 313 | } |
duke@435 | 314 | |
duke@435 | 315 | symbolOop SignatureStream::as_symbol(TRAPS) { |
duke@435 | 316 | // Create a symbol from for string _begin _end |
duke@435 | 317 | int begin = _begin; |
duke@435 | 318 | int end = _end; |
duke@435 | 319 | |
duke@435 | 320 | if ( _signature()->byte_at(_begin) == 'L' |
duke@435 | 321 | && _signature()->byte_at(_end-1) == ';') { |
duke@435 | 322 | begin++; |
duke@435 | 323 | end--; |
duke@435 | 324 | } |
duke@435 | 325 | |
duke@435 | 326 | symbolOop result = oopFactory::new_symbol(_signature, begin, end, CHECK_NULL); |
duke@435 | 327 | return result; |
duke@435 | 328 | } |
duke@435 | 329 | |
duke@435 | 330 | |
duke@435 | 331 | symbolOop SignatureStream::as_symbol_or_null() { |
duke@435 | 332 | // Create a symbol from for string _begin _end |
duke@435 | 333 | ResourceMark rm; |
duke@435 | 334 | |
duke@435 | 335 | int begin = _begin; |
duke@435 | 336 | int end = _end; |
duke@435 | 337 | |
duke@435 | 338 | if ( _signature()->byte_at(_begin) == 'L' |
duke@435 | 339 | && _signature()->byte_at(_end-1) == ';') { |
duke@435 | 340 | begin++; |
duke@435 | 341 | end--; |
duke@435 | 342 | } |
duke@435 | 343 | |
duke@435 | 344 | char* buffer = NEW_RESOURCE_ARRAY(char, end - begin); |
duke@435 | 345 | for (int index = begin; index < end; index++) { |
duke@435 | 346 | buffer[index - begin] = _signature()->byte_at(index); |
duke@435 | 347 | } |
duke@435 | 348 | symbolOop result = SymbolTable::probe(buffer, end - begin); |
duke@435 | 349 | return result; |
duke@435 | 350 | } |
duke@435 | 351 | |
duke@435 | 352 | bool SignatureVerifier::is_valid_signature(symbolHandle sig) { |
duke@435 | 353 | const char* signature = (const char*)sig->bytes(); |
duke@435 | 354 | ssize_t len = sig->utf8_length(); |
duke@435 | 355 | if (signature == NULL || signature[0] == '\0' || len < 1) { |
duke@435 | 356 | return false; |
duke@435 | 357 | } else if (signature[0] == '(') { |
duke@435 | 358 | return is_valid_method_signature(sig); |
duke@435 | 359 | } else { |
duke@435 | 360 | return is_valid_type_signature(sig); |
duke@435 | 361 | } |
duke@435 | 362 | } |
duke@435 | 363 | |
duke@435 | 364 | bool SignatureVerifier::is_valid_method_signature(symbolHandle sig) { |
duke@435 | 365 | const char* method_sig = (const char*)sig->bytes(); |
duke@435 | 366 | ssize_t len = sig->utf8_length(); |
duke@435 | 367 | ssize_t index = 0; |
duke@435 | 368 | if (method_sig != NULL && len > 1 && method_sig[index] == '(') { |
duke@435 | 369 | ++index; |
duke@435 | 370 | while (index < len && method_sig[index] != ')') { |
duke@435 | 371 | ssize_t res = is_valid_type(&method_sig[index], len - index); |
duke@435 | 372 | if (res == -1) { |
duke@435 | 373 | return false; |
duke@435 | 374 | } else { |
duke@435 | 375 | index += res; |
duke@435 | 376 | } |
duke@435 | 377 | } |
duke@435 | 378 | if (index < len && method_sig[index] == ')') { |
duke@435 | 379 | // check the return type |
duke@435 | 380 | ++index; |
duke@435 | 381 | return (is_valid_type(&method_sig[index], len - index) == (len - index)); |
duke@435 | 382 | } |
duke@435 | 383 | } |
duke@435 | 384 | return false; |
duke@435 | 385 | } |
duke@435 | 386 | |
duke@435 | 387 | bool SignatureVerifier::is_valid_type_signature(symbolHandle sig) { |
duke@435 | 388 | const char* type_sig = (const char*)sig->bytes(); |
duke@435 | 389 | ssize_t len = sig->utf8_length(); |
duke@435 | 390 | return (type_sig != NULL && len >= 1 && |
duke@435 | 391 | (is_valid_type(type_sig, len) == len)); |
duke@435 | 392 | } |
duke@435 | 393 | |
duke@435 | 394 | // Checks to see if the type (not to go beyond 'limit') refers to a valid type. |
duke@435 | 395 | // Returns -1 if it is not, or the index of the next character that is not part |
duke@435 | 396 | // of the type. The type encoding may end before 'limit' and that's ok. |
duke@435 | 397 | ssize_t SignatureVerifier::is_valid_type(const char* type, ssize_t limit) { |
duke@435 | 398 | ssize_t index = 0; |
duke@435 | 399 | |
duke@435 | 400 | // Iterate over any number of array dimensions |
duke@435 | 401 | while (index < limit && type[index] == '[') ++index; |
duke@435 | 402 | if (index >= limit) { |
duke@435 | 403 | return -1; |
duke@435 | 404 | } |
duke@435 | 405 | switch (type[index]) { |
duke@435 | 406 | case 'B': case 'C': case 'D': case 'F': case 'I': |
duke@435 | 407 | case 'J': case 'S': case 'Z': case 'V': |
duke@435 | 408 | return index + 1; |
duke@435 | 409 | case 'L': |
duke@435 | 410 | for (index = index + 1; index < limit; ++index) { |
duke@435 | 411 | char c = type[index]; |
duke@435 | 412 | if (c == ';') { |
duke@435 | 413 | return index + 1; |
duke@435 | 414 | } |
duke@435 | 415 | if (invalid_name_char(c)) { |
duke@435 | 416 | return -1; |
duke@435 | 417 | } |
duke@435 | 418 | } |
duke@435 | 419 | // fall through |
duke@435 | 420 | default: ; // fall through |
duke@435 | 421 | } |
duke@435 | 422 | return -1; |
duke@435 | 423 | } |
duke@435 | 424 | |
duke@435 | 425 | bool SignatureVerifier::invalid_name_char(char c) { |
duke@435 | 426 | switch (c) { |
duke@435 | 427 | case '\0': case '.': case ';': case '[': |
duke@435 | 428 | return true; |
duke@435 | 429 | default: |
duke@435 | 430 | return false; |
duke@435 | 431 | } |
duke@435 | 432 | } |