321 lines
9.4 KiB
C++
321 lines
9.4 KiB
C++
|
//+-------------------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// Microsoft Windows
|
||
|
|
// Copyright (C) Microsoft Corporation, 1995
|
||
|
|
//
|
||
|
|
// File: dinfoLevel.cxx
|
||
|
|
//
|
||
|
|
// Contents: Display and/or set vaious debug info levels
|
||
|
|
//
|
||
|
|
// Functions: infoLevelHelp
|
||
|
|
// displayInfoLevel
|
||
|
|
//
|
||
|
|
//
|
||
|
|
// History: 06-01-95 BruceMa Created
|
||
|
|
//
|
||
|
|
//
|
||
|
|
//--------------------------------------------------------------------------
|
||
|
|
|
||
|
|
|
||
|
|
#include <ole2int.h>
|
||
|
|
#include <windows.h>
|
||
|
|
#include "ole.h"
|
||
|
|
#include "dinfolvl.h"
|
||
|
|
#include "debnot.h"
|
||
|
|
|
||
|
|
|
||
|
|
void getArgument(LPSTR *lpArgumentString, LPSTR a);
|
||
|
|
ULONG ScanAddr(char *lpsz);
|
||
|
|
|
||
|
|
static void initInfoLevels(PNTSD_EXTENSION_APIS lpExtensionApis);
|
||
|
|
static BOOL parseVal(char *arg, ULONG *val);
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
STable1 debFlags[NUMDEBFLAGS] = {{"error", DEB_ERROR},
|
||
|
|
{"warn", DEB_WARN},
|
||
|
|
{"trace", DEB_TRACE},
|
||
|
|
{"dbgout", DEB_DBGOUT},
|
||
|
|
{"stdout", DEB_STDOUT},
|
||
|
|
{"ierror", DEB_IERROR},
|
||
|
|
{"iwarn", DEB_IWARN},
|
||
|
|
{"itrace", DEB_ITRACE},
|
||
|
|
{"user1", DEB_USER1},
|
||
|
|
{"user2", DEB_USER2},
|
||
|
|
{"user3", DEB_USER3},
|
||
|
|
{"user4", DEB_USER4},
|
||
|
|
{"user5", DEB_USER5},
|
||
|
|
{"user6", DEB_USER6},
|
||
|
|
{"user7", DEB_USER7},
|
||
|
|
{"user8", DEB_USER8},
|
||
|
|
{"user9", DEB_USER9},
|
||
|
|
{"user10", DEB_USER10},
|
||
|
|
{"user11", DEB_USER11},
|
||
|
|
{"user12", DEB_USER12},
|
||
|
|
{"user13", DEB_USER13},
|
||
|
|
{"user14", DEB_USER14},
|
||
|
|
{"user15", DEB_USER15}};
|
||
|
|
|
||
|
|
|
||
|
|
STable2 infoLevel[NUMINFOLEVELS] = {{"com", NULL, "ole32!_CairoleInfoLevel"},
|
||
|
|
{"dd", NULL, "ole32!_DDInfoLevel"},
|
||
|
|
{"hep", NULL, "ole32!_heapInfoLevel"},
|
||
|
|
{"hk", NULL, "ole32!_hkInfoLevel"},
|
||
|
|
{"int", NULL, "ole32!_intrInfoLevel"},
|
||
|
|
{"le", NULL, "ole32!_LEInfoLevel"},
|
||
|
|
{"mem", NULL, "ole32!_memInfoLevel"},
|
||
|
|
{"mnk", NULL, "ole32!_mnkInfoLevel"},
|
||
|
|
{"msf", NULL, "ole32!_msfInfoLevel"},
|
||
|
|
{"ol", NULL, "ole32!_olInfoLevel"},
|
||
|
|
{"ref", NULL, "ole32!_RefInfoLevel"},
|
||
|
|
{"sim", NULL, "ole32!_simpInfoLevel"},
|
||
|
|
{"stk", NULL, "ole32!_StackInfoLevel"},
|
||
|
|
{"usr", NULL, "ole32!_UserNdrInfoLevel"}};
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
//+-------------------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// Function: infoLevelHelp
|
||
|
|
//
|
||
|
|
// Synopsis: Display a menu for the command 'id'
|
||
|
|
//
|
||
|
|
// Arguments: -
|
||
|
|
//
|
||
|
|
// Returns: -
|
||
|
|
//
|
||
|
|
// History: 07-Mar-95 BruceMa Created
|
||
|
|
//
|
||
|
|
//--------------------------------------------------------------------------
|
||
|
|
void infoLevelHelp(PNTSD_EXTENSION_APIS lpExtensionApis)
|
||
|
|
{
|
||
|
|
Printf("in - Display current value of all debug info levels\n");
|
||
|
|
Printf("in x - Display the current value of debug info level x\n");
|
||
|
|
Printf("in x y z ... - Set the value of debug info level x to\n");
|
||
|
|
Printf(" y | z | ... \n");
|
||
|
|
Printf("\nwhere x corresponds to:\n");
|
||
|
|
Printf(" --- --------------\n");
|
||
|
|
Printf(" com ole32!_CairoleInfoLevel\n");
|
||
|
|
Printf(" dd ole32!_DDInfoLevel\n");
|
||
|
|
Printf(" hep ole32!_heapInfoLevel\n");
|
||
|
|
Printf(" hk ole32!_hkInfoLevel\n");
|
||
|
|
Printf(" int ole32!_intrInfoLevel\n");
|
||
|
|
Printf(" le ole32!_LEInfoLevel\n");
|
||
|
|
Printf(" mem ole32!_memInfoLevel\n");
|
||
|
|
Printf(" mnk ole32!_mnkInfoLevel\n");
|
||
|
|
Printf(" msf ole32!_msfInfoLevel\n");
|
||
|
|
Printf(" ol ole32!_olInfoLevel\n");
|
||
|
|
Printf(" ref ole32!_RefInfoLevel\n");
|
||
|
|
Printf(" sim ole32!_simpInfoLevel\n");
|
||
|
|
Printf(" stk ole32!_StackInfoLevel\n");
|
||
|
|
Printf(" ndr ole32!_UserNdrInfoLevel\n");
|
||
|
|
Printf("\nand y... corresponds to:\n");
|
||
|
|
Printf(" ---- --------------\n");
|
||
|
|
Printf(" error DEB_ERROR\n");
|
||
|
|
Printf(" warn DEB_WARN\n");
|
||
|
|
Printf(" trace DEB_TRACE\n");
|
||
|
|
Printf(" dbgout DEB_DBGOUT\n");
|
||
|
|
Printf(" stdout DEB_STDOUT\n");
|
||
|
|
Printf(" ierror DEB_IERROR\n");
|
||
|
|
Printf(" iwarn DEB_IWARN\n");
|
||
|
|
Printf(" itrace DEB_ITRACE\n");
|
||
|
|
Printf(" user1 DEB_USER1\n");
|
||
|
|
Printf(" user2 DEB_USER2\n");
|
||
|
|
Printf(" user3 DEB_USER3\n");
|
||
|
|
Printf(" user4 DEB_USER4\n");
|
||
|
|
Printf(" user5 DEB_USER5\n");
|
||
|
|
Printf(" user6 DEB_USER6\n");
|
||
|
|
Printf(" user7 DEB_USER7\n");
|
||
|
|
Printf(" user8 DEB_USER8\n");
|
||
|
|
Printf(" user9 DEB_USER9\n");
|
||
|
|
Printf(" user10 DEB_USER10\n");
|
||
|
|
Printf(" user11 DEB_USER11\n");
|
||
|
|
Printf(" user12 DEB_USER12\n");
|
||
|
|
Printf(" user13 DEB_USER13\n");
|
||
|
|
Printf(" user14 DEB_USER14\n");
|
||
|
|
Printf(" user15 DEB_USER15\n");
|
||
|
|
Printf(" <hex>\n");
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
//+-------------------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// Function: displayInfoLevel
|
||
|
|
//
|
||
|
|
// Synopsis: Display/set debug info levels
|
||
|
|
//
|
||
|
|
// Arguments: [hProcess] - Handle of this process
|
||
|
|
// [lpExtensionApis] - Table of extension functions
|
||
|
|
// [char *] - Command line argument(s)
|
||
|
|
//
|
||
|
|
// Returns: -
|
||
|
|
//
|
||
|
|
// History: 07-Mar-95 BruceMa Created
|
||
|
|
//
|
||
|
|
//--------------------------------------------------------------------------
|
||
|
|
void displayInfoLevel(HANDLE hProcess,
|
||
|
|
PNTSD_EXTENSION_APIS lpExtensionApis,
|
||
|
|
LPSTR lpArgumentString)
|
||
|
|
{
|
||
|
|
Arg arg;
|
||
|
|
UINT k;
|
||
|
|
ULONG val;
|
||
|
|
ULONG argVal;
|
||
|
|
BOOL fSet = FALSE;
|
||
|
|
|
||
|
|
// Fetch the addresses for the various debug info levels
|
||
|
|
initInfoLevels(lpExtensionApis);
|
||
|
|
|
||
|
|
// Fetch the first argument
|
||
|
|
GetArg(arg);
|
||
|
|
Printf("%s %s\n", arg, lpArgumentString);
|
||
|
|
|
||
|
|
// If no argument simply display all info levels
|
||
|
|
if (!arg[0])
|
||
|
|
{
|
||
|
|
for (k = 0; k < NUMINFOLEVELS; k++)
|
||
|
|
{
|
||
|
|
ReadMem(&val, infoLevel[k].adr, sizeof(ULONG));
|
||
|
|
Printf("%s\t%08x\n", infoLevel[k].name, val);
|
||
|
|
}
|
||
|
|
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Check the info level name
|
||
|
|
for (k = 0; k < NUMINFOLEVELS; k++)
|
||
|
|
{
|
||
|
|
if (lstrcmp(arg, infoLevel[k].name) == 0)
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if (k == NUMINFOLEVELS)
|
||
|
|
{
|
||
|
|
Printf("...unknown debug info level name\n");
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Scan any values to set
|
||
|
|
val = 0;
|
||
|
|
for (GetArg(arg); *arg; GetArg(arg))
|
||
|
|
{
|
||
|
|
if (!parseVal(arg, &argVal))
|
||
|
|
{
|
||
|
|
Printf("...invalid flag expresson\n");
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
val |= argVal;
|
||
|
|
fSet = TRUE;
|
||
|
|
}
|
||
|
|
|
||
|
|
// If only an info level name, then display its value
|
||
|
|
if (!fSet)
|
||
|
|
{
|
||
|
|
ReadMem(&val, infoLevel[k].adr, sizeof(ULONG));
|
||
|
|
Printf("%s\t%08x\n", infoLevel[k].name, val);
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Otherwise we're setting an info level
|
||
|
|
WriteMem(infoLevel[k].adr, &val, sizeof(ULONG));
|
||
|
|
Printf("%s\t%08x\n", infoLevel[k].name, val);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
//+-------------------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// Function: initInfoLevels
|
||
|
|
//
|
||
|
|
// Synopsis: Find the addresses of the various infolevels
|
||
|
|
//
|
||
|
|
// Arguments: -
|
||
|
|
//
|
||
|
|
// Returns: -
|
||
|
|
//
|
||
|
|
// History: 07-Mar-95 BruceMa Created
|
||
|
|
//
|
||
|
|
//--------------------------------------------------------------------------
|
||
|
|
static void initInfoLevels(PNTSD_EXTENSION_APIS lpExtensionApis)
|
||
|
|
{
|
||
|
|
// Check whether already initialized
|
||
|
|
if (infoLevel[0].adr != NULL)
|
||
|
|
{
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Do over the info levels
|
||
|
|
for (UINT k = 0; k < NUMINFOLEVELS; k++)
|
||
|
|
{
|
||
|
|
infoLevel[k].adr = GetExpression(infoLevel[k].symbol);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
//+-------------------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// Function: parseVal
|
||
|
|
//
|
||
|
|
// Synopsis: Parse the next flag expression on the command line
|
||
|
|
//
|
||
|
|
// Arguments: [char *] - Command line
|
||
|
|
// [ULONG *] - Where to return the parsed value
|
||
|
|
//
|
||
|
|
// Returns: -
|
||
|
|
//
|
||
|
|
// History: 07-Mar-95 BruceMa Created
|
||
|
|
//
|
||
|
|
//--------------------------------------------------------------------------
|
||
|
|
static BOOL parseVal(char *arg, ULONG *val)
|
||
|
|
{
|
||
|
|
UINT k;
|
||
|
|
|
||
|
|
// Check whether it's a flag name
|
||
|
|
for (k = 0; k < NUMDEBFLAGS; k++)
|
||
|
|
{
|
||
|
|
if (lstrcmp(arg, debFlags[k].name) == 0)
|
||
|
|
{
|
||
|
|
*val = debFlags[k].flag;
|
||
|
|
return TRUE;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
// It's not so it better be hex
|
||
|
|
k = 0;
|
||
|
|
if (arg[0] == '0' && arg[1] == 'x')
|
||
|
|
{
|
||
|
|
k += 2;
|
||
|
|
}
|
||
|
|
while (arg[k])
|
||
|
|
{
|
||
|
|
if (!(('0' <= arg[k] && arg[k] <= '9') ||
|
||
|
|
('a' <= arg[k] && arg[k] <= 'f')))
|
||
|
|
{
|
||
|
|
return FALSE;
|
||
|
|
}
|
||
|
|
k++;
|
||
|
|
}
|
||
|
|
*val = ScanAddr(arg);
|
||
|
|
return TRUE;
|
||
|
|
}
|