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. */
234 tmp_msginfo
= procheader_parse_stream(fp
, flags
, FALSE
, FALSE
);
235 fseek(fp
, fp_pos
, SEEK_SET
);
237 if (tmp_msginfo
&& tmp_msginfo
->from
) {
238 strncpy2(spec_from
, tmp_msginfo
->from
, BUFFSIZE
-1);
239 extract_address(spec_from
);
241 strncpy2(spec_from
, ac_prefs
->address
, BUFFSIZE
-1);
244 procmsg_msginfo_free(tmp_msginfo
);
247 if (!ac_prefs
->session
) {
248 /* we can't reuse a previously initialised session */
249 session
= smtp_session_new(ac_prefs
);
250 smtp_session
= SMTP_SESSION(session
);
252 if (ac_prefs
->set_domain
&& ac_prefs
->domain
&& strlen(ac_prefs
->domain
)) {
253 smtp_session
->hostname
= g_strdup(ac_prefs
->domain
);
255 smtp_session
->hostname
= NULL
;
259 port
= ac_prefs
->set_smtpport
? ac_prefs
->smtpport
:
260 ac_prefs
->ssl_smtp
== SSL_TUNNEL
? SSMTP_PORT
: SMTP_PORT
;
261 session
->ssl_type
= ac_prefs
->ssl_smtp
;
262 if (ac_prefs
->ssl_smtp
!= SSL_NONE
)
263 session
->nonblocking
= ac_prefs
->use_nonblocking_ssl
;
264 if (ac_prefs
->set_gnutls_priority
&& ac_prefs
->gnutls_priority
&&
265 strlen(ac_prefs
->gnutls_priority
))
266 session
->gnutls_priority
= g_strdup(ac_prefs
->gnutls_priority
);
268 if (ac_prefs
->ssl_smtp
!= SSL_NONE
) {
269 if (alertpanel_full(_("Insecure connection"),
270 _("This connection is configured to be secured "
271 "using SSL, but SSL is not available in this "
272 "build of Claws Mail. \n\n"
273 "Do you want to continue connecting to this "
274 "server? The communication would not be "
276 GTK_STOCK_CANCEL
, _("Con_tinue connecting"),
277 NULL
, FALSE
, NULL
, ALERT_WARNING
,
278 G_ALERTDEFAULT
) != G_ALERTALTERNATE
) {
279 session_destroy(session
);
283 port
= ac_prefs
->set_smtpport
? ac_prefs
->smtpport
: SMTP_PORT
;
286 if (ac_prefs
->use_smtp_auth
) {
287 smtp_session
->forced_auth_type
= ac_prefs
->smtp_auth_type
;
288 if (ac_prefs
->smtp_userid
&& strlen(ac_prefs
->smtp_userid
)) {
289 smtp_session
->user
= g_strdup(ac_prefs
->smtp_userid
);
290 if (password_get(smtp_session
->user
,
291 ac_prefs
->smtp_server
, "smtp", port
,
292 &(smtp_session
->pass
))) {
294 } else if (ac_prefs
->smtp_passwd
)
296 g_strdup(ac_prefs
->smtp_passwd
);
299 input_dialog_query_password_keep
300 (ac_prefs
->smtp_server
,
302 &(ac_prefs
->session_smtp_passwd
));
303 if (!smtp_session
->pass
) {
304 session_destroy(session
);
309 smtp_session
->user
= g_strdup(ac_prefs
->userid
);
310 if (password_get(smtp_session
->user
,
311 ac_prefs
->smtp_server
, "smtp", port
,
312 &(smtp_session
->pass
))) {
314 } else if (ac_prefs
->passwd
)
315 smtp_session
->pass
= g_strdup(ac_prefs
->passwd
);
318 input_dialog_query_password_keep
319 (ac_prefs
->smtp_server
,
321 &(ac_prefs
->session_smtp_passwd
));
322 if (!smtp_session
->pass
) {
323 session_destroy(session
);
329 smtp_session
->user
= NULL
;
330 smtp_session
->pass
= NULL
;
333 send_dialog
= send_progress_dialog_create();
334 send_dialog
->session
= session
;
335 smtp_session
->dialog
= send_dialog
;
337 progress_dialog_list_set(send_dialog
->dialog
, 0, NULL
,
338 ac_prefs
->smtp_server
,
341 if (ac_prefs
->pop_before_smtp
342 && (ac_prefs
->protocol
== A_APOP
|| ac_prefs
->protocol
== A_POP3
)
343 && (time(NULL
) - ac_prefs
->last_pop_login_time
) > (60 * ac_prefs
->pop_before_smtp_timeout
)) {
344 g_snprintf(buf
, sizeof(buf
), _("Doing POP before SMTP..."));
345 log_message(LOG_PROTOCOL
, "%s\n", buf
);
346 progress_dialog_set_label(send_dialog
->dialog
, buf
);
347 progress_dialog_list_set_status(send_dialog
->dialog
, 0, _("POP before SMTP"));
349 inc_pop_before_smtp(ac_prefs
);
352 g_snprintf(buf
, sizeof(buf
), _("Account '%s': Connecting to SMTP server: %s:%d..."),
353 ac_prefs
->account_name
, ac_prefs
->smtp_server
, port
);
354 progress_dialog_set_label(send_dialog
->dialog
, buf
);
355 log_message(LOG_PROTOCOL
, "%s\n", buf
);
357 session_set_recv_message_notify(session
, send_recv_message
, send_dialog
);
358 session_set_send_data_progressive_notify
359 (session
, send_send_data_progressive
, send_dialog
);
360 session_set_send_data_notify(session
, send_send_data_finished
, send_dialog
);
363 /* everything is ready to start at MAIL FROM:, just
364 * reinit useful variables.
366 session
= SESSION(ac_prefs
->session
);
367 ac_prefs
->session
= NULL
;
368 smtp_session
= SMTP_SESSION(session
);
369 smtp_session
->state
= SMTP_HELO
;
370 send_dialog
= (SendProgressDialog
*)smtp_session
->dialog
;
374 /* This has to be initialised for every mail sent */
375 smtp_session
->from
= g_strdup(spec_from
);
376 smtp_session
->to_list
= to_list
;
377 smtp_session
->cur_to
= to_list
;
378 smtp_session
->send_data
= (guchar
*)get_outgoing_rfc2822_str(fp
);
379 smtp_session
->send_data_len
= strlen((gchar
*)smtp_session
->send_data
);
381 session_set_timeout(session
,
382 prefs_common
.io_timeout_secs
* 1000);
383 /* connect if necessary */
384 if (!was_inited
&& session_connect(session
, ac_prefs
->smtp_server
, port
) < 0) {
385 session_destroy(session
);
386 send_progress_dialog_destroy(send_dialog
);
387 ac_prefs
->session
= NULL
;
391 debug_print("send_message_smtp(): begin event loop\n");
394 /* as the server is quiet, start sending ourselves */
395 smtp_from(smtp_session
);
398 while (session_is_running(session
) && send_dialog
->cancelled
== FALSE
399 && SMTP_SESSION(session
)->state
!= SMTP_MAIL_SENT_OK
)
400 gtk_main_iteration();
402 if (SMTP_SESSION(session
)->error_val
== SM_AUTHFAIL
) {
403 if (ac_prefs
->session_smtp_passwd
) {
404 g_free(ac_prefs
->session_smtp_passwd
);
405 ac_prefs
->session_smtp_passwd
= NULL
;
408 } else if (SMTP_SESSION(session
)->state
== SMTP_MAIL_SENT_OK
) {
409 log_message(LOG_PROTOCOL
, "%s\n", _("Mail sent successfully."));
411 } else if (session
->state
== SESSION_EOF
&&
412 SMTP_SESSION(session
)->state
== SMTP_QUIT
) {
413 /* consider EOF right after QUIT successful */
414 log_warning(LOG_PROTOCOL
, "%s\n", _("Connection closed by the remote host."));
416 } else if (session
->state
== SESSION_ERROR
||
417 session
->state
== SESSION_EOF
||
418 session
->state
== SESSION_TIMEOUT
||
419 SMTP_SESSION(session
)->state
== SMTP_ERROR
||
420 SMTP_SESSION(session
)->error_val
!= SM_OK
)
422 else if (send_dialog
->cancelled
== TRUE
)
426 manage_window_focus_in(send_dialog
->dialog
->window
, NULL
, NULL
);
427 send_put_error(session
);
428 manage_window_focus_out(send_dialog
->dialog
->window
, NULL
, NULL
);
431 /* if we should close the connection, let's do it.
432 * Close it in case of error, too, as it helps reinitializing things
435 if (!keep_session
|| ret
!= 0) {
436 if (session_is_connected(session
))
437 smtp_quit(smtp_session
);
438 while (session_is_connected(session
) && !send_dialog
->cancelled
)
439 gtk_main_iteration();
440 session_destroy(session
);
441 ac_prefs
->session
= NULL
;
442 send_progress_dialog_destroy(send_dialog
);
444 g_free(smtp_session
->from
);
445 g_free(smtp_session
->send_data
);
446 g_free(smtp_session
->error_msg
);
448 if (keep_session
&& ret
== 0 && ac_prefs
->session
== NULL
)
449 ac_prefs
->session
= SMTP_SESSION(session
);
452 statuswindow_pop_all();
453 statusbar_verbosity_set(FALSE
);
457 gint
send_message_smtp(PrefsAccount
*ac_prefs
, GSList
*to_list
, FILE *fp
)
459 return send_message_smtp_full(ac_prefs
, to_list
, fp
, FALSE
);
462 static gint
send_recv_message(Session
*session
, const gchar
*msg
, gpointer data
)
465 SMTPSession
*smtp_session
= SMTP_SESSION(session
);
466 SendProgressDialog
*dialog
= (SendProgressDialog
*)data
;
467 gchar
*state_str
= NULL
;
469 cm_return_val_if_fail(dialog
!= NULL
, -1);
471 switch (smtp_session
->state
) {
476 g_snprintf(buf
, sizeof(buf
), _("Sending HELO..."));
477 state_str
= _("Authenticating");
478 statuswindow_print_all(_("Sending message..."));
481 g_snprintf(buf
, sizeof(buf
), _("Sending EHLO..."));
482 state_str
= _("Authenticating");
483 statuswindow_print_all(_("Sending message..."));
486 g_snprintf(buf
, sizeof(buf
), _("Authenticating..."));
487 state_str
= _("Authenticating");
490 g_snprintf(buf
, sizeof(buf
), _("Sending MAIL FROM..."));
491 state_str
= _("Sending");
494 g_snprintf(buf
, sizeof(buf
), _("Sending RCPT TO..."));
495 state_str
= _("Sending");
499 g_snprintf(buf
, sizeof(buf
), _("Sending DATA..."));
500 state_str
= _("Sending");
503 g_snprintf(buf
, sizeof(buf
), _("Quitting..."));
504 state_str
= _("Quitting");
507 g_warning("send: error: %s\n", msg
);
513 progress_dialog_set_label(dialog
->dialog
, buf
);
514 progress_dialog_list_set_status(dialog
->dialog
, 0, state_str
);
519 static gint
send_send_data_progressive(Session
*session
, guint cur_len
,
520 guint total_len
, gpointer data
)
523 SendProgressDialog
*dialog
= (SendProgressDialog
*)data
;
524 MainWindow
*mainwin
= mainwindow_get_mainwindow();
526 cm_return_val_if_fail(dialog
!= NULL
, -1);
528 if (SMTP_SESSION(session
)->state
!= SMTP_SEND_DATA
&&
529 SMTP_SESSION(session
)->state
!= SMTP_EOM
)
532 g_snprintf(buf
, sizeof(buf
), _("Sending message (%d / %d bytes)"),
534 progress_dialog_set_label(dialog
->dialog
, buf
);
535 progress_dialog_set_fraction
536 (dialog
->dialog
, (total_len
== 0) ? 0 : (gfloat
)cur_len
/ (gfloat
)total_len
);
539 if (!gtk_widget_get_visible(mainwin
->progressbar
))
540 gtk_widget_show(mainwin
->progressbar
);
541 gtk_progress_bar_set_fraction
542 (GTK_PROGRESS_BAR(mainwin
->progressbar
),
543 (total_len
== 0) ? 0 : (gfloat
)cur_len
/ (gfloat
)total_len
);
549 static gint
send_send_data_finished(Session
*session
, guint len
, gpointer data
)
551 SendProgressDialog
*dialog
= (SendProgressDialog
*)data
;
552 MainWindow
*mainwin
= mainwindow_get_mainwindow();
554 cm_return_val_if_fail(dialog
!= NULL
, -1);
556 send_send_data_progressive(session
, len
, len
, dialog
);
558 gtk_widget_hide(mainwin
->progressbar
);
559 gtk_progress_bar_set_fraction
560 (GTK_PROGRESS_BAR(mainwin
->progressbar
),(gfloat
)0);
566 static void send_progress_dialog_size_allocate_cb(GtkWidget
*widget
,
567 GtkAllocation
*allocation
)
569 cm_return_if_fail(allocation
!= NULL
);
571 prefs_common
.sendwin_width
= allocation
->width
;
572 prefs_common
.sendwin_height
= allocation
->height
;
575 static SendProgressDialog
*send_progress_dialog_create(void)
577 SendProgressDialog
*dialog
;
578 ProgressDialog
*progress
;
579 static GdkGeometry geometry
;
581 dialog
= g_new0(SendProgressDialog
, 1);
583 progress
= progress_dialog_create();
584 gtk_window_set_title(GTK_WINDOW(progress
->window
),
585 _("Sending message"));
586 g_signal_connect(G_OBJECT(progress
->showlog_btn
), "clicked",
587 G_CALLBACK(send_showlog_button_cb
), dialog
);
588 g_signal_connect(G_OBJECT(progress
->cancel_btn
), "clicked",
589 G_CALLBACK(send_cancel_button_cb
), dialog
);
590 g_signal_connect(G_OBJECT(progress
->window
), "delete_event",
591 G_CALLBACK(gtk_true
), NULL
);
592 gtk_window_set_modal(GTK_WINDOW(progress
->window
), TRUE
);
593 g_signal_connect(G_OBJECT(progress
->window
), "size_allocate",
594 G_CALLBACK(send_progress_dialog_size_allocate_cb
), NULL
);
595 manage_window_set_transient(GTK_WINDOW(progress
->window
));
597 progress_dialog_get_fraction(progress
);
599 if (!geometry
.min_height
) {
600 geometry
.min_width
= 460;
601 geometry
.min_height
= 250;
604 gtk_window_set_geometry_hints(GTK_WINDOW(progress
->window
), NULL
, &geometry
,
606 gtk_widget_set_size_request(progress
->window
, prefs_common
.sendwin_width
,
607 prefs_common
.sendwin_height
);
609 if (!prefs_common
.send_dialog_invisible
) {
610 gtk_widget_show_now(progress
->window
);
613 dialog
->dialog
= progress
;
618 static void send_progress_dialog_destroy(SendProgressDialog
*dialog
)
620 cm_return_if_fail(dialog
!= NULL
);
621 if (!prefs_common
.send_dialog_invisible
) {
622 progress_dialog_destroy(dialog
->dialog
);
628 static void send_showlog_button_cb(GtkWidget
*widget
, gpointer data
)
630 MainWindow
*mainwin
= mainwindow_get_mainwindow();
632 log_window_show(mainwin
->logwin
);
635 static void send_cancel_button_cb(GtkWidget
*widget
, gpointer data
)
637 SendProgressDialog
*dialog
= (SendProgressDialog
*)data
;
638 statusbar_progress_all(0,0,0);
640 dialog
->cancelled
= TRUE
;
643 static void send_put_error(Session
*session
)
646 gchar
*log_msg
= NULL
;
647 gchar
*err_msg
= NULL
;
649 msg
= SMTP_SESSION(session
)->error_msg
;
651 switch (SMTP_SESSION(session
)->error_val
) {
653 case SM_UNRECOVERABLE
:
654 log_msg
= _("Error occurred while sending the message.");
656 err_msg
= g_strdup_printf
657 (_("Error occurred while sending the message:\n%s"),
660 err_msg
= g_strdup(log_msg
);
663 log_msg
= _("Authentication failed.");
665 err_msg
= g_strdup_printf
666 (_("Authentication failed:\n%s"), msg
);
668 err_msg
= g_strdup(log_msg
);
671 switch (session
->state
) {
674 _("Error occurred while sending the message.");
675 err_msg
= g_strdup(log_msg
);
678 log_msg
= _("Connection closed by the remote host.");
679 err_msg
= g_strdup(log_msg
);
681 case SESSION_TIMEOUT
:
682 log_msg
= _("Session timed out. You may be able to "
683 "recover by increasing the timeout value in "
684 "Preferences/Other/Miscellaneous.");
685 err_msg
= g_strdup(log_msg
);
694 log_error(LOG_PROTOCOL
, "%s\n", err_msg
);
698 log_warning(LOG_PROTOCOL
, "%s\n", log_msg
);