Context Navigation

source: trunk/dll/autoview.c@ 1009

Visit:

Last change on this file since 1009 was 1009, checked in by Steven Levine, 17 years ago
Add xfree xstrdup Fortify support Add MT capable Fortify scope logic
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 23.1 KB

Rev	Line
[41]	1
	2	/***********************************************************************
	3
	4	$Id: autoview.c 1009 2008-05-10 07:51:58Z stevenhl $
	5
	6	Auto view
	7
	8	Copyright (c) 1993-98 M. Kimes
[907]	9	Copyright (c) 2001, 2008 Steven H.Levine
[41]	10
[130]	11	12 Sep 02 SHL AutoObjProc: catch buff2 overflows
	12	25 Oct 02 SHL CreateHexDump: catch buffer overflow
	13	12 Feb 03 SHL AutoObjProc: standardize EA math
	14	23 May 05 SHL Use QWL_USER
[291]	15	29 May 06 SHL Sync with archiver.bb2 mods
[341]	16	22 Jul 06 SHL Check more run time errors
[439]	17	15 Aug 06 SHL Use Runtime_Error more
[531]	18	03 Nov 06 SHL Renames
[689]	19	30 Mar 07 GKY Remove GetPString for window class names
[793]	20	20 Aug 07 GKY Move #pragma alloc_text to end for OpenWatcom compat
[827]	21	01 Sep 07 GKY Use xDosSetPathInfo to fix case where FS3 buffer crosses 64k boundry
[846]	22	27 Sep 07 SHL Correct ULONGLONG size formatting
[872]	23	22 Nov 07 GKY Use CopyPresParams to fix presparam inconsistencies in menus
[897]	24	30 Dec 07 GKY Use CommaFmtULL
[985]	25	29 Feb 08 GKY Use xfree where appropriate
[41]	26
	27	***********************************************************************/
	28
[907]	29	#include <stdlib.h>
	30	#include <string.h>
	31	#include <ctype.h>
	32	#include <process.h> // _beginthread
	33
[2]	34	#define INCL_DOS
	35	#define INCL_WIN
	36	#define INCL_GPI
[841]	37	#define INCL_LONGLONG
[2]	38
	39	#include "fm3dlg.h"
	40	#include "fm3str.h"
	41	#include "mle.h"
[907]	42	#include "pathutil.h" // BldFullPathName
	43	#include "errutil.h" // Dos_Error...
	44	#include "strutil.h" // GetPString
	45	#include "fm3dll.h"
[2]	46
	47	#pragma data_seg(DATA1)
[341]	48
	49	static PSZ pszSrcFile = __FILE__;
	50
	51	static HWND hwndAutoObj;
[2]	52	static CHAR stopflag;
	53	static CHAR currfile[CCHMAXPATH];
	54
[551]	55	BOOL WriteEA(HWND hwnd, CHAR * filename, CHAR * eaname, USHORT type,
	56	CHAR * data)
[341]	57	{
[2]	58	/* save an ea to disk */
	59
	60	FEA2LIST *pfealist = NULL;
[551]	61	EAOP2 eaop;
	62	APIRET rc;
	63	ULONG ealen;
	64	USHORT len, num, plen, usCodepage;
	65	CHAR p, eaval;
	66	BOOL ret = FALSE;
[2]	67
[551]	68	if (!filename \|\| !eaname)
[2]	69	return ret;
[551]	70	usCodepage = (USHORT) WinQueryCp(WinQueryWindowULong(hwnd, QWL_HMQ));
[2]	71	len = (data) ? strlen(data) : 0;
[551]	72	ealen = sizeof(FEA2LIST) + 24L + strlen(eaname) + 1L + (ULONG) len + 4L;
	73	switch (type) {
	74	case EAT_EA:
	75	case EAT_ASCII:
	76	break;
	77	case EAT_MVST:
	78	if (data) {
	79	ealen += sizeof(USHORT) * 5;
	80	p = data;
	81	while (*p) {
	82	if (p == '\n' && (p + 1))
	83	ealen += sizeof(USHORT);
	84	p++;
	85	}
	86	}
	87	break;
	88	case EAT_MVMT:
	89	if (data) {
	90	ealen += sizeof(USHORT) * 5;
	91	p = data;
	92	while (*p) {
	93	if (p == '\n' && (p + 1))
	94	ealen += (sizeof(USHORT) * 2);
	95	p++;
	96	}
	97	}
	98	break;
	99	default:
	100	return ret;
	101	}
	102
	103	rc = DosAllocMem((PPVOID) & pfealist, ealen, PAG_COMMIT \| PAG_READ \|
	104	PAG_WRITE \| OBJ_TILE);
	105	if (rc \|\| !pfealist)
	106	Dos_Error(MB_CANCEL, rc, hwnd, pszSrcFile, __LINE__,
	107	GetPString(IDS_OUTOFMEMORY));
	108	else {
	109	memset(pfealist, 0, ealen);
	110	pfealist->list[0].cbName = strlen(eaname);
	111	memcpy(pfealist->list[0].szName, eaname, pfealist->list[0].cbName + 1);
	112	eaval = pfealist->list[0].szName + pfealist->list[0].cbName + 1;
	113	switch (type) {
[2]	114	case EAT_EA:
	115	case EAT_ASCII:
[551]	116	if (data) {
	117	(USHORT ) eaval = (USHORT) type;
	118	eaval += sizeof(USHORT);
	119	(USHORT ) eaval = (USHORT) len;
	120	eaval += sizeof(USHORT);
	121	memcpy(eaval, data, len);
	122	eaval += len;
	123	}
[2]	124	break;
	125	case EAT_MVST:
[551]	126	if (data) {
	127	(USHORT ) eaval = (USHORT) EAT_MVST;
	128	eaval += sizeof(USHORT);
	129	(USHORT ) eaval = usCodepage;
	130	eaval += sizeof(USHORT);
	131	num = (USHORT *) eaval;
	132	*num = 0;
	133	eaval += sizeof(USHORT);
	134	(USHORT ) eaval = (USHORT) EAT_ASCII;
	135	eaval += sizeof(USHORT);
	136	plen = (USHORT *) eaval;
	137	*plen = 0;
	138	eaval += sizeof(USHORT);
	139	p = data;
	140	while (*p) {
	141	while (*p) {
	142	if (*p == '\n') {
	143	p++;
	144	break;
	145	}
	146	eaval++ = p++;
	147	(*plen)++;
	148	}
	149	if (p \|\| plen)
	150	(*num)++;
	151	if (*p) {
	152	plen = (USHORT *) eaval;
	153	*plen = 0;
	154	eaval += sizeof(USHORT);
	155	}
	156	}
[2]	157	}
	158	break;
	159	case EAT_MVMT:
[551]	160	if (data) {
	161	(USHORT ) eaval = (USHORT) EAT_MVMT;
	162	eaval += sizeof(USHORT);
	163	(USHORT ) eaval = usCodepage;
	164	eaval += sizeof(USHORT);
	165	num = (USHORT *) eaval;
	166	*num = 0;
	167	eaval += sizeof(USHORT);
	168	(USHORT ) eaval = (USHORT) EAT_ASCII;
	169	eaval += sizeof(USHORT);
	170	plen = (USHORT *) eaval;
	171	*plen = 0;
	172	eaval += sizeof(USHORT);
	173	p = data;
	174	while (*p) {
	175	while (*p) {
	176	if (*p == '\n') {
	177	p++;
	178	break;
	179	}
	180	eaval++ = p++;
	181	(*plen)++;
	182	}
	183	if (p \|\| plen)
	184	(*num)++;
	185	if (*p) {
	186	(USHORT ) eaval = (USHORT) EAT_ASCII;
	187	eaval += sizeof(USHORT);
	188	plen = (USHORT *) eaval;
	189	*plen = 0;
	190	eaval += sizeof(USHORT);
	191	}
	192	}
[2]	193	}
	194	break;
	195	}
[551]	196	pfealist->list[0].cbValue = (ULONG) (eaval -
	197	(pfealist->list[0].szName +
	198	pfealist->list[0].cbName + 1));
	199	memset(&eaop, 0, sizeof(eaop));
[2]	200	eaop.fpFEA2List = pfealist;
[841]	201	pfealist->cbList = 13 + (ULONG) pfealist->list[0].cbName +
[551]	202	(ULONG) pfealist->list[0].cbValue;
[827]	203	rc = xDosSetPathInfo(filename, FIL_QUERYEASIZE,
	204	&eaop, sizeof(eaop), DSPI_WRTTHRU);
[2]	205	DosFreeMem(pfealist);
[551]	206	if (!rc)
[2]	207	ret = TRUE;
	208	}
	209	return ret;
	210	}
	211
[551]	212	BOOL PutComments(HWND hwnd, CHAR * filename, CHAR * comments)
[341]	213	{
[2]	214	register CHAR *p;
	215
[551]	216	if (comments) { /* check -- is it empty? */
[2]	217	p = comments;
[551]	218	while (p && isspace(p))
[2]	219	p++;
[551]	220	if (!*p)
[2]	221	comments = NULL;
	222	}
[551]	223	return WriteEA(hwnd, filename, ".COMMENTS", EAT_MVMT, comments);
[2]	224	}
	225
[439]	226	static PSZ pszBufOvfMsg = "Buffer overflow";
[2]	227
[551]	228	ULONG CreateHexDump(CHAR * pchInBuf, ULONG cbInBuf,
	229	CHAR * pchOutBuf, ULONG cbOutBuf,
	230	ULONG cOffset, BOOL fLongAddr)
[41]	231	{
[551]	232	register CHAR pchIn, pchReset, *pchOut;
	233	register ULONG ibIn = 0, ibIn2, ibInFill;
[41]	234	ULONG cbOutLine = 6 + (fLongAddr ? 4 : 0) + 16 * 3 + 1 + 16 + 1;
[2]	235
[551]	236	if (pchInBuf && cbInBuf && pchOutBuf && cbOutBuf) {
[41]	237	pchIn = pchInBuf;
	238	pchOut = pchOutBuf;
[551]	239	if (cOffset)
[41]	240	*pchOut++ = '\n';
	241	while (ibIn < cbInBuf) {
	242	if (pchOut - pchOutBuf + cbOutLine >= cbOutBuf) {
[551]	243	Runtime_Error(pszSrcFile, __LINE__, pszBufOvfMsg);
[41]	244	break;
	245	}
	246	pchReset = pchIn;
	247	ibIn2 = ibIn;
[551]	248	if (fLongAddr)
	249	sprintf(pchOut, "%08lx ", ibIn + cOffset);
[2]	250	else
[551]	251	sprintf(pchOut, "%04lx ", ibIn + cOffset);
[41]	252	pchOut += 6 + (fLongAddr ? 4 : 0);
[2]	253	do {
[870]	254	sprintf(pchOut, "%02x ", (UCHAR)*pchIn);
[551]	255	pchOut += 3;
	256	pchIn++;
	257	ibIn++;
	258	} while (ibIn < cbInBuf && (ibIn % 16));
	259	if (ibIn % 16) {
	260	ibInFill = ibIn;
	261	while (ibInFill % 16) {
	262	*pchOut++ = ' ';
	263	*pchOut++ = ' ';
	264	*pchOut++ = ' ';
	265	ibInFill++;
	266	}
[2]	267	}
[41]	268	*pchOut++ = ' ';
	269	pchIn = pchReset;
[2]	270	do {
[551]	271	if (pchIn && pchIn != '\n' && pchIn != '\r' && pchIn != '\t'
	272	&& *pchIn != '\x1a')
	273	pchOut++ = pchIn++;
	274	else {
	275	*pchOut++ = '.';
	276	pchIn++;
	277	}
	278	ibIn2++;
	279	} while (ibIn2 < ibIn);
	280	if (ibIn < cbInBuf)
	281	*pchOut++ = '\n';
	282	} // while ibIn
[41]	283	*pchOut = 0;
[551]	284	return (ULONG) (pchOut - pchOutBuf);
[2]	285	}
	286	return 0L;
	287	}
	288
[551]	289	MRESULT EXPENTRY AutoObjProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[51]	290	{
[551]	291	switch (msg) {
	292	case UM_LOADFILE:
	293	*currfile = 0;
	294	stopflag--;
	295	if (fAutoView) {
	296	WinSetWindowText((fComments) ? hwndAutoMLE : hwndAutoview, "");
	297	MLEsetreadonly(hwndAutoMLE, TRUE);
	298	MLEsetchanged(hwndAutoMLE, FALSE);
	299	}
	300	if (mp1) {
	301	if (fAutoView) {
[1009]	302	strcpy(currfile, (CHAR *)mp1);
[551]	303	if (!fComments) {
[1009]	304	if (IsFile((CHAR *)mp1) == 1) {
[2]	305
[551]	306	HFILE handle;
[858]	307	ULONG olen, ibufflen, action, obufflen, l;
[850]	308	CHAR ibuff, obuff, *p;
	309	// 06 Oct 07 SHL Protect against NTFS driver small buffer defect
	310	// CHAR buffer[80];
	311	CHAR buffer[4096];
[551]	312	ARC_TYPE *info;
[2]	313
[1009]	314	if (!DosOpen((CHAR *)mp1,
[844]	315	&handle,
	316	&action,
	317	0,
	318	0,
	319	OPEN_ACTION_FAIL_IF_NEW \| OPEN_ACTION_OPEN_IF_EXISTS,
	320	OPEN_FLAGS_FAIL_ON_ERROR \| OPEN_FLAGS_NOINHERIT \|
	321	OPEN_FLAGS_RANDOMSEQUENTIAL \| OPEN_SHARE_DENYNONE \|
	322	OPEN_ACCESS_READONLY, 0)) {
[850]	323	ibufflen = AutoviewHeight < 96 ? 512 : 3072;
	324	// 06 Oct 07 SHL protect against NTFS driver small buffer defect
[858]	325	// ibuff = xmalloc(ibufflen + 2, pszSrcFile, __LINE__); // 05 Nov 07 SHL
	326	ibuff = xmalloc(max(ibufflen + 2, 4096), pszSrcFile, __LINE__);
[551]	327	if (ibuff) {
	328	// Depends on CreateHexDump line width
	329	obufflen = (ibufflen / 16) * (6 + 3 * 16 + 1 + 16 + 1) + 80;
	330	obuff = xmalloc(obufflen + 1, pszSrcFile, __LINE__);
	331	if (obuff) {
	332	*obuff = 0;
[850]	333	if (!DosRead(handle, ibuff, ibufflen, &ibufflen) &&
	334	ibufflen)
	335	{
[551]	336	ibuff[ibufflen] = 0;
	337	p = obuff;
	338	if (IsBinary(ibuff, ibufflen)) {
	339	olen = ibufflen;
	340	// Check archive
	341	if (!arcsigsloaded)
	342	load_archivers();
	343	info = arcsighead;
	344	while (info) {
	345	if (info->signature && *info->signature) {
	346	l = strlen(info->signature);
	347	l = min(l, 79);
	348	if (!DosChgFilePtr(handle, abs(info->file_offset),
	349	(info->file_offset >= 0L) ?
	350	FILE_BEGIN :
	351	FILE_END, &ibufflen)) {
	352	if (!DosRead(handle,
	353	buffer,
	354	l, &ibufflen) && ibufflen == l) {
	355	if (!memcmp(info->signature, buffer, l))
	356	break;
	357	}
	358	}
	359	}
	360	info = info->next;
	361	}
	362	if (info) {
	363	sprintf(p, "**%s%s%s\n",
[773]	364	info->id ? info->id : "",
	365	info->id ? " " : "",
[551]	366	GetPString(IDS_ARCHIVETEXT));
	367	p += strlen(p);
	368	}
	369	CreateHexDump(ibuff, // Input buffer
	370	olen, // Input buffer size
	371	p, // Output buffer
	372	obufflen - (p - obuff), // Output buffer size
	373	0, // Address offest
	374	FALSE); // Short addresses
	375	}
	376	else {
	377	// Text file
	378	register CHAR src, dest;
	379	CHAR *endsrc;
[2]	380
[551]	381	src = ibuff;
	382	dest = obuff;
	383	endsrc = ibuff + ibufflen;
	384	while (src < endsrc) {
	385	if (dest == obuff && (src == '\t' \|\| src == ' ' \|\|
	386	src == '\r' \|\| src == '\n')) {
	387	src++;
	388	}
	389	else if (src == '\t' \|\| !src) {
	390	*dest = ' ';
	391	dest++;
	392	src++;
	393	}
	394	else if (src == '\r' \|\| src == '\n') {
	395	dest = src;
	396	while ((src + 1) == '\r' \|\| (src + 1) == '\n' \|\|
	397	(src + 1) == ' ' \|\| (src + 1) == '\t')
	398	src++;
	399	dest++;
	400	src++;
	401	}
	402	else {
	403	dest = src;
	404	src++;
	405	dest++;
	406	}
	407	} // while
	408	*dest = 0;
	409	if (dest - obuff >= obufflen)
	410	Runtime_Error(pszSrcFile, __LINE__, pszBufOvfMsg);
	411	}
	412	if (*obuff)
	413	WinSetWindowText(hwndAutoview, obuff);
	414	}
[1009]	415	xfree(obuff, pszSrcFile, __LINE__);
[551]	416	}
[1009]	417	xfree(ibuff, pszSrcFile, __LINE__);
[551]	418	}
	419	DosClose(handle);
	420	}
	421	}
	422	else if (!IsFile(currfile)) {
[2]	423
[841]	424	static FILEFINDBUF4L ffb[130];
[897]	425	CHAR fullname[CCHMAXPATH + 4], szCmmaFmtFileSize[81];
[551]	426	HDIR hdir = HDIR_CREATE;
	427	ULONG x, nm, ml, mc, bufflen;
	428	PBYTE fb;
[841]	429	PFILEFINDBUF4L pffbFile;
[773]	430	PSZ pszBuf;
	431	PSZ p;
	432	APIRET rc;
[2]	433
[773]	434	BldFullPathName(fullname, currfile, "*");
[763]	435	//sprintf(fullname,
	436	// "%s%s*",
	437	// currfile,
	438	// (currfile[strlen(currfile) - 1] == '\\') ? "" : "\\");
[551]	439	DosError(FERR_DISABLEHARDERR);
[841]	440	nm = sizeof(ffb) / sizeof(FILEFINDBUF4L);
[551]	441	if (AutoviewHeight < 96)
	442	nm /= 2;
[838]	443	rc = xDosFindFirst(fullname,
[858]	444	&hdir,
	445	FILE_NORMAL \| FILE_DIRECTORY \|
	446	FILE_READONLY \| FILE_ARCHIVED \|
	447	FILE_SYSTEM \| FILE_HIDDEN,
	448	&ffb, sizeof(ffb), &nm, FIL_QUERYEASIZEL);
[551]	449	if (!rc && nm) {
	450	fb = (PBYTE) & ffb;
	451	x = ml = 0;
	452	while (x < nm) {
[841]	453	pffbFile = (PFILEFINDBUF4L) fb;
[551]	454	mc = (ULONG) pffbFile->cchName +
	455	((pffbFile->attrFile & FILE_DIRECTORY) != 0);
	456	ml = max(ml, mc);
	457	if (!pffbFile->oNextEntryOffset)
	458	break;
	459	fb += pffbFile->oNextEntryOffset;
	460	x++;
	461	}
	462	bufflen = (CCHMAXPATHCOMP + 42) * nm;
[773]	463	pszBuf = xmalloc(bufflen, pszSrcFile, __LINE__);
	464	if (pszBuf) {
	465	p = pszBuf;
[551]	466	*p = 0;
	467	fb = (PBYTE) & ffb;
	468	x = 0;
	469	while (x < nm) {
[841]	470	pffbFile = (PFILEFINDBUF4L) fb;
[551]	471	if (!(!*pffbFile->achName \|\|
	472	(((pffbFile->attrFile & FILE_DIRECTORY) &&
	473	pffbFile->achName[0] == '.') &&
	474	(!pffbFile->achName[1] \|\|
	475	(pffbFile->achName[1] == '.' &&
	476	!pffbFile->achName[2]))))) {
[897]	477	CommaFmtULL(szCmmaFmtFileSize,
	478	sizeof(szCmmaFmtFileSize),
	479	pffbFile->cbFile + CBLIST_TO_EASIZE(pffbFile->cbList),
	480	' ');
[551]	481	sprintf(p,
[897]	482	"%s%-.s %-8s [%s%s%s%s] %04lu/%02lu/%02lu "
[846]	483	"%02lu:%02lu:%02lu\r",
	484	pffbFile->attrFile & FILE_DIRECTORY ? "\\" : " ",
[551]	485	ml,
	486	ml,
[897]	487	pffbFile->achName,
	488	szCmmaFmtFileSize,
[846]	489	pffbFile->attrFile & FILE_READONLY ? "R" : "-",
	490	pffbFile->attrFile & FILE_ARCHIVED ? "A" : "-",
	491	pffbFile->attrFile & FILE_HIDDEN ? "H" : "-",
	492	pffbFile->attrFile & FILE_SYSTEM ? "S" : "-",
[551]	493	pffbFile->fdateLastWrite.year + 1980,
	494	pffbFile->fdateLastWrite.month,
	495	pffbFile->fdateLastWrite.day,
	496	pffbFile->ftimeLastWrite.hours,
	497	pffbFile->ftimeLastWrite.minutes,
	498	pffbFile->ftimeLastWrite.twosecs * 2);
	499	p += strlen(p);
	500	}
	501	if (!pffbFile->oNextEntryOffset)
	502	break;
	503	fb += pffbFile->oNextEntryOffset;
	504	x++;
	505	} // while
[773]	506	if (p - pszBuf >= bufflen)
[551]	507	Runtime_Error(pszSrcFile, __LINE__, pszBufOvfMsg);
[773]	508	if (*pszBuf)
	509	WinSetWindowText(hwndAutoview, pszBuf);
[1009]	510	xfree(pszBuf, pszSrcFile, __LINE__);
[551]	511	}
	512	}
	513	if (!rc)
	514	DosFindClose(hdir);
	515	}
	516	}
	517	else {
[2]	518
[551]	519	APIRET rc;
	520	EAOP2 eaop;
	521	PGEA2LIST pgealist;
	522	PFEA2LIST pfealist;
	523	PGEA2 pgea;
	524	PFEA2 pfea;
[773]	525	CHAR value, pszBuf, p, data;
[551]	526	USHORT len, type, plen, dlen;
	527	BOOL readonly = FALSE;
[2]	528
[551]	529	pgealist = xmallocz(sizeof(GEA2LIST) + 64, pszSrcFile, __LINE__);
	530	if (pgealist) {
	531	pgea = &pgealist->list[0];
	532	strcpy(pgea->szName, ".COMMENTS");
	533	pgea->cbName = strlen(pgea->szName);
	534	pgea->oNextEntryOffset = 0L;
	535	pgealist->cbList = (sizeof(GEA2LIST) + pgea->cbName);
	536	pfealist = xmallocz(65536, pszSrcFile, __LINE__);
	537	if (pfealist) {
	538	pfealist->cbList = 65536;
	539	eaop.fpGEA2List = pgealist;
	540	eaop.fpFEA2List = pfealist;
	541	eaop.oError = 0L;
[1009]	542	rc = DosQueryPathInfo((CHAR *)mp1, FIL_QUERYEASFROMLIST,
[551]	543	(PVOID) & eaop, (ULONG) sizeof(EAOP2));
[1009]	544	xfree(pgealist, pszSrcFile, __LINE__);
[551]	545	if (!rc) {
	546	pfea = &eaop.fpFEA2List->list[0];
	547	if (pfea->cbName && pfea->cbValue) {
	548	value = pfea->szName + pfea->cbName + 1;
	549	value[pfea->cbValue] = 0;
	550	if ((USHORT ) value == EAT_MVMT) {
[773]	551	pszBuf = xmalloc(65536, pszSrcFile, __LINE__);
	552	if (pszBuf) {
	553	p = pszBuf;
	554	*pszBuf = 0;
[551]	555	data = value + (sizeof(USHORT) * 3);
	556	type = (USHORT ) data;
	557	data += sizeof(USHORT);
	558	len = (USHORT ) data;
	559	data += sizeof(USHORT);
	560	while ((data - value) - len < pfea->cbValue) {
	561	if (type == EAT_ASCII) {
	562	dlen = plen = 0;
	563	while (dlen < len) {
	564	if (data[dlen] == '\r') {
	565	dlen++;
	566	if (dlen < len && data[dlen] != '\n')
	567	p[plen++] = '\n';
	568	}
	569	else
	570	p[plen++] = data[dlen++];
	571	}
	572	if ((!len \|\| !plen \|\| p[plen - 1] != '\n') &&
	573	(data - value) + len < pfea->cbValue)
	574	p[plen++] = '\n';
	575	p += plen;
	576	*p = 0;
	577	}
	578	else
	579	readonly = TRUE;
	580	data += len;
	581	if (data - value >= pfea->cbValue)
[41]	582	break;
[551]	583	type = (USHORT ) data;
	584	data += sizeof(USHORT);
	585	len = (USHORT ) data;
	586	data += sizeof(USHORT);
	587	} // while
[773]	588	if (p - pszBuf >= 65536) {
[551]	589	Runtime_Error(pszSrcFile, __LINE__, pszBufOvfMsg);
[773]	590	pszBuf[65535] = 0; // Try to stay alive
[551]	591	break;
	592	}
[773]	593	WinSetWindowText(hwndAutoMLE, pszBuf);
[1009]	594	xfree(pszBuf, pszSrcFile, __LINE__);
[551]	595	}
	596	}
	597	else
	598	readonly = TRUE;
	599	}
	600	/* else EA not present */
	601	MLEsetchanged(hwndAutoMLE, FALSE);
	602	MLEsetreadonly(hwndAutoMLE, readonly);
	603	}
	604	else {
	605	MLEsetchanged(hwndAutoMLE, FALSE);
	606	MLEsetreadonly(hwndAutoMLE, FALSE);
	607	}
[1009]	608	xfree(pfealist, pszSrcFile, __LINE__);
[551]	609	}
	610	}
	611	}
[2]	612	}
[1009]	613	xfree((CHAR *)mp1, pszSrcFile, __LINE__);
[551]	614	}
	615	return 0;
[2]	616
[551]	617	case UM_CLOSE:
	618	if (!PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID))
	619	WinSendMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID);
	620	WinDestroyWindow(hwnd);
	621	return 0;
[2]	622	}
[551]	623	return WinDefWindowProc(hwnd, msg, mp1, mp2);
[2]	624	}
	625
[551]	626	static VOID MakeAutoWinThread(VOID * args)
[341]	627	{
[551]	628	HAB hab2;
	629	HMQ hmq2;
	630	HWND hwndParent = (HWND) args;
	631	QMSG qmsg2;
[2]	632
	633	hab2 = WinInitialize(0);
[551]	634	if (hab2) {
	635	hmq2 = WinCreateMsgQueue(hab2, 128);
	636	if (hmq2) {
[2]	637	DosError(FERR_DISABLEHARDERR);
	638	WinRegisterClass(hab2,
[593]	639	WC_OBJECTWINDOW,
[551]	640	AutoObjProc, 0, sizeof(PVOID));
[2]	641	hwndAutoObj = WinCreateWindow(HWND_OBJECT,
[593]	642	WC_OBJECTWINDOW,
[551]	643	(PSZ) NULL,
	644	0,
	645	0L,
	646	0L,
	647	0L,
	648	0L, 0L, HWND_TOP, OBJ_FRAME, NULL, NULL);
[377]	649	if (!hwndAutoObj) {
[551]	650	Win_Error2(HWND_OBJECT, HWND_DESKTOP, pszSrcFile, __LINE__,
	651	IDS_WINCREATEWINDOW);
	652	if (!PostMsg(hwndParent, UM_CLOSE, MPVOID, MPVOID))
	653	WinSendMsg(hwndParent, UM_CLOSE, MPVOID, MPVOID);
[377]	654	}
	655	else {
[551]	656	WinSetWindowULong(hwndAutoObj, QWL_USER, hwndParent);
	657	priority_normal();
	658	while (WinGetMsg(hab2, &qmsg2, (HWND) 0, 0, 0))
	659	WinDispatchMsg(hab2, &qmsg2);
	660	WinDestroyWindow(hwndAutoObj);
	661	hwndAutoObj = (HWND) 0;
[2]	662	}
	663	WinDestroyMsgQueue(hmq2);
	664	}
	665	else
	666	WinTerminate(hab2);
	667	}
	668	}
	669
[551]	670	MRESULT EXPENTRY AutoViewProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[341]	671	{
[551]	672	USHORT id = WinQueryWindowUShort(hwnd, QWS_ID);
[2]	673
[551]	674	switch (msg) {
	675	case WM_CREATE:
	676	{
	677	MRESULT mr;
[2]	678
[551]	679	if (!hwndAutoObj) {
	680	if (_beginthread(MakeAutoWinThread, NULL, 65536, (PVOID) hwnd) == -1) {
	681	Runtime_Error(pszSrcFile, __LINE__,
	682	GetPString(IDS_COULDNTSTARTTHREADTEXT));
	683	PostMsg(hwnd, UM_CLOSE, MPVOID, MPVOID);
[341]	684	}
[2]	685	}
[551]	686	mr = PFNWPStatic(hwnd, msg, mp1, mp2);
	687	SetPresParams(hwnd,
	688	&RGBGREY,
	689	&RGBBLACK, &RGBGREY, GetPString(IDS_4SYSTEMVIOTEXT));
	690	stopflag = 0;
	691	return mr;
	692	}
[2]	693
[551]	694	case UM_SETUP:
	695	MLEsetlimit(hwnd, 32768);
	696	MLEsetformat(hwnd, MLFIE_NOTRANS);
	697	MLEsetchanged(hwnd, FALSE);
	698	return 0;
[2]	699
[551]	700	case WM_BUTTON1DOWN:
	701	{
	702	SWP swp;
[2]	703
[551]	704	WinQueryWindowPos(hwnd, &swp);
	705	if (SHORT2FROMMP(mp1) > swp.cy - 4) {
[2]	706
[551]	707	HPS hps = WinGetPS(WinQueryWindow(hwnd, QW_PARENT));
	708	SWP swpC;
	709	TRACKINFO track;
[2]	710
[551]	711	if (hps) {
	712	WinQueryWindowPos(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
	713	FID_CLIENT), &swpC);
	714	track.cxBorder = 4;
	715	track.cyBorder = 4;
	716	track.cxGrid = 1;
	717	track.cyGrid = 8;
	718	track.cxKeyboard = 8;
	719	track.rclTrack.yBottom = swp.y;
	720	track.rclTrack.yTop = swp.y + swp.cy;
	721	track.rclTrack.xLeft = swp.x;
	722	track.rclTrack.xRight = swp.x + swp.cx;
	723	track.rclBoundary = track.rclTrack;
	724	track.rclBoundary.yTop = (swpC.cy + swp.y + swp.cy) - 116;
	725	track.ptlMinTrackSize.x = swp.x + swp.cx;
	726	track.ptlMinTrackSize.y = 36;
	727	track.ptlMaxTrackSize.x = swp.x + swp.cx;
	728	track.ptlMaxTrackSize.y = (swpC.cy + swp.cy) - 116;
	729	track.fs = TF_TOP;
	730	if (WinTrackRect(hwnd, hps, &track)) {
	731	AutoviewHeight = track.rclTrack.yTop - track.rclTrack.yBottom;
	732	PrfWriteProfileData(fmprof,
	733	FM3Str,
	734	"AutoviewHeight",
	735	&AutoviewHeight, sizeof(ULONG));
	736	WinSendMsg(WinQueryWindow(hwnd, QW_PARENT),
	737	WM_UPDATEFRAME, MPFROMLONG(FCF_SIZEBORDER), MPVOID);
	738	}
	739	WinReleasePS(hps);
	740	}
	741	return (MRESULT) TRUE;
[2]	742	}
[551]	743	else if (id != MAIN_AUTOVIEWMLE)
	744	return CommonTextButton(hwnd, msg, mp1, mp2);
	745	}
	746	break;
[2]	747
[551]	748	case WM_BUTTON3DOWN:
	749	case WM_BUTTON1UP:
	750	case WM_BUTTON3UP:
	751	if (id != MAIN_AUTOVIEWMLE)
	752	return CommonTextButton(hwnd, msg, mp1, mp2);
	753	break;
[2]	754
[551]	755	case WM_MOUSEMOVE:
	756	shiftstate = (SHORT2FROMMP(mp2) & (KC_ALT \| KC_SHIFT \| KC_CTRL));
	757	{
	758	SWP swp;
[2]	759
[551]	760	WinQueryWindowPos(hwnd, &swp);
	761	if (SHORT2FROMMP(mp1) > swp.cy - 4) {
	762	WinSetPointer(HWND_DESKTOP, hptrNS);
	763	return (MRESULT) TRUE;
[2]	764	}
[551]	765	}
	766	break;
[2]	767
[551]	768	case WM_PAINT:
	769	PostMsg(hwnd, UM_PAINT, MPVOID, MPVOID);
	770	break;
[2]	771
[551]	772	case UM_PAINT:
	773	PaintRecessedWindow(hwnd, (HPS) 0, TRUE, TRUE);
	774	return 0;
[2]	775
[551]	776	case WM_SETFOCUS:
	777	switch (id) {
	778	case MAIN_AUTOVIEWMLE:
	779	if (!mp2 && !AutoMenu) {
	780	if (*currfile) {
	781	if (MLEgetchanged(hwnd)) {
	782	CHAR *ea = xmalloc(32768, pszSrcFile, __LINE__);
	783
	784	if (ea) {
	785	*ea = 0;
	786	WinQueryWindowText(hwnd, 32767, ea);
	787	PutComments(hwnd, currfile, ea);
	788	PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_RESCAN, 0), MPVOID);
[1009]	789	xfree(ea, pszSrcFile, __LINE__);
[551]	790	}
	791	}
	792	}
[2]	793	}
	794	break;
[551]	795	default:
	796	if (mp2)
	797	PostMsg(hwnd, UM_FOCUSME, mp1, mp2);
	798	break;
	799	}
	800	break;
[2]	801
[551]	802	case UM_FOCUSME:
	803	if (mp2) {
[2]	804
[551]	805	PID pid;
	806	TID tid;
[2]	807
[551]	808	if (WinQueryWindowProcess((HWND) mp1, &pid, &tid) && pid == mypid)
	809	WinSetFocus(HWND_DESKTOP, (HWND) mp1);
	810	else
	811	WinSetFocus(HWND_DESKTOP, hwndTree);
	812	}
	813	return 0;
[2]	814
[551]	815	case UM_CLICKED:
	816	case UM_CLICKED3:
	817	if (id != MAIN_AUTOVIEWMLE) {
[2]	818	PostMsg(hwnd,
[551]	819	WM_COMMAND,
	820	MPFROM2SHORT(((msg == UM_CLICKED3) ?
	821	IDM_EAS : IDM_VIEWORARC), 0), MPVOID);
	822	}
	823	return 0;
[2]	824
[551]	825	case WM_COMMAND:
	826	PostMsg(hwnd, UM_COMMAND, mp1, mp2);
	827	return 0;
[2]	828
[551]	829	case UM_COMMAND:
	830	switch (SHORT1FROMMP(mp1)) {
	831	case IDM_RESCAN:
	832	if (*currfile) {
[2]	833
[551]	834	CHAR *cf = xstrdup(currfile, pszSrcFile, __LINE__);
[2]	835
[551]	836	if (cf) {
	837	stopflag++;
	838	if (!PostMsg(hwndAutoObj, UM_LOADFILE, MPFROMP(cf), MPVOID))
[1009]	839	xfree(cf, pszSrcFile, __LINE__);
[551]	840	}
	841	}
	842	break;
[2]	843
[551]	844	case IDM_INFO:
	845	DefaultView(hwnd, (HWND) 0, hwndMain, NULL, 16, currfile);
	846	break;
[2]	847
[551]	848	case IDM_VIEW:
	849	DefaultView(hwnd, (HWND) 0, hwndMain, NULL, 0, currfile);
	850	break;
[2]	851
[551]	852	case IDM_EDIT:
	853	DefaultView(hwnd, (HWND) 0, hwndMain, NULL, 8, currfile);
	854	break;
[2]	855
[551]	856	case IDM_EAS:
	857	{
	858	char *list[2];
[2]	859
[551]	860	list[0] = currfile;
	861	list[1] = NULL;
[2]	862
[551]	863	WinDlgBox(HWND_DESKTOP,
	864	hwndMain,
	865	DisplayEAsProc, FM3ModHandle, EA_FRAME, (PVOID) list);
[2]	866	}
	867	break;
	868
[551]	869	default:
	870	PostMsg(hwndMain, msg, mp1, mp2);
	871	}
	872	return 0;
[2]	873
[551]	874	case WM_MENUEND:
	875	if ((HWND) mp2 == AutoMenu) {
	876	WinDestroyWindow(AutoMenu);
	877	AutoMenu = (HWND) 0;
	878	}
	879	break;
[2]	880
[551]	881	case WM_CONTEXTMENU:
[872]	882	CheckMenu(hwnd, &AutoMenu, (id == MAIN_AUTOVIEWMLE) ?
[551]	883	IDM_AUTOVIEWMLE : IDM_AUTOVIEW);
	884	WinCheckMenuItem(AutoMenu, IDM_AUTOVIEWFILE, !fComments);
	885	WinCheckMenuItem(AutoMenu, IDM_AUTOVIEWCOMMENTS, fComments);
	886	WinEnableMenuItem(AutoMenu, IDM_VIEW, (IsFile(currfile) == 1));
	887	WinEnableMenuItem(AutoMenu, IDM_EDIT, (IsFile(currfile) == 1));
	888	WinEnableMenuItem(AutoMenu, IDM_INFO, (*currfile != 0));
	889	PopupMenu(hwnd, hwnd, AutoMenu);
	890	break;
[2]	891
[551]	892	case UM_LOADFILE:
	893	stopflag++;
	894	if (!PostMsg(hwndAutoObj, msg, mp1, mp2)) {
[1009]	895	xfree((CHAR *)mp1, pszSrcFile, __LINE__);
[551]	896	}
	897	return 0;
[2]	898
[551]	899	case UM_CLOSE:
	900	if (AutoMenu) {
	901	WinDestroyWindow(AutoMenu);
	902	AutoMenu = (HWND) 0;
	903	}
	904	WinDestroyWindow(hwnd);
	905	return 0;
	906
	907	case WM_CLOSE:
	908	WinSendMsg(hwnd, UM_CLOSE, MPVOID, MPVOID);
	909	return 0;
	910
	911	case WM_DESTROY:
	912	if (id != MAIN_AUTOVIEWMLE) {
	913	if (hwndAutoObj)
	914	if (!PostMsg(hwndAutoObj, WM_CLOSE, MPVOID, MPVOID))
	915	WinSendMsg(hwndAutoObj, WM_CLOSE, MPVOID, MPVOID);
[2]	916	break;
[551]	917	}
	918	break;
[2]	919	}
	920
[551]	921	if (id == MAIN_AUTOVIEWMLE)
	922	return PFNWPMLE(hwnd, msg, mp1, mp2);
	923	return PFNWPStatic(hwnd, msg, mp1, mp2);
[2]	924	}
[793]	925
	926	#pragma alloc_text(AUTOVIEW,AutoViewProc,CreateHexDump,AutoObjProc)
	927	#pragma alloc_text(AUTOVIEW2,MakeAutoWinThread,WriteEA,PutComments)

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

Download in other formats: