src/share/vm/code/location.cpp

Mon, 10 Jun 2013 11:30:51 +0200

author
sla
date
Mon, 10 Jun 2013 11:30:51 +0200
changeset 5237
f2110083203d
parent 2314
f95d63e2154a
child 6876
710a3c8b516e
permissions
-rw-r--r--

8005849: JEP 167: Event-Based JVM Tracing
Reviewed-by: acorn, coleenp, sla
Contributed-by: Karen Kinnear <karen.kinnear@oracle.com>, Bengt Rutisson <bengt.rutisson@oracle.com>, Calvin Cheung <calvin.cheung@oracle.com>, Erik Gahlin <erik.gahlin@oracle.com>, Erik Helin <erik.helin@oracle.com>, Jesper Wilhelmsson <jesper.wilhelmsson@oracle.com>, Keith McGuigan <keith.mcguigan@oracle.com>, Mattias Tobiasson <mattias.tobiasson@oracle.com>, Markus Gronlund <markus.gronlund@oracle.com>, Mikael Auno <mikael.auno@oracle.com>, Nils Eliasson <nils.eliasson@oracle.com>, Nils Loodin <nils.loodin@oracle.com>, Rickard Backman <rickard.backman@oracle.com>, Staffan Larsen <staffan.larsen@oracle.com>, Stefan Karlsson <stefan.karlsson@oracle.com>, Yekaterina Kantserova <yekaterina.kantserova@oracle.com>

duke@435 1 /*
stefank@2314 2 * Copyright (c) 1997, 2010, Oracle and/or its affiliates. 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 *
trims@1907 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
trims@1907 20 * or visit www.oracle.com if you need additional information or have any
trims@1907 21 * questions.
duke@435 22 *
duke@435 23 */
duke@435 24
stefank@2314 25 #include "precompiled.hpp"
stefank@2314 26 #include "code/debugInfo.hpp"
stefank@2314 27 #include "code/location.hpp"
duke@435 28
duke@435 29 void Location::print_on(outputStream* st) const {
kvn@766 30 if(type() == invalid) {
duke@435 31 // product of Location::invalid_loc() or Location::Location().
duke@435 32 switch (where()) {
duke@435 33 case on_stack: st->print("empty"); break;
duke@435 34 case in_register: st->print("invalid"); break;
duke@435 35 }
duke@435 36 return;
duke@435 37 }
duke@435 38 switch (where()) {
duke@435 39 case on_stack: st->print("stack[%d]", stack_offset()); break;
duke@435 40 case in_register: st->print("reg %s [%d]", reg()->name(), register_number()); break;
duke@435 41 default: st->print("Wrong location where %d", where());
duke@435 42 }
duke@435 43 switch (type()) {
duke@435 44 case normal: break;
duke@435 45 case oop: st->print(",oop"); break;
kvn@766 46 case narrowoop: st->print(",narrowoop"); break;
duke@435 47 case int_in_long: st->print(",int"); break;
duke@435 48 case lng: st->print(",long"); break;
duke@435 49 case float_in_dbl: st->print(",float"); break;
duke@435 50 case dbl: st->print(",double"); break;
duke@435 51 case addr: st->print(",address"); break;
duke@435 52 default: st->print("Wrong location type %d", type());
duke@435 53 }
duke@435 54 }
duke@435 55
duke@435 56
duke@435 57 Location::Location(DebugInfoReadStream* stream) {
kvn@766 58 _value = (juint) stream->read_int();
duke@435 59 }
duke@435 60
duke@435 61
duke@435 62 void Location::write_on(DebugInfoWriteStream* stream) {
kvn@766 63 stream->write_int(_value);
duke@435 64 }
duke@435 65
duke@435 66
duke@435 67 // Valid argument to Location::new_stk_loc()?
duke@435 68 bool Location::legal_offset_in_bytes(int offset_in_bytes) {
duke@435 69 if ((offset_in_bytes % BytesPerInt) != 0) return false;
kvn@766 70 return (juint)(offset_in_bytes / BytesPerInt) < (OFFSET_MASK >> OFFSET_SHIFT);
duke@435 71 }

mercurial