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
);