2 * Copyright notice from original mutt:
3 * Copyright (C) 1996-2002 Michael R. Elkins <me@mutt.org>
5 * This file is part of mutt-ng, see http://www.muttng.org/.
6 * It's licensed under the GNU General Public License,
7 * please see the file GPL in the top level source directory.
10 /* This file contains code to parse ``mbox'' and ``mmdf'' style mailboxes */
12 #include <lib-lib/lib-lib.h>
14 #include <lib-ui/curses.h>
15 #include <lib-sys/mutt_signal.h>
26 /* struct used by mutt_sync_mailbox() to store new offsets */
36 static int mbox_open_new_message (MESSAGE * msg, CONTEXT * dest, HEADER * hdr __attribute__ ((unused)))
43 static int mbox_reopen_mailbox (CONTEXT*, int*);
46 * ctx - context to lock
47 * excl - exclusive lock?
48 * retry - should retry if unable to lock?
50 int mbox_lock_mailbox (CONTEXT * ctx, int excl, int retry)
54 if ((r = mx_lock_file (ctx->path, fileno (ctx->fp), excl, 1, retry)) == 0)
56 else if (retry && !excl) {
64 static void mbox_unlock_mailbox (CONTEXT * ctx)
69 mx_unlock_file (ctx->path, fileno (ctx->fp), 1);
74 static int mmdf_parse_mailbox (CONTEXT * ctx)
76 char buf[HUGE_STRING];
77 char return_path[LONG_STRING];
78 int count = 0, oldmsgcount = ctx->msgcount;
85 if (stat (ctx->path, &sb) == -1) {
86 mutt_perror (ctx->path);
89 ctx->mtime = sb.st_mtime;
90 ctx->size = sb.st_size;
92 /* precompute the local timezone to speed up calculation of the
94 tz = mutt_local_tz (0);
96 buf[sizeof (buf) - 1] = 0;
99 if (fgets (buf, sizeof (buf) - 1, ctx->fp) == NULL)
102 if (m_strcmp(buf, MMDF_SEP) == 0) {
103 loc = ftello (ctx->fp);
106 if (!ctx->quiet && ReadInc && ((count % ReadInc == 0) || count == 1))
107 mutt_message (_("Reading %s... %d (%d%%)"), ctx->path, count,
108 (int) (loc / (ctx->size / 100 + 1)));
111 if (ctx->msgcount == ctx->hdrmax)
112 mx_alloc_memory (ctx);
113 ctx->hdrs[ctx->msgcount] = hdr = header_new();
115 hdr->index = ctx->msgcount;
117 if (fgets (buf, sizeof (buf) - 1, ctx->fp) == NULL) {
118 /* TODO: memory leak??? */
124 if (!is_from (buf, return_path, sizeof (return_path), &t)) {
125 if (fseeko (ctx->fp, loc, SEEK_SET) != 0) {
126 mutt_error _("Mailbox is corrupt!");
132 hdr->received = t - tz;
134 hdr->env = mutt_read_rfc822_header (ctx->fp, hdr, 0, 0);
136 loc = ftello (ctx->fp);
138 if (hdr->content->length > 0 && hdr->lines > 0) {
139 tmploc = loc + hdr->content->length;
141 if (0 < tmploc && tmploc < ctx->size) {
142 if (fseeko (ctx->fp, tmploc, SEEK_SET) != 0 ||
143 fgets (buf, sizeof (buf) - 1, ctx->fp) == NULL ||
144 m_strcmp(MMDF_SEP, buf) != 0) {
145 fseeko (ctx->fp, loc, SEEK_SET);
146 hdr->content->length = -1;
150 hdr->content->length = -1;
153 hdr->content->length = -1;
155 if (hdr->content->length < 0) {
158 loc = ftello (ctx->fp);
159 if (fgets (buf, sizeof (buf) - 1, ctx->fp) == NULL)
162 } while (m_strcmp(buf, MMDF_SEP) != 0);
165 hdr->content->length = loc - hdr->content->offset;
168 if (!hdr->env->return_path && return_path[0])
169 hdr->env->return_path =
170 rfc822_parse_adrlist (hdr->env->return_path, return_path);
173 hdr->env->from = address_list_dup (hdr->env->return_path);
178 mutt_error _("Mailbox is corrupt!");
184 if (ctx->msgcount > oldmsgcount)
185 mx_update_context (ctx, ctx->msgcount - oldmsgcount);
190 /* Note that this function is also called when new mail is appended to the
191 * currently open folder, and NOT just when the mailbox is initially read.
193 * NOTE: it is assumed that the mailbox being read has been locked before
194 * this routine gets called. Strange things could happen if it's not!
196 static int mbox_parse_mailbox (CONTEXT * ctx)
199 char buf[HUGE_STRING], return_path[STRING];
202 int count = 0, lines = 0;
205 /* Save information about the folder at the time we opened it. */
206 if (stat (ctx->path, &sb) == -1) {
207 mutt_perror (ctx->path);
211 ctx->size = sb.st_size;
212 ctx->mtime = sb.st_mtime;
215 ctx->readonly = access (ctx->path, W_OK) ? 1 : 0;
217 /* precompute the local timezone to speed up calculation of the
219 tz = mutt_local_tz (0);
221 loc = ftello (ctx->fp);
222 while (fgets (buf, sizeof (buf), ctx->fp) != NULL) {
223 if (is_from (buf, return_path, sizeof (return_path), &t)) {
224 /* Save the Content-Length of the previous message */
226 #define PREV ctx->hdrs[ctx->msgcount-1]
228 if (PREV->content->length < 0) {
229 PREV->content->length = loc - PREV->content->offset - 1;
230 if (PREV->content->length < 0)
231 PREV->content->length = 0;
234 PREV->lines = lines ? lines - 1 : 0;
239 if (!ctx->quiet && ReadInc && ((count % ReadInc == 0) || count == 1))
240 mutt_message (_("Reading %s... %d (%d%%)"), ctx->path, count,
241 (int) (ftello (ctx->fp) / (ctx->size / 100 + 1)));
243 if (ctx->msgcount == ctx->hdrmax)
244 mx_alloc_memory (ctx);
246 curhdr = ctx->hdrs[ctx->msgcount] = header_new();
247 curhdr->received = t - tz;
248 curhdr->offset = loc;
249 curhdr->index = ctx->msgcount;
251 curhdr->env = mutt_read_rfc822_header (ctx->fp, curhdr, 0, 0);
253 /* if we know how long this message is, either just skip over the body,
254 * or if we don't know how many lines there are, count them now (this will
255 * save time by not having to search for the next message marker).
257 if (curhdr->content->length > 0) {
260 loc = ftello (ctx->fp);
261 tmploc = loc + curhdr->content->length + 1;
263 if (0 < tmploc && tmploc < ctx->size) {
265 * check to see if the content-length looks valid. we expect to
266 * to see a valid message separator at this point in the stream
268 if (fseeko (ctx->fp, tmploc, SEEK_SET) != 0 ||
269 fgets (buf, sizeof (buf), ctx->fp) == NULL ||
270 m_strncmp("From ", buf, 5) != 0) {
271 fseeko (ctx->fp, loc, SEEK_SET); /* nope, return the previous position */
272 curhdr->content->length = -1;
275 else if (tmploc != ctx->size) {
276 /* content-length would put us past the end of the file, so it
279 curhdr->content->length = -1;
282 if (curhdr->content->length != -1) {
283 /* good content-length. check to see if we know how many lines
284 * are in this message.
286 if (curhdr->lines == 0) {
287 int cl = curhdr->content->length;
289 /* count the number of lines in this message */
290 fseeko (ctx->fp, loc, SEEK_SET);
292 if (fgetc (ctx->fp) == '\n')
297 /* return to the offset of the next message separator */
298 fseeko(ctx->fp, tmploc, SEEK_SET);
304 if (!curhdr->env->return_path && return_path[0])
305 curhdr->env->return_path =
306 rfc822_parse_adrlist (curhdr->env->return_path, return_path);
308 if (!curhdr->env->from)
309 curhdr->env->from = address_list_dup (curhdr->env->return_path);
316 loc = ftello (ctx->fp);
320 * Only set the content-length of the previous message if we have read more
321 * than one message during _this_ invocation. If this routine is called
322 * when new mail is received, we need to make sure not to clobber what
323 * previously was the last message since the headers may be sorted.
326 if (PREV->content->length < 0) {
327 PREV->content->length = ftello (ctx->fp) - PREV->content->offset - 1;
328 if (PREV->content->length < 0)
329 PREV->content->length = 0;
333 PREV->lines = lines ? lines - 1 : 0;
335 mx_update_context (ctx, count);
343 /* open a mbox or mmdf style mailbox */
344 static int mbox_open_mailbox (CONTEXT * ctx)
348 if ((ctx->fp = fopen (ctx->path, "r")) == NULL) {
349 mutt_perror (ctx->path);
352 mutt_block_signals ();
353 if (mbox_lock_mailbox (ctx, 0, 1) == -1) {
354 mutt_unblock_signals ();
358 if (ctx->magic == M_MBOX)
359 rc = mbox_parse_mailbox (ctx);
360 else if (ctx->magic == M_MMDF)
361 rc = mmdf_parse_mailbox (ctx);
365 mbox_unlock_mailbox (ctx);
366 mutt_unblock_signals ();
370 /* check to see if the mailbox has changed on disk.
373 * M_REOPENED mailbox has been reopened
374 * M_NEW_MAIL new mail has arrived!
375 * M_LOCKED couldn't lock the file
379 static int _mbox_check_mailbox (CONTEXT * ctx, int *index_hint)
382 char buffer[LONG_STRING];
386 if (stat (ctx->path, &st) == 0) {
387 if (st.st_mtime == ctx->mtime && st.st_size == ctx->size)
390 if (st.st_size == ctx->size) {
391 /* the file was touched, but it is still the same length, so just exit */
392 ctx->mtime = st.st_mtime;
396 if (st.st_size > ctx->size) {
397 /* lock the file if it isn't already */
399 mutt_block_signals ();
400 if (mbox_lock_mailbox (ctx, 0, 0) == -1) {
401 mutt_unblock_signals ();
402 /* we couldn't lock the mailbox, but nothing serious happened:
403 * probably the new mail arrived: no reason to wait till we can
404 * parse it: we'll get it on the next pass
412 * Check to make sure that the only change to the mailbox is that
413 * message(s) were appended to this file. My heuristic is that we should
414 * see the message separator at *exactly* what used to be the end of the
417 fseeko (ctx->fp, ctx->size, SEEK_SET);
418 if (fgets (buffer, sizeof (buffer), ctx->fp) != NULL) {
419 if ((ctx->magic == M_MBOX && m_strncmp("From ", buffer, 5) == 0)
420 || (ctx->magic == M_MMDF && m_strcmp(MMDF_SEP, buffer) == 0)) {
421 fseeko (ctx->fp, ctx->size, SEEK_SET);
422 if (ctx->magic == M_MBOX)
423 mbox_parse_mailbox (ctx);
425 mmdf_parse_mailbox (ctx);
427 /* Only unlock the folder if it was locked inside of this routine.
428 * It may have been locked elsewhere, like in
429 * mutt_checkpoint_mailbox().
433 mbox_unlock_mailbox (ctx);
434 mutt_unblock_signals ();
437 return (M_NEW_MAIL); /* signal that new mail arrived */
450 if (mbox_reopen_mailbox (ctx, index_hint) != -1) {
452 mbox_unlock_mailbox (ctx);
453 mutt_unblock_signals ();
461 mbox_unlock_mailbox (ctx);
462 mx_fastclose_mailbox (ctx);
463 mutt_unblock_signals ();
464 mutt_error _("Mailbox was corrupted!");
469 static int mbox_check_mailbox (CONTEXT* ctx, int* index_hint, int lock) {
473 mutt_block_signals ();
474 if (mbox_lock_mailbox (ctx, 0, 0) == -1) {
475 mutt_unblock_signals ();
480 rc = _mbox_check_mailbox (ctx, index_hint);
483 mutt_unblock_signals ();
484 mbox_unlock_mailbox (ctx);
493 static int mbox_sync_mailbox (CONTEXT * ctx, int unused __attribute__ ((unused)), int *index_hint)
495 char tempfile[_POSIX_PATH_MAX];
497 int i, j, save_sort = SORT_ORDER;
499 int need_sort = 0; /* flag to resort mailbox if new mail arrives */
500 int first = -1; /* first message to be written */
501 off_t offset; /* location in mailbox to write changed messages */
503 struct utimbuf utimebuf;
504 struct m_update_t *newOffset = NULL;
505 struct m_update_t *oldOffset = NULL;
508 /* sort message by their position in the mailbox on disk */
509 if (Sort != SORT_ORDER) {
512 mutt_sort_headers (ctx, 0);
517 /* need to open the file for writing in such a way that it does not truncate
518 * the file, so use read-write mode.
520 if ((ctx->fp = freopen (ctx->path, "r+", ctx->fp)) == NULL) {
521 mx_fastclose_mailbox (ctx);
522 mutt_error _("Fatal error! Could not reopen mailbox!");
527 mutt_block_signals ();
529 if (mbox_lock_mailbox (ctx, 1, 1) == -1) {
530 mutt_unblock_signals ();
531 mutt_error _("Unable to lock mailbox!");
536 /* Check to make sure that the file hasn't changed on disk */
537 if ((i = _mbox_check_mailbox (ctx, index_hint)) == M_NEW_MAIL
538 || i == M_REOPENED) {
539 /* new mail arrived, or mailbox reopened */
548 /* Create a temporary file to write the new version of the mailbox in. */
549 fp = m_tempfile (tempfile, _POSIX_PATH_MAX, NONULL(Tempdir), NULL);
551 mutt_error _("Could not create temporary file!");
556 /* find the first deleted/changed message. we save a lot of time by only
557 * rewriting the mailbox from the point where it has actually changed.
559 for (i = 0; i < ctx->msgcount && !ctx->hdrs[i]->deleted &&
560 !ctx->hdrs[i]->changed && !ctx->hdrs[i]->attach_del; i++);
561 if (i == ctx->msgcount) {
562 /* this means ctx->changed or ctx->deleted was set, but no
563 * messages were found to be changed or deleted. This should
564 * never happen, is we presume it is a bug in mutt.
567 _("sync: mbox modified, but no modified messages! (report this bug)");
568 mutt_sleep (5); /* the mutt_error /will/ get cleared! */
573 /* save the index of the first changed/deleted message */
575 /* where to start overwriting */
576 offset = ctx->hdrs[i]->offset;
578 /* the offset stored in the header does not include the MMDF_SEP, so make
579 * sure we seek to the correct location
581 if (ctx->magic == M_MMDF)
582 offset -= (sizeof MMDF_SEP - 1);
584 /* allocate space for the new offsets */
585 newOffset = p_new(struct m_update_t, ctx->msgcount - first);
586 oldOffset = p_new(struct m_update_t, ctx->msgcount - first);
588 for (i = first, j = 0; i < ctx->msgcount; i++) {
590 * back up some information which is needed to restore offsets when
594 oldOffset[i - first].valid = 1;
595 oldOffset[i - first].hdr = ctx->hdrs[i]->offset;
596 oldOffset[i - first].body = ctx->hdrs[i]->content->offset;
597 oldOffset[i - first].lines = ctx->hdrs[i]->lines;
598 oldOffset[i - first].length = ctx->hdrs[i]->content->length;
600 if (!ctx->hdrs[i]->deleted) {
602 if (!ctx->quiet && WriteInc && ((i % WriteInc) == 0 || j == 1))
603 mutt_message (_("Writing messages... %d (%d%%)"), i,
604 (int) (ftello (ctx->fp) / (ctx->size / 100 + 1)));
606 if (ctx->magic == M_MMDF) {
607 if (fputs (MMDF_SEP, fp) == EOF) {
608 mutt_perror (tempfile);
616 /* save the new offset for this message. we add `offset' because the
617 * temporary file only contains saved message which are located after
618 * `offset' in the real mailbox
620 newOffset[i - first].hdr = ftello (fp) + offset;
622 if (mutt_copy_message
623 (fp, ctx, ctx->hdrs[i], M_CM_UPDATE,
624 CH_FROM | CH_UPDATE | CH_UPDATE_LEN) == -1) {
625 mutt_perror (tempfile);
631 /* Since messages could have been deleted, the offsets stored in memory
632 * will be wrong, so update what we can, which is the offset of this
633 * message, and the offset of the body. If this is a multipart message,
634 * we just flush the in memory cache so that the message will be reparsed
635 * if the user accesses it later.
637 newOffset[i - first].body =
638 ftello (fp) - ctx->hdrs[i]->content->length + offset;
639 body_list_wipe(&ctx->hdrs[i]->content->parts);
641 switch (ctx->magic) {
643 if (fputs (MMDF_SEP, fp) == EOF) {
644 mutt_perror (tempfile);
651 if (fputs ("\n", fp) == EOF) {
652 mutt_perror (tempfile);
661 if (fclose (fp) != 0) {
664 mutt_perror (tempfile);
670 /* Save the state of this folder. */
671 if (stat (ctx->path, &statbuf) == -1) {
672 mutt_perror (ctx->path);
678 if ((fp = fopen (tempfile, "r")) == NULL) {
679 mutt_unblock_signals ();
680 mx_fastclose_mailbox (ctx);
681 mutt_perror (tempfile);
686 if (fseeko (ctx->fp, offset, SEEK_SET) != 0 || /* seek the append location */
687 /* do a sanity check to make sure the mailbox looks ok */
688 fgets (buf, sizeof (buf), ctx->fp) == NULL ||
689 (ctx->magic == M_MBOX && m_strncmp("From ", buf, 5) != 0) ||
690 (ctx->magic == M_MMDF && m_strcmp(MMDF_SEP, buf) != 0)) {
694 if (fseeko (ctx->fp, offset, SEEK_SET) != 0) { /* return to proper offset */
697 /* copy the temp mailbox back into place starting at the first
698 * change/deleted message
700 mutt_message _("Committing changes...");
702 i = mutt_copy_stream (fp, ctx->fp);
704 if (ferror (ctx->fp))
708 ctx->size = ftello (ctx->fp); /* update the size of the mailbox */
709 ftruncate (fileno (ctx->fp), ctx->size);
715 mbox_unlock_mailbox (ctx);
717 if (fclose (ctx->fp) != 0 || i == -1) {
718 /* error occured while writing the mailbox back, so keep the temp copy
722 char savefile[_POSIX_PATH_MAX];
724 snprintf(savefile, sizeof (savefile), "%s/mutt.%s-%u",
725 NONULL(Tempdir), NONULL(Username), (unsigned int)getpid());
726 rename (tempfile, savefile);
727 mutt_unblock_signals ();
728 mx_fastclose_mailbox (ctx);
729 mutt_pretty_mailbox (savefile);
730 mutt_error (_("Write failed! Saved partial mailbox to %s"), savefile);
735 /* Restore the previous access/modification times */
736 utimebuf.actime = statbuf.st_atime;
737 utimebuf.modtime = statbuf.st_mtime;
738 utime (ctx->path, &utimebuf);
740 /* reopen the mailbox in read-only mode */
741 if ((ctx->fp = fopen (ctx->path, "r")) == NULL) {
743 mutt_unblock_signals ();
744 mx_fastclose_mailbox (ctx);
745 mutt_error _("Fatal error! Could not reopen mailbox!");
749 /* update the offsets of the rewritten messages */
750 for (i = first, j = first; i < ctx->msgcount; i++) {
751 if (!ctx->hdrs[i]->deleted) {
752 ctx->hdrs[i]->offset = newOffset[i - first].hdr;
753 ctx->hdrs[i]->content->hdr_offset = newOffset[i - first].hdr;
754 ctx->hdrs[i]->content->offset = newOffset[i - first].body;
755 ctx->hdrs[i]->index = j++;
758 p_delete(&newOffset);
759 p_delete(&oldOffset);
760 unlink (tempfile); /* remove partial copy of the mailbox */
761 mutt_unblock_signals ();
763 return (0); /* signal success */
765 bail: /* Come here in case of disaster */
769 /* restore offsets, as far as they are valid */
770 if (first >= 0 && oldOffset) {
771 for (i = first; i < ctx->msgcount && oldOffset[i - first].valid; i++) {
772 ctx->hdrs[i]->offset = oldOffset[i - first].hdr;
773 ctx->hdrs[i]->content->hdr_offset = oldOffset[i - first].hdr;
774 ctx->hdrs[i]->content->offset = oldOffset[i - first].body;
775 ctx->hdrs[i]->lines = oldOffset[i - first].lines;
776 ctx->hdrs[i]->content->length = oldOffset[i - first].length;
780 /* this is ok to call even if we haven't locked anything */
781 mbox_unlock_mailbox (ctx);
783 mutt_unblock_signals ();
784 p_delete(&newOffset);
785 p_delete(&oldOffset);
787 if ((ctx->fp = freopen (ctx->path, "r", ctx->fp)) == NULL) {
788 mutt_error _("Could not reopen mailbox!");
790 mx_fastclose_mailbox (ctx);
795 /* if the mailbox was reopened, the thread tree will be invalid so make
796 * sure to start threading from scratch. */
797 mutt_sort_headers (ctx, (need_sort == M_REOPENED));
802 /* close a mailbox opened in write-mode */
803 int mbox_close_mailbox (CONTEXT * ctx)
805 mx_unlock_file (ctx->path, fileno (ctx->fp), 1);
808 mutt_slow_close_compressed (ctx);
810 mutt_unblock_signals ();
811 mx_fastclose_mailbox (ctx);
815 static int mbox_reopen_mailbox (CONTEXT * ctx, int *index_hint)
817 int (*cmp_headers) (const HEADER *, const HEADER *) = NULL;
825 /* silent operations */
828 mutt_message _("Reopening mailbox...");
830 /* our heuristics require the old mailbox to be unsorted */
831 if (Sort != SORT_ORDER) {
836 mutt_sort_headers (ctx, 1);
843 /* simulate a close */
845 hash_destroy (&ctx->id_hash, NULL);
847 hash_destroy (&ctx->subj_hash, NULL);
848 mutt_clear_threads (ctx);
851 for (i = 0; i < ctx->msgcount; i++)
852 header_delete(&(ctx->hdrs[i])); /* nothing to do! */
853 p_delete(&ctx->hdrs);
856 /* save the old headers */
857 old_msgcount = ctx->msgcount;
858 old_hdrs = ctx->hdrs;
862 ctx->hdrmax = 0; /* force allocation of new headers */
872 ctx->subj_hash = NULL;
874 switch (ctx->magic) {
877 if (fseeko (ctx->fp, 0, SEEK_SET) != 0) {
881 cmp_headers = mutt_cmp_header;
882 if (ctx->magic == M_MBOX)
883 rc = mbox_parse_mailbox (ctx);
885 rc = mmdf_parse_mailbox (ctx);
895 /* free the old headers */
896 for (j = 0; j < old_msgcount; j++)
897 header_delete(&(old_hdrs[j]));
904 /* now try to recover the old flags */
906 index_hint_set = (index_hint == NULL);
908 if (!ctx->readonly) {
909 for (i = 0; i < ctx->msgcount; i++) {
912 /* some messages have been deleted, and new messages have been
913 * appended at the end; the heuristic is that old messages have then
914 * "advanced" towards the beginning of the folder, so we begin the
915 * search at index "i"
917 for (j = i; j < old_msgcount; j++) {
918 if (old_hdrs[j] == NULL)
920 if (cmp_headers (ctx->hdrs[i], old_hdrs[j])) {
926 for (j = 0; j < i && j < old_msgcount; j++) {
927 if (old_hdrs[j] == NULL)
929 if (cmp_headers (ctx->hdrs[i], old_hdrs[j])) {
937 /* this is best done here */
938 if (!index_hint_set && *index_hint == j)
941 if (old_hdrs[j]->changed) {
942 /* Only update the flags if the old header was changed;
943 * otherwise, the header may have been modified externally,
944 * and we don't want to lose _those_ changes
946 mutt_set_flag (ctx, ctx->hdrs[i], M_FLAG, old_hdrs[j]->flagged);
947 mutt_set_flag (ctx, ctx->hdrs[i], M_REPLIED, old_hdrs[j]->replied);
948 mutt_set_flag (ctx, ctx->hdrs[i], M_OLD, old_hdrs[j]->old);
949 mutt_set_flag (ctx, ctx->hdrs[i], M_READ, old_hdrs[j]->read);
951 mutt_set_flag (ctx, ctx->hdrs[i], M_DELETE, old_hdrs[j]->deleted);
952 mutt_set_flag (ctx, ctx->hdrs[i], M_TAG, old_hdrs[j]->tagged);
954 /* we don't need this header any more */
955 header_delete(&(old_hdrs[j]));
959 /* free the remaining old headers */
960 for (j = 0; j < old_msgcount; j++) {
962 header_delete(&(old_hdrs[j]));
971 return ((ctx->changed || msg_mod) ? M_REOPENED : M_NEW_MAIL);
976 * 1 if the mailbox is not empty
977 * 0 if the mailbox is empty
980 int mbox_check_empty (const char *path)
984 if (stat (path, &st) == -1)
987 return ((st.st_size == 0));
990 int mbox_is_magic (const char* path, struct stat* st) {
993 char tmp[_POSIX_PATH_MAX];
995 if (S_ISDIR(st->st_mode))
998 if (st->st_size == 0) {
999 /* hard to tell what zero-length files are, so assume the default magic */
1000 if (DefaultMagic == M_MBOX || DefaultMagic == M_MMDF)
1001 return (DefaultMagic);
1005 else if ((f = fopen (path, "r")) != NULL) {
1006 struct utimbuf times;
1008 fgets (tmp, sizeof (tmp), f);
1009 if (m_strncmp("From ", tmp, 5) == 0)
1011 else if (m_strcmp(MMDF_SEP, tmp) == 0)
1015 /* need to restore the times here, the file was not really accessed,
1016 * only the type was accessed. This is important, because detection
1017 * of "new mail" depends on those times set correctly.
1019 times.actime = st->st_atime;
1020 times.modtime = st->st_mtime;
1021 utime (path, ×);
1024 return (-1); /* fopen failed */
1027 if (magic == -1 && mutt_can_read_compressed (path))
1028 return (M_COMPRESSED);
1032 static int commit_message (MESSAGE* msg, CONTEXT* ctx __attribute__ ((unused)), int mbox) {
1033 if ((mbox && fputc ('\n', msg->fp) == EOF) ||
1034 (!mbox && fputs (MMDF_SEP, msg->fp) == EOF))
1036 if ((fflush (msg->fp) == EOF || fsync (fileno (msg->fp)) == -1)) {
1037 mutt_perror (_("Can't write message"));
1043 static int mbox_commit_message (MESSAGE* msg, CONTEXT* ctx) {
1044 return (commit_message (msg, ctx, 1));
1047 static int mmdf_commit_message (MESSAGE* msg, CONTEXT* ctx) {
1048 return (commit_message (msg, ctx, 0));
1051 mx_t const mbox_mx = {
1058 mbox_open_new_message,
1063 mbox_commit_message,
1066 mx_t const mmdf_mx = {
1073 mbox_open_new_message,
1078 mmdf_commit_message,