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"
60 typedef struct _SendProgressDialog SendProgressDialog;
62 struct _SendProgressDialog
64 ProgressDialog *dialog;
69 static SendProgressDialog *send_dialog = NULL;
71 static gint send_recv_message (Session *session,
74 static gint send_send_data_progressive (Session *session,
78 static gint send_send_data_finished (Session *session,
82 static SendProgressDialog *send_progress_dialog_create(void);
83 static void send_progress_dialog_destroy(SendProgressDialog *dialog);
85 static void send_showlog_button_cb (GtkWidget *widget,
87 static void send_cancel_button_cb (GtkWidget *widget,
90 static void send_put_error (Session *session);
93 void send_cancel(void)
96 send_cancel_button_cb(NULL, send_dialog);
99 gboolean send_is_active(void)
101 return (send_dialog != NULL);
104 gint send_message(const gchar *file, PrefsAccount *ac_prefs, GSList *to_list)
109 cm_return_val_if_fail(file != NULL, -1);
110 cm_return_val_if_fail(ac_prefs != NULL, -1);
111 cm_return_val_if_fail(to_list != NULL, -1);
113 if ((fp = g_fopen(file, "rb")) == NULL) {
114 FILE_OP_ERROR(file, "fopen");
119 if (ac_prefs->use_mail_command && ac_prefs->mail_command &&
120 (*ac_prefs->mail_command)) {
121 val = send_message_local(ac_prefs->mail_command, fp);
126 val = send_message_smtp(ac_prefs, to_list, fp);
142 gint send_message_local(const gchar *command, FILE *fp)
148 gboolean err = FALSE;
150 cm_return_val_if_fail(command != NULL, -1);
151 cm_return_val_if_fail(fp != NULL, -1);
153 log_message(LOG_PROTOCOL, _("Sending message using command: %s\n"), command);
155 argv = strsplit_with_quote(command, " ", 0);
157 if (g_spawn_async_with_pipes(NULL, argv, NULL,
161 G_SPAWN_DO_NOT_REAP_CHILD,
164 &pid, &child_stdin, NULL, NULL,
166 g_snprintf(buf, sizeof(buf),
167 _("Couldn't execute command: %s"), command);
168 log_warning(LOG_PROTOCOL, "%s\n", buf);
169 alertpanel_error("%s", buf);
175 while (fgets(buf, sizeof(buf), fp) != NULL) {
177 if (buf[0] == '.' && buf[1] == '\0') {
178 if (fd_write_all(child_stdin, ".", 1) < 0) {
183 if (fd_write_all(child_stdin, buf, strlen(buf)) < 0 ||
184 fd_write_all(child_stdin, "\n", 1) < 0) {
190 fd_close(child_stdin);
194 waitpid(pid, &status, 0);
195 if (!WIFEXITED(status) || WEXITSTATUS(status) != 0)
199 g_spawn_close_pid(pid);
202 g_snprintf(buf, sizeof(buf),
203 _("Error occurred while executing command: %s"),
205 log_warning(LOG_PROTOCOL, "%s\n", buf);
206 alertpanel_error("%s", buf);
213 gint send_message_smtp_full(PrefsAccount *ac_prefs, GSList *to_list, FILE *fp, gboolean keep_session)
216 SMTPSession *smtp_session;
220 gboolean was_inited = FALSE;
221 MsgInfo *tmp_msginfo = NULL;
222 MsgFlags flags = {0, 0};
224 gchar spec_from[BUFFSIZE];
225 ProxyInfo *proxy_info = NULL;
227 cm_return_val_if_fail(ac_prefs != NULL, -1);
228 cm_return_val_if_fail(ac_prefs->address != NULL, -1);
229 cm_return_val_if_fail(ac_prefs->smtp_server != NULL, -1);
230 cm_return_val_if_fail(to_list != NULL, -1);
231 cm_return_val_if_fail(fp != NULL, -1);
233 /* get the From address used, not necessarily the ac_prefs',
234 * because it's editable. */
241 tmp_msginfo = procheader_parse_stream(fp, flags, TRUE, FALSE);
242 if (fseek(fp, fp_pos, SEEK_SET) < 0) {
247 if (tmp_msginfo && tmp_msginfo->extradata && tmp_msginfo->extradata->resent_from) {
248 strncpy2(spec_from, tmp_msginfo->extradata->resent_from, BUFFSIZE-1);
249 extract_address(spec_from);
250 } else if (tmp_msginfo && tmp_msginfo->from) {
251 strncpy2(spec_from, tmp_msginfo->from, BUFFSIZE-1);
252 extract_address(spec_from);
254 strncpy2(spec_from, ac_prefs->address, BUFFSIZE-1);
257 procmsg_msginfo_free(&tmp_msginfo);
260 if (!ac_prefs->session) {
261 /* we can't reuse a previously initialised session */
262 session = smtp_session_new(ac_prefs);
263 session->ssl_cert_auto_accept = ac_prefs->ssl_certs_auto_accept;
265 smtp_session = SMTP_SESSION(session);
267 if (ac_prefs->set_domain && ac_prefs->domain && strlen(ac_prefs->domain)) {
268 smtp_session->hostname = g_strdup(ac_prefs->domain);
270 smtp_session->hostname = NULL;
274 port = ac_prefs->set_smtpport ? ac_prefs->smtpport :
275 ac_prefs->ssl_smtp == SSL_TUNNEL ? SSMTP_PORT : SMTP_PORT;
276 session->ssl_type = ac_prefs->ssl_smtp;
277 if (ac_prefs->ssl_smtp != SSL_NONE)
278 session->nonblocking = ac_prefs->use_nonblocking_ssl;
279 if (ac_prefs->set_gnutls_priority && ac_prefs->gnutls_priority &&
280 strlen(ac_prefs->gnutls_priority))
281 session->gnutls_priority = g_strdup(ac_prefs->gnutls_priority);
283 if (ac_prefs->ssl_smtp != SSL_NONE) {
284 if (alertpanel_full(_("Insecure connection"),
285 _("This connection is configured to be secured "
286 "using SSL/TLS, but SSL/TLS is not available "
287 "in this build of Claws Mail. \n\n"
288 "Do you want to continue connecting to this "
289 "server? The communication would not be "
291 GTK_STOCK_CANCEL, _("Con_tinue connecting"),
292 NULL, FALSE, NULL, ALERT_WARNING,
293 G_ALERTDEFAULT) != G_ALERTALTERNATE) {
294 session_destroy(session);
298 port = ac_prefs->set_smtpport ? ac_prefs->smtpport : SMTP_PORT;
301 if (ac_prefs->use_smtp_auth) {
302 smtp_session->forced_auth_type = ac_prefs->smtp_auth_type;
303 if (ac_prefs->smtp_userid && strlen(ac_prefs->smtp_userid)) {
304 smtp_session->user = g_strdup(ac_prefs->smtp_userid);
305 if (password_get(smtp_session->user,
306 ac_prefs->smtp_server, "smtp", port,
307 &(smtp_session->pass))) {
309 } else if ((smtp_session->pass =
310 passwd_store_get_account(ac_prefs->account_id,
311 PWS_ACCOUNT_SEND)) == NULL) {
313 input_dialog_query_password_keep
314 (ac_prefs->smtp_server,
316 &(ac_prefs->session_smtp_passwd));
317 if (!smtp_session->pass) {
318 session_destroy(session);
323 smtp_session->user = g_strdup(ac_prefs->userid);
324 if (password_get(smtp_session->user,
325 ac_prefs->smtp_server, "smtp", port,
326 &(smtp_session->pass))) {
328 } else if ((smtp_session->pass = passwd_store_get_account(
329 ac_prefs->account_id, PWS_ACCOUNT_RECV)) == NULL) {
331 input_dialog_query_password_keep
332 (ac_prefs->smtp_server,
334 &(ac_prefs->session_smtp_passwd));
335 if (!smtp_session->pass) {
336 session_destroy(session);
342 smtp_session->user = NULL;
343 smtp_session->pass = NULL;
346 send_dialog = send_progress_dialog_create();
347 send_dialog->session = session;
348 smtp_session->dialog = send_dialog;
350 progress_dialog_list_set(send_dialog->dialog, 0, NULL,
351 ac_prefs->smtp_server,
354 if (ac_prefs->pop_before_smtp
355 && (ac_prefs->protocol == A_POP3)
356 && (time(NULL) - ac_prefs->last_pop_login_time) > (60 * ac_prefs->pop_before_smtp_timeout)) {
357 g_snprintf(buf, sizeof(buf), _("Doing POP before SMTP..."));
358 log_message(LOG_PROTOCOL, "%s\n", buf);
359 progress_dialog_set_label(send_dialog->dialog, buf);
360 progress_dialog_list_set_status(send_dialog->dialog, 0, _("POP before SMTP"));
362 inc_pop_before_smtp(ac_prefs);
365 g_snprintf(buf, sizeof(buf), _("Account '%s': Connecting to SMTP server: %s:%d..."),
366 ac_prefs->account_name, ac_prefs->smtp_server, port);
367 progress_dialog_set_label(send_dialog->dialog, buf);
368 log_message(LOG_PROTOCOL, "%s\n", buf);
370 session_set_recv_message_notify(session, send_recv_message, send_dialog);
371 session_set_send_data_progressive_notify
372 (session, send_send_data_progressive, send_dialog);
373 session_set_send_data_notify(session, send_send_data_finished, send_dialog);
376 /* everything is ready to start at MAIL FROM:, just
377 * reinit useful variables.
379 session = SESSION(ac_prefs->session);
380 ac_prefs->session = NULL;
381 smtp_session = SMTP_SESSION(session);
382 smtp_session->state = SMTP_HELO;
383 send_dialog = (SendProgressDialog *)smtp_session->dialog;
387 /* This has to be initialised for every mail sent */
388 smtp_session->from = g_strdup(spec_from);
389 smtp_session->to_list = to_list;
390 smtp_session->cur_to = to_list;
391 smtp_session->send_data = (guchar *)get_outgoing_rfc2822_str(fp);
392 smtp_session->send_data_len = strlen((gchar *)smtp_session->send_data);
394 if (ac_prefs->use_proxy && ac_prefs->use_proxy_for_send) {
395 if (ac_prefs->use_default_proxy) {
396 proxy_info = (ProxyInfo *)&(prefs_common.proxy_info);
397 if (proxy_info->use_proxy_auth)
398 proxy_info->proxy_pass = passwd_store_get(PWS_CORE, PWS_CORE_PROXY,
399 PWS_CORE_PROXY_PASS);
401 proxy_info = (ProxyInfo *)&(ac_prefs->proxy_info);
402 if (proxy_info->use_proxy_auth)
403 proxy_info->proxy_pass = passwd_store_get_account(ac_prefs->account_id,
404 PWS_ACCOUNT_PROXY_PASS);
407 SESSION(smtp_session)->proxy_info = proxy_info;
409 session_set_timeout(session,
410 prefs_common.io_timeout_secs * 1000);
411 /* connect if necessary */
412 if (!was_inited && session_connect(session, ac_prefs->smtp_server,
414 session_destroy(session);
415 send_progress_dialog_destroy(send_dialog);
416 ac_prefs->session = NULL;
420 debug_print("send_message_smtp(): begin event loop\n");
423 /* as the server is quiet, start sending ourselves */
424 smtp_from(smtp_session);
427 while (session_is_running(session) && send_dialog->cancelled == FALSE
428 && SMTP_SESSION(session)->state != SMTP_MAIL_SENT_OK)
429 gtk_main_iteration();
431 if (SMTP_SESSION(session)->error_val == SM_AUTHFAIL) {
432 if (ac_prefs->session_smtp_passwd) {
433 g_free(ac_prefs->session_smtp_passwd);
434 ac_prefs->session_smtp_passwd = NULL;
437 } else if (SMTP_SESSION(session)->state == SMTP_MAIL_SENT_OK) {
438 log_message(LOG_PROTOCOL, "%s\n", _("Mail sent successfully."));
440 } else if (session->state == SESSION_EOF &&
441 SMTP_SESSION(session)->state == SMTP_QUIT) {
442 /* consider EOF right after QUIT successful */
443 log_warning(LOG_PROTOCOL, "%s\n", _("Connection closed by the remote host."));
445 } else if (session->state == SESSION_ERROR ||
446 session->state == SESSION_EOF ||
447 session->state == SESSION_TIMEOUT ||
448 SMTP_SESSION(session)->state == SMTP_ERROR ||
449 SMTP_SESSION(session)->error_val != SM_OK)
451 else if (send_dialog->cancelled == TRUE)
455 manage_window_focus_in(send_dialog->dialog->window, NULL, NULL);
456 send_put_error(session);
457 manage_window_focus_out(send_dialog->dialog->window, NULL, NULL);
460 /* if we should close the connection, let's do it.
461 * Close it in case of error, too, as it helps reinitializing things
464 if (!keep_session || ret != 0) {
465 if (session_is_connected(session))
466 smtp_quit(smtp_session);
467 while (session_is_connected(session) && !send_dialog->cancelled)
468 gtk_main_iteration();
469 session_destroy(session);
470 ac_prefs->session = NULL;
471 send_progress_dialog_destroy(send_dialog);
473 g_free(smtp_session->from);
474 g_free(smtp_session->send_data);
475 g_free(smtp_session->error_msg);
477 if (keep_session && ret == 0 && ac_prefs->session == NULL)
478 ac_prefs->session = SMTP_SESSION(session);
482 statusbar_verbosity_set(FALSE);
486 gint send_message_smtp(PrefsAccount *ac_prefs, GSList *to_list, FILE *fp)
488 return send_message_smtp_full(ac_prefs, to_list, fp, FALSE);
491 static gint send_recv_message(Session *session, const gchar *msg, gpointer data)
494 SMTPSession *smtp_session = SMTP_SESSION(session);
495 SendProgressDialog *dialog = (SendProgressDialog *)data;
496 gchar *state_str = NULL;
498 cm_return_val_if_fail(dialog != NULL, -1);
500 switch (smtp_session->state) {
504 g_snprintf(buf, sizeof(buf), _("Sending HELO..."));
505 state_str = _("Authenticating");
506 statusbar_print_all(_("Sending message..."));
509 g_snprintf(buf, sizeof(buf), _("Sending EHLO..."));
510 state_str = _("Authenticating");
511 statusbar_print_all(_("Sending message..."));
514 g_snprintf(buf, sizeof(buf), _("Authenticating..."));
515 state_str = _("Authenticating");
518 g_snprintf(buf, sizeof(buf), _("Sending MAIL FROM..."));
519 state_str = _("Sending");
522 g_snprintf(buf, sizeof(buf), _("Sending RCPT TO..."));
523 state_str = _("Sending");
527 g_snprintf(buf, sizeof(buf), _("Sending DATA..."));
528 state_str = _("Sending");
531 g_snprintf(buf, sizeof(buf), _("Quitting..."));
532 state_str = _("Quitting");
535 g_warning("send: error: %s", msg);
541 progress_dialog_set_label(dialog->dialog, buf);
542 progress_dialog_list_set_status(dialog->dialog, 0, state_str);
547 static gint send_send_data_progressive(Session *session, guint cur_len,
548 guint total_len, gpointer data)
551 SendProgressDialog *dialog = (SendProgressDialog *)data;
552 MainWindow *mainwin = mainwindow_get_mainwindow();
554 cm_return_val_if_fail(dialog != NULL, -1);
556 if (SMTP_SESSION(session)->state != SMTP_SEND_DATA &&
557 SMTP_SESSION(session)->state != SMTP_EOM)
560 g_snprintf(buf, sizeof(buf), _("Sending message (%d / %d bytes)"),
562 progress_dialog_set_label(dialog->dialog, buf);
563 progress_dialog_set_fraction
564 (dialog->dialog, (total_len == 0) ? 0 : (gfloat)cur_len / (gfloat)total_len);
567 if (!gtk_widget_get_visible(mainwin->progressbar))
568 gtk_widget_show(mainwin->progressbar);
569 gtk_progress_bar_set_fraction
570 (GTK_PROGRESS_BAR(mainwin->progressbar),
571 (total_len == 0) ? 0 : (gfloat)cur_len / (gfloat)total_len);
577 static gint send_send_data_finished(Session *session, guint len, gpointer data)
579 SendProgressDialog *dialog = (SendProgressDialog *)data;
580 MainWindow *mainwin = mainwindow_get_mainwindow();
582 cm_return_val_if_fail(dialog != NULL, -1);
584 send_send_data_progressive(session, len, len, dialog);
586 gtk_widget_hide(mainwin->progressbar);
587 gtk_progress_bar_set_fraction
588 (GTK_PROGRESS_BAR(mainwin->progressbar),(gfloat)0);
594 static void send_progress_dialog_size_allocate_cb(GtkWidget *widget,
595 GtkAllocation *allocation)
597 cm_return_if_fail(allocation != NULL);
599 prefs_common.sendwin_width = allocation->width;
600 prefs_common.sendwin_height = allocation->height;
603 static SendProgressDialog *send_progress_dialog_create(void)
605 SendProgressDialog *dialog;
606 ProgressDialog *progress;
607 static GdkGeometry geometry;
609 dialog = g_new0(SendProgressDialog, 1);
611 progress = progress_dialog_create();
612 gtk_window_set_title(GTK_WINDOW(progress->window),
613 _("Sending message"));
614 g_signal_connect(G_OBJECT(progress->showlog_btn), "clicked",
615 G_CALLBACK(send_showlog_button_cb), dialog);
616 g_signal_connect(G_OBJECT(progress->cancel_btn), "clicked",
617 G_CALLBACK(send_cancel_button_cb), dialog);
618 g_signal_connect(G_OBJECT(progress->window), "delete_event",
619 G_CALLBACK(gtk_true), NULL);
620 gtk_window_set_modal(GTK_WINDOW(progress->window), TRUE);
621 g_signal_connect(G_OBJECT(progress->window), "size_allocate",
622 G_CALLBACK(send_progress_dialog_size_allocate_cb), NULL);
623 manage_window_set_transient(GTK_WINDOW(progress->window));
625 progress_dialog_get_fraction(progress);
627 if (!geometry.min_height) {
628 geometry.min_width = 460;
629 geometry.min_height = 250;
632 gtk_window_set_geometry_hints(GTK_WINDOW(progress->window), NULL, &geometry,
634 gtk_widget_set_size_request(progress->window, prefs_common.sendwin_width,
635 prefs_common.sendwin_height);
637 if (!prefs_common.send_dialog_invisible) {
638 gtk_widget_show_now(progress->window);
641 dialog->dialog = progress;
646 static void send_progress_dialog_destroy(SendProgressDialog *dialog)
648 cm_return_if_fail(dialog != NULL);
649 if (!prefs_common.send_dialog_invisible) {
650 progress_dialog_destroy(dialog->dialog);
656 static void send_showlog_button_cb(GtkWidget *widget, gpointer data)
658 MainWindow *mainwin = mainwindow_get_mainwindow();
660 log_window_show(mainwin->logwin);
663 static void send_cancel_button_cb(GtkWidget *widget, gpointer data)
665 SendProgressDialog *dialog = (SendProgressDialog *)data;
666 statusbar_progress_all(0,0,0);
668 dialog->cancelled = TRUE;
671 static void send_put_error(Session *session)
674 gchar *log_msg = NULL;
675 gchar *err_msg = NULL;
677 msg = SMTP_SESSION(session)->error_msg;
679 switch (SMTP_SESSION(session)->error_val) {
681 case SM_UNRECOVERABLE:
682 log_msg = _("Error occurred while sending the message.");
684 err_msg = g_strdup_printf
685 (_("Error occurred while sending the message:\n%s"),
688 err_msg = g_strdup(log_msg);
691 log_msg = _("Authentication failed.");
693 err_msg = g_strdup_printf
694 (_("Authentication failed:\n%s"), msg);
696 err_msg = g_strdup(log_msg);
699 switch (session->state) {
702 _("Error occurred while sending the message.");
703 err_msg = g_strdup(log_msg);
706 log_msg = _("Connection closed by the remote host.");
707 err_msg = g_strdup(log_msg);
709 case SESSION_TIMEOUT:
710 log_msg = _("Session timed out. You may be able to "
711 "recover by increasing the timeout value in "
712 "Preferences/Other/Miscellaneous.");
713 err_msg = g_strdup(log_msg);
722 log_error(LOG_PROTOCOL, "%s\n", err_msg);
726 log_warning(LOG_PROTOCOL, "%s\n", log_msg);