source: trunk/dll/mainwnd2.c@ 1452

Last change on this file since 1452 was 1444, checked in by Gregg Young, 16 years ago

Rework of drivebar to rescan all drives and refresh media buttons and menu items grey out inappropriate menu items. Streamline Tree scan code and use semaphores to serialize access. Add NOEASUPPORT and LOCALHD driveflag; .LONGNAME usage fixes; (Tickets 377-386)
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 40.4 KB
Line 
1
2/***********************************************************************
3
4 $Id: mainwnd2.c 1444 2009-07-22 23:24:23Z gyoung $
5
6 fm/4 main window
7
8 Copyright (c) 1993-98 M. Kimes
9 Copyright (c) 2005, 2008 Steven H. Levine
10
11 23 May 05 SHL Use datamin.h
12 26 May 05 SHL Comments and localize code
13 06 Aug 05 SHL Renames
14 02 Jan 06 SHL Use QWL_USER more
15 02 Jan 06 SHL Map IDM_WINDOWDLG to match IBM_TWODIRS
16 17 Jul 06 SHL Use Runtime_Error
17 30 Mar 07 GKY Remove GetPString for window class names
18 12 May 07 SHL Pass ulItemsToUnHilite to UnHilite
19 06 Aug 07 GKY Reduce DosSleep times (ticket 148)
20 07 Aug 07 SHL Use BldQuotedFileName
21 20 Aug 07 GKY Move #pragma alloc_text to end for OpenWatcom compat
22 10 Jan 08 SHL Sync with CfgDlgProc mods
23 19 Jan 08 GKY Rework Utilities menu
24 14 Feb 08 SHL Rework to support settings menu conditional cascade
25 29 Feb 08 GKY Use xfree where appropriate
26 27 Aug 08 JBS Ticket 259: Support saving/restoring toolbars with states
27 01 Sep 08 GKY Add bmps for default toolbars
28 10 Dec 08 SHL Integrate exception handler support
29 03 Jan 09 GKY Check for system that is protectonly to gray out Dos/Win command lines and prevent
30 Dos/Win programs from being inserted into the execute dialog with message why.
31 21 Jun 09 GKY Added drive letter to bitmap buttons in drive bar; Eliminate static drive
32 letter windows; Use button ID to identify drive letter for processing.
33 22 Jul 09 GKY Code changes to use semaphores to serialize drive scanning
34
35***********************************************************************/
36
37#include <stdlib.h>
38#include <string.h>
39#include <share.h>
40// #include <process.h> // _beginthread
41
42#define INCL_DOS
43#define INCL_WIN
44#define INCL_GPI
45#define INCL_LONGLONG
46
47#include "fm3dll.h"
48#include "fm3dll2.h" // #define's for UM_*, control id's, etc.
49#include "killproc.h" // Data declaration(s)
50#include "grep.h" // Data declaration(s)
51#include "autoview.h" // Data declaration(s)
52#include "dircnrs.h" // Data declaration(s)
53#include "worker.h" // Data declaration(s)
54#include "init.h" // Data declaration(s)
55#include "fm3dlg.h"
56#include "fm3str.h"
57#include "tools.h"
58#include "datamin.h"
59#include "comp.h" // COMPARE
60#include "pathutil.h" // BldQuotedFileName
61#include "errutil.h" // Dos_Error...
62#include "strutil.h" // GetPString
63#include "notebook.h" // CfgDlgProc
64#include "command.h" // RunCommand
65#include "misc.h" // BoxWindow, FixSwitchList, SetConditionalCascade
66 // SetSysMenu
67#include "mainwnd.h" // CloseChildren, MainWMCommand, MakeMainObjWin, ResizeDrives
68 // TopWindow
69#include "common.h" // CommonCreateMainChildren, CommonMainWndProc
70#include "notify.h" // HideNote
71#include "mainwnd2.h"
72#include "remap.h" // RemapDlgProc
73#include "treecnr.h" // StartTreeCnr
74#include "walkem.h" // WalkTwoCmpDlgProc, WalkTwoSetDlgProc
75#include "dirs.h" // switch_to
76#include "filter.h" // Filter
77#include "collect.h" // StartCollector
78#include "select.h" // UnHilite
79#include "valid.h" // MakeValidDir
80#include "systemf.h" // runemf2
81#include "wrappers.h" // xfree
82#include "fortify.h"
83#include "excputil.h" // xbeginthread
84
85typedef struct
86{
87 USHORT size;
88 USHORT dummy;
89 HWND hwndDir1;
90 HWND hwndDir2;
91 HWND hwndCurr;
92 HWND hwndLastDir;
93 HWND hwndMax;
94}
95PERSON1DATA;
96
97// Data definitions
98static PSZ pszSrcFile = __FILE__;
99static ULONG TreeWidth;
100
101#pragma data_seg(GLOBAL1)
102PFNWP PFNWPFrame;
103
104#pragma data_seg(GLOBAL2)
105CHAR realappname[12];
106
107static MRESULT EXPENTRY MainFrameWndProc2(HWND hwnd, ULONG msg, MPARAM mp1,
108 MPARAM mp2)
109{
110 PFNWP oldproc = (PFNWP) WinQueryWindowPtr(hwnd, QWL_USER);
111
112 switch (msg) {
113 case WM_ADJUSTWINDOWPOS:
114 {
115 SWP *pswp;
116
117 pswp = (SWP *) mp1;
118 if (pswp->fl & (SWP_SHOW | SWP_RESTORE))
119 PostMsg(WinWindowFromID(hwnd, FID_CLIENT), UM_SIZE, MPVOID, MPVOID);
120 if (fDataMin && !fAmClosing) {
121 if (pswp->fl & (SWP_HIDE | SWP_MINIMIZE)) {
122
123 SWP swp;
124
125 WinQueryWindowPos(hwnd, &swp);
126 PostMsg(hwnd, UM_FOCUSME, MPFROMLONG(swp.fl), MPVOID);
127 HideNote();
128 }
129 else if (pswp->fl & (SWP_SHOW | SWP_RESTORE)) {
130 if (DataHwnd)
131 PostMsg(DataHwnd, WM_CLOSE, MPVOID, MPVOID);
132 }
133 }
134 if (!fAmClosing) {
135 if (pswp->fl & (SWP_HIDE | SWP_MINIMIZE))
136 HideNote();
137 }
138 }
139 break;
140
141 case UM_FOCUSME:
142 CreateDataBar(HWND_DESKTOP, (ULONG) mp1);
143 return 0;
144
145 case WM_BUTTON1UP:
146 case WM_BUTTON2UP:
147 case WM_BUTTON3UP:
148 case WM_MOUSEMOVE:
149 case WM_CHORD:
150 shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT | KC_SHIFT | KC_CTRL));
151 break;
152
153 case WM_CHAR:
154 shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT | KC_ALT | KC_CTRL));
155 break;
156
157 case WM_CONTROL:
158 return WinSendMsg(WinWindowFromID(hwnd, FID_CLIENT), UM_CONTROL, mp1,
159 mp2);
160
161 case WM_COMMAND:
162 return WinSendMsg(WinWindowFromID(hwnd, FID_CLIENT), msg, mp1, mp2);
163
164 case WM_CALCFRAMERECT:
165 {
166 MRESULT mr;
167 PRECTL prectl;
168 LONG sheight = 20, bheight = 20;
169
170 mr = (oldproc) ? oldproc(hwnd, msg, mp1, mp2) :
171 PFNWPFrame(hwnd, msg, mp1, mp2);
172
173 /*
174 * Calculate the position of the client rectangle.
175 * Otherwise, we'll see a lot of redraw when we move the
176 * client during WM_FORMATFRAME.
177 */
178
179 if (mr && mp2) {
180 prectl = (PRECTL) mp1;
181 if (prectl->yBottom != prectl->yTop) {
182 {
183 HPS hps;
184 POINTL aptl[TXTBOX_COUNT];
185
186 hps = WinGetPS(hwndStatus);
187 GpiQueryTextBox(hps, 6, "$`WjgT", TXTBOX_COUNT, aptl);
188 WinReleasePS(hps);
189 sheight = aptl[TXTBOX_TOPLEFT].y + 6;
190 hps = WinGetPS(hwndName);
191 GpiQueryTextBox(hps, 6, "$`WjgT", TXTBOX_COUNT, aptl);
192 WinReleasePS(hps);
193 bheight = aptl[TXTBOX_TOPLEFT].y + 6;
194 }
195 prectl->yBottom += (sheight + 4);
196 prectl->yTop -= (sheight + 4);
197 prectl->yBottom += (bheight + 4);
198 prectl->yTop -= (bheight + 4);
199 if (fToolbar) {
200 if (!fTextTools)
201 prectl->yTop -= ((fToolTitles) ? 50 : 40);
202 else
203 prectl->yTop -= 32;
204 }
205 ResizeDrives(WinWindowFromID(hwnd, MAIN_DRIVES),
206 ((prectl->xRight -
207 (WinQuerySysValue(HWND_DESKTOP,
208 SV_CYSIZEBORDER) * 2)) - 4));
209 prectl->yTop -= (16 * (DriveLines * 22));
210 prectl->yTop -= 2;
211 if (fAutoView) {
212 AutoviewHeight = min(AutoviewHeight,
213 (prectl->yTop - prectl->yBottom) - 116);
214 AutoviewHeight = max(AutoviewHeight, 44);
215 prectl->yBottom += (AutoviewHeight + 6);
216 }
217 }
218 }
219 return mr;
220 }
221
222 case WM_FORMATFRAME:
223 {
224 SHORT sCount, soldCount;
225 PSWP pswp, pswpClient, pswpNew;
226 SWP swpClient;
227 ULONG theight = 48L, dheight = DRIVE_BUTTON_HEIGHT, bheight = 20, sheight = 20;
228 LONG width, lastx;
229
230 sCount = (SHORT) ((oldproc) ? oldproc(hwnd, msg, mp1, mp2) :
231 PFNWPFrame(hwnd, msg, mp1, mp2));
232 soldCount = sCount;
233 /*
234 * Reformat the frame to "squeeze" the client
235 * and make room for status window sibling beneath
236 * and toolbar above (if toolbar's on) and userlists
237 * (if userlists are on).
238 */
239
240 pswp = (PSWP) mp1;
241 {
242 SHORT x;
243
244 for (x = 0; x < sCount; x++) {
245 if (WinQueryWindowUShort(pswp->hwnd, QWS_ID) == FID_CLIENT) {
246 pswpClient = pswp;
247 break;
248 }
249 pswp++;
250 }
251 }
252
253 {
254 HPS hps;
255 POINTL aptl[TXTBOX_COUNT];
256
257 hps = WinGetPS(hwndStatus);
258 GpiQueryTextBox(hps, 6, "$`WjgT", TXTBOX_COUNT, aptl);
259 WinReleasePS(hps);
260 bheight = sheight = aptl[TXTBOX_TOPLEFT].y + 6;
261 hps = WinGetPS(hwndName);
262 GpiQueryTextBox(hps, 6, "$`WjgT", TXTBOX_COUNT, aptl);
263 WinReleasePS(hps);
264 bheight = aptl[TXTBOX_TOPLEFT].y + 6;
265 }
266
267 pswpNew = (PSWP) mp1 + soldCount;
268 *pswpNew = *pswpClient;
269 swpClient = *pswpClient;
270 pswpNew->hwnd = hwndStatus;
271 pswpNew->x = swpClient.x + 3;
272 pswpNew->y = swpClient.y + 2;
273 width = (swpClient.cx / 2) - 6;
274 width = max(width, 10);
275 pswpNew->cx = width - 6;
276 pswpNew->cy = sheight;
277 pswpClient->y = pswpNew->y + pswpNew->cy + 3;
278 pswpClient->cy = (swpClient.cy - pswpNew->cy) - 3;
279 sCount++;
280
281 pswpNew = (PSWP) mp1 + (soldCount + 1);
282 *pswpNew = *pswpClient;
283 pswpNew->hwnd = hwndStatus2;
284 pswpNew->x = width + 8;
285 pswpNew->y = swpClient.y + 2;
286 pswpNew->cx = width - 6;
287 pswpNew->cy = sheight;
288 sCount++;
289
290 if (fToolbar) {
291 if (fTextTools)
292 theight = 32L;
293 else if (!fToolTitles)
294 theight = 40L;
295 pswpNew = (PSWP) mp1 + (soldCount + 2);
296 *pswpNew = *pswpClient;
297 pswpNew->hwnd = WinWindowFromID(hwnd, MAIN_TOOLS);
298 pswpNew->x = swpClient.x + 2;
299 pswpNew->y = (swpClient.y + swpClient.cy) - (theight - 2);
300 pswpNew->cx = swpClient.cx - 4;
301 pswpNew->cy = theight - 4;
302 pswpClient->cy -= theight;
303 sCount++;
304 }
305 else
306 WinShowWindow(WinWindowFromID(hwnd, MAIN_TOOLS), FALSE);
307
308 ResizeDrives(WinWindowFromID(hwnd, MAIN_DRIVES), pswpClient->cx - 4);
309 pswpNew = (PSWP) mp1 + (soldCount + 2 + (fToolbar != FALSE));
310 *pswpNew = *pswpClient;
311 pswpNew->hwnd = WinWindowFromID(hwnd, MAIN_DRIVES);
312 pswpNew->x = swpClient.x + 2;
313 dheight += ((dheight) * DriveLines);
314 pswpNew->y = (swpClient.y + swpClient.cy) - (dheight);
315 if (fToolbar)
316 pswpNew->y -= theight;
317 pswpNew->cx = swpClient.cx - 4;
318 pswpNew->cy = dheight;
319 pswpClient->cy -= dheight;
320 pswpClient->cy -= 2;
321 sCount++;
322
323 if (fAutoView) {
324 pswpNew = (PSWP) mp1 + (soldCount + 3 + (fToolbar != FALSE));
325 *pswpNew = *pswpClient;
326 pswpNew->hwnd = (fComments) ? hwndAutoMLE : hwndAutoview;
327 pswpNew->x = pswpClient->x + 3;
328 pswpNew->y = pswpClient->y + 3;
329 if (fMoreButtons)
330 pswpNew->y += (bheight + 4);
331 pswpNew->cx = pswpClient->cx - 6;
332 AutoviewHeight = min(AutoviewHeight, pswpClient->cy - 116);
333 AutoviewHeight = max(AutoviewHeight, 44);
334 pswpNew->cy = AutoviewHeight;
335 pswpClient->y += (AutoviewHeight + 6);
336 pswpClient->cy -= (AutoviewHeight + 6);
337 sCount++;
338 WinShowWindow((fComments) ? hwndAutoview : hwndAutoMLE, FALSE);
339 }
340 else {
341 WinShowWindow(hwndAutoview, FALSE);
342 WinShowWindow(hwndAutoMLE, FALSE);
343 }
344
345 pswpNew = (PSWP) mp1 + (soldCount + 3 + (fToolbar != FALSE) +
346 (fAutoView != FALSE));
347 *pswpNew = *pswpClient;
348 pswpNew->hwnd = WinWindowFromID(hwnd, MAIN_LED);
349 pswpNew->x = (swpClient.x + swpClient.cx) - 12;
350 pswpNew->y = swpClient.y;
351 pswpNew->cx = 12;
352 pswpNew->cy = 12;
353 sCount++;
354
355 pswpNew = (PSWP) mp1 + (soldCount + 4 + (fToolbar != FALSE) +
356 (fAutoView != FALSE));
357 *pswpNew = *pswpClient;
358 pswpNew->hwnd = WinWindowFromID(hwnd, MAIN_LEDHDR);
359 pswpNew->x = (swpClient.x + swpClient.cx) - 12;
360 pswpNew->y = swpClient.y + 12;
361 pswpNew->cx = 12;
362 pswpNew->cy = sheight - 8;
363 sCount++;
364
365 pswpNew = (PSWP) mp1 + (soldCount + 5 + (fToolbar != FALSE) +
366 (fAutoView != FALSE));
367 *pswpNew = *pswpClient;
368 pswpNew->hwnd = hwndName;
369 pswpNew->x = swpClient.x + 3;
370 pswpNew->y = swpClient.y + (sheight + 6);
371 pswpNew->cx = ((swpClient.cx / 2) + (swpClient.cx / 5)) - 3;
372 lastx = pswpNew->x + pswpNew->cx;
373 pswpNew->cy = bheight;
374 pswpClient->y += (bheight + 4);
375 pswpClient->cy -= (bheight + 4);
376 sCount++;
377
378 pswpNew = (PSWP) mp1 + (soldCount + 6 + (fToolbar != FALSE) +
379 (fAutoView != FALSE));
380 *pswpNew = *pswpClient;
381 pswpNew->hwnd = hwndDate;
382 pswpNew->x = lastx + 3;
383 pswpNew->y = swpClient.y + (sheight + 6);
384 pswpNew->cx = (swpClient.cx / 6) + (swpClient.cx / 16) - 3;
385 lastx = pswpNew->x + pswpNew->cx;
386 pswpNew->cy = bheight;
387 sCount++;
388
389 pswpNew = (PSWP) mp1 + (soldCount + 7 + (fToolbar != FALSE) +
390 (fAutoView != FALSE));
391 *pswpNew = *pswpClient;
392 pswpNew->hwnd = hwndAttr;
393 pswpNew->x = lastx + 3;
394 pswpNew->y = swpClient.y + (sheight + 6);
395 pswpNew->cx = (swpClient.cx - pswpNew->x) - 1;
396 pswpNew->cy = bheight;
397 sCount++;
398
399 return MRFROMSHORT(sCount);
400 }
401
402 case WM_QUERYFRAMECTLCOUNT:
403 {
404 SHORT sCount;
405
406 sCount = (SHORT) ((oldproc) ? oldproc(hwnd, msg, mp1, mp2) :
407 PFNWPFrame(hwnd, msg, mp1, mp2));
408 sCount += 8;
409 if (fToolbar)
410 sCount++;
411 if (fAutoView)
412 sCount++;
413 return MRFROMSHORT(sCount);
414 }
415
416 case WM_CLOSE:
417 WinSendMsg(WinWindowFromID(hwnd, FID_CLIENT), msg, mp1, mp2);
418 return 0;
419 }
420 return (oldproc) ? oldproc(hwnd, msg, mp1, mp2) :
421 PFNWPFrame(hwnd, msg, mp1, mp2);
422}
423
424static MRESULT EXPENTRY MainWMCommand2(HWND hwnd, ULONG msg, MPARAM mp1,
425 MPARAM mp2)
426{
427 PERSON1DATA *pd;
428
429 SetShiftState();
430 switch (SHORT1FROMMP(mp1)) {
431 case IDM_TOAUTOMLE:
432 case IDM_CLI:
433 case IDM_CREATETOOL:
434 case IDM_ABOUT:
435 case IDM_WINFULLSCREEN:
436 case IDM_DOSCOMMANDLINE:
437 case IDM_INIVIEWER:
438 case IDM_EDITASSOC:
439 case IDM_COMMANDLINE:
440 case IDM_KILLPROC:
441 case IDM_TOOLBAR:
442 case IDM_TEXTTOOLS:
443 case IDM_TOOLTITLES:
444 case IDM_TOOLLEFT:
445 case IDM_TOOLRIGHT:
446 case IDM_AUTOVIEWCOMMENTS:
447 case IDM_AUTOVIEWFILE:
448 case IDM_AUTOVIEW:
449// case IDM_SYSINFO:
450 case IDM_HIDENOTEWND:
451 case IDM_SHOWNOTEWND:
452 case IDM_INSTANT:
453 case IDM_HELPCONTEXT:
454 case IDM_HELPHINTS:
455 case IDM_HELPPIX:
456 case IDM_KILLME:
457 case IDM_EXIT:
458 case IDM_HELPTUTOR:
459 case IDM_HELPCONTENTS:
460 case IDM_HELPGENERAL:
461 case IDM_HELPKEYS:
462 case IDM_HELPMOUSE:
463 case IDM_HELP:
464 case IDM_FONTPALETTE:
465 case IDM_HICOLORPALETTE:
466 case IDM_COLORPALETTE:
467 case IDM_SYSTEMCLOCK:
468 return MainWMCommand(hwnd, msg, mp1, mp2);
469
470 case IDM_REMAP:
471 WinDlgBox(HWND_DESKTOP,
472 hwnd, RemapDlgProc, FM3ModHandle, MAP_FRAME, NULL);
473 break;
474
475 case IDM_TWODIRS: // Menu action
476 case IDM_WINDOWDLG: // Toolbar action
477 pd = WinQueryWindowPtr(hwnd, QWL_USER + 4);
478 if (pd) {
479
480 WALK2 wa;
481
482 memset(&wa, 0, sizeof(wa));
483 wa.size = sizeof(wa);
484 *wa.szCurrentPath1 = 0;
485 WinSendMsg(pd->hwndDir1,
486 UM_CONTAINERDIR, MPFROMP(wa.szCurrentPath1), MPVOID);
487 MakeValidDir(wa.szCurrentPath1);
488 *wa.szCurrentPath2 = 0;
489 WinSendMsg(pd->hwndDir2,
490 UM_CONTAINERDIR, MPFROMP(wa.szCurrentPath2), MPVOID);
491 MakeValidDir(wa.szCurrentPath2);
492 if (WinDlgBox(HWND_DESKTOP,
493 hwnd,
494 WalkTwoSetDlgProc,
495 FM3ModHandle,
496 WALK2_FRAME,
497 MPFROMP(&wa)) &&
498 (IsRoot(wa.szCurrentPath1) ||
499 !IsFile(wa.szCurrentPath1)) &&
500 (IsRoot(wa.szCurrentPath2) || !IsFile(wa.szCurrentPath2))) {
501 WinSendMsg(WinWindowFromID(WinWindowFromID(pd->hwndDir1,
502 FID_CLIENT), DIR_CNR),
503 UM_SETDIR, MPFROMP(wa.szCurrentPath1), MPVOID);
504 WinSendMsg(WinWindowFromID(WinWindowFromID(pd->hwndDir2,
505 FID_CLIENT), DIR_CNR),
506 UM_SETDIR, MPFROMP(wa.szCurrentPath2), MPVOID);
507 }
508 }
509 break;
510
511 case IDM_COMPARE:
512 pd = WinQueryWindowPtr(hwnd, QWL_USER + 4);
513 if (pd) {
514
515 WALK2 wa;
516
517 memset(&wa, 0, sizeof(wa));
518 wa.size = sizeof(wa);
519 *wa.szCurrentPath1 = 0;
520 WinSendMsg(pd->hwndDir1,
521 UM_CONTAINERDIR, MPFROMP(wa.szCurrentPath1), MPVOID);
522 MakeValidDir(wa.szCurrentPath1);
523 *wa.szCurrentPath2 = 0;
524 WinSendMsg(pd->hwndDir2,
525 UM_CONTAINERDIR, MPFROMP(wa.szCurrentPath2), MPVOID);
526 MakeValidDir(wa.szCurrentPath2);
527 if (WinDlgBox(HWND_DESKTOP,
528 hwnd,
529 WalkTwoCmpDlgProc,
530 FM3ModHandle,
531 WALK2_FRAME,
532 MPFROMP(&wa)) &&
533 (IsRoot(wa.szCurrentPath1) ||
534 !IsFile(wa.szCurrentPath1)) &&
535 (IsRoot(wa.szCurrentPath2) || !IsFile(wa.szCurrentPath2))) {
536 if (!*dircompare) {
537
538 COMPARE *cmp;
539
540 cmp = xmallocz(sizeof(COMPARE), pszSrcFile, __LINE__);
541 if (cmp) {
542 cmp->size = sizeof(COMPARE);
543 strcpy(cmp->leftdir, wa.szCurrentPath1);
544 strcpy(cmp->rightdir, wa.szCurrentPath2);
545 cmp->hwndParent = hwnd;
546 cmp->dcd.hwndParent = hwnd;
547 WinDlgBox(HWND_DESKTOP,
548 HWND_DESKTOP,
549 CompareDlgProc, FM3ModHandle, COMP_FRAME, MPFROMP(cmp));
550 }
551 }
552 else {
553 CHAR szPath1[CCHMAXPATH];
554 CHAR szPath2[CCHMAXPATH];
555 runemf2(SEPARATE,
556 HWND_DESKTOP, pszSrcFile, __LINE__,
557 NULL, NULL,
558 "%s %s %s",
559 dircompare,
560 BldQuotedFileName(szPath1, wa.szCurrentPath1),
561 BldQuotedFileName(szPath2, wa.szCurrentPath2));
562 }
563 }
564 }
565 break;
566
567 case IDM_VTREE:
568 WinSendMsg(hwnd, UM_SETUP2, MPFROMLONG(1), MPVOID);
569 if (hwndTree) {
570 WinShowWindow(hwndTree, FALSE);
571 PostMsg(hwndTree, WM_CLOSE, MPVOID, MPVOID);
572 hwndTree = (HWND) 0;
573 }
574 else {
575
576 ULONG size = sizeof(ULONG);
577
578 hwndTree = StartTreeCnr(hwnd, 3);
579 PrfQueryProfileData(fmprof,
580 realappname,
581 "FM/4 TreeWidth", (PVOID) & TreeWidth, &size);
582 TreeWidth = max(TreeWidth, 80);
583 }
584 {
585 BOOL dummy = (hwndTree != (HWND) 0);
586
587 PrfWriteProfileData(fmprof,
588 realappname,
589 "FM/4 TreeUp", (PVOID) & dummy, sizeof(dummy));
590 }
591 PostMsg(hwnd, UM_SIZE, MPVOID, MPVOID);
592 break;
593
594 case IDM_TILEBACKWARDS:
595 WinSendMsg(hwnd, UM_SETUP2, MPFROMLONG(1), MPVOID);
596 fTileBackwards = (fTileBackwards) ? FALSE : TRUE;
597 PrfWriteProfileData(fmprof,
598 FM3Str,
599 "TileBackwards",
600 (PVOID) & fTileBackwards, sizeof(BOOL));
601 PostMsg(hwnd, UM_SIZE, MPVOID, MPVOID);
602 break;
603
604 case IDM_NEXTWINDOW:
605 case IDM_PREVWINDOW:
606 pd = WinQueryWindowPtr(hwnd, QWL_USER + 4);
607 if (pd) {
608
609 HWND hwndFocus;
610
611 if (hwndTree) {
612 if (pd->hwndMax) {
613 if (hwndTree == pd->hwndCurr)
614 hwndFocus = pd->hwndMax;
615 else
616 hwndFocus = hwndTree;
617 }
618 else {
619 if (hwndTree == pd->hwndCurr)
620 hwndFocus = (SHORT1FROMMP(mp1) == IDM_PREVWINDOW) ?
621 pd->hwndDir1 : pd->hwndDir2;
622 else if (pd->hwndDir1 == pd->hwndCurr)
623 hwndFocus = (SHORT1FROMMP(mp1) == IDM_PREVWINDOW) ?
624 pd->hwndDir2 : hwndTree;
625 else
626 hwndFocus = (SHORT1FROMMP(mp1) == IDM_PREVWINDOW) ?
627 hwndTree : pd->hwndDir1;
628 }
629 }
630 else {
631 if (pd->hwndMax)
632 hwndFocus = pd->hwndMax;
633 else
634 hwndFocus = pd->hwndCurr == pd->hwndDir1 ?
635 pd->hwndDir2 : pd->hwndDir1;
636 }
637 WinSetFocus(HWND_DESKTOP, hwndFocus);
638 }
639 break;
640
641 case IDM_NOTEBOOK:
642 case IDM_DIRCNRSETTINGS:
643 case IDM_DIRVIEWSETTINGS:
644 case IDM_DIRSORTSETTINGS:
645 case IDM_COLLECTORVIEWSETTINGS:
646 case IDM_COLLECTORSORTSETTINGS:
647 case IDM_ARCHIVERSETTINGS:
648 case IDM_TREECNRVIEWSETTINGS:
649 case IDM_TREECNRSORTSETTINGS:
650 case IDM_VIEWERSETTINGS:
651 case IDM_VIEWERSETTINGS2:
652 case IDM_COMPARESETTINGS:
653 case IDM_MONOLITHICSETTINGS:
654 case IDM_GENERALSETTINGS:
655 case IDM_SCANSETTINGS:
656 case IDM_BUBBLESSETTINGS:
657 WinDlgBox(HWND_DESKTOP,
658 hwnd,
659 CfgDlgProc,
660 FM3ModHandle,
661 CFG_FRAME,
662 MPFROMLONG(mp1)); // 15 Feb 08 SHL
663 PostMsg(hwnd, UM_SIZE, MPVOID, MPVOID);
664 break;
665
666 case IDM_SEEALL:
667 case IDM_GREP:
668 case IDM_COLLECTOR:
669 {
670 HWND hwndC;
671
672 hwndC = StartCollector(HWND_DESKTOP, 4);
673 if (hwndC) {
674 WinSetWindowPos(hwndC,
675 HWND_TOP,
676 0, 0, 0, 0, SWP_SHOW | SWP_RESTORE | SWP_ACTIVATE);
677 if (SHORT1FROMMP(mp1) == IDM_GREP)
678 PostMsg(WinWindowFromID(hwndC, FID_CLIENT),
679 WM_COMMAND, MPFROM2SHORT(IDM_GREP, 0), MPVOID);
680 if (SHORT1FROMMP(mp1) == IDM_SEEALL)
681 PostMsg(WinWindowFromID(hwndC, FID_CLIENT),
682 WM_COMMAND, MPFROM2SHORT(IDM_SEEALL, 0), MPVOID);
683 }
684 }
685 break;
686
687 case IDM_EDITCOMMANDS:
688 EditCommands(hwnd);
689 break;
690
691 default:
692 if (SHORT1FROMMP(mp1) >= IDM_SWITCHSTART &&
693 SHORT1FROMMP(mp1) < IDM_SWITCHSTART + 499) {
694 if (SHORT1FROMMP(mp1) - IDM_SWITCHSTART < numswitches)
695 WinSwitchToProgram(switches[SHORT1FROMMP(mp1) - IDM_SWITCHSTART]);
696 break;
697 }
698 else if (SHORT1FROMMP(mp1) >= IDM_COMMANDSTART &&
699 SHORT1FROMMP(mp1) < IDM_QUICKTOOLSTART) {
700
701 INT x;
702 HWND hwndCnr;
703
704 if (!cmdloaded)
705 load_commands();
706 hwndCnr = TopWindow(hwnd, (HWND) 0);
707 hwndCnr = (HWND) WinSendMsg(WinWindowFromID(hwndCnr, FID_CLIENT),
708 UM_CONTAINERHWND, MPVOID, MPVOID);
709 if (!hwndCnr) {
710 Runtime_Error(pszSrcFile, __LINE__, NULL);
711 break;
712 }
713 x = SHORT1FROMMP(mp1) - IDM_COMMANDSTART;
714 if (x >= 0) {
715 x++;
716 RunCommand(hwndCnr, x);
717 if (fUnHilite) {
718
719 PCNRITEM pci;
720 DIRCNRDATA *dcd = NULL;
721
722 if (WinQueryWindowUShort(hwndCnr, QWS_ID) != TREE_CNR)
723 dcd = INSTDATA(hwndCnr);
724 pci = (PCNRITEM) WinSendMsg(hwndCnr,
725 CM_QUERYRECORDEMPHASIS,
726 MPFROMLONG(CMA_FIRST),
727 MPFROMSHORT(CRA_CURSORED));
728 if (pci && (INT) pci != -1 && (pci->rc.flRecordAttr & CRA_SELECTED)) {
729 UnHilite(hwnd,
730 TRUE,
731 dcd ? &dcd->lastselection : NULL,
732 dcd ? dcd->ulItemsToUnHilite : 0);
733 }
734 }
735 }
736 }
737 else if (SHORT1FROMMP(mp1) >= IDM_QUICKTOOLSTART &&
738 SHORT1FROMMP(mp1) < IDM_QUICKTOOLSTART + 51) {
739 if (!qtloaded)
740 load_quicktools();
741 if (quicktool[SHORT1FROMMP(mp1) - IDM_QUICKTOOLSTART - 1]) {
742 if (fToolsChanged)
743 save_tools(NULL);
744 if (!load_tools(quicktool[SHORT1FROMMP(mp1) - IDM_QUICKTOOLSTART - 1]))
745 load_tools(NULL);
746 else {
747 strcpy(lasttoolbar,
748 quicktool[SHORT1FROMMP(mp1) - IDM_QUICKTOOLSTART - 1]);
749 PrfWriteProfileString(fmprof, appname, "LastToolbar", lasttoolbar);
750 }
751 PostMsg(hwndToolback, UM_SETUP2, MPVOID, MPVOID);
752 }
753 }
754 else {
755
756 HWND hwndActive;
757
758 hwndActive = TopWindow(hwnd, (HWND) 0);
759 if (hwndActive)
760 PostMsg(WinWindowFromID(hwndActive, FID_CLIENT), msg, mp1, mp2);
761 }
762 break;
763 }
764 return 0;
765}
766
767static MRESULT EXPENTRY MainWMOnce2(HWND hwnd, ULONG msg, MPARAM mp1,
768 MPARAM mp2)
769{
770 PERSON1DATA *pd;
771
772 switch (msg) {
773 case WM_CREATE:
774 {
775 TID tid;
776
777 WinQueryWindowProcess(hwnd, &mypid, &tid);
778 }
779 hwndMain = hwnd;
780 WinSetWindowUShort(hwnd, QWL_USER + 8, 0);
781 WinSetWindowUShort(hwnd, QWL_USER + 10, 0);
782 WinSetWindowUShort(hwnd, QWL_USER + 12, 0);
783 WinSetWindowUShort(hwnd, QWL_USER + 16, 0);
784 if (xbeginthread(MakeMainObjWin,
785 245760,
786 MPVOID,
787 pszSrcFile,
788 __LINE__) == -1)
789 {
790 PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
791 return 0;
792 }
793 else
794 DosSleep(32);//05 Aug 07 GKY 64
795
796 pd = xmallocz(sizeof(PERSON1DATA), pszSrcFile, __LINE__);
797 if (!pd)
798 WinDestroyWindow(WinQueryWindow(hwnd, QW_PARENT));
799 else {
800 pd->size = sizeof(PERSON1DATA);
801 WinSetWindowPtr(hwnd, QWL_USER + 4, (PVOID) pd);
802 }
803 {
804 SWP swp;
805 PFNWP oldproc;
806
807 /*
808 * create frame children (not client children, frame children)
809 */
810 DosSleep(1);
811 WinQueryWindowPos(WinQueryWindow(hwnd, QW_PARENT), &swp);
812 oldproc = WinSubclassWindow(WinQueryWindow(hwnd, QW_PARENT),
813 (PFNWP) MainFrameWndProc2);
814 if (oldproc)
815 WinSetWindowPtr(WinQueryWindow(hwnd, QW_PARENT), QWL_USER, (PVOID) oldproc);
816 CommonCreateMainChildren(hwnd, &swp);
817
818 {
819 HWND hwndMenu;
820
821 hwndMenu = WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT), FID_MENU);
822 WinSetWindowULong(hwnd, QWL_USER, hwndMenu);
823 CfgMenuInit(hwndMenu, FALSE); // 14 Feb 08 SHL
824 SetConditionalCascade(hwndMenu, IDM_COMMANDLINESUBMENU, IDM_COMMANDLINE);
825 if (fProtectOnly) {
826 WinEnableMenuItem(hwndMenu, IDM_DOSCOMMANDLINE, FALSE);
827 WinEnableMenuItem(hwndMenu, IDM_WINFULLSCREEN, FALSE);
828 }
829 SetConditionalCascade(hwndMenu, IDM_COMMANDSMENU, IDM_DOITYOURSELF);
830 SetConditionalCascade(hwndMenu, IDM_TOOLSUBMENU, IDM_TOOLBAR);
831 }
832 }
833 WinSetWindowText(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
834 FID_TITLEBAR), "FM/2 Lite");
835 FixSwitchList(WinQueryWindow(hwnd, QW_PARENT), NULL);
836 SetSysMenu(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT), FID_SYSMENU));
837 break;
838
839 case UM_SETUP:
840 pd = WinQueryWindowPtr(hwnd, QWL_USER + 4);
841 if (pd) {
842
843 CHAR s[CCHMAXPATH];
844 ULONG size;
845 DIRCNRDATA *dcd;
846 HWND hwndC;
847 BOOL dummy = TRUE;
848
849 size = sizeof(BOOL);
850 PrfQueryProfileData(fmprof,
851 realappname, "FM/4 TreeUp", (PVOID) & dummy, &size);
852 if (dummy) {
853 size = sizeof(ULONG);
854 hwndTree = StartTreeCnr(hwnd, 3);
855 PrfQueryProfileData(fmprof,
856 realappname,
857 "FM/4 TreeWidth", (PVOID) & TreeWidth, &size);
858 TreeWidth = max(TreeWidth, 80);
859 }
860 size = sizeof(BOOL);
861 if (PrfQueryProfileData(fmprof,
862 FM3Str,
863 "Toolbar", &dummy, &size) && size && !dummy)
864 WinSendMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_TOOLBAR, 0), MPVOID);
865
866 size = sizeof(s);
867 *s = 0;
868 if (PrfQueryProfileData(fmprof,
869 realappname, "FM/4 Dir1", s, &size) && *s)
870 MakeValidDir(s);
871 else
872 save_dir(s);
873 pd->hwndLastDir = pd->hwndCurr = pd->hwndDir1 =
874 StartDirCnr(hwnd, s, (HWND) 0, 3);
875 size = sizeof(s);
876 *s = 0;
877 if (PrfQueryProfileData(fmprof,
878 realappname, "FM/4 Dir2", s, &size) && *s)
879 MakeValidDir(s);
880 else
881 save_dir(s);
882 pd->hwndDir2 = StartDirCnr(hwnd, s, (HWND) 0, 3);
883 if (fInitialDriveScan) {
884 DosPostEventSem(hevInitialCnrScanComplete);
885 DosCloseEventSem(hevInitialCnrScanComplete);
886 fInitialDriveScan = FALSE;
887 }
888 WinSetFocus(HWND_DESKTOP, pd->hwndCurr);
889
890 hwndC = WinWindowFromID(pd->hwndDir1, FID_CLIENT);
891 if (hwndC) {
892 dcd = WinQueryWindowPtr(WinWindowFromID(hwndC, DIR_CNR), QWL_USER);
893 if (dcd) {
894 size = sizeof(INT);
895 if (PrfQueryProfileData(fmprof,
896 realappname,
897 "FM/4 Dir1.Sort",
898 (PVOID) & dcd->sortFlags,
899 &size) && size == sizeof(INT)) {
900 if (!dcd->sortFlags)
901 dcd->sortFlags = SORT_PATHNAME;
902 }
903 size = sizeof(MASK);
904 if (PrfQueryProfileData(fmprof,
905 realappname,
906 "FM/4 Dir1.Filter",
907 (PVOID) & dcd->mask, &size) && size) {
908 if (*dcd->mask.szMask)
909 WinSendMsg(WinWindowFromID(hwndC, DIR_CNR),
910 UM_FILTER, MPFROMP(dcd->mask.szMask), MPVOID);
911 }
912 *(dcd->mask.prompt) = 0;
913 size = sizeof(ULONG);
914 if (PrfQueryProfileData(fmprof,
915 realappname,
916 "FM/4 Dir1.View",
917 (PVOID) & dcd->flWindowAttr,
918 &size) && size == sizeof(ULONG)) {
919
920 CNRINFO cnri;
921
922 memset(&cnri, 0, sizeof(CNRINFO));
923 cnri.cb = sizeof(CNRINFO);
924 if (WinSendMsg(WinWindowFromID(hwndC, DIR_CNR),
925 CM_QUERYCNRINFO,
926 MPFROMP(&cnri), MPFROMLONG(sizeof(CNRINFO)))) {
927 cnri.flWindowAttr = dcd->flWindowAttr;
928 WinSendMsg(WinWindowFromID(hwndC, DIR_CNR),
929 CM_SETCNRINFO,
930 MPFROMP(&cnri), MPFROMLONG(CMA_FLWINDOWATTR));
931 }
932 }
933 }
934 }
935
936 hwndC = WinWindowFromID(pd->hwndDir2, FID_CLIENT);
937 if (hwndC) {
938 dcd = WinQueryWindowPtr(WinWindowFromID(hwndC, DIR_CNR), QWL_USER);
939 if (dcd) {
940 size = sizeof(INT);
941 if (PrfQueryProfileData(fmprof,
942 realappname,
943 "FM/4 Dir2.Sort",
944 (PVOID) & dcd->sortFlags,
945 &size) && size == sizeof(INT)) {
946 if (!dcd->sortFlags)
947 dcd->sortFlags = SORT_PATHNAME;
948 }
949 size = sizeof(MASK);
950 if (PrfQueryProfileData(fmprof,
951 realappname,
952 "FM/4 Dir2.Filter",
953 (PVOID) & dcd->mask, &size) && size) {
954 if (*dcd->mask.szMask)
955 WinSendMsg(WinWindowFromID(hwndC, DIR_CNR),
956 UM_FILTER, MPFROMP(dcd->mask.szMask), MPVOID);
957 }
958 *(dcd->mask.prompt) = 0;
959 size = sizeof(ULONG);
960 if (PrfQueryProfileData(fmprof,
961 realappname,
962 "FM/4 Dir2.View",
963 (PVOID) & dcd->flWindowAttr,
964 &size) && size == sizeof(ULONG)) {
965
966 CNRINFO cnri;
967
968 memset(&cnri, 0, sizeof(CNRINFO));
969 cnri.cb = sizeof(CNRINFO);
970 if (WinSendMsg(WinWindowFromID(hwndC, DIR_CNR),
971 CM_QUERYCNRINFO,
972 MPFROMP(&cnri), MPFROMLONG(sizeof(CNRINFO)))) {
973 cnri.flWindowAttr = dcd->flWindowAttr;
974 WinSendMsg(WinWindowFromID(hwndC, DIR_CNR),
975 CM_SETCNRINFO,
976 MPFROMP(&cnri), MPFROMLONG(CMA_FLWINDOWATTR));
977 }
978 }
979 }
980 }
981 }
982 {
983 ULONG which = 0, size = sizeof(ULONG);
984
985 if (PrfQueryProfileData(fmprof,
986 realappname,
987 "FM/4 Max",
988 (PVOID) & which,
989 &size) && size == sizeof(ULONG) && which) {
990 PostMsg(hwnd,
991 UM_MAXIMIZE,
992 MPFROMLONG(((which == 1) ?
993 pd->hwndDir1 : pd->hwndDir2)), MPVOID);
994 }
995 }
996 PostMsg(hwnd, UM_SIZE, MPVOID, MPVOID);
997 if (!hwndTree)
998 PostMsg(hwnd, UM_BUILDDRIVEBAR, MPVOID, MPVOID);
999 load_tools(NULL);
1000 PostMsg(hwndToolback, UM_SETUP2, MPVOID, MPVOID);
1001 fRunning = TRUE;
1002 return 0;
1003
1004 case WM_SAVEAPPLICATION:
1005 WinStoreWindowPos(FM2Str,
1006 "MainWindowPos2", WinQueryWindow(hwnd, QW_PARENT));
1007 pd = WinQueryWindowPtr(hwnd, QWL_USER + 4);
1008 if (pd) {
1009
1010 CHAR s[CCHMAXPATH];
1011 HWND hwndC;
1012 DIRCNRDATA *dcd;
1013 ULONG flWindowAttr;
1014
1015 *s = 0;
1016 WinSendMsg(pd->hwndDir1, UM_CONTAINERDIR, MPFROMP(s), MPVOID);
1017 if (*s) {
1018 MakeValidDir(s);
1019 PrfWriteProfileString(fmprof, realappname, "FM/4 Dir1", s);
1020 }
1021 *s = 0;
1022 WinSendMsg(pd->hwndDir2, UM_CONTAINERDIR, MPFROMP(s), MPVOID);
1023 if (*s) {
1024 MakeValidDir(s);
1025 PrfWriteProfileString(fmprof, realappname, "FM/4 Dir2", s);
1026 }
1027 flWindowAttr = (pd->hwndMax == pd->hwndDir1) ?
1028 1 : (pd->hwndMax == pd->hwndDir2) ? 2 : 0;
1029 PrfWriteProfileData(fmprof,
1030 realappname,
1031 "FM/4 Max", &flWindowAttr, sizeof(flWindowAttr));
1032 hwndC = WinWindowFromID(pd->hwndDir1, FID_CLIENT);
1033 if (hwndC) {
1034 dcd = WinQueryWindowPtr(WinWindowFromID(hwndC, DIR_CNR), QWL_USER);
1035 if (dcd) {
1036 flWindowAttr = dcd->flWindowAttr;
1037 if (!fLeaveTree && (flWindowAttr & CV_TREE)) {
1038 flWindowAttr &= (~(CV_TREE | CV_ICON | CV_DETAIL | CV_TEXT));
1039 if (dcd->lastattr) {
1040 if (dcd->lastattr & CV_TEXT)
1041 flWindowAttr |= CV_TEXT;
1042 else if (dcd->lastattr & CV_DETAIL)
1043 flWindowAttr |= CV_DETAIL;
1044 else if (dcd->lastattr & CV_ICON)
1045 flWindowAttr |= CV_ICON;
1046 else
1047 flWindowAttr |= CV_NAME;
1048 }
1049 else
1050 flWindowAttr |= CV_NAME;
1051 }
1052 PrfWriteProfileData(fmprof,
1053 realappname,
1054 "FM/4 Dir1.Sort",
1055 (PVOID) & dcd->sortFlags, sizeof(INT));
1056 PrfWriteProfileData(fmprof,
1057 realappname,
1058 "FM/4 Dir1.Filter",
1059 (PVOID) & dcd->mask, sizeof(MASK));
1060 PrfWriteProfileData(fmprof,
1061 realappname,
1062 "FM/4 Dir1.View",
1063 (PVOID) & flWindowAttr, sizeof(ULONG));
1064 }
1065 }
1066
1067 hwndC = WinWindowFromID(pd->hwndDir2, FID_CLIENT);
1068 if (hwndC) {
1069 dcd = WinQueryWindowPtr(WinWindowFromID(hwndC, DIR_CNR), QWL_USER);
1070 if (dcd) {
1071 flWindowAttr = dcd->flWindowAttr;
1072 if (!fLeaveTree && (flWindowAttr & CV_TREE)) {
1073 flWindowAttr &= (~(CV_TREE | CV_ICON | CV_DETAIL | CV_TEXT));
1074 if (dcd->lastattr) {
1075 if (dcd->lastattr & CV_TEXT)
1076 flWindowAttr |= CV_TEXT;
1077 else if (dcd->lastattr & CV_DETAIL)
1078 flWindowAttr |= CV_DETAIL;
1079 else if (dcd->lastattr & CV_ICON)
1080 flWindowAttr |= CV_ICON;
1081 else
1082 flWindowAttr |= CV_NAME;
1083 }
1084 else
1085 flWindowAttr |= CV_NAME;
1086 }
1087 PrfWriteProfileData(fmprof,
1088 realappname,
1089 "FM/4 Dir2.Sort",
1090 (PVOID) & dcd->sortFlags, sizeof(INT));
1091 PrfWriteProfileData(fmprof,
1092 realappname,
1093 "FM/4 Dir2.Filter",
1094 (PVOID) & dcd->mask, sizeof(MASK));
1095 PrfWriteProfileData(fmprof,
1096 realappname,
1097 "FM/4 Dir2.View",
1098 (PVOID) & flWindowAttr, sizeof(ULONG));
1099 }
1100 }
1101 }
1102 break;
1103 }
1104 return WinDefWindowProc(hwnd, msg, mp1, mp2);
1105}
1106
1107MRESULT EXPENTRY MainWndProc2(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
1108{
1109 PERSON1DATA *pd;
1110
1111 switch (msg) {
1112 case WM_SAVEAPPLICATION:
1113 case UM_SETUP:
1114 case WM_CREATE:
1115 return MainWMOnce2(hwnd, msg, mp1, mp2);
1116
1117 case UM_THREADUSE:
1118 case UM_LOADFILE:
1119 case UM_BUILDDRIVEBAR:
1120 return CommonMainWndProc(hwnd, msg, mp1, mp2);
1121
1122 case UM_SETUP2:
1123 pd = WinQueryWindowPtr(hwnd, QWL_USER + 4);
1124 if (pd) {
1125 if (mp1) {
1126 if (pd->hwndDir1 && (!pd->hwndMax || pd->hwndMax == pd->hwndDir1))
1127 BoxWindow(pd->hwndDir1, (HPS) 0, CLR_PALEGRAY);
1128 if (pd->hwndDir2 && (!pd->hwndMax || pd->hwndMax == pd->hwndDir2))
1129 BoxWindow(pd->hwndDir2, (HPS) 0, CLR_PALEGRAY);
1130 if (hwndTree)
1131 BoxWindow(hwndTree, (HPS) 0, CLR_PALEGRAY);
1132 }
1133 else {
1134 if (hwndTree)
1135 BoxWindow(hwndTree,
1136 (HPS) 0,
1137 (pd->hwndCurr == hwndTree) ? CLR_RED : CLR_WHITE);
1138 if (!pd->hwndMax || pd->hwndMax == pd->hwndDir1)
1139 BoxWindow(pd->hwndDir1,
1140 (HPS) 0,
1141 (pd->hwndDir1 == pd->hwndCurr) ?
1142 CLR_RED :
1143 (pd->hwndDir1 == pd->hwndLastDir) ?
1144 CLR_DARKRED : CLR_PALEGRAY);
1145 if (!pd->hwndMax || pd->hwndMax == pd->hwndDir2)
1146 BoxWindow(pd->hwndDir2,
1147 (HPS) 0,
1148 (pd->hwndDir2 == pd->hwndCurr) ?
1149 CLR_RED :
1150 (pd->hwndDir2 == pd->hwndLastDir) ?
1151 CLR_DARKRED : CLR_PALEGRAY);
1152 }
1153 }
1154 return 0;
1155
1156 case WM_BUTTON1DOWN:
1157 shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT | KC_SHIFT | KC_CTRL));
1158 if (hwndTree) {
1159
1160 SWP swp;
1161
1162 WinQueryWindowPos(hwndTree, &swp);
1163 if (SHORT1FROMMP(mp1) > (swp.x + swp.cx) - 3 &&
1164 SHORT1FROMMP(mp1) < (swp.x + swp.cx) + 3) {
1165
1166 SWP swpC;
1167 TRACKINFO track;
1168
1169 WinQueryWindowPos(hwnd, &swpC);
1170 track.cxBorder = 4;
1171 track.cyBorder = 4;
1172 track.cxGrid = 1;
1173 track.cyGrid = 1;
1174 track.cxKeyboard = 8;
1175 track.cyKeyboard = 8;
1176 track.rclTrack.yBottom = 2;
1177 track.rclTrack.yTop = swpC.cy - 4;
1178 track.rclTrack.xLeft = 2;
1179 track.rclTrack.xRight = swp.x + swp.cx + 2;
1180 track.rclBoundary = track.rclTrack;
1181 track.rclBoundary.xRight = swpC.cx - 80;
1182 track.ptlMinTrackSize.x = 80;
1183 track.ptlMinTrackSize.y = swpC.cy - 4;
1184 track.ptlMaxTrackSize.x = swpC.cx - 80;
1185 track.ptlMaxTrackSize.y = swpC.cy - 4;
1186 track.fs = TF_RIGHT;
1187 if (WinTrackRect(hwnd, (HPS) 0, &track)) {
1188 TreeWidth = track.rclTrack.xRight - track.rclTrack.xLeft;
1189 PrfWriteProfileData(fmprof,
1190 realappname,
1191 "FM/4 TreeWidth", &TreeWidth, sizeof(ULONG));
1192 WinSendMsg(hwnd, UM_SETUP2, MPFROMLONG(1), MPVOID);
1193 PostMsg(hwnd, UM_SIZE, MPVOID, MPVOID);
1194 }
1195 return (MRESULT) TRUE;
1196 }
1197 }
1198 break;
1199
1200 case WM_MOUSEMOVE:
1201 shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT | KC_SHIFT | KC_CTRL));
1202 if (hwndTree) {
1203
1204 SWP swp;
1205
1206 if (WinQueryWindowPos(hwndTree, &swp)) {
1207 if (SHORT1FROMMP(mp1) > (swp.x + swp.cx) - 3 &&
1208 SHORT1FROMMP(mp1) < (swp.x + swp.cx) + 3)
1209 WinSetPointer(HWND_DESKTOP, hptrEW);
1210 else
1211 WinSetPointer(HWND_DESKTOP, hptrArrow);
1212 }
1213 else
1214 WinSetPointer(HWND_DESKTOP, hptrArrow);
1215 }
1216 return (MRESULT) TRUE;
1217
1218 case WM_BUTTON1UP:
1219 case WM_BUTTON2UP:
1220 case WM_BUTTON3UP:
1221 case WM_CHAR:
1222 shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT | KC_ALT | KC_CTRL));
1223 break;
1224
1225 case UM_ADVISEFOCUS:
1226 pd = WinQueryWindowPtr(hwnd, QWL_USER + 4);
1227 if (mp1 && pd && (HWND) mp1 != pd->hwndCurr) {
1228 if ((HWND) mp1 != hwndTree)
1229 pd->hwndLastDir = (HWND) mp1;
1230 pd->hwndCurr = (HWND) mp1;
1231 WinSendMsg(hwnd, UM_SETUP2, MPVOID, MPVOID);
1232 }
1233 return 0;
1234
1235 case UM_MAXIMIZE:
1236 if (mp1) {
1237 pd = WinQueryWindowPtr(hwnd, QWL_USER + 4);
1238 if (pd) {
1239 WinSendMsg(hwnd, UM_SETUP2, MPFROMLONG(1), MPVOID);
1240 if (pd->hwndMax != (HWND) mp1) {
1241 pd->hwndMax = (HWND) mp1;
1242 WinSetFocus(HWND_DESKTOP, pd->hwndMax);
1243 }
1244 else
1245 pd->hwndMax = (HWND) 0;
1246 PostMsg(hwnd, UM_SIZE, MPVOID, MPVOID);
1247 }
1248 }
1249 return 0;
1250
1251 case WM_INITMENU:
1252 switch (SHORT1FROMMP(mp1)) {
1253 case IDM_FILESMENU:
1254 case IDM_VIEWSMENU:
1255 case IDM_DETAILSSETUP:
1256 case IDM_COMMANDSMENU:
1257 case IDM_SORTSUBMENU:
1258 pd = WinQueryWindowPtr(hwnd, QWL_USER + 4);
1259 if (pd)
1260 WinSendMsg(pd->hwndCurr, UM_INITMENU, mp1, mp2);
1261 break;
1262 case IDM_CONFIGMENU:
1263 WinCheckMenuItem((HWND) mp2, IDM_TOOLSUBMENU, fToolbar);
1264 WinCheckMenuItem((HWND) mp2, IDM_AUTOVIEW, fAutoView);
1265 break;
1266 case IDM_TOOLSUBMENU:
1267 WinCheckMenuItem((HWND) mp2, IDM_TOOLBAR, fToolbar);
1268 WinCheckMenuItem((HWND) mp2, IDM_TEXTTOOLS, fTextTools);
1269 WinCheckMenuItem((HWND) mp2, IDM_TOOLTITLES, fToolTitles);
1270 break;
1271 case IDM_WINDOWSMENU:
1272 WinCheckMenuItem((HWND) mp2, IDM_VTREE, (hwndTree != (HWND) 0));
1273 WinCheckMenuItem((HWND) mp2, IDM_TILEBACKWARDS, fTileBackwards);
1274 SetupWinList((HWND) mp2, hwnd, WinQueryWindow(hwnd, QW_PARENT));
1275 break;
1276 }
1277 break;
1278
1279 case WM_SETFOCUS:
1280 if (mp2)
1281 PostMsg(hwnd, UM_FOCUSME, MPVOID, MPVOID);
1282 break;
1283
1284 case UM_FOCUSME:
1285 pd = WinQueryWindowPtr(hwnd, QWL_USER + 4);
1286 if (pd)
1287 WinSetFocus(HWND_DESKTOP, pd->hwndCurr);
1288 return 0;
1289
1290 case UM_RESCAN:
1291 return 0;
1292
1293 case UM_SIZE:
1294 {
1295 SWP swp;
1296
1297 if (WinQueryWindowPos(hwnd, &swp)) {
1298 mp1 = MPFROM2SHORT(swp.cx, swp.cy);
1299 mp2 = MPFROM2SHORT(swp.cx, swp.cy);
1300 }
1301 else
1302 return 0;
1303 }
1304 /* intentional fallthru */
1305 case WM_SIZE:
1306 pd = WinQueryWindowPtr(hwnd, QWL_USER + 4);
1307 if (mp1 && mp2 && pd && pd->hwndDir1 && pd->hwndDir2) {
1308 if (hwndTree)
1309 WinSetWindowPos(hwndTree,
1310 HWND_TOP,
1311 2,
1312 2,
1313 TreeWidth - 4,
1314 SHORT2FROMMP(mp2) - 4,
1315 SWP_SHOW | SWP_MOVE | SWP_SIZE);
1316 else
1317 TreeWidth = 0;
1318 if (!pd->hwndMax) {
1319 if (fTileBackwards) {
1320 WinSetWindowPos(pd->hwndDir1, HWND_TOP,
1321 (((SHORT1FROMMP(mp2) - TreeWidth) / 2) +
1322 TreeWidth) + 2,
1323 2,
1324 ((SHORT1FROMMP(mp2) - TreeWidth) / 2) - 4,
1325 SHORT2FROMMP(mp2) - 4,
1326 SWP_SHOW | SWP_MOVE | SWP_SIZE);
1327 WinSetWindowPos(pd->hwndDir2, HWND_TOP,
1328 TreeWidth + 2,
1329 2,
1330 ((SHORT1FROMMP(mp2) - TreeWidth) / 2) - 4,
1331 SHORT2FROMMP(mp2) - 4,
1332 SWP_SHOW | SWP_MOVE | SWP_SIZE);
1333 }
1334 else {
1335 WinSetWindowPos(pd->hwndDir1, HWND_TOP,
1336 TreeWidth + 2,
1337 2,
1338 (SHORT1FROMMP(mp2) - TreeWidth) - 4,
1339 (SHORT2FROMMP(mp2) / 2) - 4,
1340 SWP_SHOW | SWP_MOVE | SWP_SIZE);
1341 WinSetWindowPos(pd->hwndDir2, HWND_TOP,
1342 TreeWidth + 2,
1343 (SHORT2FROMMP(mp2) / 2) + 2,
1344 (SHORT1FROMMP(mp2) - TreeWidth) - 4,
1345 (SHORT2FROMMP(mp2) / 2) - 4,
1346 SWP_SHOW | SWP_MOVE | SWP_SIZE);
1347 }
1348 }
1349 else {
1350
1351 HWND hwndOther;
1352
1353 WinSetWindowPos(pd->hwndMax, HWND_TOP,
1354 TreeWidth + 2,
1355 2,
1356 (SHORT1FROMMP(mp2) - TreeWidth) - 4,
1357 SHORT2FROMMP(mp2) - 4,
1358 SWP_SHOW | SWP_MOVE | SWP_SIZE);
1359 hwndOther = (pd->hwndMax == pd->hwndDir1) ?
1360 pd->hwndDir2 : pd->hwndDir1;
1361 WinSetWindowPos(hwndOther, HWND_BOTTOM, 0, 0, 0, 0, SWP_HIDE);
1362 }
1363 WinSendMsg(hwnd, UM_SETUP2, MPVOID, MPVOID);
1364 }
1365 if (msg == UM_SIZE)
1366 return 0;
1367 break;
1368
1369 case WM_ERASEBACKGROUND:
1370 WinFillRect((HPS) mp1, (PRECTL) mp2, 0x00d0d0d0);
1371 return 0;
1372
1373 case WM_PAINT:
1374 {
1375 HPS hps;
1376 RECTL rcl;
1377
1378 hps = WinBeginPaint(hwnd, NULLHANDLE, NULL);
1379 if (hps) {
1380 WinQueryWindowRect(hwnd, &rcl);
1381 WinFillRect(hps, (PRECTL) & rcl, CLR_PALEGRAY);
1382 WinEndPaint(hps);
1383 WinSendMsg(hwnd, UM_SETUP2, MPVOID, MPVOID);
1384 }
1385 }
1386 break;
1387
1388 case UM_COMMAND:
1389 case WM_COMMAND:
1390 return MainWMCommand2(hwnd, msg, mp1, mp2);
1391
1392 case WM_CLOSE:
1393 fAmClosing = TRUE;
1394 WinSendMsg(hwnd, WM_SAVEAPPLICATION, MPVOID, MPVOID);
1395 CloseChildren(hwnd);
1396 PostMsg(hwnd, UM_CLOSE, MPVOID, MPVOID);
1397 DosSleep(1);
1398 return 0;
1399
1400 case UM_CLOSE:
1401 WinDestroyWindow(WinQueryWindow(hwnd, QW_PARENT));
1402 return 0;
1403
1404 case WM_DESTROY:
1405 hwndMain = (HWND) 0;
1406 pd = WinQueryWindowPtr(hwnd, QWL_USER + 4);
1407 xfree(pd, pszSrcFile, __LINE__);
1408 if (!PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID))
1409 WinSendMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID);
1410 break;
1411 }
1412 return WinDefWindowProc(hwnd, msg, mp1, mp2);
1413}
1414
1415HWND StartFM32(HAB hab, INT argc, CHAR ** argv)
1416{
1417 HWND hwndFrame, hwndClient;
1418 ULONG FrameFlags = FCF_TITLEBAR | FCF_SYSMENU |
1419 FCF_SIZEBORDER | FCF_MINMAX |
1420 FCF_ACCELTABLE | FCF_MENU | FCF_ICON | FCF_TASKLIST | FCF_NOBYTEALIGN;
1421
1422 {
1423 INT x;
1424
1425 for (x = 1; x < argc; x++) {
1426 if (*argv[x] == '+' && !argv[x][1])
1427 fLogFile = TRUE;
1428 if (*argv[x] == '-') {
1429 if (argv[x][1])
1430 strcpy(profile, &argv[x][1]);
1431 }
1432 }
1433 }
1434 {
1435 CHAR inipath[CCHMAXPATH], fullpath[CCHMAXPATH];
1436 FILESTATUS3 fsa;
1437
1438 if (PrfQueryProfileString(HINI_USERPROFILE,
1439 FM2Str,
1440 "Home", NULL, inipath, sizeof(inipath))) {
1441 if (!DosQueryPathInfo(inipath, FIL_STANDARD, &fsa, sizeof(fsa))) {
1442 if (fsa.attrFile & FILE_DIRECTORY) {
1443 if (DosQueryPathInfo(inipath,
1444 FIL_QUERYFULLNAME, fullpath, sizeof(fullpath)))
1445 strcpy(fullpath, inipath);
1446 switch_to(fullpath);
1447 }
1448 }
1449 }
1450 }
1451
1452 hwndFrame = WinCreateStdWindow(HWND_DESKTOP,
1453 WS_VISIBLE,
1454 &FrameFlags,
1455 WC_MAINWND2,
1456 NULL,
1457 WS_VISIBLE | WS_ANIMATE,
1458 FM3ModHandle, MAIN2_FRAME, &hwndClient);
1459 if (hwndFrame) {
1460 hwndMainMenu = WinWindowFromID(hwndFrame, FID_MENU);
1461 if (!WinRestoreWindowPos(FM2Str, "MainWindowPos2", hwndFrame)) {
1462
1463 ULONG fl = SWP_MOVE | SWP_SIZE;
1464 RECTL rcl;
1465 ULONG icz = WinQuerySysValue(HWND_DESKTOP, SV_CYICON) * 3L;
1466 ULONG bsz = WinQuerySysValue(HWND_DESKTOP, SV_CYSIZEBORDER);
1467
1468 WinQueryWindowRect(HWND_DESKTOP, &rcl);
1469 rcl.yBottom += icz;
1470 rcl.yTop -= bsz;
1471 rcl.xLeft += bsz;
1472 rcl.xRight -= bsz;
1473 WinSetWindowPos(hwndFrame,
1474 HWND_TOP,
1475 rcl.xLeft,
1476 rcl.yBottom,
1477 rcl.xRight - rcl.xLeft, rcl.yTop - rcl.yBottom, fl);
1478 }
1479 if (fLogFile)
1480 LogFileHandle = _fsopen("FM2.LOG", "a+", SH_DENYWR);
1481 if (hwndHelp)
1482 WinAssociateHelpInstance(hwndHelp, hwndFrame);
1483 PostMsg(hwndClient, UM_SETUP, MPFROMLONG(argc), MPFROMP(argv));
1484 }
1485 return hwndFrame;
1486}
1487
1488#pragma alloc_text(PERSON11,MainFrameWndProc2,MainWndProc2)
1489#pragma alloc_text(PERSON12,StartFM32,MainWMOnce2)
1490#pragma alloc_text(PERSON13,MainWMCommand2)
Note: See TracBrowser for help on using the repository browser.