bcache.c and bcache.h accidentally omitted from previous commit.

1 files changed, 250 insertions, 0 deletions

diff --git a/bcache.c b/bcache.c
new file mode 100644
index 00000000..319afba2
--- /dev/null
+++ b/bcache.c
@@ -0,0 +1,250 @@
+/*
+ * Copyright (C) 2006 Brendan Cully <brendan@kublai.com>
+ * Copyright (C) 2006 Rocco Rutte <pdmef@gmx.net>
+ *
+ *     This program is free software; you can redistribute it and/or modify
+ *     it under the terms of the GNU General Public License as published by
+ *     the Free Software Foundation; either version 2 of the License, or
+ *     (at your option) any later version.
+ *
+ *     This program is distributed in the hope that it will be useful,
+ *     but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ *     GNU General Public License for more details.
+ *
+ *     You should have received a copy of the GNU General Public License
+ *     along with this program; if not, write to the Free Software
+ *     Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
+ */
+
+#if HAVE_CONFIG_H
+#include "config.h"
+#endif				/* HAVE_CONFIG_H */
+
+#include <sys/types.h>
+#include <errno.h>
+#include <dirent.h>
+#include <stdio.h>
+
+#include "mutt.h"
+#include "account.h"
+#include "url.h"
+#include "bcache.h"
+
+#include "lib.h"
+
+struct body_cache {
+  char path[_POSIX_PATH_MAX];
+  size_t pathlen;
+};
+
+static int mutt_bcache_path(ACCOUNT *account, const char *mailbox,
+			    char *dst, size_t dstlen)
+{
+  char host[STRING];
+  char *s;
+  ciss_url_t url;
+  size_t len;
+
+  if (!account || !MessageCachedir || !*MessageCachedir || !dst || !dstlen)
+    return -1;
+
+  /* make up a ciss_url_t we can turn into a string */
+  memset (&url, 0, sizeof (ciss_url_t));
+  mutt_account_tourl (account, &url);
+  /*
+   * mutt_account_tourl() just sets up some pointers;
+   * if this ever changes, we have a memleak here
+   */
+  url.path = NULL;
+  url_ciss_tostring (&url, host, sizeof (host), 0);
+
+  dprint (3, (debugfile, "bcache: host: '%s'\n", host));
+
+  /*
+   * replace all '/' in proto://host part to '_' so the hierarchy
+   * doesn't get too deeply nested
+   * XXX imaps:__joe@example.com@imap.example.com doesn't look nice
+   *
+   * ('*(s+1)' since url_ciss_tostring() appends '/' after host part
+   * which we want to keep)
+   */
+  for (s = host; s && *s && *(s+1) ; s++)
+    if (*s == '/')
+      *s = '_';
+
+  /*
+   * not enough space is the only error I can think of
+   * (dstlen-1 for '/'-termination, see below)
+   */
+  if (snprintf (dst, dstlen-1, "%s/%s%s", MessageCachedir,
+		host, NONULL(mailbox)) <= 0)
+    return -1;
+
+  /* make sure to '/'-terminate the path as we assume that elsewhere */
+  len = mutt_strlen (dst);
+  if (len <= dstlen+2 && dst[len-1] != '/')
+  {
+    dst[len++] = '/';
+    dst[len] = '\0';
+  }
+
+  dprint (3, (debugfile, "bcache: directory: '%s'\n", dst));
+
+  return 0;
+}
+
+body_cache_t *mutt_bcache_open (ACCOUNT *account, const char *mailbox)
+{
+  struct body_cache *bcache = NULL;
+
+  if (!account)
+    goto bail;
+
+  bcache = safe_calloc (1, sizeof (struct body_cache));
+  if (mutt_bcache_path (account, mailbox, bcache->path,
+			sizeof (bcache->path)) < 0)
+    goto bail;
+  bcache->pathlen = mutt_strlen (bcache->path);
+
+  return bcache;
+
+bail:
+  if (bcache)
+    FREE(&bcache);
+  return NULL;
+}
+
+void mutt_bcache_close (body_cache_t **bcache)
+{
+  if (!bcache || !*bcache)
+    return;
+  FREE(bcache);			/* __FREE_CHECKED__ */
+}
+
+FILE* mutt_bcache_get(body_cache_t *bcache, const char *id)
+{
+  char path[_POSIX_PATH_MAX];
+  FILE* fp = NULL;
+
+  if (!id || !*id || !bcache)
+    return NULL;
+
+  path[0] = '\0';
+  safe_strncat (path, sizeof (path), bcache->path, bcache->pathlen);
+  safe_strncat (path, sizeof (path), id, mutt_strlen (id));
+
+  fp = safe_fopen (path, "r");
+
+  dprint (3, (debugfile, "bcache: get: '%s': %s\n", path, fp == NULL ? "no" : "yes"));
+
+  return fp;
+}
+
+FILE* mutt_bcache_put(body_cache_t *bcache, const char *id)
+{
+  char path[_POSIX_PATH_MAX];
+  FILE* fp;
+  char* s;
+  struct stat sb;
+
+  if (!id || !*id || !bcache)
+    return NULL;
+
+  path[0] = '\0';
+  safe_strncat (path, sizeof (path), bcache->path, bcache->pathlen);
+  safe_strncat (path, sizeof (path), id, mutt_strlen (id));
+
+  s = strchr (path + 1, '/');
+  while (!(fp = safe_fopen (path, "w+")) && errno == ENOENT && s)
+  {
+    /* create missing path components */
+    *s = '\0';
+    if (stat (path, &sb) < 0 && (errno != ENOENT || mkdir (path, 0777) < 0))
+      return NULL;
+    *s = '/';
+    s = strchr (s + 1, '/');
+  }
+
+  dprint (3, (debugfile, "bcache: put: '%s'\n", path));
+
+  return fp;
+}
+
+int mutt_bcache_del(body_cache_t *bcache, const char *id)
+{
+  char path[_POSIX_PATH_MAX];
+
+  if (!id || !*id || !bcache)
+    return -1;
+
+  path[0] = '\0';
+  safe_strncat (path, sizeof (path), bcache->path, bcache->pathlen);
+  safe_strncat (path, sizeof (path), id, mutt_strlen (id));
+
+  dprint (3, (debugfile, "bcache: del: '%s'\n", path));
+
+  return unlink (path);
+}
+
+int mutt_bcache_exists(body_cache_t *bcache, const char *id)
+{
+  char path[_POSIX_PATH_MAX];
+  struct stat st;
+  int rc = 0;
+
+  if (!id || !*id || !bcache)
+    return -1;
+
+  path[0] = '\0';
+  safe_strncat (path, sizeof (path), bcache->path, bcache->pathlen);
+  safe_strncat (path, sizeof (path), id, mutt_strlen (id));
+
+  if (stat (path, &st) < 0)
+    rc = -1;
+  else
+    rc = S_ISREG(st.st_mode) && st.st_size != 0 ? 0 : -1;
+
+  dprint (3, (debugfile, "bcache: exists: '%s': %s\n", path, rc == 0 ? "yes" : "no"));
+
+  return rc;
+}
+
+int mutt_bcache_list(body_cache_t *bcache,
+		     int (*want_id)(const char *id, body_cache_t *bcache,
+				    void *data), void *data)
+{
+  DIR *d = NULL;
+  struct dirent *de;
+  int rc = -1;
+
+  if (!bcache || !(d = opendir (bcache->path)))
+    goto out;
+
+  rc = 0;
+
+  dprint (3, (debugfile, "bcache: list: dir: '%s'\n", bcache->path));
+
+  while ((de = readdir (d)))
+  {
+    if (mutt_strncmp (de->d_name, ".", 1) == 0 ||
+	mutt_strncmp (de->d_name, "..", 2) == 0)
+      continue;
+
+    dprint (3, (debugfile, "bcache: list: dir: '%s', id :'%s'\n", bcache->path, de->d_name));
+
+    if (want_id && want_id (de->d_name, bcache, data) != 0)
+      goto out;
+
+    rc++;
+  }
+
+out:
+  if (d)
+  {
+    if (closedir (d) < 0)
+      rc = -1;
+  }
+  dprint (3, (debugfile, "bcache: list: did %d entries\n", rc));
+  return rc;
+}