Context Navigation

source: trunk/dll/common.c@ 955

Visit:

Last change on this file since 955 was 948, checked in by Steven Levine, 18 years ago
Rework collector progress reporting and improve performance (ticket #79)
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 20.5 KB

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

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

Download in other formats: