Context Navigation

source: trunk/dll/dircnrs.c@ 284

Visit:

Last change on this file since 284 was 275, checked in by root, 20 years ago
Comments
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 132.4 KB

Line
1
2	/***********************************************************************
3
4	$Id: dircnrs.c 275 2005-12-08 07:36:17Z root $
5
6	Directory containers
7
8	Copyright (c) 1993-98 M. Kimes
9	Copyright (c) 2001, 2005 Steven H. Levine
10
11	16 Oct 02 SHL Handle large partitions
12	01 Aug 04 SHL Rework lstrip/rstrip usage
13	23 May 05 SHL Use QWL_USER
14	24 May 05 SHL Rework Win_Error usage
15	25 May 05 SHL Use ULONGLONG and CommaFmtULL
16	26 May 05 SHL More large file formatting updates
17	05 Jun 05 SHL Use QWL_USER
18	10 Nov 05 SHL Comments
19
20	***********************************************************************/
21
22	#define INCL_DOS
23	#define INCL_WIN
24	#define INCL_GPI
25	#define INCL_DOSERRORS
26	#define INCL_LONGLONG
27
28	#include <os2.h>
29	#include <stdarg.h>
30	#include <stdio.h>
31	#include <stdlib.h>
32	#include <string.h>
33	#include <ctype.h>
34	#include <limits.h>
35	#include "fm3dll.h"
36	#include "fm3dlg.h"
37	#include "fm3str.h"
38	#include "mle.h"
39
40	#pragma data_seg(DATA1)
41	#pragma alloc_text(DIRCNRS,DirCnrWndProc,DirObjWndProc,DirClientWndProc)
42	#pragma alloc_text(DIRCNRS,DirTextProc,DirFrameWndProc)
43	#pragma alloc_text(STARTUP,StartDirCnr)
44
45
46	MRESULT EXPENTRY DirFrameWndProc (HWND hwnd,ULONG msg,MPARAM mp1,MPARAM mp2)
47	{
48	return CommonFrameWndProc(DIR_CNR,hwnd,msg,mp1,mp2);
49	}
50
51
52	MRESULT EXPENTRY DirTextProc (HWND hwnd,ULONG msg,MPARAM mp1,MPARAM mp2)
53	{
54	static BOOL emphasized = FALSE;
55	static HWND hwndButtonPopup = (HWND)0;
56	static USHORT lastid = 0;
57	static ULONG timestamp = ULONG_MAX;
58
59	switch(msg) {
60	case WM_CREATE:
61	return CommonTextProc(hwnd,msg,mp1,mp2);
62
63	case WM_COMMAND:
64	{
65	DIRCNRDATA *dcd;
66	MRESULT mr;
67
68	mr = WinSendMsg(WinWindowFromID(WinQueryWindow(hwnd,
69	QW_PARENT),
70	DIR_CNR),
71	msg,
72	mp1,
73	mp2);
74	if(hwndButtonPopup &&
75	SHORT1FROMMP(mp1) > IDM_DETAILSTITLES &&
76	SHORT1FROMMP(mp1) < IDM_DETAILSSETUP) {
77	dcd = WinQueryWindowPtr(WinWindowFromID(WinQueryWindow(hwnd,
78	QW_PARENT),
79	DIR_CNR),
80	QWL_USER);
81	if(dcd)
82	SetDetailsSwitches(hwndButtonPopup,
83	dcd);
84	}
85	return mr;
86	}
87
88	case UM_CONTEXTMENU:
89	case WM_CONTEXTMENU:
90	{
91	USHORT id;
92
93	id = WinQueryWindowUShort(hwnd,QWS_ID);
94	switch(id) {
95	case DIR_FOLDERICON:
96	if(fNoFoldMenu) {
97	PostMsg(WinWindowFromID(WinQueryWindow(hwnd,QW_PARENT),
98	DIR_CNR),
99	WM_COMMAND,
100	MPFROM2SHORT(IDM_PREVIOUS,0),
101	mp2);
102	break;
103	}
104	/* else intentional fallthru */
105	case DIR_SELECTED:
106	case DIR_VIEW:
107	case DIR_SORT:
108	{
109	POINTL ptl = {0,0};
110	SWP swp;
111	DIRCNRDATA *dcd;
112
113	if(hwndButtonPopup)
114	WinDestroyWindow(hwndButtonPopup);
115	if(id == DIR_SELECTED && msg == WM_CONTEXTMENU)
116	id = DIR_MAX;
117	if(id == lastid) {
118
119	ULONG check;
120
121	DosQuerySysInfo(QSV_MS_COUNT,
122	QSV_MS_COUNT,
123	&check,
124	sizeof(check));
125	if(check < timestamp + 500) {
126	lastid = 0;
127	goto MenuAbort;
128	}
129	}
130	hwndButtonPopup = WinLoadMenu(HWND_DESKTOP,
131	FM3ModHandle,
132	id);
133	if(hwndButtonPopup) {
134	WinSetWindowUShort(hwndButtonPopup,
135	QWS_ID,
136	id);
137	dcd = WinQueryWindowPtr(WinWindowFromID(WinQueryWindow(hwnd,
138	QW_PARENT),
139	DIR_CNR),
140	QWL_USER);
141	if(id == DIR_SORT) { /* don't have sort pathname in dirs */
142	WinSendMsg(hwndButtonPopup,
143	MM_DELETEITEM,
144	MPFROM2SHORT(IDM_SORTNAME,
145	FALSE),
146	MPVOID);
147	WinSendMsg(hwndButtonPopup,
148	MM_DELETEITEM,
149	MPFROM2SHORT(IDM_SORTNONE,
150	FALSE),
151	MPVOID);
152	if(dcd)
153	SetSortChecks(hwndButtonPopup,
154	dcd->sortFlags);
155	}
156	else if(id == DIR_VIEW) {
157	if(dcd) {
158	SetViewMenu(hwndButtonPopup,
159	dcd->flWindowAttr);
160	SetDetailsSwitches(hwndButtonPopup,
161	dcd);
162	}
163	}
164	else if(id == DIR_MAX) {
165
166	int x;
167	BOOL enable;
168	USHORT ids[] = {IDM_SELECTBOTH,
169	IDM_SELECTMORE,
170	IDM_SELECTONE,
171	IDM_SELECTNEWER,
172	IDM_SELECTOLDER,
173	IDM_SELECTBIGGER,
174	IDM_SELECTSMALLER,
175	IDM_DESELECTBOTH,
176	IDM_DESELECTMORE,
177	IDM_DESELECTONE,
178	IDM_DESELECTNEWER,
179	IDM_DESELECTOLDER,
180	IDM_DESELECTBIGGER,
181	IDM_DESELECTSMALLER,
182	0};
183
184	enable = (CountDirCnrs(dcd->hwndParent) > 1);
185	for(x = 0;ids[x];x++)
186	WinEnableMenuItem(hwndButtonPopup,
187	ids[x],
188	enable);
189	}
190	else if(id == DIR_SELECTED) {
191	if(dcd)
192	WinEnableMenuItem(hwndButtonPopup,
193	IDM_RESELECT,
194	(dcd->lastselection != NULL));
195	}
196	ptl.x = 0;
197	if(WinPopupMenu(HWND_OBJECT,
198	HWND_OBJECT,
199	hwndButtonPopup,
200	-32767,
201	-32767,
202	0,
203	0)) {
204	WinQueryWindowPos(hwndButtonPopup,
205	&swp);
206	ptl.y = -(swp.cy + 2);
207	}
208	else {
209	WinQueryWindowPos(hwnd,
210	&swp);
211	ptl.y = swp.cy + 2;
212	}
213	if(WinPopupMenu(hwnd,
214	hwnd,
215	hwndButtonPopup,
216	ptl.x,
217	ptl.y,
218	0,
219	PU_HCONSTRAIN \| PU_VCONSTRAIN \|
220	PU_KEYBOARD \| PU_MOUSEBUTTON1)) {
221	CenterOverWindow(hwndButtonPopup);
222	PaintRecessedWindow(hwnd,
223	(HPS)0,
224	FALSE,
225	FALSE);
226	}
227	}
228	}
229	break;
230	default:
231	PostMsg(WinWindowFromID(WinQueryWindow(hwnd,QW_PARENT),DIR_CNR),
232	WM_CONTROL,
233	MPFROM2SHORT(DIR_CNR,CN_CONTEXTMENU),
234	MPVOID);
235	break;
236	}
237	} // case WM_CONTENT_MENU
238
239	MenuAbort:
240
241	if(msg == UM_CONTEXTMENU)
242	return 0;
243	break;
244
245	case WM_MENUEND:
246	if(hwndButtonPopup == (HWND)mp2) {
247	lastid = WinQueryWindowUShort((HWND)mp2,QWS_ID);
248	WinDestroyWindow(hwndButtonPopup);
249	hwndButtonPopup = (HWND)0;
250	DosQuerySysInfo(QSV_MS_COUNT,
251	QSV_MS_COUNT,
252	&timestamp,
253	sizeof(timestamp));
254	switch(lastid) {
255	case DIR_VIEW:
256	case DIR_SORT:
257	case DIR_FOLDERICON:
258	case DIR_SELECTED:
259	case DIR_MAX:
260	PaintRecessedWindow(hwnd,(HPS)0,TRUE,FALSE);
261	break;
262	}
263	}
264	break;
265
266	case WM_BUTTON3DOWN:
267	case WM_BUTTON1DOWN:
268	case WM_BUTTON3UP:
269	case WM_BUTTON1UP:
270	{
271	USHORT id;
272
273	id = WinQueryWindowUShort(hwnd,QWS_ID);
274	switch(id) {
275	case DIR_FILTER:
276	case DIR_VIEW:
277	case DIR_SORT:
278	case DIR_SELECTED:
279	case DIR_FOLDERICON:
280	case DIR_MAX:
281	return CommonTextButton(hwnd,msg,mp1,mp2);
282	}
283	}
284	break;
285
286	case WM_BUTTON1DBLCLK:
287	{
288	NOTIFYRECORDENTER nr;
289
290	memset(&nr,0,sizeof(NOTIFYRECORDENTER));
291	nr.hwndCnr = WinWindowFromID(WinQueryWindow(hwnd,QW_PARENT),DIR_CNR);
292	WinSendMsg(WinQueryWindow(hwnd,QW_PARENT),
293	WM_CONTROL,
294	MPFROM2SHORT(DIR_CNR,CN_ENTER),
295	MPFROMP(&nr));
296	}
297	break;
298
299	case WM_MOUSEMOVE:
300	{
301	USHORT id = WinQueryWindowUShort(hwnd,QWS_ID);
302	char *s = NULL;
303
304	if(fOtherHelp) {
305	if((!hwndBubble \|\|
306	WinQueryWindowULong(hwndBubble,QWL_USER) != hwnd) &&
307	!WinQueryCapture(HWND_DESKTOP)) {
308	switch(id) {
309	case DIR_TOTALS:
310	s = GetPString(IDS_DIRCNRTOTALHELP);
311	break;
312	case DIR_SELECTED:
313	s = GetPString(IDS_DIRCNRSELECTEDHELP);
314	break;
315	case DIR_VIEW:
316	s = GetPString(IDS_DIRCNRVIEWHELP);
317	break;
318	case DIR_SORT:
319	s = GetPString(IDS_DIRCNRSORTHELP);
320	break;
321	case DIR_FILTER:
322	s = GetPString(IDS_DIRCNRFILTERHELP);
323	break;
324	case DIR_MAX:
325	s = GetPString(IDS_DIRCNRMAXHELP);
326	break;
327	case DIR_FOLDERICON:
328	s = GetPString(IDS_DIRCNRFOLDERHELP);
329	break;
330	default:
331	break;
332	}
333	if(s)
334	MakeBubble(hwnd,TRUE,s);
335	else if(hwndBubble)
336	WinDestroyWindow(hwndBubble);
337	}
338	}
339	switch(id) {
340	case DIR_MAX:
341	case DIR_FOLDERICON:
342	case DIR_FILTER:
343	case DIR_SORT:
344	case DIR_VIEW:
345	case DIR_SELECTED:
346	return CommonTextButton(hwnd,msg,mp1,mp2);
347	}
348	}
349	break;
350
351	case WM_CHORD:
352	case WM_BUTTON3CLICK:
353	case WM_BUTTON1CLICK:
354	case UM_CLICKED:
355	case UM_CLICKED3:
356	{
357	USHORT id,cmd = 0;
358
359	id = WinQueryWindowUShort(hwnd,QWS_ID);
360	if(msg == UM_CLICKED \|\| msg == UM_CLICKED3) {
361	switch(id) {
362	case DIR_MAX:
363	cmd = IDM_MAXIMIZE;
364	break;
365	case DIR_VIEW:
366	case DIR_SELECTED:
367	case DIR_SORT:
368	PostMsg(hwnd,
369	UM_CONTEXTMENU,
370	MPVOID,
371	MPVOID);
372	break;
373	case DIR_FILTER:
374	cmd = IDM_FILTER;
375	break;
376	default:
377	break;
378	}
379	}
380	else if(id == DIR_FOLDERICON) {
381	if((msg == WM_BUTTON1CLICK && (SHORT2FROMMP(mp2) & KC_CTRL)))
382	cmd = IDM_PREVIOUS;
383	else if(msg == WM_BUTTON3CLICK \|\| msg == WM_CHORD)
384	cmd = IDM_RESCAN;
385	else if(msg == WM_BUTTON1CLICK && (SHORT2FROMMP(mp2) & KC_SHIFT))
386	cmd = IDM_WALKDIR;
387	else if(msg == WM_BUTTON1CLICK && (SHORT2FROMMP(mp2) & KC_ALT))
388	cmd = IDM_WINDOWDLG;
389	else
390	cmd = IDM_PARENT;
391	}
392	if(cmd)
393	PostMsg(WinWindowFromID(WinQueryWindow(hwnd,QW_PARENT),
394	DIR_CNR),
395	WM_COMMAND,
396	MPFROM2SHORT(cmd,0),
397	MPVOID);
398	}
399	if(msg == UM_CLICKED \|\| msg == UM_CLICKED3)
400	return 0;
401	break;
402
403	case DM_DROP:
404	case DM_DRAGOVER:
405	case DM_DRAGLEAVE:
406	case DM_DROPHELP:
407	case WM_BEGINDRAG:
408	if(msg == DM_DRAGOVER) {
409	if(!emphasized) {
410	emphasized = TRUE;
411	DrawTargetEmphasis(hwnd,emphasized);
412	}
413	}
414	else if(msg != WM_BEGINDRAG){
415	if(emphasized) {
416	emphasized = FALSE;
417	DrawTargetEmphasis(hwnd,emphasized);
418	}
419	}
420	switch(WinQueryWindowUShort(hwnd,QWS_ID)) {
421	case DIR_FOLDERICON:
422	switch(msg) {
423	case DM_DRAGOVER:
424	if(AcceptOneDrop(mp1,mp2))
425	return MRFROM2SHORT(DOR_DROP,
426	DO_MOVE);
427	return(MRFROM2SHORT(DOR_NODROP,0)); /* Drop not valid */
428	case DM_DROPHELP:
429	DropHelp(mp1,mp2,hwnd,
430	GetPString(IDS_DIRCNRFOLDERDROPHELP));
431	return 0;
432	case DM_DROP:
433	{
434	char szFrom[CCHMAXPATH + 2];
435
436	if(emphasized) {
437	emphasized = FALSE;
438	DrawTargetEmphasis(hwnd,emphasized);
439	}
440	if(GetOneDrop(mp1,mp2,szFrom,sizeof(szFrom)))
441	WinSendMsg(WinWindowFromID(WinQueryWindow(hwnd,QW_PARENT),
442	DIR_CNR),
443	WM_COMMAND,MPFROM2SHORT(IDM_SWITCH,0),
444	MPFROMP(szFrom));
445	}
446	return 0;
447	default:
448	return PFNWPStatic(hwnd,msg,mp1,mp2);
449	}
450	case DIR_MAX:
451	if(msg == WM_BEGINDRAG)
452	return PFNWPStatic(hwnd,msg,mp1,mp2);
453	default:
454	{
455	CNRDRAGINFO cnd;
456	USHORT dcmd;
457
458	switch(msg) {
459	case DM_DROP:
460	dcmd = CN_DROP;
461	break;
462	case DM_DRAGOVER:
463	dcmd = CN_DRAGOVER;
464	break;
465	case DM_DRAGLEAVE:
466	dcmd = CN_DRAGLEAVE;
467	break;
468	case DM_DROPHELP:
469	dcmd = CN_DROPHELP;
470	break;
471	case WM_BEGINDRAG:
472	dcmd = CN_INITDRAG;
473	break;
474	}
475	memset(&cnd,0,sizeof(cnd));
476	cnd.pDragInfo = (PDRAGINFO)mp1;
477	cnd.pRecord = NULL;
478	return WinSendMsg(WinQueryWindow(hwnd,QW_PARENT),
479	WM_CONTROL,
480	MPFROM2SHORT(DIR_CNR,dcmd),
481	MPFROMP(&cnd));
482	}
483	}
484	}
485	return PFNWPStatic(hwnd,msg,mp1,mp2);
486	}
487
488
489	MRESULT EXPENTRY DirClientWndProc (HWND hwnd,ULONG msg,MPARAM mp1,MPARAM mp2)
490	{
491	switch(msg) {
492	case UM_CONTAINERDIR:
493	if(mp1) {
494
495	DIRCNRDATA *dcd;
496
497	(CHAR )mp1 = 0;
498	dcd = WinQueryWindowPtr(WinWindowFromID(hwnd,DIR_CNR),QWL_USER);
499	if(dcd)
500	strcpy((CHAR *)mp1,dcd->directory);
501	return MRFROMLONG(TRUE);
502	}
503	return 0;
504
505	case UM_CONTAINERHWND:
506	return MRFROMLONG(WinWindowFromID(hwnd,DIR_CNR));
507
508	case UM_VIEWSMENU:
509	return MRFROMLONG(CheckMenu(&DirCnrMenu,DIRCNR_POPUP));
510
511	case UM_DRIVECMD:
512	case WM_INITMENU:
513	case UM_FILTER:
514	case UM_INITMENU:
515	case MM_PORTHOLEINIT:
516	case UM_COMMAND:
517	case UM_FILESMENU:
518	case UM_UPDATERECORD:
519	case UM_UPDATERECORDLIST:
520	return WinSendMsg(WinWindowFromID(hwnd,DIR_CNR),msg,mp1,mp2);
521
522
523	case WM_PSETFOCUS:
524	case WM_SETFOCUS:
525	if(mp2)
526	PostMsg(hwnd,UM_FOCUSME,MPVOID,MPVOID);
527	break;
528
529	case UM_FOCUSME:
530	WinSetFocus(HWND_DESKTOP,WinWindowFromID(hwnd,DIR_CNR));
531	break;
532
533	case WM_PAINT:
534	{
535	HPS hps;
536	RECTL rcl;
537
538	hps = WinBeginPaint(hwnd,(HPS)0,NULL);
539	if(hps) {
540	WinQueryWindowRect(hwnd,&rcl);
541	WinFillRect(hps,&rcl,CLR_PALEGRAY);
542	CommonTextPaint(hwnd,hps);
543	WinEndPaint(hps);
544	}
545	}
546	break;
547
548	case UM_SIZE:
549	case WM_SIZE:
550	if(msg == UM_SIZE) {
551
552	SWP swp;
553
554	WinQueryWindowPos(hwnd,&swp);
555	mp1 = MPFROM2SHORT(swp.cx,swp.cy);
556	mp2 = MPFROM2SHORT(swp.cx,swp.cy);
557	}
558	{
559	USHORT cx,cy,bx;
560
561	cx = SHORT1FROMMP(mp2);
562	cy = SHORT2FROMMP(mp2);
563	WinSetWindowPos(WinWindowFromID(hwnd,DIR_CNR),HWND_TOP,
564	0,
565	0,
566	cx,
567	cy - 24,
568	SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
569	if(WinWindowFromID(hwnd,DIR_MAX) != (HWND)0) {
570	WinSetWindowPos(WinWindowFromID(hwnd,DIR_MAX),HWND_TOP,
571	cx - 22,
572	cy - 22,
573	20,20,SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
574	cx -= 24;
575	}
576	WinSetWindowPos(WinWindowFromID(hwnd,DIR_FOLDERICON),HWND_TOP,
577	2,
578	cy - 22,
579	24,
580	20,
581	SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
582	WinSetWindowPos(WinWindowFromID(hwnd,DIR_TOTALS),HWND_TOP,
583	29,
584	cy - 22,
585	(cx / 3) - 2,
586	20,
587	SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
588	WinSetWindowPos(WinWindowFromID(hwnd,DIR_SELECTED),HWND_TOP,
589	29 + (cx / 3) + 2,
590	cy - 22,
591	(cx / 3) - 2,
592	20,
593	SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
594	bx = (cx - (29 + (((cx / 3) + 2) * 2))) / 3;
595	WinSetWindowPos(WinWindowFromID(hwnd,DIR_VIEW),HWND_TOP,
596	29 + (((cx / 3) + 2) * 2),
597	cy - 22,
598	bx - 4,
599	20,
600	SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
601	WinSetWindowPos(WinWindowFromID(hwnd,DIR_SORT),HWND_TOP,
602	29 + (((cx / 3) + 2) * 2) + bx,
603	cy - 22,
604	bx - 4,
605	20,
606	SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
607	WinSetWindowPos(WinWindowFromID(hwnd,DIR_FILTER),HWND_TOP,
608	29 + (((cx / 3) + 2) * 2) + (bx * 2),
609	cy - 22,
610	bx - 4,
611	20,
612	SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
613	}
614	CommonTextPaint(hwnd,(HPS)0);
615	if(msg == UM_SIZE) {
616	WinSetWindowPos(WinQueryWindow(hwnd,QW_PARENT),HWND_TOP,0,0,0,0,
617	SWP_SHOW \| SWP_ZORDER \| SWP_ACTIVATE);
618	return 0;
619	}
620	break;
621
622	case WM_COMMAND:
623	case WM_CONTROL:
624	case WM_CLOSE:
625	return WinSendMsg(WinWindowFromID(hwnd,DIR_CNR),
626	msg,
627	mp1,
628	mp2);
629	}
630	return WinDefWindowProc(hwnd,msg,mp1,mp2);
631	}
632
633
634	MRESULT EXPENTRY DirObjWndProc (HWND hwnd,ULONG msg,MPARAM mp1,MPARAM mp2)
635	{
636	DIRCNRDATA *dcd;
637
638	switch(msg) {
639	case WM_CREATE:
640	break;
641
642	case DM_PRINTOBJECT:
643	return MRFROMLONG(DRR_TARGET);
644
645	case DM_DISCARDOBJECT:
646	dcd = INSTDATA(hwnd);
647	if(fFM2Deletes && dcd) {
648
649	LISTINFO *li;
650	CNRDRAGINFO cni;
651
652	cni.pRecord = NULL;
653	cni.pDragInfo = (PDRAGINFO)mp1;
654	li = DoFileDrop(dcd->hwndCnr,dcd->directory,FALSE,MPVOID,MPFROMP(&cni));
655	if(li) {
656	li->type = (fDefaultDeletePerm) ? IDM_PERMDELETE : IDM_DELETE;
657	if(!PostMsg(hwnd,UM_MASSACTION,MPFROMP(li),MPVOID))
658	FreeListInfo(li);
659	else
660	return MRFROMLONG(DRR_SOURCE);
661	}
662	}
663	return MRFROMLONG(DRR_TARGET);
664
665	case UM_UPDATERECORDLIST:
666	dcd = WinQueryWindowPtr(hwnd,QWL_USER);
667	if(dcd && mp1) {
668
669	INT numentries = 0;
670	CHAR list = (CHAR )mp1;
671
672	while(list[numentries])
673	numentries++;
674	if(numentries)
675	UpdateCnrList(dcd->hwndCnr,
676	list,
677	numentries,
678	TRUE,
679	dcd);
680	}
681	return 0;
682
683	case UM_SETUP:
684	dcd = WinQueryWindowPtr(hwnd,QWL_USER);
685	if(dcd) {
686	/* set unique id */
687	WinSetWindowUShort(hwnd,
688	QWS_ID,
689	DIROBJ_FRAME + (DIR_FRAME - dcd->id));
690	dcd->hwndObject = hwnd;
691	if(ParentIsDesktop(hwnd,dcd->hwndParent))
692	DosSleep(250L);
693	}
694	else
695	PostMsg(hwnd,WM_CLOSE,MPVOID,MPVOID);
696	return 0;
697
698	case UM_RESCAN2:
699	dcd = WinQueryWindowPtr(hwnd,QWL_USER);
700	if(dcd && dcd->hwndFrame == WinQueryActiveWindow(dcd->hwndParent)) {
701
702	FSALLOCATE fsa;
703	CHAR s[CCHMAXPATH * 2];
704	CHAR tf[64];
705	CHAR tb[64];
706	CHAR szFree[64];
707
708	DosError(FERR_DISABLEHARDERR);
709	if(!DosQueryFSInfo(toupper(*dcd->directory) - '@',
710	FSIL_ALLOC,&fsa,sizeof(FSALLOCATE)))
711	{
712	CommaFmtULL(tb,sizeof(tb),
713	(ULONGLONG)fsa.cUnitAvail * (fsa.cSectorUnit * fsa.cbSector),
714	'K');
715	sprintf(szFree," {%s %s}",
716	tb,GetPString(IDS_FREETEXT));
717	}
718	else
719	*szFree = 0;
720	commafmt(tf,sizeof(tf),dcd->totalfiles);
721	CommaFmtULL(tb,sizeof(tb),dcd->ullTotalBytes,' ');
722	if (!fMoreButtons)
723	{
724	sprintf(s," [%s / %s]%s%s%s%s %s",
725	tf,tb,szFree,
726	(*dcd->mask.szMask \|\| dcd->mask.antiattr \|\|
727	dcd->mask.attrFile != ALLATTRS) ? " (" : NullStr,
728	(*dcd->mask.szMask) ? dcd->mask.szMask :
729	(dcd->mask.antiattr \|\|
730	dcd->mask.attrFile != ALLATTRS) ?
731	GetPString(IDS_ALLTEXT) : NullStr,
732	(*dcd->mask.szMask \|\| dcd->mask.antiattr \|\|
733	dcd->mask.attrFile != ALLATTRS) ? ")" : NullStr,
734	dcd->directory);
735	}
736	else
737	{
738	sprintf(s," [%s / %s]%s %s",
739	tf,tb,szFree,dcd->directory);
740	}
741	if (dcd->hwndFrame == WinQueryActiveWindow(dcd->hwndParent))
742	WinSetWindowText(hwndStatus,s);
743	}
744	return 0;
745
746	case UM_FLESH:
747	dcd = WinQueryWindowPtr(hwnd,QWL_USER);
748	if(dcd) {
749
750	PCNRITEM pci,pciC;
751
752	pci = WinSendMsg(dcd->hwndCnr,
753	CM_QUERYRECORD,
754	MPVOID,
755	MPFROM2SHORT(CMA_FIRST,CMA_ITEMORDER));
756	while(pci && (INT)pci != -1) {
757	if(pci->attrFile & FILE_DIRECTORY) {
758	pciC = WinSendMsg(dcd->hwndCnr,
759	CM_QUERYRECORD,
760	MPFROMP(pci),
761	MPFROM2SHORT(CMA_FIRSTCHILD,CMA_ITEMORDER));
762	if(!pciC) {
763	Stubby(dcd->hwndCnr,pci);
764	DosSleep(0L);
765	}
766	}
767	pci = WinSendMsg(dcd->hwndCnr,
768	CM_QUERYRECORD,
769	MPFROMP(pci),
770	MPFROM2SHORT(CMA_NEXT,CMA_ITEMORDER));
771	}
772	dcd->firsttree = TRUE;
773	}
774	return 0;
775
776	case UM_RESCAN:
777	/*
778	* populate container
779	*/
780	dcd = WinQueryWindowPtr(hwnd,QWL_USER);
781	if (dcd) {
782	DosEnterCritSec();
783	if (dcd->stopflag)
784	dcd->stopflag--;
785	if (dcd->stopflag) {
786	DosExitCritSec();
787	return 0;
788	}
789	DosExitCritSec();
790	if(mp1) {
791	strcpy(dcd->previous,dcd->directory);
792	strcpy(dcd->directory,(CHAR *)mp1);
793	}
794	MakeValidDir(dcd->directory);
795	{
796	CHAR s[CCHMAXPATH + 8];
797
798	sprintf(s,
799	"%s%s%s",
800	(ParentIsDesktop(dcd->hwndFrame,(HWND)0)) ?
801	"VDir" :
802	NullStr,
803	(ParentIsDesktop(dcd->hwndFrame,(HWND)0)) ?
804	(!dcd->dontclose) ?
805	" Master: " :
806	": " :
807	NullStr,
808	dcd->directory);
809	WinSetWindowText(dcd->hwndFrame,
810	s);
811	WinSetWindowText(WinWindowFromID(dcd->hwndFrame,FID_TITLEBAR),
812	s);
813	}
814	WinSendMsg(dcd->hwndCnr,
815	CM_REMOVERECORD,
816	MPVOID,
817	MPFROM2SHORT(0,CMA_FREE \| CMA_INVALIDATE \| CMA_ERASE));
818	AdjustCnrColsForFSType(dcd->hwndCnr,
819	dcd->directory,
820	dcd);
821	dcd->ullTotalBytes = dcd->totalfiles =
822	dcd->selectedfiles = dcd->selectedbytes = 0;
823	WinSetDlgItemText(dcd->hwndClient,
824	DIR_TOTALS,
825	"0 / 0k");
826	WinSetDlgItemText(dcd->hwndClient,
827	DIR_SELECTED,
828	"0 / 0k");
829	if(hwndStatus &&
830	dcd->hwndFrame == WinQueryActiveWindow(dcd->hwndParent)) {
831	WinSetWindowText(hwndStatus,
832	GetPString(IDS_SCANNINGTEXT));
833	if(hwndMain)
834	WinSendMsg(hwndMain,
835	UM_LOADFILE,
836	MPVOID,
837	MPVOID);
838	}
839	if(fSwitchTree && hwndTree) {
840	if(hwndMain) {
841	if(TopWindow(hwndMain,
842	(HWND)0) == dcd->hwndFrame)
843	WinSendMsg(hwndTree,
844	UM_SHOWME,
845	MPFROMP(dcd->directory),
846	MPVOID);
847	}
848	else
849	WinSendMsg(hwndTree,
850	UM_SHOWME,
851	MPFROMP(dcd->directory),
852	MPVOID);
853	}
854	dcd->firsttree = FALSE;
855	// fixme to check errors
856	FillDirCnr(dcd->hwndCnr,
857	dcd->directory,
858	dcd,
859	&dcd->ullTotalBytes);
860	PostMsg(dcd->hwndCnr,
861	UM_RESCAN,
862	MPVOID,
863	MPVOID);
864	if(mp2 &&
865	!fLeaveTree &&
866	(dcd->flWindowAttr & CV_TREE)) {
867
868	ULONG flWindowAttr = dcd->flWindowAttr;
869	CNRINFO cnri;
870
871	flWindowAttr &= (~(CV_NAME \| CV_TREE \| CV_ICON \| CV_DETAIL \| CV_TEXT));
872	if(dcd->lastattr) {
873	if(dcd->lastattr & CV_TEXT)
874	flWindowAttr \|= CV_TEXT;
875	else if(dcd->lastattr & CV_DETAIL)
876	flWindowAttr \|= CV_DETAIL;
877	else if(dcd->lastattr & CV_ICON)
878	flWindowAttr \|= CV_ICON;
879	else
880	flWindowAttr \|= CV_NAME;
881	}
882	else
883	flWindowAttr \|= CV_NAME;
884	flWindowAttr \|= CV_FLOW;
885	memset(&cnri,0,sizeof(CNRINFO));
886	cnri.cb = sizeof(CNRINFO);
887	if(WinSendMsg(dcd->hwndCnr,CM_QUERYCNRINFO,MPFROMP(&cnri),
888	MPFROMLONG(sizeof(CNRINFO)))) {
889	dcd->flWindowAttr = cnri.flWindowAttr = flWindowAttr;
890	WinSendMsg(dcd->hwndCnr,CM_SETCNRINFO,
891	MPFROMP(&cnri),
892	MPFROMLONG(CMA_FLWINDOWATTR));
893	SayView(WinWindowFromID(dcd->hwndClient,
894	DIR_VIEW),dcd->flWindowAttr);
895	}
896	}
897	if(dcd->flWindowAttr & CV_TREE)
898	PostMsg(dcd->hwndObject,UM_FLESH,MPVOID,MPVOID);
899	if(*dcd->previous) {
900	if(strlen(dcd->previous) > strlen(dcd->directory) &&
901	!strnicmp(dcd->directory,dcd->previous,strlen(dcd->directory))) {
902
903	PCNRITEM pci;
904
905	pci = FindCnrRecord(dcd->hwndCnr,
906	dcd->previous,
907	NULL,
908	TRUE,
909	FALSE,
910	TRUE);
911	if(pci && (INT)pci != -1) {
912	/* make found item current (cursored) item */
913	WinSendMsg(dcd->hwndCnr,CM_SETRECORDEMPHASIS,MPFROMP(pci),
914	MPFROM2SHORT(TRUE,CRA_CURSORED));
915	/* make sure that record shows in viewport */
916	ShowCnrRecord(dcd->hwndCnr,(PMINIRECORDCORE)pci);
917	}
918	}
919	}
920	}
921	return 0;
922
923	case UM_COMMAND:
924	if(mp1) {
925
926	LISTINFO li = (LISTINFO )mp1;
927
928	switch(li->type) {
929	case IDM_DOITYOURSELF:
930	case IDM_APPENDTOCLIP:
931	case IDM_SAVETOCLIP:
932	case IDM_ARCHIVE:
933	case IDM_ARCHIVEM:
934	case IDM_VIEWTEXT:
935	case IDM_VIEWBINARY:
936	case IDM_VIEWARCHIVE:
937	case IDM_VIEW:
938	case IDM_EDITTEXT:
939	case IDM_EDITBINARY:
940	case IDM_EDIT:
941	case IDM_OBJECT:
942	case IDM_SHADOW:
943	case IDM_SHADOW2:
944	case IDM_PRINT:
945	case IDM_ATTRS:
946	case IDM_DELETE:
947	case IDM_PERMDELETE:
948	case IDM_MCIPLAY:
949	case IDM_UPDATE:
950	if(PostMsg(hwnd,
951	UM_MASSACTION,
952	mp1,
953	mp2))
954	return (MRESULT)TRUE;
955	break;
956	default:
957	if(PostMsg(hwnd,
958	UM_ACTION,
959	mp1,
960	mp2))
961	return (MRESULT)TRUE;
962	}
963	}
964	return 0;
965
966	case UM_SELECT:
967	dcd = WinQueryWindowPtr(hwnd,QWL_USER);
968	if(dcd) {
969	switch(SHORT1FROMMP(mp1)) {
970	case IDM_SELECTBOTH:
971	case IDM_SELECTONE:
972	case IDM_SELECTMORE:
973	case IDM_SELECTNEWER:
974	case IDM_SELECTOLDER:
975	case IDM_SELECTBIGGER:
976	case IDM_SELECTSMALLER:
977	case IDM_DESELECTBOTH:
978	case IDM_DESELECTONE:
979	case IDM_DESELECTMORE:
980	case IDM_DESELECTNEWER:
981	case IDM_DESELECTOLDER:
982	case IDM_DESELECTBIGGER:
983	case IDM_DESELECTSMALLER:
984	SpecialSelect2(dcd->hwndParent,SHORT1FROMMP(mp1));
985	break;
986	case IDM_SELECTLIST:
987	{
988	CHAR filename[CCHMAXPATH],p,pp;
989	ULONG size;
990
991	strcpy(filename,"*.LST");
992	size = CCHMAXPATH;
993	PrfQueryProfileData(fmprof,appname,"SaveToListName",
994	filename,&size);
995	pp = strrchr(filename,'\\');
996	if(!pp)
997	pp = filename;
998	p = strrchr(pp,'.');
999	if(p && *(p + 1) && p > pp + 1) {
1000	if(pp > filename)
1001	pp++;
1002	pp = '';
1003	pp++;
1004	if(p > pp)
1005	memmove(pp,p,strlen(p) + 1);
1006	}
1007	if(insert_filename(hwnd,filename,FALSE,FALSE))
1008	SelectList(dcd->hwndCnr,TRUE,FALSE,FALSE,NULL,filename,NULL);
1009	}
1010	break;
1011	case IDM_SELECTALL:
1012	SelectAll(dcd->hwndCnr,TRUE,TRUE,NULL,NULL,FALSE);
1013	break;
1014	case IDM_DESELECTALL:
1015	DeselectAll(dcd->hwndCnr,TRUE,TRUE,NULL,NULL,FALSE);
1016	break;
1017	case IDM_SELECTALLFILES:
1018	SelectAll(dcd->hwndCnr,TRUE,FALSE,NULL,NULL,FALSE);
1019	break;
1020	case IDM_DESELECTALLFILES:
1021	DeselectAll(dcd->hwndCnr,TRUE,FALSE,NULL,NULL,FALSE);
1022	break;
1023	case IDM_SELECTALLDIRS:
1024	SelectAll(dcd->hwndCnr,FALSE,TRUE,NULL,NULL,FALSE);
1025	break;
1026	case IDM_DESELECTALLDIRS:
1027	DeselectAll(dcd->hwndCnr,FALSE,TRUE,NULL,NULL,FALSE);
1028	break;
1029	case IDM_DESELECTMASK:
1030	case IDM_SELECTMASK:
1031	{
1032	MASK mask;
1033	PCNRITEM pci = (PCNRITEM)mp2;
1034
1035	memset(&mask,0,sizeof(MASK));
1036	mask.fNoAttribs = TRUE;
1037	mask.fNoDirs = TRUE;
1038	mask.fText = TRUE;
1039	strcpy(mask.prompt,
1040	GetPString((SHORT1FROMMP(mp1) == IDM_SELECTMASK) ?
1041	IDS_SELECTFILTERTEXT :
1042	IDS_DESELECTFILTERTEXT));
1043	if(pci && (INT)pci != -1)
1044	strcpy(mask.szMask,pci->szFileName);
1045	if(WinDlgBox(HWND_DESKTOP,
1046	dcd->hwndCnr,
1047	PickMaskDlgProc,
1048	FM3ModHandle,
1049	MSK_FRAME,
1050	MPFROMP(&mask))) {
1051	if(SHORT1FROMMP(mp1) == IDM_SELECTMASK)
1052	SelectAll(dcd->hwndCnr,
1053	TRUE,
1054	TRUE,
1055	mask.szMask,
1056	mask.szText,
1057	FALSE);
1058	else
1059	DeselectAll(dcd->hwndCnr,
1060	TRUE,
1061	TRUE,
1062	mask.szMask,
1063	mask.szText,
1064	FALSE);
1065	}
1066	}
1067	break;
1068
1069	case IDM_DESELECTCLIP:
1070	case IDM_SELECTCLIP:
1071	{
1072	CHAR **list;
1073
1074	list = ListFromClipboard(hwnd);
1075	if(list) {
1076	SelectList(dcd->hwndCnr,TRUE,FALSE,
1077	(SHORT1FROMMP(mp1) == IDM_DESELECTCLIP),
1078	NULL,NULL,list);
1079	FreeList(list);
1080	}
1081	}
1082	break;
1083
1084	case IDM_INVERT:
1085	InvertAll(dcd->hwndCnr);
1086	break;
1087	}
1088	}
1089	return 0;
1090
1091	case UM_MASSACTION:
1092	if(mp1) {
1093
1094	dcd = WinQueryWindowPtr(hwnd,QWL_USER);
1095	if(dcd) {
1096
1097	WORKER *wk;
1098
1099	wk = malloc(sizeof(WORKER));
1100	if(wk) {
1101	memset(wk,0,sizeof(WORKER));
1102	wk->size = sizeof(WORKER);
1103	wk->hwndCnr = dcd->hwndCnr;
1104	wk->hwndParent = dcd->hwndParent;
1105	wk->hwndFrame = dcd->hwndFrame;
1106	wk->hwndClient = dcd->hwndClient;
1107	wk->li = (LISTINFO *)mp1;
1108	strcpy(wk->directory,dcd->directory);
1109	if(_beginthread(MassAction,NULL,122880,(PVOID)wk) == -1) {
1110	free(wk);
1111	FreeListInfo((LISTINFO *)mp1);
1112	}
1113	}
1114	else
1115	FreeListInfo((LISTINFO *)mp1);
1116	}
1117	}
1118	return 0;
1119
1120	case UM_ACTION:
1121	if(mp1) {
1122
1123	dcd = WinQueryWindowPtr(hwnd,QWL_USER);
1124	if(dcd) {
1125
1126	WORKER *wk;
1127
1128	wk = malloc(sizeof(WORKER));
1129	if(wk) {
1130	memset(wk,0,sizeof(WORKER));
1131	wk->size = sizeof(WORKER);
1132	wk->hwndCnr = dcd->hwndCnr;
1133	wk->hwndParent = dcd->hwndParent;
1134	wk->hwndFrame = dcd->hwndFrame;
1135	wk->hwndClient = dcd->hwndClient;
1136	wk->li = (LISTINFO *)mp1;
1137	strcpy(wk->directory,dcd->directory);
1138	if(_beginthread(Action,NULL,122880,(PVOID)wk) == -1) {
1139	free(wk);
1140	FreeListInfo((LISTINFO *)mp1);
1141	}
1142	}
1143	else
1144	FreeListInfo((LISTINFO *)mp1);
1145	}
1146	}
1147	return 0;
1148
1149	case WM_CLOSE:
1150	WinDestroyWindow(hwnd);
1151	break;
1152
1153	case WM_DESTROY:
1154	dcd = WinQueryWindowPtr(hwnd,QWL_USER);
1155	if(dcd) {
1156	if(dcd->hwndRestore)
1157	WinSetWindowPos(dcd->hwndRestore,
1158	HWND_TOP,
1159	0,
1160	0,
1161	0,
1162	0,
1163	SWP_RESTORE \| SWP_SHOW \| SWP_ACTIVATE \| SWP_ZORDER);
1164	FreeList(dcd->lastselection);
1165	free(dcd);
1166	DosPostEventSem(CompactSem);
1167	}
1168	if(!PostMsg((HWND)0,
1169	WM_QUIT,
1170	MPVOID,
1171	MPVOID))
1172	WinSendMsg((HWND)0,
1173	WM_QUIT,
1174	MPVOID,
1175	MPVOID);
1176	break;
1177	}
1178	return WinDefWindowProc(hwnd,msg,mp1,mp2);
1179	}
1180
1181
1182	MRESULT EXPENTRY DirCnrWndProc (HWND hwnd,ULONG msg,MPARAM mp1,MPARAM mp2)
1183	{
1184	DIRCNRDATA *dcd = WinQueryWindowPtr(hwnd,QWL_USER);
1185
1186	switch(msg) {
1187	case DM_PRINTOBJECT:
1188	return MRFROMLONG(DRR_TARGET);
1189
1190	case DM_DISCARDOBJECT:
1191	if (dcd)
1192	return WinSendMsg(dcd->hwndObject,msg,mp1,mp2);
1193	else
1194	return MRFROMLONG(DRR_TARGET);
1195
1196	case WM_CHAR:
1197	shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT \| KC_ALT \| KC_CTRL));
1198	if (SHORT1FROMMP(mp1) & KC_KEYUP)
1199	return (MRESULT)TRUE;
1200	if (SHORT1FROMMP(mp1) & KC_VIRTUALKEY) {
1201	switch(SHORT2FROMMP(mp2)) {
1202	case VK_INSERT:
1203	if ((shiftstate & KC_CTRL) == KC_CTRL)
1204	PostMsg(hwnd,
1205	WM_COMMAND,
1206	MPFROM2SHORT(IDM_MKDIR,0),
1207	MPVOID);
1208	else if ((shiftstate & KC_ALT) == KC_ALT)
1209	PostMsg(hwnd,
1210	WM_COMMAND,
1211	MPFROM2SHORT(IDM_CREATE,0),
1212	MPVOID);
1213	break;
1214	case VK_PAGEUP:
1215	if ((shiftstate & KC_CTRL) == KC_CTRL)
1216	PostMsg(hwnd,
1217	WM_COMMAND,
1218	MPFROM2SHORT(IDM_PARENT,0),
1219	MPVOID);
1220	break;
1221	case VK_PAGEDOWN:
1222	if ((shiftstate & KC_CTRL) == KC_CTRL)
1223	PostMsg(hwnd,
1224	WM_COMMAND,
1225	MPFROM2SHORT(IDM_PREVIOUS,0),
1226	MPVOID);
1227	break;
1228	case VK_HOME:
1229	if ((shiftstate & KC_CTRL) == KC_CTRL && dcd) {
1230
1231	CHAR s[CCHMAXPATH],*p;
1232
1233	strcpy(s,dcd->directory);
1234	p = strchr(s,'\\');
1235	if (p) {
1236	p++;
1237	*p = 0;
1238	WinSendMsg(hwnd,
1239	UM_SETDIR,
1240	MPFROMP(s),
1241	MPVOID);
1242	}
1243	}
1244	break;
1245	case VK_DELETE:
1246	if ((shiftstate & KC_CTRL) == KC_CTRL)
1247	PostMsg(hwnd,WM_COMMAND,MPFROM2SHORT(IDM_PERMDELETE,0),MPVOID);
1248	else if ((shiftstate & KC_SHIFT) == KC_SHIFT)
1249	PostMsg(hwnd,WM_COMMAND,MPFROM2SHORT(IDM_SAVETOCLIP,0),MPVOID);
1250	else
1251	PostMsg(hwnd,WM_COMMAND,MPFROM2SHORT(IDM_DELETE,0),MPVOID);
1252	break;
1253	}
1254	}
1255	if (shiftstate \|\| fNoSearch)
1256	break;
1257	if (SHORT1FROMMP(mp1) & KC_CHAR) {
1258
1259	ULONG thistime,len;
1260	SEARCHSTRING srch;
1261	PCNRITEM pci;
1262
1263	if (!dcd)
1264	break;
1265	switch(SHORT1FROMMP(mp2)) {
1266	case '\x1b':
1267	case '\r':
1268	case '\n':
1269	dcd->lasttime = 0;
1270	*dcd->szCommonName = 0;
1271	break;
1272	default:
1273	thistime = WinQueryMsgTime(WinQueryAnchorBlock(hwnd));
1274	if (thistime > dcd->lasttime + 1250)
1275	*dcd->szCommonName = 0;
1276	dcd->lasttime = thistime;
1277	if (SHORT1FROMMP(mp2) == ' ' && !dcd->szCommonName)
1278	break;
1279	KbdRetry:
1280	len = strlen(dcd->szCommonName);
1281	if (len >= CCHMAXPATH - 1) {
1282	*dcd->szCommonName = 0;
1283	len = 0;
1284	}
1285	dcd->szCommonName[len] = toupper(SHORT1FROMMP(mp2));
1286	dcd->szCommonName[len + 1] = 0;
1287	memset(&srch,0,sizeof(SEARCHSTRING));
1288	srch.cb = (ULONG)sizeof(SEARCHSTRING);
1289	srch.pszSearch = (PSZ)dcd->szCommonName;
1290	srch.fsPrefix = TRUE;
1291	srch.fsCaseSensitive = FALSE;
1292	srch.usView = CV_ICON;
1293	pci = WinSendMsg(hwnd,CM_SEARCHSTRING,MPFROMP(&srch),
1294	MPFROMLONG(CMA_FIRST));
1295	if (pci && (INT)pci != -1) {
1296
1297	USHORT attrib = CRA_CURSORED;
1298
1299	/* make found item current item */
1300	if (!stricmp(pci->pszFileName,dcd->szCommonName))
1301	attrib \|= CRA_SELECTED;
1302	WinSendMsg(hwnd,CM_SETRECORDEMPHASIS,MPFROMP(pci),
1303	MPFROM2SHORT(TRUE,attrib));
1304	/* make sure that record shows in viewport */
1305	ShowCnrRecord(hwnd,(PMINIRECORDCORE)pci);
1306	return (MRESULT)TRUE;
1307	}
1308	else {
1309	if (SHORT1FROMMP(mp2) == ' ') {
1310	dcd->szCommonName[len] = 0;
1311	break;
1312	}
1313	*dcd->szCommonName = 0;
1314	dcd->lasttime = 0;
1315	if (len) // retry as first letter if no match
1316	goto KbdRetry;
1317	}
1318	break;
1319	}
1320	}
1321	break;
1322
1323	case WM_MOUSEMOVE:
1324	case WM_BUTTON1UP:
1325	case WM_BUTTON2UP:
1326	case WM_BUTTON3UP:
1327	case WM_CHORD:
1328	shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT \| KC_SHIFT \| KC_CTRL));
1329	break;
1330
1331	case WM_BUTTON1MOTIONEND:
1332	{
1333	CNRINFO cnri;
1334
1335	memset(&cnri,0,sizeof(CNRINFO));
1336	cnri.cb = sizeof(CNRINFO);
1337	if (WinSendMsg(hwnd,CM_QUERYCNRINFO,MPFROMP(&cnri),
1338	MPFROMLONG(sizeof(CNRINFO)))) {
1339	if (cnri.flWindowAttr & CV_DETAIL)
1340	PrfWriteProfileData(fmprof,appname,"CnrSplitBar",
1341	(PVOID)&cnri.xVertSplitbar,sizeof(LONG));
1342	}
1343	}
1344	break;
1345
1346	case UM_COMPARE:
1347	if (dcd && mp1 && mp2) {
1348
1349	COMPARE *cmp;
1350	CHAR leftdir = (CHAR )mp1,rightdir = (CHAR )mp2;
1351
1352	if (!IsFile(leftdir) &&
1353	!IsFile(rightdir)) {
1354	cmp = malloc(sizeof(COMPARE));
1355	if (cmp) {
1356	memset(cmp,0,sizeof(COMPARE));
1357	cmp->size = sizeof(COMPARE);
1358	strcpy(cmp->leftdir,leftdir);
1359	strcpy(cmp->rightdir,rightdir);
1360	cmp->hwndParent = dcd->hwndParent;
1361	cmp->dcd.hwndParent = dcd->hwndParent;
1362	WinDlgBox(HWND_DESKTOP,
1363	HWND_DESKTOP,
1364	CompareDlgProc,
1365	FM3ModHandle,
1366	COMP_FRAME,
1367	MPFROMP(cmp));
1368	}
1369	}
1370	}
1371	return 0;
1372
1373	case WM_PRESPARAMCHANGED:
1374	PresParamChanged(hwnd,
1375	"DirCnr",
1376	mp1,
1377	mp2);
1378	break;
1379
1380	case UM_UPDATERECORDLIST:
1381	if (dcd && mp1)
1382	WinSendMsg(dcd->hwndObject,
1383	msg,
1384	mp1,
1385	mp2);
1386	return 0;
1387
1388	case UM_UPDATERECORD:
1389	if (dcd && mp1) {
1390
1391	CHAR *filename;
1392
1393	filename = mp1;
1394	if (filename)
1395	UpdateCnrRecord(hwnd,
1396	filename,
1397	TRUE,
1398	dcd);
1399	}
1400	return 0;
1401
1402	case WM_SETFOCUS:
1403	/*
1404	* put name of our window (directory name) on status line
1405	*/
1406	if (dcd && hwndStatus && mp2) {
1407
1408	PCNRITEM pci = NULL;
1409
1410	if (fAutoView && hwndMain) {
1411	pci = WinSendMsg(hwnd,CM_QUERYRECORDEMPHASIS,MPFROMLONG(CMA_FIRST),
1412	MPFROMSHORT(CRA_CURSORED));
1413	if (pci && (INT)pci != -1 &&
1414	(!(driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_SLOW)))
1415	WinSendMsg(hwndMain,
1416	UM_LOADFILE,
1417	MPFROMP(pci->szFileName),
1418	MPVOID);
1419	else
1420	WinSendMsg(hwndMain,
1421	UM_LOADFILE,
1422	MPVOID,
1423	MPVOID);
1424	}
1425	if (*dcd->directory) {
1426	if (hwndMain)
1427	WinSendMsg(hwndMain,
1428	UM_SETUSERLISTNAME,
1429	MPFROMP(dcd->directory),
1430	MPVOID);
1431	else
1432	add_udir(FALSE,dcd->directory);
1433	}
1434	if (hwndMain)
1435	PostMsg(hwndMain,
1436	UM_ADVISEFOCUS,
1437	MPFROMLONG(dcd->hwndFrame),
1438	MPVOID);
1439	}
1440	if (mp2) {
1441	LastDir = hwnd;
1442	PostMsg(hwnd,
1443	UM_RESCAN,
1444	MPVOID,
1445	MPVOID);
1446	if (fSwitchTreeOnFocus &&
1447	hwndTree &&
1448	dcd &&
1449	*dcd->directory)
1450	WinSendMsg(hwndTree,
1451	UM_SHOWME,
1452	MPFROMP(dcd->directory),
1453	MPVOID);
1454	}
1455	break;
1456
1457	case UM_SETDIR:
1458	if (dcd && mp1) {
1459
1460	CHAR fullname[CCHMAXPATH];
1461
1462	DosError(FERR_DISABLEHARDERR);
1463	if (!DosQueryPathInfo((CHAR *)mp1,
1464	FIL_QUERYFULLNAME,
1465	fullname,
1466	sizeof(fullname))) {
1467	if (stricmp(dcd->directory,fullname)) {
1468	strcpy(dcd->previous,dcd->directory);
1469	strcpy(dcd->directory,fullname);
1470	DosEnterCritSec();
1471	dcd->stopflag++;
1472	DosExitCritSec();
1473	if (!PostMsg(dcd->hwndObject,
1474	UM_RESCAN,
1475	MPVOID,
1476	MPFROMLONG(1L))) {
1477	strcpy(dcd->directory,dcd->previous);
1478	DosEnterCritSec();
1479	dcd->stopflag--;
1480	DosExitCritSec();
1481	}
1482	else if (*dcd->directory) {
1483	if (hwndMain)
1484	WinSendMsg(hwndMain,
1485	UM_SETUSERLISTNAME,
1486	MPFROMP(dcd->directory),
1487	MPVOID);
1488	else
1489	add_udir(FALSE,
1490	dcd->directory);
1491	}
1492	}
1493	}
1494	}
1495	break;
1496
1497	case UM_RESCAN:
1498	if (dcd) {
1499
1500	CNRINFO cnri;
1501	CHAR s[CCHMAXPATH * 2],tf[81],tb[81];
1502	PCNRITEM pci;
1503
1504	memset(&cnri,0,sizeof(CNRINFO));
1505	cnri.cb = sizeof(CNRINFO);
1506	WinSendMsg(hwnd,
1507	CM_QUERYCNRINFO,
1508	MPFROMP(&cnri),
1509	MPFROMLONG(sizeof(CNRINFO)));
1510	cnri.pszCnrTitle = dcd->directory;
1511	WinSendMsg(hwnd,
1512	CM_SETCNRINFO,
1513	MPFROMP(&cnri),
1514	MPFROMLONG(CMA_CNRTITLE));
1515	dcd->totalfiles = cnri.cRecords;
1516	commafmt(tb,sizeof(tb),dcd->totalfiles);
1517	CommaFmtULL(tf,sizeof(tf),dcd->ullTotalBytes,'K');
1518	sprintf(s,"%s / %s",tb,tf);
1519	WinSetDlgItemText(dcd->hwndClient,DIR_TOTALS,s);
1520	commafmt(tb,sizeof(tb),dcd->selectedfiles);
1521	CommaFmtULL(tf,sizeof(tf),dcd->selectedbytes,'K');
1522	sprintf(s,"%s / %s",tb,tf);
1523	WinSetDlgItemText(dcd->hwndClient,DIR_SELECTED,s);
1524	if (hwndStatus &&
1525	dcd->hwndFrame == WinQueryActiveWindow(dcd->hwndParent)) {
1526	PostMsg(dcd->hwndObject,
1527	UM_RESCAN2,
1528	MPVOID,
1529	MPVOID);
1530	if ((fSplitStatus && hwndStatus2) \|\|
1531	fMoreButtons) {
1532	pci = WinSendMsg(hwnd,
1533	CM_QUERYRECORDEMPHASIS,
1534	MPFROMLONG(CMA_FIRST),
1535	MPFROMSHORT(CRA_CURSORED));
1536	if (pci && (INT)pci != -1)
1537	{
1538	if (fSplitStatus && hwndStatus2)
1539	{
1540	CommaFmtULL(tb,sizeof(tb),pci->cbFile + pci->easize,' ');
1541	if (!fMoreButtons)
1542	sprintf(s,
1543	" %s %04u/%02u/%02u %02u:%02u:%02u [%s] %s",
1544	tb,
1545	pci->date.year,
1546	pci->date.month,
1547	pci->date.day,
1548	pci->time.hours,
1549	pci->time.minutes,
1550	pci->time.seconds,
1551	pci->pszDispAttr,
1552	pci->pszFileName);
1553	else {
1554	*tf = 0;
1555	if (pci->cbFile + pci->easize > 1024)
1556	{
1557	CommaFmtULL(tf,sizeof(tf),
1558	pci->cbFile + pci->easize,'K');
1559	}
1560	sprintf(s,
1561	GetPString(IDS_STATUSSIZETEXT),
1562	tb,
1563	*tf ? " (" : NullStr,
1564	tf,
1565	*tf ? ")" : NullStr);
1566	}
1567	WinSetWindowText(hwndStatus2,s);
1568	}
1569	else
1570	WinSetWindowText(hwndStatus2,NullStr);
1571	if (fMoreButtons) {
1572	WinSetWindowText(hwndName,pci->pszFileName);
1573	sprintf(s,
1574	"%04u/%02u/%02u %02u:%02u:%02u",
1575	pci->date.year,
1576	pci->date.month,
1577	pci->date.day,
1578	pci->time.hours,
1579	pci->time.minutes,
1580	pci->time.seconds);
1581	WinSetWindowText(hwndDate,s);
1582	WinSetWindowText(hwndAttr,pci->pszDispAttr);
1583	}
1584	}
1585	else {
1586	WinSetWindowText(hwndStatus2,NullStr);
1587	WinSetWindowText(hwndName,NullStr);
1588	WinSetWindowText(hwndDate,NullStr);
1589	WinSetWindowText(hwndAttr,NullStr);
1590	}
1591	}
1592	}
1593	}
1594	return 0;
1595
1596	case UM_SORTRECORD:
1597	if (dcd) {
1598
1599	CNRINFO cnri;
1600
1601	memset(&cnri,0,sizeof(CNRINFO));
1602	cnri.cb = sizeof(CNRINFO);
1603	WinSendMsg(hwnd,
1604	CM_QUERYCNRINFO,
1605	MPFROMP(&cnri),
1606	MPFROMLONG(sizeof(CNRINFO)));
1607	cnri.pSortRecord = (PVOID)SortDirCnr;
1608	WinSendMsg(hwnd,
1609	CM_SETCNRINFO,
1610	MPFROMP(&cnri),
1611	MPFROMLONG(CMA_PSORTRECORD));
1612	WinSendMsg(hwnd,
1613	CM_SORTRECORD,
1614	MPFROMP(SortDirCnr),
1615	MPFROMLONG(dcd->sortFlags));
1616	}
1617	return 0;
1618
1619	case UM_SETUP:
1620	if (dcd) {
1621	if (!dcd->hwndObject) {
1622	/*
1623	* first time through -- set things up
1624	*/
1625
1626	CNRINFO cnri;
1627
1628	RestorePresParams(hwnd,"DirCnr");
1629	LoadDetailsSwitches("DirCnr",dcd);
1630	memset(&cnri,0,sizeof(CNRINFO));
1631	cnri.cb = sizeof(CNRINFO);
1632	WinSendMsg(hwnd,
1633	CM_QUERYCNRINFO,
1634	MPFROMP(&cnri),
1635	MPFROMLONG(sizeof(CNRINFO)));
1636	cnri.cyLineSpacing = 0;
1637	cnri.cxTreeIndent = 12L;
1638
1639	cnri.flWindowAttr &= (~(CV_TREE \| CV_ICON \| CV_DETAIL \| CV_TEXT));
1640	cnri.flWindowAttr \|= (CV_NAME \| CA_DETAILSVIEWTITLES \| CV_MINI \|
1641	CV_FLOW);
1642	cnri.pSortRecord = (PVOID)SortDirCnr;
1643
1644	{
1645	ULONG size = sizeof(ULONG);
1646
1647	PrfQueryProfileData(fmprof,
1648	appname,
1649	"DirflWindowAttr",
1650	(PVOID)&cnri.flWindowAttr,
1651	&size);
1652	size = sizeof(MASK);
1653	if (!*dcd->mask.szMask &&
1654	!dcd->mask.attrFile &&
1655	!dcd->mask.antiattr)
1656	{
1657	if (PrfQueryProfileSize(fmprof,
1658	appname,
1659	"DirFilter",
1660	&size) &&
1661	size)
1662	{
1663	PrfQueryProfileData(fmprof,
1664	appname,
1665	"DirFilter",
1666	&dcd->mask,
1667	&size);
1668	SetMask(dcd->mask.szMask,&dcd->mask);
1669	}
1670	else
1671	dcd->mask.attrFile = (FILE_READONLY \| FILE_NORMAL \|
1672	FILE_ARCHIVED \| FILE_DIRECTORY \|
1673	FILE_HIDDEN \| FILE_SYSTEM);
1674	}
1675	*(dcd->mask.prompt) = 0;
1676	}
1677	if (dcd->flWindowAttr)
1678	cnri.flWindowAttr = dcd->flWindowAttr;
1679	else
1680	dcd->flWindowAttr = cnri.flWindowAttr;
1681	cnri.flWindowAttr &= (~(CA_MIXEDTARGETEMPH \| CA_ORDEREDTARGETEMPH \|
1682	CA_TITLEREADONLY \| CA_TITLESEPARATOR));
1683	cnri.flWindowAttr \|= CV_FLOW;
1684	dcd->flWindowAttr \|= CV_FLOW;
1685	if (WinWindowFromID(dcd->hwndFrame,FID_TITLEBAR))
1686	cnri.flWindowAttr &= (~CA_CONTAINERTITLE);
1687	else
1688	cnri.flWindowAttr \|= CA_CONTAINERTITLE;
1689	if (!dcd->sortFlags)
1690	dcd->sortFlags = sortFlags;
1691	WinSendMsg(hwnd,
1692	CM_SETCNRINFO,
1693	MPFROMP(&cnri),
1694	MPFROMLONG(CMA_FLWINDOWATTR \| CMA_LINESPACING \|
1695	CMA_CXTREEINDENT \| CMA_PSORTRECORD));
1696	SetCnrCols(hwnd,FALSE);
1697	AdjustCnrColsForPref(hwnd,
1698	NULL,
1699	dcd,
1700	FALSE);
1701	if (_beginthread(MakeObjWin,
1702	NULL,
1703	245760,
1704	(PVOID)dcd) == -1) {
1705	PostMsg(hwnd,
1706	WM_CLOSE,
1707	MPVOID,
1708	MPVOID);
1709	return 0;
1710	}
1711	else
1712	DosSleep(64L);
1713	WinEnableMenuItem(DirCnrMenu,IDM_FINDINTREE,
1714	(hwndTree != (HWND)0));
1715	}
1716	SayFilter(WinWindowFromID(WinQueryWindow(hwnd,QW_PARENT),
1717	DIR_FILTER),&dcd->mask,FALSE);
1718	SaySort(WinWindowFromID(WinQueryWindow(hwnd,QW_PARENT),
1719	DIR_SORT),dcd->sortFlags,FALSE);
1720	SayView(WinWindowFromID(WinQueryWindow(hwnd,QW_PARENT),
1721	DIR_VIEW),dcd->flWindowAttr);
1722	}
1723	else {
1724	PostMsg(hwnd,
1725	WM_CLOSE,
1726	MPVOID,
1727	MPVOID);
1728	return 0;
1729	}
1730	return 0;
1731
1732	case WM_MENUEND:
1733	if (dcd) {
1734
1735	HWND hwndMenu = (HWND)mp2;
1736
1737	if (hwndMenu == DirCnrMenu \|\|
1738	hwndMenu == FileMenu \|\|
1739	hwndMenu == DirMenu)
1740	{
1741	MarkAll(hwnd,TRUE,FALSE,TRUE);
1742	if (dcd->cnremphasized) {
1743	WinSendMsg(hwnd,CM_SETRECORDEMPHASIS,MPVOID,
1744	MPFROM2SHORT(FALSE,CRA_SOURCE));
1745	dcd->cnremphasized = FALSE;
1746	}
1747	}
1748	}
1749	break;
1750
1751	case UM_OPENWINDOWFORME:
1752	if (dcd) {
1753	if (mp1 && !IsFile((CHAR *)mp1)) {
1754	OpenDirCnr(hwnd,
1755	dcd->hwndParent,
1756	dcd->hwndFrame,
1757	FALSE,
1758	(char *)mp1);
1759	}
1760	else if (mp1 && IsFile(mp1) == 1) {
1761	StartArcCnr(HWND_DESKTOP,
1762	dcd->hwndFrame,
1763	(CHAR *)mp1,
1764	4,
1765	(ARC_TYPE *)mp2);
1766	}
1767	}
1768	return 0;
1769
1770	case MM_PORTHOLEINIT:
1771	if (dcd) {
1772	switch(SHORT1FROMMP(mp1)) {
1773	case 0:
1774	case 1:
1775	{
1776	ULONG wmsg;
1777
1778	wmsg = (SHORT1FROMMP(mp1) == 0) ? UM_FILESMENU : UM_VIEWSMENU;
1779	PortholeInit((HWND)WinSendMsg(dcd->hwndClient,
1780	wmsg,
1781	MPVOID,
1782	MPVOID),
1783	mp1,
1784	mp2);
1785	}
1786	break;
1787	}
1788	}
1789	break;
1790
1791	case UM_INITMENU:
1792	case WM_INITMENU:
1793	if (dcd) {
1794	switch(SHORT1FROMMP(mp1)) {
1795	case IDM_FILESMENU:
1796	if (isalpha(*dcd->directory)) {
1797	if (driveflags[toupper(*dcd->directory) - 'A'] & DRIVE_NOTWRITEABLE) {
1798	WinEnableMenuItem((HWND)mp2,IDM_MOVEMENU,FALSE);
1799	WinEnableMenuItem((HWND)mp2,IDM_RENAME,FALSE);
1800	WinEnableMenuItem((HWND)mp2,IDM_MKDIR,FALSE);
1801	WinEnableMenuItem((HWND)mp2,IDM_UNDELETE,FALSE);
1802	WinEnableMenuItem((HWND)mp2,IDM_DELETESUBMENU,FALSE);
1803	WinEnableMenuItem((HWND)mp2,IDM_DELETE,FALSE);
1804	WinEnableMenuItem((HWND)mp2,IDM_EDIT,FALSE);
1805	WinEnableMenuItem((HWND)mp2,IDM_EDITTEXT,FALSE);
1806	WinEnableMenuItem((HWND)mp2,IDM_EDITBINARY,FALSE);
1807	WinEnableMenuItem((HWND)mp2,IDM_ATTRS,FALSE);
1808	}
1809	else {
1810	WinEnableMenuItem((HWND)mp2,IDM_MOVEMENU,TRUE);
1811	WinEnableMenuItem((HWND)mp2,IDM_RENAME,TRUE);
1812	WinEnableMenuItem((HWND)mp2,IDM_MKDIR,TRUE);
1813	WinEnableMenuItem((HWND)mp2,IDM_UNDELETE,TRUE);
1814	WinEnableMenuItem((HWND)mp2,IDM_DELETESUBMENU,TRUE);
1815	WinEnableMenuItem((HWND)mp2,IDM_DELETE,TRUE);
1816	WinEnableMenuItem((HWND)mp2,IDM_EDIT,TRUE);
1817	WinEnableMenuItem((HWND)mp2,IDM_EDITTEXT,TRUE);
1818	WinEnableMenuItem((HWND)mp2,IDM_EDITBINARY,TRUE);
1819	WinEnableMenuItem((HWND)mp2,IDM_ATTRS,TRUE);
1820	}
1821	}
1822	break;
1823
1824	case IDM_VIEWSMENU:
1825	SetViewMenu((HWND)mp2,dcd->flWindowAttr);
1826	WinEnableMenuItem((HWND)mp2,IDM_RESELECT,
1827	(dcd->lastselection != NULL));
1828	if (isalpha(*dcd->directory)) {
1829	if (driveflags[toupper(*dcd->directory) - 'A'] &
1830	DRIVE_NOTWRITEABLE)
1831	WinEnableMenuItem((HWND)mp2,
1832	IDM_MKDIR,
1833	FALSE);
1834	else
1835	WinEnableMenuItem((HWND)mp2,
1836	IDM_MKDIR,
1837	TRUE);
1838	}
1839	WinEnableMenuItem((HWND)mp2,
1840	IDM_SELECTCOMPAREMENU,
1841	(CountDirCnrs(dcd->hwndParent) > 1));
1842	break;
1843
1844	case IDM_DETAILSSETUP:
1845	SetDetailsSwitches((HWND)mp2,dcd);
1846	break;
1847
1848	case IDM_COMMANDSMENU:
1849	SetupCommandMenu((HWND)mp2,hwnd);
1850	break;
1851
1852	case IDM_SORTSUBMENU:
1853	SetSortChecks((HWND)mp2,dcd->sortFlags);
1854	break;
1855
1856	case IDM_WINDOWSMENU:
1857	SetupWinList((HWND)mp2,
1858	(hwndMain) ? hwndMain : (HWND)0,
1859	dcd->hwndFrame);
1860	break;
1861	}
1862	dcd->hwndLastMenu = (HWND)mp2;
1863	}
1864	if (msg == WM_INITMENU)
1865	break;
1866	return 0;
1867
1868	case UM_FILTER:
1869	if (dcd) {
1870
1871	PCNRITEM pci;
1872
1873	if (mp1) {
1874	DosEnterCritSec();
1875	SetMask((CHAR *)mp1,&dcd->mask);
1876	DosExitCritSec();
1877	}
1878	dcd->suspendview = 1;
1879	WinSendMsg(hwnd,CM_FILTER,MPFROMP(Filter),MPFROMP(&dcd->mask));
1880	dcd->suspendview = 0;
1881	if (fAutoView && hwndMain) {
1882	pci = WinSendMsg(hwnd,CM_QUERYRECORDEMPHASIS,
1883	MPFROMLONG(CMA_FIRST),
1884	MPFROMSHORT(CRA_CURSORED));
1885	if (pci && (INT)pci != -1 &&
1886	(!(driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_SLOW)))
1887	WinSendMsg(hwndMain,
1888	UM_LOADFILE,
1889	MPFROMP(pci->szFileName),
1890	MPVOID);
1891	else
1892	WinSendMsg(hwndMain,
1893	UM_LOADFILE,
1894	MPVOID,
1895	MPVOID);
1896	}
1897	PostMsg(hwnd,
1898	UM_RESCAN,
1899	MPVOID,
1900	MPVOID);
1901	}
1902	return 0;
1903
1904	case UM_COMMAND:
1905	if (mp1) {
1906	if (dcd) {
1907	if (!PostMsg(dcd->hwndObject,
1908	UM_COMMAND,
1909	mp1,
1910	mp2))
1911	{
1912	FreeListInfo((LISTINFO *)mp1);
1913	DosBeep(50,100);
1914	}
1915	else
1916	return (MRESULT)TRUE;
1917	}
1918	else
1919	FreeListInfo((LISTINFO *)mp1);
1920	}
1921	return 0;
1922
1923	case UM_NOTIFY:
1924	if (mp2)
1925	Notify((CHAR *)mp2);
1926	return 0;
1927
1928	case UM_DRIVECMD:
1929	if (mp1)
1930	WinSendMsg(hwnd,
1931	WM_COMMAND,
1932	MPFROM2SHORT(IDM_SWITCH,0),
1933	mp1);
1934	return 0;
1935
1936	case WM_COMMAND:
1937	DosError(FERR_DISABLEHARDERR);
1938	if (dcd) {
1939	switch(SHORT1FROMMP(mp1)) {
1940	case IDM_SETTARGET:
1941	SetTargetDir(hwnd,FALSE);
1942	break;
1943
1944	case IDM_CREATE:
1945	{
1946	STRINGINPARMS sip;
1947	CHAR filename[CCHMAXPATHCOMP];
1948
1949	memset(&sip,0,sizeof(sip));
1950	sip.help = GetPString(IDS_CREATETEXT);
1951	sip.prompt = GetPString(IDS_CREATEPROMPTTEXT);
1952	sip.inputlen = CCHMAXPATHCOMP - (strlen(dcd->directory) - 1);
1953	strcpy(filename,"NEWFILE.TXT");
1954	sip.ret = filename;
1955	sip.title = GetPString(IDS_CREATETITLETEXT);
1956	if (WinDlgBox(HWND_DESKTOP,hwnd,InputDlgProc,FM3ModHandle,
1957	STR_FRAME,&sip))
1958	{
1959	bstrip(sip.ret);
1960	if (*sip.ret)
1961	{
1962	CHAR newfile[CCHMAXPATH];
1963	FILE *fp;
1964	INT test;
1965	PCNRITEM pci;
1966
1967	strcpy(newfile,dcd->directory);
1968	if (newfile[strlen(newfile) - 1] != '\\')
1969	strcat(newfile,"\\");
1970	strcat(newfile,sip.ret);
1971	test = IsFile(newfile);
1972	if (test != 1)
1973	fp = fopen(newfile,"w");
1974	if (test == 1 \|\| fp) {
1975	if (fp) {
1976	WinSendMsg(hwnd,
1977	UM_UPDATERECORD,
1978	MPFROMP(newfile),
1979	MPVOID);
1980	fclose(fp);
1981	}
1982	if (*editor) {
1983
1984	CHAR *dummy[2];
1985
1986	dummy[0] = newfile;
1987	dummy[1] = NULL;
1988	ExecOnList(hwnd,
1989	editor,
1990	WINDOWED \| SEPARATE,
1991	NULL,
1992	dummy,
1993	NULL);
1994	}
1995	else
1996	StartMLEEditor(dcd->hwndParent,
1997	4,
1998	newfile,
1999	dcd->hwndFrame);
2000	pci = FindCnrRecord(hwnd,
2001	newfile,
2002	NULL,
2003	TRUE,
2004	FALSE,
2005	TRUE);
2006	if (pci && (INT)pci != -1)
2007	/* make sure that record shows in viewport */
2008	ShowCnrRecord(hwnd,(PMINIRECORDCORE)pci);
2009	}
2010	else
2011	saymsg(MB_ENTER,
2012	hwnd,
2013	GetPString(IDS_ERRORTEXT),
2014	GetPString(IDS_CREATEERRORTEXT),
2015	newfile);
2016	}
2017	}
2018	}
2019	break;
2020
2021	case IDM_CONTEXTMENU:
2022	{
2023	PCNRITEM pci;
2024
2025	pci = (PCNRITEM)CurrentRecord(hwnd);
2026	PostMsg(hwnd,WM_CONTROL,MPFROM2SHORT(DIR_CNR,CN_CONTEXTMENU),
2027	MPFROMP(pci));
2028	}
2029	break;
2030
2031	case IDM_MAXIMIZE:
2032	PostMsg(hwndMain,
2033	UM_MAXIMIZE,
2034	MPFROMLONG(dcd->hwndFrame),
2035	MPVOID);
2036	break;
2037
2038	case IDM_SHOWALLFILESCNR:
2039	StartSeeAll(HWND_DESKTOP,FALSE,dcd->directory);
2040	break;
2041
2042	case IDM_SHOWALLFILES:
2043	{
2044	PCNRITEM pci;
2045
2046	pci = WinSendMsg(hwnd,CM_QUERYRECORDEMPHASIS,
2047	MPFROMLONG(CMA_FIRST),
2048	MPFROMSHORT(CRA_CURSORED));
2049	if (pci && (INT)pci != -1) {
2050
2051	static CHAR dirname[CCHMAXPATH];
2052
2053	strcpy(dirname,pci->szFileName);
2054	MakeValidDir(dirname);
2055	StartSeeAll(HWND_DESKTOP,FALSE,dirname);
2056	}
2057	}
2058	break;
2059
2060	case IDM_FINDINTREE:
2061	if (hwndTree)
2062	WinSendMsg(hwndTree,UM_SHOWME,MPFROMP(dcd->directory),
2063	MPFROMLONG(1L));
2064	break;
2065
2066	case IDM_BEGINEDIT:
2067	OpenEdit(hwnd);
2068	break;
2069
2070	case IDM_ENDEDIT:
2071	WinSendMsg(hwnd,
2072	CM_CLOSEEDIT,
2073	MPVOID,
2074	MPVOID);
2075	break;
2076
2077	case IDM_SHOWSELECT:
2078	QuickPopup(hwnd,
2079	dcd,
2080	CheckMenu(&DirCnrMenu,DIRCNR_POPUP),
2081	IDM_SELECTSUBMENU);
2082	break;
2083
2084	case IDM_SHOWSORT:
2085	QuickPopup(hwnd,dcd,CheckMenu(&DirCnrMenu,DIRCNR_POPUP),
2086	IDM_SORTSUBMENU);
2087	break;
2088
2089	case IDM_VIEWORARC:
2090	{
2091	SWP swp;
2092	PCNRITEM pci;
2093
2094	pci = (PCNRITEM)WinSendMsg(hwnd,CM_QUERYRECORDEMPHASIS,
2095	MPFROMLONG(CMA_FIRST),
2096	MPFROMSHORT(CRA_CURSORED));
2097	if (pci && (INT)pci != -1) {
2098	WinQueryWindowPos(dcd->hwndFrame,&swp);
2099	DefaultViewKeys(hwnd,
2100	dcd->hwndFrame,
2101	dcd->hwndParent,
2102	&swp,
2103	pci->szFileName);
2104	}
2105	}
2106	break;
2107
2108	case IDM_NOTEBOOK:
2109	if (!ParentIsDesktop(dcd->hwndParent,dcd->hwndParent))
2110	PostMsg(dcd->hwndParent,msg,mp1,mp2);
2111	else
2112	WinDlgBox(HWND_DESKTOP,hwnd,CfgDlgProc,FM3ModHandle,
2113	CFG_FRAME,(PVOID)"Directory");
2114	break;
2115
2116	case IDM_QTREE:
2117	case IDM_TREE:
2118	{
2119	CHAR newpath[CCHMAXPATH];
2120	APIRET rc;
2121	PCNRITEM pci;
2122
2123	if (SHORT1FROMMP(mp1) == IDM_TREE) {
2124	pci = (PCNRITEM)CurrentRecord(hwnd);
2125	if (pci && (INT)pci != -1)
2126	strcpy(newpath,pci->szFileName);
2127	else
2128	strcpy(newpath,dcd->directory);
2129	}
2130	else
2131	strcpy(newpath,dcd->directory);
2132	MakeValidDir(newpath);
2133	rc = WinDlgBox(HWND_DESKTOP,dcd->hwndClient,ObjCnrDlgProc,
2134	FM3ModHandle,QTREE_FRAME,MPFROMP(newpath));
2135	if (rc)
2136	WinSendMsg(hwnd,UM_SETDIR,MPFROMP(newpath),MPVOID);
2137	}
2138	break;
2139
2140	case IDM_RESELECT:
2141	SelectList(hwnd,TRUE,FALSE,FALSE,NULL,NULL,
2142	dcd->lastselection);
2143	break;
2144
2145	case IDM_HELP:
2146	if (hwndHelp) {
2147	if (!ParentIsDesktop(dcd->hwndFrame,dcd->hwndParent))
2148	PostMsg(dcd->hwndParent,UM_COMMAND,mp1,mp2);
2149	else
2150	WinSendMsg(hwndHelp,HM_HELP_CONTENTS,MPVOID,MPVOID);
2151	}
2152	break;
2153
2154	case IDM_WINDOWDLG:
2155	if (!ParentIsDesktop(dcd->hwndFrame,dcd->hwndParent))
2156	PostMsg(dcd->hwndParent,UM_COMMAND,
2157	MPFROM2SHORT(IDM_WINDOWDLG,0),MPVOID);
2158	break;
2159
2160	case IDM_SORTSMARTNAME:
2161	case IDM_SORTNAME:
2162	case IDM_SORTFILENAME:
2163	case IDM_SORTSIZE:
2164	case IDM_SORTEASIZE:
2165	case IDM_SORTFIRST:
2166	case IDM_SORTLAST:
2167	case IDM_SORTLWDATE:
2168	case IDM_SORTLADATE:
2169	case IDM_SORTCRDATE:
2170	case IDM_SORTSUBJECT:
2171	dcd->sortFlags &= (SORT_REVERSE \| SORT_DIRSFIRST \| SORT_DIRSLAST);
2172	case IDM_SORTDIRSFIRST:
2173	case IDM_SORTDIRSLAST:
2174	case IDM_SORTREVERSE:
2175	switch(SHORT1FROMMP(mp1)) {
2176	case IDM_SORTSUBJECT:
2177	dcd->sortFlags \|= SORT_SUBJECT;
2178	break;
2179	case IDM_SORTSMARTNAME:
2180	case IDM_SORTFILENAME:
2181	dcd->sortFlags \|= SORT_FILENAME;
2182	break;
2183	case IDM_SORTSIZE:
2184	dcd->sortFlags \|= SORT_SIZE;
2185	break;
2186	case IDM_SORTEASIZE:
2187	dcd->sortFlags \|= SORT_EASIZE;
2188	break;
2189	case IDM_SORTFIRST:
2190	dcd->sortFlags \|= SORT_FIRSTEXTENSION;
2191	break;
2192	case IDM_SORTLAST:
2193	dcd->sortFlags \|= SORT_LASTEXTENSION;
2194	break;
2195	case IDM_SORTLWDATE:
2196	dcd->sortFlags \|= SORT_LWDATE;
2197	break;
2198	case IDM_SORTLADATE:
2199	dcd->sortFlags \|= SORT_LADATE;
2200	break;
2201	case IDM_SORTCRDATE:
2202	dcd->sortFlags \|= SORT_CRDATE;
2203	break;
2204	case IDM_SORTDIRSFIRST:
2205	if (dcd->sortFlags & SORT_DIRSFIRST)
2206	dcd->sortFlags &= (~SORT_DIRSFIRST);
2207	else {
2208	dcd->sortFlags \|= SORT_DIRSFIRST;
2209	dcd->sortFlags &= (~SORT_DIRSLAST);
2210	}
2211	break;
2212	case IDM_SORTDIRSLAST:
2213	if (dcd->sortFlags & SORT_DIRSLAST)
2214	dcd->sortFlags &= (~SORT_DIRSLAST);
2215	else {
2216	dcd->sortFlags \|= SORT_DIRSLAST;
2217	dcd->sortFlags &= (~SORT_DIRSFIRST);
2218	}
2219	break;
2220	case IDM_SORTREVERSE:
2221	if (dcd->sortFlags & SORT_REVERSE)
2222	dcd->sortFlags &= (~SORT_REVERSE);
2223	else
2224	dcd->sortFlags \|= SORT_REVERSE;
2225	break;
2226	}
2227	WinSendMsg(hwnd,CM_SORTRECORD,MPFROMP(SortDirCnr),
2228	MPFROMLONG(dcd->sortFlags));
2229	SaySort(WinWindowFromID(WinQueryWindow(hwnd,QW_PARENT),
2230	DIR_SORT),dcd->sortFlags,FALSE);
2231	break;
2232
2233	case IDM_COLLECT:
2234	if (!Collector) {
2235
2236	HWND hwndC;
2237	SWP swp;
2238
2239	if (!ParentIsDesktop(hwnd,dcd->hwndParent) && !fAutoTile &&
2240	(!fExternalCollector && !strcmp(realappname,FM3Str)))
2241	GetNextWindowPos(dcd->hwndParent,&swp,NULL,NULL);
2242	hwndC = StartCollector((fExternalCollector \|\|
2243	strcmp(realappname,FM3Str)) ?
2244	HWND_DESKTOP :
2245	dcd->hwndParent,4);
2246	if (hwndC) {
2247	if (!ParentIsDesktop(hwnd,dcd->hwndParent) && !fAutoTile &&
2248	(!fExternalCollector && !strcmp(realappname,FM3Str)))
2249	WinSetWindowPos(hwndC,HWND_TOP,swp.x,swp.y,
2250	swp.cx,swp.cy,SWP_MOVE \| SWP_SIZE \|
2251	SWP_SHOW \| SWP_ZORDER);
2252	else if (!ParentIsDesktop(hwnd,dcd->hwndParent) && fAutoTile &&
2253	!strcmp(realappname,FM3Str))
2254	TileChildren(dcd->hwndParent,TRUE);
2255	WinSetWindowPos(hwndC,HWND_TOP,0,0,0,0,SWP_ACTIVATE);
2256	DosSleep(250L);
2257	}
2258	}
2259	else
2260	StartCollector(dcd->hwndParent,4);
2261	PostMsg(hwnd,WM_COMMAND,MPFROM2SHORT(IDM_COLLECTOR,0),MPVOID);
2262	break;
2263
2264	case IDM_COLLECTOR:
2265	DosSleep(64L);
2266	{
2267	CHAR **list;
2268
2269	list = BuildList(hwnd);
2270	if (list) {
2271	if (Collector) {
2272	if (!PostMsg(Collector,
2273	WM_COMMAND,
2274	MPFROM2SHORT(IDM_COLLECTOR,0),
2275	MPFROMP(list)))
2276	FreeList(list);
2277	else if (fUnHilite)
2278	UnHilite(hwnd,TRUE,&dcd->lastselection);
2279	}
2280	else
2281	FreeList(list);
2282	}
2283	}
2284	break;
2285
2286	case IDM_UNDELETE:
2287	{
2288	PCNRITEM pci;
2289	CHAR path[CCHMAXPATH];
2290
2291	pci = (PCNRITEM)CurrentRecord(hwnd);
2292	if (pci && (INT)pci != -1) {
2293	strcpy(path,pci->szFileName);
2294	MakeValidDir(path);
2295	WinDlgBox(HWND_DESKTOP,hwnd,UndeleteDlgProc,FM3ModHandle,
2296	UNDEL_FRAME,MPFROMP(path));
2297	}
2298	}
2299	break;
2300
2301	case IDM_UNDELETESPEC:
2302	WinDlgBox(HWND_DESKTOP,
2303	hwnd,
2304	UndeleteDlgProc,
2305	FM3ModHandle,
2306	UNDEL_FRAME,
2307	MPFROMP(dcd->directory));
2308	break;
2309
2310	case IDM_RESORT:
2311	// WinSendMsg(hwnd,
2312	// CM_SORTRECORD,
2313	// MPFROMP(SortDirCnr),
2314	// MPFROMLONG((fSyncUpdates) ? sortFlags : dcd->sortFlags));
2315	WinSendMsg(hwnd,
2316	CM_SORTRECORD,
2317	MPFROMP(SortDirCnr),
2318	MPFROMLONG(dcd->sortFlags));
2319	break;
2320
2321	case IDM_FILTER:
2322	{
2323	BOOL empty = FALSE;
2324	PCNRITEM pci;
2325	CHAR *p;
2326
2327	if (!*dcd->mask.szMask) {
2328	empty = TRUE;
2329	pci = (PCNRITEM)CurrentRecord(hwnd);
2330	if (pci && !(pci->attrFile & FILE_DIRECTORY)) {
2331	p = strrchr(pci->szFileName,'\\');
2332	if (p) {
2333	p++;
2334	strcpy(dcd->mask.szMask,p);
2335	}
2336	}
2337	}
2338	*(dcd->mask.prompt) = 0;
2339
2340	if (WinDlgBox(HWND_DESKTOP,hwnd,PickMaskDlgProc,
2341	FM3ModHandle,MSK_FRAME,MPFROMP(&dcd->mask)))
2342	WinSendMsg(hwnd,UM_FILTER,MPVOID,MPVOID);
2343	else if (empty)
2344	*dcd->mask.szMask = 0;
2345	SayFilter(WinWindowFromID(WinQueryWindow(hwnd,QW_PARENT),
2346	DIR_FILTER),&dcd->mask,FALSE);
2347	}
2348	break;
2349
2350	case IDM_HIDEALL:
2351	if (fAutoView && hwndMain)
2352	PostMsg(hwndMain,
2353	UM_LOADFILE,
2354	MPVOID,
2355	MPVOID);
2356	dcd->suspendview = 1;
2357	HideAll(hwnd);
2358	dcd->suspendview = 0;
2359	PostMsg(hwnd,
2360	UM_RESCAN,
2361	MPVOID,
2362	MPVOID);
2363	break;
2364
2365	case IDM_SELECTBOTH:
2366	case IDM_SELECTONE:
2367	case IDM_SELECTMORE:
2368	case IDM_SELECTNEWER:
2369	case IDM_SELECTOLDER:
2370	case IDM_SELECTBIGGER:
2371	case IDM_SELECTSMALLER:
2372	case IDM_DESELECTBOTH:
2373	case IDM_DESELECTONE:
2374	case IDM_DESELECTMORE:
2375	case IDM_DESELECTNEWER:
2376	case IDM_DESELECTOLDER:
2377	case IDM_DESELECTBIGGER:
2378	case IDM_DESELECTSMALLER:
2379	if (ParentIsDesktop(hwnd,dcd->hwndParent)) {
2380	DosBeep(50,100);
2381	break;
2382	}
2383	case IDM_SELECTLIST:
2384	case IDM_SELECTALL:
2385	case IDM_DESELECTALL:
2386	case IDM_SELECTALLFILES:
2387	case IDM_DESELECTALLFILES:
2388	case IDM_SELECTALLDIRS:
2389	case IDM_DESELECTALLDIRS:
2390	case IDM_SELECTMASK:
2391	case IDM_DESELECTMASK:
2392	case IDM_INVERT:
2393	case IDM_SELECTCLIP:
2394	case IDM_DESELECTCLIP:
2395	{
2396	PCNRITEM pci;
2397
2398	pci = (PCNRITEM)CurrentRecord(hwnd);
2399	if ((INT)pci == -1)
2400	pci = NULL;
2401	if (SHORT1FROMMP(mp1) == IDM_HIDEALL) {
2402	if (pci) {
2403	if (!(pci->rc.flRecordAttr & CRA_SELECTED))
2404	pci->rc.flRecordAttr \|= CRA_FILTERED;
2405	WinSendMsg(hwnd,CM_INVALIDATERECORD,MPFROMP(&pci),
2406	MPFROM2SHORT(1,CMA_ERASE \| CMA_REPOSITION));
2407	break;
2408	}
2409	}
2410	PostMsg(dcd->hwndObject,
2411	UM_SELECT,
2412	mp1,
2413	MPFROMP(pci));
2414	}
2415	break;
2416
2417	case IDM_RESCAN:
2418	DosEnterCritSec();
2419	dcd->stopflag++;
2420	DosExitCritSec();
2421	if (!PostMsg(dcd->hwndObject,
2422	UM_RESCAN,
2423	MPVOID,
2424	MPVOID))
2425	{
2426	DosEnterCritSec();
2427	dcd->stopflag--;
2428	DosExitCritSec();
2429	}
2430	break;
2431
2432	case IDM_SHOWLNAMES:
2433	case IDM_SHOWSUBJECT:
2434	case IDM_SHOWEAS:
2435	case IDM_SHOWSIZE:
2436	case IDM_SHOWICON:
2437	case IDM_SHOWLWDATE:
2438	case IDM_SHOWLWTIME:
2439	case IDM_SHOWLADATE:
2440	case IDM_SHOWLATIME:
2441	case IDM_SHOWCRDATE:
2442	case IDM_SHOWCRTIME:
2443	case IDM_SHOWATTR:
2444	AdjustDetailsSwitches(hwnd,
2445	dcd->hwndLastMenu,
2446	SHORT1FROMMP(mp1),
2447	dcd->directory,
2448	"DirCnr",
2449	dcd,
2450	FALSE);
2451	break;
2452
2453	case IDM_TREEVIEW:
2454	case IDM_ICON:
2455	case IDM_TEXT:
2456	case IDM_DETAILS:
2457	case IDM_NAME:
2458	case IDM_MINIICONS:
2459	case IDM_DETAILSTITLES:
2460	{
2461	CNRINFO cnri;
2462
2463	memset(&cnri,0,sizeof(CNRINFO));
2464	cnri.cb = sizeof(CNRINFO);
2465	WinSendMsg(hwnd,CM_QUERYCNRINFO,MPFROMP(&cnri),
2466	MPFROMLONG(sizeof(CNRINFO)));
2467	switch(SHORT1FROMMP(mp1)) {
2468	case IDM_TREEVIEW:
2469	if (!(cnri.flWindowAttr & CV_TREE))
2470	dcd->lastattr = cnri.flWindowAttr;
2471	cnri.flWindowAttr &= (~(CV_ICON \| CV_TREE \| CV_TEXT \|
2472	CV_DETAIL \| CV_NAME \| CA_TREELINE));
2473	cnri.flWindowAttr \|= CA_TREELINE \| CV_TREE \| CV_ICON;
2474	if (!dcd->firsttree)
2475	PostMsg(dcd->hwndObject,UM_FLESH,MPVOID,MPVOID);
2476	break;
2477	case IDM_ICON:
2478	cnri.flWindowAttr &= (~(CV_ICON \| CV_TREE \| CV_TEXT \|
2479	CV_DETAIL \| CV_NAME \| CA_TREELINE));
2480	cnri.flWindowAttr \|= CV_ICON;
2481	break;
2482	case IDM_NAME:
2483	cnri.flWindowAttr &= (~(CV_ICON \| CV_TREE \| CV_TEXT \|
2484	CV_DETAIL \| CV_NAME \| CA_TREELINE));
2485	cnri.flWindowAttr \|= CV_NAME;
2486	break;
2487	case IDM_TEXT:
2488	cnri.flWindowAttr &= (~(CV_ICON \| CV_TREE \| CV_TEXT \|
2489	CV_DETAIL \| CV_NAME \| CA_TREELINE));
2490	cnri.flWindowAttr \|= CV_TEXT;
2491	break;
2492	case IDM_DETAILS:
2493	cnri.flWindowAttr &= (~(CV_ICON \| CV_TREE \| CV_TEXT \|
2494	CV_DETAIL \| CV_NAME \| CA_TREELINE));
2495	cnri.flWindowAttr \|= CV_DETAIL;
2496	break;
2497	case IDM_MINIICONS:
2498	if (cnri.flWindowAttr & CV_MINI)
2499	cnri.flWindowAttr &= (~CV_MINI);
2500	else
2501	cnri.flWindowAttr \|= CV_MINI;
2502	break;
2503	case IDM_DETAILSTITLES:
2504	if (cnri.flWindowAttr & CA_DETAILSVIEWTITLES)
2505	cnri.flWindowAttr &= (~CA_DETAILSVIEWTITLES);
2506	else
2507	cnri.flWindowAttr \|= CA_DETAILSVIEWTITLES;
2508	break;
2509	}
2510	cnri.flWindowAttr &= (~(CA_ORDEREDTARGETEMPH \|
2511	CA_MIXEDTARGETEMPH));
2512	cnri.flWindowAttr \|= CV_FLOW;
2513	dcd->flWindowAttr = cnri.flWindowAttr;
2514	WinSendMsg(hwnd,CM_SETCNRINFO,MPFROMP(&cnri),
2515	MPFROMLONG(CMA_FLWINDOWATTR));
2516	WinSendMsg(hwnd,CM_INVALIDATERECORD,MPVOID,
2517	MPFROM2SHORT(0,CMA_ERASE \| CMA_REPOSITION));
2518	SayView(WinWindowFromID(WinQueryWindow(hwnd,QW_PARENT),
2519	DIR_VIEW),dcd->flWindowAttr);
2520	}
2521	break;
2522
2523	case IDM_SAVETOLIST:
2524	WinDlgBox(HWND_DESKTOP,hwnd,SaveListDlgProc,FM3ModHandle,
2525	SAV_FRAME,MPFROMP(&hwnd));
2526	break;
2527
2528	case IDM_SIZES:
2529	{
2530	PCNRITEM pci;
2531	CHAR path[CCHMAXPATH];
2532
2533	pci = (PCNRITEM)CurrentRecord(hwnd);
2534	if (pci && (INT)pci != -1)
2535	strcpy(path,pci->szFileName);
2536	else
2537	strcpy(path,dcd->directory);
2538	MakeValidDir(path);
2539	WinDlgBox(HWND_DESKTOP,
2540	HWND_DESKTOP,
2541	DirSizeProc,
2542	FM3ModHandle,
2543	DSZ_FRAME,
2544	path);
2545	}
2546	break;
2547
2548	case IDM_MKDIR:
2549	{
2550	PCNRITEM pci;
2551
2552	pci = (PCNRITEM)CurrentRecord(hwnd);
2553	PMMkDir(dcd->hwndParent,
2554	((pci && (INT)pci != -1) ?
2555	pci->szFileName :
2556	dcd->directory),
2557	FALSE);
2558	}
2559	break;
2560
2561	case IDM_SWITCH:
2562	if (mp2) {
2563	strcpy(dcd->previous,dcd->directory);
2564	strcpy(dcd->directory,(CHAR *)mp2);
2565	DosEnterCritSec();
2566	dcd->stopflag++;
2567	DosExitCritSec();
2568	if (!PostMsg(dcd->hwndObject,
2569	UM_RESCAN,
2570	MPVOID,
2571	MPFROMLONG(1L)))
2572	{
2573	strcpy(dcd->directory,
2574	dcd->previous);
2575	DosEnterCritSec();
2576	dcd->stopflag--;
2577	DosExitCritSec();
2578	}
2579	else if (*dcd->directory) {
2580	if (hwndMain)
2581	WinSendMsg(hwndMain,
2582	UM_SETUSERLISTNAME,
2583	MPFROMP(dcd->directory),
2584	MPVOID);
2585	else
2586	add_udir(FALSE,dcd->directory);
2587	}
2588	}
2589	break;
2590
2591	case IDM_PARENT:
2592	{
2593	CHAR tempname1[CCHMAXPATH],
2594	tempname2[CCHMAXPATH];
2595
2596	strcpy(tempname1,dcd->directory);
2597	if (tempname1[strlen(tempname1) - 1] != '\\')
2598	strcat(tempname1,"\\");
2599	strcat(tempname1,"..");
2600	DosError(FERR_DISABLEHARDERR);
2601	if (!DosQueryPathInfo(tempname1,
2602	FIL_QUERYFULLNAME,
2603	tempname2,
2604	sizeof(tempname2))) {
2605	if (stricmp(dcd->directory,tempname2)) {
2606	strcpy(dcd->previous,dcd->directory);
2607	strcpy(dcd->directory,tempname2);
2608	DosEnterCritSec();
2609	dcd->stopflag++;
2610	DosExitCritSec();
2611	if (!PostMsg(dcd->hwndObject,
2612	UM_RESCAN,
2613	MPVOID,
2614	MPFROMLONG(1L))) {
2615	strcpy(dcd->directory,dcd->previous);
2616	DosEnterCritSec();
2617	dcd->stopflag--;
2618	DosExitCritSec();
2619	}
2620	else if (*dcd->directory) {
2621	if (hwndMain)
2622	WinSendMsg(hwndMain,
2623	UM_SETUSERLISTNAME,
2624	MPFROMP(dcd->directory),
2625	MPVOID);
2626	else
2627	add_udir(FALSE,
2628	dcd->directory);
2629	}
2630	}
2631	}
2632	}
2633	break;
2634
2635	case IDM_PREVIOUS:
2636	if (*dcd->previous &&
2637	stricmp(dcd->directory,dcd->previous)) {
2638
2639	CHAR tempname[CCHMAXPATH];
2640
2641	if (IsValidDir(dcd->previous)) {
2642	strcpy(tempname,dcd->directory);
2643	strcpy(dcd->directory,dcd->previous);
2644	strcpy(dcd->previous,tempname);
2645	DosEnterCritSec();
2646	dcd->stopflag++;
2647	DosExitCritSec();
2648	if (!PostMsg(dcd->hwndObject,
2649	UM_RESCAN,
2650	MPVOID,
2651	MPFROMLONG(1L))) {
2652	strcpy(dcd->directory,dcd->previous);
2653	DosEnterCritSec();
2654	dcd->stopflag--;
2655	DosExitCritSec();
2656	}
2657	else if (*dcd->directory) {
2658	if (hwndMain)
2659	WinSendMsg(hwndMain,
2660	UM_SETUSERLISTNAME,
2661	MPFROMP(dcd->directory),
2662	MPVOID);
2663	else
2664	add_udir(FALSE,
2665	dcd->directory);
2666	}
2667	}
2668	else
2669	*dcd->previous = 0;
2670	}
2671	break;
2672
2673	case IDM_WALKDIR:
2674	{
2675	CHAR newdir[CCHMAXPATH];
2676
2677	strcpy(newdir,dcd->directory);
2678	if (!WinDlgBox(HWND_DESKTOP,
2679	dcd->hwndParent,
2680	WalkAllDlgProc,
2681	FM3ModHandle,
2682	WALK_FRAME,
2683	MPFROMP(newdir)) \|\|
2684	!*newdir)
2685	break;
2686	if (stricmp(newdir,dcd->directory)) {
2687	strcpy(dcd->previous,dcd->directory);
2688	strcpy(dcd->directory,newdir);
2689	DosEnterCritSec();
2690	dcd->stopflag++;
2691	DosExitCritSec();
2692	if (!PostMsg(dcd->hwndObject,
2693	UM_RESCAN,
2694	MPVOID,
2695	MPFROMLONG(1L))) {
2696	strcpy(dcd->directory,dcd->previous);
2697	DosEnterCritSec();
2698	dcd->stopflag--;
2699	DosExitCritSec();
2700	}
2701	else if (*dcd->directory) {
2702	if (hwndMain)
2703	WinSendMsg(hwndMain,
2704	UM_SETUSERLISTNAME,
2705	MPFROMP(dcd->directory),
2706	MPVOID);
2707	else
2708	add_udir(FALSE,
2709	dcd->directory);
2710	}
2711	}
2712	}
2713	break;
2714
2715	case IDM_OPENICONME:
2716	OpenObject(dcd->directory,
2717	"ICON",
2718	dcd->hwndFrame);
2719	break;
2720	case IDM_OPENDETAILSME:
2721	OpenObject(dcd->directory,
2722	"DETAILS",
2723	dcd->hwndFrame);
2724	break;
2725	case IDM_OPENTREEME:
2726	OpenObject(dcd->directory,
2727	"TREE",
2728	dcd->hwndFrame);
2729	break;
2730	case IDM_OPENSETTINGSME:
2731	OpenObject(dcd->directory,
2732	Settings,
2733	dcd->hwndFrame);
2734	break;
2735
2736	case IDM_DOITYOURSELF:
2737	case IDM_UPDATE:
2738	case IDM_OPENWINDOW:
2739	case IDM_OPENSETTINGS:
2740	case IDM_OPENDEFAULT:
2741	case IDM_OPENICON:
2742	case IDM_OPENDETAILS:
2743	case IDM_OPENTREE:
2744	case IDM_OBJECT:
2745	case IDM_SHADOW:
2746	case IDM_SHADOW2:
2747	case IDM_DELETE:
2748	case IDM_PERMDELETE:
2749	case IDM_PRINT:
2750	case IDM_ATTRS:
2751	case IDM_INFO:
2752	case IDM_COPY:
2753	case IDM_MOVE:
2754	case IDM_WPSMOVE:
2755	case IDM_WPSCOPY:
2756	case IDM_WILDCOPY:
2757	case IDM_WILDMOVE:
2758	case IDM_RENAME:
2759	case IDM_COMPARE:
2760	case IDM_EAS:
2761	case IDM_SUBJECT:
2762	case IDM_VIEW:
2763	case IDM_VIEWTEXT:
2764	case IDM_VIEWBINARY:
2765	case IDM_VIEWARCHIVE:
2766	case IDM_EDIT:
2767	case IDM_EDITTEXT:
2768	case IDM_EDITBINARY:
2769	case IDM_SAVETOCLIP:
2770	case IDM_APPENDTOCLIP:
2771	case IDM_ARCHIVE:
2772	case IDM_ARCHIVEM:
2773	case IDM_EXTRACT:
2774	case IDM_MCIPLAY:
2775	case IDM_COLLECTFROMFILE:
2776	case IDM_UUDECODE:
2777	case IDM_MERGE:
2778	{
2779	LISTINFO *li;
2780	ULONG action = UM_ACTION;
2781
2782	li = malloc(sizeof(LISTINFO));
2783	if (li) {
2784	memset(li,0,sizeof(LISTINFO));
2785	li->type = SHORT1FROMMP(mp1);
2786	li->hwnd = hwnd;
2787	li->list = BuildList(hwnd);
2788	switch(SHORT1FROMMP(mp1)) {
2789	case IDM_WILDMOVE:
2790	case IDM_WILDCOPY:
2791	case IDM_MOVE:
2792	case IDM_COPY:
2793	case IDM_WPSMOVE:
2794	case IDM_WPSCOPY:
2795	break;
2796	default:
2797	strcpy(li->targetpath,dcd->directory);
2798	break;
2799	}
2800	if (li->list) {
2801	if (SHORT1FROMMP(mp1) == IDM_COLLECTFROMFILE) {
2802	if (!Collector) {
2803
2804	HWND hwndC;
2805	SWP swp;
2806
2807	if (!ParentIsDesktop(hwnd,dcd->hwndParent) &&
2808	!fAutoTile &&
2809	(!fExternalCollector && !strcmp(realappname,FM3Str)))
2810	GetNextWindowPos(dcd->hwndParent,&swp,NULL,NULL);
2811	hwndC = StartCollector((fExternalCollector \|\|
2812	strcmp(realappname,FM3Str)) ?
2813	HWND_DESKTOP :
2814	dcd->hwndParent,4);
2815	if (hwndC) {
2816	if (!ParentIsDesktop(hwnd,dcd->hwndParent) &&
2817	!fAutoTile && (!fExternalCollector &&
2818	!strcmp(realappname,FM3Str)))
2819	WinSetWindowPos(hwndC,HWND_TOP,swp.x,swp.y,
2820	swp.cx,swp.cy,SWP_MOVE \| SWP_SIZE \|
2821	SWP_SHOW \| SWP_ZORDER);
2822	else if (!ParentIsDesktop(hwnd,dcd->hwndParent) &&
2823	fAutoTile && !strcmp(realappname,FM3Str))
2824	TileChildren(dcd->hwndParent,TRUE);
2825	WinSetWindowPos(hwndC,HWND_TOP,0,0,0,0,SWP_ACTIVATE);
2826	DosSleep(250L);
2827	}
2828	}
2829	else
2830	StartCollector(dcd->hwndParent,4);
2831	}
2832	switch(SHORT1FROMMP(mp1)) {
2833	case IDM_APPENDTOCLIP:
2834	case IDM_SAVETOCLIP:
2835	case IDM_ARCHIVE:
2836	case IDM_ARCHIVEM:
2837	case IDM_DELETE:
2838	case IDM_PERMDELETE:
2839	case IDM_ATTRS:
2840	case IDM_PRINT:
2841	case IDM_SHADOW:
2842	case IDM_SHADOW2:
2843	case IDM_OBJECT:
2844	case IDM_VIEW:
2845	case IDM_VIEWTEXT:
2846	case IDM_VIEWBINARY:
2847	case IDM_EDIT:
2848	case IDM_EDITTEXT:
2849	case IDM_EDITBINARY:
2850	case IDM_MCIPLAY:
2851	case IDM_UPDATE:
2852	case IDM_DOITYOURSELF:
2853	case IDM_INFO:
2854	case IDM_EAS:
2855	action = UM_MASSACTION;
2856	break;
2857	}
2858	if (SHORT1FROMMP(mp1) == IDM_OBJECT \|\|
2859	SHORT1FROMMP(mp1) == IDM_SHADOW \|\|
2860	SHORT1FROMMP(mp1) == IDM_SHADOW2)
2861	*li->targetpath = 0;
2862	if (!PostMsg(dcd->hwndObject,
2863	action,
2864	MPFROMP(li),
2865	MPVOID)) {
2866	FreeListInfo(li);
2867	DosBeep(50,100);
2868	}
2869	else if (fUnHilite)
2870	UnHilite(hwnd,
2871	TRUE,
2872	&dcd->lastselection);
2873	}
2874	else
2875	free(li);
2876	}
2877	}
2878	break;
2879
2880	case IDM_DRIVESMENU:
2881	if (!hwndMain)
2882	PostMsg(hwnd,
2883	WM_COMMAND,
2884	MPFROM2SHORT(IDM_WALKDIR,0),
2885	MPVOID);
2886	break;
2887
2888	default:
2889	if (SwitchCommand(dcd->hwndLastMenu,
2890	SHORT1FROMMP(mp1)))
2891	return 0;
2892	else {
2893	if (SHORT1FROMMP(mp1) >= IDM_COMMANDSTART &&
2894	SHORT1FROMMP(mp1) < IDM_QUICKTOOLSTART) {
2895
2896	register INT x;
2897
2898	if (!cmdloaded)
2899	load_commands();
2900	x = SHORT1FROMMP(mp1) - IDM_COMMANDSTART;
2901	if (x >= 0) {
2902	x++;
2903	RunCommand(hwnd,x);
2904	if (fUnHilite)
2905	UnHilite(hwnd,
2906	TRUE,
2907	&dcd->lastselection);
2908	}
2909	}
2910	}
2911	break;
2912	}
2913	}
2914	return 0;
2915
2916	case UM_FIXCNRMLE:
2917	case UM_FIXEDITNAME:
2918	return CommonCnrProc(hwnd,msg,mp1,mp2);
2919
2920	case UM_FILESMENU:
2921	{
2922	PCNRITEM pci;
2923	HWND menuHwnd = (HWND)0;
2924
2925	pci = (PCNRITEM)CurrentRecord(hwnd);
2926	if (pci && (INT)pci != -1) {
2927	if (pci->attrFile & FILE_DIRECTORY) {
2928	menuHwnd = CheckMenu(&DirMenu,
2929	DIR_POPUP);
2930	// WinEnableMenuItem(DirMenu,IDM_TREE,TRUE);
2931	}
2932	else
2933	menuHwnd = CheckMenu(&FileMenu,
2934	FILE_POPUP);
2935	}
2936	return MRFROMLONG(menuHwnd);
2937	}
2938
2939	case WM_CONTROL:
2940	DosError(FERR_DISABLEHARDERR);
2941	if (dcd) {
2942	switch(SHORT2FROMMP(mp1)) {
2943	case CN_COLLAPSETREE:
2944	case CN_EXPANDTREE:
2945	{
2946	PCNRITEM pci = (PCNRITEM)mp2;
2947
2948	if (pci &&
2949	(INT)pci != -1 &&
2950	!(pci->flags & RECFLAGS_ENV))
2951	{
2952	if (driveflags[toupper(*pci->szFileName) - 'A'] &
2953	DRIVE_REMOVABLE)
2954	{
2955	struct {
2956	ULONG serial;
2957	CHAR volumelength;
2958	CHAR volumelabel[CCHMAXPATH];
2959	} volser;
2960
2961	memset(&volser,0,sizeof(volser));
2962	DosError(FERR_DISABLEHARDERR);
2963	if (!DosQueryFSInfo(toupper(*pci->szFileName) - '@',
2964	FSIL_VOLSER,
2965	&volser,
2966	(ULONG)sizeof(volser))) {
2967	if (SHORT2FROMMP(mp1) == CN_COLLAPSETREE &&
2968	!volser.serial \|\|
2969	driveserial[toupper(*pci->szFileName) - 'A'] !=
2970	volser.serial)
2971	UnFlesh(hwnd,pci);
2972	if (SHORT2FROMMP(mp1) != CN_COLLAPSETREE \|\|
2973	(!volser.serial \|\|
2974	driveserial[toupper(*pci->szFileName) - 'A'] !=
2975	volser.serial)) {
2976	if (Flesh(hwnd,pci) &&
2977	SHORT2FROMMP(mp1) == CN_EXPANDTREE &&
2978	!dcd->suspendview && fTopDir)
2979	PostMsg(hwnd,UM_TOPDIR,MPFROMP(pci),MPVOID);
2980	}
2981	driveserial[toupper(*pci->szFileName) - 'A'] =
2982	volser.serial;
2983	}
2984	else {
2985	driveserial[toupper(*pci->szFileName) - 'A'] = -1;
2986	UnFlesh(hwnd,pci);
2987	PostMsg(hwnd,
2988	UM_RESCAN,
2989	MPVOID,
2990	MPVOID);
2991	DosBeep(250,100);
2992	}
2993	}
2994	else if (SHORT2FROMMP(mp1) == CN_EXPANDTREE) {
2995	if (Flesh(hwnd,pci) &&
2996	!dcd->suspendview && fTopDir)
2997	PostMsg(hwnd,
2998	UM_TOPDIR,
2999	MPFROMP(pci),
3000	MPVOID);
3001	}
3002	if (SHORT2FROMMP(mp1) == CN_EXPANDTREE &&
3003	!dcd->suspendview)
3004	WinSendMsg(hwnd,
3005	UM_FILTER,
3006	MPVOID,
3007	MPVOID);
3008	}
3009	}
3010	break;
3011
3012	/*
3013	case CN_PICKUP:
3014	return PickUp(hwnd,dcd->hwndObject,mp2);
3015	*/
3016
3017	case CN_CONTEXTMENU:
3018	{
3019	PCNRITEM pci = (PCNRITEM)mp2;
3020
3021	if (pci) {
3022	WinSendMsg(hwnd,
3023	CM_SETRECORDEMPHASIS,
3024	MPFROMP(pci),
3025	MPFROM2SHORT(TRUE,CRA_CURSORED));
3026	MarkAll(hwnd,
3027	FALSE,
3028	FALSE,
3029	TRUE);
3030	if (pci->attrFile & FILE_DIRECTORY)
3031	dcd->hwndLastMenu = CheckMenu(&DirMenu,DIR_POPUP);
3032	else
3033	dcd->hwndLastMenu = CheckMenu(&FileMenu,FILE_POPUP);
3034	}
3035	else {
3036	dcd->hwndLastMenu = CheckMenu(&DirCnrMenu,DIRCNR_POPUP);
3037	if (dcd->hwndLastMenu && !dcd->cnremphasized) {
3038	WinSendMsg(hwnd,
3039	CM_SETRECORDEMPHASIS,
3040	MPVOID,
3041	MPFROM2SHORT(TRUE,CRA_SOURCE));
3042	dcd->cnremphasized = TRUE;
3043	}
3044	}
3045	if (dcd->hwndLastMenu) {
3046	if (dcd->hwndLastMenu == DirCnrMenu) {
3047	if (dcd->flWindowAttr & CV_MINI)
3048	WinCheckMenuItem(dcd->hwndLastMenu,
3049	IDM_MINIICONS,
3050	TRUE);
3051	}
3052	if (dcd->hwndLastMenu == DirMenu)
3053	WinEnableMenuItem(DirMenu,
3054	IDM_TREE,
3055	TRUE);
3056	if (!PopupMenu(hwnd,hwnd,dcd->hwndLastMenu)) {
3057	if (dcd->cnremphasized) {
3058	WinSendMsg(hwnd,
3059	CM_SETRECORDEMPHASIS,
3060	MPVOID,
3061	MPFROM2SHORT(FALSE,CRA_SOURCE));
3062	dcd->cnremphasized = TRUE;
3063	}
3064	MarkAll(hwnd,TRUE,FALSE,TRUE);
3065	}
3066	}
3067	}
3068	break;
3069
3070	case CN_DROPHELP:
3071	if (mp2) {
3072
3073	PDRAGINFO pDInfo;
3074	PCNRITEM pci;
3075	ULONG numitems;
3076	USHORT usOperation;
3077
3078	pci = (PCNRITEM)((PCNRDRAGINFO)mp2)->pRecord;
3079	pDInfo = (PDRAGINFO)((PCNRDRAGINFO)mp2)->pDragInfo;
3080	if (!DrgAccessDraginfo(pDInfo)) {
3081	Win_Error(hwnd,hwnd,__FILE__,__LINE__,
3082	GetPString(IDS_DROPERRORTEXT));
3083	break;
3084	}
3085	numitems = DrgQueryDragitemCount(pDInfo);
3086	usOperation = pDInfo->usOperation;
3087	DrgDeleteDraginfoStrHandles(pDInfo);
3088	DrgFreeDraginfo(pDInfo);
3089	saymsg(MB_ENTER \| MB_ICONASTERISK,
3090	hwnd,
3091	GetPString(IDS_DROPHELPHDRTEXT),
3092	GetPString(IDS_DROPHELPTEXT),
3093	numitems,
3094	&"s"[numitems == 1L],
3095	(pci) ? NullStr : GetPString(IDS_NOTEXT),
3096	(pci) ? NullStr : " ",
3097	(pci) ? pci->szFileName : NullStr,
3098	(pci) ? " " : NullStr,
3099	GetPString((usOperation == DO_COPY) ?
3100	IDS_COPYTEXT :
3101	(usOperation == DO_LINK) ?
3102	IDS_LINKTEXT : IDS_MOVETEXT));
3103	}
3104	return 0;
3105
3106	case CN_DRAGLEAVE:
3107	#ifdef NEVER
3108	if (mp2) {
3109
3110	PDRAGINFO pDInfo;
3111
3112	pDInfo = ((PCNRDRAGINFO)mp2)->pDragInfo;
3113	DrgAccessDraginfo(pDInfo); /* Access DRAGINFO */
3114	DrgFreeDraginfo(pDInfo); /* Free DRAGINFO */
3115	}
3116	#endif
3117	return 0;
3118
3119	case CN_DRAGAFTER:
3120	case CN_DRAGOVER:
3121	if (mp2) {
3122
3123	PDRAGITEM pDItem; /* Pointer to DRAGITEM */
3124	PDRAGINFO pDInfo; /* Pointer to DRAGINFO */
3125	PCNRITEM pci;
3126	USHORT uso;
3127
3128	pci = (PCNRITEM)((PCNRDRAGINFO)mp2)->pRecord;
3129	pDInfo = ((PCNRDRAGINFO)mp2)->pDragInfo;
3130	DrgAccessDraginfo(pDInfo); /* Access DRAGINFO */
3131	if (*dcd->directory &&
3132	(driveflags[toupper(*dcd->directory) - 'A'] &
3133	DRIVE_NOTWRITEABLE))
3134	{
3135	DrgFreeDraginfo(pDInfo);
3136	return MRFROM2SHORT(DOR_DROP, /* Return okay to link */
3137	DO_LINK); /* (compare) only */
3138	}
3139	if (pci) {
3140	if (pci->rc.flRecordAttr & CRA_SOURCE) {
3141	DrgFreeDraginfo(pDInfo);
3142	return(MRFROM2SHORT(DOR_NODROP,0));
3143	}
3144	uso = pDInfo->usOperation;
3145	if (uso == DO_DEFAULT)
3146	uso = (fCopyDefault) ? DO_COPY : DO_MOVE;
3147	if (!(pci->attrFile & FILE_DIRECTORY)) {
3148	if (uso != DO_LINK && uso != DO_COPY && uso != DO_MOVE) {
3149	DrgFreeDraginfo(pDInfo);
3150	return MRFROM2SHORT(DOR_NODROP,0);
3151	}
3152	if (uso != DO_LINK &&
3153	!(driveflags[toupper(*pci->szFileName) - 'A'] &
3154	DRIVE_NOTWRITEABLE)) {
3155
3156	ARC_TYPE *info = NULL;
3157
3158	if (!fQuickArcFind &&
3159	!(driveflags[toupper(*pci->szFileName) - 'A'] &
3160	DRIVE_SLOW))
3161	info = find_type(pci->szFileName,NULL);
3162	else
3163	info = quick_find_type(pci->szFileName,NULL);
3164	if (!info \|\| ((uso == DO_MOVE && !info->move) \|\|
3165	(uso == DO_COPY && !info->create))) {
3166	DrgFreeDraginfo(pDInfo);
3167	return MRFROM2SHORT(DOR_NODROP,0);
3168	}
3169	}
3170	}
3171	}
3172
3173	/* Access DRAGITEM index to DRAGITEM
3174	* Check valid rendering mechanisms and data
3175	*/
3176	pDItem = DrgQueryDragitemPtr(pDInfo,0);
3177	if (DrgVerifyRMF(pDItem, DRM_OS2FILE, NULL) \|\|
3178	((!pci \|\| (pci->attrFile & FILE_DIRECTORY)) &&
3179	DrgVerifyRMF(pDItem, DRM_FM2ARCMEMBER, DRF_FM2ARCHIVE)))
3180	{
3181	/* Free DRAGINFO */
3182	DrgFreeDraginfo(pDInfo);
3183	if (driveflags[toupper(*dcd->directory) - 'A'] &
3184	DRIVE_NOTWRITEABLE)
3185	return MRFROM2SHORT(DOR_DROP,DO_LINK);
3186	if (toupper(*dcd->directory) < 'C')
3187	return MRFROM2SHORT(DOR_DROP,DO_COPY);
3188	return MRFROM2SHORT(DOR_DROP, /* Return okay to drop */
3189	((fCopyDefault) ?
3190	DO_COPY :
3191	DO_MOVE));
3192	}
3193	DrgFreeDraginfo(pDInfo); /* Free DRAGINFO */
3194	}
3195	return MRFROM2SHORT(DOR_NODROP,0); /* Drop not valid */
3196
3197	case CN_INITDRAG:
3198	{
3199	BOOL wasemphasized = FALSE;
3200	PCNRDRAGINIT pcd = (PCNRDRAGINIT)mp2;
3201	PCNRITEM pci;
3202
3203	if (pcd) {
3204	pci = (PCNRITEM)pcd->pRecord;
3205	if (pci) {
3206	if ((INT)pci == -1)
3207	pci = NULL;
3208	else if (pci->rc.flRecordAttr & CRA_SELECTED)
3209	wasemphasized = TRUE;
3210	}
3211	else if (!*dcd->directory \|\| IsRoot(dcd->directory)) {
3212	DosBeep(50,100);
3213	break;
3214	}
3215	if (hwndStatus2) {
3216	if (pci)
3217	WinSetWindowText(hwndStatus2,
3218	GetPString(IDS_DRAGFILEOBJTEXT));
3219	else
3220	WinSetWindowText(hwndStatus2,
3221	GetPString(IDS_DRAGDIRTEXT));
3222	}
3223	if (DoFileDrag(hwnd,
3224	dcd->hwndObject,
3225	mp2,
3226	NULL,
3227	(pci) ? NULL : dcd->directory,
3228	(pci) ? TRUE : FALSE))
3229	{
3230	if (pci && fUnHilite && wasemphasized)
3231	UnHilite(hwnd,
3232	TRUE,
3233	&dcd->lastselection);
3234	}
3235	if (hwndStatus2) {
3236	WinSetFocus(HWND_DESKTOP,hwnd);
3237	PostMsg(hwnd,
3238	UM_RESCAN,
3239	MPVOID,
3240	MPVOID);
3241	}
3242	}
3243	}
3244	return 0;
3245
3246	case CN_DROP:
3247	if (mp2) {
3248
3249	LISTINFO *li;
3250	ULONG action = UM_ACTION;
3251
3252	li = DoFileDrop(hwnd,dcd->directory,TRUE,mp1,mp2);
3253	if (li) {
3254	if (li->list && li->list[0] && IsRoot(li->list[0]))
3255	li->type = DO_LINK;
3256	else if (fDragndropDlg && (!*li->arcname \|\| !li->info)) {
3257
3258	CHECKLIST cl;
3259
3260	memset(&cl,0,sizeof(cl));
3261	cl.size = sizeof(cl);
3262	cl.flags = li->type;
3263	cl.list = li->list;
3264	cl.cmd = li->type;
3265	cl.prompt = li->targetpath;
3266	li->type = WinDlgBox(HWND_DESKTOP,dcd->hwndParent,
3267	DropListProc,FM3ModHandle,
3268	DND_FRAME,MPFROMP(&cl));
3269	if (!li->type) {
3270	FreeListInfo(li);
3271	return 0;
3272	}
3273	li->list = cl.list;
3274	if (!li->list \|\| !li->list[0]) {
3275	FreeListInfo(li);
3276	return 0;
3277	}
3278	}
3279	switch(li->type) {
3280	case DND_LAUNCH:
3281	strcat(li->targetpath," %a");
3282	ExecOnList(dcd->hwndParent,li->targetpath,
3283	PROMPT \| WINDOWED,NULL,li->list,NULL);
3284	FreeList(li->list);
3285	li->list = NULL;
3286	break;
3287	case DO_LINK:
3288	if (fLinkSetsIcon) {
3289	li->type = IDM_SETICON;
3290	action = UM_MASSACTION;
3291	}
3292	else
3293	li->type = IDM_COMPARE;
3294	break;
3295	case DND_EXTRACT:
3296	if (*li->targetpath && !IsFile(li->targetpath))
3297	li->type = IDM_EXTRACT;
3298	break;
3299	case DND_MOVE:
3300	li->type = IDM_MOVE;
3301	if (*li->targetpath && IsFile(li->targetpath) == 1) {
3302	action = UM_MASSACTION;
3303	li->type = IDM_ARCHIVEM;
3304	}
3305	break;
3306	case DND_WILDMOVE:
3307	li->type = IDM_WILDMOVE;
3308	if (*li->targetpath && IsFile(li->targetpath) == 1) {
3309	action = UM_MASSACTION;
3310	li->type = IDM_ARCHIVEM;
3311	}
3312	break;
3313	case DND_OBJECT:
3314	li->type = IDM_OBJECT;
3315	action = UM_MASSACTION;
3316	break;
3317	case DND_SHADOW:
3318	li->type = IDM_SHADOW;
3319	action = UM_MASSACTION;
3320	break;
3321	case DND_COMPARE:
3322	li->type = IDM_COMPARE;
3323	break;
3324	case DND_SETICON:
3325	action = UM_MASSACTION;
3326	li->type = IDM_SETICON;
3327	break;
3328	case DND_COPY:
3329	li->type = IDM_COPY;
3330	if (*li->targetpath && IsFile(li->targetpath) == 1) {
3331	action = UM_MASSACTION;
3332	li->type = IDM_ARCHIVE;
3333	}
3334	break;
3335	case DND_WILDCOPY:
3336	li->type = IDM_WILDCOPY;
3337	if (*li->targetpath && IsFile(li->targetpath) == 1) {
3338	action = UM_MASSACTION;
3339	li->type = IDM_ARCHIVE;
3340	}
3341	break;
3342	default:
3343	if (*li->arcname && li->info) {
3344	action = UM_MASSACTION;
3345	li->type = (li->type == DO_MOVE) ? IDM_FAKEEXTRACTM : IDM_FAKEEXTRACT;
3346	}
3347	else if (*li->targetpath && IsFile(li->targetpath) == 1) {
3348	action = UM_MASSACTION;
3349	li->type = (li->type == DO_MOVE) ? IDM_ARCHIVEM : IDM_ARCHIVE;
3350	}
3351	else
3352	li->type = (li->type == DO_MOVE) ? IDM_MOVE : IDM_COPY;
3353	break;
3354	}
3355	if (!li->list \|\| !li->list[0])
3356	FreeListInfo(li);
3357	else if (!PostMsg(dcd->hwndObject,action,MPFROMP(li),MPVOID))
3358	FreeListInfo(li);
3359	else {
3360
3361	USHORT usop = 0;
3362
3363	switch(li->type) {
3364	case IDM_COPY:
3365	case IDM_WILDCOPY:
3366	usop = DO_COPY;
3367	break;
3368	case IDM_MOVE:
3369	case IDM_WILDMOVE:
3370	case IDM_ARCHIVEM:
3371	usop = DO_MOVE;
3372	break;
3373	}
3374	if (usop)
3375	return MRFROM2SHORT(DOR_DROP,usop);
3376	}
3377	}
3378	}
3379	return 0;
3380
3381	case CN_ENDEDIT:
3382	case CN_BEGINEDIT:
3383	{
3384	PFIELDINFO pfi = ((PCNREDITDATA)mp2)->pFieldInfo;
3385	PCNRITEM pci = (PCNRITEM)((PCNREDITDATA)mp2)->pRecord;
3386
3387	if (pfi \|\| pci) {
3388
3389	MRESULT mre;
3390
3391	mre = CnrDirectEdit(hwnd,msg,mp1,mp2);
3392	if (mre != (MRESULT)-1)
3393	return mre;
3394	}
3395	else if (!pfi && !pci)
3396	PostMsg(hwnd,
3397	UM_FIXCNRMLE,
3398	MPFROMLONG(CCHMAXPATH),
3399	MPVOID);
3400	}
3401	return 0;
3402
3403	case CN_REALLOCPSZ:
3404	{
3405	PFIELDINFO pfi = ((PCNREDITDATA)mp2)->pFieldInfo;
3406	PCNRITEM pci = (PCNRITEM)((PCNREDITDATA)mp2)->pRecord;
3407	HWND hwndMLE;
3408	static CHAR szData[CCHMAXPATH];
3409	CHAR testname[CCHMAXPATH],*p;
3410
3411	if (!pci && !pfi) {
3412	hwndMLE = WinWindowFromID(hwnd,CID_MLE);
3413	WinQueryWindowText(hwndMLE,
3414	sizeof(szData),
3415	szData);
3416	p = strchr(szData,'\n');
3417	if (p)
3418	*p = 0;
3419	p = strchr(szData,'\r');
3420	if (p)
3421	*p = 0;
3422	bstrip(szData);
3423	if (*szData) {
3424	if (!DosQueryPathInfo(szData,
3425	FIL_QUERYFULLNAME,
3426	testname,
3427	sizeof(testname)))
3428	{
3429	if (!SetDir(dcd->hwndParent,
3430	hwnd,
3431	testname,
3432	1))
3433	{
3434	PostMsg(hwnd,
3435	UM_SETDIR,
3436	MPFROMP(testname),
3437	MPVOID);
3438	}
3439	}
3440	}
3441	}
3442	else {
3443
3444	MRESULT mre;
3445
3446	mre = CnrDirectEdit(hwnd,msg,mp1,mp2);
3447	if (mre != (MRESULT)-1)
3448	return mre;
3449	}
3450	}
3451	return 0;
3452
3453	case CN_EMPHASIS:
3454	if (mp2) {
3455
3456	PNOTIFYRECORDEMPHASIS pre = mp2;
3457	PCNRITEM pci;
3458	CHAR s[CCHMAXPATHCOMP + 91],tb[81],tf[81];
3459
3460	pci = (PCNRITEM)((pre) ? pre->pRecord : NULL);
3461	if (!pci) {
3462	if (hwndStatus2)
3463	WinSetWindowText(hwndStatus2,NullStr);
3464	if (fMoreButtons) {
3465	WinSetWindowText(hwndName,NullStr);
3466	WinSetWindowText(hwndDate,NullStr);
3467	WinSetWindowText(hwndAttr,NullStr);
3468	}
3469	if (hwndMain)
3470	WinSendMsg(hwndMain,
3471	UM_LOADFILE,
3472	MPVOID,
3473	MPVOID);
3474	break;
3475	}
3476	if (pre->fEmphasisMask & CRA_SELECTED) {
3477	if (pci->rc.flRecordAttr & CRA_SELECTED) {
3478	dcd->selectedbytes += (pci->cbFile + pci->easize);
3479	dcd->selectedfiles++;
3480	}
3481	else if (dcd->selectedfiles) {
3482	dcd->selectedbytes -= (pci->cbFile + pci->easize);
3483	dcd->selectedfiles--;
3484	}
3485	if (!dcd->suspendview)
3486	{
3487	commafmt(tf,sizeof(tf),dcd->selectedfiles);
3488	CommaFmtULL(tb,sizeof(tb),dcd->selectedbytes,'K');
3489	sprintf(s,"%s / %s",tf,tb);
3490	WinSetDlgItemText(dcd->hwndClient,DIR_SELECTED,s);
3491	}
3492	}
3493	if (!dcd->suspendview && hwndMain &&
3494	(pre->fEmphasisMask & CRA_CURSORED) &&
3495	(pci->rc.flRecordAttr & CRA_CURSORED) &&
3496	WinQueryActiveWindow(dcd->hwndParent) == dcd->hwndFrame)
3497	{
3498	if (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_SLOW)
3499	WinSendMsg(hwndMain,
3500	UM_LOADFILE,
3501	MPVOID,
3502	MPVOID);
3503	else
3504	WinSendMsg(hwndMain,
3505	UM_LOADFILE,
3506	MPFROMP(pci->szFileName),
3507	MPVOID);
3508	}
3509	if (!dcd->suspendview &&
3510	WinQueryActiveWindow(dcd->hwndParent) == dcd->hwndFrame) {
3511	if (pre->fEmphasisMask & CRA_CURSORED) {
3512	if (pci->rc.flRecordAttr & CRA_CURSORED) {
3513	if (fSplitStatus && hwndStatus2)
3514	{
3515	CommaFmtULL(tb,sizeof(tb),pci->cbFile + pci->easize,' ');
3516	if (!fMoreButtons)
3517	{
3518	sprintf(s," %s %04u/%02u/%02u %02u:%02u:%02u [%s] %s",
3519	tb,pci->date.year,
3520	pci->date.month,pci->date.day,pci->time.hours,
3521	pci->time.minutes,pci->time.seconds,
3522	pci->pszDispAttr,pci->pszFileName);
3523	}
3524	else {
3525	*tf = 0;
3526	if (pci->cbFile + pci->easize > 1024)
3527	{
3528	CommaFmtULL(tf,sizeof(tf),
3529	pci->cbFile + pci->easize,'K');
3530	}
3531	sprintf(s,GetPString(IDS_STATUSSIZETEXT),
3532	tb,
3533	*tf ? " (" : NullStr,
3534	tf,
3535	*tf ? ")" : NullStr);
3536	}
3537	WinSetWindowText(hwndStatus2,s);
3538	}
3539	if (fMoreButtons) {
3540	WinSetWindowText(hwndName,pci->pszFileName);
3541	sprintf(s,"%04u/%02u/%02u %02u:%02u:%02u",
3542	pci->date.year,pci->date.month,
3543	pci->date.day,pci->time.hours,pci->time.minutes,
3544	pci->time.seconds);
3545	WinSetWindowText(hwndDate,s);
3546	WinSetWindowText(hwndAttr,pci->pszDispAttr);
3547	}
3548	}
3549	}
3550	}
3551	}
3552	else
3553	DosBeep(2000,100);
3554	break;
3555
3556	case CN_ENTER:
3557	if (mp2) {
3558
3559	PCNRITEM pci = (PCNRITEM)((PNOTIFYRECORDENTER)mp2)->pRecord;
3560	FILEFINDBUF3 ffb;
3561	HDIR hDir = HDIR_CREATE;
3562	ULONG nm = 1L;
3563	APIRET status = 0;
3564
3565	SetShiftState();
3566	if (pci) {
3567	if (pci->rc.flRecordAttr & CRA_INUSE)
3568	break;
3569	DosError(FERR_DISABLEHARDERR);
3570	status = DosFindFirst(pci->szFileName,
3571	&hDir,
3572	FILE_NORMAL \| FILE_DIRECTORY \|
3573	FILE_ARCHIVED \| FILE_READONLY \|
3574	FILE_HIDDEN \| FILE_SYSTEM,
3575	&ffb,
3576	sizeof(ffb),
3577	&nm,
3578	FIL_STANDARD);
3579	priority_bumped();
3580	if (!status) {
3581	DosFindClose(hDir);
3582	if (ffb.attrFile & FILE_DIRECTORY) {
3583	if ((shiftstate & (KC_CTRL \| KC_ALT)) ==
3584	(KC_CTRL \| KC_ALT))
3585	PostMsg(hwnd,
3586	WM_COMMAND,
3587	MPFROM2SHORT(IDM_SHOWALLFILES,0),
3588	MPVOID);
3589	else if ((shiftstate & (KC_CTRL \| KC_SHIFT)) ==
3590	(KC_CTRL \| KC_SHIFT))
3591	OpenObject(pci->szFileName,
3592	Settings,
3593	dcd->hwndFrame);
3594	else if (shiftstate & KC_CTRL)
3595	OpenObject(pci->szFileName,
3596	Default,
3597	dcd->hwndFrame);
3598	else if (shiftstate & KC_SHIFT) {
3599
3600	HWND hwndDir;
3601
3602	hwndDir = OpenDirCnr((HWND)0,
3603	dcd->hwndParent,
3604	dcd->hwndFrame,
3605	FALSE,
3606	pci->szFileName);
3607	if (hwndDir) {
3608	if (fMinOnOpen)
3609	WinSetWindowPos(dcd->hwndFrame,
3610	HWND_BOTTOM,
3611	0,
3612	0,
3613	0,
3614	0,
3615	SWP_MINIMIZE \| SWP_ZORDER);
3616	if (fAutoTile)
3617	TileChildren(dcd->hwndParent,
3618	TRUE);
3619	WinSetWindowPos(hwndDir,
3620	HWND_TOP,
3621	0,
3622	0,
3623	0,
3624	0,
3625	SWP_ACTIVATE);
3626	}
3627	}
3628	else {
3629	strcpy(dcd->previous,dcd->directory);
3630	strcpy(dcd->directory,pci->szFileName);
3631	DosEnterCritSec();
3632	dcd->stopflag++;
3633	DosExitCritSec();
3634	if (!PostMsg(dcd->hwndObject,
3635	UM_RESCAN,
3636	MPVOID,
3637	MPFROMLONG(1L)))
3638	{
3639	DosEnterCritSec();
3640	dcd->stopflag--;
3641	DosExitCritSec();
3642	}
3643	else if (*dcd->directory) {
3644	if (hwndMain)
3645	WinSendMsg(hwndMain,
3646	UM_SETUSERLISTNAME,
3647	MPFROMP(dcd->directory),
3648	MPVOID);
3649	else
3650	add_udir(FALSE,
3651	dcd->directory);
3652	}
3653	}
3654	}
3655	else {
3656
3657	SWP swp;
3658
3659	WinQueryWindowPos(dcd->hwndFrame,&swp);
3660	WinSendMsg(hwnd,
3661	CM_SETRECORDEMPHASIS,
3662	MPFROMP(pci),
3663	MPFROM2SHORT(TRUE,CRA_INUSE));
3664	DefaultViewKeys(hwnd,
3665	dcd->hwndFrame,
3666	dcd->hwndParent,
3667	&swp,
3668	pci->szFileName);
3669	WinSendMsg(hwnd,
3670	CM_SETRECORDEMPHASIS,
3671	MPFROMP(pci),
3672	MPFROM2SHORT(FALSE,
3673	CRA_INUSE \|
3674	((fUnHilite) ?
3675	CRA_SELECTED :
3676	0)));
3677	}
3678	}
3679	else {
3680	if (!*dcd->directory \|\| IsValidDir(dcd->directory)) {
3681	NotifyError(pci->szFileName,
3682	status);
3683	WinSendMsg(hwnd,
3684	CM_REMOVERECORD,
3685	MPFROMP(&pci),
3686	MPFROM2SHORT(1,
3687	CMA_FREE \| CMA_INVALIDATE \|
3688	CMA_ERASE));
3689	if (hwndStatus)
3690	WinSetWindowText(hwndStatus,
3691	GetPString(IDS_RESCANSUGGESTEDTEXT));
3692	}
3693	else {
3694	DosEnterCritSec();
3695	dcd->stopflag++;
3696	DosExitCritSec();
3697	if (!PostMsg(dcd->hwndObject,
3698	UM_RESCAN,
3699	MPVOID,
3700	MPFROMLONG(1L)))
3701	{
3702	DosEnterCritSec();
3703	dcd->stopflag--;
3704	DosExitCritSec();
3705	}
3706	else if (*dcd->directory) {
3707	if (hwndMain)
3708	WinSendMsg(hwndMain,
3709	UM_SETUSERLISTNAME,
3710	MPFROMP(dcd->directory),
3711	MPVOID);
3712	else
3713	add_udir(FALSE,
3714	dcd->directory);
3715	}
3716	}
3717	}
3718	}
3719	else if (*dcd->directory)
3720	OpenObject(dcd->directory,
3721	Default,
3722	hwnd);
3723	}
3724	break;
3725	}
3726	break;
3727	}
3728	return 0;
3729
3730	case UM_LOADFILE:
3731	if (dcd && mp2) {
3732
3733	HWND ret;
3734
3735	ret = StartMLEEditor(dcd->hwndParent,
3736	(INT)mp1,
3737	(CHAR *)mp2,
3738	dcd->hwndFrame);
3739	if (mp2)
3740	free((CHAR *)mp2);
3741	return MRFROMLONG(ret);
3742	}
3743	return 0;
3744
3745	case WM_SAVEAPPLICATION:
3746	if (dcd && ParentIsDesktop(hwnd,dcd->hwndParent)) {
3747
3748	SWP swp;
3749
3750	WinQueryWindowPos(dcd->hwndFrame,&swp);
3751	if (!(swp.fl & (SWP_HIDE \| SWP_MINIMIZE \| SWP_MAXIMIZE)))
3752	PrfWriteProfileData(fmprof,
3753	appname,
3754	"VDirSizePos",
3755	&swp,
3756	sizeof(swp));
3757	}
3758	break;
3759
3760	case WM_CLOSE:
3761	WinSendMsg(hwnd,
3762	WM_SAVEAPPLICATION,
3763	MPVOID,
3764	MPVOID);
3765	if (LastDir == hwnd)
3766	LastDir = (HWND)0;
3767	if (dcd) {
3768	dcd->stopflag++;
3769	if (!dcd->dontclose && ParentIsDesktop(dcd->hwndFrame,(HWND)0))
3770	PostMsg((HWND)0,
3771	WM_QUIT,
3772	MPVOID,
3773	MPVOID);
3774	if (!dcd->hwndObject \|\|
3775	!PostMsg(dcd->hwndObject, WM_CLOSE, MPVOID, MPVOID))
3776	{
3777	if (dcd->hwndObject)
3778	WinSetWindowPtr(dcd->hwndObject,
3779	QWL_USER,
3780	NULL);
3781	WinSetWindowPtr(hwnd,
3782	QWL_USER,
3783	NULL);
3784	if (dcd->hwndRestore)
3785	WinSetWindowPos(dcd->hwndRestore,
3786	HWND_TOP,
3787	0,
3788	0,
3789	0,
3790	0,
3791	SWP_RESTORE \| SWP_SHOW \| SWP_ACTIVATE \|
3792	SWP_ZORDER);
3793	FreeList(dcd->lastselection);
3794	free(dcd);
3795	DosPostEventSem(CompactSem);
3796	}
3797	}
3798	WinDestroyWindow(WinQueryWindow(WinQueryWindow(hwnd,QW_PARENT),
3799	QW_PARENT));
3800	return 0;
3801
3802	case WM_DESTROY:
3803	if (DirMenu)
3804	WinDestroyWindow(DirMenu);
3805	if (DirCnrMenu)
3806	WinDestroyWindow(DirCnrMenu);
3807	if (FileMenu)
3808	WinDestroyWindow(FileMenu);
3809	DirMenu = DirCnrMenu = FileMenu = (HWND)0;
3810	EmptyCnr(hwnd);
3811	break;
3812	}
3813	return (dcd && dcd->oldproc) ? dcd->oldproc(hwnd,msg,mp1,mp2) :
3814	PFNWPCnr(hwnd,msg,mp1,mp2);
3815	}
3816
3817
3818	HWND StartDirCnr (HWND hwndParent,CHAR *directory,HWND hwndRestore,ULONG flags)
3819	{
3820	/* bitmapped flags:
3821	* 0x00000001 = don't close app when window closes
3822	* 0x00000002 = no frame controls
3823	*/
3824
3825	HWND hwndFrame = (HWND)0,hwndClient;
3826	ULONG FrameFlags = FCF_TITLEBAR \| FCF_SYSMENU \|
3827	FCF_SIZEBORDER \| FCF_MINMAX \|
3828	FCF_ICON \| FCF_NOBYTEALIGN \|
3829	FCF_ACCELTABLE;
3830	USHORT id;
3831	static USHORT idinc = 0;
3832	DIRCNRDATA *dcd;
3833	static BOOL first = FALSE;
3834
3835	if(flags & 2)
3836	FrameFlags &= (~(FCF_TITLEBAR \| FCF_SYSMENU \| FCF_SIZEBORDER \|
3837	FCF_MINMAX \| FCF_ICON));
3838	if(!idinc)
3839	idinc = (rand() % 100);
3840	if(!hwndParent)
3841	hwndParent = HWND_DESKTOP;
3842	if(ParentIsDesktop(hwndParent,hwndParent))
3843	FrameFlags \|= (FCF_TASKLIST \| FCF_MENU);
3844	if(!hwndMain && !first) {
3845	if(DirCnrMenu) {
3846
3847	MENUITEM mi;
3848
3849	memset(&mi,0,sizeof(mi));
3850	WinSendMsg(DirCnrMenu,
3851	MM_DELETEITEM,
3852	MPFROM2SHORT(IDM_DRIVESMENU,FALSE),
3853	MPVOID);
3854	mi.iPosition = MIT_END;
3855	mi.afStyle = MIS_TEXT;
3856	mi.id = IDM_DRIVESMENU;
3857	WinSendMsg(DirCnrMenu,
3858	MM_INSERTITEM,
3859	MPFROMP(&mi),
3860	MPFROMP(GetPString(IDS_DRIVESMENUTEXT)));
3861	}
3862	first = TRUE;
3863	}
3864	if(directory) {
3865	hwndFrame = WinCreateStdWindow(hwndParent,
3866	WS_VISIBLE,
3867	&FrameFlags,
3868	GetPString(IDS_WCDIRCONTAINER),
3869	NULL,
3870	WS_VISIBLE \| fwsAnimate,
3871	FM3ModHandle,
3872	DIR_FRAME,
3873	&hwndClient);
3874	if(hwndFrame && hwndClient) {
3875	id = DIR_FRAME + idinc++;
3876	if(idinc > 99)
3877	idinc = 0;
3878	WinSetWindowUShort(hwndFrame,QWS_ID,id);
3879	dcd = malloc(sizeof(DIRCNRDATA));
3880	if(dcd) {
3881	memset(dcd,0,sizeof(DIRCNRDATA));
3882	dcd->size = sizeof(DIRCNRDATA);
3883	dcd->id = id;
3884	dcd->type = DIR_FRAME;
3885	dcd->hwndParent = (hwndParent) ? hwndParent : HWND_DESKTOP;
3886	dcd->hwndFrame = hwndFrame;
3887	dcd->hwndClient = hwndClient;
3888	dcd->hwndRestore = hwndRestore;
3889	dcd->dontclose = ((flags & 1) != 0);
3890	strcpy(dcd->directory,directory);
3891	add_udir(FALSE,directory);
3892	{
3893	PFNWP oldproc;
3894
3895	oldproc = WinSubclassWindow(hwndFrame,
3896	(PFNWP)DirFrameWndProc);
3897	WinSetWindowPtr(hwndFrame,
3898	QWL_USER,
3899	(PVOID)oldproc);
3900	}
3901	dcd->hwndCnr = WinCreateWindow(hwndClient,
3902	WC_CONTAINER,
3903	NULL,
3904	CCS_AUTOPOSITION \| CCS_MINIICONS \|
3905	CCS_MINIRECORDCORE \| ulCnrType \|
3906	WS_VISIBLE,
3907	0,
3908	0,
3909	0,
3910	0,
3911	hwndClient,
3912	HWND_TOP,
3913	(ULONG)DIR_CNR,
3914	NULL,
3915	NULL);
3916	if(dcd->hwndCnr) {
3917	WinSetWindowPtr(dcd->hwndCnr,QWL_USER,(PVOID)dcd);
3918	dcd->oldproc = WinSubclassWindow(dcd->hwndCnr,
3919	(PFNWP)DirCnrWndProc);
3920	{
3921	USHORT ids[] = {DIR_TOTALS,DIR_SELECTED,DIR_VIEW,DIR_SORT,
3922	DIR_FILTER,DIR_FOLDERICON,DIR_MAX,0};
3923
3924	if(!(flags & 2))
3925	ids[6] = 0;
3926	CommonCreateTextChildren(dcd->hwndClient,
3927	GetPString(IDS_WCDIRSTATUS),
3928	ids);
3929	}
3930	if(!PostMsg(dcd->hwndCnr,
3931	UM_SETUP,
3932	MPVOID,
3933	MPVOID))
3934	WinSendMsg(dcd->hwndCnr,
3935	UM_SETUP,
3936	MPVOID,
3937	MPVOID);
3938	if(FrameFlags & FCF_TASKLIST) {
3939
3940	SWP swp,swpD;
3941	ULONG size = sizeof(swp);
3942	LONG cxScreen,cyScreen;
3943
3944	WinQueryTaskSizePos(WinQueryAnchorBlock(hwndFrame),0,&swp);
3945	if(PrfQueryProfileData(fmprof,
3946	appname,
3947	"VDirSizePos",
3948	&swpD,
3949	&size)) {
3950	cxScreen = WinQuerySysValue(HWND_DESKTOP,SV_CXSCREEN);
3951	cyScreen = WinQuerySysValue(HWND_DESKTOP,SV_CYSCREEN);
3952	if(swp.x + swpD.cx > cxScreen)
3953	swp.x = cxScreen - swpD.cx;
3954	if(swp.y + swpD.cy > cyScreen)
3955	swp.y = cyScreen - swpD.cy;
3956	swp.cx = swpD.cx;
3957	swp.cy = swpD.cy;
3958	}
3959	WinSetWindowPos(hwndFrame,
3960	HWND_TOP,
3961	swp.x,
3962	swp.y,
3963	swp.cx,
3964	swp.cy,
3965	SWP_SIZE \| SWP_MOVE \| SWP_SHOW \| SWP_ZORDER \|
3966	SWP_ACTIVATE);
3967	}
3968	}
3969	else {
3970	PostMsg(hwndClient,
3971	WM_CLOSE,
3972	MPVOID,
3973	MPVOID);
3974	free(dcd);
3975	hwndFrame = (HWND)0;
3976	}
3977	}
3978	else {
3979	PostMsg(hwndClient,
3980	WM_CLOSE,
3981	MPVOID,
3982	MPVOID);
3983	hwndFrame = (HWND)0;
3984	}
3985	}
3986	}
3987	return hwndFrame;
3988	}
3989

Note: See TracBrowser for help on using the repository browser.

Download in other formats: