130 lines
2.6 KiB
C
130 lines
2.6 KiB
C
|
/*++
|
|||
|
|
|||
|
Copyright (c) 1990 Microsoft Corporation
|
|||
|
|
|||
|
Module Name:
|
|||
|
|
|||
|
context.c
|
|||
|
|
|||
|
Abstract:
|
|||
|
|
|||
|
This module contains the context management routines for
|
|||
|
Win32
|
|||
|
|
|||
|
Author:
|
|||
|
|
|||
|
Mark Lucovsky (markl) 28-Sep-1990
|
|||
|
|
|||
|
Revision History:
|
|||
|
|
|||
|
Thomas Van Baak (tvb) 22-Jul-1992
|
|||
|
|
|||
|
Adapted for Alpha AXP.
|
|||
|
|
|||
|
--*/
|
|||
|
|
|||
|
#include "basedll.h"
|
|||
|
|
|||
|
VOID
|
|||
|
BaseInitializeContext (
|
|||
|
OUT PCONTEXT Context,
|
|||
|
IN PVOID Parameter OPTIONAL,
|
|||
|
IN PVOID InitialPc OPTIONAL,
|
|||
|
IN PVOID InitialSp OPTIONAL,
|
|||
|
IN BASE_CONTEXT_TYPE ContextType
|
|||
|
)
|
|||
|
|
|||
|
/*++
|
|||
|
|
|||
|
Routine Description:
|
|||
|
|
|||
|
This function initializes a context structure so that it can
|
|||
|
be used in a subsequent call to NtCreateThread.
|
|||
|
|
|||
|
Arguments:
|
|||
|
|
|||
|
Context - Supplies a context buffer to be initialized by this routine.
|
|||
|
|
|||
|
Parameter - Supplies the thread's parameter.
|
|||
|
|
|||
|
InitialPc - Supplies an initial program counter value.
|
|||
|
|
|||
|
InitialSp - Supplies an initial stack pointer value.
|
|||
|
|
|||
|
NewThread - Supplies a flag that specifies that this is a new
|
|||
|
thread, or a new process.
|
|||
|
|
|||
|
Return Value:
|
|||
|
|
|||
|
None.
|
|||
|
|
|||
|
--*/
|
|||
|
|
|||
|
{
|
|||
|
ULONG temp;
|
|||
|
PPEB Peb;
|
|||
|
|
|||
|
Peb = NtCurrentPeb();
|
|||
|
|
|||
|
//
|
|||
|
// Initialize the control registers.
|
|||
|
// So that the thread begins at BaseThreadStart
|
|||
|
//
|
|||
|
|
|||
|
RtlZeroMemory((PVOID)Context, sizeof(CONTEXT));
|
|||
|
Context->IntGp = 1;
|
|||
|
Context->IntSp = (ULONGLONG)(LONG_PTR)InitialSp;
|
|||
|
Context->IntRa = 1;
|
|||
|
Context->ContextFlags = CONTEXT_FULL;
|
|||
|
if ( ContextType != BaseContextTypeProcess ) {
|
|||
|
if ( ContextType == BaseContextTypeThread ) {
|
|||
|
Context->Fir = (ULONGLONG)(LONG_PTR)BaseThreadStart;
|
|||
|
} else {
|
|||
|
Context->Fir = (ULONGLONG)(LONG_PTR)BaseFiberStart;
|
|||
|
}
|
|||
|
Context->IntA0 = (ULONGLONG)(LONG_PTR)InitialPc;
|
|||
|
Context->IntA1 = (ULONGLONG)(LONG_PTR)Parameter;
|
|||
|
Context->IntGp = (ULONGLONG)(LONG_PTR)RtlImageDirectoryEntryToData(
|
|||
|
Peb->ImageBaseAddress,
|
|||
|
TRUE,
|
|||
|
IMAGE_DIRECTORY_ENTRY_GLOBALPTR,
|
|||
|
&temp
|
|||
|
);
|
|||
|
}
|
|||
|
else {
|
|||
|
Context->Fir = (ULONGLONG)(LONG_PTR)BaseProcessStart;
|
|||
|
Context->IntA0 = (ULONGLONG)(LONG_PTR)InitialPc;
|
|||
|
}
|
|||
|
}
|
|||
|
|
|||
|
VOID
|
|||
|
BaseFiberStart(
|
|||
|
VOID
|
|||
|
)
|
|||
|
|
|||
|
/*++
|
|||
|
|
|||
|
Routine Description:
|
|||
|
|
|||
|
This function is called to start a Win32 fiber. Its purpose
|
|||
|
is to call BaseThreadStart, getting the necessary arguments
|
|||
|
from the fiber context record.
|
|||
|
|
|||
|
Arguments:
|
|||
|
|
|||
|
None.
|
|||
|
|
|||
|
Return Value:
|
|||
|
|
|||
|
None.
|
|||
|
|
|||
|
--*/
|
|||
|
|
|||
|
{
|
|||
|
PFIBER Fiber;
|
|||
|
|
|||
|
Fiber = GetCurrentFiber();
|
|||
|
BaseThreadStart( (LPTHREAD_START_ROUTINE)Fiber->FiberContext.IntA0,
|
|||
|
(LPVOID)Fiber->FiberContext.IntA1 );
|
|||
|
}
|