author | simonis |
Wed, 14 Mar 2018 12:12:00 +0100 | |
changeset 49393 | 93fe2fc5c093 |
parent 47216 | 71c04702a3d5 |
permissions | -rw-r--r-- |
1 | 1 |
/* |
49393 | 2 |
* Copyright (c) 1997, 2018, Oracle and/or its affiliates. All rights reserved. |
1 | 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 |
* |
|
5547
f4b087cbb361
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
1135
diff
changeset
|
19 |
* Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
f4b087cbb361
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
1135
diff
changeset
|
20 |
* or visit www.oracle.com if you need additional information or have any |
f4b087cbb361
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
1135
diff
changeset
|
21 |
* questions. |
1 | 22 |
* |
23 |
*/ |
|
24 |
||
7397 | 25 |
#include "precompiled.hpp" |
26 |
#include "code/debugInfo.hpp" |
|
27 |
#include "code/location.hpp" |
|
49393 | 28 |
#include "runtime/handles.inline.hpp" |
1 | 29 |
|
30 |
void Location::print_on(outputStream* st) const { |
|
1135 | 31 |
if(type() == invalid) { |
1 | 32 |
// product of Location::invalid_loc() or Location::Location(). |
33 |
switch (where()) { |
|
34 |
case on_stack: st->print("empty"); break; |
|
35 |
case in_register: st->print("invalid"); break; |
|
36 |
} |
|
37 |
return; |
|
38 |
} |
|
39 |
switch (where()) { |
|
40 |
case on_stack: st->print("stack[%d]", stack_offset()); break; |
|
41 |
case in_register: st->print("reg %s [%d]", reg()->name(), register_number()); break; |
|
42 |
default: st->print("Wrong location where %d", where()); |
|
43 |
} |
|
44 |
switch (type()) { |
|
45 |
case normal: break; |
|
46 |
case oop: st->print(",oop"); break; |
|
1135 | 47 |
case narrowoop: st->print(",narrowoop"); break; |
1 | 48 |
case int_in_long: st->print(",int"); break; |
49 |
case lng: st->print(",long"); break; |
|
50 |
case float_in_dbl: st->print(",float"); break; |
|
51 |
case dbl: st->print(",double"); break; |
|
52 |
case addr: st->print(",address"); break; |
|
53 |
default: st->print("Wrong location type %d", type()); |
|
54 |
} |
|
55 |
} |
|
56 |
||
57 |
||
58 |
Location::Location(DebugInfoReadStream* stream) { |
|
1135 | 59 |
_value = (juint) stream->read_int(); |
1 | 60 |
} |
61 |
||
62 |
||
63 |
void Location::write_on(DebugInfoWriteStream* stream) { |
|
1135 | 64 |
stream->write_int(_value); |
1 | 65 |
} |
66 |
||
67 |
||
68 |
// Valid argument to Location::new_stk_loc()? |
|
69 |
bool Location::legal_offset_in_bytes(int offset_in_bytes) { |
|
70 |
if ((offset_in_bytes % BytesPerInt) != 0) return false; |
|
1135 | 71 |
return (juint)(offset_in_bytes / BytesPerInt) < (OFFSET_MASK >> OFFSET_SHIFT); |
1 | 72 |
} |