Context Navigation

source: trunk/dll/eas.c@ 947

Visit:

Last change on this file since 947 was 907, checked in by Steven Levine, 18 years ago
Avoid out of memory traps in Compare Directories Rework Compare Directories progress display for 2 second update rate Start refactoring to reduce dependence on fm3dll.h Add timer services (IsITimerExpired etc.)
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 35.8 KB

Rev	Line
[123]	1
	2	/***********************************************************************
	3
	4	$Id: eas.c 907 2008-01-06 07:26:17Z stevenhl $
	5
[347]	6	Display/edit EAs
	7
[123]	8	Copyright (c) 1993-98 M. Kimes
[347]	9	Copyright (c) 2004, 2006 Steven H. Levine
[123]	10
[193]	11	01 Aug 04 SHL Rework lstrip/rstrip usage
	12	06 Jun 05 SHL Indent -i2
[207]	13	06 Jun 05 SHL Rework DisplayEAsProc for VAC3.65 compat
	14	06 Jun 05 SHL Drop unused variables
[347]	15	17 Jul 06 SHL Use Runtime_Error
[574]	16	22 Mar 07 GKY Use QWL_USER
[725]	17	05 Jul 07 SHL GetFileEAs: avoid heap corruption
[730]	18	15 Jul 07 GKY Allow subject edit of up to 256 chars
[755]	19	03 Aug 07 GKY Remove surrious error message
[775]	20	06 Aug 07 GKY Increase Subject EA to 1024
[795]	21	20 Aug 07 GKY Move #pragma alloc_text to end for OpenWatcom compat
[827]	22	01 Sep 07 GKY Use xDosSetPathInfo to fix case where FS3 buffer crosses 64k boundry
[123]	23
	24	***********************************************************************/
	25
[907]	26	#include <stdlib.h>
	27	#include <stdio.h>
	28	#include <string.h>
	29	#include <ctype.h>
	30
[2]	31	#define INCL_WIN
	32	#define INCL_DOS
	33	#define INCL_DOSERRORS
[841]	34	#define INCL_LONGLONG
[2]	35
	36	#include "fm3dlg.h"
	37	#include "fm3str.h"
	38	#include "mle.h"
[907]	39	#include "errutil.h" // Dos_Error...
	40	#include "strutil.h" // GetPString
	41	#include "fm3dll.h"
[2]	42
	43	#pragma data_seg(DATA1)
[347]	44
	45	static PSZ pszSrcFile = __FILE__;
	46
[2]	47
[193]	48	typedef struct
	49	{
[2]	50	CHAR *name;
[193]	51	INT type;
	52	}
	53	RESERVEDEAS;
[2]	54
[193]	55	typedef struct
	56	{
	57	CHAR *filename;
[2]	58	HOLDFEA *head;
[193]	59	}
	60	ADDEA;
[2]	61
[193]	62	HOLDFEA CheckEA(HOLDFEA head, CHAR * eaname)
	63	{
[2]	64	/* return pointer to ea named eaname if found in linked list */
	65
	66	register HOLDFEA *info = NULL;
	67
[551]	68	if (eaname && *eaname) {
[2]	69	info = head;
[551]	70	while (info) {
	71	if (!strcmp(info->name, eaname))
[193]	72	return info;
[551]	73	info = info->next;
[2]	74	}
	75	}
	76	return info;
	77	}
	78
[193]	79	MRESULT EXPENTRY AddEAProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
	80	{
	81	ADDEA *add;
	82	HOLDFEA *head;
	83	CHAR *filename;
[551]	84	static CHAR *forbidden[] = { ".ASSOCTABLE",
	85	".CLASSINFO",
	86	".ICON",
	87	".CODEPAGE",
	88	""
	89	};
	90	static RESERVEDEAS restypes[] = { ".TYPE", EAT_MVMT,
	91	".SUBJECT", EAT_ASCII,
	92	".COMMENTS", EAT_MVMT,
	93	".KEYPHRASES", EAT_MVMT,
	94	".HISTORY", EAT_MVMT,
	95	".LONGNAME", EAT_ASCII,
	96	".VERSION", EAT_ASCII,
	97	"", 0
	98	};
[2]	99
[551]	100	switch (msg) {
[193]	101	case WM_INITDLG:
[551]	102	if (!mp2) {
[193]	103	WinDismissDlg(hwnd, 0);
[2]	104	break;
[193]	105	}
[574]	106	WinSetWindowPtr(hwnd, QWL_USER, (PVOID) mp2);
[193]	107	WinSendDlgItemMsg(hwnd, EAC_NAME, EM_SETTEXTLIMIT,
[770]	108	MPFROM2SHORT(1024, 0), MPVOID);
[193]	109	WinCheckButton(hwnd, EAC_ASCII, TRUE);
	110	break;
[2]	111
[193]	112	case WM_PAINT:
	113	PostMsg(hwnd, UM_PAINT, MPVOID, MPVOID);
	114	break;
[2]	115
[193]	116	case UM_PAINT:
[551]	117	PaintRecessedWindow(WinWindowFromID(hwnd, EAC_TEXT), (HPS) 0, FALSE,
	118	FALSE);
[193]	119	return 0;
[2]	120
[193]	121	case WM_CONTROL:
	122	return 0;
[2]	123
[193]	124	case WM_COMMAND:
[551]	125	switch (SHORT1FROMMP(mp1)) {
[193]	126	case DID_OK:
	127	add = INSTDATA(hwnd);
[551]	128	head = add->head;
	129	filename = add->filename;
[193]	130	{
[770]	131	CHAR s[1025];
[193]	132	INT x;
	133	USHORT type = EAT_ASCII;
[2]	134
[193]	135	*s = 0;
[770]	136	WinQueryDlgItemText(hwnd, EAC_NAME, 1024, s);
[193]	137	bstrip(s);
	138	if (!*s)
	139	WinDismissDlg(hwnd, 0);
[551]	140	else {
	141	if (CheckEA(head, s)) {
[193]	142	DosBeep(50, 100);
	143	WinSetDlgItemText(hwnd, EAC_TEXT,
	144	GetPString(IDS_EANAMEEXISTSTEXT));
	145	break;
	146	}
[551]	147	for (x = 0; *forbidden[x]; x++) {
	148	if (!strcmp(forbidden[x], s)) {
[193]	149	DosBeep(50, 100);
	150	WinSetDlgItemText(hwnd, EAC_TEXT,
	151	GetPString(IDS_EANAMERESERVEDTEXT));
	152	return 0;
	153	}
	154	}
	155	if (WinQueryButtonCheckstate(hwnd, EAC_MVST))
	156	type = EAT_MVST;
	157	else if (WinQueryButtonCheckstate(hwnd, EAC_MVMT))
	158	type = EAT_MVMT;
[551]	159	for (x = 0; *restypes[x].name; x++) {
	160	if (!strcmp(restypes[x].name, s)) {
	161	if (type != restypes[x].type) {
[193]	162	DosBeep(50, 100);
	163	WinSetDlgItemText(hwnd, EAC_TEXT,
	164	GetPString(IDS_EAWRONGTYPETEXT));
	165	return 0;
	166	}
	167	break;
	168	}
	169	}
	170	/* if we get here, create dummy ea */
	171	{
	172	PFEA2LIST pfealist = NULL;
	173	EAOP2 eaop;
	174	ULONG ealen;
	175	CHAR *eaval;
[347]	176	APIRET rc;
[2]	177
[193]	178	ealen = sizeof(FEA2LIST) + strlen(s) + 64;
[725]	179	rc = DosAllocMem((PPVOID) & pfealist, ealen + 1,
[347]	180	OBJ_TILE \| PAG_COMMIT \| PAG_READ \| PAG_WRITE);
	181	if (rc)
[551]	182	Dos_Error(MB_CANCEL, rc, HWND_DESKTOP, pszSrcFile, __LINE__,
	183	GetPString(IDS_OUTOFMEMORY));
[347]	184	else {
[193]	185	memset(pfealist, 0, ealen + 1);
[551]	186	pfealist->cbList = ealen;
[725]	187	pfealist->list[0].oNextEntryOffset = 0;
[551]	188	pfealist->list[0].fEA = 0;
	189	pfealist->list[0].cbName = strlen(s);
	190	strcpy(pfealist->list[0].szName, s);
	191	eaval = pfealist->list[0].szName + strlen(s) + 1;
[193]	192	(USHORT ) eaval = (USHORT) type;
	193	eaval += sizeof(USHORT);
[551]	194	if (type == EAT_MVST \|\| type == EAT_MVMT) {
	195	(USHORT ) eaval = (USHORT) 0; /* codepage */
[193]	196	eaval += sizeof(USHORT);
[551]	197	(USHORT ) eaval = (USHORT) 1; /* number */
[193]	198	eaval += sizeof(USHORT);
[551]	199	(USHORT ) eaval = (USHORT) EAT_ASCII; /* type */
[193]	200	eaval += sizeof(USHORT);
	201	}
	202	(USHORT ) eaval = (USHORT) 4;
	203	eaval += sizeof(USHORT);
	204	memcpy(eaval, GetPString(IDS_FAKETEXT), 4);
[551]	205	pfealist->list[0].cbValue = 4 + (sizeof(USHORT) * 2) +
[193]	206	((type == EAT_MVST \|\|
[551]	207	type == EAT_MVMT) ? sizeof(USHORT) * 3 : 0);
[193]	208	eaop.fpGEA2List = (PGEA2LIST) 0;
	209	eaop.fpFEA2List = pfealist;
[725]	210	eaop.oError = 0;
[827]	211	xDosSetPathInfo(filename, FIL_QUERYEASIZE,
	212	&eaop, sizeof(eaop), DSPI_WRTTHRU);
[193]	213	WinDismissDlg(hwnd, 1);
	214	}
	215	}
	216	}
	217	}
	218	break;
[2]	219
[193]	220	case DID_CANCEL:
	221	WinDismissDlg(hwnd, 0);
	222	break;
[2]	223
[193]	224	case IDM_HELP:
	225	if (hwndHelp)
	226	WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
[551]	227	MPFROM2SHORT(HELP_ADDEA, 0), MPFROMSHORT(HM_RESOURCEID));
[193]	228	break;
	229	}
	230	return 0;
[2]	231	}
[193]	232	return WinDefDlgProc(hwnd, msg, mp1, mp2);
[2]	233	}
	234
[193]	235	static VOID HexDumpEA(HWND hwnd, HOLDFEA * info)
	236	{
	237	if (info)
[551]	238	HexDump(WinWindowFromID(hwnd, EA_HEXDUMP), info->value, info->cbValue);
[2]	239	}
	240
[193]	241	VOID HexDump(HWND hwnd, CHAR * value, ULONG cbValue)
	242	{
[2]	243	/* display a hexdump of a binary 'string' in listbox hwnd */
	244
[193]	245	CHAR s[132];
	246	register CHAR p, pp, *a;
	247	register ULONG x = 0, y, z;
[2]	248
[193]	249	WinSendMsg(hwnd, LM_DELETEALL, MPVOID, MPVOID);
[551]	250	if (cbValue) {
[2]	251	pp = p = value;
[551]	252	while (x < cbValue) {
[2]	253	y = x;
[193]	254	sprintf(s, "%04lx ", x);
[2]	255	a = s + 6;
[551]	256	do {
[870]	257	sprintf(a, "%02x ", (UCHAR)*p);
[193]	258	a += 3;
	259	p++;
	260	x++;
[2]	261	}
[193]	262	while (x < cbValue && (x % 16));
[551]	263	if (x % 16) {
[193]	264	z = x;
[551]	265	while (z % 16) {
[193]	266	*a++ = ' ';
	267	*a++ = ' ';
	268	*a++ = ' ';
	269	z++;
	270	}
	271	}
[2]	272	*a++ = ' ';
	273	p = pp;
[551]	274	do {
[193]	275	if (*p)
	276	a++ = p++;
[551]	277	else {
[193]	278	*a++ = '.';
	279	p++;
	280	}
	281	*a = 0;
	282	y++;
	283	}
	284	while (y < x);
	285	if ((SHORT) WinSendMsg(hwnd, LM_INSERTITEM, MPFROM2SHORT(LIT_END, 0),
	286	MPFROMP(s)) < 0)
	287	break;
[2]	288	pp = p;
	289	}
	290	}
	291	}
	292
[193]	293	typedef struct
	294	{
	295	USHORT size;
	296	USHORT flags;
	297	HOLDFEA head, current;
	298	CHAR **list;
	299	CHAR filename[CCHMAXPATH];
	300	}
	301	EAPROCDATA;
