490 lines
15 KiB
C
490 lines
15 KiB
C
|
/****************************************************************************\
|
||
|
|
|
||
|
|
LOG.C / OPK Library (OPKLIB.LIB)
|
||
|
|
|
||
|
|
Microsoft Confidential
|
||
|
|
Copyright (c) Microsoft Corporation 1999
|
||
|
|
All rights reserved
|
||
|
|
|
||
|
|
Logging API source file for use in the OPK tools.
|
||
|
|
|
||
|
|
08/00 - Jason Cohen (JCOHEN)
|
||
|
|
Added this new source file to Whistler for common logging
|
||
|
|
functionality across all the OPK tools.
|
||
|
|
|
||
|
|
\****************************************************************************/
|
||
|
|
|
||
|
|
|
||
|
|
//
|
||
|
|
// Include File(s):
|
||
|
|
//
|
||
|
|
|
||
|
|
#include <pch.h>
|
||
|
|
#include <stdio.h>
|
||
|
|
|
||
|
|
|
||
|
|
//
|
||
|
|
// Defines
|
||
|
|
//
|
||
|
|
|
||
|
|
#ifdef CHR_NEWLINE
|
||
|
|
#undef CHR_NEWLINE
|
||
|
|
#endif // CHR_NEWLINE
|
||
|
|
#define CHR_NEWLINE _T('\n')
|
||
|
|
|
||
|
|
|
||
|
|
#ifdef CHR_CR
|
||
|
|
#undef CHR_CR
|
||
|
|
#endif // CHR_CR
|
||
|
|
#define CHR_CR _T('\r')
|
||
|
|
|
||
|
|
|
||
|
|
// Global logging info handle.
|
||
|
|
//
|
||
|
|
PLOG_INFO g_pLogInfo = NULL;
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
//
|
||
|
|
// Exported Function(s):
|
||
|
|
//
|
||
|
|
|
||
|
|
INT LogFileLst(LPCTSTR lpFileName, LPTSTR lpFormat, va_list lpArgs)
|
||
|
|
{
|
||
|
|
INT iChars = 0;
|
||
|
|
HANDLE hFile;
|
||
|
|
|
||
|
|
// Make sure we have the required params and can create the file.
|
||
|
|
//
|
||
|
|
if ( ( lpFileName && lpFileName[0] && lpFormat ) &&
|
||
|
|
( hFile = _tfopen(lpFileName, _T("a")) ) )
|
||
|
|
{
|
||
|
|
// Print the debug message to the end of the file.
|
||
|
|
//
|
||
|
|
iChars = _vftprintf(hFile, lpFormat, lpArgs);
|
||
|
|
|
||
|
|
// Close the handle to the file.
|
||
|
|
//
|
||
|
|
fclose(hFile);
|
||
|
|
}
|
||
|
|
|
||
|
|
// Return the number of chars written from the printf call.
|
||
|
|
//
|
||
|
|
return iChars;
|
||
|
|
}
|
||
|
|
|
||
|
|
INT LogFileStr(LPCTSTR lpFileName, LPTSTR lpFormat, ...)
|
||
|
|
{
|
||
|
|
va_list lpArgs;
|
||
|
|
|
||
|
|
// Initialize the lpArgs parameter with va_start().
|
||
|
|
//
|
||
|
|
va_start(lpArgs, lpFormat);
|
||
|
|
|
||
|
|
// Return the return value of the MessageBox() call. If there was a memory
|
||
|
|
// error, 0 will be returned. This is all
|
||
|
|
//
|
||
|
|
return LogFileLst(lpFileName, lpFormat, lpArgs);
|
||
|
|
}
|
||
|
|
|
||
|
|
INT LogFile(LPCTSTR lpFileName, UINT uFormat, ...)
|
||
|
|
{
|
||
|
|
va_list lpArgs;
|
||
|
|
INT nReturn;
|
||
|
|
LPTSTR lpFormat = NULL;
|
||
|
|
|
||
|
|
// Initialize the lpArgs parameter with va_start().
|
||
|
|
//
|
||
|
|
va_start(lpArgs, uFormat);
|
||
|
|
|
||
|
|
// Get the format and caption strings from the resource.
|
||
|
|
//
|
||
|
|
if ( uFormat )
|
||
|
|
lpFormat = AllocateString(NULL, uFormat);
|
||
|
|
|
||
|
|
// Return the return value of the MessageBox() call. If there was a memory
|
||
|
|
// error, 0 will be returned.
|
||
|
|
//
|
||
|
|
nReturn = LogFileLst(lpFileName, lpFormat, lpArgs);
|
||
|
|
|
||
|
|
// Free the format and caption strings.
|
||
|
|
//
|
||
|
|
FREE(lpFormat);
|
||
|
|
|
||
|
|
// Return the value saved from the previous function call.
|
||
|
|
//
|
||
|
|
return nReturn;
|
||
|
|
}
|
||
|
|
|
||
|
|
//
|
||
|
|
// Function Implementations
|
||
|
|
//
|
||
|
|
|
||
|
|
|
||
|
|
/*++
|
||
|
|
|
||
|
|
Routine Description:
|
||
|
|
|
||
|
|
This routine ckecks the specified ini file for settings for logging. Logging
|
||
|
|
is enabled by default if nothing is specified in the ini file.
|
||
|
|
Disables logging by setting pLogInfo->szLogFile = NULL.
|
||
|
|
|
||
|
|
Arguments:
|
||
|
|
|
||
|
|
None.
|
||
|
|
|
||
|
|
Return Value:
|
||
|
|
|
||
|
|
None.
|
||
|
|
|
||
|
|
--*/
|
||
|
|
|
||
|
|
BOOL OpkInitLogging(LPTSTR lpszIniPath, LPTSTR lpAppName)
|
||
|
|
{
|
||
|
|
TCHAR szScratch[MAX_PATH] = NULLSTR;
|
||
|
|
LPTSTR lpszScratch;
|
||
|
|
BOOL bWinbom = ( lpszIniPath && *lpszIniPath );
|
||
|
|
PLOG_INFO pLogInfo = NULL;
|
||
|
|
|
||
|
|
pLogInfo = MALLOC(sizeof(LOG_INFO));
|
||
|
|
|
||
|
|
if ( NULL == pLogInfo )
|
||
|
|
{
|
||
|
|
return FALSE;
|
||
|
|
}
|
||
|
|
|
||
|
|
if ( lpAppName )
|
||
|
|
{
|
||
|
|
pLogInfo->lpAppName = MALLOC((lstrlen(lpAppName) + 1) * sizeof(TCHAR));
|
||
|
|
lstrcpy(pLogInfo->lpAppName, lpAppName);
|
||
|
|
}
|
||
|
|
|
||
|
|
// First check if logging is disabled in the WinBOM.
|
||
|
|
//
|
||
|
|
if ( ( bWinbom ) &&
|
||
|
|
( GetPrivateProfileString(INI_SEC_LOGGING, INI_KEY_LOGGING, _T("YES"), szScratch, AS(szScratch), lpszIniPath) ) &&
|
||
|
|
( LSTRCMPI(szScratch, INI_VAL_NO) == 0 ) )
|
||
|
|
{
|
||
|
|
// FREE macro sets pLogInfo to NULL.
|
||
|
|
FREE(pLogInfo->lpAppName);
|
||
|
|
FREE(pLogInfo);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
// All these checks can only be done if we have a winbom.
|
||
|
|
//
|
||
|
|
if ( bWinbom )
|
||
|
|
{
|
||
|
|
// Check for quiet mode. If we are in quiet mode don't display any MessageBoxes.
|
||
|
|
//
|
||
|
|
if ( ( GetPrivateProfileString(INI_SEC_LOGGING, INI_KEY_QUIET, NULLSTR, szScratch, AS(szScratch), lpszIniPath) ) &&
|
||
|
|
( 0 == LSTRCMPI(szScratch, INI_VAL_YES) )
|
||
|
|
)
|
||
|
|
{
|
||
|
|
SET_FLAG(pLogInfo->dwLogFlags, LOG_FLAG_QUIET_MODE);
|
||
|
|
}
|
||
|
|
|
||
|
|
/* // See if they want to turn on perf logging.
|
||
|
|
//
|
||
|
|
szScratch[0] = NULLCHR;
|
||
|
|
if ( ( GetPrivateProfileString(WBOM_FACTORY_SECTION, INI_KEY_WBOM_LOGPERF, NULLSTR, szScratch, AS(szScratch), lpszIniPath) ) &&
|
||
|
|
( 0 == lstrcmpi(szScratch, WBOM_YES) ) )
|
||
|
|
{
|
||
|
|
SET_FLAG(pLogInfo->dwLogFlags, FLAG_LOG_PERF);
|
||
|
|
}
|
||
|
|
*/
|
||
|
|
// Set the logging level.
|
||
|
|
//
|
||
|
|
pLogInfo->dwLogLevel = (DWORD) GetPrivateProfileInt(INI_SEC_LOGGING, INI_KEY_LOGLEVEL, (DWORD) pLogInfo->dwLogLevel, lpszIniPath);
|
||
|
|
}
|
||
|
|
|
||
|
|
#ifndef DBG
|
||
|
|
if ( pLogInfo->dwLogLevel >= LOG_DEBUG )
|
||
|
|
pLogInfo->dwLogLevel = LOG_DEBUG - 1;
|
||
|
|
#endif
|
||
|
|
|
||
|
|
// Check to see if they have a custom log file they want to use.
|
||
|
|
//
|
||
|
|
if ( ( bWinbom ) &&
|
||
|
|
( lpszScratch = IniGetExpand(lpszIniPath, INI_SEC_LOGGING, INI_KEY_LOGFILE, NULL) ) )
|
||
|
|
{
|
||
|
|
TCHAR szFullPath[MAX_PATH] = NULLSTR;
|
||
|
|
LPTSTR lpFind = NULL;
|
||
|
|
|
||
|
|
// Turn the ini key into a full path.
|
||
|
|
//
|
||
|
|
|
||
|
|
// NTRAID#NTBUG9-551266-2002/03/27-acosma,robertko - Buffer overrun possibility.
|
||
|
|
//
|
||
|
|
lstrcpy(pLogInfo->szLogFile, lpszScratch);
|
||
|
|
if (GetFullPathName(pLogInfo->szLogFile, AS(szFullPath), szFullPath, &lpFind) && szFullPath[0] && lpFind)
|
||
|
|
{
|
||
|
|
// Copy the full path into the global.
|
||
|
|
//
|
||
|
|
lstrcpyn(pLogInfo->szLogFile, szFullPath, AS(pLogInfo->szLogFile));
|
||
|
|
|
||
|
|
// Chop off the file part so we can create the
|
||
|
|
// path if it doesn't exist.
|
||
|
|
//
|
||
|
|
*lpFind = NULLCHR;
|
||
|
|
|
||
|
|
// If the directory cannot be created or doesn't exist turn off logging.
|
||
|
|
//
|
||
|
|
if (!CreatePath(szFullPath))
|
||
|
|
pLogInfo->szLogFile[0] = NULLCHR;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Free the original path buffer from the ini file.
|
||
|
|
//
|
||
|
|
FREE(lpszScratch);
|
||
|
|
}
|
||
|
|
else // default case
|
||
|
|
{
|
||
|
|
// Create it in the current directory.
|
||
|
|
//
|
||
|
|
GetCurrentDirectory(AS(pLogInfo->szLogFile), pLogInfo->szLogFile);
|
||
|
|
|
||
|
|
// NTRAID#NTBUG9-551266-2002/03/27-acosma - Buffer overrun possibility.
|
||
|
|
//
|
||
|
|
AddPath(pLogInfo->szLogFile, _T("logfile.txt"));
|
||
|
|
}
|
||
|
|
|
||
|
|
// Check to see if we have write access to the logfile. If we don't turn off logging.
|
||
|
|
// If we're running in WinPE we'll call this function again once the drive becomes
|
||
|
|
// writable.
|
||
|
|
//
|
||
|
|
// Write an FFFE header to the file to identify this as a Unicode text file.
|
||
|
|
//
|
||
|
|
if ( pLogInfo->szLogFile[0] )
|
||
|
|
{
|
||
|
|
HANDLE hFile;
|
||
|
|
DWORD dwWritten = 0;
|
||
|
|
WCHAR cHeader = 0xFEFF;
|
||
|
|
|
||
|
|
SetLastError(ERROR_SUCCESS);
|
||
|
|
|
||
|
|
if ( INVALID_HANDLE_VALUE != (hFile = CreateFile(pLogInfo->szLogFile, GENERIC_WRITE, FILE_SHARE_READ, NULL, OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL)))
|
||
|
|
{
|
||
|
|
if ( ERROR_ALREADY_EXISTS != GetLastError() )
|
||
|
|
WriteFile(hFile, &cHeader, sizeof(cHeader), &dwWritten, NULL);
|
||
|
|
CloseHandle(hFile);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{ // There was a problem opening the file. Most of the time this means that the media is not writable.
|
||
|
|
// Disable logging in that case. Macro sets variable to NULL.
|
||
|
|
//
|
||
|
|
FREE(pLogInfo->lpAppName);
|
||
|
|
FREE(pLogInfo);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
g_pLogInfo = pLogInfo;
|
||
|
|
return TRUE;
|
||
|
|
}
|
||
|
|
|
||
|
|
// NTRAID#NTBUG9-551266-2002/03/27-acosma,robertko - Buffer overrun possibilities in this function. Use strsafe functions.
|
||
|
|
//
|
||
|
|
DWORD OpkLogFileLst(PLOG_INFO pLogInfo, DWORD dwLogOpt, LPTSTR lpFormat, va_list lpArgs)
|
||
|
|
{
|
||
|
|
LPTSTR lpPreOut = NULL;
|
||
|
|
LPTSTR lpOut = NULL;
|
||
|
|
DWORD dwSize = 1024;
|
||
|
|
TCHAR szPreLog[MAX_PATH] = NULLSTR;
|
||
|
|
HANDLE hFile;
|
||
|
|
DWORD dwWritten = 0;
|
||
|
|
DWORD cbAppName = 0;
|
||
|
|
DWORD dwLogLevel = (DWORD) (dwLogOpt & LOG_LEVEL_MASK);
|
||
|
|
|
||
|
|
|
||
|
|
if ( ( dwLogLevel <= pLogInfo->dwLogLevel) && lpFormat )
|
||
|
|
{
|
||
|
|
// Build the output string.
|
||
|
|
//
|
||
|
|
if ( pLogInfo->lpAppName )
|
||
|
|
{
|
||
|
|
// Create the prefix string
|
||
|
|
//
|
||
|
|
lstrcpy(szPreLog, pLogInfo->lpAppName);
|
||
|
|
lstrcat(szPreLog, _T("::"));
|
||
|
|
}
|
||
|
|
|
||
|
|
// This is for skipping the App Name prefix when printing to the log file
|
||
|
|
//
|
||
|
|
cbAppName = lstrlen(szPreLog);
|
||
|
|
|
||
|
|
if ( GET_FLAG(dwLogOpt, LOG_ERR) )
|
||
|
|
{
|
||
|
|
if ( 0 == dwLogLevel )
|
||
|
|
lstrcat(szPreLog, _T("ERROR: "));
|
||
|
|
else
|
||
|
|
swprintf(szPreLog + cbAppName, _T("WARN%d: "), dwLogLevel);
|
||
|
|
}
|
||
|
|
|
||
|
|
if ( GET_FLAG(dwLogOpt, LOG_TIME) )
|
||
|
|
{
|
||
|
|
TCHAR szTime[100] = NULLSTR;
|
||
|
|
|
||
|
|
GetTimeFormat(LOCALE_SYSTEM_DEFAULT, TIME_FORCE24HOURFORMAT, NULL, _T("'['HH':'mm':'ss'] '"), szTime, AS(szTime));
|
||
|
|
lstrcat(szPreLog, szTime);
|
||
|
|
}
|
||
|
|
|
||
|
|
// Replace all the parameters in the Error string. Allocate more memory if necessary.
|
||
|
|
// In case something goes seriously wrong here, cap memory allocation at 1 megabyte.
|
||
|
|
//
|
||
|
|
for ( lpPreOut = (LPTSTR) MALLOC((dwSize) * sizeof(TCHAR));
|
||
|
|
lpPreOut && ( -1 == _vsnwprintf(lpPreOut, dwSize, lpFormat, lpArgs)) && dwSize < (1024 * 1024);
|
||
|
|
FREE(lpPreOut), lpPreOut = (LPTSTR) MALLOC((dwSize *= 2) * sizeof(TCHAR))
|
||
|
|
);
|
||
|
|
|
||
|
|
//
|
||
|
|
// We now have the Error string and the prefix string. Copy this to the final
|
||
|
|
// string that we need to output.
|
||
|
|
//
|
||
|
|
|
||
|
|
if ( lpPreOut )
|
||
|
|
{
|
||
|
|
|
||
|
|
// Allocate another string that will be the final output string.
|
||
|
|
// We need 1 extra TCHAR for NULL terminator and 2 extra for
|
||
|
|
// an optional NewLine + Linefeed TCHAR pair that may be added.
|
||
|
|
//
|
||
|
|
dwSize = lstrlen(szPreLog) + lstrlen(lpPreOut) + 3;
|
||
|
|
lpOut = (LPTSTR) MALLOC( (dwSize) * sizeof(TCHAR) );
|
||
|
|
|
||
|
|
if ( lpOut )
|
||
|
|
{
|
||
|
|
lstrcpy(lpOut, szPreLog);
|
||
|
|
lstrcat(lpOut, lpPreOut);
|
||
|
|
|
||
|
|
// Make sure that string is terminated by NewLine unless the caller doesn't want to.
|
||
|
|
//
|
||
|
|
if ( !GET_FLAG(dwLogOpt, LOG_NO_NL) )
|
||
|
|
{
|
||
|
|
LPTSTR lpNL = lpOut;
|
||
|
|
TCHAR szCRLF[] = _T("\r\n");
|
||
|
|
BOOL bStringOk = FALSE;
|
||
|
|
|
||
|
|
// Find the end of the string.
|
||
|
|
//
|
||
|
|
lpNL = lpNL + lstrlen(lpNL);
|
||
|
|
|
||
|
|
// Make sure the string is terminated by "\r\n".
|
||
|
|
//
|
||
|
|
// There are three cases here:
|
||
|
|
// 1. The string is already terminated by \r\n. Leave it alone.
|
||
|
|
// 2. String is terminated by \n. Replace \n with \r\n.
|
||
|
|
// 3. String is not terminated by anything. Append string with \r\n.
|
||
|
|
//
|
||
|
|
|
||
|
|
if ( CHR_NEWLINE == *(lpNL = (CharPrev(lpOut, lpNL))) )
|
||
|
|
{
|
||
|
|
if ( CHR_CR != *(CharPrev(lpOut, lpNL)) )
|
||
|
|
{
|
||
|
|
*(lpNL) = NULLCHR;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
bStringOk = TRUE;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
// If there is a need to, fix up the string
|
||
|
|
//
|
||
|
|
if ( !bStringOk )
|
||
|
|
{
|
||
|
|
lstrcat( lpOut, szCRLF );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
// Write the error to the file and close the file.
|
||
|
|
// Skip the "AppName::" at the beginning of the string when printing to the file.
|
||
|
|
//
|
||
|
|
if ( pLogInfo->szLogFile[0] &&
|
||
|
|
( INVALID_HANDLE_VALUE != (hFile = CreateFile(pLogInfo->szLogFile, GENERIC_WRITE, FILE_SHARE_READ, NULL, OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL)))
|
||
|
|
)
|
||
|
|
{
|
||
|
|
if ( INVALID_SET_FILE_POINTER != SetFilePointer(hFile, 0, 0, FILE_END) )
|
||
|
|
{
|
||
|
|
WriteFile(hFile, (lpOut + cbAppName), lstrlen(lpOut + cbAppName) * sizeof(TCHAR), &dwWritten, NULL);
|
||
|
|
}
|
||
|
|
CloseHandle(hFile);
|
||
|
|
}
|
||
|
|
|
||
|
|
// Output the string to the debugger and free it.
|
||
|
|
//
|
||
|
|
OutputDebugString(lpOut);
|
||
|
|
FREE(lpOut);
|
||
|
|
}
|
||
|
|
|
||
|
|
// Put up the MessageBox if specified. This only allows message boxes
|
||
|
|
// to be log level 0.
|
||
|
|
//
|
||
|
|
if ( !GET_FLAG(pLogInfo->dwLogFlags, LOG_FLAG_QUIET_MODE) &&
|
||
|
|
GET_FLAG(dwLogOpt, LOG_MSG_BOX) &&
|
||
|
|
(0 == dwLogLevel)
|
||
|
|
)
|
||
|
|
MessageBox(NULL, lpPreOut, pLogInfo->lpAppName, MB_OK | MB_SYSTEMMODAL |
|
||
|
|
(GET_FLAG(dwLogOpt, LOG_ERR) ? MB_ICONERROR : MB_ICONWARNING) );
|
||
|
|
|
||
|
|
// Free the error string
|
||
|
|
//
|
||
|
|
FREE(lpPreOut);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
// Return the number of bytes written to the file.
|
||
|
|
//
|
||
|
|
return dwWritten;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
DWORD OpkLogFile(DWORD dwLogOpt, UINT uFormat, ...)
|
||
|
|
{
|
||
|
|
va_list lpArgs;
|
||
|
|
DWORD dwWritten = 0;
|
||
|
|
LPTSTR lpFormat = NULL;
|
||
|
|
|
||
|
|
if ( g_pLogInfo )
|
||
|
|
{
|
||
|
|
|
||
|
|
// Initialize the lpArgs parameter with va_start().
|
||
|
|
//
|
||
|
|
va_start(lpArgs, uFormat);
|
||
|
|
|
||
|
|
if ( lpFormat = AllocateString(NULL, uFormat) )
|
||
|
|
{
|
||
|
|
dwWritten = OpkLogFileLst(g_pLogInfo, dwLogOpt, lpFormat, lpArgs);
|
||
|
|
}
|
||
|
|
|
||
|
|
// Free the format string.
|
||
|
|
//
|
||
|
|
FREE(lpFormat);
|
||
|
|
}
|
||
|
|
|
||
|
|
// Return the value saved from the previous function call.
|
||
|
|
//
|
||
|
|
return dwWritten;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
DWORD OpkLogFileStr(DWORD dwLogOpt, LPTSTR lpFormat, ...)
|
||
|
|
{
|
||
|
|
va_list lpArgs;
|
||
|
|
DWORD dwWritten = 0;
|
||
|
|
|
||
|
|
if ( g_pLogInfo )
|
||
|
|
{
|
||
|
|
// Initialize the lpArgs parameter with va_start().
|
||
|
|
//
|
||
|
|
va_start(lpArgs, lpFormat);
|
||
|
|
|
||
|
|
dwWritten = OpkLogFileLst(g_pLogInfo, dwLogOpt, lpFormat, lpArgs);
|
||
|
|
}
|
||
|
|
|
||
|
|
// Return the value saved from the previous function call.
|
||
|
|
//
|
||
|
|
return dwWritten;
|
||
|
|
}
|