src/share/vm/code/location.cpp

Tue, 15 Sep 2009 21:53:47 -0700

author
jrose
date
Tue, 15 Sep 2009 21:53:47 -0700
changeset 1424
148e5441d916
parent 766
cecd8eb4e0ca
child 1907
c18cbe5936b8
permissions
-rw-r--r--

6863023: need non-perm oops in code cache for JSR 292
Summary: Make a special root-list for those few nmethods which might contain non-perm oops.
Reviewed-by: twisti, kvn, never, jmasa, ysr

     1 /*
     2  * Copyright 1997-2008 Sun Microsystems, Inc.  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 Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
    20  * CA 95054 USA or visit www.sun.com if you need additional information or
    21  * have any questions.
    22  *
    23  */
    25 #include "incls/_precompiled.incl"
    26 #include "incls/_location.cpp.incl"
    28 void Location::print_on(outputStream* st) const {
    29   if(type() == invalid) {
    30     // product of Location::invalid_loc() or Location::Location().
    31     switch (where()) {
    32     case on_stack:     st->print("empty");    break;
    33     case in_register:  st->print("invalid");  break;
    34     }
    35     return;
    36   }
    37   switch (where()) {
    38   case on_stack:    st->print("stack[%d]", stack_offset());    break;
    39   case in_register: st->print("reg %s [%d]", reg()->name(), register_number()); break;
    40   default:          st->print("Wrong location where %d", where());
    41   }
    42   switch (type()) {
    43   case normal:                                 break;
    44   case oop:          st->print(",oop");        break;
    45   case narrowoop:    st->print(",narrowoop");  break;
    46   case int_in_long:  st->print(",int");        break;
    47   case lng:          st->print(",long");       break;
    48   case float_in_dbl: st->print(",float");      break;
    49   case dbl:          st->print(",double");     break;
    50   case addr:         st->print(",address");    break;
    51   default:           st->print("Wrong location type %d", type());
    52   }
    53 }
    56 Location::Location(DebugInfoReadStream* stream) {
    57   _value = (juint) stream->read_int();
    58 }
    61 void Location::write_on(DebugInfoWriteStream* stream) {
    62   stream->write_int(_value);
    63 }
    66 // Valid argument to Location::new_stk_loc()?
    67 bool Location::legal_offset_in_bytes(int offset_in_bytes) {
    68   if ((offset_in_bytes % BytesPerInt) != 0)  return false;
    69   return (juint)(offset_in_bytes / BytesPerInt) < (OFFSET_MASK >> OFFSET_SHIFT);
    70 }

mercurial