Windows2000/private/ntos/ke/i386/thredini.c
2020-09-30 17:12:32 +02:00

658 lines
17 KiB
C

/*++
Copyright (c) 1990 Microsoft Corporation
Module Name:
thredini.c
Abstract:
This module implements the machine dependent function to set the initial
context and data alignment handling mode for a process or thread object.
Author:
David N. Cutler (davec) 31-Mar-1990
Environment:
Kernel mode only.
Revision History:
3 April 90 bryan willman
This version ported to 386.
--*/
#include "ki.h"
// The following assert macros are used to check that an input object is
// really the proper type.
#define ASSERT_PROCESS(E) { \
ASSERT((E)->Header.Type == ProcessObject); \
}
#define ASSERT_THREAD(E) { \
ASSERT((E)->Header.Type == ThreadObject); \
}
// Our notion of alignment is different, so force use of ours
#undef ALIGN_UP
#undef ALIGN_DOWN
#define ALIGN_DOWN(address,amt) ((ULONG)(address) & ~(( amt ) - 1))
#define ALIGN_UP(address,amt) (ALIGN_DOWN( (address + (amt) - 1), (amt) ))
// The function prototype for the special APC we use to set the
// hardware alignment state for a thread
VOID
KepSetAlignmentSpecialApc(
IN PKAPC Apc,
IN PKNORMAL_ROUTINE *NormalRoutine,
IN PVOID *NormalContext,
IN PVOID *SystemArgument1,
IN PVOID *SystemArgument2
);
extern BOOLEAN KeI386XMMIPresent;
VOID
KiInitializeContextThread (
IN PKTHREAD Thread,
IN PKSYSTEM_ROUTINE SystemRoutine,
IN PKSTART_ROUTINE StartRoutine OPTIONAL,
IN PVOID StartContext OPTIONAL,
IN PCONTEXT ContextFrame OPTIONAL
)
/*++
Routine Description:
This function initializes the machine dependent context of a thread object.
N.B. This function does not check the accessibility of the context record.
It is assumed the the caller of this routine is either prepared to
handle access violations or has probed and copied the context record
as appropriate.
Arguments:
Thread - Supplies a pointer to a dispatcher object of type thread.
SystemRoutine - Supplies a pointer to the system function that is to be
called when the thread is first scheduled for execution.
StartRoutine - Supplies an optional pointer to a function that is to be
called after the system has finished initializing the thread. This
parameter is specified if the thread is a system thread and will
execute totally in kernel mode.
StartContext - Supplies an optional pointer to an arbitrary data structure
which will be passed to the StartRoutine as a parameter. This
parameter is specified if the thread is a system thread and will
execute totally in kernel mode.
ContextFrame - Supplies an optional pointer a context frame which contains
the initial user mode state of the thread. This parameter is specified
if the thread is a user thread and will execute in user mode. If this
parameter is not specified, then the Teb parameter is ignored.
Return Value:
None.
--*/
{
PFX_SAVE_AREA NpxFrame;
PKSWITCHFRAME SwitchFrame;
PKTRAP_FRAME TrFrame;
PULONG PSystemRoutine;
PULONG PStartRoutine;
PULONG PStartContext;
PULONG PUserContextFlag;
ULONG ContextFlags;
CONTEXT Context2;
PCONTEXT ContextFrame2 = NULL;
PFXSAVE_FORMAT PFxSaveArea;
// If a context frame is specified, then initialize a trap frame and
// and an exception frame with the specified user mode context.
if (ARGUMENT_PRESENT(ContextFrame)) {
RtlMoveMemory(&Context2, ContextFrame, sizeof(CONTEXT));
ContextFrame2 = &Context2;
ContextFlags = CONTEXT_CONTROL;
// The 80387 save area is at the very base of the kernel stack.
NpxFrame = (PFX_SAVE_AREA)(((ULONG)(Thread->InitialStack) -
sizeof(FX_SAVE_AREA)));
// Load up an initial NPX state.
if (KeI386XMMIPresent == TRUE) {
PFxSaveArea = (PFXSAVE_FORMAT)ContextFrame2->ExtendedRegisters;
PFxSaveArea->ControlWord = 0x27f; // like fpinit but 64bit mode
PFxSaveArea->StatusWord = 0;
PFxSaveArea->TagWord = 0;
PFxSaveArea->ErrorOffset = 0;
PFxSaveArea->ErrorSelector = 0;
PFxSaveArea->DataOffset = 0;
PFxSaveArea->DataSelector = 0;
PFxSaveArea->MXCsr = 0x1f80; // mask all the exceptions
} else {
ContextFrame2->FloatSave.ControlWord = 0x27f; // like fpinit but 64bit mode
ContextFrame2->FloatSave.StatusWord = 0;
ContextFrame2->FloatSave.TagWord = 0xffff;
ContextFrame2->FloatSave.ErrorOffset = 0;
ContextFrame2->FloatSave.ErrorSelector = 0;
ContextFrame2->FloatSave.DataOffset = 0;
ContextFrame2->FloatSave.DataSelector = 0;
}
if (KeI386NpxPresent) {
ContextFrame2->FloatSave.Cr0NpxState = 0;
NpxFrame->Cr0NpxState = 0;
NpxFrame->NpxSavedCpu = 0;
if (KeI386XMMIPresent == TRUE) {
ContextFlags |= CONTEXT_EXTENDED_REGISTERS;
} else {
ContextFlags |= CONTEXT_FLOATING_POINT;
}
// Threads NPX state is not in the coprocessor.
Thread->NpxState = NPX_STATE_NOT_LOADED;
Thread->NpxIrql = PASSIVE_LEVEL;
} else {
NpxFrame->Cr0NpxState = CR0_EM;
// Threads NPX state is not in the coprocessor.
// In the emulator case, do not set the CR0_EM bit as their
// emulators may not want exceptions on FWAIT instructions.
Thread->NpxState = NPX_STATE_NOT_LOADED & ~CR0_MP;
}
// Force debug registers off. They won't work anyway from an
// initial frame, debuggers must set a hard breakpoint in the target
ContextFrame2->Dr0 = 0;
ContextFrame2->Dr1 = 0;
ContextFrame2->Dr2 = 0;
ContextFrame2->Dr3 = 0;
ContextFrame2->Dr6 = 0;
ContextFrame2->Dr7 = 0;
ContextFrame2->ContextFlags &= ~(CONTEXT_DEBUG_REGISTERS);
#if 0
// If AutoAlignment is FALSE, we want to set the Alignment Check bit
// in Eflags, so we will get alignment faults.
if (Thread->AutoAlignment == FALSE) {
ContextFrame2->EFlags |= EFLAGS_ALIGN_CHECK;
}
#endif
// If the thread is set
TrFrame = (PKTRAP_FRAME)(((ULONG)NpxFrame - KTRAP_FRAME_LENGTH));
// Space for arguments to KiThreadStartup. Order is important,
// Since args are passed on stack through KiThreadStartup to
// PStartRoutine with PStartContext as an argument.
PUserContextFlag = (PULONG)TrFrame - 1;
PStartContext = PUserContextFlag - 1;
PStartRoutine = PStartContext - 1;
PSystemRoutine = PStartRoutine - 1;
SwitchFrame = (PKSWITCHFRAME)((PUCHAR)PSystemRoutine -
sizeof(KSWITCHFRAME));
// Copy information from the specified context frame to the trap and
// exception frames.
KeContextToKframes(TrFrame, NULL, ContextFrame2,
ContextFrame2->ContextFlags | ContextFlags,
UserMode);
TrFrame->HardwareSegSs |= RPL_MASK;
TrFrame->SegDs |= RPL_MASK;
TrFrame->SegEs |= RPL_MASK;
#if DBG
TrFrame->DbgArgMark = 0xBADB0D00;
#endif
// Tell KiThreadStartup that a user context is present.
*PUserContextFlag = 1;
// Initialize the kernel mode ExceptionList pointer
TrFrame->ExceptionList = EXCEPTION_CHAIN_END;
// Initialize the saved previous processor mode.
TrFrame->PreviousPreviousMode = UserMode;
// Set the previous mode in thread object to user.
Thread->PreviousMode = UserMode;
} else {
// Dummy floating save area. Kernel threads don't have or use
// the floating point - the dummy save area is make the stacks
// consistent.
NpxFrame = (PFX_SAVE_AREA)(((ULONG)(Thread->InitialStack) -
sizeof(FX_SAVE_AREA)));
// Load up an initial NPX state.
RtlZeroMemory((PVOID)NpxFrame, sizeof(FX_SAVE_AREA));
if (KeI386FxsrPresent == TRUE) {
NpxFrame->U.FxArea.ControlWord = 0x27f;//like fpinit but 64bit mode
NpxFrame->U.FxArea.MXCsr = 0x1f80;// mask all the exceptions
} else {
NpxFrame->U.FnArea.ControlWord = 0x27f;//like fpinit but 64bit mode
NpxFrame->U.FnArea.TagWord = 0xffff;
}
// Threads NPX state is not in the coprocessor.
Thread->NpxState = NPX_STATE_NOT_LOADED;
// Space for arguments to KiThreadStartup.
// Order of fields in the switchframe is important,
// Since args are passed on stack through KiThreadStartup to
// PStartRoutine with PStartContext as an argument.
PUserContextFlag = (PULONG)((ULONG)NpxFrame) - 1;
PStartContext = PUserContextFlag - 1;
PStartRoutine = PStartContext - 1;
PSystemRoutine = PStartRoutine - 1;
SwitchFrame = (PKSWITCHFRAME)((PUCHAR)PSystemRoutine -
sizeof(KSWITCHFRAME));
// Tell KiThreadStartup that a user context is NOT present.
*PUserContextFlag = 0;
// Set the previous mode in thread object to kernel.
Thread->PreviousMode = KernelMode;
}
// Set up thread start parameters.
// (UserContextFlag set above)
*PStartContext = (ULONG)StartContext;
*PStartRoutine = (ULONG)StartRoutine;
*PSystemRoutine = (ULONG)SystemRoutine;
// Set up switch frame. Assume the thread doesn't use the 80387;
// if it ever does (and there is one), these flags will get reset.
// Each thread starts with these same flags set, regardless of
// whether the hardware exists or not.
SwitchFrame->RetAddr = (ULONG)KiThreadStartup;
SwitchFrame->Eflags = EFLAGS_INTERRUPT_MASK;
#if 0
// If AutoAlignment is FALSE, we want to set the Alignment Check bit
// in Eflags, so we will get alignment faults.
if (Thread->AutoAlignment == FALSE) {
SwitchFrame->Eflags |= EFLAGS_ALIGN_CHECK;
}
#endif
SwitchFrame->ExceptionList = (ULONG)(EXCEPTION_CHAIN_END);
// Set the initial kernel stack pointer.
//DbgPrint("KiInitializeContextThread Thread %08x SwitchFrame %08x\n", Thread, SwitchFrame);
//DbgPrint("PSystemRoutine %08x PStartRoutine %08x PStartContext %08x\n", *PSystemRoutine, *PStartRoutine, *PStartContext);
Thread->KernelStack = (PVOID)SwitchFrame;
return;
}
BOOLEAN
KeSetAutoAlignmentProcess (
IN PKPROCESS Process,
IN BOOLEAN Enable
)
/*++
Routine Description:
This function sets the data alignment handling mode for the specified
process and returns the previous data alignment handling mode.
Arguments:
Process - Supplies a pointer to a dispatcher object of type process.
Enable - Supplies a boolean value that determines the handling of data
alignment exceptions for the process. A value of TRUE causes all
data alignment exceptions to be automatically handled by the kernel.
A value of FALSE causes all data alignment exceptions to be actually
raised as exceptions.
Return Value:
A value of TRUE is returned if data alignment exceptions were
previously automatically handled by the kernel. Otherwise, a value
of FALSE is returned.
--*/
{
KIRQL OldIrql;
BOOLEAN Previous;
ASSERT_PROCESS(Process);
// Raise IRQL to dispatcher level and lock dispatcher database.
KiLockDispatcherDatabase(&OldIrql);
// Capture the previous data alignment handling mode and set the
// specified data alignment mode.
Previous = Process->AutoAlignment;
Process->AutoAlignment = Enable;
// Unlock dispatcher database, lower IRQL to its previous value, and
// return the previous data alignment mode.
KiUnlockDispatcherDatabase(OldIrql);
return Previous;
}
BOOLEAN
KeSetAutoAlignmentThread (
IN PKTHREAD Thread,
IN BOOLEAN Enable
)
/*++
Routine Description:
This function sets the data alignment handling mode for the specified
thread and returns the previous data alignment handling mode.
Arguments:
Thread - Supplies a pointer to a dispatcher object of type thread.
Enable - Supplies a boolean value that determines the handling of data
alignment exceptions for the specified thread. A value of TRUE causes
all data alignment exceptions to be automatically handled by the kernel.
A value of FALSE causes all data alignment exceptions to be actually
raised as exceptions.
Return Value:
A value of TRUE is returned if data alignment exceptions were
previously automatically handled by the kernel. Otherwise, a value
of FALSE is returned.
--*/
{
BOOLEAN Previous;
PKAPC Apc;
PKEVENT Event;
KIRQL OldIrql;
ASSERT_THREAD(Thread);
// Raise IRQL to dispatcher level and lock dispatcher database.
KiLockDispatcherDatabase(&OldIrql);
// Capture the previous data alignment handling mode and set the
// specified data alignment mode.
Previous = Thread->AutoAlignment;
Thread->AutoAlignment = Enable;
// Unlock dispatcher database and lower IRQL to its previous value.
KiUnlockDispatcherDatabase(OldIrql);
#if 0
Apc = ExAllocatePool(NonPagedPoolMustSucceed, sizeof(KAPC));
Event = ExAllocatePool(NonPagedPoolMustSucceed, sizeof(KEVENT));
KeInitializeEvent(Event, NotificationEvent, FALSE);
if ( Thread == KeGetCurrentThread() ) {
Apc->SystemArgument1 = Thread;
Apc->SystemArgument2 = Event;
KeRaiseIrql(APC_LEVEL, &Irql);
KepSetAlignmentSpecialApc( Apc, NULL, NULL,
&Apc->SystemArgument1,
&Apc->SystemArgument2 );
KeLowerIrql(Irql);
} else {
KeInitializeApc( Apc,
Thread,
CurrentApcEnvironment,
KepSetAlignmentSpecialApc,
NULL,
NULL,
KernelMode,
NULL );
if (!KeInsertQueueApc( Apc,
Thread,
Event,
2 ) ) {
// We couldn't queue the APC, so we will not be able to change
// the AutoAlignment. Update the thread object so that it
// stays in sync with the hardware state.
#if DBG
DbgPrint("KeSetAutoAlignmentThread: unable to change thread's context\n");
#endif
Thread->AutoAlignment = Previous;
}
KeWaitForSingleObject( Event,
Executive,
KernelMode,
FALSE,
NULL );
}
ExFreePool(Apc);
ExFreePool(Event);
#endif
return(Previous);
}
#if 0
VOID
KepSetAlignmentSpecialApc(
IN PKAPC Apc,
IN PKNORMAL_ROUTINE *NormalRoutine,
IN PVOID *NormalContext,
IN PVOID *SystemArgument1,
IN PVOID *SystemArgument2
)
/*++
Routine Description:
This function updates the alignment check bit of the current thread's
EFLAGS to reflect the AutoAlignment setting of the thread object.
Arguments:
Apc - Supplies a pointer to the APC control object that caused entry
into this routine.
NormalRoutine - Supplies a pointer to a pointer to the normal routine
function that was specifed when the APC was initialized.
NormalContext - Supplies a pointer to a pointer to an arbitrary data
structure that was specified when the APC was initialized.
SystemArgument1 - Supplies a pointer to a PKTHREAD
SystemArgument2 - Supplies a pointer to a PKEVENT
Return Value:
None.
--*/
{
PKTHREAD Thread;
PKEVENT Event;
PKTRAP_FRAME TrapFrame;
CONTEXT ContextFrame;
Thread = *(PKTHREAD *)SystemArgument1;
Event = *(PKEVENT *)SystemArgument2;
ASSERT( Thread == KeGetCurrentThread() );
// Find the trap frame on the stack, so we can get the thread context
TrapFrame = (PKTRAP_FRAME)((PUCHAR)Thread->InitialStack -
ALIGN_UP(sizeof(KTRAP_FRAME),KTRAP_FRAME_ALIGN) -
sizeof(FX_SAVE_AREA));
ContextFrame.ContextFlags = CONTEXT_CONTROL;
KeContextFromKframes( TrapFrame,
NULL,
&ContextFrame );
// If AutoAlignment is TRUE, we want the processor to transparently fixup
// all alignment faults, so we clear the Alignment Check bit. If
// AutoAlignment is FALSE, we set the bit, so 486 processors will
// give us alignment faults.
if (Thread->AutoAlignment) {
ContextFrame.EFlags &= (~EFLAGS_ALIGN_CHECK);
} else {
ContextFrame.EFlags |= EFLAGS_ALIGN_CHECK;
}
// Replace the modified EFlags in the trap frame. When the thread returns
// to user mode, it will be running with the new alignment setting.
KeContextToKframes( TrapFrame,
NULL,
&ContextFrame,
CONTEXT_CONTROL,
KeGetPreviousMode() );
KeSetEvent(Event,0,FALSE);
}
#endif