|
|
;+---------------------------------------------------------------------------;; Microsoft Windows; Copyright (C) Microsoft Corporation, 1996.;; File: stubless.asm;; Contents: This module contains interpreter support routines for; Intel platforms.;; Functions: Invoke - Calls a function from an interpreter.; ObjectStublessClient3 - ObjectStublessClient511;; History: 07-Nov-94 DKays Created; 24-Apr-96 ShannonC Added Invoke and support for ; 512 stubless client methods.;;----------------------------------------------------------------------------
.386p
EXTRN _ObjectStublessClient@8:NEAR
_TEXT SEGMENT DWORD PUBLIC 'CODE'
;+---------------------------------------------------------------------------;; Function: REGISTER_TYPE __stdcall Invoke(MANAGER_FUNCTION pFunction, ; REGISTER_TYPE *pArgumentList,; ULONG cArguments);;; Synopsis: Given a function pointer and an argument list, Invoke builds ; a stack frame and calls the function.;; Arguments: pFunction - Pointer to the function to be called.;; pArgumentList - Pointer to the buffer containing the ; function parameters.;; cArguments - The size of the argument list in REGISTER_TYPEs.;; Notes: In the __stdcall calling convention, the callee must pop; the parameters.;;----------------------------------------------------------------------------_Invoke@12 PROC PUBLIC
push ebp; Save ebpmov ebp, esp; Set ebp so the debugger can display the stack trace.
;Here is our stack layout.;[ebp+0] = saved ebp;[ebp+4] = return address;[ebp+8] = pFunction;[ebp+12] = pArgumentList;[ebp+16] = cArguments
push edi; Save edipush esi; Save esipushf; Save the direction flag - pushes 2 bytespushf; To keep stack aligned at 4 push 2 more bytes
mov eax, [ebp+16]; Load number of parametersshl eax, 2; Calculate size of parameterssub esp, eax; Grow the stack
;Copy parameters from bottom to top.mov esi, [ebp+12]; Load pointer to parametersmov ecx, [ebp+16]; Load number of parameterssub eax, 4;mov edi, espadd esi, eax; Get pointer to last source parameteradd edi, eax; Get pointer last destination parameter
std; Set direction flagrep movsd; Copy the parameters
mov eax, [ebp-12]; Get the direction flag (2+2 bytes)push eax; Push it in order to restore itpopf; Restore the direction flagpopf; Do it again as we pushed 4 bytes when saving the flag
;call the servermov eax, [ebp+8]; Load pointer to function.call eax
mov edi, [ebp-4]; Restore edimov esi, [ebp-8]; Restore esimov esp, ebp; Restore stack pointerpop ebp; Restore ebpret 12 ; Pop parameters
_Invoke@12 ENDP
;; Define ObjectStublessClient routine macro.;StublessClientProc macro Method
_ObjectStublessClient&Method&@0 PROC PUBLIC ; ; NOTE : ; Don't use edi, esi, or ebx unless you add code to save them on ; the stack! ; mov ecx, Method jmp _ObjectStubless@0
_ObjectStublessClient&Method&@0 ENDP
endm
;On entry, ecx contains method number._ObjectStubless@0 PROC PUBLIC ; ; NOTE : ; Don't use edi, esi, or ebx unless you add code to save them on ; the stack! ; ; ; Do this so the debugger can figure out the stack trace correctly. ; Will make debugging much easier. ; push ebp mov ebp, esp
; Push the method number. push ecx
; Push the stack address of the parameters. mov eax, ebp add eax, 8 push eax
call _ObjectStublessClient@8
; ; After the call : ; Real return for the proxy is in eax. ; Parameter stack size is put in ecx by ObjectStublessClient for us. ; ; At this pointer eax (return), ecx (ParamSize), and edi, esi, ebx ; (non-volatile registers) can not be written!!! ;
; Don't forget to pop ebp. pop ebp
; Pop our return address. pop edx
; Pop params explicitly. add esp, ecx
; This will return us from whichever StublessClient routine was called. jmp edx
_ObjectStubless@0 ENDP
StublessClientProc 3StublessClientProc 4StublessClientProc 5StublessClientProc 6StublessClientProc 7StublessClientProc 8StublessClientProc 9StublessClientProc 10StublessClientProc 11StublessClientProc 12StublessClientProc 13StublessClientProc 14StublessClientProc 15StublessClientProc 16StublessClientProc 17StublessClientProc 18StublessClientProc 19StublessClientProc 20StublessClientProc 21StublessClientProc 22StublessClientProc 23StublessClientProc 24StublessClientProc 25StublessClientProc 26StublessClientProc 27StublessClientProc 28StublessClientProc 29StublessClientProc 30StublessClientProc 31StublessClientProc 32StublessClientProc 33StublessClientProc 34StublessClientProc 35StublessClientProc 36StublessClientProc 37StublessClientProc 38StublessClientProc 39StublessClientProc 40StublessClientProc 41StublessClientProc 42StublessClientProc 43StublessClientProc 44StublessClientProc 45StublessClientProc 46StublessClientProc 47StublessClientProc 48StublessClientProc 49StublessClientProc 50StublessClientProc 51StublessClientProc 52StublessClientProc 53StublessClientProc 54StublessClientProc 55StublessClientProc 56StublessClientProc 57StublessClientProc 58StublessClientProc 59StublessClientProc 60StublessClientProc 61StublessClientProc 62StublessClientProc 63StublessClientProc 64StublessClientProc 65StublessClientProc 66StublessClientProc 67StublessClientProc 68StublessClientProc 69StublessClientProc 70StublessClientProc 71StublessClientProc 72StublessClientProc 73StublessClientProc 74StublessClientProc 75StublessClientProc 76StublessClientProc 77StublessClientProc 78StublessClientProc 79StublessClientProc 80StublessClientProc 81StublessClientProc 82StublessClientProc 83StublessClientProc 84StublessClientProc 85StublessClientProc 86StublessClientProc 87StublessClientProc 88StublessClientProc 89StublessClientProc 90StublessClientProc 91StublessClientProc 92StublessClientProc 93StublessClientProc 94StublessClientProc 95StublessClientProc 96StublessClientProc 97StublessClientProc 98StublessClientProc 99StublessClientProc 100StublessClientProc 101StublessClientProc 102StublessClientProc 103StublessClientProc 104StublessClientProc 105StublessClientProc 106StublessClientProc 107StublessClientProc 108StublessClientProc 109StublessClientProc 110StublessClientProc 111StublessClientProc 112StublessClientProc 113StublessClientProc 114StublessClientProc 115StublessClientProc 116StublessClientProc 117StublessClientProc 118StublessClientProc 119StublessClientProc 120StublessClientProc 121StublessClientProc 122StublessClientProc 123StublessClientProc 124StublessClientProc 125StublessClientProc 126StublessClientProc 127
_TEXT ends
end
|