[2]	302
[193]	303	MRESULT EXPENTRY DisplayEAsProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
	304	{
	305	EAPROCDATA *eap;
	306	HOLDFEA *info;
	307	static HPOINTER hptrIcon = (HPOINTER) 0;
[2]	308
[193]	309	if (msg != WM_INITDLG)
[574]	310	eap = (EAPROCDATA *) WinQueryWindowPtr(hwnd, QWL_USER);
[2]	311
[551]	312	switch (msg) {
[193]	313	case WM_INITDLG:
[551]	314	if (!mp2) {
[193]	315	WinDismissDlg(hwnd, 0);
	316	break;
	317	}
[564]	318	eap = xmallocz(sizeof(EAPROCDATA), pszSrcFile, __LINE__);
[551]	319	if (!eap) {
[193]	320	WinDismissDlg(hwnd, 0);
	321	break;
	322	}
	323	hptrIcon = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, EA_FRAME);
	324	WinDefDlgProc(hwnd, WM_SETICON, MPFROMLONG(hptrIcon), MPVOID);
[551]	325	eap->size = sizeof(EAPROCDATA);
	326	eap->list = (CHAR **) mp2;
[574]	327	WinSetWindowPtr(hwnd, QWL_USER, (PVOID) eap);
[193]	328	WinSendDlgItemMsg(hwnd,
[551]	329	EA_ENTRY, EM_SETTEXTLIMIT, MPFROM2SHORT(40, 0), MPVOID);
[770]	330	MLEsetlimit(WinWindowFromID(hwnd, EA_MLE), 32767);
[551]	331	MLEsetformat(WinWindowFromID(hwnd, EA_MLE), MLFIE_NOTRANS);
[193]	332	{
	333	INT x;
	334	SHORT sSelect;
	335	CHAR s[CCHMAXPATH];
[2]	336
[551]	337	for (x = 0; eap->list[x]; x++) {
	338	if (DosQueryPathInfo(eap->list[x], FIL_QUERYFULLNAME, s, sizeof(s)))
	339	strcpy(s, eap->list[x]);
[193]	340	if (IsFile(s) != -1)
	341	WinSendDlgItemMsg(hwnd,
	342	EA_NAMES,
	343	LM_INSERTITEM,
[551]	344	MPFROM2SHORT(LIT_SORTASCENDING, 0), MPFROMP(s));
[193]	345	}
	346	sSelect = (SHORT) WinSendDlgItemMsg(hwnd,
	347	EA_NAMES,
[551]	348	LM_QUERYITEMCOUNT, MPVOID, MPVOID);
[193]	349	if (sSelect > 0)
	350	WinSendDlgItemMsg(hwnd,
	351	EA_NAMES,
	352	LM_SELECTITEM,
[551]	353	MPFROM2SHORT(0, 0), MPFROMSHORT(TRUE));
[193]	354	else
	355	WinDismissDlg(hwnd, 0);
	356	}
	357	break;
[2]	358
[193]	359	case UM_SETDIR:
[551]	360	if (*eap->filename) {
	361	if (eap->head)
	362	Free_FEAList(eap->head);
	363	eap->head = GetFileEAs(eap->filename, FALSE, FALSE);
	364	if (!isalpha(*eap->filename) \|\|
	365	(driveflags[toupper(*eap->filename) - 'A'] & DRIVE_NOTWRITEABLE)) {
[193]	366	WinEnableWindow(WinWindowFromID(hwnd, EA_CHANGE), FALSE);
	367	WinEnableWindow(WinWindowFromID(hwnd, EA_ADD), FALSE);
	368	WinEnableWindow(WinWindowFromID(hwnd, EA_DELETE), FALSE);
[2]	369	}
[551]	370	else {
[193]	371	WinEnableWindow(WinWindowFromID(hwnd, EA_CHANGE), TRUE);
	372	WinEnableWindow(WinWindowFromID(hwnd, EA_ADD), TRUE);
	373	WinEnableWindow(WinWindowFromID(hwnd, EA_DELETE), TRUE);
[2]	374	}
[193]	375	WinSendMsg(hwnd, UM_SETUP, MPVOID, MPVOID);
	376	}
	377	break;
	378
	379	case UM_SETUP:
	380	WinSendDlgItemMsg(hwnd, EA_LISTBOX, LM_DELETEALL, MPVOID, MPVOID);
	381	WinShowWindow(WinWindowFromID(hwnd, EA_ENTRY), FALSE);
	382	WinSetDlgItemText(hwnd, EA_ENTRY, NullStr);
	383	WinShowWindow(WinWindowFromID(hwnd, EA_MLE), FALSE);
	384	MLEclearall(WinWindowFromID(hwnd, EA_MLE));
	385	WinShowWindow(WinWindowFromID(hwnd, EA_HEXDUMP), FALSE);
	386	WinSendDlgItemMsg(hwnd, EA_HEXDUMP, LM_DELETEALL, MPVOID, MPVOID);
	387	WinShowWindow(WinWindowFromID(hwnd, EA_CHANGE), FALSE);
	388	WinShowWindow(WinWindowFromID(hwnd, EA_DELETE), FALSE);
[551]	389	eap->current = NULL;
	390	if (eap->head) {
[193]	391	WinSetDlgItemText(hwnd, EA_TEXT, NullStr);
[551]	392	info = eap->head;
	393	while (info) {
[193]	394	WinSendDlgItemMsg(hwnd, EA_LISTBOX, LM_INSERTITEM,
[551]	395	MPFROM2SHORT(LIT_END, 0), MPFROMP(info->name));
	396	info = info->next;
[2]	397	}
[193]	398	WinSendDlgItemMsg(hwnd, EA_LISTBOX, LM_SELECTITEM,
	399	MPFROM2SHORT(0, 0), MPFROM2SHORT(TRUE, 0));
	400	}
	401	else
[551]	402	WinSetDlgItemText(hwnd, EA_TEXT, GetPString(IDS_EANOEAS));
[193]	403	return 0;
[2]	404
[193]	405	case WM_PAINT:
	406	PostMsg(hwnd, UM_PAINT, MPVOID, MPVOID);
	407	break;
[2]	408
[193]	409	case UM_PAINT:
	410	PaintRecessedWindow(WinWindowFromID(hwnd, EA_HELP), (HPS) 0, FALSE, TRUE);
[551]	411	PaintRecessedWindow(WinWindowFromID(hwnd, EA_TEXT), (HPS) 0, FALSE,
	412	FALSE);
[193]	413	return 0;
[2]	414
[193]	415	case WM_CONTROL:
[551]	416	switch (SHORT1FROMMP(mp1)) {
[193]	417	case EA_NAMES:
[551]	418	switch (SHORT2FROMMP(mp1)) {
[193]	419	case LN_SETFOCUS:
[551]	420	WinSetDlgItemText(hwnd, EA_HELP, GetPString(IDS_EAFILENAMESHELPTEXT));
[193]	421	break;
	422	case LN_KILLFOCUS:
	423	WinSetDlgItemText(hwnd, EA_HELP, NullStr);
	424	break;
	425	case LN_ENTER:
	426	case LN_SELECT:
	427	{
[770]	428	CHAR s[1025];
[193]	429	SHORT sSelect;
	430
	431	sSelect = (SHORT) WinSendDlgItemMsg(hwnd, EA_NAMES,
	432	LM_QUERYSELECTION,
	433	MPFROM2SHORT(LIT_FIRST, 0),
	434	MPVOID);
[551]	435	if (sSelect >= 0) {
[193]	436	*s = 0;
	437	WinSendDlgItemMsg(hwnd, EA_NAMES, LM_QUERYITEMTEXT,
[770]	438	MPFROM2SHORT(sSelect, 1024), MPFROMP(s));
[551]	439	if (*s) {
	440	strcpy(eap->filename, s);
[193]	441	if (SHORT2FROMMP(mp1) == LN_SELECT)
	442	WinSendMsg(hwnd, UM_SETDIR, MPVOID, MPVOID);
	443	else
[551]	444	QuickView(hwnd, eap->filename);
[193]	445	}
	446	}
	447	}
	448	break;
[2]	449	}
	450	break;
	451
[193]	452	case EA_LISTBOX:
[551]	453	switch (SHORT2FROMMP(mp1)) {
[193]	454	case LN_SETFOCUS:
[551]	455	WinSetDlgItemText(hwnd, EA_HELP, GetPString(IDS_EATYPESHELPTEXT));
[193]	456	break;
	457	case LN_KILLFOCUS:
	458	WinSetDlgItemText(hwnd, EA_HELP, NullStr);
	459	break;
	460	case LN_SELECT:
	461	{
[770]	462	CHAR s[1024];
[193]	463	SHORT sSelect;
[2]	464
[551]	465	eap->current = NULL;
	466	if (eap->head) {
[193]	467	WinSetDlgItemText(hwnd, EA_TEXT, NullStr);
	468	WinShowWindow(WinWindowFromID(hwnd, EA_ENTRY), FALSE);
	469	WinSetDlgItemText(hwnd, EA_ENTRY, NullStr);
	470	MLEclearall(WinWindowFromID(hwnd, EA_MLE));
	471	WinShowWindow(WinWindowFromID(hwnd, EA_MLE), FALSE);
	472	WinShowWindow(WinWindowFromID(hwnd, EA_CHANGE), FALSE);
	473	WinShowWindow(WinWindowFromID(hwnd, EA_DELETE), FALSE);
	474	WinShowWindow(WinWindowFromID(hwnd, EA_HEXDUMP), FALSE);
[551]	475	WinSendDlgItemMsg(hwnd, EA_HEXDUMP, LM_DELETEALL, MPVOID, MPVOID);
[193]	476	*s = 0;
	477	sSelect = (USHORT) WinSendDlgItemMsg(hwnd, EA_LISTBOX,
[551]	478	LM_QUERYSELECTION,
	479	MPFROMSHORT(LIT_FIRST),
[193]	480	MPVOID);
[551]	481	if (sSelect >= 0) {
[193]	482	WinSendDlgItemMsg(hwnd, EA_LISTBOX, LM_QUERYITEMTEXT,
[770]	483	MPFROM2SHORT(sSelect, 1024), MPFROMP(s));
[551]	484	if (*s) {
[2]	485
[207]	486	USHORT len, num, type;
	487	CHAR *data;
	488	CHAR last = '\n';
	489	const CHAR *linefeed = "\n";
[193]	490	BOOL alltext;
[725]	491	IPT pos = 0;
[2]	492
[551]	493	info = eap->head;
	494	while (info) {
	495	if (!strcmp(s, info->name)) {
	496	eap->current = info;
[193]	497	WinShowWindow(WinWindowFromID(hwnd, EA_DELETE), TRUE);
[551]	498	switch ((USHORT ) info->value) {
[193]	499	case EAT_EA:
	500	case EAT_ASCII:
[551]	501	if (!strcmp(info->name, SUBJECT))
[193]	502	WinSendDlgItemMsg(hwnd, EA_ENTRY,
	503	EM_SETTEXTLIMIT,
[770]	504	MPFROM2SHORT(1024, 0), MPVOID);
[193]	505	else
	506	WinSendDlgItemMsg(hwnd, EA_ENTRY,
	507	EM_SETTEXTLIMIT,
[770]	508	MPFROM2SHORT(1024, 0), MPVOID);
[193]	509	WinSetDlgItemText(hwnd, EA_ENTRY,
[551]	510	info->value + (sizeof(USHORT) * 2));
	511	WinShowWindow(WinWindowFromID(hwnd, EA_ENTRY), TRUE);
[193]	512	WinEnableWindow(WinWindowFromID(hwnd, EA_CHANGE),
	513	FALSE);
[551]	514	WinShowWindow(WinWindowFromID(hwnd, EA_CHANGE), TRUE);
[193]	515	{
	516	CHAR str[81];
[2]	517
[193]	518	sprintf(str,
	519	GetPString(IDS_DATAANDBYTESTEXT),
[551]	520	((USHORT ) info->value == EAT_ASCII) ?
[193]	521	GetPString(IDS_TEXTTEXT) :
[551]	522	GetPString(IDS_EAREFTEXT), info->cbValue);
	523	WinSetDlgItemText(hwnd, EA_TEXT, str);
[193]	524	}
	525	break;
	526	case EAT_MVST:
	527	MLEclearall(WinWindowFromID(hwnd, EA_MLE));
[551]	528	num = (USHORT ) (info->value + (sizeof(USHORT) * 2));
	529	type = (USHORT ) (info->value + (sizeof(USHORT) * 3));
	530	if (type == EAT_ASCII) {
	531	data = info->value + (sizeof(USHORT) * 4);
[193]	532	len = (USHORT ) data;
	533	data += sizeof(USHORT);
[551]	534	while ((data - info->value) + len <= info->cbValue) {
	535	if (last != '\n') {
[193]	536	WinSendDlgItemMsg(hwnd,
	537	EA_MLE,
	538	MLM_SETIMPORTEXPORT,
	539	MPFROMP(linefeed),
[770]	540	MPFROMLONG(1));
[193]	541	WinSendDlgItemMsg(hwnd,
	542	EA_MLE,
	543	MLM_IMPORT,
[770]	544	MPFROMP(&pos), MPFROMLONG(1));
[193]	545	}
	546	WinSendDlgItemMsg(hwnd,
	547	EA_MLE,
	548	MLM_SETIMPORTEXPORT,
	549	MPFROMP(data),
	550	MPFROMLONG((ULONG) len));
	551	WinSendDlgItemMsg(hwnd,
	552	EA_MLE,
	553	MLM_IMPORT,
	554	MPFROMP(&pos),
	555	MPFROMLONG((ULONG) len));
	556	data += len;
	557	last = *(data - 1);
[551]	558	if (data - info->value >= info->cbValue)
[193]	559	break;
	560	len = (USHORT ) data;
	561	data += sizeof(USHORT);
	562	}
[551]	563	WinShowWindow(WinWindowFromID(hwnd, EA_MLE), TRUE);
[193]	564	WinEnableWindow(WinWindowFromID(hwnd, EA_CHANGE),
	565	FALSE);
[551]	566	WinShowWindow(WinWindowFromID(hwnd, EA_CHANGE), TRUE);
[193]	567	}
[551]	568	else {
	569	WinShowWindow(WinWindowFromID(hwnd, EA_MLE), FALSE);
[193]	570	HexDumpEA(hwnd, info);
	571	WinShowWindow(WinWindowFromID(hwnd, EA_HEXDUMP),
	572	TRUE);
	573	}
	574	{
	575	CHAR str[81];
[2]	576
[193]	577	sprintf(str,
	578	GetPString(IDS_MVSTTEXT),
	579	num,
	580	(num == 1) ?
	581	GetPString(IDS_YTEXT) :
[551]	582	GetPString(IDS_IESTEXT), info->cbValue);
	583	WinSetDlgItemText(hwnd, EA_TEXT, str);
[193]	584	}
	585	break;
	586	case EAT_MVMT:
	587	MLEclearall(WinWindowFromID(hwnd, EA_MLE));
[551]	588	num = (USHORT ) (info->value + (sizeof(USHORT) * 2));
	589	data = info->value + (sizeof(USHORT) * 3);
[193]	590	type = (USHORT ) data;
	591	data += sizeof(USHORT);
	592	len = (USHORT ) data;
	593	data += sizeof(USHORT);
	594	alltext = TRUE;
[551]	595	while ((data - info->value) - len <= info->cbValue) {
	596	if (type != EAT_ASCII) {
[193]	597	alltext = FALSE;
	598	break;
	599	}
	600	data += len;
[551]	601	if (data - info->value >= info->cbValue)
[193]	602	break;
	603	type = (USHORT ) data;
	604	data += sizeof(USHORT);
	605	len = (USHORT ) data;
	606	data += sizeof(USHORT);
	607	}
[551]	608	if (alltext) {
	609	data = info->value + (sizeof(USHORT) * 3);
[193]	610	type = (USHORT ) data;
	611	data += sizeof(USHORT);
	612	len = (USHORT ) data;
	613	data += sizeof(USHORT);
[551]	614	while ((data - info->value) - len <= info->cbValue) {
	615	if (last != '\n') {
[193]	616	WinSendDlgItemMsg(hwnd,
	617	EA_MLE,
	618	MLM_SETIMPORTEXPORT,
	619	MPFROMP(linefeed),
[770]	620	MPFROMLONG(1));
[193]	621	WinSendDlgItemMsg(hwnd,
	622	EA_MLE,
	623	MLM_IMPORT,
[770]	624	MPFROMP(&pos), MPFROMLONG(1));
[193]	625	}
	626	WinSendDlgItemMsg(hwnd,
	627	EA_MLE,
	628	MLM_SETIMPORTEXPORT,
	629	MPFROMP(data),
	630	MPFROMLONG((ULONG) len));
	631	WinSendDlgItemMsg(hwnd,
	632	EA_MLE,
	633	MLM_IMPORT,
	634	MPFROMP(&pos),
	635	MPFROMLONG((ULONG) len));
	636	data += len;
	637	last = *(data - 1);
[551]	638	if (data - info->value >= info->cbValue)
[193]	639	break;
	640	type = (USHORT ) data;
	641	data += sizeof(USHORT);
	642	len = (USHORT ) data;
	643	data += sizeof(USHORT);
	644	}
	645	}
[551]	646	if (alltext) {
	647	WinShowWindow(WinWindowFromID(hwnd, EA_MLE), TRUE);
[193]	648	WinEnableWindow(WinWindowFromID(hwnd,
	649	EA_CHANGE), FALSE);
[551]	650	WinShowWindow(WinWindowFromID(hwnd, EA_CHANGE), TRUE);
[193]	651	}
[551]	652	else {
	653	WinShowWindow(WinWindowFromID(hwnd, EA_MLE), FALSE);
[193]	654	HexDumpEA(hwnd, info);
	655	WinShowWindow(WinWindowFromID(hwnd, EA_HEXDUMP),
	656	TRUE);
	657	}
	658	{
	659	CHAR str[81];
[2]	660
[193]	661	sprintf(str,
	662	GetPString(IDS_MVMTTEXT),
	663	num,
	664	(num == 1) ?
	665	GetPString(IDS_YTEXT) :
	666	GetPString(IDS_IESTEXT),
[551]	667	info->cbValue,
[193]	668	(alltext) ?
	669	GetPString(IDS_ALLTEXTTEXT) :
	670	GetPString(IDS_MIXEDTYPESTEXT));
[551]	671	WinSetDlgItemText(hwnd, EA_TEXT, str);
[193]	672	}
	673	break;
	674	default:
	675	HexDumpEA(hwnd, info);
[551]	676	WinShowWindow(WinWindowFromID(hwnd, EA_HEXDUMP), TRUE);
	677	switch ((USHORT ) info->value) {
[193]	678	case EAT_BINARY:
	679	{
	680	CHAR str[81];
[2]	681
[193]	682	sprintf(str,
	683	GetPString(IDS_BINARYBYTESTEXT),
[551]	684	info->cbValue);
	685	WinSetDlgItemText(hwnd, EA_TEXT, str);
[193]	686	}
	687	break;
	688	case EAT_BITMAP:
	689	{
	690	CHAR str[81];
[2]	691
[193]	692	sprintf(str,
	693	GetPString(IDS_BITMAPBYTESTEXT),
[551]	694	info->cbValue);
	695	WinSetDlgItemText(hwnd, EA_TEXT, str);
[193]	696	}
	697	break;
	698	case EAT_METAFILE:
	699	{
	700	CHAR str[81];
[2]	701
[193]	702	sprintf(str,
	703	GetPString(IDS_METAFILEBYTESTEXT),
[551]	704	info->cbValue);
	705	WinSetDlgItemText(hwnd, EA_TEXT, str);
[193]	706	}
	707	break;
	708	case EAT_ICON:
	709	{
	710	CHAR str[81];
[2]	711
[193]	712	sprintf(str,
	713	GetPString(IDS_ICONBYTESTEXT),
[551]	714	info->cbValue);
	715	WinSetDlgItemText(hwnd, EA_TEXT, str);
[193]	716	}
	717	break;
	718	case EAT_ASN1:
	719	{
	720	CHAR str[81];
[2]	721
[193]	722	sprintf(str,
	723	GetPString(IDS_ASN1BYTESTEXT),
[551]	724	info->cbValue);
	725	WinSetDlgItemText(hwnd, EA_TEXT, str);
[193]	726	}
	727	break;
	728	default:
	729	{
	730	CHAR str[81];
[2]	731
[193]	732	sprintf(str,
	733	GetPString(IDS_UNKNOWNBYTESTEXT),
[551]	734	(USHORT ) info->value, info->cbValue);
	735	WinSetDlgItemText(hwnd, EA_TEXT, str);
[193]	736	}
	737	break;
	738	}
	739	break;
	740	}
	741	}
[551]	742	info = info->next;
[193]	743	}
	744	}
	745	}
	746	}
[551]	747	if (!isalpha(*eap->filename) \|\|
	748	(driveflags[toupper(*eap->filename) - 'A'] &
	749	DRIVE_NOTWRITEABLE)) {
[193]	750	WinEnableWindow(WinWindowFromID(hwnd, EA_CHANGE), FALSE);
	751	WinEnableWindow(WinWindowFromID(hwnd, EA_ADD), FALSE);
	752	WinEnableWindow(WinWindowFromID(hwnd, EA_DELETE), FALSE);
	753	}
[551]	754	else {
[193]	755	WinEnableWindow(WinWindowFromID(hwnd, EA_CHANGE), TRUE);
	756	WinEnableWindow(WinWindowFromID(hwnd, EA_ADD), TRUE);
	757	WinEnableWindow(WinWindowFromID(hwnd, EA_DELETE), TRUE);
	758	}
	759	}
	760	break;
	761	}
	762	break;
[2]	763
[193]	764	case EA_ENTRY:
[551]	765	switch (SHORT2FROMMP(mp1)) {
[193]	766	case EN_SETFOCUS:
[551]	767	WinSetDlgItemText(hwnd, EA_HELP, GetPString(IDS_EADATAHELPTEXT));
[193]	768	break;
	769	case EN_KILLFOCUS:
	770	WinSetDlgItemText(hwnd, EA_HELP, NullStr);
	771	break;
	772	case EN_CHANGE:
	773	WinEnableWindow(WinWindowFromID(hwnd, EA_CHANGE), TRUE);
	774	break;
	775	}
	776	break;
[2]	777
[193]	778	case EA_HEXDUMP:
[551]	779	switch (SHORT2FROMMP(mp1)) {
[193]	780	case LN_SETFOCUS:
[551]	781	WinSetDlgItemText(hwnd, EA_HELP, GetPString(IDS_EADATAHELPTEXT));
[193]	782	break;
	783	case LN_KILLFOCUS:
	784	WinSetDlgItemText(hwnd, EA_HELP, NullStr);
	785	break;
	786	}
	787	break;
[2]	788
[193]	789	case EA_MLE:
[551]	790	switch (SHORT2FROMMP(mp1)) {
[193]	791	case MLN_SETFOCUS:
[551]	792	WinSetDlgItemText(hwnd, EA_HELP, GetPString(IDS_EADATAHELPTEXT));
[193]	793	break;
	794	case MLN_KILLFOCUS:
	795	WinSetDlgItemText(hwnd, EA_HELP, NullStr);
	796	break;
	797	case MLN_CHANGE:
	798	WinEnableWindow(WinWindowFromID(hwnd, EA_CHANGE), TRUE);
	799	break;
	800	}
	801	break;
	802	}
	803	return 0;
[2]	804
[193]	805	case WM_COMMAND:
[551]	806	switch (SHORT1FROMMP(mp1)) {
[193]	807	case EA_ADD:
	808	{
	809	ADDEA add;
[2]	810
[551]	811	add.filename = eap->filename;
	812	add.head = eap->head;
[193]	813	if (WinDlgBox(HWND_DESKTOP, hwnd, AddEAProc, FM3ModHandle,
[551]	814	EAC_FRAME, &add)) {
	815	Free_FEAList(eap->head);
	816	eap->head = GetFileEAs(eap->filename, FALSE, FALSE);
[193]	817	WinSendMsg(hwnd, UM_SETUP, MPVOID, MPVOID);
	818	}
[2]	819	}
[193]	820	break;
	821	case EA_CHANGE:
[551]	822	if (!eap->current)
[193]	823	WinShowWindow(WinWindowFromID(hwnd, EA_CHANGE), FALSE);
[551]	824	else {
[2]	825
[193]	826	CHAR *s;
	827	USHORT control;
[2]	828
[551]	829	if (!eap->head \|\| !*eap->filename)
	830	Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT);
	831	else {
	832	switch ((USHORT ) eap->current->value) {
[193]	833	case EAT_EA:
	834	case EAT_ASCII:
	835	control = EA_ENTRY;
	836	break;
	837	case EAT_MVMT:
	838	control = EA_MLE;
	839	break;
	840	case EAT_MVST:
	841	control = EA_MLE;
	842	break;
	843	default:
[551]	844	Runtime_Error(pszSrcFile, __LINE__, "unexpected type");
[193]	845	WinShowWindow(WinWindowFromID(hwnd, EA_CHANGE), FALSE);
	846	control = 0;
	847	}
[551]	848	if (control) {
	849	s = xmalloc(32768, pszSrcFile, __LINE__);
[347]	850	if (s) {
[193]	851	*s = 0;
[770]	852	WinQueryDlgItemText(hwnd, control, 32767, (PCH) s);
[347]	853	if (!*s)
[551]	854	Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT);
[347]	855	else {
[193]	856	PFEA2LIST pfealist;
[2]	857
[551]	858	pfealist = SaveEA(eap->filename, eap->current, s, FALSE);
[347]	859	if (!pfealist)
[551]	860	Runtime_Error(pszSrcFile, __LINE__, "SaveEA");
[347]	861	else {
[193]	862	PFEA2 pfea;
[2]	863
[551]	864	pfea = xmalloc(pfealist->cbList, pszSrcFile, __LINE__);
[347]	865	if (pfea) {
[551]	866	memcpy(pfea, pfealist->list,
	867	pfealist->cbList - sizeof(ULONG));
	868	free(eap->current->pfea);
	869	eap->current->pfea = pfea;
	870	eap->current->name = eap->current->pfea->szName;
	871	eap->current->cbName = eap->current->pfea->cbName;
	872	eap->current->cbValue = eap->current->pfea->cbValue;
	873	eap->current->value = eap->current->pfea->szName +
	874	eap->current->pfea->cbName + 1;
	875	eap->current->value[eap->current->cbValue] = 0;
[193]	876	PostMsg(hwnd, WM_CONTROL,
[551]	877	MPFROM2SHORT(EA_LISTBOX, LN_SELECT), MPVOID);
[193]	878	}
	879	DosFreeMem(pfealist);
	880	}
	881	}
	882	free(s);
	883	}
	884	}
	885	}
	886	}
	887	break;
[2]	888
[193]	889	case EA_DELETE:
[551]	890	if (eap->head && eap->current) {
[2]	891
[193]	892	EAOP2 eaop;
	893	PFEA2LIST pfealist;
	894	GEA2LIST gealist;
	895	APIRET rc;
	896	SHORT sSelect;
[2]	897
[551]	898	pfealist =
	899	xmallocz(sizeof(FEA2LIST) + eap->current->cbName + 1, pszSrcFile,
	900	__LINE__);
[347]	901	if (pfealist) {
[551]	902	pfealist->cbList = sizeof(FEA2LIST) + eap->current->cbName + 1;
	903	pfealist->list[0].cbName = eap->current->cbName;
	904	strcpy(pfealist->list[0].szName, eap->current->name);
	905	pfealist->list[0].cbValue = 0;
[193]	906	memset(&gealist, 0, sizeof(GEA2LIST));
	907	gealist.cbList = sizeof(GEA2LIST);
	908	eaop.fpGEA2List = &gealist;
	909	eaop.fpFEA2List = pfealist;
[725]	910	eaop.oError = 0;
[827]	911	rc = xDosSetPathInfo(eap->filename, FIL_QUERYEASIZE,
	912	&eaop, sizeof(eaop), DSPI_WRTTHRU);
[193]	913	free(pfealist);
[347]	914	if (rc)
[551]	915	Dos_Error(MB_CANCEL, rc, hwnd, pszSrcFile, __LINE__,
[826]	916	"xDosSetPathInfo");
[347]	917	else {
[193]	918	sSelect = 0;
[551]	919	if (eap->current == eap->head) {
	920	eap->head = eap->head->next;
	921	free(eap->current->pfea);
	922	free(eap->current);
	923	eap->current = NULL;
[193]	924	}
[347]	925	else {
[551]	926	info = eap->head;
[347]	927	while (info) {
[551]	928	if (info->next == eap->current) {
[193]	929	sSelect++;
[551]	930	info->next = eap->current->next;
	931	free(eap->current->pfea);
	932	free(eap->current);
	933	eap->current = NULL;
[193]	934	break;
	935	}
	936	sSelect++;
[551]	937	info = info->next;
[193]	938	}
	939	}
	940	WinSendDlgItemMsg(hwnd, EA_LISTBOX, LM_DELETEITEM,
	941	MPFROM2SHORT(sSelect, 0), MPVOID);
	942	WinShowWindow(WinWindowFromID(hwnd, EA_ENTRY), FALSE);
	943	WinShowWindow(WinWindowFromID(hwnd, EA_MLE), FALSE);
	944	WinShowWindow(WinWindowFromID(hwnd, EA_CHANGE), FALSE);
	945	WinShowWindow(WinWindowFromID(hwnd, EA_DELETE), FALSE);
	946	WinShowWindow(WinWindowFromID(hwnd, EA_HEXDUMP), FALSE);
	947	WinSetDlgItemText(hwnd, EA_ENTRY, NullStr);
	948	MLEclearall(WinWindowFromID(hwnd, EA_MLE));
[551]	949	WinSendDlgItemMsg(hwnd, EA_HEXDUMP, LM_DELETEALL, MPVOID, MPVOID);
[193]	950	if (sSelect && (SHORT) WinSendDlgItemMsg(hwnd, EA_LISTBOX,
	951	LM_QUERYITEMCOUNT,
	952	MPVOID, MPVOID) <=
	953	sSelect)
	954	sSelect--;
	955	WinSendDlgItemMsg(hwnd, EA_LISTBOX, LM_SELECTITEM,
	956	MPFROM2SHORT(sSelect, 0),
	957	MPFROM2SHORT(TRUE, 0));
	958	}
	959	}
	960	}
