jdk8-mips64-public/hotspot: src/share/vm/runtime/fieldType.cpp@d13d7aba8c12

8023657: New type profiling points: arguments to call
Summary: x86 interpreter and c1 type profiling for arguments at calls
Reviewed-by: kvn, twisti

     1 /*

     2  * Copyright (c) 1997, 2011, 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  */

    25 #include "precompiled.hpp"

    26 #include "classfile/systemDictionary.hpp"

    27 #include "memory/oopFactory.hpp"

    28 #include "oops/oop.inline.hpp"

    29 #include "oops/typeArrayKlass.hpp"

    30 #include "runtime/fieldType.hpp"

    31 #include "runtime/signature.hpp"

    33 void FieldType::skip_optional_size(Symbol* signature, int* index) {

    34   jchar c = signature->byte_at(*index);

    35   while (c >= '0' && c <= '9') {

    36     *index = *index + 1;

    37     c = signature->byte_at(*index);

    38   }

    39 }

    41 BasicType FieldType::basic_type(Symbol* signature) {

    42   return char2type(signature->byte_at(0));

    43 }

    45 // Check if it is a valid array signature

    46 bool FieldType::is_valid_array_signature(Symbol* sig) {

    47   assert(sig->utf8_length() > 1, "this should already have been checked");

    48   assert(sig->byte_at(0) == '[', "this should already have been checked");

    49   // The first character is already checked

    50   int i = 1;

    51   int len = sig->utf8_length();

    52   // First skip all '['s

    53   while(i < len - 1 && sig->byte_at(i) == '[') i++;

    55   // Check type

    56   switch(sig->byte_at(i)) {

    57     case 'B': // T_BYTE

    58     case 'C': // T_CHAR

    59     case 'D': // T_DOUBLE

    60     case 'F': // T_FLOAT

    61     case 'I': // T_INT

    62     case 'J': // T_LONG

    63     case 'S': // T_SHORT

    64     case 'Z': // T_BOOLEAN

    65       // If it is an array, the type is the last character

    66       return (i + 1 == len);

    67     case 'L':

    68       // If it is an object, the last character must be a ';'

    69       return sig->byte_at(len - 1) == ';';

    70   }

    72   return false;

    73 }

    76 BasicType FieldType::get_array_info(Symbol* signature, FieldArrayInfo& fd, TRAPS) {

    77   assert(basic_type(signature) == T_ARRAY, "must be array");

    78   int index = 1;

    79   int dim   = 1;

    80   skip_optional_size(signature, &index);

    81   while (signature->byte_at(index) == '[') {

    82     index++;

    83     dim++;

    84     skip_optional_size(signature, &index);

    85   }

    86   ResourceMark rm;

    87   char *element = signature->as_C_string() + index;

    88   BasicType element_type = char2type(element[0]);

    89   if (element_type == T_OBJECT) {

    90     int len = (int)strlen(element);

    91     assert(element[len-1] == ';', "last char should be a semicolon");

    92     element[len-1] = '\0';        // chop off semicolon

    93     fd._object_key = SymbolTable::new_symbol(element + 1, CHECK_(T_BYTE));

    94   }

    95   // Pass dimension back to caller

    96   fd._dimension = dim;

    97   return element_type;

    98 }

Mercurial > jdk8-mips64-public > hotspot / file revision