328 lines
9 KiB
C
328 lines
9 KiB
C
/*++
|
||
|
||
Copyright (c) 1990 Microsoft Corporation
|
||
|
||
Module Name:
|
||
|
||
thredini.c
|
||
|
||
Abstract:
|
||
|
||
This module implements the machine dependent functions to set the initial
|
||
context and data alignment handling mode for a process or thread object.
|
||
|
||
Author:
|
||
|
||
David N. Cutler (davec) 1-Apr-1990
|
||
|
||
Environment:
|
||
|
||
Kernel mode only.
|
||
|
||
Revision History:
|
||
|
||
Joe Notarangelo 21-Apr-1992
|
||
very minor changes for ALPHA
|
||
1. psr definition
|
||
2. pte and mask (from 3ffffc to 1ffffc), mips page size is 4k
|
||
our first alpha page size is 8k
|
||
mips code shifts right 10 (12-2) and then turns off the
|
||
upper 10 bits, alpha shifts right 11 (13-2) and so must
|
||
turn off upper 11 bits
|
||
3. Insert register values into context structure as quadwords
|
||
to insure that the written values are in canonical form
|
||
|
||
Thomas Van Baak (tvb) 9-Oct-1992
|
||
|
||
Adapted for Alpha AXP.
|
||
|
||
--*/
|
||
|
||
#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); \
|
||
}
|
||
|
||
VOID
|
||
KiInitializeContextThread (
|
||
IN PKTHREAD Thread,
|
||
IN PKSYSTEM_ROUTINE SystemRoutine,
|
||
IN PKSTART_ROUTINE StartRoutine OPTIONAL,
|
||
IN PVOID StartContext OPTIONAL,
|
||
IN PCONTEXT ContextRecord 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.
|
||
|
||
ContextRecord - 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.
|
||
|
||
--*/
|
||
|
||
{
|
||
|
||
PKEXCEPTION_FRAME CxFrame;
|
||
PKEXCEPTION_FRAME ExFrame;
|
||
ULONG_PTR InitialStack;
|
||
PKTRAP_FRAME TrFrame;
|
||
|
||
//
|
||
// If a context frame is specified, then initialize a trap frame and
|
||
// and an exception frame with the specified user mode context.
|
||
//
|
||
|
||
InitialStack = (ULONG_PTR)Thread->InitialStack;
|
||
if (ARGUMENT_PRESENT(ContextRecord)) {
|
||
TrFrame = (PKTRAP_FRAME)(((InitialStack) -
|
||
sizeof(KTRAP_FRAME)) & ~((ULONG_PTR)15));
|
||
ExFrame = (PKEXCEPTION_FRAME)(((ULONG_PTR)TrFrame -
|
||
sizeof(KEXCEPTION_FRAME)) & ~((ULONG_PTR)15));
|
||
CxFrame = (PKEXCEPTION_FRAME)(((ULONG_PTR)ExFrame -
|
||
sizeof(KEXCEPTION_FRAME)) & ~((ULONG_PTR)15));
|
||
|
||
//
|
||
// Zero the exception and trap frames and copy information from the
|
||
// specified context frame to the trap and exception frames.
|
||
//
|
||
|
||
RtlZeroMemory((PVOID)ExFrame, sizeof(KEXCEPTION_FRAME));
|
||
RtlZeroMemory((PVOID)TrFrame, sizeof(KTRAP_FRAME));
|
||
KeContextToKframes(TrFrame, ExFrame,
|
||
ContextRecord,
|
||
ContextRecord->ContextFlags | CONTEXT_CONTROL,
|
||
UserMode);
|
||
|
||
//
|
||
// If the FPCR quadword in the specified context record is zero,
|
||
// then assume it is a default value and force floating point round
|
||
// to nearest mode (the hardware default mode is chopped rounding
|
||
// which is not desirable for NT). It would be nice to initialize
|
||
// the SoftFpcr here also but not all threads have a Teb.
|
||
//
|
||
|
||
if (TrFrame->Fpcr == 0) {
|
||
((PFPCR)(&TrFrame->Fpcr))->DynamicRoundingMode = ROUND_TO_NEAREST;
|
||
}
|
||
|
||
//
|
||
// Set the saved previous processor mode in the trap frame and the
|
||
// previous processor mode in the thread object to user mode.
|
||
//
|
||
|
||
TrFrame->PreviousMode = UserMode;
|
||
Thread->PreviousMode = UserMode;
|
||
|
||
//
|
||
// Initialize the return address in the exception frame.
|
||
//
|
||
|
||
ExFrame->IntRa = 0;
|
||
|
||
} else {
|
||
ExFrame = NULL;
|
||
CxFrame = (PKEXCEPTION_FRAME)(((InitialStack) -
|
||
sizeof(KEXCEPTION_FRAME)) & ~((ULONG_PTR)15));
|
||
|
||
//
|
||
// Set the previous mode in thread object to kernel.
|
||
//
|
||
|
||
Thread->PreviousMode = KernelMode;
|
||
}
|
||
|
||
//
|
||
// Initialize context switch frame and set thread start up parameters.
|
||
//
|
||
// N.B. ULONG becomes canonical longword with (ULONGLONG)(LONG) cast.
|
||
//
|
||
|
||
CxFrame->SwapReturn = (ULONGLONG)(LONG_PTR)KiThreadStartup;
|
||
if (ExFrame == NULL) {
|
||
CxFrame->IntFp = (ULONGLONG)(LONG_PTR)ExFrame;
|
||
|
||
} else {
|
||
CxFrame->IntFp = (ULONGLONG)(LONG_PTR)TrFrame;
|
||
}
|
||
|
||
CxFrame->IntS0 = (ULONGLONG)(LONG_PTR)ContextRecord;
|
||
CxFrame->IntS1 = (ULONGLONG)(LONG_PTR)StartContext;
|
||
CxFrame->IntS2 = (ULONGLONG)(LONG_PTR)StartRoutine;
|
||
CxFrame->IntS3 = (ULONGLONG)(LONG_PTR)SystemRoutine;
|
||
|
||
CxFrame->Psr = 0; // clear everything
|
||
((PSR *)(&CxFrame->Psr))->INTERRUPT_ENABLE = 1;
|
||
((PSR *)(&CxFrame->Psr))->IRQL = DISPATCH_LEVEL;
|
||
((PSR *)(&CxFrame->Psr))->MODE = 0;
|
||
|
||
//
|
||
// Set the initial kernel stack pointer.
|
||
//
|
||
|
||
Thread->KernelStack = (PVOID)(ULONGLONG)(LONG_PTR)CxFrame;
|
||
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 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.
|
||
|
||
--*/
|
||
|
||
{
|
||
|
||
KIRQL OldIrql;
|
||
BOOLEAN Previous;
|
||
|
||
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, lower IRQL to its previous value, and
|
||
// return the previous data alignment mode.
|
||
//
|
||
|
||
KiUnlockDispatcherDatabase(OldIrql);
|
||
return Previous;
|
||
}
|