source: trunk/dll/mainwnd.c@ 735

Last change on this file since 735 was 735, checked in by Steven Levine, 18 years ago

Comments
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 154.5 KB
Line 
1
2/***********************************************************************
3
4 $Id: mainwnd.c 735 2007-07-23 23:26:41Z stevenhl $
5
6 fm/2 main window
7
8 Copyright (c) 1993-98 M. Kimes
9 Copyright (c) 2001, 2007 Steven H. Levine
10
11 11 Jun 02 SHL Drop obsolete xor code
12 16 Oct 02 SHL Handle large partitions
13 01 Aug 04 SHL Rework lstrip/rstrip usage
14 23 May 05 SHL Use QWL_USER
15 23 May 05 SHL Use datamin.h
16 25 May 05 SHL Use ULONGLONG and CommaFmtULL
17 26 May 05 SHL Comments and localize code
18 05 Jun 05 SHL Use QWL_USER
19 06 Jun 05 SHL Rework MainWMCommand for VAC3.65 compat
20 13 Aug 05 SHL Renames and comments
21 08 Dec 05 SHL DriveProc: disable menu items if drive not ready
22 17 Dec 05 SHL DriveProc: correct my stupid
23 29 May 06 SHL IDM_EDITANYARCHIVER: sanitize code
24 17 Jul 06 SHL Use Runtime_Error
25 17 Aug 06 SHL Complain nicer if state name does not exist
26 18 Feb 07 GKY More drive type and icon support
27 08 Mar 07 SHL SaveDirCnrState: do not save state of NOPRESCAN volumes
28 09 Mar 07 SHL RestoreDirCnrState/SaveDirCnrState: optimize and avoid overflows
29 30 Mar 07 GKY Remove GetPString for window class names
30 06 Apr 07 GKY Work around PM DragInfo and DrgFreeDISH limits
31 06 Apr 07 GKY Add some error checking in drag/drop
32 15 Apr 07 SHL mainwnd MAIN_SETUPLIST restore state not found reporting
33 19 Apr 07 SHL Sync with AcceptOneDrop GetOneDrop mods
34 20 Apr 07 SHL Avoid spurious add_udir error reports
35 12 May 07 SHL Use dcd->ulItemsToUnHilite
36 10 Jun 07 GKY Add CheckPmDrgLimit including IsFm2Window as part of work around PM drag limit
37
38***********************************************************************/
39
40#define INCL_DOS
41#define INCL_WIN
42// #define INCL_WINERRORS
43#define INCL_SHLERRORS
44#define INCL_WINHELP
45#define INCL_GPI
46#define INCL_LONGLONG
47#include <os2.h>
48
49#include <stdarg.h>
50#include <stdio.h>
51#include <stdlib.h>
52#include <string.h>
53#include <ctype.h>
54#include <share.h>
55#include <process.h> // _beginthread
56
57#include "fm3dll.h"
58#include "fm3dlg.h"
59#include "fm3str.h"
60#include "tools.h"
61#include "datamin.h"
62
63#pragma data_seg(DATA1)
64
65static PSZ pszSrcFile = __FILE__;
66
67#pragma alloc_text(MISC8,SetToggleChecks,FindDirCnrByName,TopWindow)
68#pragma alloc_text(MISC8,TopWindowName,CountDirCnrs)
69#pragma alloc_text(MAINWND,AdjustSizeOfClient,FillClient,ChildButtonProc)
70#pragma alloc_text(MAINWND,ToolBackProc,StatusProc)
71#pragma alloc_text(MAINWND,MoveChildrenAwayFromTree,ArrangeIcons,NextChild)
72#pragma alloc_text(MAINWND,ChildFrameButtonProc)
73#pragma alloc_text(MAINWND2,CloseChildren,CountChildren,GetNextWindowPos)
74#pragma alloc_text(MAINWND2,CascadeChildren,TileChildren,ResizeChildren)
75#pragma alloc_text(MAINWND2,MinResChildren,MainFrameWndProc,MainWndProc)
76#pragma alloc_text(MAINWND2,DropDownListProc)
77#pragma alloc_text(MAINWND3,RestoreDirCnrState,SaveDirCnrState)
78#pragma alloc_text(MAINWND3,CloseDirCnrChildren,TransformSwp)
79#pragma alloc_text(MAINWND3,ResizeTools,BuildTools,CommandLineProc)
80#pragma alloc_text(MAINWND4,DriveProc,DriveBackProc,BuildDriveBarButtons,ResizeDrives)
81#pragma alloc_text(MAINWND4,LEDProc,IdealButtonProc)
82#pragma alloc_text(MAINWND5,MainWMOnce)
83#pragma alloc_text(MAINWND6,MainWMCommand)
84#pragma alloc_text(BUBBLE,MakeBubble,BubbleProc,BubbleHelp)
85#pragma alloc_text(MAINOBJ,MainObjectWndProc,MakeMainObjWin)
86
87static USHORT firsttool = 0;
88
89static BOOL CloseDirCnrChildren(HWND hwndClient);
90static BOOL RestoreDirCnrState(HWND hwndClient, PSZ pszStateName, BOOL noview);
91
92static MRESULT EXPENTRY MainObjectWndProc(HWND hwnd, ULONG msg, MPARAM mp1,
93 MPARAM mp2)
94{
95 switch (msg) {
96 case UM_SETUP:
97 case UM_SETUP2:
98 case UM_SETUP3:
99 case UM_SETUP4:
100 case UM_SETUP5:
101 /*
102 * feed setup messages to main window
103 */
104 PostMsg(hwndMain, msg, mp1, mp2);
105 return 0;
106
107 case UM_SETUP6:
108 /*
109 * handle bubble help requests from drive bar buttons
110 */
111 {
112 char dv[3], d;
113 HWND hwndB = (HWND) mp1;
114 USHORT id;
115
116 id = WinQueryWindowUShort(hwndB, QWS_ID);
117 *dv = 0;
118 WinQueryWindowText(WinWindowFromID(WinQueryWindow(hwndB, QW_PARENT),
119 id + 50), sizeof(dv), dv);
120 d = toupper(*dv);
121 if (isalpha(d) && d > 'B' &&
122 !(driveflags[d - 'A'] & (DRIVE_CDROM | DRIVE_INVALID |
123 DRIVE_SLOW)) &&
124 (!hwndBubble ||
125 WinQueryWindowULong(hwndBubble, QWL_USER) != hwndB) &&
126 !WinQueryCapture(HWND_DESKTOP)) {
127
128 FSALLOCATE fsa;
129 CHAR s[90], szQty[38];
130 ULONG ulPctFree;
131 ULONGLONG ullFreeQty;
132
133 if (!DosQueryFSInfo((d - 'A') + 1,
134 FSIL_ALLOC, &fsa, sizeof(FSALLOCATE))) {
135 ullFreeQty = (ULONGLONG) fsa.cUnitAvail *
136 (fsa.cSectorUnit * fsa.cbSector);
137 ulPctFree = (fsa.cUnit && fsa.cUnitAvail) ?
138 (fsa.cUnitAvail * 100) / fsa.cUnit : 0;
139 CommaFmtULL(szQty, sizeof(szQty), ullFreeQty, ' ');
140 sprintf(s, "%s (%lu%%) free", szQty, ulPctFree);
141 }
142 if ((!hwndBubble ||
143 WinQueryWindowULong(hwndBubble, QWL_USER) != hwndB) &&
144 !WinQueryCapture(HWND_DESKTOP))
145 WinSendMsg(hwndB, UM_SETUP6, MPFROMP(s), MPVOID);
146 }
147 }
148 return 0;
149
150 case UM_SETDIR:
151 {
152 CHAR s[8] = " :\\OS2";
153 ULONG bd;
154
155 if (DosQuerySysInfo(QSV_BOOT_DRIVE,
156 QSV_BOOT_DRIVE,
157 (PVOID) & bd, (ULONG) sizeof(ULONG)))
158 bd = 3L;
159 *s = (CHAR) bd + '@';
160 WinSendMsg(hwndMain, UM_SETDIR, MPFROMP(s), MPFROMLONG(1L));
161 if (!mp1) {
162 s[3] = 0;
163 WinSendMsg(hwndMain, UM_SETDIR, MPFROMP(s), MPVOID);
164 }
165 PostMsg(MainObjectHwnd, UM_RESTORE, MPFROMLONG(1L), MPFROMLONG(1L));
166 }
167 return 0;
168
169 case UM_RESTORE:
170 if (mp2) {
171 switch ((ULONG) mp2) {
172 case 1:
173 TileChildren(hwndMain, TRUE);
174 break;
175 case 2:
176 CloseDirCnrChildren(hwndMain);
177 break;
178 }
179 }
180 else {
181 fNoTileUpdate = TRUE;
182 WinEnableWindow(WinQueryWindow(hwndMain, QW_PARENT), FALSE);
183 RestoreDirCnrState(hwndMain, (char *)mp1, FALSE);
184 WinEnableWindow(WinQueryWindow(hwndMain, QW_PARENT), TRUE);
185 fNoTileUpdate = FALSE;
186 if (mp1)
187 free((char *)mp1);
188 if (fAutoTile)
189 TileChildren(hwndMain, TRUE);
190 }
191 return 0;
192
193 case UM_NOTIFY:
194 /*
195 * bring up notify messages for various windows
196 */
197 if (mp1)
198 return MRFROMLONG(DoNotify((char *)mp1));
199 return 0;
200
201 case WM_DESTROY:
202 if (!PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID))
203 WinSendMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID);
204 break;
205 }
206 return WinDefWindowProc(hwnd, msg, mp1, mp2);
207}
208
209VOID MakeMainObjWin(VOID * args)
210{
211 HAB hab2;
212 HMQ hmq2;
213 QMSG qmsg2;
214
215 priority_bumped();
216 hab2 = WinInitialize(0);
217 if (hab2) {
218 hmq2 = WinCreateMsgQueue(hab2, 128);
219 if (hmq2) {
220 DosError(FERR_DISABLEHARDERR);
221 WinRegisterClass(hab2,
222 (PSZ) WC_OBJECTWINDOW,
223 MainObjectWndProc, 0, sizeof(PVOID));
224 MainObjectHwnd = WinCreateWindow(HWND_OBJECT,
225 WC_OBJECTWINDOW,
226 (PSZ) NULL,
227 0,
228 0L,
229 0L,
230 0L,
231 0L,
232 0L, HWND_TOP, OBJ_FRAME, NULL, NULL);
233 if (!MainObjectHwnd)
234 Win_Error2(HWND_OBJECT, HWND_DESKTOP, pszSrcFile, __LINE__,
235 IDS_WINCREATEWINDOW);
236 else {
237 WinSetWindowPtr(MainObjectHwnd, QWL_USER, args);
238 while (WinGetMsg(hab2, &qmsg2, (HWND) 0, 0, 0))
239 WinDispatchMsg(hab2, &qmsg2);
240 WinDestroyWindow(MainObjectHwnd);
241 }
242 WinDestroyMsgQueue(hmq2);
243 }
244 WinTerminate(hab2);
245 }
246}
247
248static MRESULT EXPENTRY IdealButtonProc(HWND hwnd, ULONG msg, MPARAM mp1,
249 MPARAM mp2)
250{
251 switch (msg) {
252 case WM_MOUSEMOVE:
253 BubbleHelp(hwnd, TRUE, FALSE, FALSE, GetPString(IDS_IDEALBUTTONHELP));
254 break;
255 }
256 return PFNWPButton(hwnd, msg, mp1, mp2);
257}
258
259HWND TopWindow(HWND hwndParent, HWND exclude)
260{
261 HENUM henum;
262 HWND hwndC = (HWND) 0;
263 USHORT id;
264
265 if (hwndParent) {
266 henum = WinBeginEnumWindows(hwndMain);
267 while ((hwndC = WinGetNextWindow(henum)) != NULLHANDLE) {
268 if (hwndC != exclude) {
269 id = WinQueryWindowUShort(hwndC, QWS_ID);
270 if (id)
271 break;
272 }
273 }
274 WinEndEnumWindows(henum);
275 }
276 return hwndC;
277}
278
279HWND TopWindowName(HWND hwndParent, HWND exclude, CHAR * ret)
280{
281 HENUM henum;
282 HWND hwndC = (HWND) 0, hwndDir, hwndClient;
283 USHORT id;
284 PCNRITEM pci = NULL;
285
286 if (ret) {
287 *ret = 0;
288 if (hwndParent) {
289 henum = WinBeginEnumWindows(hwndMain);
290 while ((hwndC = WinGetNextWindow(henum)) != NULLHANDLE) {
291 // saymsg(MB_ENTER,HWND_DESKTOP,DEBUG_STRING,"Tree = %lu\rExclude = %lu\rFound = %lu",hwndTree,exclude,hwndC);
292 if (hwndC != exclude && hwndC != hwndTree) {
293 id = WinQueryWindowUShort(hwndC, QWS_ID);
294 if (id) {
295 hwndClient = WinWindowFromID(hwndC, FID_CLIENT);
296 if (hwndClient) {
297 hwndDir = WinWindowFromID(hwndClient, DIR_CNR);
298 if (hwndDir) {
299 if (fLookInDir) {
300 pci = (PCNRITEM) WinSendMsg(hwndDir,
301 CM_QUERYRECORDEMPHASIS,
302 MPFROMLONG(CMA_FIRST),
303 MPFROMSHORT(CRA_CURSORED));
304 if (pci && (INT) pci != -1)
305 break;
306 }
307 if (WinSendMsg(hwndClient,
308 UM_CONTAINERDIR, MPFROMP(ret), MPVOID)) {
309 MakeValidDir(ret);
310 // saymsg(MB_ENTER,HWND_DESKTOP,DEBUG_STRING,"Tree = %lu\rExclude = %lu\rFound = %lu\r\"%s\"",hwndTree,exclude,hwndC,ret);
311 WinEndEnumWindows(henum);
312 return hwndC;
313 }
314 }
315 }
316 }
317 }
318 }
319 WinEndEnumWindows(henum);
320 if (!pci || (INT) pci == -1) {
321 hwndC = hwndTree;
322 pci = (PCNRITEM) WinSendMsg(WinWindowFromID(WinWindowFromID(hwndTree,
323 FID_CLIENT),
324 TREE_CNR),
325 CM_QUERYRECORDEMPHASIS,
326 MPFROMLONG(CMA_FIRST),
327 MPFROMSHORT(CRA_CURSORED));
328 }
329 if (pci && (INT) pci != -1) {
330 strcpy(ret, pci->pszFileName);
331 MakeValidDir(ret);
332 }
333 else
334 save_dir2(ret);
335 }
336 }
337 return hwndC;
338}
339
340ULONG CountDirCnrs(HWND hwndParent)
341{
342 HENUM henum;
343 HWND hwndF = (HWND) 0, hwndC, hwndDir;
344 ULONG ret = 0;
345
346 henum = WinBeginEnumWindows(hwndParent);
347 while ((hwndF = WinGetNextWindow(henum)) != NULLHANDLE) {
348 hwndC = WinWindowFromID(hwndF, FID_CLIENT);
349 if (hwndC) {
350 hwndDir = WinWindowFromID(hwndC, DIR_CNR);
351 if (hwndDir)
352 ret++;
353 }
354 }
355 WinEndEnumWindows(henum);
356 return ret;
357}
358
359HWND FindDirCnrByName(CHAR * directory, BOOL restore)
360{
361 HENUM henum;
362 HWND hwndF = (HWND) 0, hwndC, hwndDir;
363 CHAR retstr[CCHMAXPATH];
364
365 if (hwndMain) {
366 henum = WinBeginEnumWindows(hwndMain);
367 while ((hwndF = WinGetNextWindow(henum)) != NULLHANDLE) {
368 hwndC = WinWindowFromID(hwndF, FID_CLIENT);
369 if (hwndC) {
370 hwndDir = WinWindowFromID(hwndC, DIR_CNR);
371 if (hwndDir) {
372 *retstr = 0;
373 WinSendMsg(hwndC, UM_CONTAINERDIR, MPFROMP(retstr), MPVOID);
374 if (*retstr && !stricmp(retstr, directory)) {
375 if (restore)
376 WinSetWindowPos(hwndF,
377 HWND_TOP,
378 0,
379 0,
380 0,
381 0,
382 SWP_RESTORE | SWP_SHOW |
383 SWP_ACTIVATE | SWP_ZORDER);
384 break;
385 }
386 }
387 }
388 }
389 WinEndEnumWindows(henum);
390 }
391 return hwndF;
392}
393
394static VOID SetToggleChecks(HWND hwndMenu)
395{
396 WinCheckMenuItem(hwndMenu, IDM_TEXTTOOLS, fTextTools);
397 WinCheckMenuItem(hwndMenu, IDM_TOOLTITLES, fToolTitles);
398 WinCheckMenuItem(hwndMenu, IDM_USERLIST, fUserComboBox);
399 WinCheckMenuItem(hwndMenu, IDM_TOOLSUBMENU, fToolbar);
400 WinCheckMenuItem(hwndMenu, IDM_AUTOVIEWSUBMENU, fAutoView);
401 WinCheckMenuItem(hwndMenu, IDM_AUTOVIEWFILE, !fComments);
402 WinCheckMenuItem(hwndMenu, IDM_AUTOVIEWCOMMENTS, fComments);
403 WinCheckMenuItem(hwndMenu, IDM_MOREBUTTONS, fMoreButtons);
404 WinCheckMenuItem(hwndMenu, IDM_DRIVEBAR, fDrivebar);
405 WinCheckMenuItem(hwndMenu, IDM_AUTOTILE, fAutoTile);
406 WinCheckMenuItem(hwndMenu, IDM_TILEBACKWARDS, fTileBackwards);
407}
408
409static VOID ResizeTools(HWND hwnd)
410{
411 register ULONG butx = 18L;
412 INT attrib = SWP_MOVE | SWP_SIZE | SWP_SHOW | SWP_ZORDER | SWP_NOREDRAW,
413 noattrib;
414 register TOOL *tool, *starttool;
415 SWP *swp;
416 register ULONG numtools, x;
417
418 if (!fToolbar)
419 return;
420 noattrib = attrib;
421 noattrib &= (~(SWP_SHOW | SWP_ZORDER));
422 noattrib |= SWP_HIDE;
423 /* count tools */
424 tool = toolhead;
425 for (numtools = 0L; tool; numtools++)
426 tool = tool->next;
427 /* allocate swp array for WinSetMultWindowPos */
428 swp = xmallocz(sizeof(SWP) * (numtools + 2), pszSrcFile, __LINE__);
429 if (swp) {
430 for (x = 0; x < numtools + 2L; x++) {
431 swp[x].hwndInsertBehind = HWND_TOP;
432 swp[x].fl = attrib;
433 swp[x].y = (fToolTitles) ? 14L : 3L;
434 swp[x].cx = 32L;
435 swp[x].cy = 32L;
436 }
437 swp[0].x = swp[1].x = 2L;
438 swp[0].y = (fTextTools) ? 14L : 18L;
439 swp[1].y = (fTextTools) ? 1L : 2L;
440 swp[0].cx = swp[1].cx = 14L;
441 swp[0].cy = swp[1].cy = 14L;
442 swp[0].hwnd = WinWindowFromID(hwnd, IDM_TOOLLEFT);
443 swp[1].hwnd = WinWindowFromID(hwnd, IDM_TOOLRIGHT);
444 x = 2L;
445 tool = find_tool(firsttool);
446 if (!tool)
447 tool = toolhead;
448 starttool = tool;
449 while (tool) {
450 if (!(tool->flags & T_INVISIBLE)) {
451 swp[x].x = butx;
452 if (fTextTools || (tool->flags & T_TEXT)) {
453 butx += 55L;
454 swp[x].cx = 54L;
455 swp[x].cy = 24L;
456 swp[x].y = 3L;
457 }
458 else
459 butx += 33L;
460 if (tool->flags & T_SEPARATOR)
461 butx += 12;
462 }
463 else
464 swp[x].fl = noattrib;
465 swp[x].hwnd = WinWindowFromID(hwnd, tool->id);
466 x++;
467 tool = tool->next;
468 }
469 tool = toolhead;
470 while (tool && tool != starttool) {
471 swp[x].x = butx;
472 if (!(tool->flags & T_INVISIBLE)) {
473 if (fTextTools || (tool->flags & T_TEXT)) {
474 butx += 55L;
475 swp[x].cx = 54L;
476 swp[x].cy = 24L;
477 swp[x].y = 3L;
478 }
479 else
480 butx += 33L;
481 if (tool->flags & T_SEPARATOR)
482 butx += 12;
483 }
484 else
485 swp[x].fl = noattrib;
486 swp[x].hwnd = WinWindowFromID(hwnd, tool->id);
487 x++;
488 tool = tool->next;
489 }
490 WinSetMultWindowPos(WinQueryAnchorBlock(hwnd), swp, numtools + 2L);
491 if (!fTextTools && fToolTitles) {
492 for (x = 2L; x < numtools + 2L; x++) {
493 if (fTextTools || !fToolTitles)
494 swp[x].fl = noattrib;
495 else {
496 tool = find_tool(WinQueryWindowUShort(swp[x].hwnd, QWS_ID));
497 if (tool && (tool->flags & T_TEXT))
498 swp[x].fl = noattrib;
499 else {
500 swp[x].hwndInsertBehind = HWND_TOP;
501 swp[x].y = 1L;
502 swp[x].cy = 10L;
503 }
504 }
505 swp[x].hwnd = WinWindowFromID(hwnd,
506 WinQueryWindowUShort(swp[x].hwnd,
507 QWS_ID) + 25000);
508 }
509 WinSetMultWindowPos(WinQueryAnchorBlock(hwnd), &swp[2], numtools);
510 }
511 free(swp);
512 }
513 WinInvalidateRect(hwnd, NULL, TRUE);
514}
515
516static MRESULT EXPENTRY DropDownListProc(HWND hwnd, ULONG msg, MPARAM mp1,
517 MPARAM mp2)
518{
519 PFNWP oldproc = (PFNWP) INSTDATA(hwnd);
520 static HWND hwndMenu = (HWND) 0;
521 USHORT id;
522 static BOOL emphasized = FALSE;
523
524 switch (msg) {
525 case WM_MOUSEMOVE:
526 shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT | KC_SHIFT | KC_CTRL));
527 break;
528
529 case WM_CHAR:
530 shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT | KC_ALT | KC_CTRL));
531 break;
532
533 case WM_MENUEND:
534 if (hwndMenu == (HWND) mp2) {
535 WinDestroyWindow(hwndMenu);
536 hwndMenu = (HWND) 0;
537 }
538 break;
539
540 case WM_CONTEXTMENU:
541 {
542 MRESULT ret = MRFROMSHORT(TRUE);
543
544 if (hwndMenu)
545 WinDestroyWindow(hwndMenu);
546 hwndMenu = (HWND) 0;
547 id = WinQueryWindowUShort(WinQueryWindow(hwnd, QW_PARENT), QWS_ID);
548 switch (id) {
549 case MAIN_CMDLIST:
550 WinPostMsg(WinWindowFromID(WinQueryWindow(WinQueryWindow(hwnd,
551 QW_PARENT),
552 QW_PARENT),
553 FID_CLIENT),
554 WM_COMMAND, MPFROM2SHORT(IDM_EDITCOMMANDS, 0), MPVOID);
555 break;
556 case MAIN_USERLIST:
557 case MAIN_SETUPLIST:
558 hwndMenu = WinLoadMenu(HWND_DESKTOP, FM3ModHandle, id);
559 if (hwndMenu)
560 PopupMenu(hwnd,
561 WinWindowFromID(WinQueryWindow(WinQueryWindow(hwnd,
562 QW_PARENT),
563 QW_PARENT),
564 FID_CLIENT), hwndMenu);
565 break;
566 default:
567 ret = FALSE;
568 break;
569 }
570 return ret;
571 }
572
573 case WM_CONTROL:
574 if (hwndStatus2) {
575 switch (SHORT1FROMMP(mp1)) {
576 case CBID_EDIT:
577 id = WinQueryWindowUShort(hwnd, QWS_ID);
578 switch (SHORT2FROMMP(mp1)) {
579 case EN_SETFOCUS:
580 switch (id) {
581 case MAIN_CMDLIST:
582 WinSetWindowText(hwndStatus2, GetPString(IDS_CMDLISTHELP));
583 break;
584 case MAIN_SETUPLIST:
585 WinSetWindowText(hwndStatus2, GetPString(IDS_SETUPLISTHELP));
586 break;
587 case MAIN_USERLIST:
588 WinSetWindowText(hwndStatus2, GetPString(IDS_USERLISTHELP));
589 break;
590 case MAIN_DRIVELIST:
591 WinSetWindowText(hwndStatus2, GetPString(IDS_DRIVELISTHELP));
592 break;
593 case MAIN_BUTTONLIST:
594 WinSetWindowText(hwndStatus2, GetPString(IDS_BUTTONLISTHELP));
595 break;
596 default:
597 break;
598 }
599 break;
600
601 default:
602 break;
603 }
604 }
605 break;
606
607 default:
608 break;
609 }
610 break;
611
612 case WM_BEGINDRAG:
613 id = WinQueryWindowUShort(hwnd, QWS_ID);
614 // saymsg(MB_ENTER,HWND_DESKTOP,DEBUG_STRING,"%u %s %u",id,(id == CBID_EDIT) ? "TRUE" : "FALSE",WinQueryWindowUShort(WinQueryWindow(hwnd,QW_PARENT),QWS_ID) == MAIN_USERLIST);
615 if (id == CBID_EDIT &&
616 WinQueryWindowUShort(WinQueryWindow(hwnd, QW_PARENT), QWS_ID) ==
617 MAIN_USERLIST) {
618
619 CHAR path[CCHMAXPATH];
620
621 *path = 0;
622 WinQueryWindowText(hwnd, CCHMAXPATH, path);
623 bstrip(path);
624 // saymsg(MB_ENTER,HWND_DESKTOP,DEBUG_STRING,"Dragging: %s",path);
625 if (*path && !IsRoot(path))
626 DragOne(hwnd, (HWND) 0, path, FALSE);
627 return 0;
628 }
629 break;
630
631 case DM_DRAGOVER:
632 id = WinQueryWindowUShort(WinQueryWindow(hwnd, QW_PARENT), QWS_ID);
633 if (id == MAIN_USERLIST) {
634 if (!emphasized) {
635 emphasized = TRUE;
636 DrawTargetEmphasis(hwnd, emphasized);
637 }
638 if (AcceptOneDrop(hwnd, mp1, mp2))
639 return MRFROM2SHORT(DOR_DROP, DO_MOVE);
640 return MRFROM2SHORT(DOR_NEVERDROP, 0);
641 }
642 break;
643
644 case DM_DRAGLEAVE:
645 id = WinQueryWindowUShort(WinQueryWindow(hwnd, QW_PARENT), QWS_ID);
646 if (id == MAIN_USERLIST) {
647 if (emphasized) {
648 emphasized = FALSE;
649 DrawTargetEmphasis(hwnd, emphasized);
650 }
651 }
652 break;
653
654 case DM_DROPHELP:
655 id = WinQueryWindowUShort(WinQueryWindow(hwnd, QW_PARENT), QWS_ID);
656 if (id == MAIN_USERLIST) {
657 DropHelp(mp1, mp2, hwnd, GetPString(IDS_USERLISTDROPHELP));
658 return 0;
659 }
660 break;
661
662 case DM_DROP:
663 id = WinQueryWindowUShort(WinQueryWindow(hwnd, QW_PARENT), QWS_ID);
664 if (id == MAIN_USERLIST) {
665
666 char szFrom[CCHMAXPATH + 2];
667
668 if (emphasized) {
669 emphasized = FALSE;
670 DrawTargetEmphasis(hwnd, emphasized);
671 }
672 if (GetOneDrop(hwnd, mp1, mp2, szFrom, sizeof(szFrom))) {
673 MakeValidDir(szFrom);
674 WinSetWindowText(hwnd, szFrom);
675 PostMsg(WinWindowFromID(WinQueryWindow(WinQueryWindow(hwnd,
676 QW_PARENT),
677 QW_PARENT),
678 FID_CLIENT),
679 UM_COMMAND, MPFROM2SHORT(IDM_ADDTOUSERLIST, 0), MPVOID);
680 return 0;
681 }
682 }
683 break;
684
685 case WM_DESTROY:
686 if (hwndMenu)
687 WinDestroyWindow(hwndMenu);
688 hwndMenu = (HWND) 0;
689 break;
690 }
691
692 return oldproc(hwnd, msg, mp1, mp2);
693}
694
695void BubbleHelp(HWND hwnd, BOOL other, BOOL drive, BOOL above, char *help)
696{
697 if (help && *help &&
698 ((drive && fDrivebarHelp) ||
699 (other && fOtherHelp) || (!other && !drive && fToolbarHelp))) {
700 if ((!hwndBubble ||
701 WinQueryWindowULong(hwndBubble, QWL_USER) != hwnd) &&
702 !WinQueryCapture(HWND_DESKTOP))
703 MakeBubble(hwnd, above, help);
704 }
705}
706
707VOID MakeBubble(HWND hwnd, BOOL above, CHAR * help)
708{
709 if (!hwnd || !help || !*help)
710 return;
711
712 if (hwndBubble)
713 WinDestroyWindow(hwndBubble);
714
715 {
716 HWND hwndActive;
717 char ucClassname[8];
718
719 hwndActive = WinQueryActiveWindow(HWND_DESKTOP);
720 if (hwndActive) {
721 /* don't bring up help if window isn't active */
722 if (!WinIsChild(hwnd, hwndActive))
723 return;
724 }
725 hwndActive = WinQueryFocus(HWND_DESKTOP);
726 if (WinQueryClassName(hwndActive, sizeof(ucClassname), ucClassname)) {
727 /* don't bring up help if a menu is active */
728 if (!strcmp(ucClassname, "#4"))
729 return;
730 }
731 }
732
733 hwndBubble = WinCreateWindow(HWND_DESKTOP,
734 WC_BUBBLE,
735 help,
736 WS_CLIPSIBLINGS | SS_TEXT |
737 DT_CENTER | DT_VCENTER,
738 0,
739 0,
740 0,
741 0,
742 HWND_DESKTOP, HWND_TOP, MAIN_HELP, NULL, NULL);
743 if (!hwndBubble)
744 Win_Error2(HWND_DESKTOP, HWND_DESKTOP, pszSrcFile, __LINE__,
745 IDS_WINCREATEWINDOW);
746 else {
747 HPS hps;
748 POINTL aptl[TXTBOX_COUNT], ptl, tptl;
749 LONG lxScreen, sx, sy, extra = 0, lyScreen;
750 char *p, *pp, *wp;
751 SWP swp;
752
753 WinQueryWindowPos(hwnd, &swp);
754 lyScreen = WinQuerySysValue(HWND_DESKTOP, SV_CYSCREEN);
755 lxScreen = WinQuerySysValue(HWND_DESKTOP, SV_CXSCREEN);
756 WinSetWindowULong(hwndBubble, QWL_USER, hwnd);
757 SetPresParams(hwndBubble, NULL, NULL, NULL, GetPString(IDS_8HELVTEXT));
758 hps = WinGetPS(hwndBubble);
759 p = help;
760 tptl.x = tptl.y = 0;
761 while (p && *p) {
762 wp = NULL;
763 pp = strchr(p, '\r');
764 if (pp) {
765 wp = pp;
766 *pp = 0;
767 pp++;
768 }
769 GpiQueryTextBox(hps, strlen(p), p, TXTBOX_COUNT, aptl);
770 tptl.x = max(aptl[TXTBOX_TOPRIGHT].x, tptl.x);
771 if (tptl.y)
772 tptl.y += extra;
773 else
774 extra = aptl[TXTBOX_TOPLEFT].y / 4;
775 tptl.y += aptl[TXTBOX_TOPLEFT].y;
776 if (wp)
777 *wp = '\r';
778 p = pp;
779 }
780 WinSetWindowULong(hwndBubble, QWL_USER + 4, extra);
781 WinReleasePS(hps);
782 ptl.x = ptl.y = 0;
783 WinMapWindowPoints(hwnd, HWND_DESKTOP, &ptl, 1);
784 if (above) {
785 sy = ptl.y + swp.cy + 4;
786 if (sy + tptl.y + 12 > lyScreen) {
787 above = FALSE;
788 sy = ptl.y - (tptl.y + 14);
789 }
790 }
791 else
792 sy = ptl.y - (tptl.y + 14);
793 if (ptl.x > (lxScreen / 2))
794 sx = (ptl.x - tptl.x) - 16;
795 else
796 sx = ptl.x + (54 * (above == FALSE)) + 2;
797 if (sx < 0)
798 sx = 0;
799 if (sx + tptl.x + 14 > lxScreen)
800 sx = lxScreen - (tptl.x + 14);
801 if (sy < 0) {
802 sy = ptl.y + swp.cy + 4;
803 if (sy + tptl.y + 12 > lyScreen)
804 sy = 0;
805 }
806 WinSetWindowPos(hwndBubble, HWND_TOP, sx, sy,
807 tptl.x + 14,
808 tptl.y + 12,
809 SWP_DEACTIVATE | SWP_SHOW | SWP_ZORDER |
810 SWP_MOVE | SWP_SIZE);
811 }
812}
813
814MRESULT EXPENTRY BubbleProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
815{
816 switch (msg) {
817 case WM_SETFOCUS:
818 if (mp2)
819 PostMsg(hwnd, UM_FOCUSME, mp1, MPVOID);
820 break;
821
822 case UM_FOCUSME:
823 WinSetFocus(HWND_DESKTOP, (HWND) mp1);
824 return 0;
825
826 case WM_MOUSEMOVE:
827 WinShowWindow(hwnd, FALSE);
828 break;
829
830 case UM_TIMER:
831 {
832 POINTL ptl;
833
834 WinQueryPointerPos(HWND_DESKTOP, &ptl);
835 if (WinWindowFromPoint(HWND_DESKTOP, &ptl, TRUE) !=
836 WinQueryWindowULong(hwnd, QWL_USER) || !WinIsWindowVisible(hwnd))
837 WinDestroyWindow(hwnd);
838 }
839 return 0;
840
841 case WM_PAINT:
842 {
843 HPS hps;
844 SWP swp;
845 POINTL ptl, aptl[TXTBOX_COUNT];
846 CHAR *s, *p, *pp, *wp;
847 ULONG extra, tlen, y;
848
849 hps = WinBeginPaint(hwnd, (HPS) 0, NULL);
850 if (hps) {
851 WinQueryWindowPos(hwnd, &swp);
852 GpiCreateLogColorTable(hps, 0, LCOLF_RGB, 0, 0, 0);
853 GpiSetColor(hps, ((255 << 16) | (255 << 8) | 198));
854 GpiSetBackMix(hps, BM_LEAVEALONE);
855 GpiSetMix(hps, FM_OVERPAINT);
856 ptl.x = ptl.y = 0;
857 GpiMove(hps, &ptl);
858 ptl.x = swp.cx - 1;
859 ptl.y = swp.cy - 1;
860 GpiBox(hps, DRO_OUTLINEFILL, &ptl, 0, 0);
861 tlen = WinQueryWindowTextLength(hwnd);
862 if (tlen) {
863 s = xmalloc(tlen + 2, pszSrcFile, __LINE__);
864 if (s) {
865 WinQueryWindowText(hwnd, tlen + 1, s);
866 if (*s) {
867 p = s;
868 y = swp.cy - 3;
869 extra = WinQueryWindowULong(hwnd, QWL_USER + 4);
870 GpiSetColor(hps, 0);
871 GpiSetMix(hps, FM_OVERPAINT);
872 while (p && *p) {
873 wp = NULL;
874 pp = strchr(p, '\r');
875 if (pp) {
876 wp = pp;
877 *pp = 0;
878 pp++;
879 }
880 GpiQueryTextBox(hps, strlen(p), p, TXTBOX_COUNT, aptl);
881 ptl.x = 7;
882 y -= aptl[TXTBOX_TOPLEFT].y;
883 if (p != s)
884 y -= extra;
885 ptl.y = y;
886 GpiCharStringAt(hps, &ptl, strlen(p), p);
887 if (wp)
888 *wp = '\r';
889 p = pp;
890 }
891 }
892 free(s);
893 }
894 }
895 if (!(swp.fl & (SWP_HIDE | SWP_MINIMIZE)) && swp.cx > 6 && swp.cy > 6) {
896 GpiSetColor(hps, CLR_WHITE);
897 ptl.x = 1;
898 ptl.y = 1;
899 GpiMove(hps, &ptl);
900 ptl.y = swp.cy - 2;
901 GpiLine(hps, &ptl);
902 ptl.x = swp.cx - 2;
903 GpiLine(hps, &ptl);
904 ptl.x = 2;
905 ptl.y = 2;
906 GpiMove(hps, &ptl);
907 ptl.y = swp.cy - 3;
908 GpiLine(hps, &ptl);
909 ptl.x = swp.cx - 3;
910 GpiLine(hps, &ptl);
911 GpiSetColor(hps, CLR_BROWN);
912 ptl.x = 1;
913 ptl.y = 1;
914 GpiMove(hps, &ptl);
915 ptl.x = swp.cx - 2;
916 GpiLine(hps, &ptl);
917 ptl.y = swp.cy - 2;
918 GpiLine(hps, &ptl);
919 ptl.x = 2;
920 ptl.y = 2;
921 GpiMove(hps, &ptl);
922 ptl.x = swp.cx - 3;
923 GpiLine(hps, &ptl);
924 ptl.y = swp.cy - 3;
925 GpiLine(hps, &ptl);
926 }
927 WinEndPaint(hps);
928 }
929 }
930 return 0;
931
932 case WM_CLOSE:
933 WinDestroyWindow(hwnd);
934 return 0;
935
936 case WM_DESTROY:
937 hwndBubble = (HWND) 0;
938 break;
939 }
940 return PFNWPStatic(hwnd, msg, mp1, mp2);
941}
942
943MRESULT EXPENTRY LEDProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
944{
945 switch (msg) {
946 case WM_CREATE:
947 {
948 MRESULT mr = PFNWPStatic(hwnd, msg, mp1, mp2);
949 HBITMAP hbmold = (HBITMAP) 0;
950 HPS hps = (HPS) 0;
951
952 switch (WinQueryWindowUShort(hwnd, QWS_ID)) {
953 case MAIN_LED:
954 hps = WinGetPS(hwnd);
955 hbmold = (HBITMAP) WinSendMsg(hwnd, SM_QUERYHANDLE, MPVOID, MPVOID);
956 if (!fBlueLED) {
957 hbmLEDon = GpiLoadBitmap(hps, 0, LEDON_BMP, 12, 12);
958 hbmLEDoff = GpiLoadBitmap(hps, 0, LEDOFF_BMP, 12, 12);
959 }
960 else {
961 hbmLEDon = GpiLoadBitmap(hps, 0, LEDON2_BMP, 12, 12);
962 hbmLEDoff = GpiLoadBitmap(hps, 0, LEDOFF2_BMP, 12, 12);
963 }
964 if (hbmLEDoff && hbmLEDon)
965 WinSendMsg(hwnd, SM_SETHANDLE, MPFROMLONG(hbmLEDoff), MPVOID);
966 else {
967 if (hbmLEDoff)
968 GpiDeleteBitmap(hbmLEDoff);
969 if (hbmLEDon)
970 GpiDeleteBitmap(hbmLEDon);
971 }
972 if (hbmold &&
973 hbmLEDon &&
974 hbmLEDoff && hbmold != hbmLEDon && hbmold != hbmLEDoff)
975 GpiDeleteBitmap(hbmold);
976 if (hps)
977 WinReleasePS(hps);
978 break;
979 default:
980 SetPresParams(hwnd,
981 &RGBGREY,
982 &RGBBLACK, &RGBGREY, GetPString(IDS_6HELVTEXT));
983 break;
984 }
985 return mr;
986 }
987
988 case WM_SETFOCUS:
989 if (mp2)
990 PostMsg(hwnd, UM_FOCUSME, mp1, MPVOID);
991 break;
992
993 case UM_FOCUSME:
994 WinSetFocus(HWND_DESKTOP, (HWND) mp1);
995 return 0;
996
997 case WM_MOUSEMOVE:
998 BubbleHelp(hwnd, TRUE, FALSE, FALSE, GetPString(IDS_LEDHELP));
999 if (!fNoFinger) {
1000 WinSetPointer(HWND_DESKTOP, hptrFinger);
1001 return MRFROMLONG(TRUE);
1002 }
1003 break;
1004
1005 case WM_BUTTON1CLICK:
1006 PostMsg(WinQueryWindow(hwnd, QW_PARENT),
1007 WM_COMMAND, MPFROM2SHORT(IDM_SHOWNOTEWND, 0), MPVOID);
1008 break;
1009
1010 case WM_BUTTON2CLICK:
1011 PostMsg(WinQueryWindow(hwnd, QW_PARENT),
1012 WM_COMMAND, MPFROM2SHORT(IDM_HIDENOTEWND, 0), MPVOID);
1013 break;
1014
1015 case WM_CHORD:
1016 case WM_BUTTON3CLICK:
1017 PostMsg(WinQueryWindow(hwnd, QW_PARENT),
1018 WM_COMMAND, MPFROM2SHORT(IDM_WINDOWDLG, 0), MPVOID);
1019 break;
1020 }
1021 return PFNWPStatic(hwnd, msg, mp1, mp2);
1022}
1023
1024MRESULT EXPENTRY ChildButtonProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
1025{
1026 USHORT id;
1027 TOOL *tool;
1028
1029 static HWND hwndMenu = (HWND) 0;
1030
1031 switch (msg) {
1032 case WM_BUTTON1DOWN:
1033 case WM_BUTTON2DOWN:
1034 case WM_BUTTON3DOWN:
1035 shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT | KC_SHIFT | KC_CTRL));
1036 break;
1037
1038 case WM_MOUSEMOVE:
1039 if (fToolbarHelp) {
1040 if ((!hwndBubble || WinQueryWindowULong(hwndBubble, QWL_USER) != hwnd)
1041 && !WinQueryCapture(HWND_DESKTOP)) {
1042 id = WinQueryWindowUShort(hwnd, QWS_ID);
1043 tool = find_tool(id);
1044 if (tool && tool->help && *tool->help) {
1045
1046 char s[128];
1047
1048 strcpy(s, tool->help);
1049 if (tool->flags & T_DROPABLE)
1050 strcat(s, GetPString(IDS_DROPONMETEXT));
1051 MakeBubble(hwnd, FALSE, s);
1052 }
1053 }
1054 }
1055 break;
1056
1057 case WM_COMMAND:
1058 switch (SHORT1FROMMP(mp1)) {
1059 case IDM_HELP:
1060 if (hwndHelp)
1061 WinSendMsg(hwndHelp,
1062 HM_DISPLAY_HELP,
1063 MPFROM2SHORT(HELP_TOOLBAR, 0), MPFROMSHORT(HM_RESOURCEID));
1064 break;
1065
1066 case IDM_HIDEANYTOOL: /* hide any tool */
1067 case IDM_HIDETOOL: /* hide tool */
1068 if (SHORT1FROMMP(mp1) == IDM_HIDETOOL)
1069 id = WinQueryWindowUShort(hwnd, QWS_ID);
1070 else
1071 id = (USHORT) WinDlgBox(HWND_DESKTOP, hwnd,
1072 PickToolProc, FM3ModHandle,
1073 PICKBTN_FRAME, GetPString(IDS_HIDETEXT));
1074 if (id) {
1075 tool = find_tool(id);
1076 if (tool) {
1077 tool->flags |= T_INVISIBLE;
1078 fToolsChanged = TRUE;
1079 }
1080 }
1081 break;
1082
1083 case IDM_SHOWTOOLS: /* show all tools */
1084 tool = toolhead;
1085 while (tool) {
1086 tool->flags &= (~T_INVISIBLE);
1087 tool = tool->next;
1088 fToolsChanged = TRUE;
1089 }
1090 break;
1091
1092 case IDM_DELETEANYTOOL: /* delete any button */
1093 case IDM_DELETETOOL: /* delete button */
1094 if (SHORT1FROMMP(mp1) == IDM_DELETETOOL)
1095 id = WinQueryWindowUShort(hwnd, QWS_ID);
1096 else
1097 id =
1098 (USHORT) WinDlgBox(HWND_DESKTOP, hwnd, PickToolProc, FM3ModHandle,
1099 PICKBTN_FRAME, GetPString(IDS_DELETETEXT));
1100 if (id)
1101 PostMsg(WinQueryWindow(hwnd, QW_PARENT), UM_SETUP,
1102 MPFROM2SHORT(id, 0), MPVOID);
1103 return 0;
1104
1105 case IDM_EDITANYTOOL: /* edit any button */
1106 case IDM_EDITTOOL: /* edit button */
1107 if (SHORT1FROMMP(mp1) == IDM_EDITTOOL)
1108 id = WinQueryWindowUShort(hwnd, QWS_ID);
1109 else
1110 id =
1111 (USHORT) WinDlgBox(HWND_DESKTOP, hwnd, PickToolProc, FM3ModHandle,
1112 PICKBTN_FRAME, GetPString(IDS_EDITTEXT));
1113 if (id) {
1114 tool = find_tool(id);
1115 if (tool) {
1116 if (WinDlgBox(HWND_DESKTOP, hwnd, AddToolProc, FM3ModHandle,
1117 ADDBTN_FRAME, (PVOID) tool))
1118 WinSendMsg(WinWindowFromID(WinQueryWindow(WinQueryWindow(hwnd,
1119 QW_PARENT),
1120 QW_PARENT), FID_CLIENT),
1121 WM_COMMAND, MPFROM2SHORT(IDM_CREATETOOL, 0),
1122 MPFROM2SHORT(id, 0));
1123 }
1124 }
1125 break;
1126
1127 case IDM_ADDTOOL: /* add tool */
1128 id = (USHORT) WinDlgBox(HWND_DESKTOP, hwnd, AddToolProc, FM3ModHandle,
1129 ADDBTN_FRAME, MPVOID);
1130 if (id && id != (USHORT) - 1)
1131 WinSendMsg(WinWindowFromID(WinQueryWindow(WinQueryWindow(hwnd,
1132 QW_PARENT),
1133 QW_PARENT), FID_CLIENT),
1134 WM_COMMAND, MPFROM2SHORT(IDM_CREATETOOL, 0),
1135 MPFROM2SHORT(id, 0));
1136 break;
1137
1138 case IDM_REORDERTOOLS: /* reorder tools */
1139 WinDlgBox(HWND_DESKTOP,
1140 hwnd, ReOrderToolsProc, FM3ModHandle, RE_FRAME, MPVOID);
1141 break;
1142
1143 case IDM_SAVETOOLS:
1144 case IDM_LOADTOOLS:
1145 if (WinDlgBox(HWND_DESKTOP,
1146 hwnd,
1147 ToolIODlgProc,
1148 FM3ModHandle,
1149 SVBTN_FRAME,
1150 (PVOID) (SHORT1FROMMP(mp1) == IDM_SAVETOOLS) ?
1151 "TRUE" : NULL))
1152 BuildTools(hwndToolback, TRUE);
1153 break;
1154 }
1155 ResizeTools(WinQueryWindow(hwnd, QW_PARENT));
1156 return 0;
1157
1158 case WM_MENUEND:
1159 if (hwndMenu == (HWND) mp2) {
1160 WinDestroyWindow(hwndMenu);
1161 hwndMenu = (HWND) 0;
1162 }
1163 break;
1164
1165 case WM_CONTEXTMENU:
1166 DosEnterCritSec();
1167 if (!hwndMenu)
1168 hwndMenu = WinLoadMenu(hwnd, FM3ModHandle, ID_BUTTONMENU);
1169 DosExitCritSec();
1170 SetPresParams(hwndMenu, NULL, NULL, NULL, GetPString(IDS_10SYSPROTEXT));
1171 if (PopupMenu(hwnd, hwnd, hwndMenu))
1172 WinShowWindow(hwndMenu, TRUE);
1173 return MRFROMSHORT(TRUE);
1174
1175 case DM_DRAGOVER:
1176 {
1177 PDRAGINFO pDInfo; /* Pointer to DRAGINFO */
1178
1179 pDInfo = (PDRAGINFO) mp1; /* Get DRAGINFO pointer */
1180 DrgAccessDraginfo(pDInfo); /* Access DRAGINFO */
1181 id = WinQueryWindowUShort(hwnd, QWS_ID);
1182 tool = find_tool(id);
1183 if (!tool) {
1184 DrgFreeDraginfo(pDInfo);
1185 return (MRFROM2SHORT(DOR_NEVERDROP, 0)); /* Drop not valid */
1186 }
1187 if (!(tool->flags & T_DROPABLE)) {
1188 DrgFreeDraginfo(pDInfo);
1189 return (MRFROM2SHORT(DOR_NEVERDROP, 0)); /* Drop not valid */
1190 }
1191 {
1192 PDRAGITEM pDItem; /* Pointer to DRAGITEM */
1193
1194 pDItem = DrgQueryDragitemPtr(pDInfo, /* Access DRAGITEM */
1195 0); /* Index to DRAGITEM */
1196 if (DrgVerifyRMF(pDItem, /* Check valid rendering */
1197 DRM_OS2FILE, /* mechanisms and data */
1198 NULL)) { /* formats */
1199 if (!(tool->flags & T_EMPHASIZED)) {
1200 tool->flags |= T_EMPHASIZED;
1201 DrawTargetEmphasis(hwnd, ((tool->flags & T_EMPHASIZED) != 0));
1202 DrgFreeDraginfo(pDInfo);
1203 }
1204 return (MRFROM2SHORT(DOR_DROP, /* Return okay to drop */
1205 DO_MOVE)); /* Move operation valid */
1206 }
1207 DrgFreeDraginfo(pDInfo);
1208 }
1209 }
1210 return (MRFROM2SHORT(DOR_NEVERDROP, 0)); /* Drop not valid */
1211
1212 case DM_DROPHELP:
1213 id = WinQueryWindowUShort(hwnd, QWS_ID);
1214 tool = find_tool(id);
1215 PFNWPButton(hwnd, msg, mp1, mp2);
1216 DropHelp(mp1, mp2, hwnd, GetPString(IDS_TOOLDROPHELP));
1217 return 0;
1218
1219 case DM_DRAGLEAVE:
1220 id = WinQueryWindowUShort(hwnd, QWS_ID);
1221 tool = find_tool(id);
1222 if (tool && (tool->flags & T_DROPABLE)) {
1223 if (tool->flags & T_EMPHASIZED) {
1224 tool->flags &= (~T_EMPHASIZED);
1225 DrawTargetEmphasis(hwnd, ((tool->flags & T_EMPHASIZED) != 0));
1226 }
1227 }
1228 break;
1229
1230 case DM_DROP:
1231 id = WinQueryWindowUShort(hwnd, QWS_ID);
1232 tool = find_tool(id);
1233 if (tool && (tool->flags & T_DROPABLE) != 0) {
1234 LISTINFO *li;
1235 CNRDRAGINFO cdi;
1236
1237 if (tool->flags & T_EMPHASIZED) {
1238 DrawTargetEmphasis(hwnd, ((tool->flags & T_EMPHASIZED) != 0));
1239 tool->flags &= (~T_EMPHASIZED);
1240 }
1241 memset(&cdi, 0, sizeof(cdi));
1242 cdi.pDragInfo = mp1;
1243 li = DoFileDrop(hwnd, NULL, FALSE, mp1, MPFROMP(&cdi));
1244 CheckPmDrgLimit(cdi.pDragInfo);
1245 if (li) {
1246 li->type = id;
1247 if (!li->list || !li->list[0])
1248 FreeListInfo(li);
1249 else {
1250 HWND hwndActive;
1251
1252 hwndActive = TopWindow(hwndMain, (HWND) 0);
1253 if (hwndActive) {
1254 if (!WinSendMsg(hwndActive, UM_COMMAND, MPFROMP(li), MPVOID))
1255 FreeListInfo(li);
1256 }
1257 else
1258 FreeListInfo(li);
1259 }
1260 }
1261 }
1262 return 0;
1263
1264 case WM_CLOSE:
1265 WinDestroyWindow(hwnd);
1266 return 0;
1267 }
1268 return PFNWPButton(hwnd, msg, mp1, mp2);
1269}
1270
1271VOID BuildTools(HWND hwndT, BOOL resize)
1272{
1273 TOOL *tool;
1274 ULONG ctrlxpos = 18L;
1275 CHAR s[33];
1276 HENUM henum;
1277 HWND hwndTool;
1278
1279 henum = WinBeginEnumWindows(hwndT);
1280 while ((hwndTool = WinGetNextWindow(henum)) != NULLHANDLE)
1281 WinDestroyWindow(hwndTool);
1282 WinEndEnumWindows(henum);
1283 if (!fToolbar) {
1284 load_quicktools();
1285 load_tools(NULL);
1286 return;
1287 }
1288 if (!toolhead)
1289 load_tools(NULL);
1290 tool = toolhead;
1291 while (tool) {
1292 sprintf(s, "#%u", tool->id);
1293 hwndTool = (HWND) 0;
1294 if (!fTextTools) {
1295 if (!(tool->flags & T_MYICON)) {
1296 hwndTool = WinCreateWindow(hwndT,
1297 WC_TOOLBUTTONS,
1298 s,
1299 BS_NOPOINTERFOCUS |
1300 BS_BITMAP | BS_PUSHBUTTON,
1301 ctrlxpos,
1302 14,
1303 32,
1304 32, hwndT, HWND_TOP, tool->id, NULL, NULL);
1305 }
1306 if (!hwndTool) {
1307 HBITMAP hbm = LoadBitmapFromFileNum(tool->id);
1308
1309 if (hbm) {
1310 BTNCDATA btc;
1311
1312 memset(&btc, 0, sizeof(btc));
1313 btc.cb = sizeof(btc);
1314 btc.hImage = hbm;
1315 hwndTool = WinCreateWindow(hwndT,
1316 WC_TOOLBUTTONS,
1317 NullStr,
1318 BS_NOPOINTERFOCUS |
1319 BS_BITMAP | BS_PUSHBUTTON,
1320 ctrlxpos,
1321 14,
1322 32,
1323 32,
1324 hwndT, HWND_TOP, tool->id, &btc, NULL);
1325 if (!hwndTool)
1326 GpiDeleteBitmap(hbm);
1327 }
1328 }
1329 if (hwndTool)
1330 tool->flags &= (~T_TEXT);
1331 }
1332 if (!hwndTool) {
1333 hwndTool = WinCreateWindow(hwndT,
1334 WC_TOOLBUTTONS,
1335 (!tool->text && tool->id >= IDM_COMMANDSTART
1336 && tool->id <
1337 IDM_QUICKTOOLSTART) ? command_title(tool->
1338 id -
1339 IDM_COMMANDSTART)
1340 : tool->text,
1341 BS_NOPOINTERFOCUS | BS_PUSHBUTTON, ctrlxpos,
1342 2, 54, 24, hwndT, HWND_TOP, tool->id, NULL,
1343 NULL);
1344 if (!hwndTool)
1345 Win_Error2(hwndT, HWND_DESKTOP, pszSrcFile, __LINE__,
1346 IDS_WINCREATEWINDOW);
1347 tool->flags |= T_TEXT;
1348 }
1349 if (fToolTitles && !fTextTools) {
1350 hwndTool = WinCreateWindow(hwndT,
1351 WC_STATIC,
1352 tool->text,
1353 SS_TEXT | DT_LEFT | DT_VCENTER,
1354 ctrlxpos,
1355 1,
1356 32,
1357 10,
1358 hwndT,
1359 HWND_TOP, tool->id + 25000, NULL, NULL);
1360 if (!hwndTool)
1361 Win_Error2(hwndT, HWND_DESKTOP, pszSrcFile, __LINE__,
1362 IDS_WINCREATEWINDOW);
1363 else {
1364 SetPresParams(hwndTool,
1365 &RGBGREY,
1366 &RGBBLACK, &RGBGREY, GetPString(IDS_2SYSTEMVIOTEXT));
1367 }
1368 }
1369 ctrlxpos += ((tool->flags & T_TEXT) ? 55L : 33L);
1370 SetPresParams(WinWindowFromID(hwndT, tool->id),
1371 NULL, NULL, NULL, GetPString(IDS_8HELVTEXT));
1372 tool = tool->next;
1373 } // while tool
1374
1375 hwndTool = WinCreateWindow(hwndT,
1376 WC_BUTTON,
1377 "#6010",
1378 BS_NOPOINTERFOCUS |
1379 BS_BITMAP | BS_PUSHBUTTON,
1380 1,
1381 19,
1382 14,
1383 13, hwndT, HWND_TOP, IDM_TOOLLEFT, NULL, NULL);
1384 if (!hwndTool)
1385 Win_Error2(hwndT, HWND_DESKTOP, pszSrcFile, __LINE__,
1386 IDS_WINCREATEWINDOW);
1387 hwndTool =
1388 WinCreateWindow(hwndT, WC_BUTTON, "#6011",
1389 BS_NOPOINTERFOCUS | BS_BITMAP | BS_PUSHBUTTON, 1, 4, 14,
1390 13, hwndT, HWND_TOP, IDM_TOOLRIGHT, NULL, NULL);
1391 if (!hwndTool)
1392 Win_Error2(hwndT, HWND_DESKTOP, pszSrcFile, __LINE__,
1393 IDS_WINCREATEWINDOW);
1394 if (resize)
1395 ResizeTools(hwndT);
1396}
1397
1398static MRESULT EXPENTRY CommandLineProc(HWND hwnd, ULONG msg, MPARAM mp1,
1399 MPARAM mp2)
1400{
1401 PFNWP oldproc = (PFNWP) WinQueryWindowPtr(hwnd, QWL_USER);
1402 static BOOL lbup = FALSE;
1403
1404 switch (msg) {
1405 case UM_FOCUSME:
1406 WinSetFocus(HWND_DESKTOP, hwnd);
1407 return 0;
1408
1409 case WM_SETFOCUS:
1410 if (!mp2 && !lbup) {
1411
1412 PID pid;
1413 TID tid;
1414
1415 if (WinQueryWindowUShort((HWND) mp1, QWS_ID) == COMMAND_BUTTON)
1416 break;
1417 if (!WinQueryWindowProcess((HWND) mp1, &pid, &tid) || pid == mypid)
1418 WinDestroyWindow(hwnd);
1419 }
1420 break;
1421
1422 case UM_RESCAN:
1423 {
1424 CHAR cl[1024];
1425
1426 *cl = 0;
1427 lbup = TRUE;
1428 if (WinDlgBox(HWND_DESKTOP,
1429 hwnd,
1430 CmdLine2DlgProc,
1431 FM3ModHandle, EXEC2_FRAME, MPFROMP(cl))) {
1432 lstrip(cl);
1433 WinSetWindowText(hwnd, cl);
1434 }
1435 PostMsg(hwnd, UM_FOCUSME, MPVOID, MPVOID);
1436 PostMsg(hwnd, UM_SETUP, MPVOID, MPVOID);
1437 }
1438 return 0;
1439
1440 case UM_SETUP:
1441 lbup = FALSE;
1442 return 0;
1443
1444 case WM_BUTTON1DBLCLK:
1445 PostMsg(hwnd, UM_OPENWINDOWFORME, MPVOID, MPVOID);
1446 return 0;
1447
1448 case WM_COMMAND:
1449 switch (SHORT1FROMMP(mp1)) {
1450 case COMMAND_BUTTON:
1451 if (!lbup)
1452 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
1453 break;
1454 }
1455 return 0;
1456
1457 case UM_OPENWINDOWFORME:
1458 {
1459 static char directory[CCHMAXPATH], cl[1000];
1460 char **list = NULL;
1461 ULONG len;
1462 HWND hwndCnr;
1463
1464 *directory = *cl = 0;
1465 strcpy(cl, GetCmdSpec(FALSE));
1466 strcat(cl, " /C ");
1467 len = strlen(cl);
1468 WinQueryWindowText(hwnd, 1000 - len, cl + len);
1469 bstrip(cl + len);
1470 if (strlen(cl) > len) {
1471 WinSendMsg(WinQueryWindow(hwnd, QW_PARENT),
1472 UM_SETUP, MPFROMP(cl + len), MPVOID);
1473 WinQueryWindowText(hwndStatus, CCHMAXPATH, directory);
1474 bstrip(directory);
1475 if (*directory && (IsRoot(directory) || !IsFile(directory))) {
1476 if (!FM2Command(directory, cl + len)) {
1477 hwndCnr = TopWindow(hwndMain, (HWND) 0);
1478 if (hwndCnr) {
1479 hwndCnr = WinWindowFromID(hwndCnr, FID_CLIENT);
1480 if (hwndCnr) {
1481 hwndCnr = WinWindowFromID(hwndCnr, DIR_CNR);
1482 if (hwndCnr)
1483 list = BuildList(hwndCnr);
1484 }
1485 }
1486 WinSetActiveWindow(HWND_DESKTOP, hwndCnr);
1487 if (add_cmdline(cl + len, FALSE) && fSaveMiniCmds)
1488 save_cmdlines(FALSE);
1489 ExecOnList(hwndCnr,
1490 cl,
1491 WINDOWED | ((fKeepCmdLine) ?
1492 SEPARATEKEEP : SEPARATE),
1493 directory, list, NULL);
1494 if (list)
1495 free(list);
1496 WinDestroyWindow(hwnd);
1497 break;
1498 }
1499 }
1500 }
1501 WinSendMsg(hwnd, EM_SETSEL, MPFROM2SHORT(0, 1024), MPVOID);
1502 }
1503 return 0;
1504
1505 case WM_CHAR:
1506 if (!lbup && !(SHORT1FROMMP(mp1) & KC_KEYUP)) {
1507 if (SHORT1FROMMP(mp1) & KC_VIRTUALKEY) {
1508 if ((SHORT1FROMMP(mp2) & 255) == '\r')
1509 PostMsg(hwnd, UM_OPENWINDOWFORME, MPVOID, MPVOID);
1510 else if ((SHORT1FROMMP(mp2) & 0xff) == 0x1b)
1511 WinDestroyWindow(hwnd);
1512 else if (SHORT2FROMMP(mp2) == VK_UP || SHORT2FROMMP(mp2) == VK_DOWN)
1513 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
1514 }
1515 }
1516 else if ((SHORT1FROMMP(mp1) & KC_VIRTUALKEY) &&
1517 ((SHORT2FROMMP(mp2) == VK_UP ||
1518 SHORT2FROMMP(mp2) == VK_DOWN) ||
1519 (SHORT1FROMMP(mp2) == '\x1b') || (SHORT1FROMMP(mp2) == '\r')))
1520 return 0;
1521 break;
1522
1523 case WM_DESTROY:
1524 PostMsg(WinQueryWindow(hwnd, QW_PARENT), UM_RESCAN, MPVOID, MPVOID);
1525 lbup = FALSE;
1526 break;
1527 }
1528 return oldproc(hwnd, msg, mp1, mp2);
1529}
1530
1531MRESULT EXPENTRY DriveBackProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
1532{
1533 switch (msg) {
1534 case WM_CREATE:
1535 PostMsg(hwnd, UM_SETUP, MPVOID, MPVOID);
1536 break;
1537
1538 case UM_SETUP:
1539 {
1540 RGB2 rgb;
1541
1542 memset(&rgb, 0, sizeof(rgb));
1543 rgb.bRed = (BYTE)128;
1544 SetPresParams(hwnd,
1545 &RGBGREY, &rgb, &RGBGREY, GetPString(IDS_8HELVTEXT));
1546 SetTargetDir(hwnd, TRUE);
1547 }
1548 return 0;
1549
1550 case WM_SETFOCUS:
1551 case UM_FOCUSME:
1552 case WM_BUTTON1DOWN:
1553 case WM_BUTTON1UP:
1554 case WM_BUTTON2DOWN:
1555 case WM_BUTTON2UP:
1556 case WM_BUTTON3DOWN:
1557 case WM_BUTTON3UP:
1558 return CommonTextButton(hwnd, msg, mp1, mp2);
1559
1560 case WM_MOUSEMOVE:
1561 shiftstate = (SHORT2FROMMP(mp2) & (KC_SHIFT | KC_ALT | KC_CTRL));
1562 break;
1563
1564 case UM_CLICKED:
1565 case UM_CLICKED3:
1566 PostMsg(hwndMain, WM_COMMAND, MPFROM2SHORT(IDM_SETTARGET, 0), MPVOID);
1567 return 0;
1568
1569 case WM_CHAR:
1570 shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT | KC_ALT | KC_CTRL));
1571 break;
1572
1573 case WM_CONTROLPOINTER:
1574 if (!fNoFinger &&
1575 (SHORT1FROMMP(mp1) >= IDM_DRIVEA &&
1576 SHORT1FROMMP(mp1) < IDM_DRIVEA + 26))
1577 return MRFROMLONG(hptrFinger);
1578 break;
1579
1580 case WM_COMMAND:
1581 {
1582 CHAR dv[4];
1583
1584 *dv = 0;
1585 WinQueryWindowText(WinWindowFromID(hwnd, SHORT1FROMMP(mp1) + 50),
1586 2, dv);
1587 if (isalpha(*dv)) {
1588
1589 HWND hwndActive;
1590
1591 dv[1] = ':';
1592 dv[2] = '\\';
1593 dv[3] = 0;
1594 hwndActive = TopWindow(hwnd, (HWND) 0);
1595 if (hwndActive)
1596 WinSendMsg(WinWindowFromID(hwndActive, FID_CLIENT),
1597 UM_DRIVECMD, MPFROMP(dv), MPVOID);
1598 }
1599 }
1600 return 0;
1601
1602 case WM_PAINT:
1603 PaintRecessedWindow(hwnd, (HPS) 0, TRUE, FALSE);
1604 break;
1605
1606 case WM_CLOSE:
1607 WinDestroyWindow(hwnd);
1608 return 0;
1609 }
1610 return PFNWPStatic(hwnd, msg, mp1, mp2);
1611}
1612
1613MRESULT EXPENTRY DriveProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
1614{
1615 USHORT id;
1616 CHAR szDrv[CCHMAXPATH];
1617
1618 static BOOL emphasized = FALSE;
1619 static HWND hwndMenu = NULLHANDLE;
1620 static USHORT helpid = 0;
1621
1622 switch (msg) {
1623 case WM_MOUSEMOVE:
1624 if (fDrivebarHelp &&
1625 (!hwndBubble ||
1626 WinQueryWindowULong(hwndBubble, QWL_USER) != hwnd) &&
1627 !WinQueryCapture(HWND_DESKTOP)) {
1628 id = WinQueryWindowUShort(hwnd, QWS_ID);
1629 if (helpid != id) {
1630 helpid = id;
1631 PostMsg(MainObjectHwnd, UM_SETUP6, MPFROMLONG((ULONG) hwnd), MPVOID);
1632 }
1633 else
1634 helpid = 0;
1635 }
1636 break;
1637
1638 case UM_SETUP6:
1639 if (helpid == WinQueryWindowUShort(hwnd, QWS_ID)) {
1640 if ((char *)mp1 &&
1641 (!hwndBubble ||
1642 WinQueryWindowULong(hwndBubble, QWL_USER) != hwnd) &&
1643 !WinQueryCapture(HWND_DESKTOP)) {
1644
1645 RECTL rcl;
1646 POINTL ptl;
1647
1648 WinQueryPointerPos(HWND_DESKTOP, &ptl);
1649 WinMapWindowPoints(HWND_DESKTOP, hwnd, &ptl, 1);
1650 WinQueryWindowRect(hwnd, &rcl);
1651 if (WinPtInRect(WinQueryAnchorBlock(hwnd), &rcl, &ptl))
1652 BubbleHelp(hwnd, FALSE, TRUE, FALSE, (char *)mp1);
1653 }
1654 }
1655 return 0;
1656
1657 case WM_MENUEND:
1658 if (hwndMenu == (HWND) mp2) {
1659 WinDestroyWindow(hwndMenu);
1660 hwndMenu = (HWND) 0;
1661 }
1662 break;
1663
1664 case WM_CONTEXTMENU:
1665 if (hwndMenu)
1666 WinDestroyWindow(hwndMenu);
1667 hwndMenu = (HWND) 0;
1668 id = WinQueryWindowUShort(hwnd, QWS_ID);
1669 *szDrv = 0;
1670 WinQueryWindowText(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
1671 id + 50), sizeof(szDrv), szDrv);
1672 if (isalpha(*szDrv)) {
1673 hwndMenu = WinLoadMenu(HWND_DESKTOP, FM3ModHandle, MAIN_DRIVES);
1674 if (hwndMenu) {
1675 BOOL rdy;
1676 CHAR chDrv = *szDrv;
1677 UINT iDrv;
1678
1679 strcpy(szDrv + 2, "\\");
1680 MakeValidDir(szDrv);
1681 // Disable menus if MakeValidDir changes drive letter fixme this section doesn't do anything see treecnt.c
1682 rdy = toupper(*szDrv) == toupper(chDrv);
1683 iDrv = toupper(*szDrv) - 'A';
1684 if (!rdy || ~driveflags[iDrv] & DRIVE_REMOTE)
1685 WinEnableMenuItem(hwndMenu, IDM_DETACH, FALSE);
1686
1687 if (!rdy || driveflags[iDrv] & DRIVE_NOTWRITEABLE) {
1688 WinEnableMenuItem(hwndMenu, IDM_MKDIR, FALSE);
1689 WinEnableMenuItem(hwndMenu, IDM_FORMAT, FALSE);
1690 WinEnableMenuItem(hwndMenu, IDM_OPTIMIZE, FALSE);
1691 WinEnableMenuItem(hwndMenu, IDM_UNDELETE, FALSE);
1692 }
1693 if (!rdy || ~driveflags[iDrv] & DRIVE_REMOVABLE) {
1694 WinEnableMenuItem(hwndMenu, IDM_EJECT, FALSE);
1695 WinEnableMenuItem(hwndMenu, IDM_LOCK, FALSE);
1696 WinEnableMenuItem(hwndMenu, IDM_UNLOCK, FALSE);
1697 }
1698 if (!rdy) {
1699 WinEnableMenuItem(hwndMenu, IDM_INFO, FALSE);
1700 WinEnableMenuItem(hwndMenu, IDM_ARCHIVE, FALSE);
1701 WinEnableMenuItem(hwndMenu, IDM_SIZES, FALSE);
1702 WinEnableMenuItem(hwndMenu, IDM_SHOWALLFILES, FALSE);
1703 WinEnableMenuItem(hwndMenu, IDM_CHKDSK, FALSE);
1704 }
1705 /* fixme to be gone?
1706 if (!rdy || ~driveflags[iDrv] & DRIVE_CDROM) {
1707 WinEnableMenuItem(hwndMenu, IDM_CLOSETRAY, FALSE);
1708 }
1709 */
1710 PopupMenu(hwnd, hwnd, hwndMenu);
1711 }
1712 }
1713 return MRFROMSHORT(TRUE);
1714
1715 case WM_BUTTON2CLICK:
1716 shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT | KC_SHIFT | KC_CTRL));
1717 if (!(shiftstate & KC_CTRL))
1718 break;
1719
1720 case WM_CHORD:
1721 case WM_BUTTON3CLICK:
1722 id = WinQueryWindowUShort(hwnd, QWS_ID);
1723 *szDrv = 0;
1724 WinQueryWindowText(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
1725 id + 50), sizeof(szDrv), szDrv);
1726 if (isalpha(*szDrv)) {
1727 strcat(szDrv, "\\");
1728 if (!FindDirCnrByName(szDrv, TRUE))
1729 OpenDirCnr((HWND) 0, hwndMain, hwndTree, FALSE, szDrv);
1730 }
1731 break;
1732
1733 case WM_COMMAND:
1734 PostMsg(hwnd, UM_COMMAND, mp1, mp2);
1735 return 0;
1736
1737 case UM_COMMAND:
1738 id = WinQueryWindowUShort(hwnd, QWS_ID);
1739 *szDrv = 0;
1740 WinQueryWindowText(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
1741 id + 50), sizeof(szDrv), szDrv);
1742 if (isalpha(*szDrv)) {
1743 strcat(szDrv, "\\");
1744 CommonDriveCmd(hwnd, szDrv, SHORT1FROMMP(mp1));
1745 }
1746 return 0;
1747
1748 case DM_DRAGOVER:
1749 id = WinQueryWindowUShort(hwnd, QWS_ID);
1750 *szDrv = 0;
1751 WinQueryWindowText(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
1752 id + 50), sizeof(szDrv), szDrv);
1753 if (isalpha(*szDrv) &&
1754 !(driveflags[toupper(*szDrv) - 'A'] & DRIVE_NOTWRITEABLE)) {
1755 if (!emphasized) {
1756 emphasized = TRUE;
1757 DrawTargetEmphasis(hwnd, emphasized);
1758 }
1759 if (AcceptOneDrop(hwnd, mp1, mp2))
1760 return MRFROM2SHORT(DOR_DROP, DO_MOVE);
1761 return MRFROM2SHORT(DOR_NEVERDROP, 0);
1762 }
1763 break;
1764
1765 case DM_DRAGLEAVE:
1766 id = WinQueryWindowUShort(hwnd, QWS_ID);
1767 *szDrv = 0;
1768 WinQueryWindowText(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
1769 id + 50), sizeof(szDrv), szDrv);
1770 if (isalpha(*szDrv) &&
1771 !(driveflags[toupper(*szDrv) - 'A'] & DRIVE_NOTWRITEABLE)) {
1772 if (emphasized) {
1773 emphasized = FALSE;
1774 DrawTargetEmphasis(hwnd, emphasized);
1775 }
1776 }
1777 break;
1778
1779 case DM_DROPHELP:
1780 id = WinQueryWindowUShort(hwnd, QWS_ID);
1781 *szDrv = 0;
1782 WinQueryWindowText(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
1783 id + 50), sizeof(szDrv), szDrv);
1784 if (isalpha(*szDrv) &&
1785 !(driveflags[toupper(*szDrv) - 'A'] & DRIVE_NOTWRITEABLE)) {
1786 DropHelp(mp1, mp2, hwnd, GetPString(IDS_DRIVEDROPHELP));
1787 return 0;
1788 }
1789 break;
1790
1791 case DM_DROP:
1792 id = WinQueryWindowUShort(hwnd, QWS_ID);
1793 *szDrv = 0;
1794 WinQueryWindowText(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
1795 id + 50), sizeof(szDrv), szDrv);
1796 if (isalpha(*szDrv) &&
1797 !(driveflags[toupper(*szDrv) - 'A'] & DRIVE_NOTWRITEABLE)) {
1798
1799 CNRDRAGINFO cnd;
1800 LISTINFO *li;
1801 ULONG action = UM_ACTION;
1802
1803 if (emphasized) {
1804 emphasized = FALSE;
1805 DrawTargetEmphasis(hwnd, emphasized);
1806 }
1807 memset(&cnd, 0, sizeof(cnd));
1808 cnd.pDragInfo = (PDRAGINFO) mp1;
1809 cnd.pRecord = NULL;
1810 li = DoFileDrop(hwnd,
1811 NULL,
1812 TRUE, MPFROM2SHORT(TREE_CNR, CN_DROP), MPFROMP(&cnd));
1813 CheckPmDrgLimit(cnd.pDragInfo);
1814 if (li) {
1815 strcpy(li->targetpath, szDrv);
1816 strcat(li->targetpath, "\\");
1817 if (li->list && li->list[0] && IsRoot(li->list[0]))
1818 li->type = DO_LINK;
1819 else if (fDragndropDlg && (!*li->arcname || !li->info)) {
1820
1821 CHECKLIST cl;
1822
1823 memset(&cl, 0, sizeof(cl));
1824 cl.size = sizeof(cl);
1825 cl.flags = li->type;
1826 cl.list = li->list;
1827 cl.cmd = li->type;
1828 cl.prompt = li->targetpath;
1829 li->type = WinDlgBox(HWND_DESKTOP,
1830 hwndMain,
1831 DropListProc,
1832 FM3ModHandle, DND_FRAME, MPFROMP(&cl));
1833 if (li->type == DID_ERROR)
1834 Win_Error(DND_FRAME, HWND_DESKTOP, pszSrcFile, __LINE__,
1835 "Drag & Drop Dialog");
1836 if (!li->type) {
1837 FreeListInfo(li);
1838 return 0;
1839 }
1840 li->list = cl.list;
1841 if (!li->list || !li->list[0]) {
1842 FreeListInfo(li);
1843 return 0;
1844 }
1845 }
1846 else {
1847 if (!WinDlgBox(HWND_DESKTOP,
1848 hwndMain,
1849 WalkDlgProc,
1850 FM3ModHandle,
1851 WALK_FRAME,
1852 MPFROMP(li->targetpath)) || !*li->targetpath) {
1853 FreeListInfo(li);
1854 return 0;
1855 }
1856 }
1857 switch (li->type) {
1858 case DND_LAUNCH:
1859 strcat(li->targetpath, " %a");
1860 ExecOnList(hwndMain,
1861 li->targetpath, PROMPT | WINDOWED, NULL, li->list, NULL);
1862 FreeList(li->list);
1863 li->list = NULL;
1864 break;
1865 case DO_LINK:
1866 if (fLinkSetsIcon) {
1867 li->type = IDM_SETICON;
1868 action = UM_MASSACTION;
1869 }
1870 else
1871 li->type = IDM_COMPARE;
1872 break;
1873 case DND_EXTRACT:
1874 if (*li->targetpath && !IsFile(li->targetpath))
1875 li->type = IDM_EXTRACT;
1876 break;
1877 case DND_MOVE:
1878 li->type = IDM_MOVE;
1879 if (*li->targetpath && IsFile(li->targetpath) == 1) {
1880 action = UM_MASSACTION;
1881 li->type = IDM_ARCHIVEM;
1882 }
1883 break;
1884 case DND_WILDMOVE:
1885 li->type = IDM_WILDMOVE;
1886 if (*li->targetpath && IsFile(li->targetpath) == 1) {
1887 action = UM_MASSACTION;
1888 li->type = IDM_ARCHIVEM;
1889 }
1890 break;
1891 case DND_OBJECT:
1892 li->type = IDM_OBJECT;
1893 action = UM_MASSACTION;
1894 break;
1895 case DND_SHADOW:
1896 li->type = IDM_SHADOW;
1897 action = UM_MASSACTION;
1898 break;
1899 case DND_COMPARE:
1900 li->type = IDM_COMPARE;
1901 break;
1902 case DND_SETICON:
1903 action = UM_MASSACTION;
1904 li->type = IDM_SETICON;
1905 break;
1906 case DND_COPY:
1907 li->type = IDM_COPY;
1908 if (*li->targetpath && IsFile(li->targetpath) == 1) {
1909 action = UM_MASSACTION;
1910 li->type = IDM_ARCHIVE;
1911 }
1912 break;
1913 case DND_WILDCOPY:
1914 li->type = IDM_WILDCOPY;
1915 if (*li->targetpath && IsFile(li->targetpath) == 1) {
1916 action = UM_MASSACTION;
1917 li->type = IDM_ARCHIVE;
1918 }
1919 break;
1920 default:
1921 if (*li->arcname && li->info) {
1922 action = UM_MASSACTION;
1923 li->type = (li->type == DO_MOVE) ? IDM_FAKEEXTRACTM :
1924 IDM_FAKEEXTRACT;
1925 }
1926 else if (*li->targetpath && IsFile(li->targetpath) == 1) {
1927 action = UM_MASSACTION;
1928 li->type = (li->type == DO_MOVE) ? IDM_ARCHIVEM : IDM_ARCHIVE;
1929 }
1930 else
1931 li->type = (li->type == DO_MOVE) ? IDM_MOVE : IDM_COPY;
1932 break;
1933 }
1934 if (!li->list || !li->list[0])
1935 FreeListInfo(li);
1936 else
1937 WinSendMsg(hwndTree, UM_ACTION, MPFROMP(li), MPFROMLONG(action));
1938 }
1939 return 0;
1940 }
1941 break;
1942
1943 case WM_DESTROY:
1944 if (hwndMenu)
1945 WinDestroyWindow(hwndMenu);
1946 hwndMenu = (HWND) 0;
1947 break;
1948 }
1949 return PFNWPButton(hwnd, msg, mp1, mp2);
1950}
1951
1952VOID BuildDriveBarButtons(HWND hwndT)
1953{
1954 register ULONG x, y = 0;
1955 ULONG ulDriveNum, ulDriveMap, iconid;
1956 CHAR s[8];
1957 HENUM henum;
1958 HWND hwndB;
1959
1960 henum = WinBeginEnumWindows(hwndT);
1961
1962 while ((hwndB = WinGetNextWindow(henum)) != NULLHANDLE)
1963 WinDestroyWindow(hwndB);
1964
1965 WinEndEnumWindows(henum);
1966 if (fDrivebar) {
1967 DosError(FERR_DISABLEHARDERR);
1968 DosQCurDisk(&ulDriveNum, &ulDriveMap);
1969 for (x = 0; x < 26; x++) {
1970 if ((ulDriveMap & (1L << x)) && !(driveflags[x] & DRIVE_IGNORE)) {
1971 if (x > 1) {
1972 if (driveflags[x] & DRIVE_CDROM)
1973 iconid = CDROM_ICON;
1974 else
1975 iconid = (driveflags[x] & DRIVE_REMOVABLE) ?
1976 REMOVABLE_ICON :
1977 (driveflags[x] & DRIVE_VIRTUAL) ?
1978 VIRTUAL_ICON :
1979 (driveflags[x] & DRIVE_REMOTE) ?
1980 REMOTE_ICON :
1981 (driveflags[x] & DRIVE_RAMDISK) ?
1982 RAMDISK_ICON :
1983 (driveflags[x] & DRIVE_ZIPSTREAM) ?
1984 ZIPSTREAM_ICON :DRIVE_ICON;
1985 }
1986 else
1987 iconid = FLOPPY_ICON;
1988 sprintf(s, "#%lu", iconid);
1989 hwndB = WinCreateWindow(hwndT,
1990 WC_DRIVEBUTTONS,
1991 s,
1992 BS_NOPOINTERFOCUS | BS_BITMAP | BS_PUSHBUTTON,
1993 0,
1994 0,
1995 28,
1996 18,
1997 hwndT, HWND_TOP, y + IDM_DRIVEA, NULL, NULL);
1998 if (!hwndB)
1999 Win_Error2(hwndT, HWND_DESKTOP, pszSrcFile, __LINE__,
2000 IDS_WINCREATEWINDOW);
2001 else {
2002 WinSetWindowPos(hwndB, HWND_BOTTOM, 0, 0, 0, 0, SWP_ZORDER);
2003 sprintf(s, "%c:", (CHAR) x + 'A');
2004 hwndB = WinCreateWindow(hwndT,
2005 WC_STATIC,
2006 s,
2007 SS_TEXT | DT_LEFT | DT_VCENTER,
2008 0,
2009 0,
2010 10,
2011 18,
2012 hwndT,
2013 HWND_TOP, y + IDM_DRIVEATEXT, NULL, NULL);
2014 if (!hwndB)
2015 Win_Error2(hwndT, HWND_DESKTOP, pszSrcFile, __LINE__,
2016 IDS_WINCREATEWINDOW);
2017 else {
2018 SetPresParams(hwndB,
2019 &RGBGREY,
2020 &RGBBLACK, &RGBGREY, GetPString(IDS_6HELVTEXT));
2021 WinSetWindowPos(hwndB, HWND_BOTTOM, 0, 0, 0, 0, SWP_ZORDER);
2022 }
2023 y++;
2024 }
2025 }
2026 } // for
2027 } // if drivebar
2028 PostMsg(WinQueryWindow(hwndT, QW_PARENT),
2029 WM_UPDATEFRAME, MPFROMLONG(FCF_SIZEBORDER), MPVOID);
2030}
2031
2032VOID ResizeDrives(HWND hwndT, long xwidth)
2033{
2034 register ULONG ctrlxpos = 2, ctrlypos = 0, ctrlxsize;
2035 HENUM henum;
2036 HWND hwndB;
2037 RECTL rcl;
2038
2039 DriveLines = 0;
2040 if (!fDrivebar)
2041 return;
2042 if (!xwidth) {
2043 WinQueryWindowRect(hwndT, &rcl);
2044 xwidth = rcl.xRight - ((WinQuerySysValue(HWND_DESKTOP,
2045 SV_CYSIZEBORDER) * 2) + 2);
2046 }
2047 henum = WinBeginEnumWindows(hwndT);
2048 while ((hwndB = WinGetNextWindow(henum)) != NULLHANDLE) {
2049 if (WinQueryWindowUShort(hwndB, QWS_ID) > IDM_DRIVEA + 27)
2050 ctrlxsize = 10;
2051 else
2052 ctrlxsize = 28;
2053 WinSetWindowPos(hwndB,
2054 HWND_TOP,
2055 ctrlxpos, ctrlypos, ctrlxsize, 18, SWP_MOVE | SWP_SHOW);
2056 ctrlxpos += (ctrlxsize + 2);
2057 if (ctrlxsize == 10) {
2058 if (ctrlxpos + (42 + ((fShowTarget && DriveLines == 0) ?
2059 256 : 0)) > xwidth) {
2060 ctrlxpos = 2;
2061 ctrlypos += 18;
2062 DriveLines++;
2063 }
2064 }
2065 }
2066 if (ctrlxpos == 2 && DriveLines)
2067 DriveLines--;
2068}
2069
2070MRESULT EXPENTRY StatusProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
2071{
2072 static HWND hwndE = (HWND) 0, hwndB = (HWND) 0;
2073 static CHAR lastcmd[1024] = "";
2074
2075 switch (msg) {
2076 case WM_CREATE:
2077 {
2078 MRESULT mr = PFNWPStatic(hwnd, msg, mp1, mp2);
2079
2080 SetPresParams(hwnd,
2081 &RGBGREY,
2082 &RGBBLACK, &RGBGREY, GetPString(IDS_8HELVBOLDTEXT));
2083 return mr;
2084 }
2085
2086 case WM_PRESPARAMCHANGED:
2087 if (fRunning) {
2088
2089 ULONG AttrFound, AttrValue[64], cbRetLen;
2090
2091 cbRetLen = WinQueryPresParam(hwnd,
2092 (ULONG) mp1,
2093 0,
2094 &AttrFound,
2095 (ULONG) sizeof(AttrValue), &AttrValue, 0);
2096 if (cbRetLen) {
2097 switch (AttrFound) {
2098 case PP_FONTNAMESIZE:
2099 PostMsg(WinQueryWindow(hwnd, QW_PARENT),
2100 WM_UPDATEFRAME, MPFROMLONG(FCF_SIZEBORDER), MPVOID);
2101 break;
2102 }
2103 }
2104 }
2105 break;
2106
2107 case WM_CONTEXTMENU:
2108 PostMsg(hwndMain, UM_CONTEXTMENU, MPVOID, MPVOID);
2109 return MRFROMSHORT(TRUE);
2110
2111 case WM_BEGINDRAG:
2112 if (hwndTree) {
2113
2114 SWP swp;
2115 ULONG fl = SWP_ACTIVATE | SWP_SHOW | SWP_ZORDER;
2116
2117 WinQueryWindowPos(hwndTree, &swp);
2118 if (!(swp.fl & SWP_MAXIMIZE))
2119 fl |= SWP_RESTORE;
2120 WinSetWindowPos(hwndTree, HWND_TOP, 0, 0, 0, 0, fl);
2121 }
2122 break;
2123
2124 case UM_SETUP:
2125 if (mp1)
2126 strcpy(lastcmd, (CHAR *) mp1);
2127 return 0;
2128
2129 case UM_RESCAN:
2130 if (hwndE && WinIsWindow(WinQueryAnchorBlock(hwnd), hwndE))
2131 WinDestroyWindow(hwndE);
2132 if (hwndB && WinIsWindow(WinQueryAnchorBlock(hwnd), hwndB))
2133 WinDestroyWindow(hwndB);
2134 hwndE = hwndB = (HWND) 0;
2135 return 0;
2136
2137 case WM_COMMAND:
2138 switch (SHORT1FROMMP(mp1)) {
2139 case COMMAND_BUTTON:
2140 PostMsg(hwndE, msg, mp1, mp2);
2141 break;
2142 }
2143 return 0;
2144
2145 case WM_MOUSEMOVE:
2146 shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT | KC_SHIFT | KC_CTRL));
2147 {
2148 USHORT id = WinQueryWindowUShort(hwnd, QWS_ID);
2149 char *s = NULL;
2150
2151 if (fOtherHelp) {
2152 if ((!hwndBubble || WinQueryWindowULong(hwndBubble, QWL_USER) != hwnd)
2153 && !WinQueryCapture(HWND_DESKTOP)) {
2154 switch (id) {
2155 case IDM_ATTRS:
2156 if (WinQueryWindowTextLength(hwnd))
2157 s = GetPString(IDS_ATTRSBUTTONHELP);
2158 break;
2159 case IDM_INFO:
2160 if (WinQueryWindowTextLength(hwnd))
2161 s = GetPString(IDS_INFOBUTTONHELP);
2162 break;
2163 case IDM_RENAME:
2164 if (WinQueryWindowTextLength(hwnd))
2165 s = GetPString(IDS_NAMEBUTTONHELP);
2166 break;
2167 case MAIN_STATUS2:
2168 if (!hwndE)
2169 s = GetPString(IDS_STATUS2HELP);
2170 break;
2171 default:
2172 break;
2173 }
2174 if (s)
2175 MakeBubble(hwnd, FALSE, s);
2176 else if (hwndBubble)
2177 WinDestroyWindow(hwndBubble);
2178 }
2179 }
2180 switch (id) {
2181 case IDM_ATTRS:
2182 case IDM_INFO:
2183 case IDM_RENAME:
2184 case MAIN_STATUS2:
2185 return CommonTextProc(hwnd, msg, mp1, mp2);
2186 default:
2187 break;
2188 }
2189 }
2190 break;
2191
2192 case WM_BUTTON2DOWN:
2193 case WM_BUTTON2UP:
2194 case UM_FOCUSME:
2195 return CommonTextButton(hwnd, msg, mp1, mp2);
2196
2197 case WM_BUTTON1DOWN:
2198 case WM_BUTTON1UP:
2199 case WM_BUTTON3DOWN:
2200 case WM_BUTTON3UP:
2201 {
2202 USHORT id;
2203
2204 id = WinQueryWindowUShort(hwnd, QWS_ID);
2205 switch (id) {
2206 case IDM_ATTRS:
2207 case IDM_INFO:
2208 case IDM_RENAME:
2209 case MAIN_STATUS2:
2210 return CommonTextButton(hwnd, msg, mp1, mp2);
2211 default:
2212 PostMsg(hwnd, UM_FOCUSME, MPVOID, MPVOID);
2213 break;
2214 }
2215 }
2216 break;
2217
2218 case WM_SETFOCUS:
2219 if (mp2) {
2220
2221 USHORT id;
2222
2223 id = WinQueryWindowUShort(hwnd, QWS_ID);
2224 if (id == MAIN_STATUS2 && hwndE)
2225 WinSendMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
2226 else
2227 return CommonTextButton(hwnd, msg, mp1, mp2);
2228 }
2229 break;
2230
2231 case WM_BUTTON1CLICK:
2232 {
2233 USHORT id;
2234
2235 id = WinQueryWindowUShort(hwnd, QWS_ID);
2236 if (id == MAIN_STATUS) {
2237 if (SHORT2FROMMP(mp2) & KC_CTRL)
2238 PostMsg(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
2239 FID_CLIENT),
2240 WM_COMMAND, MPFROM2SHORT(IDM_WINDOWDLG, 0), MPVOID);
2241 else if (hwndTree)
2242 PostMsg(hwndTree, UM_TIMER, MPVOID, MPVOID);
2243 }
2244 }
2245 break;
2246
2247 case UM_CLICKED:
2248 case UM_CLICKED3:
2249 {
2250 USHORT id;
2251
2252 id = WinQueryWindowUShort(hwnd, QWS_ID);
2253 if (id == MAIN_STATUS2 && !hwndE) {
2254
2255 SWP swp;
2256 CHAR directory[CCHMAXPATH];
2257 PFNWP oldproce;
2258
2259 *directory = 0;
2260 TopWindowName(hwndMain, (HWND) 0, directory);
2261 WinQueryWindowPos(hwnd, &swp);
2262 hwndB = WinCreateWindow(hwnd,
2263 WC_BUTTON,
2264 "+",
2265 WS_VISIBLE | BS_PUSHBUTTON |
2266 BS_NOPOINTERFOCUS,
2267 swp.cx - swp.cy,
2268 0,
2269 swp.cy,
2270 swp.cy,
2271 hwnd, HWND_TOP, COMMAND_BUTTON, NULL, NULL);
2272 if (!hwndB)
2273 Win_Error2(hwnd, hwnd, pszSrcFile, __LINE__, IDS_WINCREATEWINDOW);
2274 hwndE = WinCreateWindow(hwnd,
2275 WC_ENTRYFIELD,
2276 NULL,
2277 WS_VISIBLE | ES_AUTOSCROLL,
2278 0,
2279 0,
2280 swp.cx - swp.cy,
2281 swp.cy,
2282 hwnd, HWND_TOP, COMMAND_LINE, NULL, NULL);
2283 if (!hwndE)
2284 Win_Error2(hwnd, hwnd, pszSrcFile, __LINE__, IDS_WINCREATEWINDOW);
2285 if (!hwndE || !hwndB) {
2286 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
2287 return 0;
2288 }
2289 WinSendMsg(hwndE, EM_SETTEXTLIMIT, MPFROM2SHORT(1024, 0), MPVOID);
2290 WinSetWindowText(hwndStatus, directory);
2291 if (*lastcmd)
2292 WinSetWindowText(hwndE, lastcmd);
2293 else
2294 WinSetWindowText(hwndE, GetPString(IDS_HELPCMDTEXT));
2295 oldproce = WinSubclassWindow(hwndE, (PFNWP) CommandLineProc);
2296 if (oldproce)
2297 WinSetWindowPtr(hwndE, QWL_USER, (PVOID) oldproce);
2298 PostMsg(hwndE, UM_FOCUSME, MPVOID, MPVOID);
2299 PostMsg(hwndE, EM_SETSEL, MPFROM2SHORT(0, 1024), MPVOID);
2300 return 0;
2301 }
2302 if (msg == UM_CLICKED3 || (SHORT2FROMMP(mp2) & KC_CTRL)) {
2303 switch (id) {
2304 case IDM_ATTRS:
2305 id = IDM_SORTSIZE;
2306 break;
2307 case IDM_INFO:
2308 id = IDM_SORTLWDATE;
2309 break;
2310 case IDM_RENAME:
2311 id = IDM_SORTFILENAME;
2312 break;
2313 }
2314 }
2315 PostMsg(WinQueryWindow(hwnd, QW_PARENT),
2316 WM_COMMAND, MPFROM2SHORT(id, 0), MPVOID);
2317 }
2318 return 0;
2319
2320 case WM_PAINT:
2321 {
2322 USHORT id;
2323
2324 id = WinQueryWindowUShort(hwnd, QWS_ID);
2325 switch (id) {
2326 case IDM_ATTRS:
2327 case IDM_INFO:
2328 case IDM_RENAME:
2329 case MAIN_STATUS2:
2330 PaintRecessedWindow(hwnd, (HPS) 0, TRUE, FALSE);
2331 break;
2332 default:
2333 PaintRecessedWindow(hwnd, (HPS) 0, FALSE, TRUE);
2334 break;
2335 }
2336 if (id == IDM_RENAME) {
2337
2338 HPS hps;
2339
2340 hps = WinBeginPaint(hwnd, (HPS) 0, NULL);
2341 if (hps) {
2342 PaintSTextWindow(hwnd, hps);
2343 WinEndPaint(hps);
2344 }
2345 return 0;
2346 }
2347 }
2348 break;
2349
2350 }
2351 return PFNWPStatic(hwnd, msg, mp1, mp2);
2352}
2353
2354MRESULT EXPENTRY ToolBackProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
2355{
2356 switch (msg) {
2357 case WM_CREATE:
2358 hwndToolback = hwnd;
2359 SetPresParams(hwnd,
2360 &RGBGREY, &RGBBLACK, &RGBGREY, GetPString(IDS_8HELVTEXT));
2361 break;
2362
2363 case WM_MOUSEMOVE:
2364 shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT | KC_SHIFT | KC_CTRL));
2365 break;
2366
2367 case WM_CONTROLPOINTER:
2368 if (!fNoFinger && SHORT1FROMMP(mp1) < 25000)
2369 return MRFROMLONG(hptrFinger);
2370 break;
2371
2372 case WM_CHAR:
2373 shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT | KC_ALT | KC_CTRL));
2374 break;
2375
2376 case WM_COMMAND:
2377 case UM_COMMAND:
2378 return WinSendMsg(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
2379 FID_CLIENT), msg, mp1, mp2);
2380
2381 case WM_PAINT:
2382 {
2383 HPS hps;
2384 RECTL rcl;
2385
2386 hps = WinBeginPaint(hwnd, (HPS) 0, NULL);
2387 if (hps) {
2388 WinQueryWindowRect(hwnd, &rcl);
2389 WinFillRect(hps, &rcl, CLR_PALEGRAY);
2390 WinEndPaint(hps);
2391 }
2392 PaintRecessedWindow(hwnd, (HPS) 0, TRUE, FALSE);
2393 }
2394 break;
2395
2396 case UM_SETUP:
2397 {
2398 USHORT id;
2399 TOOL *tool;
2400
2401 id = SHORT1FROMMP(mp1);
2402 tool = find_tool(id);
2403 if (tool) {
2404 del_tool(tool);
2405 WinShowWindow(WinWindowFromID(hwnd, id), FALSE);
2406 if (fToolTitles)
2407 WinShowWindow(WinWindowFromID(hwnd, id + 25000), FALSE);
2408 ResizeTools(hwnd);
2409 }
2410 }
2411 return 0;
2412
2413 case WM_CHORD:
2414 {
2415 USHORT id;
2416
2417 id = (USHORT) WinDlgBox(HWND_DESKTOP,
2418 hwnd,
2419 AddToolProc,
2420 FM3ModHandle, ADDBTN_FRAME, MPVOID);
2421 if (id && id != (USHORT) - 1)
2422 WinSendMsg(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
2423 FID_CLIENT),
2424 WM_COMMAND,
2425 MPFROM2SHORT(IDM_CREATETOOL, 0), MPFROM2SHORT(id, 0));
2426 }
2427 break;
2428
2429 case WM_CONTEXTMENU:
2430 if (WinDlgBox(HWND_DESKTOP,
2431 hwnd, ToolIODlgProc, FM3ModHandle, SVBTN_FRAME, MPVOID))
2432 BuildTools(hwnd, TRUE);
2433 return MRFROMSHORT(TRUE);
2434
2435 case WM_CLOSE:
2436 WinDestroyWindow(hwnd);
2437 return 0;
2438
2439 case WM_DESTROY:
2440 break;
2441 }
2442 return WinDefWindowProc(hwnd, msg, mp1, mp2);
2443}
2444
2445static VOID AdjustSizeOfClient(PSWP pswp, PRECTL prectl)
2446{
2447 SWP swp;
2448 RECTL rectl;
2449
2450 if (fFreeTree)
2451 return;
2452 if (pswp) {
2453 if (WinQueryWindowPos(hwndTree, &swp) &&
2454 !(swp.fl & (SWP_MINIMIZE | SWP_HIDE | SWP_MAXIMIZE))) {
2455 pswp->x = swp.cx;
2456 pswp->cx -= swp.cx;
2457 }
2458 }
2459 if (prectl) {
2460 if (WinQueryWindowPos(hwndTree, &swp) &&
2461 !(swp.fl & (SWP_MINIMIZE | SWP_HIDE | SWP_MAXIMIZE)) &&
2462 WinQueryWindowRect(hwndTree, &rectl)) {
2463 prectl->xLeft = rectl.xRight;
2464 prectl->xRight -= rectl.xRight;
2465 }
2466 }
2467}
2468
2469VOID FillClient(HWND hwndClient, PSWP pswp, PRECTL prectl, BOOL avoidtree)
2470{
2471 ULONG adjust;
2472
2473 adjust = WinQuerySysValue(HWND_DESKTOP, SV_CYICON);
2474 if (pswp)
2475 WinQueryWindowPos(hwndClient, pswp);
2476 if (prectl)
2477 WinQueryWindowRect(hwndClient, prectl);
2478 if (avoidtree && !fFreeTree)
2479 AdjustSizeOfClient(pswp, prectl);
2480 if (prectl)
2481 prectl->yBottom += adjust;
2482 if (pswp) {
2483 if (!avoidtree || fFreeTree)
2484 pswp->x = 0;
2485 pswp->y = adjust;
2486 if (pswp->cy >= adjust)
2487 pswp->cy -= adjust;
2488 else
2489 pswp->cy = 0;
2490 }
2491}
2492
2493static VOID MoveChildrenAwayFromTree(HWND hwndClient)
2494{
2495 SWP swpC, swpT, swp;
2496 USHORT id;
2497 HWND hwndChild;
2498 HENUM henum;
2499
2500 if (fFreeTree)
2501 return;
2502 WinQueryWindowPos(hwndClient, &swpC);
2503 if (swpC.fl & (SWP_MINIMIZE | SWP_HIDE))
2504 return;
2505 WinQueryWindowPos(hwndTree, &swpT);
2506 henum = WinBeginEnumWindows(hwndClient);
2507 while ((hwndChild = WinGetNextWindow(henum)) != NULLHANDLE) {
2508 id = WinQueryWindowUShort(hwndChild, QWS_ID);
2509 if (!id || id == TREE_FRAME)
2510 continue;
2511 WinQueryWindowPos(hwndChild, &swp);
2512 if (!(swp.fl & (SWP_MAXIMIZE | SWP_HIDE | SWP_MINIMIZE))) {
2513 if (swp.x < swpT.cx) {
2514 swp.x = swpT.cx;
2515 if (swp.x + swp.cx > swpC.cx)
2516 swp.cx = swpC.cx - swp.x;
2517 if (swp.cx > 24)
2518 WinSetWindowPos(hwndChild, HWND_TOP, swp.x, swp.y, swp.cx, swp.cy,
2519 SWP_SIZE | SWP_MOVE | SWP_SHOW);
2520 }
2521 }
2522 }
2523 WinEndEnumWindows(henum);
2524}
2525
2526static VOID ArrangeIcons(HWND hwndClient)
2527{
2528 HENUM henum;
2529 HWND hwndChild;
2530 SWP swp;
2531
2532 henum = WinBeginEnumWindows(hwndClient);
2533 while ((hwndChild = WinGetNextWindow(henum)) != NULLHANDLE) {
2534 WinQueryWindowPos(hwndChild, &swp);
2535 if (swp.fl & (SWP_MINIMIZE | SWP_HIDE)) {
2536 WinSetWindowUShort(hwndChild, QWS_XMINIMIZE, (USHORT) - 1);
2537 WinSetWindowUShort(hwndChild, QWS_YMINIMIZE, (USHORT) - 1);
2538 WinSetWindowPos(hwndChild, HWND_TOP, 0, 0, 0, 0,
2539 SWP_MOVE | SWP_SHOW | SWP_FOCUSDEACTIVATE);
2540 }
2541 }
2542 WinEndEnumWindows(henum);
2543}
2544
2545static VOID NextChild(HWND hwndClient, BOOL previous)
2546{
2547 HENUM henum;
2548 HWND hwndActive, hwndNext, hwndPrev = (HWND) 0;
2549 BOOL next = FALSE, once = FALSE;
2550
2551 previous = !previous;
2552
2553 hwndActive = WinQueryActiveWindow(hwndClient);
2554 if (!hwndActive)
2555 next = TRUE;
2556 henum = WinBeginEnumWindows(hwndClient);
2557 for (;;) {
2558 hwndNext = WinGetNextWindow(henum);
2559 if (hwndNext) {
2560 if (!WinQueryWindowUShort(hwndNext, QWS_ID))
2561 continue;
2562 if (next)
2563 break;
2564 if (hwndNext == hwndActive) {
2565 if (!previous && hwndPrev) {
2566 hwndNext = hwndPrev;
2567 break;
2568 }
2569 else if (previous)
2570 next = TRUE;
2571 }
2572 hwndPrev = hwndNext;
2573 }
2574 else {
2575 if ((!next && previous) || once)
2576 break;
2577 else if (!previous) {
2578 hwndNext = hwndPrev;
2579 break;
2580 }
2581 else
2582 once = next = TRUE;
2583 }
2584 }
2585 WinEndEnumWindows(henum);
2586
2587 if (hwndNext && hwndNext != hwndActive) {
2588 WinSetWindowPos(hwndNext, HWND_TOP, 0, 0, 0, 0,
2589 SWP_ZORDER | SWP_ACTIVATE);
2590 WinSetWindowPos(hwndActive, ((previous) ? HWND_BOTTOM : hwndNext), 0, 0,
2591 0, 0, SWP_ZORDER);
2592 }
2593}
2594
2595BOOL CloseChildren(HWND hwndClient)
2596{
2597 HENUM henum;
2598 HWND hwndChild;
2599 BOOL ret = FALSE;
2600
2601 fNoTileUpdate = TRUE;
2602 henum = WinBeginEnumWindows(hwndClient);
2603 while ((hwndChild = WinGetNextWindow(henum)) != NULLHANDLE) {
2604 if (hwndChild != hwndTree) {
2605 WinSendMsg(WinWindowFromID(hwndChild, FID_CLIENT),
2606 WM_SAVEAPPLICATION, MPVOID, MPVOID);
2607 if (WinSendMsg(WinWindowFromID(hwndChild, FID_CLIENT),
2608 WM_CLOSE, MPVOID, MPVOID)) {
2609 ret = TRUE;
2610 break;
2611 }
2612 }
2613 }
2614 WinEndEnumWindows(henum);
2615 fNoTileUpdate = FALSE;
2616 return ret;
2617}
2618
2619BOOL CloseDirCnrChildren(HWND hwndClient)
2620{
2621 /* returns TRUE if a directory container window was told to close */
2622
2623 HENUM henum;
2624 HWND hwndChild, hwndDir, hwndTemp;
2625 BOOL ret = FALSE;
2626
2627 fNoTileUpdate = TRUE;
2628 henum = WinBeginEnumWindows(hwndClient);
2629 while ((hwndChild = WinGetNextWindow(henum)) != NULLHANDLE) {
2630 if (hwndChild != hwndTree) {
2631 hwndTemp = WinWindowFromID(hwndChild, FID_CLIENT);
2632 if (hwndTemp) {
2633 hwndDir = WinWindowFromID(hwndTemp, DIR_CNR);
2634 if (hwndDir) {
2635 WinSendMsg(WinWindowFromID(hwndChild, FID_CLIENT),
2636 WM_CLOSE, MPVOID, MPVOID);
2637 ret = TRUE;
2638 }
2639 }
2640 }
2641 }
2642 WinEndEnumWindows(henum);
2643 fNoTileUpdate = FALSE;
2644 return ret;
2645}
2646
2647/** Save directory container state
2648 * @param hwndClient Client window handle
2649 * @param pszStateName State name to save, NULL to save global state
2650 * @returns TRUE if one or more directory container windows were saved
2651 * @seealso RestoreDirCnrState
2652 */
2653
2654BOOL SaveDirCnrState(HWND hwndClient, PSZ pszStateName)
2655{
2656 HENUM henum;
2657 HWND hwndChild, hwndDir, hwndC;
2658 ULONG numsaves = 0, flWindowAttr;
2659 CHAR szPrefix[20];
2660 CHAR s[80];
2661 CHAR szDir[CCHMAXPATH];
2662 SWP swp;
2663 BOOL fSaved = FALSE;
2664 DIRCNRDATA *dcd;
2665
2666 if (!pszStateName)
2667 strcpy(szPrefix, NullStr);
2668 else {
2669 if (strlen(pszStateName) > sizeof(szPrefix) - 2) {
2670 Runtime_Error(pszSrcFile, __LINE__, "SaveDirCnrState");
2671 return fSaved;;
2672 }
2673 sprintf(szPrefix, "%s.", pszStateName);
2674 }
2675
2676 henum = WinBeginEnumWindows(hwndClient);
2677 while ((hwndChild = WinGetNextWindow(henum)) != NULLHANDLE) {
2678 if (hwndChild != hwndTree) {
2679 hwndC = WinWindowFromID(hwndChild, FID_CLIENT);
2680 if (hwndC) {
2681 hwndDir = WinWindowFromID(hwndC, DIR_CNR);
2682 if (hwndDir) {
2683 WinQueryWindowPos(hwndChild, &swp);
2684 *szDir = 0;
2685 WinSendMsg(hwndC, UM_CONTAINERDIR, MPFROMP(szDir), MPVOID);
2686 if (*szDir) {
2687 if (driveflags[toupper(*szDir) - 'A'] & DRIVE_NOPRESCAN)
2688 continue;
2689 sprintf(s, "%sDirCnrPos.%lu", szPrefix, numsaves);
2690 PrfWriteProfileData(fmprof, FM3Str, s, (PVOID) & swp,
2691 sizeof(SWP));
2692 dcd =
2693 WinQueryWindowPtr(WinWindowFromID(hwndC, DIR_CNR), QWL_USER);
2694 if (dcd) {
2695 sprintf(s, "%sDirCnrSort.%lu", szPrefix, numsaves);
2696 PrfWriteProfileData(fmprof, FM3Str, s, (PVOID) & dcd->sortFlags,
2697 sizeof(INT));
2698 sprintf(s, "%sDirCnrFilter.%lu", szPrefix, numsaves);
2699 PrfWriteProfileData(fmprof, FM3Str, s, (PVOID) & dcd->mask,
2700 sizeof(MASK));
2701 sprintf(s, "%sDirCnrView.%lu", szPrefix, numsaves);
2702 flWindowAttr = dcd->flWindowAttr;
2703 if (!fLeaveTree && (flWindowAttr & CV_TREE)) {
2704 flWindowAttr &= (~(CV_TREE | CV_ICON | CV_DETAIL | CV_TEXT));
2705 if (dcd->lastattr) {
2706 if (dcd->lastattr & CV_TEXT)
2707 flWindowAttr |= CV_TEXT;
2708 else if (dcd->lastattr & CV_DETAIL)
2709 flWindowAttr |= CV_DETAIL;
2710 else if (dcd->lastattr & CV_ICON)
2711 flWindowAttr |= CV_ICON;
2712 else
2713 flWindowAttr |= CV_NAME;
2714 }
2715 else
2716 flWindowAttr |= CV_NAME;
2717 }
2718 PrfWriteProfileData(fmprof, FM3Str, s, (PVOID) & flWindowAttr,
2719 sizeof(ULONG));
2720 }
2721 sprintf(s, "%sDirCnrDir.%lu", szPrefix, numsaves++);
2722 PrfWriteProfileString(fmprof, FM3Str, s, szDir);
2723 fSaved = TRUE;
2724 }
2725 }
2726 }
2727 }
2728 } // while
2729 WinEndEnumWindows(henum);
2730
2731 if (fSaved) {
2732 if (WinQueryWindowPos(hwndTree, &swp)) {
2733 sprintf(s, "%sLastTreePos", szPrefix);
2734 PrfWriteProfileData(fmprof, FM3Str, s, (PVOID) & swp, sizeof(SWP));
2735 }
2736 sprintf(s, "%sNumDirsLastTime", szPrefix);
2737 PrfWriteProfileData(fmprof, FM3Str, s, (PVOID) & numsaves, sizeof(ULONG));
2738 WinQueryWindowPos(WinQueryWindow(hwndClient, QW_PARENT), &swp);
2739 sprintf(s, "%sMySizeLastTime", szPrefix);
2740 PrfWriteProfileData(fmprof, FM3Str, s, (PVOID) & swp, sizeof(SWP));
2741 }
2742
2743 return fSaved;
2744}
2745
2746static VOID TransformSwp(PSWP pswp, double xtrans, double ytrans)
2747{
2748 SWP swp;
2749 HWND hwnd;
2750
2751 if ((LONG) pswp->x < 0L) {
2752 pswp->cx -= abs(pswp->x);
2753 pswp->x = 0;
2754 }
2755 if ((LONG) pswp->y < 0L) {
2756 pswp->cy -= abs(pswp->y);
2757 pswp->y = 0;
2758 }
2759 pswp->x = (LONG) (((double)pswp->x * 100.0) / xtrans);
2760 pswp->cx = (LONG) (((double)pswp->cx * 100.0) / xtrans);
2761 pswp->y = (LONG) (((double)pswp->y * 100.0) / ytrans);
2762 pswp->cy = (LONG) (((double)pswp->cy * 100.0) / ytrans);
2763 if (pswp->hwnd) {
2764 hwnd = WinQueryWindow(pswp->hwnd, QW_PARENT);
2765 if (hwnd) {
2766 if (WinQueryWindowPos(hwnd, &swp)) {
2767 if (pswp->x > swp.cx)
2768 pswp->x = (swp.cx > 24) ? swp.cx - 24 : swp.cx;
2769 if (pswp->y > swp.cy)
2770 pswp->y = (swp.cy > 24) ? swp.cy - 24 : swp.cy;
2771 if (pswp->x + pswp->cx > swp.cx)
2772 pswp->cx = swp.cx - pswp->x;
2773 if (pswp->y + pswp->cy > swp.cy)
2774 pswp->cy = swp.cy - pswp->y;
2775 }
2776 }
2777 }
2778}
2779
2780/** Restore directory container state
2781 * @param hwndClient Client window handle
2782 * @param pszStateName State name to restore, NULL to restore global state
2783 * @returns TRUE if one or more directory containers were opened
2784 * @seealso SaveDirCnrState
2785 */
2786
2787static BOOL RestoreDirCnrState(HWND hwndClient, PSZ pszStateName, BOOL noview)
2788{
2789 CHAR s[80];
2790 CHAR szDir[CCHMAXPATH];
2791 CHAR szPrefix[20];
2792 HWND hwndDir, hwndC;
2793 SWP swp, swpO, swpN;
2794 ULONG size, numsaves = 0L, x;
2795 double xtrans, ytrans;
2796 BOOL fRestored = FALSE;
2797 DIRCNRDATA *dcd;
2798
2799 if (!pszStateName)
2800 strcpy(szPrefix, NullStr);
2801 else {
2802 if (strlen(pszStateName) > sizeof(szPrefix) - 2) {
2803 Runtime_Error(pszSrcFile, __LINE__, "RestoreDirCnrState");
2804 return fRestored;
2805 }
2806 sprintf(szPrefix, "%s.", pszStateName);
2807 }
2808
2809 size = sizeof(SWP);
2810 sprintf(s, "%sMySizeLastTime", szPrefix);
2811 if (!PrfQueryProfileData(fmprof,
2812 FM3Str,
2813 s,
2814 (PVOID) & swpO,
2815 &size) ||
2816 size != sizeof(SWP) || !swp.cx || !swp.cy)
2817 {
2818 WinQueryWindowPos(WinQueryWindow(hwndClient, QW_PARENT), &swpO);
2819 }
2820 if (!pszStateName || !strcmp(pszStateName, GetPString(IDS_FM2TEMPTEXT)))
2821 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0L);
2822 WinQueryWindowPos(WinQueryWindow(hwndClient, QW_PARENT), &swpN);
2823 if (swpN.fl & (SWP_MINIMIZE | SWP_HIDE))
2824 swpN = swpO;
2825 xtrans = ((double)swpO.cx * 100.0) / (double)swpN.cx;
2826 ytrans = ((double)swpO.cy * 100.0) / (double)swpN.cy;
2827 size = sizeof(SWP);
2828 sprintf(s, "%sLastTreePos", szPrefix);
2829 if (PrfQueryProfileData(fmprof, FM3Str, s, (PVOID) & swp, &size)) {
2830 if (!pszStateName || !strcmp(pszStateName, GetPString(IDS_FM2TEMPTEXT)))
2831 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0L);
2832 swp.hwnd = hwndTree;
2833 TransformSwp(&swp, xtrans, ytrans);
2834 if (!fFreeTree) {
2835 WinQueryWindowPos(hwndClient, &swpN);
2836 swp.x = 0;
2837 swp.y = (swpN.cy - swp.cy);
2838 }
2839 if (!(swp.fl & (SWP_MINIMIZE | SWP_HIDE))) {
2840 swp.fl &= (~SWP_ACTIVATE);
2841 WinSetWindowPos(hwndTree,
2842 HWND_TOP,
2843 swp.x,
2844 swp.y,
2845 swp.cx,
2846 swp.cy,
2847 swp.fl | SWP_MOVE | SWP_SIZE | SWP_SHOW | SWP_ZORDER);
2848 }
2849 else {
2850 WinSetWindowPos(hwndTree,
2851 HWND_TOP, 0, 0, 0, 0, SWP_MINIMIZE | SWP_SHOW);
2852 WinSetWindowUShort(hwndTree, QWS_XRESTORE, (USHORT) swp.x);
2853 WinSetWindowUShort(hwndTree, QWS_CXRESTORE, (USHORT) swp.cx);
2854 WinSetWindowUShort(hwndTree, QWS_YRESTORE, (USHORT) swp.y);
2855 WinSetWindowUShort(hwndTree, QWS_CYRESTORE, (USHORT) swp.cy);
2856 }
2857 }
2858 size = sizeof(ULONG);
2859 sprintf(s, "%sNumDirsLastTime", szPrefix);
2860 if (PrfQueryProfileData(fmprof,
2861 FM3Str, s, (PVOID) & numsaves, &size) && numsaves) {
2862 if (!pszStateName || !strcmp(pszStateName, GetPString(IDS_FM2TEMPTEXT)))
2863 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0L);
2864 for (x = 0; x < numsaves; x++) {
2865 sprintf(s, "%sDirCnrPos.%lu", szPrefix, x);
2866 size = sizeof(SWP);
2867 if (PrfQueryProfileData(fmprof, FM3Str, s, (PVOID) & swp, &size)) {
2868 if (!pszStateName || !strcmp(pszStateName, GetPString(IDS_FM2TEMPTEXT)))
2869 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0L);
2870 sprintf(s, "%sDirCnrDir.%lu", szPrefix, x);
2871 size = sizeof(szDir);
2872 if (PrfQueryProfileData(fmprof, FM3Str, s, (PVOID) szDir, &size)) {
2873 if (!pszStateName || !strcmp(pszStateName, GetPString(IDS_FM2TEMPTEXT)))
2874 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0L);
2875 if (driveflags[toupper(*szDir) - 'A'] & DRIVE_NOPRESCAN) {
2876 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0L);
2877 continue;
2878 }
2879 hwndDir = (HWND) WinSendMsg(hwndClient,
2880 UM_SETDIR,
2881 MPFROMP(szDir), MPFROMLONG(1L));
2882 if (hwndDir) {
2883 hwndC = WinWindowFromID(hwndDir, FID_CLIENT);
2884 if (hwndC) {
2885 dcd = WinQueryWindowPtr(WinWindowFromID(hwndC, DIR_CNR),
2886 QWL_USER);
2887 if (dcd) {
2888 size = sizeof(INT);
2889 sprintf(s, "%sDirCnrSort.%lu", szPrefix, x);
2890 if (PrfQueryProfileData(fmprof,
2891 FM3Str,
2892 s,
2893 (PVOID) & dcd->sortFlags,
2894 &size) && size == sizeof(INT)) {
2895 if (!dcd->sortFlags)
2896 dcd->sortFlags = SORT_PATHNAME;
2897 }
2898 if (!pszStateName || !strcmp(pszStateName, GetPString(IDS_FM2TEMPTEXT)))
2899 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0L);
2900 size = sizeof(MASK);
2901 sprintf(s, "%sDirCnrFilter.%lu", szPrefix, x);
2902 if (PrfQueryProfileData(fmprof,
2903 FM3Str,
2904 s,
2905 (PVOID) & dcd->mask, &size) && size) {
2906 if (*dcd->mask.szMask)
2907 WinSendMsg(WinWindowFromID(hwndC, DIR_CNR),
2908 UM_FILTER, MPFROMP(dcd->mask.szMask), MPVOID);
2909 }
2910 *(dcd->mask.prompt) = 0;
2911 if (!pszStateName || !strcmp(pszStateName, GetPString(IDS_FM2TEMPTEXT)))
2912 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0L);
2913 size = sizeof(ULONG);
2914 sprintf(s, "%sDirCnrView.%lu", szPrefix, x);
2915 if (!noview) {
2916 if (PrfQueryProfileData(fmprof,
2917 FM3Str,
2918 s,
2919 (PVOID) & dcd->flWindowAttr,
2920 &size) && size == sizeof(ULONG)) {
2921
2922 CNRINFO cnri;
2923
2924 memset(&cnri, 0, sizeof(CNRINFO));
2925 cnri.cb = sizeof(CNRINFO);
2926 if (WinSendMsg(WinWindowFromID(hwndC, DIR_CNR),
2927 CM_QUERYCNRINFO,
2928 MPFROMP(&cnri),
2929 MPFROMLONG(sizeof(CNRINFO)))) {
2930 cnri.flWindowAttr = dcd->flWindowAttr;
2931 WinSendMsg(WinWindowFromID(hwndC, DIR_CNR),
2932 CM_SETCNRINFO,
2933 MPFROMP(&cnri),
2934 MPFROMLONG(CMA_FLWINDOWATTR));
2935 }
2936 }
2937 }
2938 if (!pszStateName || !strcmp(pszStateName, GetPString(IDS_FM2TEMPTEXT)))
2939 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0L);
2940 }
2941 }
2942 fRestored = TRUE;
2943 swp.hwnd = hwndDir;
2944 TransformSwp(&swp, xtrans, ytrans);
2945 if (!fAutoTile && !(swp.fl & (SWP_HIDE | SWP_MINIMIZE)))
2946 WinSetWindowPos(hwndDir,
2947 HWND_TOP,
2948 swp.x,
2949 swp.y,
2950 swp.cx,
2951 swp.cy,
2952 swp.fl | SWP_MOVE |
2953 SWP_SIZE | SWP_SHOW | SWP_ZORDER |
2954 SWP_ACTIVATE);
2955 else if (swp.fl & (SWP_HIDE | SWP_MINIMIZE)) {
2956 WinSetWindowPos(hwndDir,
2957 HWND_TOP, 0, 0, 0, 0, SWP_MINIMIZE | SWP_SHOW);
2958 WinSetWindowUShort(hwndDir, QWS_XRESTORE, (USHORT) swp.x);
2959 WinSetWindowUShort(hwndDir, QWS_CXRESTORE, (USHORT) swp.cx);
2960 WinSetWindowUShort(hwndDir, QWS_YRESTORE, (USHORT) swp.y);
2961 WinSetWindowUShort(hwndDir, QWS_CYRESTORE, (USHORT) swp.cy);
2962 }
2963 else
2964 WinSetWindowPos(hwndDir,
2965 HWND_TOP,
2966 0, 0, 0, 0, SWP_ZORDER | SWP_ACTIVATE);
2967 }
2968 }
2969 }
2970 } // for
2971 }
2972 return fRestored;
2973}
2974
2975static ULONG CountChildren(HWND hwndClient, ULONG * ulNumMinChildren)
2976{
2977 HENUM henum;
2978 HWND hwndChild;
2979 SWP swp;
2980 register ULONG ulCnt = 0L;
2981 USHORT id;
2982
2983 if (ulNumMinChildren)
2984 *ulNumMinChildren = 0L;
2985 henum = WinBeginEnumWindows(hwndClient);
2986 while ((hwndChild = WinGetNextWindow(henum)) != NULLHANDLE) {
2987 id = WinQueryWindowUShort(hwndChild, QWS_ID);
2988 if (!id || (!fFreeTree && id == TREE_FRAME))
2989 continue;
2990 ulCnt++;
2991 if (ulNumMinChildren) {
2992 if (WinQueryWindowPos(hwndChild, &swp) && (swp.fl & SWP_MINIMIZE))
2993 (*ulNumMinChildren)++;
2994 }
2995 }
2996 WinEndEnumWindows(henum);
2997 return ulCnt;
2998}
2999
3000VOID GetNextWindowPos(HWND hwndClient, PSWP pswp, ULONG * ulCntR,
3001 ULONG * ulNumMinChildrenR)
3002{
3003 register ULONG ulCnt;
3004 ULONG ulNumMinChildren;
3005 RECTL Rectl;
3006 register ULONG ulXDiff, ulYDiff, ulWindowsPerStack;
3007
3008 if (!ulCntR || !ulNumMinChildrenR)
3009 ulCnt = CountChildren(hwndClient, &ulNumMinChildren);
3010 else {
3011 ulCnt = *ulCntR;
3012 ulNumMinChildren = *ulNumMinChildrenR;
3013 if (ulCnt == (ULONG) - 1L) {
3014 ulCnt = CountChildren(hwndClient, &ulNumMinChildren);
3015 /* return these values to the caller for later use */
3016 *ulCntR = ulCnt;
3017 *ulNumMinChildrenR = ulNumMinChildren;
3018 }
3019 }
3020 WinQueryWindowRect(hwndClient, &Rectl);
3021 AdjustSizeOfClient(NULL, &Rectl);
3022 if (!fFreeTree) {
3023
3024 SWP swp;
3025
3026 WinQueryWindowPos(hwndTree, &swp);
3027 if (ulNumMinChildren || (swp.fl & (SWP_HIDE | SWP_MINIMIZE)))
3028 Rectl.yBottom += WinQuerySysValue(HWND_DESKTOP, SV_CYICON) * 2;
3029 }
3030 else if (ulNumMinChildren)
3031 Rectl.yBottom += WinQuerySysValue(HWND_DESKTOP, SV_CYICON) * 2;
3032
3033 ulXDiff = WinQuerySysValue(HWND_DESKTOP, SV_CXSIZEBORDER) +
3034 WinQuerySysValue(HWND_DESKTOP, SV_CXMINMAXBUTTON) / 2;
3035 ulYDiff = WinQuerySysValue(HWND_DESKTOP, SV_CYSIZEBORDER) +
3036 WinQuerySysValue(HWND_DESKTOP, SV_CYMINMAXBUTTON);
3037 ulWindowsPerStack = (Rectl.yTop - Rectl.yBottom) / (3 * ulYDiff);
3038 pswp->cx = Rectl.xRight - (ulWindowsPerStack * ulXDiff);
3039 pswp->cy = (Rectl.yTop - Rectl.yBottom) - (ulWindowsPerStack * ulYDiff);
3040 ulWindowsPerStack++;
3041 pswp->x = Rectl.xLeft + ((ulCnt % ulWindowsPerStack) * ulXDiff);
3042 pswp->y = (Rectl.yTop - pswp->cy - ((ulCnt % ulWindowsPerStack) * ulYDiff));
3043}
3044
3045static VOID CascadeChildren(HWND hwndClient)
3046{
3047 ULONG ulCnt = 0L, ulNumMinChildren;
3048 HWND hwndChild;
3049 HENUM henum;
3050 SWP swp;
3051 USHORT id;
3052 RECTL Rectl;
3053
3054 WinQueryWindowPos(hwndClient, &swp);
3055 if (swp.fl & (SWP_HIDE | SWP_MINIMIZE))
3056 return;
3057
3058 CountChildren(hwndClient, &ulNumMinChildren);
3059 if (!fFreeTree) {
3060 WinQueryWindowRect(hwndClient, &Rectl);
3061 AdjustSizeOfClient(NULL, &Rectl);
3062 WinQueryWindowPos(hwndTree, &swp);
3063 if (!(swp.fl & (SWP_MAXIMIZE | SWP_HIDE | SWP_MINIMIZE))) {
3064 if (swp.y + swp.cy < Rectl.yTop - Rectl.yBottom)
3065 swp.cy = (Rectl.yTop - Rectl.yBottom) - swp.y;
3066 if (swp.x != 0)
3067 swp.x = 0;
3068 if (swp.y < 0)
3069 swp.y = 0;
3070 if (swp.x + swp.cx > Rectl.xRight - Rectl.xLeft)
3071 swp.cx = Rectl.xRight - Rectl.xLeft;
3072 WinSetWindowPos(hwndTree, HWND_TOP, swp.x, swp.y, swp.cx, swp.cy,
3073 SWP_MOVE | SWP_SIZE | SWP_SHOW | SWP_RESTORE);
3074 }
3075 }
3076 henum = WinBeginEnumWindows(hwndClient);
3077 while ((hwndChild = WinGetNextWindow(henum)) != NULLHANDLE) {
3078 id = WinQueryWindowUShort(hwndChild, QWS_ID);
3079 if (!id || (!fFreeTree && id == TREE_FRAME))
3080 continue;
3081 WinQueryWindowPos(hwndChild, &swp);
3082 if (!(swp.fl & (SWP_MINIMIZE | SWP_HIDE))) {
3083 GetNextWindowPos(hwndClient, &swp, &ulCnt, &ulNumMinChildren);
3084 WinSetWindowPos(hwndChild, HWND_TOP, swp.x, swp.y, swp.cx, swp.cy,
3085 SWP_SIZE | SWP_MOVE | SWP_SHOW | SWP_RESTORE |
3086 SWP_ZORDER | SWP_ACTIVATE);
3087 ulCnt++;
3088 }
3089 }
3090 WinEndEnumWindows(henum);
3091}
3092
3093VOID TileChildren(HWND hwndClient, BOOL absolute)
3094{
3095 register ULONG ulChildCnt, ulSquare, ulNumRows, ulNumCols, ulExtraCols,
3096 ulWidth, ulHeight;
3097 ULONG ulNumMinChildren;
3098 RECTL Rectl;
3099 HWND hwndChild;
3100
3101 if (fNoTileUpdate || hwndClient == HWND_DESKTOP)
3102 return;
3103 {
3104 SWP swp;
3105
3106 WinQueryWindowPos(hwndClient, &swp);
3107 if (swp.fl & (SWP_HIDE | SWP_MINIMIZE))
3108 return;
3109 }
3110 ulChildCnt = CountChildren(hwndClient, &ulNumMinChildren);
3111 ulChildCnt -= ulNumMinChildren;
3112 if (!ulChildCnt)
3113 return;
3114
3115 fNoTileUpdate = TRUE;
3116
3117 for (ulSquare = 2; ulSquare * ulSquare <= ulChildCnt; ulSquare++) {
3118 ;
3119 }
3120 if (!fTileBackwards) {
3121 ulNumCols = ulSquare - 1L;
3122 ulNumRows = ulChildCnt / ulNumCols;
3123 }
3124 else {
3125 ulNumRows = ulSquare - 1L;
3126 ulNumCols = ulChildCnt / ulNumRows;
3127 }
3128 ulExtraCols = ulChildCnt % ulNumCols;
3129
3130 WinQueryWindowRect(hwndClient, &Rectl);
3131
3132 if (!fFreeTree) {
3133
3134 SWP swp;
3135
3136 WinQueryWindowPos(hwndTree, &swp);
3137 if (!(swp.fl & (SWP_MAXIMIZE | SWP_HIDE | SWP_MINIMIZE))) {
3138 if (swp.y < 0)
3139 swp.y = 0;
3140 if (swp.y + swp.cy < Rectl.yTop - Rectl.yBottom)
3141 swp.cy = (Rectl.yTop - Rectl.yBottom) - swp.y;
3142 if (swp.x != 0)
3143 swp.x = 0;
3144 if (swp.x + swp.cx > Rectl.xRight - Rectl.xLeft)
3145 swp.cx = Rectl.xRight - Rectl.xLeft;
3146 WinSetWindowPos(hwndTree,
3147 HWND_TOP,
3148 swp.x,
3149 swp.y,
3150 swp.cx,
3151 swp.cy, SWP_MOVE | SWP_SIZE | SWP_SHOW | SWP_RESTORE);
3152 WinQueryWindowPos(hwndTree, &swp);
3153 }
3154 if (ulNumMinChildren || (swp.fl & (SWP_HIDE | SWP_MINIMIZE)))
3155 Rectl.yBottom += WinQuerySysValue(HWND_DESKTOP, SV_CYICON) * 2;
3156 }
3157 else if (ulNumMinChildren)
3158 Rectl.yBottom += WinQuerySysValue(HWND_DESKTOP, SV_CYICON) * 2;
3159
3160 AdjustSizeOfClient(NULL, &Rectl);
3161
3162 if (Rectl.xRight > 0L && (Rectl.yBottom < Rectl.yTop)) {
3163
3164 HENUM henum;
3165
3166 henum = WinBeginEnumWindows(hwndClient);
3167 if ((hwndChild = WinGetNextWindow(henum)) != (HWND) 0) {
3168
3169 ULONG ulCurRow, ulCurCol;
3170 SWP swp;
3171 USHORT id;
3172
3173 ulHeight = (Rectl.yTop - Rectl.yBottom) / ulNumRows;
3174
3175 for (ulCurRow = 0; ulCurRow < ulNumRows; ulCurRow++) {
3176 if ((ulNumRows - ulCurRow) <= ulExtraCols)
3177 ulNumCols++;
3178 for (ulCurCol = 0; ulCurCol < ulNumCols; ulCurCol++) {
3179 ulWidth = Rectl.xRight / ulNumCols;
3180
3181 while (hwndChild) {
3182 id = WinQueryWindowUShort(hwndChild, QWS_ID);
3183 if (id && (id != TREE_FRAME || fFreeTree)) {
3184 WinQueryWindowPos(hwndChild, &swp);
3185 if (!(swp.fl & (SWP_HIDE | SWP_MINIMIZE)))
3186 break;
3187 }
3188 hwndChild = WinGetNextWindow(henum);
3189 }
3190
3191 if (hwndChild) {
3192 if (!absolute && (swp.fl & SWP_MAXIMIZE)) {
3193 WinGetMaxPosition(hwndChild, &swp);
3194 WinSetWindowPos(hwndChild,
3195 HWND_TOP,
3196 swp.x,
3197 swp.y,
3198 swp.cx, swp.cy, SWP_MOVE | SWP_SIZE | SWP_SHOW);
3199 WinSetWindowUShort(hwndChild,
3200 QWS_XRESTORE,
3201 (USHORT) (ulWidth * ulCurCol) + Rectl.xLeft);
3202 WinSetWindowUShort(hwndChild,
3203 QWS_YRESTORE,
3204 (USHORT) (Rectl.yTop -
3205 (ulHeight * (ulCurRow + 1L))));
3206 WinSetWindowUShort(hwndChild, QWS_CXRESTORE, (USHORT) ulWidth);
3207 WinSetWindowUShort(hwndChild, QWS_CYRESTORE, (USHORT) ulHeight);
3208 }
3209 else
3210 WinSetWindowPos(hwndChild,
3211 HWND_TOP,
3212 (ulWidth * ulCurCol) + Rectl.xLeft,
3213 Rectl.yTop - (ulHeight * (ulCurRow + 1L)),
3214 ulWidth,
3215 ulHeight,
3216 SWP_MOVE | SWP_SIZE | SWP_SHOW | SWP_RESTORE);
3217 hwndChild = WinGetNextWindow(henum);
3218 }
3219 }
3220 if ((ulNumRows - ulCurRow) <= ulExtraCols) {
3221 ulNumCols--;
3222 ulExtraCols--;
3223 }
3224 }
3225 }
3226 WinEndEnumWindows(henum);
3227 }
3228
3229 fNoTileUpdate = FALSE;
3230}
3231
3232static VOID ResizeChildren(HWND hwndClient, SHORT oldcx, SHORT oldcy,
3233 SHORT newcx, SHORT newcy)
3234{
3235 /*
3236 * resize all children of the client to maintain their proportional
3237 * sizes and positions
3238 */
3239
3240 if (!newcx || !newcy || !oldcx || !oldcy)
3241 return;
3242 {
3243 HENUM henum;
3244 HWND hwndChild;
3245 register LONG x, y, cx, cy, ucx, ucy, ux, uy;
3246 SWP swp;
3247
3248 henum = WinBeginEnumWindows(hwndClient);
3249 while ((hwndChild = WinGetNextWindow(henum)) != NULLHANDLE) {
3250 if (!WinQueryWindowUShort(hwndChild, QWS_ID))
3251 continue;
3252 if (WinQueryWindowPos(hwndChild, &swp)) {
3253 if (swp.fl & (SWP_MINIMIZE | SWP_HIDE)) {
3254 swp.x = WinQueryWindowUShort(hwndChild, QWS_XRESTORE);
3255 swp.y = WinQueryWindowUShort(hwndChild, QWS_YRESTORE);
3256 swp.cx = WinQueryWindowUShort(hwndChild, QWS_CXRESTORE);
3257 swp.cy = WinQueryWindowUShort(hwndChild, QWS_CYRESTORE);
3258 }
3259 else if (swp.fl & SWP_MAXIMIZE) {
3260 swp.x = WinQueryWindowUShort(hwndChild, QWS_XRESTORE);
3261 swp.y = WinQueryWindowUShort(hwndChild, QWS_YRESTORE);
3262 swp.cx = WinQueryWindowUShort(hwndChild, QWS_CXRESTORE);
3263 swp.cy = WinQueryWindowUShort(hwndChild, QWS_CYRESTORE);
3264 }
3265 cx = (swp.cx) ? (LONG) (((double)oldcx * 100.0) / (double)swp.cx) : 0;
3266 cy = (swp.cy) ? (LONG) (((double)oldcy * 100.0) / (double)swp.cy) : 0;
3267 x = (swp.x) ? (LONG) (((double)oldcx * 100.0) / (double)swp.x) : 0;
3268 y = (swp.y) ? (LONG) (((double)oldcy * 100.0) / (double)swp.y) : 0;
3269 if (x < 0)
3270 x = 0;
3271 if (y < 0)
3272 y = 0;
3273 ux = (x) ? (LONG) (((double)newcx * 100.0) / (double)x) : 0;
3274 uy = (y) ? (LONG) (((double)newcy * 100.0) / (double)y) : 0;
3275 ucx = (cx) ? (LONG) (((double)newcx * 100.0) / (double)cx) : 0;
3276 ucy = (cy) ? (LONG) (((double)newcy * 100.0) / (double)cy) : 0;
3277 if (ux + ucx > newcx)
3278 ucx = newcx - ux;
3279 if (uy + ucy > newcy)
3280 ucy = newcy - uy;
3281
3282 if (!(swp.fl & (SWP_MINIMIZE | SWP_HIDE | SWP_MAXIMIZE)))
3283 WinSetWindowPos(hwndChild, HWND_TOP, ux, uy, ucx, ucy,
3284 SWP_MOVE | SWP_SIZE | SWP_SHOW);
3285 else if (swp.fl & (SWP_HIDE | SWP_MINIMIZE)) {
3286 WinSetWindowUShort(hwndChild, QWS_XMINIMIZE, (USHORT) - 1);
3287 WinSetWindowUShort(hwndChild, QWS_YMINIMIZE, (USHORT) - 1);
3288 WinSetWindowPos(hwndChild, HWND_TOP, 0, 0, 0, 0,
3289 SWP_SIZE | SWP_MOVE | SWP_FOCUSDEACTIVATE);
3290 WinSetWindowUShort(hwndChild, QWS_XRESTORE, ux);
3291 WinSetWindowUShort(hwndChild, QWS_YRESTORE, uy);
3292 WinSetWindowUShort(hwndChild, QWS_CXRESTORE, ucx);
3293 WinSetWindowUShort(hwndChild, QWS_CYRESTORE, ucy);
3294 }
3295 else {
3296 WinGetMaxPosition(hwndChild, &swp);
3297 WinSetWindowPos(hwndChild, HWND_TOP, swp.x, swp.y, swp.cx, swp.cy,
3298 SWP_MOVE | SWP_SIZE | SWP_SHOW);
3299 WinSetWindowUShort(hwndChild, QWS_XRESTORE, ux);
3300 WinSetWindowUShort(hwndChild, QWS_YRESTORE, uy);
3301 WinSetWindowUShort(hwndChild, QWS_CXRESTORE, ucx);
3302 WinSetWindowUShort(hwndChild, QWS_CYRESTORE, ucy);
3303 }
3304 }
3305 }
3306 WinEndEnumWindows(henum);
3307 }
3308 if (!fFreeTree) {
3309
3310 RECTL Rectl;
3311 SWP swp;
3312
3313 WinQueryWindowRect(hwndClient, &Rectl);
3314 AdjustSizeOfClient(NULL, &Rectl);
3315 WinQueryWindowPos(hwndTree, &swp);
3316 if (!(swp.fl & (SWP_MAXIMIZE | SWP_HIDE | SWP_MINIMIZE))) {
3317 if (swp.y + swp.cy < Rectl.yTop - Rectl.yBottom)
3318 swp.cy = (Rectl.yTop - Rectl.yBottom) - swp.y;
3319 if (swp.x != 0)
3320 swp.x = 0;
3321 if (swp.y < 0)
3322 swp.y = 0;
3323 if (swp.x + swp.cx > Rectl.xRight - Rectl.xLeft)
3324 swp.cx = Rectl.xRight - Rectl.xLeft;
3325 WinSetWindowPos(hwndTree, HWND_TOP, swp.x, swp.y, swp.cx, swp.cy,
3326 SWP_MOVE | SWP_SIZE | SWP_SHOW | SWP_RESTORE);
3327 }
3328 }
3329}
3330
3331static VOID MinResChildren(HWND hwndClient, ULONG cmd)
3332{
3333 HENUM henum;
3334 HWND hwndChild;
3335
3336 {
3337 SWP swp;
3338
3339 WinQueryWindowPos(hwndClient, &swp);
3340 if (swp.fl & (SWP_HIDE | SWP_MINIMIZE))
3341 return;
3342 }
3343 henum = WinBeginEnumWindows(hwndClient);
3344 while ((hwndChild = WinGetNextWindow(henum)) != NULLHANDLE) {
3345 if (!WinQueryWindowUShort(hwndChild, QWS_ID))
3346 continue;
3347 WinSetWindowPos(hwndChild, HWND_TOP, 0, 0, 0, 0, cmd);
3348 }
3349}
3350
3351//=== ChildFrameButtonProc: subclass handler for WALKBUTTON and QUICKBUTTON windows ===
3352
3353static MRESULT EXPENTRY ChildFrameButtonProc(HWND hwnd,
3354 ULONG msg,
3355 MPARAM mp1, MPARAM mp2)
3356{
3357 USHORT id;
3358 static BOOL emphasized = FALSE;
3359
3360 switch (msg) {
3361 case WM_BUTTON1CLICK:
3362 case WM_CHORD:
3363 shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT | KC_SHIFT | KC_CTRL));
3364 break;
3365
3366 case WM_MOUSEMOVE:
3367 if (fOtherHelp) {
3368 if ((!hwndBubble || WinQueryWindowULong(hwndBubble, QWL_USER) != hwnd)
3369 && !WinQueryCapture(HWND_DESKTOP)) {
3370 id = WinQueryWindowUShort(hwnd, QWS_ID);
3371 switch (id) {
3372 case IDM_OPENWALK:
3373 MakeBubble(hwnd, FALSE, GetPString(IDS_WALKBUTTONHELP));
3374 break;
3375 case IDM_USERLIST:
3376 MakeBubble(hwnd, FALSE, GetPString(IDS_QUICKBUTTONHELP));
3377 break;
3378 }
3379 }
3380 }
3381 break;
3382
3383 case WM_BUTTON3CLICK:
3384 case WM_BUTTON2CLICK:
3385 {
3386 USHORT cmd = 0;
3387
3388 shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT | KC_SHIFT | KC_CTRL));
3389 id = WinQueryWindowUShort(hwnd, QWS_ID);
3390 switch (id) {
3391 case IDM_OPENWALK:
3392 switch (msg) {
3393 case WM_BUTTON2CLICK:
3394 if ((shiftstate & (KC_ALT | KC_SHIFT | KC_CTRL)) ==
3395 (KC_ALT | KC_SHIFT | KC_CTRL))
3396 cmd = IDM_GREP;
3397 else if ((shiftstate & (KC_ALT | KC_CTRL)) == (KC_ALT | KC_CTRL))
3398 CascadeChildren(hwndMain);
3399
3400#ifdef NEVER
3401 else if ((shiftstate & (KC_ALT | KC_SHIFT)) == (KC_ALT | KC_SHIFT))
3402 cmd = IDM_SYSINFO;
3403#endif
3404
3405 else if (shiftstate & KC_SHIFT)
3406 cmd = IDM_WINDOWDLG;
3407 else if (shiftstate & KC_CTRL)
3408 cmd = IDM_SEEALL;
3409 else if (shiftstate & KC_ALT)
3410 TileChildren(hwndMain, TRUE);
3411 else
3412 cmd = IDM_WALKDIR;
3413 break;
3414 case WM_BUTTON3CLICK:
3415 TileChildren(hwndMain, TRUE);
3416 break;
3417 }
3418 break;
3419 case IDM_USERLIST:
3420 switch (msg) {
3421 case WM_BUTTON2CLICK:
3422 if ((shiftstate & (KC_ALT | KC_SHIFT | KC_CTRL)) ==
3423 (KC_ALT | KC_SHIFT | KC_CTRL))
3424 cmd = IDM_COLORPALETTE;
3425 else if ((shiftstate & (KC_ALT | KC_CTRL)) == (KC_ALT | KC_CTRL))
3426 cmd = IDM_HIDEMENU;
3427 else if ((shiftstate & (KC_ALT | KC_SHIFT)) == (KC_ALT | KC_SHIFT))
3428 cmd = IDM_NOTEBOOK;
3429 else if (shiftstate & KC_SHIFT)
3430 cmd = IDM_TOOLTITLES;
3431 else if (shiftstate & KC_CTRL)
3432 cmd = IDM_TEXTTOOLS;
3433 else if (shiftstate & KC_ALT)
3434 cmd = IDM_FONTPALETTE;
3435 else
3436 cmd = IDM_TOOLBAR;
3437 break;
3438 case WM_BUTTON3CLICK:
3439 cmd = IDM_DRIVEBAR;
3440 break;
3441 }
3442 break;
3443 } // switch id
3444
3445 if (cmd) {
3446 PostMsg(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT), FID_CLIENT),
3447 WM_COMMAND, MPFROM2SHORT(cmd, 0), MPVOID);
3448 }
3449 }
3450 break;
3451
3452 case DM_DRAGOVER:
3453 id = WinQueryWindowUShort(hwnd, QWS_ID);
3454 if (id == IDM_OPENWALK) {
3455 if (!emphasized) {
3456 emphasized = TRUE;
3457 DrawTargetEmphasis(hwnd, emphasized);
3458 }
3459 if (AcceptOneDrop(hwnd, mp1, mp2))
3460 return MRFROM2SHORT(DOR_DROP, DO_MOVE);
3461 }
3462 return MRFROM2SHORT(DOR_NEVERDROP, 0);
3463
3464 case DM_DRAGLEAVE:
3465 if (emphasized) {
3466 emphasized = FALSE;
3467 DrawTargetEmphasis(hwnd, emphasized);
3468 }
3469 break;
3470
3471 case DM_DROPHELP:
3472 DropHelp(mp1, mp2, hwnd, GetPString(IDS_OPENDROPHELP));
3473 return 0;
3474
3475 case DM_DROP:
3476 {
3477 char szFrom[CCHMAXPATH + 2];
3478
3479 if (emphasized) {
3480 emphasized = FALSE;
3481 DrawTargetEmphasis(hwnd, emphasized);
3482 }
3483 if (GetOneDrop(hwnd, mp1, mp2, szFrom, sizeof(szFrom))) {
3484 if (MakeValidDir(szFrom) && !FindDirCnrByName(szFrom, TRUE)) {
3485 OpenDirCnr((HWND) 0, hwndMain, hwndTree, FALSE, szFrom);
3486 }
3487 }
3488 }
3489 return 0;
3490
3491 case WM_CLOSE:
3492 WinDestroyWindow(hwnd);
3493 return 0;
3494 }
3495 return PFNWPButton(hwnd, msg, mp1, mp2);
3496}
3497
3498static MRESULT EXPENTRY MainFrameWndProc(HWND hwnd, ULONG msg, MPARAM mp1,
3499 MPARAM mp2)
3500{
3501 PFNWP oldproc = (PFNWP) WinQueryWindowPtr(hwnd, QWL_USER);
3502 static ULONG aheight = 0L;
3503
3504 switch (msg) {
3505 case WM_ADJUSTWINDOWPOS:
3506 {
3507 SWP *pswp;
3508
3509 pswp = (SWP *) mp1;
3510 if (fDataMin && !fAmClosing) {
3511 if (pswp->fl & (SWP_HIDE | SWP_MINIMIZE)) {
3512
3513 SWP swp;
3514
3515 WinQueryWindowPos(hwnd, &swp);
3516 PostMsg(hwnd, UM_FOCUSME, MPFROMLONG(swp.fl), MPVOID);
3517 HideNote();
3518 }
3519 else if (pswp->fl & (SWP_SHOW | SWP_RESTORE)) {
3520 if (DataHwnd)
3521 PostMsg(DataHwnd, WM_CLOSE, MPVOID, MPVOID);
3522 }
3523 }
3524 if (!fAmClosing) {
3525 if (pswp->fl & (SWP_HIDE | SWP_MINIMIZE))
3526 HideNote();
3527 }
3528 }
3529 break;
3530
3531 case UM_FOCUSME:
3532 CreateDataBar(HWND_DESKTOP, (ULONG) mp1);
3533 return 0;
3534
3535 case WM_BUTTON1UP:
3536 case WM_BUTTON2UP:
3537 case WM_BUTTON3UP:
3538 case WM_MOUSEMOVE:
3539 case WM_CHORD:
3540 shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT | KC_SHIFT | KC_CTRL));
3541 break;
3542
3543 case WM_CHAR:
3544 shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT | KC_ALT | KC_CTRL));
3545 break;
3546
3547 case WM_CONTROL:
3548 return WinSendMsg(WinWindowFromID(hwnd, FID_CLIENT), UM_CONTROL, mp1,
3549 mp2);
3550
3551 case WM_COMMAND:
3552 return WinSendMsg(WinWindowFromID(hwnd, FID_CLIENT), msg, mp1, mp2);
3553
3554 case WM_CALCFRAMERECT:
3555 {
3556 MRESULT mr;
3557 PRECTL prectl;
3558 LONG sheight = 20, bheight = 20;
3559
3560 mr = oldproc(hwnd, msg, mp1, mp2);
3561
3562 /*
3563 * Calculate the position of the client rectangle.
3564 * Otherwise, we'll see a lot of redraw when we move the
3565 * client during WM_FORMATFRAME.
3566 */
3567
3568 if (mr && mp2) {
3569 prectl = (PRECTL) mp1;
3570 if (prectl->yBottom != prectl->yTop) {
3571 {
3572 HPS hps;
3573 POINTL aptl[TXTBOX_COUNT];
3574
3575 hps = WinGetPS(hwndStatus);
3576 if (hps) {
3577 GpiQueryTextBox(hps, 6, "$`WjgT", TXTBOX_COUNT, aptl);
3578 bheight = sheight = aptl[TXTBOX_TOPLEFT].y + 6;
3579 WinReleasePS(hps);
3580 }
3581 }
3582 prectl->yBottom += (sheight + 4);
3583 prectl->yTop -= (sheight + 4);
3584 if (fMoreButtons) {
3585
3586 HPS hps;
3587 POINTL aptl[TXTBOX_COUNT];
3588
3589 hps = WinGetPS(hwndName);
3590 if (hps) {
3591 GpiQueryTextBox(hps, 6, "$`WjgT", TXTBOX_COUNT, aptl);
3592 bheight = aptl[TXTBOX_TOPLEFT].y + 6;
3593 WinReleasePS(hps);
3594 }
3595 prectl->yBottom += (bheight + 4);
3596 prectl->yTop -= (bheight + 4);
3597 }
3598 if (fToolbar) {
3599 if (!fTextTools)
3600 prectl->yTop -= ((fToolTitles) ? 50 : 40);
3601 else
3602 prectl->yTop -= 32;
3603 }
3604 if (fDrivebar) {
3605 ResizeDrives(WinWindowFromID(hwnd, MAIN_DRIVES),
3606 ((prectl->xRight -
3607 (WinQuerySysValue(HWND_DESKTOP,
3608 SV_CYSIZEBORDER) * 2)) - 4));
3609 prectl->yTop -= (16 * (DriveLines * 18));
3610 }
3611 if (fUserComboBox) {
3612 if (!aheight) {
3613
3614 SWP swpTemp;
3615
3616 WinQueryWindowPos(WinWindowFromID(hwndDrivelist, CBID_EDIT),
3617 &swpTemp);
3618 aheight = swpTemp.cy;
3619 }
3620 prectl->yTop -= (aheight + 6L);
3621 }
3622 if (fAutoView) {
3623 AutoviewHeight = min(AutoviewHeight,
3624 (prectl->yTop - prectl->yBottom) - 116);
3625 AutoviewHeight = max(AutoviewHeight, 36);
3626 prectl->yBottom += (AutoviewHeight + 6);
3627 }
3628 }
3629 }
3630 return mr;
3631 }
3632
3633 case WM_FORMATFRAME:
3634 {
3635 SHORT sCount, soldCount;
3636 PSWP pswp, pswpClient, pswpNew;
3637 SWP swpClient;
3638 LONG theight = 48L, dheight = 20L, width, sheight = 20, bheight = 20;
3639
3640 sCount = (SHORT) oldproc(hwnd, msg, mp1, mp2);
3641 soldCount = sCount;
3642
3643 /*
3644 * Reformat the frame to "squeeze" the client
3645 * and make room for status window sibling beneath
3646 * and toolbar above (if toolbar's on) and userlists
3647 * (if userlists are on).
3648 */
3649
3650 pswp = (PSWP) mp1;
3651 {
3652 SHORT x;
3653
3654 for (x = 0; x < soldCount; x++) {
3655 if (WinQueryWindowUShort(pswp->hwnd, QWS_ID) == FID_CLIENT) {
3656 pswpClient = pswp;
3657 break;
3658 }
3659 pswp++;
3660 }
3661 }
3662
3663 {
3664 HPS hps;
3665 POINTL aptl[TXTBOX_COUNT];
3666
3667 hps = WinGetPS(hwndStatus);
3668 if (hps) {
3669 GpiQueryTextBox(hps, 6, "$`WjgT", TXTBOX_COUNT, aptl);
3670 bheight = sheight = aptl[TXTBOX_TOPLEFT].y + 6;
3671 WinReleasePS(hps);
3672 }
3673 if (fMoreButtons) {
3674 hps = WinGetPS(hwndName);
3675 if (hps) {
3676 GpiQueryTextBox(hps, 6, "$`WjgT", TXTBOX_COUNT, aptl);
3677 bheight = aptl[TXTBOX_TOPLEFT].y + 6;
3678 WinReleasePS(hps);
3679 }
3680 }
3681 }
3682 pswpNew = (PSWP) mp1 + soldCount;
3683 *pswpNew = *pswpClient;
3684 swpClient = *pswpClient;
3685 pswpNew->hwnd = hwndStatus;
3686 pswpNew->hwndInsertBehind = HWND_BOTTOM;
3687 pswpNew->x = swpClient.x + 3;
3688 pswpNew->y = swpClient.y + 2;
3689 if (!fSplitStatus)
3690 width = swpClient.cx - (16 + (sheight * 2) + 4);
3691 else
3692 width = (swpClient.cx - (16 + (sheight * 2) + 4)) / 2;
3693 width = max(width, 10);
3694 if (fSplitStatus)
3695 pswpNew->cx = width - 6;
3696 else
3697 pswpNew->cx = width - 8;
3698 pswpNew->cy = sheight;
3699 pswpClient->y = pswpNew->y + pswpNew->cy + 3;
3700 pswpClient->cy = (swpClient.cy - pswpNew->cy) - 3;
3701 sCount++;
3702
3703 if (fSplitStatus) {
3704 pswpNew = (PSWP) mp1 + (soldCount + 1);
3705 *pswpNew = *pswpClient;
3706 pswpNew->hwnd = hwndStatus2;
3707 pswpNew->hwndInsertBehind = HWND_BOTTOM;
3708 pswpNew->x = width + 8;
3709 pswpNew->y = swpClient.y + 2;
3710 pswpNew->cx = width - 6;
3711 pswpNew->cy = sheight;
3712 sCount++;
3713 }
3714 else {
3715 WinShowWindow(hwndStatus2, FALSE);
3716 WinSetWindowText(hwndStatus2, NullStr);
3717 }
3718
3719 if (fToolbar) {
3720 if (fTextTools)
3721 theight = 32L;
3722 else if (!fToolTitles)
3723 theight = 40L;
3724 pswpNew = (PSWP) mp1 + (soldCount + 1 + (fSplitStatus != FALSE));
3725 *pswpNew = *pswpClient;
3726 pswpNew->hwnd = WinWindowFromID(hwnd, MAIN_TOOLS);
3727 pswpNew->hwndInsertBehind = HWND_BOTTOM;
3728 pswpNew->x = swpClient.x + 2;
3729 pswpNew->y = (swpClient.y + swpClient.cy) - (theight - 2);
3730 pswpNew->cx = swpClient.cx - 4;
3731 pswpNew->cy = theight - 4;
3732 pswpClient->cy -= theight;
3733 sCount++;
3734 }
3735 else
3736 WinShowWindow(WinWindowFromID(hwnd, MAIN_TOOLS), FALSE);
3737
3738 if (fDrivebar) {
3739 ResizeDrives(WinWindowFromID(hwnd, MAIN_DRIVES), pswpClient->cx - 4);
3740 pswpNew = (PSWP) mp1 + (soldCount + 1 +
3741 (fSplitStatus != FALSE) +
3742 (fToolbar != FALSE));
3743 *pswpNew = *pswpClient;
3744 pswpNew->hwnd = WinWindowFromID(hwnd, MAIN_DRIVES);
3745 pswpNew->hwndInsertBehind = HWND_BOTTOM;
3746 pswpNew->x = swpClient.x + 2;
3747 dheight += ((dheight - 2) * DriveLines);
3748 pswpNew->y = (swpClient.y + swpClient.cy) - (dheight - 2);
3749 if (fToolbar)
3750 pswpNew->y -= theight;
3751 pswpNew->cx = swpClient.cx - 4;
3752 pswpNew->cy = dheight - 4;
3753 pswpClient->cy -= dheight;
3754 sCount++;
3755 }
3756 else
3757 WinShowWindow(WinWindowFromID(hwnd, MAIN_DRIVES), FALSE);
3758
3759 if (fAutoView) {
3760 pswpNew = (PSWP) mp1 + (soldCount + 1 +
3761 (fToolbar != FALSE) +
3762 (fDrivebar != FALSE) +
3763 (fSplitStatus != FALSE));
3764 *pswpNew = *pswpClient;
3765 pswpNew->hwnd = (fComments) ? hwndAutoMLE : hwndAutoview;
3766 pswpNew->x = pswpClient->x + 3;
3767 pswpNew->y = pswpClient->y + 3;
3768 if (fMoreButtons)
3769 pswpNew->y += (bheight + 4);
3770 pswpNew->cx = pswpClient->cx - 6;
3771 AutoviewHeight = min(AutoviewHeight, pswpClient->cy - 116);
3772 AutoviewHeight = max(AutoviewHeight, 36);
3773 pswpNew->cy = AutoviewHeight;
3774 pswpClient->y += (AutoviewHeight + 6);
3775 pswpClient->cy -= (AutoviewHeight + 6);
3776 sCount++;
3777 WinShowWindow((fComments) ? hwndAutoview : hwndAutoMLE, FALSE);
3778 }
3779 else {
3780 WinShowWindow(hwndAutoview, FALSE);
3781 WinShowWindow(hwndAutoMLE, FALSE);
3782 }
3783
3784 pswpNew = (PSWP) mp1 + (soldCount + 1 +
3785 (fToolbar != FALSE) +
3786 (fDrivebar != FALSE) +
3787 (fSplitStatus != FALSE) + (fAutoView != FALSE));
3788 *pswpNew = *pswpClient;
3789 pswpNew->hwnd = WinWindowFromID(hwnd, IDM_OPENWALK);
3790 pswpNew->x = swpClient.cx - ((sheight * 2) + 4);
3791 pswpNew->y = swpClient.y;
3792 pswpNew->cx = sheight + 4;
3793 pswpNew->cy = sheight + 4;
3794 sCount++;
3795 pswpNew = (PSWP) mp1 + (soldCount + 2 +
3796 (fToolbar != FALSE) +
3797 (fDrivebar != FALSE) +
3798 (fSplitStatus != FALSE) + (fAutoView != FALSE));
3799 *pswpNew = *pswpClient;
3800 pswpNew->hwnd = WinWindowFromID(hwnd, IDM_USERLIST);
3801 pswpNew->x = swpClient.cx - (sheight + 2);
3802 pswpNew->y = swpClient.y;
3803 pswpNew->cx = sheight + 4;
3804 pswpNew->cy = sheight + 4;
3805 sCount++;
3806 pswpNew = (PSWP) mp1 + (soldCount + 3 +
3807 (fToolbar != FALSE) +
3808 (fDrivebar != FALSE) +
3809 (fSplitStatus != FALSE) + (fAutoView != FALSE));
3810 *pswpNew = *pswpClient;
3811 pswpNew->hwnd = WinWindowFromID(hwnd, MAIN_LED);
3812 pswpNew->x = swpClient.cx - ((sheight * 2) + 16);
3813 pswpNew->y = swpClient.y;
3814 pswpNew->cx = 12;
3815 pswpNew->cy = 12;
3816 sCount++;
3817 pswpNew = (PSWP) mp1 + (soldCount + 4 +
3818 (fToolbar != FALSE) +
3819 (fDrivebar != FALSE) +
3820 (fSplitStatus != FALSE) + (fAutoView != FALSE));
3821 *pswpNew = *pswpClient;
3822 pswpNew->hwnd = WinWindowFromID(hwnd, MAIN_LEDHDR);
3823 pswpNew->x = swpClient.cx - ((sheight * 2) + 16);
3824 pswpNew->y = swpClient.y + 12;
3825 pswpNew->cx = 12;
3826 pswpNew->cy = sheight - 8;
3827 sCount++;
3828 if (fUserComboBox) {
3829 if (!aheight) {
3830
3831 SWP swpTemp;
3832
3833 WinQueryWindowPos(WinWindowFromID(hwndDrivelist, CBID_EDIT),
3834 &swpTemp);
3835 aheight = swpTemp.cy;
3836 }
3837 pswpNew = (PSWP) mp1 + (soldCount + 5 +
3838 (fToolbar != FALSE) +
3839 (fSplitStatus != FALSE) +
3840 (fDrivebar != FALSE) + (fAutoView != FALSE));
3841 *pswpNew = *pswpClient;
3842 pswpNew->hwnd = hwndDrivelist;
3843 pswpNew->x = swpClient.x;
3844 pswpNew->cx = 48;
3845 pswpClient->cy -= (aheight + 6L);
3846 pswpNew->y = pswpClient->y;
3847 pswpNew->cy = pswpClient->cy + (aheight + 5L);
3848 sCount++;
3849 pswpNew = (PSWP) mp1 + (soldCount + 6 +
3850 (fToolbar != FALSE) +
3851 (fDrivebar != FALSE) +
3852 (fSplitStatus != FALSE) +
3853 (fAutoView != FALSE));
3854 *pswpNew = *pswpClient;
3855 pswpNew->hwnd = hwndStatelist;
3856 pswpNew->x = swpClient.x + 48;
3857 pswpNew->cx = (swpClient.cx - 48) / 7;
3858 pswpNew->y = pswpClient->y;
3859 pswpNew->cy = pswpClient->cy + (aheight + 5L);
3860 sCount++;
3861 pswpNew = (PSWP) mp1 + (soldCount + 7 +
3862 (fToolbar != FALSE) +
3863 (fDrivebar != FALSE) +
3864 (fSplitStatus != FALSE) +
3865 (fAutoView != FALSE));
3866 *pswpNew = *pswpClient;
3867 pswpNew->hwnd = hwndCmdlist;
3868 pswpNew->x = swpClient.x + 48 + ((swpClient.cx - 48) / 7);
3869 pswpNew->cx = (swpClient.cx - 48) / 5 +
3870 ((swpClient.cx - 48) / 5) - ((swpClient.cx - 48) / 7);
3871 pswpNew->y = pswpClient->y;
3872 pswpNew->cy = pswpClient->cy + (aheight + 5L);
3873 sCount++;
3874 pswpNew = (PSWP) mp1 + (soldCount + 8 +
3875 (fToolbar != FALSE) +
3876 (fDrivebar != FALSE) +
3877 (fSplitStatus != FALSE) +
3878 (fAutoView != FALSE));
3879 *pswpNew = *pswpClient;
3880 pswpNew->hwnd = hwndUserlist;
3881 pswpNew->x = swpClient.x + 48 + (((swpClient.cx - 48) / 5) * 2);
3882 pswpNew->cx = ((swpClient.x + swpClient.cx) - pswpNew->x) -
3883 ((fToolbar) ? ((swpClient.cx - 48) / 7) : 0);
3884 pswpNew->y = pswpClient->y;
3885 pswpNew->cy = pswpClient->cy + (aheight + 5L);
3886 sCount++;
3887 if (fToolbar) {
3888 pswpNew = (PSWP) mp1 + (soldCount + 9 +
3889 (fToolbar != FALSE) +
3890 (fDrivebar != FALSE) +
3891 (fSplitStatus != FALSE) +
3892 (fAutoView != FALSE));
3893 *pswpNew = *pswpClient;
3894 pswpNew->hwnd = hwndButtonlist;
3895 pswpNew->x = swpClient.cx - ((swpClient.cx - 48) / 7) + 4;
3896 pswpNew->cx = (swpClient.x + swpClient.cx) - pswpNew->x;
3897 pswpNew->y = pswpClient->y;
3898 pswpNew->cy = pswpClient->cy + (aheight + 5L);
3899 sCount++;
3900 }
3901 else
3902 WinShowWindow(hwndButtonlist, FALSE);
3903 }
3904 else {
3905 WinShowWindow(hwndUserlist, FALSE);
3906 WinShowWindow(hwndDrivelist, FALSE);
3907 WinShowWindow(hwndStatelist, FALSE);
3908 WinShowWindow(hwndButtonlist, FALSE);
3909 WinShowWindow(hwndCmdlist, FALSE);
3910 }
3911 {
3912 PSWP pswpTitlebar = (PSWP) 0, pswpMinbutton = (PSWP) 0;
3913 SHORT x;
3914
3915 pswpNew = (PSWP) mp1 + (soldCount + 5 +
3916 (fToolbar != FALSE) +
3917 (fDrivebar != FALSE) +
3918 (fSplitStatus != FALSE) +
3919 (fAutoView != FALSE) +
3920 ((fUserComboBox != FALSE) * 4) +
3921 (fUserComboBox != FALSE &&
3922 fToolbar != FALSE));
3923 pswp = (PSWP) mp1;
3924 for (x = 0; x < soldCount; x++) {
3925 if (!pswpTitlebar &&
3926 WinQueryWindowUShort(pswp->hwnd, QWS_ID) == FID_TITLEBAR)
3927 pswpTitlebar = pswp;
3928 else if (!pswpMinbutton &&
3929 WinQueryWindowUShort(pswp->hwnd, QWS_ID) == FID_MINMAX)
3930 pswpMinbutton = pswp;
3931 if (pswpTitlebar && pswpMinbutton)
3932 break;
3933 pswp++;
3934 }
3935 if (pswpMinbutton && pswpTitlebar) {
3936 *pswpNew = *pswpMinbutton;
3937 pswpNew->hwnd = WinWindowFromID(hwnd, IDM_IDEALSIZE);
3938 pswpNew->cy = pswpMinbutton->cy + 3;
3939 pswpNew->cx = min(pswpNew->cy, (pswpMinbutton->cx / 2) + 3);
3940 pswpTitlebar->cx -= (pswpNew->cx - 1);
3941 pswpNew->x = pswpTitlebar->x + (pswpTitlebar->cx);
3942 pswpNew->y = pswpMinbutton->y - 1;
3943 sCount++;
3944 }
3945 else
3946 WinShowWindow(WinWindowFromID(hwnd, IDM_IDEALSIZE), FALSE);
3947 }
3948
3949 if (fMoreButtons) {
3950
3951 LONG lastx;
3952
3953 pswpNew = (PSWP) mp1 + (soldCount + 6 +
3954 (fToolbar != FALSE) +
3955 (fDrivebar != FALSE) +
3956 (fSplitStatus != FALSE) +
3957 (fAutoView != FALSE) +
3958 ((fUserComboBox != FALSE) * 4) +
3959 (fUserComboBox != FALSE &&
3960 fToolbar != FALSE));
3961 *pswpNew = *pswpClient;
3962 pswpNew->hwnd = hwndName;
3963 pswpNew->x = swpClient.x + 3;
3964 pswpNew->y = swpClient.y + (sheight + 6);
3965 pswpNew->cx = ((swpClient.cx / 2) + (swpClient.cx / 5)) - 3;
3966 lastx = pswpNew->x + pswpNew->cx;
3967 pswpNew->cy = bheight;
3968 pswpClient->y += (bheight + 4);
3969 pswpClient->cy -= (bheight + 4);
3970 sCount++;
3971 pswpNew = (PSWP) mp1 + (soldCount + 7 +
3972 (fToolbar != FALSE) +
3973 (fDrivebar != FALSE) +
3974 (fSplitStatus != FALSE) +
3975 (fAutoView != FALSE) +
3976 ((fUserComboBox != FALSE) * 4) +
3977 (fUserComboBox != FALSE &&
3978 fToolbar != FALSE));
3979 *pswpNew = *pswpClient;
3980 pswpNew->hwnd = hwndDate;
3981 pswpNew->x = lastx + 3;
3982 pswpNew->y = swpClient.y + (sheight + 6);
3983 pswpNew->cx = (swpClient.cx / 6) + (swpClient.cx / 16) - 3;
3984 lastx = pswpNew->x + pswpNew->cx;
3985 pswpNew->cy = bheight;
3986 sCount++;
3987 pswpNew = (PSWP) mp1 + (soldCount + 8 +
3988 (fToolbar != FALSE) +
3989 (fDrivebar != FALSE) +
3990 (fSplitStatus != FALSE) +
3991 (fAutoView != FALSE) +
3992 ((fUserComboBox != FALSE) * 4) +
3993 (fUserComboBox != FALSE &&
3994 fToolbar != FALSE));
3995 *pswpNew = *pswpClient;
3996 pswpNew->hwnd = hwndAttr;
3997 pswpNew->x = lastx + 3;
3998 pswpNew->y = swpClient.y + (sheight + 6);
3999 pswpNew->cx = (swpClient.cx - pswpNew->x) - 1;
4000 pswpNew->cy = bheight;
4001 sCount++;
4002 }
4003 else {
4004 WinShowWindow(hwndAttr, FALSE);
4005 WinShowWindow(hwndName, FALSE);
4006 WinShowWindow(hwndDate, FALSE);
4007 }
4008 return MRFROMSHORT(sCount);
4009 }
4010
4011 case WM_QUERYFRAMECTLCOUNT:
4012 {
4013 SHORT sCount;
4014
4015 sCount = (SHORT) oldproc(hwnd, msg, mp1, mp2);
4016
4017 sCount += 6;
4018 if (fSplitStatus)
4019 sCount++;
4020 if (fToolbar)
4021 sCount++;
4022 if (fUserComboBox) {
4023 sCount += 4;
4024 if (fToolbar)
4025 sCount++;
4026 }
4027 if (fDrivebar)
4028 sCount++;
4029 if (fAutoView)
4030 sCount++;
4031 if (fMoreButtons)
4032 sCount += 3;
4033 return MRFROMSHORT(sCount);
4034 }
4035
4036 case WM_CLOSE:
4037 WinSendMsg(WinWindowFromID(hwnd, FID_CLIENT), msg, mp1, mp2);
4038 return 0;
4039 }
4040 return oldproc(hwnd, msg, mp1, mp2);
4041}
4042
4043MRESULT EXPENTRY MainWMCommand(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
4044{
4045 SetShiftState();
4046 switch (SHORT1FROMMP(mp1)) {
4047 case IDM_SETTARGET:
4048 SetTargetDir(hwnd, FALSE);
4049 break;
4050
4051 case IDM_TOAUTOMLE:
4052 if (fComments && fAutoView)
4053 WinSetFocus(HWND_DESKTOP, hwndAutoMLE);
4054 break;
4055
4056 case IDM_HIDENOTEWND:
4057 HideNote();
4058 break;
4059 case IDM_SHOWNOTEWND:
4060 ShowNote();
4061 break;
4062
4063 case IDM_COMPARE:
4064 {
4065 WALK2 wa;
4066 PCNRITEM pci;
4067
4068 memset(&wa, 0, sizeof(wa));
4069 wa.size = sizeof(wa);
4070 pci =
4071 (PCNRITEM)
4072 WinSendMsg(WinWindowFromID
4073 (WinWindowFromID(hwndTree, FID_CLIENT), TREE_CNR),
4074 CM_QUERYRECORDEMPHASIS, MPFROMLONG(CMA_FIRST),
4075 MPFROMSHORT(CRA_CURSORED));
4076 if (pci && (INT) pci != -1) {
4077 strcpy(wa.szCurrentPath1, pci->pszFileName);
4078 MakeValidDir(wa.szCurrentPath1);
4079 }
4080 else
4081 save_dir2(wa.szCurrentPath1);
4082 TopWindowName(hwndMain, (HWND) 0, wa.szCurrentPath2);
4083 if (!*wa.szCurrentPath2)
4084 strcpy(wa.szCurrentPath2, wa.szCurrentPath1);
4085 MakeValidDir(wa.szCurrentPath2);
4086 if (WinDlgBox(HWND_DESKTOP,
4087 hwnd,
4088 WalkTwoCmpDlgProc,
4089 FM3ModHandle,
4090 WALK2_FRAME,
4091 MPFROMP(&wa)) &&
4092 !IsFile(wa.szCurrentPath1) && !IsFile(wa.szCurrentPath2)) {
4093 if (!*dircompare) {
4094
4095 COMPARE *cmp;
4096
4097 cmp = xmallocz(sizeof(COMPARE), pszSrcFile, __LINE__);
4098 if (cmp) {
4099 cmp->size = sizeof(COMPARE);
4100 strcpy(cmp->leftdir, wa.szCurrentPath1);
4101 strcpy(cmp->rightdir, wa.szCurrentPath2);
4102 cmp->hwndParent = hwnd;
4103 cmp->dcd.hwndParent = hwnd;
4104 WinDlgBox(HWND_DESKTOP,
4105 HWND_DESKTOP,
4106 CompareDlgProc, FM3ModHandle, COMP_FRAME, MPFROMP(cmp));
4107 }
4108 }
4109 else {
4110
4111 CHAR d1[] = "\"";
4112 CHAR d2[] = "\"";
4113
4114 if (!needs_quoting(wa.szCurrentPath1))
4115 *d1 = 0;
4116 if (!needs_quoting(wa.szCurrentPath2))
4117 *d2 = 0;
4118 runemf2(SEPARATE,
4119 HWND_DESKTOP,
4120 NULL,
4121 NULL,
4122 "%s %s%s%s %s%s%s",
4123 dircompare,
4124 d1, wa.szCurrentPath1, d1, d2, wa.szCurrentPath2, d2);
4125 }
4126 }
4127 }
4128 break;
4129
4130 case IDM_EXIT:
4131 case IDM_KILLME:
4132 PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
4133 break;
4134
4135 case IDM_CLI:
4136 if (fSplitStatus &&
4137 hwndStatus2 &&
4138 !WinIsWindow(WinQueryAnchorBlock(hwnd),
4139 WinWindowFromID(hwndStatus2, COMMAND_LINE)))
4140 PostMsg(hwndStatus2, UM_CLICKED, MPVOID, MPVOID);
4141 break;
4142
4143 case IDM_ADDTOUSERLIST:
4144 case IDM_DELETEFROMUSERLIST:
4145 {
4146 CHAR temp[CCHMAXPATH], path[CCHMAXPATH];
4147
4148 *temp = 0;
4149 WinQueryWindowText(hwndUserlist, CCHMAXPATH, temp);
4150 bstrip(temp);
4151 if (*temp &&
4152 !DosQueryPathInfo(temp, FIL_QUERYFULLNAME, path, sizeof(path))) {
4153 if (SHORT1FROMMP(mp1) == IDM_ADDTOUSERLIST) {
4154 add_udir(TRUE, path);
4155 if (fUdirsChanged)
4156 save_udirs();
4157 WinSendMsg(hwnd, UM_FILLUSERLIST, MPVOID, MPVOID);
4158 }
4159 else {
4160 if (!remove_udir(path))
4161 Runtime_Error(pszSrcFile, __LINE__, "remove_udir");
4162 else {
4163 if (fUdirsChanged)
4164 save_udirs();
4165 WinSendMsg(hwnd, UM_FILLUSERLIST, MPVOID, MPVOID);
4166 }
4167 }
4168 }
4169 }
4170 break;
4171
4172 case IDM_SAVEDIRCNRSTATE:
4173 case IDM_DELETEDIRCNRSTATE:
4174 {
4175 CHAR szStateName[14];
4176
4177 *szStateName = 0;
4178 WinQueryWindowText(hwndStatelist, 13, szStateName);
4179 bstrip(szStateName);
4180 // Ignore request if blank or attempting to using illegal name
4181 if (*szStateName && stricmp(szStateName, GetPString(IDS_STATETEXT))) {
4182 if (SHORT1FROMMP(mp1) == IDM_SAVEDIRCNRSTATE) {
4183 // Save
4184 if (SaveDirCnrState(hwnd, szStateName)) {
4185 if (add_setup(szStateName)) {
4186 WinSendMsg(hwndStatelist, LM_INSERTITEM,
4187 MPFROM2SHORT(LIT_SORTASCENDING, 0), MPFROMP(szStateName));
4188 save_setups();
4189 }
4190 else {
4191 saymsg(MB_ENTER | MB_ICONASTERISK, hwnd,
4192 GetPString(IDS_WARNINGTEXT),
4193 GetPString(IDS_EXISTSASATEXT), szStateName, "state name");
4194 WinSetWindowText(hwndStatelist, GetPString(IDS_STATETEXT));
4195 }
4196 }
4197 else {
4198 saymsg(MB_ENTER | MB_ICONASTERISK, hwnd,
4199 GetPString(IDS_WARNINGTEXT),
4200 "\"%s\" state save failed", szStateName); // 15 Apr 07 SHL failed
4201 WinSetWindowText(hwndStatelist, GetPString(IDS_STATETEXT));
4202 }
4203 }
4204 else {
4205 // Delete
4206 ULONG numsaves = 0, size, x;
4207 CHAR s[80];
4208
4209 if (remove_setup(szStateName))
4210 save_setups();
4211 sprintf(s, "%s.NumDirsLastTime", szStateName);
4212 size = sizeof(ULONG);
4213 if (!PrfQueryProfileData
4214 (fmprof, FM3Str, s, (PVOID) & numsaves, &size)) {
4215 saymsg(MB_ENTER | MB_ICONASTERISK, hwnd,
4216 GetPString(IDS_WARNINGTEXT),
4217 GetPString(IDS_DOESNTEXISTTEXT), szStateName);
4218 }
4219 else if (!size)
4220 Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT);
4221 else {
4222 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0L);
4223 for (x = 0; x < numsaves; x++) {
4224 sprintf(s, "%s.DirCnrPos.%lu", szStateName, x);
4225 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0);
4226 sprintf(s, "%s.DirCnrDir.%lu", szStateName, x);
4227 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0);
4228 sprintf(s, "%s.DirCnrSort.%lu", szStateName, x);
4229 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0);
4230 sprintf(s, "%s.DirCnrFilter.%lu", szStateName, x);
4231 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0);
4232 sprintf(s, "%s.DirCnrView.%lu", szStateName, x);
4233 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0);
4234 }
4235 sprintf(s, "%s.LastTreePos", szStateName);
4236 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0);
4237 sprintf(s, "%s.MySizeLastTime", szStateName);
4238 PrfWriteProfileData(fmprof, FM3Str, s, NULL, 0);
4239 }
4240 PostMsg(hwnd, UM_FILLSETUPLIST, MPVOID, MPVOID);
4241 }
4242 }
4243 }
4244 break;
4245
4246 case IDM_IDEALSIZE:
4247 {
4248 SWP swp, swpD;
4249 ULONG icz = WinQuerySysValue(HWND_DESKTOP, SV_CYICON) * 2L;
4250 ULONG bsz = WinQuerySysValue(HWND_DESKTOP, SV_CYSIZEBORDER);
4251
4252 WinQueryWindowPos(WinQueryWindow(hwnd, QW_PARENT), &swp);
4253 if (swp.fl & SWP_MAXIMIZE) {
4254 WinSendMsg(WinQueryWindow(hwnd, QW_PARENT), WM_SYSCOMMAND,
4255 MPFROM2SHORT(SC_RESTORE, 0), MPVOID);
4256 WinQueryWindowPos(WinQueryWindow(hwnd, QW_PARENT), &swp);
4257 }
4258 WinGetMaxPosition(WinQueryWindow(hwnd, QW_PARENT), &swpD);
4259 swpD.x += bsz;
4260 swpD.cx -= (bsz * 2);
4261 swpD.y += icz;
4262 swpD.cy -= (icz + bsz);
4263 if (swp.x == swpD.x && swp.y == swpD.y &&
4264 swp.cx == swpD.cx && swp.cy == swpD.cy &&
4265 // fixme to be #defined someday
4266 WinQueryWindowUShort(hwnd, QWL_USER + 10) &&
4267 WinQueryWindowUShort(hwnd, QWL_USER + 14)) {
4268 swpD.x = WinQueryWindowUShort(hwnd, QWL_USER + 8);
4269 swpD.cx = WinQueryWindowUShort(hwnd, QWL_USER + 10);
4270 swpD.y = WinQueryWindowUShort(hwnd, QWL_USER + 12);
4271 swpD.cy = WinQueryWindowUShort(hwnd, QWL_USER + 14);
4272 }
4273 else {
4274 WinSetWindowUShort(hwnd, QWL_USER + 8, (USHORT) swp.x);
4275 WinSetWindowUShort(hwnd, QWL_USER + 10, (USHORT) swp.cx);
4276 WinSetWindowUShort(hwnd, QWL_USER + 12, (USHORT) swp.y);
4277 WinSetWindowUShort(hwnd, QWL_USER + 14, (USHORT) swp.cy);
4278 }
4279 WinSetWindowPos(WinQueryWindow(hwnd, QW_PARENT), HWND_TOP,
4280 swpD.x, swpD.y, swpD.cx, swpD.cy, SWP_MOVE | SWP_SIZE);
4281 }
4282 break;
4283
4284 case IDM_BLINK:
4285 WinSetWindowPos(WinQueryWindow(hwnd, QW_PARENT), HWND_TOP, 0, 0, 0, 0,
4286 SWP_MINIMIZE);
4287 WinSetWindowPos(WinQueryWindow(hwnd, QW_PARENT), HWND_TOP, 0, 0, 0, 0,
4288 SWP_RESTORE | SWP_ZORDER);
4289 break;
4290
4291 case DID_CANCEL:
4292 {
4293 HWND hwndTop = TopWindow(hwndMain, (HWND) 0);
4294
4295 if (hwndTop)
4296 WinSetFocus(HWND_DESKTOP, hwndTop);
4297 }
4298 break;
4299
4300 case IDM_NOTEBOOK:
4301 WinDlgBox(HWND_DESKTOP,
4302 hwnd, CfgDlgProc, FM3ModHandle, CFG_FRAME, MPVOID);
4303 break;
4304
4305 case IDM_VIEWHELPS:
4306 case IDM_VIEWINFS:
4307 WinDlgBox(HWND_DESKTOP,
4308 HWND_DESKTOP,
4309 ViewInfProc,
4310 FM3ModHandle,
4311 VINF_FRAME,
4312 ((SHORT1FROMMP(mp1) == IDM_VIEWHELPS) ?
4313 MPFROMP(NullStr) : MPVOID));
4314 break;
4315
4316 case IDM_OPENWALK:
4317 {
4318 char newpath[CCHMAXPATH];
4319
4320 *newpath = 0;
4321 TopWindowName(hwnd, (HWND) 0, newpath);
4322 if (WinDlgBox(HWND_DESKTOP,
4323 hwnd,
4324 WalkAllDlgProc,
4325 FM3ModHandle, WALK_FRAME, MPFROMP(newpath)) && *newpath)
4326 OpenDirCnr((HWND) 0, hwndMain, hwndTree, FALSE, newpath);
4327 }
4328 break;
4329
4330 case IDM_WINDOWDLG:
4331 WindowList(hwnd);
4332 break;
4333
4334 case IDM_HELPMOUSE:
4335 case IDM_HELPCONTEXT:
4336 case IDM_HELPHINTS:
4337 case IDM_HELPPIX:
4338 case IDM_HELPTUTOR:
4339 case IDM_HELPUSERLIST:
4340 case IDM_HELP:
4341 case IDM_HELPCONTENTS:
4342 case IDM_HELPKEYS:
4343 case IDM_HELPGENERAL:
4344 if (hwndHelp) {
4345 if (SHORT1FROMMP(mp2) == CMDSRC_MENU) {
4346
4347 RECTL rcl;
4348 ULONG icz = WinQuerySysValue(HWND_DESKTOP, SV_CYICON) * 2L;
4349
4350 WinQueryWindowRect(HWND_DESKTOP, &rcl);
4351 rcl.yBottom += icz;
4352 rcl.yTop -= icz;
4353 rcl.xLeft += icz;
4354 rcl.xRight -= icz;
4355 WinSendMsg(hwndHelp, HM_SET_COVERPAGE_SIZE, MPFROMP(&rcl), MPVOID);
4356 }
4357 else {
4358
4359 RECTL rcl;
4360
4361 WinQueryWindowRect(HWND_DESKTOP, &rcl);
4362 rcl.yBottom += 8;
4363 rcl.yTop = (rcl.yTop / 2) + (rcl.yTop / 7);
4364 rcl.xLeft = (rcl.xRight / 2) - (rcl.xRight / 7);
4365 rcl.xRight -= 8;
4366 WinSendMsg(hwndHelp, HM_SET_COVERPAGE_SIZE, MPFROMP(&rcl), MPVOID);
4367 }
4368 switch (SHORT1FROMMP(mp1)) {
4369 case IDM_HELPCONTEXT:
4370 WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
4371 MPFROM2SHORT(HELP_CONTEXT, 0), MPFROMSHORT(HM_RESOURCEID));
4372 break;
4373
4374 case IDM_HELPMOUSE:
4375 if (hwndHelp)
4376 WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
4377 MPFROM2SHORT(HELP_MOUSE, 0), MPFROMSHORT(HM_RESOURCEID));
4378 break;
4379
4380 case IDM_HELPPIX:
4381 WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
4382 MPFROM2SHORT(HELP_BITMAP1, 0), MPFROMSHORT(HM_RESOURCEID));
4383 break;
4384
4385 case IDM_HELPTUTOR:
4386 WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
4387 MPFROM2SHORT(HELP_TUTORIAL, 0),
4388 MPFROMSHORT(HM_RESOURCEID));
4389 break;
4390
4391 case IDM_HELPHINTS:
4392 WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
4393 MPFROM2SHORT(HELP_HINTS, 0), MPFROMSHORT(HM_RESOURCEID));
4394 break;
4395
4396 case IDM_HELPGENERAL:
4397 WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
4398 MPFROM2SHORT(HELP_MAIN, 0), MPFROMSHORT(HM_RESOURCEID));
4399 break;
4400 case IDM_HELPKEYS:
4401 WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
4402 MPFROM2SHORT(HELP_KEYS, 0), MPFROMSHORT(HM_RESOURCEID));
4403 break;
4404
4405 case IDM_HELP:
4406 case IDM_HELPCONTENTS:
4407 WinSendMsg(hwndHelp, HM_HELP_CONTENTS, MPVOID, MPVOID);
4408 break;
4409
4410 case IDM_HELPUSERLIST:
4411 WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
4412 MPFROM2SHORT(HELP_USERLISTS, 0),
4413 MPFROMSHORT(HM_RESOURCEID));
4414 break;
4415 }
4416 }
4417 break;
4418
4419 case IDM_EDITANYARCHIVER:
4420 EditArchiverDefinition(hwnd);
4421 break;
4422
4423 case IDM_ABOUT:
4424 WinDlgBox(HWND_DESKTOP, hwnd, AboutDlgProc, FM3ModHandle,
4425 ABT_FRAME, MPVOID);
4426 break;
4427
4428 case IDM_FONTPALETTE:
4429 OpenObject("<WP_FNTPAL>", Default, hwnd);
4430 break;
4431
4432 case IDM_HICOLORPALETTE:
4433 case IDM_COLORPALETTE:
4434 {
4435 CHAR *palette = "<WP_CLRPAL>";
4436 ULONG version[2];
4437
4438 if (!DosQuerySysInfo(QSV_VERSION_MAJOR, QSV_VERSION_MINOR,
4439 (PVOID) & version, (ULONG) sizeof(version))) {
4440 if (version[0] > 20L || (version[0] == 20L && version[1] > 29L)) {
4441 if (SHORT1FROMMP(mp1) == IDM_HICOLORPALETTE)
4442 palette = "<WP_HIRESCLRPAL>";
4443 else
4444 palette = "<WP_LORESCLRPAL>";
4445 }
4446 }
4447 OpenObject(palette, Default, hwnd);
4448 }
4449 break;
4450
4451 case IDM_SYSTEMSETUP:
4452 OpenObject("<WP_CONFIG>", Default, hwnd);
4453 break;
4454
4455 case IDM_SCHEMEPALETTE:
4456 {
4457 HOBJECT hWPSObject;
4458
4459 hWPSObject = WinQueryObject("<WP_SCHPAL>");
4460 if (hWPSObject != NULLHANDLE)
4461 WinSetObjectData(hWPSObject, "SCHEMES=Winter:PM_Winter,"
4462 "Spring:PM_Spring,Summer:PM_Summer,"
4463 "System:PM_System,Windows:PM_Windows;"
4464 "OPEN=DEFAULT");
4465 }
4466 break;
4467
4468 case IDM_SYSTEMCLOCK:
4469 OpenObject("<WP_CLOCK>", Default, hwnd);
4470 break;
4471
4472#ifdef NEVER
4473 case IDM_SYSINFO:
4474 WinDlgBox(HWND_DESKTOP, HWND_DESKTOP, SysInfoDlgProc, FM3ModHandle,
4475 SYS_FRAME, NULL);
4476 break;
4477#endif
4478
4479 case IDM_INSTANT:
4480 {
4481 CHAR path[CCHMAXPATH];
4482 PCNRITEM pci = (PCNRITEM) 0;
4483
4484 if (hwndTree)
4485 pci = (PCNRITEM) WinSendMsg(hwndTree, CM_QUERYRECORDEMPHASIS,
4486 MPFROMLONG(CMA_FIRST),
4487 MPFROMSHORT(CRA_CURSORED));
4488 if (pci && (INT) pci != -1) {
4489 strcpy(path, pci->pszFileName);
4490 MakeValidDir(path);
4491 }
4492 else
4493 save_dir2(path);
4494 WinDlgBox(HWND_DESKTOP, hwnd, InstantDlgProc, FM3ModHandle,
4495 BAT_FRAME, MPFROMP(path));
4496 }
4497 break;
4498
4499 case IDM_WINFULLSCREEN:
4500 case IDM_DOSCOMMANDLINE:
4501 case IDM_COMMANDLINE:
4502 {
4503 CHAR *env = GetCmdSpec(FALSE), path[CCHMAXPATH];
4504 INT type = SEPARATE | WINDOWED;
4505
4506 *path = 0;
4507 TopWindowName(hwnd, (HWND) 0, path);
4508 if (SHORT1FROMMP(mp1) == IDM_DOSCOMMANDLINE)
4509 env = GetCmdSpec(TRUE);
4510 else if (SHORT1FROMMP(mp1) != IDM_COMMANDLINE) {
4511 env = "WINOS2.COM";
4512 type = SEPARATE | FULLSCREEN;
4513 }
4514 runemf2(type, hwnd, path, NULL, "%s", env);
4515 }
4516 break;
4517
4518 case IDM_KILLPROC:
4519 WinDlgBox(HWND_DESKTOP, hwnd, KillDlgProc, FM3ModHandle,
4520 KILL_FRAME, NULL);
4521 break;
4522
4523 case IDM_AUTOVIEWCOMMENTS:
4524 case IDM_AUTOVIEWFILE:
4525 if (SHORT1FROMMP(mp1) == IDM_AUTOVIEWFILE)
4526 fComments = FALSE;
4527 else
4528 fComments = TRUE;
4529 PrfWriteProfileData(fmprof, FM3Str, "Comments", &fComments, sizeof(BOOL));
4530 WinSetWindowText((fComments) ? hwndAutoview : hwndAutoMLE, NullStr);
4531 goto AutoChange;
4532
4533 case IDM_AUTOVIEW:
4534 SetMenuCheck(WinQueryWindowULong(hwnd, QWL_USER), SHORT1FROMMP(mp1),
4535 &fAutoView, TRUE, "AutoView");
4536 AutoChange:
4537 PostMsg(WinQueryWindow(hwnd, QW_PARENT), WM_UPDATEFRAME,
4538 MPFROMLONG(FCF_SIZEBORDER), MPVOID);
4539 if (fAutoView) {
4540
4541 CHAR s[CCHMAXPATH];
4542 HWND hwndDir;
4543 PCNRITEM pci;
4544
4545 hwndDir = TopWindowName(hwnd, (HWND) 0, s);
4546 if (hwndDir) {
4547 hwndDir = WinWindowFromID(hwndDir, FID_CLIENT);
4548 if (hwndDir) {
4549 hwndDir = WinWindowFromID(hwndDir, DIR_CNR);
4550 if (hwndDir) {
4551 pci = (PCNRITEM) WinSendMsg(hwndDir, CM_QUERYRECORDEMPHASIS,
4552 MPFROMLONG(CMA_FIRST),
4553 MPFROMSHORT(CRA_CURSORED));
4554 if (pci && (INT) pci != -1 &&
4555 (!(driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_SLOW)))
4556 WinSendMsg(hwnd,
4557 UM_LOADFILE,
4558 MPFROMP(pci->pszFileName),
4559 (SHORT1FROMMP(mp1) == IDM_AUTOVIEW) ?
4560 MPVOID : MPFROMLONG(1L));
4561 }
4562 }
4563 }
4564 }
4565 break;
4566
4567 case IDM_TEXTTOOLS:
4568 SetMenuCheck(WinQueryWindowULong(hwnd, QWL_USER), SHORT1FROMMP(mp1),
4569 &fTextTools, TRUE, "TextTools");
4570 BuildTools(hwndToolback, TRUE);
4571 PostMsg(WinQueryWindow(hwnd, QW_PARENT), WM_UPDATEFRAME,
4572 MPFROMLONG(FCF_SIZEBORDER), MPVOID);
4573 break;
4574
4575 case IDM_TOOLTITLES:
4576 SetMenuCheck(WinQueryWindowULong(hwnd, QWL_USER), SHORT1FROMMP(mp1),
4577 &fToolTitles, TRUE, "ToolTitles");
4578 BuildTools(hwndToolback, TRUE);
4579 PostMsg(WinQueryWindow(hwnd, QW_PARENT), WM_UPDATEFRAME,
4580 MPFROMLONG(FCF_SIZEBORDER), MPVOID);
4581 break;
4582
4583 case IDM_HIDEMENU:
4584 {
4585 HWND hwndMenu;
4586
4587 hwndMenu = WinQueryWindowULong(hwnd, QWL_USER);
4588 MenuInvisible = (MenuInvisible) ? FALSE : TRUE;
4589 if (MenuInvisible) {
4590 WinSetParent(hwndMenu, HWND_OBJECT, FALSE);
4591 WinSetMenuItemText(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
4592 FID_SYSMENU), IDM_HIDEMENU,
4593 GetPString(IDS_UNHIDEMENUTEXT));
4594 }
4595 else {
4596 WinSetParent(hwndMenu, WinQueryWindow(hwnd, QW_PARENT), FALSE);
4597 WinSetMenuItemText(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
4598 FID_SYSMENU), IDM_HIDEMENU,
4599 GetPString(IDS_HIDEMENUTEXT));
4600 }
4601 PostMsg(WinQueryWindow(hwnd, QW_PARENT), WM_UPDATEFRAME,
4602 MPFROMLONG(FCF_MENU), MPVOID);
4603 PrfWriteProfileData(fmprof, FM3Str, "MenuInvisible",
4604 &MenuInvisible, sizeof(BOOL));
4605 }
4606 break;
4607
4608 case IDM_SEEALL:
4609 case IDM_GREP:
4610 case IDM_COLLECTOR:
4611 {
4612 HWND hwndC;
4613 SWP swp;
4614 BOOL already = FALSE;
4615
4616 if (Collector)
4617 already = TRUE;
4618 if (!already && !fAutoTile && !fExternalCollector)
4619 GetNextWindowPos(hwnd, &swp, NULL, NULL);
4620 hwndC = StartCollector(fExternalCollector ? HWND_DESKTOP : hwnd, 4);
4621 if (hwndC) {
4622 if (!already && !fAutoTile && !fExternalCollector)
4623 WinSetWindowPos(hwndC, HWND_TOP,
4624 swp.x, swp.y, swp.cx, swp.cy,
4625 SWP_MOVE | SWP_SIZE | SWP_SHOW | SWP_ZORDER);
4626 else if (fAutoTile && !already)
4627 TileChildren(hwnd, TRUE);
4628 WinSetWindowPos(hwndC, HWND_TOP, 0, 0, 0, 0, SWP_SHOW | SWP_RESTORE |
4629 SWP_ACTIVATE);
4630 if (SHORT1FROMMP(mp1) == IDM_GREP)
4631 PostMsg(WinWindowFromID(hwndC, FID_CLIENT), WM_COMMAND,
4632 MPFROM2SHORT(IDM_GREP, 0), MPVOID);
4633 if (SHORT1FROMMP(mp1) == IDM_SEEALL)
4634 PostMsg(WinWindowFromID(hwndC, FID_CLIENT), WM_COMMAND,
4635 MPFROM2SHORT(IDM_SEEALL, 0), MPVOID);
4636 }
4637 }
4638 break;
4639
4640 case IDM_TOOLLEFT:
4641 case IDM_TOOLRIGHT:
4642 {
4643 TOOL *tool;
4644
4645 if (!toolhead || !toolhead->next) {
4646 firsttool = (toolhead) ? toolhead->id : 0;
4647 break;
4648 }
4649 tool = find_tool(firsttool);
4650 if (!tool)
4651 tool = toolhead;
4652 if (SHORT1FROMMP(mp1) == IDM_TOOLRIGHT) {
4653 tool = prev_tool(tool, TRUE);
4654 firsttool = tool->id;
4655 }
4656 else {
4657 tool = next_tool(tool, TRUE);
4658 firsttool = tool->id;
4659 }
4660 ResizeTools(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
4661 MAIN_TOOLS));
4662 }
4663 break;
4664
4665 case IDM_CREATETOOL:
4666 BuildTools(hwndToolback, TRUE);
4667 break;
4668
4669 case IDM_TOOLBAR:
4670 SetMenuCheck(WinQueryWindowULong(hwnd, QWL_USER),
4671 IDM_TOOLSUBMENU, &fToolbar, TRUE, "Toolbar");
4672 BuildTools(hwndToolback, TRUE);
4673 WinShowWindow(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
4674 MAIN_TOOLS), fToolbar);
4675 WinSendMsg(WinQueryWindow(hwnd, QW_PARENT),
4676 WM_UPDATEFRAME, MPFROMLONG(FCF_SIZEBORDER), MPVOID);
4677 if (fDrivebar)
4678 WinInvalidateRect(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
4679 MAIN_DRIVES), NULL, TRUE);
4680 break;
4681
4682 case IDM_DRIVEBAR:
4683 SetMenuCheck(WinQueryWindowULong(hwnd, QWL_USER),
4684 IDM_DRIVEBAR, &fDrivebar, TRUE, "Drivebar");
4685 WinShowWindow(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
4686 MAIN_DRIVES), fDrivebar);
4687 PostMsg(WinQueryWindow(hwnd, QW_PARENT),
4688 WM_UPDATEFRAME, MPFROMLONG(FCF_SIZEBORDER), MPVOID);
4689 PostMsg(hwnd, UM_BUILDDRIVEBAR, MPVOID, MPVOID);
4690 break;
4691
4692 case IDM_USERLIST:
4693 SetMenuCheck(WinQueryWindowULong(hwnd, QWL_USER),
4694 SHORT1FROMMP(mp1), &fUserComboBox, TRUE, "UserComboBox");
4695 WinShowWindow(hwndUserlist, fUserComboBox);
4696 PostMsg(WinQueryWindow(hwnd, QW_PARENT),
4697 WM_UPDATEFRAME, MPFROMLONG(FCF_SIZEBORDER), MPVOID);
4698 PostMsg(hwnd, UM_FILLUSERLIST, MPVOID, MPVOID);
4699 PostMsg(hwnd, UM_FILLSETUPLIST, MPVOID, MPVOID);
4700 PostMsg(hwnd, UM_FILLCMDLIST, MPVOID, MPVOID);
4701 PostMsg(hwnd, UM_FILLBUTTONLIST, MPVOID, MPVOID);
4702 break;
4703
4704 case IDM_MOREBUTTONS:
4705 WinSetWindowText(hwndName, NullStr);
4706 WinSetWindowText(hwndDate, NullStr);
4707 WinSetWindowText(hwndAttr, NullStr);
4708 SetMenuCheck(WinQueryWindowULong(hwnd, QWL_USER),
4709 SHORT1FROMMP(mp1), &fMoreButtons, TRUE, "MoreButtons");
4710 if (fMoreButtons) {
4711
4712 HWND hwndTemp;
4713
4714 hwndTemp = TopWindow(hwnd, (HWND) 0);
4715
4716 if (hwndTemp) {
4717 WinSetFocus(HWND_DESKTOP, hwnd);
4718 WinSetFocus(HWND_DESKTOP, hwndTemp);
4719 }
4720 }
4721 PostMsg(WinQueryWindow(hwnd, QW_PARENT),
4722 WM_UPDATEFRAME, MPFROMLONG(FCF_SIZEBORDER), MPVOID);
4723 break;
4724
4725 case IDM_FREETREE:
4726 if (fFreeTree) {
4727
4728 SWP swp, swpT;
4729
4730 WinQueryWindowPos(hwndTree, &swpT);
4731 WinQueryWindowPos(hwnd, &swp);
4732 WinSetWindowPos(hwndTree, HWND_TOP, 0, swp.cy - swpT.cy, 0, 0,
4733 SWP_MOVE);
4734 }
4735 SetMenuCheck(WinQueryWindowULong(hwnd, QWL_USER), SHORT1FROMMP(mp1),
4736 &fFreeTree, TRUE, "FreeTree");
4737 if (fAutoTile)
4738 TileChildren(hwnd, TRUE);
4739 break;
4740
4741 case IDM_AUTOTILE:
4742 SetMenuCheck(WinQueryWindowULong(hwnd, QWL_USER),
4743 SHORT1FROMMP(mp1), &fAutoTile, TRUE, "AutoTile");
4744 if (fAutoTile)
4745 TileChildren(hwnd, TRUE);
4746 break;
4747
4748 case IDM_TILEBACKWARDS:
4749 SetMenuCheck(WinQueryWindowULong(hwnd, QWL_USER),
4750 SHORT1FROMMP(mp1), &fTileBackwards, TRUE, "TileBackwards");
4751 if (fAutoTile)
4752 TileChildren(hwnd, TRUE);
4753 break;
4754
4755 case IDM_NEXTWINDOW:
4756 case IDM_PREVWINDOW:
4757 NextChild(hwnd, (SHORT1FROMMP(mp1) == IDM_PREVWINDOW));
4758 break;
4759
4760 case IDM_CASCADE:
4761 CascadeChildren(hwnd);
4762 break;
4763
4764 case IDM_TILE:
4765 TileChildren(hwnd, TRUE);
4766 break;
4767
4768 case IDM_RESTORE:
4769 MinResChildren(hwnd, SWP_RESTORE);
4770 break;
4771
4772 case IDM_MINIMIZE:
4773 MinResChildren(hwnd, SWP_MINIMIZE);
4774 break;
4775
4776 case IDM_ARRANGEICONS:
4777 ArrangeIcons(hwnd);
4778 break;
4779
4780 case IDM_INIVIEWER:
4781 StartIniEditor(hwnd, NULL, 4);
4782 break;
4783
4784 case IDM_EDITASSOC:
4785 EditAssociations(hwnd);
4786 break;
4787
4788 case IDM_EDITCOMMANDS:
4789 EditCommands(hwnd);
4790 PostMsg(hwnd, UM_FILLCMDLIST, MPVOID, MPVOID);
4791 break;
4792
4793 default:
4794 if (!SwitchCommand((HWND) WinQueryWindowULong(hwnd, QWL_USER),
4795 SHORT1FROMMP(mp1))) {
4796 if (SHORT1FROMMP(mp1) >= IDM_COMMANDSTART &&
4797 SHORT1FROMMP(mp1) < IDM_QUICKTOOLSTART) {
4798
4799 INT x;
4800 HWND hwndCnr;
4801
4802 if (!cmdloaded)
4803 load_commands();
4804 hwndCnr = TopWindow(hwnd, (HWND) 0);
4805 hwndCnr = (HWND) WinSendMsg(WinWindowFromID(hwndCnr, FID_CLIENT),
4806 UM_CONTAINERHWND, MPVOID, MPVOID);
4807 if (!hwndCnr) {
4808 Runtime_Error2(pszSrcFile, __LINE__, IDS_NOWINDOWTEXT);
4809 break;
4810 }
4811 x = SHORT1FROMMP(mp1) - IDM_COMMANDSTART;
4812 if (x >= 0) {
4813 x++;
4814 RunCommand(hwndCnr, x);
4815 if (fUnHilite) {
4816
4817 PCNRITEM pci;
4818 DIRCNRDATA *dcd = NULL;
4819
4820 // 12 May 07 SHL fixme to understand? backwards maybe? looking for DIR_CNR?
4821 if (WinQueryWindowUShort(hwndCnr, QWS_ID) != TREE_CNR)
4822 dcd = INSTDATA(hwndCnr);
4823 pci = (PCNRITEM) WinSendMsg(hwndCnr,
4824 CM_QUERYRECORDEMPHASIS,
4825 MPFROMLONG(CMA_FIRST),
4826 MPFROMSHORT(CRA_CURSORED));
4827 if (pci && (INT) pci != -1 &&
4828 (pci->rc.flRecordAttr & CRA_SELECTED))
4829 {
4830 UnHilite(hwnd,
4831 TRUE,
4832 dcd ? &dcd->lastselection : NULL,
4833 dcd ? dcd ->ulItemsToUnHilite : 0);
4834 }
4835 }
4836 }
4837 }
4838 else if (SHORT1FROMMP(mp1) >= IDM_QUICKTOOLSTART &&
4839 SHORT1FROMMP(mp1) < IDM_QUICKTOOLSTART + 50) {
4840 if (!qtloaded)
4841 load_quicktools();
4842 if (quicktool[SHORT1FROMMP(mp1) - IDM_QUICKTOOLSTART]) {
4843 if (fToolsChanged)
4844 save_tools(NULL);
4845 if (!load_tools(quicktool[SHORT1FROMMP(mp1) - IDM_QUICKTOOLSTART]))
4846 load_tools(NULL);
4847 else {
4848 strcpy(lasttoolbox,
4849 quicktool[SHORT1FROMMP(mp1) - IDM_QUICKTOOLSTART]);
4850 PrfWriteProfileString(fmprof, FM3Str, "LastToolBox", lasttoolbox);
4851 }
4852 BuildTools(hwndToolback, TRUE);
4853 }
4854 }
4855 else {
4856
4857 HWND hwndActive;
4858
4859 hwndActive = TopWindow(hwnd, (HWND) 0);
4860 if (hwndActive)
4861 PostMsg(WinWindowFromID(hwndActive, FID_CLIENT),
4862 WM_COMMAND, mp1, mp2);
4863 }
4864 }
4865 break;
4866 }
4867 return 0;
4868}
4869
4870static MRESULT EXPENTRY MainWMOnce(HWND hwnd, ULONG msg, MPARAM mp1,
4871 MPARAM mp2)
4872{
4873 TID tid;
4874 SWP swp;
4875 PFNWP oldproc;
4876 HWND hwndTmp;
4877 HWND hwndFrame;
4878 HWND hwndSysMenu, hwndSysSubMenu, hwndMenu;
4879 USHORT idSysMenu;
4880 MENUITEM mi, mit;
4881 ULONG size;
4882 BOOL temp = FALSE;
4883
4884 switch (msg) {
4885 case WM_CREATE:
4886 WinQueryWindowProcess(hwnd, &mypid, &tid);
4887 hwndMain = hwnd;
4888 WinSetWindowUShort(hwnd, QWL_USER + 8, 0);
4889 WinSetWindowUShort(hwnd, QWL_USER + 10, 0);
4890 WinSetWindowUShort(hwnd, QWL_USER + 12, 0);
4891 WinSetWindowUShort(hwnd, QWL_USER + 16, 0);
4892 if (_beginthread(MakeMainObjWin, NULL, 245760, MPVOID) == -1) {
4893 Runtime_Error(pszSrcFile, __LINE__,
4894 GetPString(IDS_COULDNTSTARTTHREADTEXT));
4895 PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
4896 return 0;
4897 }
4898 else
4899 DosSleep(64);
4900
4901 hwndFrame = WinQueryWindow(hwnd, QW_PARENT);
4902
4903 /*
4904 * create frame children (not client children, frame children)
4905 */
4906 DosSleep(1L);
4907 WinQueryWindowPos(hwndFrame, &swp);
4908 oldproc = WinSubclassWindow(hwndFrame, MainFrameWndProc);
4909 WinSetWindowPtr(hwndFrame, QWL_USER, (PVOID) oldproc);
4910 CommonCreateMainChildren(hwnd, &swp);
4911
4912 if (!WinCreateWindow(hwndFrame,
4913 WC_BUTTON,
4914 "I",
4915 WS_VISIBLE | BS_PUSHBUTTON | BS_NOPOINTERFOCUS,
4916 ((swp.cx -
4917 WinQuerySysValue(HWND_DESKTOP,
4918 SV_CXMINMAXBUTTON)) -
4919 WinQuerySysValue(HWND_DESKTOP,
4920 SV_CXMINMAXBUTTON) / 2) -
4921 WinQuerySysValue(HWND_DESKTOP,
4922 SV_CXSIZEBORDER),
4923 (swp.cy - WinQuerySysValue(HWND_DESKTOP,
4924 SV_CYMINMAXBUTTON)) -
4925 WinQuerySysValue(HWND_DESKTOP,
4926 SV_CYSIZEBORDER),
4927 WinQuerySysValue(HWND_DESKTOP,
4928 SV_CXMINMAXBUTTON) / 2,
4929 WinQuerySysValue(HWND_DESKTOP,
4930 SV_CYMINMAXBUTTON),
4931 hwnd, HWND_TOP, IDM_IDEALSIZE, NULL, NULL)) {
4932 Win_Error2(hwnd, hwnd, pszSrcFile, __LINE__, IDS_WINCREATEWINDOW);
4933 }
4934 else {
4935 WinSubclassWindow(WinWindowFromID(hwndFrame, IDM_IDEALSIZE),
4936 IdealButtonProc);
4937 SetPresParams(WinWindowFromID(hwndFrame,
4938 IDM_IDEALSIZE),
4939 NULL, NULL, NULL, GetPString(IDS_10SYSTEMVIOTEXT));
4940 }
4941
4942 hwndTmp = WinCreateWindow(hwndFrame,
4943 WC_BUTTON,
4944 "#1019",
4945 WS_VISIBLE | BS_PUSHBUTTON | BS_NOPOINTERFOCUS |
4946 BS_BITMAP,
4947 swp.cx - 46,
4948 swp.y + 2,
4949 24,
4950 22, hwnd, HWND_TOP, IDM_OPENWALK, NULL, NULL);
4951 if (!hwndTmp)
4952 Win_Error2(hwnd, hwnd, pszSrcFile, __LINE__, IDS_WINCREATEWINDOW);
4953
4954 hwndTmp = WinCreateWindow(hwndFrame,
4955 WC_BUTTON,
4956 "#3062",
4957 WS_VISIBLE | BS_PUSHBUTTON | BS_NOPOINTERFOCUS |
4958 BS_BITMAP,
4959 swp.cx - 22,
4960 swp.y + 2,
4961 24,
4962 22, hwnd, HWND_TOP, IDM_USERLIST, NULL, NULL);
4963 if (!hwndTmp)
4964 Win_Error2(hwnd, hwnd, pszSrcFile, __LINE__, IDS_WINCREATEWINDOW);
4965
4966 hwndUserlist = WinCreateWindow(hwndFrame,
4967 WC_COMBOBOX,
4968 (PSZ) NULL,
4969 WS_VISIBLE | CBS_DROPDOWN |
4970 LS_HORZSCROLL,
4971 (swp.x +
4972 WinQuerySysValue(HWND_DESKTOP,
4973 SV_CXSIZEBORDER) + 48L),
4974 (swp.cy -
4975 WinQuerySysValue(HWND_DESKTOP,
4976 SV_CYSIZEBORDER)) - 60,
4977 ((swp.cx -
4978 (WinQuerySysValue(HWND_DESKTOP,
4979 SV_CXSIZEBORDER) *
4980 2)) - 64L), 60L, hwndFrame, HWND_TOP,
4981 MAIN_USERLIST, NULL, NULL);
4982 if (!hwndUserlist)
4983 Win_Error2(hwnd, hwnd, pszSrcFile, __LINE__, IDS_WINCREATEWINDOW);
4984 hwndCmdlist = WinCreateWindow(hwndFrame,
4985 WC_COMBOBOX,
4986 (PSZ) NULL,
4987 WS_VISIBLE | CBS_DROPDOWN |
4988 LS_HORZSCROLL,
4989 (swp.x +
4990 WinQuerySysValue(HWND_DESKTOP,
4991 SV_CXSIZEBORDER) + 48L),
4992 (swp.cy -
4993 WinQuerySysValue(HWND_DESKTOP,
4994 SV_CYSIZEBORDER)) - 60,
4995 ((swp.cx -
4996 (WinQuerySysValue(HWND_DESKTOP,
4997 SV_CXSIZEBORDER) * 2)) -
4998 64L), 60L, hwndFrame, HWND_TOP,
4999 MAIN_CMDLIST, NULL, NULL);
5000 if (!hwndCmdlist)
5001 Win_Error2(hwnd, hwnd, pszSrcFile, __LINE__, IDS_WINCREATEWINDOW);
5002 WinSetWindowText(hwndCmdlist, GetPString(IDS_COMMANDSTEXT));
5003 hwndStatelist = WinCreateWindow(hwndFrame,
5004 WC_COMBOBOX,
5005 (PSZ) NULL,
5006 WS_VISIBLE | CBS_DROPDOWN |
5007 LS_HORZSCROLL,
5008 (swp.x +
5009 WinQuerySysValue(HWND_DESKTOP,
5010 SV_CXSIZEBORDER) + 48L),
5011 (swp.cy -
5012 WinQuerySysValue(HWND_DESKTOP,
5013 SV_CYSIZEBORDER)) - 60,
5014 ((swp.cx -
5015 (WinQuerySysValue(HWND_DESKTOP,
5016 SV_CXSIZEBORDER) *
5017 2)) - 64L), 60L, hwndFrame, HWND_TOP,
5018 MAIN_SETUPLIST, NULL, NULL);
5019 if (!hwndStatelist)
5020 Win_Error2(hwnd, hwnd, pszSrcFile, __LINE__, IDS_WINCREATEWINDOW);
5021 hwndDrivelist = WinCreateWindow(hwndFrame,
5022 WC_COMBOBOX,
5023 (PSZ) NULL,
5024 WS_VISIBLE | CBS_DROPDOWN,
5025 (swp.x +
5026 WinQuerySysValue(HWND_DESKTOP,
5027 SV_CXSIZEBORDER)),
5028 (swp.cy -
5029 WinQuerySysValue(HWND_DESKTOP,
5030 SV_CYSIZEBORDER)) - 60,
5031 48L,
5032 60L,
5033 hwndFrame,
5034 HWND_TOP, MAIN_DRIVELIST, NULL, NULL);
5035 if (!hwndDrivelist)
5036 Win_Error2(hwnd, hwnd, pszSrcFile, __LINE__, IDS_WINCREATEWINDOW);
5037 SetPresParams(hwndDrivelist,
5038 NULL, NULL, NULL, GetPString(IDS_10SYSTEMMONOTEXT));
5039 hwndButtonlist = WinCreateWindow(hwndFrame,
5040 WC_COMBOBOX,
5041 (PSZ) NULL,
5042 WS_VISIBLE | CBS_DROPDOWN |
5043 LS_HORZSCROLL,
5044 (swp.cx -
5045 WinQuerySysValue(HWND_DESKTOP,
5046 SV_CXSIZEBORDER)) -
5047 164L,
5048 (swp.cy -
5049 WinQuerySysValue(HWND_DESKTOP,
5050 SV_CYSIZEBORDER)) - 60,
5051 164L, 60L, hwndFrame, HWND_TOP,
5052 MAIN_BUTTONLIST, NULL, NULL);
5053 if (!hwndButtonlist)
5054 Win_Error2(hwnd, hwnd, pszSrcFile, __LINE__, IDS_WINCREATEWINDOW);
5055 WinSendMsg(WinWindowFromID(hwndUserlist, CBID_EDIT),
5056 EM_SETTEXTLIMIT, MPFROM2SHORT(CCHMAXPATH, 0), MPVOID);
5057 WinSendMsg(WinWindowFromID(hwndStatelist, CBID_EDIT),
5058 EM_SETTEXTLIMIT, MPFROM2SHORT(13, 0), MPVOID);
5059 WinSendMsg(WinWindowFromID(hwndDrivelist, CBID_EDIT),
5060 EM_SETREADONLY, MPFROM2SHORT(TRUE, 0), MPVOID);
5061 WinSendMsg(WinWindowFromID(hwndButtonlist, CBID_EDIT),
5062 EM_SETREADONLY, MPFROM2SHORT(TRUE, 0), MPVOID);
5063 WinSendMsg(WinWindowFromID(hwndCmdlist, CBID_EDIT),
5064 EM_SETREADONLY, MPFROM2SHORT(TRUE, 0), MPVOID);
5065
5066 oldproc = WinSubclassWindow(WinWindowFromID(hwndUserlist, CBID_EDIT),
5067 DropDownListProc);
5068 WinSetWindowPtr(WinWindowFromID(hwndUserlist, CBID_EDIT),
5069 QWL_USER, (PVOID) oldproc);
5070 oldproc = WinSubclassWindow(WinWindowFromID(hwndCmdlist, CBID_EDIT),
5071 DropDownListProc);
5072 WinSetWindowPtr(WinWindowFromID(hwndCmdlist, CBID_EDIT),
5073 QWL_USER, (PVOID) oldproc);
5074 oldproc = WinSubclassWindow(WinWindowFromID(hwndButtonlist, CBID_EDIT),
5075 DropDownListProc);
5076 WinSetWindowPtr(WinWindowFromID(hwndButtonlist, CBID_EDIT),
5077 QWL_USER, (PVOID) oldproc);
5078 oldproc = WinSubclassWindow(WinWindowFromID(hwndStatelist, CBID_EDIT),
5079 DropDownListProc);
5080 WinSetWindowPtr(WinWindowFromID(hwndStatelist, CBID_EDIT),
5081 QWL_USER, (PVOID) oldproc);
5082 oldproc = WinSubclassWindow(WinWindowFromID(hwndDrivelist, CBID_EDIT),
5083 DropDownListProc);
5084 WinSetWindowPtr(WinWindowFromID(hwndDrivelist, CBID_EDIT),
5085 QWL_USER, (PVOID) oldproc);
5086 oldproc = WinSubclassWindow(hwndUserlist, DropDownListProc);
5087 WinSetWindowPtr(hwndUserlist, QWL_USER, (PVOID) oldproc);
5088 oldproc = WinSubclassWindow(hwndCmdlist, DropDownListProc);
5089 WinSetWindowPtr(hwndCmdlist, QWL_USER, (PVOID) oldproc);
5090 oldproc = WinSubclassWindow(hwndStatelist, DropDownListProc);
5091 WinSetWindowPtr(hwndStatelist, QWL_USER, (PVOID) oldproc);
5092 oldproc = WinSubclassWindow(hwndDrivelist, DropDownListProc);
5093 WinSetWindowPtr(hwndDrivelist, QWL_USER, (PVOID) oldproc);
5094 oldproc = WinSubclassWindow(hwndButtonlist, DropDownListProc);
5095 WinSetWindowPtr(hwndButtonlist, QWL_USER, (PVOID) oldproc);
5096 oldproc = WinSubclassWindow(WinWindowFromID(hwndFrame, IDM_USERLIST),
5097 ChildFrameButtonProc);
5098 WinSetWindowPtr(WinWindowFromID(hwndFrame, IDM_USERLIST),
5099 QWL_USER, (PVOID) oldproc);
5100 oldproc = WinSubclassWindow(WinWindowFromID(hwndFrame, IDM_OPENWALK),
5101 ChildFrameButtonProc);
5102 WinSetWindowPtr(WinWindowFromID(hwndFrame, IDM_OPENWALK),
5103 QWL_USER, (PVOID) oldproc);
5104 hwndMenu = WinWindowFromID(hwndFrame, FID_MENU);
5105 WinSendMsg(hwnd, UM_ADDTOMENU, MPVOID, MPVOID);
5106 SetToggleChecks(hwndMenu);
5107 SetConditionalCascade(hwndMenu, IDM_TOOLSUBMENU, IDM_TOOLBAR);
5108 SetConditionalCascade(hwndMenu, IDM_AUTOVIEWSUBMENU, IDM_AUTOVIEW);
5109 SetConditionalCascade(hwndMenu, IDM_TILEMENU, IDM_TILE);
5110 WinSetWindowULong(hwnd, QWL_USER, hwndMenu);
5111 memset(&mi, 0, sizeof(mi));
5112 memset(&mit, 0, sizeof(mit));
5113 hwndSysMenu = WinWindowFromID(hwndFrame, FID_SYSMENU);
5114 idSysMenu = SHORT1FROMMR(WinSendMsg(hwndSysMenu,
5115 MM_ITEMIDFROMPOSITION,
5116 MPVOID, MPVOID));
5117 WinSendMsg(hwndSysMenu,
5118 MM_QUERYITEM, MPFROM2SHORT(idSysMenu, 0), MPFROMP(&mit));
5119 hwndSysSubMenu = mit.hwndSubMenu;
5120 mi.iPosition = MIT_END;
5121 mi.afStyle = MIS_SEPARATOR;
5122 mi.id = (USHORT) - 1;
5123 WinSendMsg(hwndSysSubMenu, MM_INSERTITEM, MPFROMP(&mi), MPFROMP(NULL));
5124 mi.afStyle = MIS_TEXT;
5125 mi.id = IDM_IDEALSIZE;
5126 WinSendMsg(hwndSysSubMenu,
5127 MM_INSERTITEM,
5128 MPFROMP(&mi), MPFROMP(GetPString(IDS_IDEALMENUTEXT)));
5129 mi.afStyle = MIS_TEXT;
5130 mi.id = IDM_HIDEMENU;
5131 WinSendMsg(hwndSysSubMenu,
5132 MM_INSERTITEM,
5133 MPFROMP(&mi), MPFROMP(GetPString(IDS_HIDEMENUTEXT)));
5134 SetSysMenu(hwndSysMenu);
5135
5136 size = sizeof(BOOL);
5137 if (PrfQueryProfileData(fmprof,
5138 FM3Str,
5139 "MenuInvisible", &temp, &size) && size && temp)
5140 WinSendMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_HIDEMENU, 0), MPVOID);
5141 size = sizeof(BOOL);
5142 if (PrfQueryProfileData(fmprof,
5143 FM3Str, "FreeTree", &temp, &size) && size && temp)
5144 WinSendMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_FREETREE, 0), MPVOID);
5145 size = sizeof(BOOL);
5146 if (PrfQueryProfileData(fmprof,
5147 FM3Str,
5148 "AutoTile", &temp, &size) && size && !temp)
5149 WinSendMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_AUTOTILE, 0), MPVOID);
5150 size = sizeof(BOOL);
5151 if (PrfQueryProfileData(fmprof,
5152 FM3Str, "Toolbar", &temp, &size) && size && !temp)
5153 WinSendMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_TOOLBAR, 0), MPVOID);
5154
5155 WinSetWindowText(WinWindowFromID(hwndFrame, FID_TITLEBAR), "FM/2");
5156 FixSwitchList(hwndFrame, NULL);
5157 break; // WM_CREATE
5158
5159 case UM_SETUP:
5160 /*
5161 * start up some initial children
5162 */
5163 load_tools(NULL);
5164 BuildTools(hwndToolback, TRUE);
5165 WinShowWindow(WinQueryWindow(hwnd, QW_PARENT), TRUE);
5166 PostMsg(MainObjectHwnd, UM_SETUP2, mp1, mp2);
5167 return 0;
5168
5169 case UM_SETUP2:
5170 {
5171 SWP swp;
5172 ULONG size = sizeof(SWP);
5173
5174 WinQueryWindowPos(hwnd, &swp);
5175 hwndTree = StartTreeCnr(hwnd, 0);
5176 if (!hwndTree)
5177 WinDestroyWindow(WinQueryWindow(hwnd, QW_PARENT));
5178 else {
5179 if (!fSaveState ||
5180 !PrfQueryProfileData(fmprof,
5181 FM3Str,
5182 "LastTreePos",
5183 &swp, &size) || size != sizeof(SWP)) {
5184
5185 INT ratio, height = 0;
5186
5187 if (!fNoTreeGap)
5188 height = WinQuerySysValue(HWND_DESKTOP, SV_CYICON) * 2;
5189 size = sizeof(ratio);
5190 if (!PrfQueryProfileData(fmprof,
5191 FM3Str,
5192 "TreeWindowRatio",
5193 (PVOID) & ratio,
5194 &size) || size < sizeof(ratio))
5195 ratio = 400;
5196 WinSetWindowPos(hwndTree,
5197 HWND_TOP,
5198 0,
5199 height,
5200 (swp.cx * 100) / ratio,
5201 swp.cy - height,
5202 SWP_SHOW | SWP_SIZE | SWP_MOVE |
5203 SWP_ACTIVATE | SWP_ZORDER);
5204 }
5205 else
5206 WinSetWindowPos(hwndTree,
5207 HWND_TOP,
5208 swp.x,
5209 swp.y,
5210 swp.cx,
5211 swp.cy,
5212 swp.fl | SWP_MOVE | SWP_SIZE | SWP_SHOW |
5213 SWP_ZORDER | SWP_ACTIVATE);
5214 }
5215 ResizeTools(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
5216 MAIN_TOOLS));
5217 }
5218 PostMsg(MainObjectHwnd, UM_SETUP3, mp1, mp2);
5219 return 0;
5220
5221 case UM_SETUP3:
5222 /* start remaining child windows */
5223 if (!fNoSaveState && fSaveState)
5224 PostMsg(MainObjectHwnd, UM_RESTORE, MPVOID, MPVOID);
5225 PostMsg(MainObjectHwnd, UM_SETUP4, mp1, mp2);
5226 return 0;
5227
5228 case UM_SETUP4:
5229 {
5230 INT argc = (INT) mp1, x;
5231 CHAR **argv = (CHAR **) mp2;
5232
5233 for (x = 1; x < argc; x++) {
5234 if (*argv[x] == '/' || *argv[x] == ';')
5235 continue;
5236 if (!IsFile(argv[x]) && !FindDirCnrByName(argv[x], FALSE))
5237 OpenDirCnr((HWND) 0, hwndMain, hwndTree, TRUE, argv[x]);
5238 }
5239 }
5240 PostMsg(MainObjectHwnd, UM_SETUP5, MPVOID, MPVOID);
5241 return 0;
5242
5243 case UM_SETUP5:
5244 if (fAutoTile)
5245 TileChildren(hwnd, TRUE);
5246 PostMsg(hwnd, UM_FILLUSERLIST, MPVOID, MPVOID);
5247 PostMsg(hwnd, UM_FILLSETUPLIST, MPVOID, MPVOID);
5248 PostMsg(hwnd, UM_FILLCMDLIST, MPVOID, MPVOID);
5249 PostMsg(hwnd, UM_FILLBUTTONLIST, MPVOID, MPVOID);
5250 {
5251 HWND hwndActive;
5252
5253 hwndActive = TopWindow(hwnd, hwndTree);
5254 if (hwndActive)
5255 WinSetWindowPos(hwndActive, HWND_TOP, 0, 0, 0, 0, SWP_ACTIVATE);
5256 }
5257 if (fStartMinimized || fReminimize)
5258 PostMsg(hwndTree, UM_MINIMIZE, MPVOID, MPVOID);
5259 else if (fStartMaximized)
5260 PostMsg(hwndTree, UM_MAXIMIZE, MPVOID, MPVOID);
5261 fRunning = TRUE;
5262 return 0;
5263 }
5264
5265 return WinDefWindowProc(hwnd, msg, mp1, mp2);
5266}
5267
5268MRESULT EXPENTRY MainWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
5269{
5270 switch (msg) {
5271 case WM_CREATE:
5272 case UM_SETUP:
5273 case UM_SETUP2:
5274 case UM_SETUP3:
5275 case UM_SETUP4:
5276 case UM_SETUP5:
5277 return MainWMOnce(hwnd, msg, mp1, mp2);
5278
5279 case WM_CONTROLPOINTER:
5280 if (!fNoFinger &&
5281 (SHORT1FROMMP(mp1) == IDM_OPENWALK ||
5282 SHORT1FROMMP(mp1) == IDM_USERLIST))
5283 return MRFROMLONG(hptrFinger);
5284 break;
5285
5286 case UM_LOADFILE:
5287 case UM_THREADUSE:
5288 case UM_BUILDDRIVEBAR:
5289 return CommonMainWndProc(hwnd, msg, mp1, mp2);
5290
5291 case WM_BUTTON1UP:
5292 case WM_BUTTON2UP:
5293 case WM_BUTTON3UP:
5294 case WM_MOUSEMOVE:
5295 shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT | KC_SHIFT | KC_CTRL));
5296 break;
5297
5298 case WM_CHAR:
5299 shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT | KC_ALT | KC_CTRL));
5300 break;
5301
5302 case WM_MENUEND:
5303 if ((HWND) mp2 == MainPopupMenu) {
5304 WinDestroyWindow(MainPopupMenu);
5305 MainPopupMenu = (HWND) 0;
5306 }
5307 break;
5308
5309 case UM_CONTEXTMENU:
5310 case WM_CONTEXTMENU:
5311 if (CheckMenu(&MainPopupMenu, MAIN_POPUP)) {
5312 SetToggleChecks(MainPopupMenu);
5313 PopupMenu(hwnd, hwnd, MainPopupMenu);
5314 }
5315 if (msg == UM_CONTEXTMENU)
5316 return 0;
5317 return MRFROMSHORT(TRUE);
5318
5319 case UM_SETUSERLISTNAME:
5320 if (mp1) {
5321 if (fUserComboBox)
5322 WinSetWindowText(WinWindowFromID(hwndUserlist, CBID_EDIT),
5323 (CHAR *) mp1);
5324 if (add_udir(FALSE, (CHAR *) mp1)) {
5325 if (fUserComboBox && fAutoAddDirs) {
5326 WinSendMsg(hwndUserlist, LM_INSERTITEM,
5327 MPFROM2SHORT(LIT_SORTASCENDING, 0),
5328 MPFROMP((CHAR *) mp1));
5329 }
5330 }
5331 }
5332 return 0;
5333
5334 case UM_ARRANGEICONS:
5335 ArrangeIcons(hwnd);
5336 return 0;
5337
5338 case WM_CHORD:
5339 PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_WINDOWDLG, 0), MPVOID);
5340 break;
5341
5342 case WM_SETFOCUS:
5343 if (mp2)
5344 PostMsg(hwnd, UM_FOCUSME, MPVOID, MPVOID);
5345 break;
5346
5347 case UM_FOCUSME:
5348 WinSetFocus(hwndTree, TRUE);
5349 return 0;
5350
5351 case UM_RESCAN:
5352 TileChildren(hwnd, TRUE);
5353 return 0;
5354
5355 case WM_SAVEAPPLICATION:
5356 {
5357 SWP swp;
5358
5359 WinQueryWindowPos(WinQueryWindow(hwnd, QW_PARENT), &swp);
5360 if (!(swp.fl & (SWP_HIDE | SWP_MINIMIZE))) {
5361 WinStoreWindowPos(FM2Str,
5362 "MainWindowPos", WinQueryWindow(hwnd, QW_PARENT));
5363 if (!fNoSaveState && fSaveState)
5364 SaveDirCnrState(hwnd, NULL);
5365 }
5366 }
5367 break;
5368
5369 case MM_PORTHOLEINIT:
5370 switch (SHORT1FROMMP(mp1)) {
5371 case 0:
5372 case 1:
5373 {
5374 HWND hwndCurrent;
5375 ULONG wmsg;
5376
5377 wmsg = (SHORT1FROMMP(mp1) == 0) ? UM_FILESMENU : UM_VIEWSMENU;
5378 hwndCurrent = TopWindow(hwnd, (HWND) 0);
5379 PortholeInit((HWND) WinSendMsg(WinWindowFromID(hwndCurrent,
5380 FID_CLIENT), wmsg,
5381 MPVOID, MPVOID), mp1, mp2);
5382 }
5383 break;
5384 }
5385 break;
5386
5387 case WM_INITMENU:
5388 switch (SHORT1FROMMP(mp1)) {
5389 case IDM_CONFIGMENU:
5390 SetToggleChecks((HWND) WinQueryWindowULong(hwnd, QWL_USER));
5391 break;
5392
5393 case IDM_WINDOWSMENU:
5394 /*
5395 * add child windows of client
5396 * and switchlist entries to end of pulldown menu
5397 */
5398 {
5399 HWND hwndMenu, hwndSubMenu;
5400 MENUITEM mi;
5401
5402 hwndMenu = WinQueryWindowULong(hwnd, QWL_USER);
5403 memset(&mi, 0, sizeof(mi));
5404 mi.iPosition = MIT_END;
5405 mi.afStyle = MIS_TEXT;
5406 if (!WinSendMsg(hwndMenu, MM_QUERYITEM,
5407 MPFROM2SHORT(IDM_WINDOWSMENU, TRUE), MPFROMP(&mi)))
5408 break;
5409 hwndSubMenu = mi.hwndSubMenu;
5410 SetupWinList(hwndSubMenu, hwnd, WinQueryWindow(hwnd, QW_PARENT));
5411 }
5412 break;
5413
5414 default:
5415 {
5416 HWND hwndCurrent;
5417
5418 hwndCurrent = TopWindow(hwnd, (HWND) 0);
5419 if (hwndCurrent)
5420 WinSendMsg(hwndCurrent, UM_INITMENU, mp1, mp2);
5421 }
5422 break;
5423 }
5424 break;
5425
5426 case UM_ADDTOMENU:
5427 AddToMenu((CHAR *) mp1, WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
5428 FID_MENU));
5429 return 0;
5430
5431 case UM_FILLCMDLIST:
5432 WinSendMsg(hwndCmdlist, LM_DELETEALL, MPVOID, MPVOID);
5433 if (!cmdloaded)
5434 load_commands();
5435 if (cmdhead) {
5436
5437 LINKCMDS *info;
5438
5439 info = cmdhead;
5440 while (info) {
5441 WinSendMsg(hwndCmdlist, LM_INSERTITEM,
5442 MPFROM2SHORT(LIT_END, 0), MPFROMP(info->title));
5443 info = info->next;
5444 }
5445 }
5446 return 0;
5447
5448 case UM_FILLSETUPLIST:
5449 WinSendMsg(hwndStatelist, LM_DELETEALL, MPVOID, MPVOID);
5450 if (fUserComboBox) {
5451 INT x;
5452
5453 if (!loadedsetups)
5454 load_setups();
5455 for (x = 0; x < MAXNUMSETUPS; x++) {
5456 if (*lastsetups[x])
5457 WinSendMsg(hwndStatelist, LM_INSERTITEM,
5458 MPFROM2SHORT(LIT_SORTASCENDING, 0),
5459 MPFROMP(lastsetups[x]));
5460 }
5461 WinSetWindowText(hwndStatelist, GetPString(IDS_STATETEXT));
5462 }
5463 return 0;
5464
5465 case UM_FILLBUTTONLIST:
5466 WinSendMsg(hwndButtonlist, LM_DELETEALL, MPVOID, MPVOID);
5467 if (fUserComboBox) {
5468
5469 BOOL foundit = FALSE, thisone;
5470 ULONG ulSearchCount;
5471 SHORT sSelect;
5472 FILEFINDBUF3 findbuf;
5473 HDIR hDir;
5474 CHAR *p;
5475
5476 DosError(FERR_DISABLEHARDERR);
5477 hDir = HDIR_CREATE;
5478 ulSearchCount = 1L;
5479 if (!DosFindFirst("*.TLS", &hDir, FILE_READONLY | FILE_ARCHIVED,
5480 &findbuf, sizeof(FILEFINDBUF3),
5481 &ulSearchCount, FIL_STANDARD)) {
5482 do {
5483 priority_bumped();
5484 if (!foundit) {
5485 thisone = FALSE;
5486 p = strrchr(lasttoolbox, '\\');
5487 if (!p)
5488 p = lasttoolbox;
5489 else
5490 p++;
5491 if (!stricmp(findbuf.achName, p))
5492 thisone = TRUE;
5493 }
5494 p = strrchr(findbuf.achName, '.');
5495 if (p)
5496 *p = 0;
5497 sSelect = (SHORT) WinSendMsg(hwndButtonlist, LM_INSERTITEM,
5498 MPFROM2SHORT(LIT_SORTASCENDING, 0),
5499 MPFROMP(findbuf.achName));
5500 if (!foundit && thisone && sSelect >= 0) {
5501 WinSendMsg(hwndButtonlist, LM_SELECTITEM,
5502 MPFROM2SHORT(sSelect, 0), MPFROMLONG(TRUE));
5503 foundit = TRUE;
5504 }
5505 }
5506 while (!DosFindNext(hDir, &findbuf, sizeof(FILEFINDBUF3),
5507 &ulSearchCount));
5508 DosFindClose(hDir);
5509 priority_bumped();
5510 }
5511 WinSetWindowText(hwndButtonlist, GetPString(IDS_TOOLBOXTEXT));
5512 }
5513 return 0;
5514
5515 case UM_FILLUSERLIST:
5516 WinSendMsg(hwndUserlist, LM_DELETEALL, MPVOID, MPVOID);
5517 if (fUserComboBox) {
5518 ULONG ulDriveNum;
5519 ULONG ulDriveMap;
5520 ULONG ulSearchCount;
5521 FILEFINDBUF3 findbuf;
5522 HDIR hDir;
5523 APIRET rc;
5524 LINKDIRS *info;
5525 LINKDIRS *temp;
5526
5527 if (!loadedudirs)
5528 load_udirs();
5529 DosError(FERR_DISABLEHARDERR);
5530 DosQCurDisk(&ulDriveNum, &ulDriveMap);
5531 info = udirhead;
5532 while (info) {
5533 if (IsFullName(info->path) &&
5534 !(driveflags[toupper(*info->path) - 'A'] &
5535 (DRIVE_IGNORE | DRIVE_INVALID))) {
5536 DosError(FERR_DISABLEHARDERR);
5537 hDir = HDIR_CREATE;
5538 ulSearchCount = 1L;
5539 if (!IsRoot(info->path))
5540 rc = DosFindFirst(info->path, &hDir, FILE_DIRECTORY |
5541 MUST_HAVE_DIRECTORY | FILE_READONLY |
5542 FILE_ARCHIVED | FILE_SYSTEM | FILE_HIDDEN,
5543 &findbuf, sizeof(FILEFINDBUF3),
5544 &ulSearchCount, FIL_STANDARD);
5545 else {
5546 rc = 0;
5547 findbuf.attrFile = FILE_DIRECTORY;
5548 }
5549 priority_bumped();
5550 if (!rc) {
5551 if (!IsRoot(info->path))
5552 DosFindClose(hDir);
5553 if (findbuf.attrFile & FILE_DIRECTORY)
5554 WinSendMsg(hwndUserlist, LM_INSERTITEM,
5555 MPFROM2SHORT(LIT_SORTASCENDING, 0),
5556 MPFROMP(info->path));
5557 else {
5558 temp = info->next;
5559 remove_udir(info->path);
5560 info = temp;
5561 continue;
5562 }
5563 }
5564 else if (!(ulDriveMap & (1L << (toupper(*info->path) - 'A')))) {
5565 temp = info->next;
5566 remove_udir(info->path);
5567 info = temp;
5568 continue;
5569 }
5570 }
5571 info = info->next;
5572 }
5573 info = ldirhead;
5574 while (info) {
5575 if (IsFullName(info->path) &&
5576 !(driveflags[toupper(*info->path) - 'A'] &
5577 (DRIVE_IGNORE | DRIVE_INVALID))) {
5578 DosError(FERR_DISABLEHARDERR);
5579 hDir = HDIR_CREATE;
5580 ulSearchCount = 1L;
5581 if (!IsRoot(info->path))
5582 rc = DosFindFirst(info->path, &hDir, FILE_DIRECTORY |
5583 MUST_HAVE_DIRECTORY | FILE_READONLY |
5584 FILE_ARCHIVED | FILE_SYSTEM | FILE_HIDDEN,
5585 &findbuf, sizeof(FILEFINDBUF3),
5586 &ulSearchCount, FIL_STANDARD);
5587 else {
5588 rc = 0;
5589 findbuf.attrFile = FILE_DIRECTORY;
5590 }
5591 priority_bumped();
5592 if (!rc) {
5593 if (!IsRoot(info->path))
5594 DosFindClose(hDir);
5595 if (findbuf.attrFile & FILE_DIRECTORY)
5596 WinSendMsg(hwndUserlist, LM_INSERTITEM,
5597 MPFROM2SHORT(LIT_SORTASCENDING, 0),
5598 MPFROMP(info->path));
5599 else {
5600 temp = info->next;
5601 remove_udir(info->path);
5602 info = temp;
5603 continue;
5604 }
5605 }
5606 else if (!(ulDriveMap & (1L << (toupper(*info->path) - 'A')))) {
5607 temp = info->next;
5608 remove_udir(info->path);
5609 info = temp;
5610 continue;
5611 }
5612 }
5613 info = info->next;
5614 }
5615 WinSendMsg(hwndUserlist, LM_INSERTITEM,
5616 MPFROM2SHORT(0, 0),
5617 MPFROMP(GetPString(IDS_NEWDIRECTORYTEXT)));
5618 WinSetWindowText(hwndUserlist, GetPString(IDS_COMMONDIRTEXT));
5619 }
5620 return 0;
5621
5622 case UM_SIZE:
5623 if (fAutoTile)
5624 TileChildren(hwnd, FALSE);
5625 else
5626 MoveChildrenAwayFromTree(hwnd);
5627 return 0;
5628
5629 case WM_SIZE:
5630 ResizeChildren(hwnd, SHORT1FROMMP(mp1), SHORT2FROMMP(mp1),
5631 SHORT1FROMMP(mp2), SHORT2FROMMP(mp2));
5632 break;
5633
5634 case WM_ERASEBACKGROUND:
5635 WinFillRect((HPS) mp1, (PRECTL) mp2, 0x00d0d0d0);
5636 return 0;
5637
5638 case WM_PAINT:
5639 {
5640 HPS hps;
5641 RECTL rcl;
5642
5643 hps = WinBeginPaint(hwnd, (HPS) 0, NULL);
5644 if (hps) {
5645 WinQueryWindowRect(hwnd, &rcl);
5646 WinFillRect(hps, &rcl, CLR_PALEGRAY);
5647 WinEndPaint(hps);
5648 }
5649 }
5650 break;
5651
5652 case UM_CONTROL:
5653 switch (SHORT1FROMMP(mp1)) {
5654 case MAIN_CMDLIST:
5655 case MAIN_SETUPLIST:
5656 case MAIN_DRIVELIST:
5657 case MAIN_USERLIST:
5658 case MAIN_BUTTONLIST:
5659 switch (SHORT2FROMMP(mp1)) {
5660 case CBN_ENTER:
5661 {
5662 HWND hwndUL = WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
5663 SHORT1FROMMP(mp1));
5664 CHAR path[CCHMAXPATH];
5665
5666 SetShiftState();
5667 WinQueryWindowText(WinWindowFromID(hwndUL, CBID_EDIT),
5668 ((SHORT1FROMMP(mp1) == MAIN_USERLIST) ?
5669 CCHMAXPATH : 13), path);
5670 bstrip(path);
5671 if (*path) {
5672 if (SHORT1FROMMP(mp1) == MAIN_USERLIST) {
5673 if (!strcmp(path, GetPString(IDS_NEWDIRECTORYTEXT))) {
5674 if (!LastDir ||
5675 !WinSendMsg(WinQueryWindow(LastDir, QW_PARENT),
5676 UM_CONTAINERDIR, MPFROMP(path), MPVOID))
5677 save_dir2(path);
5678 if (!PMMkDir(hwnd, path, TRUE)) {
5679 WinSetWindowText(hwndUL, GetPString(IDS_COMMONDIRTEXT));
5680 break;
5681 }
5682 }
5683 if (!IsFile(path) && !FindDirCnrByName(path, TRUE)) {
5684
5685 HWND hwndDir;
5686
5687 if ((fUserListSwitches &&
5688 !(shiftstate & KC_SHIFT)) ||
5689 (!fUserListSwitches && (shiftstate & KC_SHIFT))) {
5690 hwndDir = FindDirCnr(hwnd);
5691 if (hwndDir) {
5692 WinSendMsg(LastDir, UM_SETDIR, MPFROMP(path), MPVOID);
5693 break;
5694 }
5695 }
5696 OpenDirCnr((HWND) 0, hwndMain, hwndTree, FALSE, path);
5697 }
5698 }
5699 else if (SHORT1FROMMP(mp1) == MAIN_DRIVELIST) {
5700 ShowTreeRec(WinWindowFromID(WinWindowFromID(hwndTree,
5701 FID_CLIENT),
5702 TREE_CNR), path, FALSE, TRUE);
5703 WinSetFocus(HWND_DESKTOP, hwndTree);
5704 }
5705 else if (SHORT1FROMMP(mp1) == MAIN_BUTTONLIST) {
5706 strcat(path, ".TLS");
5707 load_tools(path);
5708 PrfWriteProfileString(fmprof,
5709 FM3Str, "LastToolBox", lasttoolbox);
5710 BuildTools(hwndToolback, TRUE);
5711 WinSetWindowText(hwndButtonlist, GetPString(IDS_TOOLBOXTEXT));
5712 }
5713 else if (SHORT1FROMMP(mp1) == MAIN_SETUPLIST) {
5714
5715 CHAR s[80];
5716 ULONG size, numsaves = 0;
5717
5718 SetShiftState();
5719 size = sizeof(ULONG);
5720 sprintf(s, "%s.NumDirsLastTime", path); // path is state name
5721 if (!PrfQueryProfileData
5722 (fmprof, FM3Str, s, (PVOID) & numsaves, &size))
5723 {
5724 if ((WinGetLastError(WinQueryAnchorBlock(hwnd)) & 0xffff) == PMERR_NOT_IN_IDX) {
5725 saymsg(MB_ENTER | MB_ICONASTERISK, hwnd,
5726 GetPString(IDS_WARNINGTEXT),
5727 GetPString(IDS_DOESNTEXISTTEXT), path);
5728 }
5729 else {
5730 Win_Error2(hwnd, hwnd, __FILE__, __LINE__,
5731 IDS_PRFQUERYPROFILEDATA);
5732 }
5733 }
5734 else if (!numsaves)
5735 Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT);
5736 else {
5737 if ((shiftstate & KC_SHIFT) == 0)
5738 PostMsg(MainObjectHwnd, UM_RESTORE, MPVOID, MPFROMLONG(2L));
5739 {
5740 char *temp;
5741
5742 temp = xstrdup(path, pszSrcFile, __LINE__);
5743 if (!temp) {
5744 if ((shiftstate & KC_SHIFT) != 0 || fAutoTile)
5745 PostMsg(MainObjectHwnd, UM_RESTORE, MPVOID,
5746 MPFROMLONG(1L));
5747 }
5748 else {
5749 if (!PostMsg
5750 (MainObjectHwnd, UM_RESTORE, MPFROMP(temp), MPVOID))
5751 free(temp);
5752 }
5753 }
5754 }
5755 // fixme to hold restored state name for a while
5756 // WinSetWindowText(hwndStatelist, GetPString(IDS_STATETEXT)); // 15 Apr 07 SHL
5757 }
5758 else if (SHORT1FROMMP(mp1) == MAIN_CMDLIST) {
5759
5760 SHORT sSelect;
5761
5762 sSelect = (SHORT) WinSendMsg(hwndCmdlist,
5763 LM_QUERYSELECTION,
5764 MPFROMSHORT(LIT_FIRST), MPVOID);
5765 if (sSelect >= 0)
5766 WinPostMsg(hwnd,
5767 WM_COMMAND,
5768 MPFROM2SHORT(IDM_COMMANDSTART + sSelect, 0),
5769 MPVOID);
5770 WinSetWindowText(hwndCmdlist, GetPString(IDS_COMMANDSTEXT));
5771 }
5772 }
5773 }
5774 break;
5775
5776 default:
5777 break;
5778 }
5779 break;
5780
5781 default:
5782 break;
5783 }
5784 return 0;
5785
5786 case WM_HELP:
5787 WinSendMsg(hwndHelp, HM_HELP_CONTENTS, MPVOID, MPVOID);
5788 break;
5789
5790 case UM_COMMAND:
5791 case WM_COMMAND:
5792
5793 return MainWMCommand(hwnd, msg, mp1, mp2);
5794
5795 case WM_CLOSE:
5796 WinSendMsg(WinQueryWindow(hwnd, QW_PARENT),
5797 WM_SYSCOMMAND, MPFROM2SHORT(SC_RESTORE, 0), MPVOID);
5798 WinSendMsg(hwnd, WM_SAVEAPPLICATION, MPVOID, MPVOID);
5799 fAmClosing = TRUE;
5800 WinSendMsg(WinQueryWindow(hwnd, QW_PARENT),
5801 WM_SYSCOMMAND, MPFROM2SHORT(SC_MINIMIZE, 0), MPVOID);
5802 if (CloseChildren(hwnd)) {
5803 fAmClosing = FALSE;
5804 if (fAutoTile)
5805 PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_TILE, 0), MPVOID);
5806 return 0;
5807 }
5808 if (hwndTree) {
5809 if (!PostMsg(hwndTree, WM_CLOSE, MPVOID, MPVOID))
5810 WinSendMsg(hwndTree, WM_CLOSE, MPVOID, MPVOID);
5811 }
5812 DosSleep(1L);
5813 return 0; // Hold off WM_QUIT
5814
5815 case UM_CLOSE:
5816 HideNote();
5817 WinDestroyWindow(WinQueryWindow(hwnd, QW_PARENT));
5818 return 0;
5819
5820 case UM_RESTORE:
5821 {
5822 char *temp;
5823
5824 temp = xstrdup(GetPString(IDS_FM2TEMPTEXT), pszSrcFile, __LINE__);
5825 if (temp) {
5826 if (!PostMsg(MainObjectHwnd, UM_RESTORE, MPFROMP(temp), MPVOID))
5827 free(temp);
5828 }
5829 }
5830 return 0;
5831
5832 case UM_SETDIR:
5833 /* mp1 == name of directory to open */
5834 if (mp1)
5835 return MRFROMLONG(OpenDirCnr((HWND) 0,
5836 hwndMain,
5837 hwndTree, (BOOL) mp2, (char *)mp1));
5838 return 0;
5839
5840 case WM_DESTROY:
5841 hwndMain = (HWND) 0;
5842 if (!PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID))
5843 WinSendMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID);
5844 break;
5845 }
5846
5847 return WinDefWindowProc(hwnd, msg, mp1, mp2);
5848}
Note: See TracBrowser for help on using the repository browser.