source: trunk/dll/mainwnd.c@ 131

Last change on this file since 131 was 130, checked in by root, 21 years ago

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