source: trunk/dll/newview.c@ 812

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

Fixed fast viewer text load failure (Ticket 152)
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 107.3 KB
RevLine 
[83]1
2/***********************************************************************
3
4 $Id: newview.c 812 2007-08-26 21:39:04Z gyoung $
5
6 New internal viewer
7
8 Copyright (c) 1993-98 M. Kimes
[574]9 Copyright (c) 2001, 2007 Steven H. Levine
[83]10
[130]11 01 Dec 03 SHL Comments
12 02 Dec 03 SHL Correct WM_VSCROLL math
13 23 May 05 SHL Use QWL_USER
[191]14 06 Jun 05 SHL Indent -i2
[218]15 06 Jun 05 SHL Correct reversed wrap logic
[350]16 17 Jul 06 SHL Use Runtime_Error
[368]17 26 Jul 06 SHL Use chop_at_crnl and convert_nl_to_nul
[533]18 03 Nov 06 SHL Renames
19 03 Nov 06 SHL Count thread usage
[574]20 22 Mar 07 GKY Use QWL_USER
[593]21 30 Mar 07 GKY Remove GetPString for window class names
[775]22 06 Aug 07 GKY Reduce DosSleep times (ticket 148)
[793]23 20 Aug 07 GKY Move #pragma alloc_text to end for OpenWatcom compat
[812]24 26 Aug 07 GKY Fixed fast viewer text load failure
[83]25
[775]26
[83]27***********************************************************************/
28
[2]29#define INCL_DOS
30#define INCL_WIN
31#define INCL_GPI
[350]32#include <os2.h>
[2]33
34#include <stdlib.h>
35#include <stdio.h>
36#include <string.h>
37#include <ctype.h>
38#include <process.h>
39#include <limits.h>
40#include <share.h>
[350]41
[2]42#include "fm3dll.h"
43#include "fm3dlg.h"
44#include "fm3str.h"
45#include "mle.h"
46
47#pragma data_seg(DATA2)
[350]48
49static PSZ pszSrcFile = __FILE__;
50
[2]51#define VF_SELECTED 0x01
52#define VF_FOUND 0x02
53#define VF_HTTP 0x04
54#define VF_FTP 0x08
55
56#define FIXED_FONT_LCID 5
57
58#define COLORS_MAX 12
59
60#define COLORS_CURSOREDNORMALBACK 0
61#define COLORS_CURSOREDSELECTEDBACK 1
62#define COLORS_NORMALBACK 2
63#define COLORS_SELECTEDBACK 3
64#define COLORS_NORMALFORE 4
65#define COLORS_FOUNDFORE 5
66#define COLORS_SELECTEDFORE 6
67#define COLORS_SELECTEDFOUNDFORE 7
68#define COLORS_HTTPBACK 8
69#define COLORS_HTTPFORE 9
70#define COLORS_FTPBACK 10
71#define COLORS_FTPFORE 11
72
[551]73static LONG Colors[COLORS_MAX] = { COLR_WHITE, COLR_DARKGRAY,
74 COLR_PALEGRAY, COLR_BLACK,
75 COLR_BLACK, COLR_RED,
76 COLR_WHITE, COLR_YELLOW,
77 COLR_PALEGRAY, COLR_DARKBLUE,
78 COLR_PALEGRAY, COLR_DARKGREEN
79};
[2]80
81#define SEARCHSTRINGLEN 1024
82
[191]83typedef struct
84{
85 USHORT size;
86 USHORT flags;
87 USHORT cliptype;
88 CHAR filename[CCHMAXPATH];
89 CHAR *text;
90 CHAR **lines, *markedlines;
91 CHAR searchtext[SEARCHSTRINGLEN], *lastpos, szFacename[FACESIZE];
92 ULONG textsize, numlines, topline, cursored, selected, numalloc, multiplier,
[551]93 lastselected, found;
[191]94 CHAR stopflag, busy;
95 LONG oldwidth, lastdirection, lMaxAscender, lMaxDescender, lMaxHeight,
[551]96 maxx, horzscroll;
[191]97 BOOL hex, mousecaptured, sensitive, dummy, literalsearch, clientfocused,
[551]98 alsoselect, wrapon, relining, httpin, ftpin, ignorehttp, ignoreftp,
99 needrefreshing;
[191]100 HMTX ScanSem;
101 HWND hvscroll, hwndMenu, hwndStatus1, hwndStatus2, hwndStatus3, hwndRestore,
[551]102 hwndPopup, hwndListbox, hwndFrame, hwndDrag, hwndParent, hhscroll;
[191]103 HPS hps;
104 FATTRS fattrs;
105 LONG colors[12];
106}
107VIEWDATA;
[2]108
[191]109typedef struct
110{
[2]111 USHORT size;
112 USHORT dummy;
[191]113 ULONG len;
114 CHAR *line;
115 CHAR url[SEARCHSTRINGLEN];
116}
117URLDATA;
[2]118
[191]119static BOOL Sensitive = FALSE;
120static USHORT Codepage = 0;
121static BOOL Firsttime = TRUE;
122static BOOL LiteralSearch = FALSE;
123static BOOL AlsoSelect = FALSE;
124static BOOL WrapOn = FALSE;
125static BOOL IgnoreFTP = FALSE;
126static BOOL IgnoreHTTP = FALSE;
[2]127static FATTRS Fattrs;
128
[191]129MRESULT EXPENTRY UrlDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[83]130{
[2]131 URLDATA *urld;
132
[551]133 switch (msg) {
[191]134 case WM_INITDLG:
[551]135 if (mp2) {
[191]136 CHAR *p, *e, *pp;
137 SHORT count;
[2]138
[191]139 WinSetWindowPtr(hwnd, QWL_USER, mp2);
140 urld = mp2;
[551]141 e = urld->line + urld->len + 1;
142 p = urld->line;
143 do {
[191]144 p = strnstr(p, "http://", e - p);
[551]145 if (p) {
146 strncpy(urld->url, p, min(e - p, SEARCHSTRINGLEN - 1));
147 urld->url[min(e - p, SEARCHSTRINGLEN - 1)] = 0;
148 pp = urld->url;
[191]149 while (*pp && *pp != ' ' && *pp != '\r' && *pp != '\n' &&
150 *pp != '\"')
151 pp++;
152 *pp = 0;
153 WinSendDlgItemMsg(hwnd, URL_LISTBOX, LM_INSERTITEM,
[551]154 MPFROM2SHORT(LIT_END, 0), MPFROMP(urld->url));
[191]155 p++;
156 }
[2]157 }
[191]158 while (p && *p && p < e);
[551]159 p = urld->line;
160 do {
[191]161 p = strnstr(p, "ftp://", e - p);
[551]162 if (p) {
163 strncpy(urld->url, p, min(e - p, SEARCHSTRINGLEN - 1));
164 urld->url[min(e - p, SEARCHSTRINGLEN - 1)] = 0;
165 pp = urld->url;
[191]166 while (*pp && *pp != ' ' && *pp != '\r' && *pp != '\n' &&
167 *pp != '\"')
168 pp++;
169 *pp = 0;
170 WinSendDlgItemMsg(hwnd, URL_LISTBOX, LM_INSERTITEM,
[551]171 MPFROM2SHORT(LIT_END, 0), MPFROMP(urld->url));
[191]172 p++;
173 }
174 }
175 while (p && *p && p < e);
[551]176 *urld->url = 0;
[191]177 count = (SHORT) WinSendDlgItemMsg(hwnd, URL_LISTBOX, LM_QUERYITEMCOUNT,
178 MPVOID, MPVOID);
[551]179 if (count) {
[191]180 WinSendDlgItemMsg(hwnd, URL_LISTBOX, LM_SELECTITEM,
181 MPFROMSHORT(0), MPFROMSHORT(TRUE));
182 if (count == 1)
183 WinSendMsg(hwnd, WM_COMMAND, MPFROM2SHORT(DID_OK, 0), MPVOID);
184 else
185 PostMsg(hwnd, UM_SETUP, MPVOID, MPVOID);
186 break;
187 }
188 }
189 WinDismissDlg(hwnd, 0);
190 break;
[2]191
[191]192 case UM_SETUP:
193 WinShowWindow(hwnd, TRUE);
194 return 0;
[2]195
[191]196 case WM_CONTROL:
[551]197 switch (SHORT1FROMMP(mp1)) {
[191]198 case URL_LISTBOX:
[551]199 switch (SHORT2FROMMP(mp1)) {
[191]200 case LN_ENTER:
201 PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(DID_OK, 0), MPVOID);
202 break;
[2]203 }
[191]204 break;
205 }
206 return 0;
[2]207
[191]208 case WM_COMMAND:
[551]209 switch (SHORT1FROMMP(mp1)) {
[191]210 case URL_BOOKMARK:
211 WinDismissDlg(hwnd, 3);
212 break;
[2]213
[191]214 case DID_OK:
215 {
216 SHORT select;
[2]217
[191]218 urld = WinQueryWindowPtr(hwnd, QWL_USER);
[551]219 if (urld) {
[191]220 select = (SHORT) WinSendDlgItemMsg(hwnd, URL_LISTBOX,
221 LM_QUERYSELECTION,
[551]222 MPFROMSHORT(LIT_FIRST), MPVOID);
223 if (select >= 0) {
224 *urld->url = 0;
[191]225 WinSendDlgItemMsg(hwnd, URL_LISTBOX, LM_QUERYITEMTEXT,
[551]226 MPFROM2SHORT(select, sizeof(urld->url)),
227 MPFROMP(urld->url));
228 if (*urld->url) {
229 if (!strncmp(urld->url, "http://", 7)) {
[191]230 WinDismissDlg(hwnd, 1);
231 break;
232 }
[551]233 else if (!strncmp(urld->url, "ftp://", 6)) {
234 memmove(urld->url, urld->url + 6, strlen(urld->url) + 1);
235 if (*urld->url) {
[191]236 WinDismissDlg(hwnd, 2);
237 break;
238 }
239 }
240 }
241 }
242 }
243 }
[350]244 Runtime_Error(pszSrcFile, __LINE__, "no data");
[191]245 break;
[2]246
[191]247 case DID_CANCEL:
248 WinDismissDlg(hwnd, 0);
249 break;
[2]250
[191]251 case IDM_HELP:
252 break;
253 }
254 return 0;
[2]255 }
[191]256 return WinDefDlgProc(hwnd, msg, mp1, mp2);
[2]257}
258
[191]259static ULONG NumLines(RECTL * rcl, VIEWDATA * ad)
[83]260{
[2]261 ULONG numlines;
262
[551]263 numlines = (rcl->yTop - rcl->yBottom) / ad->lMaxHeight;
264 if (ad->lMaxDescender && numlines &&
265 ((rcl->yTop - rcl->yBottom) -
266 (numlines * ad->lMaxHeight) <= ad->lMaxDescender))
[2]267 numlines--;
268 return numlines;
269}
270
[191]271static CHAR **BuildAList(HWND hwnd)
[83]272{
[191]273 VIEWDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER);
274 register ULONG x, y, z = 0;
275 ULONG width;
276 RECTL Rectl;
277 CHAR **list = NULL, s[SEARCHSTRINGLEN], a;
278 register CHAR *p, *e;
279 INT numlines = 0, numalloc = 0;
[2]280
[551]281 if (ad && ad->selected) {
[191]282 WinQueryWindowRect(hwnd, &Rectl);
[551]283 width = (Rectl.xRight - Rectl.xLeft) / ad->fattrs.lAveCharWidth;
284 if (!width && !ad->hex)
[2]285 return list;
[551]286 for (x = 0; x < ad->numlines; x++) {
287 if (ad->stopflag)
[191]288 break;
[551]289 if (ad->markedlines[x] & VF_SELECTED) {
290 if (ad->hex) {
291 width = ad->textsize - (x * 16);
[191]292 width = min(width, 16);
293 sprintf(s, "%08lx ", x * 16);
294 p = s + 9;
[551]295 for (y = 0; y < width; y++) {
296 sprintf(p, " %02hx", ad->text[(x * 16) + y]);
[191]297 p += 3;
298 }
299 *p = ' ';
300 p++;
301 *p = ' ';
302 p++;
[551]303 for (y = 0; y < width; y++) {
304 a = ad->text[(x * 16) + y];
[191]305 if (a && a != '\n' && a != '\r' && a != '\t' && a != '\x1a')
[551]306 *p = ad->text[(x * 16) + y];
[191]307 else
308 *p = '.';
309 p++;
310 }
311 *p = 0;
312 }
[551]313 else {
314 if (!ad->wrapon) {
315 e = p = ad->lines[x];
316 while (*e != '\r' && *e != '\n' && e < ad->text + ad->textsize)
[191]317 e++;
[2]318/*
[191]319 if((*e == '\r' || *e == '\n') && e > p)
320 e--;
321 */
322 width = e - p;
323 }
[551]324 else {
325 p = ad->lines[x];
[191]326 e = p + (width - 1);
[551]327 if (e - ad->text > ad->textsize)
328 e = ad->text + ad->textsize;
329 while (p < e) {
330 if (*p == '\r' || *p == '\n') {
[191]331 e = p;
332 break;
333 }
334 p++;
335 }
336 }
[551]337 strncpy(s, ad->lines[x], e - ad->lines[x]);
338 s[e - ad->lines[x]] = 0;
[191]339 }
340 if (AddToList(s, &list, &numlines, &numalloc))
341 break;
342 z++;
[551]343 if (z >= ad->selected)
[191]344 break;
[2]345 }
346 }
347 }
348 return list;
349}
350
[191]351static CHAR **BuildAList2(HWND hwnd)
[83]352{
[191]353 VIEWDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER);
354 CHAR **list = NULL, s[SEARCHSTRINGLEN];
355 SHORT x, z;
356 INT numlines = 0, numalloc = 0;
[2]357
[551]358 if (ad) {
359 z = (SHORT) WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX,
[191]360 LM_QUERYITEMCOUNT, MPVOID, MPVOID);
361 z = max(z, 0);
[551]362 for (x = 0; x < z; x++) {
363 if (ad->stopflag)
[191]364 break;
[2]365 *s = 0;
[551]366 WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX, LM_QUERYITEMTEXT,
[191]367 MPFROM2SHORT(x, SEARCHSTRINGLEN), MPFROMP(s));
368 if (*s)
369 if (AddToList(s, &list, &numlines, &numalloc))
370 break;
[2]371 }
372 }
373 return list;
374}
375
[191]376MRESULT EXPENTRY ViewStatusProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[83]377{
[551]378 switch (msg) {
[191]379 case WM_CREATE:
380 return CommonTextProc(hwnd, msg, mp1, mp2);
[2]381
[191]382 case WM_MOUSEMOVE:
383 {
384 USHORT id = WinQueryWindowUShort(hwnd, QWS_ID);
385
[551]386 if (fOtherHelp) {
387 if ((!hwndBubble || WinQueryWindowULong(hwndBubble, QWL_USER) != hwnd)
388 && !WinQueryCapture(HWND_DESKTOP)) {
[2]389
[191]390 char *s = NULL;
[2]391
[551]392 switch (id) {
[191]393 case NEWVIEW_STATUS2:
394 s = GetPString(IDS_NVSTATUS2HELPTEXT);
395 break;
396 case NEWVIEW_STATUS3:
397 s = GetPString(IDS_NVSTATUS3HELPTEXT);
398 break;
399 case NEWVIEW_DRAG:
400 s = GetPString(IDS_NVDRAGHELPTEXT);
401 break;
402 }
403 if (s && *s)
404 MakeBubble(hwnd, TRUE, s);
405 else if (hwndBubble)
406 WinDestroyWindow(hwndBubble);
407 }
[2]408 }
[551]409 switch (id) {
[191]410 case NEWVIEW_STATUS1:
411 break;
412 default:
413 return CommonTextButton(hwnd, msg, mp1, mp2);
414 }
415 }
416 break;
[2]417
[191]418 case WM_BUTTON3UP:
419 case WM_BUTTON1UP:
420 case WM_BUTTON1DOWN:
421 case WM_BUTTON3DOWN:
422 {
423 USHORT id;
424
425 id = WinQueryWindowUShort(hwnd, QWS_ID);
[551]426 switch (id) {
[191]427 case NEWVIEW_STATUS1:
428 break;
429 default:
430 return CommonTextButton(hwnd, msg, mp1, mp2);
[2]431 }
[191]432 }
433 break;
[2]434
[191]435 case UM_CLICKED:
436 case UM_CLICKED3:
437 {
438 USHORT id = WinQueryWindowUShort(hwnd, QWS_ID), cmd = 0;
439
[551]440 switch (id) {
[191]441 case NEWVIEW_DRAG:
442 if (msg == UM_CLICKED)
443 cmd = (msg == UM_CLICKED) ? IDM_HEXMODE : IDM_DESELECTALL;
444 break;
445 case NEWVIEW_STATUS2:
446 cmd = (msg == UM_CLICKED) ? IDM_GOTOLINE : IDM_FINDFIRST;
447 break;
448 case NEWVIEW_STATUS3:
449 cmd = (msg == UM_CLICKED) ? IDM_GOTOOFFSET : IDM_FINDNEXT;
450 break;
451 default:
452 break;
[2]453 }
[191]454 PostMsg(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
455 FID_CLIENT),
[551]456 WM_COMMAND, MPFROM2SHORT(cmd, 0), MPVOID);
[191]457 }
458 return 0;
[2]459
[191]460 case WM_BEGINDRAG:
461 {
462 USHORT id = WinQueryWindowUShort(hwnd, QWS_ID);
463
[551]464 switch (id) {
[191]465 case NEWVIEW_STATUS1:
466 case NEWVIEW_DRAG:
467 {
[551]468 VIEWDATA *ad =
469 WinQueryWindowPtr(WinWindowFromID(WinQueryWindow(hwnd,
470 QW_PARENT),
[574]471 FID_CLIENT), QWL_USER);
[2]472
[191]473 if (ad)
474 DragOne(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
[551]475 FID_CLIENT), (HWND) 0, ad->filename,
476 FALSE);
[191]477 }
478 break;
479 default:
480 break;
[2]481 }
[191]482 }
483 break;
[2]484
[191]485 case WM_CONTEXTMENU:
486 PostMsg(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
[551]487 FID_CLIENT), UM_CONTEXTMENU, MPVOID, MPVOID);
[191]488 break;
[2]489
[191]490 case WM_SETFOCUS:
491 if (mp2)
492 PostMsg(hwnd, UM_FOCUSME, MPVOID, MPVOID);
493 break;
[2]494
[191]495 case WM_PAINT:
496 {
497 USHORT id = WinQueryWindowUShort(hwnd, QWS_ID);
498 ULONG color;
499 VIEWDATA *ad = WinQueryWindowPtr(WinWindowFromID(WinQueryWindow(hwnd,
[551]500 QW_PARENT),
[574]501 FID_CLIENT), QWL_USER);
[191]502 SWP swp;
503 POINTL ptl;
504 HPS hps;
505
[551]506 switch (id) {
[191]507 case NEWVIEW_STATUS1:
508 PaintRecessedWindow(hwnd, (HPS) 0, FALSE, FALSE);
509 break;
510 default:
511 PaintRecessedWindow(hwnd, (HPS) 0, TRUE, FALSE);
512 break;
[2]513 }
[191]514 hps = WinGetPS(WinQueryWindow(hwnd, QW_PARENT));
[551]515 if (hps) {
[191]516 WinQueryWindowPos(hwnd, &swp);
517 ptl.x = swp.x - 1;
518 ptl.y = swp.y + swp.cy + 2;
519 GpiMove(hps, &ptl);
[551]520 switch (id) {
[191]521 case NEWVIEW_STATUS1:
522 if (ad)
[551]523 color =
524 (standardcolors[ad->colors[COLORS_NORMALBACK]] ==
525 CLR_WHITE) ? CLR_PALEGRAY : CLR_WHITE;
[191]526 else
527 color = CLR_WHITE;
528 break;
529 default:
530 if (ad)
[551]531 color =
532 (standardcolors[ad->colors[COLORS_NORMALBACK]] ==
533 CLR_PALEGRAY) ? CLR_DARKGRAY : CLR_PALEGRAY;
[191]534 else
535 color = CLR_PALEGRAY;
536 break;
537 }
538 GpiSetColor(hps, color);
539 ptl.x = swp.x + swp.cx;
540 GpiLine(hps, &ptl);
541 WinReleasePS(hps);
542 }
543 }
544 break;
[2]545
[191]546 case UM_FOCUSME:
547 WinSetFocus(HWND_DESKTOP,
[551]548 WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT), FID_CLIENT));
[191]549 return 0;
[2]550 }
[191]551 return PFNWPStatic(hwnd, msg, mp1, mp2);
[2]552}
553
[191]554static VOID FreeViewerMem(HWND hwnd)
[83]555{
[191]556 VIEWDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER);
[2]557
[551]558 if (ad) {
559 ad->selected = ad->textsize = ad->numlines = ad->numalloc = 0;
560 if (ad->text)
561 free(ad->text);
562 if (ad->lines)
563 free(ad->lines);
564 if (ad->markedlines)
565 free(ad->markedlines);
566 ad->text = NULL;
567 ad->lines = NULL;
568 ad->markedlines = NULL;
[2]569 DosPostEventSem(CompactSem);
570 }
571}
572
[191]573static HPS InitWindow(HWND hwnd)
[83]574{
[191]575 VIEWDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER);
576 HPS hps = (HPS) 0;
577 SIZEL sizel;
578 FONTMETRICS FontMetrics;
[2]579
[551]580 if (ad) {
[2]581 sizel.cx = sizel.cy = 0;
[191]582 hps = GpiCreatePS(WinQueryAnchorBlock(hwnd), WinOpenWindowDC(hwnd),
583 (PSIZEL) & sizel, PU_PELS | GPIF_DEFAULT | GPIT_MICRO |
584 GPIA_ASSOC);
[551]585 if (hps) {
586 GpiSetCp(hps, (ULONG) ad->fattrs.usCodePage);
587 GpiCreateLogFont(hps, NULL, FIXED_FONT_LCID, &ad->fattrs);
[191]588 GpiSetCharSet(hps, FIXED_FONT_LCID);
[551]589 GpiQueryFontMetrics(hps, (long)sizeof(FONTMETRICS), &FontMetrics);
590 ad->fattrs.lAveCharWidth = FontMetrics.lAveCharWidth;
591 ad->fattrs.lMaxBaselineExt = FontMetrics.lMaxBaselineExt;
592 ad->lMaxAscender = max(FontMetrics.lMaxAscender, 0);
593 ad->lMaxDescender = max(FontMetrics.lMaxDescender, 0);
594 ad->lMaxHeight = ad->lMaxAscender + ad->lMaxDescender;
595 if (ad->fattrs.usCodePage != FontMetrics.usCodePage) {
596 ad->fattrs.usCodePage = FontMetrics.usCodePage;
597 Codepage = ad->fattrs.usCodePage;
[191]598 PrfWriteProfileData(fmprof,
599 appname,
600 "Viewer.Codepage",
[551]601 &ad->fattrs.usCodePage, sizeof(USHORT));
[2]602 }
[551]603 else if (ad->fattrs.usCodePage) {
[2]604
[191]605 HMQ hmq;
606 ULONG cps[50], len, x;
[2]607
[551]608 if (!DosQueryCp(sizeof(cps), cps, &len)) {
609 for (x = 0; x < len / sizeof(ULONG); x++) {
610 if (cps[x] == (ULONG) ad->fattrs.usCodePage) {
[191]611 hmq = WinQueryWindowULong(hwnd, QWL_HMQ);
[551]612 WinSetCp(hmq, ad->fattrs.usCodePage);
[191]613 break;
614 }
615 }
616 }
[551]617 DosSetProcessCp((ULONG) ad->fattrs.usCodePage);
[2]618 }
[191]619 GpiSetBackMix(hps, BM_OVERPAINT);
[551]620 SetPresParamFromFattrs(WinWindowFromID(ad->hwndFrame, NEWVIEW_LISTBOX),
621 &ad->fattrs, FontMetrics.sNominalPointSize,
622 MAKEFIXED(FontMetrics.sNominalPointSize / 10,
623 0));
[2]624 }
625 }
626 return (hps);
627}
628
[191]629static VOID PaintLine(HWND hwnd, HPS hps, ULONG whichline, ULONG topline,
630 RECTL * Rectl)
[83]631{
[191]632 VIEWDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER);
633 POINTL ptl;
634 ULONG width;
635 register CHAR *p, *e;
636 CHAR marker[] = " >";
637 RECTL rcl2;
[2]638
[551]639 if (ad && (ad->hex || ad->lines)) {
640 ptl.y = (Rectl->yTop - (ad->lMaxHeight *
641 (((whichline + 1) - topline) + 1)));
[2]642 ptl.x = 0;
[191]643 GpiMove(hps, &ptl);
644 GpiSetBackMix(hps, BM_OVERPAINT);
[551]645 if (ad->markedlines) {
646 if (ad->markedlines[whichline] & VF_SELECTED) {
647 GpiSetColor(hps, ((ad->markedlines[whichline] & VF_FOUND) != 0) ?
648 standardcolors[ad->colors[COLORS_SELECTEDFOUNDFORE]] :
649 standardcolors[ad->colors[COLORS_SELECTEDFORE]]);
650 GpiSetBackColor(hps, (whichline == ad->cursored - 1) ?
651 standardcolors[ad->
652 colors[COLORS_CURSOREDSELECTEDBACK]] :
653 standardcolors[ad->colors[COLORS_SELECTEDBACK]]);
[2]654 }
[551]655 else if (ad->markedlines[whichline] & VF_FOUND) {
656 GpiSetColor(hps, standardcolors[ad->colors[COLORS_FOUNDFORE]]);
657 GpiSetBackColor(hps, (whichline == ad->cursored - 1) ?
658 standardcolors[ad->
659 colors[COLORS_CURSOREDNORMALBACK]] :
660 standardcolors[ad->colors[COLORS_NORMALBACK]]);
[2]661 }
[551]662 else {
663 GpiSetColor(hps, standardcolors[ad->colors[COLORS_NORMALFORE]]);
664 GpiSetBackColor(hps, (whichline == ad->cursored - 1) ?
665 standardcolors[ad->
666 colors[COLORS_CURSOREDNORMALBACK]] :
667 standardcolors[ad->colors[COLORS_NORMALBACK]]);
[2]668 }
669 }
[551]670 else {
671 GpiSetColor(hps, standardcolors[ad->colors[COLORS_NORMALFORE]]);
672 GpiSetBackColor(hps, (whichline == ad->cursored - 1) ?
673 standardcolors[ad->colors[COLORS_CURSOREDNORMALBACK]] :
674 standardcolors[ad->colors[COLORS_NORMALBACK]]);
[2]675 }
[551]676 if (!ad->hex) {
677 if (ad->wrapon) {
678 width = (Rectl->xRight - Rectl->xLeft) / ad->fattrs.lAveCharWidth;
679 if (width) {
680 GpiCharString(hps, 1, marker + (whichline == ad->cursored - 1));
681 p = ad->lines[whichline];
[191]682 e = p + (width - 1);
[551]683 if (e - ad->text > ad->textsize)
684 e = ad->text + ad->textsize;
685 while (p < e) {
686 if (*p == '\r' || *p == '\n') {
[191]687 e = p;
688 break;
689 }
690 p++;
691 }
[551]692 if (ad->ftpin && whichline != ad->cursored - 1
693 && (!ad->markedlines
694 || !(ad->markedlines[whichline] & (VF_SELECTED | VF_FOUND)))
695 && strnstr(ad->lines[whichline], "ftp://",
696 e - ad->lines[whichline])) {
697 GpiSetColor(hps, standardcolors[ad->colors[COLORS_FTPFORE]]);
698 GpiSetBackColor(hps, standardcolors[ad->colors[COLORS_FTPBACK]]);
[191]699 }
[551]700 if (ad->httpin && whichline != ad->cursored - 1
701 && (!ad->markedlines
702 || !(ad->markedlines[whichline] & (VF_SELECTED | VF_FOUND)))
703 && strnstr(ad->lines[whichline], "http://",
704 e - ad->lines[whichline])) {
705 GpiSetColor(hps, standardcolors[ad->colors[COLORS_HTTPFORE]]);
706 GpiSetBackColor(hps, standardcolors[ad->colors[COLORS_HTTPBACK]]);
[191]707 }
708 rcl2 = *Rectl;
[551]709 rcl2.yTop = ptl.y + ad->lMaxAscender;
710 rcl2.yBottom = ptl.y - ad->lMaxDescender;
711 GpiCharString(hps, e - ad->lines[whichline], ad->lines[whichline]);
[191]712 GpiQueryCurrentPosition(hps, &ptl);
713 rcl2.xLeft = ptl.x;
714 WinFillRect(hps, &rcl2,
[551]715 standardcolors[ad->colors[COLORS_NORMALBACK]]);
[191]716 }
[2]717 }
[551]718 else {
719 width = (Rectl->xRight - Rectl->xLeft) / ad->fattrs.lAveCharWidth;
720 if (width) {
721 GpiCharString(hps, 1, marker + (whichline == ad->cursored - 1));
722 p = ad->lines[whichline];
723 e = p + (abs(ad->horzscroll) / ad->fattrs.lAveCharWidth);
724 if (e - ad->text > ad->textsize)
725 e = ad->text + ad->textsize;
726 while (p < e) {
[191]727 if (*p == '\r' || *p == '\n')
728 break;
729 p++;
730 }
[551]731 if (*p != '\r' && *p != '\n') {
[2]732
[191]733 CHAR *pp;
[2]734
[191]735 e = p + (width - 1);
[551]736 if (e - ad->text > ad->textsize)
737 e = ad->text + ad->textsize;
[191]738 pp = p;
[551]739 while (pp < e) {
740 if (*pp == '\r' || *pp == '\n') {
[191]741 e = pp;
742 break;
743 }
744 pp++;
745 }
746 }
747 else
748 e = p;
[551]749 if (ad->ftpin && whichline != ad->cursored - 1
750 && (!ad->markedlines
751 || !(ad->markedlines[whichline] & (VF_SELECTED | VF_FOUND)))
752 && strnstr(ad->lines[whichline], "ftp://",
753 e - ad->lines[whichline])) {
754 GpiSetColor(hps, standardcolors[ad->colors[COLORS_FTPFORE]]);
755 GpiSetBackColor(hps, standardcolors[ad->colors[COLORS_FTPBACK]]);
[191]756 }
[551]757 if (ad->httpin && whichline != ad->cursored - 1
758 && (!ad->markedlines
759 || !(ad->markedlines[whichline] & (VF_SELECTED | VF_FOUND)))
760 && strnstr(ad->lines[whichline], "http://",
761 e - ad->lines[whichline])) {
762 GpiSetColor(hps, standardcolors[ad->colors[COLORS_HTTPFORE]]);
763 GpiSetBackColor(hps, standardcolors[ad->colors[COLORS_HTTPBACK]]);
[191]764 }
765 rcl2 = *Rectl;
[551]766 rcl2.yTop = ptl.y + ad->lMaxAscender;
767 rcl2.yBottom = ptl.y - ad->lMaxDescender;
[191]768 GpiCharString(hps, e - p, p);
769 GpiQueryCurrentPosition(hps, &ptl);
770 rcl2.xLeft = ptl.x;
771 WinFillRect(hps, &rcl2,
[551]772 standardcolors[ad->colors[COLORS_NORMALBACK]]);
[191]773 }
[2]774 }
775 }
[551]776 else {
[2]777
[191]778 CHAR s[80];
779 register ULONG x;
[2]780
781 rcl2 = *Rectl;
[551]782 rcl2.yTop = ptl.y + ad->lMaxAscender;
783 rcl2.yBottom = ptl.y - ad->lMaxDescender;
784 GpiCharString(hps, 1, marker + (whichline == ad->cursored - 1));
785 width = ad->textsize - (whichline * 16);
[191]786 width = min(width, 16);
[551]787 sprintf(s, "%08lx ", whichline * 16);
[2]788 p = s + 9;
[551]789 for (x = 0; x < width; x++) {
790 sprintf(p, " %02hx", ad->text[(whichline * 16) + x]);
[191]791 p += 3;
[2]792 }
[551]793 for (; x < 16; x++) {
[191]794 *p = ' ';
795 p++;
796 *p = ' ';
797 p++;
798 *p = ' ';
799 p++;
[2]800 }
801 *p = ' ';
802 p++;
803 *p = ' ';
804 p++;
[551]805 for (x = 0; x < width; x++) {
806 *p = ad->text[(whichline * 16) + x];
[191]807 p++;
[2]808 }
809 *p = 0;
[551]810 GpiCharString(hps, (p - s) - (abs(ad->horzscroll) /
811 ad->fattrs.lAveCharWidth),
812 s + (abs(ad->horzscroll) / ad->fattrs.lAveCharWidth));
[191]813 GpiQueryCurrentPosition(hps, &ptl);
[551]814 if (ptl.x + abs(ad->horzscroll) + ad->fattrs.lAveCharWidth + 1 >
815 ad->maxx) {
816 ad->maxx = ptl.x + abs(ad->horzscroll) + ad->fattrs.lAveCharWidth + 1;
817 WinSendMsg(ad->hhscroll, SBM_SETTHUMBSIZE,
818 MPFROM2SHORT((SHORT) Rectl->xRight, (SHORT) ad->maxx),
[191]819 MPVOID);
[2]820 }
821 rcl2.xLeft = ptl.x;
[551]822 WinFillRect(hps, &rcl2, standardcolors[ad->colors[COLORS_NORMALBACK]]);
[2]823 }
824 }
825}
826
[533]827static VOID SearchThread(VOID * args)
[83]828{
[551]829 HWND hwnd = (HWND) args;
[191]830 HAB hab2;
831 HMQ hmq2;
832 VIEWDATA *ad;
[2]833 register CHAR *p;
[191]834 RECTL Rectl;
835 ULONG width, numlines, lastline, whichline, firstline = ULONG_MAX;
[2]836 register ULONG x;
[191]837 CHAR s[SEARCHSTRINGLEN], s2[SEARCHSTRINGLEN], *t, *n, markwith;
[2]838
839 priority_normal();
840 hab2 = WinInitialize(0);
[551]841 if (hab2) {
[191]842 hmq2 = WinCreateMsgQueue(hab2, 0);
[533]843 if (hmq2) {
[191]844 WinCancelShutdown(hmq2, TRUE);
[533]845 IncrThreadUsage();
[191]846 ad = WinQueryWindowPtr(hwnd, QWL_USER);
[551]847 if (ad) {
848 if (!DosRequestMutexSem(ad->ScanSem, SEM_INDEFINITE_WAIT)) {
849 markwith = VF_FOUND | ((ad->alsoselect) ? VF_SELECTED : 0);
850 strcpy(s, ad->searchtext);
851 if (*s) {
[191]852 WinQueryWindowRect(hwnd, &Rectl);
[551]853 width = (Rectl.xRight - Rectl.xLeft) / ad->fattrs.lAveCharWidth;
[191]854 numlines = NumLines(&Rectl, ad);
[551]855 WinSetWindowText(WinWindowFromID(ad->hwndFrame,
[191]856 NEWVIEW_STATUS1),
857 GetPString(IDS_SEARCHINGTEXT));
[551]858 if (numlines && width && ad->markedlines && ad->numlines &&
859 ad->text && ad->textsize) {
860 for (x = 0; x < ad->numlines && !ad->stopflag; x++)
861 ad->markedlines[x] &= (~VF_FOUND);
862 ad->found = 0;
[191]863 t = s;
[551]864 while (t && !ad->stopflag) {
[191]865 lastline = 1;
[368]866 n = convert_nl_to_nul(t);
[551]867 if (*t) {
[191]868 strcpy(s2, t);
[551]869 if (ad->literalsearch)
[191]870 literal(s2);
[551]871 p = ad->text;
872 while (p && !ad->stopflag) {
[191]873 p = findstring(s2, strlen(s2), p,
[551]874 ad->textsize - (p - ad->text),
875 ad->sensitive);
876 if (p) {
877 if (ad->hex) {
878 whichline = (p - ad->text) / 16;
[191]879 if (whichline < firstline)
880 firstline = whichline;
[551]881 if (!(ad->markedlines[whichline] & VF_FOUND))
882 ad->found++;
883 if (markwith & VF_SELECTED) {
884 if (!(ad->markedlines[whichline] & VF_SELECTED))
885 ad->selected++;
[191]886 }
[551]887 ad->markedlines[whichline] |= markwith;
888 if ((p - ad->text) + strlen(s2) >
889 (whichline + 1) * 16) {
[191]890 whichline++;
[551]891 if (!(ad->markedlines[whichline] & VF_FOUND))
892 ad->found++;
893 if (markwith & VF_SELECTED) {
894 if (!(ad->markedlines[whichline] & VF_SELECTED))
895 ad->selected++;
[191]896 }
[551]897 ad->markedlines[whichline] |= markwith;
[191]898 }
[551]899 p = ad->text + ((whichline + 1) * 16);
900 if (p >= ad->text + ad->textsize)
[191]901 break;
902 }
[551]903 else {
904 for (x = lastline; x < ad->numlines; x++) {
905 if (ad->lines[x] > p) {
[191]906 if (x - 1 < firstline)
907 firstline = x - 1;
[551]908 if (!(ad->markedlines[x - 1] & VF_FOUND))
909 ad->found++;
910 if (markwith & VF_SELECTED) {
911 if (!(ad->markedlines[x - 1] & VF_SELECTED))
912 ad->selected++;
[191]913 }
[551]914 ad->markedlines[x - 1] |= markwith;
915 if (x + 1 < ad->numlines &&
916 p + strlen(s2) > ad->lines[x]) {
[191]917 x++;
[551]918 if (!(ad->markedlines[x - 1] & VF_FOUND))
919 ad->found++;
920 if (markwith & VF_SELECTED) {
921 if (!(ad->markedlines[x - 1] & VF_SELECTED))
922 ad->selected++;
[191]923 }
[551]924 ad->markedlines[x - 1] |= markwith;
[191]925 }
926 lastline = x;
[551]927 p = ad->lines[x];
[191]928 break;
929 }
930 }
[551]931 if (x >= ad->numlines) {
932 if (markwith & VF_SELECTED) {
933 if (!
934 (ad->markedlines[numlines - 1] & VF_SELECTED))
935 ad->selected++;
936 if (!(ad->markedlines[numlines - 1] & VF_FOUND))
937 ad->found++;
[191]938 }
[551]939 ad->markedlines[ad->numlines - 1] |= markwith;
[191]940 break;
941 }
942 }
943 }
944 }
945 }
946 t = n;
947 }
948 }
[551]949 DosReleaseMutexSem(ad->ScanSem);
950 if (!ad->stopflag && firstline == ULONG_MAX) {
[191]951 DosBeep(50, 50);
[551]952 WinSetWindowText(WinWindowFromID(ad->hwndFrame,
[191]953 NEWVIEW_STATUS1),
954 GetPString(IDS_NOMATCHINGTEXT));
[771]955 DosSleep(150);//05 Aug 07 GKY 1500
[191]956 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
957 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
958 }
[551]959 else if (!ad->stopflag) {
[191]960 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
961 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
962 PostMsg(hwnd, UM_CONTAINER_FILLED,
[551]963 MPFROMLONG(firstline + 1), MPFROMLONG(firstline + 1));
[191]964 }
965 }
966 else
[551]967 DosReleaseMutexSem(ad->ScanSem);
[191]968 }
[2]969 }
970 WinDestroyMsgQueue(hmq2);
971 }
[533]972 DecrThreadUsage();
[2]973 WinTerminate(hab2);
974 }
975 DosPostEventSem(CompactSem);
976}
977
[533]978static VOID ClipboardThread(VOID * args)
[83]979{
[551]980 HWND hwnd = (HWND) args;
[191]981 HAB hab2;
982 HMQ hmq2;
[2]983 VIEWDATA *ad;
[191]984 CHAR **list;
985 USHORT cmd;
[2]986 register ULONG x;
[191]987 BOOL released = FALSE;
[2]988
989 priority_normal();
990 hab2 = WinInitialize(0);
[551]991 if (hab2) {
[191]992 hmq2 = WinCreateMsgQueue(hab2, 0);
[533]993 if (hmq2) {
[191]994 WinCancelShutdown(hmq2, TRUE);
[533]995 IncrThreadUsage();
[191]996 ad = WinQueryWindowPtr(hwnd, QWL_USER);
[551]997 if (ad) {
998 if (!DosRequestMutexSem(ad->ScanSem, SEM_INDEFINITE_WAIT)) {
999 cmd = ad->cliptype;
1000 if (ad->numlines && ad->text && ad->textsize && ad->markedlines &&
1001 !ad->stopflag) {
1002 WinSetWindowText(WinWindowFromID(ad->hwndFrame,
[191]1003 NEWVIEW_STATUS1),
1004 GetPString(IDS_BUILDINGLINELISTTEXT));
1005 if (cmd == IDM_SAVETOCLIP || cmd == IDM_APPENDTOCLIP ||
1006 cmd == IDM_SAVETOLIST)
1007 list = BuildAList(hwnd);
1008 else
1009 list = BuildAList2(hwnd);
[551]1010 if (list) {
1011 if (!ad->stopflag) {
1012 WinSetWindowText(WinWindowFromID(ad->hwndFrame,
[191]1013 NEWVIEW_STATUS1),
1014 (cmd == IDM_SAVETOCLIP ||
1015 cmd == IDM_SAVETOCLIP2) ?
1016 GetPString(IDS_SAVETOCLIPTEXT) :
1017 (cmd == IDM_APPENDTOCLIP ||
1018 cmd == IDM_APPENDTOCLIP2) ?
1019 GetPString(IDS_APPENDTOCLIPTEXT) :
1020 GetPString(IDS_WRITETOFILETEXT));
[551]1021 DosReleaseMutexSem(ad->ScanSem);
[191]1022 released = TRUE;
1023 if (cmd == IDM_SAVETOCLIP || cmd == IDM_APPENDTOCLIP ||
1024 cmd == IDM_SAVETOCLIP2 || cmd == IDM_APPENDTOCLIP2)
1025 ListToClipboardHab(hab2, list, (cmd == IDM_APPENDTOCLIP ||
1026 cmd == IDM_APPENDTOCLIP2));
[551]1027 else {
[2]1028
[191]1029 FILE *fp;
1030 CHAR filename[CCHMAXPATH];
[2]1031
[191]1032 *filename = 0;
[551]1033 if (export_filename(hwnd, filename, FALSE)) {
[191]1034 fp = _fsopen(filename, "a+", SH_DENYWR);
[350]1035 if (!fp) {
1036 saymsg(MB_CANCEL,
1037 hwnd,
1038 GetPString(IDS_ERRORTEXT),
[551]1039 GetPString(IDS_CANTOPENFORWRITETEXT), filename);
[350]1040 }
1041 else {
[191]1042 fseek(fp, 0L, SEEK_END);
1043 for (x = 0; list[x]; x++)
[551]1044 fprintf(fp, "%s\n", list[x]);
[191]1045 fclose(fp);
1046 }
1047 }
1048 }
1049 }
1050 FreeList(list);
1051 }
[551]1052 else {
1053 DosReleaseMutexSem(ad->ScanSem);
[191]1054 released = TRUE;
1055 DosBeep(50, 100);
[551]1056 WinSetWindowText(WinWindowFromID(ad->hwndFrame,
[191]1057 NEWVIEW_STATUS1),
1058 GetPString(IDS_NVNOLINESSELTEXT));
[771]1059 DosSleep(150);//05 Aug 07 GKY 1500
[191]1060 }
1061 }
1062 if (!released)
[551]1063 DosReleaseMutexSem(ad->ScanSem);
[191]1064 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
1065 }
[2]1066 }
1067 WinDestroyMsgQueue(hmq2);
1068 }
[533]1069 DecrThreadUsage();
[2]1070 WinTerminate(hab2);
1071 }
1072 DosPostEventSem(CompactSem);
1073}
1074
[533]1075static VOID ReLineThread(VOID * args)
[83]1076{
[551]1077 HWND hwnd = (HWND) args;
[191]1078 HAB hab2;
1079 HMQ hmq2;
[2]1080 VIEWDATA *ad;
[191]1081 CHAR *p, *pp, *e, *whereiam = NULL;
1082 RECTL Rectl;
1083 ULONG width, numlines, firstline = 1, cursored = 1;
[2]1084
1085 priority_normal();
1086 hab2 = WinInitialize(0);
[533]1087 if (hab2) {
[191]1088 hmq2 = WinCreateMsgQueue(hab2, 0);
[533]1089 if (hmq2) {
[191]1090 WinCancelShutdown(hmq2, TRUE);
[533]1091 IncrThreadUsage();
[812]1092 DosSleep(32);
[191]1093 ad = WinQueryWindowPtr(hwnd, QWL_USER);
[533]1094 if (ad) {
[551]1095 ad->relining = TRUE;
1096 if (!DosRequestMutexSem(ad->ScanSem, SEM_INDEFINITE_WAIT)) {
1097 ad->busy++;
1098 ad->maxx = 0;
1099 if (ad->text && ad->textsize) {
1100 if (ad->hex) {
1101 firstline = ad->topline;
1102 cursored = ad->cursored;
[191]1103 }
[551]1104 else if (ad->lines)
1105 whereiam = ad->lines[ad->cursored - 1];
1106 ad->found = 0;
1107 ad->selected = ad->numlines = ad->numalloc = 0;
1108 if (ad->lines)
1109 free(ad->lines);
1110 if (ad->markedlines)
1111 free(ad->markedlines);
1112 ad->lines = NULL;
1113 ad->markedlines = NULL;
1114 WinSetWindowText(WinWindowFromID(ad->hwndFrame,
[191]1115 NEWVIEW_STATUS1),
1116 GetPString(IDS_FORMATTINGTEXT));
[551]1117 if (!ad->hex) {
1118 if (WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX,
1119 LM_QUERYITEMCOUNT, MPVOID, MPVOID)) {
1120 WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX,
1121 LM_DELETEALL, MPVOID, MPVOID);
1122 PostMsg(ad->hwndFrame, WM_UPDATEFRAME,
[191]1123 MPFROMLONG(FCF_SIZEBORDER), MPVOID);
1124 }
1125 }
1126 WinSetFocus(HWND_DESKTOP, hwnd);
[551]1127 if (!ad->hex) {
[191]1128 WinQueryWindowRect(hwnd, &Rectl);
[551]1129 width = (Rectl.xRight - Rectl.xLeft) / ad->fattrs.lAveCharWidth;
[191]1130 numlines = NumLines(&Rectl, ad);
[551]1131 ad->oldwidth = width;
1132 p = ad->text;
1133 if (width) {
1134 while (p - ad->text < ad->textsize && !ad->stopflag) {
1135 if (ad->wrapon) {
[191]1136 e = p + (width - 1);
[551]1137 if (e - ad->text > ad->textsize)
1138 e = ad->text + ad->textsize;
[191]1139 pp = p;
[551]1140 while (pp < e) {
1141 if (*pp == '\r' || *pp == '\n') {
[191]1142 e = pp;
1143 break;
1144 }
1145 pp++;
1146 }
1147 }
[551]1148 else {
[191]1149 pp = p;
[551]1150 while (pp - ad->text < ad->textsize &&
[191]1151 *pp != '\r' && *pp != '\n')
1152 pp++;
1153 e = pp;
[551]1154 if (ad->maxx <
1155 (((e - p) + 1) * ad->fattrs.lAveCharWidth) + 1)
1156 ad->maxx = (((e - p) + 1) *
1157 ad->fattrs.lAveCharWidth) + 1;
[191]1158 }
[551]1159 if (whereiam && p >= whereiam && e <= whereiam) {
1160 cursored = firstline = ad->numlines + 1;
[191]1161 whereiam = NULL;
1162 }
1163 /* assign ad->lines[ad->numlines] */
[551]1164 if (ad->numlines + 1 > ad->numalloc) {
[2]1165
[191]1166 CHAR **temp;
[2]1167
[551]1168 temp = xrealloc(ad->lines, sizeof(CHAR *) *
1169 (ad->numalloc + 256), pszSrcFile,
1170 __LINE__);
[350]1171 if (!temp)
[191]1172 break;
[551]1173 ad->lines = temp;
1174 ad->numalloc += 256;
[191]1175 }
[551]1176 ad->lines[ad->numlines] = p;
1177 ad->numlines++;
1178 if (ad->numlines == numlines) {
[191]1179 /* display first page */
1180 register INT x;
[2]1181
[551]1182 for (x = 0; x < ad->numlines; x++) {
[191]1183 if ((LONG) (Rectl.yTop -
[812]1184 (ad->lMaxHeight * (((x + 1) -
1185 ad->topline) + 1))) < 0)
1186 break;
[551]1187 PaintLine(hwnd, ad->hps, x, 1, &Rectl);
[191]1188 }
1189 }
1190 p = e;
[551]1191 if (p - ad->text < ad->textsize) {
[191]1192 if (*p == '\r')
1193 p++;
1194 }
[551]1195 if (p - ad->text < ad->textsize) {
[191]1196 if (*p == '\n')
1197 p++;
1198 }
1199 }
1200 }
[551]1201 if (ad->numalloc != ad->numlines) {
[2]1202
[191]1203 CHAR **temp;
[2]1204
[551]1205 temp =
1206 xrealloc(ad->lines, sizeof(CHAR *) * ad->numlines,
1207 pszSrcFile, __LINE__);
1208 if (temp) {
1209 ad->lines = temp;
1210 ad->numalloc = ad->numlines;
[191]1211 }
1212 }
1213 }
[551]1214 else {
1215 ad->numlines = ad->textsize / 16;
1216 if (ad->numlines * 16 < ad->textsize)
1217 ad->numlines++;
[191]1218 }
[551]1219 if (ad->numlines) {
1220 ad->markedlines = xmalloc(ad->numlines, pszSrcFile, __LINE__);
1221 if (ad->markedlines) {
1222 memset(ad->markedlines, 0, ad->numlines);
1223 ad->selected = 0;
[191]1224 }
[551]1225 if (*ftprun && !ad->ignoreftp && strstr(ad->text, "ftp://"))
1226 ad->ftpin = TRUE;
1227 if (*httprun && !ad->ignorehttp && strstr(ad->text, "http://"))
1228 ad->httpin = TRUE;
[191]1229 }
1230 }
[551]1231 DosReleaseMutexSem(ad->ScanSem);
[191]1232 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
1233 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
[551]1234 ad->busy--;
[191]1235 }
[2]1236 }
1237 WinDestroyMsgQueue(hmq2);
1238 }
[533]1239 DecrThreadUsage();
[2]1240 WinTerminate(hab2);
1241 }
1242 DosPostEventSem(CompactSem);
[551]1243 if (ad && !ad->stopflag) {
[191]1244 PostMsg(hwnd, UM_CONTAINER_FILLED, MPFROMLONG(firstline),
1245 MPFROMLONG(cursored));
[551]1246 ad->relining = FALSE;
[2]1247 }
1248}
1249
[533]1250static VOID LoadFileThread(VOID * args)
[83]1251{
[551]1252 HWND hwnd = (HWND) args;
[191]1253 HAB hab2;
1254 HMQ hmq2;
[2]1255 VIEWDATA *ad;
[191]1256 HFILE handle;
1257 ULONG action, len;
1258 APIRET rc;
1259 BOOL error = TRUE;
[2]1260
1261 hab2 = WinInitialize(0);
[551]1262 if (hab2) {
[191]1263 hmq2 = WinCreateMsgQueue(hab2, 0);
[551]1264 if (hmq2) {
[191]1265 WinCancelShutdown(hmq2, TRUE);
[533]1266 IncrThreadUsage();
[191]1267 ad = WinQueryWindowPtr(hwnd, QWL_USER);
[551]1268 if (ad) {
1269 if (!DosRequestMutexSem(ad->ScanSem, SEM_INDEFINITE_WAIT)) {
1270 ad->busy++;
[191]1271 priority_normal();
[551]1272 if (*ad->filename) {
1273 if (ad->text)
1274 free(ad->text);
1275 if (ad->lines)
1276 free(ad->lines);
1277 if (ad->markedlines)
1278 free(ad->markedlines);
1279 ad->text = NULL;
1280 ad->lines = NULL;
1281 ad->markedlines = NULL;
1282 ad->ftpin = ad->httpin = FALSE;
1283 ad->selected = ad->numlines = ad->textsize = ad->numalloc = 0;
1284 WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX, LM_DELETEALL,
[191]1285 MPVOID, MPVOID);
[551]1286 PostMsg(ad->hwndFrame, WM_UPDATEFRAME,
[191]1287 MPFROMLONG(FCF_SIZEBORDER), MPVOID);
1288 WinSetFocus(HWND_DESKTOP, hwnd);
[551]1289 rc = DosOpen(ad->filename, &handle, &action, 0L, 0L,
1290 OPEN_ACTION_FAIL_IF_NEW | OPEN_ACTION_OPEN_IF_EXISTS,
[191]1291 OPEN_FLAGS_FAIL_ON_ERROR | OPEN_FLAGS_NOINHERIT |
1292 OPEN_FLAGS_SEQUENTIAL | OPEN_SHARE_DENYNONE |
1293 OPEN_ACCESS_READONLY, 0L);
[350]1294 if (rc) {
1295 Dos_Error(MB_CANCEL,
1296 rc,
1297 hwnd,
1298 pszSrcFile,
1299 __LINE__,
[551]1300 GetPString(IDS_COMPCANTOPENTEXT), ad->filename);
[350]1301 }
1302 else {
[191]1303 DosChgFilePtr(handle, 0L, FILE_END, &len);
1304 DosChgFilePtr(handle, 0L, FILE_BEGIN, &action);
[350]1305 if (!len) {
1306 saymsg(MB_CANCEL,
1307 hwnd,
1308 GetPString(IDS_ERRORTEXT),
[551]1309 GetPString(IDS_ZEROLENGTHTEXT), ad->filename);
[350]1310 }
1311 else {
[551]1312 ad->text = xmalloc(len + 2, pszSrcFile, __LINE__);
1313 if (ad->text) {
1314 *ad->text = 0;
1315 ad->text[len] = 0;
1316 rc = DosRead(handle, ad->text, len, &ad->textsize);
[350]1317 if (rc) {
[191]1318 Dos_Error(MB_CANCEL,
1319 rc,
1320 hwnd,
[350]1321 pszSrcFile,
[191]1322 __LINE__,
[551]1323 GetPString(IDS_ERRORREADINGTEXT), ad->filename);
1324 free(ad->text);
1325 ad->text = NULL;
1326 ad->textsize = 0;
[191]1327 }
[350]1328 else {
[551]1329 ad->text[ad->textsize] = 0;
1330 if (!ad->hex && !(ad->flags & (8 | 16)) && ad->textsize) {
[350]1331 ULONG x;
[551]1332
1333 x = min(512, ad->textsize);
1334 if (fGuessType && IsBinary(ad->text, x))
1335 ad->hex = TRUE;
[350]1336 }
[551]1337 if (ad->textsize) {
1338 if (_beginthread
1339 (ReLineThread, NULL, 524288, (PVOID) hwnd) == -1)
1340 Runtime_Error(pszSrcFile, __LINE__,
1341 GetPString(IDS_COULDNTSTARTTHREADTEXT));
[350]1342 else
[551]1343 error = FALSE;
[350]1344 }
1345 }
[191]1346 }
1347 }
1348 DosClose(handle);
1349 }
1350 }
[551]1351 ad->busy--;
1352 DosReleaseMutexSem(ad->ScanSem);
[191]1353 }
[2]1354 }
1355 WinDestroyMsgQueue(hmq2);
1356 }
[533]1357 DecrThreadUsage();
[2]1358 WinTerminate(hab2);
1359 }
[191]1360 if (error)
1361 PostMsg(hwnd, UM_CONTAINER_FILLED, MPVOID, MPVOID);
[2]1362 DosPostEventSem(CompactSem);
1363}
1364
[551]1365MRESULT EXPENTRY ViewFrameWndProc(HWND hwnd, ULONG msg, MPARAM mp1,
1366 MPARAM mp2)
[83]1367{
[191]1368 PFNWP oldproc = (PFNWP) WinQueryWindowPtr(hwnd, QWL_USER);
[2]1369
[551]1370 switch (msg) {
[191]1371 case WM_CHAR:
1372 shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT | KC_ALT | KC_CTRL));
1373 break;
[2]1374
[191]1375 case WM_CONTROL:
[551]1376 switch (SHORT1FROMMP(mp1)) {
[191]1377 case NEWVIEW_LISTBOX:
1378 return WinSendMsg(WinWindowFromID(hwnd, FID_CLIENT), UM_CONTROL,
1379 mp1, mp2);
1380 }
1381 break;
[2]1382
[191]1383 case WM_CALCFRAMERECT:
1384 {
1385 MRESULT mr;
1386 PRECTL prectl;
1387 SHORT sSelect;
[2]1388
[191]1389 mr = oldproc(hwnd, msg, mp1, mp2);
[2]1390
[191]1391 /*
1392 * Calculate the position of the client rectangle.
1393 * Otherwise, we'll see a lot of redraw when we move the
1394 * client during WM_FORMATFRAME.
1395 */
[2]1396
[551]1397 if (mr && mp2) {
[191]1398 prectl = (PRECTL) mp1;
[551]1399 prectl->yBottom += 22;
1400 prectl->yTop -= 22;
[191]1401 sSelect = (SHORT) WinSendDlgItemMsg(hwnd, NEWVIEW_LISTBOX,
1402 LM_QUERYITEMCOUNT,
1403 MPVOID, MPVOID);
1404 if (sSelect > 0)
[551]1405 prectl->yTop -= 48;
[2]1406 }
[191]1407 return mr;
1408 }
[2]1409
[191]1410 case WM_FORMATFRAME:
1411 {
1412 SHORT sCount, soldCount, sSelect;
[551]1413 PSWP pswp, pswpClient, pswpNew1, pswpNew2, pswpNew3, pswpList,
1414 pswpScroll, pswpNew4, pswpUp, pswpDn;
[2]1415
[191]1416 sCount = (SHORT) oldproc(hwnd, msg, mp1, mp2);
1417 soldCount = sCount;
[2]1418
[191]1419 /*
1420 * Reformat the frame to "squeeze" the client
1421 * and make room for status window sibling beneath
1422 */
[2]1423
[191]1424 pswp = (PSWP) mp1;
1425 {
1426 SHORT x;
[2]1427
[551]1428 for (x = 0; x < sCount; x++) {
1429 if (WinQueryWindowUShort(pswp->hwnd, QWS_ID) == FID_CLIENT) {
[191]1430 pswpClient = pswp;
1431 break;
1432 }
1433 pswp++;
1434 }
[2]1435 }
[191]1436 pswpNew1 = (PSWP) mp1 + soldCount;
1437 pswpNew2 = (PSWP) mp1 + (soldCount + 1);
1438 pswpNew3 = (PSWP) mp1 + (soldCount + 2);
1439 pswpNew4 = (PSWP) mp1 + (soldCount + 3);
1440 *pswpNew1 = *pswpClient;
[551]1441 pswpNew1->hwnd = WinWindowFromID(hwnd, NEWVIEW_STATUS1);
1442 pswpNew1->x = pswpClient->x + 2;
1443 pswpNew1->y = pswpClient->y + 2;
1444 pswpNew1->cx = (pswpClient->cx / 3) - 3;
1445 pswpNew1->cy = 20;
1446 pswpClient->y = pswpNew1->y + pswpNew1->cy + 3;
1447 pswpClient->cy = (pswpClient->cy - pswpNew1->cy) - 5;
[191]1448 *pswpNew2 = *pswpNew1;
1449 *pswpNew3 = *pswpNew1;
1450 *pswpNew4 = *pswpNew1;
[551]1451 pswpNew2->hwnd = WinWindowFromID(hwnd, NEWVIEW_STATUS2);
1452 pswpNew3->hwnd = WinWindowFromID(hwnd, NEWVIEW_STATUS3);
1453 pswpNew4->hwnd = WinWindowFromID(hwnd, NEWVIEW_DRAG);
1454 pswpNew2->x = pswpNew1->x + pswpNew1->cx + 3;
1455 pswpNew3->x = pswpNew2->x + pswpNew2->cx + 3;
1456 pswpNew3->cx = ((pswpClient->x + pswpClient->cx) - pswpNew3->x) - 26;
1457 pswpNew4->x = pswpNew3->x + pswpNew3->cx + 3;
1458 pswpNew4->cx = 20;
[191]1459 sCount += 4;
1460 pswpScroll = (PSWP) mp1;
[551]1461 while (pswpScroll < pswpClient) {
1462 if (WinQueryWindowUShort(pswpScroll->hwnd, QWS_ID) == FID_VERTSCROLL)
[191]1463 break;
1464 pswpScroll++;
1465 }
1466 if (pswpScroll == pswpClient)
1467 pswpScroll = NULL;
1468 sSelect = (SHORT) WinSendDlgItemMsg(hwnd, NEWVIEW_LISTBOX,
[551]1469 LM_QUERYITEMCOUNT, MPVOID, MPVOID);
1470 if (sSelect > 0) {
[191]1471 pswpList = (PSWP) mp1 + (soldCount + 4);
1472 *pswpList = *pswpClient;
[551]1473 pswpList->hwnd = WinWindowFromID(hwnd, NEWVIEW_LISTBOX);
1474 pswpList->x = pswpClient->x;
1475 pswpList->cx = pswpClient->cx;
1476 if (pswpScroll) {
1477 pswpList->cx += pswpScroll->cx;
1478 pswpScroll->cy -= 48;
[191]1479 }
[551]1480 pswpList->y = (pswpClient->y + pswpClient->cy) - 48;
1481 pswpList->cy = 48;
1482 pswpClient->cy -= 48;
[191]1483 sCount++;
1484 }
1485 WinShowWindow(WinWindowFromID(hwnd, NEWVIEW_LISTBOX), (sSelect > 0));
[2]1486
[551]1487 if (pswpScroll) {
[191]1488 pswpUp = (PSWP) mp1 + (soldCount + 4 + (sSelect > 0));
1489 *pswpUp = *pswpClient;
[551]1490 pswpUp->hwnd = WinWindowFromID(hwnd, IDM_PREVBLANKLINE);
1491 pswpUp->cx = pswpScroll->cx;
1492 pswpUp->x = pswpScroll->x;
1493 pswpUp->cy = WinQuerySysValue(HWND_DESKTOP, SV_CYVSCROLLARROW);
1494 pswpUp->y = (pswpScroll->y + pswpScroll->cy) - (pswpUp->cy + 1);
1495 pswpScroll->cy -= ((pswpUp->cy * 2) + 1);
[191]1496 pswpDn = (PSWP) mp1 + (soldCount + 5 + (sSelect > 0));
1497 *pswpDn = *pswpUp;
[551]1498 pswpDn->y = pswpScroll->y;
1499 pswpDn->hwnd = WinWindowFromID(hwnd, IDM_NEXTBLANKLINE);
1500 pswpScroll->y += pswpUp->cy;
[191]1501 sCount += 2;
1502 }
[551]1503 else {
[191]1504 WinShowWindow(WinWindowFromID(hwnd, IDM_PREVBLANKLINE), FALSE);
1505 WinShowWindow(WinWindowFromID(hwnd, IDM_NEXTBLANKLINE), FALSE);
1506 }
1507 return MRFROMSHORT(sCount);
1508 }
[2]1509
[191]1510 case WM_QUERYFRAMECTLCOUNT:
1511 {
1512 SHORT sCount, sSelect;
1513
1514 sCount = (SHORT) oldproc(hwnd, msg, mp1, mp2);
1515 sCount += 6;
1516 sSelect = (SHORT) WinSendDlgItemMsg(hwnd, NEWVIEW_LISTBOX,
[551]1517 LM_QUERYITEMCOUNT, MPVOID, MPVOID);
[191]1518 if (sSelect > 0)
1519 sCount++;
1520 return MRFROMSHORT(sCount);
1521 }
[2]1522 }
[191]1523 return oldproc(hwnd, msg, mp1, mp2);
[2]1524}
1525
[191]1526MRESULT EXPENTRY FindStrDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[83]1527{
[2]1528 VIEWDATA *ad;
1529
[551]1530 switch (msg) {
[191]1531 case WM_INITDLG:
1532 if (!mp2)
1533 WinDismissDlg(hwnd, 0);
[551]1534 else {
[2]1535
[191]1536 HWND hwndClient = *(HWND *) mp2;
[2]1537
[191]1538 WinSetWindowULong(hwnd, QWL_USER, (ULONG) hwndClient);
1539 ad = (VIEWDATA *) WinQueryWindowPtr(hwndClient, QWL_USER);
1540 MLEsetwrap(WinWindowFromID(hwnd, NEWFIND_MLE), FALSE);
1541 MLEsetlimit(WinWindowFromID(hwnd, NEWFIND_MLE), SEARCHSTRINGLEN);
1542 MLEsetformat(WinWindowFromID(hwnd, NEWFIND_MLE), MLFIE_NOTRANS);
[551]1543 if (*ad->searchtext) {
[2]1544
[191]1545 IPT here = 0;
[551]1546 ULONG len = strlen(ad->searchtext);
[2]1547
[191]1548 WinSendMsg(WinWindowFromID(hwnd, NEWFIND_MLE),
1549 MLM_SETIMPORTEXPORT,
[551]1550 MPFROMP(ad->searchtext), MPFROMLONG(SEARCHSTRINGLEN));
[191]1551 WinSendMsg(WinWindowFromID(hwnd, NEWFIND_MLE),
[551]1552 MLM_IMPORT, MPFROMP(&here), MPFROMLONG(len));
[2]1553 }
[551]1554 WinCheckButton(hwnd, NEWFIND_ALSOSELECT, ad->alsoselect);
1555 WinCheckButton(hwnd, NEWFIND_SENSITIVE, ad->sensitive);
1556 WinCheckButton(hwnd, NEWFIND_LITERAL, ad->literalsearch);
[191]1557 }
1558 break;
[2]1559
[191]1560 case WM_COMMAND:
[551]1561 switch (SHORT1FROMMP(mp1)) {
[191]1562 case DID_OK:
1563 {
1564 CHAR s[SEARCHSTRINGLEN];
1565 IPT here = 0;
1566 ULONG len;
1567 HWND hwndClient = WinQueryWindowULong(hwnd, QWL_USER);
[2]1568
[191]1569 ad = (VIEWDATA *) WinQueryWindowPtr(hwndClient, QWL_USER);
1570 memset(s, 0, SEARCHSTRINGLEN);
1571 WinSendMsg(WinWindowFromID(hwnd, NEWFIND_MLE),
1572 MLM_SETIMPORTEXPORT,
[551]1573 MPFROMP(s), MPFROMLONG(SEARCHSTRINGLEN));
[191]1574 len = SEARCHSTRINGLEN;
1575 WinSendMsg(WinWindowFromID(hwnd, NEWFIND_MLE),
[551]1576 MLM_EXPORT, MPFROMP(&here), MPFROMLONG(&len));
[191]1577 s[SEARCHSTRINGLEN - 1] = 0;
[551]1578 if (!*s) {
[350]1579 DosBeep(250, 100); // Complain
[191]1580 break;
1581 }
[551]1582 strcpy(ad->searchtext, s);
1583 ad->sensitive = WinQueryButtonCheckstate(hwnd, NEWFIND_SENSITIVE);
1584 if (ad->sensitive != Sensitive) {
1585 Sensitive = ad->sensitive;
[191]1586 PrfWriteProfileData(fmprof,
1587 appname,
1588 "Viewer.Sensitive",
[551]1589 &ad->sensitive, sizeof(BOOL));
[191]1590 }
[551]1591 ad->literalsearch = WinQueryButtonCheckstate(hwnd, NEWFIND_LITERAL);
1592 if (ad->literalsearch != LiteralSearch) {
1593 LiteralSearch = ad->literalsearch;
[191]1594 PrfWriteProfileData(fmprof,
1595 appname,
1596 "Viewer.LiteralSearch",
[551]1597 &ad->literalsearch, sizeof(BOOL));
[191]1598 }
[551]1599 ad->alsoselect = WinQueryButtonCheckstate(hwnd, NEWFIND_ALSOSELECT);
1600 if (ad->alsoselect != AlsoSelect) {
1601 AlsoSelect = ad->alsoselect;
[191]1602 PrfWriteProfileData(fmprof,
1603 appname,
1604 "Viewer.AlsoSelect",
[551]1605 &ad->alsoselect, sizeof(BOOL));
[191]1606 }
[2]1607 }
[191]1608 WinDismissDlg(hwnd, 1);
1609 break;
1610 case DID_CANCEL:
1611 WinDismissDlg(hwnd, 0);
1612 break;
1613 }
1614 return 0;
[2]1615 }
[191]1616 return WinDefDlgProc(hwnd, msg, mp1, mp2);
[2]1617}
1618
[191]1619MRESULT EXPENTRY ViewWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[83]1620{
[191]1621 VIEWDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER);
[2]1622
[551]1623 switch (msg) {
[191]1624 case WM_CREATE:
1625 {
1626 HWND temphwnd;
[377]1627 HWND hwndFrame = WinQueryWindow(hwnd, QW_PARENT);
[2]1628
[377]1629 temphwnd = WinCreateWindow(hwndFrame,
[191]1630 WC_BUTTON,
1631 "<",
1632 WS_VISIBLE |
1633 BS_PUSHBUTTON | BS_NOPOINTERFOCUS,
1634 0,
1635 0,
1636 0,
1637 0,
[377]1638 hwndFrame,
[551]1639 HWND_TOP, IDM_PREVBLANKLINE, NULL, NULL);
[377]1640 if (!temphwnd)
[551]1641 Win_Error2(hwndFrame, hwnd, pszSrcFile, __LINE__,
1642 IDS_WINCREATEWINDOW);
[377]1643 else {
[551]1644 WinSetPresParam(temphwnd,
1645 PP_FONTNAMESIZE,
1646 strlen(GetPString(IDS_8HELVTEXT)) + 1,
1647 (PVOID) GetPString(IDS_8HELVTEXT));
[377]1648 }
1649 temphwnd = WinCreateWindow(hwndFrame,
[191]1650 WC_BUTTON,
1651 ">",
1652 WS_VISIBLE |
1653 BS_PUSHBUTTON | BS_NOPOINTERFOCUS,
1654 0,
1655 0,
1656 0,
1657 0,
[377]1658 hwndFrame,
[551]1659 HWND_TOP, IDM_NEXTBLANKLINE, NULL, NULL);
[377]1660 if (!temphwnd)
[551]1661 Win_Error2(hwndFrame, hwnd, pszSrcFile, __LINE__,
1662 IDS_WINCREATEWINDOW);
[377]1663 else {
[551]1664 WinSetPresParam(temphwnd,
1665 PP_FONTNAMESIZE,
1666 strlen(GetPString(IDS_8HELVTEXT)) + 1,
1667 (PVOID) GetPString(IDS_8HELVTEXT));
[377]1668 }
[551]1669 WinStartTimer(WinQueryAnchorBlock(hwnd), hwnd, ID_TIMER5, 1000L);
[191]1670 }
1671 break;
[2]1672
[191]1673 case WM_TIMER:
1674 if (ad &&
[551]1675 ad->needrefreshing &&
1676 !ad->stopflag &&
1677 !ad->relining &&
1678 !DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN)) {
1679 ad->needrefreshing = FALSE;
1680 DosReleaseMutexSem(ad->ScanSem);
[191]1681 WinInvalidateRect(hwnd, NULL, TRUE);
1682 }
1683 break;
[2]1684
[191]1685 case UM_SETUP:
[377]1686 if (!ad)
[350]1687 Runtime_Error(pszSrcFile, __LINE__, "no data");
1688 else {
1689 CHAR s[CCHMAXPATH + 8];
1690 APIRET rc;
[551]1691
1692 ad->hwndMenu = WinWindowFromID(ad->hwndFrame, FID_MENU);
1693 ad->hvscroll = WinWindowFromID(ad->hwndFrame, FID_VERTSCROLL);
1694 ad->hhscroll = WinWindowFromID(ad->hwndFrame, FID_HORZSCROLL);
1695 WinSendMsg(ad->hhscroll, SBM_SETTHUMBSIZE, MPFROM2SHORT(1, 1), MPVOID);
1696 WinSendMsg(ad->hvscroll, SBM_SETTHUMBSIZE, MPFROM2SHORT(1, 1), MPVOID);
1697 sprintf(s, "%s: %s", FM2Str, ad->filename);
1698 WinSetWindowText(ad->hwndFrame, s);
1699 rc = DosCreateMutexSem(NULL, &ad->ScanSem, 0L, FALSE);
[350]1700 if (rc)
[551]1701 Dos_Error(MB_CANCEL, rc, hwnd, pszSrcFile, __LINE__,
1702 "DosCreateMutexSem");
[350]1703 else {
1704 PFNWP oldproc;
[551]1705 HWND hwndFrame = ad->hwndFrame;
1706
1707 WinSendMsg(ad->hvscroll,
1708 SBM_SETSCROLLBAR, MPFROMSHORT(1), MPFROM2SHORT(1, 1));
1709 WinSendMsg(ad->hhscroll, SBM_SETSCROLLBAR, MPFROMSHORT(1),
[191]1710 MPFROM2SHORT(1, 1));
[551]1711 ad->hwndStatus1 = WinCreateWindow(hwndFrame,
[593]1712 WC_VIEWSTATUS,
[551]1713 GetPString(IDS_LOADINGTEXT),
1714 WS_VISIBLE | SS_TEXT |
1715 DT_LEFT | DT_VCENTER,
1716 0,
1717 0,
1718 0,
1719 0,
1720 hwndFrame,
1721 HWND_TOP,
1722 NEWVIEW_STATUS1, NULL, NULL);
1723 if (!ad->hwndStatus1)
1724 Win_Error2(hwndFrame, hwnd, pszSrcFile, __LINE__,
1725 IDS_WINCREATEWINDOW);
[377]1726
[551]1727 ad->hwndStatus2 = WinCreateWindow(hwndFrame,
[593]1728 WC_VIEWSTATUS,
[551]1729 NULL,
1730 WS_VISIBLE | SS_TEXT |
1731 DT_LEFT | DT_VCENTER,
1732 0,
1733 0,
1734 0,
1735 0,
1736 hwndFrame,
1737 HWND_TOP,
1738 NEWVIEW_STATUS2, NULL, NULL);
1739 if (!ad->hwndStatus2)
1740 Win_Error2(hwndFrame, hwnd, pszSrcFile, __LINE__,
1741 IDS_WINCREATEWINDOW);
[377]1742
[551]1743 ad->hwndStatus3 = WinCreateWindow(hwndFrame,
[593]1744 WC_VIEWSTATUS,
[551]1745 NULL,
1746 WS_VISIBLE | SS_TEXT |
1747 DT_LEFT | DT_VCENTER,
1748 0,
1749 0,
1750 0,
1751 0,
1752 hwndFrame,
1753 HWND_TOP,
1754 NEWVIEW_STATUS3, NULL, NULL);
1755 if (!ad->hwndStatus3)
1756 Win_Error2(hwndFrame, hwnd, pszSrcFile, __LINE__,
1757 IDS_WINCREATEWINDOW);
[377]1758
[551]1759 ad->hwndListbox = WinCreateWindow(hwndFrame,
1760 WC_LISTBOX,
1761 NULL,
1762 LS_NOADJUSTPOS,
1763 0,
1764 0,
1765 0,
1766 0,
1767 hwndFrame,
1768 HWND_TOP,
1769 NEWVIEW_LISTBOX, NULL, NULL);
1770 if (!ad->hwndListbox)
1771 Win_Error2(hwndFrame, hwnd, pszSrcFile, __LINE__,
1772 IDS_WINCREATEWINDOW);
[377]1773
[551]1774 ad->hwndDrag = WinCreateWindow(hwndFrame,
[593]1775 WC_VIEWSTATUS,
[551]1776 "#100",
1777 WS_VISIBLE | SS_BITMAP,
1778 0,
1779 0,
1780 0,
1781 0,
1782 hwndFrame,
1783 HWND_TOP, NEWVIEW_DRAG, NULL, NULL);
1784 if (!ad->hwndDrag)
1785 Win_Error2(hwndFrame, hwnd, pszSrcFile, __LINE__,
1786 IDS_WINCREATEWINDOW);
[377]1787
1788 oldproc = WinSubclassWindow(hwndFrame, ViewFrameWndProc);
[551]1789 WinSetWindowPtr(hwndFrame, QWL_USER, (PVOID) oldproc);
1790 ad->hps = InitWindow(hwnd);
[533]1791 if (_beginthread(LoadFileThread, NULL, 524288, (PVOID) hwnd) == -1)
[551]1792 Runtime_Error(pszSrcFile, __LINE__,
1793 GetPString(IDS_COULDNTSTARTTHREADTEXT));
[350]1794 else {
1795 WinSendMsg(hwnd, UM_SETUP5, MPVOID, MPVOID);
[812]1796 DosSleep(32); //05 Aug 07 GKY 32
[551]1797 return (MRESULT) 1;
[191]1798 }
[2]1799 }
[191]1800 }
[350]1801 // Oops
[191]1802 WinDestroyWindow(WinQueryWindow(hwnd, QW_PARENT));
1803 return 0;
[2]1804
[191]1805 case UM_SETUP5:
[551]1806 if (ad) {
1807 if (ad->hwndFrame ==
1808 WinQueryActiveWindow(WinQueryWindow(ad->hwndFrame,
[191]1809 QW_PARENT)) &&
[551]1810 !ParentIsDesktop(ad->hwndFrame, (HWND) 0)) {
[191]1811 if (hwndStatus2)
1812 WinSetWindowText(hwndStatus2,
[551]1813 (*ad->filename) ?
1814 ad->filename : GetPString(IDS_UNTITLEDTEXT));
1815 if (fMoreButtons) {
[191]1816 WinSetWindowText(hwndName,
[551]1817 (*ad->filename) ?
1818 ad->filename : GetPString(IDS_UNTITLEDTEXT));
[191]1819 WinSetWindowText(hwndDate, NullStr);
1820 WinSetWindowText(hwndAttr, NullStr);
1821 }
1822 if (hwndStatus)
1823 WinSetWindowText(hwndStatus,
1824 GetPString(IDS_INTERNALVIEWERTITLETEXT));
[2]1825 }
[191]1826 }
1827 return 0;
[2]1828
[191]1829 case DM_DISCARDOBJECT:
1830 case DM_PRINTOBJECT:
1831 return MRFROMLONG(DRR_TARGET);
[2]1832
[191]1833 case UM_RESCAN:
[551]1834 if (ad) {
1835 if (!ad->busy && !DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN)) {
1836 if (ad->numlines) {
[2]1837
[191]1838 CHAR s[80], tb[34], tl[34];
[2]1839
[551]1840 commafmt(tb, sizeof(tb), ad->textsize);
1841 commafmt(tl, sizeof(tl), ad->numlines);
[191]1842 sprintf(s,
1843 " %s %s%s %s %s%s",
1844 tb,
1845 GetPString(IDS_BYTETEXT),
[551]1846 &"s"[ad->textsize == 1],
1847 tl, GetPString(IDS_LINETEXT), &"s"[ad->numlines == 1]);
1848 WinSetWindowText(ad->hwndStatus1, s);
[191]1849 }
1850 else
[551]1851 WinSetWindowText(ad->hwndStatus1, GetPString(IDS_NVNOLINESTEXT));
1852 DosReleaseMutexSem(ad->ScanSem);
[2]1853 }
[191]1854 else
[551]1855 WinSetWindowText(ad->hwndStatus1, GetPString(IDS_WORKINGTEXT));
[191]1856 }
1857 return 0;
[2]1858
[191]1859 case UM_SETUP2:
1860 /*
1861 * calculate width of client in characters, recalc lines if
1862 * oldwidth != newwidth, set ad->oldwidth for later comparison
1863 */
[551]1864 if (ad) {
[2]1865
[191]1866 BOOL invalidate = FALSE;
[2]1867
[551]1868 if (!ad->wrapon && !ad->hex) {
1869 if (WinQueryWindow(ad->hhscroll, QW_PARENT) == ad->hwndFrame) {
[191]1870 invalidate = TRUE;
[551]1871 WinSetOwner(ad->hhscroll, HWND_OBJECT);
1872 WinSetParent(ad->hhscroll, HWND_OBJECT, TRUE);
1873 ad->maxx = 0;
1874 ad->horzscroll = 0;
[191]1875 }
[2]1876 }
[551]1877 else {
1878 if (WinQueryWindow(ad->hhscroll, QW_PARENT) != ad->hwndFrame) {
[191]1879 invalidate = TRUE;
[551]1880 WinSetOwner(ad->hhscroll, ad->hwndFrame);
1881 WinSetParent(ad->hhscroll, ad->hwndFrame, TRUE);
[191]1882 }
1883 }
[551]1884 if (invalidate) {
1885 WinSendMsg(ad->hwndFrame, WM_UPDATEFRAME, MPFROMLONG(FCF_SIZEBORDER),
[191]1886 MPVOID);
1887 WinInvalidateRect(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
1888 NEWVIEW_DRAG), NULL, FALSE);
[551]1889 WinInvalidateRect(ad->hhscroll, NULL, FALSE);
[191]1890 }
1891 }
[2]1892
[551]1893 if (ad && !ad->busy &&
1894 !DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN)) {
[2]1895
[191]1896 RECTL rcl;
1897 ULONG newwidth;
[2]1898
[191]1899 WinQueryWindowRect(hwnd, &rcl);
[551]1900 newwidth = (rcl.xRight - rcl.xLeft) / ad->fattrs.lAveCharWidth;
1901 if ((!ad->hex || ad->oldwidth == -1) &&
1902 newwidth != ad->oldwidth && ad->text && ad->textsize) {
1903 ad->oldwidth = newwidth;
1904 if (!ad->relining) {
1905 if (_beginthread(ReLineThread, NULL, 524288, (PVOID) hwnd) == -1) {
1906 Runtime_Error(pszSrcFile, __LINE__,
1907 GetPString(IDS_COULDNTSTARTTHREADTEXT));
1908 DosReleaseMutexSem(ad->ScanSem);
[191]1909 WinDestroyWindow(WinQueryWindow(hwnd, QW_PARENT));
1910 return 0;
1911 }
1912 }
[2]1913 }
[551]1914 ad->oldwidth = newwidth;
1915 DosReleaseMutexSem(ad->ScanSem);
[191]1916 }
1917 return MRFROMLONG(TRUE);
[2]1918
[191]1919 case WM_CHAR:
1920 shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT | KC_ALT | KC_CTRL));
[551]1921 if (ad && !ad->busy && !(SHORT1FROMMP(mp1) & KC_KEYUP) &&
1922 !DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN)) {
[2]1923
[551]1924 ULONG numlines, wascursored = ad->cursored;
[191]1925 RECTL rcl;
[2]1926
[191]1927 WinQueryWindowRect(hwnd, &rcl);
1928 numlines = NumLines(&rcl, ad);
[551]1929 if (numlines) {
1930 if (SHORT1FROMMP(mp1) & KC_VIRTUALKEY) {
1931 switch (SHORT2FROMMP(mp2)) {
[191]1932 case VK_LEFT:
1933 WinSendMsg(hwnd, WM_HSCROLL, MPFROM2SHORT(FID_HORZSCROLL, 0),
1934 MPFROM2SHORT(0, SB_LINELEFT));
1935 break;
1936 case VK_RIGHT:
1937 WinSendMsg(hwnd, WM_HSCROLL, MPFROM2SHORT(FID_HORZSCROLL, 0),
1938 MPFROM2SHORT(0, SB_LINERIGHT));
1939 break;
1940 case VK_PAGEUP:
1941 PostMsg(hwnd, WM_VSCROLL, MPFROM2SHORT(FID_VERTSCROLL, 0),
1942 MPFROM2SHORT(0, SB_PAGEUP));
1943 break;
1944 case VK_PAGEDOWN:
1945 PostMsg(hwnd, WM_VSCROLL, MPFROM2SHORT(FID_VERTSCROLL, 0),
1946 MPFROM2SHORT(0, SB_PAGEDOWN));
1947 break;
1948 case VK_UP:
[551]1949 if (ad->cursored > 1) {
[191]1950 if (shiftstate & KC_SHIFT)
1951 WinSendMsg(hwnd, WM_BUTTON1CLICK,
[551]1952 MPFROM2SHORT(ad->fattrs.lAveCharWidth + 2,
1953 ((rcl.yTop - (ad->lMaxHeight *
1954 ((ad->cursored) -
1955 ad->topline))) -
1956 ad->lMaxDescender) - 1),
[191]1957 MPFROM2SHORT(TRUE, 0));
[551]1958 ad->cursored--;
1959 if (ad->cursored < ad->topline) {
1960 PaintLine(hwnd, ad->hps, ad->cursored, ad->topline, &rcl);
[191]1961 WinSendMsg(hwnd, WM_VSCROLL, MPFROM2SHORT(FID_VERTSCROLL, 0),
1962 MPFROM2SHORT(0, SB_LINEUP));
1963 }
[551]1964 else {
1965 PaintLine(hwnd, ad->hps, ad->cursored - 1, ad->topline, &rcl);
1966 PaintLine(hwnd, ad->hps, ad->cursored, ad->topline, &rcl);
[191]1967 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
1968 }
1969 }
1970 break;
1971 case VK_DOWN:
[551]1972 if (ad->cursored < ad->numlines &&
1973 ad->cursored < ad->topline + numlines) {
[191]1974 if (shiftstate & KC_SHIFT)
1975 WinSendMsg(hwnd, WM_BUTTON1CLICK,
[551]1976 MPFROM2SHORT(ad->fattrs.lAveCharWidth + 2,
1977 ((rcl.yTop - (ad->lMaxHeight *
1978 ((ad->cursored) -
1979 ad->topline))) -
1980 ad->lMaxDescender) - 1),
[191]1981 MPFROM2SHORT(TRUE, 0));
[551]1982 ad->cursored++;
1983 if (ad->cursored >= ad->topline + numlines) {
1984 PaintLine(hwnd, ad->hps, ad->cursored - 2, ad->topline, &rcl);
[191]1985 WinSendMsg(hwnd, WM_VSCROLL, MPFROM2SHORT(FID_VERTSCROLL, 0),
1986 MPFROM2SHORT(0, SB_LINEDOWN));
1987 }
[551]1988 else {
1989 PaintLine(hwnd, ad->hps, ad->cursored - 1, ad->topline, &rcl);
1990 PaintLine(hwnd, ad->hps, ad->cursored - 2, ad->topline, &rcl);
[191]1991 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
1992 }
1993 }
1994 break;
1995 case VK_END:
1996 if ((shiftstate & KC_CTRL) ||
[551]1997 ad->cursored == (ad->topline - 1) + numlines) {
1998 ad->cursored = ad->numlines;
1999 ad->topline = (ad->numlines + 1) - numlines;
2000 if (ad->topline > ad->numlines)
2001 ad->topline = 1;
[191]2002 WinInvalidateRect(hwnd, NULL, FALSE);
2003 }
[551]2004 else {
2005 ad->cursored = (ad->topline - 1) + numlines;
2006 if (ad->cursored > ad->numlines)
2007 ad->cursored = ad->numlines;
2008 PaintLine(hwnd, ad->hps, ad->cursored - 1, ad->topline, &rcl);
2009 PaintLine(hwnd, ad->hps, wascursored - 1, ad->topline, &rcl);
[191]2010 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
2011 }
2012 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
2013 break;
2014 case VK_HOME:
[551]2015 if ((shiftstate & KC_CTRL) || ad->cursored == ad->topline) {
2016 ad->topline = 1;
2017 ad->cursored = 1;
[191]2018 WinInvalidateRect(hwnd, NULL, FALSE);
2019 }
[551]2020 else {
2021 ad->cursored = ad->topline;
2022 PaintLine(hwnd, ad->hps, ad->cursored - 1, ad->topline, &rcl);
2023 PaintLine(hwnd, ad->hps, wascursored - 1, ad->topline, &rcl);
[191]2024 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
2025 }
2026 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
2027 break;
2028 case VK_SPACE:
2029 WinSendMsg(hwnd, WM_BUTTON1CLICK,
[551]2030 MPFROM2SHORT(ad->fattrs.lAveCharWidth + 2,
2031 ((rcl.yTop - (ad->lMaxHeight *
2032 ((ad->cursored) -
2033 ad->topline))) -
2034 ad->lMaxDescender) - 1),
[191]2035 MPFROM2SHORT(TRUE, 0));
2036 break;
2037 case VK_NEWLINE:
2038 case VK_ENTER:
2039 WinSendMsg(hwnd, WM_BUTTON1DBLCLK,
[551]2040 MPFROM2SHORT(ad->fattrs.lAveCharWidth + 2,
2041 ((rcl.yTop - (ad->lMaxHeight *
2042 ((ad->cursored) -
2043 ad->topline))) -
2044 ad->lMaxDescender) - 1), MPFROM2SHORT(0,
2045 0));
[191]2046 break;
2047 }
2048 }
[551]2049 else if (SHORT1FROMMP(mp1) & KC_CHAR) {
2050 switch (SHORT1FROMMP(mp2)) {
[191]2051 case '\r':
2052 case '\n':
2053 WinSendMsg(hwnd, WM_BUTTON1DBLCLK,
[551]2054 MPFROM2SHORT(ad->fattrs.lAveCharWidth + 2,
2055 (rcl.yTop - (ad->lMaxHeight *
2056 ((ad->cursored) -
2057 ad->topline))) - 1),
[191]2058 MPFROM2SHORT(0, 0));
2059 break;
2060 default:
2061 break;
2062 }
2063 }
[551]2064 if (wascursored != ad->cursored)
[191]2065 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
[2]2066 }
[551]2067 DosReleaseMutexSem(ad->ScanSem);
[191]2068 }
2069 break;
[2]2070
[191]2071 case WM_BUTTON1MOTIONSTART:
2072 WinSetFocus(HWND_DESKTOP, hwnd);
[551]2073 if (ad && !ad->stopflag && !ad->busy &&
2074 !DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN)) {
2075 ad->mousecaptured = TRUE;
2076 ad->lastselected = ULONG_MAX;
2077 ad->lastdirection = 0;
[191]2078 WinSetCapture(HWND_DESKTOP, hwnd);
2079 WinSendMsg(hwnd, WM_BUTTON1CLICK, mp1, MPFROM2SHORT(TRUE, 0));
2080 }
2081 break;
[2]2082
[191]2083 case WM_MOUSEMOVE:
2084 shiftstate = (SHORT2FROMMP(mp2) & (KC_SHIFT | KC_ALT | KC_CTRL));
[551]2085 if (ad && ad->mousecaptured) {
[2]2086
[191]2087 ULONG numlines, whichline, x;
2088 LONG inc;
2089 RECTL Rectl;
2090 POINTS pts;
2091 BOOL outofwindow = FALSE;
[2]2092
[191]2093 WinQueryWindowRect(hwnd, &Rectl);
2094 numlines = NumLines(&Rectl, ad);
[551]2095 if (numlines) {
[191]2096 pts.x = SHORT1FROMMP(mp1);
2097 pts.y = SHORT2FROMMP(mp1);
[551]2098 if (pts.y < 0) {
[191]2099 WinSendMsg(hwnd, WM_VSCROLL, MPFROM2SHORT(FID_VERTSCROLL, 0),
2100 MPFROM2SHORT(0, SB_LINEDOWN));
2101 pts.y = 1;
2102 outofwindow = TRUE;
2103 }
[551]2104 else if (pts.y > Rectl.yTop - Rectl.yBottom) {
[191]2105 WinSendMsg(hwnd, WM_VSCROLL, MPFROM2SHORT(FID_VERTSCROLL, 0),
2106 MPFROM2SHORT(0, SB_LINEUP));
2107 pts.y = (Rectl.yTop - Rectl.yBottom) - 1;
2108 outofwindow = TRUE;
2109 }
2110 whichline = ((Rectl.yTop - Rectl.yBottom) -
[551]2111 ((LONG) pts.y + ad->lMaxDescender)) / ad->lMaxHeight;
[191]2112 if (whichline > numlines - 1)
2113 whichline = numlines - 1;
[551]2114 whichline += (ad->topline - 1);
2115 if (whichline < ad->numlines && ad->lastselected != whichline) {
2116 if (ad->lastselected != ULONG_MAX) {
2117 inc = (ad->lastselected < whichline) ? 1 : -1;
2118 for (x = ad->lastselected + inc;
2119 x != whichline && x < ad->numlines;
2120 (ad->lastselected < whichline) ? x++ : x--) {
2121 if (ad->markedlines) {
2122 if (ad->markedlines[x] & VF_SELECTED) {
2123 ad->markedlines[x] &= (~VF_SELECTED);
2124 ad->selected--;
[191]2125 }
[551]2126 else {
2127 ad->markedlines[x] |= VF_SELECTED;
2128 ad->selected++;
[191]2129 }
2130 }
[551]2131 PaintLine(hwnd, ad->hps, x, ad->topline, &Rectl);
[191]2132 }
2133 WinSendMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
2134 }
2135 WinSendMsg(hwnd, WM_BUTTON1CLICK, MPFROM2SHORT(pts.x, pts.y),
2136 MPFROM2SHORT(TRUE, 0));
2137 }
2138 }
[551]2139 if (outofwindow) {
[2]2140
[191]2141 POINTL ptl;
[2]2142
[191]2143 WinQueryPointerPos(HWND_DESKTOP, &ptl);
2144 WinMapWindowPoints(HWND_DESKTOP, hwnd, &ptl, 1L);
2145 if ((SHORT) ptl.y == (SHORT) SHORT2FROMMP(mp1) &&
2146 (SHORT) ptl.x == (SHORT) SHORT1FROMMP(mp1) &&
[551]2147 ((SHORT) ptl.y < 0 || ptl.y > (Rectl.yTop - Rectl.yBottom))) {
[191]2148 PostMsg(hwnd, UM_MOUSEMOVE, mp1, MPVOID);
[771]2149 DosSleep(1);
[191]2150 }
[2]2151 }
[191]2152 }
2153 break;
[2]2154
[191]2155 case UM_MOUSEMOVE:
[551]2156 if (ad && ad->mousecaptured) {
[2]2157
[191]2158 POINTL ptl;
2159 RECTL Rectl;
[2]2160
[191]2161 WinQueryWindowRect(hwnd, &Rectl);
2162 WinQueryPointerPos(HWND_DESKTOP, &ptl);
[771]2163 WinMapWindowPoints(HWND_DESKTOP, hwnd, &ptl, 1);
[191]2164 if ((SHORT) ptl.y == (SHORT) SHORT2FROMMP(mp1) &&
2165 (SHORT) ptl.x == (SHORT) SHORT1FROMMP(mp1) &&
[551]2166 ((SHORT) ptl.y < 0 || ptl.y > (Rectl.yTop - Rectl.yBottom))) {
[771]2167 DosSleep(1);
[191]2168 PostMsg(hwnd, WM_MOUSEMOVE, mp1, MPFROM2SHORT(TRUE, 0));
[2]2169 }
[191]2170 }
2171 return 0;
[2]2172
[191]2173 case WM_BUTTON1UP:
2174 case WM_BUTTON1MOTIONEND:
2175 WinSetFocus(HWND_DESKTOP, hwnd);
[551]2176 if (ad && ad->mousecaptured) {
2177 ad->mousecaptured = FALSE;
2178 ad->lastselected = ULONG_MAX;
2179 ad->lastdirection = 0;
2180 DosReleaseMutexSem(ad->ScanSem);
[191]2181 WinSetCapture(HWND_DESKTOP, NULLHANDLE);
2182 }
2183 break;
[2]2184
[191]2185 case WM_BUTTON1DBLCLK:
2186 case WM_BUTTON1CLICK:
2187 WinSetFocus(HWND_DESKTOP, hwnd);
[551]2188 if (ad && !ad->stopflag && ad->numlines && ad->text && !ad->busy &&
2189 !DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN)) {
[2]2190
[191]2191 ULONG numlines, whichline, wascursored, width;
2192 RECTL Rectl;
2193 POINTS pts;
[2]2194
[191]2195 WinQueryWindowRect(hwnd, &Rectl);
2196 numlines = NumLines(&Rectl, ad);
2197 if (!numlines)
2198 break;
2199 pts.x = SHORT1FROMMP(mp1);
2200 pts.y = SHORT2FROMMP(mp1);
2201 whichline = ((Rectl.yTop - Rectl.yBottom) -
[551]2202 ((LONG) pts.y + ad->lMaxDescender)) / ad->lMaxHeight;
[191]2203 if (whichline > numlines - 1)
2204 whichline = numlines - 1;
[551]2205 whichline += (ad->topline - 1);
2206 if (whichline + 1 > ad->numlines)
[191]2207 break;
[551]2208 wascursored = ad->cursored;
2209 ad->cursored = whichline + 1;
2210 if (msg == WM_BUTTON1CLICK) {
2211 if (ad->lastselected != ULONG_MAX) {
2212 if (whichline > ad->lastselected)
2213 ad->lastdirection = 1;
[191]2214 else
[551]2215 ad->lastdirection = 2;
[191]2216 }
2217 else
[551]2218 ad->lastdirection = 0;
2219 ad->lastselected = whichline;
2220 if (whichline < ad->numlines) {
2221 if (ad->markedlines) {
2222 if (ad->markedlines[whichline] & VF_SELECTED) {
2223 ad->selected--;
2224 ad->markedlines[whichline] &= (~VF_SELECTED);
[191]2225 }
[551]2226 else {
2227 ad->selected++;
2228 ad->markedlines[whichline] |= VF_SELECTED;
[191]2229 }
2230 }
2231 WinSendMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
2232 }
[551]2233 PaintLine(hwnd, ad->hps, whichline, ad->topline, &Rectl);
2234 if (ad->cursored != wascursored) {
2235 PaintLine(hwnd, ad->hps, wascursored - 1, ad->topline, &Rectl);
[191]2236 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
2237 }
2238 }
[551]2239 else {
[2]2240
[191]2241 SHORT numsels, sSelect = 0, numinserted;
2242 ULONG linenum;
[2]2243
[551]2244 if (!ad->hex && ad->lines) {
[2]2245
[191]2246 CHAR *p, *e;
[2]2247
[551]2248 width = (Rectl.xRight - Rectl.xLeft) / ad->fattrs.lAveCharWidth;
2249 e = p = ad->lines[whichline];
2250 while (*e != '\r' && *e != '\n' && e < ad->text + ad->textsize) {
2251 if (ad->wrapon && e - p == width)
[191]2252 break;
2253 e++;
2254 }
2255 if ((*e == '\r' || *e == '\n') && e > p)
2256 e--;
2257 width = e - p;
2258 if (!width)
2259 goto NoAdd;
[2]2260
[551]2261 if ((ad->httpin && *httprun &&
2262 strnstr(ad->lines[whichline], "http://", width)) ||
2263 (ad->ftpin && *ftprun &&
2264 strnstr(ad->lines[whichline], "ftp://", width))) {
[2]2265
[191]2266 USHORT ret;
2267 URLDATA *urld;
[2]2268
[551]2269 urld = xmallocz(sizeof(URLDATA), pszSrcFile, __LINE__);
[350]2270 if (urld) {
[551]2271 urld->size = sizeof(URLDATA);
2272 urld->line = ad->lines[whichline];
2273 urld->len = width;
[191]2274 ret = (USHORT) WinDlgBox(HWND_DESKTOP, hwnd, UrlDlgProc,
2275 FM3ModHandle, URL_FRAME, urld);
[350]2276 switch (ret) {
[191]2277 case 0:
2278 free(urld);
2279 goto NoAdd;
2280 case 1:
[551]2281 if (*urld->url)
[191]2282 runemf2(SEPARATE | WINDOWED,
[551]2283 hwnd, NULL, NULL, "%s %s", httprun, urld->url);
[191]2284 free(urld);
2285 goto NoAdd;
2286 case 2:
[551]2287 if (*urld->url)
[191]2288 runemf2(SEPARATE | WINDOWED,
[551]2289 hwnd, NULL, NULL, "%s %s", ftprun, urld->url);
[191]2290 free(urld);
2291 goto NoAdd;
2292 default:
2293 break;
2294 }
2295 free(urld);
2296 }
2297 }
2298 }
[551]2299 numsels = (SHORT) WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX,
2300 LM_QUERYITEMCOUNT, MPVOID,
2301 MPVOID);
2302 if (numsels > 0) {
2303 for (sSelect = 0; sSelect < numsels; sSelect++) {
2304 linenum =
2305 (ULONG) WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX,
2306 LM_QUERYITEMHANDLE,
2307 MPFROM2SHORT(sSelect, 0), MPVOID);
[191]2308 if (linenum == whichline)
2309 goto NoAdd;
2310 }
2311 }
2312 {
2313 CHAR *s = NULL, *p;
[2]2314
[551]2315 if (!ad->hex && ad->lines) {
2316 s = xmalloc(width + 2, pszSrcFile, __LINE__);
[191]2317 if (!s)
2318 goto NoAdd;
[551]2319 strncpy(s, ad->lines[whichline], width + 1);
[191]2320 s[width + 1] = 0;
2321 p = s;
[551]2322 while (*p) {
2323 if (*p == '\r' || *p == '\n') {
[191]2324 *p = 0;
2325 break;
2326 }
2327 p++;
2328 }
2329 }
[551]2330 else {
[2]2331
[191]2332 register ULONG x;
[2]2333
[551]2334 width = ad->textsize - (whichline * 16);
[191]2335 width = min(width, 16);
[551]2336 s = xmalloc(80, pszSrcFile, __LINE__);
[191]2337 if (!s)
2338 goto NoAdd;
2339 sprintf(s, "%08lx ", whichline * 16);
2340 p = s + 9;
[551]2341 for (x = 0; x < width; x++) {
2342 sprintf(p, " %02hx", ad->text[(whichline * 16) + x]);
[191]2343 p += 3;
2344 }
2345 *p = ' ';
2346 p++;
2347 *p = ' ';
2348 p++;
[551]2349 for (x = 0; x < width; x++) {
2350 *p = ad->text[(whichline * 16) + x];
[191]2351 p++;
2352 }
2353 *p = 0;
2354 }
[551]2355 if (s) {
2356 if (*s) {
2357 ad->dummy = TRUE;
2358 numinserted = (SHORT) WinSendDlgItemMsg(ad->hwndFrame,
[191]2359 NEWVIEW_LISTBOX,
2360 LM_INSERTITEM,
[551]2361 MPFROM2SHORT(LIT_END,
2362 0),
[191]2363 MPFROMP(s));
[551]2364 ad->dummy = FALSE;
[191]2365 if (numinserted >= 0)
[551]2366 WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX,
[191]2367 LM_SETITEMHANDLE,
2368 MPFROM2SHORT(numinserted, 0),
2369 MPFROMLONG(whichline));
2370 }
2371 free(s);
2372 }
2373 }
2374 if (!numsels)
[551]2375 WinSendMsg(ad->hwndFrame, WM_UPDATEFRAME,
[191]2376 MPFROMLONG(FCF_SIZEBORDER), MPVOID);
[2]2377 }
[191]2378 NoAdd:
[551]2379 DosReleaseMutexSem(ad->ScanSem);
[191]2380 DosPostEventSem(CompactSem);
2381 }
2382 break;
[2]2383
[191]2384 case WM_MENUEND:
[551]2385 if (ad && ad->hwndPopup == (HWND) mp2) {
2386 WinDestroyWindow(ad->hwndPopup);
2387 ad->hwndPopup = (HWND) 0;
[191]2388 }
2389 break;
2390
2391 case UM_CONTEXTMENU:
2392 case WM_CONTEXTMENU:
[551]2393 if (ad) {
2394 if (!ad->hwndPopup) {
2395 ad->hwndPopup =
2396 WinLoadMenu(HWND_DESKTOP, FM3ModHandle, NEWVIEW_POPUP);
2397 if (ad->hwndPopup)
2398 WinSetPresParam(ad->hwndPopup,
[191]2399 PP_FONTNAMESIZE,
2400 strlen(GetPString(IDS_8HELVTEXT)) + 1,
2401 GetPString(IDS_8HELVTEXT));
[2]2402 }
[551]2403 if (ad->hwndPopup) {
[2]2404
[191]2405 APIRET rc;
2406 SHORT sSelect;
[2]2407
[551]2408 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
2409 WinEnableMenuItem(ad->hwndPopup, IDM_SAVETOCLIP, (rc == 0 &&
2410 ad->selected != 0));
2411 WinEnableMenuItem(ad->hwndPopup, IDM_APPENDTOCLIP, (rc == 0 &&
2412 ad->selected !=
2413 0));
2414 WinEnableMenuItem(ad->hwndPopup, IDM_SAVETOLIST,
2415 (rc == 0 && ad->selected != 0));
2416 sSelect =
2417 (SHORT) WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX,
2418 LM_QUERYITEMCOUNT, MPVOID, MPVOID);
2419 WinEnableMenuItem(ad->hwndPopup, IDM_SAVETOCLIP2,
2420 (rc == 0 && sSelect > 0));
2421 WinEnableMenuItem(ad->hwndPopup, IDM_APPENDTOCLIP2,
2422 (rc == 0 && sSelect > 0));
2423 WinEnableMenuItem(ad->hwndPopup, IDM_SAVETOLIST2,
2424 (rc == 0 && sSelect > 0));
2425 WinEnableMenuItem(ad->hwndPopup, IDM_SELECTALL,
2426 (rc == 0 && ad->numlines != 0 && ad->markedlines));
2427 WinEnableMenuItem(ad->hwndPopup, IDM_DESELECTALL,
2428 (rc == 0 && ad->numlines != 0 && ad->markedlines
2429 && ad->selected != 0));
2430 WinEnableMenuItem(ad->hwndPopup, IDM_PREVSELECTED,
2431 (rc == 0 && ad->numlines != 0 && ad->markedlines
2432 && ad->selected != 0));
2433 WinEnableMenuItem(ad->hwndPopup, IDM_NEXTSELECTED,
2434 (rc == 0 && ad->numlines != 0 && ad->markedlines
2435 && ad->selected != 0));
2436 WinEnableMenuItem(ad->hwndPopup, IDM_SELECTFOUND,
2437 (rc == 0 && ad->numlines != 0 && ad->markedlines
2438 && ad->found != 0));
2439 WinEnableMenuItem(ad->hwndPopup, IDM_DESELECTFOUND,
2440 (rc == 0 && ad->numlines != 0 && ad->markedlines
2441 && ad->selected != 0 && ad->found != 0));
2442 WinEnableMenuItem(ad->hwndPopup, IDM_INVERT,
2443 (rc == 0 && ad->numlines != 0 && ad->markedlines));
2444 WinEnableMenuItem(ad->hwndPopup, IDM_FINDFIRST,
2445 (rc == 0 && ad->numlines != 0 && ad->markedlines));
2446 WinEnableMenuItem(ad->hwndPopup, IDM_FINDNEXT,
2447 (rc == 0 && ad->numlines != 0 && ad->markedlines
2448 && ad->found));
2449 WinEnableMenuItem(ad->hwndPopup, IDM_FINDPREV,
2450 (rc == 0 && ad->numlines != 0 && ad->markedlines
2451 && ad->found));
2452 WinEnableMenuItem(ad->hwndPopup, IDM_GOTOLINE,
2453 (rc == 0 && ad->numlines != 0));
2454 WinEnableMenuItem(ad->hwndPopup, IDM_GOTOOFFSET,
2455 (rc == 0 && ad->textsize != 0));
[191]2456 if (!rc)
[551]2457 DosReleaseMutexSem(ad->ScanSem);
2458 PopupMenu(hwnd, hwnd, ad->hwndPopup);
[2]2459 }
[191]2460 }
2461 break;
[2]2462
[191]2463 case UM_SETUP3:
[551]2464 if (ad && !ad->busy &&
2465 !DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN)) {
2466 ad->multiplier = ad->numlines / 32767;
2467 if (ad->multiplier * 32767 != ad->numlines)
2468 ad->multiplier++;
2469 if (!ad->multiplier)
2470 ad->multiplier++;
[191]2471 {
2472 RECTL Rectl;
2473 ULONG numlines;
[2]2474
[191]2475 WinQueryWindowRect(hwnd, &Rectl);
2476 numlines = NumLines(&Rectl, ad);
[551]2477 if (numlines) {
2478 WinSendMsg(ad->hhscroll, SBM_SETTHUMBSIZE,
2479 MPFROM2SHORT((SHORT) Rectl.xRight, (SHORT) ad->maxx),
[191]2480 MPVOID);
[551]2481 WinSendMsg(ad->hvscroll, SBM_SETTHUMBSIZE,
[191]2482 MPFROM2SHORT((SHORT) numlines,
[551]2483 (SHORT) min(ad->numlines, 32767)), MPVOID);
2484 if (ad->multiplier)
2485 WinSendMsg(ad->hvscroll, SBM_SETSCROLLBAR,
2486 MPFROMSHORT((SHORT) (ad->topline / ad->multiplier)),
2487 MPFROM2SHORT(1, (SHORT) ((ad->numlines + 1) /
2488 ad->multiplier) - numlines));
2489 WinSendMsg(ad->hhscroll, SBM_SETSCROLLBAR,
2490 MPFROMSHORT((SHORT) abs(ad->horzscroll)),
2491 MPFROM2SHORT(0, (SHORT) (ad->maxx - Rectl.xRight)));
2492 if (ad->numlines - ad->topline < numlines) {
2493 ad->topline = ((ad->numlines - ad->topline) - numlines);
[191]2494 WinInvalidateRect(hwnd, NULL, FALSE);
2495 }
2496 }
[2]2497 }
[551]2498 DosReleaseMutexSem(ad->ScanSem);
[191]2499 }
2500 return 0;
[2]2501
[191]2502 case UM_SETUP4:
[551]2503 if (ad && !ad->busy &&
2504 !DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN)) {
[2]2505
[191]2506 CHAR s[140], t[34];
2507 ULONG numlines;
2508 RECTL Rectl;
[2]2509
[191]2510 WinQueryWindowRect(hwnd, &Rectl);
2511 numlines = NumLines(&Rectl, ad);
[551]2512 commafmt(t, sizeof(t), ad->cursored);
[191]2513 strcpy(s, GetPString(IDS_LINECOLONTEXT));
2514 strcat(s, t);
[551]2515 if (ad->selected) {
2516 if (ad->selected > ad->numlines)
2517 ad->selected = 0;
2518 else {
2519 commafmt(t, sizeof(t), ad->selected);
[191]2520 strcat(s, " (");
2521 strcat(s, t);
2522 strcat(s, GetPString(IDS_SELECTEDPARENTEXT));
2523 }
[2]2524 }
[551]2525 if (ad->found) {
2526 if (ad->found > ad->numlines)
2527 ad->found = 0;
2528 else {
2529 commafmt(t, sizeof(t), ad->found);
[191]2530 strcat(s, " (");
2531 strcat(s, t);
2532 strcat(s, GetPString(IDS_FOUNDPARENTEXT));
2533 }
2534 }
[551]2535 WinSetWindowText(ad->hwndStatus2, s);
2536 if (!ad->hex && ad->lines)
2537 commafmt(t, sizeof(t), ad->lines[ad->cursored - 1] - ad->text);
[191]2538 else
[551]2539 commafmt(t, sizeof(t), (ad->cursored - 1) * 16);
[191]2540 strcpy(s, GetPString(IDS_OFFSETCOLONTEXT));
2541 strcat(s, t);
[551]2542 WinSetWindowText(ad->hwndStatus3, s);
2543 if (ad->multiplier)
2544 WinSendMsg(ad->hvscroll, SBM_SETSCROLLBAR,
2545 MPFROMSHORT((SHORT) (ad->topline / ad->multiplier)),
2546 MPFROM2SHORT(1, (SHORT) ((ad->numlines + 1) /
2547 ad->multiplier) - numlines));
2548 WinSendMsg(ad->hhscroll, SBM_SETSCROLLBAR,
2549 MPFROMSHORT((SHORT) abs(ad->horzscroll)),
2550 MPFROM2SHORT(0, (SHORT) (ad->maxx - Rectl.xRight)));
2551 DosReleaseMutexSem(ad->ScanSem);
[191]2552 }
2553 return 0;
[2]2554
[191]2555 case UM_CONTAINER_FILLED:
[551]2556 if (ad && !ad->busy &&
2557 !DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN)) {
2558 ad->stopflag = 0;
2559 ad->topline = 1;
2560 ad->cursored = 1;
2561 ad->multiplier = 1;
[191]2562 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
2563 WinEnableWindow(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
[551]2564 IDM_NEXTBLANKLINE), !ad->hex);
[191]2565 WinEnableWindow(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
[551]2566 IDM_PREVBLANKLINE), !ad->hex);
2567 if (!ad->numlines) {
2568 if (!ad->text)
2569 Runtime_Error(pszSrcFile, __LINE__, "no data");
[191]2570 PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
2571 }
[551]2572 else {
2573 if (mp1 && (ULONG) mp1 < ad->numlines + 1) {
[2]2574
[191]2575 RECTL Rectl;
2576 ULONG numlines;
[2]2577
[191]2578 WinQueryWindowRect(hwnd, &Rectl);
2579 numlines = NumLines(&Rectl, ad);
[551]2580 if (numlines) {
2581 ad->topline = (ULONG) mp1;
2582 if (ad->numlines - ad->topline < numlines)
2583 ad->topline = ad->numlines - numlines;
2584 ad->cursored = (ULONG) mp1;
2585 if (mp2) {
2586 ad->cursored = (ULONG) mp2;
2587 if (ad->cursored > (ad->topline - 1) + numlines)
2588 ad->cursored = (ad->topline - 1) + numlines;
[191]2589 }
2590 }
2591 }
2592 WinSendMsg(hwnd, UM_SETUP3, MPVOID, MPVOID);
2593 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
2594 WinInvalidateRect(hwnd, NULL, FALSE);
[2]2595 }
[551]2596 DosReleaseMutexSem(ad->ScanSem);
[191]2597 }
2598 else if (ad)
[551]2599 ad->needrefreshing = TRUE;
[191]2600 return 0;
[2]2601
[191]2602 case WM_ERASEBACKGROUND:
2603 WinFillRect((HPS) mp1, (PRECTL) mp2,
[551]2604 standardcolors[ad->colors[COLORS_NORMALBACK]]);
[191]2605 return 0;
[2]2606
[191]2607 case WM_PAINT:
[551]2608 if (ad) {
[2]2609
[191]2610 HPS hpsp;
2611 RECTL Rectl;
2612 register ULONG x;
[551]2613 ULONG numlines, wascursored = ad->cursored;
[2]2614
[551]2615 hpsp = WinBeginPaint(hwnd, ad->hps, &Rectl);
[191]2616 WinFillRect(hpsp, &Rectl,
[551]2617 standardcolors[ad->colors[COLORS_NORMALBACK]]);
2618 if (!ad->stopflag && !ad->busy &&
2619 !DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN)) {
[191]2620 WinQueryWindowRect(hwnd, &Rectl);
2621 numlines = NumLines(&Rectl, ad);
[551]2622 if (numlines) {
2623 if (ad->numlines && (ad->lines || ad->hex)) {
2624 if (ad->topline > (ad->numlines + 1) - numlines)
2625 ad->topline = (ad->numlines + 1) - numlines;
2626 if (ad->topline > ad->numlines)
2627 ad->topline = 1;
2628 if (!ad->topline)
2629 ad->topline = 1;
2630 if (ad->cursored < ad->topline)
2631 ad->cursored = ad->topline;
2632 else if (ad->cursored > (ad->topline + numlines) - 1)
2633 ad->cursored = (ad->topline + numlines) - 1;
2634 if (ad->cursored > ad->numlines)
2635 ad->cursored = ad->numlines;
2636 if (wascursored != ad->cursored)
[191]2637 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
2638 }
2639 else
[551]2640 ad->topline = ad->cursored = 1;
2641 if (ad->numlines && (ad->lines || ad->hex)) {
2642 for (x = ad->topline - 1; x < ad->numlines; x++) {
[191]2643 if (((LONG) (Rectl.yTop -
[551]2644 (ad->lMaxHeight *
2645 (((x + 1) - ad->topline) + 1))) -
2646 ad->lMaxDescender) <= 0)
[191]2647 break;
[551]2648 PaintLine(hwnd, hpsp, x, ad->topline, &Rectl);
[191]2649 }
2650 }
2651 }
[551]2652 if (ad->multiplier)
2653 WinSendMsg(ad->hvscroll, SBM_SETSCROLLBAR,
2654 MPFROMSHORT((SHORT) (ad->topline / ad->multiplier)),
2655 MPFROM2SHORT(1, (SHORT) ((ad->numlines + 1) /
2656 ad->multiplier) - numlines));
2657 WinSendMsg(ad->hhscroll, SBM_SETSCROLLBAR,
2658 MPFROMSHORT((SHORT) abs(ad->horzscroll)),
2659 MPFROM2SHORT(0, (SHORT) (ad->maxx - Rectl.xRight)));
2660 WinSendMsg(ad->hhscroll, SBM_SETTHUMBSIZE,
2661 MPFROM2SHORT((SHORT) Rectl.xRight, (SHORT) ad->maxx),
[191]2662 MPVOID);
[551]2663 DosReleaseMutexSem(ad->ScanSem);
2664 ad->needrefreshing = FALSE;
[2]2665 }
[191]2666 else
[551]2667 ad->needrefreshing = TRUE;
[191]2668 WinEndPaint(hpsp);
2669 }
[551]2670 else {
[2]2671
[191]2672 HPS hpsp;
[2]2673
[191]2674 hpsp = WinBeginPaint(hwnd, (HPS) 0, NULL);
2675 WinEndPaint(hpsp);
2676 }
2677 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
2678 break;
[2]2679
[191]2680 case WM_HSCROLL:
2681 {
2682 RECTL rectl;
2683 BOOL invalidate = TRUE;
2684
2685 WinQueryWindowRect(hwnd, &rectl);
[551]2686 switch (SHORT2FROMMP(mp2)) {
[191]2687 case SB_PAGERIGHT:
[551]2688 if (abs(ad->horzscroll) <= ad->maxx - rectl.xRight) {
2689 ad->horzscroll -= rectl.xRight;
2690 if (abs(ad->horzscroll) > ad->maxx - rectl.xRight)
2691 ad->horzscroll = -((ad->maxx - rectl.xRight) +
2692 ad->fattrs.lAveCharWidth);
[191]2693 }
2694 else
2695 invalidate = FALSE;
2696 break;
[2]2697
[191]2698 case SB_PAGELEFT:
[551]2699 if (ad->horzscroll < 0) {
2700 ad->horzscroll += rectl.xRight;
2701 if (ad->horzscroll > 0)
2702 ad->horzscroll = 0;
[191]2703 }
2704 else
2705 invalidate = FALSE;
2706 break;
[2]2707
[191]2708 case SB_LINERIGHT:
[551]2709 if (abs(ad->horzscroll) <= ad->maxx - rectl.xRight)
2710 ad->horzscroll -= ad->fattrs.lAveCharWidth;
[191]2711 else
2712 invalidate = FALSE;
2713 break;
[2]2714
[191]2715 case SB_LINELEFT:
[551]2716 if (ad->horzscroll < 0)
2717 ad->horzscroll += ad->fattrs.lAveCharWidth;
[191]2718 else
2719 invalidate = FALSE;
2720 break;
[2]2721
[191]2722 case SB_SLIDERTRACK:
[551]2723 ad->horzscroll = (SHORT1FROMMP(mp2) / ad->fattrs.lAveCharWidth) *
2724 ad->fattrs.lAveCharWidth;
2725 ad->horzscroll = -(ad->horzscroll);
2726 if (ad->horzscroll > 0)
2727 ad->horzscroll = 0;
2728 if (abs(ad->horzscroll) > (ad->maxx - rectl.xRight) +
2729 ad->fattrs.lAveCharWidth)
2730 ad->horzscroll = -(ad->maxx - rectl.xRight);
[191]2731 break;
[2]2732
[191]2733 default:
2734 invalidate = FALSE;
2735 break;
[2]2736 }
[191]2737 if (invalidate)
2738 WinInvalidateRect(hwnd, NULL, FALSE);
2739 }
2740 break;
[2]2741
[191]2742 case WM_VSCROLL:
[551]2743 if (ad && !ad->stopflag && ad->text && ad->numlines && !ad->busy &&
2744 !DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN)) {
[2]2745
[191]2746 ULONG numlines, wascursored;
2747 RECTL rcl;
[2]2748
[191]2749 WinQueryWindowRect(hwnd, &rcl);
2750 numlines = NumLines(&rcl, ad);
[551]2751 if (numlines) {
2752 wascursored = ad->cursored;
2753 switch (SHORT2FROMMP(mp2)) {
[191]2754 case SB_PAGEUP:
[551]2755 if (ad->topline > 1) {
2756 ad->topline -= numlines;
2757 if (ad->topline > ad->numlines ||
2758 ad->topline + numlines > (ad->numlines + 1))
2759 ad->topline = 1;
2760 if (ad->cursored > ad->topline + numlines)
2761 ad->cursored = ad->topline + numlines;
2762 if (ad->cursored > ad->numlines)
2763 ad->cursored = ad->numlines;
[191]2764 WinInvalidateRect(hwnd, NULL, FALSE);
2765 }
2766 break;
2767 case SB_PAGEDOWN:
[551]2768 if (ad->topline + numlines <= ad->numlines) {
2769 ad->topline += numlines;
2770 if (ad->topline + numlines > ad->numlines + 1)
2771 ad->topline = (ad->numlines + 1) - numlines;
2772 if (ad->cursored < ad->topline)
2773 ad->cursored = ad->topline;
2774 if (ad->cursored + 1 > ad->topline + numlines)
2775 ad->cursored = (ad->topline + numlines) - 1;
2776 if (ad->cursored > ad->numlines)
2777 ad->cursored = ad->numlines;
[191]2778 WinInvalidateRect(hwnd, NULL, FALSE);
2779 }
2780 break;
2781 case SB_LINEDOWN:
[551]2782 if (ad->topline + numlines <= ad->numlines) {
[2]2783
[191]2784 RECTL Rectl, iRectl;
[2]2785
[551]2786 ad->topline++;
2787 if (ad->cursored < ad->topline)
2788 ad->cursored = ad->topline;
2789 else if (ad->cursored + 1 > ad->topline + numlines)
2790 ad->cursored = (ad->topline + numlines) - 1;
2791 if (ad->cursored > ad->numlines)
2792 ad->cursored = ad->numlines;
[191]2793 WinQueryWindowRect(hwnd, &Rectl);
[551]2794 WinScrollWindow(hwnd, 0, ad->lMaxHeight,
[191]2795 NULL, NULL, NULLHANDLE, &iRectl, 0);
[551]2796 WinFillRect(ad->hps, &iRectl,
2797 standardcolors[ad->colors[COLORS_NORMALBACK]]);
2798 PaintLine(hwnd, ad->hps, (ad->topline + numlines) - 2,
2799 ad->topline, &Rectl);
2800 if (ad->cursored != ad->topline + numlines)
2801 PaintLine(hwnd, ad->hps, ad->cursored - 1, ad->topline, &Rectl);
2802 if (wascursored != ad->cursored &&
2803 wascursored < ad->topline + numlines &&
2804 wascursored >= ad->topline)
2805 PaintLine(hwnd, ad->hps, wascursored - 1, ad->topline, &Rectl);
2806 if (numlines >= ad->numlines)
[191]2807 numlines = 0;
[551]2808 if (ad->multiplier)
2809 WinSendMsg(ad->hvscroll, SBM_SETSCROLLBAR,
2810 MPFROMSHORT((SHORT) (ad->topline / ad->multiplier)),
2811 MPFROM2SHORT(1, (SHORT) ((ad->numlines + 1) /
2812 ad->multiplier) -
[191]2813 numlines));
[551]2814 WinSendMsg(ad->hhscroll, SBM_SETSCROLLBAR,
2815 MPFROMSHORT((SHORT) abs(ad->horzscroll)),
2816 MPFROM2SHORT(0, (SHORT) (ad->maxx - Rectl.xRight)));
[191]2817 }
2818 break;
2819 case SB_LINEUP:
[551]2820 if (ad->topline > 1) {
[2]2821
[191]2822 RECTL Rectl, iRectl;
[2]2823
[551]2824 ad->topline--;
2825 if (ad->cursored < ad->topline)
2826 ad->cursored = ad->topline;
2827 else if (ad->cursored + 1 > ad->topline + numlines)
2828 ad->cursored = (ad->topline + numlines) - 1;
2829 if (ad->cursored > ad->numlines)
2830 ad->cursored = ad->numlines;
[191]2831 WinQueryWindowRect(hwnd, &Rectl);
[551]2832 WinScrollWindow(hwnd, 0, -ad->lMaxHeight,
[191]2833 NULL, NULL, NULLHANDLE, &iRectl, 0);
[551]2834 WinFillRect(ad->hps, &iRectl,
2835 standardcolors[ad->colors[COLORS_NORMALBACK]]);
[191]2836 iRectl = Rectl;
[551]2837 iRectl.yTop -= ((numlines * ad->lMaxHeight) + ad->lMaxDescender);
2838 WinFillRect(ad->hps, &iRectl,
2839 standardcolors[ad->colors[COLORS_NORMALBACK]]);
2840 PaintLine(hwnd, ad->hps, ad->topline - 1, ad->topline, &Rectl);
2841 if (ad->cursored != ad->topline)
2842 PaintLine(hwnd, ad->hps, ad->cursored - 1, ad->topline, &Rectl);
2843 if (ad->cursored != wascursored &&
2844 wascursored >= ad->topline &&
2845 wascursored < ad->topline + numlines)
2846 PaintLine(hwnd, ad->hps, wascursored - 1, ad->topline, &Rectl);
2847 if (numlines >= ad->numlines)
[191]2848 numlines = 0;
[551]2849 if (ad->multiplier)
2850 WinSendMsg(ad->hvscroll, SBM_SETSCROLLBAR,
2851 MPFROMSHORT((SHORT) (ad->topline / ad->multiplier)),
2852 MPFROM2SHORT(1, (SHORT) ((ad->numlines + 1) /
2853 ad->multiplier) -
[191]2854 numlines));
[551]2855 WinSendMsg(ad->hhscroll, SBM_SETSCROLLBAR,
2856 MPFROMSHORT((SHORT) abs(ad->horzscroll)),
2857 MPFROM2SHORT(0, (SHORT) (ad->maxx - Rectl.xRight)));
[191]2858 }
2859 break;
2860 case SB_SLIDERTRACK:
[551]2861 if ((SHORT1FROMMP(mp2) >= 1) || (SHORT1FROMMP(mp2)) <= ad->numlines) {
2862 ad->topline = (ULONG) SHORT1FROMMP(mp2) * ad->multiplier;
2863 if (ad->topline + numlines > ad->numlines + 1)
2864 ad->topline = (ad->numlines + 1) - numlines;
2865 if (!ad->topline)
2866 ad->topline = 1;
2867 if (ad->cursored < ad->topline)
2868 ad->cursored = ad->topline;
2869 else if (ad->cursored > ad->topline + numlines)
2870 ad->cursored = ad->topline + numlines;
2871 if (ad->cursored > ad->numlines)
2872 ad->cursored = ad->numlines;
[191]2873 WinInvalidateRect(hwnd, NULL, FALSE);
2874 }
2875 else
2876 WinAlarm(HWND_DESKTOP, WA_NOTE);
2877 break;
2878 }
[551]2879 if (ad->cursored != wascursored)
[191]2880 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
[2]2881 }
[551]2882 DosReleaseMutexSem(ad->ScanSem);
[191]2883 }
2884 break;
[2]2885
[191]2886 case WM_INITMENU:
[551]2887 switch (SHORT1FROMMP(mp1)) {
[191]2888 case IDM_FILESMENU:
2889 {
2890 APIRET rc;
2891 SHORT sSelect;
[2]2892
[551]2893 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
2894 WinEnableMenuItem((HWND) mp2, IDM_SAVETOCLIP, (rc == 0 &&
2895 ad->selected != 0));
2896 WinEnableMenuItem((HWND) mp2, IDM_APPENDTOCLIP, (rc == 0 &&
2897 ad->selected != 0));
2898 WinEnableMenuItem((HWND) mp2, IDM_SAVETOLIST, (rc == 0 &&
2899 ad->selected != 0));
2900 sSelect = (SHORT) WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX,
2901 LM_QUERYITEMCOUNT, MPVOID,
2902 MPVOID);
2903 WinEnableMenuItem((HWND) mp2, IDM_SAVETOCLIP2,
2904 (rc == 0 && sSelect > 0));
2905 WinEnableMenuItem((HWND) mp2, IDM_APPENDTOCLIP2,
2906 (rc == 0 && sSelect > 0));
2907 WinEnableMenuItem((HWND) mp2, IDM_SAVETOLIST2,
2908 (rc == 0 && sSelect > 0));
[191]2909 if (!rc)
[551]2910 DosReleaseMutexSem(ad->ScanSem);
[191]2911 }
2912 break;
[2]2913
[191]2914 case IDM_VIEWSMENU:
2915 {
2916 APIRET rc;
[2]2917
[551]2918 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
2919 WinEnableMenuItem((HWND) mp2, IDM_FONTPALETTE, (rc == 0));
2920 WinEnableMenuItem((HWND) mp2, IDM_HEXMODE, (rc == 0));
2921 WinEnableMenuItem((HWND) mp2, IDM_WRAP, (rc == 0));
2922 WinEnableMenuItem((HWND) mp2, IDM_CODEPAGE, (rc == 0));
[191]2923 if (!rc)
[551]2924 DosReleaseMutexSem(ad->ScanSem);
[191]2925 }
[551]2926 WinCheckMenuItem((HWND) mp2, IDM_HEXMODE, ad->hex);
2927 WinCheckMenuItem((HWND) mp2, IDM_WRAP, ad->wrapon);
2928 WinCheckMenuItem((HWND) mp2, IDM_IGNOREFTP, ad->ignoreftp);
2929 WinCheckMenuItem((HWND) mp2, IDM_IGNOREHTTP, ad->ignorehttp);
[191]2930 break;
[2]2931
[191]2932 case IDM_SEARCHMENU:
2933 {
2934 APIRET rc;
[2]2935
[551]2936 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
2937 WinEnableMenuItem((HWND) mp2, IDM_FINDFIRST, (rc == 0 &&
2938 ad->numlines != 0 &&
2939 ad->markedlines));
2940 WinEnableMenuItem((HWND) mp2, IDM_FINDNEXT, (rc == 0 &&
2941 ad->numlines != 0 &&
2942 ad->markedlines &&
2943 ad->found != 0));
2944 WinEnableMenuItem((HWND) mp2, IDM_FINDPREV, (rc == 0 &&
2945 ad->numlines != 0 &&
2946 ad->markedlines &&
2947 ad->found != 0));
2948 WinEnableMenuItem((HWND) mp2, IDM_NEXTBLANKLINE, (rc == 0 &&
2949 ad->numlines != 0 &&
2950 !ad->hex));
2951 WinEnableMenuItem((HWND) mp2, IDM_PREVBLANKLINE, (rc == 0 &&
2952 ad->numlines != 0 &&
2953 !ad->hex));
2954 WinEnableMenuItem((HWND) mp2, IDM_GOTOLINE, (rc == 0 &&
2955 ad->numlines != 0));
2956 WinEnableMenuItem((HWND) mp2, IDM_GOTOOFFSET, (rc == 0 &&
2957 ad->textsize != 0));
[191]2958 if (!rc)
[551]2959 DosReleaseMutexSem(ad->ScanSem);
[191]2960 }
2961 break;
[2]2962
[191]2963 case IDM_SELECTSUBMENU:
2964 {
2965 APIRET rc;
[2]2966
[551]2967 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
2968 WinEnableMenuItem((HWND) mp2, IDM_SELECTALL, (rc == 0 &&
2969 ad->numlines != 0 &&
2970 ad->markedlines &&
2971 (ad->selected !=
2972 ad->numlines ||
2973 !ad->selected)));
2974 WinEnableMenuItem((HWND) mp2, IDM_DESELECTALL, (rc == 0 &&
2975 ad->numlines != 0 &&
2976 ad->markedlines &&
2977 ad->selected != 0));
2978 WinEnableMenuItem((HWND) mp2, IDM_DESELECTFOUND, (rc == 0 &&
2979 ad->numlines != 0 &&
2980 ad->markedlines &&
2981 ad->selected != 0 &&
2982 ad->found != 0));
2983 WinEnableMenuItem((HWND) mp2, IDM_SELECTFOUND, (rc == 0 &&
2984 ad->numlines != 0 &&
2985 ad->markedlines &&
2986 ad->found != 0 &&
2987 (ad->numlines !=
2988 ad->selected ||
2989 !ad->selected)));
2990 WinEnableMenuItem((HWND) mp2, IDM_NEXTSELECTED, (rc == 0 &&
2991 ad->numlines != 0 &&
2992 ad->markedlines &&
2993 ad->selected != 0));
2994 WinEnableMenuItem((HWND) mp2, IDM_PREVSELECTED, (rc == 0 &&
2995 ad->numlines != 0 &&
2996 ad->markedlines &&
2997 ad->selected != 0));
2998 WinEnableMenuItem((HWND) mp2, IDM_INVERT, (rc == 0 &&
2999 ad->numlines != 0 &&
3000 ad->markedlines));
[191]3001 if (!rc)
[551]3002 DosReleaseMutexSem(ad->ScanSem);
[2]3003 }
3004 break;
[191]3005 }
3006 break;
[2]3007
[191]3008 case UM_CONTROL:
[551]3009 switch (SHORT1FROMMP(mp1)) {
[191]3010 case NEWVIEW_LISTBOX:
[551]3011 switch (SHORT2FROMMP(mp1)) {
[191]3012 case LN_SETFOCUS:
[551]3013 if (ad) {
3014 if (!ad->clientfocused) {
[191]3015 PostMsg(hwnd,
[551]3016 WM_COMMAND, MPFROM2SHORT(IDM_NEXTWINDOW, 0), MPVOID);
[191]3017 break;
3018 }
[551]3019 ad->clientfocused = FALSE;
[191]3020 }
3021 PostMsg(hwnd,
[551]3022 UM_CONTROL, MPFROM2SHORT(NEWVIEW_LISTBOX, LN_SELECT), MPVOID);
[191]3023 break;
3024 case LN_KILLFOCUS:
[551]3025 if (ad) {
3026 ad->clientfocused = TRUE;
[191]3027 WinSetFocus(HWND_DESKTOP, hwnd);
3028 }
3029 break;
3030 case LN_SELECT:
[551]3031 if (ad && !ad->dummy) {
[2]3032
[191]3033 ULONG linenum, numlines;
3034 SHORT sSelect;
[551]3035 HWND hwndUL = WinWindowFromID(ad->hwndFrame,
[191]3036 SHORT1FROMMP(mp1));
3037 RECTL Rectl;
[2]3038
[191]3039 sSelect = (SHORT) WinSendMsg(hwndUL,
3040 LM_QUERYSELECTION,
[551]3041 MPFROM2SHORT(LIT_FIRST, 0), MPVOID);
3042 if (sSelect >= 0) {
[191]3043 linenum = (ULONG) WinSendMsg(hwndUL,
3044 LM_QUERYITEMHANDLE,
[551]3045 MPFROM2SHORT(sSelect, 0), MPVOID);
3046 if (ad->topline != linenum + 1 && linenum < ad->numlines) {
[191]3047 WinQueryWindowRect(hwnd, &Rectl);
3048 numlines = NumLines(&Rectl, ad);
[551]3049 ad->topline = linenum + 1;
3050 if (ad->numlines - ad->topline < numlines)
3051 ad->topline = ad->numlines - numlines;
3052 ad->cursored = linenum + 1;
[191]3053 WinInvalidateRect(hwnd, NULL, FALSE);
3054 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
3055 PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
3056 }
3057 }
3058 else
3059 PostMsg(hwndUL, LM_SELECTITEM, MPFROM2SHORT(0, 0),
3060 MPFROM2SHORT(TRUE, 0));
3061 }
3062 break;
[2]3063
[191]3064 case LN_ENTER:
[551]3065 if (ad) {
[2]3066
[191]3067 SHORT sSelect;
[551]3068 HWND hwndUL = WinWindowFromID(ad->hwndFrame,
[191]3069 SHORT1FROMMP(mp1));
[2]3070
[191]3071 sSelect = (SHORT) WinSendMsg(hwndUL,
3072 LM_QUERYSELECTION,
[551]3073 MPFROM2SHORT(LIT_FIRST, 0), MPVOID);
3074 if (sSelect >= 0) {
3075 ad->dummy = TRUE;
[191]3076 WinSendMsg(hwndUL, LM_DELETEITEM,
3077 MPFROM2SHORT(sSelect, 0), MPVOID);
[551]3078 ad->dummy = FALSE;
[191]3079 sSelect = (SHORT) WinSendMsg(hwndUL,
[551]3080 LM_QUERYITEMCOUNT, MPVOID, MPVOID);
3081 if (sSelect <= 0) {
3082 PostMsg(ad->hwndFrame, WM_UPDATEFRAME,
[191]3083 MPFROMLONG(FCF_SIZEBORDER), MPVOID);
3084 WinSetFocus(HWND_DESKTOP, hwnd);
3085 }
3086 }
3087 }
3088 break;
[2]3089
[191]3090 default:
3091 break;
[2]3092 }
[191]3093 break;
[2]3094
[191]3095 default:
3096 break;
3097 }
3098 return 0;
[2]3099
[191]3100 case WM_COMMAND:
[551]3101 switch (SHORT1FROMMP(mp1)) {
[191]3102 case IDM_EDIT:
[551]3103 if (*editor) {
[2]3104
[191]3105 CHAR *dummy[2];
[2]3106
[551]3107 dummy[0] = ad->filename;
[191]3108 dummy[1] = NULL;
3109 ExecOnList(hwnd, editor, WINDOWED | SEPARATE, NULL, dummy, NULL);
3110 }
3111 else
[551]3112 StartMLEEditor(ad->hwndParent, 4, ad->filename, ad->hwndFrame);
3113 ad->hwndRestore = (HWND) 0;
[191]3114 PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
3115 break;
[2]3116
[191]3117 case IDM_IGNOREFTP:
[551]3118 ad->ignoreftp = (ad->ignoreftp) ? FALSE : TRUE;
3119 ad->ftpin = FALSE;
3120 if (ad->text && *ftprun && !ad->ignoreftp && strstr(ad->text, "ftp://"))
3121 ad->ftpin = TRUE;
3122 IgnoreFTP = ad->ignoreftp;
[191]3123 PrfWriteProfileData(fmprof, appname, "Viewer.IgnoreFTP",
[551]3124 &ad->ignoreftp, sizeof(BOOL));
[191]3125 WinInvalidateRect(hwnd, NULL, FALSE);
3126 break;
[2]3127
[191]3128 case IDM_IGNOREHTTP:
[551]3129 ad->ignorehttp = (ad->ignorehttp) ? FALSE : TRUE;
3130 ad->httpin = FALSE;
3131 if (ad->text && *httprun && !ad->ignorehttp &&
3132 strstr(ad->text, "http://"))
3133 ad->httpin = TRUE;
3134 IgnoreHTTP = ad->ignorehttp;
[191]3135 PrfWriteProfileData(fmprof, appname, "Viewer.IgnoreHTTP",
[551]3136 &ad->ignorehttp, sizeof(BOOL));
[191]3137 WinInvalidateRect(hwnd, NULL, FALSE);
3138 break;
[2]3139
[191]3140 case IDM_PREVBLANKLINE:
[551]3141 if (!ad->hex && ad->lines) {
[2]3142
[191]3143 ULONG x;
[2]3144
[551]3145 x = ad->cursored - 2;
3146 if (x >= ad->numlines)
[191]3147 x = 0;
[551]3148 while (x < ad->numlines &&
3149 (*ad->lines[x] == '\r' || *ad->lines[x] == '\n'))
[191]3150 x--;
[551]3151 if (x >= ad->numlines)
[191]3152 x = 0;
[551]3153 for (; x < ad->numlines; x--) {
3154 if (*ad->lines[x] == '\r' || *ad->lines[x] == '\n') {
3155 if (x < ad->numlines - 1)
[191]3156 x++;
3157 break;
3158 }
3159 }
[551]3160 if (x < ad->numlines) {
3161 ad->topline = ad->cursored = x;
[191]3162 WinInvalidateRect(hwnd, NULL, FALSE);
3163 }
3164 }
3165 break;
[2]3166
[191]3167 case IDM_NEXTBLANKLINE:
[551]3168 if (!ad->hex && ad->lines) {
[2]3169
[191]3170 ULONG x;
[2]3171
[551]3172 x = ad->cursored;
3173 while (x < ad->numlines &&
3174 (*ad->lines[x] == '\r' || *ad->lines[x] == '\n'))
[191]3175 x++;
[551]3176 for (; x < ad->numlines; x++) {
3177 if (*ad->lines[x] == '\r' || *ad->lines[x] == '\n') {
3178 if (x < ad->numlines - 1)
[191]3179 x++;
3180 break;
3181 }
3182 }
[551]3183 if (x < ad->numlines) {
3184 while (x < ad->numlines &&
3185 (*ad->lines[x] == '\r' || *ad->lines[x] == '\n'))
[191]3186 x++;
[551]3187 if (x < ad->numlines) {
3188 ad->topline = ad->cursored = x;
[191]3189 WinInvalidateRect(hwnd, NULL, FALSE);
3190 }
3191 }
3192 }
3193 break;
[2]3194
[191]3195 case IDM_VIEW:
3196 case IDM_OBJECT:
[551]3197 if (!ad->hex && ad->lines) {
[2]3198
[191]3199 CHAR line[CCHMAXPATH], filename[CCHMAXPATH], *p;
[2]3200
[551]3201 strncpy(line, ad->lines[ad->cursored - 1], CCHMAXPATH);
[191]3202 line[CCHMAXPATH - 1] = 0;
[368]3203 chop_at_crnl(line);
[551]3204 if (*line == '\"') {
[191]3205 memmove(line, line + 1, strlen(line));
3206 p = strchr(line, '\"');
3207 lstrip(line);
3208 if (p)
3209 *p = 0;
3210 rstrip(line);
3211 }
[551]3212 else {
[191]3213 lstrip(line);
3214 p = strchr(line, ' ');
3215 if (p)
3216 *p = 0;
3217 rstrip(line);
3218 }
[551]3219 if (!strchr(line, '\\') && !strchr(line, '/') && !strchr(line, ':')) {
3220 strcpy(filename, ad->filename);
[191]3221 p = strrchr(filename, '\\');
3222 if (p)
3223 p++;
3224 else
3225 p = filename;
3226 strcpy(p, line);
3227 }
3228 else
3229 strcpy(filename, line);
3230 MakeFullName(filename);
[551]3231 if (*filename && IsFile(filename) == 1) {
[191]3232 if (SHORT1FROMMP(mp1) == IDM_OBJECT)
[551]3233 OpenObject(filename, Default, ad->hwndFrame);
[191]3234 else
[551]3235 DefaultView(hwnd, ad->hwndFrame, HWND_DESKTOP, NULL, 0, filename);
[191]3236 }
3237 }
3238 break;
[2]3239
[191]3240 case IDM_COLORPALETTE:
3241 {
3242 COLORS co;
3243 LONG temp[COLORS_MAX];
[2]3244
[191]3245 memset(&co, 0, sizeof(co));
3246 co.size = sizeof(co);
3247 co.numcolors = COLORS_MAX;
[551]3248 co.colors = ad->colors;
[191]3249 co.descriptions = IDS_NVCOLORS1TEXT;
3250 co.origs = temp;
3251 co.prompt = IDS_NVCOLORSPROMPTTEXT;
[551]3252 memcpy(temp, ad->colors, sizeof(LONG) * COLORS_MAX);
[191]3253 if (WinDlgBox(HWND_DESKTOP,
3254 hwnd,
3255 ColorDlgProc,
[551]3256 FM3ModHandle, COLOR_FRAME, (PVOID) & co)) {
3257 memcpy(Colors, ad->colors, sizeof(LONG) * COLORS_MAX);
[191]3258 PrfWriteProfileData(fmprof,
3259 appname,
3260 "Viewer.Colors",
[551]3261 &ad->colors, sizeof(LONG) * COLORS_MAX);
3262 WinInvalidateRect(hwnd, NULL, FALSE);
3263 WinInvalidateRect(ad->hwndStatus1, NULL, FALSE);
3264 WinInvalidateRect(ad->hwndStatus2, NULL, FALSE);
3265 WinInvalidateRect(ad->hwndStatus3, NULL, FALSE);
[191]3266 }
3267 }
3268 break;
[2]3269
[191]3270 case IDM_NEXTWINDOW:
3271 case IDM_PREVWINDOW:
3272 {
3273 SHORT sSelect;
[2]3274
[551]3275 sSelect = (SHORT) WinSendDlgItemMsg(ad->hwndFrame,
[191]3276 NEWVIEW_LISTBOX,
3277 LM_QUERYITEMCOUNT,
[551]3278 MPVOID, MPVOID);
3279 if (sSelect) {
3280 if (!ad->clientfocused)
[191]3281 WinSetFocus(HWND_DESKTOP, hwnd);
3282 else
3283 WinSetFocus(HWND_DESKTOP,
[551]3284 WinWindowFromID(ad->hwndFrame, NEWVIEW_LISTBOX));
[191]3285 }
3286 else
3287 WinSetFocus(HWND_DESKTOP, hwnd);
3288 }
3289 break;
[2]3290
[191]3291 case IDM_FINDFIRST:
3292 {
3293 APIRET rc;
[2]3294
[551]3295 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
3296 if (!rc) {
3297 if (!ad->busy && ad->text && ad->numlines && ad->markedlines) {
[2]3298
[191]3299 ULONG numlines;
3300 RECTL Rectl;
3301 static char test[SEARCHSTRINGLEN];
[2]3302
[191]3303 WinQueryWindowRect(hwnd, &Rectl);
3304 numlines = NumLines(&Rectl, ad);
3305 if (!numlines)
3306 break;
[551]3307 strcpy(test, ad->searchtext);
[191]3308 if (WinDlgBox(HWND_DESKTOP, hwnd, FindStrDlgProc, FM3ModHandle,
[551]3309 NEWFIND_FRAME, (PVOID) & hwnd)) {
3310 if (*ad->searchtext && strcmp(test, ad->searchtext))
[191]3311 PrfWriteProfileString(fmprof,
3312 appname,
3313 "Viewer.Searchtext",
[551]3314 (PVOID) ad->searchtext);
3315 if (_beginthread(SearchThread, NULL, 524288, (PVOID) hwnd) ==
3316 -1)
3317 Runtime_Error(pszSrcFile, __LINE__,
3318 GetPString(IDS_COULDNTSTARTTHREADTEXT));
[191]3319 }
3320 }
[551]3321 DosReleaseMutexSem(ad->ScanSem);
[191]3322 }
3323 }
3324 break;
[2]3325
[191]3326 case IDM_PREVSELECTED:
3327 case IDM_NEXTSELECTED:
3328 case IDM_FINDPREV:
3329 case IDM_FINDNEXT:
3330 {
3331 APIRET rc;
[2]3332
[551]3333 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
3334 if (!rc) {
3335 if (!ad->busy && ad->text && ad->markedlines) {
[2]3336
[191]3337 RECTL Rectl;
3338 register ULONG x;
3339 ULONG numlines;
3340 CHAR markedwith;
[2]3341
[191]3342 markedwith = (SHORT1FROMMP(mp1) == IDM_FINDNEXT ||
3343 SHORT1FROMMP(mp1) == IDM_FINDPREV) ?
3344 VF_FOUND : VF_SELECTED;
3345 WinQueryWindowRect(hwnd, &Rectl);
3346 numlines = NumLines(&Rectl, ad);
3347 if (!numlines)
3348 break;
3349 WinSetPointer(HWND_DESKTOP, hptrBusy);
3350 if (SHORT1FROMMP(mp1) == IDM_PREVSELECTED ||
[551]3351 SHORT1FROMMP(mp1) == IDM_FINDPREV) {
3352 for (x = ad->cursored - 2; x < ULONG_MAX - 1; x--) {
3353 if (ad->markedlines[x] & markedwith) {
3354 ad->topline = x + 1;
3355 if (ad->numlines - ad->topline < numlines)
3356 ad->topline = ad->numlines - numlines;
3357 ad->cursored = x + 1;
[191]3358 WinInvalidateRect(hwnd, NULL, FALSE);
3359 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
3360 break;
3361 }
3362 }
3363 }
[551]3364 else {
3365 for (x = ad->cursored; x < ad->numlines; x++) {
3366 if (ad->markedlines[x] & markedwith) {
3367 ad->topline = x + 1;
3368 if (ad->numlines - ad->topline < numlines)
3369 ad->topline = ad->numlines - numlines;
3370 ad->cursored = x + 1;
[191]3371 WinInvalidateRect(hwnd, NULL, FALSE);
3372 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
3373 break;
3374 }
3375 }
3376 }
3377 WinSetPointer(HWND_DESKTOP, hptrArrow);
[551]3378 if (x >= ad->numlines)
[191]3379 DosBeep(50, 100);
3380 }
[551]3381 DosReleaseMutexSem(ad->ScanSem);
[191]3382 }
3383 }
3384 break;
[2]3385
[191]3386 case IDM_SELECTFOUND:
3387 case IDM_DESELECTFOUND:
3388 {
3389 APIRET rc;
[2]3390
[551]3391 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
3392 if (!rc) {
3393 if (!ad->busy && ad->text && ad->markedlines) {
[2]3394
[191]3395 RECTL Rectl;
3396 register ULONG x;
3397 ULONG numlines;
[2]3398
[191]3399 WinQueryWindowRect(hwnd, &Rectl);
3400 numlines = NumLines(&Rectl, ad);
3401 if (!numlines)
3402 break;
3403 WinSetPointer(HWND_DESKTOP, hptrBusy);
[551]3404 for (x = 0; x < ad->numlines; x++) {
3405 if (SHORT1FROMMP(mp1) == IDM_SELECTFOUND) {
3406 if ((ad->markedlines[x] & VF_FOUND) &&
3407 !(ad->markedlines[x] & VF_SELECTED)) {
3408 ad->markedlines[x] |= VF_SELECTED;
3409 ad->selected++;
[191]3410 }
3411 }
[551]3412 else {
3413 if ((ad->markedlines[x] & VF_FOUND) &&
3414 (ad->markedlines[x] & VF_SELECTED)) {
3415 ad->markedlines[x] &= (~VF_SELECTED);
3416 ad->selected--;
[191]3417 }
3418 }
3419 }
3420 WinSendMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
3421 WinSetPointer(HWND_DESKTOP, hptrArrow);
3422 WinInvalidateRect(hwnd, NULL, FALSE);
3423 }
[551]3424 DosReleaseMutexSem(ad->ScanSem);
[191]3425 }
3426 }
3427 break;
[2]3428
[191]3429 case IDM_GOTOLINE:
3430 case IDM_GOTOOFFSET:
3431 {
3432 APIRET rc;
[2]3433
[551]3434 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
3435 if (!rc) {
3436 if (!ad->busy && ad->numlines) {
[2]3437
[191]3438 ULONG numlines, linenum;
3439 CHAR s[34], ss[134];
3440 STRINGINPARMS sip;
3441 RECTL Rectl;
3442 register ULONG x;
[2]3443
[191]3444 WinQueryWindowRect(hwnd, &Rectl);
3445 numlines = NumLines(&Rectl, ad);
3446 if (!numlines)
3447 break;
[551]3448 if (ad->numlines <= numlines) {
[191]3449 DosBeep(500, 100);
3450 break;
3451 }
3452 sip.help = (SHORT1FROMMP(mp1) == IDM_GOTOLINE) ?
[551]3453 GetPString(IDS_NVLINEJUMPTEXT) : GetPString(IDS_NVBYTEJUMPTEXT);
[191]3454 sip.ret = s;
3455 *s = 0;
3456 sip.prompt = ss;
3457 sip.inputlen = 34;
3458 sip.title = (SHORT1FROMMP(mp1) == IDM_GOTOLINE) ?
3459 GetPString(IDS_NVLINEJUMPTITLETEXT) :
3460 GetPString(IDS_NVBYTEJUMPTITLETEXT);
3461 sprintf(sip.prompt,
3462 GetPString(IDS_NVJUMPTEXT),
3463 (SHORT1FROMMP(mp1) == IDM_GOTOLINE) ?
3464 GetPString(IDS_LINETEXT) :
3465 GetPString(IDS_OFFSETTEXT),
3466 (SHORT1FROMMP(mp1) == IDM_GOTOLINE) ?
3467 1 :
3468 0,
3469 (SHORT1FROMMP(mp1) == IDM_GOTOLINE) ?
[551]3470 ad->numlines : ad->textsize - 1);
[191]3471 WinDlgBox(HWND_DESKTOP,
[551]3472 hwnd, InputDlgProc, FM3ModHandle, STR_FRAME, &sip);
3473 if (*s) {
[191]3474 s[33] = 0;
3475 linenum = atol(s);
[551]3476 switch (SHORT1FROMMP(mp1)) {
[191]3477 case IDM_GOTOLINE:
[551]3478 if (linenum > 0 && linenum <= ad->numlines) {
3479 ad->topline = linenum;
3480 ad->cursored = ad->topline;
3481 if (ad->numlines - ad->topline < numlines)
3482 ad->topline = (ad->numlines - numlines) + 1;
3483 WinInvalidateRect(hwnd, NULL, FALSE);
[191]3484 }
3485 break;
3486 case IDM_GOTOOFFSET:
[551]3487 if (linenum < ad->textsize) {
3488 if (ad->hex)
3489 ad->topline = (linenum / 16) + 1;
3490 else if (ad->lines) {
3491 ad->topline = (ULONG) - 1;
3492 for (x = 0; x < ad->numlines; x++) {
3493 if (ad->lines[x] > ad->text + linenum) {
3494 ad->topline = x + 1;
[191]3495 break;
3496 }
3497 }
[551]3498 if (ad->topline == (ULONG) - 1)
3499 ad->topline = ad->numlines;
[191]3500 }
[551]3501 ad->cursored = ad->topline;
3502 if (ad->numlines - ad->topline < numlines)
3503 ad->topline = (ad->numlines - numlines) + 1;
3504 WinInvalidateRect(hwnd, NULL, FALSE);
[191]3505 }
3506 break;
3507 }
3508 }
[551]3509 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
[191]3510 }
[551]3511 DosReleaseMutexSem(ad->ScanSem);
[191]3512 }
3513 }
3514 break;
[2]3515
[191]3516 case IDM_CODEPAGE:
3517 {
3518 INT cp;
[2]3519
[191]3520 cp = PickCodepage(hwnd);
[551]3521 if (cp != -1) {
3522 ad->fattrs.usCodePage = (USHORT) cp;
3523 Codepage = ad->fattrs.usCodePage;
[191]3524 PrfWriteProfileData(fmprof,
3525 appname,
3526 "Viewer.Codepage",
[551]3527 &ad->fattrs.usCodePage, sizeof(USHORT));
3528 GpiDeleteSetId(ad->hps, FIXED_FONT_LCID);
3529 GpiAssociate(ad->hps, 0);
3530 GpiDestroyPS(ad->hps);
3531 ad->hps = InitWindow(hwnd);
3532 WinSendMsg(hwnd, UM_SETUP3, MPVOID, MPVOID);
3533 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
3534 WinInvalidateRect(hwnd, NULL, FALSE);
[191]3535 }
3536 }
3537 break;
[2]3538
[191]3539 case IDM_SAVETOLIST2:
3540 case IDM_SAVETOCLIP2:
3541 case IDM_APPENDTOCLIP2:
3542 case IDM_SAVETOLIST:
3543 case IDM_SAVETOCLIP:
3544 case IDM_APPENDTOCLIP:
3545 {
3546 APIRET rc;
[2]3547
[551]3548 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
3549 if (!rc) {
3550 if (!ad->busy) {
3551 ad->cliptype = SHORT1FROMMP(mp1);
3552 if (_beginthread(ClipboardThread, NULL, 524288, (PVOID) hwnd) ==
3553 -1)
3554 Runtime_Error(pszSrcFile, __LINE__,
3555 GetPString(IDS_COULDNTSTARTTHREADTEXT));
[191]3556 }
[551]3557 DosReleaseMutexSem(ad->ScanSem);
[191]3558 }
3559 }
3560 break;
[2]3561
[191]3562 case IDM_SELECTALL:
3563 case IDM_DESELECTALL:
3564 case IDM_INVERT:
3565 {
3566 APIRET rc;
[2]3567
[551]3568 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
3569 if (!rc) {
3570 if (!ad->busy && ad->markedlines) {
[2]3571
[191]3572 register ULONG x;
[2]3573
[551]3574 for (x = 0; x < ad->numlines; x++) {
3575 switch (SHORT1FROMMP(mp1)) {
[191]3576 case IDM_SELECTALL:
[551]3577 if (!(ad->markedlines[x] & VF_SELECTED)) {
3578 ad->markedlines[x] |= VF_SELECTED;
3579 ad->selected++;
[191]3580 }
3581 break;
3582 case IDM_DESELECTALL:
[551]3583 if (ad->markedlines[x] & VF_SELECTED) {
3584 ad->markedlines[x] &= (~VF_SELECTED);
3585 ad->selected--;
[191]3586 }
3587 break;
3588 case IDM_INVERT:
[551]3589 if (ad->markedlines[x] & VF_SELECTED) {
3590 ad->markedlines[x] &= (~VF_SELECTED);
3591 ad->selected--;
[191]3592 }
[551]3593 else {
3594 ad->markedlines[x] |= VF_SELECTED;
3595 ad->selected++;
[191]3596 }
3597 break;
3598 }
3599 }
3600 WinSendMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
3601 WinInvalidateRect(hwnd, NULL, FALSE);
3602 }
[551]3603 DosReleaseMutexSem(ad->ScanSem);
[191]3604 }
3605 }
3606 break;
[2]3607
[191]3608 case IDM_WRAP:
3609 {
3610 APIRET rc;
[2]3611
[551]3612 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
3613 if (!rc) {
3614 if (!ad->busy) {
3615 ad->wrapon = ad->wrapon ? FALSE : TRUE;
3616 WrapOn = ad->wrapon;
[191]3617 PrfWriteProfileData(fmprof, appname, "Viewer.WrapOn",
[551]3618 &ad->wrapon, sizeof(BOOL));
[191]3619 PostMsg(hwnd, UM_SETUP2, MPVOID, MPVOID);
3620 PostMsg(hwnd, UM_SETUP3, MPVOID, MPVOID);
3621 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
[551]3622 if (WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX,
[191]3623 LM_QUERYITEMCOUNT, MPVOID, MPVOID))
[551]3624 WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX, LM_DELETEALL,
[191]3625 MPVOID, MPVOID);
[551]3626 ad->oldwidth = -1;
3627 WinSendMsg(ad->hvscroll, SBM_SETTHUMBSIZE,
3628 MPFROM2SHORT(1, 1), MPVOID);
3629 WinSendMsg(ad->hvscroll, SBM_SETSCROLLBAR,
[191]3630 MPFROMSHORT(1), MPFROM2SHORT(1, 1));
[551]3631 WinSendMsg(ad->hhscroll, SBM_SETTHUMBSIZE,
3632 MPFROM2SHORT(1, 1), MPVOID);
3633 WinSendMsg(ad->hhscroll, SBM_SETSCROLLBAR,
[191]3634 MPFROMSHORT(1), MPFROM2SHORT(1, 1));
[551]3635 WinSendMsg(ad->hwndFrame, WM_UPDATEFRAME,
[191]3636 MPFROMLONG(FCF_SIZEBORDER), MPVOID);
3637 WinInvalidateRect(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
3638 NEWVIEW_DRAG), NULL, FALSE);
[551]3639 WinInvalidateRect(ad->hhscroll, NULL, FALSE);
[191]3640 }
[551]3641 DosReleaseMutexSem(ad->ScanSem);
[191]3642 }
3643 }
3644 break;
[2]3645
[191]3646 case IDM_HEXMODE:
3647 {
3648 APIRET rc;
[2]3649
[551]3650 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
3651 if (!rc) {
3652 if (!ad->busy) {
3653 ad->hex = (ad->hex) ? FALSE : TRUE;
[191]3654 WinEnableWindow(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
[551]3655 IDM_NEXTBLANKLINE), !ad->hex);
[191]3656 WinEnableWindow(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
[551]3657 IDM_PREVBLANKLINE), !ad->hex);
[191]3658 PostMsg(hwnd, UM_SETUP2, MPVOID, MPVOID);
3659 PostMsg(hwnd, UM_SETUP3, MPVOID, MPVOID);
3660 PostMsg(hwnd, UM_SETUP4, MPVOID, MPVOID);
[551]3661 if (WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX,
[191]3662 LM_QUERYITEMCOUNT, MPVOID, MPVOID))
[551]3663 WinSendDlgItemMsg(ad->hwndFrame, NEWVIEW_LISTBOX, LM_DELETEALL,
[191]3664 MPVOID, MPVOID);
[551]3665 ad->oldwidth = -1;
3666 WinSendMsg(ad->hvscroll, SBM_SETTHUMBSIZE,
3667 MPFROM2SHORT(1, 1), MPVOID);
3668 WinSendMsg(ad->hvscroll, SBM_SETSCROLLBAR,
[191]3669 MPFROMSHORT(1), MPFROM2SHORT(1, 1));
[551]3670 WinSendMsg(ad->hhscroll, SBM_SETTHUMBSIZE,
3671 MPFROM2SHORT(1, 1), MPVOID);
3672 WinSendMsg(ad->hhscroll, SBM_SETSCROLLBAR,
[191]3673 MPFROMSHORT(1), MPFROM2SHORT(1, 1));
[551]3674 WinSendMsg(ad->hwndFrame, WM_UPDATEFRAME,
[191]3675 MPFROMLONG(FCF_SIZEBORDER), MPVOID);
3676 WinInvalidateRect(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
3677 NEWVIEW_DRAG), NULL, FALSE);
[551]3678 WinInvalidateRect(ad->hhscroll, NULL, FALSE);
[191]3679 }
[551]3680 DosReleaseMutexSem(ad->ScanSem);
[191]3681 }
3682 }
3683 break;
[2]3684
[191]3685 case IDM_FONTPALETTE:
3686 {
3687 APIRET rc;
[2]3688
[551]3689 rc = DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN);
3690 if (!rc) {
3691 SetMLEFont(hwnd, &ad->fattrs, 11);
[191]3692 PrfWriteProfileData(fmprof, appname, "Viewer.Fattrs",
[551]3693 &ad->fattrs, sizeof(FATTRS));
3694 Fattrs = ad->fattrs;
3695 GpiDeleteSetId(ad->hps, FIXED_FONT_LCID);
3696 GpiAssociate(ad->hps, 0);
3697 GpiDestroyPS(ad->hps);
3698 ad->hps = InitWindow(hwnd);
3699 DosReleaseMutexSem(ad->ScanSem);
[191]3700 WinSendMsg(hwnd, UM_SETUP2, MPVOID, MPVOID);
3701 WinInvalidateRect(hwnd, NULL, FALSE);
3702 }
[2]3703 }
3704 break;
3705
[191]3706 case IDM_HELP:
3707 if (hwndHelp)
3708 WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
[551]3709 MPFROM2SHORT(HELP_NEWVIEW, 0), MPFROMSHORT(HM_RESOURCEID));
[2]3710 break;
[191]3711 }
3712 return 0;
[2]3713
[191]3714 case WM_SETFOCUS:
3715 if (mp2)
3716 WinSendMsg(hwnd, UM_SETUP5, MPVOID, MPVOID);
[551]3717 if (mp2 && ad && ad->needrefreshing && !ad->stopflag &&
3718 !DosRequestMutexSem(ad->ScanSem, SEM_IMMEDIATE_RETURN)) {
3719 ad->needrefreshing = FALSE;
3720 DosReleaseMutexSem(ad->ScanSem);
[191]3721 WinInvalidateRect(hwnd, NULL, TRUE);
3722 }
3723 break;
[2]3724
[191]3725 case WM_SIZE:
[551]3726 if (SHORT1FROMMP(mp2) && SHORT2FROMMP(mp2)) {
[191]3727 PostMsg(hwnd, UM_SETUP2, MPVOID, MPVOID);
3728 PostMsg(hwnd, UM_SETUP3, MPVOID, MPVOID);
3729 }
3730 break;
[2]3731
[191]3732 case WM_SAVEAPPLICATION:
[551]3733 if (ad && ParentIsDesktop(hwnd, ad->hwndParent)) {
[2]3734
[191]3735 SWP swp;
[2]3736
[551]3737 WinQueryWindowPos(ad->hwndFrame, &swp);
[191]3738 if (!(swp.fl & (SWP_HIDE | SWP_MINIMIZE | SWP_MAXIMIZE)))
3739 PrfWriteProfileData(fmprof,
[551]3740 appname, "NewViewSizePos", &swp, sizeof(swp));
[191]3741 }
3742 break;
[2]3743
[191]3744 case WM_CLOSE:
3745 if (ad)
[551]3746 ad->stopflag = 1;
[191]3747 WinDestroyWindow(WinQueryWindow(hwnd, QW_PARENT));
3748 return 0;
[2]3749
[191]3750 case WM_DESTROY:
3751 {
3752 BOOL dontclose = FALSE;
[551]3753 HWND hwndRestore = (HWND) 0;
[2]3754
[191]3755 WinStopTimer(WinQueryAnchorBlock(hwnd), hwnd, ID_TIMER5);
[551]3756 if (ad) {
3757 ad->stopflag = 1;
3758 if (ad->ScanSem) {
[771]3759 DosRequestMutexSem(ad->ScanSem, 15000);
[551]3760 DosCloseMutexSem(ad->ScanSem);
[191]3761 }
[551]3762 if (ad->busy)
[771]3763 DosSleep(100); //05 Aug 07 GKY 128
[551]3764 if (ad->hps) {
3765 GpiDeleteSetId(ad->hps, FIXED_FONT_LCID);
3766 GpiAssociate(ad->hps, 0);
3767 GpiDestroyPS(ad->hps);
[191]3768 }
[551]3769 hwndRestore = ad->hwndRestore;
3770 dontclose = ((ad->flags & 4) != 0) ? TRUE : FALSE;
[191]3771 FreeViewerMem(hwnd);
3772 WinSetWindowPtr(hwnd, QWL_USER, NULL);
3773 free(ad);
[2]3774 }
[551]3775 if (hwndRestore && hwndRestore != HWND_DESKTOP) {
[191]3776
3777 ULONG fl = SWP_SHOW | SWP_ACTIVATE | SWP_ZORDER;
3778 SWP swp;
3779
[551]3780 if (WinQueryWindowPos(hwndRestore, &swp)) {
[191]3781 if (!(swp.fl & SWP_MAXIMIZE))
3782 fl |= SWP_RESTORE;
3783 WinSetWindowPos(hwndRestore, HWND_TOP, 0, 0, 0, 0, fl);
3784 }
3785 }
3786 if (!dontclose &&
3787 ParentIsDesktop(hwnd, WinQueryWindow(WinQueryWindow(hwnd,
[551]3788 QW_PARENT),
3789 QW_PARENT))) {
3790 if (!PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID))
[191]3791 DosExit(EXIT_PROCESS, 1);
3792 }
3793 }
3794 break;
[2]3795 }
3796
[191]3797 return WinDefWindowProc(hwnd, msg, mp1, mp2);
[2]3798}
3799
[191]3800HWND StartViewer(HWND hwndParent, USHORT flags, CHAR * filename,
3801 HWND hwndRestore)
[83]3802{
[551]3803 HWND hwndFrame = (HWND) 0, hwndClient;
[191]3804 VIEWDATA *ad;
3805 ULONG FrameFlags = FCF_TITLEBAR | FCF_SYSMENU |
[551]3806 FCF_SIZEBORDER | FCF_MINMAX |
3807 FCF_NOBYTEALIGN | FCF_VERTSCROLL |
3808 FCF_MENU | FCF_ICON | FCF_ACCELTABLE | FCF_HORZSCROLL;
[2]3809
[191]3810 if (strcmp(realappname, FM3Str))
[2]3811 hwndParent = HWND_DESKTOP;
[191]3812 if (ParentIsDesktop(hwndParent, hwndParent))
[2]3813 FrameFlags |= FCF_TASKLIST;
3814// saymsg(MB_ENTER,HWND_DESKTOP,DEBUG_STRING,"\"%s\"\r\rparent %s desktop",filename,(ParentIsDesktop(hwndParent,hwndParent)) ? "is" : "isn't");
3815 hwndFrame = WinCreateStdWindow(hwndParent,
[191]3816 0,
3817 &FrameFlags,
[593]3818 WC_NEWVIEW,
[191]3819 GetPString(IDS_FM2VIEWERTITLETEXT),
3820 fwsAnimate,
[551]3821 FM3ModHandle, NEWVIEW_FRAME, &hwndClient);
3822 if (hwndFrame) {
[2]3823
[191]3824 HWND hwndMenu = WinWindowFromID(hwndFrame, FID_MENU);
[2]3825
[551]3826 if (!fToolbar && hwndMenu) {
[191]3827 WinSendMsg(hwndMenu, MM_DELETEITEM,
3828 MPFROM2SHORT(IDM_FINDFIRST, FALSE), MPVOID);
3829 WinSendMsg(hwndMenu, MM_DELETEITEM,
3830 MPFROM2SHORT(IDM_FINDNEXT, FALSE), MPVOID);
3831 WinSendMsg(hwndMenu, MM_DELETEITEM,
3832 MPFROM2SHORT(IDM_FINDPREV, FALSE), MPVOID);
3833 WinSendMsg(hwndMenu, MM_DELETEITEM,
3834 MPFROM2SHORT(IDM_SAVETOCLIP, FALSE), MPVOID);
[2]3835 }
[551]3836 ad = xmallocz(sizeof(VIEWDATA), pszSrcFile, __LINE__);
[350]3837 if (!ad) {
3838 WinDestroyWindow(hwndFrame);
[551]3839 hwndFrame = (HWND) 0;
[350]3840 }
3841 else {
[551]3842 ad->size = sizeof(VIEWDATA);
3843 ad->stopflag = 0;
3844 ad->multiplier = 1;
3845 ad->hwndRestore = hwndRestore;
3846 ad->hwndFrame = hwndFrame;
3847 ad->hwndParent = hwndParent;
3848 ad->clientfocused = TRUE;
3849 ad->oldwidth = -1;
3850 strcpy(ad->filename, filename);
3851 ad->flags = flags;
3852 if (ad->flags & 16)
3853 ad->hex = TRUE;
[191]3854 WinSetWindowPtr(hwndClient, QWL_USER, (PVOID) ad);
[551]3855 if (Firsttime) {
[2]3856
[191]3857 ULONG size;
[2]3858
[191]3859 size = sizeof(BOOL);
3860 PrfQueryProfileData(fmprof, appname, "Viewer.Sensitive",
3861 (PVOID) & Sensitive, &size);
3862 size = sizeof(USHORT);
3863 PrfQueryProfileData(fmprof, appname, "Viewer.Codepage",
3864 (PVOID) & Codepage, &size);
3865 size = sizeof(BOOL);
3866 PrfQueryProfileData(fmprof, appname, "Viewer.LiteralSearch",
3867 (PVOID) & LiteralSearch, &size);
3868 size = sizeof(BOOL);
3869 PrfQueryProfileData(fmprof, appname, "Viewer.AlsoSelect",
3870 (PVOID) & AlsoSelect, &size);
3871 size = sizeof(BOOL);
3872 PrfQueryProfileData(fmprof, appname, "Viewer.WrapOn",
3873 (PVOID) & WrapOn, &size);
3874 size = sizeof(BOOL);
3875 PrfQueryProfileData(fmprof, appname, "Viewer.IgnoreFTP",
3876 (PVOID) & IgnoreFTP, &size);
3877 size = sizeof(BOOL);
3878 PrfQueryProfileData(fmprof, appname, "Viewer.IgnoreHTTP",
3879 (PVOID) & IgnoreHTTP, &size);
3880 memset(&Fattrs, 0, sizeof(FATTRS));
3881 size = sizeof(FATTRS);
3882 Fattrs.usRecordLength = sizeof(FATTRS);
3883 Fattrs.lMaxBaselineExt = 16;
3884 Fattrs.lAveCharWidth = 8;
3885 Fattrs.usCodePage = Codepage;
3886 strcpy(Fattrs.szFacename, GetPString(IDS_SYSMONOTEXT));
3887 PrfQueryProfileData(fmprof, appname, "Viewer.Fattrs",
3888 (PVOID) & Fattrs, &size);
3889 size = sizeof(LONG) * COLORS_MAX;
3890 PrfQueryProfileData(fmprof, appname, "Viewer.Colors",
3891 (PVOID) Colors, &size);
3892 Firsttime = FALSE;
[2]3893 }
3894 {
[551]3895 ULONG size = sizeof(ad->searchtext);
[191]3896
3897 PrfQueryProfileData(fmprof, appname, "Viewer.Searchtext",
[551]3898 (PVOID) ad->searchtext, &size);
3899 ad->searchtext[sizeof(ad->searchtext) - 1] = 0;
[2]3900 }
[551]3901 ad->sensitive = Sensitive;
3902 ad->literalsearch = LiteralSearch;
3903 ad->fattrs = Fattrs;
3904 ad->alsoselect = AlsoSelect;
3905 ad->fattrs.usCodePage = Codepage;
3906 ad->wrapon = WrapOn;
3907 ad->ignorehttp = IgnoreHTTP;
3908 ad->ignoreftp = IgnoreFTP;
3909 memcpy(ad->colors, Colors, sizeof(LONG) * COLORS_MAX);
[191]3910 WinSetWindowPtr(hwndClient, QWL_USER, (PVOID) ad);
[350]3911 if (!WinSendMsg(hwndClient, UM_SETUP, MPVOID, MPVOID))
[551]3912 hwndFrame = (HWND) 0;
[350]3913 else {
[812]3914 //DosSleep(32);
[551]3915 if (!(FrameFlags & FCF_TASKLIST) && !(flags & 2)) {
[191]3916 SWP swp;
[551]3917
[191]3918 FillClient(hwndParent, &swp, NULL, FALSE);
3919 WinSetWindowPos(hwndFrame, HWND_TOP, swp.x, swp.y, swp.cx, swp.cy,
3920 SWP_SIZE | SWP_MOVE | SWP_SHOW | SWP_RESTORE |
3921 SWP_ZORDER | SWP_ACTIVATE);
3922 }
[551]3923 else if (FrameFlags & FCF_TASKLIST) {
[2]3924
[191]3925 SWP swp, swpD;
3926 ULONG size = sizeof(swp);
3927 LONG cxScreen, cyScreen;
[2]3928
[191]3929 WinQueryTaskSizePos(WinQueryAnchorBlock(hwndFrame), 0, &swp);
3930 if (PrfQueryProfileData(fmprof,
[551]3931 appname, "NewViewSizePos", &swpD, &size)) {
[191]3932 cxScreen = WinQuerySysValue(HWND_DESKTOP, SV_CXSCREEN);
3933 cyScreen = WinQuerySysValue(HWND_DESKTOP, SV_CYSCREEN);
3934 if (swp.x + swpD.cx > cxScreen)
3935 swp.x = cxScreen - swpD.cx;
3936 if (swp.y + swpD.cy > cyScreen)
3937 swp.y = cyScreen - swpD.cy;
3938 swp.cx = swpD.cx;
3939 swp.cy = swpD.cy;
3940 }
3941 WinSetWindowPos(hwndFrame, HWND_TOP, swp.x, swp.y, swp.cx, swp.cy,
3942 SWP_SIZE | SWP_MOVE | SWP_SHOW | SWP_ZORDER |
3943 SWP_ACTIVATE);
3944 }
[2]3945 }
3946 }
3947 }
3948 return hwndFrame;
3949}
[793]3950
3951#pragma alloc_text(NEWVIEW,ViewStatusProc,FreeViewerMem,LoadFileThread)
3952#pragma alloc_text(NEWVIEW,InitWindow,PaintLine,ViewWndProc)
3953#pragma alloc_text(NEWVIEW,ViewFrameWndProc,StartViewer,ReLineThread)
3954#pragma alloc_text(NEWVIEW,BuildAList,SearchThread,ClipboardThread,FindStrDlgProc)
3955#pragma alloc_text(NEWVIEW,BuildAList2,UrlDlgProc)
Note: See TracBrowser for help on using the repository browser.