Mercurial > dovecot > core-2.2
view src/lib-storage/mail-storage.c @ 9002:9d0037a997f4 HEAD
Initial commit for config rewrite.
author | Timo Sirainen <tss@iki.fi> |
---|---|
date | Tue, 27 Jan 2009 18:21:53 -0500 |
parents | b9faf4db2a9f |
children | 21d4363a3cf7 |
line wrap: on
line source
/* Copyright (c) 2002-2009 Dovecot authors, see the included COPYING file */ #include "lib.h" #include "ioloop.h" #include "array.h" #include "var-expand.h" #include "mail-index-private.h" #include "mailbox-list-private.h" #include "mail-storage-private.h" #include "mail-storage-settings.h" #include "mail-namespace.h" #include "mail-search.h" #include "mailbox-search-result-private.h" #include <stdlib.h> #include <ctype.h> struct mail_storage_module_register mail_storage_module_register = { 0 }; struct mail_module_register mail_module_register = { 0 }; struct mail_storage_mail_index_module mail_storage_mail_index_module = MODULE_CONTEXT_INIT(&mail_index_module_register); void (*hook_mail_storage_created)(struct mail_storage *storage); void (*hook_mailbox_opened)(struct mailbox *box) = NULL; void (*hook_mailbox_index_opened)(struct mailbox *box) = NULL; ARRAY_TYPE(mail_storage) mail_storage_classes; void mail_storage_init(void) { mailbox_lists_init(); i_array_init(&mail_storage_classes, 8); } void mail_storage_deinit(void) { if (array_is_created(&mail_storage_classes)) array_free(&mail_storage_classes); mailbox_lists_deinit(); } void mail_storage_class_register(struct mail_storage *storage_class) { i_assert(mail_storage_find_class(storage_class->name) == NULL); if (storage_class->v.class_init != NULL) storage_class->v.class_init(); /* append it after the list, so the autodetection order is correct */ array_append(&mail_storage_classes, &storage_class, 1); } void mail_storage_class_unregister(struct mail_storage *storage_class) { struct mail_storage *const *classes; unsigned int i, count; classes = array_get(&mail_storage_classes, &count); for (i = 0; i < count; i++) { if (classes[i] == storage_class) { array_delete(&mail_storage_classes, i, 1); break; } } storage_class->v.class_deinit(); } struct mail_storage *mail_storage_find_class(const char *name) { struct mail_storage *const *classes; unsigned int i, count; i_assert(name != NULL); classes = array_get(&mail_storage_classes, &count); for (i = 0; i < count; i++) { if (strcasecmp(classes[i]->name, name) == 0) return classes[i]; } return NULL; } static struct mail_storage * mail_storage_autodetect(const struct mail_namespace *ns) { struct mail_storage *const *classes; unsigned int i, count; classes = array_get(&mail_storage_classes, &count); for (i = 0; i < count; i++) { if (classes[i]->v.autodetect != NULL && classes[i]->v.autodetect(ns)) return classes[i]; } return NULL; } static void mail_storage_set_autodetection(const char **data, const char **driver, enum mail_storage_flags *flags) { const char *p; /* check if data is in driver:data format (eg. mbox:~/mail) */ p = *data; while (i_isalnum(*p)) p++; if (*p == ':' && p != *data) { /* no autodetection if the storage format is given. */ *flags |= MAIL_STORAGE_FLAG_NO_AUTODETECTION; *driver = t_strdup_until(*data, p); *data = p + 1; } } int mail_storage_create(struct mail_namespace *ns, const char *driver, enum mail_storage_flags flags, const char **error_r) { struct mail_storage *storage_class, *storage; struct mail_storage *const *classes; const char *data = ns->set->location; const char *home, *p; unsigned int i, count; if ((flags & MAIL_STORAGE_FLAG_KEEP_HEADER_MD5) == 0 && ns->mail_set->pop3_uidl_format != NULL) { /* if pop3_uidl_format contains %m, we want to keep the header MD5 sums stored even if we're not running POP3 right now. */ p = ns->mail_set->pop3_uidl_format; while ((p = strchr(p, '%')) != NULL) { if (p[1] == '%') p += 2; else if (var_get_key(++p) == 'm') { flags |= MAIL_STORAGE_FLAG_KEEP_HEADER_MD5; break; } } } if (data == NULL) data = ""; else if (driver == NULL) mail_storage_set_autodetection(&data, &driver, &flags); if (*data == '\0' && driver == NULL) { /* use the first driver that works */ classes = array_get(&mail_storage_classes, &count); } else if (driver == NULL) { storage_class = mail_storage_autodetect(ns); if (storage_class == NULL) { *error_r = t_strdup_printf( "Ambiguous mail location setting, " "don't know what to do with it: %s " "(try prefixing it with mbox: or maildir:)", data); return -1; } classes = &storage_class; count = 1; } else { storage_class = mail_storage_find_class(driver); if (storage_class == NULL) { *error_r = t_strdup_printf( "Unknown mail storage driver %s", driver); return -1; } classes = &storage_class; count = 1; } for (i = 0; i < count; i++) { storage = classes[i]->v.alloc(); storage->set = ns->mail_set; storage->flags = flags; if (!file_lock_method_parse(storage->set->lock_method, &storage->lock_method)) { i_fatal("Unknown lock_method: %s", storage->set->lock_method); } storage->ns = ns; storage->callbacks = p_new(storage->pool, struct mail_storage_callbacks, 1); p_array_init(&storage->module_contexts, storage->pool, 5); if (classes[i]->v.create(storage, data, error_r) == 0) break; if (ns->mail_set->mail_debug && count > 1) { i_info("%s: Couldn't create mail storage %s: %s", classes[i]->name, data, *error_r); } /* try the next one */ pool_unref(&storage->pool); } if (i == count) { if (count <= 1) { *error_r = t_strdup_printf("%s: %s", classes[0]->name, *error_r); return -1; } (void)mail_user_get_home(ns->user, &home); if (home == NULL || *home == '\0') home = "(not set)"; *error_r = t_strdup_printf( "Mail storage autodetection failed with home=%s", home); return -1; } if (hook_mail_storage_created != NULL) { T_BEGIN { hook_mail_storage_created(storage); } T_END; } ns->storage = storage; mail_namespace_init_storage(ns); return 0; } void mail_storage_destroy(struct mail_storage **_storage) { struct mail_storage *storage = *_storage; i_assert(storage != NULL); *_storage = NULL; storage->v.destroy(storage); mailbox_list_deinit(storage->list); i_free(storage->error_string); pool_unref(&storage->pool); } void mail_storage_clear_error(struct mail_storage *storage) { i_free_and_null(storage->error_string); storage->error = MAIL_ERROR_NONE; } void mail_storage_set_error(struct mail_storage *storage, enum mail_error error, const char *string) { i_free(storage->error_string); storage->error_string = i_strdup(string); storage->error = error; } void mail_storage_set_internal_error(struct mail_storage *storage) { struct tm *tm; char str[256]; tm = localtime(&ioloop_time); i_free(storage->error_string); storage->error_string = strftime(str, sizeof(str), MAIL_ERRSTR_CRITICAL_MSG_STAMP, tm) > 0 ? i_strdup(str) : i_strdup(MAIL_ERRSTR_CRITICAL_MSG); storage->error = MAIL_ERROR_TEMP; } void mail_storage_set_critical(struct mail_storage *storage, const char *fmt, ...) { va_list va; mail_storage_clear_error(storage); if (fmt != NULL) { va_start(va, fmt); i_error("%s", t_strdup_vprintf(fmt, va)); va_end(va); /* critical errors may contain sensitive data, so let user see only "Internal error" with a timestamp to make it easier to look from log files the actual error message. */ mail_storage_set_internal_error(storage); } } char mail_storage_get_hierarchy_sep(struct mail_storage *storage) { return mailbox_list_get_hierarchy_sep(storage->list); } struct mailbox_list *mail_storage_get_list(const struct mail_storage *storage) { return storage->list; } struct mail_namespace * mail_storage_get_namespace(const struct mail_storage *storage) { return storage->ns; } const struct mail_storage_settings * mail_storage_get_settings(struct mail_storage *storage) { return storage->set; } void mail_storage_set_callbacks(struct mail_storage *storage, struct mail_storage_callbacks *callbacks, void *context) { *storage->callbacks = *callbacks; storage->callback_context = context; } int mail_storage_mailbox_create(struct mail_storage *storage, const char *name, bool directory) { mail_storage_clear_error(storage); if (!mailbox_list_is_valid_create_name(storage->list, name)) { mail_storage_set_error(storage, MAIL_ERROR_PARAMS, "Invalid mailbox name"); return -1; } return storage->v.mailbox_create(storage, name, directory); } const char *mail_storage_get_last_error(struct mail_storage *storage, enum mail_error *error_r) { /* We get here only in error situations, so we have to return some error. If storage->error is NONE, it means we forgot to set it at some point.. */ if (storage->error == MAIL_ERROR_NONE) { *error_r = MAIL_ERROR_TEMP; return storage->error_string != NULL ? storage->error_string : "BUG: Unknown internal error"; } if (storage->error_string == NULL) { /* This shouldn't happen.. */ storage->error_string = i_strdup_printf("BUG: Unknown 0x%x error", storage->error); } *error_r = storage->error; return storage->error_string; } const char *mail_storage_get_mailbox_path(struct mail_storage *storage, const char *name, bool *is_file_r) { *is_file_r = storage->mailbox_is_file; if (*name == '\0') name = NULL; return mailbox_list_get_path(storage->list, name, MAILBOX_LIST_PATH_TYPE_MAILBOX); } const char *mail_storage_get_mailbox_control_dir(struct mail_storage *storage, const char *name) { if (*name == '\0') name = NULL; return mailbox_list_get_path(storage->list, name, MAILBOX_LIST_PATH_TYPE_CONTROL); } const char *mail_storage_get_mailbox_index_dir(struct mail_storage *storage, const char *name) { if (*name == '\0') name = NULL; return mailbox_list_get_path(storage->list, name, MAILBOX_LIST_PATH_TYPE_INDEX); } bool mail_storage_set_error_from_errno(struct mail_storage *storage) { const char *error_string; enum mail_error error; if (!mail_error_from_errno(&error, &error_string)) return FALSE; if (storage->set->mail_debug && error != MAIL_ERROR_NOTFOUND) { /* debugging is enabled - admin may be debugging a (permission) problem, so return FALSE to get the caller to log the full error message. */ return FALSE; } mail_storage_set_error(storage, error, error_string); return TRUE; } struct mailbox *mailbox_open(struct mail_storage **_storage, const char *name, struct istream *input, enum mailbox_open_flags flags) { struct mail_storage *storage = *_storage; struct mailbox *box; mail_storage_clear_error(storage); if (!mailbox_list_is_valid_existing_name(storage->list, name)) { mail_storage_set_error(storage, MAIL_ERROR_PARAMS, "Invalid mailbox name"); return NULL; } T_BEGIN { box = storage->v.mailbox_open(storage, name, input, flags); if (hook_mailbox_opened != NULL && box != NULL) hook_mailbox_opened(box); } T_END; if (box != NULL) *_storage = box->storage; return box; } int mailbox_enable(struct mailbox *box, enum mailbox_feature features) { return box->v.enable(box, features); } enum mailbox_feature mailbox_get_enabled_features(struct mailbox *box) { return box->enabled_features; } int mailbox_close(struct mailbox **_box) { struct mailbox *box = *_box; if (box->transaction_count != 0) { i_panic("Trying to close mailbox %s with open transactions", box->name); } *_box = NULL; return box->v.close(box); } struct mail_storage *mailbox_get_storage(const struct mailbox *box) { return box->storage; } const struct mail_storage_settings *mailbox_get_settings(struct mailbox *box) { return box->storage->set; } const char *mailbox_get_name(const struct mailbox *box) { return box->name; } bool mailbox_is_readonly(struct mailbox *box) { return box->v.is_readonly(box); } bool mailbox_allow_new_keywords(struct mailbox *box) { return box->v.allow_new_keywords(box); } void mailbox_get_status(struct mailbox *box, enum mailbox_status_items items, struct mailbox_status *status_r) { box->v.get_status(box, items, status_r); } struct mailbox_sync_context * mailbox_sync_init(struct mailbox *box, enum mailbox_sync_flags flags) { if (box->transaction_count != 0) { i_panic("Trying to sync mailbox %s with open transactions", box->name); } return box->v.sync_init(box, flags); } bool mailbox_sync_next(struct mailbox_sync_context *ctx, struct mailbox_sync_rec *sync_rec_r) { return ctx->box->v.sync_next(ctx, sync_rec_r); } int mailbox_sync_deinit(struct mailbox_sync_context **_ctx, enum mailbox_status_items status_items, struct mailbox_status *status_r) { struct mailbox_sync_context *ctx = *_ctx; *_ctx = NULL; return ctx->box->v.sync_deinit(ctx, status_items, status_r); } int mailbox_sync(struct mailbox *box, enum mailbox_sync_flags flags, enum mailbox_status_items status_items, struct mailbox_status *status_r) { struct mailbox_sync_context *ctx; if (array_count(&box->search_results) == 0) { /* we don't care about mailbox's current state, so we might as well fix inconsistency state */ flags |= MAILBOX_SYNC_FLAG_FIX_INCONSISTENT; } ctx = mailbox_sync_init(box, flags); return mailbox_sync_deinit(&ctx, status_items, status_r); } #undef mailbox_notify_changes void mailbox_notify_changes(struct mailbox *box, unsigned int min_interval, mailbox_notify_callback_t *callback, void *context) { box->notify_min_interval = min_interval; box->notify_callback = callback; box->notify_context = context; box->v.notify_changes(box); } void mailbox_notify_changes_stop(struct mailbox *box) { mailbox_notify_changes(box, 0, NULL, NULL); } int mailbox_keywords_create(struct mailbox *box, const char *const keywords[], struct mail_keywords **keywords_r) { const char *empty_keyword_list = NULL; if (keywords == NULL) keywords = &empty_keyword_list; return box->v.keywords_create(box, keywords, keywords_r, FALSE); } struct mail_keywords * mailbox_keywords_create_valid(struct mailbox *box, const char *const keywords[]) { const char *empty_keyword_list = NULL; struct mail_keywords *kw; if (keywords == NULL) keywords = &empty_keyword_list; if (box->v.keywords_create(box, keywords, &kw, TRUE) < 0) i_unreached(); return kw; } void mailbox_keywords_free(struct mailbox *box, struct mail_keywords **_keywords) { struct mail_keywords *keywords = *_keywords; *_keywords = NULL; box->v.keywords_free(keywords); } bool mailbox_keyword_is_valid(struct mailbox *box, const char *keyword, const char **error_r) { return box->v.keyword_is_valid(box, keyword, error_r); } void mailbox_get_seq_range(struct mailbox *box, uint32_t uid1, uint32_t uid2, uint32_t *seq1_r, uint32_t *seq2_r) { box->v.get_seq_range(box, uid1, uid2, seq1_r, seq2_r); } void mailbox_get_uid_range(struct mailbox *box, const ARRAY_TYPE(seq_range) *seqs, ARRAY_TYPE(seq_range) *uids) { box->v.get_uid_range(box, seqs, uids); } bool mailbox_get_expunged_uids(struct mailbox *box, uint64_t modseq, const ARRAY_TYPE(seq_range) *uids, ARRAY_TYPE(seq_range) *expunged_uids) { return box->v.get_expunged_uids(box, modseq, uids, expunged_uids); } bool mailbox_get_virtual_uid(struct mailbox *box, const char *backend_mailbox, uint32_t backend_uidvalidity, uint32_t backend_uid, uint32_t *uid_r) { if (box->v.get_virtual_uid == NULL) return FALSE; return box->v.get_virtual_uid(box, backend_mailbox, backend_uidvalidity, backend_uid, uid_r); } void mailbox_get_virtual_backend_boxes(struct mailbox *box, ARRAY_TYPE(mailboxes) *mailboxes, bool only_with_msgs) { if (box->v.get_virtual_backend_boxes == NULL) array_append(mailboxes, &box, 1); else box->v.get_virtual_backend_boxes(box, mailboxes, only_with_msgs); } void mailbox_get_virtual_box_patterns(struct mailbox *box, ARRAY_TYPE(mailbox_virtual_patterns) *includes, ARRAY_TYPE(mailbox_virtual_patterns) *excludes) { if (box->v.get_virtual_box_patterns == NULL) { struct mailbox_virtual_pattern pat; memset(&pat, 0, sizeof(pat)); pat.ns = box->storage->ns; pat.pattern = box->name; array_append(includes, &pat, 1); } else { box->v.get_virtual_box_patterns(box, includes, excludes); } } struct mailbox_header_lookup_ctx * mailbox_header_lookup_init(struct mailbox *box, const char *const headers[]) { return box->v.header_lookup_init(box, headers); } void mailbox_header_lookup_ref(struct mailbox_header_lookup_ctx *ctx) { ctx->box->v.header_lookup_ref(ctx); } void mailbox_header_lookup_unref(struct mailbox_header_lookup_ctx **_ctx) { struct mailbox_header_lookup_ctx *ctx = *_ctx; *_ctx = NULL; ctx->box->v.header_lookup_unref(ctx); } struct mail_search_context * mailbox_search_init(struct mailbox_transaction_context *t, struct mail_search_args *args, const enum mail_sort_type *sort_program) { mail_search_args_ref(args); if (!args->simplified) mail_search_args_simplify(args); return t->box->v.search_init(t, args, sort_program); } int mailbox_search_deinit(struct mail_search_context **_ctx) { struct mail_search_context *ctx = *_ctx; struct mail_search_args *args = ctx->args; int ret; *_ctx = NULL; mailbox_search_results_initial_done(ctx); ret = ctx->transaction->box->v.search_deinit(ctx); mail_search_args_unref(&args); return ret; } int mailbox_search_next(struct mail_search_context *ctx, struct mail *mail) { bool tryagain; int ret; while ((ret = mailbox_search_next_nonblock(ctx, mail, &tryagain)) == 0) { if (!tryagain) break; } return ret; } int mailbox_search_next_nonblock(struct mail_search_context *ctx, struct mail *mail, bool *tryagain_r) { int ret; ret = ctx->transaction->box->v. search_next_nonblock(ctx, mail, tryagain_r); if (ret > 0) mailbox_search_results_add(ctx, mail->uid); return ret; } bool mailbox_search_seen_lost_data(struct mail_search_context *ctx) { return ctx->seen_lost_data; } int mailbox_search_result_build(struct mailbox_transaction_context *t, struct mail_search_args *args, enum mailbox_search_result_flags flags, struct mail_search_result **result_r) { struct mail_search_context *ctx; struct mail *mail; int ret; ctx = mailbox_search_init(t, args, NULL); *result_r = mailbox_search_result_save(ctx, flags); mail = mail_alloc(t, 0, NULL); while (mailbox_search_next(ctx, mail) > 0) ; mail_free(&mail); ret = mailbox_search_deinit(&ctx); if (ret < 0) mailbox_search_result_free(result_r); return ret; } struct mailbox_transaction_context * mailbox_transaction_begin(struct mailbox *box, enum mailbox_transaction_flags flags) { struct mailbox_transaction_context *trans; box->transaction_count++; trans = box->v.transaction_begin(box, flags); trans->flags = flags; return trans; } int mailbox_transaction_commit(struct mailbox_transaction_context **t) { uint32_t uidvalidity, uid1, uid2; /* Store the return values to separate temporary variables so that plugins overriding transaction_commit() can look at them. */ return mailbox_transaction_commit_get_uids(t, &uidvalidity, &uid1, &uid2); } int mailbox_transaction_commit_get_uids(struct mailbox_transaction_context **_t, uint32_t *uid_validity_r, uint32_t *first_saved_uid_r, uint32_t *last_saved_uid_r) { struct mailbox_transaction_context *t = *_t; t->box->transaction_count--; *_t = NULL; return t->box->v.transaction_commit(t, uid_validity_r, first_saved_uid_r, last_saved_uid_r); } void mailbox_transaction_rollback(struct mailbox_transaction_context **_t) { struct mailbox_transaction_context *t = *_t; t->box->transaction_count--; *_t = NULL; t->box->v.transaction_rollback(t); } unsigned int mailbox_transaction_get_count(const struct mailbox *box) { return box->transaction_count; } void mailbox_transaction_set_max_modseq(struct mailbox_transaction_context *t, uint64_t max_modseq, ARRAY_TYPE(seq_range) *seqs) { t->box->v.transaction_set_max_modseq(t, max_modseq, seqs); } struct mailbox * mailbox_transaction_get_mailbox(const struct mailbox_transaction_context *t) { return t->box; } struct mail_save_context * mailbox_save_alloc(struct mailbox_transaction_context *t) { struct mail_save_context *ctx; ctx = t->box->v.save_alloc(t); ctx->received_date = (time_t)-1; return ctx; } void mailbox_save_set_flags(struct mail_save_context *ctx, enum mail_flags flags, struct mail_keywords *keywords) { ctx->flags = flags; ctx->keywords = keywords; } void mailbox_save_set_received_date(struct mail_save_context *ctx, time_t received_date, int timezone_offset) { ctx->received_date = received_date; ctx->received_tz_offset = timezone_offset; } void mailbox_save_set_from_envelope(struct mail_save_context *ctx, const char *envelope) { i_free(ctx->from_envelope); ctx->from_envelope = i_strdup(envelope); } void mailbox_save_set_guid(struct mail_save_context *ctx, const char *guid) { i_assert(guid == NULL || *guid != '\0'); i_free(ctx->guid); ctx->guid = i_strdup(guid); } void mailbox_save_set_dest_mail(struct mail_save_context *ctx, struct mail *mail) { ctx->dest_mail = mail; } int mailbox_save_begin(struct mail_save_context **ctx, struct istream *input) { struct mailbox *box = (*ctx)->transaction->box; int ret; if (box->v.save_begin == NULL) { mail_storage_set_error(box->storage, MAIL_ERROR_NOTPOSSIBLE, "Saving messages not supported"); ret = -1; } else { ret = box->v.save_begin(*ctx, input); } if (ret < 0) { mailbox_save_cancel(ctx); return -1; } return 0; } int mailbox_save_continue(struct mail_save_context *ctx) { return ctx->transaction->box->v.save_continue(ctx); } int mailbox_save_finish(struct mail_save_context **_ctx) { struct mail_save_context *ctx = *_ctx; *_ctx = NULL; return ctx->transaction->box->v.save_finish(ctx); } void mailbox_save_cancel(struct mail_save_context **_ctx) { struct mail_save_context *ctx = *_ctx; *_ctx = NULL; ctx->transaction->box->v.save_cancel(ctx); } int mailbox_copy(struct mailbox_transaction_context *t, struct mail *mail, enum mail_flags flags, struct mail_keywords *keywords, struct mail *dest_mail) { return t->box->v.copy(t, mail, flags, keywords, dest_mail); } bool mailbox_is_inconsistent(struct mailbox *box) { return box->mailbox_deleted || box->v.is_inconsistent(box); } void mailbox_set_deleted(struct mailbox *box) { mail_storage_set_error(box->storage, MAIL_ERROR_NOTFOUND, "Mailbox was deleted under us"); box->mailbox_deleted = TRUE; }