512 lines
13 KiB
C
512 lines
13 KiB
C
/*****************************************************************************
|
|
*
|
|
* Perfmon.c - This is the WinMain module. It creates the main window and
|
|
* the threads, and contains the main MainWndProc.
|
|
*
|
|
* Microsoft Confidential
|
|
* Copyright (c) 1992-1993 Microsoft Corporation
|
|
*
|
|
* Authors -
|
|
*
|
|
* Russ Blake
|
|
* Mike Moskowitz
|
|
* Hon-Wah Chan
|
|
* Bob Watson
|
|
*
|
|
****************************************************************************/
|
|
|
|
|
|
//==========================================================================//
|
|
// Includes //
|
|
//==========================================================================//
|
|
#undef NOSYSCOMMANDS
|
|
|
|
// DEFINE_GLOBALS will define all the globals listed in globals.h
|
|
#define DEFINE_GLOBALS
|
|
|
|
#include "perfmon.h"
|
|
#include <commctrl.h> // for tool tip & tool bar definitions
|
|
#include <stdio.h> // just for now
|
|
#include "command.h"
|
|
|
|
#include "graph.h"
|
|
#include "log.h"
|
|
#include "alert.h"
|
|
#include "report.h" // for CreateReportWindow
|
|
#include "legend.h"
|
|
#include "init.h"
|
|
#include "perfmops.h"
|
|
#include "toolbar.h" // for CreateToolbar
|
|
#include "status.h" // for CreatePMStatusWindow
|
|
#include "utils.h"
|
|
|
|
#include "fileopen.h" // for FileOpen
|
|
|
|
|
|
#define dwToolbarStyle (WS_CHILD | WS_VISIBLE | TBS_NOCAPTION)
|
|
|
|
extern TCHAR szInternational[] ;
|
|
|
|
//==========================================================================//
|
|
// Message Handlers //
|
|
//==========================================================================//
|
|
|
|
void static OnSize (HWND hWnd,
|
|
WORD xWidth,
|
|
WORD yHeight)
|
|
/*
|
|
Effect: Perform any actions needed when the main window is
|
|
resized. In particular, size the four data windows,
|
|
only one of which is visible right now.
|
|
*/
|
|
{ // OnSize
|
|
SizePerfmonComponents () ;
|
|
}
|
|
|
|
|
|
void static OnCreate (HWND hWnd)
|
|
/*
|
|
Effect: Perform all actions needed when the main window is
|
|
created. In particular, create the three data windows,
|
|
and show one of them.
|
|
|
|
To Do: Check for proper creation. If not possible, we will
|
|
need to abort creation of the program.
|
|
|
|
Called By: MainWndProc only, in response to a WM_CREATE message.
|
|
*/
|
|
{ // OnCreate
|
|
hWndGraph = CreateGraphWindow (hWnd) ;
|
|
|
|
#ifdef ADVANCED_PERFMON
|
|
hWndLog = CreateLogWindow (hWnd) ;
|
|
hWndAlert = CreateAlertWindow (hWnd) ;
|
|
hWndReport = CreateReportWindow (hWnd) ;
|
|
#endif
|
|
|
|
hWndStatus = CreatePMStatusWindow (hWnd) ;
|
|
|
|
CreateToolbarWnd (hWnd) ;
|
|
MinimumSize += WindowHeight (hWndToolbar) ;
|
|
|
|
Options.bMenubar = TRUE ;
|
|
Options.bToolbar = TRUE ;
|
|
Options.bStatusbar = TRUE;
|
|
Options.bAlwaysOnTop = FALSE ;
|
|
|
|
// initialize to chart view - HWC
|
|
iPerfmonView = IDM_VIEWCHART;
|
|
|
|
|
|
ShowWindow (PerfmonViewWindow (), SW_SHOWNORMAL) ;
|
|
} // OnCreate
|
|
|
|
|
|
|
|
//==========================================================================//
|
|
// Exported Functions //
|
|
//==========================================================================//
|
|
|
|
void MenuBarHit (DWORD wParam)
|
|
{
|
|
if (wParam == MENUCLOSING)
|
|
{
|
|
StatusLineReady (hWndStatus) ;
|
|
dwCurrentMenuID = 0 ;
|
|
}
|
|
else if (HIWORD(wParam) & MF_SYSMENU)
|
|
{
|
|
WORD SystemMenuItem = 0 ;
|
|
switch (LOWORD (wParam))
|
|
{
|
|
case SC_RESTORE:
|
|
SystemMenuItem = IDM_SYSTEMRESTORE ;
|
|
break ;
|
|
|
|
case SC_SIZE:
|
|
SystemMenuItem = IDM_SYSTEMSIZE ;
|
|
break ;
|
|
|
|
case SC_MOVE:
|
|
SystemMenuItem = IDM_SYSTEMMOVE ;
|
|
break ;
|
|
|
|
case SC_MINIMIZE:
|
|
SystemMenuItem = IDM_SYSTEMMINIMIZE ;
|
|
break ;
|
|
|
|
case SC_MAXIMIZE:
|
|
SystemMenuItem = IDM_SYSTEMMAXIMIZE ;
|
|
break ;
|
|
|
|
case SC_CLOSE:
|
|
SystemMenuItem = IDM_SYSTEMCLOSE ;
|
|
break ;
|
|
|
|
case SC_TASKLIST:
|
|
SystemMenuItem = IDM_SYSTEMSWITCHTO ;
|
|
break ;
|
|
}
|
|
|
|
if (SystemMenuItem)
|
|
{
|
|
StatusLine (hWndStatus, SystemMenuItem) ;
|
|
dwCurrentMenuID = MenuIDToHelpID (SystemMenuItem) ;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
StatusLine (hWndStatus, LOWORD (wParam)) ;
|
|
}
|
|
}
|
|
|
|
void OnDropFile (DWORD wParam)
|
|
{
|
|
TCHAR FileName [FilePathLen + 1] ;
|
|
LPTSTR pFileNameStart ;
|
|
HANDLE hFindFile ;
|
|
WIN32_FIND_DATA FindFileInfo ;
|
|
int NameOffset ;
|
|
int NumOfFiles = 0 ;
|
|
|
|
NumOfFiles = DragQueryFile ((HDROP) wParam, 0xffffffff, NULL, 0) ;
|
|
if (NumOfFiles > 0)
|
|
{
|
|
// we only open the first file for now
|
|
DragQueryFile((HDROP) wParam, 0, FileName, FilePathLen) ;
|
|
|
|
pFileNameStart = ExtractFileName (FileName) ;
|
|
NameOffset = pFileNameStart - FileName ;
|
|
|
|
// convert short filename to long NTFS filename if necessary
|
|
hFindFile = FindFirstFile (FileName, &FindFileInfo) ;
|
|
if (hFindFile && hFindFile != INVALID_HANDLE_VALUE)
|
|
{
|
|
// append the file name back to the path name
|
|
lstrcpy (&FileName[NameOffset], FindFileInfo.cFileName) ;
|
|
FindClose (hFindFile) ;
|
|
}
|
|
|
|
FileOpen (hWndMain, (int)0, (LPTSTR)FileName) ;
|
|
PrepareMenu (GetMenu (hWndMain));
|
|
}
|
|
|
|
DragFinish ((HDROP) wParam) ;
|
|
}
|
|
|
|
LRESULT APIENTRY MainWndProc (HWND hWnd,
|
|
UINT message,
|
|
DWORD wParam,
|
|
LONG lParam)
|
|
{
|
|
LONG lRetCode = 0L ;
|
|
BOOL bCallDefWinProc = FALSE ;
|
|
|
|
switch (LOWORD (message))
|
|
{ // switch
|
|
case WM_LBUTTONDBLCLK:
|
|
ShowPerfmonMenu (!Options.bMenubar) ;
|
|
if (Options.bMenubar)
|
|
{
|
|
PrepareMenu (GetMenu (hWnd)) ;
|
|
}
|
|
break ;
|
|
|
|
case WM_COMMAND:
|
|
if (PerfmonCommand (hWnd,wParam,lParam))
|
|
return(0);
|
|
else
|
|
bCallDefWinProc = TRUE ;
|
|
break;
|
|
|
|
case WM_MENUSELECT:
|
|
MenuBarHit (wParam) ;
|
|
break ;
|
|
|
|
case WM_NCHITTEST:
|
|
/* if we have no title/menu bar, clicking and dragging the client
|
|
* area moves the window. To do this, return HTCAPTION.
|
|
* Note dragging not allowed if window maximized, or if caption
|
|
* bar is present.
|
|
*/
|
|
wParam = DefWindowProc(hWnd, message, wParam, lParam);
|
|
if (!Options.bMenubar &&
|
|
(wParam == HTCLIENT) &&
|
|
!IsZoomed (hWndMain))
|
|
return HTCAPTION ;
|
|
else
|
|
return wParam ;
|
|
break ;
|
|
|
|
|
|
case WM_SHOWWINDOW:
|
|
PrepareMenu (GetMenu (hWnd)) ;
|
|
break ;
|
|
|
|
case WM_SIZE:
|
|
OnSize (hWnd, LOWORD (lParam), HIWORD (lParam)) ;
|
|
break ;
|
|
|
|
case WM_GETMINMAXINFO:
|
|
{
|
|
MINMAXINFO *pMinMax ;
|
|
|
|
pMinMax = (MINMAXINFO *) lParam ;
|
|
pMinMax->ptMinTrackSize.x = MinimumSize ;
|
|
pMinMax->ptMinTrackSize.y = MinimumSize ;
|
|
}
|
|
break ;
|
|
|
|
case WM_NOTIFY:
|
|
{
|
|
LPTOOLTIPTEXT lpTTT = (LPTOOLTIPTEXT)lParam;
|
|
|
|
if (lpTTT->hdr.code == TTN_NEEDTEXT) {
|
|
LoadString (hInstance, lpTTT->hdr.idFrom, lpTTT->szText,
|
|
sizeof(lpTTT->szText)/sizeof(TCHAR));
|
|
return TRUE;
|
|
} else {
|
|
bCallDefWinProc = FALSE ;
|
|
break;
|
|
}
|
|
}
|
|
|
|
case WM_F1DOWN:
|
|
if (dwCurrentDlgID)
|
|
{
|
|
CallWinHelp (dwCurrentDlgID) ;
|
|
}
|
|
else if (dwCurrentMenuID)
|
|
{
|
|
CallWinHelp (dwCurrentMenuID) ;
|
|
dwCurrentMenuID = 0 ;
|
|
}
|
|
break ;
|
|
|
|
case WM_CREATE:
|
|
OnCreate (hWnd) ;
|
|
ViewChart (hWnd) ;
|
|
PrepareMenu (GetMenu (hWnd)) ;
|
|
break ;
|
|
|
|
case WM_DESTROY:
|
|
WinHelp (hWndMain, pszHelpFile, HELP_QUIT, 0) ;
|
|
PostQuitMessage (0);
|
|
break ;
|
|
|
|
case WM_QUERYENDSESSION:
|
|
// please shut it down
|
|
return (1) ;
|
|
break ;
|
|
|
|
case WM_ENDSESSION:
|
|
if (wParam == TRUE)
|
|
{
|
|
// close any log file before closing down
|
|
PerfmonClose (hWnd) ;
|
|
return (1) ;
|
|
}
|
|
else
|
|
bCallDefWinProc = TRUE ;
|
|
break ;
|
|
|
|
case WM_CLOSE:
|
|
PerfmonClose (hWnd) ;
|
|
break ;
|
|
|
|
case WM_ACTIVATE:
|
|
{
|
|
int fActivate = LOWORD (wParam) ;
|
|
|
|
bPerfmonIconic = (BOOL) HIWORD (wParam) ;
|
|
if (bPerfmonIconic == 0 && fActivate != WA_INACTIVE)
|
|
{
|
|
// set focus on the Legend window
|
|
if (iPerfmonView == IDM_VIEWCHART)
|
|
{
|
|
SetFocus (hWndGraphLegend) ;
|
|
}
|
|
else if (iPerfmonView == IDM_VIEWALERT)
|
|
{
|
|
SetFocus (hWndAlertLegend) ;
|
|
}
|
|
else if (iPerfmonView == IDM_VIEWLOG)
|
|
{
|
|
SetFocus (hWndLogEntries) ;
|
|
}
|
|
else if (iPerfmonView == IDM_VIEWREPORT)
|
|
{
|
|
SetFocus (hWndReport) ;
|
|
}
|
|
}
|
|
}
|
|
break ;
|
|
|
|
case WM_SYSCOLORCHANGE:
|
|
DeletePerfmonSystemObjects () ;
|
|
CreatePerfmonSystemObjects () ;
|
|
WindowInvalidate (PerfmonViewWindow()) ;
|
|
break ;
|
|
|
|
case WM_WININICHANGE:
|
|
if (!lParam || strsamei((LPTSTR)lParam, szInternational))
|
|
{
|
|
GetDateTimeFormats () ;
|
|
}
|
|
break ;
|
|
|
|
case WM_DROPFILES:
|
|
OnDropFile (wParam) ;
|
|
return (0) ;
|
|
break ;
|
|
|
|
default:
|
|
bCallDefWinProc = TRUE ;
|
|
break;
|
|
|
|
} // switch
|
|
|
|
if (bCallDefWinProc)
|
|
{
|
|
lRetCode = DefWindowProc (hWnd, message, wParam, lParam) ;
|
|
}
|
|
return (lRetCode);
|
|
} // MainWndProc
|
|
|
|
|
|
int PASCAL WinMain (HINSTANCE hCurrentInstance,
|
|
HINSTANCE hPrevInstance,
|
|
LPSTR lpszCmdLine,
|
|
int nCmdShow)
|
|
{ // WinMain
|
|
MSG msg;
|
|
|
|
if (!PerfmonInitialize (hCurrentInstance, hPrevInstance,
|
|
lpszCmdLine, nCmdShow))
|
|
return (FALSE) ;
|
|
|
|
DragAcceptFiles (hWndMain, TRUE) ;
|
|
|
|
while (GetMessage (&msg, NULL, 0, 0))
|
|
{
|
|
if (!TranslateAccelerator(hWndMain, hAccelerators, &msg))
|
|
{
|
|
TranslateMessage (&msg) ;
|
|
DispatchMessage (&msg) ;
|
|
}
|
|
} // while
|
|
|
|
return(msg.wParam);
|
|
}
|
|
|
|
DWORD FAR PASCAL MessageFilterProc (int nCode,
|
|
WPARAM wParam,
|
|
LPARAM lParam)
|
|
{
|
|
LPMSG lpMsg = (LPMSG)lParam ;
|
|
extern HHOOK lpMsgFilterProc ;
|
|
|
|
if (nCode < 0)
|
|
{
|
|
return FALSE ;
|
|
}
|
|
|
|
if (nCode == MSGF_DIALOGBOX || nCode == MSGF_MENU)
|
|
{
|
|
if (lpMsg->message == WM_KEYDOWN && lpMsg->wParam == VK_F1)
|
|
{
|
|
PostMessage (hWndMain, WM_F1DOWN, nCode, 0L) ;
|
|
return TRUE ;
|
|
}
|
|
}
|
|
|
|
return (DefHookProc (nCode, wParam,
|
|
(DWORD)lpMsg,
|
|
&lpMsgFilterProc)) ;
|
|
}
|
|
|
|
|
|
#if 0
|
|
/***************************************/
|
|
VOID ErrorExit(LPTSTR pszError,HWND hwnd)
|
|
/***************************************/
|
|
{
|
|
// NOTE: make sure all lgraph calls set StopQuerying.
|
|
|
|
if (hwnd)
|
|
{
|
|
MessageBox(NULL, pszError, nm_buf, MB_ICONHAND | MB_OK | MB_SYSTEMMODAL);
|
|
DestroyWindow(hwnd);
|
|
}
|
|
return;
|
|
}
|
|
#endif
|
|
|
|
|
|
|
|
void SizePerfmonComponents (void)
|
|
{
|
|
RECT rectClient ;
|
|
int xWidth, yHeight ;
|
|
int yToolbarHeight ;
|
|
int yStatusHeight ;
|
|
int yViewHeight ;
|
|
|
|
GetClientRect (hWndMain, &rectClient) ;
|
|
xWidth = rectClient.right - rectClient.left ;
|
|
yHeight = rectClient.bottom - rectClient.top ;
|
|
|
|
if (Options.bToolbar)
|
|
{
|
|
SendMessage (hWndToolbar, WM_SIZE, 0, 0L) ;
|
|
}
|
|
|
|
yToolbarHeight = Options.bToolbar ? (WindowHeight (hWndToolbar) - 1) : 0 ;
|
|
yStatusHeight = Options.bStatusbar ? StatusHeight (hWndStatus) : 0 ;
|
|
|
|
if (Options.bStatusbar)
|
|
{
|
|
if (yToolbarHeight + yStatusHeight > yHeight)
|
|
{
|
|
// too small to display both toolbar and status bar
|
|
// just display part of the status bar
|
|
yStatusHeight = yHeight - yToolbarHeight ;
|
|
}
|
|
|
|
MoveWindow (hWndStatus,
|
|
0, yHeight - yStatusHeight, xWidth, yStatusHeight, TRUE) ;
|
|
//WindowInvalidate (hWndStatus) ;
|
|
}
|
|
//WindowInvalidate (hWndMain) ;
|
|
WindowShow (hWndStatus, Options.bStatusbar) ;
|
|
WindowShow (hWndToolbar, Options.bToolbar) ;
|
|
|
|
yViewHeight = yHeight - yStatusHeight - yToolbarHeight ;
|
|
|
|
MoveWindow (hWndGraph,
|
|
0, yToolbarHeight,
|
|
xWidth, yViewHeight,
|
|
TRUE) ;
|
|
MoveWindow (hWndAlert,
|
|
0, yToolbarHeight,
|
|
xWidth, yViewHeight,
|
|
TRUE) ;
|
|
MoveWindow (hWndLog,
|
|
0, yToolbarHeight,
|
|
xWidth, yViewHeight,
|
|
TRUE) ;
|
|
MoveWindow (hWndReport,
|
|
0, yToolbarHeight,
|
|
xWidth, yViewHeight,
|
|
TRUE) ;
|
|
|
|
|
|
} // SizePerfmonComponents
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|