Mercurial > dovecot > core-2.2

annotate src/doveadm/doveadm-mail-fetch.c @ 11395:07c9d1115029 HEAD

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
doveadm: mail commands can now be extended more easily by plugins. Also plugins can now override the list of -A users.
author Timo Sirainen <tss@iki.fi>
date Thu, 27 May 2010 19:59:39 +0100
parents b43d6d2ef2fb
children 93eaae8617c8
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
11147
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
1 /* Copyright (c) 2010 Dovecot authors, see the included COPYING file */
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
2
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
3 #include "lib.h"
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
4 #include "array.h"
11147
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
5 #include "istream.h"
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
6 #include "ostream.h"
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
7 #include "base64.h"
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
8 #include "randgen.h"
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
9 #include "str.h"
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
10 #include "message-size.h"
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
11 #include "imap-util.h"
11147
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
12 #include "mail-storage.h"
11236
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
13 #include "mail-search.h"
11147
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
14 #include "doveadm-mail.h"
11205
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
15 #include "doveadm-mail-list-iter.h"
11209
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
16 #include "doveadm-mail-iter.h"
11205
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
17
11207
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
18 #include <stdio.h>
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
19
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
20 struct fetch_cmd_context {
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
21 struct doveadm_mail_cmd_context ctx;
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
22
11205
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
23 struct ostream *output;
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
24 struct mail *mail;
11205
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
25
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
26 ARRAY_DEFINE(fields, const struct fetch_field);
11342
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
27 ARRAY_TYPE(const_string) header_fields;
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
28 enum mail_fetch_field wanted_fields;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
29
11342
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
30 const struct fetch_field *cur_field;
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
31 string_t *hdr;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
32 const char *prefix;
11237
6327433bccb9 doveadm fetch: Don't print field name if fetching only a single field.
Timo Sirainen <tss@iki.fi>
parents: 11236
diff changeset
33
6327433bccb9 doveadm fetch: Don't print field name if fetching only a single field.
Timo Sirainen <tss@iki.fi>
parents: 11236
diff changeset
34 bool print_field_prefix;
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
35 };
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
36
11342
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
37 struct fetch_field {
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
38 const char *name;
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
39 enum mail_fetch_field wanted_fields;
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
40 int (*print)(struct fetch_cmd_context *ctx);
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
41 };
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
42
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
43 static int fetch_mailbox(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
44 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
45 const char *value;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
46
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
47 if (mail_get_special(ctx->mail, MAIL_FETCH_MAILBOX_NAME, &value) < 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
48 return -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
49 str_append(ctx->hdr, value);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
50 return 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
51 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
52
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
53 static int fetch_mailbox_guid(struct fetch_cmd_context *ctx)
11233
5d0027f17bd8 doveadm fetch: Added support for mailbox-guid search key/fetch field.
Timo Sirainen <tss@iki.fi>
parents: 11209
diff changeset
54 {
5d0027f17bd8 doveadm fetch: Added support for mailbox-guid search key/fetch field.
Timo Sirainen <tss@iki.fi>
parents: 11209
diff changeset
55 uint8_t guid[MAIL_GUID_128_SIZE];
5d0027f17bd8 doveadm fetch: Added support for mailbox-guid search key/fetch field.
Timo Sirainen <tss@iki.fi>
parents: 11209
diff changeset
56
5d0027f17bd8 doveadm fetch: Added support for mailbox-guid search key/fetch field.
Timo Sirainen <tss@iki.fi>
parents: 11209
diff changeset
57 if (mailbox_get_guid(ctx->mail->box, guid) < 0)
5d0027f17bd8 doveadm fetch: Added support for mailbox-guid search key/fetch field.
Timo Sirainen <tss@iki.fi>
parents: 11209
diff changeset
58 return -1;
5d0027f17bd8 doveadm fetch: Added support for mailbox-guid search key/fetch field.
Timo Sirainen <tss@iki.fi>
parents: 11209
diff changeset
59 str_append(ctx->hdr, mail_guid_128_to_string(guid));
5d0027f17bd8 doveadm fetch: Added support for mailbox-guid search key/fetch field.
Timo Sirainen <tss@iki.fi>
parents: 11209
diff changeset
60 return 0;
5d0027f17bd8 doveadm fetch: Added support for mailbox-guid search key/fetch field.
Timo Sirainen <tss@iki.fi>
parents: 11209
diff changeset
61 }
5d0027f17bd8 doveadm fetch: Added support for mailbox-guid search key/fetch field.
Timo Sirainen <tss@iki.fi>
parents: 11209
diff changeset
62
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
63 static int fetch_seq(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
64 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
65 str_printfa(ctx->hdr, "%u", ctx->mail->seq);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
66 return 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
67 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
68
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
69 static int fetch_uid(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
70 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
71 str_printfa(ctx->hdr, "%u", ctx->mail->seq);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
72 return 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
73 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
74
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
75 static int fetch_guid(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
76 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
77 const char *value;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
78
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
79 if (mail_get_special(ctx->mail, MAIL_FETCH_GUID, &value) < 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
80 return -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
81 str_append(ctx->hdr, value);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
82 return 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
83 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
84
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
85 static int fetch_flags(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
86 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
87 imap_write_flags(ctx->hdr, mail_get_flags(ctx->mail),
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
88 mail_get_keywords(ctx->mail));
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
89 return 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
90 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
91
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
92 static void flush_hdr(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
93 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
94 o_stream_send(ctx->output, str_data(ctx->hdr), str_len(ctx->hdr));
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
95 str_truncate(ctx->hdr, 0);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
96 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
97
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
98 static int fetch_hdr(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
99 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
100 struct istream *input;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
101 struct message_size hdr_size;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
102 int ret = 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
103
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
104 if (mail_get_stream(ctx->mail, &hdr_size, NULL, &input) < 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
105 return -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
106
11237
6327433bccb9 doveadm fetch: Don't print field name if fetching only a single field.
Timo Sirainen <tss@iki.fi>
parents: 11236
diff changeset
107 if (ctx->print_field_prefix)
6327433bccb9 doveadm fetch: Don't print field name if fetching only a single field.
Timo Sirainen <tss@iki.fi>
parents: 11236
diff changeset
108 str_append_c(ctx->hdr, '\n');
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
109 flush_hdr(ctx);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
110 input = i_stream_create_limit(input, hdr_size.physical_size);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
111 while (!i_stream_is_eof(input)) {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
112 if (o_stream_send_istream(ctx->output, input) <= 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
113 i_fatal("write(stdout) failed: %m");
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
114 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
115 if (input->stream_errno != 0) {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
116 i_error("read() failed: %m");
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
117 ret = -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
118 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
119 i_stream_unref(&input);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
120 o_stream_flush(ctx->output);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
121 return ret;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
122 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
123
11342
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
124 static int fetch_hdr_field(struct fetch_cmd_context *ctx)
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
125 {
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
126 const char *const *value;
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
127 bool add_lf = FALSE;
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
128
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
129 if (mail_get_headers(ctx->mail, ctx->cur_field->name, &value) < 0)
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
130 return -1;
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
131
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
132 for (; *value != NULL; value++) {
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
133 if (add_lf)
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
134 str_append_c(ctx->hdr, '\n');
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
135 if (ctx->print_field_prefix)
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
136 str_printfa(ctx->hdr, "hdr.%s: ", ctx->cur_field->name);
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
137 str_append(ctx->hdr, *value);
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
138 add_lf = TRUE;
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
139 }
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
140 return 0;
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
141 }
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
142
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
143 static int fetch_body(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
144 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
145 struct istream *input;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
146 struct message_size hdr_size;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
147 int ret = 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
148
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
149 if (mail_get_stream(ctx->mail, &hdr_size, NULL, &input) < 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
150 return -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
151
11237
6327433bccb9 doveadm fetch: Don't print field name if fetching only a single field.
Timo Sirainen <tss@iki.fi>
parents: 11236
diff changeset
152 if (ctx->print_field_prefix)
6327433bccb9 doveadm fetch: Don't print field name if fetching only a single field.
Timo Sirainen <tss@iki.fi>
parents: 11236
diff changeset
153 str_append_c(ctx->hdr, '\n');
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
154 flush_hdr(ctx);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
155 i_stream_skip(input, hdr_size.physical_size);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
156 while (!i_stream_is_eof(input)) {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
157 if (o_stream_send_istream(ctx->output, input) <= 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
158 i_fatal("write(stdout) failed: %m");
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
159 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
160 if (input->stream_errno != 0) {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
161 i_error("read() failed: %m");
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
162 ret = -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
163 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
164 o_stream_flush(ctx->output);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
165 return ret;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
166 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
167
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
168 static int fetch_text(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
169 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
170 struct istream *input;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
171 int ret = 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
172
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
173 if (mail_get_stream(ctx->mail, NULL, NULL, &input) < 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
174 return -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
175
11237
6327433bccb9 doveadm fetch: Don't print field name if fetching only a single field.
Timo Sirainen <tss@iki.fi>
parents: 11236
diff changeset
176 if (ctx->print_field_prefix)
6327433bccb9 doveadm fetch: Don't print field name if fetching only a single field.
Timo Sirainen <tss@iki.fi>
parents: 11236
diff changeset
177 str_append_c(ctx->hdr, '\n');
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
178 flush_hdr(ctx);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
179 while (!i_stream_is_eof(input)) {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
180 if (o_stream_send_istream(ctx->output, input) <= 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
181 i_fatal("write(stdout) failed: %m");
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
182 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
183 if (input->stream_errno != 0) {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
184 i_error("read() failed: %m");
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
185 ret = -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
186 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
187 o_stream_flush(ctx->output);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
188 return ret;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
189 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
190
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
191 static int fetch_size_physical(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
192 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
193 uoff_t size;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
194
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
195 if (mail_get_physical_size(ctx->mail, &size) < 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
196 return -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
197 str_printfa(ctx->hdr, "%"PRIuUOFF_T, size);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
198 return 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
199 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
200
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
201 static int fetch_size_virtual(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
202 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
203 uoff_t size;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
204
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
205 if (mail_get_virtual_size(ctx->mail, &size) < 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
206 return -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
207 str_printfa(ctx->hdr, "%"PRIuUOFF_T, size);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
208 return 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
209 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
210
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
211 static int fetch_date_received(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
212 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
213 time_t t;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
214
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
215 if (mail_get_received_date(ctx->mail, &t) < 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
216 return -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
217 str_printfa(ctx->hdr, "%s", unixdate2str(t));
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
218 return 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
219 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
220
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
221 static int fetch_date_sent(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
222 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
223 time_t t;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
224 int tz;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
225 char chr;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
226
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
227 if (mail_get_date(ctx->mail, &t, &tz) < 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
228 return -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
229
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
230 chr = tz < 0 ? '-' : '+';
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
231 if (tz < 0) tz = -tz;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
232 str_printfa(ctx->hdr, "%s (%c%02u%02u)", unixdate2str(t),
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
233 chr, tz/60, tz%60);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
234 return 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
235 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
236
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
237 static int fetch_date_saved(struct fetch_cmd_context *ctx)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
238 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
239 time_t t;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
240
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
241 if (mail_get_save_date(ctx->mail, &t) < 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
242 return -1;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
243 str_printfa(ctx->hdr, "%s", unixdate2str(t));
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
244 return 0;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
245 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
246
11337
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
247 static int fetch_imap_envelope(struct fetch_cmd_context *ctx)
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
248 {
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
249 const char *value;
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
250
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
251 if (mail_get_special(ctx->mail, MAIL_FETCH_IMAP_ENVELOPE, &value) < 0)
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
252 return -1;
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
253 str_append(ctx->hdr, value);
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
254 return 0;
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
255 }
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
256
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
257 static int fetch_imap_body(struct fetch_cmd_context *ctx)
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
258 {
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
259 const char *value;
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
260
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
261 if (mail_get_special(ctx->mail, MAIL_FETCH_IMAP_BODY, &value) < 0)
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
262 return -1;
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
263 str_append(ctx->hdr, value);
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
264 return 0;
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
265 }
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
266
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
267 static int fetch_imap_bodystructure(struct fetch_cmd_context *ctx)
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
268 {
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
269 const char *value;
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
270
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
271 if (mail_get_special(ctx->mail, MAIL_FETCH_IMAP_BODYSTRUCTURE, &value) < 0)
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
272 return -1;
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
273 str_append(ctx->hdr, value);
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
274 return 0;
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
275 }
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
276
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
277 static const struct fetch_field fetch_fields[] = {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
278 { "mailbox", 0, fetch_mailbox },
11233
5d0027f17bd8 doveadm fetch: Added support for mailbox-guid search key/fetch field.
Timo Sirainen <tss@iki.fi>
parents: 11209
diff changeset
279 { "mailbox-guid", 0, fetch_mailbox_guid },
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
280 { "seq", 0, fetch_seq },
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
281 { "uid", 0, fetch_uid },
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
282 { "guid", 0, fetch_guid },
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
283 { "flags", MAIL_FETCH_FLAGS, fetch_flags },
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
284 { "hdr", MAIL_FETCH_STREAM_HEADER, fetch_hdr },
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
285 { "body", MAIL_FETCH_STREAM_BODY, fetch_body },
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
286 { "text", MAIL_FETCH_STREAM_HEADER |
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
287 MAIL_FETCH_STREAM_BODY, fetch_text },
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
288 { "size.physical", MAIL_FETCH_PHYSICAL_SIZE, fetch_size_physical },
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
289 { "size.virtual", MAIL_FETCH_VIRTUAL_SIZE, fetch_size_virtual },
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
290 { "date.received", MAIL_FETCH_RECEIVED_DATE, fetch_date_received },
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
291 { "date.sent", MAIL_FETCH_DATE, fetch_date_sent },
11337
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
292 { "date.saved", MAIL_FETCH_SAVE_DATE, fetch_date_saved },
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
293 { "imap.envelope", MAIL_FETCH_IMAP_ENVELOPE, fetch_imap_envelope },
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
294 { "imap.body", MAIL_FETCH_IMAP_BODY, fetch_imap_body },
4ec22f3bfd9f doveadm fetch: Added support for imap.envelope, imap.body and imap.bodystructure fields.
Timo Sirainen <tss@iki.fi>
parents: 11294
diff changeset
295 { "imap.bodystructure", MAIL_FETCH_IMAP_BODYSTRUCTURE, fetch_imap_bodystructure }
11205
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
296 };
11147
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
297
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
298 static const struct fetch_field *fetch_field_find(const char *name)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
299 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
300 unsigned int i;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
301
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
302 for (i = 0; i < N_ELEMENTS(fetch_fields); i++) {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
303 if (strcmp(fetch_fields[i].name, name) == 0)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
304 return &fetch_fields[i];
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
305 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
306 return NULL;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
307 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
308
11207
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
309 static void print_fetch_fields(void)
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
310 {
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
311 unsigned int i;
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
312
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
313 fprintf(stderr, "Available fetch fields: %s", fetch_fields[0].name);
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
314 for (i = 1; i < N_ELEMENTS(fetch_fields); i++)
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
315 fprintf(stderr, " %s", fetch_fields[i].name);
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
316 fprintf(stderr, "\n");
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
317 }
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
318
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
319 static void parse_fetch_fields(struct fetch_cmd_context *ctx, const char *str)
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
320 {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
321 const char *const *fields, *name;
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
322 const struct fetch_field *field;
11342
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
323 struct fetch_field hdr_field;
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
324
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
325 memset(&hdr_field, 0, sizeof(hdr_field));
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
326 hdr_field.print = fetch_hdr_field;
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
327
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
328 t_array_init(&ctx->fields, 32);
11342
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
329 t_array_init(&ctx->header_fields, 32);
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
330 fields = t_strsplit_spaces(str, " ");
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
331 for (; *fields != NULL; fields++) {
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
332 name = t_str_lcase(*fields);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
333
11342
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
334 if (strncmp(name, "hdr.", 4) == 0) {
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
335 name += 4;
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
336 hdr_field.name = name;
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
337 array_append(&ctx->fields, &hdr_field, 1);
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
338 array_append(&ctx->header_fields, &name, 1);
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
339 } else {
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
340 field = fetch_field_find(name);
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
341 if (field == NULL) {
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
342 print_fetch_fields();
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
343 i_fatal("Unknown fetch field: %s", name);
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
344 }
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
345 ctx->wanted_fields |= field->wanted_fields;
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
346 array_append(&ctx->fields, field, 1);
11207
1ec4eb879f0e doveadm fetch: If invalid fetch field is given, print list of available fields.
Timo Sirainen <tss@iki.fi>
parents: 11206
diff changeset
347 }
11342
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
348 }
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
349 (void)array_append_space(&ctx->header_fields);
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
350
11237
6327433bccb9 doveadm fetch: Don't print field name if fetching only a single field.
Timo Sirainen <tss@iki.fi>
parents: 11236
diff changeset
351 ctx->print_field_prefix = array_count(&ctx->fields) > 1;
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
352 }
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
353
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
354 static void cmd_fetch_mail(struct fetch_cmd_context *ctx)
11147
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
355 {
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
356 const struct fetch_field *field;
11209
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
357 struct mail *mail = ctx->mail;
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
358
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
359 array_foreach(&ctx->fields, field) {
11342
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
360 if (ctx->print_field_prefix && field->print != fetch_hdr_field)
11237
6327433bccb9 doveadm fetch: Don't print field name if fetching only a single field.
Timo Sirainen <tss@iki.fi>
parents: 11236
diff changeset
361 str_printfa(ctx->hdr, "%s: ", field->name);
11342
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
362
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
363 ctx->cur_field = field;
11209
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
364 if (field->print(ctx) < 0) {
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
365 struct mail_storage *storage =
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
366 mailbox_get_storage(mail->box);
11147
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
367
11209
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
368 i_error("fetch(%s) failed for box=%s uid=%u: %s",
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
369 field->name, mailbox_get_vname(mail->box),
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
370 mail->uid, mail_storage_get_last_error(storage, NULL));
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
371 }
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
372 str_append_c(ctx->hdr, '\n');
11205
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
373 }
11209
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
374 flush_hdr(ctx);
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
375 }
11147
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
376
11209
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
377 static int
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
378 cmd_fetch_box(struct fetch_cmd_context *ctx, const struct mailbox_info *info)
11209
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
379 {
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
380 struct doveadm_mail_iter *iter;
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
381 struct mailbox_transaction_context *trans;
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
382 struct mail *mail;
11342
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
383 struct mailbox_header_lookup_ctx *headers = NULL;
11209
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
384
11395
07c9d1115029 doveadm: mail commands can now be extended more easily by plugins.
Timo Sirainen <tss@iki.fi>
parents: 11342
diff changeset
385 if (doveadm_mail_iter_init(info, ctx->ctx.search_args,
07c9d1115029 doveadm: mail commands can now be extended more easily by plugins.
Timo Sirainen <tss@iki.fi>
parents: 11342
diff changeset
386 &trans, &iter) < 0)
11209
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
387 return -1;
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
388
11342
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
389 if (array_count(&ctx->header_fields) > 1) {
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
390 headers = mailbox_header_lookup_init(
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
391 mailbox_transaction_get_mailbox(trans),
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
392 array_idx(&ctx->header_fields, 0));
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
393 }
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
394 mail = mail_alloc(trans, ctx->wanted_fields, headers);
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
395 if (headers != NULL)
b43d6d2ef2fb doveadm fetch: Added support for hdr.<name> field.
Timo Sirainen <tss@iki.fi>
parents: 11337
diff changeset
396 mailbox_header_lookup_unref(&headers);
11209
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
397 while (doveadm_mail_iter_next(iter, mail)) {
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
398 str_truncate(ctx->hdr, 0);
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
399 str_append(ctx->hdr, ctx->prefix);
11147
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
400
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
401 ctx->mail = mail;
11209
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
402 cmd_fetch_mail(ctx);
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
403 ctx->mail = NULL;
11147
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
404 }
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
405 mail_free(&mail);
11209
c7cb58f1d2c6 doveadm: Removed more code duplication from altmove/fetch commands.
Timo Sirainen <tss@iki.fi>
parents: 11208
diff changeset
406 return doveadm_mail_iter_deinit(&iter);
11147
51eea5bb3336 doveadm: Added initial code for fetch command.
Timo Sirainen <tss@iki.fi>
parents:
diff changeset
407 }
11205
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
408
11236
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
409 static bool search_args_have_unique_fetch(struct mail_search_args *args)
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
410 {
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
411 struct mail_search_arg *arg;
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
412 const struct seq_range *seqset;
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
413 unsigned int count;
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
414 bool have_mailbox = FALSE, have_msg = FALSE;
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
415
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
416 for (arg = args->args; arg != NULL; arg = arg->next) {
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
417 switch (arg->type) {
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
418 case SEARCH_MAILBOX:
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
419 case SEARCH_MAILBOX_GUID:
11239
b9efc1ca4c37 doveadm fetch/search/etc: Handle "NOT" correctly in search query.
Timo Sirainen <tss@iki.fi>
parents: 11237
diff changeset
420 if (!arg->not)
b9efc1ca4c37 doveadm fetch/search/etc: Handle "NOT" correctly in search query.
Timo Sirainen <tss@iki.fi>
parents: 11237
diff changeset
421 have_mailbox = TRUE;
11236
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
422 break;
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
423 case SEARCH_SEQSET:
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
424 case SEARCH_UIDSET:
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
425 seqset = array_get(&arg->value.seqset, &count);
11239
b9efc1ca4c37 doveadm fetch/search/etc: Handle "NOT" correctly in search query.
Timo Sirainen <tss@iki.fi>
parents: 11237
diff changeset
426 if (count == 1 && seqset->seq1 == seqset->seq2 &&
b9efc1ca4c37 doveadm fetch/search/etc: Handle "NOT" correctly in search query.
Timo Sirainen <tss@iki.fi>
parents: 11237
diff changeset
427 !arg->not)
11236
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
428 have_msg = TRUE;
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
429 break;
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
430 default:
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
431 break;
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
432 }
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
433 }
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
434 return have_mailbox && have_msg;
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
435 }
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
436
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
437 static void
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
438 cmd_fetch_run(struct doveadm_mail_cmd_context *_ctx, struct mail_user *user)
11205
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
439 {
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
440 struct fetch_cmd_context *ctx = (struct fetch_cmd_context *)_ctx;
11205
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
441 const enum mailbox_list_iter_flags iter_flags =
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
442 MAILBOX_LIST_ITER_VIRTUAL_NAMES |
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
443 MAILBOX_LIST_ITER_NO_AUTO_INBOX |
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
444 MAILBOX_LIST_ITER_RETURN_NO_FLAGS;
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
445 struct doveadm_mail_list_iter *iter;
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
446 const struct mailbox_info *info;
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
447
11395
07c9d1115029 doveadm: mail commands can now be extended more easily by plugins.
Timo Sirainen <tss@iki.fi>
parents: 11342
diff changeset
448 iter = doveadm_mail_list_iter_init(user, _ctx->search_args, iter_flags);
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
449 while ((info = doveadm_mail_list_iter_next(iter)) != NULL) T_BEGIN {
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
450 (void)cmd_fetch_box(ctx, info);
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
451 } T_END;
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
452 doveadm_mail_list_iter_deinit(&iter);
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
453 }
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
454
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
455 static void cmd_fetch_deinit(struct doveadm_mail_cmd_context *_ctx)
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
456 {
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
457 struct fetch_cmd_context *ctx = (struct fetch_cmd_context *)_ctx;
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
458
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
459 o_stream_unref(&ctx->output);
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
460 str_free(&ctx->hdr);
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
461 }
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
462
11294
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
463 static void cmd_fetch_init(struct doveadm_mail_cmd_context *_ctx,
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
464 const char *const args[])
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
465 {
11294
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
466 struct fetch_cmd_context *ctx = (struct fetch_cmd_context *)_ctx;
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
467 const char *fetch_fields = args[0];
11205
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
468 unsigned char prefix_buf[9];
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
469
11206
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
470 if (fetch_fields == NULL || args[1] == NULL)
c8981561c5f2 doveadm fetch: Added "fields to fetch" parameter.
Timo Sirainen <tss@iki.fi>
parents: 11205
diff changeset
471 doveadm_mail_help_name("fetch");
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
472
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
473 parse_fetch_fields(ctx, fetch_fields);
11395
07c9d1115029 doveadm: mail commands can now be extended more easily by plugins.
Timo Sirainen <tss@iki.fi>
parents: 11342
diff changeset
474 _ctx->search_args = doveadm_mail_build_search_args(args + 1);
11205
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
475
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
476 ctx->output = o_stream_create_fd(STDOUT_FILENO, 0, FALSE);
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
477 ctx->hdr = str_new(default_pool, 512);
11395
07c9d1115029 doveadm: mail commands can now be extended more easily by plugins.
Timo Sirainen <tss@iki.fi>
parents: 11342
diff changeset
478 if (search_args_have_unique_fetch(_ctx->search_args))
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
479 ctx->prefix = "";
11236
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
480 else {
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
481 random_fill_weak(prefix_buf, sizeof(prefix_buf));
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
482 str_append(ctx->hdr, "===");
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
483 base64_encode(prefix_buf, sizeof(prefix_buf), ctx->hdr);
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
484 str_append_c(ctx->hdr, '\n');
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
485 ctx->prefix = t_strdup(str_c(ctx->hdr));
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
486 str_truncate(ctx->hdr, 0);
11236
47d49b7edb4b doveadm fetch: Don't print mail separator if fetching only a specific mail.
Timo Sirainen <tss@iki.fi>
parents: 11233
diff changeset
487 }
11294
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
488 }
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
489
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
490 static struct doveadm_mail_cmd_context *cmd_fetch_alloc(void)
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
491 {
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
492 struct fetch_cmd_context *ctx;
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
493
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
494 ctx = doveadm_mail_cmd_alloc(struct fetch_cmd_context);
11395
07c9d1115029 doveadm: mail commands can now be extended more easily by plugins.
Timo Sirainen <tss@iki.fi>
parents: 11342
diff changeset
495 ctx->ctx.v.init = cmd_fetch_init;
07c9d1115029 doveadm: mail commands can now be extended more easily by plugins.
Timo Sirainen <tss@iki.fi>
parents: 11342
diff changeset
496 ctx->ctx.v.run = cmd_fetch_run;
07c9d1115029 doveadm: mail commands can now be extended more easily by plugins.
Timo Sirainen <tss@iki.fi>
parents: 11342
diff changeset
497 ctx->ctx.v.deinit = cmd_fetch_deinit;
11247
f05909834219 doveadm: Changed mail command handler API.
Timo Sirainen <tss@iki.fi>
parents: 11239
diff changeset
498 return &ctx->ctx;
11205
dab4fb9f8140 doveadm fetch: Added support for fetching mails from multiple mailboxes.
Timo Sirainen <tss@iki.fi>
parents: 11175
diff changeset
499 }
11294
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
500
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
501 struct doveadm_mail_cmd cmd_fetch = {
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
502 cmd_fetch_alloc, "fetch", "<fields> <search query>"
0c9db163d538 doveadm: Changed mail command API to be more easily extensible.
Timo Sirainen <tss@iki.fi>
parents: 11247
diff changeset
503 };