programs/oleview/oleview.c

   1 /*
   2  * OleView (oleview.c)
   3  *
   4  * Copyright 2006 Piotr Caban
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "main.h"
  22 #include "commdlg.h"
  23 #include "shellapi.h"
  24 #include "wine/unicode.h"
  25
  26 GLOBALS globals;
  27 static const WCHAR wszRegEdit[] = { '\\','r','e','g','e','d','i','t','.','e','x','e','\0' };
  28 static const WCHAR wszFormat[] = { '<','o','b','j','e','c','t','\n',' ',' ',' ',
  29     'c','l','a','s','s','i','d','=','\"','c','l','s','i','d',':','%','s','\"','\n',
  30     '>','\n','<','/','o','b','j','e','c','t','>','\0' };
  31
  32 static INT_PTR CALLBACK SysConfProc(HWND hDlgWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
  33 {
  34     HKEY hKey;
  35     WCHAR buffer[MAX_LOAD_STRING];
  36     DWORD bufSize;
  37
  38     WCHAR wszReg[] = { 'S','o','f','t','w','a','r','e','\\',
  39         'M','i','c','r','o','s','o','f','t','\\','O','L','E','\\','\0' };
  40     WCHAR wszEnableDCOM[] = { 'E','n','a','b','l','e','D','C','O','M','\0' };
  41     WCHAR wszEnableRemote[] = { 'E','n','a','b','l','e',
  42         'R','e','m','o','t','e','C','o','n','n','e','c','t','\0' };
  43     WCHAR wszYes[] = { 'Y', '\0' };
  44     WCHAR wszNo[] = { 'N', '\0' };
  45
  46     switch(uMsg)
  47     {
  48         case WM_INITDIALOG:
  49             if(RegOpenKeyW(HKEY_LOCAL_MACHINE, wszReg, &hKey) != ERROR_SUCCESS)
  50                 RegCreateKeyW(HKEY_LOCAL_MACHINE, wszReg, &hKey);
  51
  52             bufSize = sizeof(buffer);
  53             if(RegGetValueW(hKey, NULL, wszEnableDCOM, RRF_RT_REG_SZ,
  54                         NULL, buffer, &bufSize) != ERROR_SUCCESS)
  55             {
  56                 bufSize = sizeof(wszYes);
  57                 RegSetValueExW(hKey, wszEnableDCOM, 0, REG_SZ, (BYTE*)wszYes, bufSize);
  58             }
  59
  60             CheckDlgButton(hDlgWnd, IDC_ENABLEDCOM,
  61                     buffer[0]=='Y' ? BST_CHECKED : BST_UNCHECKED);
  62
  63             bufSize = sizeof(buffer);
  64             if(RegGetValueW(hKey, NULL, wszEnableRemote, RRF_RT_REG_SZ,
  65                         NULL, buffer, &bufSize) != ERROR_SUCCESS)
  66             {
  67                 bufSize = sizeof(wszYes);
  68                 RegSetValueExW(hKey, wszEnableRemote, 0, REG_SZ, (BYTE*)wszYes, bufSize);
  69             }
  70
  71             CheckDlgButton(hDlgWnd, IDC_ENABLEREMOTE,
  72                     buffer[0]=='Y' ? BST_CHECKED : BST_UNCHECKED);
  73
  74             RegCloseKey(hKey);
  75             return TRUE;
  76         case WM_COMMAND:
  77             switch(LOWORD(wParam)) {
  78             case IDOK:
  79                 bufSize = sizeof(wszYes);
  80
  81                 RegOpenKeyW(HKEY_LOCAL_MACHINE, wszReg, &hKey);
  82
  83                 RegSetValueExW(hKey, wszEnableDCOM, 0, REG_SZ,
  84                         IsDlgButtonChecked(hDlgWnd, IDC_ENABLEDCOM) == BST_CHECKED ?
  85                         (BYTE*)wszYes : (BYTE*)wszNo, bufSize);
  86
  87                 RegSetValueExW(hKey, wszEnableRemote, 0, REG_SZ,
  88                         IsDlgButtonChecked(hDlgWnd, IDC_ENABLEREMOTE) == BST_CHECKED ?
  89                         (BYTE*)wszYes : (BYTE*)wszNo, bufSize);
  90
  91                 RegCloseKey(hKey);
  92
  93                 EndDialog(hDlgWnd, IDOK);
  94                 return TRUE;
  95             case IDCANCEL:
  96                 EndDialog(hDlgWnd, IDCANCEL);
  97                 return TRUE;
  98             }
  99     }
 100
 101     return FALSE;
 102 }
 103
 104 static INT_PTR CALLBACK CreateInstOnProc(HWND hDlgWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
 105 {
 106     HWND hEdit;
 107
 108     switch(uMsg)
 109     {
 110         case WM_COMMAND:
 111             switch(LOWORD(wParam)) {
 112             case IDOK:
 113                 memset(globals.wszMachineName, 0, sizeof(WCHAR[MAX_LOAD_STRING]));
 114                 hEdit = GetDlgItem(hDlgWnd, IDC_MACHINE);
 115
 116                 if (GetWindowTextLengthW(hEdit)>0)
 117                     GetWindowTextW(hEdit, globals.wszMachineName, MAX_LOAD_STRING);
 118
 119                 EndDialog(hDlgWnd, IDOK);
 120                 return TRUE;
 121             case IDCANCEL:
 122                 EndDialog(hDlgWnd, IDCANCEL);
 123                 return TRUE;
 124             }
 125     }
 126
 127     return FALSE;
 128 }
 129
 130 static void InitOpenFileName(HWND hWnd, OPENFILENAMEW *pofn, WCHAR *wszFilter,
 131         WCHAR *wszTitle, WCHAR *wszFileName)
 132 {
 133     memset(pofn, 0, sizeof(OPENFILENAMEW));
 134     pofn->lStructSize = sizeof(OPENFILENAMEW);
 135     pofn->hwndOwner = hWnd;
 136     pofn->hInstance = globals.hMainInst;
 137
 138     pofn->lpstrTitle = wszTitle;
 139     pofn->lpstrFilter = wszFilter;
 140     pofn->nFilterIndex = 0;
 141     pofn->lpstrFile = wszFileName;
 142     pofn->nMaxFile = MAX_LOAD_STRING;
 143     pofn->Flags = OFN_HIDEREADONLY | OFN_ENABLESIZING;
 144 }
 145
 146 static void CopyClsid(HTREEITEM item)
 147 {
 148     TVITEMW tvi;
 149
 150     memset(&tvi, 0, sizeof(TVITEMW));
 151     tvi.hItem = item;
 152     tvi.cchTextMax = MAX_LOAD_STRING;
 153     SendMessageW(globals.hTree, TVM_GETITEMW, 0, (LPARAM)&tvi);
 154
 155     if(OpenClipboard(globals.hMainWnd) && EmptyClipboard() && tvi.lParam)
 156     {
 157         HANDLE hClipData = GlobalAlloc(GHND, sizeof(WCHAR[MAX_LOAD_STRING]));
 158         LPVOID pLoc = GlobalLock(hClipData);
 159
 160         lstrcpyW(pLoc, ((ITEM_INFO *)tvi.lParam)->clsid);
 161         GlobalUnlock(hClipData);
 162         SetClipboardData(CF_UNICODETEXT, hClipData);
 163         CloseClipboard();
 164     }
 165 }
 166
 167 static void CopyHTMLTag(HTREEITEM item)
 168 {
 169     TVITEMW tvi;
 170
 171     memset(&tvi, 0, sizeof(TVITEMW));
 172     tvi.hItem = item;
 173     tvi.cchTextMax = MAX_LOAD_STRING;
 174     SendMessageW(globals.hTree, TVM_GETITEMW, 0, (LPARAM)&tvi);
 175
 176     if(OpenClipboard(globals.hMainWnd) && EmptyClipboard() && tvi.lParam)
 177     {
 178         HANDLE hClipData = GlobalAlloc(GHND, sizeof(WCHAR[MAX_LOAD_STRING]));
 179         LPVOID pLoc = GlobalLock(hClipData);
 180         int clsidLen = lstrlenW(((ITEM_INFO *)tvi.lParam)->clsid)-1;
 181
 182         ((ITEM_INFO *)tvi.lParam)->clsid[clsidLen] = '\0';
 183         wsprintfW(pLoc, wszFormat, ((ITEM_INFO *)tvi.lParam)->clsid+1);
 184         ((ITEM_INFO *)tvi.lParam)->clsid[clsidLen] = '}';
 185
 186         GlobalUnlock(hClipData);
 187         SetClipboardData(CF_UNICODETEXT, hClipData);
 188         CloseClipboard();
 189     }
 190 }
 191
 192 static void ResizeChild(void)
 193 {
 194     RECT client, stat, tool;
 195
 196     MoveWindow(globals.hStatusBar, 0, 0, 0, 0, TRUE);
 197     MoveWindow(globals.hToolBar, 0, 0, 0, 0, TRUE);
 198
 199     if(IsWindowVisible(globals.hStatusBar))
 200         GetClientRect(globals.hStatusBar, &stat);
 201     else stat.bottom = 0;
 202
 203     if(IsWindowVisible(globals.hToolBar))
 204     {
 205         GetClientRect(globals.hToolBar, &tool);
 206         tool.bottom += 2;
 207     }
 208     else tool.bottom = 0;
 209
 210     GetClientRect(globals.hMainWnd, &client);
 211     MoveWindow(globals.hPaneWnd, 0, tool.bottom,
 212             client.right, client.bottom-tool.bottom-stat.bottom, TRUE);
 213 }
 214
 215 void RefreshMenu(HTREEITEM item)
 216 {
 217     TVITEMW tvi;
 218     HTREEITEM parent;
 219     HMENU hMenu = GetMenu(globals.hMainWnd);
 220
 221     memset(&tvi, 0, sizeof(TVITEMW));
 222     tvi.hItem = item;
 223     SendMessageW(globals.hTree, TVM_GETITEMW, 0, (LPARAM)&tvi);
 224
 225     parent = (HTREEITEM)SendMessageW(globals.hTree, TVM_GETNEXTITEM,
 226             TVGN_PARENT, (LPARAM)item);
 227
 228     SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_CREATEINST, FALSE);
 229     SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_RELEASEINST, FALSE);
 230     SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_VIEW, FALSE);
 231
 232     if(tvi.lParam && ((ITEM_INFO *)tvi.lParam)->cFlag&SHOWALL)
 233     {
 234         EnableMenuItem(hMenu, IDM_COPYCLSID, MF_ENABLED);
 235         EnableMenuItem(hMenu, IDM_HTMLTAG, MF_ENABLED);
 236         EnableMenuItem(hMenu, IDM_VIEW, MF_GRAYED);
 237
 238         if(!((ITEM_INFO *)tvi.lParam)->loaded)
 239         {
 240             EnableMenuItem(hMenu, IDM_CREATEINST, MF_ENABLED);
 241             EnableMenuItem(hMenu, IDM_CREATEINSTON, MF_ENABLED);
 242             EnableMenuItem(hMenu, IDM_RELEASEINST, MF_GRAYED);
 243             SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_CREATEINST, TRUE);
 244         }
 245         else
 246         {
 247             EnableMenuItem(hMenu, IDM_CREATEINST, MF_GRAYED);
 248             EnableMenuItem(hMenu, IDM_CREATEINSTON, MF_GRAYED);
 249             EnableMenuItem(hMenu, IDM_RELEASEINST, MF_ENABLED);
 250             SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_RELEASEINST, TRUE);
 251         }
 252     }
 253     else if(tvi.lParam &&
 254             (((ITEM_INFO *)tvi.lParam)->cFlag&INTERFACE || parent==tree.hTL))
 255     {
 256         EnableMenuItem(hMenu, IDM_TYPEINFO, MF_GRAYED);
 257         EnableMenuItem(hMenu, IDM_CREATEINST, MF_GRAYED);
 258         EnableMenuItem(hMenu, IDM_CREATEINSTON, MF_GRAYED);
 259         EnableMenuItem(hMenu, IDM_RELEASEINST, MF_GRAYED);
 260         EnableMenuItem(hMenu, IDM_COPYCLSID, MF_ENABLED);
 261         EnableMenuItem(hMenu, IDM_HTMLTAG, MF_GRAYED);
 262         EnableMenuItem(hMenu, IDM_VIEW, MF_ENABLED);
 263         SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_VIEW, TRUE);
 264     }
 265     else
 266     {
 267         EnableMenuItem(hMenu, IDM_TYPEINFO, MF_GRAYED);
 268         EnableMenuItem(hMenu, IDM_CREATEINST, MF_GRAYED);
 269         EnableMenuItem(hMenu, IDM_CREATEINSTON, MF_GRAYED);
 270         EnableMenuItem(hMenu, IDM_RELEASEINST, MF_GRAYED);
 271         EnableMenuItem(hMenu, IDM_COPYCLSID, MF_GRAYED);
 272         EnableMenuItem(hMenu, IDM_HTMLTAG, MF_GRAYED);
 273         EnableMenuItem(hMenu, IDM_VIEW, MF_GRAYED);
 274     }
 275
 276     if(parent==tree.hAID || parent==tree.hGBCC)
 277         EnableMenuItem(hMenu, IDM_COPYCLSID, MF_ENABLED);
 278 }
 279
 280 static int MenuCommand(WPARAM wParam, HWND hWnd)
 281 {
 282     BOOL vis;
 283     HTREEITEM hSelect;
 284     WCHAR wszAbout[MAX_LOAD_STRING];
 285
 286     switch(wParam)
 287     {
 288         case IDM_ABOUT:
 289             LoadStringW(globals.hMainInst, IDS_ABOUT, wszAbout,
 290                     sizeof(wszAbout)/sizeof(wszAbout[0]));
 291             ShellAboutW(hWnd, wszAbout, NULL, NULL);
 292             break;
 293         case IDM_COPYCLSID:
 294             hSelect = (HTREEITEM)SendMessageW(globals.hTree,
 295                     TVM_GETNEXTITEM, TVGN_CARET, 0);
 296             CopyClsid(hSelect);
 297             break;
 298         case IDM_HTMLTAG:
 299             hSelect = (HTREEITEM)SendMessageW(globals.hTree,
 300                     TVM_GETNEXTITEM, TVGN_CARET, 0);
 301             CopyHTMLTag(hSelect);
 302             break;
 303         case IDM_CREATEINST:
 304             hSelect = (HTREEITEM)SendMessageW(globals.hTree,
 305                     TVM_GETNEXTITEM, TVGN_CARET, 0);
 306             CreateInst(hSelect, NULL);
 307             SendMessageW(globals.hTree, TVM_EXPAND, TVE_EXPAND, (LPARAM)hSelect);
 308             break;
 309         case IDM_CREATEINSTON:
 310             if(DialogBoxW(0, MAKEINTRESOURCEW(DLG_CREATEINSTON),
 311                         hWnd, CreateInstOnProc) == IDCANCEL) break;
 312             hSelect = (HTREEITEM)SendMessageW(globals.hTree,
 313                     TVM_GETNEXTITEM, TVGN_CARET, 0);
 314             CreateInst(hSelect, globals.wszMachineName);
 315             SendMessageW(globals.hTree, TVM_EXPAND, TVE_EXPAND, (LPARAM)hSelect);
 316             break;
 317         case IDM_RELEASEINST:
 318             hSelect = (HTREEITEM)SendMessageW(globals.hTree,
 319                     TVM_GETNEXTITEM, TVGN_CARET, 0);
 320             ReleaseInst(hSelect);
 321             RefreshMenu(hSelect);
 322             RefreshDetails(hSelect);
 323             break;
 324         case IDM_EXPERT:
 325             globals.bExpert = !globals.bExpert;
 326             CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
 327                     globals.bExpert ? MF_CHECKED : MF_UNCHECKED);
 328             EmptyTree();
 329             if(globals.bExpert) AddTreeEx();
 330             else AddTree();
 331             hSelect = (HTREEITEM)SendMessageW(globals.hTree,
 332                     TVM_GETNEXTITEM, TVGN_CHILD, (LPARAM)TVI_ROOT);
 333             SendMessageW(globals.hTree, TVM_SELECTITEM, 0, (LPARAM)hSelect);
 334             RefreshMenu(hSelect);
 335             break;
 336         case IDM_FLAG_INSERV:
 337             vis = globals.dwClsCtx&CLSCTX_INPROC_SERVER;
 338             globals.dwClsCtx = globals.dwClsCtx&(~CLSCTX_INPROC_SERVER);
 339             globals.dwClsCtx = globals.dwClsCtx|((~vis)&CLSCTX_INPROC_SERVER);
 340             if(!globals.dwClsCtx) globals.dwClsCtx = vis;
 341             else CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
 342                     vis ? MF_UNCHECKED : MF_CHECKED);
 343             break;
 344         case IDM_FLAG_INHANDL:
 345             vis = globals.dwClsCtx&CLSCTX_INPROC_HANDLER;
 346             globals.dwClsCtx = globals.dwClsCtx&(~CLSCTX_INPROC_HANDLER);
 347             globals.dwClsCtx = globals.dwClsCtx|((~vis)&CLSCTX_INPROC_HANDLER);
 348             if(!globals.dwClsCtx) globals.dwClsCtx = vis;
 349             else CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
 350                     vis ? MF_UNCHECKED : MF_CHECKED);
 351             break;
 352         case IDM_FLAG_LOCSERV:
 353             vis = globals.dwClsCtx&CLSCTX_LOCAL_SERVER;
 354             globals.dwClsCtx = globals.dwClsCtx&(~CLSCTX_LOCAL_SERVER);
 355             globals.dwClsCtx = globals.dwClsCtx|((~vis)&CLSCTX_LOCAL_SERVER);
 356             if(!globals.dwClsCtx) globals.dwClsCtx = vis;
 357             else CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
 358                     vis ? MF_UNCHECKED : MF_CHECKED);
 359             break;
 360         case IDM_FLAG_REMSERV:
 361             vis = globals.dwClsCtx&CLSCTX_REMOTE_SERVER;
 362             globals.dwClsCtx = globals.dwClsCtx&(~CLSCTX_REMOTE_SERVER);
 363             globals.dwClsCtx = globals.dwClsCtx|((~vis)&CLSCTX_REMOTE_SERVER);
 364             if(!globals.dwClsCtx) globals.dwClsCtx = vis;
 365             else CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
 366                     vis ? MF_UNCHECKED : MF_CHECKED);
 367             break;
 368         case IDM_REFRESH:
 369             EmptyTree();
 370             if(globals.bExpert) AddTreeEx();
 371             else AddTree();
 372             hSelect = (HTREEITEM)SendMessageW(globals.hTree,
 373                     TVM_GETNEXTITEM, TVGN_CHILD, (LPARAM)TVI_ROOT);
 374             SendMessageW(globals.hTree, TVM_SELECTITEM, 0, (LPARAM)hSelect);
 375             RefreshMenu(hSelect);
 376             break;
 377         case IDM_REGEDIT:
 378         {
 379             STARTUPINFOW si;
 380             PROCESS_INFORMATION pi;
 381             WCHAR app[MAX_PATH];
 382
 383             GetWindowsDirectoryW( app, MAX_PATH - sizeof(wszRegEdit)/sizeof(WCHAR) );
 384             lstrcatW( app, wszRegEdit );
 385             memset(&si, 0, sizeof(si));
 386             si.cb = sizeof(si);
 387             if (CreateProcessW(app, app, NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi))
 388             {
 389                 CloseHandle(pi.hProcess);
 390                 CloseHandle(pi.hThread);
 391             }
 392             break;
 393         }
 394         case IDM_STATUSBAR:
 395             vis = IsWindowVisible(globals.hStatusBar);
 396             ShowWindow(globals.hStatusBar, vis ? SW_HIDE : SW_SHOW);
 397             CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
 398                     vis ? MF_UNCHECKED : MF_CHECKED);
 399             ResizeChild();
 400             break;
 401         case IDM_SYSCONF:
 402             DialogBoxW(0, MAKEINTRESOURCEW(DLG_SYSCONF), hWnd, SysConfProc);
 403             break;
 404         case IDM_TOOLBAR:
 405             vis = IsWindowVisible(globals.hToolBar);
 406             ShowWindow(globals.hToolBar, vis ? SW_HIDE : SW_SHOW);
 407             CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
 408                     vis ? MF_UNCHECKED : MF_CHECKED);
 409             ResizeChild();
 410             break;
 411         case IDM_TYPELIB:
 412             {
 413             static const WCHAR filterW[] = {'%','s','%','c','*','.','t','l','b',';','*','.','o','l','b',';','*','.','d','l','l',';','*','.','o','c','x',';','*','.','e','x','e','%','c','%','s','%','c','*','.','*','%','c',0};
 414             OPENFILENAMEW ofn;
 415             static WCHAR wszTitle[MAX_LOAD_STRING];
 416             static WCHAR wszName[MAX_LOAD_STRING];
 417             WCHAR filter_typelib[MAX_LOAD_STRING], filter_all[MAX_LOAD_STRING], filter[MAX_PATH];
 418
 419             LoadStringW(globals.hMainInst, IDS_OPEN, wszTitle, sizeof(wszTitle)/sizeof(wszTitle[0]));
 420             LoadStringW(globals.hMainInst, IDS_OPEN_FILTER_TYPELIB, filter_typelib, sizeof(filter_typelib)/sizeof(WCHAR));
 421             LoadStringW(globals.hMainInst, IDS_OPEN_FILTER_ALL, filter_all, sizeof(filter_all)/sizeof(WCHAR));
 422             wsprintfW( filter, filterW, filter_typelib, 0, 0, filter_all, 0, 0 );
 423             InitOpenFileName(hWnd, &ofn, filter, wszTitle, wszName);
 424             if(GetOpenFileNameW(&ofn)) CreateTypeLibWindow(globals.hMainInst, wszName);
 425             break;
 426             }
 427         case IDM_VIEW:
 428             hSelect = (HTREEITEM)SendMessageW(globals.hTree,
 429                     TVM_GETNEXTITEM, TVGN_CARET, 0);
 430             if(IsInterface(hSelect)) InterfaceViewer(hSelect);
 431             else CreateTypeLibWindow(globals.hMainInst, NULL);
 432             break;
 433         case IDM_EXIT:
 434             DestroyWindow(hWnd);
 435             break;
 436     }
 437     return 0;
 438 }
 439
 440 static void UpdateStatusBar(int itemID)
 441 {
 442     WCHAR info[MAX_LOAD_STRING];
 443
 444     if(!LoadStringW(globals.hMainInst, itemID, info, sizeof(info)/sizeof(info[0])))
 445         LoadStringW(globals.hMainInst, IDS_READY, info, sizeof(info)/sizeof(info[0]));
 446
 447     SendMessageW(globals.hStatusBar, SB_SETTEXTW, 0, (LPARAM)info);
 448 }
 449
 450 static LRESULT CALLBACK WndProc(HWND hWnd, UINT uMsg,
 451         WPARAM wParam, LPARAM lParam)
 452 {
 453     switch(uMsg)
 454     {
 455         case WM_CREATE:
 456             OleInitialize(NULL);
 457             PaneRegisterClassW();
 458             TypeLibRegisterClassW();
 459             if(!CreatePanedWindow(hWnd, &globals.hPaneWnd, globals.hMainInst))
 460                 PostQuitMessage(0);
 461             SetLeft(globals.hPaneWnd, CreateTreeWindow(globals.hMainInst));
 462             SetRight(globals.hPaneWnd, CreateDetailsWindow(globals.hMainInst));
 463             SetFocus(globals.hTree);
 464             break;
 465         case WM_COMMAND:
 466             MenuCommand(LOWORD(wParam), hWnd);
 467             break;
 468         case WM_DESTROY:
 469             EmptyTree();
 470             OleUninitialize();
 471             PostQuitMessage(0);
 472             break;
 473         case WM_MENUSELECT:
 474             UpdateStatusBar(LOWORD(wParam));
 475             break;
 476         case WM_SETFOCUS:
 477             SetFocus(globals.hTree);
 478             break;
 479         case WM_SIZE:
 480             if(wParam == SIZE_MINIMIZED) break;
 481             ResizeChild();
 482             break;
 483         default:
 484             return DefWindowProcW(hWnd, uMsg, wParam, lParam);
 485     }
 486     return 0;
 487 }
 488
 489 static BOOL InitApplication(HINSTANCE hInst)
 490 {
 491     WNDCLASSW wc;
 492     WCHAR wszAppName[MAX_LOAD_STRING];
 493
 494     LoadStringW(hInst, IDS_APPNAME, wszAppName, sizeof(wszAppName)/sizeof(wszAppName[0]));
 495
 496     memset(&wc, 0, sizeof(WNDCLASSW));
 497     wc.lpfnWndProc = WndProc;
 498     wc.hbrBackground = (HBRUSH)(COLOR_WINDOW+1);
 499     wc.hCursor       = LoadCursorW(0, (LPCWSTR)IDC_ARROW);
 500     wc.lpszMenuName = MAKEINTRESOURCEW(IDM_MENU);
 501     wc.lpszClassName = wszAppName;
 502
 503     if(!RegisterClassW(&wc))
 504         return FALSE;
 505
 506     return TRUE;
 507 }
 508
 509 static BOOL InitInstance(HINSTANCE hInst, int nCmdShow)
 510 {
 511     HWND hWnd;
 512     WCHAR wszAppName[MAX_LOAD_STRING];
 513     WCHAR wszTitle[MAX_LOAD_STRING];
 514     TBBUTTON tB[] = {
 515         {0, 0, 0, BTNS_SEP, {0, 0}, 0, 0},
 516         {0, IDM_BIND, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
 517         {1, IDM_TYPELIB, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
 518         {0, 0, 0, BTNS_SEP, {0, 0}, 0, 0},
 519         {2, IDM_REGEDIT, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
 520         {0, 0, 0, BTNS_SEP, {0, 0}, 0, 0},
 521         {3, IDM_CREATEINST, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
 522         {4, IDM_RELEASEINST, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
 523         {0, 0, 0, BTNS_SEP, {0, 0}, 0, 0},
 524         {5, IDM_VIEW, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0}
 525     };
 526
 527     LoadStringW(hInst, IDS_APPNAME, wszAppName, sizeof(wszAppName)/sizeof(wszAppName[0]));
 528     LoadStringW(hInst, IDS_APPTITLE, wszTitle, sizeof(wszTitle)/sizeof(wszTitle[0]));
 529
 530     hWnd = CreateWindowW(wszAppName, wszTitle, WS_OVERLAPPEDWINDOW,
 531             CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, NULL, NULL, hInst, NULL);
 532     if(!hWnd) return FALSE;
 533
 534     globals.hStatusBar = CreateStatusWindowW(WS_VISIBLE|WS_CHILD,
 535             wszTitle, hWnd, 0);
 536
 537     globals.hToolBar = CreateToolbarEx(hWnd, WS_CHILD|WS_VISIBLE, 0, 1, hInst,
 538             IDB_TOOLBAR, tB, 10, 16, 16, 16, 16, sizeof(TBBUTTON));
 539     SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_CREATEINST, FALSE);
 540     SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_RELEASEINST, FALSE);
 541     SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_VIEW, FALSE);
 542
 543     globals.hMainWnd = hWnd;
 544     globals.hMainInst = hInst;
 545     globals.bExpert = TRUE;
 546     globals.dwClsCtx = CLSCTX_INPROC_SERVER|CLSCTX_LOCAL_SERVER;
 547
 548     ShowWindow(hWnd, nCmdShow);
 549     UpdateWindow(hWnd);
 550
 551     return TRUE;
 552 }
 553
 554 int APIENTRY WinMain(HINSTANCE hInst, HINSTANCE hPrevInst, LPSTR lpCmdLine, int nCmdShow)
 555 {
 556     MSG msg;
 557     HANDLE hAccelTable;
 558
 559     if(!InitApplication(hInst))
 560         return FALSE;
 561
 562     if(!InitInstance(hInst, nCmdShow))
 563         return FALSE;
 564
 565     hAccelTable = LoadAcceleratorsW(hInst, MAKEINTRESOURCEW(IDA_OLEVIEW));
 566
 567     while(GetMessageW(&msg, NULL, 0, 0))
 568     {
 569         if(TranslateAcceleratorW(globals.hMainWnd, hAccelTable, &msg)) continue;
 570
 571         TranslateMessage(&msg);
 572         DispatchMessageW(&msg);
 573     }
 574
 575     return msg.wParam;
 576 }