|
1
|
1 |
/*
|
|
|
2 |
* Copyright 1997-2006 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 |
*/
|
|
|
24 |
|
|
|
25 |
#include "incls/_precompiled.incl"
|
|
|
26 |
#include "incls/_location.cpp.incl"
|
|
|
27 |
|
|
|
28 |
void Location::print_on(outputStream* st) const {
|
|
|
29 |
if(type() == invalid && !legal_offset_in_bytes(offset() * BytesPerInt)) {
|
|
|
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 int_in_long: st->print(",int"); break;
|
|
|
46 |
case lng: st->print(",long"); break;
|
|
|
47 |
case float_in_dbl: st->print(",float"); break;
|
|
|
48 |
case dbl: st->print(",double"); break;
|
|
|
49 |
case addr: st->print(",address"); break;
|
|
|
50 |
default: st->print("Wrong location type %d", type());
|
|
|
51 |
}
|
|
|
52 |
}
|
|
|
53 |
|
|
|
54 |
|
|
|
55 |
Location::Location(DebugInfoReadStream* stream) {
|
|
|
56 |
_value = (uint16_t) stream->read_int();
|
|
|
57 |
}
|
|
|
58 |
|
|
|
59 |
|
|
|
60 |
void Location::write_on(DebugInfoWriteStream* stream) {
|
|
|
61 |
stream->write_int(_value & 0x0000FFFF);
|
|
|
62 |
}
|
|
|
63 |
|
|
|
64 |
|
|
|
65 |
// Valid argument to Location::new_stk_loc()?
|
|
|
66 |
bool Location::legal_offset_in_bytes(int offset_in_bytes) {
|
|
|
67 |
if ((offset_in_bytes % BytesPerInt) != 0) return false;
|
|
|
68 |
return (offset_in_bytes / BytesPerInt) < (OFFSET_MASK >> OFFSET_SHIFT);
|
|
|
69 |
}
|