Mercurial > dovecot > original-hg > dovecot-1.2

annotate src/plugins/trash/trash-plugin.c @ 9575:0a00dcc4f0ea HEAD

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
lib-storage: Allow shared namespace prefix to use %variable modifiers.
author Timo Sirainen <tss@iki.fi>
date Wed, 26 May 2010 17:07:51 +0100
parents 00cd9aacd03c
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
9532
00cd9aacd03c Updated copyright notices to include year 2010.
Timo Sirainen <tss@iki.fi>
parents: 8590
diff changeset
1 /* Copyright (c) 2005-2010 Dovecot authors, see the included COPYING file */
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
2
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
3 #include "lib.h"
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
4 #include "array.h"
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
5 #include "istream.h"
5577
1fd9616157e4 Updated to support namespaces
Timo Sirainen <tss@iki.fi>
parents: 5297
diff changeset
6 #include "mail-namespace.h"
7642
077bb84e9e77 Make mail_search_args an independent structure that can be used for multiple
Timo Sirainen <tss@iki.fi>
parents: 7287
diff changeset
7 #include "mail-search-build.h"
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
8 #include "quota-private.h"
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
9 #include "quota-plugin.h"
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
10 #include "trash-plugin.h"
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
11
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
12 #include <stdlib.h>
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
13 #include <unistd.h>
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
14 #include <fcntl.h>
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
15
5187
9dd18b285223 Minor memory allocation optimizations.
Timo Sirainen <tss@iki.fi>
parents: 5185
diff changeset
16 #define INIT_TRASH_MAILBOX_COUNT 4
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
17 #define MAX_RETRY_COUNT 3
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
18
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
19 #define TRASH_USER_CONTEXT(obj) \
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
20 MODULE_CONTEXT(obj, trash_user_module)
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
21
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
22 struct trash_mailbox {
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
23 const char *name;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
24 int priority; /* lower number = higher priority */
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
25
8287
944f709797df Trash plugin: Small optimization.
Timo Sirainen <tss@iki.fi>
parents: 8137
diff changeset
26 struct mail_storage *storage;
944f709797df Trash plugin: Small optimization.
Timo Sirainen <tss@iki.fi>
parents: 8137
diff changeset
27
8082
db66611fd195 Added struct mail_user and fixed the code to support multiple users per process.
Timo Sirainen <tss@iki.fi>
parents: 7642
diff changeset
28 /* temporarily set while cleaning: */
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
29 struct mailbox *box;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
30 struct mailbox_transaction_context *trans;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
31 struct mail_search_context *search_ctx;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
32 struct mail *mail;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
33
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
34 unsigned int mail_set:1;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
35 };
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
36
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
37 struct trash_user {
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
38 union mail_user_module_context module_ctx;
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
39
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
40 /* ordered by priority, highest first */
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
41 ARRAY_DEFINE(trash_boxes, struct trash_mailbox);
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
42 };
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
43
5185
24f4a959a24c Added <plugin_name>_version string.
Timo Sirainen <tss@iki.fi>
parents: 5158
diff changeset
44 const char *trash_plugin_version = PACKAGE_VERSION;
24f4a959a24c Added <plugin_name>_version string.
Timo Sirainen <tss@iki.fi>
parents: 5158
diff changeset
45
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
46 static MODULE_CONTEXT_DEFINE_INIT(trash_user_module,
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
47 &mail_user_module_register);
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
48 static void (*trash_next_hook_mail_namespaces_created)
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
49 (struct mail_namespace *namespaces);
4514
511f1f5c76fa Changes to make trash plugin working again.
Timo Sirainen <tss@iki.fi>
parents: 4451
diff changeset
50 static int (*trash_next_quota_test_alloc)(struct quota_transaction_context *,
511f1f5c76fa Changes to make trash plugin working again.
Timo Sirainen <tss@iki.fi>
parents: 4451
diff changeset
51 uoff_t, bool *);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
52
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
53 static int trash_clean_mailbox_open(struct trash_mailbox *trash)
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
54 {
8468
d4eab639c253 mailbox_open() now takes struct mail_storage ** so it can be changed.
Timo Sirainen <tss@iki.fi>
parents: 8439
diff changeset
55 struct mail_storage *storage = trash->storage;
7642
077bb84e9e77 Make mail_search_args an independent structure that can be used for multiple
Timo Sirainen <tss@iki.fi>
parents: 7287
diff changeset
56 struct mail_search_args *search_args;
077bb84e9e77 Make mail_search_args an independent structure that can be used for multiple
Timo Sirainen <tss@iki.fi>
parents: 7287
diff changeset
57
8468
d4eab639c253 mailbox_open() now takes struct mail_storage ** so it can be changed.
Timo Sirainen <tss@iki.fi>
parents: 8439
diff changeset
58 trash->box = mailbox_open(&storage, trash->name, NULL,
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
59 MAILBOX_OPEN_KEEP_RECENT);
5147
6b0032df7008 If trash mailbox can't be opened, don't crash.
Timo Sirainen <tss@iki.fi>
parents: 4848
diff changeset
60 if (trash->box == NULL)
5188
519ab252f1a3 Fixes for handling multiple storages.
Timo Sirainen <tss@iki.fi>
parents: 5187
diff changeset
61 return 0;
5147
6b0032df7008 If trash mailbox can't be opened, don't crash.
Timo Sirainen <tss@iki.fi>
parents: 4848
diff changeset
62
6463
aeee5076f99f Use mailbox_sync() instead of our own implementation.
Timo Sirainen <tss@iki.fi>
parents: 6429
diff changeset
63 if (mailbox_sync(trash->box, MAILBOX_SYNC_FLAG_FULL_READ, 0, NULL) < 0)
4748
5fb199ed254a Trash plugin was completely broken before.
Timo Sirainen <tss@iki.fi>
parents: 4602
diff changeset
64 return -1;
5fb199ed254a Trash plugin was completely broken before.
Timo Sirainen <tss@iki.fi>
parents: 4602
diff changeset
65
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
66 trash->trans = mailbox_transaction_begin(trash->box, 0);
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
67 trash->mail = mail_alloc(trash->trans, MAIL_FETCH_PHYSICAL_SIZE |
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
68 MAIL_FETCH_RECEIVED_DATE, NULL);
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
69
7642
077bb84e9e77 Make mail_search_args an independent structure that can be used for multiple
Timo Sirainen <tss@iki.fi>
parents: 7287
diff changeset
70 search_args = mail_search_build_init();
077bb84e9e77 Make mail_search_args an independent structure that can be used for multiple
Timo Sirainen <tss@iki.fi>
parents: 7287
diff changeset
71 mail_search_build_add_all(search_args);
077bb84e9e77 Make mail_search_args an independent structure that can be used for multiple
Timo Sirainen <tss@iki.fi>
parents: 7287
diff changeset
72 trash->search_ctx = mailbox_search_init(trash->trans,
077bb84e9e77 Make mail_search_args an independent structure that can be used for multiple
Timo Sirainen <tss@iki.fi>
parents: 7287
diff changeset
73 search_args, NULL);
077bb84e9e77 Make mail_search_args an independent structure that can be used for multiple
Timo Sirainen <tss@iki.fi>
parents: 7287
diff changeset
74 mail_search_args_unref(&search_args);
077bb84e9e77 Make mail_search_args an independent structure that can be used for multiple
Timo Sirainen <tss@iki.fi>
parents: 7287
diff changeset
75
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
76 return mailbox_search_next(trash->search_ctx, trash->mail);
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
77 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
78
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
79 static int trash_clean_mailbox_get_next(struct trash_mailbox *trash,
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
80 time_t *received_time_r)
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
81 {
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
82 int ret;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
83
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
84 if (!trash->mail_set) {
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
85 if (trash->box == NULL)
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
86 ret = trash_clean_mailbox_open(trash);
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
87 else
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
88 ret = mailbox_search_next(trash->search_ctx,
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
89 trash->mail);
5188
519ab252f1a3 Fixes for handling multiple storages.
Timo Sirainen <tss@iki.fi>
parents: 5187
diff changeset
90 if (ret <= 0) {
519ab252f1a3 Fixes for handling multiple storages.
Timo Sirainen <tss@iki.fi>
parents: 5187
diff changeset
91 *received_time_r = 0;
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
92 return ret;
5188
519ab252f1a3 Fixes for handling multiple storages.
Timo Sirainen <tss@iki.fi>
parents: 5187
diff changeset
93 }
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
94 trash->mail_set = TRUE;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
95 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
96
6280
eb7c9d8ece54 mail_*() APIs changed to return int and return the actual data as pointer.
Timo Sirainen <tss@iki.fi>
parents: 6279
diff changeset
97 if (mail_get_received_date(trash->mail, received_time_r) < 0)
eb7c9d8ece54 mail_*() APIs changed to return int and return the actual data as pointer.
Timo Sirainen <tss@iki.fi>
parents: 6279
diff changeset
98 return -1;
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
99 return 1;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
100 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
101
5158
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
102 static int trash_try_clean_mails(struct quota_transaction_context *ctx,
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
103 uint64_t size_needed)
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
104 {
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
105 struct trash_user *tuser = TRASH_USER_CONTEXT(ctx->quota->user);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
106 struct trash_mailbox *trashes;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
107 unsigned int i, j, count, oldest_idx;
5297
67b8d61c988f compiler warning fix
Timo Sirainen <tss@iki.fi>
parents: 5189
diff changeset
108 time_t oldest, received = 0;
5158
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
109 uint64_t size, size_expunged = 0, expunged_count = 0;
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
110 int ret = 0;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
111
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
112 trashes = array_get_modifiable(&tuser->trash_boxes, &count);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
113 for (i = 0; i < count; ) {
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
114 /* expunge oldest mails first in all trash boxes with
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
115 same priority */
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
116 oldest_idx = count;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
117 oldest = (time_t)-1;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
118 for (j = i; j < count; j++) {
5189
7ec060a7c29f Fixed priority handling.
Timo Sirainen <tss@iki.fi>
parents: 5188
diff changeset
119 if (trashes[j].priority != trashes[i].priority)
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
120 break;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
121
5188
519ab252f1a3 Fixes for handling multiple storages.
Timo Sirainen <tss@iki.fi>
parents: 5187
diff changeset
122 ret = trash_clean_mailbox_get_next(&trashes[j],
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
123 &received);
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
124 if (ret < 0)
6412
8ebc07d2eee9 Get rid of __ prefixes.
Timo Sirainen <tss@iki.fi>
parents: 6280
diff changeset
125 goto err;
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
126 if (ret > 0) {
5188
519ab252f1a3 Fixes for handling multiple storages.
Timo Sirainen <tss@iki.fi>
parents: 5187
diff changeset
127 if (oldest == (time_t)-1 || received < oldest) {
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
128 oldest = received;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
129 oldest_idx = j;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
130 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
131 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
132 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
133
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
134 if (oldest_idx < count) {
6280
eb7c9d8ece54 mail_*() APIs changed to return int and return the actual data as pointer.
Timo Sirainen <tss@iki.fi>
parents: 6279
diff changeset
135 if (mail_get_physical_size(trashes[oldest_idx].mail,
eb7c9d8ece54 mail_*() APIs changed to return int and return the actual data as pointer.
Timo Sirainen <tss@iki.fi>
parents: 6279
diff changeset
136 &size) < 0) {
5158
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
137 /* maybe expunged already? */
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
138 trashes[oldest_idx].mail_set = FALSE;
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
139 continue;
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
140 }
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
141
6277
5f66277bbe40 mail_index_lookup*() can't fail anymore. Changed several APIs not to return
Timo Sirainen <tss@iki.fi>
parents: 6162
diff changeset
142 mail_expunge(trashes[oldest_idx].mail);
5158
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
143 expunged_count++;
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
144 size_expunged += size;
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
145 if (size_expunged >= size_needed)
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
146 break;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
147 trashes[oldest_idx].mail_set = FALSE;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
148 } else {
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
149 /* find more mails from next priority's mailbox */
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
150 i = j;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
151 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
152 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
153
6412
8ebc07d2eee9 Get rid of __ prefixes.
Timo Sirainen <tss@iki.fi>
parents: 6280
diff changeset
154 err:
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
155 for (i = 0; i < count; i++) {
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
156 struct trash_mailbox *trash = &trashes[i];
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
157
5157
df22aec605b7 If trash mailbox couldn't be opened, don't crash later either.
Timo Sirainen <tss@iki.fi>
parents: 5147
diff changeset
158 if (trash->box == NULL)
df22aec605b7 If trash mailbox couldn't be opened, don't crash later either.
Timo Sirainen <tss@iki.fi>
parents: 5147
diff changeset
159 continue;
df22aec605b7 If trash mailbox couldn't be opened, don't crash later either.
Timo Sirainen <tss@iki.fi>
parents: 5147
diff changeset
160
4748
5fb199ed254a Trash plugin was completely broken before.
Timo Sirainen <tss@iki.fi>
parents: 4602
diff changeset
161 trash->mail_set = FALSE;
3879
928229f8b3e6 deinit, unref, destroy, close, free, etc. functions now take a pointer to
Timo Sirainen <tss@iki.fi>
parents: 3863
diff changeset
162 mail_free(&trash->mail);
928229f8b3e6 deinit, unref, destroy, close, free, etc. functions now take a pointer to
Timo Sirainen <tss@iki.fi>
parents: 3863
diff changeset
163 (void)mailbox_search_deinit(&trash->search_ctx);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
164
6512
1a3604c8ee05 mailbox_transaction_commit*() doesn't sync the mailbox anymore, so it
Timo Sirainen <tss@iki.fi>
parents: 6463
diff changeset
165 if (size_expunged >= size_needed)
1a3604c8ee05 mailbox_transaction_commit*() doesn't sync the mailbox anymore, so it
Timo Sirainen <tss@iki.fi>
parents: 6463
diff changeset
166 (void)mailbox_transaction_commit(&trash->trans);
1a3604c8ee05 mailbox_transaction_commit*() doesn't sync the mailbox anymore, so it
Timo Sirainen <tss@iki.fi>
parents: 6463
diff changeset
167 else {
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
168 /* couldn't get enough space, don't expunge anything */
3879
928229f8b3e6 deinit, unref, destroy, close, free, etc. functions now take a pointer to
Timo Sirainen <tss@iki.fi>
parents: 3863
diff changeset
169 mailbox_transaction_rollback(&trash->trans);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
170 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
171
3879
928229f8b3e6 deinit, unref, destroy, close, free, etc. functions now take a pointer to
Timo Sirainen <tss@iki.fi>
parents: 3863
diff changeset
172 mailbox_close(&trash->box);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
173 }
5158
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
174
6024
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
175 if (size_expunged < size_needed) {
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
176 if (getenv("DEBUG") != NULL) {
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
177 i_info("trash plugin: Failed to remove enough messages "
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
178 "(needed %llu bytes, expunged only %llu bytes)",
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
179 (unsigned long long)size_needed,
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
180 (unsigned long long)size_expunged);
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
181 }
5158
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
182 return FALSE;
6024
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
183 }
5158
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
184
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
185 ctx->bytes_used = ctx->bytes_used > (int64_t)size_expunged ?
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
186 ctx->bytes_used - size_expunged : 0;
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
187 ctx->count_used = ctx->count_used > (int64_t)expunged_count ?
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
188 ctx->count_used - expunged_count : 0;
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
189 return TRUE;
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
190 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
191
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
192 static int
4514
511f1f5c76fa Changes to make trash plugin working again.
Timo Sirainen <tss@iki.fi>
parents: 4451
diff changeset
193 trash_quota_test_alloc(struct quota_transaction_context *ctx,
511f1f5c76fa Changes to make trash plugin working again.
Timo Sirainen <tss@iki.fi>
parents: 4451
diff changeset
194 uoff_t size, bool *too_large_r)
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
195 {
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
196 int ret, i;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
197
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
198 for (i = 0; ; i++) {
4514
511f1f5c76fa Changes to make trash plugin working again.
Timo Sirainen <tss@iki.fi>
parents: 4451
diff changeset
199 ret = trash_next_quota_test_alloc(ctx, size, too_large_r);
6024
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
200 if (ret != 0 || *too_large_r) {
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
201 if (getenv("DEBUG") != NULL && *too_large_r) {
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
202 i_info("trash plugin: Mail is larger than "
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
203 "quota, won't even try to handle");
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
204 }
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
205 return ret;
6024
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
206 }
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
207
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
208 if (i == MAX_RETRY_COUNT) {
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
209 /* trash_try_clean_mails() should have returned 0 if
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
210 it couldn't get enough space, but allow retrying
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
211 it a couple of times if there was some extra space
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
212 that was needed.. */
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
213 break;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
214 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
215
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
216 /* not enough space. try deleting some from mailbox. */
5158
aa9b1fec1c21 Although messages were expunged, the expunges weren't counted in that same
Timo Sirainen <tss@iki.fi>
parents: 5157
diff changeset
217 ret = trash_try_clean_mails(ctx, size);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
218 if (ret <= 0)
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
219 return 0;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
220 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
221
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
222 return 0;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
223 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
224
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
225 static bool trash_find_storage(struct mail_user *user,
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
226 struct trash_mailbox *trash)
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
227 {
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
228 struct mail_namespace *ns;
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
229 const char *name;
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
230
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
231 for (ns = user->namespaces; ns != NULL; ns = ns->next) {
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
232 name = trash->name;
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
233 if (mail_namespace_update_name(ns, &name)) {
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
234 if (name != trash->name)
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
235 trash->name = p_strdup(user->pool, name);
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
236 trash->storage = ns->storage;
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
237 return TRUE;
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
238 }
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
239 }
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
240 return FALSE;
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
241 }
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
242
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
243 static int trash_mailbox_priority_cmp(const void *p1, const void *p2)
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
244 {
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
245 const struct trash_mailbox *t1 = p1, *t2 = p2;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
246
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
247 return t1->priority - t2->priority;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
248 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
249
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
250 static int read_configuration(struct mail_user *user, const char *path)
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
251 {
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
252 struct trash_user *tuser = TRASH_USER_CONTEXT(user);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
253 struct istream *input;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
254 const char *line, *name;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
255 struct trash_mailbox *trash;
4602
444edc8abef9 Don't allow giving NULL parameter to array_get() or array_get_modifiable().
Timo Sirainen <tss@iki.fi>
parents: 4596
diff changeset
256 unsigned int count;
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
257 int fd, ret = 0;
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
258
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
259 fd = open(path, O_RDONLY);
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
260 if (fd == -1) {
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
261 i_error("trash plugin: open(%s) failed: %m", path);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
262 return -1;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
263 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
264
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
265 p_array_init(&tuser->trash_boxes, user->pool, INIT_TRASH_MAILBOX_COUNT);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
266
6162
896cc473c1f0 Renamed i_stream_create_file() to i_stream_create_fd().
Timo Sirainen <tss@iki.fi>
parents: 6142
diff changeset
267 input = i_stream_create_fd(fd, (size_t)-1, FALSE);
8439
596a577698c1 Changed all config file readers to not ignore the last line if it's missing LF.
Timo Sirainen <tss@iki.fi>
parents: 8404
diff changeset
268 i_stream_set_return_partial_line(input, TRUE);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
269 while ((line = i_stream_read_next_line(input)) != NULL) {
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
270 /* <priority> <mailbox name> */
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
271 name = strchr(line, ' ');
7287
75526c605044 Allow #comments in trash config
Timo Sirainen <tss@iki.fi>
parents: 7086
diff changeset
272 if (name == NULL || name[1] == '\0' || *line == '#')
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
273 continue;
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
274
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
275 trash = array_append_space(&tuser->trash_boxes);
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
276 trash->name = p_strdup(user->pool, name+1);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
277 trash->priority = atoi(t_strdup_until(line, name));
6024
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
278
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
279 if (!trash_find_storage(user, trash)) {
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
280 i_error("trash: Namespace not found for mailbox '%s'",
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
281 trash->name);
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
282 ret = -1;
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
283 }
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
284
6024
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
285 if (getenv("DEBUG") != NULL) {
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
286 i_info("trash plugin: Added '%s' with priority %d",
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
287 trash->name, trash->priority);
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
288 }
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
289 }
4070
71b8faa84ec6 Added i_stream_destroy() and o_stream_destroy() and used them instead of
Timo Sirainen <tss@iki.fi>
parents: 3879
diff changeset
290 i_stream_destroy(&input);
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
291 (void)close(fd);
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
292
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
293 trash = array_get_modifiable(&tuser->trash_boxes, &count);
4602
444edc8abef9 Don't allow giving NULL parameter to array_get() or array_get_modifiable().
Timo Sirainen <tss@iki.fi>
parents: 4596
diff changeset
294 qsort(trash, count, sizeof(*trash), trash_mailbox_priority_cmp);
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
295 return ret;
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
296 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
297
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
298 static void
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
299 trash_hook_mail_namespaces_created(struct mail_namespace *namespaces)
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
300 {
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
301 struct mail_user *user = namespaces->user;
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
302 struct trash_user *tuser;
4400
593523f53500 Removed hardcoded trash plugin configuration paths. Added information about
Timo Sirainen <tss@iki.fi>
parents: 4084
diff changeset
303 const char *env;
593523f53500 Removed hardcoded trash plugin configuration paths. Added information about
Timo Sirainen <tss@iki.fi>
parents: 4084
diff changeset
304
593523f53500 Removed hardcoded trash plugin configuration paths. Added information about
Timo Sirainen <tss@iki.fi>
parents: 4084
diff changeset
305 env = getenv("TRASH");
6024
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
306 if (env == NULL) {
6074e9e6059d Added debug logging.
Timo Sirainen <tss@iki.fi>
parents: 5577
diff changeset
307 if (getenv("DEBUG") != NULL)
8404
d3cbd3494a8c Plugins: If mail_debug=yes, log "plugin disabled" if plugin's required setting isn't set.
Timo Sirainen <tss@iki.fi>
parents: 8294
diff changeset
308 i_info("trash: No trash setting - plugin disabled");
8487
cee696a95320 Call next hook_mail_namespaces_created in correct order.
Timo Sirainen <tss@iki.fi>
parents: 8468
diff changeset
309 } else if (quota_set == NULL) {
cee696a95320 Call next hook_mail_namespaces_created in correct order.
Timo Sirainen <tss@iki.fi>
parents: 8468
diff changeset
310 i_error("trash plugin: quota plugin not initialized");
cee696a95320 Call next hook_mail_namespaces_created in correct order.
Timo Sirainen <tss@iki.fi>
parents: 8468
diff changeset
311 } else {
cee696a95320 Call next hook_mail_namespaces_created in correct order.
Timo Sirainen <tss@iki.fi>
parents: 8468
diff changeset
312 tuser = p_new(user->pool, struct trash_user, 1);
cee696a95320 Call next hook_mail_namespaces_created in correct order.
Timo Sirainen <tss@iki.fi>
parents: 8468
diff changeset
313 tuser->module_ctx.super = user->v;
cee696a95320 Call next hook_mail_namespaces_created in correct order.
Timo Sirainen <tss@iki.fi>
parents: 8468
diff changeset
314 MODULE_CONTEXT_SET(user, trash_user_module, tuser);
4400
593523f53500 Removed hardcoded trash plugin configuration paths. Added information about
Timo Sirainen <tss@iki.fi>
parents: 4084
diff changeset
315
8487
cee696a95320 Call next hook_mail_namespaces_created in correct order.
Timo Sirainen <tss@iki.fi>
parents: 8468
diff changeset
316 if (read_configuration(user, env) == 0) {
cee696a95320 Call next hook_mail_namespaces_created in correct order.
Timo Sirainen <tss@iki.fi>
parents: 8468
diff changeset
317 trash_next_quota_test_alloc = quota_set->test_alloc;
cee696a95320 Call next hook_mail_namespaces_created in correct order.
Timo Sirainen <tss@iki.fi>
parents: 8468
diff changeset
318 quota_set->test_alloc = trash_quota_test_alloc;
cee696a95320 Call next hook_mail_namespaces_created in correct order.
Timo Sirainen <tss@iki.fi>
parents: 8468
diff changeset
319 }
4400
593523f53500 Removed hardcoded trash plugin configuration paths. Added information about
Timo Sirainen <tss@iki.fi>
parents: 4084
diff changeset
320 }
593523f53500 Removed hardcoded trash plugin configuration paths. Added information about
Timo Sirainen <tss@iki.fi>
parents: 4084
diff changeset
321
8487
cee696a95320 Call next hook_mail_namespaces_created in correct order.
Timo Sirainen <tss@iki.fi>
parents: 8468
diff changeset
322 if (trash_next_hook_mail_namespaces_created != NULL)
cee696a95320 Call next hook_mail_namespaces_created in correct order.
Timo Sirainen <tss@iki.fi>
parents: 8468
diff changeset
323 trash_next_hook_mail_namespaces_created(namespaces);
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
324 }
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
325
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
326 void trash_plugin_init(void)
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
327 {
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
328 trash_next_hook_mail_namespaces_created = hook_mail_namespaces_created;
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
329 hook_mail_namespaces_created = trash_hook_mail_namespaces_created;
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
330 }
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
331
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
332 void trash_plugin_deinit(void)
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
333 {
8294
8aa69e3d27ef Trash plugin: Assign storage to all mailboxes at startup so errors are caught immediately.
Timo Sirainen <tss@iki.fi>
parents: 8287
diff changeset
334 hook_mail_namespaces_created = trash_hook_mail_namespaces_created;
4796
49c9e7588de4 s/quota/quota_set/ so we don't conflict with the quota symbol already
Timo Sirainen <tss@iki.fi>
parents: 4748
diff changeset
335 quota_set->test_alloc = trash_next_quota_test_alloc;
3738
732b62dc1976 Added beginnings of plugin infrastructure. TODO: These could be optionally
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
336 }