dovecot/original-hg/dovecot-1.2: src/imap/imap-fetch.c annotate

annotate src/imap/imap-fetch.c @ 1845:bd8b6ed35327 HEAD

Removed fetch_init/fetch_next from mail-storage. search_* makes it unnecessary

author	Timo Sirainen <tss@iki.fi>
date	Sun, 26 Oct 2003 22:13:15 +0200
parents	b730eeca8861
children	79790750c349

rev	line source
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	1 /* Copyright (C) 2002 Timo Sirainen */
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	2
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	3 #include "common.h"
1672 8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	4 #include "buffer.h"
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	5 #include "istream.h"
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	6 #include "ostream.h"
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	7 #include "str.h"
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	8 #include "message-send.h"
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	9 #include "message-size.h"
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	10 #include "imap-date.h"
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	11 #include "commands.h"
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	12 #include "imap-fetch.h"
1845 bd8b6ed35327 Removed fetch_init/fetch_next from mail-storage. search_* makes it Timo Sirainen <tss@iki.fi> parents: 1837 diff changeset	13 #include "imap-search.h"
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	14
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	15 #include <unistd.h>
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	16
1672 8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	17 const char const imap_fetch_get_body_fields(const char *fields)
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	18 {
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	19 const char field_list, field, **dest;
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	20
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	21 while (*fields == ' ')
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	22 fields++;
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	23 if (*fields == '(')
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	24 fields++;
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	25
1837 b730eeca8861 Don't request empty headers Timo Sirainen <tss@iki.fi> parents: 1820 diff changeset	26 field_list = t_strsplit_spaces(t_strcut(fields, ')'), " ");
1672 8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	27
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	28 /* array ends at ")" element */
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	29 for (field = dest = field_list; *field != NULL; field++) {
1820 02bc3ef29b22 Added t_strsplit_spaces(). Timo Sirainen <tss@iki.fi> parents: 1808 diff changeset	30 dest = field;
02bc3ef29b22 Added t_strsplit_spaces(). Timo Sirainen <tss@iki.fi> parents: 1808 diff changeset	31 dest++;
1672 8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	32 }
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	33 *dest = NULL;
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	34
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	35 return field_list;
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	36 }
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	37
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	38 static void fetch_uid(struct imap_fetch_context ctx, struct mail mail)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	39 {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	40 str_printfa(ctx->str, "UID %u ", mail->uid);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	41 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	42
1638 e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	43 static int fetch_flags(struct imap_fetch_context ctx, struct mail mail,
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	44 const struct mail_full_flags *flags)
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	45 {
1638 e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	46 if (flags == NULL) {
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	47 flags = mail->get_flags(mail);
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	48 if (flags == NULL)
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	49 return FALSE;
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	50 }
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	51
1638 e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	52 str_printfa(ctx->str, "FLAGS (%s) ", imap_write_flags(flags));
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	53 return TRUE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	54 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	55
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	56 static int fetch_internaldate(struct imap_fetch_context ctx, struct mail mail)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	57 {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	58 time_t time;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	59
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	60 time = mail->get_received_date(mail);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	61 if (time == (time_t)-1)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	62 return FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	63
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	64 str_printfa(ctx->str, "INTERNALDATE \"%s\" ", imap_to_datetime(time));
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	65 return TRUE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	66 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	67
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	68 static int fetch_rfc822_size(struct imap_fetch_context ctx, struct mail mail)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	69 {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	70 uoff_t size;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	71
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	72 size = mail->get_size(mail);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	73 if (size == (uoff_t)-1)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	74 return FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	75
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	76 str_printfa(ctx->str, "RFC822.SIZE %"PRIuUOFF_T" ", size);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	77 return TRUE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	78 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	79
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	80 static int fetch_body(struct imap_fetch_context ctx, struct mail mail)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	81 {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	82 const char *body;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	83
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	84 body = mail->get_special(mail, MAIL_FETCH_IMAP_BODY);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	85 if (body == NULL)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	86 return FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	87
1764 fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	88 if (ctx->first) {
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	89 if (o_stream_send_str(ctx->output, "BODY (") < 0)
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	90 return FALSE;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	91 ctx->first = FALSE;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	92 } else {
1766 53e06e33393f Missing spaces in ENVELOPE, BODY and BODYSTRUCTURE replies. Timo Sirainen <tss@iki.fi> parents: 1764 diff changeset	93 if (o_stream_send_str(ctx->output, " BODY (") < 0)
1764 fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	94 return FALSE;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	95 }
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	96
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	97 if (o_stream_send_str(ctx->output, body) < 0)
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	98 return FALSE;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	99
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	100 if (o_stream_send(ctx->output, ")", 1) < 0)
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	101 return FALSE;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	102 return TRUE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	103 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	104
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	105 static int fetch_bodystructure(struct imap_fetch_context *ctx,
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	106 struct mail *mail)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	107 {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	108 const char *bodystructure;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	109
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	110 bodystructure = mail->get_special(mail, MAIL_FETCH_IMAP_BODYSTRUCTURE);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	111 if (bodystructure == NULL)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	112 return FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	113
1764 fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	114 if (ctx->first) {
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	115 if (o_stream_send_str(ctx->output, "BODYSTRUCTURE (") < 0)
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	116 return FALSE;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	117 ctx->first = FALSE;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	118 } else {
1766 53e06e33393f Missing spaces in ENVELOPE, BODY and BODYSTRUCTURE replies. Timo Sirainen <tss@iki.fi> parents: 1764 diff changeset	119 if (o_stream_send_str(ctx->output, " BODYSTRUCTURE (") < 0)
1764 fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	120 return FALSE;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	121 }
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	122
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	123 if (o_stream_send_str(ctx->output, bodystructure) < 0)
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	124 return FALSE;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	125
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	126 if (o_stream_send(ctx->output, ")", 1) < 0)
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	127 return FALSE;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	128 return TRUE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	129 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	130
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	131 static int fetch_envelope(struct imap_fetch_context ctx, struct mail mail)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	132 {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	133 const char *envelope;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	134
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	135 envelope = mail->get_special(mail, MAIL_FETCH_IMAP_ENVELOPE);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	136 if (envelope == NULL)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	137 return FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	138
1764 fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	139 if (ctx->first) {
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	140 if (o_stream_send_str(ctx->output, "ENVELOPE (") < 0)
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	141 return FALSE;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	142 ctx->first = FALSE;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	143 } else {
1766 53e06e33393f Missing spaces in ENVELOPE, BODY and BODYSTRUCTURE replies. Timo Sirainen <tss@iki.fi> parents: 1764 diff changeset	144 if (o_stream_send_str(ctx->output, " ENVELOPE (") < 0)
1764 fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	145 return FALSE;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	146 }
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	147
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	148 if (o_stream_send_str(ctx->output, envelope) < 0)
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	149 return FALSE;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	150
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	151 if (o_stream_send(ctx->output, ")", 1) < 0)
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	152 return FALSE;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	153 return TRUE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	154 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	155
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	156 static int fetch_send_rfc822(struct imap_fetch_context ctx, struct mail mail)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	157 {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	158 struct message_size hdr_size, body_size;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	159 struct istream *stream;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	160 const char *str;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	161
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	162 stream = mail->get_stream(mail, &hdr_size, &body_size);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	163 if (stream == NULL)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	164 return FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	165
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	166 message_size_add(&body_size, &hdr_size);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	167
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	168 str = t_strdup_printf(" RFC822 {%"PRIuUOFF_T"}\r\n",
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	169 body_size.virtual_size);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	170 if (ctx->first) {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	171 str++; ctx->first = FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	172 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	173 if (o_stream_send_str(ctx->output, str) < 0)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	174 return FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	175
991 21788a1e9e39 Partial fetches are working fast again - faster than ever actually. Timo Sirainen <tss@iki.fi> parents: 988 diff changeset	176 return message_send(ctx->output, stream, &body_size,
1808 36d0e23dc231 BODY[HEADER] and RFC822.HEADER fetching was broken (why did it work before?..) Timo Sirainen <tss@iki.fi> parents: 1782 diff changeset	177 0, body_size.virtual_size, NULL,
36d0e23dc231 BODY[HEADER] and RFC822.HEADER fetching was broken (why did it work before?..) Timo Sirainen <tss@iki.fi> parents: 1782 diff changeset	178 !mail->has_no_nuls) >= 0;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	179 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	180
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	181 static int fetch_send_rfc822_header(struct imap_fetch_context *ctx,
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	182 struct mail *mail)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	183 {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	184 struct message_size hdr_size;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	185 struct istream *stream;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	186 const char *str;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	187
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	188 stream = mail->get_stream(mail, &hdr_size, NULL);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	189 if (stream == NULL)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	190 return FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	191
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	192 str = t_strdup_printf(" RFC822.HEADER {%"PRIuUOFF_T"}\r\n",
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	193 hdr_size.virtual_size);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	194 if (ctx->first) {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	195 str++; ctx->first = FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	196 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	197 if (o_stream_send_str(ctx->output, str) < 0)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	198 return FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	199
1391 e0dbaabbc22b Partial fetches were broken when they stopped between virtual CR and LF. Timo Sirainen <tss@iki.fi> parents: 996 diff changeset	200 return message_send(ctx->output, stream, &hdr_size,
1808 36d0e23dc231 BODY[HEADER] and RFC822.HEADER fetching was broken (why did it work before?..) Timo Sirainen <tss@iki.fi> parents: 1782 diff changeset	201 0, hdr_size.virtual_size, NULL,
36d0e23dc231 BODY[HEADER] and RFC822.HEADER fetching was broken (why did it work before?..) Timo Sirainen <tss@iki.fi> parents: 1782 diff changeset	202 !mail->has_no_nuls) >= 0;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	203 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	204
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	205 static int fetch_send_rfc822_text(struct imap_fetch_context *ctx,
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	206 struct mail *mail)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	207 {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	208 struct message_size hdr_size, body_size;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	209 struct istream *stream;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	210 const char *str;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	211
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	212 stream = mail->get_stream(mail, &hdr_size, &body_size);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	213 if (stream == NULL)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	214 return FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	215
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	216 str = t_strdup_printf(" RFC822.TEXT {%"PRIuUOFF_T"}\r\n",
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	217 body_size.virtual_size);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	218 if (ctx->first) {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	219 str++; ctx->first = FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	220 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	221 if (o_stream_send_str(ctx->output, str) < 0)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	222 return FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	223
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	224 i_stream_seek(stream, hdr_size.physical_size);
991 21788a1e9e39 Partial fetches are working fast again - faster than ever actually. Timo Sirainen <tss@iki.fi> parents: 988 diff changeset	225 return message_send(ctx->output, stream, &body_size,
1808 36d0e23dc231 BODY[HEADER] and RFC822.HEADER fetching was broken (why did it work before?..) Timo Sirainen <tss@iki.fi> parents: 1782 diff changeset	226 0, body_size.virtual_size, NULL,
36d0e23dc231 BODY[HEADER] and RFC822.HEADER fetching was broken (why did it work before?..) Timo Sirainen <tss@iki.fi> parents: 1782 diff changeset	227 !mail->has_no_nuls) >= 0;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	228 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	229
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	230 static int fetch_mail(struct imap_fetch_context ctx, struct mail mail)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	231 {
1638 e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	232 const struct mail_full_flags *flags;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	233 struct imap_fetch_body_data *body;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	234 size_t len, orig_len;
1638 e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	235 int failed, data_written, seen_updated = FALSE;
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	236
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	237 if (!ctx->update_seen)
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	238 flags = NULL;
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	239 else {
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	240 flags = mail->get_flags(mail);
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	241 if (flags == NULL)
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	242 return FALSE;
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	243
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	244 if ((flags->flags & MAIL_SEEN) == 0) {
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	245 if (!mail->update_flags(mail, &ctx->seen_flag,
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	246 MODIFY_ADD))
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	247 return FALSE;
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	248
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	249 flags = NULL; /* \Seen won't update automatically */
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	250 seen_updated = TRUE;
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	251 }
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	252 }
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	253
994 ab4091b2ddc2 FETCH ate too much memory Timo Sirainen <tss@iki.fi> parents: 991 diff changeset	254 t_push();
ab4091b2ddc2 FETCH ate too much memory Timo Sirainen <tss@iki.fi> parents: 991 diff changeset	255
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	256 str_truncate(ctx->str, 0);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	257 str_printfa(ctx->str, "* %u FETCH (", mail->seq);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	258 orig_len = str_len(ctx->str);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	259
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	260 failed = TRUE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	261 data_written = FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	262 do {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	263 /* write the data into temp string */
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	264 if (ctx->imap_data & IMAP_FETCH_UID)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	265 fetch_uid(ctx, mail);
1638 e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	266 if ((ctx->fetch_data & MAIL_FETCH_FLAGS) \|\| seen_updated)
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	267 if (!fetch_flags(ctx, mail, flags))
994 ab4091b2ddc2 FETCH ate too much memory Timo Sirainen <tss@iki.fi> parents: 991 diff changeset	268 break;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	269 if (ctx->fetch_data & MAIL_FETCH_RECEIVED_DATE)
994 ab4091b2ddc2 FETCH ate too much memory Timo Sirainen <tss@iki.fi> parents: 991 diff changeset	270 if (!fetch_internaldate(ctx, mail))
ab4091b2ddc2 FETCH ate too much memory Timo Sirainen <tss@iki.fi> parents: 991 diff changeset	271 break;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	272 if (ctx->fetch_data & MAIL_FETCH_SIZE)
994 ab4091b2ddc2 FETCH ate too much memory Timo Sirainen <tss@iki.fi> parents: 991 diff changeset	273 if (!fetch_rfc822_size(ctx, mail))
ab4091b2ddc2 FETCH ate too much memory Timo Sirainen <tss@iki.fi> parents: 991 diff changeset	274 break;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	275
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	276 /* send the data written into temp string */
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	277 len = str_len(ctx->str);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	278 ctx->first = len == orig_len;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	279
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	280 if (!ctx->first)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	281 str_truncate(ctx->str, --len);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	282 if (o_stream_send(ctx->output, str_data(ctx->str), len) < 0)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	283 break;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	284
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	285 data_written = TRUE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	286
1764 fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	287 /* medium size data .. seems to be faster without
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	288 putting through string */
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	289 if (ctx->fetch_data & MAIL_FETCH_IMAP_BODY)
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	290 if (!fetch_body(ctx, mail))
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	291 break;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	292 if (ctx->fetch_data & MAIL_FETCH_IMAP_BODYSTRUCTURE)
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	293 if (!fetch_bodystructure(ctx, mail))
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	294 break;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	295 if (ctx->fetch_data & MAIL_FETCH_IMAP_ENVELOPE)
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	296 if(!fetch_envelope(ctx, mail))
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	297 break;
fbb28b07c60f Write envelope, body and bodystructure directly into output stream. Timo Sirainen <tss@iki.fi> parents: 1672 diff changeset	298
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	299 /* large data */
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	300 if (ctx->imap_data & IMAP_FETCH_RFC822)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	301 if (!fetch_send_rfc822(ctx, mail))
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	302 break;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	303 if (ctx->imap_data & IMAP_FETCH_RFC822_HEADER)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	304 if (!fetch_send_rfc822_header(ctx, mail))
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	305 break;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	306 if (ctx->imap_data & IMAP_FETCH_RFC822_TEXT)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	307 if (!fetch_send_rfc822_text(ctx, mail))
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	308 break;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	309
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	310 for (body = ctx->bodies; body != NULL; body = body->next) {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	311 if (!imap_fetch_body_section(ctx, body, mail))
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	312 break;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	313 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	314
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	315 failed = FALSE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	316 } while (0);
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	317
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	318 if (data_written) {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	319 if (o_stream_send(ctx->output, ")\r\n", 3) < 0)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	320 failed = TRUE;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	321 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	322
994 ab4091b2ddc2 FETCH ate too much memory Timo Sirainen <tss@iki.fi> parents: 991 diff changeset	323 t_pop();
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	324 return !failed;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	325 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	326
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	327 int imap_fetch(struct client *client,
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	328 enum mail_fetch_field fetch_data,
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	329 enum imap_fetch_field imap_data,
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	330 struct imap_fetch_body_data *bodies,
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	331 const char *messageset, int uidset)
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	332 {
1639 3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	333 struct mailbox *box = client->mailbox;
1845 bd8b6ed35327 Removed fetch_init/fetch_next from mail-storage. search_* makes it Timo Sirainen <tss@iki.fi> parents: 1837 diff changeset	334 struct mail_search_arg *search_arg;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	335 struct imap_fetch_context ctx;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	336 struct mail *mail;
1672 8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	337 struct imap_fetch_body_data *body;
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	338 const char *null = NULL;
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	339 const char const wanted_headers, const arr;
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	340 buffer_t *buffer;
1638 e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	341 int all_found;
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	342
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	343 memset(&ctx, 0, sizeof(ctx));
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	344 ctx.fetch_data = fetch_data;
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	345 ctx.imap_data = imap_data;
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	346 ctx.bodies = bodies;
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	347 ctx.output = client->output;
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	348 ctx.select_counter = client->select_counter;
e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	349 ctx.seen_flag.flags = MAIL_SEEN;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	350
1642 72c6e848f583 API changes: Don't keep variables in mailbox class. Timo Sirainen <tss@iki.fi> parents: 1639 diff changeset	351 if (!box->is_readonly(box)) {
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	352 /* If we have any BODY[..] sections, \Seen flag is added for
1672 8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	353 all messages. */
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	354 for (body = bodies; body != NULL; body = body->next) {
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	355 if (!body->peek) {
1638 e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	356 ctx.update_seen = TRUE;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	357 break;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	358 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	359 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	360
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	361 if (imap_data & (IMAP_FETCH_RFC822\|IMAP_FETCH_RFC822_TEXT))
1638 e95c0e462591 API change for updating message flags. Timo Sirainen <tss@iki.fi> parents: 1534 diff changeset	362 ctx.update_seen = TRUE;
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	363 }
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	364
1672 8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	365 /* If we have only BODY[HEADER.FIELDS (...)] fetches, get them
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	366 separately rather than parsing the full header so mail storage
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	367 can try to cache them. */
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	368 ctx.body_fetch_from_cache = TRUE;
1782 2f3d906d99d8 data_stack_pool split into two: unsafe_data_stack_pool which works like Timo Sirainen <tss@iki.fi> parents: 1766 diff changeset	369 buffer = buffer_create_dynamic(pool_datastack_create(), 64, (size_t)-1);
1672 8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	370 for (body = bodies; body != NULL; body = body->next) {
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	371 if (strncmp(body->section, "HEADER.FIELDS ", 14) != 0) {
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	372 ctx.body_fetch_from_cache = FALSE;
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	373 break;
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	374 }
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	375
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	376 arr = imap_fetch_get_body_fields(body->section + 14);
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	377 while (*arr != NULL) {
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	378 buffer_append(buffer, arr, sizeof(*arr));
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	379 arr++;
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	380 }
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	381 }
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	382 buffer_append(buffer, &null, sizeof(null));
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	383 wanted_headers = !ctx.body_fetch_from_cache ? NULL :
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	384 buffer_get_data(buffer, NULL);
8920600a8cfc Index cache file rewrite. It's not finished yet and mbox support is Timo Sirainen <tss@iki.fi> parents: 1642 diff changeset	385
1639 3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	386 if (ctx.update_seen) {
3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	387 if (!box->lock(box, MAILBOX_LOCK_FLAGS \| MAILBOX_LOCK_READ))
3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	388 return -1;
3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	389 }
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	390
1845 bd8b6ed35327 Removed fetch_init/fetch_next from mail-storage. search_* makes it Timo Sirainen <tss@iki.fi> parents: 1837 diff changeset	391 search_arg = imap_search_get_msgset_arg(messageset, uidset);
bd8b6ed35327 Removed fetch_init/fetch_next from mail-storage. search_* makes it Timo Sirainen <tss@iki.fi> parents: 1837 diff changeset	392 ctx.search_ctx = box->search_init(box, NULL, search_arg, NULL,
bd8b6ed35327 Removed fetch_init/fetch_next from mail-storage. search_* makes it Timo Sirainen <tss@iki.fi> parents: 1837 diff changeset	393 fetch_data, wanted_headers);
bd8b6ed35327 Removed fetch_init/fetch_next from mail-storage. search_* makes it Timo Sirainen <tss@iki.fi> parents: 1837 diff changeset	394 if (ctx.search_ctx == NULL)
1639 3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	395 ctx.failed = TRUE;
3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	396 else {
3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	397 ctx.str = str_new(default_pool, 8192);
1845 bd8b6ed35327 Removed fetch_init/fetch_next from mail-storage. search_* makes it Timo Sirainen <tss@iki.fi> parents: 1837 diff changeset	398 while ((mail = box->search_next(ctx.search_ctx)) != NULL) {
1639 3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	399 if (!fetch_mail(&ctx, mail)) {
3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	400 ctx.failed = TRUE;
3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	401 break;
3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	402 }
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	403 }
1639 3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	404 str_free(ctx.str);
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	405
1845 bd8b6ed35327 Removed fetch_init/fetch_next from mail-storage. search_* makes it Timo Sirainen <tss@iki.fi> parents: 1837 diff changeset	406 if (!box->search_deinit(ctx.search_ctx, &all_found))
1639 3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	407 ctx.failed = TRUE;
3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	408 }
3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	409
3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	410 (void)box->lock(box, MAILBOX_LOCK_UNLOCK);
3621292209f4 Explicit lock() method for mailbox. Timo Sirainen <tss@iki.fi> parents: 1638 diff changeset	411
988 8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	412 return ctx.failed ? -1 : all_found;
8028c4dcf38f mail-storage.h interface changes, affects pretty much everything. Timo Sirainen <tss@iki.fi> parents: diff changeset	413 }

Mercurial > dovecot > original-hg > dovecot-1.2

annotate src/imap/imap-fetch.c @ 1845:bd8b6ed35327 HEAD