source: trunk/dll/autoview.c@ 1323

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