31 Dec
2017
31 Dec
'17
1:56 p.m.
https://git.reactos.org/?p=reactos.git;a=commitdiff;h=cb885480b2606843577f8…
commit cb885480b2606843577f8239c79e2b93a718883b
Author: Mark Jansen <mark.jansen(a)reactos.org>
AuthorDate: Sat Dec 23 22:31:15 2017 +0100
[SHLEXTDBG] Add utility to run / debug shell extensions.
CORE-7684 #234
---
.../rosapps/applications/devutils/CMakeLists.txt | 1 +
.../applications/devutils/shlextdbg/CMakeLists.txt | 12 +
.../applications/devutils/shlextdbg/shlextdbg.cpp | 374 +++++++++++++++++++++
.../applications/devutils/shlextdbg/shlextdbg.rc | 9 +
4 files changed, 396 insertions(+)
diff --git a/modules/rosapps/applications/devutils/CMakeLists.txt
b/modules/rosapps/applications/devutils/CMakeLists.txt
index 7f3b162793..5ea4b089d6 100644
--- a/modules/rosapps/applications/devutils/CMakeLists.txt
+++ b/modules/rosapps/applications/devutils/CMakeLists.txt
@@ -5,6 +5,7 @@ add_subdirectory(gdihv)
add_subdirectory(genguid)
add_subdirectory(nls2txt)
add_subdirectory(shimdbg)
+add_subdirectory(shlextdbg)
add_subdirectory(symdump)
add_subdirectory(syscalldump)
add_subdirectory(txt2nls)
diff --git a/modules/rosapps/applications/devutils/shlextdbg/CMakeLists.txt
b/modules/rosapps/applications/devutils/shlextdbg/CMakeLists.txt
new file mode 100644
index 0000000000..21f80e7d60
--- /dev/null
+++ b/modules/rosapps/applications/devutils/shlextdbg/CMakeLists.txt
@@ -0,0 +1,12 @@
+
+set_cpp(WITH_RUNTIME)
+add_definitions(-D_ATL_NO_EXCEPTIONS)
+
+include_directories(${REACTOS_SOURCE_DIR}/sdk/lib/atl)
+
+add_executable(shlextdbg shlextdbg.cpp shlextdbg.rc)
+
+set_module_type(shlextdbg win32cui UNICODE)
+target_link_libraries(shlextdbg atlnew uuid)
+add_importlibs(shlextdbg ole32 comctl32 shell32 user32 msvcrt kernel32)
+add_cd_file(TARGET shlextdbg DESTINATION reactos/system32 FOR all)
diff --git a/modules/rosapps/applications/devutils/shlextdbg/shlextdbg.cpp
b/modules/rosapps/applications/devutils/shlextdbg/shlextdbg.cpp
new file mode 100644
index 0000000000..b4d24a397a
--- /dev/null
+++ b/modules/rosapps/applications/devutils/shlextdbg/shlextdbg.cpp
@@ -0,0 +1,374 @@
+/*
+ * PROJECT: shlextdbg
+ * LICENSE: GPL-2.0+ (https://spdx.org/licenses/GPL-2.0+)
+ * PURPOSE: Shell extension debug utility
+ * COPYRIGHT: Copyright 2017 Mark Jansen (mark.jansen(a)reactos.org)
+ */
+
+#include <windows.h>
+#include <shlobj.h>
+#include <atlbase.h> // thanks gcc
+#include <atlcom.h> // thanks gcc
+#include <atlstr.h>
+#include <atlsimpcoll.h>
+#include <conio.h>
+ // hack for gcc:
+#define DbgPrint(...) printf(__VA_ARGS__)
+#include <shellutils.h>
+
+enum WaitType
+{
+ Wait_None,
+ Wait_Infinite,
+ Wait_OpenWindows,
+ Wait_Input,
+};
+
+CLSID g_CLSID = { 0 };
+CStringW g_DLL;
+CStringW g_ShellExtInit;
+bool g_bIShellPropSheetExt = false;
+CStringA g_ContextMenu;
+WaitType g_Wait = Wait_None;
+
+HRESULT CreateIDataObject(CComHeapPtr<ITEMIDLIST>& pidl,
CComPtr<IDataObject>& dataObject, PCWSTR FileName)
+{
+ HRESULT hr = SHParseDisplayName(FileName, NULL, &pidl, 0, NULL);
+ if (!SUCCEEDED(hr))
+ {
+ wprintf(L"Failed to create pidl from '%s': 0x%x\n", FileName,
hr);
+ return hr;
+ }
+
+ CComPtr<IShellFolder> shellFolder;
+ PCUITEMID_CHILD childs;
+ hr = SHBindToParent(pidl, IID_PPV_ARG(IShellFolder, &shellFolder), &childs);
+ if (!SUCCEEDED(hr))
+ {
+ wprintf(L"Failed to bind to parent: 0x%x\n", hr);
+ return hr;
+ }
+ hr = shellFolder->GetUIObjectOf(NULL, 1, &childs, IID_IDataObject, NULL,
(PVOID*)&dataObject);
+ if (!SUCCEEDED(hr))
+ {
+ wprintf(L"Failed to query IDataObject: 0x%x\n", hr);
+ }
+ return hr;
+}
+
+HRESULT LoadAndInitialize(REFIID riid, LPVOID* ppv)
+{
+ CComPtr<IShellExtInit> spShellExtInit;
+ HRESULT hr;
+ if (g_DLL.IsEmpty())
+ {
+ hr = CoCreateInstance(g_CLSID, NULL, CLSCTX_ALL, IID_PPV_ARG(IShellExtInit,
&spShellExtInit));
+ if (!SUCCEEDED(hr))
+ {
+ WCHAR Buffer[100];
+ StringFromGUID2(g_CLSID, Buffer, _countof(Buffer));
+ wprintf(L"Failed to Create %s:IShellExtInit: 0x%x\n", Buffer, hr);
+ return hr;
+ }
+ }
+ else
+ {
+ typedef HRESULT (STDAPICALLTYPE *tDllGetClassObject)(REFCLSID rclsid, REFIID
riid, LPVOID *ppv);
+ HMODULE mod = LoadLibraryW(g_DLL);
+ if (!mod)
+ {
+ wprintf(L"Failed to Load %s:(0x%x)\n", g_DLL.GetString(),
GetLastError());
+ return E_FAIL;
+ }
+ tDllGetClassObject DllGet = (tDllGetClassObject)GetProcAddress(mod,
"DllGetClassObject");
+ if (!DllGet)
+ {
+ wprintf(L"%s does not export DllGetClassObject\n",
g_DLL.GetString());
+ return E_FAIL;
+ }
+ CComPtr<IClassFactory> spClassFactory;
+ hr = DllGet(g_CLSID, IID_PPV_ARG(IClassFactory, &spClassFactory));
+ if (!SUCCEEDED(hr))
+ {
+ wprintf(L"Failed to create IClassFactory: 0x%x\n", hr);
+ return hr;
+ }
+ hr = spClassFactory->CreateInstance(NULL, IID_PPV_ARG(IShellExtInit,
&spShellExtInit));
+ if (!SUCCEEDED(hr))
+ {
+ wprintf(L"Failed to Request IShellExtInit from IClassFactory:
0x%x\n", hr);
+ return hr;
+ }
+ }
+
+ CComPtr<IDataObject> spDataObject;
+ CComHeapPtr<ITEMIDLIST> pidl;
+ hr = CreateIDataObject(pidl, spDataObject, g_ShellExtInit.GetString());
+ if (!SUCCEEDED(hr))
+ return hr;
+
+ hr = spShellExtInit->Initialize(pidl, spDataObject, NULL);
+ if (!SUCCEEDED(hr))
+ {
+ wprintf(L"IShellExtInit->Initialize failed: 0x%x\n", hr);
+ return hr;
+ }
+ hr = spShellExtInit->QueryInterface(riid, ppv);
+ if (!SUCCEEDED(hr))
+ {
+ WCHAR Buffer[100];
+ StringFromGUID2(riid, Buffer, _countof(Buffer));
+ wprintf(L"Failed to query %s from IShellExtInit: 0x%x\n", Buffer, hr);
+ }
+ return hr;
+}
+
+
+CSimpleArray<HWND> g_Windows;
+HWND g_ConsoleWindow;
+BOOL CALLBACK EnumWindowsProc(HWND hwnd, LPARAM lParam)
+{
+ if (hwnd != g_ConsoleWindow)
+ {
+ DWORD pid = 0;
+ GetWindowThreadProcessId(hwnd, &pid);
+ if (pid == GetCurrentProcessId())
+ {
+ g_Windows.Add(hwnd);
+ }
+ }
+ return TRUE;
+}
+
+void WaitWindows()
+{
+ /* Give the windows some time to spawn */
+ Sleep(2000);
+ g_ConsoleWindow = GetConsoleWindow();
+ while (true)
+ {
+ g_Windows.RemoveAll();
+ EnumWindows(EnumWindowsProc, NULL);
+ if (g_Windows.GetSize() == 0)
+ break;
+ Sleep(500);
+ }
+ wprintf(L"All windows closed (ignoring console window)\n");
+}
+
+
+
+CSimpleArray<HPROPSHEETPAGE> g_Pages;
+static BOOL CALLBACK cb_AddPage(HPROPSHEETPAGE page, LPARAM lParam)
+{
+ g_Pages.Add(page);
+ if (lParam != (LPARAM)&g_Pages)
+ {
+ wprintf(L"Propsheet failed to pass lParam, got: 0x%x\n", lParam);
+ }
+ return TRUE;
+}
+
+static bool isCmdWithArg(int argc, WCHAR** argv, int& n, PCWSTR check, PCWSTR
&arg)
+{
+ arg = NULL;
+ size_t len = wcslen(check);
+ if (!_wcsnicmp(argv[n] + 1, check, len))
+ {
+ PCWSTR cmd = argv[n] + len + 1;
+ if (*cmd == ':' || *cmd == '=')
+ {
+ arg = cmd + 1;
+ return true;
+ }
+ if (n + 1 < argc)
+ {
+ arg = argv[n+1];
+ n++;
+ return true;
+ }
+ wprintf(L"Command %s has no required argument!\n", check);
+ return false;
+ }
+ return false;
+}
+
+static bool isCmd(int argc, WCHAR** argv, int n, PCWSTR check)
+{
+ return !wcsicmp(argv[n] + 1, check);
+}
+
+static void PrintHelp(PCWSTR ExtraLine)
+{
+ if (ExtraLine)
+ wprintf(L"%s\n", ExtraLine);
+
+ wprintf(L"shlextdbg /clsid={clsid} [/dll=dllname] /IShellExtInit=filename
|shlextype| |waitoptions|\n");
+ wprintf(L" {clsid}: The CLSID or ProgID of the object to create\n");
+ wprintf(L" dll: Optional dllname to create the object from, instead of
CoCreateInstance\n");
+ wprintf(L" filename: The filename to pass to
IShellExtInit->Initialze\n");
+ wprintf(L" shlextype: The type of shell extention to run:\n");
+ wprintf(L" /IShellPropSheetExt to create a property
sheet\n");
+ wprintf(L" /IContextMenu=verb to activate the specified
verb\n");
+ wprintf(L" waitoptions: Specify how to wait:\n");
+ wprintf(L" /infinite: Keep on waiting infinitely\n");
+ wprintf(L" /openwindows: Wait for all windows from the current
application to close\n");
+ wprintf(L" /input: Wait for input\n");
+ wprintf(L"\n");
+}
+
+/*
+Examples:
+
+/clsid={513D916F-2A8E-4F51-AEAB-0CBC76FB1AF8} /IShellExtInit=C:\RosBE\Uninstall.exe
/IShellPropSheetExt
+/clsid=CompressedFolder /IShellExtInit=e:\test.zip /IContextMenu=extract /openwindows
+/clsid=CompressedFolder /IShellExtInit=e:\test.zip /IContextMenu=extract /openwindows
/dll=R:\build\dev\devenv\dll\shellext\zipfldr\Debug\zipfldr.dll
+
+*/
+extern "C" // and another hack for gcc
+int wmain(int argc, WCHAR **argv)
+{
+ bool failArgs = false;
+ for (int n = 1; n < argc; ++n)
+ {
+ WCHAR* cmd = argv[n];
+ if (cmd[0] == '-' || cmd[0] == '/')
+ {
+ PCWSTR arg;
+ if (isCmdWithArg(argc, argv, n, L"clsid", arg))
+ {
+ HRESULT hr = CLSIDFromString(arg, &g_CLSID);
+ if (!SUCCEEDED(hr))
+ {
+ wprintf(L"Failed to convert %s to CLSID\n", arg);
+ failArgs = true;
+ }
+ }
+ else if (isCmdWithArg(argc, argv, n, L"dll", arg))
+ {
+ g_DLL = arg;
+ }
+ else if (isCmdWithArg(argc, argv, n, L"IShellExtInit", arg))
+ {
+ g_ShellExtInit = arg;
+ }
+ else if (isCmd(argc, argv, n, L"IShellPropSheetExt"))
+ {
+ g_bIShellPropSheetExt = true;
+ }
+ else if (isCmdWithArg(argc, argv, n, L"IContextMenu", arg))
+ {
+ g_ContextMenu = arg;
+ }
+ else if (isCmd(argc, argv, n, L"infinite"))
+ {
+ g_Wait = Wait_Infinite;
+ }
+ else if (isCmd(argc, argv, n, L"openwindows"))
+ {
+ g_Wait = Wait_OpenWindows;
+ }
+ else if (isCmd(argc, argv, n, L"input"))
+ {
+ g_Wait = Wait_Input;
+ }
+ else
+ {
+ wprintf(L"Unknown argument: %s\n", cmd);
+ failArgs = true;
+ }
+ }
+ }
+
+ if (failArgs)
+ {
+ PrintHelp(NULL);
+ return E_INVALIDARG;
+ }
+
+
+ CLSID EmptyCLSID = { 0 };
+ if (EmptyCLSID == g_CLSID)
+ {
+ PrintHelp(L"No CLSID specified");
+ return E_INVALIDARG;
+ }
+
+ if (g_ShellExtInit.IsEmpty())
+ {
+ PrintHelp(L"No filename specified");
+ return E_INVALIDARG;
+ }
+
+ INITCOMMONCONTROLSEX icc = { sizeof(icc), ICC_LINK_CLASS | ICC_STANDARD_CLASSES };
+ InitCommonControlsEx(&icc);
+ CoInitialize(NULL);
+
+ HRESULT hr;
+ if (g_bIShellPropSheetExt)
+ {
+ CComPtr<IShellPropSheetExt> spSheetExt;
+ hr = LoadAndInitialize(IID_PPV_ARG(IShellPropSheetExt, &spSheetExt));
+ if (!SUCCEEDED(hr))
+ return hr;
+
+ hr = spSheetExt->AddPages(cb_AddPage, (LPARAM)&g_Pages);
+ if (!SUCCEEDED(hr))
+ {
+ wprintf(L"IShellPropSheetExt->AddPages failed: 0x%x\n", hr);
+ return hr;
+ }
+
+ USHORT ActivePage = HRESULT_CODE(hr);
+ PROPSHEETHEADERW psh = { 0 };
+
+ psh.dwSize = sizeof(psh);
+ psh.dwFlags = PSH_PROPTITLE;
+ psh.pszCaption = L"shlextdbg";
+ psh.phpage = g_Pages.GetData();
+ psh.nPages = g_Pages.GetSize();
+ psh.nStartPage = ActivePage ? (ActivePage-1) : 0;
+ hr = PropertySheetW(&psh);
+
+ wprintf(L"PropertySheetW returned: 0x%x\n", hr);
+ }
+ if (!g_ContextMenu.IsEmpty())
+ {
+ CComPtr<IContextMenu> spContextMenu;
+ hr = LoadAndInitialize(IID_PPV_ARG(IContextMenu, &spContextMenu));
+ if (!SUCCEEDED(hr))
+ return hr;
+
+ CMINVOKECOMMANDINFO cm = { sizeof(cm), 0 };
+ cm.lpVerb = g_ContextMenu.GetString();
+ cm.nShow = SW_SHOW;
+ hr = spContextMenu->InvokeCommand(&cm);
+
+ if (!SUCCEEDED(hr))
+ {
+ wprintf(L"IContextMenu->InvokeCommand failed: 0x%x\n", hr);
+ return hr;
+ }
+ wprintf(L"IContextMenu->InvokeCommand returned: 0x%x\n", hr);
+ }
+
+ switch (g_Wait)
+ {
+ case Wait_None:
+ break;
+ case Wait_Infinite:
+ while (true) {
+ Sleep(1000);
+ }
+ break;
+ case Wait_OpenWindows:
+ WaitWindows();
+ break;
+ case Wait_Input:
+ wprintf(L"Press any key to continue...\n");
+ _getch();
+ break;
+
+ }
+ return 0;
+}
diff --git a/modules/rosapps/applications/devutils/shlextdbg/shlextdbg.rc
b/modules/rosapps/applications/devutils/shlextdbg/shlextdbg.rc
new file mode 100644
index 0000000000..ea1090a207
--- /dev/null
+++ b/modules/rosapps/applications/devutils/shlextdbg/shlextdbg.rc
@@ -0,0 +1,9 @@
+#include <windef.h>
+#include <winuser.h>
+
+#define REACTOS_STR_FILE_DESCRIPTION "ReactOS Shell Extension Debug Utility"
+#define REACTOS_STR_INTERNAL_NAME "shlextdbg"
+#define REACTOS_STR_ORIGINAL_FILENAME "shlextdbg.exe"
+#include <reactos/version.rc>
+
+#include <reactos/manifest_exe.rc>