home *** CD-ROM | disk | FTP | other *** search
/ Tricks of the Windows Gam…ming Gurus (2nd Edition) / Disc2.iso / vc98 / mfc / src / olecall.cpp < prev    next >
C/C++ Source or Header  |  1998-06-16  |  3KB  |  83 lines
  1. // This is a part of the Microsoft Foundation Classes C++ library.
  2. // Copyright (C) 1992-1998 Microsoft Corporation
  3. // All rights reserved.
  4. //
  5. // This source code is only intended as a supplement to the
  6. // Microsoft Foundation Classes Reference and related
  7. // electronic documentation provided with the library.
  8. // See these sources for detailed information regarding the
  9. // Microsoft Foundation Classes product.
  10.  
  11. #include "stdafx.h"
  12.  
  13. #ifdef AFX_OLE5_SEG
  14. #pragma code_seg(AFX_OLE5_SEG)
  15. #endif
  16.  
  17. // Note: because of the nature of these functions, it is not possible
  18. //  to create a 'C' or 'C++' version of them.  These functions are used
  19. //  for the lowest level of the OLE IDispatch implementation, and need
  20. //  to be ported to each supported platform.
  21.  
  22. extern "C" {
  23.  
  24. /////////////////////////////////////////////////////////////////////////////
  25. // Intel 386 version
  26.  
  27. #ifdef _X86_
  28.  
  29. __declspec(naked) void AFXAPI
  30. _AfxDispatchCall(AFX_PMSG /*pfn*/, void* /*pArgs*/, UINT /*nSizeArgs*/)
  31. {
  32.     _asm
  33.     {
  34.         pop     edx         // edx = return address
  35.         pop     eax         // eax = pfn
  36.         pop     ecx         // ecx = pArgs
  37.         add     ecx,[esp]   // ecx += nSizeArgs (=scratch area)
  38.         mov     [ecx],edx   // scratch[0] = return address
  39.         sub     ecx,[esp]   // ecx = pArgs (again)
  40.         mov     esp,ecx     // esp = pArgs (usually already correct)
  41.         pop     ecx         // ecx = this pointer (the CCmdTarget*)
  42.         call    eax         // call member function
  43.         ret                 // esp[0] should = scratch[0] = return address
  44.     }
  45. }
  46. #endif // _X86_
  47.  
  48. /////////////////////////////////////////////////////////////////////////////
  49. // MIPS R4000 version
  50.  
  51. #ifdef _MIPS_
  52.  
  53. extern "C" void _asm(char *, ...);
  54. void AFXAPI
  55. _AfxDispatchCall(AFX_PMSG /*pfn*/, void* /*pArgs*/, UINT /*nSizeArgs*/)
  56. {
  57.     _asm("addiu     %sp,%a1,0x0");      // sp = pArgs
  58.     _asm("addiu     %t6,%a0,0x0");      // t6 = pfn (save it)
  59.     _asm("lw        %a0,0x0(%sp)");     // a0 = param0
  60.     _asm("lw        %a1,0x4(%sp)");     // a1 = param1
  61.     _asm("lw        %a2,0x8(%sp)");     // a2 = param2
  62.     _asm("lw        %a3,0xc(%sp)");     // a3 = param3
  63.     _asm("j         %t6");              // ip = pfn (jump to target function)
  64. }
  65.  
  66. #endif // _MIPS_
  67.  
  68. /////////////////////////////////////////////////////////////////////////////
  69. // DEC Alpha AXP version
  70.  
  71. #ifdef _ALPHA_
  72.  
  73. // Note: ALPHA version is in src\alpha\olecall_.s
  74.  
  75. // The ALPHA compiler does not support inline assembly, so it
  76. //  must be build separately with the ASAXP assembler.
  77.  
  78. #endif // _ALPHA_
  79.  
  80. } // end extern "C" block
  81.  
  82. /////////////////////////////////////////////////////////////////////////////
  83.