oleview.c 20.7 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
/*
 * OleView (oleview.c)
 *
 * Copyright 2006 Piotr Caban
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
 */

#include "main.h"
22
#include "commctrl.h"
23 24
#include "commdlg.h"
#include "shellapi.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 31
    '>','\n','<','/','o','b','j','e','c','t','>','\0' };

32
static INT_PTR CALLBACK SysConfProc(HWND hDlgWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48
{
    HKEY hKey;
    WCHAR buffer[MAX_LOAD_STRING];
    DWORD bufSize;

    WCHAR wszReg[] = { 'S','o','f','t','w','a','r','e','\\',
        'M','i','c','r','o','s','o','f','t','\\','O','L','E','\\','\0' };
    WCHAR wszEnableDCOM[] = { 'E','n','a','b','l','e','D','C','O','M','\0' };
    WCHAR wszEnableRemote[] = { 'E','n','a','b','l','e',
        'R','e','m','o','t','e','C','o','n','n','e','c','t','\0' };
    WCHAR wszYes[] = { 'Y', '\0' };
    WCHAR wszNo[] = { 'N', '\0' };

    switch(uMsg)
    {
        case WM_INITDIALOG:
49 50
            if(RegOpenKeyW(HKEY_LOCAL_MACHINE, wszReg, &hKey) != ERROR_SUCCESS)
                RegCreateKeyW(HKEY_LOCAL_MACHINE, wszReg, &hKey);
51 52

            bufSize = sizeof(buffer);
53
            if(RegGetValueW(hKey, NULL, wszEnableDCOM, RRF_RT_REG_SZ,
54 55 56
                        NULL, buffer, &bufSize) != ERROR_SUCCESS)
            {
                bufSize = sizeof(wszYes);
57
                RegSetValueExW(hKey, wszEnableDCOM, 0, REG_SZ, (BYTE*)wszYes, bufSize);
58 59 60 61 62 63
            }

            CheckDlgButton(hDlgWnd, IDC_ENABLEDCOM,
                    buffer[0]=='Y' ? BST_CHECKED : BST_UNCHECKED);

            bufSize = sizeof(buffer);
64
            if(RegGetValueW(hKey, NULL, wszEnableRemote, RRF_RT_REG_SZ,
65 66 67
                        NULL, buffer, &bufSize) != ERROR_SUCCESS)
            {
                bufSize = sizeof(wszYes);
68
                RegSetValueExW(hKey, wszEnableRemote, 0, REG_SZ, (BYTE*)wszYes, bufSize);
69 70 71 72 73 74 75 76 77 78 79 80
            }

            CheckDlgButton(hDlgWnd, IDC_ENABLEREMOTE,
                    buffer[0]=='Y' ? BST_CHECKED : BST_UNCHECKED);
            
            RegCloseKey(hKey);
            return TRUE;
        case WM_COMMAND:
            switch(LOWORD(wParam)) {
            case IDOK:
                bufSize = sizeof(wszYes);

81
                RegOpenKeyW(HKEY_LOCAL_MACHINE, wszReg, &hKey);
82

83
                RegSetValueExW(hKey, wszEnableDCOM, 0, REG_SZ,
84 85 86
                        IsDlgButtonChecked(hDlgWnd, IDC_ENABLEDCOM) == BST_CHECKED ?
                        (BYTE*)wszYes : (BYTE*)wszNo, bufSize);

87
                RegSetValueExW(hKey, wszEnableRemote, 0, REG_SZ,
88 89 90 91 92 93 94 95 96 97 98 99 100 101 102
                        IsDlgButtonChecked(hDlgWnd, IDC_ENABLEREMOTE) == BST_CHECKED ?
                        (BYTE*)wszYes : (BYTE*)wszNo, bufSize);

                RegCloseKey(hKey);

                EndDialog(hDlgWnd, IDOK);
                return TRUE;
            case IDCANCEL:
                EndDialog(hDlgWnd, IDCANCEL);
                return TRUE;
            }
    }

    return FALSE;
}
103

104
static INT_PTR CALLBACK CreateInstOnProc(HWND hDlgWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
105 106 107 108 109 110 111 112 113 114 115
{
    HWND hEdit;

    switch(uMsg)
    {
        case WM_COMMAND:
            switch(LOWORD(wParam)) {
            case IDOK:
                memset(globals.wszMachineName, 0, sizeof(WCHAR[MAX_LOAD_STRING]));
                hEdit = GetDlgItem(hDlgWnd, IDC_MACHINE);

116 117
                if (GetWindowTextLengthW(hEdit)>0)
                    GetWindowTextW(hEdit, globals.wszMachineName, MAX_LOAD_STRING);
118 119 120 121 122 123 124 125 126 127 128 129

                EndDialog(hDlgWnd, IDOK);
                return TRUE;
            case IDCANCEL:
                EndDialog(hDlgWnd, IDCANCEL);
                return TRUE;
            }
    }

    return FALSE;
}

130
static void InitOpenFileName(HWND hWnd, OPENFILENAMEW *pofn, WCHAR *wszFilter,
131 132
        WCHAR *wszTitle, WCHAR *wszFileName)
{
133 134
    memset(pofn, 0, sizeof(OPENFILENAMEW));
    pofn->lStructSize = sizeof(OPENFILENAMEW);
135 136 137 138 139 140 141 142
    pofn->hwndOwner = hWnd;
    pofn->hInstance = globals.hMainInst;

    pofn->lpstrTitle = wszTitle;
    pofn->lpstrFilter = wszFilter;
    pofn->nFilterIndex = 0;
    pofn->lpstrFile = wszFileName;
    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 152
    tvi.hItem = item;
    tvi.cchTextMax = MAX_LOAD_STRING;
153
    SendMessageW(globals.hTree, TVM_GETITEMW, 0, (LPARAM)&tvi);
154 155 156 157 158 159 160 161

    if(OpenClipboard(globals.hMainWnd) && EmptyClipboard() && tvi.lParam)
    {
        HANDLE hClipData = GlobalAlloc(GHND, sizeof(WCHAR[MAX_LOAD_STRING]));
        LPVOID pLoc = GlobalLock(hClipData);

        lstrcpyW(pLoc, ((ITEM_INFO *)tvi.lParam)->clsid);
        GlobalUnlock(hClipData);
162
        SetClipboardData(CF_UNICODETEXT, hClipData);
163 164 165 166
        CloseClipboard();
    }
}

167
static void CopyHTMLTag(HTREEITEM item)
168
{
169
    TVITEMW tvi;
170

171
    memset(&tvi, 0, sizeof(TVITEMW));
172 173
    tvi.hItem = item;
    tvi.cchTextMax = MAX_LOAD_STRING;
174
    SendMessageW(globals.hTree, TVM_GETITEMW, 0, (LPARAM)&tvi);
175 176 177 178 179 180 181 182 183 184 185 186

    if(OpenClipboard(globals.hMainWnd) && EmptyClipboard() && tvi.lParam)
    {
        HANDLE hClipData = GlobalAlloc(GHND, sizeof(WCHAR[MAX_LOAD_STRING]));
        LPVOID pLoc = GlobalLock(hClipData);
        int clsidLen = lstrlenW(((ITEM_INFO *)tvi.lParam)->clsid)-1;

        ((ITEM_INFO *)tvi.lParam)->clsid[clsidLen] = '\0';
        wsprintfW(pLoc, wszFormat, ((ITEM_INFO *)tvi.lParam)->clsid+1);
        ((ITEM_INFO *)tvi.lParam)->clsid[clsidLen] = '}';

        GlobalUnlock(hClipData);
187
        SetClipboardData(CF_UNICODETEXT, hClipData);
188 189 190 191
        CloseClipboard();
    }
}

192
static void ResizeChild(void)
193
{
Piotr Caban's avatar
Piotr Caban committed
194
    RECT client, stat, tool;
195 196 197 198 199 200 201 202 203 204 205 206 207 208

    MoveWindow(globals.hStatusBar, 0, 0, 0, 0, TRUE);
    MoveWindow(globals.hToolBar, 0, 0, 0, 0, TRUE);

    if(IsWindowVisible(globals.hStatusBar))
        GetClientRect(globals.hStatusBar, &stat);
    else stat.bottom = 0;

    if(IsWindowVisible(globals.hToolBar))
    {
        GetClientRect(globals.hToolBar, &tool);
        tool.bottom += 2;
    }
    else tool.bottom = 0;
Piotr Caban's avatar
Piotr Caban committed
209 210 211 212

    GetClientRect(globals.hMainWnd, &client);
    MoveWindow(globals.hPaneWnd, 0, tool.bottom,
            client.right, client.bottom-tool.bottom-stat.bottom, TRUE);
213 214
}

215 216
void RefreshMenu(HTREEITEM item)
{
217
    TVITEMW tvi;
218 219 220
    HTREEITEM parent;
    HMENU hMenu = GetMenu(globals.hMainWnd);

221
    memset(&tvi, 0, sizeof(TVITEMW));
222
    tvi.hItem = item;
223
    SendMessageW(globals.hTree, TVM_GETITEMW, 0, (LPARAM)&tvi);
224

225 226
    parent = (HTREEITEM)SendMessageW(globals.hTree, TVM_GETNEXTITEM,
            TVGN_PARENT, (LPARAM)item);
227

228 229 230
    SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_CREATEINST, FALSE);
    SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_RELEASEINST, FALSE);
    SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_VIEW, FALSE);
