1 /*@ S-nail - a mail user agent derived from Berkeley Mail.
2 *@ Header display, search, etc., related user commands.
4 * Copyright (c) 2000-2004 Gunnar Ritter, Freiburg i. Br., Germany.
5 * Copyright (c) 2012 - 2017 Steffen (Daode) Nurpmeso <steffen@sdaoden.eu>.
8 * Copyright (c) 1980, 1993
9 * The Regents of the University of California. All rights reserved.
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 * 3. Neither the name of the University nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 #define n_FILE cmd_headers
38 #ifndef HAVE_AMALGAMATION
44 /* ... And place the extracted date in `date' */
45 static void _parse_from_(struct message
*mp
, char date
[n_FROM_DATEBUF
]);
47 /* Print out the header of a specific message
48 * __hprf: handle *headline*
49 * __subject: return -1 if Subject: yet seen, otherwise smalloc()d Subject:
50 * __putindent: print out the indenting in threaded display */
51 static void _print_head(size_t yetprinted
, size_t msgno
, FILE *f
,
53 static void __hprf(size_t yetprinted
, char const *fmt
, size_t msgno
,
54 FILE *f
, bool_t threaded
, char const *attrlist
);
55 static char * __subject(struct message
*mp
, bool_t threaded
,
57 static int __putindent(FILE *fp
, struct message
*mp
, int maxwidth
);
59 static int _dispc(struct message
*mp
, char const *a
);
61 /* Shared `z' implementation */
62 static int a_cmd_scroll(char const *arg
, bool_t onlynew
);
64 /* Shared `headers' implementation */
65 static int _headers(int msgspec
);
68 _parse_from_(struct message
*mp
, char date
[n_FROM_DATEBUF
]) /* TODO line pool */
76 if ((ibuf
= setinput(&mb
, mp
, NEED_HEADER
)) != NULL
&&
77 (hlen
= readline_restart(ibuf
, &hline
, &hsize
, 0)) > 0)
78 extract_date_from_from_(hline
, hlen
, date
);
85 _print_head(size_t yetprinted
, size_t msgno
, FILE *f
, bool_t threaded
)
88 char attrlist
[attrlen
+1], *cp
;
92 if ((cp
= ok_vlook(attrlist
)) != NULL
) {
93 if (strlen(cp
) == attrlen
) {
94 memcpy(attrlist
, cp
, attrlen
+1);
97 n_err(_("*attrlist* is not of the correct length, using builtin\n"));
100 if (ok_blook(bsdcompat
) || ok_blook(bsdflags
)) {
101 char const bsdattr
[attrlen
+1] = "NU *HMFAT+-$~";
102 memcpy(attrlist
, bsdattr
, sizeof bsdattr
);
103 } else if (ok_blook(SYSV3
)) {
104 char const bsdattr
[attrlen
+1] = "NU *HMFAT+-$~";
105 memcpy(attrlist
, bsdattr
, sizeof bsdattr
);
106 n_OBSOLETE(_("*SYSV3*: please use *bsdcompat* or *bsdflags*, "
107 "or set *attrlist*"));
109 char const pattr
[attrlen
+1] = "NUROSPMFAT+-$~";
110 memcpy(attrlist
, pattr
, sizeof pattr
);
114 if ((fmt
= ok_vlook(headline
)) == NULL
) {
115 fmt
= ((ok_blook(bsdcompat
) || ok_blook(bsdheadline
))
116 ? "%>%a%m %-20f %16d %4l/%-5o %i%-S"
117 : "%>%a%m %-18f %-16d %4l/%-5o %i%-s");
120 __hprf(yetprinted
, fmt
, msgno
, f
, threaded
, attrlist
);
125 __hprf(size_t yetprinted
, char const *fmt
, size_t msgno
, FILE *f
,
126 bool_t threaded
, char const *attrlist
)
128 char buf
[16], datebuf
[n_FROM_DATEBUF
], cbuf
[8], *cp
, *subjline
;
129 char const *datefmt
, *date
, *name
, *fp
n_COLOUR( COMMA
*colo_tag
);
130 int i
, n
, s
, wleft
, subjlen
;
133 n_COLOUR( struct n_colour_pen
*cpen_new COMMA
*cpen_cur COMMA
*cpen_bas
; )
140 _LOOP_MASK
= (1<<4) - 1,
141 _SFMT
= 1<<4, /* It is 'S' */
142 /* For the simple byte-based counts in wleft and n we sometimes need
143 * adjustments to compensate for additional bytes of UTF-8 sequences */
144 _PUTCB_UTF8_SHIFT
= 5,
145 _PUTCB_UTF8_MASK
= 3<<5
150 if ((mp
= message
+ msgno
- 1) == dot
)
154 n_COLOUR( colo_tag
= NULL
; )
156 datefmt
= ok_vlook(datefield
);
158 if (datefmt
!= NULL
) {
159 fp
= hfield1("date", mp
);/* TODO use m_date field! */
165 date
= fakedate(datet
);
166 fp
= ok_vlook(datefield_markout_older
);
167 i
= (*datefmt
!= '\0');
169 i
|= (*fp
!= '\0') ? 2 | 4 : 2; /* XXX no magics */
171 /* May we strftime(3)? */
173 memcpy(&time_current
.tc_local
, localtime(&datet
),
174 sizeof time_current
.tc_local
);
176 if ((i
& 2) && (datet
> time_current
.tc_time
+ n_DATE_SECSDAY
||
177 #define _6M ((n_DATE_DAYSYEAR / 2) * n_DATE_SECSDAY)
178 (datet
+ _6M
< time_current
.tc_time
))) {
180 if ((datefmt
= (i
& 4) ? fp
: NULL
) == NULL
) {
181 memset(datebuf
, ' ', n_FROM_DATEBUF
); /* xxx ur */
182 memcpy(datebuf
+ 4, date
+ 4, 7);
183 datebuf
[4 + 7] = ' ';
184 memcpy(datebuf
+ 4 + 7 + 1, date
+ 20, 4);
185 datebuf
[4 + 7 + 1 + 4] = '\0';
188 n_COLOUR( colo_tag
= n_COLOUR_TAG_SUM_OLDER
; )
189 } else if ((i
& 1) == 0)
191 } else if (datet
== (time_t)0 && !(mp
->m_flag
& MNOFROM
)) {
192 /* TODO eliminate this path, query the FROM_ date in setptr(),
193 * TODO all other codepaths do so by themselves ALREADY ?????
194 * TODO assert(mp->m_time != 0);, then
195 * TODO ALSO changes behaviour of datefield_markout_older */
196 _parse_from_(mp
, datebuf
);
199 date
= fakedate(datet
);
203 if (name
!= NULL
&& ok_blook(showto
) && is_myname(skin(name
))) {
204 if ((cp
= hfield1("to", mp
)) != NULL
) {
214 name
= ok_blook(showname
) ? realname(name
) : prstr(skin(name
));
218 /* Detect the width of the non-format characters in *headline*;
219 * like that we can simply use putc() in the next loop, since we have
220 * already calculated their column widths (TODO it's sick) */
221 wleft
= subjlen
= n_scrnwidth
;
223 for (fp
= fmt
; *fp
!= '\0'; ++fp
) {
229 if (digitchar(*fp
)) {
232 n
= 10*n
+ *fp
- '0';
233 while (++fp
, digitchar(*fp
));
243 if (n_mb_cur_max
> 1) {
245 if ((s
= mbtowc(&wc
, fp
, n_mb_cur_max
)) == -1)
247 else if ((n
= wcwidth(wc
)) == -1)
259 /* Walk *headline*, producing output TODO not (really) MB safe */
261 if(n_COLOUR_IS_ACTIVE()){
263 colo_tag
= n_COLOUR_TAG_SUM_DOT
;
264 cpen_bas
= n_colour_pen_create(n_COLOUR_ID_SUM_HEADER
, colo_tag
);
265 n_colour_pen_put(cpen_new
= cpen_cur
= cpen_bas
);
267 cpen_new
= cpen_bas
= cpen_cur
= NULL
;
270 for (fp
= fmt
; *fp
!= '\0'; ++fp
) {
273 if ((c
= *fp
& 0xFF) != '%') {
275 if(n_COLOUR_IS_ACTIVE() && (cpen_new
= cpen_bas
) != cpen_cur
)
276 n_colour_pen_put(cpen_cur
= cpen_new
);
285 if ((c
= *++fp
) == '-') {
290 if (digitchar(*fp
)) {
292 n
= 10*n
+ *fp
- '0';
293 while (++fp
, digitchar(*fp
));
296 if ((c
= *fp
& 0xFF) == '\0')
306 if (flags
& _ISDOT
) {
308 if(n_COLOUR_IS_ACTIVE())
309 cpen_new
= n_colour_pen_create(n_COLOUR_ID_SUM_DOTMARK
,
312 if (n_psonce
& n_PSO_UNICODE
) {
314 /* 25B8;BLACK RIGHT-POINTING SMALL TRIANGLE: â–¸ */
315 cbuf
[1] = (char)0x96, cbuf
[2] = (char)0xB8;
317 /* 25C2;BLACK LEFT-POINTING SMALL TRIANGLE: â—‚ */
318 cbuf
[1] = (char)0x97, cbuf
[2] = (char)0x82;
321 flags
|= 2 << _PUTCB_UTF8_SHIFT
;
330 if (UICMP(32, n_ABS(n
), >, wleft
))
331 n
= (n
< 0) ? -wleft
: wleft
;
332 snprintf(buf
, sizeof buf
, "%u.%02u",
333 (mp
->m_spamscore
>> 8), (mp
->m_spamscore
& 0xFF));
334 n
= fprintf(f
, "%*s", n
, buf
);
335 wleft
= (n
>= 0) ? wleft
- n
: 0;
342 c
= _dispc(mp
, attrlist
);
345 if(n_COLOUR_IS_ACTIVE()){
346 if(cpen_new
== cpen_cur
)
348 if(cpen_new
!= cpen_cur
)
349 n_colour_pen_put(cpen_cur
= cpen_new
);
352 if (UICMP(32, n_ABS(n
), >, wleft
))
353 n
= (n
< 0) ? -wleft
: wleft
;
355 n
= fprintf(f
, "%*s", n
, cbuf
);
358 if ((n
= (flags
& _PUTCB_UTF8_MASK
)) != 0) {
359 n
>>= _PUTCB_UTF8_SHIFT
;
363 wleft
= 0; /* TODO I/O error.. ? break? */
366 if(n_COLOUR_IS_ACTIVE() && (cpen_new
= cpen_bas
) != cpen_cur
)
367 n_colour_pen_put(cpen_cur
= cpen_new
);
371 if (datefmt
!= NULL
) {
372 i
= strftime(datebuf
, sizeof datebuf
, datefmt
,
373 &time_current
.tc_local
);
377 n_err(_("Ignored date format, it excesses the target "
378 "buffer (%lu bytes)\n"), (ul_i
)sizeof(datebuf
));
383 if (UICMP(32, n_ABS(n
), >, wleft
))
384 n
= (n
< 0) ? -wleft
: wleft
;
385 n
= fprintf(f
, "%*.*s", n
, n_ABS(n
), date
);
386 wleft
= (n
>= 0) ? wleft
- n
: 0;
391 if (UICMP(32, n_ABS(n
), >, wleft
))
392 n
= (n
< 0) ? -wleft
: wleft
;
393 n
= fprintf(f
, "%*u", n
, (threaded
== 1 ? mp
->m_level
: 0));
394 wleft
= (n
>= 0) ? wleft
- n
: 0;
405 n
= (n
< 0) ? -wleft
: wleft
;
407 if (flags
& _ISTO
) /* XXX tr()! */
409 n
= fprintf(f
, "%s%s", ((flags
& _ISTO
) ? "To " : n_empty
),
410 colalign(name
, i
, n
, &wleft
));
413 else if (flags
& _ISTO
)
419 if(n_COLOUR_IS_ACTIVE()){
420 cpen_new
= n_colour_pen_create(n_COLOUR_ID_SUM_THREAD
, colo_tag
);
421 if(cpen_new
!= cpen_cur
)
422 n_colour_pen_put(cpen_cur
= cpen_new
);
425 n
= __putindent(f
, mp
, n_MIN(wleft
, (int)n_scrnwidth
- 60));
426 wleft
= (n
>= 0) ? wleft
- n
: 0;
428 if(n_COLOUR_IS_ACTIVE() && (cpen_new
= cpen_bas
) != cpen_cur
)
429 n_colour_pen_put(cpen_cur
= cpen_new
);
436 if (UICMP(32, n_ABS(n
), >, wleft
))
437 n
= (n
< 0) ? -wleft
: wleft
;
439 n
= fprintf(f
, "%*ld", n
, mp
->m_xlines
);
440 wleft
= (n
>= 0) ? wleft
- n
: 0;
452 for (i
= msgCount
; i
> 999; i
/= 10)
455 if (UICMP(32, n_ABS(n
), >, wleft
))
456 n
= (n
< 0) ? -wleft
: wleft
;
457 n
= fprintf(f
, "%*lu", n
, (ul_i
)msgno
);
458 wleft
= (n
>= 0) ? wleft
- n
: 0;
463 if (UICMP(32, n_ABS(n
), >, wleft
))
464 n
= (n
< 0) ? -wleft
: wleft
;
465 n
= fprintf(f
, "%*lu", n
, (ul_i
)mp
->m_xsize
);
466 wleft
= (n
>= 0) ? wleft
- n
: 0;
478 if (UICMP(32, n_ABS(n
), >, subjlen
))
479 n
= (n
< 0) ? -subjlen
: subjlen
;
481 n
-= (n
< 0) ? -2 : 2;
484 if (subjline
== NULL
)
485 subjline
= __subject(mp
, (threaded
&& (flags
& _IFMT
)), yetprinted
);
486 if (subjline
== (char*)-1) {
487 n
= fprintf(f
, "%*s", n
, n_empty
);
488 wleft
= (n
>= 0) ? wleft
- n
: 0;
490 n
= fprintf(f
, ((flags
& _SFMT
) ? "\"%s\"" : "%s"),
491 colalign(subjline
, n_ABS(n
), n
, &wleft
));
496 case 'T': { /* Message recipient flags */
497 /* We never can reuse "name" since it's the full name */
498 struct name
const *np
= lextract(hfield1("to", mp
), GTO
| GSKIN
);
502 for (; np
!= NULL
; np
= np
->n_flink
) {
503 switch (is_mlist(np
->n_name
, FAL0
)) {
504 case MLIST_SUBSCRIBED
: c
= 'S'; goto jputcb
;
505 case MLIST_KNOWN
: c
= 'L'; goto jputcb
;
513 np
= lextract(hfield1("cc", mp
), GCC
| GSKIN
);
520 for (i
= msgCount
; i
> 999; i
/= 10)
523 if (UICMP(32, n_ABS(n
), >, wleft
))
524 n
= (n
< 0) ? -wleft
: wleft
;
525 n
= fprintf(f
, "%*lu",
526 n
, (threaded
? (ul_i
)mp
->m_threadpos
: (ul_i
)msgno
));
527 wleft
= (n
>= 0) ? wleft
- n
: 0;
530 if (n_poption
& n_PO_D_V
)
531 n_err(_("Unkown *headline* format: %%%c\n"), c
);
540 n_COLOUR( n_colour_reset(); )
543 if (subjline
!= NULL
&& subjline
!= (char*)-1)
549 __subject(struct message
*mp
, bool_t threaded
, size_t yetprinted
)
557 if ((ms
= hfield1("subject", mp
)) == NULL
)
560 in
.l
= strlen(in
.s
= ms
);
561 mime_fromhdr(&in
, &out
, TD_ICONV
| TD_ISPR
);
564 if (!threaded
|| mp
->m_level
== 0)
567 /* In a display thread - check whether this message uses the same
568 * Subject: as it's parent or elder neighbour, suppress printing it if
569 * this is the case. To extend this a bit, ignore any leading Re: or
570 * Fwd: plus follow-up WS. Ignore invisible messages along the way */
571 ms
= n_UNCONST(subject_re_trim(n_UNCONST(ms
)));
573 for (; (mp
= prev_in_thread(mp
)) != NULL
&& yetprinted
-- > 0;) {
576 if (visible(mp
) && (os
= hfield1("subject", mp
)) != NULL
) {
580 in
.l
= strlen(in
.s
= os
);
581 mime_fromhdr(&in
, &oout
, TD_ICONV
| TD_ISPR
);
582 x
= asccasecmp(ms
, subject_re_trim(oout
.s
));
598 __putindent(FILE *fp
, struct message
*mp
, int maxwidth
)/* XXX no magic consts */
601 int *us
, indlvl
, indw
, i
, important
= MNEW
| MFLAGGED
;
605 if (mp
->m_level
== 0 || maxwidth
== 0) {
610 cs
= ac_alloc(mp
->m_level
);
611 us
= ac_alloc(mp
->m_level
* sizeof *us
);
614 if (mp
->m_younger
&& UICMP(32, i
+ 1, ==, mp
->m_younger
->m_level
)) {
615 if (mp
->m_parent
&& mp
->m_parent
->m_flag
& important
)
616 us
[i
] = mp
->m_flag
& important
? 0x2523 : 0x2520;
618 us
[i
] = mp
->m_flag
& important
? 0x251D : 0x251C;
621 if (mp
->m_parent
&& mp
->m_parent
->m_flag
& important
)
622 us
[i
] = mp
->m_flag
& important
? 0x2517 : 0x2516;
624 us
[i
] = mp
->m_flag
& important
? 0x2515 : 0x2514;
629 for (i
= mp
->m_level
- 2; i
>= 0; --i
) {
631 if (UICMP(32, i
, >, mq
->m_level
- 1)) {
636 if (mq
->m_parent
&& (mq
->m_parent
->m_flag
& important
))
649 for (indlvl
= indw
= 0; (ui8_t
)indlvl
< mp
->m_level
&& indw
< maxwidth
;
651 if (indw
< maxwidth
- 1)
652 indw
+= (int)putuc(us
[indlvl
], cs
[indlvl
] & 0xFF, fp
);
654 indw
+= (int)putuc(0x21B8, '^', fp
);
656 indw
+= putuc(0x25B8, '>', fp
);
666 _dispc(struct message
*mp
, char const *a
)
671 if ((mp
->m_flag
& (MREAD
| MNEW
)) == MREAD
)
673 if ((mp
->m_flag
& (MREAD
| MNEW
)) == (MREAD
| MNEW
))
675 if (mp
->m_flag
& MANSWERED
)
677 if (mp
->m_flag
& MDRAFTED
)
679 if ((mp
->m_flag
& (MREAD
| MNEW
)) == MNEW
)
681 if (!(mp
->m_flag
& (MREAD
| MNEW
)))
683 if (mp
->m_flag
& MSPAM
)
685 if (mp
->m_flag
& MSPAMUNSURE
)
687 if (mp
->m_flag
& MSAVED
)
689 if (mp
->m_flag
& MPRESERVE
)
691 if (mp
->m_flag
& (MBOX
| MBOXED
))
693 if (mp
->m_flag
& MFLAGGED
)
695 if (mb
.mb_threaded
== 1 && mp
->m_collapsed
> 0)
697 if (mb
.mb_threaded
== 1 && mp
->m_collapsed
< 0)
704 a_cmd_scroll(char const *arg
, bool_t onlynew
){
707 int msgspec
, size
, maxs
;
710 /* TODO scroll problem: we do not know whether + and $ have already reached
711 * TODO the last screen in threaded mode */
712 msgspec
= onlynew
? -1 : 0;
713 size
= (int)/*TODO*/n_screensize();
714 if((maxs
= msgCount
/ size
) > 0 && msgCount
% size
== 0)
745 case '1': case '2': case '3': case '4': case '5':
746 case '6': case '7': case '8': case '9': case '0':
749 if((n_idec_siz_cp(&l
, arg
, 0, NULL
750 ) & (n_IDEC_STATE_EMASK
| n_IDEC_STATE_CONSUMED
)
751 ) != n_IDEC_STATE_CONSUMED
)
753 if(l
> maxs
- (isabs
? 0 : _screen
))
755 _screen
= isabs
? (int)l
: _screen
+ l
;
761 fprintf(n_stdout
, _("On last screenful of messages\n"));
769 if((n_idec_siz_cp(&l
, ++arg
, 0, NULL
770 ) & (n_IDEC_STATE_EMASK
| n_IDEC_STATE_CONSUMED
)
771 ) != n_IDEC_STATE_CONSUMED
)
780 fprintf(n_stdout
, _("On first screenful of messages\n"));
787 n_err(_("Unrecognized scrolling command: %s\n"), arg
);
792 size
= _headers(msgspec
);
799 _headers(int msgspec
) /* TODO rework v15 */
801 ui32_t
volatile flag
;
802 int g
, k
, mesg
, size
;
803 int volatile lastg
= 1;
804 struct message
*mp
, *mq
, *lastmq
= NULL
;
805 enum mflag fl
= MNEW
| MFLAGGED
;
808 time_current_update(&time_current
, FAL0
);
811 size
= (int)/*TODO*/n_screensize();
814 #if 0 /* FIXME original code path */
827 if (mb
.mb_threaded
== 0) {
830 for (mp
= message
; PTRCMP(mp
, <, message
+ msgCount
); ++mp
)
834 if (mp
->m_flag
& fl
) {
838 if ((msgspec
> 0 && PTRCMP(mp
, ==, message
+ msgspec
- 1)) ||
839 (msgspec
== 0 && g
== k
) ||
840 (msgspec
== -2 && g
== k
+ size
&& lastmq
) ||
841 (msgspec
< 0 && g
>= k
&& (mp
->m_flag
& fl
) != 0))
845 if (lastmq
&& (msgspec
== -2 ||
846 (msgspec
== -1 && PTRCMP(mp
, ==, message
+ msgCount
)))) {
853 mesg
= (int)PTR2SIZE(mp
- message
);
854 if (PTRCMP(dot
, !=, message
+ msgspec
- 1)) { /* TODO really?? */
855 for (mq
= mp
; PTRCMP(mq
, <, message
+ msgCount
); ++mq
)
862 n_COLOUR( n_colour_env_create(n_COLOUR_CTX_SUM
, n_stdout
, FAL0
); )
864 for (; PTRCMP(mp
, <, message
+ msgCount
); ++mp
) {
868 if (UICMP(32, flag
++, >=, size
))
870 _print_head(0, mesg
, n_stdout
, 0);
874 n_COLOUR( n_colour_env_gut(); )
875 } else { /* threaded */
878 for (mp
= threadroot
; mp
; mp
= next_in_thread(mp
))
880 (mp
->m_collapsed
<= 0 ||
881 PTRCMP(mp
, ==, message
+ msgspec
- 1))) {
884 if (mp
->m_flag
& fl
) {
888 if ((msgspec
> 0 && PTRCMP(mp
, ==, message
+ msgspec
- 1)) ||
889 (msgspec
== 0 && g
== k
) ||
890 (msgspec
== -2 && g
== k
+ size
&& lastmq
) ||
891 (msgspec
< 0 && g
>= k
&& (mp
->m_flag
& fl
) != 0))
895 if (lastmq
&& (msgspec
== -2 ||
896 (msgspec
== -1 && PTRCMP(mp
, ==, message
+ msgCount
)))) {
902 if (PTRCMP(dot
, !=, message
+ msgspec
- 1)) { /* TODO really?? */
903 for (mq
= mp
; mq
; mq
= next_in_thread(mq
))
904 if (visible(mq
) && mq
->m_collapsed
<= 0) {
910 n_COLOUR( n_colour_env_create(n_COLOUR_CTX_SUM
, n_stdout
, FAL0
); )
914 (mp
->m_collapsed
<= 0 ||
915 PTRCMP(mp
, ==, message
+ msgspec
- 1))) {
916 if (UICMP(32, flag
++, >=, size
))
918 _print_head(flag
- 1, PTR2SIZE(mp
- message
+ 1), n_stdout
,
922 mp
= next_in_thread(mp
);
925 n_COLOUR( n_colour_env_gut(); )
929 fprintf(n_stdout
, _("No more mail.\n"));
930 if (n_pstate
& (n_PS_ROBOT
| n_PS_HOOK_MASK
))
943 rv
= print_header_group((int*)v
);
949 print_header_group(int *vector
)
954 assert(vector
!= NULL
&& vector
!= (void*)-1);
955 rv
= _headers(vector
[0]);
966 rv
= a_cmd_scroll(*(char const**)v
, FAL0
);
977 rv
= a_cmd_scroll(*(char const**)v
, TRU1
);
989 if (*(args
= v
) == '\0' || args
[1] != '\0') {
991 n_err(_("Synopsis: dotmove: up <-> or down <+> by one message\n"));
993 } else switch (args
[0]) {
997 fprintf(n_stdout
, _("At EOF\n"));
999 } else if (getmsglist(n_UNCONST(/*TODO*/ args
), msgvec
, 0) > 0) {
1000 setdot(message
+ msgvec
[0] - 1);
1002 rv
= c_headers(msgvec
);
1016 int *msgvec
= v
, *ip
, n
;
1018 FILE * volatile obuf
;
1021 time_current_update(&time_current
, FAL0
);
1025 if (n_psonce
& n_PSO_INTERACTIVE
) {
1026 if ((cp
= ok_vlook(crt
)) != NULL
) {
1029 for (n
= 0, ip
= msgvec
; *ip
!= 0; ++ip
)
1033 ib
= n_screensize();
1035 n_idec_uiz_cp(&ib
, cp
, 0, NULL
);
1036 if (UICMP(z
, n
, >, ib
) && (obuf
= n_pager_open()) == NULL
)
1041 /* Update dot before display so that the dotmark etc. are correct */
1042 for (ip
= msgvec
; *ip
!= 0; ++ip
)
1045 setdot(message
+ *ip
- 1);
1047 n_COLOUR( n_colour_env_create(n_COLOUR_CTX_SUM
, obuf
, obuf
!= n_stdout
); )
1049 for (n
= 0, ip
= msgvec
; *ip
!= 0; ++ip
) { /* TODO join into _print_head() */
1050 _print_head((size_t)n
++, (size_t)*ip
, obuf
, mb
.mb_threaded
);
1054 n_COLOUR( n_colour_env_gut(); )
1056 if (obuf
!= n_stdout
)
1057 n_pager_close(obuf
);
1063 print_headers(size_t bottom
, size_t topx
, bool_t only_marked
)
1068 time_current_update(&time_current
, FAL0
);
1070 n_COLOUR( n_colour_env_create(n_COLOUR_CTX_SUM
, n_stdout
, FAL0
); )
1072 for (printed
= 0; bottom
<= topx
; ++bottom
) {
1073 struct message
*mp
= message
+ bottom
- 1;
1075 if (!(mp
->m_flag
& MMARK
))
1077 } else if (!visible(mp
))
1079 _print_head(printed
++, bottom
, n_stdout
, FAL0
);
1083 n_COLOUR( n_colour_env_gut(); )