615b19df4b90e219c2f1dfd10184effe5d8678bd
[claws.git] / src / common / smtp.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2012 Hiroyuki Yamamoto and the Claws Mail team
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 3 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program. If not, see <http://www.gnu.org/licenses/>.
17  * 
18  */
19
20 #ifdef HAVE_CONFIG_H
21 #  include "config.h"
22 #include "claws-features.h"
23 #endif
24
25 #include <glib.h>
26 #ifdef ENABLE_NLS
27 #include <glib/gi18n.h>
28 #else
29 #define _(a) (a)
30 #define N_(a) (a)
31 #endif
32 #include <stdio.h>
33 #include <string.h>
34
35 #include "smtp.h"
36 #include "md5.h"
37 #include "utils.h"
38 #include "log.h"
39
40 static void smtp_session_destroy(Session *session);
41
42 static gint smtp_auth(SMTPSession *session);
43 #ifdef USE_GNUTLS
44 static gint smtp_starttls(SMTPSession *session);
45 #endif
46 static gint smtp_auth_cram_md5(SMTPSession *session);
47 static gint smtp_auth_login(SMTPSession *session);
48 static gint smtp_auth_plain(SMTPSession *session);
49
50 static gint smtp_ehlo(SMTPSession *session);
51 static gint smtp_ehlo_recv(SMTPSession *session, const gchar *msg);
52
53 static gint smtp_helo(SMTPSession *session);
54 static gint smtp_rcpt(SMTPSession *session);
55 static gint smtp_data(SMTPSession *session);
56 static gint smtp_send_data(SMTPSession *session);
57 static gint smtp_make_ready(SMTPSession *session);
58 static gint smtp_eom(SMTPSession *session);
59
60 static gint smtp_session_recv_msg(Session *session, const gchar *msg);
61 static gint smtp_session_send_data_finished(Session *session, guint len);
62
63
64 Session *smtp_session_new(void *prefs_account)
65 {
66         SMTPSession *session;
67
68         session = g_new0(SMTPSession, 1);
69
70         session_init(SESSION(session), prefs_account, TRUE);
71
72         SESSION(session)->type             = SESSION_SMTP;
73
74         SESSION(session)->recv_msg         = smtp_session_recv_msg;
75
76         SESSION(session)->recv_data_finished = NULL;
77         SESSION(session)->send_data_finished = smtp_session_send_data_finished;
78
79         SESSION(session)->destroy          = smtp_session_destroy;
80
81         session->state                     = SMTP_READY;
82
83 #ifdef USE_GNUTLS
84         session->tls_init_done             = FALSE;
85 #endif
86
87         session->hostname                  = NULL;
88         session->user                      = NULL;
89         session->pass                      = NULL;
90
91         session->from                      = NULL;
92         session->to_list                   = NULL;
93         session->cur_to                    = NULL;
94
95         session->send_data                 = NULL;
96         session->send_data_len             = 0;
97
98         session->max_message_size          = -1;
99
100         session->avail_auth_type           = 0;
101         session->forced_auth_type          = 0;
102         session->auth_type                 = 0;
103         session->esmtp_flags               = 0;
104
105         session->error_val                 = SM_OK;
106         session->error_msg                 = NULL;
107
108         return SESSION(session);
109 }
110
111 static void smtp_session_destroy(Session *session)
112 {
113         SMTPSession *smtp_session = SMTP_SESSION(session);
114
115         g_free(smtp_session->hostname);
116         g_free(smtp_session->user);
117         g_free(smtp_session->pass);
118         g_free(smtp_session->from);
119
120         g_free(smtp_session->send_data);
121
122         g_free(smtp_session->error_msg);
123 }
124
125 gint smtp_from(SMTPSession *session)
126 {
127         gchar buf[MESSAGEBUFSIZE];
128         gchar *mail_size = NULL;
129
130         cm_return_val_if_fail(session->from != NULL, SM_ERROR);
131
132         session->state = SMTP_FROM;
133         
134         if (session->is_esmtp && (session->esmtp_flags & ESMTP_SIZE)!=0)
135                 mail_size = g_strdup_printf(" SIZE=%d", session->send_data_len);
136         else
137                 mail_size = g_strdup("");
138                 
139
140         if (strchr(session->from, '<'))
141                 g_snprintf(buf, sizeof(buf), "MAIL FROM:%s%s", session->from,
142                            mail_size);
143         else
144                 g_snprintf(buf, sizeof(buf), "MAIL FROM:<%s>%s", session->from,
145                            mail_size);
146
147         g_free(mail_size);
148
149         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL, buf) < 0)
150                 return SM_ERROR;
151         log_print(LOG_PROTOCOL, "%sSMTP> %s\n", (session->is_esmtp?"E":""), buf);
152
153         return SM_OK;
154 }
155
156 static gint smtp_auth(SMTPSession *session)
157 {
158
159         cm_return_val_if_fail(session->user != NULL, SM_ERROR);
160
161         session->state = SMTP_AUTH;
162
163         if ((session->forced_auth_type == SMTPAUTH_CRAM_MD5
164              || session->forced_auth_type == 0)
165             &&
166              (session->avail_auth_type & SMTPAUTH_CRAM_MD5) != 0)
167                 smtp_auth_cram_md5(session);
168         else if ((session->forced_auth_type == SMTPAUTH_LOGIN
169                   || session->forced_auth_type == 0)
170                  &&
171                   (session->avail_auth_type & SMTPAUTH_LOGIN) != 0)
172                 smtp_auth_login(session);
173         else if ((session->forced_auth_type == SMTPAUTH_PLAIN
174                   || session->forced_auth_type == 0)
175                  &&
176                   (session->avail_auth_type & SMTPAUTH_PLAIN) != 0)
177                 smtp_auth_plain(session);
178         else if (session->forced_auth_type == 0) {
179                 log_warning(LOG_PROTOCOL, _("No SMTP AUTH method available\n"));
180                 return SM_AUTHFAIL;
181         } else {
182                 log_warning(LOG_PROTOCOL, _("Selected SMTP AUTH method not available\n"));
183                 return SM_AUTHFAIL;
184         }
185
186         return SM_OK;
187 }
188
189 static gint smtp_auth_recv(SMTPSession *session, const gchar *msg)
190 {
191         gchar buf[MESSAGEBUFSIZE], *tmp;
192
193         switch (session->auth_type) {
194         case SMTPAUTH_LOGIN:
195                 session->state = SMTP_AUTH_LOGIN_USER;
196
197                 if (!strncmp(msg, "334 ", 4)) {
198                         tmp = g_base64_encode(session->user, strlen(session->user));
199
200                         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL,
201                                          tmp) < 0) {
202                                 g_free(tmp);
203                                 return SM_ERROR;
204                         }
205                         g_free(tmp);
206                         log_print(LOG_PROTOCOL, "ESMTP> [USERID]\n");
207                 } else {
208                         /* Server rejects AUTH */
209                         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL,
210                                          "*") < 0)
211                                 return SM_ERROR;
212                         log_print(LOG_PROTOCOL, "ESMTP> *\n");
213                 }
214                 break;
215         case SMTPAUTH_CRAM_MD5:
216                 session->state = SMTP_AUTH_CRAM_MD5;
217
218                 if (!strncmp(msg, "334 ", 4)) {
219                         gchar *response;
220                         gchar *response64;
221                         gchar *challenge, *tmp;
222                         gsize challengelen;
223                         guchar hexdigest[33];
224
225                         tmp = g_base64_decode(msg + 4, &challengelen);
226                         challenge = g_strndup(tmp, challengelen);
227                         g_free(tmp);
228                         log_print(LOG_PROTOCOL, "ESMTP< [Decoded: %s]\n", challenge);
229
230                         g_snprintf(buf, sizeof(buf), "%s", session->pass);
231                         md5_hex_hmac(hexdigest, challenge, challengelen,
232                                      buf, strlen(session->pass));
233                         g_free(challenge);
234
235                         response = g_strdup_printf
236                                 ("%s %s", session->user, hexdigest);
237                         log_print(LOG_PROTOCOL, "ESMTP> [Encoded: %s]\n", response);
238
239                         response64 = g_base64_encode(response, strlen(response));
240                         g_free(response);
241
242                         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL,
243                                          response64) < 0) {
244                                 g_free(response64);
245                                 return SM_ERROR;
246                         }
247                         log_print(LOG_PROTOCOL, "ESMTP> %s\n", response64);
248                         g_free(response64);
249                 } else {
250                         /* Server rejects AUTH */
251                         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL,
252                                          "*") < 0)
253                                 return SM_ERROR;
254                         log_print(LOG_PROTOCOL, "ESMTP> *\n");
255                 }
256                 break;
257         case SMTPAUTH_DIGEST_MD5:
258         default:
259                 /* stop smtp_auth when no correct authtype */
260                 if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL, "*") < 0)
261                         return SM_ERROR;
262                 log_print(LOG_PROTOCOL, "ESMTP> *\n");
263                 break;
264         }
265
266         return SM_OK;
267 }
268
269 static gint smtp_auth_login_user_recv(SMTPSession *session, const gchar *msg)
270 {
271         gchar *tmp;
272
273         session->state = SMTP_AUTH_LOGIN_PASS;
274
275         if (!strncmp(msg, "334 ", 4)) {
276                 tmp = g_base64_encode(session->pass, strlen(session->pass));
277         } else {
278                 /* Server rejects AUTH */
279                 tmp = g_strdup("*");
280         }
281
282         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL, tmp) < 0) {
283                 g_free(tmp);
284                 return SM_ERROR;
285         }
286         g_free(tmp);
287
288         log_print(LOG_PROTOCOL, "ESMTP> [PASSWORD]\n");
289
290         return SM_OK;
291 }
292
293 static gint smtp_ehlo(SMTPSession *session)
294 {
295         gchar buf[MESSAGEBUFSIZE];
296
297         session->state = SMTP_EHLO;
298
299         session->avail_auth_type = 0;
300
301         g_snprintf(buf, sizeof(buf), "EHLO %s",
302                    session->hostname ? session->hostname : get_domain_name());
303         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL, buf) < 0)
304                 return SM_ERROR;
305         log_print(LOG_PROTOCOL, "ESMTP> %s\n", buf);
306
307         return SM_OK;
308 }
309
310 static gint smtp_ehlo_recv(SMTPSession *session, const gchar *msg)
311 {
312         if (strncmp(msg, "250", 3) == 0) {
313                 const gchar *p = msg;
314                 p += 3;
315                 if (*p == '-' || *p == ' ') p++;
316                 if (g_ascii_strncasecmp(p, "AUTH", 4) == 0) {
317                         p += 5;
318                         if (strcasestr(p, "PLAIN"))
319                                 session->avail_auth_type |= SMTPAUTH_PLAIN;
320                         if (strcasestr(p, "LOGIN"))
321                                 session->avail_auth_type |= SMTPAUTH_LOGIN;
322                         if (strcasestr(p, "CRAM-MD5"))
323                                 session->avail_auth_type |= SMTPAUTH_CRAM_MD5;
324                         if (strcasestr(p, "DIGEST-MD5"))
325                                 session->avail_auth_type |= SMTPAUTH_DIGEST_MD5;
326                 }
327                 if (g_ascii_strncasecmp(p, "SIZE", 4) == 0) {
328                         p += 5;
329                         session->max_message_size = atoi(p);
330                         session->esmtp_flags |= ESMTP_SIZE;
331                 }
332                 if (g_ascii_strncasecmp(p, "STARTTLS", 8) == 0) {
333                         p += 9;
334                         session->avail_auth_type |= SMTPAUTH_TLS_AVAILABLE;
335                 }
336                 return SM_OK;
337         } else if ((msg[0] == '1' || msg[0] == '2' || msg[0] == '3') &&
338             (msg[3] == ' ' || msg[3] == '\0'))
339                 return SM_OK;
340         else if (msg[0] == '5' && msg[1] == '0' &&
341                  (msg[2] == '4' || msg[2] == '3' || msg[2] == '1'))
342                 return SM_ERROR;
343
344         return SM_ERROR;
345 }
346
347 #ifdef USE_GNUTLS
348 static gint smtp_starttls(SMTPSession *session)
349 {
350         session->state = SMTP_STARTTLS;
351
352         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL, "STARTTLS") < 0)
353                 return SM_ERROR;
354         log_print(LOG_PROTOCOL, "ESMTP> STARTTLS\n");
355
356         return SM_OK;
357 }
358 #endif
359
360 static gint smtp_auth_cram_md5(SMTPSession *session)
361 {
362         session->state = SMTP_AUTH;
363         session->auth_type = SMTPAUTH_CRAM_MD5;
364
365         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL, "AUTH CRAM-MD5") < 0)
366                 return SM_ERROR;
367         log_print(LOG_PROTOCOL, "ESMTP> AUTH CRAM-MD5\n");
368
369         return SM_OK;
370 }
371
372 static gint smtp_auth_plain(SMTPSession *session)
373 {
374         gchar buf[MESSAGEBUFSIZE], *b64buf, *out;
375         gint len;
376
377         session->state = SMTP_AUTH_PLAIN;
378         session->auth_type = SMTPAUTH_PLAIN;
379
380         memset(buf, 0, sizeof buf);
381
382         /* "\0user\0password" */
383         len = sprintf(buf, "%c%s%c%s", '\0', session->user, '\0', session->pass);
384         b64buf = g_base64_encode(buf, len);
385         out = g_strconcat("AUTH PLAIN ", b64buf, NULL);
386         g_free(b64buf);
387
388         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL, out) < 0) {
389                 g_free(out);
390                 return SM_ERROR;
391         }
392
393         g_free(out);
394
395         log_print(LOG_PROTOCOL, "ESMTP> [AUTH PLAIN]\n");
396
397         g_free(b64buf);
398
399         return SM_OK;
400 }
401
402 static gint smtp_auth_login(SMTPSession *session)
403 {
404         session->state = SMTP_AUTH;
405         session->auth_type = SMTPAUTH_LOGIN;
406
407         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL, "AUTH LOGIN") < 0)
408                 return SM_ERROR;
409         log_print(LOG_PROTOCOL, "ESMTP> AUTH LOGIN\n");
410
411         return SM_OK;
412 }
413
414 static gint smtp_helo(SMTPSession *session)
415 {
416         gchar buf[MESSAGEBUFSIZE];
417
418         session->state = SMTP_HELO;
419
420         g_snprintf(buf, sizeof(buf), "HELO %s",
421                    session->hostname ? session->hostname : get_domain_name());
422         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL, buf) < 0)
423                 return SM_ERROR;
424         log_print(LOG_PROTOCOL, "SMTP> %s\n", buf);
425
426         return SM_OK;
427 }
428
429 static gint smtp_rcpt(SMTPSession *session)
430 {
431         gchar buf[MESSAGEBUFSIZE];
432         gchar *to;
433
434         cm_return_val_if_fail(session->cur_to != NULL, SM_ERROR);
435
436         session->state = SMTP_RCPT;
437
438         to = (gchar *)session->cur_to->data;
439
440         if (strchr(to, '<'))
441                 g_snprintf(buf, sizeof(buf), "RCPT TO:%s", to);
442         else
443                 g_snprintf(buf, sizeof(buf), "RCPT TO:<%s>", to);
444         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL, buf) < 0)
445                 return SM_ERROR;
446         log_print(LOG_PROTOCOL, "SMTP> %s\n", buf);
447
448         session->cur_to = session->cur_to->next;
449
450         return SM_OK;
451 }
452
453 static gint smtp_data(SMTPSession *session)
454 {
455         session->state = SMTP_DATA;
456
457         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL, "DATA") < 0)
458                 return SM_ERROR;
459         log_print(LOG_PROTOCOL, "SMTP> DATA\n");
460
461         return SM_OK;
462 }
463
464 static gint smtp_send_data(SMTPSession *session)
465 {
466         session->state = SMTP_SEND_DATA;
467
468         session_send_data(SESSION(session), session->send_data,
469                           session->send_data_len);
470
471         return SM_OK;
472 }
473
474 static gint smtp_make_ready(SMTPSession *session)
475 {
476         session->state = SMTP_MAIL_SENT_OK;
477
478         return SM_OK;
479 }
480
481 gint smtp_quit(SMTPSession *session)
482 {
483         session->state = SMTP_QUIT;
484
485         session_send_msg(SESSION(session), SESSION_MSG_NORMAL, "QUIT");
486         log_print(LOG_PROTOCOL, "SMTP> QUIT\n");
487
488         return SM_OK;
489 }
490
491 static gint smtp_eom(SMTPSession *session)
492 {
493         session->state = SMTP_EOM;
494
495         if (session_send_msg(SESSION(session), SESSION_MSG_NORMAL, ".") < 0)
496                 return SM_ERROR;
497         log_print(LOG_PROTOCOL, "SMTP> . (EOM)\n");
498
499         return SM_OK;
500 }
501
502 static gint smtp_session_recv_msg(Session *session, const gchar *msg)
503 {
504         SMTPSession *smtp_session = SMTP_SESSION(session);
505         gboolean cont = FALSE;
506         gint ret = 0;
507         
508         if (strlen(msg) < 4) {
509                 log_warning(LOG_PROTOCOL, _("bad SMTP response\n"));
510                 return -1;
511         }
512
513         switch (smtp_session->state) {
514         case SMTP_EHLO:
515         case SMTP_STARTTLS:
516         case SMTP_AUTH:
517         case SMTP_AUTH_PLAIN:
518         case SMTP_AUTH_LOGIN_USER:
519         case SMTP_AUTH_LOGIN_PASS:
520         case SMTP_AUTH_CRAM_MD5:
521                 log_print(LOG_PROTOCOL, "ESMTP< %s\n", msg);
522                 break;
523         default:
524                 log_print(LOG_PROTOCOL, "SMTP< %s\n", msg);
525                 break;
526         }
527
528         /* ignore all multiline responses except for EHLO */
529         if (msg[3] == '-' && smtp_session->state != SMTP_EHLO)
530                 return session_recv_msg(session);
531
532         if (msg[0] == '5' && msg[1] == '0' &&
533             (msg[2] == '4' || msg[2] == '3' || msg[2] == '1')) {
534                 log_warning(LOG_PROTOCOL, _("error occurred on SMTP session\n"));
535                 smtp_session->state = SMTP_ERROR;
536                 smtp_session->error_val = SM_ERROR;
537                 g_free(smtp_session->error_msg);
538                 smtp_session->error_msg = g_strdup(msg);
539                 return -1;
540         }
541
542         if (!strncmp(msg, "535", 3)) {
543                 log_warning(LOG_PROTOCOL, _("error occurred on authentication\n"));
544                 smtp_session->state = SMTP_ERROR;
545                 smtp_session->error_val = SM_AUTHFAIL;
546                 g_free(smtp_session->error_msg);
547                 smtp_session->error_msg = g_strdup(msg);
548                 return -1;
549         }
550
551         if (msg[0] != '1' && msg[0] != '2' && msg[0] != '3') {
552                 log_warning(LOG_PROTOCOL, _("error occurred on SMTP session\n"));
553                 smtp_session->state = SMTP_ERROR;
554                 smtp_session->error_val = SM_ERROR;
555                 g_free(smtp_session->error_msg);
556                 smtp_session->error_msg = g_strdup(msg);
557                 return -1;
558         }
559
560         if (msg[3] == '-')
561                 cont = TRUE;
562         else if (msg[3] != ' ' && msg[3] != '\0') {
563                 log_warning(LOG_PROTOCOL, _("bad SMTP response\n"));
564                 smtp_session->state = SMTP_ERROR;
565                 smtp_session->error_val = SM_UNRECOVERABLE;
566                 return -1;
567         }
568
569         switch (smtp_session->state) {
570         case SMTP_READY:
571                 if (strstr(msg, "ESMTP"))
572                         smtp_session->is_esmtp = TRUE;
573 #ifdef USE_GNUTLS
574                 if (smtp_session->user || session->ssl_type != SSL_NONE ||
575                     smtp_session->is_esmtp)
576 #else
577                 if (smtp_session->user || smtp_session->is_esmtp)
578 #endif
579                         ret = smtp_ehlo(smtp_session);
580                 else
581                         ret = smtp_helo(smtp_session);
582                 break;
583         case SMTP_HELO:
584                 ret = smtp_from(smtp_session);
585                 break;
586         case SMTP_EHLO:
587                 ret = smtp_ehlo_recv(smtp_session, msg);
588                 if (cont == TRUE)
589                         break;
590                 if (smtp_session->max_message_size > 0
591                 && smtp_session->max_message_size < 
592                    smtp_session->send_data_len) {
593                         log_warning(LOG_PROTOCOL, _("Message is too big "
594                               "(Maximum size is %s)\n"),
595                               to_human_readable(
596                                (goffset)(smtp_session->max_message_size)));
597                         smtp_session->state = SMTP_ERROR;
598                         smtp_session->error_val = SM_ERROR;
599                         return -1;
600                 }
601 #ifdef USE_GNUTLS
602                 if (session->ssl_type == SSL_STARTTLS &&
603                     smtp_session->tls_init_done == FALSE) {
604                         ret = smtp_starttls(smtp_session);
605                         break;
606                 }
607 #endif
608                 if (smtp_session->user) {
609                         if (smtp_auth(smtp_session) != SM_OK) {
610 #ifdef USE_GNUTLS
611                                 if (session->ssl_type == SSL_NONE
612                                 &&  smtp_session->tls_init_done == FALSE
613                                 &&  (smtp_session->avail_auth_type & SMTPAUTH_TLS_AVAILABLE))
614                                         ret = smtp_starttls(smtp_session);
615                                 else
616 #endif
617                                         ret = smtp_from(smtp_session);
618                         }
619                 } else
620                         ret = smtp_from(smtp_session);
621                 break;
622         case SMTP_STARTTLS:
623 #ifdef USE_GNUTLS
624                 if (session_start_tls(session) < 0) {
625                         log_warning(LOG_PROTOCOL, _("couldn't start TLS session\n"));
626                         smtp_session->state = SMTP_ERROR;
627                         smtp_session->error_val = SM_ERROR;
628                         return -1;
629                 }
630                 smtp_session->tls_init_done = TRUE;
631                 ret = smtp_ehlo(smtp_session);
632 #endif
633                 break;
634         case SMTP_AUTH:
635                 ret = smtp_auth_recv(smtp_session, msg);
636                 break;
637         case SMTP_AUTH_LOGIN_USER:
638                 ret = smtp_auth_login_user_recv(smtp_session, msg);
639                 break;
640         case SMTP_AUTH_PLAIN:
641         case SMTP_AUTH_LOGIN_PASS:
642         case SMTP_AUTH_CRAM_MD5:
643                 ret = smtp_from(smtp_session);
644                 break;
645         case SMTP_FROM:
646                 if (smtp_session->cur_to)
647                         ret = smtp_rcpt(smtp_session);
648                 break;
649         case SMTP_RCPT:
650                 if (smtp_session->cur_to)
651                         ret = smtp_rcpt(smtp_session);
652                 else
653                         ret = smtp_data(smtp_session);
654                 break;
655         case SMTP_DATA:
656                 ret = smtp_send_data(smtp_session);
657                 break;
658         case SMTP_EOM:
659                 smtp_make_ready(smtp_session);
660                 break;
661         case SMTP_QUIT:
662                 session_disconnect(session);
663                 break;
664         case SMTP_ERROR:
665         default:
666                 log_warning(LOG_PROTOCOL, _("error occurred on SMTP session\n"));
667                 smtp_session->error_val = SM_ERROR;
668                 return -1;
669         }
670
671         if (cont && ret == SM_OK)
672                 return session_recv_msg(session);
673
674         if (ret != SM_OK)
675                 smtp_session->error_val = SM_ERROR;
676
677         return ret == SM_OK ? 0 : -1;
678 }
679
680 static gint smtp_session_send_data_finished(Session *session, guint len)
681 {
682         return smtp_eom(SMTP_SESSION(session));
683 }