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 typedef struct _SendProgressDialog SendProgressDialog
;
60 struct _SendProgressDialog
62 ProgressDialog
*dialog
;
67 static SendProgressDialog
*send_dialog
= NULL
;
69 static gint
send_recv_message (Session
*session
,
72 static gint
send_send_data_progressive (Session
*session
,
76 static gint
send_send_data_finished (Session
*session
,
80 static SendProgressDialog
*send_progress_dialog_create(void);
81 static void send_progress_dialog_destroy(SendProgressDialog
*dialog
);
83 static void send_showlog_button_cb (GtkWidget
*widget
,
85 static void send_cancel_button_cb (GtkWidget
*widget
,
88 static void send_put_error (Session
*session
);
91 void send_cancel(void)
94 send_cancel_button_cb(NULL
, send_dialog
);
97 gboolean
send_is_active(void)
99 return (send_dialog
!= NULL
);
102 gint
send_message(const gchar
*file
, PrefsAccount
*ac_prefs
, GSList
*to_list
)
107 cm_return_val_if_fail(file
!= NULL
, -1);
108 cm_return_val_if_fail(ac_prefs
!= NULL
, -1);
109 cm_return_val_if_fail(to_list
!= NULL
, -1);
111 if ((fp
= g_fopen(file
, "rb")) == NULL
) {
112 FILE_OP_ERROR(file
, "fopen");
117 if (ac_prefs
->use_mail_command
&& ac_prefs
->mail_command
&&
118 (*ac_prefs
->mail_command
)) {
119 val
= send_message_local(ac_prefs
->mail_command
, fp
);
124 val
= send_message_smtp(ac_prefs
, to_list
, fp
);
140 gint
send_message_local(const gchar
*command
, FILE *fp
)
146 gboolean err
= FALSE
;
149 cm_return_val_if_fail(command
!= NULL
, -1);
150 cm_return_val_if_fail(fp
!= NULL
, -1);
152 log_message(LOG_PROTOCOL
, _("Sending message using command: %s\n"), command
);
154 argv
= strsplit_with_quote(command
, " ", 0);
156 if (g_spawn_async_with_pipes(NULL
, argv
, NULL
,
160 G_SPAWN_DO_NOT_REAP_CHILD
,
163 &pid
, &child_stdin
, NULL
, NULL
,
165 g_snprintf(buf
, sizeof(buf
),
166 _("Couldn't execute command: %s"), command
);
167 log_warning(LOG_PROTOCOL
, "%s\n", buf
);
168 alertpanel_error("%s", buf
);
174 while (fgets(buf
, sizeof(buf
), fp
) != NULL
) {
176 if (buf
[0] == '.' && buf
[1] == '\0') {
177 if (fd_write_all(child_stdin
, ".", 1) < 0) {
182 if (fd_write_all(child_stdin
, buf
, strlen(buf
)) < 0 ||
183 fd_write_all(child_stdin
, "\n", 1) < 0) {
189 fd_close(child_stdin
);
192 waitpid(pid
, &status
, 0);
193 if (!WIFEXITED(status
) || WEXITSTATUS(status
) != 0)
197 g_spawn_close_pid(pid
);
200 g_snprintf(buf
, sizeof(buf
),
201 _("Error occurred while executing command: %s"),
203 log_warning(LOG_PROTOCOL
, "%s\n", buf
);
204 alertpanel_error("%s", buf
);
211 gint
send_message_smtp_full(PrefsAccount
*ac_prefs
, GSList
*to_list
, FILE *fp
, gboolean keep_session
)
214 SMTPSession
*smtp_session
;
218 gboolean was_inited
= FALSE
;
219 MsgInfo
*tmp_msginfo
= NULL
;
220 MsgFlags flags
= {0, 0};
222 gchar spec_from
[BUFFSIZE
];
224 cm_return_val_if_fail(ac_prefs
!= NULL
, -1);
225 cm_return_val_if_fail(ac_prefs
->address
!= NULL
, -1);
226 cm_return_val_if_fail(ac_prefs
->smtp_server
!= NULL
, -1);
227 cm_return_val_if_fail(to_list
!= NULL
, -1);
228 cm_return_val_if_fail(fp
!= NULL
, -1);
230 /* get the From address used, not necessarily the ac_prefs',
231 * because it's editable. */
238 tmp_msginfo
= procheader_parse_stream(fp
, flags
, TRUE
, FALSE
);
239 fseek(fp
, fp_pos
, SEEK_SET
);
241 if (tmp_msginfo
&& tmp_msginfo
->extradata
&& tmp_msginfo
->extradata
->resent_from
) {
242 strncpy2(spec_from
, tmp_msginfo
->extradata
->resent_from
, BUFFSIZE
-1);
243 extract_address(spec_from
);
244 } else if (tmp_msginfo
&& tmp_msginfo
->from
) {
245 strncpy2(spec_from
, tmp_msginfo
->from
, BUFFSIZE
-1);
246 extract_address(spec_from
);
248 strncpy2(spec_from
, ac_prefs
->address
, BUFFSIZE
-1);
251 procmsg_msginfo_free(tmp_msginfo
);
254 if (!ac_prefs
->session
) {
255 /* we can't reuse a previously initialised session */
256 session
= smtp_session_new(ac_prefs
);
257 session
->ssl_cert_auto_accept
= ac_prefs
->ssl_certs_auto_accept
;
259 smtp_session
= SMTP_SESSION(session
);
261 if (ac_prefs
->set_domain
&& ac_prefs
->domain
&& strlen(ac_prefs
->domain
)) {
262 smtp_session
->hostname
= g_strdup(ac_prefs
->domain
);
264 smtp_session
->hostname
= NULL
;
268 port
= ac_prefs
->set_smtpport
? ac_prefs
->smtpport
:
269 ac_prefs
->ssl_smtp
== SSL_TUNNEL
? SSMTP_PORT
: SMTP_PORT
;
270 session
->ssl_type
= ac_prefs
->ssl_smtp
;
271 if (ac_prefs
->ssl_smtp
!= SSL_NONE
)
272 session
->nonblocking
= ac_prefs
->use_nonblocking_ssl
;
273 if (ac_prefs
->set_gnutls_priority
&& ac_prefs
->gnutls_priority
&&
274 strlen(ac_prefs
->gnutls_priority
))
275 session
->gnutls_priority
= g_strdup(ac_prefs
->gnutls_priority
);
277 if (ac_prefs
->ssl_smtp
!= SSL_NONE
) {
278 if (alertpanel_full(_("Insecure connection"),
279 _("This connection is configured to be secured "
280 "using SSL, but SSL is not available in this "
281 "build of Claws Mail. \n\n"
282 "Do you want to continue connecting to this "
283 "server? The communication would not be "
285 GTK_STOCK_CANCEL
, _("Con_tinue connecting"),
286 NULL
, FALSE
, NULL
, ALERT_WARNING
,
287 G_ALERTDEFAULT
) != G_ALERTALTERNATE
) {
288 session_destroy(session
);
292 port
= ac_prefs
->set_smtpport
? ac_prefs
->smtpport
: SMTP_PORT
;
295 if (ac_prefs
->use_smtp_auth
) {
296 smtp_session
->forced_auth_type
= ac_prefs
->smtp_auth_type
;
297 if (ac_prefs
->smtp_userid
&& strlen(ac_prefs
->smtp_userid
)) {
298 smtp_session
->user
= g_strdup(ac_prefs
->smtp_userid
);
299 if (password_get(smtp_session
->user
,
300 ac_prefs
->smtp_server
, "smtp", port
,
301 &(smtp_session
->pass
))) {
303 } else if (ac_prefs
->smtp_passwd
)
305 g_strdup(ac_prefs
->smtp_passwd
);
308 input_dialog_query_password_keep
309 (ac_prefs
->smtp_server
,
311 &(ac_prefs
->session_smtp_passwd
));
312 if (!smtp_session
->pass
) {
313 session_destroy(session
);
318 smtp_session
->user
= g_strdup(ac_prefs
->userid
);
319 if (password_get(smtp_session
->user
,
320 ac_prefs
->smtp_server
, "smtp", port
,
321 &(smtp_session
->pass
))) {
323 } else if (ac_prefs
->passwd
)
324 smtp_session
->pass
= g_strdup(ac_prefs
->passwd
);
327 input_dialog_query_password_keep
328 (ac_prefs
->smtp_server
,
330 &(ac_prefs
->session_smtp_passwd
));
331 if (!smtp_session
->pass
) {
332 session_destroy(session
);
338 smtp_session
->user
= NULL
;
339 smtp_session
->pass
= NULL
;
342 send_dialog
= send_progress_dialog_create();
343 send_dialog
->session
= session
;
344 smtp_session
->dialog
= send_dialog
;
346 progress_dialog_list_set(send_dialog
->dialog
, 0, NULL
,
347 ac_prefs
->smtp_server
,
350 if (ac_prefs
->pop_before_smtp
351 && (ac_prefs
->protocol
== A_APOP
|| ac_prefs
->protocol
== A_POP3
)
352 && (time(NULL
) - ac_prefs
->last_pop_login_time
) > (60 * ac_prefs
->pop_before_smtp_timeout
)) {
353 g_snprintf(buf
, sizeof(buf
), _("Doing POP before SMTP..."));
354 log_message(LOG_PROTOCOL
, "%s\n", buf
);
355 progress_dialog_set_label(send_dialog
->dialog
, buf
);
356 progress_dialog_list_set_status(send_dialog
->dialog
, 0, _("POP before SMTP"));
358 inc_pop_before_smtp(ac_prefs
);
361 g_snprintf(buf
, sizeof(buf
), _("Account '%s': Connecting to SMTP server: %s:%d..."),
362 ac_prefs
->account_name
, ac_prefs
->smtp_server
, port
);
363 progress_dialog_set_label(send_dialog
->dialog
, buf
);
364 log_message(LOG_PROTOCOL
, "%s\n", buf
);
366 session_set_recv_message_notify(session
, send_recv_message
, send_dialog
);
367 session_set_send_data_progressive_notify
368 (session
, send_send_data_progressive
, send_dialog
);
369 session_set_send_data_notify(session
, send_send_data_finished
, send_dialog
);
372 /* everything is ready to start at MAIL FROM:, just
373 * reinit useful variables.
375 session
= SESSION(ac_prefs
->session
);
376 ac_prefs
->session
= NULL
;
377 smtp_session
= SMTP_SESSION(session
);
378 smtp_session
->state
= SMTP_HELO
;
379 send_dialog
= (SendProgressDialog
*)smtp_session
->dialog
;
383 /* This has to be initialised for every mail sent */
384 smtp_session
->from
= g_strdup(spec_from
);
385 smtp_session
->to_list
= to_list
;
386 smtp_session
->cur_to
= to_list
;
387 smtp_session
->send_data
= (guchar
*)get_outgoing_rfc2822_str(fp
);
388 smtp_session
->send_data_len
= strlen((gchar
*)smtp_session
->send_data
);
390 session_set_timeout(session
,
391 prefs_common
.io_timeout_secs
* 1000);
392 /* connect if necessary */
393 if (!was_inited
&& session_connect(session
, ac_prefs
->smtp_server
, port
) < 0) {
394 session_destroy(session
);
395 send_progress_dialog_destroy(send_dialog
);
396 ac_prefs
->session
= NULL
;
400 debug_print("send_message_smtp(): begin event loop\n");
403 /* as the server is quiet, start sending ourselves */
404 smtp_from(smtp_session
);
407 while (session_is_running(session
) && send_dialog
->cancelled
== FALSE
408 && SMTP_SESSION(session
)->state
!= SMTP_MAIL_SENT_OK
)
409 gtk_main_iteration();
411 if (SMTP_SESSION(session
)->error_val
== SM_AUTHFAIL
) {
412 if (ac_prefs
->session_smtp_passwd
) {
413 g_free(ac_prefs
->session_smtp_passwd
);
414 ac_prefs
->session_smtp_passwd
= NULL
;
417 } else if (SMTP_SESSION(session
)->state
== SMTP_MAIL_SENT_OK
) {
418 log_message(LOG_PROTOCOL
, "%s\n", _("Mail sent successfully."));
420 } else if (session
->state
== SESSION_EOF
&&
421 SMTP_SESSION(session
)->state
== SMTP_QUIT
) {
422 /* consider EOF right after QUIT successful */
423 log_warning(LOG_PROTOCOL
, "%s\n", _("Connection closed by the remote host."));
425 } else if (session
->state
== SESSION_ERROR
||
426 session
->state
== SESSION_EOF
||
427 session
->state
== SESSION_TIMEOUT
||
428 SMTP_SESSION(session
)->state
== SMTP_ERROR
||
429 SMTP_SESSION(session
)->error_val
!= SM_OK
)
431 else if (send_dialog
->cancelled
== TRUE
)
435 manage_window_focus_in(send_dialog
->dialog
->window
, NULL
, NULL
);
436 send_put_error(session
);
437 manage_window_focus_out(send_dialog
->dialog
->window
, NULL
, NULL
);
440 /* if we should close the connection, let's do it.
441 * Close it in case of error, too, as it helps reinitializing things
444 if (!keep_session
|| ret
!= 0) {
445 if (session_is_connected(session
))
446 smtp_quit(smtp_session
);
447 while (session_is_connected(session
) && !send_dialog
->cancelled
)
448 gtk_main_iteration();
449 session_destroy(session
);
450 ac_prefs
->session
= NULL
;
451 send_progress_dialog_destroy(send_dialog
);
453 g_free(smtp_session
->from
);
454 g_free(smtp_session
->send_data
);
455 g_free(smtp_session
->error_msg
);
457 if (keep_session
&& ret
== 0 && ac_prefs
->session
== NULL
)
458 ac_prefs
->session
= SMTP_SESSION(session
);
461 statuswindow_pop_all();
462 statusbar_verbosity_set(FALSE
);
466 gint
send_message_smtp(PrefsAccount
*ac_prefs
, GSList
*to_list
, FILE *fp
)
468 return send_message_smtp_full(ac_prefs
, to_list
, fp
, FALSE
);
471 static gint
send_recv_message(Session
*session
, const gchar
*msg
, gpointer data
)
474 SMTPSession
*smtp_session
= SMTP_SESSION(session
);
475 SendProgressDialog
*dialog
= (SendProgressDialog
*)data
;
476 gchar
*state_str
= NULL
;
478 cm_return_val_if_fail(dialog
!= NULL
, -1);
480 switch (smtp_session
->state
) {
484 g_snprintf(buf
, sizeof(buf
), _("Sending HELO..."));
485 state_str
= _("Authenticating");
486 statuswindow_print_all(_("Sending message..."));
489 g_snprintf(buf
, sizeof(buf
), _("Sending EHLO..."));
490 state_str
= _("Authenticating");
491 statuswindow_print_all(_("Sending message..."));
494 g_snprintf(buf
, sizeof(buf
), _("Authenticating..."));
495 state_str
= _("Authenticating");
498 g_snprintf(buf
, sizeof(buf
), _("Sending MAIL FROM..."));
499 state_str
= _("Sending");
502 g_snprintf(buf
, sizeof(buf
), _("Sending RCPT TO..."));
503 state_str
= _("Sending");
507 g_snprintf(buf
, sizeof(buf
), _("Sending DATA..."));
508 state_str
= _("Sending");
511 g_snprintf(buf
, sizeof(buf
), _("Quitting..."));
512 state_str
= _("Quitting");
515 g_warning("send: error: %s\n", msg
);
521 progress_dialog_set_label(dialog
->dialog
, buf
);
522 progress_dialog_list_set_status(dialog
->dialog
, 0, state_str
);
527 static gint
send_send_data_progressive(Session
*session
, guint cur_len
,
528 guint total_len
, gpointer data
)
531 SendProgressDialog
*dialog
= (SendProgressDialog
*)data
;
532 MainWindow
*mainwin
= mainwindow_get_mainwindow();
534 cm_return_val_if_fail(dialog
!= NULL
, -1);
536 if (SMTP_SESSION(session
)->state
!= SMTP_SEND_DATA
&&
537 SMTP_SESSION(session
)->state
!= SMTP_EOM
)
540 g_snprintf(buf
, sizeof(buf
), _("Sending message (%d / %d bytes)"),
542 progress_dialog_set_label(dialog
->dialog
, buf
);
543 progress_dialog_set_fraction
544 (dialog
->dialog
, (total_len
== 0) ? 0 : (gfloat
)cur_len
/ (gfloat
)total_len
);
547 if (!gtk_widget_get_visible(mainwin
->progressbar
))
548 gtk_widget_show(mainwin
->progressbar
);
549 gtk_progress_bar_set_fraction
550 (GTK_PROGRESS_BAR(mainwin
->progressbar
),
551 (total_len
== 0) ? 0 : (gfloat
)cur_len
/ (gfloat
)total_len
);
557 static gint
send_send_data_finished(Session
*session
, guint len
, gpointer data
)
559 SendProgressDialog
*dialog
= (SendProgressDialog
*)data
;
560 MainWindow
*mainwin
= mainwindow_get_mainwindow();
562 cm_return_val_if_fail(dialog
!= NULL
, -1);
564 send_send_data_progressive(session
, len
, len
, dialog
);
566 gtk_widget_hide(mainwin
->progressbar
);
567 gtk_progress_bar_set_fraction
568 (GTK_PROGRESS_BAR(mainwin
->progressbar
),(gfloat
)0);
574 static void send_progress_dialog_size_allocate_cb(GtkWidget
*widget
,
575 GtkAllocation
*allocation
)
577 cm_return_if_fail(allocation
!= NULL
);
579 prefs_common
.sendwin_width
= allocation
->width
;
580 prefs_common
.sendwin_height
= allocation
->height
;
583 static SendProgressDialog
*send_progress_dialog_create(void)
585 SendProgressDialog
*dialog
;
586 ProgressDialog
*progress
;
587 static GdkGeometry geometry
;
589 dialog
= g_new0(SendProgressDialog
, 1);
591 progress
= progress_dialog_create();
592 gtk_window_set_title(GTK_WINDOW(progress
->window
),
593 _("Sending message"));
594 g_signal_connect(G_OBJECT(progress
->showlog_btn
), "clicked",
595 G_CALLBACK(send_showlog_button_cb
), dialog
);
596 g_signal_connect(G_OBJECT(progress
->cancel_btn
), "clicked",
597 G_CALLBACK(send_cancel_button_cb
), dialog
);
598 g_signal_connect(G_OBJECT(progress
->window
), "delete_event",
599 G_CALLBACK(gtk_true
), NULL
);
600 gtk_window_set_modal(GTK_WINDOW(progress
->window
), TRUE
);
601 g_signal_connect(G_OBJECT(progress
->window
), "size_allocate",
602 G_CALLBACK(send_progress_dialog_size_allocate_cb
), NULL
);
603 manage_window_set_transient(GTK_WINDOW(progress
->window
));
605 progress_dialog_get_fraction(progress
);
607 if (!geometry
.min_height
) {
608 geometry
.min_width
= 460;
609 geometry
.min_height
= 250;
612 gtk_window_set_geometry_hints(GTK_WINDOW(progress
->window
), NULL
, &geometry
,
614 gtk_widget_set_size_request(progress
->window
, prefs_common
.sendwin_width
,
615 prefs_common
.sendwin_height
);
617 if (!prefs_common
.send_dialog_invisible
) {
618 gtk_widget_show_now(progress
->window
);
621 dialog
->dialog
= progress
;
626 static void send_progress_dialog_destroy(SendProgressDialog
*dialog
)
628 cm_return_if_fail(dialog
!= NULL
);
629 if (!prefs_common
.send_dialog_invisible
) {
630 progress_dialog_destroy(dialog
->dialog
);
636 static void send_showlog_button_cb(GtkWidget
*widget
, gpointer data
)
638 MainWindow
*mainwin
= mainwindow_get_mainwindow();
640 log_window_show(mainwin
->logwin
);
643 static void send_cancel_button_cb(GtkWidget
*widget
, gpointer data
)
645 SendProgressDialog
*dialog
= (SendProgressDialog
*)data
;
646 statusbar_progress_all(0,0,0);
648 dialog
->cancelled
= TRUE
;
651 static void send_put_error(Session
*session
)
654 gchar
*log_msg
= NULL
;
655 gchar
*err_msg
= NULL
;
657 msg
= SMTP_SESSION(session
)->error_msg
;
659 switch (SMTP_SESSION(session
)->error_val
) {
661 case SM_UNRECOVERABLE
:
662 log_msg
= _("Error occurred while sending the message.");
664 err_msg
= g_strdup_printf
665 (_("Error occurred while sending the message:\n%s"),
668 err_msg
= g_strdup(log_msg
);
671 log_msg
= _("Authentication failed.");
673 err_msg
= g_strdup_printf
674 (_("Authentication failed:\n%s"), msg
);
676 err_msg
= g_strdup(log_msg
);
679 switch (session
->state
) {
682 _("Error occurred while sending the message.");
683 err_msg
= g_strdup(log_msg
);
686 log_msg
= _("Connection closed by the remote host.");
687 err_msg
= g_strdup(log_msg
);
689 case SESSION_TIMEOUT
:
690 log_msg
= _("Session timed out. You may be able to "
691 "recover by increasing the timeout value in "
692 "Preferences/Other/Miscellaneous.");
693 err_msg
= g_strdup(log_msg
);
702 log_error(LOG_PROTOCOL
, "%s\n", err_msg
);
706 log_warning(LOG_PROTOCOL
, "%s\n", log_msg
);