maildir-storage.c revision 73a552a9ed06cd6017ad4ee4b252a8b38c8ac42d
2ronwalf/* Copyright (C) 2002-2006 Timo Sirainen */
2ronwalf
2ronwalf#include "lib.h"
2ronwalf#include "ioloop.h"
2ronwalf#include "array.h"
2ronwalf#include "hostpid.h"
2ronwalf#include "home-expand.h"
2ronwalf#include "mkdir-parents.h"
2ronwalf#include "unlink-directory.h"
2ronwalf#include "maildir-storage.h"
2ronwalf#include "maildir-uidlist.h"
2ronwalf#include "maildir-keywords.h"
2ronwalf#include "maildir-sync.h"
2ronwalf#include "index-mail.h"
2ronwalf
38daenzerorama#include <stdio.h>
2ronwalf#include <stdlib.h>
2ronwalf#include <unistd.h>
2ronwalf#include <sys/stat.h>
2ronwalf
2ronwalf#define CREATE_MODE 0777 /* umask() should limit it more */
2ronwalf
2ronwalf#define MAILDIR_PLUSPLUS_DRIVER_NAME "maildir++"
2ronwalf#define MAILDIR_SUBFOLDER_FILENAME "maildirfolder"
2ronwalf
2ronwalfstruct rename_context {
2ronwalf bool found;
2ronwalf size_t oldnamelen;
2ronwalf const char *newname;
2ronwalf};
2ronwalf
2ronwalfextern struct mail_storage maildir_storage;
2ronwalfextern struct mailbox maildir_mailbox;
2ronwalf
2ronwalfstatic int verify_inbox(struct mail_storage *storage);
2ronwalf
2ronwalfstatic const char *strip_tail_slash(const char *path)
2ronwalf{
2ronwalf size_t len = strlen(path);
2ronwalf
2ronwalf if (len > 0 && path[len-1] == '/')
2ronwalf return t_strndup(path, len-1);
2ronwalf else
24daenzerorama return path;
24daenzerorama}
24daenzerorama
24daenzeroramastatic const char *strip_tail_slash_and_cut(const char *path)
24daenzerorama{
24daenzerorama return strip_tail_slash(t_strcut(path, ':'));
24daenzerorama}
24daenzerorama
24daenzeroramastatic int
24daenzeroramamaildir_get_list_settings(struct mailbox_list_settings *list_set,
24daenzerorama const char *data, enum mail_storage_flags flags)
24daenzerorama{
24daenzerorama bool debug = (flags & MAIL_STORAGE_FLAG_DEBUG) != 0;
24daenzerorama const char *home, *path, *p;
24daenzerorama
24daenzerorama memset(list_set, 0, sizeof(*list_set));
24daenzerorama list_set->subscription_fname = MAILDIR_SUBSCRIPTION_FILE_NAME;
2ronwalf list_set->maildir_name = "";
if (data == NULL || *data == '\0') {
if ((flags & MAIL_STORAGE_FLAG_NO_AUTODETECTION) != 0) {
i_error("maildir: root directory not given");
return -1;
}
/* we'll need to figure out the maildir location ourself.
It's $HOME/Maildir unless we are chrooted. */
if ((home = getenv("HOME")) != NULL) {
path = t_strconcat(home, "/Maildir", NULL);
if (access(path, R_OK|W_OK|X_OK) == 0) {
if (debug) {
i_info("maildir: root exists (%s)",
path);
}
list_set->root_dir = path;
} else {
if (debug) {
i_info("maildir: access(%s, rwx): "
"failed: %m", path);
}
}
} else {
if (debug)
i_info("maildir: HOME not set");
}
if (access("/cur", R_OK|W_OK|X_OK) == 0) {
if (debug)
i_info("maildir: /cur exists, assuming chroot");
list_set->root_dir = "/";
}
} else {
/* <Maildir> [:INBOX=<dir>] [:INDEX=<dir>] [:CONTROL=<dir>] */
if (debug)
i_info("maildir: data=%s", data);
p = strchr(data, ':');
if (p == NULL)
list_set->root_dir = data;
else {
list_set->root_dir = t_strdup_until(data, p);
do {
p++;
if (strncmp(p, "INBOX=", 6) == 0) {
list_set->inbox_path =
strip_tail_slash_and_cut(p+6);
} else if (strncmp(p, "INDEX=", 6) == 0) {
list_set->index_dir =
strip_tail_slash_and_cut(p+6);
} else if (strncmp(p, "CONTROL=", 8) == 0) {
list_set->control_dir =
strip_tail_slash_and_cut(p+8);
}
p = strchr(p, ':');
} while (p != NULL);
}
}
if (list_set->root_dir == NULL) {
if (debug)
i_info("maildir: couldn't find root dir");
return -1;
}
list_set->root_dir = strip_tail_slash(list_set->root_dir);
if (list_set->index_dir != NULL &&
strcmp(list_set->index_dir, "MEMORY") == 0)
list_set->index_dir = "";
return 0;
}
static struct mail_storage *
maildir_create(const char *data, const char *user,
enum mail_storage_flags flags,
enum file_lock_method lock_method)
{
struct maildir_storage *storage;
struct index_storage *istorage;
struct mailbox_list_settings list_set;
struct mailbox_list *list;
const char *error;
struct stat st;
pool_t pool;
if (maildir_get_list_settings(&list_set, data, flags) < 0)
return NULL;
list_set.mail_storage_flags = &flags;
list_set.lock_method = &lock_method;
/* normally the maildir is created in verify_inbox() */
if ((flags & MAIL_STORAGE_FLAG_NO_AUTOCREATE) != 0) {
if (stat(list_set.root_dir, &st) < 0) {
if (errno != ENOENT) {
i_error("stat(%s) failed: %m",
list_set.root_dir);
}
return NULL;
}
}
pool = pool_alloconly_create("storage", 512+256);
storage = p_new(pool, struct maildir_storage, 1);
if (mailbox_list_init("maildir++", &list_set,
mail_storage_get_list_flags(flags),
mailbox_storage_list_is_mailbox, storage,
&list, &error) < 0) {
i_error("maildir++: %s", error);
pool_unref(pool);
return NULL;
}
storage->copy_with_hardlinks =
getenv("MAILDIR_COPY_WITH_HARDLINKS") != NULL;
storage->copy_preserve_filename =
getenv("MAILDIR_COPY_PRESERVE_FILENAME") != NULL;
storage->stat_dirs = getenv("MAILDIR_STAT_DIRS") != NULL;
storage->temp_prefix = mailbox_list_get_temp_prefix(list);
if (list_set.control_dir == NULL) {
/* put the temp files into tmp/ directory preferrably */
storage->temp_prefix =
p_strconcat(pool, "tmp/", storage->temp_prefix, NULL);
}
istorage = INDEX_STORAGE(storage);
istorage->storage = maildir_storage;
istorage->storage.pool = pool;
istorage->user = p_strdup(pool, user);
index_storage_init(istorage, list, flags, lock_method);
(void)verify_inbox(STORAGE(storage));
return STORAGE(storage);
}
static void maildir_free(struct mail_storage *_storage)
{
struct index_storage *storage = (struct index_storage *) _storage;
index_storage_deinit(storage);
pool_unref(storage->storage.pool);
}
static bool maildir_autodetect(const char *data, enum mail_storage_flags flags)
{
bool debug = (flags & MAIL_STORAGE_FLAG_DEBUG) != 0;
struct stat st;
const char *path;
data = t_strcut(data, ':');
path = t_strconcat(data, "/cur", NULL);
if (stat(path, &st) < 0) {
if (debug)
i_info("maildir autodetect: stat(%s) failed: %m", path);
return FALSE;
}
if (!S_ISDIR(st.st_mode)) {
if (debug)
i_info("maildir autodetect: %s not a directory", path);
return FALSE;
}
return TRUE;
}
static const char *
maildir_get_unlink_dest(struct mail_storage *storage, const char *name)
{
const char *root_dir;
if ((storage->flags & MAIL_STORAGE_FLAG_FULL_FS_ACCESS) != 0 &&
(*name == '/' || *name == '~'))
return NULL;
if (strcmp(mailbox_list_get_driver_name(storage->list),
MAILDIR_PLUSPLUS_DRIVER_NAME) != 0) {
/* Not maildir++ driver. Don't use this trick. */
return NULL;
}
root_dir = mailbox_list_get_path(storage->list, NULL,
MAILBOX_LIST_PATH_TYPE_DIR);
return t_strdup_printf("%s/%c"MAILDIR_UNLINK_DIRNAME, root_dir,
mailbox_list_get_hierarchy_sep(storage->list));
}
static int mkdir_verify(struct mail_storage *storage,
const char *dir, bool verify)
{
struct stat st;
if (verify) {
if (stat(dir, &st) == 0)
return 0;
if (errno != ENOENT) {
mail_storage_set_critical(storage,
"stat(%s) failed: %m", dir);
return -1;
}
}
if (mkdir_parents(dir, CREATE_MODE) < 0) {
if (errno == EEXIST) {
if (!verify)
return -1;
} else {
mail_storage_set_critical(storage,
"mkdir(%s) failed: %m", dir);
return -1;
}
}
return 0;
}
/* create or fix maildir, ignore if it already exists */
static int create_maildir(struct mail_storage *storage,
const char *dir, bool verify)
{
const char *path;
struct stat st;
if (mkdir_verify(storage, t_strconcat(dir, "/cur", NULL), verify) < 0)
return -1;
if (mkdir_verify(storage, t_strconcat(dir, "/new", NULL), verify) < 0)
return -1;
/* if tmp/ directory exists, we need to clean it up once in a while */
path = t_strconcat(dir, "/tmp", NULL);
if (stat(path, &st) == 0) {
if (st.st_atime >
st.st_ctime + MAILDIR_TMP_DELETE_SECS) {
/* the directory should be empty. we won't do anything
until ctime changes. */
} else if (st.st_atime < ioloop_time - MAILDIR_TMP_SCAN_SECS) {
/* time to scan */
(void)maildir_tmp_cleanup(storage, path);
}
} else if (errno == ENOENT) {
if (mkdir_verify(storage, path, verify) < 0)
return -1;
} else {
mail_storage_set_critical(storage, "stat(%s) failed: %m", path);
return -1;
}
return 0;
}
static int create_index_dir(struct mail_storage *storage, const char *name)
{
const char *index_dir, *root_dir, *dir;
index_dir = mailbox_list_get_path(storage->list, name,
MAILBOX_LIST_PATH_TYPE_INDEX);
if (*index_dir == '\0')
return 0;
root_dir = mailbox_list_get_path(storage->list, name,
MAILBOX_LIST_PATH_TYPE_MAILBOX);
if (strcmp(index_dir, root_dir) == 0)
return 0;
dir = t_strdup_printf("%s/%c%s", index_dir,
mailbox_list_get_hierarchy_sep(storage->list),
name);
if (mkdir_parents(dir, CREATE_MODE) < 0 && errno != EEXIST) {
mail_storage_set_critical(storage,
"mkdir(%s) failed: %m", dir);
return -1;
}
return 0;
}
static int create_control_dir(struct mail_storage *storage, const char *name)
{
const char *control_dir, *root_dir, *dir;
control_dir = mailbox_list_get_path(storage->list, name,
MAILBOX_LIST_PATH_TYPE_CONTROL);
root_dir = mailbox_list_get_path(storage->list, name,
MAILBOX_LIST_PATH_TYPE_MAILBOX);
if (strcmp(control_dir, root_dir) == 0)
return 0;
dir = t_strdup_printf("%s/%c%s", control_dir,
mailbox_list_get_hierarchy_sep(storage->list),
name);
if (mkdir_parents(dir, CREATE_MODE) < 0 && errno != EEXIST) {
mail_storage_set_critical(storage,
"mkdir(%s) failed: %m", dir);
return -1;
}
return 0;
}
static int verify_inbox(struct mail_storage *storage)
{
const char *path;
path = mailbox_list_get_path(storage->list, "INBOX",
MAILBOX_LIST_PATH_TYPE_MAILBOX);
if (create_maildir(storage, path, TRUE) < 0)
return -1;
if (create_index_dir(storage, "INBOX") < 0)
return -1;
if (create_control_dir(storage, "INBOX") < 0)
return -1;
return 0;
}
static bool maildir_is_recent(struct index_mailbox *ibox, uint32_t uid)
{
struct maildir_mailbox *mbox = (struct maildir_mailbox *)ibox;
return maildir_uidlist_is_recent(mbox->uidlist, uid);
}
static struct mailbox *
maildir_open(struct maildir_storage *storage, const char *name,
enum mailbox_open_flags flags)
{
struct index_storage *istorage = INDEX_STORAGE(storage);
struct maildir_mailbox *mbox;
struct mail_index *index;
const char *path, *index_dir, *control_dir;
struct stat st;
int shared;
pool_t pool;
path = mailbox_list_get_path(istorage->storage.list, name,
MAILBOX_LIST_PATH_TYPE_MAILBOX);
index_dir = mailbox_list_get_path(istorage->storage.list, name,
MAILBOX_LIST_PATH_TYPE_INDEX);
control_dir = mailbox_list_get_path(istorage->storage.list, name,
MAILBOX_LIST_PATH_TYPE_CONTROL);
if ((flags & MAILBOX_OPEN_NO_INDEX_FILES) != 0)
index_dir = "";
index = index_storage_alloc(index_dir, path,
MAILDIR_INDEX_PREFIX);
/* for shared mailboxes get the create mode from the
permissions of dovecot-shared file. */
shared = stat(t_strconcat(path, "/dovecot-shared", NULL), &st) == 0;
if (shared)
mail_index_set_permissions(index, st.st_mode & 0666, st.st_gid);
pool = pool_alloconly_create("mailbox", 1024);
mbox = p_new(pool, struct maildir_mailbox, 1);
mbox->ibox.box = maildir_mailbox;
mbox->ibox.box.pool = pool;
mbox->ibox.storage = istorage;
mbox->ibox.mail_vfuncs = &maildir_mail_vfuncs;
mbox->ibox.is_recent = maildir_is_recent;
index_storage_mailbox_init(&mbox->ibox, index, name, flags, FALSE);
mbox->storage = storage;
mbox->path = p_strdup(pool, path);
mbox->control_dir = p_strdup(pool, control_dir);
mbox->uidlist = maildir_uidlist_init(mbox);
mbox->keywords = maildir_keywords_init(mbox);
if (!shared)
mbox->mail_create_mode = 0600;
else {
mbox->mail_create_mode = st.st_mode & 0666;
mbox->private_flags_mask = MAIL_SEEN;
}
if (mbox->ibox.keep_locked) {
if (maildir_uidlist_lock(mbox->uidlist) <= 0) {
struct mailbox *box = &mbox->ibox.box;
mailbox_close(&box);
return NULL;
}
}
return &mbox->ibox.box;
}
static struct mailbox *
maildir_mailbox_open(struct mail_storage *_storage, const char *name,
struct istream *input, enum mailbox_open_flags flags)
{
struct maildir_storage *storage = (struct maildir_storage *)_storage;
const char *path;
struct stat st;
mail_storage_clear_error(_storage);
if (input != NULL) {
mail_storage_set_critical(_storage,
"Maildir doesn't support streamed mailboxes");
return NULL;
}
if (strcmp(name, "INBOX") == 0) {
if (verify_inbox(_storage) < 0)
return NULL;
return maildir_open(storage, "INBOX", flags);
}
if (!mailbox_list_is_valid_existing_name(_storage->list, name)) {
mail_storage_set_error(_storage, "Invalid mailbox name");
return NULL;
}
path = mailbox_list_get_path(_storage->list, name,
MAILBOX_LIST_PATH_TYPE_MAILBOX);
if (stat(path, &st) == 0) {
/* exists - make sure the required directories are also there */
if (create_maildir(_storage, path, TRUE) < 0 ||
create_control_dir(_storage, name) < 0)
return NULL;
if ((flags & MAILBOX_OPEN_NO_INDEX_FILES) == 0) {
if (create_index_dir(_storage, name) < 0)
return NULL;
}
return maildir_open(storage, name, flags);
} else if (errno == ENOENT) {
mail_storage_set_error(_storage,
MAIL_STORAGE_ERR_MAILBOX_NOT_FOUND, name);
return NULL;
} else {
mail_storage_set_critical(_storage, "stat(%s) failed: %m",
path);
return NULL;
}
}
static int maildir_create_shared(struct mail_storage *storage,
const char *dir, mode_t mode, gid_t gid)
{
const char *path;
mode_t old_mask;
int fd;
/* add the execute bit if either read or write bit is set */
if ((mode & 0600) != 0) mode |= 0100;
if ((mode & 0060) != 0) mode |= 0010;
if ((mode & 0006) != 0) mode |= 0001;
old_mask = umask(0777 ^ mode);
if (create_maildir(storage, dir, FALSE) < 0) {
if (errno == EEXIST) {
mail_storage_set_error(storage,
"Mailbox already exists");
}
umask(old_mask);
return -1;
}
if (chown(dir, (uid_t)-1, gid) < 0) {
mail_storage_set_critical(storage, "chown(%s) failed: %m", dir);
}
path = t_strconcat(dir, "/dovecot-shared", NULL);
fd = open(path, O_WRONLY | O_CREAT, mode & 0666);
umask(old_mask);
if (fd == -1) {
mail_storage_set_critical(storage, "open(%s) failed: %m", path);
return -1;
}
if (fchown(fd, (uid_t)-1, gid) < 0) {
mail_storage_set_critical(storage,
"fchown(%s) failed: %m", path);
}
(void)close(fd);
return 0;
}
static int maildir_mailbox_create(struct mail_storage *_storage,
const char *name,
bool directory __attr_unused__)
{
struct stat st;
const char *path, *root_dir, *shared_path;
int fd;
mail_storage_clear_error(_storage);
if (!mailbox_list_is_valid_create_name(_storage->list, name)) {
mail_storage_set_error(_storage, "Invalid mailbox name");
return -1;
}
path = mailbox_list_get_path(_storage->list, name,
MAILBOX_LIST_PATH_TYPE_MAILBOX);
root_dir = mailbox_list_get_path(_storage->list, NULL,
MAILBOX_LIST_PATH_TYPE_MAILBOX);
/* if dovecot-shared exists in the root dir, create the mailbox using
its permissions and gid, and copy the dovecot-shared inside it. */
shared_path = t_strconcat(root_dir, "/dovecot-shared", NULL);
if (stat(shared_path, &st) == 0) {
return maildir_create_shared(_storage, path,
st.st_mode & 0666, st.st_gid);
}
if (create_maildir(_storage, path, FALSE) < 0) {
if (errno == EEXIST) {
mail_storage_set_error(_storage,
"Mailbox already exists");
}
return -1;
}
/* Maildir++ spec want that maildirfolder named file is created for
all subfolders. */
path = t_strconcat(path, "/" MAILDIR_SUBFOLDER_FILENAME, NULL);
fd = open(path, O_CREAT | O_WRONLY, CREATE_MODE & 0666);
if (fd == -1)
i_error("open(%s, O_CREAT) failed: %m", path);
else
(void)close(fd);
return 0;
}
static int maildir_mailbox_delete(struct mail_storage *_storage,
const char *name)
{
struct stat st;
const char *src, *dest, *index_dir, *control_dir;
int count;
mail_storage_clear_error(_storage);
if (strcmp(name, "INBOX") == 0) {
mail_storage_set_error(_storage, "INBOX can't be deleted.");
return -1;
}
if (!mailbox_list_is_valid_existing_name(_storage->list, name)) {
mail_storage_set_error(_storage, "Invalid mailbox name");
return -1;
}
/* check if the mailbox actually exists */
src = mailbox_list_get_path(_storage->list, name,
MAILBOX_LIST_PATH_TYPE_MAILBOX);
if (stat(src, &st) != 0 && errno == ENOENT) {
mail_storage_set_error(_storage,
MAIL_STORAGE_ERR_MAILBOX_NOT_FOUND, name);
return -1;
}
/* Make sure the indexes are closed before trying to delete the
directory that contains them. It can still fail with some NFS
implementations if indexes are opened by another session, but
that can't really be helped. */
index_storage_destroy_unrefed();
/* if there's a separate index directory, delete it before the actual
maildir. this way we never see partially deleted mailboxes. */
index_dir = mailbox_list_get_path(_storage->list, name,
MAILBOX_LIST_PATH_TYPE_INDEX);
if (strcmp(index_dir, src) != 0) {
i_assert(*name != '/' && *name != '~');
if (unlink_directory(index_dir, TRUE) < 0 &&
errno != ENOTEMPTY) {
mail_storage_set_critical(_storage,
"unlink_directory(%s) failed: %m", index_dir);
return -1;
}
}
control_dir = mailbox_list_get_path(_storage->list, name,
MAILBOX_LIST_PATH_TYPE_CONTROL);
if (strcmp(control_dir, src) != 0 &&
strcmp(control_dir, index_dir) != 0) {
i_assert(*name != '/' && *name != '~');
if (unlink_directory(control_dir, TRUE) < 0 &&
errno != ENOTEMPTY) {
mail_storage_set_critical(_storage,
"unlink_directory(%s) failed: %m", control_dir);
return -1;
}
}
dest = maildir_get_unlink_dest(_storage, name);
if (dest == NULL) {
/* absolute maildir path, delete the directory directly
without any renaming */
dest = src;
} else {
/* rename the .maildir into ..DOVECOT-TRASH which atomically
marks it as being deleted. If we die before deleting the
..DOVECOT-TRASH directory, it gets deleted the next time
mailbox listing sees it. */
count = 0;
while (rename(src, dest) < 0 && count < 2) {
if (!EDESTDIREXISTS(errno)) {
mail_storage_set_critical(_storage,
"rename(%s, %s) failed: %m", src, dest);
return -1;
}
/* already existed, delete it and try again */
if (unlink_directory(dest, TRUE) < 0) {
mail_storage_set_critical(_storage,
"unlink_directory(%s) failed: %m",
dest);
return -1;
}
count++;
}
}
if (unlink_directory(dest, TRUE) < 0 && errno != ENOTEMPTY) {
mail_storage_set_critical(_storage,
"unlink_directory(%s) failed: %m", dest);
/* it's already renamed to ..dir, which means it's deleted
as far as the client is concerned. Report success. */
}
return 0;
}
static int rename_dir(struct mail_storage *storage,
enum mailbox_list_path_type type,
const char *oldname, const char *newname)
{
const char *oldpath, *newpath;
oldpath = mailbox_list_get_path(storage->list, oldname, type);
newpath = mailbox_list_get_path(storage->list, newname, type);
if (strcmp(oldpath, newpath) == 0)
return 0;
if (rename(oldpath, newpath) < 0 && errno != ENOENT) {
mail_storage_set_critical(storage, "rename(%s, %s) failed: %m",
oldpath, newpath);
return -1;
}
return 0;
}
static int rename_subfolders(struct mail_storage *storage,
const char *oldname, const char *newname)
{
struct mailbox_list_iterate_context *iter;
struct mailbox_info *info;
ARRAY_DEFINE(names_arr, const char *);
const char *mask, *oldpath, *newpath, *old_listname, *new_listname;
const char *const *names;
unsigned int i, count;
size_t oldnamelen;
pool_t pool;
int ret;
ret = 0;
oldnamelen = strlen(oldname);
/* first get a list of the subfolders and save them to memory, because
we can't rely on readdir() not skipping files while the directory
is being modified. this doesn't protect against modifications by
other processes though. */
pool = pool_alloconly_create("Maildir subfolders list", 1024);
i_array_init(&names_arr, 64);
mask = t_strdup_printf("%s%c*", oldname,
mailbox_list_get_hierarchy_sep(storage->list));
iter = mailbox_list_iter_init(storage->list, mask,
MAILBOX_LIST_ITER_FAST_FLAGS);
while ((info = mailbox_list_iter_next(iter)) != NULL) {
const char *name;
i_assert(oldnamelen <= strlen(info->name));
name = p_strdup(pool, info->name + oldnamelen);
array_append(&names_arr, &name, 1);
}
if (mailbox_list_iter_deinit(&iter) < 0) {
ret = -1;
names = NULL; count = 0;
} else {
names = array_get(&names_arr, &count);
}
for (i = 0; i < count; i++) {
t_push();
old_listname = t_strconcat(oldname, names[i], NULL);
new_listname = t_strconcat(newname, names[i], NULL);
oldpath = mailbox_list_get_path(storage->list, old_listname,
MAILBOX_LIST_PATH_TYPE_MAILBOX);
newpath = mailbox_list_get_path(storage->list, new_listname,
MAILBOX_LIST_PATH_TYPE_MAILBOX);
/* FIXME: it's possible to merge two folders if either one of
them doesn't have existing root folder. We could check this
but I'm not sure if it's worth it. It could be even
considered as a feature.
Anyway, the bug with merging is that if both folders have
identically named subfolder they conflict. Just ignore those
and leave them under the old folder. */
if (rename(oldpath, newpath) == 0 || EDESTDIREXISTS(errno))
ret = 1;
else {
mail_storage_set_critical(storage,
"rename(%s, %s) failed: %m", oldpath, newpath);
ret = -1;
t_pop();
break;
}
(void)rename_dir(storage, MAILBOX_LIST_PATH_TYPE_CONTROL,
old_listname, new_listname);
(void)rename_dir(storage, MAILBOX_LIST_PATH_TYPE_INDEX,
old_listname, new_listname);
t_pop();
}
array_free(&names_arr);
pool_unref(pool);
return ret;
}
static int maildir_mailbox_rename(struct mail_storage *_storage,
const char *oldname, const char *newname)
{
const char *oldpath, *newpath;
int ret;
bool found;
mail_storage_clear_error(_storage);
if (!mailbox_list_is_valid_existing_name(_storage->list, oldname) ||
!mailbox_list_is_valid_create_name(_storage->list, newname)) {
mail_storage_set_error(_storage, "Invalid mailbox name");
return -1;
}
if (strcmp(oldname, "INBOX") == 0) {
mail_storage_set_error(_storage,
"Renaming INBOX isn't supported.");
return -1;
}
/* NOTE: it's possible to rename a nonexisting folder which has
subfolders. In that case we should ignore the rename() error. */
oldpath = mailbox_list_get_path(_storage->list, oldname,
MAILBOX_LIST_PATH_TYPE_MAILBOX);
newpath = mailbox_list_get_path(_storage->list, newname,
MAILBOX_LIST_PATH_TYPE_MAILBOX);
ret = rename(oldpath, newpath);
if (ret == 0 || errno == ENOENT) {
(void)rename_dir(_storage, MAILBOX_LIST_PATH_TYPE_CONTROL,
oldname, newname);
(void)rename_dir(_storage, MAILBOX_LIST_PATH_TYPE_INDEX,
oldname, newname);
found = ret == 0;
ret = rename_subfolders(_storage, oldname, newname);
if (ret < 0)
return -1;
if (!found && ret == 0) {
mail_storage_set_error(_storage,
MAIL_STORAGE_ERR_MAILBOX_NOT_FOUND, oldname);
return -1;
}
return 0;
}
if (EDESTDIREXISTS(errno)) {
mail_storage_set_error(_storage,
"Target mailbox already exists");
return -1;
} else {
mail_storage_set_critical(_storage, "rename(%s, %s) failed: %m",
oldpath, newpath);
return -1;
}
}
static int maildir_storage_close(struct mailbox *box)
{
struct maildir_mailbox *mbox = (struct maildir_mailbox *)box;
int ret = 0;
/*FIXME:if (!maildir_try_flush_dirty_flags(ibox->index, TRUE)) {
mail_storage_set_index_error(ibox);
ret = -1;
}*/
if (mbox->ibox.keep_locked)
maildir_uidlist_unlock(mbox->uidlist);
maildir_keywords_deinit(mbox->keywords);
maildir_uidlist_deinit(mbox->uidlist);
index_storage_mailbox_free(box);
return ret;
}
static void
maildir_notify_changes(struct mailbox *box, unsigned int min_interval,
mailbox_notify_callback_t *callback, void *context)
{
struct maildir_mailbox *mbox = (struct maildir_mailbox *)box;
mbox->ibox.min_notify_interval = min_interval;
mbox->ibox.notify_callback = callback;
mbox->ibox.notify_context = context;
if (callback == NULL) {
index_mailbox_check_remove_all(&mbox->ibox);
return;
}
index_mailbox_check_add(&mbox->ibox,
t_strconcat(mbox->path, "/new", NULL));
index_mailbox_check_add(&mbox->ibox,
t_strconcat(mbox->path, "/cur", NULL));
}
static int
maildir_storage_is_mailbox(struct mail_storage *_storage,
const char *dir, const char *fname,
enum mailbox_list_iter_flags iter_flags
__attr_unused__,
enum mailbox_info_flags *flags,
enum mailbox_list_file_type type)
{
struct maildir_storage *storage = (struct maildir_storage *)_storage;
int ret;
if (fname[1] == mailbox_list_get_hierarchy_sep(_storage->list) &&
strcmp(fname+2, MAILDIR_UNLINK_DIRNAME) == 0 &&
strcmp(mailbox_list_get_driver_name(_storage->list),
MAILDIR_PLUSPLUS_DRIVER_NAME) == 0) {
const char *path;
struct stat st;
/* this directory is in the middle of being deleted,
or the process trying to delete it had died.
delete it ourself if it's been there longer than
one hour. */
t_push();
path = t_strdup_printf("%s/%s", dir, fname);
if (stat(path, &st) == 0 &&
st.st_mtime < ioloop_time - 3600)
(void)unlink_directory(path, TRUE);
t_pop();
*flags = MAILBOX_NONEXISTENT;
return 0;
}
switch (type) {
case MAILBOX_LIST_FILE_TYPE_DIR:
/* all directories are valid maildirs */
return 1;
case MAILBOX_LIST_FILE_TYPE_FILE:
case MAILBOX_LIST_FILE_TYPE_OTHER:
/* non-directories are not */
*flags = MAILBOX_NOSELECT;
return 0;
case MAILBOX_LIST_FILE_TYPE_UNKNOWN:
case MAILBOX_LIST_FILE_TYPE_SYMLINK:
/* need to check with stat() to be sure */
break;
}
/* Check files beginning with .nfs always because they may be
temporary files created by the kernel */
if (storage->stat_dirs || strncmp(fname, ".nfs", 4) == 0) {
const char *path;
struct stat st;
t_push();
path = t_strdup_printf("%s/%s", dir, fname);
ret = (stat(path, &st) < 0 || !S_ISDIR(st.st_mode)) ? 0 : 1;
t_pop();
if (ret == 0)
*flags = MAILBOX_NONEXISTENT;
} else {
ret = 1;
}
return ret;
}
static void maildir_class_init(void)
{
maildir_transaction_class_init();
}
static void maildir_class_deinit(void)
{
maildir_transaction_class_deinit();
}
struct mail_storage maildir_storage = {
MEMBER(name) MAILDIR_STORAGE_NAME,
MEMBER(mailbox_is_file) FALSE,
{
maildir_class_init,
maildir_class_deinit,
maildir_create,
maildir_free,
maildir_autodetect,
index_storage_set_callbacks,
maildir_mailbox_open,
maildir_mailbox_create,
maildir_mailbox_delete,
maildir_mailbox_rename,
maildir_storage_is_mailbox,
index_storage_get_last_error
}
};
struct mailbox maildir_mailbox = {
MEMBER(name) NULL,
MEMBER(storage) NULL,
{
index_storage_is_readonly,
index_storage_allow_new_keywords,
maildir_storage_close,
index_storage_get_status,
maildir_storage_sync_init,
index_mailbox_sync_next,
index_mailbox_sync_deinit,
maildir_notify_changes,
index_transaction_begin,
index_transaction_commit,
index_transaction_rollback,
index_keywords_create,
index_keywords_free,
index_storage_get_uids,
index_mail_alloc,
index_header_lookup_init,
index_header_lookup_deinit,
index_storage_search_init,
index_storage_search_deinit,
index_storage_search_next_nonblock,
index_storage_search_next_update_seq,
maildir_save_init,
maildir_save_continue,
maildir_save_finish,
maildir_save_cancel,
maildir_copy,
index_storage_is_inconsistent
}
};