hide one more function
[apps/madmutt.git] / buffy.c
diff --git a/buffy.c b/buffy.c
index 9824b6b..0c3b4b3 100644 (file)
--- a/buffy.c
+++ b/buffy.c
  * please see the file GPL in the top level source directory.
  */
 
-#if HAVE_CONFIG_H
-# include "config.h"
-#endif
-
-#include "mutt.h"
-#include "buffy.h"
-#include "mx.h"
-#include "mh.h"
-#include "sidebar.h"
-
-#include "mutt_curses.h"
-
-#ifdef USE_IMAP
-#include "imap.h"
-#endif
-
-#include "lib/mem.h"
-#include "lib/intl.h"
-
-#include <string.h>
-#include <sys/stat.h>
+#include <lib-lib/lib-lib.h>
 #include <dirent.h>
 #include <utime.h>
-#include <ctype.h>
-#include <unistd.h>
 
-#include <stdio.h>
+#include <lib-ui/curses.h>
+#include <lib-ui/sidebar.h>
+#include <lib-mx/mx.h>
+#include <lib-mx/mh.h>
+
+#include <imap/imap.h>
+
+#include "mutt.h"
+#include "buffy.h"
 
 static time_t BuffyTime = 0;    /* last time we started checking for mail */
 
-#ifdef USE_IMAP
 static time_t ImapBuffyTime = 0;        /* last time we started checking for mail */
-#endif
 static short BuffyCount = 0;    /* how many boxes with new mail */
 static short BuffyNotify = 0;   /* # of unnotified new boxes */
 
-#ifdef BUFFY_SIZE
-
-/* Find the last message in the file. 
- * upon success return 0. If no message found - return -1 */
-
-static int fseek_last_message (FILE * f)
+static inline void buffy_delete(BUFFY** p)
 {
-  long int pos;
-  char buffer[BUFSIZ + 9];      /* 7 for "\n\nFrom " */
-  int bytes_read;
-  int i;                        /* Index into `buffer' for scanning.  */
-
-  memset (buffer, 0, sizeof (buffer));
-  fseek (f, 0, SEEK_END);
-  pos = ftell (f);
-
-  /* Set `bytes_read' to the size of the last, probably partial, buffer; 0 <
-   * `bytes_read' <= `BUFSIZ'.  */
-  bytes_read = pos % BUFSIZ;
-  if (bytes_read == 0)
-    bytes_read = BUFSIZ;
-  /* Make `pos' a multiple of `BUFSIZ' (0 if the file is short), so that all
-   * reads will be on block boundaries, which might increase efficiency.  */
-  while ((pos -= bytes_read) >= 0) {
-    /* we save in the buffer at the end the first 7 chars from the last read */
-    strncpy (buffer + BUFSIZ, buffer, 5 + 2);   /* 2 == 2 * safe_strlen(CRLF) */
-    fseek (f, pos, SEEK_SET);
-    bytes_read = fread (buffer, sizeof (char), bytes_read, f);
-    if (bytes_read == -1)
-      return -1;
-    for (i = bytes_read; --i >= 0;)
-      if (!safe_strncmp (buffer + i, "\n\nFrom ", safe_strlen ("\n\nFrom "))) { /* found it - go to the beginning of the From */
-        fseek (f, pos + i + 2, SEEK_SET);
-        return 0;
-      }
-    bytes_read = BUFSIZ;
-  }
-
-  /* here we are at the beginning of the file */
-  if (!safe_strncmp ("From ", buffer, 5)) {
-    fseek (f, 0, 0);
-    return (0);
-  }
-
-  return (-1);
+    p_delete(&(*p)->path);
+    p_delete(p);
 }
 
-/* Return 1 if the last message is new */
-static int test_last_status_new (FILE * f)
-{
-  HEADER *hdr;
-  ENVELOPE *tmp_envelope;
-  int result = 0;
-
-  if (fseek_last_message (f) == -1)
-    return (0);
-
-  hdr = mutt_new_header ();
-  tmp_envelope = mutt_read_rfc822_header (f, hdr, 0, 0);
-  if (!(hdr->read || hdr->old))
-    result = 1;
-
-  mutt_free_envelope (&tmp_envelope);
-  mutt_free_header (&hdr);
-
-  return result;
-}
-
-static int test_new_folder (const char *path)
-{
-  FILE *f;
-  int rc = 0;
-  int typ;
-
-  typ = mx_get_magic (path);
-
-  if (typ != M_MBOX && typ != M_MMDF)
-    return 0;
-
-  if ((f = fopen (path, "rb"))) {
-    rc = test_last_status_new (f);
-    fclose (f);
-  }
-
-  return rc;
-}
-
-BUFFY *buffy_find_mailbox (const char *path)
-{
-  struct stat sb;
-  struct stat tmp_sb;
-  int i = 0;
-
-  if (stat (path, &sb) != 0)
-    return NULL;
-
-  if (!list_empty(Incoming)) {
-    for (i = 0; i < Incoming->length; i++) {
-      if (stat (Incoming->data[i], &tmp_sb) == 0 &&
-          sb.st_dev == tmp_sb.st_dev && sb.st_ino == tmp_sb.st_ino)
-        return ((BUFFY*) Incoming->data[i]);
-    }
-  }
-  return (NULL);
-}
-
-void buffy_update_mailbox (BUFFY * b)
-{
-  struct stat sb;
-
-  if (!b)
-    return;
-
-  if (stat (b->path, &sb) == 0)
-    b->size = (long) sb.st_size;
-  else
-    b->size = 0;
-  return;
-}
-#endif
-
-/* func to free buffy for list_del() */
-static void buffy_free (void** p) {
-  FREE(&(*((BUFFY**) p))->path);
-  FREE(p);
-}
+DO_ARRAY_FUNCS(BUFFY, buffy, buffy_delete);
 
+/* Return the index number of path in Incoming list */
 int buffy_lookup (const char* path) {
   int i = 0;
-  if (list_empty(Incoming) || !path || !*path)
+
+  if (!Incoming.len || !path || !*path)
     return (-1);
-  for (i = 0; i < Incoming->length; i++) {
-    if (safe_strcmp (((BUFFY*) Incoming->data[i])->path, path) == 0)
+
+  for (i = 0; i < Incoming.len; i++) {
+    if (!m_strcmp(Incoming.arr[i]->path, path))
       return (i);
   }
+
   return (-1);
 }
 
 int buffy_parse_mailboxes (BUFFER * path, BUFFER * s, unsigned long data,
-                          BUFFER * err)
+                          BUFFER * err __attribute__ ((unused)))
 {
   BUFFY* tmp;
   char buf[_POSIX_PATH_MAX];
   int i = 0;
-#ifdef BUFFY_SIZE
-  struct stat sb;
-#endif /* BUFFY_SIZE */
 
   while (MoreArgs (s)) {
     mutt_extract_token (path, s, 0);
-    strfcpy (buf, path->data, sizeof (buf));
+    m_strcpy(buf, sizeof(buf), path->data);
 
-    if (data == M_UNMAILBOXES && safe_strcmp (buf, "*") == 0) {
-      list_del (&Incoming, buffy_free);
+    if (data == M_UNMAILBOXES && !strcmp(buf, "*")) {
+      buffy_array_wipe(&Incoming);
       return 0;
     }
 
@@ -211,55 +77,35 @@ int buffy_parse_mailboxes (BUFFER * path, BUFFER * s, unsigned long data,
     i = buffy_lookup (buf);
 
     if (data == M_UNMAILBOXES) {
-      if (i >= 0) {
-        tmp = (BUFFY*) list_pop_idx (Incoming, i);
-        buffy_free (&tmp);
-      }
+      tmp = buffy_array_take(&Incoming, i);
+      buffy_delete(&tmp);
       continue;
     }
 
     if (i < 0) {
-      tmp = safe_calloc (1, sizeof (BUFFY));
-      tmp->path = safe_strdup (buf);
+      tmp = p_new(BUFFY, 1);
+      tmp->path = m_strdup(buf);
       tmp->magic = 0;
-      list_push_back (&Incoming, tmp);
-      i = Incoming->length-1;
-    } else
-      tmp = (BUFFY*) Incoming->data[i];
+      buffy_array_append(&Incoming, tmp);
+      i = Incoming.len-1;
+    } else {
+      tmp = Incoming.arr[i];
+    }
 
     tmp->new = 0;
     tmp->notified = 1;
     tmp->newly_created = 0;
 
-#ifdef BUFFY_SIZE
-    /* for buffy_size, it is important that if the folder is new (tested by
-     * reading it), the size is set to 0 so that later when we check we see
-     * that it increased .  without buffy_size we probably don't care.
-     */
-    if (stat (tmp->path, &sb) == 0 && !test_new_folder (tmp->path)) {
-      /* some systems out there don't have an off_t type */
-      tmp->size = (long) sb.st_size;
-    }
-    else
-      tmp->size = 0;
-#endif /* BUFFY_SIZE */
   }
   return 0;
 }
 
-#ifdef BUFFY_SIZE
-/* people use buffy_size on systems where modified time attributes are BADLY
- * broken. Ignore them.
- */
-#define STAT_CHECK (sb.st_size > tmp->size)
-#else
 #define STAT_CHECK (sb.st_mtime > sb.st_atime || (tmp->newly_created && sb.st_ctime == sb.st_mtime && sb.st_ctime == sb.st_atime))
-#endif /* BUFFY_SIZE */
 
 /* values for force:
  * 0    don't force any checks + update sidebar
  * 1    force all checks + update sidebar
- * 2    force all checks + _don't_ update sidebar
+ * 2    don't force any checks + _don't_ update sidebar
  */
 int buffy_check (int force)
 {
@@ -271,35 +117,28 @@ int buffy_check (int force)
   struct stat contex_sb;
   time_t now, last1;
   CONTEXT *ctx;
-  int i = 0, local = 0, count = 0;
-#ifdef USE_IMAP
+  int i = 0;
+  int local = 0, count = 0;
   time_t last2;
 
   /* update postponed count as well, on force */
-  if (force != 0)
+  if (force == 1)
     mutt_update_num_postponed ();
-#endif
 
   /* fastest return if there are no mailboxes */
-  if (list_empty(Incoming))
+  if (!Incoming.len)
     return 0;
   now = time (NULL);
   if (force == 0 && (now - BuffyTime < BuffyTimeout)
-#ifdef USE_IMAP
       && (now - ImapBuffyTime < ImapBuffyTimeout))
-#else
-    )
-#endif
     return BuffyCount;
 
   last1 = BuffyTime;
-  if (force != 0 || now - BuffyTime >= BuffyTimeout)
+  if (force == 1 || now - BuffyTime >= BuffyTimeout)
     BuffyTime = now;
-#ifdef USE_IMAP
   last2 = ImapBuffyTime;
-  if (force != 0 || now - ImapBuffyTime >= ImapBuffyTimeout)
+  if (force == 1 || now - ImapBuffyTime >= ImapBuffyTimeout)
     ImapBuffyTime = now;
-#endif
   BuffyCount = 0;
   BuffyNotify = 0;
 
@@ -312,8 +151,8 @@ int buffy_check (int force)
     contex_sb.st_ino = 0;
   }
 
-  for (i = 0; i < Incoming->length; i++) {
-    tmp = (BUFFY*) Incoming->data[i];
+  for (i = 0; i < Incoming.len; i++) {
+    tmp = Incoming.arr[i];
     tmp->magic = mx_get_magic (tmp->path);
     local = mx_is_local (tmp->magic-1);
     if ((tmp->magic <= 0 || local) && (stat (tmp->path, &sb) != 0 || sb.st_size == 0)) {
@@ -321,33 +160,24 @@ int buffy_check (int force)
        * be ready for when it does. */
       tmp->newly_created = 1;
       tmp->magic = -1;
-#ifdef BUFFY_SIZE
-      tmp->size = 0;
-#endif
       continue;
     }
 
     /* check to see if the folder is the currently selected folder
      * before polling */
     if (!Context || !Context->path || (local ? (sb.st_dev != contex_sb.st_dev ||
-                                                sb.st_ino != contex_sb.st_ino) :
-                                       safe_strcmp (tmp->path, Context->path))) {
+                                                sb.st_ino != contex_sb.st_ino) : 
+                                       m_strcmp(tmp->path, Context->path))) {
       switch (tmp->magic) {
       case M_MBOX:
       case M_MMDF:
         /* only check on force or $mail_check reached */
-        if (force != 0 || (now - last1 >= BuffyTimeout)) {
+        if (force == 1 || (now - last1 >= BuffyTimeout)) {
           if (!count) {
             if (STAT_CHECK) {
               BuffyCount++;
               tmp->new = 1;
             }
-#ifdef BUFFY_SIZE
-            else {
-              /* some other program has deleted mail from the folder */
-              tmp->size = (long) sb.st_size;
-            }
-#endif
           }
           else if (STAT_CHECK || tmp->msgcount == 0) {
             /* sidebar visible */
@@ -372,7 +202,7 @@ int buffy_check (int force)
 
       case M_MAILDIR:
         /* only check on force or $mail_check reached */
-        if (force != 0 || (now - last1 >= BuffyTimeout)) {
+        if (force == 1 || (now - last1 >= BuffyTimeout)) {
           snprintf (path, sizeof (path), "%s/new", tmp->path);
           if ((dirp = opendir (path)) == NULL) {
             tmp->magic = 0;
@@ -389,10 +219,11 @@ int buffy_check (int force)
               /* one new and undeleted message is enough */
               if (tmp->new == 0) {
                 BuffyCount++;
-                tmp->new = 1;
-                if (!count)
+                if (!count) {
                   /* if sidebar invisible -> done */
+                  tmp->new = 1;
                   break;
+                }
               }
               tmp->msgcount++;
               tmp->msg_unread++;
@@ -430,12 +261,11 @@ int buffy_check (int force)
 
       case M_MH:
         /* only check on force or $mail_check reached */
-        if (force != 0 || (now - last1 >= BuffyTimeout)) {
+        if (force == 1 || (now - last1 >= BuffyTimeout)) {
           if ((tmp->new = mh_buffy (tmp->path)) > 0)
             BuffyCount++;
           if (count) {
             DIR *dp;
-            struct dirent *de;
 
             if ((dp = opendir (path)) == NULL)
               break;
@@ -457,32 +287,26 @@ int buffy_check (int force)
           BuffyCount++;
         break;
 
-#ifdef USE_IMAP
       case M_IMAP:
         /* only check on force or $imap_mail_check reached */
-        if (force != 0 || (now - last2 >= ImapBuffyTimeout)) {
+        if (force == 1 || (now - last2 >= ImapBuffyTimeout)) {
           tmp->msgcount = imap_mailbox_check (tmp->path, 0);
-          if ((tmp->new = imap_mailbox_check (tmp->path, 1)) > 0) {
+          tmp->new = imap_mailbox_check (tmp->path, 1);
+          tmp->msg_unread = imap_mailbox_check (tmp->path, 2);
+          if (tmp->new > 0)
             BuffyCount++;
-            tmp->msg_unread = tmp->new; /* for sidebar; wtf? */
-          }
-          else {
+          else
             tmp->new = 0;
+          if (tmp->msg_unread < 0)
             tmp->msg_unread = 0;
-          }
         }
         else if (tmp->new > 0)
           /* keep current stats if !force and !$imap_mail_check reached */
           BuffyCount++;
         break;
-#endif
 
       }
     }
-#ifdef BUFFY_SIZE
-    else if (Context && Context->path)
-      tmp->size = (long) sb.st_size;    /* update the size */
-#endif
 
     if (tmp->new <= 0)
       tmp->notified = 0;
@@ -491,7 +315,7 @@ int buffy_check (int force)
     tmp->has_new = tmp->new > 0;
   }
   if (BuffyCount > 0 && force != 2)
-    sidebar_draw (CurrentMenu);
+    sidebar_draw ();
   return (BuffyCount);
 }
 
@@ -505,45 +329,38 @@ int buffy_list (void)
   int have_unnotified = BuffyNotify;
   int i = 0;
 
-  if (option (OPTFORCEBUFFYCHECK))
-    buffy_check (1);
-
   pos = 0;
   first = 1;
   buffylist[0] = 0;
-  pos += safe_strlen (strncat (buffylist, _("New mail in "), sizeof (buffylist) - 1 - pos)); /* __STRNCAT_CHECKED__ */
-  if (Incoming) {
-    for (i = 0; i < Incoming->length; i++) {
-      tmp = (BUFFY*) Incoming->data[i];
-      /* Is there new mail in this mailbox? */
-      if (tmp->new <= 0 || (have_unnotified && tmp->notified))
-        continue;
-
-      strfcpy (path, tmp->path, sizeof (path));
-      mutt_pretty_mailbox (path);
-
-      if (!first && pos + safe_strlen (path) >= COLS - 7)
-        break;
+  pos += m_strlen(strncat (buffylist, _("New mail in "), sizeof (buffylist) - 1 - pos)); /* __STRNCAT_CHECKED__ */
+  for (i = 0; i < Incoming.len; i++) {
+    tmp = Incoming.arr[i];
+    /* Is there new mail in this mailbox? */
+    if (tmp->new <= 0 || (have_unnotified && tmp->notified))
+      continue;
 
-      if (!first)
-        pos += safe_strlen (strncat (buffylist + pos, ", ", sizeof (buffylist) - 1 - pos));    /* __STRNCAT_CHECKED__ */
+    m_strcpy(path, sizeof(path), tmp->path);
+    mutt_pretty_mailbox (path);
 
-      /* Prepend an asterisk to mailboxes not already notified */
-      if (!tmp->notified) {
-        /* pos += safe_strlen (strncat(buffylist + pos, "*", sizeof(buffylist)-1-pos));  __STRNCAT_CHECKED__ */
-        tmp->notified = 1;
-        BuffyNotify--;
-      }
-      pos += safe_strlen (strncat (buffylist + pos, path, sizeof (buffylist) - 1 - pos));      /* __STRNCAT_CHECKED__ */
-      first = 0;
-    }
+    if (!first && pos + m_strlen(path) >= COLS - 7)
+      break;
+
+    if (!first)
+      pos += m_strlen(strncat (buffylist + pos, ", ", sizeof (buffylist) - 1 - pos));    /* __STRNCAT_CHECKED__ */
+
+    tmp->notified = 1;
+    BuffyNotify--;
+
+    pos += m_strlen(strncat (buffylist + pos, path, sizeof (buffylist) - 1 - pos));      /* __STRNCAT_CHECKED__ */
+    first = 0;
   }
-  if (!first && i < Incoming->length) {
+
+  if (!first && i < Incoming.len) {
     strncat (buffylist + pos, ", ...", sizeof (buffylist) - 1 - pos);   /* __STRNCAT_CHECKED__ */
   }
   if (!first) {
     /* on new mail: redraw sidebar */
-    sidebar_draw (CurrentMenu);
+    sidebar_draw ();
     mutt_message ("%s", buffylist);
     return (1);
   }
@@ -563,38 +380,42 @@ int buffy_notify (void)
 }
 
 /* 
- * mutt_buffy() -- incoming folders completion routine
+ * buffy_next() -- incoming folders completion routine
  *
  * given a folder name, this routine gives the next incoming folder with new
  * new mail.
  */
 void buffy_next (char *s, size_t slen)
 {
-  int i = 0, c = 0;
-
-  if (list_empty(Incoming))
-    return;
+  int l = 0;
+  int c = 0, i = 0;
 
   mutt_expand_path (s, _POSIX_PATH_MAX);
-  if (buffy_check (0) == 0) {
-    *s = '\0';
-    return;
-  }
+  if (!buffy_check (0)) {
+      *s = '\0';
+      return;
+    }
 
-  i = buffy_lookup (s);
-  c = i == Incoming->length-1 ? 0 : i+1;
-  while (((BUFFY*) Incoming->data[c])->new <= 0) {
-    c = (c+1) % Incoming->length;
-    if (c == i)
-      break;    /* tried all once */
+  /*
+   * buffy_lookup returns the index,
+   * or -1 if not found (-1..Incoming.len-1);
+   * plus one --> (0..Incoming.len).
+   * Modulo mapps it into the correct range.
+   */
+  i = 1 + buffy_lookup (s);
+  for (l = 0; l < Incoming.len; l++) {
+    c = (l+i) % Incoming.len;
+
+    if (m_strcmp(Incoming.arr[c]->path, s) && Incoming.arr[c]->new > 0)
+      break;
   }
-  if (c == i) {
+  if (l >= Incoming.len) {
     *s = '\0';
     /* something went wrong since we're here when buffy_check
      * reported new mail */
-    buffy_check (0);
+    buffy_check (1);
   } else {
-    strfcpy (s, ((BUFFY*) Incoming->data[c])->path, slen);
+    m_strcpy(s, slen, Incoming.arr[c]->path);
     mutt_pretty_mailbox (s);
   }
 }