0
|
1 /*
|
|
2 * Copyright 2002 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 // Platform specific for C++ based Interpreter
|
|
26
|
|
27 private:
|
|
28
|
|
29 interpreterState _self_link; /* Previous interpreter state */ /* sometimes points to self??? */
|
|
30 address _result_handler; /* temp for saving native result handler */
|
|
31 intptr_t* _sender_sp; /* sender's sp before stack (locals) extension */
|
|
32
|
|
33 address _extra_junk1; /* temp to save on recompiles */
|
|
34 address _extra_junk2; /* temp to save on recompiles */
|
|
35 address _extra_junk3; /* temp to save on recompiles */
|
|
36 // address dummy_for_native2; /* a native frame result handler would be here... */
|
|
37 // address dummy_for_native1; /* native result type stored here in a interpreter native frame */
|
|
38 address _extra_junk4; /* temp to save on recompiles */
|
|
39 address _extra_junk5; /* temp to save on recompiles */
|
|
40 address _extra_junk6; /* temp to save on recompiles */
|
|
41 public:
|
|
42 // we have an interpreter frame...
|
|
43 inline intptr_t* sender_sp() {
|
|
44 return _sender_sp;
|
|
45 }
|
|
46
|
|
47 // The interpreter always has the frame anchor fully setup so we don't
|
|
48 // have to do anything going to vm from the interpreter. On return
|
|
49 // we do have to clear the flags in case they we're modified to
|
|
50 // maintain the stack walking invariants.
|
|
51 //
|
|
52 #define SET_LAST_JAVA_FRAME()
|
|
53
|
|
54 #define RESET_LAST_JAVA_FRAME()
|
|
55
|
|
56 /*
|
|
57 * Macros for accessing the stack.
|
|
58 */
|
|
59 #undef STACK_INT
|
|
60 #undef STACK_FLOAT
|
|
61 #undef STACK_ADDR
|
|
62 #undef STACK_OBJECT
|
|
63 #undef STACK_DOUBLE
|
|
64 #undef STACK_LONG
|
|
65
|
|
66 // JavaStack Implementation
|
|
67
|
|
68 #define GET_STACK_SLOT(offset) (*((intptr_t*) &topOfStack[-(offset)]))
|
|
69 #define STACK_SLOT(offset) ((address) &topOfStack[-(offset)])
|
|
70 #define STACK_ADDR(offset) (*((address *) &topOfStack[-(offset)]))
|
|
71 #define STACK_INT(offset) (*((jint*) &topOfStack[-(offset)]))
|
|
72 #define STACK_FLOAT(offset) (*((jfloat *) &topOfStack[-(offset)]))
|
|
73 #define STACK_OBJECT(offset) (*((oop *) &topOfStack [-(offset)]))
|
|
74 #define STACK_DOUBLE(offset) (((VMJavaVal64*) &topOfStack[-(offset)])->d)
|
|
75 #define STACK_LONG(offset) (((VMJavaVal64 *) &topOfStack[-(offset)])->l)
|
|
76
|
|
77 #define SET_STACK_SLOT(value, offset) (*(intptr_t*)&topOfStack[-(offset)] = *(intptr_t*)(value))
|
|
78 #define SET_STACK_ADDR(value, offset) (*((address *)&topOfStack[-(offset)]) = (value))
|
|
79 #define SET_STACK_INT(value, offset) (*((jint *)&topOfStack[-(offset)]) = (value))
|
|
80 #define SET_STACK_FLOAT(value, offset) (*((jfloat *)&topOfStack[-(offset)]) = (value))
|
|
81 #define SET_STACK_OBJECT(value, offset) (*((oop *)&topOfStack[-(offset)]) = (value))
|
|
82 #define SET_STACK_DOUBLE(value, offset) (((VMJavaVal64*)&topOfStack[-(offset)])->d = (value))
|
|
83 #define SET_STACK_DOUBLE_FROM_ADDR(addr, offset) (((VMJavaVal64*)&topOfStack[-(offset)])->d = \
|
|
84 ((VMJavaVal64*)(addr))->d)
|
|
85 #define SET_STACK_LONG(value, offset) (((VMJavaVal64*)&topOfStack[-(offset)])->l = (value))
|
|
86 #define SET_STACK_LONG_FROM_ADDR(addr, offset) (((VMJavaVal64*)&topOfStack[-(offset)])->l = \
|
|
87 ((VMJavaVal64*)(addr))->l)
|
|
88 // JavaLocals implementation
|
|
89
|
|
90 #define LOCALS_SLOT(offset) ((intptr_t*)&locals[-(offset)])
|
|
91 #define LOCALS_ADDR(offset) ((address)locals[-(offset)])
|
|
92 #define LOCALS_INT(offset) ((jint)(locals[-(offset)]))
|
|
93 #define LOCALS_FLOAT(offset) (*((jfloat*)&locals[-(offset)]))
|
|
94 #define LOCALS_OBJECT(offset) ((oop)locals[-(offset)])
|
|
95 #define LOCALS_DOUBLE(offset) (((VMJavaVal64*)&locals[-((offset) + 1)])->d)
|
|
96 #define LOCALS_LONG(offset) (((VMJavaVal64*)&locals[-((offset) + 1)])->l)
|
|
97 #define LOCALS_LONG_AT(offset) (((address)&locals[-((offset) + 1)]))
|
|
98 #define LOCALS_DOUBLE_AT(offset) (((address)&locals[-((offset) + 1)]))
|
|
99
|
|
100 #define SET_LOCALS_SLOT(value, offset) (*(intptr_t*)&locals[-(offset)] = *(intptr_t *)(value))
|
|
101 #define SET_LOCALS_ADDR(value, offset) (*((address *)&locals[-(offset)]) = (value))
|
|
102 #define SET_LOCALS_INT(value, offset) (*((jint *)&locals[-(offset)]) = (value))
|
|
103 #define SET_LOCALS_FLOAT(value, offset) (*((jfloat *)&locals[-(offset)]) = (value))
|
|
104 #define SET_LOCALS_OBJECT(value, offset) (*((oop *)&locals[-(offset)]) = (value))
|
|
105 #define SET_LOCALS_DOUBLE(value, offset) (((VMJavaVal64*)&locals[-((offset)+1)])->d = (value))
|
|
106 #define SET_LOCALS_LONG(value, offset) (((VMJavaVal64*)&locals[-((offset)+1)])->l = (value))
|
|
107 #define SET_LOCALS_DOUBLE_FROM_ADDR(addr, offset) (((VMJavaVal64*)&locals[-((offset)+1)])->d = \
|
|
108 ((VMJavaVal64*)(addr))->d)
|
|
109 #define SET_LOCALS_LONG_FROM_ADDR(addr, offset) (((VMJavaVal64*)&locals[-((offset)+1)])->l = \
|
|
110 ((VMJavaVal64*)(addr))->l)
|