2 * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3 * Copyright (C) 1999-2012 Hiroyuki Yamamoto and the Claws Mail team
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.
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.
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/>.
22 #include "claws-features.h"
28 #include <glib/gi18n.h>
33 #include <sys/types.h>
38 #include "send_message.h"
42 #include "prefs_common.h"
43 #include "prefs_account.h"
44 #include "procheader.h"
46 #include "progressdialog.h"
47 #include "statusbar.h"
48 #include "inputdialog.h"
49 #include "alertpanel.h"
50 #include "manage_window.h"
51 #include "logwindow.h"
58 #include "passwordstore.h"
61 typedef struct _SendProgressDialog SendProgressDialog;
63 struct _SendProgressDialog
65 ProgressDialog *dialog;
70 static SendProgressDialog *send_dialog = NULL;
72 static gint send_recv_message (Session *session,
75 static gint send_send_data_progressive (Session *session,
79 static gint send_send_data_finished (Session *session,
83 static SendProgressDialog *send_progress_dialog_create(void);
84 static void send_progress_dialog_destroy(SendProgressDialog *dialog);
86 static void send_showlog_button_cb (GtkWidget *widget,
88 static void send_cancel_button_cb (GtkWidget *widget,
91 static void send_put_error (Session *session);
94 void send_cancel(void)
97 send_cancel_button_cb(NULL, send_dialog);
100 gboolean send_is_active(void)
102 return (send_dialog != NULL);
105 gint send_message(const gchar *file, PrefsAccount *ac_prefs, GSList *to_list)
110 cm_return_val_if_fail(file != NULL, -1);
111 cm_return_val_if_fail(ac_prefs != NULL, -1);
112 cm_return_val_if_fail(to_list != NULL, -1);
114 if ((fp = claws_fopen(file, "rb")) == NULL) {
115 FILE_OP_ERROR(file, "claws_fopen");
120 if (ac_prefs->use_mail_command && ac_prefs->mail_command &&
121 (*ac_prefs->mail_command)) {
122 val = send_message_local(ac_prefs->mail_command, fp);
127 val = send_message_smtp(ac_prefs, to_list, fp);
143 gint send_message_local(const gchar *command, FILE *fp)
149 gboolean err = FALSE;
151 cm_return_val_if_fail(command != NULL, -1);
152 cm_return_val_if_fail(fp != NULL, -1);
154 log_message(LOG_PROTOCOL, _("Sending message using command: %s\n"), command);
156 argv = strsplit_with_quote(command, " ", 0);
158 if (g_spawn_async_with_pipes(NULL, argv, NULL,
162 G_SPAWN_DO_NOT_REAP_CHILD,
165 &pid, &child_stdin, NULL, NULL,
167 g_snprintf(buf, sizeof(buf),
168 _("Couldn't execute command: %s"), command);
169 log_warning(LOG_PROTOCOL, "%s\n", buf);
170 alertpanel_error("%s", buf);
176 while (claws_fgets(buf, sizeof(buf), fp) != NULL) {
178 if (buf[0] == '.' && buf[1] == '\0') {
179 if (fd_write_all(child_stdin, ".", 1) < 0) {
184 if (fd_write_all(child_stdin, buf, strlen(buf)) < 0 ||
185 fd_write_all(child_stdin, "\n", 1) < 0) {
191 fd_close(child_stdin);
195 waitpid(pid, &status, 0);
196 if (!WIFEXITED(status) || WEXITSTATUS(status) != 0)
200 g_spawn_close_pid(pid);
203 g_snprintf(buf, sizeof(buf),
204 _("Error occurred while executing command: %s"),
206 log_warning(LOG_PROTOCOL, "%s\n", buf);
207 alertpanel_error("%s", buf);
214 gint send_message_smtp_full(PrefsAccount *ac_prefs, GSList *to_list, FILE *fp, gboolean keep_session)
217 SMTPSession *smtp_session;
221 gboolean was_inited = FALSE;
222 MsgInfo *tmp_msginfo = NULL;
223 MsgFlags flags = {0, 0};
225 gchar spec_from[BUFFSIZE];
226 ProxyInfo *proxy_info = NULL;
228 cm_return_val_if_fail(ac_prefs != NULL, -1);
229 cm_return_val_if_fail(ac_prefs->address != NULL, -1);
230 cm_return_val_if_fail(ac_prefs->smtp_server != NULL, -1);
231 cm_return_val_if_fail(to_list != NULL, -1);
232 cm_return_val_if_fail(fp != NULL, -1);
234 /* get the From address used, not necessarily the ac_prefs',
235 * because it's editable. */
242 tmp_msginfo = procheader_parse_stream(fp, flags, TRUE, FALSE);
243 if (fseek(fp, fp_pos, SEEK_SET) < 0) {
248 if (tmp_msginfo && tmp_msginfo->extradata && tmp_msginfo->extradata->resent_from) {
249 strncpy2(spec_from, tmp_msginfo->extradata->resent_from, BUFFSIZE-1);
250 extract_address(spec_from);
251 } else if (tmp_msginfo && tmp_msginfo->from) {
252 strncpy2(spec_from, tmp_msginfo->from, BUFFSIZE-1);
253 extract_address(spec_from);
255 strncpy2(spec_from, ac_prefs->address, BUFFSIZE-1);
258 procmsg_msginfo_free(&tmp_msginfo);
261 if (!ac_prefs->session) {
262 /* we can't reuse a previously initialised session */
263 session = smtp_session_new(ac_prefs);
264 session->ssl_cert_auto_accept = ac_prefs->ssl_certs_auto_accept;
266 smtp_session = SMTP_SESSION(session);
268 if (ac_prefs->set_domain && ac_prefs->domain && strlen(ac_prefs->domain)) {
269 smtp_session->hostname = g_strdup(ac_prefs->domain);
271 smtp_session->hostname = NULL;
275 port = ac_prefs->set_smtpport ? ac_prefs->smtpport :
276 ac_prefs->ssl_smtp == SSL_TUNNEL ? SSMTP_PORT : SMTP_PORT;
277 session->ssl_type = ac_prefs->ssl_smtp;
278 if (ac_prefs->ssl_smtp != SSL_NONE)
279 session->nonblocking = ac_prefs->use_nonblocking_ssl;
280 if (ac_prefs->set_gnutls_priority && ac_prefs->gnutls_priority &&
281 strlen(ac_prefs->gnutls_priority))
282 session->gnutls_priority = g_strdup(ac_prefs->gnutls_priority);
284 if (ac_prefs->ssl_smtp != SSL_NONE) {
285 if (alertpanel_full(_("Insecure connection"),
286 _("This connection is configured to be secured "
287 "using SSL/TLS, but SSL/TLS is not available "
288 "in this build of Claws Mail. \n\n"
289 "Do you want to continue connecting to this "
290 "server? The communication would not be "
292 GTK_STOCK_CANCEL, _("Con_tinue connecting"),
293 NULL, FALSE, NULL, ALERT_WARNING,
294 G_ALERTDEFAULT) != G_ALERTALTERNATE) {
295 session_destroy(session);
299 port = ac_prefs->set_smtpport ? ac_prefs->smtpport : SMTP_PORT;
302 if (ac_prefs->use_smtp_auth) {
303 smtp_session->forced_auth_type = ac_prefs->smtp_auth_type;
304 if (ac_prefs->smtp_userid && strlen(ac_prefs->smtp_userid)) {
305 smtp_session->user = g_strdup(ac_prefs->smtp_userid);
306 if (password_get(smtp_session->user,
307 ac_prefs->smtp_server, "smtp", port,
308 &(smtp_session->pass))) {
310 } else if ((smtp_session->pass =
311 passwd_store_get_account(ac_prefs->account_id,
312 PWS_ACCOUNT_SEND)) == NULL) {
314 input_dialog_query_password_keep
315 (ac_prefs->smtp_server,
317 &(ac_prefs->session_smtp_passwd));
318 if (!smtp_session->pass) {
319 session_destroy(session);
324 smtp_session->user = g_strdup(ac_prefs->userid);
325 if (password_get(smtp_session->user,
326 ac_prefs->smtp_server, "smtp", port,
327 &(smtp_session->pass))) {
329 } else if ((smtp_session->pass = passwd_store_get_account(
330 ac_prefs->account_id, PWS_ACCOUNT_RECV)) == NULL) {
332 input_dialog_query_password_keep
333 (ac_prefs->smtp_server,
335 &(ac_prefs->session_smtp_passwd));
336 if (!smtp_session->pass) {
337 session_destroy(session);
343 smtp_session->user = NULL;
344 smtp_session->pass = NULL;
347 send_dialog = send_progress_dialog_create();
348 send_dialog->session = session;
349 smtp_session->dialog = send_dialog;
351 progress_dialog_list_set(send_dialog->dialog, 0, NULL,
352 ac_prefs->smtp_server,
355 if (ac_prefs->pop_before_smtp
356 && (ac_prefs->protocol == A_POP3)
357 && (time(NULL) - ac_prefs->last_pop_login_time) > (60 * ac_prefs->pop_before_smtp_timeout)) {
358 g_snprintf(buf, sizeof(buf), _("Doing POP before SMTP..."));
359 log_message(LOG_PROTOCOL, "%s\n", buf);
360 progress_dialog_set_label(send_dialog->dialog, buf);
361 progress_dialog_list_set_status(send_dialog->dialog, 0, _("POP before SMTP"));
363 inc_pop_before_smtp(ac_prefs);
366 g_snprintf(buf, sizeof(buf), _("Account '%s': Connecting to SMTP server: %s:%d..."),
367 ac_prefs->account_name, ac_prefs->smtp_server, port);
368 progress_dialog_set_label(send_dialog->dialog, buf);
369 log_message(LOG_PROTOCOL, "%s\n", buf);
371 session_set_recv_message_notify(session, send_recv_message, send_dialog);
372 session_set_send_data_progressive_notify
373 (session, send_send_data_progressive, send_dialog);
374 session_set_send_data_notify(session, send_send_data_finished, send_dialog);
377 /* everything is ready to start at MAIL FROM:, just
378 * reinit useful variables.
380 session = SESSION(ac_prefs->session);
381 ac_prefs->session = NULL;
382 smtp_session = SMTP_SESSION(session);
383 smtp_session->state = SMTP_HELO;
384 send_dialog = (SendProgressDialog *)smtp_session->dialog;
388 /* This has to be initialised for every mail sent */
389 smtp_session->from = g_strdup(spec_from);
390 smtp_session->to_list = to_list;
391 smtp_session->cur_to = to_list;
392 smtp_session->send_data = (guchar *)get_outgoing_rfc2822_str(fp);
393 smtp_session->send_data_len = strlen((gchar *)smtp_session->send_data);
395 if (ac_prefs->use_proxy && ac_prefs->use_proxy_for_send) {
396 if (ac_prefs->use_default_proxy) {
397 proxy_info = (ProxyInfo *)&(prefs_common.proxy_info);
398 if (proxy_info->use_proxy_auth)
399 proxy_info->proxy_pass = passwd_store_get(PWS_CORE, PWS_CORE_PROXY,
400 PWS_CORE_PROXY_PASS);
402 proxy_info = (ProxyInfo *)&(ac_prefs->proxy_info);
403 if (proxy_info->use_proxy_auth)
404 proxy_info->proxy_pass = passwd_store_get_account(ac_prefs->account_id,
405 PWS_ACCOUNT_PROXY_PASS);
408 SESSION(smtp_session)->proxy_info = proxy_info;
410 session_set_timeout(session,
411 prefs_common.io_timeout_secs * 1000);
412 /* connect if necessary */
413 if (!was_inited && session_connect(session, ac_prefs->smtp_server,
415 session_destroy(session);
416 send_progress_dialog_destroy(send_dialog);
417 ac_prefs->session = NULL;
421 debug_print("send_message_smtp(): begin event loop\n");
424 /* as the server is quiet, start sending ourselves */
425 smtp_from(smtp_session);
428 while (session_is_running(session) && send_dialog->cancelled == FALSE
429 && SMTP_SESSION(session)->state != SMTP_MAIL_SENT_OK)
430 gtk_main_iteration();
432 if (SMTP_SESSION(session)->error_val == SM_AUTHFAIL) {
433 if (ac_prefs->session_smtp_passwd) {
434 g_free(ac_prefs->session_smtp_passwd);
435 ac_prefs->session_smtp_passwd = NULL;
438 } else if (SMTP_SESSION(session)->state == SMTP_MAIL_SENT_OK) {
439 log_message(LOG_PROTOCOL, "%s\n", _("Mail sent successfully."));
441 } else if (session->state == SESSION_EOF &&
442 SMTP_SESSION(session)->state == SMTP_QUIT) {
443 /* consider EOF right after QUIT successful */
444 log_warning(LOG_PROTOCOL, "%s\n", _("Connection closed by the remote host."));
446 } else if (session->state == SESSION_ERROR ||
447 session->state == SESSION_EOF ||
448 session->state == SESSION_TIMEOUT ||
449 SMTP_SESSION(session)->state == SMTP_ERROR ||
450 SMTP_SESSION(session)->error_val != SM_OK)
452 else if (send_dialog->cancelled == TRUE)
456 manage_window_focus_in(send_dialog->dialog->window, NULL, NULL);
457 send_put_error(session);
458 manage_window_focus_out(send_dialog->dialog->window, NULL, NULL);
461 /* if we should close the connection, let's do it.
462 * Close it in case of error, too, as it helps reinitializing things
465 if (!keep_session || ret != 0) {
466 if (session_is_connected(session))
467 smtp_quit(smtp_session);
468 while (session_is_connected(session) && !send_dialog->cancelled)
469 gtk_main_iteration();
470 session_destroy(session);
471 ac_prefs->session = NULL;
472 send_progress_dialog_destroy(send_dialog);
474 g_free(smtp_session->from);
475 g_free(smtp_session->send_data);
476 g_free(smtp_session->error_msg);
478 if (keep_session && ret == 0 && ac_prefs->session == NULL)
479 ac_prefs->session = SMTP_SESSION(session);
483 statusbar_verbosity_set(FALSE);
487 gint send_message_smtp(PrefsAccount *ac_prefs, GSList *to_list, FILE *fp)
489 return send_message_smtp_full(ac_prefs, to_list, fp, FALSE);
492 static gint send_recv_message(Session *session, const gchar *msg, gpointer data)
495 SMTPSession *smtp_session = SMTP_SESSION(session);
496 SendProgressDialog *dialog = (SendProgressDialog *)data;
497 gchar *state_str = NULL;
499 cm_return_val_if_fail(dialog != NULL, -1);
501 switch (smtp_session->state) {
505 g_snprintf(buf, sizeof(buf), _("Sending HELO..."));
506 state_str = _("Authenticating");
507 statusbar_print_all(_("Sending message..."));
510 g_snprintf(buf, sizeof(buf), _("Sending EHLO..."));
511 state_str = _("Authenticating");
512 statusbar_print_all(_("Sending message..."));
515 g_snprintf(buf, sizeof(buf), _("Authenticating..."));
516 state_str = _("Authenticating");
519 g_snprintf(buf, sizeof(buf), _("Sending MAIL FROM..."));
520 state_str = _("Sending");
523 g_snprintf(buf, sizeof(buf), _("Sending RCPT TO..."));
524 state_str = _("Sending");
528 g_snprintf(buf, sizeof(buf), _("Sending DATA..."));
529 state_str = _("Sending");
532 g_snprintf(buf, sizeof(buf), _("Quitting..."));
533 state_str = _("Quitting");
536 g_warning("send: error: %s", msg);
542 progress_dialog_set_label(dialog->dialog, buf);
543 progress_dialog_list_set_status(dialog->dialog, 0, state_str);
548 static gint send_send_data_progressive(Session *session, guint cur_len,
549 guint total_len, gpointer data)
552 SendProgressDialog *dialog = (SendProgressDialog *)data;
553 MainWindow *mainwin = mainwindow_get_mainwindow();
555 cm_return_val_if_fail(dialog != NULL, -1);
557 if (SMTP_SESSION(session)->state != SMTP_SEND_DATA &&
558 SMTP_SESSION(session)->state != SMTP_EOM)
561 g_snprintf(buf, sizeof(buf), _("Sending message (%d / %d bytes)"),
563 progress_dialog_set_label(dialog->dialog, buf);
564 progress_dialog_set_fraction
565 (dialog->dialog, (total_len == 0) ? 0 : (gfloat)cur_len / (gfloat)total_len);
568 if (!gtk_widget_get_visible(mainwin->progressbar))
569 gtk_widget_show(mainwin->progressbar);
570 gtk_progress_bar_set_fraction
571 (GTK_PROGRESS_BAR(mainwin->progressbar),
572 (total_len == 0) ? 0 : (gfloat)cur_len / (gfloat)total_len);
578 static gint send_send_data_finished(Session *session, guint len, gpointer data)
580 SendProgressDialog *dialog = (SendProgressDialog *)data;
581 MainWindow *mainwin = mainwindow_get_mainwindow();
583 cm_return_val_if_fail(dialog != NULL, -1);
585 send_send_data_progressive(session, len, len, dialog);
587 gtk_widget_hide(mainwin->progressbar);
588 gtk_progress_bar_set_fraction
589 (GTK_PROGRESS_BAR(mainwin->progressbar),(gfloat)0);
595 static void send_progress_dialog_size_allocate_cb(GtkWidget *widget,
596 GtkAllocation *allocation)
598 cm_return_if_fail(allocation != NULL);
600 prefs_common.sendwin_width = allocation->width;
601 prefs_common.sendwin_height = allocation->height;
604 static SendProgressDialog *send_progress_dialog_create(void)
606 SendProgressDialog *dialog;
607 ProgressDialog *progress;
608 static GdkGeometry geometry;
610 dialog = g_new0(SendProgressDialog, 1);
612 progress = progress_dialog_create();
613 gtk_window_set_title(GTK_WINDOW(progress->window),
614 _("Sending message"));
615 g_signal_connect(G_OBJECT(progress->showlog_btn), "clicked",
616 G_CALLBACK(send_showlog_button_cb), dialog);
617 g_signal_connect(G_OBJECT(progress->cancel_btn), "clicked",
618 G_CALLBACK(send_cancel_button_cb), dialog);
619 g_signal_connect(G_OBJECT(progress->window), "delete_event",
620 G_CALLBACK(gtk_true), NULL);
621 gtk_window_set_modal(GTK_WINDOW(progress->window), TRUE);
622 g_signal_connect(G_OBJECT(progress->window), "size_allocate",
623 G_CALLBACK(send_progress_dialog_size_allocate_cb), NULL);
624 manage_window_set_transient(GTK_WINDOW(progress->window));
626 progress_dialog_get_fraction(progress);
628 if (!geometry.min_height) {
629 geometry.min_width = 460;
630 geometry.min_height = 250;
633 gtk_window_set_geometry_hints(GTK_WINDOW(progress->window), NULL, &geometry,
635 gtk_widget_set_size_request(progress->window, prefs_common.sendwin_width,
636 prefs_common.sendwin_height);
638 if (!prefs_common.send_dialog_invisible) {
639 gtk_widget_show_now(progress->window);
642 dialog->dialog = progress;
647 static void send_progress_dialog_destroy(SendProgressDialog *dialog)
649 cm_return_if_fail(dialog != NULL);
650 if (!prefs_common.send_dialog_invisible) {
651 progress_dialog_destroy(dialog->dialog);
657 static void send_showlog_button_cb(GtkWidget *widget, gpointer data)
659 MainWindow *mainwin = mainwindow_get_mainwindow();
661 log_window_show(mainwin->logwin);
664 static void send_cancel_button_cb(GtkWidget *widget, gpointer data)
666 SendProgressDialog *dialog = (SendProgressDialog *)data;
667 statusbar_progress_all(0,0,0);
669 dialog->cancelled = TRUE;
672 static void send_put_error(Session *session)
675 gchar *log_msg = NULL;
676 gchar *err_msg = NULL;
678 msg = SMTP_SESSION(session)->error_msg;
680 switch (SMTP_SESSION(session)->error_val) {
682 case SM_UNRECOVERABLE:
683 log_msg = _("Error occurred while sending the message.");
685 err_msg = g_strdup_printf
686 (_("Error occurred while sending the message:\n%s"),
689 err_msg = g_strdup(log_msg);
692 log_msg = _("Authentication failed.");
694 err_msg = g_strdup_printf
695 (_("Authentication failed:\n%s"), msg);
697 err_msg = g_strdup(log_msg);
700 switch (session->state) {
703 _("Error occurred while sending the message.");
704 err_msg = g_strdup(log_msg);
707 log_msg = _("Connection closed by the remote host.");
708 err_msg = g_strdup(log_msg);
710 case SESSION_TIMEOUT:
711 log_msg = _("Session timed out. You may be able to "
712 "recover by increasing the timeout value in "
713 "Preferences/Other/Miscellaneous.");
714 err_msg = g_strdup(log_msg);
723 log_error(LOG_PROTOCOL, "%s\n", err_msg);
727 log_warning(LOG_PROTOCOL, "%s\n", log_msg);