![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to art.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / contrib / rn|
Return to art.c CVS log | Up to [CSRG BSD Unix] / 43BSD / contrib / rn |
1.1 root 1: /* $Header: art.c,v 4.3.1.5 85/09/10 11:07:18 lwall Exp $
2: *
3: * $Log: art.c,v $
4: * Revision 4.3.1.5 85/09/10 11:07:18 lwall
5: * %m not restored on some returns.
6: *
7: * Revision 4.3.1.4 85/05/23 12:13:31 lwall
8: * shouldn't display article that's really a subdirectory.
9: *
10: * Revision 4.3.1.3 85/05/13 09:29:55 lwall
11: * Added CUSTOMLINES option.
12: *
13: * Revision 4.3.1.2 85/05/10 13:46:07 lwall
14: * Fixed header reparse bug on backpage.
15: *
16: * Revision 4.3.1.1 85/05/10 11:30:56 lwall
17: * Branch for patches.
18: *
19: * Revision 4.3 85/05/01 11:34:51 lwall
20: * Baseline for release with 4.3bsd.
21: *
22: */
23:
24: #include "EXTERN.h"
25: #include "common.h"
26: #include "rn.h"
27: #include "ngstuff.h"
28: #include "head.h"
29: #include "cheat.h"
30: #include "help.h"
31: #include "search.h"
32: #include "artio.h"
33: #include "ng.h"
34: #include "bits.h"
35: #include "final.h"
36: #include "artstate.h"
37: #include "rcstuff.h"
38: #include "term.h"
39: #include "sw.h"
40: #include "util.h"
41: #include "backpage.h"
42: #include "intrp.h"
43: #include "INTERN.h"
44: #include "art.h"
45:
46: /* page_switch() return values */
47:
48: #define PS_NORM 0
49: #define PS_ASK 1
50: #define PS_RAISE 2
51: #define PS_TOEND 3
52:
53: bool special = FALSE; /* is next page special length? */
54: int slines = 0; /* how long to make page when special */
55: ART_LINE highlight = -1; /* next line to be highlighted */
56: char *restart = Nullch; /* if nonzero, the place where last */
57: /* line left off on line split */
58: char *blinebeg; /* where in buffer current line began */
59: ART_POS alinebeg; /* where in file current line began */
60:
61: #ifdef INNERSEARCH
62: ART_POS innersearch = 0; /* artpos of end of line we found */
63: /* for 'g' command */
64: ART_LINE isrchline = 0; /* last line to display */
65: bool hide_everything = FALSE;
66: /* if set, do not write page now, */
67: /* but refresh when done with page */
68: COMPEX gcompex; /* in article search pattern */
69: #endif
70:
71: bool firstpage; /* is this the 1st page of article? */
72:
73: char art_buf[LBUFLEN]; /* place for article lines */
74:
75: void
76: art_init()
77: {
78: ;
79: }
80:
81: int
82: do_article()
83: {
84: register char *s;
85: ART_POS artsize; /* size in bytes of article */
86: bool hide_this_line = FALSE; /* hidden header line? */
87: ART_LINE linenum; /* line # on page, 1 origin */
88: #ifdef ULSMARTS
89: bool under_lining = FALSE;
90: /* are we underlining a word? */
91: #endif
92: register char *bufptr = art_buf;
93: /* pointer to input buffer */
94: register int outpos; /* column position of output */
95: static char prompt_buf[64]; /* place to hold prompt */
96: bool notesfiles = FALSE; /* might there be notesfiles junk? */
97: char oldmode = mode;
98:
99: #ifdef INNERSEARCH
100: register int outputok;
101: #endif
102:
103: if (fstat(artfp->_file,&filestat))
104: /* get article file stats */
105: return DA_CLEAN;
106: if (filestat.st_mode & S_IFMT != S_IFREG)
107: return DA_NORM;
108: artsize = filestat.st_size;
109: /* from that get article size */
110: sprintf(prompt_buf,
111: "%%sEnd of article %ld (of %ld)--what next? [%%s]",
112: (long)art,(long)lastart); /* format prompt string */
113: prompt = prompt_buf;
114: int_count = 0; /* interrupt count is 0 */
115: firstpage = (topline < 0);
116: for (;;) { /* for each page */
117: assert(art == openart);
118: if (do_fseek) {
119: #ifdef ASYNC_PARSE
120: parse_maybe(art); /* make sure header is ours */
121: #endif
122: artpos = vrdary(artline);
123: if (artpos < 0)
124: artpos = -artpos; /* labs(), anyone? */
125: if (firstpage)
126: artpos = (ART_POS)0;
127: fseek(artfp,artpos,0);
128: if (artpos < htype[PAST_HEADER].ht_minpos)
129: in_header = SOME_LINE;
130: do_fseek = FALSE;
131: restart = Nullch;
132: }
133: if (firstpage) {
134: if (firstline) {
135: interp(art_buf, (sizeof art_buf), firstline);
136: #ifdef CLEAREOL
137: maybe_eol(); /* PWP */
138: #endif CLEAREOL
139: fputs(art_buf,stdout) FLUSH;
140: artopen(art); /* rewind article in case interp */
141: /* forced a header parse */
142: }
143: else {
144: ART_NUM i;
145:
146: #ifdef CLEAREOL
147: maybe_eol(); /* PWP */
148: #endif CLEAREOL
149: printf("Article %ld",(long)art);
150: i = (((ART_NUM)toread[ng]) - 1 + was_read(art));
151: #ifdef DELAYMARK
152: if (i || dmcount) {
153: printf(" (%ld more",(long)i);
154: if (dmcount)
155: printf(" + %ld Marked to return)",(long)dmcount);
156: putchar(')');
157: }
158: #else
159: if (i)
160: printf(" (%ld more)",(long)i);
161: #endif
162: if (htype[NGS_LINE].ht_flags & HT_HIDE)
163: printf(" in %s", ngname);
164: fputs(":\n",stdout) FLUSH;
165: }
166: start_header(art);
167: forcelast = FALSE; /* we will have our day in court */
168: restart = Nullch;
169: artline = 0; /* start counting lines */
170: artpos = 0;
171: vwtary(artline,artpos); /* remember pos in file */
172: }
173: for (linenum=(firstpage?2:1);
174: in_header || (
175: #ifdef INNERSEARCH
176: innersearch ? innermore() :
177: #endif
178: linenum<(firstpage?initlines:(special?slines:LINES)) );
179: linenum++) { /* for each line on page */
180: if (int_count) { /* exit via interrupt? */
181: putchar('\n') FLUSH; /* get to left margin */
182: int_count = 0; /* reset interrupt count */
183: mode = oldmode;
184: return DA_NORM; /* skip out of loops */
185: }
186: if (restart) { /* did not finish last line? */
187: bufptr = restart; /* then start again here */
188: restart = Nullch; /* and reset the flag */
189: }
190: else { /* not a restart */
191: if (fgets(art_buf,LBUFLEN,artfp)==Nullch) {
192: /* if all done */
193: mode = oldmode;
194: return DA_NORM; /* skip out of loops */
195: }
196: bufptr = art_buf; /* so start at beginning */
197: art_buf[LBUFLEN-1] = '\0';
198: /* make sure string ends */
199: }
200: blinebeg = bufptr; /* remember where we began */
201: alinebeg = artpos; /* both in buffer and file */
202: if (in_header && bufptr == art_buf)
203: hide_this_line =
204: parseline(art_buf,do_hiding,hide_this_line);
205: else if (notesfiles && do_hiding &&
206: bufptr == art_buf && *art_buf == '#' &&
207: isupper(art_buf[1]) && art_buf[2] == ':' ) {
208: fgets(art_buf,sizeof(art_buf),artfp);
209: if (index(art_buf,'!') != Nullch)
210: fgets(art_buf,sizeof(art_buf),artfp);
211: htype[PAST_HEADER].ht_minpos = ftell(artfp);
212: /* exclude notesfiles droppings */
213: hide_this_line = TRUE; /* and do not print either */
214: notesfiles = FALSE;
215: }
216: #ifdef CUSTOMLINES
217: if (hideline && bufptr == art_buf &&
218: execute(&hide_compex,art_buf) )
219: hide_this_line = TRUE;
220: #endif
221: if (in_header && htype[in_header].ht_flags & HT_MAGIC) {
222: if (in_header == NGS_LINE) {
223: hide_this_line = (index(art_buf,',') == Nullch);
224: }
225: else if (in_header == EXPIR_LINE) {
226: if (!(htype[EXPIR_LINE].ht_flags & HT_HIDE))
227: hide_this_line = (strlen(art_buf) < 10);
228: }
229: }
230: if (in_header == SUBJ_LINE &&
231: htype[SUBJ_LINE].ht_flags & HT_MAGIC) {
232: /* is this the subject? */
233: int length;
234:
235: length = strlen(art_buf)-1;
236: artline++;
237: art_buf[length] = '\0'; /* wipe out newline */
238: #ifdef NOFIREWORKS
239: no_ulfire();
240: #endif
241: notesfiles =
242: (instr(&art_buf[length-10]," - (nf") != Nullch);
243: if (oldsubject) {
244: length += 7;
245: fputs("(SAME) ",stdout);
246: oldsubject = FALSE;
247: }
248: if (length+UG > COLS) { /* rarely true */
249: linenum++;
250: vwtary(artline,vrdary(artline-1)+COLS);
251: artline++;
252: }
253: s = art_buf + 8;
254: *s++ = '\0'; /* make into 2 strings */
255: #ifdef CLEAREOL
256: maybe_eol(); /* PWP */
257: #endif CLEAREOL
258: fputs(art_buf,stdout) FLUSH;
259: /* print up through : */
260: if (!UG)
261: putchar(' ');
262: underprint(s); /* print subject underlined */
263: putchar('\n') FLUSH; /* and finish the line */
264: }
265: else if (hide_this_line && do_hiding) {
266: /* do not print line? */
267: linenum--; /* compensate for linenum++ */
268: if (!in_header)
269: hide_this_line = FALSE;
270: }
271: else { /* just a normal line */
272: if (highlight==artline) { /* this line to be highlit? */
273: if (marking == STANDOUT) {
274: #ifdef NOFIREWORKS
275: if (erase_screen)
276: no_sofire();
277: #endif
278: standout();
279: }
280: else {
281: #ifdef NOFIREWORKS
282: if (erase_screen)
283: no_ulfire();
284: #endif
285: underline();
286: }
287: if (*bufptr == '\n')
288: putchar(' ');
289: }
290: #ifdef INNERSEARCH
291: outputok = !hide_everything;
292: /* get it into register, hopefully */
293: #endif
294: #ifdef CLEAREOL
295: #ifdef INNERSEARCH
296: if (outputok)
297: #endif
298: maybe_eol(); /* PWP */
299: #endif CLEAREOL
300: #ifdef CUSTOMLINES
301: if (pagestop && bufptr == art_buf &&
302: execute(&page_compex,art_buf) )
303: linenum = 32700;
304: #endif
305: for (outpos = 0; outpos < COLS; ) {
306: /* while line has room */
307: if (*bufptr >= ' ') { /* normal char? */
308: #ifdef ULSMARTS
309: if (*bufptr == '_') {
310: if (bufptr[1] == '\b') {
311: if (!under_lining && highlight!=artline
312: #ifdef INNERSEARCH
313: && outputok
314: #endif
315: ) {
316: under_lining++;
317: if (UG) {
318: if (bufptr != buf &&
319: bufptr[-1] == ' ') {
320: outpos--;
321: backspace();
322: }
323: }
324: underline();
325: }
326: bufptr += 2;
327: }
328: }
329: else {
330: if (under_lining) {
331: under_lining = 0;
332: un_underline();
333: if (UG) {
334: if (*bufptr == ' ')
335: goto skip_put;
336: outpos++;
337: }
338: }
339: }
340: #endif
341: #ifdef INNERSEARCH
342: if (outputok)
343: #endif
344: {
345: #ifdef ROTATION
346: if (rotate && !in_header
347: && isalpha(*bufptr)) {
348: if ((*bufptr & 31) <= 13)
349: putchar(*bufptr+13);
350: else
351: putchar(*bufptr-13);
352: }
353: else
354: #endif
355: putchar(*bufptr);
356: }
357: if (*UC && ((highlight==artline && marking == 1)
358: #ifdef ULSMARTS
359: || under_lining
360: #endif
361: )) {
362: backspace();
363: underchar();
364: }
365: skip_put:
366: bufptr++;
367: outpos++;
368: }
369: else if (*bufptr == '\n' || !*bufptr) {
370: /* newline? */
371: #ifdef ULSMARTS
372: if (under_lining) {
373: under_lining = 0;
374: un_underline();
375: }
376: #endif
377: #ifdef DEBUGGING
378: if (debug & DEB_INNERSRCH && outpos < COLS - 6) {
379: standout();
380: printf("%4d",artline);
381: un_standout();
382: }
383: #endif
384: #ifdef INNERSEARCH
385: if (outputok)
386: #endif
387: putchar('\n') FLUSH;
388: restart = 0;
389: outpos = 1000; /* signal normal \n */
390: }
391: else if (*bufptr == '\t') { /* tab? */
392: #ifdef INNERSEARCH
393: if (outputok)
394: #endif
395: putchar(*bufptr);
396: bufptr++;
397: outpos += 8 - outpos % 8;
398: }
399: else if (*bufptr == '\f') { /* form feed? */
400: #ifdef INNERSEARCH
401: if (outputok)
402: #endif
403: fputs("^L",stdout);
404: if (bufptr == blinebeg && highlight != artline)
405: linenum = 32700;
406: /* how is that for a magic number? */
407: bufptr++;
408: outpos += 2;
409: }
410: else { /* other control char */
411: #ifdef INNERSEARCH
412: if (outputok)
413: #endif
414: {
415: putchar('^');
416: if (highlight == artline && *UC && marking == 1) {
417: backspace();
418: underchar();
419: putchar(*bufptr+64);
420: backspace();
421: underchar();
422: }
423: else
424: putchar(*bufptr+64);
425: }
426: bufptr++;
427: outpos += 2;
428: }
429:
430: } /* end of column loop */
431:
432: if (outpos < 1000) {/* did line overflow? */
433: restart = bufptr;
434: /* restart here next time */
435: if (AM) { /* automatic margins on tty? */
436: if (!XN && *bufptr == '\n')
437: /* need we simulate XN? */
438: restart = 0;
439: /* skip the newline */
440: }
441: else { /* cursor just hangs there */
442: #ifdef INNERSEARCH
443: if (outputok)
444: #endif
445: putchar('\n') FLUSH;
446: /* so move it down ourselves */
447: if (*bufptr == '\n')
448: restart = 0;
449: /* simulate XN if need be */
450: }
451: #ifdef CLEAREOL
452: /* #ifdef INNERSEARCH
453: if (outputok)
454: #endif
455: maybe_eol(); */ /* PWP *//* comment this out for now
456: until I am sure it is
457: needed*/
458:
459: #endif CLEAREOL
460: }
461:
462: /* handle normal end of output line formalities */
463:
464: if (highlight == artline) {
465: /* were we highlighting line? */
466: if (marking == STANDOUT)
467: un_standout();
468: else
469: un_underline();
470: highlight = -1; /* no more we are */
471: }
472: artline++; /* count the line just printed */
473: if (artline - LINES + 1 > topline)
474: /* did we just scroll top line off? */
475: topline = artline - LINES + 1;
476: /* then recompute top line # */
477: }
478:
479: /* determine actual position in file */
480:
481: if (restart) /* stranded somewhere in the buffer? */
482: artpos += restart - blinebeg;
483: /* just calculate position */
484: else /* no, ftell will do */
485: artpos = ftell(artfp);
486: /* so do ftell */
487: vwtary(artline,artpos); /* remember pos in file */
488: } /* end of line loop */
489:
490: #ifdef INNERSEARCH
491: innersearch = 0;
492: if (hide_everything) {
493: hide_everything = FALSE;
494: *buf = Ctl('l');
495: goto fake_command;
496: }
497: #endif
498: if (linenum >= 32700)/* did last line have formfeed? */
499: vwtary(artline-1,-vrdary(artline-1));
500: /* remember by negating pos in file */
501:
502: special = FALSE; /* end of page, so reset page length */
503: firstpage = FALSE; /* and say it is not 1st time thru */
504:
505: /* extra loop bombout */
506:
507: if (artpos == artsize) {/* did we just now reach EOF? */
508: mode = oldmode;
509: return DA_NORM; /* avoid --MORE--(100%) */
510: }
511:
512: /* not done with this article, so pretend we are a pager */
513:
514: reask_pager:
515: unflush_output(); /* disable any ^O in effect */
516: standout(); /* enter standout mode */
517: printf("--MORE--(%ld%%)",(long)(artpos*100/artsize));
518: un_standout(); /* leave standout mode */
519: fflush(stdout);
520: /* reinp_pager: /* unused, commented for lint */
521: eat_typeahead();
522: #ifdef DEBUGGING
523: if (debug & DEB_CHECKPOINTING) {
524: printf("(%d %d %d)",checkcount,linenum,artline);
525: fflush(stdout);
526: }
527: #endif
528: if (checkcount >= docheckwhen &&
529: linenum == LINES &&
530: (artline > 40 || checkcount >= docheckwhen+10) ) {
531: /* while he is reading a whole page */
532: /* in an article he is interested in */
533: checkcount = 0;
534: checkpoint_rc(); /* update .newsrc */
535: }
536: collect_subjects(); /* loads subject cache until */
537: /* input is pending */
538: mode = 'p';
539: getcmd(buf);
540: if (errno) {
541: if (LINES < 100 && !int_count)
542: *buf = '\f';/* on CONT fake up refresh */
543: else {
544: *buf = 'q'; /* on INTR or paper just quit */
545: }
546: }
547: carriage_return();
548: #ifndef CLEAREOL
549: erase_eol(); /* and erase the prompt */
550: #else
551: if (erase_screen && can_home_clear) /* PWP was here */
552: clear_rest();
553: else
554: erase_eol(); /* and erase the prompt */
555: #endif CLEAREOL
556: fflush(stdout);
557:
558: fake_command: /* used by innersearch */
559:
560: /* parse and process pager command */
561:
562: switch (page_switch()) {
563: case PS_ASK: /* reprompt "--MORE--..." */
564: goto reask_pager;
565: case PS_RAISE: /* reparse on article level */
566: mode = oldmode;
567: return DA_RAISE;
568: case PS_TOEND: /* fast pager loop exit */
569: mode = oldmode;
570: return DA_TOEND;
571: case PS_NORM: /* display more article */
572: break;
573: }
574: } /* end of page loop */
575: }
576:
577: /* process pager commands */
578:
579: int
580: page_switch()
581: {
582: register char *s;
583:
584: switch (*buf) {
585: case 'd':
586: case Ctl('d'): /* half page */
587: special = TRUE;
588: slines = LINES / 2 + 1;
589: if (marking && *blinebeg != '\f'
590: #ifdef CUSTOMLINES
591: && (!pagestop || blinebeg != art_buf ||
592: !execute(&page_compex,blinebeg))
593: #endif
594: ) {
595: up_line();
596: highlight = --artline;
597: restart = blinebeg;
598: artpos = alinebeg;
599: }
600: return PS_NORM;
601: case '!': /* shell escape */
602: escapade();
603: return PS_ASK;
604: #ifdef INNERSEARCH
605: case Ctl('i'):
606: gline = 3;
607: sprintf(cmd_buf,"^[^%c]",*blinebeg);
608: compile(&gcompex,cmd_buf,TRUE,TRUE);
609: goto caseG;
610: case Ctl('g'):
611: gline = 3;
612: compile(&gcompex,"^Subject:",TRUE,TRUE);
613: goto caseG;
614: case 'g': /* in-article search */
615: if (!finish_command(FALSE))/* get rest of command */
616: return PS_ASK;
617: s = buf+1;
618: if (isspace(*s))
619: s++;
620: if ((s = compile(&gcompex,s,TRUE,TRUE)) != Nullch) {
621: /* compile regular expression */
622: printf("\n%s\n",s) FLUSH;
623: return PS_ASK;
624: }
625: carriage_return();
626: erase_eol(); /* erase the prompt */
627: /* FALL THROUGH */
628: caseG:
629: case 'G': {
630: /* ART_LINE lines_to_skip = 0; */
631: ART_POS start_where;
632:
633: if (gline < 0 || gline > LINES-2)
634: gline = LINES-2;
635: #ifdef DEBUGGING
636: if (debug & DEB_INNERSRCH)
637: printf("Start here? %d >=? %d\n",topline + gline + 1,artline)
638: FLUSH;
639: #endif
640: if (*buf == Ctl('i') || topline+gline+1 >= artline)
641: start_where = artpos;
642: /* in case we had a line wrap */
643: else {
644: start_where = vrdary(topline+gline+1);
645: if (start_where < 0)
646: start_where = -start_where;
647: }
648: if (start_where < htype[PAST_HEADER].ht_minpos)
649: start_where = htype[PAST_HEADER].ht_minpos;
650: fseek(artfp,(long)start_where,0);
651: innersearch = 0; /* assume not found */
652: while (fgets(buf, sizeof buf, artfp) != Nullch) {
653: /* lines_to_skip++; NOT USED NOW */
654: #ifdef DEBUGGING
655: if (debug & DEB_INNERSRCH)
656: printf("Test %s",buf) FLUSH;
657: #endif
658: if (execute(&gcompex,buf) != Nullch) {
659: innersearch = ftell(artfp);
660: break;
661: }
662: }
663: if (!innersearch) {
664: fseek(artfp,artpos,0);
665: fputs("(Not found)",stdout) FLUSH;
666: return PS_ASK;
667: }
668: #ifdef DEBUGGING
669: if (debug & DEB_INNERSRCH)
670: printf("On page? %ld <=? %ld\n",(long)innersearch,(long)artpos)
671: FLUSH;
672: #endif
673: if (innersearch <= artpos) { /* already on page? */
674: if (innersearch < artpos) {
675: artline = topline+1;
676: while (vrdary(artline) < innersearch)
677: artline++;
678: }
679: highlight = artline - 1;
680: #ifdef DEBUGGING
681: if (debug & DEB_INNERSRCH)
682: printf("@ %d\n",highlight) FLUSH;
683: #endif
684: topline = highlight - gline;
685: if (topline < -1)
686: topline = -1;
687: *buf = '\f'; /* fake up a refresh */
688: innersearch = 0;
689: return page_switch();
690: }
691: else { /* who knows how many lines it is? */
692: do_fseek = TRUE;
693: hide_everything = TRUE;
694: }
695: return PS_NORM;
696: }
697: #else
698: case 'g': case 'G': case Ctl('g'):
699: notincl("g");
700: return PS_ASK;
701: #endif
702: case '\n': /* one line */
703: special = TRUE;
704: slines = 2;
705: return PS_NORM;
706: #ifdef ROTATION
707: case 'X':
708: rotate = !rotate;
709: /* FALL THROUGH */
710: #endif
711: case 'l':
712: case '\f': /* refresh screen */
713: #ifdef DEBUGGING
714: if (debug & DEB_INNERSRCH) {
715: printf("Topline = %d",topline) FLUSH;
716: gets(buf);
717: }
718: #endif
719: clear();
720: do_fseek = TRUE;
721: artline = topline;
722: if (artline < 0)
723: artline = 0;
724: firstpage = (topline < 0);
725: return PS_NORM;
726: case 'b':
727: case '\b': /* I like backspace for this -- PWP */
728: /* Leaving it undocumented in case */
729: /* I want to steal the key--LAW */
730: case Ctl('b'): { /* back up a page */
731: ART_LINE target;
732:
733: #ifndef CLEAREOL
734: clear();
735: #else
736: if (can_home_clear) /* if we can home do it -- PWP */
737: home_cursor();
738: else
739: clear();
740:
741: #endif CLEAREOL
742: do_fseek = TRUE; /* reposition article file */
743: target = topline - (LINES - 2);
744: artline = topline;
745: do {
746: artline--;
747: } while (artline >= 0 && artline > target &&
748: vrdary(artline-1) >= 0);
749: topline = artline;
750: /* remember top line of screen */
751: /* (line # within article file) */
752: if (artline < 0)
753: artline = 0;
754: firstpage = (topline < 0);
755: return PS_NORM;
756: }
757: case 'h': { /* help */
758: int cmd;
759:
760: if ((cmd = help_page()) > 0)
761: pushchar(cmd);
762: return PS_ASK;
763: }
764: case '\177':
765: case '\0': /* treat del,break as 'n' */
766: *buf = 'n';
767: /* FALL THROUGH */
768: case 'k': case 'K':
769: case 'n': case 'N': case Ctl('n'):
770: case 's': case 'S':
771: case 'u':
772: case 'w': case 'W':
773: case '|':
774: mark_as_read(art); /* mark article as read */
775: /* FALL THROUGH */
776: case '#':
777: case '$':
778: case '&':
779: case '-':
780: case '.':
781: case '/':
782: case '1': case '2': case '3': case '4': case '5':
783: case '6': case '7': case '8': case '9':
784: case '=':
785: case '?':
786: case 'c': case 'C':
787: case 'f': case 'F':
788: case 'j':
789: case Ctl('k'):
790: case 'm': case 'M':
791: case 'p': case 'P': case Ctl('p'):
792: case 'Q':
793: case 'r': case 'R': case Ctl('r'):
794: case 'v':
795: case 'Y':
796: #ifndef ROTATION
797: case 'x': case 'X':
798: #endif
799: case Ctl('x'):
800: case '^':
801:
802: #ifdef ROTATION
803: rotate = FALSE;
804: #endif
805: reread = FALSE;
806: do_hiding = TRUE;
807: if (index("nNpP",*buf) == Nullch &&
808: index("wWsS!&|/?123456789.",*buf) != Nullch) {
809: setdfltcmd();
810: standout(); /* enter standout mode */
811: printf(prompt,mailcall,dfltcmd);
812: /* print prompt, whatever it is */
813: un_standout(); /* leave standout mode */
814: putchar(' ');
815: fflush(stdout);
816: }
817: return PS_RAISE; /* and pretend we were at end */
818: #ifdef ROTATION
819: case 'x':
820: rotate = TRUE;
821: /* FALL THROUGH */
822: #endif
823: case 'y':
824: case Ctl('v'): /* I like emacs -- PWP */
825: /* Leaving it undocumented in case */
826: /* I want to steal the key--LAW */
827: case ' ': /* continue current article */
828: if (erase_screen) { /* -e? */
829: #ifndef CLEAREOL
830: clear(); /* clear screen */
831: #else
832: if (can_home_clear) /* if we can home do it -- PWP */
833: home_cursor();
834: else
835: clear(); /* else clear screen */
836:
837: #endif CLEAREOL
838: if (*blinebeg != '\f'
839: #ifdef CUSTOMLINES
840: && (!pagestop || blinebeg != art_buf ||
841: !execute(&page_compex,blinebeg))
842: #endif
843: ) {
844: restart = blinebeg;
845: artline--; /* restart this line */
846: artpos = alinebeg;
847: if (marking) /* and mark repeated line */
848: highlight = artline;
849: }
850: topline = artline;
851: /* and remember top line of screen */
852: /* (line # within article file) */
853: }
854: else if (marking && *blinebeg != '\f'
855: #ifdef CUSTOMLINES
856: && (!pagestop || blinebeg != art_buf ||
857: !execute(&page_compex,blinebeg))
858: #endif
859: ) {
860: /* are we marking repeats? */
861: up_line(); /* go up one line */
862: highlight = --artline;/* and get ready to highlight */
863: restart = blinebeg; /* the old line */
864: artpos = alinebeg;
865: }
866: return PS_NORM;
867: case 'q': /* quit this article? */
868: do_hiding = TRUE;
869: return PS_TOEND;
870: default:
871: fputs(hforhelp,stdout) FLUSH;
872: settle_down();
873: return PS_ASK;
874: }
875: }
876:
877: #ifdef INNERSEARCH
878: bool
879: innermore()
880: {
881: if (artpos < innersearch) { /* not even on page yet? */
882: #ifdef DEBUGGING
883: if (debug & DEB_INNERSRCH)
884: printf("Not on page %ld < %ld\n",(long)artpos,(long)innersearch)
885: FLUSH;
886: #endif
887: return TRUE;
888: }
889: if (artpos == innersearch) { /* just got onto page? */
890: isrchline = artline; /* remember first line after */
891: highlight = artline - 1;
892: #ifdef DEBUGGING
893: if (debug & DEB_INNERSRCH)
894: printf("There it is %ld = %ld, %d @ %d\n",(long)artpos,
895: (long)innersearch,hide_everything,highlight) FLUSH;
896: #endif
897: if (hide_everything) { /* forced refresh? */
898: topline = highlight - gline;
899: if (topline < -1)
900: topline = -1;
901: return FALSE; /* let refresh do it all */
902: }
903: }
904: #ifdef DEBUGGING
905: if (debug & DEB_INNERSRCH)
906: printf("Not far enough? %d <? %d + %d\n",artline,isrchline,gline)
907: FLUSH;
908: #endif
909: if (artline < isrchline + gline) {
910: return TRUE;
911: }
912: return FALSE;
913: }
914: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.