Context Navigation

source: trunk/dll/eas.c@ 1179

Visit:

Last change on this file since 1179 was 1179, checked in by John Small, 17 years ago
Ticket 187: Draft 2: Move remaining function declarations
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 47.6 KB

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

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

Download in other formats: