/[cebix]/SheepShaver/src/thunks.cpp
ViewVC logotype

Diff of /SheepShaver/src/thunks.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5 by gbeauche, Sun Jan 18 22:10:09 2004 UTC revision 1.6 by gbeauche, Sat Jan 24 11:28:04 2004 UTC
# Line 22  Line 22 
22  #include "thunks.h"  #include "thunks.h"
23  #include "emul_op.h"  #include "emul_op.h"
24  #include "cpu_emulation.h"  #include "cpu_emulation.h"
25    #include "xlowmem.h"
26    
27  // Native function declarations  // Native function declarations
28  #include "main.h"  #include "main.h"
# Line 31  Line 32 
32  #include "ether.h"  #include "ether.h"
33  #include "macos_util.h"  #include "macos_util.h"
34    
35    // Generate PowerPC thunks for GetResource() replacements?
36    #define POWERPC_GET_RESOURCE_THUNKS 1
37    
38    
39  /*              NativeOp instruction format:  /*              NativeOp instruction format:
40                  +------------+--------------------------+--+----------+------------+                  +------------+--------------------------+--+----------+------------+
# Line 53  uint32 NativeOpcode(int selector) Line 57  uint32 NativeOpcode(int selector)
57          switch (selector) {          switch (selector) {
58          case NATIVE_DISABLE_INTERRUPT:          case NATIVE_DISABLE_INTERRUPT:
59          case NATIVE_ENABLE_INTERRUPT:          case NATIVE_ENABLE_INTERRUPT:
60            case NATIVE_CHECK_LOAD_INVOC:
61                  opcode = POWERPC_NATIVE_OP(0, selector);                  opcode = POWERPC_NATIVE_OP(0, selector);
62                  break;                  break;
63          case NATIVE_PATCH_NAME_REGISTRY:          case NATIVE_PATCH_NAME_REGISTRY:
# Line 90  uint32 NativeOpcode(int selector) Line 95  uint32 NativeOpcode(int selector)
95    
96    
97  /*  /*
98     *  Generate PowerPC thunks for GetResource() replacements
99     */
100    
101    #if EMULATED_PPC
102    static uint32 get_resource_func;
103    static uint32 get_1_resource_func;
104    static uint32 get_ind_resource_func;
105    static uint32 get_1_ind_resource_func;
106    static uint32 r_get_resource_func;
107    
108    static void generate_powerpc_thunks(void)
109    {
110            static uint32 get_resource_template[] = {
111                    PL(0x7c0802a6),         // mflr    r0
112                    PL(0x90010008),         // stw     r0,8(r1)
113                    PL(0x9421ffbc),         // stwu    r1,-68(r1)
114                    PL(0x90610038),         // stw     r3,56(r1)
115                    PL(0x9081003c),         // stw     r4,60(r1)
116                    PL(0x00000000),         // lwz     r0,XLM_GET_RESOURCE(r0)
117                    PL(0x80402834),         // lwz     r2,XLM_RES_LIB_TOC(r0)
118                    PL(0x7c0903a6),         // mtctr   r0
119                    PL(0x4e800421),         // bctrl
120                    PL(0x90610040),         // stw     r3,64(r1)
121                    PL(0x80610038),         // lwz     r3,56(r1)
122                    PL(0xa881003e),         // lha     r4,62(r1)
123                    PL(0x80a10040),         // lwz     r5,64(r1)
124                    PL(0x00000001),         // <check_load_invoc>
125                    PL(0x80610040),         // lwz     r3,64(r1)
126                    PL(0x8001004c),         // lwz     r0,76(r1)
127                    PL(0x7c0803a6),         // mtlr    r0
128                    PL(0x38210044),         // addi    r1,r1,68
129                    PL(0x4e800020)          // blr
130            };
131            const uint32 get_resource_template_size = sizeof(get_resource_template);
132    
133            int xlm_index = -1, check_load_invoc_index = -1;
134            for (int i = 0; i < get_resource_template_size/4; i++) {
135                    uint32 opcode = ntohl(get_resource_template[i]);
136                    switch (opcode) {
137                    case 0x00000000:
138                            xlm_index = i;
139                            break;
140                    case 0x00000001:
141                            check_load_invoc_index = i;
142                            break;
143                    }
144            }
145            assert(xlm_index != -1 && check_load_invoc_index != -1);
146    
147            uint32 check_load_invoc_opcode = NativeOpcode(NATIVE_CHECK_LOAD_INVOC);
148            uintptr base;
149    
150            // GetResource()
151            get_resource_func = base = SheepMem::Reserve(get_resource_template_size);
152            Host2Mac_memcpy(base, get_resource_template, get_resource_template_size);
153            WriteMacInt32(base + xlm_index * 4, 0x80000000 | XLM_GET_RESOURCE);
154            WriteMacInt32(base + check_load_invoc_index * 4, check_load_invoc_opcode);
155    
156            // Get1Resource()
157            get_1_resource_func = base = SheepMem::Reserve(get_resource_template_size);
158            Host2Mac_memcpy(base, get_resource_template, get_resource_template_size);
159            WriteMacInt32(base + xlm_index * 4, 0x80000000 | XLM_GET_1_RESOURCE);
160            WriteMacInt32(base + check_load_invoc_index * 4, check_load_invoc_opcode);
161    
162            // GetIndResource()
163            get_ind_resource_func = base = SheepMem::Reserve(get_resource_template_size);
164            Host2Mac_memcpy(base, get_resource_template, get_resource_template_size);
165            WriteMacInt32(base + xlm_index * 4, 0x80000000 | XLM_GET_IND_RESOURCE);
166            WriteMacInt32(base + check_load_invoc_index * 4, check_load_invoc_opcode);
167    
168            // Get1IndResource()
169            get_1_ind_resource_func = base = SheepMem::Reserve(get_resource_template_size);
170            Host2Mac_memcpy(base, get_resource_template, get_resource_template_size);
171            WriteMacInt32(base + xlm_index * 4, 0x80000000 | XLM_GET_1_IND_RESOURCE);
172            WriteMacInt32(base + check_load_invoc_index * 4, check_load_invoc_opcode);
173    
174            // RGetResource()
175            r_get_resource_func = base = SheepMem::Reserve(get_resource_template_size);
176            Host2Mac_memcpy(base, get_resource_template, get_resource_template_size);
177            WriteMacInt32(base + xlm_index * 4, 0x80000000 | XLM_R_GET_RESOURCE);
178            WriteMacInt32(base + check_load_invoc_index * 4, check_load_invoc_opcode);
179    }
180    #endif
181    
182    
183    /*
184   *  Initialize the thunks system   *  Initialize the thunks system
185   */   */
186    
# Line 111  bool ThunksInit(void) Line 202  bool ThunksInit(void)
202                  native_op[i].tvect = base;                  native_op[i].tvect = base;
203                  native_op[i].func  = base + 8;                  native_op[i].func  = base + 8;
204          }          }
205    #if POWERPC_GET_RESOURCE_THUNKS
206            generate_powerpc_thunks();
207            native_op[NATIVE_GET_RESOURCE].func = get_resource_func;
208            native_op[NATIVE_GET_1_RESOURCE].func = get_1_resource_func;
209            native_op[NATIVE_GET_IND_RESOURCE].func = get_ind_resource_func;
210            native_op[NATIVE_GET_1_IND_RESOURCE].func = get_1_ind_resource_func;
211            native_op[NATIVE_R_GET_RESOURCE].func = r_get_resource_func;
212    #endif
213  #else  #else
214  #if defined(__linux__) || (defined(__APPLE__) && defined(__MACH__))  #if defined(__linux__) || (defined(__APPLE__) && defined(__MACH__))
215  #define DEFINE_NATIVE_OP(ID, FUNC) do {                         \  #define DEFINE_NATIVE_OP(ID, FUNC) do {                         \
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
Christian Bauer">Christian Bauer
 ViewVC Help
Powered by ViewVC 1.1.15