[551]	961	if (!eap->head)
[193]	962	WinSetDlgItemText(hwnd, EA_TEXT, GetPString(IDS_EANOEAS));
	963	break;
[2]	964
[193]	965	case IDM_HELP:
	966	if (hwndHelp)
	967	WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
[551]	968	MPFROM2SHORT(HELP_EAS, 0), MPFROMSHORT(HM_RESOURCEID));
[193]	969	break;
[2]	970
[193]	971	case DID_OK:
	972	WinDismissDlg(hwnd, 1);
	973	break;
[2]	974
[193]	975	case DID_CANCEL:
	976	WinDismissDlg(hwnd, 0);
	977	break;
	978	}
	979	return 0;
[2]	980
[193]	981	case WM_CLOSE:
	982	break;
[2]	983
[193]	984	case WM_DESTROY:
[551]	985	if (eap) {
	986	if (eap->head)
	987	Free_FEAList(eap->head);
[193]	988	free(eap);
	989	if (hptrIcon)
	990	WinDestroyPointer(hptrIcon);
	991	hptrIcon = (HPOINTER) 0;
	992	}
	993	break;
[551]	994	} // switch
[193]	995	return WinDefDlgProc(hwnd, msg, mp1, mp2);
[2]	996	}
	997
[193]	998	PVOID SaveEA(CHAR * filename, HOLDFEA * current, CHAR * newdata,
	999	BOOL silentfail)
	1000	{
[2]	1001	/* save an ea to disk */
	1002
	1003	PFEA2LIST pfealist = NULL;
[193]	1004	EAOP2 eaop;
	1005	APIRET rc;
	1006	ULONG ealen;
	1007	USHORT len, num, plen;
	1008	CHAR p, eaval;
[2]	1009
[193]	1010	if (!filename \|\| !current)
	1011	return (PVOID) pfealist;
[2]	1012	len = strlen(newdata);
[725]	1013	ealen = sizeof(FEA2LIST) + 24 + (ULONG) current->cbName + 1 +
	1014	(ULONG)len + 4;
[551]	1015	switch ((USHORT ) current->value) {
[193]	1016	case EAT_EA:
	1017	case EAT_ASCII:
	1018	break;
	1019	case EAT_MVST:
	1020	ealen += sizeof(USHORT) * 5;
	1021	p = newdata;
	1022	while (*p == '\n')
	1023	p++;
[551]	1024	while (*p) {
[193]	1025	if (p == '\n' && (p + 1))
	1026	ealen += sizeof(USHORT);
	1027	p++;
	1028	}
	1029	break;
	1030	case EAT_MVMT:
	1031	ealen += sizeof(USHORT) * 5;
	1032	p = newdata;
	1033	while (*p == '\n')
	1034	p++;
[551]	1035	while (*p) {
[193]	1036	if (p == '\n' && (p + 1))
	1037	ealen += (sizeof(USHORT) * 2);
	1038	p++;
	1039	}
	1040	break;
	1041	default:
	1042	return (PVOID) pfealist;
	1043	}
	1044
[347]	1045	rc = DosAllocMem((PPVOID) & pfealist, ealen,
	1046	OBJ_TILE \| PAG_COMMIT \| PAG_READ \| PAG_WRITE);
	1047	if (rc)
[551]	1048	Dos_Error(MB_CANCEL, rc, HWND_DESKTOP, pszSrcFile, __LINE__,
	1049	GetPString(IDS_OUTOFMEMORY));
	1050	else {
[193]	1051	memset(pfealist, 0, ealen);
[725]	1052	pfealist->list[0].oNextEntryOffset = 0;
[551]	1053	pfealist->list[0].fEA = 0; //current->fEA;
[193]	1054
[551]	1055	pfealist->list[0].cbName = current->cbName;
	1056	memcpy(pfealist->list[0].szName, current->name,
	1057	pfealist->list[0].cbName + 1);
	1058	eaval = pfealist->list[0].szName + pfealist->list[0].cbName + 1;
	1059	switch ((USHORT ) current->value) {
[2]	1060	case EAT_EA:
	1061	case EAT_ASCII:
[551]	1062	(USHORT ) eaval = (USHORT ) current->value;
[193]	1063	eaval += sizeof(USHORT);
	1064	(USHORT ) eaval = (USHORT) len;
	1065	eaval += sizeof(USHORT);
	1066	memcpy(eaval, newdata, len);
	1067	eaval += len;
[2]	1068	break;
	1069	case EAT_MVST:
[193]	1070	(USHORT ) eaval = (USHORT) EAT_MVST;
	1071	eaval += sizeof(USHORT);
[551]	1072	(USHORT ) eaval = (USHORT ) (current->value + sizeof(USHORT));
[193]	1073	eaval += sizeof(USHORT);
	1074	num = (USHORT *) eaval;
	1075	*num = 0;
	1076	eaval += sizeof(USHORT);
	1077	(USHORT ) eaval = (USHORT) EAT_ASCII;
	1078	eaval += sizeof(USHORT);
	1079	plen = (USHORT *) eaval;
	1080	*plen = 0;
	1081	eaval += sizeof(USHORT);
[2]	1082	p = newdata;
[193]	1083	while (*p == '\n')
	1084	p++;
[551]	1085	while (*p) {
	1086	while (*p) {
[193]	1087	if (*p == '\n')
	1088	p++;
	1089	eaval++ = p++;
	1090	(*plen)++;
	1091	}
	1092	if (p \|\| plen)
	1093	(*num)++;
[551]	1094	if (*p) {
[193]	1095	plen = (USHORT *) eaval;
	1096	*plen = 0;
	1097	eaval += sizeof(USHORT);
	1098	}
[2]	1099	}
	1100	break;
[193]	1101	/*
	1102	cbList nextoffset fea cb cbval name.......
	1103	000000 3C 00 00 00 00 00 00 00 6F 0B 24 00 2E 4B 45 59 < o
	1104	$ .KEY
	1105	.................... eat code num eat
	1106	000010 50 48 52 41 53 45 53 00 DF FF 00 00 02 00 FD FF PHRASES ßÿ ýÿ
	1107	len.. phrase1............................ eat
	1108	000020 0C 00 4B 65 79 20 70 68 72 61 73 65 20 31 FD FF
	1109	Key phrase 1ýÿ
	1110	len.. phrase2......................
[2]	1111	000030 0A 00 4B 65 79 20 70 68 72 61 73 65 Key phrase
[193]	1112	*/
	1113	case EAT_MVMT:
[551]	1114	(USHORT ) eaval = (USHORT) EAT_MVMT;
[193]	1115	eaval += sizeof(USHORT);
	1116	(USHORT ) eaval = (USHORT ) (current->value + sizeof(USHORT));
	1117	eaval += sizeof(USHORT);
	1118	num = (USHORT *) eaval;
	1119	*num = 0;
	1120	eaval += sizeof(USHORT);
	1121	(USHORT ) eaval = (USHORT) EAT_ASCII;
	1122	eaval += sizeof(USHORT);
	1123	plen = (USHORT *) eaval;
[2]	1124	*plen = 0;
[193]	1125	eaval += sizeof(USHORT);
	1126	p = newdata;
[551]	1127	while (*p == '\n')
	1128	p++;
[193]	1129	while (*p) {
	1130	while (*p) {
	1131	if (*p == '\n')
	1132	p++;
	1133	eaval++ = p++;
	1134	(*plen)++;
	1135	}
[551]	1136	if (p \|\| plen)
[193]	1137	(*num)++;
	1138	if (*p) {
	1139	(USHORT ) eaval = (USHORT) EAT_ASCII;
	1140	eaval += sizeof(USHORT);
	1141	plen = (USHORT *) eaval;
	1142	*plen = 0;
[2]	1143	eaval += sizeof(USHORT);
	1144	}
	1145	}
[551]	1146	break;
	1147	}
	1148	pfealist->list[0].cbValue = (ULONG) (eaval -
[193]	1149	(pfealist->list[0].szName +
[2]	1150	pfealist->list[0].cbName + 1));
[725]	1151	eaop.fpGEA2List = (PGEA2LIST) 0;
	1152	eaop.fpFEA2List = pfealist;
	1153	eaop.oError = 0;
[2]	1154	pfealist->cbList = 13 + (ULONG) pfealist->list[0].cbName +
[827]	1155	(ULONG)pfealist->list[0].cbValue;
	1156
[551]	1157	rc = xDosSetPathInfo(filename, FIL_QUERYEASIZE,
[2]	1158	&eaop, sizeof(eaop), DSPI_WRTTHRU);
	1159	if (rc) {
	1160	DosFreeMem(pfealist);
[551]	1161	pfealist = NULL;
[347]	1162	}
[193]	1163	if (rc && !silentfail) {
	1164	if (rc == ERROR_ACCESS_DENIED \|\| rc == ERROR_SHARING_VIOLATION) {
	1165	saymsg(MB_ENTER,
[551]	1166	HWND_DESKTOP,
[347]	1167	GetPString(IDS_OOPSTEXT),
	1168	GetPString(IDS_CANTWRITEEATEXT), current->name, filename);
[193]	1169	}
	1170	else {
	1171	Dos_Error(MB_ENTER,
[347]	1172	rc,
[193]	1173	HWND_DESKTOP,
	1174	pszSrcFile,
[551]	1175	__LINE__,
[347]	1176	GetPString(IDS_ERRORWRITEEATEXT),
[2]	1177	current->name, filename, eaop.oError);
	1178	}
[193]	1179	}
[2]	1180	}
	1181	return (PVOID) pfealist;
[193]	1182	}
	1183
[2]	1184	HOLDFEA GetFileEAs(CHAR filename, BOOL ishandle, BOOL silentfail)
	1185	{
[193]	1186	/* load eas from disk into HOLDFEA linked list */
[847]	1187
[193]	1188	HOLDFEA head = NULL, info, *last = NULL;
	1189	FILESTATUS4 fsa4;
	1190	HFILE handle;
[2]	1191	ULONG action;
[193]	1192	APIRET rc;
[2]	1193
[844]	1194	if (!filename)
	1195	return head;
	1196	if (ishandle \|\| !DosOpen(filename, &handle, &action, 0, 0,
	1197	OPEN_ACTION_FAIL_IF_NEW \|
	1198	OPEN_ACTION_OPEN_IF_EXISTS,
	1199	OPEN_FLAGS_NOINHERIT \|
[193]	1200	OPEN_SHARE_DENYREADWRITE \|
	1201	OPEN_ACCESS_READWRITE, (PEAOP2)0)) {
[847]	1202	if (ishandle)
[725]	1203	handle = (HFILE ) filename;
	1204	if (!DosQueryFileInfo(handle, FIL_QUERYEASIZE, (PVOID)&fsa4,
	1205	(ULONG) sizeof(fsa4)) &&
[193]	1206	fsa4.cbList > 4)
	1207	{
[2]	1208	PDENA2 pdena;
	1209	EAOP2 eaop;
[193]	1210	PGEA2LIST pgealist;
[725]	1211	PFEA2LIST pfealist;
	1212	PGEA2 pgea;
[2]	1213	ULONG ulEntry = 1; // Ordinal of EA to return
[551]	1214	ULONG ulCount = 1; // # of EAs to return
	1215
[725]	1216	pdena = xmalloc(65536 + 1024, pszSrcFile, __LINE__);
	1217	if (pdena) {
	1218	while (!DosEnumAttribute(ENUMEA_REFTYPE_FHANDLE,
	1219	&handle,
[770]	1220	ulEntry,
[725]	1221	(PVOID)pdena,
	1222	(ULONG)65536,
	1223	&ulCount,
	1224	ENUMEA_LEVEL_NO_VALUE) &&
	1225	ulCount)
[551]	1226	{
	1227	// 64 is for header and spare - fixme to allocate smarter
	1228	pgealist = xmalloc(64 + pdena->cbName, pszSrcFile, __LINE__);
	1229	if (pgealist) {
[725]	1230	pgealist->cbList = 64 + pdena->cbName;
[551]	1231	pgea = pgealist->list;
	1232	pgea->oNextEntryOffset = 0;
[725]	1233	pgea->cbName = pdena->cbName;
	1234	memcpy(pgea->szName, pdena->szName, pdena->cbName + 1);
[347]	1235	pfealist = xmallocz(64 + pdena->cbName + pdena->cbValue,
[551]	1236	pszSrcFile, __LINE__);
[193]	1237	if (pfealist) {
	1238	pfealist->cbList = 64 + pdena->cbName + pdena->cbValue;
[725]	1239	eaop.fpGEA2List = pgealist;
	1240	eaop.fpFEA2List = pfealist;
[551]	1241	eaop.oError = 0;
	1242	// saymsg(MB_ENTER,HWND_DESKTOP,"Debug1","\"%s\" %ld",pdena->szName,ulEntry);
	1243	rc =
[347]	1244	DosQueryFileInfo(handle, FIL_QUERYEASFROMLIST, (PVOID) & eaop,
	1245	(ULONG) sizeof(EAOP2));
	1246	if (rc) {
	1247	if (!silentfail) {
	1248	Dos_Error(MB_ENTER,
	1249	rc,
	1250	HWND_DESKTOP,
[551]	1251	pszSrcFile,
[347]	1252	__LINE__,
	1253	GetPString(IDS_ERRORREADEATEXT), pdena->szName);
	1254	}
[551]	1255	}
	1256	else {
[725]	1257	info = xmalloc(sizeof(HOLDFEA), pszSrcFile, __LINE__);
	1258	if (info) {
	1259	// 05 Jul 07 SHL was one short
[551]	1260	info->pfea = xmalloc(eaop.fpFEA2List->cbList - sizeof(ULONG) + 1,
	1261	pszSrcFile, __LINE__);
	1262	memcpy(info->pfea, eaop.fpFEA2List->list,
	1263	eaop.fpFEA2List->cbList - sizeof(ULONG));
	1264	info->name = info->pfea->szName;
	1265	info->cbName = info->pfea->cbName;
	1266	info->cbValue = info->pfea->cbValue;
	1267	info->value = info->pfea->szName + info->pfea->cbName + 1;
[193]	1268	info->value[info->cbValue] = 0;
	1269	info->next = NULL;
	1270	if (!head)
[551]	1271	head = info;
[193]	1272	else
	1273	last->next = info;
	1274	last = info;
	1275	}
	1276	}
	1277	free(pfealist);
	1278	}
[725]	1279	free(pgealist);
	1280	}
[193]	1281	ulEntry += ulCount;
	1282	} // while
[2]	1283	free(pdena);
	1284	DosPostEventSem(CompactSem);
[193]	1285	}
[2]	1286	}
	1287	if (!ishandle)
[551]	1288	DosClose(handle);
[755]	1289	}
	1290	else {
[193]	1291	//Runtime_Error(pszSrcFile, __LINE__, "why here", filename);
[847]	1292	//03 AUG 07 GKY This isn't an error it is for processing Readonly files
[725]	1293	/* try it without opening it */
	1294	if (!DosQueryPathInfo(filename, FIL_QUERYEASIZE, (PVOID) & fsa4,
	1295	(ULONG) sizeof(fsa4)) &&
[193]	1296	fsa4.cbList > 4)
	1297	{
[2]	1298	PDENA2 pdena;
	1299	EAOP2 eaop;
[193]	1300	PGEA2LIST pgealist;
[725]	1301	PFEA2LIST pfealist;
[2]	1302	PGEA2 pgea;
[551]	1303	ULONG ulEntry = 1, ulCount = 1;
	1304
	1305	pdena = xmalloc(65536 + 1024, pszSrcFile, __LINE__);
[725]	1306	if (pdena) {
[770]	1307	while (!DosEnumAttribute
[725]	1308	(ENUMEA_REFTYPE_PATH, filename, ulEntry, (PVOID) pdena,
[551]	1309	(ULONG) 65536, &ulCount, ENUMEA_LEVEL_NO_VALUE) && ulCount)
	1310	{
	1311	pgealist = xmalloc(64 + pdena->cbName, pszSrcFile, __LINE__);
	1312	if (pgealist) {
[725]	1313	pgealist->cbList = 64 + pdena->cbName;
[551]	1314	pgea = pgealist->list;
	1315	pgea->oNextEntryOffset = 0;
	1316	pgea->cbName = pdena->cbName;
	1317	memcpy(pgea->szName, pdena->szName, pdena->cbName + 1);
	1318	pfealist =
[347]	1319	xmallocz(64 + pdena->cbName + pdena->cbValue, pszSrcFile,
[551]	1320	__LINE__);
[193]	1321	if (pfealist) {
	1322	pfealist->cbList = 64 + pdena->cbName + pdena->cbValue;
[725]	1323	eaop.fpGEA2List = pgealist;
	1324	eaop.fpFEA2List = pfealist;
[193]	1325	eaop.oError = 0;
[551]	1326	// saymsg(MB_ENTER,HWND_DESKTOP,"Debug2","\"%s\" %ld",pdena->szName,ulEntry);
	1327	rc = DosQueryPathInfo(filename, FIL_QUERYEASFROMLIST,
	1328	(PVOID) & eaop, (ULONG) sizeof(EAOP2));
	1329	if (!rc) {
[880]	1330	info = xmalloc(sizeof(HOLDFEA), pszSrcFile, __LINE__);
[551]	1331	if (info) {
[880]	1332	// 29 Nov 07 GKY One short (EA search crash)
[551]	1333	info->pfea =
	1334	xmalloc(eaop.fpFEA2List->cbList - sizeof(ULONG) + 1,
	1335	pszSrcFile, __LINE__);
	1336	memcpy(info->pfea, eaop.fpFEA2List->list,
	1337	eaop.fpFEA2List->cbList - sizeof(ULONG));
	1338	info->name = info->pfea->szName;
	1339	info->cbName = info->pfea->cbName;
	1340	info->cbValue = info->pfea->cbValue;
	1341	info->value = info->pfea->szName + info->pfea->cbName + 1;
[193]	1342	info->value[info->cbValue] = 0;
	1343	info->next = NULL;
	1344	if (!head)
[551]	1345	head = info;
[193]	1346	else
	1347	last->next = info;
	1348	last = info;
	1349	}
	1350	else
[551]	1351	free(pfealist);
[193]	1352	}
[551]	1353	else {
	1354	free(pfealist);
	1355	if (!silentfail) {
	1356	if (rc == ERROR_ACCESS_DENIED
	1357	\|\| rc == ERROR_SHARING_VIOLATION) {
	1358	rc =
	1359	saymsg(MB_ENTER \| MB_CANCEL, HWND_DESKTOP,
	1360	GetPString(IDS_OOPSTEXT),
	1361	GetPString(IDS_CANTREADEATEXT), filename,
[193]	1362	pdena->szName);
	1363	if (rc == MBID_CANCEL) {
	1364	free(pgealist);
	1365	break;
[347]	1366	}
[193]	1367	}
	1368	else {
	1369	Dos_Error(MB_ENTER,
[347]	1370	rc,
[193]	1371	HWND_DESKTOP,
[551]	1372	pszSrcFile,
[347]	1373	__LINE__,
[193]	1374	GetPString(IDS_ERRORREADEATEXT), pdena->szName);
	1375	}
	1376	}
	1377	}
	1378	}
[725]	1379	free(pgealist);
	1380	}
[193]	1381	ulEntry += ulCount;
	1382	} // while
[2]	1383	free(pdena);
	1384	DosPostEventSem(CompactSem);
	1385	}
	1386	}
	1387	}
	1388	return head;
[193]	1389	}
	1390
[2]	1391	VOID Free_FEAList(HOLDFEA * pFEA)
	1392	{
	1393	/* free a linked list of HOLDFEAs */
	1394
[551]	1395	register HOLDFEA *next;
[193]	1396
[551]	1397	while (pFEA) {
	1398	/* Free linked list */
[2]	1399	next = pFEA->next;
	1400	free(pFEA->pfea);
	1401	free(pFEA);
	1402	pFEA = next;
	1403	}
[795]	1404	DosPostEventSem(CompactSem);
	1405	}
	1406
	1407	#pragma alloc_text(EAS,DisplayEAsProc,SaveEA,HexDumpEA,CheckEA,AddEAProc)
	1408	#pragma alloc_text(EAS1,HexDump,GetFileEAs,Free_FEAList)
	1409

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

Download in other formats: