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 - 2018 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 built-in\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
= n_time_ctime(datet
, NULL
);
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 /* This localtime(3) should not fail since rfctime(3).. but .. */
177 /* TODO the datetime stuff is horror: mails should be parsed into
178 * TODO an object tree, and date: etc. have a datetime object, which
179 * TODO verifies upon parse time; then ALL occurrences of datetime are
180 * TODO valid all through the program; and: to_wire, to_user! */
183 if((tmp
= localtime(&datet2
)) == NULL
){
185 goto jredo_localtime
;
187 memcpy(&time_current
.tc_local
, tmp
, sizeof(*tmp
));
191 (UICMP(64,datet
, >, time_current
.tc_time
+ n_DATE_SECSDAY
) ||
192 #define _6M ((n_DATE_DAYSYEAR / 2) * n_DATE_SECSDAY)
193 UICMP(64,datet
+ _6M
, <, time_current
.tc_time
))) {
195 if ((datefmt
= (i
& 4) ? fp
: NULL
) == NULL
) {
196 memset(datebuf
, ' ', n_FROM_DATEBUF
); /* xxx ur */
197 memcpy(datebuf
+ 4, date
+ 4, 7);
198 datebuf
[4 + 7] = ' ';
199 memcpy(datebuf
+ 4 + 7 + 1, date
+ 20, 4);
200 datebuf
[4 + 7 + 1 + 4] = '\0';
203 n_COLOUR( colo_tag
= n_COLOUR_TAG_SUM_OLDER
; )
204 } else if ((i
& 1) == 0)
206 } else if (datet
== (time_t)0 && !(mp
->m_flag
& MNOFROM
)) {
207 /* TODO eliminate this path, query the FROM_ date in setptr(),
208 * TODO all other codepaths do so by themselves ALREADY ?????
209 * TODO assert(mp->m_time != 0);, then
210 * TODO ALSO changes behaviour of datefield_markout_older */
211 _parse_from_(mp
, datebuf
);
214 date
= n_time_ctime(datet
, NULL
);
218 if (name
!= NULL
&& ok_blook(showto
) && n_is_myname(skin(name
))) {
219 if ((cp
= hfield1("to", mp
)) != NULL
) {
229 name
= ok_blook(showname
) ? realname(name
) : prstr(skin(name
));
233 /* Detect the width of the non-format characters in *headline*;
234 * like that we can simply use putc() in the next loop, since we have
235 * already calculated their column widths (TODO it's sick) */
236 wleft
= subjlen
= n_scrnwidth
;
238 for (fp
= fmt
; *fp
!= '\0'; ++fp
) {
244 if (digitchar(*fp
)) {
247 n
= 10*n
+ *fp
- '0';
248 while (++fp
, digitchar(*fp
));
258 if (n_mb_cur_max
> 1) {
260 if ((s
= mbtowc(&wc
, fp
, n_mb_cur_max
)) == -1)
262 else if ((n
= wcwidth(wc
)) == -1)
274 /* Walk *headline*, producing output TODO not (really) MB safe */
276 if(n_COLOUR_IS_ACTIVE()){
278 colo_tag
= n_COLOUR_TAG_SUM_DOT
;
279 cpen_bas
= n_colour_pen_create(n_COLOUR_ID_SUM_HEADER
, colo_tag
);
280 n_colour_pen_put(cpen_new
= cpen_cur
= cpen_bas
);
282 cpen_new
= cpen_bas
= cpen_cur
= NULL
;
285 for (fp
= fmt
; *fp
!= '\0'; ++fp
) {
288 if ((c
= *fp
& 0xFF) != '%') {
290 if(n_COLOUR_IS_ACTIVE() && (cpen_new
= cpen_bas
) != cpen_cur
)
291 n_colour_pen_put(cpen_cur
= cpen_new
);
300 if ((c
= *++fp
) == '-') {
305 if (digitchar(*fp
)) {
307 n
= 10*n
+ *fp
- '0';
308 while (++fp
, digitchar(*fp
));
311 if ((c
= *fp
& 0xFF) == '\0')
321 if (flags
& _ISDOT
) {
323 if(n_COLOUR_IS_ACTIVE())
324 cpen_new
= n_colour_pen_create(n_COLOUR_ID_SUM_DOTMARK
,
327 if (n_psonce
& n_PSO_UNICODE
) {
329 /* 25B8;BLACK RIGHT-POINTING SMALL TRIANGLE: â–¸ */
330 cbuf
[1] = (char)0x96, cbuf
[2] = (char)0xB8;
332 /* 25C2;BLACK LEFT-POINTING SMALL TRIANGLE: â—‚ */
333 cbuf
[1] = (char)0x97, cbuf
[2] = (char)0x82;
336 flags
|= 2 << _PUTCB_UTF8_SHIFT
;
345 if (UICMP(32, n_ABS(n
), >, wleft
))
346 n
= (n
< 0) ? -wleft
: wleft
;
347 snprintf(buf
, sizeof buf
, "%u.%02u",
348 (mp
->m_spamscore
>> 8), (mp
->m_spamscore
& 0xFF));
349 n
= fprintf(f
, "%*s", n
, buf
);
350 wleft
= (n
>= 0) ? wleft
- n
: 0;
357 c
= _dispc(mp
, attrlist
);
360 if(n_COLOUR_IS_ACTIVE()){
361 if(cpen_new
== cpen_cur
)
363 if(cpen_new
!= cpen_cur
)
364 n_colour_pen_put(cpen_cur
= cpen_new
);
367 if (UICMP(32, n_ABS(n
), >, wleft
))
368 n
= (n
< 0) ? -wleft
: wleft
;
370 n
= fprintf(f
, "%*s", n
, cbuf
);
373 if ((n
= (flags
& _PUTCB_UTF8_MASK
)) != 0) {
374 n
>>= _PUTCB_UTF8_SHIFT
;
378 wleft
= 0; /* TODO I/O error.. ? break? */
381 if(n_COLOUR_IS_ACTIVE() && (cpen_new
= cpen_bas
) != cpen_cur
)
382 n_colour_pen_put(cpen_cur
= cpen_new
);
386 if (datefmt
!= NULL
) {
387 i
= strftime(datebuf
, sizeof datebuf
, datefmt
,
388 &time_current
.tc_local
);
392 n_err(_("Ignoring date format, it is either empty or "
393 "excesses buffer size (%lu bytes)\n"),
394 (ul_i
)sizeof(datebuf
));
399 if (UICMP(32, n_ABS(n
), >, wleft
))
400 n
= (n
< 0) ? -wleft
: wleft
;
401 n
= fprintf(f
, "%*.*s", n
, n_ABS(n
), date
);
402 wleft
= (n
>= 0) ? wleft
- n
: 0;
407 if (UICMP(32, n_ABS(n
), >, wleft
))
408 n
= (n
< 0) ? -wleft
: wleft
;
409 n
= fprintf(f
, "%*u", n
, (threaded
== 1 ? mp
->m_level
: 0));
410 wleft
= (n
>= 0) ? wleft
- n
: 0;
421 n
= (n
< 0) ? -wleft
: wleft
;
423 if (flags
& _ISTO
) /* XXX tr()! */
425 n
= fprintf(f
, "%s%s", ((flags
& _ISTO
) ? "To " : n_empty
),
426 colalign(name
, i
, n
, &wleft
));
429 else if (flags
& _ISTO
)
435 if(n_COLOUR_IS_ACTIVE()){
436 cpen_new
= n_colour_pen_create(n_COLOUR_ID_SUM_THREAD
, colo_tag
);
437 if(cpen_new
!= cpen_cur
)
438 n_colour_pen_put(cpen_cur
= cpen_new
);
441 n
= __putindent(f
, mp
, n_MIN(wleft
, (int)n_scrnwidth
- 60));
442 wleft
= (n
>= 0) ? wleft
- n
: 0;
444 if(n_COLOUR_IS_ACTIVE() && (cpen_new
= cpen_bas
) != cpen_cur
)
445 n_colour_pen_put(cpen_cur
= cpen_new
);
452 if (UICMP(32, n_ABS(n
), >, wleft
))
453 n
= (n
< 0) ? -wleft
: wleft
;
455 n
= fprintf(f
, "%*ld", n
, mp
->m_xlines
);
456 wleft
= (n
>= 0) ? wleft
- n
: 0;
468 for (i
= msgCount
; i
> 999; i
/= 10)
471 if (UICMP(32, n_ABS(n
), >, wleft
))
472 n
= (n
< 0) ? -wleft
: wleft
;
473 n
= fprintf(f
, "%*lu", n
, (ul_i
)msgno
);
474 wleft
= (n
>= 0) ? wleft
- n
: 0;
479 if (UICMP(32, n_ABS(n
), >, wleft
))
480 n
= (n
< 0) ? -wleft
: wleft
;
481 n
= fprintf(f
, "%*lu", n
, (ul_i
)mp
->m_xsize
);
482 wleft
= (n
>= 0) ? wleft
- n
: 0;
494 if (UICMP(32, n_ABS(n
), >, subjlen
))
495 n
= (n
< 0) ? -subjlen
: subjlen
;
497 n
-= (n
< 0) ? -2 : 2;
500 if (subjline
== NULL
)
501 subjline
= __subject(mp
, (threaded
&& (flags
& _IFMT
)), yetprinted
);
502 if (subjline
== (char*)-1) {
503 n
= fprintf(f
, "%*s", n
, n_empty
);
504 wleft
= (n
>= 0) ? wleft
- n
: 0;
506 n
= fprintf(f
, ((flags
& _SFMT
) ? "\"%s\"" : "%s"),
507 colalign(subjline
, n_ABS(n
), n
, &wleft
));
512 case 'T': /* Message recipient flags */
513 switch(is_mlist_mp(mp
, MLIST_OTHER
)){
514 case MLIST_OTHER
: c
= ' '; break;
515 case MLIST_KNOWN
: c
= 'l'; break;
516 case MLIST_SUBSCRIBED
: c
= 'L'; break;
523 for (i
= msgCount
; i
> 999; i
/= 10)
526 if (UICMP(32, n_ABS(n
), >, wleft
))
527 n
= (n
< 0) ? -wleft
: wleft
;
528 n
= fprintf(f
, "%*lu",
529 n
, (threaded
? (ul_i
)mp
->m_threadpos
: (ul_i
)msgno
));
530 wleft
= (n
>= 0) ? wleft
- n
: 0;
536 if (UICMP(32, n_ABS(n
), >, wleft
))
537 n
= (n
< 0) ? -wleft
: wleft
;
538 n
= fprintf(f
, "%*lu", n
, mp
->m_uid
);
539 wleft
= (n
>= 0) ? wleft
- n
: 0;
546 if (n_poption
& n_PO_D_V
)
547 n_err(_("Unknown *headline* format: %%%c\n"), c
);
556 n_COLOUR( n_colour_reset(); )
559 if (subjline
!= NULL
&& subjline
!= (char*)-1)
565 __subject(struct message
*mp
, bool_t threaded
, size_t yetprinted
)
573 if ((ms
= hfield1("subject", mp
)) == NULL
)
576 in
.l
= strlen(in
.s
= ms
);
577 mime_fromhdr(&in
, &out
, TD_ICONV
| TD_ISPR
);
580 if (!threaded
|| mp
->m_level
== 0)
583 /* In a display thread - check whether this message uses the same
584 * Subject: as it's parent or elder neighbour, suppress printing it if
585 * this is the case. To extend this a bit, ignore any leading Re: or
586 * Fwd: plus follow-up WS. Ignore invisible messages along the way */
587 ms
= n_UNCONST(subject_re_trim(n_UNCONST(ms
)));
589 for (; (mp
= prev_in_thread(mp
)) != NULL
&& yetprinted
-- > 0;) {
592 if (visible(mp
) && (os
= hfield1("subject", mp
)) != NULL
) {
596 in
.l
= strlen(in
.s
= os
);
597 mime_fromhdr(&in
, &oout
, TD_ICONV
| TD_ISPR
);
598 x
= asccasecmp(ms
, subject_re_trim(oout
.s
));
614 __putindent(FILE *fp
, struct message
*mp
, int maxwidth
)/* XXX no magic consts */
617 int *us
, indlvl
, indw
, i
, important
= MNEW
| MFLAGGED
;
621 if (mp
->m_level
== 0 || maxwidth
== 0) {
626 cs
= ac_alloc(mp
->m_level
);
627 us
= ac_alloc(mp
->m_level
* sizeof *us
);
630 if (mp
->m_younger
&& UICMP(32, i
+ 1, ==, mp
->m_younger
->m_level
)) {
631 if (mp
->m_parent
&& mp
->m_parent
->m_flag
& important
)
632 us
[i
] = mp
->m_flag
& important
? 0x2523 : 0x2520;
634 us
[i
] = mp
->m_flag
& important
? 0x251D : 0x251C;
637 if (mp
->m_parent
&& mp
->m_parent
->m_flag
& important
)
638 us
[i
] = mp
->m_flag
& important
? 0x2517 : 0x2516;
640 us
[i
] = mp
->m_flag
& important
? 0x2515 : 0x2514;
645 for (i
= mp
->m_level
- 2; i
>= 0; --i
) {
647 if (UICMP(32, i
, >, mq
->m_level
- 1)) {
652 if (mq
->m_parent
&& (mq
->m_parent
->m_flag
& important
))
665 for (indlvl
= indw
= 0; (ui8_t
)indlvl
< mp
->m_level
&& indw
< maxwidth
;
667 if (indw
< maxwidth
- 1)
668 indw
+= (int)putuc(us
[indlvl
], cs
[indlvl
] & 0xFF, fp
);
670 indw
+= (int)putuc(0x21B8, '^', fp
);
672 indw
+= putuc(0x25B8, '>', fp
);
682 _dispc(struct message
*mp
, char const *a
)
687 if ((mp
->m_flag
& (MREAD
| MNEW
)) == MREAD
)
689 if ((mp
->m_flag
& (MREAD
| MNEW
)) == (MREAD
| MNEW
))
691 if (mp
->m_flag
& MANSWERED
)
693 if (mp
->m_flag
& MDRAFTED
)
695 if ((mp
->m_flag
& (MREAD
| MNEW
)) == MNEW
)
697 if (!(mp
->m_flag
& (MREAD
| MNEW
)))
699 if (mp
->m_flag
& MSPAM
)
701 if (mp
->m_flag
& MSPAMUNSURE
)
703 if (mp
->m_flag
& MSAVED
)
705 if (mp
->m_flag
& MPRESERVE
)
707 if (mp
->m_flag
& (MBOX
| MBOXED
))
709 if (mp
->m_flag
& MFLAGGED
)
711 if (mb
.mb_threaded
== 1 && mp
->m_collapsed
> 0)
713 if (mb
.mb_threaded
== 1 && mp
->m_collapsed
< 0)
720 a_cmd_scroll(char const *arg
, bool_t onlynew
){
723 int msgspec
, size
, maxs
;
726 /* TODO scroll problem: we do not know whether + and $ have already reached
727 * TODO the last screen in threaded mode */
728 msgspec
= onlynew
? -1 : 0;
729 size
= (int)/*TODO*/n_screensize();
730 if((maxs
= msgCount
/ size
) > 0 && msgCount
% size
== 0)
761 case '1': case '2': case '3': case '4': case '5':
762 case '6': case '7': case '8': case '9': case '0':
765 if((n_idec_siz_cp(&l
, arg
, 0, NULL
766 ) & (n_IDEC_STATE_EMASK
| n_IDEC_STATE_CONSUMED
)
767 ) != n_IDEC_STATE_CONSUMED
)
769 if(l
> maxs
- (isabs
? 0 : _screen
))
771 _screen
= isabs
? (int)l
: _screen
+ l
;
777 fprintf(n_stdout
, _("On last screenful of messages\n"));
785 if((n_idec_siz_cp(&l
, ++arg
, 0, NULL
786 ) & (n_IDEC_STATE_EMASK
| n_IDEC_STATE_CONSUMED
)
787 ) != n_IDEC_STATE_CONSUMED
)
796 fprintf(n_stdout
, _("On first screenful of messages\n"));
803 n_err(_("Unrecognized scrolling command: %s\n"), arg
);
808 size
= _headers(msgspec
);
815 _headers(int msgspec
) /* TODO rework v15 */
817 bool_t needdot
, showlast
;
818 int g
, k
, mesg
, size
;
819 struct message
*lastmq
, *mp
, *mq
;
821 ui32_t
volatile flag
;
825 time_current_update(&time_current
, FAL0
);
827 fl
= MNEW
| MFLAGGED
;
832 size
= (int)/*TODO*/n_screensize();
835 #if 0 /* FIXME original code path */
848 needdot
= (msgspec
== 0) ? TRU1
: (dot
!= &message
[msgspec
- 1]);
849 showlast
= ok_blook(showlast
);
851 if (mb
.mb_threaded
== 0) {
854 for (mp
= message
; PTRCMP(mp
, <, message
+ msgCount
); ++mp
)
858 if (mp
->m_flag
& fl
) {
862 if ((msgspec
> 0 && PTRCMP(mp
, ==, message
+ msgspec
- 1)) ||
863 (msgspec
== 0 && g
== k
) ||
864 (msgspec
== -2 && g
== k
+ size
&& lastmq
) ||
865 (msgspec
< 0 && g
>= k
&& (mp
->m_flag
& fl
) != 0))
869 if (lastmq
&& (msgspec
== -2 ||
870 (msgspec
== -1 && PTRCMP(mp
, ==, message
+ msgCount
)))) {
877 mesg
= (int)PTR2SIZE(mp
- message
);
879 if (mb
.mb_type
== MB_IMAP
)
880 imap_getheaders(mesg
+ 1, mesg
+ size
);
882 n_COLOUR( n_colour_env_create(n_COLOUR_CTX_SUM
, n_stdout
, FAL0
); )
884 for(lastmq
= NULL
, mq
= &message
[msgCount
]; mp
< mq
; lastmq
= mp
, ++mp
){
888 if (UICMP(32, flag
, >=, size
))
892 if(UICMP(32, flag
, ==, size
- 1) || &mp
[1] == mq
)
901 _print_head(0, mesg
, n_stdout
, 0);
904 if(needdot
&& ok_blook(showlast
)) /* xxx will not show */
907 n_COLOUR( n_colour_env_gut(); )
909 } else { /* threaded */
912 for (mp
= threadroot
; mp
; mp
= next_in_thread(mp
))
914 (mp
->m_collapsed
<= 0 ||
915 PTRCMP(mp
, ==, message
+ msgspec
- 1))) {
918 if (mp
->m_flag
& fl
) {
922 if ((msgspec
> 0 && PTRCMP(mp
, ==, message
+ msgspec
- 1)) ||
923 (msgspec
== 0 && g
== k
) ||
924 (msgspec
== -2 && g
== k
+ size
&& lastmq
) ||
925 (msgspec
< 0 && g
>= k
&& (mp
->m_flag
& fl
) != 0))
929 if (lastmq
&& (msgspec
== -2 ||
930 (msgspec
== -1 && PTRCMP(mp
, ==, message
+ msgCount
)))) {
937 n_COLOUR( n_colour_env_create(n_COLOUR_CTX_SUM
, n_stdout
, FAL0
); )
939 for(lastmq
= NULL
; mp
!= NULL
; lastmq
= mp
, mp
= mq
){
940 mq
= next_in_thread(mp
);
942 (mp
->m_collapsed
<= 0 ||
943 PTRCMP(mp
, ==, message
+ msgspec
- 1))) {
944 if (UICMP(32, flag
, >=, size
))
948 if(UICMP(32, flag
, ==, size
- 1) || mq
== NULL
)
956 _print_head(flag
, PTR2SIZE(mp
- message
+ 1), n_stdout
,
962 if(needdot
&& ok_blook(showlast
)) /* xxx will not show */
965 n_COLOUR( n_colour_env_gut(); )
969 fprintf(n_stdout
, _("No more mail.\n"));
970 if (n_pstate
& (n_PS_ROBOT
| n_PS_HOOK_MASK
))
983 rv
= print_header_group((int*)v
);
989 print_header_group(int *vector
)
994 assert(vector
!= NULL
&& vector
!= (void*)-1);
995 rv
= _headers(vector
[0]);
1006 rv
= a_cmd_scroll(*(char const**)v
, FAL0
);
1017 rv
= a_cmd_scroll(*(char const**)v
, TRU1
);
1029 if (*(args
= v
) == '\0' || args
[1] != '\0') {
1031 n_err(_("Synopsis: dotmove: up <-> or down <+> by one message\n"));
1033 } else switch (args
[0]) {
1036 if (msgCount
== 0) {
1037 fprintf(n_stdout
, _("At EOF\n"));
1039 } else if (getmsglist(n_UNCONST(/*TODO*/ args
), msgvec
, 0) > 0) {
1040 setdot(message
+ msgvec
[0] - 1);
1042 rv
= c_headers(msgvec
);
1056 int *msgvec
, *ip
, n
;
1058 FILE * volatile obuf
;
1061 if(*(msgvec
= vp
) == 0)
1064 time_current_update(&time_current
, FAL0
);
1068 if (n_psonce
& n_PSO_INTERACTIVE
) {
1069 if ((cp
= ok_vlook(crt
)) != NULL
) {
1072 for (n
= 0, ip
= msgvec
; *ip
!= 0; ++ip
)
1076 ib
= n_screensize();
1078 n_idec_uiz_cp(&ib
, cp
, 0, NULL
);
1079 if (UICMP(z
, n
, >, ib
) && (obuf
= n_pager_open()) == NULL
)
1084 /* Update dot before display so that the dotmark etc. are correct */
1085 for (ip
= msgvec
; ip
[1] != 0; ++ip
)
1087 setdot(&message
[(ok_blook(showlast
) ? *ip
: *msgvec
) - 1]);
1089 n_COLOUR( n_colour_env_create(n_COLOUR_CTX_SUM
, obuf
, obuf
!= n_stdout
); )
1091 for (n
= 0, ip
= msgvec
; *ip
!= 0; ++ip
) { /* TODO join into _print_head() */
1092 _print_head((size_t)n
++, (size_t)*ip
, obuf
, mb
.mb_threaded
);
1096 n_COLOUR( n_colour_env_gut(); )
1098 if (obuf
!= n_stdout
)
1099 n_pager_close(obuf
);
1106 print_headers(size_t bottom
, size_t topx
, bool_t only_marked
)
1112 if (mb
.mb_type
== MB_IMAP
)
1113 imap_getheaders(bottom
, topx
);
1115 time_current_update(&time_current
, FAL0
);
1117 n_COLOUR( n_colour_env_create(n_COLOUR_CTX_SUM
, n_stdout
, FAL0
); )
1119 for (printed
= 0; bottom
<= topx
; ++bottom
) {
1120 struct message
*mp
= message
+ bottom
- 1;
1122 if (!(mp
->m_flag
& MMARK
))
1124 } else if (!visible(mp
))
1126 _print_head(printed
++, bottom
, n_stdout
, FAL0
);
1130 n_COLOUR( n_colour_env_gut(); )