Added process browser to Address Space Monitor. Bumped to version 0.4.

Author: hashpling

Changelog

@@ -44,3 +44,7 @@ Changelog
 
 memmon/memmon.cpp memmon/memmon.rc memmon/mmpainter.cpp memmon/mmpainter.h:
   Added snapshot save and load functionality.
+
+2007-08-02 Charles Bailey
+memmon/memmon.cpp memmon/memmon.rc memmon/memmon.vcproj:
+  Added simple process browser.

memmon/memmon.cpp

@@ -6,10 +6,13 @@
 #include "mmpainter.h"
 #include "mmprefs.h"
 
+#include <sstream>
 #include <crtdbg.h>
 
 #define MAX_LOADSTRING 100
 
+using std::wostringstream;
+
 namespace
 {
 // Global Variables:
@@ -167,26 +170,99 @@ void MyPaint(HDC hdc, PAINTSTRUCT* ps)
 	}
 }
 
+void PopulateProcessList(HWND listBox)
+{
+	DWORD pids[1024];
+	DWORD pids_ret_size;
+
+	if (::EnumProcesses(pids, sizeof pids, &pids_ret_size))
+	{
+		HANDLE hProc;
+		TCHAR procname[1024];
+
+		for (size_t i = 0; i < (pids_ret_size / sizeof(DWORD)); ++i)
+		{
+			hProc = OpenProcess(PROCESS_QUERY_INFORMATION | PROCESS_VM_READ, FALSE, pids[i]);
+			if (hProc != NULL)
+			{
+				//::GetProcessImageFileName(hProc, procname, sizeof procname / sizeof(TCHAR));
+				//::GetModuleFileNameEx(hProc, NULL, procname, sizeof procname / sizeof(TCHAR));
+				if (::GetModuleBaseName(hProc, NULL, procname, sizeof procname / sizeof(TCHAR)))
+				{
+					LRESULT lRes = ::SendMessage( listBox, LB_ADDSTRING, 0, LPARAM(procname) );
+					if (lRes >= 0)
+					{
+						::SendMessage( listBox, LB_SETITEMDATA, lRes, pids[i] );
+					}
+				}
+				else if (::GetProcessImageFileName(hProc, procname, sizeof procname / sizeof(TCHAR)))
+				{
+					LRESULT lRes = ::SendMessage( listBox, LB_ADDSTRING, 0, LPARAM(procname) );
+					if (lRes >= 0)
+					{
+						::SendMessage( listBox, LB_SETITEMDATA, lRes, pids[i] );
+					}
+				}
+
+			}
+		}
+	}
+}
+
 INT_PTR CALLBACK AttachProc(HWND hwndDlg, UINT message, WPARAM wParam, LPARAM lParam)
 {
 	INT_PTR ret = (INT_PTR)FALSE;
 	switch (message)
 	{
+
 	case WM_COMMAND:
 		{
 			_TCHAR tmp[200] = { 0 };
 			switch (LOWORD(wParam))
 			{
+			case IDC_PROCLIST:
+				switch (HIWORD(wParam))
+				{
+				case LBN_SELCHANGE:
+					{
+						LRESULT lRes = ::SendMessage(HWND(lParam), LB_GETCURSEL, 0, 0);
+
+						if (lRes >= 0)
+						{
+							lRes = ::SendMessage(HWND(lParam), LB_GETITEMDATA, lRes, 0);
+							if (lRes >= 0)
+							{
+								wostringstream oss;
+								oss << lRes;
+								SetDlgItemText(hwndDlg, IDC_EDIT1, oss.str().c_str());
+							}
+						}
+					}
+					break;
+				case LBN_DBLCLK:
+					::SendMessage(hwndDlg, WM_COMMAND, IDOK, 0);
+					break;
+				}
+				break;
+
 			case IDOK:
 				GetDlgItemText(hwndDlg, IDC_EDIT1, tmp, 200);
 				pPaint->SetProcessId( _ttoi(tmp) );
+				// Drop through
 			case IDCANCEL:
 				EndDialog(hwndDlg, wParam);
 				ret = (INT_PTR)TRUE;
 			}
 		}
 		break;
 	case WM_INITDIALOG:
+		{
+			HWND hProcList = ::GetDlgItem(hwndDlg, IDC_PROCLIST);
+			if (hProcList != NULL)
+			{
+				PopulateProcessList(hProcList);
+			}
+		}
 		// Return true to set default focus
 		ret = (INT_PTR)TRUE;
 	}

memmon/memmon.rc

@@ -81,20 +81,21 @@ CAPTION "About"
 FONT 8, "MS Shell Dlg", 0, 0, 0x0
 BEGIN
     ICON            IDI_MEMMON,IDC_MYICON,14,9,20,20
-    LTEXT           "Address Space Monitor Version 0.3a",IDC_STATIC,49,10,119,8,SS_NOPREFIX
+    LTEXT           "Address Space Monitor Version 0.4a",IDC_STATIC,49,10,119,8,SS_NOPREFIX
     LTEXT           "Copyright (c) 2007 Charles Bailey",IDC_STATIC,49,20,119,8
     DEFPUSHBUTTON   "OK",IDOK,195,6,30,11,WS_GROUP
 END
 
-IDD_ATTACH_DLOG DIALOGEX 0, 0, 186, 46
+IDD_ATTACH_DLOG DIALOGEX 0, 0, 350, 209
 STYLE DS_SETFONT | DS_MODALFRAME | DS_FIXEDSYS | WS_POPUP | WS_CAPTION | WS_SYSMENU
 CAPTION "Attach to process"
 FONT 8, "MS Shell Dlg", 400, 0, 0x1
 BEGIN
-    EDITTEXT        IDC_EDIT1,7,25,102,14,ES_AUTOHSCROLL | ES_NUMBER
-    DEFPUSHBUTTON   "OK",IDOK,129,7,50,14
-    PUSHBUTTON      "Cancel",IDCANCEL,129,24,50,14
+    EDITTEXT        IDC_EDIT1,7,20,102,14,ES_AUTOHSCROLL | ES_NUMBER
+    DEFPUSHBUTTON   "OK",IDOK,293,7,50,14
+    PUSHBUTTON      "Cancel",IDCANCEL,293,24,50,14
     LTEXT           "Process Id:",IDC_STATIC,7,7,37,8
+    LISTBOX         IDC_PROCLIST,7,48,336,154,LBS_NOINTEGRALHEIGHT | WS_VSCROLL | WS_TABSTOP
 END
 
 IDD_PREFS_DLOG DIALOGEX 0, 0, 186, 177
@@ -153,9 +154,9 @@ BEGIN
     IDD_ATTACH_DLOG, DIALOG
     BEGIN
         LEFTMARGIN, 7
-        RIGHTMARGIN, 179
+        RIGHTMARGIN, 343
         TOPMARGIN, 7
-        BOTTOMMARGIN, 39
+        BOTTOMMARGIN, 202
     END
 
     IDD_PREFS_DLOG, DIALOG
@@ -175,8 +176,8 @@ END
 //
 
 VS_VERSION_INFO VERSIONINFO
- FILEVERSION 0,3,1,0
- PRODUCTVERSION 0,3,1,0
+ FILEVERSION 0,4,1,0
+ PRODUCTVERSION 0,4,1,0
  FILEFLAGSMASK 0x17L
 #ifdef _DEBUG
  FILEFLAGS 0x1L
@@ -192,12 +193,12 @@ BEGIN
         BLOCK "080904b0"
         BEGIN
             VALUE "FileDescription", "Address Space Monitor exe"
-            VALUE "FileVersion", "0.3"
+            VALUE "FileVersion", "0.4"
             VALUE "InternalName", "memmon"
             VALUE "LegalCopyright", "Copyright (c) 2007 Charles Bailey"
             VALUE "OriginalFilename", "memmon.exe"
             VALUE "ProductName", "Address Space Monitor"
-            VALUE "ProductVersion", "0.3"
+            VALUE "ProductVersion", "0.4"
         END
     END
     BLOCK "VarFileInfo"

memmon/memmon.vcproj

@@ -65,6 +65,7 @@
 			/>
 			<Tool
 				Name="VCLinkerTool"
+				AdditionalDependencies="psapi.lib"
 				LinkIncremental="2"
 				GenerateDebugInformation="true"
 				SubSystem="2"
@@ -143,6 +144,7 @@
 			/>
 			<Tool
 				Name="VCLinkerTool"
+				AdditionalDependencies="psapi.lib"
 				LinkIncremental="2"
 				GenerateDebugInformation="true"
 				SubSystem="2"
@@ -218,6 +220,7 @@
 			/>
 			<Tool
 				Name="VCLinkerTool"
+				AdditionalDependencies="psapi.lib"
 				LinkIncremental="1"
 				GenerateDebugInformation="true"
 				SubSystem="2"
@@ -296,6 +299,7 @@
 			/>
 			<Tool
 				Name="VCLinkerTool"
+				AdditionalDependencies="psapi.lib"
 				LinkIncremental="1"
 				GenerateDebugInformation="true"
 				SubSystem="2"

memmon/resource.h

@@ -20,6 +20,7 @@
 #define IDC_EDIT_K                      1003
 #define IDC_CHECK_CPUCOUNT              1004
 #define IDC_CHECK_TOPMOST               1005
+#define IDC_PROCLIST                    1006
 #define ID_FILE_ATTACH                  32771
 #define ID_Menu                         32772
 #define IDM_EDIT_PREFERENCES            32773
@@ -35,7 +36,7 @@
 #define _APS_NO_MFC                     1
 #define _APS_NEXT_RESOURCE_VALUE        131
 #define _APS_NEXT_COMMAND_VALUE         32779
-#define _APS_NEXT_CONTROL_VALUE         1005
+#define _APS_NEXT_CONTROL_VALUE         1007
 #define _APS_NEXT_SYMED_VALUE           110
 #endif
 #endif

memmon/stdafx.h

@@ -35,4 +35,5 @@
 
 
 // TODO: reference additional headers your program requires here
-#include "shellapi.h"
+#include <psapi.h>
+#include <shellapi.h>

memtools.iss

@@ -3,22 +3,22 @@
 
 [Setup]
 AppName=Address Space Monitor
-AppVerName=Address Space Monitor 0.3a
+AppVerName=Address Space Monitor 0.4a
 AppPublisher=Charles Bailey
 AppCopyright=Copyright (c) 2007 Charles Bailey
 AppPublisherURL=http://www.hashpling.org
 AppSupportURL=http://www.hashpling.org
 AppUpdatesURL=http://www.hashpling.org
 DefaultDirName={pf}\memmon
 DefaultGroupName=Address Space Monitor
-OutputBaseFilename=asmsetup-0_3
+OutputBaseFilename=asmsetup-0_4
 OutputDir=installer
 Compression=lzma
 SolidCompression=yes
 PrivilegesRequired=none
 ArchitecturesInstallIn64BitMode=x64
 LicenseFile=licence.txt
-VersionInfoVersion=0.3.1.0
+VersionInfoVersion=0.4.1.0
 
 [Languages]
 Name: "english"; MessagesFile: "compiler:Default.isl"