mirror of https://github.com/tongzx/nt5src
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
355 lines
7.4 KiB
355 lines
7.4 KiB
//
|
|
// No Check-in Source Code.
|
|
//
|
|
// Do not make this code available to non-Microsoft personnel
|
|
// without Intel's express permission
|
|
//
|
|
/**
|
|
*** Copyright (C) 1996-97 Intel Corporation. All rights reserved.
|
|
***
|
|
*** The information and source code contained herein is the exclusive
|
|
*** property of Intel Corporation and may not be disclosed, examined
|
|
*** or reproduced in whole or in part without explicit written authorization
|
|
*** from the company.
|
|
**/
|
|
|
|
/*++
|
|
|
|
Copyright (c) 1995 Intel Corporation
|
|
|
|
Module Name:
|
|
|
|
simkd.c
|
|
|
|
Abstract:
|
|
|
|
Kernel debug com support.
|
|
|
|
Author:
|
|
|
|
14-Apr-1995
|
|
|
|
Environment:
|
|
|
|
Kernel mode
|
|
|
|
Revision History:
|
|
|
|
--*/
|
|
|
|
#include "halp.h"
|
|
|
|
extern int sprintf(char *, const char *, ...);
|
|
|
|
// #define KDDBG 1
|
|
|
|
#define TIMEOUT_COUNT 100 // 1024 * 200
|
|
#define GET_RETRY_COUNT 1024
|
|
#define MSG_DEBUG_ENABLE "Kernel Debugger Using: COM%x (Port %p, Baud Rate %d)\n"
|
|
#define MSG2_DEBUG_ENABLE "Kernel Debugger Using named pipe: COM%x (Port %p, Baud Rate %d)\n"
|
|
|
|
PUCHAR KdComPortInUse=NULL;
|
|
|
|
|
|
BOOLEAN
|
|
KdPortInitialize(
|
|
PDEBUG_PARAMETERS DebugParameters,
|
|
PLOADER_PARAMETER_BLOCK LoaderBlock,
|
|
BOOLEAN Initialize
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
This routine initialize a com port to support kernel debug.
|
|
|
|
Arguments:
|
|
|
|
DebugParameters - Supplies a pointer a structure which optionally
|
|
sepcified the debugging port information.
|
|
|
|
LoaderBlock - supplies a pointer to the loader parameter block.
|
|
|
|
Initialize - Specifies a boolean value that determines whether the
|
|
debug port is initialized or just the debug port parameters
|
|
are captured.
|
|
|
|
Returned Value:
|
|
|
|
TRUE - If a debug port is found.
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
PUCHAR PortAddress = NULL;
|
|
ULONG Com = 0;
|
|
UCHAR DebugMessage[80];
|
|
PHYSICAL_ADDRESS LPDebugParameters;
|
|
|
|
|
|
if (Initialize) {
|
|
LPDebugParameters = MmGetPhysicalAddress (DebugParameters);
|
|
if ( !SscKdInitialize( (PVOID)LPDebugParameters.QuadPart, (SSC_BOOL)Initialize )) {
|
|
|
|
// SscKd initialized sucessfully
|
|
|
|
Com = DebugParameters->CommunicationPort;
|
|
|
|
if ( Com != 0 ) { // initialize port struct if not named-pipe
|
|
//
|
|
// set port address to default value.
|
|
//
|
|
|
|
if (PortAddress == NULL) {
|
|
switch (Com) {
|
|
case 1:
|
|
PortAddress = (PUCHAR)(ULONG_PTR)0x3f8;
|
|
break;
|
|
case 2:
|
|
PortAddress = (PUCHAR)(ULONG_PTR)0x2f8;
|
|
break;
|
|
case 3:
|
|
PortAddress = (PUCHAR)(ULONG_PTR)0x3e8;
|
|
break;
|
|
case 4:
|
|
PortAddress = (PUCHAR)(ULONG_PTR)0x2e8;
|
|
}
|
|
}
|
|
|
|
KdComPortInUse= PortAddress;
|
|
|
|
sprintf(DebugMessage, MSG_DEBUG_ENABLE,
|
|
Com, PortAddress, DebugParameters->BaudRate);
|
|
HalDisplayString("\n");
|
|
HalDisplayString(DebugMessage);
|
|
}
|
|
else { // port=0, named-pipe
|
|
sprintf(DebugMessage, MSG2_DEBUG_ENABLE,
|
|
Com, PortAddress, DebugParameters->BaudRate);
|
|
HalDisplayString("\n");
|
|
HalDisplayString(DebugMessage);
|
|
}
|
|
return(TRUE);
|
|
}
|
|
else {
|
|
// SscKdinitialize() failed
|
|
return(FALSE);
|
|
}
|
|
}
|
|
else { // By pass. do not initialize
|
|
return(FALSE);
|
|
}
|
|
}
|
|
|
|
ULONG
|
|
KdPortGetByte (
|
|
OUT PUCHAR Input
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Fetch a byte from the debug port and return it.
|
|
|
|
This routine does nothing in the simulation environment.
|
|
|
|
N.B. It is assumed that the IRQL has been raised to the highest level, and
|
|
necessary multiprocessor synchronization has been performed before this
|
|
routine is called.
|
|
|
|
Arguments:
|
|
|
|
Input - Returns the data byte.
|
|
|
|
Return Value:
|
|
|
|
CP_GET_SUCCESS is returned if a byte is successfully read from the
|
|
kernel debugger line.
|
|
CP_GET_ERROR is returned if error encountered during reading.
|
|
CP_GET_NODATA is returned if timeout.
|
|
|
|
--*/
|
|
|
|
{
|
|
PHYSICAL_ADDRESS LPInput;
|
|
UCHAR DebugMessage[80];
|
|
ULONG limitcount, status;
|
|
|
|
LPInput = MmGetPhysicalAddress (Input);
|
|
limitcount = GET_RETRY_COUNT;
|
|
|
|
while (limitcount != 0) {
|
|
limitcount--;
|
|
|
|
status = SscKdPortGetByte((PVOID)LPInput.QuadPart);
|
|
if (status == CP_GET_SUCCESS) {
|
|
#ifdef KDDBG
|
|
sprintf(DebugMessage,"%02x ", *Input);
|
|
HalDisplayString(DebugMessage);
|
|
#endif
|
|
return(CP_GET_SUCCESS);
|
|
}
|
|
#ifdef KDDBG
|
|
else {
|
|
HalDisplayString(".");
|
|
}
|
|
#endif
|
|
}
|
|
return status;
|
|
}
|
|
|
|
ULONG
|
|
KdPortPollByte (
|
|
OUT PUCHAR Input
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Fetch a byte from the debug port and return it if one is available.
|
|
|
|
This routine does nothing in the simulation environment.
|
|
|
|
N.B. It is assumed that the IRQL has been raised to the highest level, and
|
|
necessary multiprocessor synchronization has been performed before this
|
|
routine is called.
|
|
|
|
Arguments:
|
|
|
|
Input - Returns the data byte.
|
|
|
|
Return Value:
|
|
|
|
CP_GET_SUCCESS is returned if a byte is successfully read from the
|
|
kernel debugger line.
|
|
CP_GET_ERROR is returned if error encountered during reading.
|
|
CP_GET_NODATA is returned if timeout.
|
|
|
|
--*/
|
|
|
|
{
|
|
PHYSICAL_ADDRESS LPInput;
|
|
UCHAR DebugMessage[80];
|
|
ULONG limitcount, status;
|
|
|
|
LPInput = MmGetPhysicalAddress (Input);
|
|
limitcount = TIMEOUT_COUNT;
|
|
|
|
while (limitcount != 0) {
|
|
limitcount--;
|
|
|
|
status = SscKdPortGetByte((PVOID)LPInput.QuadPart);
|
|
if (status == CP_GET_ERROR)
|
|
return(CP_GET_ERROR);
|
|
if (status == CP_GET_SUCCESS) {
|
|
#ifdef KDDBG
|
|
sprintf(DebugMessage, "%02x ", *Input);
|
|
HalDisplayString(DebugMessage);
|
|
#endif
|
|
return(CP_GET_SUCCESS);
|
|
}
|
|
#ifdef KDDBG
|
|
HalDisplayString(".");
|
|
#endif
|
|
}
|
|
return (CP_GET_NODATA);
|
|
}
|
|
|
|
VOID
|
|
KdPortPutByte (
|
|
IN UCHAR Output
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Write a byte to the debug port.
|
|
|
|
This routine does nothing in the simulation environment.
|
|
|
|
N.B. It is assumed that the IRQL has been raised to the highest level, and
|
|
necessary multiprocessor synchronization has been performed before this
|
|
routine is called.
|
|
|
|
Arguments:
|
|
|
|
Output - Supplies the output data byte.
|
|
|
|
Return Value:
|
|
|
|
None.
|
|
|
|
--*/
|
|
|
|
{
|
|
#ifdef KDDBG
|
|
UCHAR DebugMessage[80];
|
|
|
|
sprintf(DebugMessage, "%02x-", Output);
|
|
HalDisplayString(DebugMessage);
|
|
#endif
|
|
SscKdPortPutByte(Output);
|
|
}
|
|
|
|
VOID
|
|
KdPortRestore (
|
|
VOID
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
This routine does nothing in the simulation environment.
|
|
|
|
N.B. It is assumed that the IRQL has been raised to the highest level, and
|
|
necessary multiprocessor synchronization has been performed before this
|
|
routine is called.
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Value:
|
|
|
|
None.
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
}
|
|
|
|
VOID
|
|
KdPortSave (
|
|
VOID
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
This routine does nothing in the simulation environment.
|
|
|
|
N.B. It is assumed that the IRQL has been raised to the highest level, and
|
|
necessary multiprocessor synchronization has been performed before this
|
|
routine is called.
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Value:
|
|
|
|
None.
|
|
|
|
--*/
|
|
|
|
{
|
|
|
|
}
|