Context Navigation

source: trunk/dll/common.c@ 1478

Visit:

Last change on this file since 1478 was 1455, checked in by Steven Levine, 16 years ago
Blink thread LEDs while worker threads are working Drop expermental code
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 24.9 KB

Line
1
2	/***********************************************************************
3
4	$Id: common.c 1455 2009-09-15 02:43:55Z stevenhl $
5
6	Common window functions
7
8	Copyright (c) 1993, 1998 M. Kimes
9	Copyright (c) 2001, 2008 Steven H. Levine
10
11	13 Aug 05 SHL Renames
12	22 Jul 06 SHL Check more run time errors
13	15 Aug 06 SHL Use Dos_Error
14	03 Nov 06 SHL Rework thread usage count logic
15	07 Jan 07 GKY Move error strings etc. to string file
16	07 Jan 07 GKY Updated Helv font to vector font Helvetica
17	22 Mar 07 GKY Use QWL_USER
18	30 Mar 07 GKY Remove GetPString for window class names
19	02 Aug 07 SHL Sync with CNRITEM mods
20	20 Aug 07 GKY Move #pragma alloc_text to end for OpenWatcom compat
21	26 Aug 07 SHL Change to DosSleep(0)
22	29 Feb 08 GKY Use xfree where appropriate
23	06 Jul 08 GKY Update delete/undelete to include move to and open XWP trashcan
24	01 Jan 09 GKY Add option to rescan tree container on eject of removable media
25	11 Jan 09 GKY Replace font names in the string file with global set at compile in init.c
26	07 Feb 09 GKY Eliminate Win_Error2 by moving function names to PCSZs used in Win_Error
27	08 Mar 09 GKY Additional strings move to PCSZs in init.c
28	22 Jul 09 GKY Drivebar enhancements add refresh removable, rescan all drives, drive button
29	22 Jul 09 GKY Drivebar enhancements add refresh removable, rescan all drives, drive button
30	loads drive root directory in directory container or expands drive tree
31	and rescans drive in tree container depending on container focus, greyed out
32	inappropriate menu context choices
33	14 Sep 09 SHL Blink thread LEDs while threads working
34
35	***********************************************************************/
36
37	#include <stdlib.h>
38	#include <string.h>
39	#include <ctype.h>
40
41	#define INCL_DOS
42	#define INCL_DOSERRORS
43	#define INCL_WIN
44	#define INCL_GPI
45	#define INCL_LONGLONG // dircnrs.h
46
47	#include "fm3dll.h"
48	#include "fm3dll2.h" // #define's for UM_*, control id's, etc.
49	#include "mainwnd2.h" // Data declaration(s)
50	#include "killproc.h" // Data declaration(s)
51	#include "collect.h" // Data declaration(s)
52	#include "grep.h" // Data declaration(s)
53	#include "dircnrs.h" // Data declaration(s)
54	#include "notebook.h" // Data declaration(s)
55	#include "inis.h" // Data declaration(s)
56	#include "init.h" // Data declaration(s)
57	#include "treecnr.h" // Data declaration(s)
58	#include "fm3dlg.h"
59	#include "fm3str.h"
60	#include "mle.h"
61	#include "filldir.h" // RemoveCnrItems
62	#include "errutil.h" // Dos_Error...
63	#include "strutil.h" // GetPString
64	#include "autoview.h" // AutoViewProc
65	#include "mainwnd.h" // BuildDriveBarButtons, GetNextWindowPos, TopWindow
66	#include "common.h"
67	#include "dirsize.h" // DirSizeProc
68	#include "info.h" // DrvInfoProc, SetDrvProc
69	#include "seeall.h" // StartSeeAll
70	#include "misc.h" // Broadcast
71	#include "valid.h" // CheckDrive
72	#include "mkdir.h" // PMMkDir
73	#include "presparm.h" // SetPresParams
74	#include "undel.h" // UndeleteDlgProc
75	#include "systemf.h" // runemf2
76	#include "wrappers.h" // xfree
77	#include "fortify.h"
78
79	// Data definitions
80	#pragma data_seg(DATA1)
81	static PSZ pszSrcFile = __FILE__;
82	static HWND hwndLED;
83	static HWND hwndLEDHdr;
84
85	#pragma data_seg(GLOBAL1)
86	HWND hwndBack;
87
88	MRESULT EXPENTRY CommonFrameWndProc(USHORT id,
89	HWND hwnd,
90	ULONG msg, MPARAM mp1, MPARAM mp2)
91	{
92	PFNWP oldproc = (PFNWP) WinQueryWindowPtr(hwnd, QWL_USER);
93
94	switch (msg) {
95	case UM_TIMER:
96	case UM_ACTION:
97	case UM_SHOWME:
98	case UM_OPENWINDOWFORME:
99	case UM_MINIMIZE:
100	case UM_MAXIMIZE:
101	case UM_CONTAINERDIR:
102	case UM_FILTER:
103	case UM_INITMENU:
104	case UM_COMMAND:
105	case UM_UPDATERECORD:
106	case UM_UPDATERECORDLIST:
107	case WM_COMMAND:
108	case MM_PORTHOLEINIT:
109	case WM_INITMENU:
110	case UM_CONTAINER_FILLED:
111	case UM_FILESMENU:
112	return WinSendMsg(WinWindowFromID(hwnd, FID_CLIENT), msg, mp1, mp2);
113
114	case UM_CONTEXTMENU:
115	PostMsg(WinWindowFromID(hwnd, FID_CLIENT), msg, mp1, mp2);
116	return 0;
117
118	case UM_CONTAINERHWND:
119	return MRFROMLONG(WinWindowFromID(hwnd, id));
120
121	case DM_DROP:
122	case DM_DRAGOVER:
123	case DM_DRAGLEAVE:
124	case DM_DROPHELP:
125	{
126	CNRDRAGINFO cnd;
127	USHORT dcmd;
128
129	switch (msg) {
130	case DM_DROP:
131	dcmd = CN_DROP;
132	break;
133	case DM_DRAGOVER:
134	dcmd = CN_DRAGOVER;
135	break;
136	case DM_DRAGLEAVE:
137	dcmd = CN_DRAGLEAVE;
138	break;
139	case DM_DROPHELP:
140	dcmd = CN_DROPHELP;
141	break;
142	}
143	cnd.pDragInfo = (PDRAGINFO) mp1;
144	cnd.pRecord = NULL;
145	return WinSendMsg(WinWindowFromID(hwnd, FID_CLIENT),
146	WM_CONTROL, MPFROM2SHORT(id, dcmd), MPFROMP(&cnd));
147	}
148
149	case UM_RESCAN:
150	if (fAutoTile &&
151	!fAmClosing && !fNoTileUpdate && !ParentIsDesktop(hwnd, (HWND) 0))
152	PostMsg(WinQueryWindow(hwnd, QW_PARENT), UM_RESCAN, MPVOID, MPVOID);
153	return 0;
154
155	case WM_MINMAXFRAME:
156	{
157	PSWP pswp = (PSWP) mp1;
158	MRESULT rc;
159
160	rc = oldproc(hwnd, msg, mp1, mp2);
161	if (pswp->fl & (SWP_MINIMIZE \| SWP_HIDE \| SWP_RESTORE))
162	WinSendMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
163	return rc;
164	}
165
166	case WM_DESTROY:
167	WinSendMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
168	break;
169	}
170	return oldproc(hwnd, msg, mp1, mp2);
171	}
172
173	MRESULT EXPENTRY CommonTextProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
174	{
175	switch (msg) {
176	case WM_CREATE:
177	{
178	MRESULT rc;
179
180	rc = PFNWPStatic(hwnd, msg, mp1, mp2);
181	switch (WinQueryWindowUShort(hwnd, QWS_ID))
182	case DIR_SORT:
183	case DIR_VIEW:
184	case DIR_FILTER:
185	//fixme to allow user to change presparams 1-10-09 GKY
186	SetPresParams(hwnd, &RGBGREY, &RGBBLACK, &RGBBLACK, FNT_8HELVETICA);
187	return rc;
188	}
189	}
190	return PFNWPStatic(hwnd, msg, mp1, mp2);
191	}
192
193	void CommonTextPaint(HWND hwnd, HPS hps)
194	{
195	int x;
196	USHORT ids[] = { DIR_FOLDERICON, DIR_TOTALS, DIR_SELECTED, DIR_VIEW,
197	DIR_FILTER, DIR_SORT, DIR_MAX, 0
198	};
199	BOOL bools[] = { TRUE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE };
200
201	for (x = 0; ids[x]; x++) {
202	if (WinWindowFromID(hwnd, ids[x]) != (HWND) 0)
203	PaintRecessedWindow(WinWindowFromID(hwnd, ids[x]), hps,
204	bools[x], FALSE);
205	}
206	}
207
208	void CommonCreateTextChildren(HWND hwnd, PCSZ class, USHORT * ids)
209	{
210	int x;
211	CHAR s[33];
212	ULONG attrs;
213	HWND hwndTmp;
214
215	if (!hwnd \|\| !class \|\| !ids) {
216	Runtime_Error(pszSrcFile, __LINE__, NULL);
217	return;
218	}
219
220	for (x = 0; ids[x]; x++) {
221	*s = 0;
222	switch (ids[x]) {
223	case DIR_SORT:
224	case DIR_FILTER:
225	case DIR_VIEW:
226	attrs = SS_TEXT \| DT_LEFT \| DT_VCENTER;
227	break;
228	case DIR_FOLDERICON:
229	case DIR_MAX:
230	attrs = SS_BITMAP;
231	sprintf(s, "#%d", ids[x]);
232	break;
233	default:
234	attrs = SS_TEXT \| DT_CENTER \| DT_VCENTER;
235	break;
236	}
237	hwndTmp = WinCreateWindow(hwnd, class, s, attrs, 0, 0, 0, 0, hwnd,
238	HWND_TOP, ids[x], NULL, NULL);
239	if (!hwndTmp)
240	Win_Error(hwnd, hwnd, pszSrcFile, __LINE__,
241	PCSZ_WINCREATEWINDOW);
242	} // for
243	}
244
245	void CommonDriveCmd(HWND hwnd, char *drive, USHORT cmd)
246	{
247	char dv[CCHMAXPATH];
248
249	if (!drive \|\| !*drive)
250	return;
251	strcpy(dv, drive);
252	MakeValidDir(dv);
253
254	switch (cmd) {
255	case IDM_MKDIR:
256	PMMkDir(hwnd, dv, FALSE);
257	break;
258	case IDM_INFO:
259	WinDlgBox(HWND_DESKTOP,
260	HWND_DESKTOP,
261	DrvInfoProc, FM3ModHandle, INFO_FRAME, (PVOID) dv);
262	break;
263	case IDM_DRVFLAGS:
264	strcpy(dv, drive); // Must use original drive letter
265	if (WinDlgBox(HWND_DESKTOP,
266	hwnd,
267	SetDrvProc,
268	FM3ModHandle, DVS_FRAME, MPFROMP(dv)) && hwndTree)
269	if (!PostMsg(hwndTree, UM_SHOWME, MPFROMP(dv), MPVOID))
270	PostMsg(hwndTree, WM_COMMAND, MPFROM2SHORT(IDM_UPDATE, 0), MPVOID);
271	break;
272	case IDM_SIZES:
273	WinDlgBox(HWND_DESKTOP,
274	HWND_DESKTOP, DirSizeProc, FM3ModHandle, DSZ_FRAME, dv);
275	break;
276	case IDM_SHOWALLFILES:
277	StartSeeAll(HWND_DESKTOP, FALSE, dv);
278	break;
279	case IDM_UNDELETE:
280	{
281	HOBJECT hObject;
282	HWND hwndDesktop;
283
284	hObject = WinQueryObject("<XWP_TRASHCAN>");
285	if (hObject != NULLHANDLE && fTrashCan) {
286	hwndDesktop = WinQueryDesktopWindow((HAB) 0, NULLHANDLE);
287	WinSetFocus(HWND_DESKTOP, hwndDesktop);
288	WinOpenObject(hObject, 0, TRUE);
289	}
290	else
291	WinDlgBox(HWND_DESKTOP,
292	hwnd,
293	UndeleteDlgProc,
294	FM3ModHandle, UNDEL_FRAME, MPFROMP(dv));
295	}
296	break;
297	case IDM_CHKDSK:
298	runemf2(SEPARATE \| WINDOWED,
299	hwnd, pszSrcFile, __LINE__, NULL, NULL,
300	"PMCHKDSK.EXE %c:", toupper(*dv));
301	break;
302	case IDM_OPTIMIZE:
303	{
304	CHAR FileSystem[CCHMAXPATH];
305	ULONG type;
306
307	CheckDrive(*dv, FileSystem, &type);
308	if (*FileSystem) {
309	strcat(FileSystem, "OPT.CMD");
310	runemf2(SEPARATE \| WINDOWED,
311	hwnd, pszSrcFile, __LINE__,
312	NULL,
313	NULL,
314	"%s /C %s %c:", GetCmdSpec(FALSE), FileSystem, toupper(*dv));
315	}
316	}
317	break;
318	case IDM_FORMAT:
319	runemf2(SEPARATE \| WINDOWED,
320	hwnd, pszSrcFile, __LINE__, NULL, NULL,
321	"PMFORMAT.EXE %c:", toupper(*dv));
322	break;
323
324	#if 0 // fixme to be gone?
325
326	case IDM_CLOSETRAY:
327	if (driveflags[*dv - 'A'] & DRIVE_CDROM) {
328
329	BYTE parm[4] = { "CD01" };
330	ULONGLONG dlen;
331	ULONG plen;
332	HFILE hfile;
333	APIRET rc;
334
335	dv[2] = 0;
336	rc = DosOpen(dv,
337	&hfile,
338	&dlen,
339	0,
340	0,
341	OPEN_ACTION_OPEN_IF_EXISTS \|
342	OPEN_ACTION_CREATE_IF_NEW,
343	OPEN_FLAGS_DASD \|
344	OPEN_FLAGS_FAIL_ON_ERROR \| OPEN_SHARE_DENYNONE, NULL);
345	if (rc)
346	Dos_Error(MB_CANCEL, rc, hwnd, pszSrcFile, __LINE__, "DosOpen");
347	else {
348	dlen = 0;
349	plen = sizeof(parm);
350	rc = DosDevIOCtl(hfile,
351	0x80,
352	0x45, &parm, sizeof(parm), &plen, NULL, 0, &dlen);
353	DosClose(hfile);
354	if (rc)
355	Dos_Error(MB_CANCEL, rc, hwnd, pszSrcFile, __LINE__, "DosDevIOCtl");
356	}
357	}
358	break;
359	#endif // fixme to be gone?
360
361	case IDM_LOCK:
362	case IDM_UNLOCK:
363	case IDM_EJECT:
364	{
365	UCHAR parm[2];
366	ULONG plen = sizeof(parm), dlen = 0L;
367	APIRET rc;
368
369	switch (SHORT1FROMMP(cmd)) {
370	case IDM_LOCK:
371	parm[0] = 1;
372	break;
373	case IDM_UNLOCK:
374	parm[0] = 0;
375	break;
376	case IDM_EJECT:
377	parm[0] = 2;
378	break;
379	}
380	parm[1] = *dv - 'A';
381	DosError(FERR_DISABLEHARDERR);
382	rc = DosDevIOCtl(-1L, 8L, 0x40L, &parm, sizeof(parm), &plen, NULL, 0L, &dlen);
383	if (cmd == IDM_EJECT &&
384	(fEjectFlpyScan ? TRUE : parm[1] > 1) &&
385	(fEjectCDScan ? TRUE : !(driveflags[parm[1]] & DRIVE_CDROM)) &&
386	(fEjectRemovableScan ? TRUE : (parm[1] < 2 \|\| driveflags[parm[1]] & DRIVE_CDROM))) {
387	BOOL toggleTree = FALSE;
388
389	if (!hwndTree) {
390	WinSendMsg(hwndMain, WM_COMMAND, MPFROM2SHORT(IDM_VTREE, 0), MPVOID);
391	toggleTree = TRUE;
392	}
393	WinSendMsg(hwndTree, WM_COMMAND, MPFROM2SHORT(IDM_RESCAN, 0), MPVOID);
394	if (toggleTree)
395	WinSendMsg(hwndMain, WM_COMMAND, MPFROM2SHORT(IDM_VTREE, 0), MPVOID);
396	}
397	}
398	break;
399
400	case IDM_RESCAN:
401	{
402	BOOL toggleTree = FALSE;
403
404	if (!hwndTree) {
405	WinSendMsg(hwndMain, WM_COMMAND, MPFROM2SHORT(IDM_VTREE, 0), MPVOID);
406	toggleTree = TRUE;
407	}
408	WinSendMsg(hwndTree, WM_COMMAND, MPFROM2SHORT(IDM_RESCAN, 0), MPVOID);
409	if (toggleTree)
410	WinSendMsg(hwndMain, WM_COMMAND, MPFROM2SHORT(IDM_VTREE, 0), MPVOID);
411	}
412	break;
413
414	case IDM_REFRESHREMOVABLES:
415	{
416	BOOL toggleTree = FALSE;
417
418	if (!hwndTree) {
419	WinSendMsg(hwndMain, WM_COMMAND, MPFROM2SHORT(IDM_VTREE, 0), MPVOID);
420	toggleTree = TRUE;
421	}
422	WinSendMsg(hwndTree, WM_COMMAND, MPFROM2SHORT(IDM_REFRESHREMOVABLES, 0), MPVOID);
423	if (toggleTree)
424	WinSendMsg(hwndMain, WM_COMMAND, MPFROM2SHORT(IDM_VTREE, 0), MPVOID);
425	}
426	break;
427	}
428	}
429
430	void CommonCreateMainChildren(HWND hwnd, SWP * swp)
431	{
432	HWND hwndFrame = WinQueryWindow(hwnd, QW_PARENT);
433	HWND hwndTmp;
434	PFNWP oldproc;
435
436	// Create a children of frame window
437	// Left status window
438	hwndStatus = WinCreateWindow(hwndFrame,
439	WC_STATUS,
440	"Status",
441	WS_VISIBLE \| SS_TEXT \| DT_LEFT \|
442	DT_VCENTER,
443	swp->x + 4 +
444	WinQuerySysValue(HWND_DESKTOP,
445	SV_CXSIZEBORDER),
446	swp->y + 4 +
447	WinQuerySysValue(HWND_DESKTOP,
448	SV_CYSIZEBORDER),
449	((swp->cx / 2) - 8) -
450	(WinQuerySysValue(HWND_DESKTOP,
451	SV_CXSIZEBORDER) * 2),
452	20,
453	hwndFrame, HWND_TOP, MAIN_STATUS, NULL, NULL);
454	if (!hwndStatus)
455	Win_Error(hwndFrame, hwnd, pszSrcFile, __LINE__,
456	PCSZ_WINCREATEWINDOW);
457
458	// Right status window
459	hwndStatus2 = WinCreateWindow(hwndFrame,
460	WC_STATUS,
461	"Status2",
462	WS_VISIBLE \| SS_TEXT \| DT_LEFT \|
463	DT_VCENTER,
464	((swp->cx / 2) + 4) +
465	WinQuerySysValue(HWND_DESKTOP,
466	SV_CXSIZEBORDER),
467	((swp->cy / 2) + 4) +
468	WinQuerySysValue(HWND_DESKTOP,
469	SV_CYSIZEBORDER),
470	((swp->cx / 2) - 8) -
471	(WinQuerySysValue(HWND_DESKTOP,
472	SV_CXSIZEBORDER) * 2),
473	20,
474	hwndFrame,
475	HWND_TOP, MAIN_STATUS2, NULL, NULL);
476	if (!hwndStatus2)
477	Win_Error(hwndFrame, hwnd, pszSrcFile, __LINE__,
478	PCSZ_WINCREATEWINDOW);
479
480	hwndAttr = WinCreateWindow(hwndFrame,
481	WC_STATUS,
482	"Attr",
483	WS_VISIBLE \| SS_TEXT \| DT_CENTER \|
484	DT_VCENTER,
485	swp->x + 4 +
486	WinQuerySysValue(HWND_DESKTOP,
487	SV_CXSIZEBORDER),
488	swp->y + 4 + 24 +
489	WinQuerySysValue(HWND_DESKTOP,
490	SV_CYSIZEBORDER),
491	((swp->cx / 4) - 8) -
492	(WinQuerySysValue(HWND_DESKTOP,
493	SV_CXSIZEBORDER) * 2),
494	20, hwndFrame, HWND_TOP, IDM_ATTRS, NULL, NULL);
495	if (!hwndAttr)
496	Win_Error(hwndFrame, hwnd, pszSrcFile, __LINE__,
497	PCSZ_WINCREATEWINDOW);
498
499	hwndDate = WinCreateWindow(hwndFrame,
500	WC_STATUS,
501	"Date",
502	WS_VISIBLE \| SS_TEXT \| DT_CENTER \|
503	DT_VCENTER,
504	((swp->x / 4) * 2) + 4 +
505	WinQuerySysValue(HWND_DESKTOP,
506	SV_CXSIZEBORDER),
507	swp->y + 4 + 24 +
508	WinQuerySysValue(HWND_DESKTOP,
509	SV_CYSIZEBORDER),
510	((swp->cx / 4) - 8) -
511	(WinQuerySysValue(HWND_DESKTOP,
512	SV_CXSIZEBORDER) * 2),
513	20, hwndFrame, HWND_TOP, IDM_INFO, NULL, NULL);
514	if (!hwndDate)
515	Win_Error(hwndFrame, hwnd, pszSrcFile, __LINE__,
516	PCSZ_WINCREATEWINDOW);
517
518	hwndName = WinCreateWindow(hwndFrame,
519	WC_STATUS,
520	"Name",
521	WS_VISIBLE \| SS_TEXT \| DT_LEFT \|
522	DT_VCENTER,
523	((swp->x / 4) * 3) + 4 +
524	WinQuerySysValue(HWND_DESKTOP,
525	SV_CXSIZEBORDER),
526	swp->y + 4 +
527	WinQuerySysValue(HWND_DESKTOP,
528	SV_CYSIZEBORDER),
529	((swp->cx / 4) - 8) -
530	(WinQuerySysValue(HWND_DESKTOP,
531	SV_CXSIZEBORDER) * 2),
532	20, hwndFrame, HWND_TOP, IDM_RENAME, NULL, NULL);
533	if (!hwndName)
534	Win_Error(hwndFrame, hwnd, pszSrcFile, __LINE__,
535	PCSZ_WINCREATEWINDOW);
536
537	hwndTmp = WinCreateWindow(hwndFrame,
538	WC_TOOLBACK,
539	NullStr,
540	WS_VISIBLE \| SS_TEXT \| DT_CENTER \| DT_VCENTER,
541	swp->x +
542	WinQuerySysValue(HWND_DESKTOP,
543	SV_CXSIZEBORDER),
544	(swp->cy -
545	WinQuerySysValue(HWND_DESKTOP,
546	SV_CYSIZEBORDER)) - 30,
547	swp->cx -
548	(WinQuerySysValue(HWND_DESKTOP,
549	SV_CXSIZEBORDER) * 2),
550	30, hwndFrame, HWND_TOP, MAIN_TOOLS, NULL, NULL);
551	if (!hwndTmp)
552	Win_Error(hwndFrame, hwnd, pszSrcFile, __LINE__,
553	PCSZ_WINCREATEWINDOW);
554
555	hwndBack = WinCreateWindow(hwndFrame,
556	WC_DRIVEBACK,
557	NullStr,
558	WS_VISIBLE \| SS_TEXT \| DT_RIGHT \| DT_BOTTOM,
559	swp->x +
560	WinQuerySysValue(HWND_DESKTOP,
561	SV_CXSIZEBORDER),
562	(swp->cy -
563	WinQuerySysValue(HWND_DESKTOP,
564	SV_CYSIZEBORDER)) -
565	(DRIVE_BUTTON_HEIGHT),
566	swp->cx -
567	(WinQuerySysValue(HWND_DESKTOP,
568	SV_CXSIZEBORDER) * 2),
569	DRIVE_BUTTON_HEIGHT,
570	hwndFrame, HWND_TOP, MAIN_DRIVES, NULL, NULL);
571
572	if (!hwndBack)
573	Win_Error(hwndFrame, hwnd, pszSrcFile, __LINE__,
574	PCSZ_WINCREATEWINDOW);
575
576	hwndLED = WinCreateWindow(hwndFrame,
577	WC_LED,
578	"#920", // LEDOFF_BMP
579	WS_VISIBLE \| SS_BITMAP,
580	swp->cx - 58,
581	swp->y,
582	12,
583	12, hwndFrame, HWND_TOP, MAIN_LED, NULL, NULL);
584	if (!hwndLED)
585	Win_Error(hwndFrame, hwnd, pszSrcFile, __LINE__,
586	PCSZ_WINCREATEWINDOW);
587
588	hwndLEDHdr = WinCreateWindow(hwndFrame,
589	WC_LED,
590	"0",
591	WS_VISIBLE \| SS_TEXT \| DT_VCENTER \|
592	DT_CENTER,
593	swp->cx - 58,
594	swp->y + 12,
595	12,
596	12,
597	hwndFrame, HWND_TOP, MAIN_LEDHDR, NULL, NULL);
598	if (!hwndLEDHdr)
599	Win_Error(hwndFrame, hwnd, pszSrcFile, __LINE__,
600	PCSZ_WINCREATEWINDOW);
601
602	hwndAutoview = WinCreateWindow(hwndFrame,
603	WC_AUTOVIEW,
604	NullStr,
605	WS_VISIBLE \| SS_TEXT \| DT_LEFT \|
606	DT_TOP \| DT_WORDBREAK,
607	swp->x + 4 +
608	WinQuerySysValue(HWND_DESKTOP,
609	SV_CXSIZEBORDER),
610	swp->y + 4 +
611	WinQuerySysValue(HWND_DESKTOP,
612	SV_CYSIZEBORDER) + 16,
613	(swp->cx - 8) -
614	(WinQuerySysValue(HWND_DESKTOP,
615	SV_CXSIZEBORDER) * 2),
616	48,
617	hwndFrame,
618	HWND_TOP, MAIN_AUTOVIEW, NULL, NULL);
619	if (!hwndAutoview)
620	Win_Error(hwndFrame, hwnd, pszSrcFile, __LINE__,
621	PCSZ_WINCREATEWINDOW);
622
623	hwndAutoMLE = WinCreateWindow(hwndFrame,
624	// GetPString(IDS_WCAUTOVIEW),
625	WC_MLE,
626	NullStr,
627	WS_VISIBLE \| MLS_HSCROLL \|
628	MLS_VSCROLL \| MLS_BORDER,
629	swp->x + 4 +
630	WinQuerySysValue(HWND_DESKTOP,
631	SV_CXSIZEBORDER),
632	swp->y + 4 +
633	WinQuerySysValue(HWND_DESKTOP,
634	SV_CYSIZEBORDER) + 16,
635	(swp->cx - 8) -
636	(WinQuerySysValue(HWND_DESKTOP,
637	SV_CXSIZEBORDER) * 2),
638	48,
639	hwndFrame,
640	HWND_TOP, MAIN_AUTOVIEWMLE, NULL, NULL);
641	if (!hwndAutoMLE)
642	Win_Error(hwndFrame, hwnd, pszSrcFile, __LINE__,
643	PCSZ_WINCREATEWINDOW);
644
645	oldproc = WinSubclassWindow(hwndAutoMLE, AutoViewProc);
646	WinSetWindowPtr(hwndAutoMLE, QWL_USER, (PVOID) oldproc);
647	PostMsg(hwndAutoMLE, UM_SETUP, MPVOID, MPVOID);
648	}
649
650	/**
651	* Called by MainWndProc and MainWndProc2 to process messages
652	* common to both fm/2 and fm/2 lite main window
653	*/
654
655	MRESULT EXPENTRY CommonMainWndProc(HWND hwnd, ULONG msg, MPARAM mp1,
656	MPARAM mp2)
657	{
658	static BOOL fLedOn;
659	static LONG cWorkerThreads;
660
661	switch (msg) {
662	case UM_THREADUSE:
663	if (hbmLEDon && hbmLEDoff) {
664	CHAR sz[33];
665	if (mp1) {
666	cWorkerThreads++;
667	// 13 Sep 09 SHL fixme to be SMP safe
668	if (cWorkerThreads == 1) {
669	if (!WinStartTimer(WinQueryAnchorBlock(hwnd), hwnd, ID_LED_TIMER, 500))
670	Win_Error(hwnd, hwnd, pszSrcFile, __LINE__, "WinStartTimer");
671	fLedOn = TRUE;
672	WinSendMsg(hwndLED, SM_SETHANDLE, MPFROMLONG(hbmLEDon), MPVOID);
673	}
674	}
675	else if (cWorkerThreads > 0)
676	cWorkerThreads--;
677
678	ltoa(cWorkerThreads, sz, 10);
679	WinSetWindowText(hwndLEDHdr, sz);
680	DosSleep(0);
681	}
682	return 0;
683
684	case WM_TIMER:
685	fLedOn = !fLedOn;
686	WinSendMsg(hwndLED,
687	SM_SETHANDLE,
688	fLedOn ? MPFROMLONG(hbmLEDon) : MPFROMLONG(hbmLEDoff),
689	MPVOID);
690	if (!fLedOn && cWorkerThreads == 0) {
691	if (!WinStopTimer(WinQueryAnchorBlock(hwnd), hwnd, ID_LED_TIMER))
692	Win_Error(hwnd, hwnd, pszSrcFile, __LINE__, "WinStartTimer");
693	}
694	break;
695
696	case UM_LOADFILE:
697	{
698	CHAR *s = NULL;
699	static CHAR lastfile[CCHMAXPATH] = "";
700
701	if (!fAutoView) {
702	if (*lastfile)
703	PostMsg((fComments) ? hwndAutoMLE : hwndAutoview,
704	UM_LOADFILE, MPVOID, MPVOID);
705	*lastfile = 0;
706	}
707	else {
708	if (mp1) {
709	if (!mp2 && !stricmp(lastfile, (CHAR *)mp1))
710	return 0;
711	strcpy(lastfile, (CHAR *)mp1);
712	s = xstrdup(lastfile, pszSrcFile, __LINE__);
713	}
714	else
715	*lastfile = 0;
716	if (!PostMsg((fComments) ? hwndAutoMLE : hwndAutoview,
717	UM_LOADFILE, MPFROMP(s), MPVOID)) {
718	xfree(s, pszSrcFile, __LINE__);
719	}
720	}
721	}
722	return 0;
723
724	case UM_BUILDDRIVEBAR:
725	BuildDriveBarButtons(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
726	MAIN_DRIVES));
727	return 0;
728	}
729	return WinDefWindowProc(hwnd, msg, mp1, mp2);
730	}
731
732	MRESULT EXPENTRY CommonTextButton(HWND hwnd, ULONG msg, MPARAM mp1,
733	MPARAM mp2)
734	{
735	static HWND hwndLast = (HWND) 0;
736	static ULONG lastclick = 0;
737
738	switch (msg) {
739	case WM_MOUSEMOVE:
740	shiftstate = (SHORT2FROMMP(mp2) & (KC_SHIFT \| KC_ALT \| KC_CTRL));
741	if (!fNoFinger) {
742	WinSetPointer(HWND_DESKTOP, hptrFinger);
743	return MRFROMLONG(TRUE);
744	}
745	break;
746
747	case WM_BUTTON1DOWN:
748	case WM_BUTTON3DOWN:
749	if (hwndBubble)
750	WinDestroyWindow(hwndBubble);
751	shiftstate = (SHORT2FROMMP(mp2) & (KC_SHIFT \| KC_ALT \| KC_CTRL));
752	WinSetCapture(HWND_DESKTOP, hwnd);
753	PaintRecessedWindow(hwnd, (HPS) 0, FALSE, FALSE);
754	break;
755
756	case WM_BUTTON2UP:
757	case WM_BUTTON2DOWN:
758	shiftstate = (SHORT2FROMMP(mp2) & (KC_SHIFT \| KC_ALT \| KC_CTRL));
759	if (msg == WM_BUTTON2UP && hwndLast) {
760	PostMsg(hwnd, UM_FOCUSME, MPFROMP(hwndLast), MPVOID);
761	hwndLast = (HWND) 0;
762	}
763	break;
764
765	case WM_BUTTON1UP:
766	case WM_BUTTON3UP:
767	shiftstate = (SHORT2FROMMP(mp2) & (KC_SHIFT \| KC_ALT \| KC_CTRL));
768	WinSetCapture(HWND_DESKTOP, (HWND) 0);
769	PaintRecessedWindow(hwnd, (HPS) 0, TRUE, FALSE);
770	{
771	ULONG check;
772
773	DosQuerySysInfo(QSV_MS_COUNT, QSV_MS_COUNT, &check, sizeof(check));
774	if (check > lastclick + 500) {
775
776	RECTL rcl;
777	POINTS pts;
778
779	pts.x = SHORT1FROMMP(mp1);
780	pts.y = SHORT2FROMMP(mp1);
781	WinQueryWindowRect(hwnd, &rcl);
782	if (pts.x > 0 && pts.y > 0 && pts.x < rcl.xRight && pts.y < rcl.yTop)
783	PostMsg(hwnd, UM_CLICKED + (msg == WM_BUTTON3UP), mp1, mp2);
784	}
785	lastclick = check;
786	}
787	PostMsg(hwnd, UM_FOCUSME, MPFROMP(hwndLast), MPVOID);
788	hwndLast = (HWND) 0;
789	break;
790
791	case WM_SETFOCUS:
792	if (mp2)
793	hwndLast = (HWND) mp1;
794	break;
795
796	case UM_FOCUSME:
797	if (mp1) {
798
799	PID pid;
800	TID tid;
801
802	if (WinIsWindow(WinQueryAnchorBlock(hwnd), (HWND) mp1) &&
803	WinQueryWindowProcess((HWND) mp1, &pid, &tid) && pid == mypid) {
804	WinSetFocus(HWND_DESKTOP, (HWND) mp1);
805	return 0;
806	}
807	}
808	{
809	HWND htemp = (HWND) 0;
810
811	if (hwndMain)
812	htemp = TopWindow(hwndMain, (HWND) 0);
813	if (!htemp)
814	htemp = hwndTree;
815	if (htemp)
816	WinSetFocus(HWND_DESKTOP, htemp);
817	else
818	WinSetFocus(HWND_DESKTOP, WinQueryWindow(hwnd, QW_PARENT));
819	}
820	return 0;
821	}
822
823	return PFNWPStatic(hwnd, msg, mp1, mp2);
824	}
825
826	MRESULT EXPENTRY CommonCnrProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
827	{
828	DIRCNRDATA *dcd = WinQueryWindowPtr(hwnd, QWL_USER);
829
830	switch (msg) {
831	case UM_FIXCNRMLE:
832	if (dcd) {
833
834	SWP swp, swpC;
835
836	if (WinQueryWindowPos(WinWindowFromID(hwnd, CID_MLE), &swp)) {
837	if (WinQueryWindowPos(hwnd, &swpC)) {
838	swpC.cx -= (WinQuerySysValue(HWND_DESKTOP, SV_CXVSCROLL) + 4);
839	swpC.cx -= swp.x;
840	WinSetWindowPos(WinWindowFromID(hwnd, CID_MLE),
841	HWND_TOP, 0, 0, swpC.cx, swp.cy + 2, SWP_SIZE);
842	}
843	}
844	if (mp1)
845	WinSendMsg(WinWindowFromID(hwnd, CID_MLE),
846	MLM_SETTEXTLIMIT, mp1, MPVOID);
847	}
848	return 0;
849
850	case UM_FIXEDITNAME:
851	if (dcd) {
852	if (mp1 && (INT) mp1 != -1) {
853
854	CHAR *p;
855
856	WinSendMsg(hwnd, UM_FIXCNRMLE, MPFROMLONG(CCHMAXPATH), MPVOID);
857	MLEdelete(WinWindowFromID(hwnd, CID_MLE),
858	0, strlen((CHAR *)mp1) + 1);
859	WinSetDlgItemText(hwnd, CID_MLE, (CHAR *)mp1);
860	p = strrchr((CHAR *)mp1, '\\');
861	if (p) {
862	p++;
863	MLEsetcurposa(WinWindowFromID(hwnd, CID_MLE), (p - (CHAR *)mp1));
864	MLEsetcurposc(WinWindowFromID(hwnd, CID_MLE), strlen((CHAR *)mp1));
865	}
866	else
867	MLEsetcurpos(WinWindowFromID(hwnd, CID_MLE), strlen((CHAR *)mp1));
868	}
869	else if (mp2) {
870	if ((INT) mp1 == -1) {
871	PCNRITEM pci = (PCNRITEM) mp2;
872	RemoveCnrItems(hwnd, pci, 1, CMA_FREE \| CMA_INVALIDATE);
873	}
874	else {
875	Broadcast(WinQueryAnchorBlock(hwnd),
876	dcd->hwndParent, UM_UPDATERECORD, mp2, MPVOID);
877	free(mp2);
878	}
879	}
880	}
881	return 0;
882	}
883	return PFNWPCnr(hwnd, msg, mp1, mp2);
884	}
885
886	HWND OpenDirCnr(HWND hwnd, HWND hwndParent, HWND hwndRestore,
887	BOOL noautotile, char *directory)
888	{
889	SWP swp;
890	HWND hwndDir;
891
892	if (ParentIsDesktop(hwnd, hwndParent) \|\| (ULONG ) realappname != FM3UL)
893	StartDirCnr(HWND_DESKTOP, directory, hwndRestore, 1);
894	else if ((ULONG ) realappname == FM3UL) {
895	if (!fAutoTile)
896	GetNextWindowPos(hwndParent, &swp, NULL, NULL);
897	hwndDir = StartDirCnr(hwndParent, directory, hwndRestore, 1);
898	if (hwndDir) {
899	if (!fAutoTile)
900	WinSetWindowPos(hwndDir,
901	HWND_TOP,
902	swp.x,
903	swp.y,
904	swp.cx,
905	swp.cy, SWP_MOVE \| SWP_SIZE \| SWP_SHOW \| SWP_ZORDER);
906	else if (!noautotile)
907	TileChildren(hwndParent, TRUE);
908	WinSetWindowPos(hwndDir,
909	HWND_TOP,
910	0, 0, 0, 0, SWP_RESTORE \| SWP_SHOW \| SWP_ACTIVATE);
911	}
912	}
913	else {
914
915	char s[256];
916
917	assign_ignores(s);
918	runemf2(WINDOWED \| SEPARATE,
919	hwnd, pszSrcFile, __LINE__,
920	NULL,
921	NULL,
922	"VDIR.EXE %s%s\"%s%s\"",
923	(s) ? s : NullStr, (s) ? " " : NullStr,
924	directory,
925	(directory[strlen(directory) - 1] == '\\') ? PCSZ_BACKSLASH : NullStr);
926	}
927	return hwndDir;
928	}
929
930	//= IncrThreadUsage() Increment thread usage counter ==
931
932	VOID IncrThreadUsage(VOID)
933	{
934	if (hwndMain)
935	WinPostMsg(hwndMain, UM_THREADUSE, MPFROMLONG(1), MPVOID);
936	}
937
938	//= DecrThreadUsage() Decrement thread usage counter ==
939
940	VOID DecrThreadUsage(VOID)
941	{
942	if (hwndMain)
943	WinPostMsg(hwndMain, UM_THREADUSE, MPVOID, MPVOID);
944	}
945
946	#pragma alloc_text(COMMON,CommonFrameWndProc,CommonTextProc,CommonTextPaint)
947	#pragma alloc_text(COMMON1,CommonCreateTextChildren,CommonCreateMainChildren)
948	#pragma alloc_text(COMMON2,CommonDriveCmd,CommonTextButton)
949	#pragma alloc_text(COMMON3,CommonMainWndProc,IncrThreadUsage,DecrThreadUsage)
950	#pragma alloc_text(COMMON4,CommonCnrProc)
951	#pragma alloc_text(COMMON5,OpenDirCnr)

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

Download in other formats: