annotate src/plugins/lazy-expunge/lazy-expunge-plugin.c @ 6940:414c9d631a81 HEAD

Replaced t_push/t_pop calls with T_FRAME*() macros.
author Timo Sirainen <tss@iki.fi>
date Wed, 05 Dec 2007 17:47:44 +0200
parents 1a3604c8ee05
children 7ed926ed7aa4
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
6429
65c69a53a7be Replaced my Copyright notices. The year range always ends with 2007 now.
Timo Sirainen <tss@iki.fi>
parents: 6422
diff changeset
1 /* Copyright (c) 2006-2007 Dovecot authors, see the included COPYING file */
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
2
6237
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
3 #include "lib.h"
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
4 #include "ioloop.h"
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
5 #include "array.h"
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
6 #include "str.h"
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
7 #include "seq-range-array.h"
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
8 #include "maildir-storage.h"
5500
4862cb37106c Moved namespace handling to lib-storage. Beginnings of namespace support for
Timo Sirainen <tss@iki.fi>
parents: 5450
diff changeset
9 #include "mail-namespace.h"
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
10 #include "lazy-expunge-plugin.h"
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
11
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
12 #include <stdio.h>
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
13 #include <stdlib.h>
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
14 #include <unistd.h>
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
15 #include <dirent.h>
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
16 #include <time.h>
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
17
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
18 #define LAZY_EXPUNGE_CONTEXT(obj) \
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
19 MODULE_CONTEXT(obj, lazy_expunge_mail_storage_module)
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
20 #define LAZY_EXPUNGE_LIST_CONTEXT(obj) \
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
21 MODULE_CONTEXT(obj, lazy_expunge_mailbox_list_module)
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
22
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
23 enum lazy_namespace {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
24 LAZY_NAMESPACE_EXPUNGE,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
25 LAZY_NAMESPACE_DELETE,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
26 LAZY_NAMESPACE_DELETE_EXPUNGE,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
27
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
28 LAZY_NAMESPACE_COUNT
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
29 };
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
30
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
31 struct lazy_expunge_mailbox_list {
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
32 union mailbox_list_module_context module_ctx;
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
33
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
34 struct mail_storage *storage;
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
35 };
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
36
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
37 struct lazy_expunge_mail_storage {
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
38 union mail_storage_module_context module_ctx;
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
39
4916
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
40 bool internal_namespace;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
41 };
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
42
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
43 struct lazy_expunge_transaction {
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
44 union mailbox_transaction_module_context module_ctx;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
45
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
46 ARRAY_TYPE(seq_range) expunge_seqs;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
47 struct mailbox *expunge_box;
6277
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
48
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
49 bool failed;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
50 };
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
51
5185
24f4a959a24c Added <plugin_name>_version string.
Timo Sirainen <tss@iki.fi>
parents: 4992
diff changeset
52 const char *lazy_expunge_plugin_version = PACKAGE_VERSION;
24f4a959a24c Added <plugin_name>_version string.
Timo Sirainen <tss@iki.fi>
parents: 4992
diff changeset
53
6237
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
54 static void (*lazy_expunge_next_hook_mail_namespaces_created)
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
55 (struct mail_namespace *namespaces);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
56 static void (*lazy_expunge_next_hook_mail_storage_created)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
57 (struct mail_storage *storage);
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
58 static void (*lazy_expunge_next_hook_mailbox_list_created)
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
59 (struct mailbox_list *list);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
60
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
61 static MODULE_CONTEXT_DEFINE_INIT(lazy_expunge_mail_storage_module,
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
62 &mail_storage_module_register);
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
63 static MODULE_CONTEXT_DEFINE_INIT(lazy_expunge_mail_module,
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
64 &mail_module_register);
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
65 static MODULE_CONTEXT_DEFINE_INIT(lazy_expunge_mailbox_list_module,
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
66 &mailbox_list_module_register);
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
67
5500
4862cb37106c Moved namespace handling to lib-storage. Beginnings of namespace support for
Timo Sirainen <tss@iki.fi>
parents: 5450
diff changeset
68 static struct mail_namespace *lazy_namespaces[LAZY_NAMESPACE_COUNT];
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
69
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
70 static struct mailbox *
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
71 mailbox_open_or_create(struct mail_storage *storage, const char *name)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
72 {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
73 struct mailbox *box;
5613
f717fb4b31c0 Error handling rewrite.
Timo Sirainen <tss@iki.fi>
parents: 5607
diff changeset
74 enum mail_error error;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
75
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
76 box = mailbox_open(storage, name, NULL, MAILBOX_OPEN_FAST |
4916
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
77 MAILBOX_OPEN_KEEP_RECENT |
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
78 MAILBOX_OPEN_NO_INDEX_FILES);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
79 if (box != NULL)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
80 return box;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
81
5613
f717fb4b31c0 Error handling rewrite.
Timo Sirainen <tss@iki.fi>
parents: 5607
diff changeset
82 (void)mail_storage_get_last_error(storage, &error);
f717fb4b31c0 Error handling rewrite.
Timo Sirainen <tss@iki.fi>
parents: 5607
diff changeset
83 if (error != MAIL_ERROR_NOTFOUND)
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
84 return NULL;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
85
5613
f717fb4b31c0 Error handling rewrite.
Timo Sirainen <tss@iki.fi>
parents: 5607
diff changeset
86 /* try creating it. */
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
87 if (mail_storage_mailbox_create(storage, name, FALSE) < 0)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
88 return NULL;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
89
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
90 /* and try opening again */
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
91 box = mailbox_open(storage, name, NULL, MAILBOX_OPEN_FAST |
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
92 MAILBOX_OPEN_KEEP_RECENT);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
93 return box;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
94 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
95
6277
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
96 static void lazy_expunge_mail_expunge(struct mail *_mail)
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
97 {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
98 struct lazy_expunge_transaction *lt =
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
99 LAZY_EXPUNGE_CONTEXT(_mail->transaction);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
100 struct mail_storage *deststorage;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
101
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
102 if (lt->expunge_box == NULL) {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
103 deststorage = lazy_namespaces[LAZY_NAMESPACE_EXPUNGE]->storage;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
104 lt->expunge_box = mailbox_open_or_create(deststorage,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
105 _mail->box->name);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
106 if (lt->expunge_box == NULL) {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
107 mail_storage_set_critical(_mail->box->storage,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
108 "lazy_expunge: Couldn't open expunge mailbox");
6277
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
109 lt->failed = TRUE;
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
110 return;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
111 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
112 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
113
4916
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
114 seq_range_array_add(&lt->expunge_seqs, 32, _mail->uid);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
115 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
116
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
117 static struct mailbox_transaction_context *
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
118 lazy_expunge_transaction_begin(struct mailbox *box,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
119 enum mailbox_transaction_flags flags)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
120 {
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
121 union mailbox_module_context *mbox = LAZY_EXPUNGE_CONTEXT(box);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
122 struct mailbox_transaction_context *t;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
123 struct lazy_expunge_transaction *lt;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
124
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
125 t = mbox->super.transaction_begin(box, flags);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
126 lt = i_new(struct lazy_expunge_transaction, 1);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
127
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
128 MODULE_CONTEXT_SET(t, lazy_expunge_mail_storage_module, lt);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
129 return t;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
130 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
131
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
132 struct lazy_expunge_move_context {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
133 string_t *path;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
134 unsigned int dir_len;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
135 };
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
136
6468
bca937328758 If rename() fails, log an error.
Timo Sirainen <tss@iki.fi>
parents: 6467
diff changeset
137 static int lazy_expunge_move(struct maildir_mailbox *mbox,
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
138 const char *path, void *context)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
139 {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
140 struct lazy_expunge_move_context *ctx = context;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
141 const char *p;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
142
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
143 str_truncate(ctx->path, ctx->dir_len);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
144 p = strrchr(path, '/');
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
145 str_append(ctx->path, p == NULL ? path : p + 1);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
146
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
147 if (rename(path, str_c(ctx->path)) == 0)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
148 return 1;
6468
bca937328758 If rename() fails, log an error.
Timo Sirainen <tss@iki.fi>
parents: 6467
diff changeset
149 if (errno == ENOENT)
bca937328758 If rename() fails, log an error.
Timo Sirainen <tss@iki.fi>
parents: 6467
diff changeset
150 return 0;
bca937328758 If rename() fails, log an error.
Timo Sirainen <tss@iki.fi>
parents: 6467
diff changeset
151 mail_storage_set_critical(mbox->ibox.box.storage,
bca937328758 If rename() fails, log an error.
Timo Sirainen <tss@iki.fi>
parents: 6467
diff changeset
152 "rename(%s, %s) failed: %m",
bca937328758 If rename() fails, log an error.
Timo Sirainen <tss@iki.fi>
parents: 6467
diff changeset
153 path, str_c(ctx->path));
bca937328758 If rename() fails, log an error.
Timo Sirainen <tss@iki.fi>
parents: 6467
diff changeset
154 return -1;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
155 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
156
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
157 static int lazy_expunge_move_expunges(struct mailbox *srcbox,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
158 struct lazy_expunge_transaction *lt)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
159 {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
160 struct maildir_mailbox *msrcbox = (struct maildir_mailbox *)srcbox;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
161 struct mailbox_transaction_context *trans;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
162 struct index_transaction_context *itrans;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
163 struct lazy_expunge_move_context ctx;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
164 const struct seq_range *range;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
165 unsigned int i, count;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
166 const char *dir;
4916
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
167 uint32_t seq, uid, seq1, seq2;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
168 bool is_file;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
169 int ret = 0;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
170
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
171 dir = mail_storage_get_mailbox_path(lt->expunge_box->storage,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
172 lt->expunge_box->name, &is_file);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
173 dir = t_strconcat(dir, "/cur/", NULL);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
174
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
175 ctx.path = str_new(default_pool, 256);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
176 str_append(ctx.path, dir);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
177 ctx.dir_len = str_len(ctx.path);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
178
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
179 trans = mailbox_transaction_begin(srcbox,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
180 MAILBOX_TRANSACTION_FLAG_EXTERNAL);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
181 itrans = (struct index_transaction_context *)trans;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
182
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
183 range = array_get(&lt->expunge_seqs, &count);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
184 for (i = 0; i < count && ret == 0; i++) {
6275
913b188f4dd4 Removed explicit locking from views and maps. They were already locked all
Timo Sirainen <tss@iki.fi>
parents: 6272
diff changeset
185 mailbox_get_uids(srcbox, range[i].seq1, range[i].seq2,
913b188f4dd4 Removed explicit locking from views and maps. They were already locked all
Timo Sirainen <tss@iki.fi>
parents: 6272
diff changeset
186 &seq1, &seq2);
4916
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
187 for (uid = range[i].seq1; uid <= range[i].seq2; uid++) {
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
188 if (maildir_file_do(msrcbox, uid, lazy_expunge_move,
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
189 &ctx) < 0) {
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
190 ret = -1;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
191 break;
4916
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
192 }
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
193 }
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
194 for (seq = seq1; seq <= seq2; seq++)
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
195 mail_index_expunge(itrans->trans, seq);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
196 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
197
6512
1a3604c8ee05 mailbox_transaction_commit*() doesn't sync the mailbox anymore, so it
Timo Sirainen <tss@iki.fi>
parents: 6468
diff changeset
198 if (mailbox_transaction_commit(&trans) < 0)
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
199 ret = -1;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
200
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
201 str_free(&ctx.path);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
202 return ret;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
203 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
204
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
205 static void lazy_expunge_transaction_free(struct lazy_expunge_transaction *lt)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
206 {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
207 if (lt->expunge_box != NULL)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
208 mailbox_close(&lt->expunge_box);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
209 if (array_is_created(&lt->expunge_seqs))
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
210 array_free(&lt->expunge_seqs);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
211 i_free(lt);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
212 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
213
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
214 static int
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
215 lazy_expunge_transaction_commit(struct mailbox_transaction_context *ctx,
6277
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
216 uint32_t *uid_validity_r,
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
217 uint32_t *first_saved_uid_r,
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
218 uint32_t *last_saved_uid_r)
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
219 {
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
220 union mailbox_module_context *mbox = LAZY_EXPUNGE_CONTEXT(ctx->box);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
221 struct lazy_expunge_transaction *lt = LAZY_EXPUNGE_CONTEXT(ctx);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
222 struct mailbox *srcbox = ctx->box;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
223 int ret;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
224
6277
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
225 if (lt->failed) {
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
226 mbox->super.transaction_rollback(ctx);
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
227 ret = -1;
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
228 } else {
6512
1a3604c8ee05 mailbox_transaction_commit*() doesn't sync the mailbox anymore, so it
Timo Sirainen <tss@iki.fi>
parents: 6468
diff changeset
229 ret = mbox->super.transaction_commit(ctx, uid_validity_r,
6277
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
230 first_saved_uid_r,
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
231 last_saved_uid_r);
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6275
diff changeset
232 }
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
233
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
234 if (ret == 0 && array_is_created(&lt->expunge_seqs))
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
235 ret = lazy_expunge_move_expunges(srcbox, lt);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
236
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
237 lazy_expunge_transaction_free(lt);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
238 return ret;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
239 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
240
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
241 static void
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
242 lazy_expunge_transaction_rollback(struct mailbox_transaction_context *ctx)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
243 {
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
244 union mailbox_module_context *mbox = LAZY_EXPUNGE_CONTEXT(ctx->box);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
245 struct lazy_expunge_transaction *lt = LAZY_EXPUNGE_CONTEXT(ctx);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
246
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
247 mbox->super.transaction_rollback(ctx);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
248 lazy_expunge_transaction_free(lt);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
249 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
250
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
251 static struct mail *
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
252 lazy_expunge_mail_alloc(struct mailbox_transaction_context *t,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
253 enum mail_fetch_field wanted_fields,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
254 struct mailbox_header_lookup_ctx *wanted_headers)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
255 {
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
256 union mailbox_module_context *mbox = LAZY_EXPUNGE_CONTEXT(t->box);
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
257 union mail_module_context *mmail;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
258 struct mail *_mail;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
259 struct mail_private *mail;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
260
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
261 _mail = mbox->super.mail_alloc(t, wanted_fields, wanted_headers);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
262 mail = (struct mail_private *)_mail;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
263
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
264 mmail = p_new(mail->pool, union mail_module_context, 1);
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
265 mmail->super = mail->v;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
266
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
267 mail->v.expunge = lazy_expunge_mail_expunge;
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
268 MODULE_CONTEXT_SET_SELF(mail, lazy_expunge_mail_module, mmail);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
269 return _mail;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
270 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
271
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
272 static struct mailbox *
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
273 lazy_expunge_mailbox_open(struct mail_storage *storage, const char *name,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
274 struct istream *input, enum mailbox_open_flags flags)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
275 {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
276 struct lazy_expunge_mail_storage *lstorage =
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
277 LAZY_EXPUNGE_CONTEXT(storage);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
278 struct mailbox *box;
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
279 union mailbox_module_context *mbox;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
280
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
281 box = lstorage->module_ctx.super.
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
282 mailbox_open(storage, name, input, flags);
4916
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
283 if (box == NULL || lstorage->internal_namespace)
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
284 return box;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
285
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
286 mbox = p_new(box->pool, union mailbox_module_context, 1);
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
287 mbox->super = box->v;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
288
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
289 box->v.transaction_begin = lazy_expunge_transaction_begin;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
290 box->v.transaction_commit = lazy_expunge_transaction_commit;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
291 box->v.transaction_rollback = lazy_expunge_transaction_rollback;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
292 box->v.mail_alloc = lazy_expunge_mail_alloc;
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
293 MODULE_CONTEXT_SET_SELF(box, lazy_expunge_mail_storage_module, mbox);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
294 return box;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
295 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
296
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
297 static int dir_move_or_merge(struct mailbox_list *list,
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
298 const char *srcdir, const char *destdir)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
299 {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
300 DIR *dir;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
301 struct dirent *dp;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
302 string_t *src_path, *dest_path;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
303 unsigned int src_dirlen, dest_dirlen;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
304 int ret = 0;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
305
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
306 if (rename(srcdir, destdir) == 0 || errno == ENOENT)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
307 return 0;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
308
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
309 if (!EDESTDIREXISTS(errno)) {
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
310 mailbox_list_set_critical(list,
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
311 "rename(%s, %s) failed: %m", srcdir, destdir);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
312 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
313
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
314 /* rename all the files separately */
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
315 dir = opendir(srcdir);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
316 if (dir == NULL) {
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
317 mailbox_list_set_critical(list,
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
318 "opendir(%s) failed: %m", srcdir);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
319 return -1;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
320 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
321
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
322 src_path = t_str_new(512);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
323 dest_path = t_str_new(512);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
324
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
325 str_append(src_path, srcdir);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
326 str_append(dest_path, destdir);
4992
d45c13b90629 If index/control dirs were different than the maildir, deleting mailboxes
Timo Sirainen <tss@iki.fi>
parents: 4916
diff changeset
327 str_append_c(src_path, '/');
d45c13b90629 If index/control dirs were different than the maildir, deleting mailboxes
Timo Sirainen <tss@iki.fi>
parents: 4916
diff changeset
328 str_append_c(dest_path, '/');
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
329 src_dirlen = str_len(src_path);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
330 dest_dirlen = str_len(dest_path);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
331
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
332 while ((dp = readdir(dir)) != NULL) {
4992
d45c13b90629 If index/control dirs were different than the maildir, deleting mailboxes
Timo Sirainen <tss@iki.fi>
parents: 4916
diff changeset
333 if (dp->d_name[0] == '.' &&
d45c13b90629 If index/control dirs were different than the maildir, deleting mailboxes
Timo Sirainen <tss@iki.fi>
parents: 4916
diff changeset
334 (dp->d_name[1] == '\0' ||
d45c13b90629 If index/control dirs were different than the maildir, deleting mailboxes
Timo Sirainen <tss@iki.fi>
parents: 4916
diff changeset
335 (dp->d_name[1] == '.' && dp->d_name[2] == '\0')))
d45c13b90629 If index/control dirs were different than the maildir, deleting mailboxes
Timo Sirainen <tss@iki.fi>
parents: 4916
diff changeset
336 continue;
d45c13b90629 If index/control dirs were different than the maildir, deleting mailboxes
Timo Sirainen <tss@iki.fi>
parents: 4916
diff changeset
337
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
338 str_truncate(src_path, src_dirlen);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
339 str_append(src_path, dp->d_name);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
340 str_truncate(dest_path, dest_dirlen);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
341 str_append(dest_path, dp->d_name);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
342
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
343 if (rename(str_c(src_path), str_c(dest_path)) < 0 &&
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
344 errno != ENOENT) {
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
345 mailbox_list_set_critical(list,
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
346 "rename(%s, %s) failed: %m",
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
347 str_c(src_path), str_c(dest_path));
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
348 ret = -1;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
349 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
350 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
351 if (closedir(dir) < 0) {
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
352 mailbox_list_set_critical(list,
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
353 "closedir(%s) failed: %m", srcdir);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
354 ret = -1;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
355 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
356 if (ret == 0) {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
357 if (rmdir(srcdir) < 0) {
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
358 mailbox_list_set_critical(list,
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
359 "rmdir(%s) failed: %m", srcdir);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
360 ret = -1;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
361 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
362 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
363 return ret;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
364 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
365
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
366 static int
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
367 mailbox_move(struct mailbox_list *src_list, const char *src_name,
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
368 struct mailbox_list *dest_list, const char **_dest_name)
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
369 {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
370 const char *dest_name = *_dest_name;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
371 const char *srcdir, *src2dir, *src3dir, *destdir;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
372
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
373 srcdir = mailbox_list_get_path(src_list, src_name,
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
374 MAILBOX_LIST_PATH_TYPE_MAILBOX);
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
375 destdir = mailbox_list_get_path(dest_list, dest_name,
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
376 MAILBOX_LIST_PATH_TYPE_MAILBOX);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
377 while (rename(srcdir, destdir) < 0) {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
378 if (errno == ENOENT)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
379 return 0;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
380
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
381 if (!EDESTDIREXISTS(errno)) {
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
382 mailbox_list_set_critical(src_list,
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
383 "rename(%s, %s) failed: %m", srcdir, destdir);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
384 return -1;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
385 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
386
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
387 /* mailbox is being deleted multiple times per second.
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
388 update the filename. */
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
389 dest_name = t_strdup_printf("%s-%04u", *_dest_name,
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
390 (uint32_t)random());
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
391 destdir = mailbox_list_get_path(dest_list, dest_name,
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
392 MAILBOX_LIST_PATH_TYPE_MAILBOX);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
393 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
394
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
395 src2dir = mailbox_list_get_path(src_list, src_name,
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
396 MAILBOX_LIST_PATH_TYPE_CONTROL);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
397 if (strcmp(src2dir, srcdir) != 0) {
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
398 destdir = mailbox_list_get_path(dest_list, dest_name,
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
399 MAILBOX_LIST_PATH_TYPE_CONTROL);
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
400 (void)dir_move_or_merge(src_list, src2dir, destdir);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
401 }
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
402 src3dir = mailbox_list_get_path(src_list, src_name,
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
403 MAILBOX_LIST_PATH_TYPE_INDEX);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
404 if (strcmp(src3dir, srcdir) != 0 && strcmp(src3dir, src2dir) != 0) {
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
405 destdir = mailbox_list_get_path(dest_list, dest_name,
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
406 MAILBOX_LIST_PATH_TYPE_INDEX);
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
407 (void)dir_move_or_merge(src_list, src3dir, destdir);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
408 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
409
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
410 *_dest_name = dest_name;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
411 return 1;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
412 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
413
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
414 static int
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
415 lazy_expunge_mailbox_list_delete(struct mailbox_list *list, const char *name)
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
416 {
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
417 struct lazy_expunge_mailbox_list *llist =
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
418 LAZY_EXPUNGE_LIST_CONTEXT(list);
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
419 struct lazy_expunge_mail_storage *lstorage;
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
420 struct mailbox_list *dest_list;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
421 enum mailbox_name_status status;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
422 const char *destname;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
423 struct tm *tm;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
424 char timestamp[256];
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
425 int ret;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
426
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
427 if (llist->storage == NULL) {
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
428 /* not a maildir storage */
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
429 return llist->module_ctx.super.delete_mailbox(list, name);
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
430 }
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
431
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
432 lstorage = LAZY_EXPUNGE_CONTEXT(llist->storage);
4916
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
433 if (lstorage->internal_namespace)
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
434 return llist->module_ctx.super.delete_mailbox(list, name);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
435
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
436 /* first do the normal sanity checks */
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
437 if (strcmp(name, "INBOX") == 0) {
5613
f717fb4b31c0 Error handling rewrite.
Timo Sirainen <tss@iki.fi>
parents: 5607
diff changeset
438 mailbox_list_set_error(list, MAIL_ERROR_NOTPOSSIBLE,
f717fb4b31c0 Error handling rewrite.
Timo Sirainen <tss@iki.fi>
parents: 5607
diff changeset
439 "INBOX can't be deleted.");
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
440 return -1;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
441 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
442
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
443 if (mailbox_list_get_mailbox_name_status(list, name, &status) < 0)
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
444 return -1;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
445 if (status == MAILBOX_NAME_INVALID) {
5613
f717fb4b31c0 Error handling rewrite.
Timo Sirainen <tss@iki.fi>
parents: 5607
diff changeset
446 mailbox_list_set_error(list, MAIL_ERROR_PARAMS,
f717fb4b31c0 Error handling rewrite.
Timo Sirainen <tss@iki.fi>
parents: 5607
diff changeset
447 "Invalid mailbox name");
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
448 return -1;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
449 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
450
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
451 /* destination mailbox name needs to contain a timestamp */
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
452 tm = localtime(&ioloop_time);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
453 if (strftime(timestamp, sizeof(timestamp), "%Y%m%d-%H%M%S", tm) == 0)
6422
18173a52f721 Renamed strocpy() to i_strocpy().
Timo Sirainen <tss@iki.fi>
parents: 6411
diff changeset
454 i_strocpy(timestamp, dec2str(ioloop_time), sizeof(timestamp));
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
455 destname = t_strconcat(name, "-", timestamp, NULL);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
456
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
457 /* first move the actual mailbox */
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
458 dest_list = lazy_namespaces[LAZY_NAMESPACE_DELETE]->storage->list;
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
459 if ((ret = mailbox_move(list, name, dest_list, &destname)) < 0)
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
460 return -1;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
461 if (ret == 0) {
5613
f717fb4b31c0 Error handling rewrite.
Timo Sirainen <tss@iki.fi>
parents: 5607
diff changeset
462 mailbox_list_set_error(list, MAIL_ERROR_NOTFOUND,
f717fb4b31c0 Error handling rewrite.
Timo Sirainen <tss@iki.fi>
parents: 5607
diff changeset
463 T_MAIL_ERR_MAILBOX_NOT_FOUND(name));
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
464 return -1;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
465 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
466
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
467 /* next move the expunged messages mailbox, if it exists */
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
468 list = lazy_namespaces[LAZY_NAMESPACE_EXPUNGE]->storage->list;
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
469 dest_list =
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
470 lazy_namespaces[LAZY_NAMESPACE_DELETE_EXPUNGE]->storage->list;
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
471 (void)mailbox_move(list, name, dest_list, &destname);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
472 return 0;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
473 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
474
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
475 static void lazy_expunge_mail_storage_created(struct mail_storage *storage)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
476 {
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
477 struct lazy_expunge_mailbox_list *llist =
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
478 LAZY_EXPUNGE_LIST_CONTEXT(storage->list);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
479 struct lazy_expunge_mail_storage *lstorage;
6460
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
480 const char *const *p;
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
481 unsigned int i;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
482
4916
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
483 if (lazy_expunge_next_hook_mail_storage_created != NULL)
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
484 lazy_expunge_next_hook_mail_storage_created(storage);
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
485
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
486 /* only maildir supported for now */
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
487 if (strcmp(storage->name, "maildir") != 0)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
488 return;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
489
6460
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
490 /* if this is one of our internal storages, mark it as such before
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
491 quota plugin sees it */
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
492 p = t_strsplit_spaces(getenv("LAZY_EXPUNGE"), " ");
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
493 for (i = 0; i < LAZY_NAMESPACE_COUNT; i++, p++) {
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
494 if (strcmp(storage->ns->prefix, *p) == 0) {
6467
7499e36629c6 Crashfix to last change
Timo Sirainen <tss@iki.fi>
parents: 6460
diff changeset
495 storage->ns->flags |= NAMESPACE_FLAG_INTERNAL;
6460
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
496 break;
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
497 }
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
498 }
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
499
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
500 llist->storage = storage;
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
501
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
502 lstorage = p_new(storage->pool, struct lazy_expunge_mail_storage, 1);
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
503 lstorage->module_ctx.super = storage->v;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
504 storage->v.mailbox_open = lazy_expunge_mailbox_open;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
505
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
506 MODULE_CONTEXT_SET(storage, lazy_expunge_mail_storage_module, lstorage);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
507 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
508
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
509 static void lazy_expunge_mailbox_list_created(struct mailbox_list *list)
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
510 {
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
511 struct lazy_expunge_mailbox_list *llist;
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
512
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
513 if (lazy_expunge_next_hook_mailbox_list_created != NULL)
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
514 lazy_expunge_next_hook_mailbox_list_created(list);
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
515
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
516 llist = p_new(list->pool, struct lazy_expunge_mailbox_list, 1);
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
517 llist->module_ctx.super = list->v;
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
518 list->v.delete_mailbox = lazy_expunge_mailbox_list_delete;
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
519
5450
7a6db5ec047d Better type safety to module_contexts arrays. Already fixed some bugs.
Timo Sirainen <tss@iki.fi>
parents: 5448
diff changeset
520 MODULE_CONTEXT_SET(list, lazy_expunge_mailbox_list_module, llist);
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
521 }
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
522
6237
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
523 static void
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
524 lazy_expunge_hook_mail_namespaces_created(struct mail_namespace *namespaces)
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
525 {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
526 struct lazy_expunge_mail_storage *lstorage;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
527 const char *const *p;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
528 int i;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
529
6237
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
530 if (lazy_expunge_next_hook_mail_namespaces_created != NULL)
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
531 lazy_expunge_next_hook_mail_namespaces_created(namespaces);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
532
6460
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
533 p = t_strsplit_spaces(getenv("LAZY_EXPUNGE"), " ");
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
534 for (i = 0; i < LAZY_NAMESPACE_COUNT; i++, p++) {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
535 const char *name = *p;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
536
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
537 if (name == NULL)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
538 i_fatal("lazy_expunge: Missing namespace #%d", i + 1);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
539
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
540 lazy_namespaces[i] =
6237
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
541 mail_namespace_find_prefix(namespaces, name);
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
542 if (lazy_namespaces[i] == NULL)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
543 i_fatal("lazy_expunge: Unknown namespace: '%s'", name);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
544 if (strcmp(lazy_namespaces[i]->storage->name, "maildir") != 0) {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
545 i_fatal("lazy_expunge: Namespace must be in maildir "
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
546 "format: %s", name);
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
547 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
548
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
549 /* we don't want to override these namespaces' expunge/delete
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
550 operations. */
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
551 lstorage = LAZY_EXPUNGE_CONTEXT(lazy_namespaces[i]->storage);
4916
Timo Sirainen <timo.sirainen@movial.fi>
parents: 4913
diff changeset
552 lstorage->internal_namespace = TRUE;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
553 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
554 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
555
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
556 void lazy_expunge_plugin_init(void)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
557 {
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
558 if (getenv("LAZY_EXPUNGE") == NULL)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
559 return;
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
560
6237
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
561 lazy_expunge_next_hook_mail_namespaces_created =
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
562 hook_mail_namespaces_created;
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
563 hook_mail_namespaces_created =
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
564 lazy_expunge_hook_mail_namespaces_created;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
565
6460
d4df001f9bd0 Mark lazy expunge's namespaces as internal so quota doesn't count them.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
566 lazy_expunge_next_hook_mail_storage_created = hook_mail_storage_created;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
567 hook_mail_storage_created = lazy_expunge_mail_storage_created;
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
568
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
569 lazy_expunge_next_hook_mailbox_list_created = hook_mailbox_list_created;
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
570 hook_mailbox_list_created = lazy_expunge_mailbox_list_created;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
571 }
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
572
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
573 void lazy_expunge_plugin_deinit(void)
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
574 {
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
575 if (getenv("LAZY_EXPUNGE") == NULL)
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
576 return;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
577
6237
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
578 hook_mail_namespaces_created =
ea9604a6cfd6 Fixed to use hook_mail_namespaces_created so we work also with pop3.
Timo Sirainen <tss@iki.fi>
parents: 5613
diff changeset
579 lazy_expunge_hook_mail_namespaces_created;
5448
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
580 hook_mail_storage_created = lazy_expunge_next_hook_mail_storage_created;
beabd433cdae Moved delete/rename operations to mailbox_list API. Fixed mbox/maildir to
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
581 hook_mailbox_list_created = lazy_expunge_next_hook_mailbox_list_created;
4913
dea1c8fa53f4 Added lazy expunge plugin.
Timo Sirainen <timo.sirainen@movial.fi>
parents:
diff changeset
582 }