ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/SheepShaver/src/macos_util.cpp
(Generate patch)

Comparing SheepShaver/src/macos_util.cpp (file contents):
Revision 1.6 by cebix, 2004-01-12T15:37:18Z vs.
Revision 1.13 by cebix, 2010-02-21T09:58:47Z

# Line 1 | Line 1
1   /*
2   *  macos_util.cpp - MacOS definitions/utility functions
3   *
4 < *  SheepShaver (C) 1997-2004 Christian Bauer and Marc Hellwig
4 > *  SheepShaver (C) Christian Bauer and Marc Hellwig
5   *
6   *  This program is free software; you can redistribute it and/or modify
7   *  it under the terms of the GNU General Public License as published by
# Line 42 | Line 42 | static inline long CallUniversal(void *a
42   }
43   typedef int16 (*gsl_ptr)(char *, uint32, uint32, uint32 *, void **, char *);
44   static uint32 gsl_tvect = 0;
45 < static inline int16 GetSharedLibrary(char *arg1, uint32 arg2, uint32 arg3, uint32 *arg4, void **arg5, char *arg6)
45 > static inline int16 GetSharedLibrary(uintptr arg1, uint32 arg2, uint32 arg3, uintptr arg4, uintptr arg5, uintptr arg6)
46   {
47 <        return (int16)CallMacOS6(gsl_ptr, gsl_tvect, arg1, arg2, arg3, arg4, arg5, arg6);
47 >        return (int16)CallMacOS6(gsl_ptr, gsl_tvect, (char *)arg1, arg2, arg3, (uint32 *)arg4, (void **)arg5, (char *)arg6);
48   }
49   typedef int16 (*fs_ptr)(uint32, char *, void **, uint32 *);
50   static uint32 fs_tvect = 0;
51 < static inline int16 FindSymbol(uint32 arg1, char *arg2, void **arg3, uint32 *arg4)
51 > static inline int16 FindSymbol(uint32 arg1, uintptr arg2, uintptr arg3, uintptr arg4)
52   {
53 <        return (int16)CallMacOS4(fs_ptr, fs_tvect, arg1, arg2, arg3, arg4);
53 >        return (int16)CallMacOS4(fs_ptr, fs_tvect, arg1, (char *)arg2, (void **)arg3, (uint32 **)arg4);
54   }
55   typedef int16 (*cc_ptr)(uint32 *);
56   static uint32 cc_tvect = 0;
# Line 58 | Line 58 | static inline int16 CloseConnection(uint
58   {
59          return (int16)CallMacOS1(cc_ptr, cc_tvect, arg1);
60   }
61 + typedef uint32 (*nps_ptr)(uint32);
62 + static uint32 nps_tvect = 0;
63 + static inline uint32 NewPtrSys(uint32 arg1)
64 + {
65 +        return CallMacOS1(nps_ptr, nps_tvect, arg1);
66 + }
67 + typedef void (*d_ptr)(uint32);
68 + static uint32 d_tvect = 0;
69 + static inline void DisposePtr(uint32 arg1)
70 + {
71 +        CallMacOS1(d_ptr, d_tvect, arg1);
72 + }
73  
74  
75   /*
# Line 151 | Line 163 | void FileDiskLayout(loff_t size, uint8 *
163   *  lib and sym must be Pascal strings!
164   */
165  
166 < void *FindLibSymbol(char *lib_str, char *sym_str)
166 > uint32 FindLibSymbol(const char *lib_str, const char *sym_str)
167   {
168          SheepVar32 conn_id = 0;
169          SheepVar32 main_addr = 0;
# Line 169 | Line 181 | void *FindLibSymbol(char *lib_str, char
181                  M68kRegisters r;
182          
183                  // Find shared library
184 <                static const uint16 proc1[] = {
185 <                        PW(0x558f),                                                     // subq.l       #2,a7
186 <                        PW(0x2f08),                                                     // move.l       a0,-(a7)
187 <                        PW(0x2f3c), PW(0x7077), PW(0x7063),     // move.l       #'pwpc',-(a7)
188 <                        PW(0x2f3c), PW(0x0000), PW(0x0001),     // move.l       #kReferenceCFrag,-(a7)
189 <                        PW(0x2f09),                                                     // move.l       a1,-(a7)
190 <                        PW(0x2f0a),                                                     // move.l       a2,-(a7)
191 <                        PW(0x2f0b),                                                     // move.l       a3,-(a7)
192 <                        PW(0x3f3c), PW(0x0001),                         // (GetSharedLibrary)
193 <                        PW(0xaa5a),                                                     // CFMDispatch
194 <                        PW(0x301f),                                                     // move.w       (a7)+,d0
195 <                        PW(M68K_RTS)
184 >                static const uint8 proc1_template[] = {
185 >                        0x55, 0x8f,                                                     // subq.l       #2,a7
186 >                        0x2f, 0x08,                                                     // move.l       a0,-(a7)
187 >                        0x2f, 0x3c, 0x70, 0x77, 0x70, 0x63,     // move.l       #'pwpc',-(a7)
188 >                        0x2f, 0x3c, 0x00, 0x00, 0x00, 0x01,     // move.l       #kReferenceCFrag,-(a7)
189 >                        0x2f, 0x09,                                                     // move.l       a1,-(a7)
190 >                        0x2f, 0x0a,                                                     // move.l       a2,-(a7)
191 >                        0x2f, 0x0b,                                                     // move.l       a3,-(a7)
192 >                        0x3f, 0x3c, 0x00, 0x01,                         // (GetSharedLibrary)
193 >                        0xaa, 0x5a,                                                     // CFMDispatch
194 >                        0x30, 0x1f,                                                     // move.w       (a7)+,d0
195 >                        M68K_RTS >> 8, M68K_RTS & 0xff
196                  };
197 +                BUILD_SHEEPSHAVER_PROCEDURE(proc1);
198                  r.a[0] = lib.addr();
199                  r.a[1] = conn_id.addr();
200                  r.a[2] = main_addr.addr();
201                  r.a[3] = err.addr();
202 <                Execute68k((uint32)proc1, &r);
202 >                Execute68k(proc1, &r);
203                  D(bug(" GetSharedLibrary: ret %d, connection ID %ld, main %p\n", (int16)r.d[0], conn_id.value(), main_addr.value()));
204                  if (r.d[0])
205 <                        return NULL;
205 >                        return 0;
206          
207                  // Find symbol
208 <                static const uint16 proc2[] = {
209 <                        PW(0x558f),                                     // subq.l       #2,a7
210 <                        PW(0x2f00),                                     // move.l       d0,-(a7)
211 <                        PW(0x2f08),                                     // move.l       a0,-(a7)
212 <                        PW(0x2f09),                                     // move.l       a1,-(a7)
213 <                        PW(0x2f0a),                                     // move.l       a2,-(a7)
214 <                        PW(0x3f3c), PW(0x0005),         // (FindSymbol)
215 <                        PW(0xaa5a),                                     // CFMDispatch
216 <                        PW(0x301f),                                     // move.w       (a7)+,d0
217 <                        PW(M68K_RTS)
208 >                static const uint8 proc2_template[] = {
209 >                        0x55, 0x8f,                                     // subq.l       #2,a7
210 >                        0x2f, 0x00,                                     // move.l       d0,-(a7)
211 >                        0x2f, 0x08,                                     // move.l       a0,-(a7)
212 >                        0x2f, 0x09,                                     // move.l       a1,-(a7)
213 >                        0x2f, 0x0a,                                     // move.l       a2,-(a7)
214 >                        0x3f, 0x3c, 0x00, 0x05,         // (FindSymbol)
215 >                        0xaa, 0x5a,                                     // CFMDispatch
216 >                        0x30, 0x1f,                                     // move.w       (a7)+,d0
217 >                        M68K_RTS >> 8, M68K_RTS & 0xff
218                  };
219 +                BUILD_SHEEPSHAVER_PROCEDURE(proc2);
220                  r.d[0] = conn_id.value();
221                  r.a[0] = sym.addr();
222                  r.a[1] = sym_addr.addr();
223                  r.a[2] = sym_class.addr();
224 <                Execute68k((uint32)proc2, &r);
224 >                Execute68k(proc2, &r);
225                  D(bug(" FindSymbol1: ret %d, sym_addr %p, sym_class %ld\n", (int16)r.d[0], sym_addr.value(), sym_class.value()));
226   //!! CloseConnection()?
227                  if (r.d[0])
228 <                        return NULL;
228 >                        return 0;
229                  else
230 <                        return (void *)sym_addr.value();
230 >                        return sym_addr.value();
231  
232          } else {
233  
# Line 222 | Line 236 | void *FindLibSymbol(char *lib_str, char
236                          return 0;
237                  }
238                  int16 res;
239 <                res = GetSharedLibrary(lib.value(), FOURCC('p','w','p','c'), 1, (uint32 *)conn_id.addr(), (void **)main_addr.addr(), (char *)err.addr());
239 >                res = GetSharedLibrary(lib.addr(), FOURCC('p','w','p','c'), 1, conn_id.addr(), main_addr.addr(), err.addr());
240                  D(bug(" GetSharedLibrary: ret %d, connection ID %ld, main %p\n", res, conn_id.value(), main_addr.value()));
241                  if (res)
242 <                        return NULL;
243 <                res = FindSymbol(conn_id.value(), sym.value(), (void **)sym_addr.addr(), (uint32 *)sym_class.addr());
242 >                        return 0;
243 >                res = FindSymbol(conn_id.value(), sym.addr(), sym_addr.addr(), sym_class.addr());
244                  D(bug(" FindSymbol: ret %d, sym_addr %p, sym_class %ld\n", res, sym_addr.value(), sym_class.value()));
245   //!!??          CloseConnection(&conn_id);
246                  if (res)
247 <                        return NULL;
247 >                        return 0;
248                  else
249 <                        return (void *)sym_addr.value();
249 >                        return sym_addr.value();
250          }
251   }
252  
# Line 243 | Line 257 | void *FindLibSymbol(char *lib_str, char
257  
258   void InitCallUniversalProc()
259   {
260 <        cu_tvect = (uint32)FindLibSymbol("\014InterfaceLib", "\021CallUniversalProc");
260 >        cu_tvect = FindLibSymbol("\014InterfaceLib", "\021CallUniversalProc");
261          D(bug("CallUniversalProc TVECT at %08lx\n", cu_tvect));
262          if (cu_tvect == 0) {
263                  printf("FATAL: Can't find CallUniversalProc()\n");
264                  QuitEmulator();
265          }
266  
267 <        gsl_tvect = (uint32)FindLibSymbol("\014InterfaceLib", "\020GetSharedLibrary");
267 >        gsl_tvect = FindLibSymbol("\014InterfaceLib", "\020GetSharedLibrary");
268          D(bug("GetSharedLibrary TVECT at %08lx\n", gsl_tvect));
269          if (gsl_tvect == 0) {
270                  printf("FATAL: Can't find GetSharedLibrary()\n");
271                  QuitEmulator();
272          }
273  
274 <        fs_tvect = (uint32)FindLibSymbol("\014InterfaceLib", "\012FindSymbol");
274 >        fs_tvect = FindLibSymbol("\014InterfaceLib", "\012FindSymbol");
275          D(bug("FindSymbol TVECT at %08lx\n", fs_tvect));
276          if (fs_tvect == 0) {
277                  printf("FATAL: Can't find FindSymbol()\n");
278                  QuitEmulator();
279          }
280  
281 <        cc_tvect = (uint32)FindLibSymbol("\014InterfaceLib", "\017CloseConnection");
281 >        cc_tvect = FindLibSymbol("\014InterfaceLib", "\017CloseConnection");
282          D(bug("CloseConnection TVECT at %08lx\n", cc_tvect));
283          if (cc_tvect == 0) {
284                  printf("FATAL: Can't find CloseConnection()\n");
285                  QuitEmulator();
286          }
287 +
288 +        nps_tvect = FindLibSymbol("\014InterfaceLib", "\011NewPtrSys");
289 +        D(bug("NewPtrSys TVECT at %08lx\n", nps_tvect));
290 +        if (nps_tvect == 0) {
291 +                printf("FATAL: Can't find NewPtrSys()\n");
292 +                QuitEmulator();
293 +        }
294 +
295 +        d_tvect = FindLibSymbol("\014InterfaceLib", "\012DisposePtr");
296 +        D(bug("DisposePtr TVECT at %08lx\n", d_tvect));
297 +        if (d_tvect == 0) {
298 +                printf("FATAL: Can't find DisposePtr()\n");
299 +                QuitEmulator();
300 +        }
301   }
302  
303  
# Line 309 | Line 337 | uint32 TimeToMacTime(time_t t)
337          uint32 days = local->tm_yday + 365 * (local->tm_year - 4) + intervening_leap_days;
338          return local->tm_sec + 60 * (local->tm_min + 60 * (local->tm_hour + 24 * days));
339   }
340 +
341 +
342 + /*
343 + *  Memory allocators in MacOS system heap zone
344 + */
345 +
346 + uint32 Mac_sysalloc(uint32 size)
347 + {
348 +        return NewPtrSys(size);
349 + }
350 +
351 + void Mac_sysfree(uint32 addr)
352 + {
353 +        DisposePtr(addr);
354 + }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines