source: trunk/dll/autoview.c@ 817

Last change on this file since 817 was 793, checked in by Gregg Young, 18 years ago

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