Leaked source code of windows server 2003
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.
 
 
 
 
 
 

760 lines
20 KiB

/*++
Copyright (c) 1996 Microsoft Corporation
Module Name:
Abstract:
Author:
Revision History:
--*/
#include "precomp.h"
#pragma hdrstop
HANDLE hDebugLog;
Winnt32DebugLevel DebugLevel;
BOOL
StartDebugLog(
IN LPCTSTR DebugFileLog,
IN Winnt32DebugLevel Level
)
/*++
Routine Description:
Create a file to be used for logging debugging information.
Note: There can be only one debug log. Second and subsequent
calls to this routine return TRUE if a debug log is already in use.
Arguments:
DebugFileLog - supplies filename of file to be used for debugging log.
Level - supplies logging level desired.
Return Value:
Boolean value indicating whether the file log was successfully started.
--*/
{
DWORD Written;
TCHAR Text[512];
if(hDebugLog) {
return(TRUE);
}
if(Level > Winnt32LogMax) {
Level = Winnt32LogMax;
}
DebugLevel = Level;
hDebugLog = CreateFile(
DebugFileLog,
GENERIC_WRITE,
FILE_SHARE_READ,
NULL,
Winnt32Restarted () ? OPEN_ALWAYS : CREATE_ALWAYS,
FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN,
NULL
);
if(hDebugLog == INVALID_HANDLE_VALUE) {
hDebugLog = NULL;
return(FALSE);
}
if(GetLastError() == ERROR_ALREADY_EXISTS) {
//
// Appending to existing file
//
SetFilePointer(hDebugLog,0,NULL,FILE_END);
if (LoadString( hInst, IDS_COMPAT_DIVIDER, Text, sizeof(Text)/sizeof(TCHAR))) {
DebugLog(
Winnt32LogMax,
Text,
0
);
}
}
if( CheckUpgradeOnly ) {
if (LoadString( hInst, IDS_COMPAT_DIVIDER, Text, sizeof(Text)/sizeof(TCHAR))) {
DebugLog( Winnt32LogInformation,
Text,
0 );
}
if (LoadString( hInst, IDS_APPTITLE_CHECKUPGRADE, Text, sizeof(Text)/sizeof(TCHAR))) {
DebugLog( Winnt32LogInformation,
Text,
0 );
}
if (LoadString( hInst, IDS_COMPAT_DIVIDER, Text, sizeof(Text)/sizeof(TCHAR))) {
DebugLog( Winnt32LogInformation,
Text,
0 );
}
}
return(TRUE);
}
VOID
CloseDebugLog(
VOID
)
/*++
Routine Description:
Close the logging file.
Arguments:
Return Value:
--*/
{
if( hDebugLog ) {
CloseHandle( hDebugLog );
}
}
BOOL
DebugLog(
IN Winnt32DebugLevel Level,
IN LPCTSTR Text, OPTIONAL
IN UINT MessageId,
...
)
/*++
Routine Description:
Write some text into the debug log file, if there is one.
Arguments:
Level - supplies the logging level for this log event. Only items
with a level greater than or equal to the one specified by the user
are actually logged.
Text - if specified, supplies the format string for the text message
to go into the log file. If not specified, MessageId must be.
MessageId - if Text is not specified, supplies the message id for the
item in the message table that has the text of the item to be
written into the log file.
Additional arguments supply insertion values for the message.
Return Value:
--*/
{
va_list arglist;
BOOL b;
va_start(arglist,MessageId);
b = DebugLog2 (Level, Text, MessageId, arglist);
va_end(arglist);
return b;
}
BOOL
DebugLog2(
IN Winnt32DebugLevel Level,
IN LPCTSTR Text, OPTIONAL
IN UINT MessageId,
IN va_list ArgList
)
/*++
Routine Description:
Write some text into the debug log file, if there is one.
Arguments:
Level - supplies the logging level for this log event. Only items
with a level greater than or equal to the one specified by the user
are actually logged.
Text - if specified, supplies the format string for the text message
to go into the log file. If not specified, MessageId must be.
MessageId - if Text is not specified, supplies the message id for the
item in the message table that has the text of the item to be
written into the log file.
Additional arguments supply insertion values for the message.
Return Value:
--*/
{
CHAR AnsiMessage[5000];
DWORD Size;
DWORD Written;
LPCTSTR Message;
BOOL b;
DWORD rc;
if(!hDebugLog) {
return(FALSE);
}
if((Level & ~WINNT32_HARDWARE_LOG) > DebugLevel) {
return(TRUE);
}
rc = GetLastError ();
if(Text) {
Size = FormatMessage(
FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_STRING,
Text,
0,0,
(LPTSTR)&Message,
0,
&ArgList
);
} else {
Size = FormatMessage(
FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_HMODULE,
hInst,
MessageId,
0,
(LPTSTR)&Message,
0,
&ArgList
);
}
if(Size) {
#ifdef UNICODE
if (WideCharToMultiByte(
CP_ACP,
0,
Message,
-1,
AnsiMessage,
ARRAYSIZE(AnsiMessage) - 1,
NULL,
NULL
)) {
AnsiMessage[ARRAYSIZE(AnsiMessage) - 1] = 0;
} else {
AnsiMessage[0] = 0;
}
#else
StringCchCopyA(AnsiMessage,sizeof(AnsiMessage),Message);
#endif
b = WriteFile(hDebugLog,AnsiMessage,lstrlenA(AnsiMessage),&Written,NULL);
if ((Level & WINNT32_HARDWARE_LOG) == 0) {
if (Text && b) {
if (Level <= Winnt32LogError && rc) {
CHAR buffer[50];
b = WriteFile(
hDebugLog,
buffer,
wsprintfA (buffer, " (rc=%u[0x%X])", rc, rc),
&Written,
NULL
);
}
b = WriteFile(hDebugLog,"\r\n", 2, &Written,NULL);
}
}
LocalFree((HLOCAL)Message);
} else {
b = FALSE;
}
SetLastError (rc);
return(b);
}
#if ASSERTS_ON
VOID
AssertFail(
IN PSTR FileName,
IN UINT LineNumber,
IN PSTR Condition
)
{
int i;
CHAR Name[MAX_PATH];
PCHAR p;
CHAR Msg[4096];
//
// Use dll name as caption
//
GetModuleFileNameA(hInst,Name,MAX_PATH);
Name[ARRAYSIZE(Name) - 1] = 0;
if(p = strrchr(Name,'\\')) {
p++;
} else {
p = Name;
}
StringCchPrintfA(
Msg,
ARRAYSIZE(Msg),
"Assertion failure at line %u in file %s: %s\n\nCall DebugBreak()?",
LineNumber,
FileName,
Condition
);
i = MessageBoxA(
NULL,
Msg,
p,
MB_YESNO | MB_TASKMODAL | MB_ICONSTOP | MB_SETFOREGROUND
);
if(i == IDYES) {
DebugBreak();
}
}
#endif
VOID
MyEnumerateDirectory(
LPTSTR DirectoryName,
DWORD Index,
BOOL Recordable
)
/*++
Routine Description:
This routine will enumerate all files in a directory structure.
It then prints those filenames into the debug logfile.
Arguments:
DirectoryName Name of the directory we're currently examining.
Index Indicates our recurse-level. Used for formatting
the output.
Recordable This determines if we will be logging this item
or not. Some items we don't care about.
Return Value:
--*/
{
TCHAR TmpDirectoryString[MAX_PATH];
TCHAR TmpName[MAX_PATH];
HANDLE FindHandle;
WIN32_FIND_DATA FoundData;
DWORD i;
//
// Fix our path so we know where we're looking...
//
if( DirectoryName[0] ) {
if (FAILED(StringCchCopy(TmpDirectoryString, ARRAYSIZE(TmpDirectoryString), DirectoryName )))
{
return;
}
if( ISNT() )
{
if (!ConcatenatePaths( TmpDirectoryString, TEXT("*"), MAX_PATH ))
return;
}
else
{
if (!ConcatenatePaths( TmpDirectoryString, TEXT("*.*"), MAX_PATH ))
return;
}
} else {
if( ISNT() ) {
lstrcpy( TmpDirectoryString, TEXT("*") );
} else {
lstrcpy( TmpDirectoryString, TEXT("*.*") );
}
}
//
// Get the first item.
//
FindHandle = FindFirstFile( TmpDirectoryString, &FoundData );
if( !FindHandle || (FindHandle == INVALID_HANDLE_VALUE) ) {
//
// The directory is empty.
//
return;
}
//
// Now look at every item in the directory.
//
do {
TmpName[0] = 0;
for( i = 0; i < Index; i++ ) {
StringCchCat( TmpName, ARRAYSIZE(TmpName), TEXT(" ") );
}
if( FoundData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY ) {
//
// Directory. Ignore . and .. entries.
//
if(lstrcmp(FoundData.cFileName,TEXT("."))
&& lstrcmp(FoundData.cFileName,TEXT(".."))) {
//
// Print the entry.
//
StringCchCat( TmpName, ARRAYSIZE(TmpName), TEXT("\\") );
StringCchCat( TmpName, ARRAYSIZE(TmpName), FoundData.cFileName );
StringCchCat( TmpName, ARRAYSIZE(TmpName), TEXT("\n") );
if( ( !lstrcmpi( FoundData.cFileName, TEXT("Start Menu"))) ||
( Recordable ) ) {
Recordable = TRUE;
if( !_tcsrchr( TmpName, TEXT('%') ) ) {
DebugLog( Winnt32LogInformation,
TmpName,
0 );
}
}
//
// Call ourselves on this directory. We want to make sure that we cannot
// infinitely recurse by calling MyEnumerateDirectory on the same directory
// which occupies the entire TmpName buffer.
//
if (FAILED(StringCchCopy( TmpName, ARRAYSIZE(TmpName), DirectoryName )))
{
break;
}
if (!ConcatenatePaths( TmpName, FoundData.cFileName, MAX_PATH ))
{
break;
}
MyEnumerateDirectory( TmpName, Index+1, Recordable );
//
// If we just recursed into a Start Menu directory,
// we need to turn off recordability.
//
if( !lstrcmpi( FoundData.cFileName, TEXT("Start Menu"))) {
Recordable = FALSE;
}
}
} else {
//
// File. Just print it.
//
if( Recordable ) {
StringCchCat( TmpName, ARRAYSIZE(TmpName), FoundData.cFileName );
StringCchCat( TmpName, ARRAYSIZE(TmpName), TEXT("\n") );
if( !_tcsrchr( TmpName, TEXT('%') ) ) {
DebugLog( Winnt32LogInformation,
TmpName,
0 );
}
}
}
} while( FindNextFile( FindHandle, &FoundData ) );
CloseHandle (FindHandle);
}
VOID
GatherOtherLogFiles(
VOID
)
/*++
Routine Description:
This routine will launch winmsd in a batch-mode, then
copy it's output onto the backend of our debug log.
Arguments:
Return Value:
--*/
{
STARTUPINFO StartupInfo;
PROCESS_INFORMATION ProcessInfo;
DWORD dw,
ExitCode;
BOOL Done;
TCHAR FileName[MAX_PATH];
TCHAR ComputerName[MAX_PATH];
MSG msg;
TCHAR Text[512];
//
// If we're on Win9X, we will also want %windir%\upgrade.txt.
//
if( !ISNT() ) {
//
// %windir%\upgrade.txt
//
FileName[0] = TEXT('\0');
MyGetWindowsDirectory( FileName, MAX_PATH );
if (ConcatenatePaths( FileName, TEXT("upgrade.txt"), MAX_PATH ))
{
if( !ConcatenateFile( hDebugLog, FileName ) )
{
DebugLog( Winnt32LogInformation,
TEXT("\r\nFailed to append upgrade.txt!\r\n"),
0 );
}
}
//
// %windir%\beta-upg.log
//
FileName[0] = TEXT('\0');
MyGetWindowsDirectory( FileName, MAX_PATH );
if (ConcatenatePaths( FileName, TEXT("beta-upg.log"), MAX_PATH ))
{
if( !ConcatenateFile( hDebugLog, FileName ) ) {
DebugLog( Winnt32LogInformation,
TEXT("\r\nFailed to append beta-upg.log!\r\n"),
0 );
}
}
//
// %windir%\config.dmp
//
FileName[0] = TEXT('\0');
MyGetWindowsDirectory( FileName, MAX_PATH );
if (ConcatenatePaths( FileName, TEXT("config.dmp"), MAX_PATH ))
{
if( !ConcatenateFile( hDebugLog, FileName ) ) {
DebugLog( Winnt32LogInformation,
TEXT("\r\nFailed to append config.dmp!\r\n"),
0 );
}
}
}
#if 0
//
// remove winmsd call for now.
//
if( ISNT() && (BuildNumber > NT351) ) {
//
// If we're on NT, run winmsd and capture his
// output.
//
ZeroMemory(&StartupInfo,sizeof(StartupInfo));
StartupInfo.cb = sizeof(StartupInfo);
lstrcpy( FileName, TEXT( "winmsd.exe /a" ) );
if( CreateProcess( NULL,
FileName,
NULL,
NULL,
FALSE,
0,
NULL,
NULL,
&StartupInfo,
&ProcessInfo ) ) {
//
// Wait for him.
//
//
// Process any messages that may already be in the queue.
//
while(PeekMessage(&msg,NULL,0,0,PM_REMOVE)) {
DispatchMessage(&msg);
}
//
// Wait for process to terminate or more messages in the queue.
//
Done = FALSE;
do {
switch(MsgWaitForMultipleObjects(1,&ProcessInfo.hProcess,FALSE,INFINITE,QS_ALLINPUT)) {
case WAIT_OBJECT_0:
//
// Process has terminated.
//
dw = GetExitCodeProcess(ProcessInfo.hProcess,&ExitCode) ? NO_ERROR : GetLastError();
Done = TRUE;
break;
case WAIT_OBJECT_0+1:
//
// Messages in the queue.
//
while(PeekMessage(&msg,NULL,0,0,PM_REMOVE)) {
DispatchMessage(&msg);
}
break;
default:
//
// Error.
//
dw = GetLastError();
Done = TRUE;
break;
}
} while(!Done);
}
CloseHandle( ProcessInfo.hThread );
CloseHandle( ProcessInfo.hProcess );
if( dw == NO_ERROR ) {
//
// Concatenate him onto the end of our logfile. His
// logfile will be <computer_name>.txt and will be
// located in our directory. Map the file...
//
DebugLog( Winnt32LogInformation,
TEXT("\r\n\r\n********************************************************************\r\n\r\n"),
0 );
DebugLog( Winnt32LogInformation,
TEXT("\t\tWinMSD Log\n"),
0 );
DebugLog( Winnt32LogInformation,
TEXT("\r\n********************************************************************\r\n\r\n"),
0 );
GetCurrentDirectory( MAX_PATH, FileName );
dw = MAX_PATH;
GetComputerName( ComputerName, &dw );
ConcatenatePaths( FileName, ComputerName, MAX_PATH );
lstrcat( FileName, TEXT(".txt") );
ConcatenateFile( hDebugLog, FileName );
} else {
//
// Should we log our failure to be sneaky??
//
}
}
#endif
//
// Go enumerate the Start Menu
// for all users... Don't do this for NT 3.51.
//
if( !(ISNT() && (BuildNumber <= NT351)) ){
if (LoadString( hInst, IDS_COMPAT_DIVIDER, Text, sizeof(Text)/sizeof(TCHAR)))
{
DebugLog( Winnt32LogInformation,
Text,
0 );
}
if (LoadString( hInst, IDS_COMPAT_STRT_MENU, Text, sizeof(Text)/sizeof(TCHAR)))
{
DebugLog( Winnt32LogInformation,
Text,
0 );
}
if (LoadString( hInst, IDS_COMPAT_DIVIDER, Text, sizeof(Text)/sizeof(TCHAR)))
{
DebugLog( Winnt32LogInformation,
Text,
0 );
}
if( !ISNT() ) {
//
// On Win9X, we can find Start Menu items in
// two places!
//
MyGetWindowsDirectory( FileName, MAX_PATH );
if (ConcatenatePaths( FileName, TEXT("Start Menu"), MAX_PATH ))
{
MyEnumerateDirectory( FileName, 0, TRUE );
}
} else {
if( BuildNumber >= 1890 ) {
//
// Starting on build 1890, we moved/renamed the Profiles
// directory. Of course, that only happens on clean installs
// of these new builds. We need to see if there's anything
// in the new directory structure.
//
MyGetWindowsDirectory( FileName, MAX_PATH );
FileName[3] = 0;
if (ConcatenatePaths( FileName, TEXT("Documents and Settings"), MAX_PATH ))
{
MyEnumerateDirectory( FileName, 0, FALSE );
}
}
}
MyGetWindowsDirectory( FileName, MAX_PATH );
if (ConcatenatePaths( FileName, TEXT("Profiles"), MAX_PATH))
{
MyEnumerateDirectory( FileName, 0, FALSE );
}
}
}