Context Navigation

source: trunk/dll/eas.c@ 1346

Visit:

Last change on this file since 1346 was 1222, checked in by John Small, 17 years ago
Ticket 187: Moved typedef's and some #define's from fm3dll.h
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 47.9 KB

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

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

Download in other formats: