1 /*@ S-nail - a mail user agent derived from Berkeley Mail.
2 *@ Folder (mailbox) initialization, newmail announcement and related.
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
38 #ifndef HAVE_AMALGAMATION
44 /* Update mailname (if name != NULL) and displayname, return whether displayname
45 * was large enough to swallow mailname */
46 static bool_t
_update_mailname(char const *name
);
47 #ifdef HAVE_C90AMEND1 /* TODO unite __narrow_suffix() into one fun! */
48 n_INLINE
size_t __narrow_suffix(char const *cp
, size_t cpl
, size_t maxl
);
52 static void a_folder_info(void);
54 /* Set up the input pointers while copying the mail file into /tmp */
55 static void a_folder_mbox_setptr(FILE *ibuf
, off_t offset
);
58 _update_mailname(char const *name
) /* TODO 2MUCH work, cache, prop of Object! */
66 /* Don't realpath(3) if it's only an update request */
72 p
= which_protocol(name
, TRU1
, TRU1
, &adjname
);
74 if(p
== PROTO_FILE
|| p
== PROTO_MAILDIR
){
76 if (realpath(name
, mailname
) == NULL
&& n_err_no
!= n_ERR_NOENT
) {
77 n_err(_("Can't canonicalize %s\n"), n_shexp_quote_cp(name
, FAL0
));
83 n_strscpy(mailname
, name
, sizeof(mailname
));
89 /* Don't display an absolute path but "+FOLDER" if under *folder* */
90 if(*(foldp
= n_folder_query()) != '\0'){
91 foldlen
= strlen(foldp
);
92 if(strncmp(foldp
, mailp
, foldlen
))
97 /* We want to see the name of the folder .. on the screen */
99 if(i
< sizeof(displayname
) - 3 -1){
103 memcpy(dispp
, mailp
, foldlen
);
107 memcpy(dispp
, mailp
, i
-= foldlen
);
110 memcpy(dispp
, mailp
, i
+1);
113 /* Avoid disrupting multibyte sequences (if possible) */
114 #ifndef HAVE_C90AMEND1
115 j
= sizeof(displayname
) / 3 - 3;
116 i
-= sizeof(displayname
) - (1/* + */ + 3) - j
;
118 j
= field_detect_clip(sizeof(displayname
) / 3, mailp
, i
);
119 i
= j
+ __narrow_suffix(mailp
+ j
, i
- j
,
120 sizeof(displayname
) - (1/* + */ + 3 + 1) - j
);
122 snprintf(dispp
, sizeof(displayname
), "%s%.*s...%s",
123 (foldlen
> 0 ? "[+]" : ""), (int)j
, mailp
, mailp
+ i
);
127 n_PS_ROOT_BLOCK((ok_vset(mailbox_resolved
, mailname
),
128 ok_vset(mailbox_display
, displayname
)));
133 #ifdef HAVE_C90AMEND1
135 __narrow_suffix(char const *cp
, size_t cpl
, size_t maxl
)
141 for (err
= ok
= i
= 0; cpl
> maxl
|| err
;) {
142 int ml
= mblen(cp
, cpl
);
143 if (ml
< 0) { /* XXX _narrow_suffix(): mblen() error; action? */
144 (void)mblen(NULL
, 0);
161 #endif /* HAVE_C90AMEND1 */
166 int u
, n
, d
, s
, hidden
, moved
;
169 if(mb
.mb_type
== MB_VOID
){
170 fprintf(n_stdout
, _("(Currently no active mailbox)"));
174 s
= d
= hidden
= moved
= 0;
175 for (mp
= message
, n
= 0, u
= 0; PTRCMP(mp
, <, message
+ msgCount
); ++mp
) {
176 if (mp
->m_flag
& MNEW
)
178 if ((mp
->m_flag
& MREAD
) == 0)
180 if ((mp
->m_flag
& (MDELETED
| MSAVED
)) == (MDELETED
| MSAVED
))
182 if ((mp
->m_flag
& (MDELETED
| MSAVED
)) == MDELETED
)
184 if ((mp
->m_flag
& (MDELETED
| MSAVED
)) == MSAVED
)
186 if (mp
->m_flag
& MHIDDEN
)
190 /* If displayname gets truncated the user effectively has no option to see
191 * the full pathname of the mailbox, so print it at least for '? fi' */
192 fprintf(n_stdout
, "%s: ", n_shexp_quote_cp(
193 (_update_mailname(NULL
) ? displayname
: mailname
), FAL0
));
195 fprintf(n_stdout
, _("1 message"));
197 fprintf(n_stdout
, _("%d messages"), msgCount
);
199 fprintf(n_stdout
, _(" %d new"), n
);
201 fprintf(n_stdout
, _(" %d unread"), u
);
203 fprintf(n_stdout
, _(" %d deleted"), d
);
205 fprintf(n_stdout
, _(" %d saved"), s
);
207 fprintf(n_stdout
, _(" %d moved"), moved
);
209 fprintf(n_stdout
, _(" %d hidden"), hidden
);
211 fprintf(n_stdout
, _(" [Read-only]"));
213 if (mb
.mb_type
== MB_CACHE
)
214 fprintf(n_stdout
, _(" [Disconnected]"));
218 putc('\n', n_stdout
);
223 a_folder_mbox_setptr(FILE *ibuf
, off_t offset
) /* TODO Mailbox->setptr() */
229 bool_t need_rfc4155
, maybe
, inhead
, from_
;
230 size_t filesize
, linesize
, cnt
;
233 memset(&self
, 0, sizeof self
);
234 self
.m_flag
= MUSED
| MNEW
| MNEWEST
;
235 filesize
= mailsize
- offset
;
236 offset
= ftell(mb
.mb_otf
);
237 need_rfc4155
= ok_blook(mbox_rfc4155
);
241 linebuf
= NULL
, linesize
= 0; /* TODO string pool */
244 if (fgetline(&linebuf
, &linesize
, &filesize
, &cnt
, ibuf
, 0) == NULL
) {
245 self
.m_xsize
= self
.m_size
;
246 self
.m_xlines
= self
.m_lines
;
247 self
.m_content_info
= CI_HAVE_HEADER
| CI_HAVE_BODY
;
249 message_append(&self
);
250 message_append_null();
257 if (linebuf
[0] == '\0')
260 /* XXX Convert CRLF to LF; this should be rethought in that
261 * XXX CRLF input should possibly end as CRLF output? */
262 if (cnt
>= 2 && linebuf
[cnt
- 1] == '\n' && linebuf
[cnt
- 2] == '\r')
263 linebuf
[--cnt
- 1] = '\n';
264 fwrite(linebuf
, sizeof *linebuf
, cnt
, mb
.mb_otf
);
265 if (ferror(mb
.mb_otf
)) {
266 n_perr(_("/tmp"), 0);
269 if (linebuf
[cnt
- 1] == '\n')
270 linebuf
[cnt
- 1] = '\0';
271 /* TODO In v15 this should use a/the flat MIME parser in order to ignore
272 * TODO "From " when MIME boundaries are active -- whereas this opens
273 * TODO another can of worms, it very likely is better than messing up
274 * TODO MIME because of a "From " line! */
275 if (maybe
&& linebuf
[0] == 'F' &&
276 (from_
= is_head(linebuf
, cnt
, TRU1
)) &&
277 (from_
== TRU1
|| !need_rfc4155
)) {
278 /* TODO char date[n_FROM_DATEBUF];
279 * TODO extract_date_from_from_(linebuf, cnt, date);
280 * TODO self.m_time = 10000; */
281 if (from_
== TRUM1
) {
282 if (n_poption
& n_PO_D_V
)
283 n_err(_("Invalid MBOX \"From_ line\": %.*s\n"),
285 else if (!(mb
.mb_active
& MB_FROM__WARNED
))
286 n_err(_("MBOX mailbox contains non-conforming From_ line(s)!\n"
287 " Message boundaries may have been falsely detected!\n"
288 " Setting variable *mbox-rfc4155* and reopen should improve "
290 " If so, make changes permanent: \"copy * SOME-FILE\". "
291 "Then unset *mbox-rfc4155*\n"));
292 mb
.mb_active
|= MB_FROM__WARNED
;
294 self
.m_xsize
= self
.m_size
;
295 self
.m_xlines
= self
.m_lines
;
296 self
.m_content_info
= CI_HAVE_HEADER
| CI_HAVE_BODY
;
298 message_append(&self
);
300 self
.m_flag
= MUSED
| MNEW
| MNEWEST
;
303 self
.m_block
= mailx_blockof(offset
);
304 self
.m_offset
= mailx_offsetof(offset
);
306 } else if (linebuf
[0] == 0) {
309 for (cp
= linebuf
, cp2
= "status";; ++cp
) {
310 if ((c
= *cp2
++) == 0) {
311 while (c
= *cp
++, whitechar(c
))
315 while ((c
= *cp
++) != '\0')
317 self
.m_flag
|= MREAD
;
319 self
.m_flag
&= ~MNEW
;
322 if (*cp
!= c
&& *cp
!= upperconv(c
))
325 for (cp
= linebuf
, cp2
= "x-status";; ++cp
) {
326 if ((c
= *cp2
++) == 0) {
327 while ((c
= *cp
++, whitechar(c
)))
331 while ((c
= *cp
++) != '\0')
333 self
.m_flag
|= MFLAGGED
;
335 self
.m_flag
|= MANSWERED
;
337 self
.m_flag
|= MDRAFTED
;
340 if (*cp
!= c
&& *cp
!= upperconv(c
))
347 maybe
= (linebuf
[0] == 0);
353 setfile(char const *name
, enum fedit_mode fm
) /* TODO oh my god */
355 /* TODO This all needs to be converted to URL:: and Mailbox:: */
360 char const *who
, *orig_name
;
361 int rv
, omsgCount
= 0;
362 FILE *ibuf
= NULL
, *lckfp
= NULL
;
363 bool_t isdevnull
= FAL0
;
366 n_pstate
&= ~n_PS_SETFILE_OPENED
;
369 enum fexp_mode fexpm
;
371 if((who
= shortcut_expand(name
)) != NULL
){
372 fexpm
= FEXP_NSHORTCUT
/* XXX | FEXP_NSHELL*/;
380 fm
|= FEDIT_SYSBOX
; /* TODO fexpand() needs to tell is-valid-user! */
381 if(*(who
= &name
[1]) == ':')
383 if((cp
= strrchr(who
, '/')) != NULL
)
389 if(fm
& FEDIT_ACCOUNT
){
390 if((who
= ok_vlook(account
)) == NULL
)
392 who
= savecatsep(_("account"), ' ', who
);
394 who
= ok_vlook(LOGNAME
);
397 if ((name
= fexpand(name
, fexpm
)) == NULL
)
401 /* For at least substdate() users TODO -> eventloop tick */
402 time_current_update(&time_current
, FAL0
);
404 switch (which_protocol(orig_name
= name
, TRU1
, TRU1
, &name
)) {
406 isdevnull
= ((n_poption
& n_PO_BATCH_FLAG
) &&
407 !strcmp(name
, n_path_devnull
));
409 do { /* TODO we need objects, goes away then */
410 # ifdef HAVE_REALPATH_NULL
413 if ((cp
= realpath(name
, NULL
)) != NULL
) {
420 if (realpath(name
, cbuf
) != NULL
)
421 name
= savestr(cbuf
);
430 rv
= maildir_setfile(who
, name
, fm
);
436 rv
= pop3_setfile(who
, orig_name
, fm
);
442 if((fm
& FEDIT_NEWMAIL
) && mb
.mb_type
== MB_CACHE
)
445 rv
= imap_setfile(who
, orig_name
, fm
);
449 n_err(_("Cannot handle protocol: %s\n"), orig_name
);
453 if ((ibuf
= n_fopen_any(savecat("file://", name
), "r", NULL
)) == NULL
) {
456 if ((fm
& FEDIT_SYSBOX
) && e
== n_ERR_NOENT
) {
457 if (!(fm
& FEDIT_ACCOUNT
) && strcmp(who
, ok_vlook(LOGNAME
)) &&
458 getpwnam(who
) == NULL
) {
459 n_err(_("%s is not a user of this system\n"),
460 n_shexp_quote_cp(who
, FAL0
));
463 if (!(n_poption
& n_PO_QUICKRUN_MASK
) && ok_blook(bsdcompat
))
464 n_err(_("No mail for %s at %s\n"),
465 who
, n_shexp_quote_cp(name
, FAL0
));
467 if (fm
& FEDIT_NEWMAIL
)
470 mb
.mb_type
= MB_VOID
;
471 if (ok_blook(emptystart
)) {
472 if (!(n_poption
& n_PO_QUICKRUN_MASK
) && !ok_blook(bsdcompat
))
474 /* We must avoid returning -1 and causing program exit */
482 if (fstat(fileno(ibuf
), &stb
) == -1) {
483 if (fm
& FEDIT_NEWMAIL
)
485 n_perr(_("fstat"), 0);
489 if (S_ISREG(stb
.st_mode
) || isdevnull
) {
492 if (fm
& FEDIT_NEWMAIL
)
494 n_err_no
= S_ISDIR(stb
.st_mode
) ? n_ERR_ISDIR
: n_ERR_INVAL
;
499 if (shudclob
&& !(fm
& FEDIT_NEWMAIL
) && !quit(FAL0
))
505 if (!(fm
& FEDIT_NEWMAIL
) && mb
.mb_sock
.s_fd
>= 0)
506 sclose(&mb
.mb_sock
); /* TODO sorry? VMAILFS->close(), thank you */
509 /* TODO There is no intermediate VOID box we've switched to: name may
510 * TODO point to the same box that we just have written, so any updates
511 * TODO we won't see! Reopen again in this case. RACY! Goes with VOID! */
512 /* TODO In addition: in case of compressed/hook boxes we lock a temporary! */
513 /* TODO We may uselessly open twice but quit() doesn't say whether we were
514 * TODO modified so we can't tell: Mailbox::is_modified() :-(( */
515 if (/*shudclob && !(fm & FEDIT_NEWMAIL) &&*/ !strcmp(name
, mailname
)) {
519 if ((ibuf
= n_fopen_any(name
, "r", NULL
)) == NULL
||
520 fstat(fileno(ibuf
), &stb
) == -1 ||
521 (!S_ISREG(stb
.st_mode
) && !isdevnull
)) {
528 /* Copy the messages into /tmp and set pointers */
529 if (!(fm
& FEDIT_NEWMAIL
)) {
531 mb
.mb_type
= MB_VOID
;
534 mb
.mb_type
= MB_FILE
;
535 mb
.mb_perm
= (((n_poption
& n_PO_R_FLAG
) || (fm
& FEDIT_RDONLY
) ||
536 access(name
, W_OK
) < 0) ? 0 : MB_DELE
| MB_EDIT
);
549 if (fm
& FEDIT_SYSBOX
)
550 n_pstate
&= ~n_PS_EDIT
;
552 n_pstate
|= n_PS_EDIT
;
556 fseek(mb
.mb_otf
, 0L, SEEK_END
);
557 /* TODO Doing this without holding a lock is.. And not err checking.. */
558 fseek(ibuf
, mailsize
, SEEK_SET
);
560 omsgCount
= msgCount
;
565 else if (!(n_pstate
& n_PS_EDIT
))
566 lckfp
= n_dotlock(name
, fileno(ibuf
), FLT_READ
, offset
,0,
567 (fm
& FEDIT_NEWMAIL
? 0 : UIZ_MAX
));
568 else if (n_file_lock(fileno(ibuf
), FLT_READ
, offset
,0,
569 (fm
& FEDIT_NEWMAIL
? 0 : UIZ_MAX
)))
573 if (!(fm
& FEDIT_NEWMAIL
)) {
574 char const *emsg
= (n_pstate
& n_PS_EDIT
)
575 ? N_("Unable to lock mailbox, aborting operation")
576 : N_("Unable to (dot) lock mailbox, aborting operation");
580 if (!(fm
& FEDIT_NEWMAIL
))
585 mailsize
= fsize(ibuf
);
587 /* TODO This is too simple minded? We should regenerate an index file
588 * TODO to be able to truly tell whether *anything* has changed! */
589 if ((fm
& FEDIT_NEWMAIL
) && UICMP(z
, mailsize
, <=, offset
)) {
593 a_folder_mbox_setptr(ibuf
, offset
);
595 if ((fm
& FEDIT_NEWMAIL
) && mb
.mb_sorted
) {
602 if (lckfp
!= NULL
&& lckfp
!= (FILE*)-1) {
607 if (!(fm
& FEDIT_NEWMAIL
)) {
608 n_pstate
&= ~n_PS_SAW_COMMAND
;
609 n_pstate
|= n_PS_SETFILE_OPENED
;
614 rv
= (msgCount
== 0);
616 n_err_no
= n_ERR_NODATA
;
618 if(n_poption
& n_PO_EXISTONLY
)
622 if(!(n_pstate
& n_PS_EDIT
) || (fm
& FEDIT_NEWMAIL
)){
623 if(!(fm
& FEDIT_NEWMAIL
)){
624 if (!ok_blook(emptystart
))
625 n_err(_("No mail for %s at %s\n"),
626 who
, n_shexp_quote_cp(name
, FAL0
));
632 if(fm
& FEDIT_NEWMAIL
)
633 newmailinfo(omsgCount
);
637 if (lckfp
!= NULL
&& lckfp
!= (FILE*)-1)
643 mb
.mb_type
= MB_VOID
;
645 n_err_no
= n_ERR_NOTOBACCO
;
651 newmailinfo(int omsgCount
)
656 for (i
= 0; i
< omsgCount
; ++i
)
657 message
[i
].m_flag
&= ~MNEWEST
;
659 if (msgCount
> omsgCount
) {
660 for (i
= omsgCount
; i
< msgCount
; ++i
)
661 message
[i
].m_flag
|= MNEWEST
;
662 fprintf(n_stdout
, _("New mail has arrived.\n"));
663 if ((i
= msgCount
- omsgCount
) == 1)
664 fprintf(n_stdout
, _("Loaded 1 new message.\n"));
666 fprintf(n_stdout
, _("Loaded %d new messages.\n"), i
);
668 fprintf(n_stdout
, _("Loaded %d messages.\n"), msgCount
);
670 temporary_folder_hook_check(TRU1
);
675 print_headers(omsgCount
+ 1, msgCount
, FAL0
, FAL0
);
684 if (n_msgvec
!= NULL
)
686 n_msgvec
= n_calloc(sz
+ 1, sizeof *n_msgvec
);
691 print_header_summary(char const *Larg
)
693 size_t bot
, top
, i
, j
;
697 /* Avoid any messages XXX add a make_mua_silent() and use it? */
698 if ((n_poption
& (n_PO_VERB
| n_PO_EXISTONLY
)) == n_PO_EXISTONLY
) {
699 n_stdout
= freopen(n_path_devnull
, "w", stdout
);
700 n_stderr
= freopen(n_path_devnull
, "w", stderr
);
702 assert(n_msgvec
!= NULL
);
703 i
= (getmsglist(/*TODO make const */n_UNCONST(Larg
), n_msgvec
, 0) <= 0);
704 if (n_poption
& n_PO_EXISTONLY
) {
705 n_exit_status
= (int)i
;
710 for (bot
= msgCount
, top
= 0, i
= 0; (j
= n_msgvec
[i
]) != 0; ++i
) {
717 bot
= 1, top
= msgCount
;
722 isLarg
= (Larg
!= NULL
);
723 print_headers(bot
, top
, isLarg
, !isLarg
); /* TODO should be iterator! */
730 n_folder_announce(enum n_announce_flags af
){
734 mdot
= (mb
.mb_type
== MB_VOID
) ? 1 : getmdot(0);
735 dot
= &message
[mdot
- 1];
737 if(af
!= n_ANNOUNCE_NONE
&& ok_blook(header
) &&
738 ((af
& n_ANNOUNCE_MAIN_CALL
) ||
739 ((af
& n_ANNOUNCE_CHANGE
) && !ok_blook(posix
))))
740 af
|= n_ANNOUNCE_STATUS
| n__ANNOUNCE_HEADER
;
742 if(af
& n_ANNOUNCE_STATUS
){
744 af
|= n__ANNOUNCE_ANY
;
747 if(af
& n__ANNOUNCE_HEADER
){
748 if(!(af
& n_ANNOUNCE_MAIN_CALL
) && ok_blook(bsdannounce
))
749 n_OBSOLETE(_("*bsdannounce* is now default behaviour"));
752 print_header_group(vec
); /* XXX errors? */
753 af
|= n__ANNOUNCE_ANY
;
756 if(af
& n__ANNOUNCE_ANY
)
767 enum mflag avoid
= MHIDDEN
| MDELETED
;
771 if (ok_blook(autothread
)) {
772 n_OBSOLETE(_("please use *autosort=thread* instead of *autothread*"));
774 } else if ((cp
= ok_vlook(autosort
)) != NULL
) {
775 if (mb
.mb_sorted
!= NULL
)
776 n_free(mb
.mb_sorted
);
777 mb
.mb_sorted
= sstrdup(cp
);
781 if (mb
.mb_type
== MB_VOID
) {
787 for (mp
= message
; PTRCMP(mp
, <, message
+ msgCount
); ++mp
)
788 if ((mp
->m_flag
& (MNEWEST
| avoid
)) == MNEWEST
)
791 if (!nmail
|| PTRCMP(mp
, >=, message
+ msgCount
)) {
792 if (mb
.mb_threaded
) {
793 for (mp
= threadroot
; mp
!= NULL
; mp
= next_in_thread(mp
))
794 if ((mp
->m_flag
& (MNEW
| avoid
)) == MNEW
)
797 for (mp
= message
; PTRCMP(mp
, <, message
+ msgCount
); ++mp
)
798 if ((mp
->m_flag
& (MNEW
| avoid
)) == MNEW
)
803 if ((mb
.mb_threaded
? (mp
== NULL
) : PTRCMP(mp
, >=, message
+ msgCount
))) {
804 if (mb
.mb_threaded
) {
805 for (mp
= threadroot
; mp
!= NULL
; mp
= next_in_thread(mp
))
806 if (mp
->m_flag
& MFLAGGED
)
809 for (mp
= message
; PTRCMP(mp
, <, message
+ msgCount
); ++mp
)
810 if (mp
->m_flag
& MFLAGGED
)
815 if ((mb
.mb_threaded
? (mp
== NULL
) : PTRCMP(mp
, >=, message
+ msgCount
))) {
816 if (mb
.mb_threaded
) {
817 for (mp
= threadroot
; mp
!= NULL
; mp
= next_in_thread(mp
))
818 if (!(mp
->m_flag
& (MREAD
| avoid
)))
821 for (mp
= message
; PTRCMP(mp
, <, message
+ msgCount
); ++mp
)
822 if (!(mp
->m_flag
& (MREAD
| avoid
)))
828 (mb
.mb_threaded
? (mp
!= NULL
) : PTRCMP(mp
, <, message
+ msgCount
)))
829 mdot
= (int)PTR2SIZE(mp
- message
+ 1);
830 else if (ok_blook(showlast
)) {
831 if (mb
.mb_threaded
) {
832 for (mp
= this_in_thread(threadroot
, -1); mp
;
833 mp
= prev_in_thread(mp
))
834 if (!(mp
->m_flag
& avoid
))
836 mdot
= (mp
!= NULL
) ? (int)PTR2SIZE(mp
- message
+ 1) : msgCount
;
838 for (mp
= message
+ msgCount
- 1; mp
>= message
; --mp
)
839 if (!(mp
->m_flag
& avoid
))
841 mdot
= (mp
>= message
) ? (int)PTR2SIZE(mp
- message
+ 1) : msgCount
;
844 (mb
.mb_threaded
? (mp
!= NULL
) : PTRCMP(mp
, <, message
+ msgCount
)))
845 mdot
= (int)PTR2SIZE(mp
- message
+ 1);
846 else if (mb
.mb_threaded
) {
847 for (mp
= threadroot
; mp
; mp
= next_in_thread(mp
))
848 if (!(mp
->m_flag
& avoid
))
850 mdot
= (mp
!= NULL
) ? (int)PTR2SIZE(mp
- message
+ 1) : 1;
852 for (mp
= message
; PTRCMP(mp
, <, message
+ msgCount
); ++mp
)
853 if (!(mp
->m_flag
& avoid
))
855 mdot
= PTRCMP(mp
, <, message
+ msgCount
)
856 ? (int)PTR2SIZE(mp
- message
+ 1) : 1;
864 initbox(char const *name
)
870 if (mb
.mb_type
!= MB_VOID
)
871 n_strscpy(prevfile
, mailname
, PATH_MAX
);
873 /* TODO name always NE mailname (but goes away for objects anyway)
874 * TODO Well, not true no more except that in parens */
875 _update_mailname((name
!= mailname
) ? name
: NULL
);
878 if((mb
.mb_otf
= Ftmp(&tempMesg
, "tmpmbox", OF_WRONLY
| OF_HOLDSIGS
)) ==
880 n_perr(_("initbox: temporary mail message file, writer"), 0);
882 }else if((mb
.mb_itf
= safe_fopen(tempMesg
, "r", NULL
)) == NULL
) {
883 n_perr(_("initbox: temporary mail message file, reader"), 0);
886 Ftmp_release(&tempMesg
);
891 mb
.mb_active
= MB_NONE
;
894 mb
.mb_flags
= MB_NOFLAGS
;
896 if (mb
.mb_sorted
!= NULL
) {
897 n_free(mb
.mb_sorted
);
900 dot
= prevdot
= threadroot
= NULL
;
901 n_pstate
&= ~n_PS_DID_PRINT_DOT
;
906 n_folder_query(void){
907 struct n_string s
, *sp
= &s
;
910 char const *rv
, *adjcp
;
914 sp
= n_string_creat_auto(sp
);
916 /* *folder* is linked with *folder_resolved*: we only use the latter */
918 if((rv
= ok_vlook(folder_resolved
)) != NULL
)
922 * If directory does not start with a <slash> ('/'), the contents
923 * of HOME shall be prefixed to it.
925 * If folder is unset or set to null, [.] filenames beginning with
926 * '+' shall refer to files in the current directory.
927 * We may have the result already */
931 if((cp
= ok_vlook(folder
)) == NULL
)
934 /* Expand the *folder*; skip %: prefix for simplicity of use */
935 if(cp
[0] == '%' && cp
[1] == ':')
937 if((err
= (cp
= fexpand(cp
, FEXP_NSPECIAL
| FEXP_NFOLDER
| FEXP_NSHELL
)
938 ) == NULL
) || *cp
== '\0')
943 for(i
= strlen(cp
);;){
953 switch((proto
= which_protocol(cp
, FAL0
, FAL0
, &adjcp
))){
955 n_err(_("*folder* can't be set to a flat, read-only POP3 account\n"));
961 if(!strcmp(rv
, protbase(rv
)))
962 rv
= savecatsep(rv
, '/', n_empty
);
964 n_err(_("*folder*: IMAP support not compiled in\n"));
969 /* Further expansion desired */
973 /* Prefix HOME as necessary */
974 if(*adjcp
!= '/'){ /* XXX path_is_absolute() */
978 home
= ok_vlook(HOME
);
982 sp
= n_string_reserve(sp
, l1
+ 1 + l2
+1);
986 sp
= n_string_push_buf(sp
, cp
, i
= PTR2SIZE(adjcp
- cp
));
990 sp
= n_string_push_buf(sp
, home
, l1
);
991 sp
= n_string_push_c(sp
, '/');
992 sp
= n_string_push_buf(sp
, cp
, l2
);
993 cp
= n_string_cp(sp
);
994 sp
= n_string_drop_ownership(sp
);
997 /* TODO Since our visual mailname is resolved via realpath(3) if available
998 * TODO to avoid that we loose track of our currently open folder in case
999 * TODO we chdir away, but still checks the leading path portion against
1000 * TODO n_folder_query() to be able to abbreviate to the +FOLDER syntax if
1001 * TODO possible, we need to realpath(3) the folder, too */
1002 #ifndef HAVE_REALPATH
1005 assert(sp
->s_len
== 0 && sp
->s_dat
== NULL
);
1006 # ifndef HAVE_REALPATH_NULL
1007 sp
= n_string_reserve(sp
, PATH_MAX
+1);
1010 if((sp
->s_dat
= realpath(cp
, sp
->s_dat
)) != NULL
){
1011 # ifdef HAVE_REALPATH_NULL
1012 n_string_cp(sp
= n_string_assign_cp(sp
, cp
= sp
->s_dat
));
1016 }else if(n_err_no
== n_ERR_NOENT
)
1019 n_err(_("Can't canonicalize *folder*: %s\n"),
1020 n_shexp_quote_cp(cp
, FAL0
));
1024 sp
= n_string_drop_ownership(sp
);
1025 #endif /* HAVE_REALPATH */
1027 /* Always append a solidus to our result path upon success */
1031 if(rv
[(i
= strlen(rv
)) - 1] != '/'){
1032 sp
= n_string_reserve(sp
, i
+ 1 +1);
1033 sp
= n_string_push_buf(sp
, rv
, i
);
1034 sp
= n_string_push_c(sp
, '/');
1035 rv
= n_string_cp(sp
);
1036 sp
= n_string_drop_ownership(sp
);
1041 n_PS_ROOT_BLOCK(ok_vset(folder_resolved
, rv
));
1045 n_err(_("*folder* is not resolvable, using CWD\n"));
1046 assert(rv
!= NULL
&& *rv
== '\0');
1053 n_folder_mbox_prepare_append(FILE *fout
, struct stat
*st_or_null
){
1054 /* TODO n_folder_mbox_prepare_append -> Mailbox->append() */
1061 if(!fseek(fout
, -2L, SEEK_END
)){
1062 if(fread(buf
, sizeof *buf
, 2, fout
) != 2)
1064 needsep
= (buf
[0] != '\n' || buf
[1] != '\n');
1068 if(st_or_null
== NULL
){
1070 if(fstat(fileno(fout
), st_or_null
))
1074 if(st_or_null
->st_size
>= 2)
1076 if(st_or_null
->st_size
== 0){
1081 if(fseek(fout
, -1L, SEEK_END
))
1083 if(fread(buf
, sizeof *buf
, 1, fout
) != 1)
1085 needsep
= (buf
[0] != '\n');
1089 if(fflush(fout
) || (needsep
&& putc('\n', fout
) == EOF
))