6 * Copyright (C) 1999 - 2001 Brian Palmer <brianp@reactos.org>
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
23 #define WIN32_LEAN_AND_MEAN /* Exclude rarely-used stuff from Windows headers */
36 void ProcessPage_OnDebug(void)
41 TCHAR strErrorText[260];
43 TCHAR strDebugPath[260];
44 TCHAR strDebugger[260];
46 PROCESS_INFORMATION pi;
50 for (Index=0; Index<(ULONG)ListView_GetItemCount(hProcessPageListCtrl); Index++)
52 lvitem.mask = LVIF_STATE;
53 lvitem.stateMask = LVIS_SELECTED;
57 SendMessage(hProcessPageListCtrl, LVM_GETITEM, 0, (LPARAM) &lvitem);
59 if (lvitem.state & LVIS_SELECTED)
63 dwProcessId = PerfDataGetProcessId(Index);
65 if ((ListView_GetSelectedCount(hProcessPageListCtrl) != 1) || (dwProcessId == 0))
68 if (MessageBox(hMainWnd, _T("WARNING: Debugging this process may result in loss of data.\nAre you sure you wish to attach the debugger?"), _T("Task Manager Warning"), MB_YESNO|MB_ICONWARNING) != IDYES)
70 GetLastErrorText(strErrorText, 260);
71 MessageBox(hMainWnd, strErrorText, _T("Unable to Debug Process"), MB_OK|MB_ICONSTOP);
75 if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, _T("Software\\Microsoft\\Windows NT\\CurrentVersion\\AeDebug"), 0, KEY_READ, &hKey) != ERROR_SUCCESS)
77 GetLastErrorText(strErrorText, 260);
78 MessageBox(hMainWnd, strErrorText, _T("Unable to Debug Process"), MB_OK|MB_ICONSTOP);
83 if (RegQueryValueEx(hKey, _T("Debugger"), NULL, NULL, (LPBYTE)strDebugger, &dwDebuggerSize) != ERROR_SUCCESS)
85 GetLastErrorText(strErrorText, 260);
86 MessageBox(hMainWnd, strErrorText, _T("Unable to Debug Process"), MB_OK|MB_ICONSTOP);
93 hDebugEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
96 GetLastErrorText(strErrorText, 260);
97 MessageBox(hMainWnd, strErrorText, _T("Unable to Debug Process"), MB_OK|MB_ICONSTOP);
101 wsprintf(strDebugPath, strDebugger, dwProcessId, hDebugEvent);
103 memset(&pi, 0, sizeof(PROCESS_INFORMATION));
104 memset(&si, 0, sizeof(STARTUPINFO));
105 si.cb = sizeof(STARTUPINFO);
106 if (!CreateProcess(NULL, strDebugPath, NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi))
108 GetLastErrorText(strErrorText, 260);
109 MessageBox(hMainWnd, strErrorText, _T("Unable to Debug Process"), MB_OK|MB_ICONSTOP);
112 CloseHandle(hDebugEvent);