source: trunk/dll/eas.c@ 1210

Last change on this file since 1210 was 1207, checked in by John Small, 17 years ago

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