231 232 233 234 235 236 237 238 239 240 241 242

    if(tvi.lParam && ((ITEM_INFO *)tvi.lParam)->cFlag&SHOWALL)
    {
        EnableMenuItem(hMenu, IDM_COPYCLSID, MF_ENABLED);
        EnableMenuItem(hMenu, IDM_HTMLTAG, MF_ENABLED);
        EnableMenuItem(hMenu, IDM_VIEW, MF_GRAYED);

        if(!((ITEM_INFO *)tvi.lParam)->loaded)
        {
            EnableMenuItem(hMenu, IDM_CREATEINST, MF_ENABLED);
            EnableMenuItem(hMenu, IDM_CREATEINSTON, MF_ENABLED);
            EnableMenuItem(hMenu, IDM_RELEASEINST, MF_GRAYED);
243
            SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_CREATEINST, TRUE);
244 245 246 247 248 249
        }
        else 
        {
            EnableMenuItem(hMenu, IDM_CREATEINST, MF_GRAYED);
            EnableMenuItem(hMenu, IDM_CREATEINSTON, MF_GRAYED);
            EnableMenuItem(hMenu, IDM_RELEASEINST, MF_ENABLED);
250
            SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_RELEASEINST, TRUE);
251 252
        }
    }
253 254
    else if(tvi.lParam && 
            (((ITEM_INFO *)tvi.lParam)->cFlag&INTERFACE || parent==tree.hTL))
255 256 257 258 259 260 261 262
    {
        EnableMenuItem(hMenu, IDM_TYPEINFO, MF_GRAYED);
        EnableMenuItem(hMenu, IDM_CREATEINST, MF_GRAYED);
        EnableMenuItem(hMenu, IDM_CREATEINSTON, MF_GRAYED);
        EnableMenuItem(hMenu, IDM_RELEASEINST, MF_GRAYED);
        EnableMenuItem(hMenu, IDM_COPYCLSID, MF_ENABLED);
        EnableMenuItem(hMenu, IDM_HTMLTAG, MF_GRAYED);
        EnableMenuItem(hMenu, IDM_VIEW, MF_ENABLED);
263
        SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_VIEW, TRUE);
264 265 266 267 268 269 270 271 272 273 274
    }
    else
    {
        EnableMenuItem(hMenu, IDM_TYPEINFO, MF_GRAYED);
        EnableMenuItem(hMenu, IDM_CREATEINST, MF_GRAYED);
        EnableMenuItem(hMenu, IDM_CREATEINSTON, MF_GRAYED);
        EnableMenuItem(hMenu, IDM_RELEASEINST, MF_GRAYED);
        EnableMenuItem(hMenu, IDM_COPYCLSID, MF_GRAYED);
        EnableMenuItem(hMenu, IDM_HTMLTAG, MF_GRAYED);
        EnableMenuItem(hMenu, IDM_VIEW, MF_GRAYED);
    }
275 276

    if(parent==tree.hAID || parent==tree.hGBCC)
277 278 279
        EnableMenuItem(hMenu, IDM_COPYCLSID, MF_ENABLED);
}

280
static int MenuCommand(WPARAM wParam, HWND hWnd)
281 282 283 284 285 286 287 288
{
    BOOL vis;
    HTREEITEM hSelect;
    WCHAR wszAbout[MAX_LOAD_STRING];

    switch(wParam)
    {
        case IDM_ABOUT:
289
            LoadStringW(globals.hMainInst, IDS_ABOUT, wszAbout, ARRAY_SIZE(wszAbout));
290
            ShellAboutW(hWnd, wszAbout, NULL, NULL);
291
            break;
292
        case IDM_COPYCLSID:
293 294
            hSelect = (HTREEITEM)SendMessageW(globals.hTree,
                    TVM_GETNEXTITEM, TVGN_CARET, 0);
295 296
            CopyClsid(hSelect);
            break;
297
        case IDM_HTMLTAG:
298 299
            hSelect = (HTREEITEM)SendMessageW(globals.hTree,
                    TVM_GETNEXTITEM, TVGN_CARET, 0);
300 301
            CopyHTMLTag(hSelect);
            break;
302
        case IDM_CREATEINST:
303 304
            hSelect = (HTREEITEM)SendMessageW(globals.hTree,
                    TVM_GETNEXTITEM, TVGN_CARET, 0);
305
            CreateInst(hSelect, NULL);
306
            SendMessageW(globals.hTree, TVM_EXPAND, TVE_EXPAND, (LPARAM)hSelect);
307 308
            break;
        case IDM_CREATEINSTON:
309
            if(DialogBoxW(0, MAKEINTRESOURCEW(DLG_CREATEINSTON),
310
                        hWnd, CreateInstOnProc) == IDCANCEL) break;
311 312
            hSelect = (HTREEITEM)SendMessageW(globals.hTree,
                    TVM_GETNEXTITEM, TVGN_CARET, 0);
313
            CreateInst(hSelect, globals.wszMachineName);
314
            SendMessageW(globals.hTree, TVM_EXPAND, TVE_EXPAND, (LPARAM)hSelect);
315 316
            break;
        case IDM_RELEASEINST:
317 318
            hSelect = (HTREEITEM)SendMessageW(globals.hTree,
                    TVM_GETNEXTITEM, TVGN_CARET, 0);
319 320
            ReleaseInst(hSelect);
            RefreshMenu(hSelect);
321
            RefreshDetails(hSelect);
322 323 324 325 326 327 328 329
            break;
        case IDM_EXPERT:
            globals.bExpert = !globals.bExpert;
            CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
                    globals.bExpert ? MF_CHECKED : MF_UNCHECKED);
            EmptyTree();
            if(globals.bExpert) AddTreeEx();
            else AddTree();
330 331
            hSelect = (HTREEITEM)SendMessageW(globals.hTree,
                    TVM_GETNEXTITEM, TVGN_CHILD, (LPARAM)TVI_ROOT);
332
            SendMessageW(globals.hTree, TVM_SELECTITEM, 0, (LPARAM)hSelect);
333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370
            RefreshMenu(hSelect);
            break;
        case IDM_FLAG_INSERV:
            vis = globals.dwClsCtx&CLSCTX_INPROC_SERVER;
            globals.dwClsCtx = globals.dwClsCtx&(~CLSCTX_INPROC_SERVER);
            globals.dwClsCtx = globals.dwClsCtx|((~vis)&CLSCTX_INPROC_SERVER);
            if(!globals.dwClsCtx) globals.dwClsCtx = vis;
            else CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
                    vis ? MF_UNCHECKED : MF_CHECKED);
            break;
        case IDM_FLAG_INHANDL:
            vis = globals.dwClsCtx&CLSCTX_INPROC_HANDLER;
            globals.dwClsCtx = globals.dwClsCtx&(~CLSCTX_INPROC_HANDLER);
            globals.dwClsCtx = globals.dwClsCtx|((~vis)&CLSCTX_INPROC_HANDLER);
            if(!globals.dwClsCtx) globals.dwClsCtx = vis;
            else CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
                    vis ? MF_UNCHECKED : MF_CHECKED);
            break;
        case IDM_FLAG_LOCSERV:
            vis = globals.dwClsCtx&CLSCTX_LOCAL_SERVER;
            globals.dwClsCtx = globals.dwClsCtx&(~CLSCTX_LOCAL_SERVER);
            globals.dwClsCtx = globals.dwClsCtx|((~vis)&CLSCTX_LOCAL_SERVER);
            if(!globals.dwClsCtx) globals.dwClsCtx = vis;
            else CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
                    vis ? MF_UNCHECKED : MF_CHECKED);
            break;
        case IDM_FLAG_REMSERV:
            vis = globals.dwClsCtx&CLSCTX_REMOTE_SERVER;
            globals.dwClsCtx = globals.dwClsCtx&(~CLSCTX_REMOTE_SERVER);
            globals.dwClsCtx = globals.dwClsCtx|((~vis)&CLSCTX_REMOTE_SERVER);
            if(!globals.dwClsCtx) globals.dwClsCtx = vis;
            else CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
                    vis ? MF_UNCHECKED : MF_CHECKED);
            break;
        case IDM_REFRESH:
            EmptyTree();
            if(globals.bExpert) AddTreeEx();
            else AddTree();
371 372
            hSelect = (HTREEITEM)SendMessageW(globals.hTree,
                    TVM_GETNEXTITEM, TVGN_CHILD, (LPARAM)TVI_ROOT);
373
            SendMessageW(globals.hTree, TVM_SELECTITEM, 0, (LPARAM)hSelect);
374 375 376 377
            RefreshMenu(hSelect);
            break;
        case IDM_REGEDIT:
        {
378
            STARTUPINFOW si;
379
            PROCESS_INFORMATION pi;
380
            WCHAR app[MAX_PATH];
381

382
            GetWindowsDirectoryW(app, MAX_PATH - ARRAY_SIZE(wszRegEdit));
383
            lstrcatW( app, wszRegEdit );
384 385
            memset(&si, 0, sizeof(si));
            si.cb = sizeof(si);
386
            if (CreateProcessW(app, app, NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi))
387 388 389 390
            {
                CloseHandle(pi.hProcess);
                CloseHandle(pi.hThread);
            }
391 392 393 394 395 396 397 398 399
            break;
        }
        case IDM_STATUSBAR:
            vis = IsWindowVisible(globals.hStatusBar);
            ShowWindow(globals.hStatusBar, vis ? SW_HIDE : SW_SHOW);
            CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
                    vis ? MF_UNCHECKED : MF_CHECKED);
            ResizeChild();
            break;
400
        case IDM_SYSCONF:
401
            DialogBoxW(0, MAKEINTRESOURCEW(DLG_SYSCONF), hWnd, SysConfProc);
402
            break;
403 404 405 406 407 408 409
        case IDM_TOOLBAR:
            vis = IsWindowVisible(globals.hToolBar);
            ShowWindow(globals.hToolBar, vis ? SW_HIDE : SW_SHOW);
            CheckMenuItem(GetMenu(hWnd), LOWORD(wParam),
                    vis ? MF_UNCHECKED : MF_CHECKED);
            ResizeChild();
            break;
410 411
        case IDM_TYPELIB:
            {
412
            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};
413
            OPENFILENAMEW ofn;
414 415
            static WCHAR wszTitle[MAX_LOAD_STRING];
            static WCHAR wszName[MAX_LOAD_STRING];
416
            WCHAR filter_typelib[MAX_LOAD_STRING], filter_all[MAX_LOAD_STRING], filter[MAX_PATH];
417

418 419 420
            LoadStringW(globals.hMainInst, IDS_OPEN, wszTitle, ARRAY_SIZE(wszTitle));
            LoadStringW(globals.hMainInst, IDS_OPEN_FILTER_TYPELIB, filter_typelib, ARRAY_SIZE(filter_typelib));
            LoadStringW(globals.hMainInst, IDS_OPEN_FILTER_ALL, filter_all, ARRAY_SIZE(filter_all));
421
            wsprintfW( filter, filterW, filter_typelib, 0, 0, filter_all, 0, 0 );
422
            InitOpenFileName(hWnd, &ofn, filter, wszTitle, wszName);
423
            if(GetOpenFileNameW(&ofn)) CreateTypeLibWindow(globals.hMainInst, wszName);
424 425
            break;
            }
426
        case IDM_VIEW:
427 428
            hSelect = (HTREEITEM)SendMessageW(globals.hTree,
                    TVM_GETNEXTITEM, TVGN_CARET, 0);
429
            if(IsInterface(hSelect)) InterfaceViewer(hSelect);
430
            else CreateTypeLibWindow(globals.hMainInst, NULL);
431
            break;
432 433 434 435 436 437 438
        case IDM_EXIT:
            DestroyWindow(hWnd);
            break;
    }
    return 0;
}

439
static void UpdateStatusBar(int itemID)
440 441 442
{
    WCHAR info[MAX_LOAD_STRING];

443 444
    if(!LoadStringW(globals.hMainInst, itemID, info, ARRAY_SIZE(info)))
        LoadStringW(globals.hMainInst, IDS_READY, info, ARRAY_SIZE(info));
445

446
    SendMessageW(globals.hStatusBar, SB_SETTEXTW, 0, (LPARAM)info);
447 448
}

449
static LRESULT CALLBACK WndProc(HWND hWnd, UINT uMsg,
450 451 452 453 454 455
        WPARAM wParam, LPARAM lParam)
{
    switch(uMsg)
    {
        case WM_CREATE:
            OleInitialize(NULL);
456 457
            PaneRegisterClassW();
            TypeLibRegisterClassW();
Piotr Caban's avatar
Piotr Caban committed
458 459
            if(!CreatePanedWindow(hWnd, &globals.hPaneWnd, globals.hMainInst))
                PostQuitMessage(0);
460
            SetLeft(globals.hPaneWnd, CreateTreeWindow(globals.hMainInst));
461
            SetRight(globals.hPaneWnd, CreateDetailsWindow(globals.hMainInst));
462
            SetFocus(globals.hTree);
463
            break;
464 465 466
        case WM_COMMAND:
            MenuCommand(LOWORD(wParam), hWnd);
            break;
467
        case WM_DESTROY:
468
            EmptyTree();
469
            OleUninitialize();
470 471 472 473 474
            PostQuitMessage(0);
            break;
        case WM_MENUSELECT:
            UpdateStatusBar(LOWORD(wParam));
            break;
475 476 477
        case WM_SETFOCUS:
            SetFocus(globals.hTree);
            break;
478 479 480 481 482
        case WM_SIZE:
            if(wParam == SIZE_MINIMIZED) break;
            ResizeChild();
            break;
        default:
483
            return DefWindowProcW(hWnd, uMsg, wParam, lParam);
484 485 486 487
    }
    return 0;
}

488
static BOOL InitApplication(HINSTANCE hInst)
489
{
490
    WNDCLASSW wc;
491 492
    WCHAR wszAppName[MAX_LOAD_STRING];

493
    LoadStringW(hInst, IDS_APPNAME, wszAppName, ARRAY_SIZE(wszAppName));
494

495
    memset(&wc, 0, sizeof(WNDCLASSW));
496 497
    wc.lpfnWndProc = WndProc;
    wc.hbrBackground = (HBRUSH)(COLOR_WINDOW+1);
498
    wc.hCursor       = LoadCursorW(0, (LPCWSTR)IDC_ARROW);
499
    wc.lpszMenuName = MAKEINTRESOURCEW(IDM_MENU);
500 501
    wc.lpszClassName = wszAppName;

502
    if(!RegisterClassW(&wc))
503 504 505 506 507
        return FALSE;

    return TRUE;
}

508
static BOOL InitInstance(HINSTANCE hInst, int nCmdShow)
509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525
{
    HWND hWnd;
    WCHAR wszAppName[MAX_LOAD_STRING];
    WCHAR wszTitle[MAX_LOAD_STRING];
    TBBUTTON tB[] = {
        {0, 0, 0, BTNS_SEP, {0, 0}, 0, 0},
        {0, IDM_BIND, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
        {1, IDM_TYPELIB, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
        {0, 0, 0, BTNS_SEP, {0, 0}, 0, 0},
        {2, IDM_REGEDIT, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
        {0, 0, 0, BTNS_SEP, {0, 0}, 0, 0},
        {3, IDM_CREATEINST, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
        {4, IDM_RELEASEINST, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0},
        {0, 0, 0, BTNS_SEP, {0, 0}, 0, 0},
        {5, IDM_VIEW, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0}
    };

526 527
    LoadStringW(hInst, IDS_APPNAME, wszAppName, ARRAY_SIZE(wszAppName));
    LoadStringW(hInst, IDS_APPTITLE, wszTitle, ARRAY_SIZE(wszTitle));
528

529
    hWnd = CreateWindowW(wszAppName, wszTitle, WS_OVERLAPPEDWINDOW,
530 531 532
            CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, NULL, NULL, hInst, NULL);
    if(!hWnd) return FALSE;

533
    globals.hStatusBar = CreateStatusWindowW(WS_VISIBLE|WS_CHILD,
534
            wszTitle, hWnd, 0);
535 536 537

    globals.hToolBar = CreateToolbarEx(hWnd, WS_CHILD|WS_VISIBLE, 0, 1, hInst,
            IDB_TOOLBAR, tB, 10, 16, 16, 16, 16, sizeof(TBBUTTON));
538 539 540
    SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_CREATEINST, FALSE);
    SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_RELEASEINST, FALSE);
    SendMessageW(globals.hToolBar, TB_ENABLEBUTTON, IDM_VIEW, FALSE);
541 542 543

    globals.hMainWnd = hWnd;
    globals.hMainInst = hInst;
544
    globals.bExpert = TRUE;
545
    globals.dwClsCtx = CLSCTX_INPROC_SERVER|CLSCTX_LOCAL_SERVER;
546 547 548 549 550 551 552

    ShowWindow(hWnd, nCmdShow);
    UpdateWindow(hWnd);

    return TRUE;
}

553
int APIENTRY WinMain(HINSTANCE hInst, HINSTANCE hPrevInst, LPSTR lpCmdLine, int nCmdShow)
554 555 556
{
    MSG msg;
    HANDLE hAccelTable;
557

558 559
    InitCommonControls();

560 561
    if(!InitApplication(hInst))
        return FALSE;
562 563 564 565

    if(!InitInstance(hInst, nCmdShow))
        return FALSE;

566
    hAccelTable = LoadAcceleratorsW(hInst, MAKEINTRESOURCEW(IDA_OLEVIEW));
567

568
    while(GetMessageW(&msg, NULL, 0, 0))
569
    {
570
        if(TranslateAcceleratorW(globals.hMainWnd, hAccelTable, &msg)) continue;
571 572

        TranslateMessage(&msg);
573
        DispatchMessageW(&msg);
574 575 576 577
    }

    return msg.wParam;
}