2006-12-04 [colin] 2.6.1cvs2
[claws.git] / src / compose.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2006 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 2 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, write to the Free Software
17  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
18  */
19
20 #ifdef HAVE_CONFIG_H
21 #  include "config.h"
22 #endif
23
24 #include "defs.h"
25
26 #ifndef PANGO_ENABLE_ENGINE
27 #  define PANGO_ENABLE_ENGINE
28 #endif
29
30 #include <glib.h>
31 #include <glib/gi18n.h>
32 #include <gdk/gdkkeysyms.h>
33 #include <gtk/gtkmain.h>
34 #include <gtk/gtkmenu.h>
35 #include <gtk/gtkmenuitem.h>
36 #include <gtk/gtkitemfactory.h>
37 #include <gtk/gtkcheckmenuitem.h>
38 #include <gtk/gtkoptionmenu.h>
39 #include <gtk/gtkwidget.h>
40 #include <gtk/gtkvpaned.h>
41 #include <gtk/gtkentry.h>
42 #include <gtk/gtkeditable.h>
43 #include <gtk/gtkwindow.h>
44 #include <gtk/gtksignal.h>
45 #include <gtk/gtkvbox.h>
46 #include <gtk/gtkcontainer.h>
47 #include <gtk/gtkhandlebox.h>
48 #include <gtk/gtktoolbar.h>
49 #include <gtk/gtktable.h>
50 #include <gtk/gtkhbox.h>
51 #include <gtk/gtklabel.h>
52 #include <gtk/gtkscrolledwindow.h>
53 #include <gtk/gtktreeview.h>
54 #include <gtk/gtkliststore.h>
55 #include <gtk/gtktreeselection.h>
56 #include <gtk/gtktreemodel.h>
57
58 #include <gtk/gtkdnd.h>
59 #include <gtk/gtkclipboard.h>
60 #include <pango/pango-break.h>
61 #include <stdio.h>
62 #include <stdlib.h>
63 #include <string.h>
64 #include <ctype.h>
65 #include <sys/types.h>
66 #include <sys/stat.h>
67 #include <unistd.h>
68 #include <time.h>
69 #include <stdlib.h>
70 #if HAVE_SYS_WAIT_H
71 #  include <sys/wait.h>
72 #endif
73 #include <signal.h>
74 #include <errno.h>
75 #ifndef G_OS_WIN32  /* fixme we should have a configure test. */
76 #include <libgen.h>
77 #endif
78
79 #if (HAVE_WCTYPE_H && HAVE_WCHAR_H)
80 #  include <wchar.h>
81 #  include <wctype.h>
82 #endif
83
84 #include "claws.h"
85 #include "main.h"
86 #include "mainwindow.h"
87 #include "compose.h"
88 #include "addressbook.h"
89 #include "folderview.h"
90 #include "procmsg.h"
91 #include "menu.h"
92 #include "stock_pixmap.h"
93 #include "send_message.h"
94 #include "imap.h"
95 #include "news.h"
96 #include "customheader.h"
97 #include "prefs_common.h"
98 #include "prefs_account.h"
99 #include "action.h"
100 #include "account.h"
101 #include "filesel.h"
102 #include "procheader.h"
103 #include "procmime.h"
104 #include "statusbar.h"
105 #include "about.h"
106 #include "base64.h"
107 #include "quoted-printable.h"
108 #include "codeconv.h"
109 #include "utils.h"
110 #include "gtkutils.h"
111 #include "socket.h"
112 #include "alertpanel.h"
113 #include "manage_window.h"
114 #include "gtkshruler.h"
115 #include "folder.h"
116 #include "addr_compl.h"
117 #include "quote_fmt.h"
118 #include "undo.h"
119 #include "foldersel.h"
120 #include "toolbar.h"
121 #include "inc.h"
122 #include "message_search.h"
123 #include "combobox.h"
124 #include "hooks.h"
125
126 enum
127 {
128         COL_MIMETYPE = 0,
129         COL_SIZE     = 1,
130         COL_NAME     = 2,
131         COL_DATA     = 3,
132         COL_AUTODATA = 4,
133         N_COL_COLUMNS
134 };
135
136 #define N_ATTACH_COLS   (N_COL_COLUMNS)
137
138 typedef enum
139 {
140         COMPOSE_CALL_ADVANCED_ACTION_MOVE_BEGINNING_OF_LINE,
141         COMPOSE_CALL_ADVANCED_ACTION_MOVE_FORWARD_CHARACTER,
142         COMPOSE_CALL_ADVANCED_ACTION_MOVE_BACKWARD_CHARACTER,
143         COMPOSE_CALL_ADVANCED_ACTION_MOVE_FORWARD_WORD,
144         COMPOSE_CALL_ADVANCED_ACTION_MOVE_BACKWARD_WORD,
145         COMPOSE_CALL_ADVANCED_ACTION_MOVE_END_OF_LINE,
146         COMPOSE_CALL_ADVANCED_ACTION_MOVE_NEXT_LINE,
147         COMPOSE_CALL_ADVANCED_ACTION_MOVE_PREVIOUS_LINE,
148         COMPOSE_CALL_ADVANCED_ACTION_DELETE_FORWARD_CHARACTER,
149         COMPOSE_CALL_ADVANCED_ACTION_DELETE_BACKWARD_CHARACTER,
150         COMPOSE_CALL_ADVANCED_ACTION_DELETE_FORWARD_WORD,
151         COMPOSE_CALL_ADVANCED_ACTION_DELETE_BACKWARD_WORD,
152         COMPOSE_CALL_ADVANCED_ACTION_DELETE_LINE,
153         COMPOSE_CALL_ADVANCED_ACTION_DELETE_LINE_N,
154         COMPOSE_CALL_ADVANCED_ACTION_DELETE_TO_LINE_END
155 } ComposeCallAdvancedAction;
156
157 typedef enum
158 {
159         PRIORITY_HIGHEST = 1,
160         PRIORITY_HIGH,
161         PRIORITY_NORMAL,
162         PRIORITY_LOW,
163         PRIORITY_LOWEST
164 } PriorityLevel;
165
166 typedef enum
167 {
168         COMPOSE_INSERT_SUCCESS,
169         COMPOSE_INSERT_READ_ERROR,
170         COMPOSE_INSERT_INVALID_CHARACTER,
171         COMPOSE_INSERT_NO_FILE
172 } ComposeInsertResult;
173
174 typedef enum
175 {
176         COMPOSE_QUIT_EDITING,
177         COMPOSE_KEEP_EDITING,
178         COMPOSE_AUTO_SAVE
179 } ComposeDraftAction;
180
181 typedef enum
182 {
183         COMPOSE_WRITE_FOR_SEND,
184         COMPOSE_WRITE_FOR_STORE
185 } ComposeWriteType;
186
187 #define B64_LINE_SIZE           57
188 #define B64_BUFFSIZE            77
189
190 #define MAX_REFERENCES_LEN      999
191
192 static GList *compose_list = NULL;
193
194 Compose *compose_generic_new                    (PrefsAccount   *account,
195                                                  const gchar    *to,
196                                                  FolderItem     *item,
197                                                  GPtrArray      *attach_files,
198                                                  GList          *listAddress );
199
200 static Compose *compose_create                  (PrefsAccount   *account,
201                                                  ComposeMode     mode,
202                                                  gboolean batch);
203
204 static GtkWidget *compose_account_option_menu_create
205                                                 (Compose        *compose);
206 static void compose_set_out_encoding            (Compose        *compose);
207 static void compose_set_template_menu           (Compose        *compose);
208 static void compose_template_apply              (Compose        *compose,
209                                                  Template       *tmpl,
210                                                  gboolean        replace);
211 static void compose_destroy                     (Compose        *compose);
212
213 static void compose_entries_set                 (Compose        *compose,
214                                                  const gchar    *mailto);
215 static gint compose_parse_header                (Compose        *compose,
216                                                  MsgInfo        *msginfo);
217 static gchar *compose_parse_references          (const gchar    *ref,
218                                                  const gchar    *msgid);
219
220 static gchar *compose_quote_fmt                 (Compose        *compose,
221                                                  MsgInfo        *msginfo,
222                                                  const gchar    *fmt,
223                                                  const gchar    *qmark,
224                                                  const gchar    *body,
225                                                  gboolean        rewrap,
226                                                  gboolean        need_unescape,
227                                                  const gchar *err_msg);
228
229 static void compose_reply_set_entry             (Compose        *compose,
230                                                  MsgInfo        *msginfo,
231                                                  gboolean        to_all,
232                                                  gboolean        to_ml,
233                                                  gboolean        to_sender,
234                                                  gboolean
235                                                  followup_and_reply_to);
236 static void compose_reedit_set_entry            (Compose        *compose,
237                                                  MsgInfo        *msginfo);
238
239 static void compose_insert_sig                  (Compose        *compose,
240                                                  gboolean        replace);
241 static gchar *compose_get_signature_str         (Compose        *compose);
242 static ComposeInsertResult compose_insert_file  (Compose        *compose,
243                                                  const gchar    *file);
244
245 static gboolean compose_attach_append           (Compose        *compose,
246                                                  const gchar    *file,
247                                                  const gchar    *type,
248                                                  const gchar    *content_type);
249 static void compose_attach_parts                (Compose        *compose,
250                                                  MsgInfo        *msginfo);
251
252 static void compose_beautify_paragraph          (Compose        *compose,
253                                                  GtkTextIter    *par_iter,
254                                                  gboolean        force);
255 static void compose_wrap_all                    (Compose        *compose);
256 static void compose_wrap_all_full               (Compose        *compose,
257                                                  gboolean        autowrap);
258
259 static void compose_set_title                   (Compose        *compose);
260 static void compose_select_account              (Compose        *compose,
261                                                  PrefsAccount   *account,
262                                                  gboolean        init);
263
264 static PrefsAccount *compose_current_mail_account(void);
265 /* static gint compose_send                     (Compose        *compose); */
266 static gboolean compose_check_for_valid_recipient
267                                                 (Compose        *compose);
268 static gboolean compose_check_entries           (Compose        *compose,
269                                                  gboolean       check_everything);
270 static gint compose_write_to_file               (Compose        *compose,
271                                                  FILE           *fp,
272                                                  gint            action,
273                                                  gboolean        attach_parts);
274 static gint compose_write_body_to_file          (Compose        *compose,
275                                                  const gchar    *file);
276 static gint compose_remove_reedit_target        (Compose        *compose,
277                                                  gboolean        force);
278 void compose_remove_draft                       (Compose        *compose);
279 static gint compose_queue_sub                   (Compose        *compose,
280                                                  gint           *msgnum,
281                                                  FolderItem     **item,
282                                                  gchar          **msgpath,
283                                                  gboolean       check_subject,
284                                                  gboolean       remove_reedit_target);
285 static void compose_add_attachments             (Compose        *compose,
286                                                  MimeInfo       *parent);
287 static gchar *compose_get_header                (Compose        *compose);
288
289 static void compose_convert_header              (Compose        *compose,
290                                                  gchar          *dest,
291                                                  gint            len,
292                                                  gchar          *src,
293                                                  gint            header_len,
294                                                  gboolean        addr_field);
295
296 static void compose_attach_info_free            (AttachInfo     *ainfo);
297 static void compose_attach_remove_selected      (Compose        *compose);
298
299 static void compose_attach_property             (Compose        *compose);
300 static void compose_attach_property_create      (gboolean       *cancelled);
301 static void attach_property_ok                  (GtkWidget      *widget,
302                                                  gboolean       *cancelled);
303 static void attach_property_cancel              (GtkWidget      *widget,
304                                                  gboolean       *cancelled);
305 static gint attach_property_delete_event        (GtkWidget      *widget,
306                                                  GdkEventAny    *event,
307                                                  gboolean       *cancelled);
308 static gboolean attach_property_key_pressed     (GtkWidget      *widget,
309                                                  GdkEventKey    *event,
310                                                  gboolean       *cancelled);
311
312 static void compose_exec_ext_editor             (Compose        *compose);
313 #ifdef G_OS_UNIX
314 static gint compose_exec_ext_editor_real        (const gchar    *file);
315 static gboolean compose_ext_editor_kill         (Compose        *compose);
316 static gboolean compose_input_cb                (GIOChannel     *source,
317                                                  GIOCondition    condition,
318                                                  gpointer        data);
319 static void compose_set_ext_editor_sensitive    (Compose        *compose,
320                                                  gboolean        sensitive);
321 #endif /* G_OS_UNIX */
322
323 static void compose_undo_state_changed          (UndoMain       *undostruct,
324                                                  gint            undo_state,
325                                                  gint            redo_state,
326                                                  gpointer        data);
327
328 static void compose_create_header_entry (Compose *compose);
329 static void compose_add_header_entry    (Compose *compose, gchar *header, gchar *text);
330 static void compose_remove_header_entries(Compose *compose);
331
332 static void compose_update_priority_menu_item(Compose * compose);
333 #if USE_ASPELL
334 static void compose_spell_menu_changed  (void *data);
335 #endif
336 static void compose_add_field_list      ( Compose *compose,
337                                           GList *listAddress );
338
339 /* callback functions */
340
341 static gboolean compose_edit_size_alloc (GtkEditable    *widget,
342                                          GtkAllocation  *allocation,
343                                          GtkSHRuler     *shruler);
344 static void account_activated           (GtkComboBox *optmenu,
345                                          gpointer        data);
346 static void attach_selected             (GtkTreeView    *tree_view, 
347                                          GtkTreePath    *tree_path,
348                                          GtkTreeViewColumn *column, 
349                                          Compose *compose);
350 static gboolean attach_button_pressed   (GtkWidget      *widget,
351                                          GdkEventButton *event,
352                                          gpointer        data);
353 static gboolean attach_key_pressed      (GtkWidget      *widget,
354                                          GdkEventKey    *event,
355                                          gpointer        data);
356
357 static void compose_send_cb             (gpointer        data,
358                                          guint           action,
359                                          GtkWidget      *widget);
360 static void compose_send_later_cb       (gpointer        data,
361                                          guint           action,
362                                          GtkWidget      *widget);
363
364 static void compose_draft_cb            (gpointer        data,
365                                          guint           action,
366                                          GtkWidget      *widget);
367
368 static void compose_attach_cb           (gpointer        data,
369                                          guint           action,
370                                          GtkWidget      *widget);
371 static void compose_insert_file_cb      (gpointer        data,
372                                          guint           action,
373                                          GtkWidget      *widget);
374 static void compose_insert_sig_cb       (gpointer        data,
375                                          guint           action,
376                                          GtkWidget      *widget);
377
378 static void compose_close_cb            (gpointer        data,
379                                          guint           action,
380                                          GtkWidget      *widget);
381
382 static void compose_set_encoding_cb     (gpointer        data,
383                                          guint           action,
384                                          GtkWidget      *widget);
385
386 static void compose_address_cb          (gpointer        data,
387                                          guint           action,
388                                          GtkWidget      *widget);
389 static void compose_template_activate_cb(GtkWidget      *widget,
390                                          gpointer        data);
391
392 static void compose_ext_editor_cb       (gpointer        data,
393                                          guint           action,
394                                          GtkWidget      *widget);
395
396 static gint compose_delete_cb           (GtkWidget      *widget,
397                                          GdkEventAny    *event,
398                                          gpointer        data);
399
400 static void compose_undo_cb             (Compose        *compose);
401 static void compose_redo_cb             (Compose        *compose);
402 static void compose_cut_cb              (Compose        *compose);
403 static void compose_copy_cb             (Compose        *compose);
404 static void compose_paste_cb            (Compose        *compose);
405 static void compose_paste_as_quote_cb   (Compose        *compose);
406 static void compose_paste_no_wrap_cb    (Compose        *compose);
407 static void compose_paste_wrap_cb       (Compose        *compose);
408 static void compose_allsel_cb           (Compose        *compose);
409
410 static void compose_advanced_action_cb  (Compose                   *compose,
411                                          ComposeCallAdvancedAction  action);
412
413 static void compose_grab_focus_cb       (GtkWidget      *widget,
414                                          Compose        *compose);
415
416 static void compose_changed_cb          (GtkTextBuffer  *textbuf,
417                                          Compose        *compose);
418
419 static void compose_wrap_cb             (gpointer        data,
420                                          guint           action,
421                                          GtkWidget      *widget);
422 static void compose_find_cb             (gpointer        data,
423                                          guint           action,
424                                          GtkWidget      *widget);
425 static void compose_toggle_autowrap_cb  (gpointer        data,
426                                          guint           action,
427                                          GtkWidget      *widget);
428
429 static void compose_toggle_ruler_cb     (gpointer        data,
430                                          guint           action,
431                                          GtkWidget      *widget);
432 static void compose_toggle_sign_cb      (gpointer        data,
433                                          guint           action,
434                                          GtkWidget      *widget);
435 static void compose_toggle_encrypt_cb   (gpointer        data,
436                                          guint           action,
437                                          GtkWidget      *widget);
438 static void compose_set_privacy_system_cb(GtkWidget      *widget,
439                                           gpointer        data);
440 static void compose_update_privacy_system_menu_item(Compose * compose, gboolean warn);
441 static void activate_privacy_system     (Compose *compose, 
442                                          PrefsAccount *account,
443                                          gboolean warn);
444 static void compose_use_signing(Compose *compose, gboolean use_signing);
445 static void compose_use_encryption(Compose *compose, gboolean use_encryption);
446 static void compose_toggle_return_receipt_cb(gpointer data, guint action,
447                                              GtkWidget *widget);
448 static void compose_toggle_remove_refs_cb(gpointer data, guint action,
449                                              GtkWidget *widget);
450 static void compose_set_priority_cb     (gpointer        data,
451                                          guint           action,
452                                          GtkWidget      *widget);
453 static void compose_reply_change_mode   (gpointer        data,
454                                          ComposeMode    action,
455                                          GtkWidget      *widget);
456
457 static void compose_attach_drag_received_cb (GtkWidget          *widget,
458                                              GdkDragContext     *drag_context,
459                                              gint                x,
460                                              gint                y,
461                                              GtkSelectionData   *data,
462                                              guint               info,
463                                              guint               time,
464                                              gpointer            user_data);
465 static void compose_insert_drag_received_cb (GtkWidget          *widget,
466                                              GdkDragContext     *drag_context,
467                                              gint                x,
468                                              gint                y,
469                                              GtkSelectionData   *data,
470                                              guint               info,
471                                              guint               time,
472                                              gpointer            user_data);
473 static void compose_header_drag_received_cb (GtkWidget          *widget,
474                                              GdkDragContext     *drag_context,
475                                              gint                x,
476                                              gint                y,
477                                              GtkSelectionData   *data,
478                                              guint               info,
479                                              guint               time,
480                                              gpointer            user_data);
481
482 static gboolean compose_drag_drop           (GtkWidget *widget,
483                                              GdkDragContext *drag_context,
484                                              gint x, gint y,
485                                              guint time, gpointer user_data);
486
487 static void text_inserted               (GtkTextBuffer  *buffer,
488                                          GtkTextIter    *iter,
489                                          const gchar    *text,
490                                          gint            len,
491                                          Compose        *compose);
492 static Compose *compose_generic_reply(MsgInfo *msginfo, gboolean quote,
493                                   gboolean to_all, gboolean to_ml,
494                                   gboolean to_sender,
495                                   gboolean followup_and_reply_to,
496                                   const gchar *body);
497
498 gboolean compose_headerentry_changed_cb    (GtkWidget          *entry,
499                                             ComposeHeaderEntry *headerentry);
500 gboolean compose_headerentry_key_press_event_cb(GtkWidget              *entry,
501                                             GdkEventKey        *event,
502                                             ComposeHeaderEntry *headerentry);
503
504 static void compose_show_first_last_header (Compose *compose, gboolean show_first);
505
506 static void compose_allow_user_actions (Compose *compose, gboolean allow);
507
508 #if USE_ASPELL
509 static void compose_check_all              (Compose *compose);
510 static void compose_highlight_all          (Compose *compose);
511 static void compose_check_backwards        (Compose *compose);
512 static void compose_check_forwards_go      (Compose *compose);
513 #endif
514
515 static gint compose_defer_auto_save_draft       (Compose        *compose);
516 static PrefsAccount *compose_guess_forward_account_from_msginfo (MsgInfo *msginfo);
517
518 static MsgInfo *compose_msginfo_new_from_compose(Compose *compose);
519
520 static GtkItemFactoryEntry compose_popup_entries[] =
521 {
522         {N_("/_Add..."),        NULL, compose_attach_cb, 0, NULL},
523         {N_("/_Remove"),        NULL, compose_attach_remove_selected, 0, NULL},
524         {"/---",                NULL, NULL, 0, "<Separator>"},
525         {N_("/_Properties..."), NULL, compose_attach_property, 0, NULL}
526 };
527
528 static GtkItemFactoryEntry compose_entries[] =
529 {
530         {N_("/_Message"),                               NULL, NULL, 0, "<Branch>"},
531         {N_("/_Message/_Send"),         "<control>Return",
532                                         compose_send_cb, 0, NULL},
533         {N_("/_Message/Send _later"),   "<shift><control>S",
534                                         compose_send_later_cb,  0, NULL},
535         {N_("/_Message/---"),                   NULL, NULL, 0, "<Separator>"},
536         {N_("/_Message/_Attach file"),          "<control>M", compose_attach_cb,      0, NULL},
537         {N_("/_Message/_Insert file"),          "<control>I", compose_insert_file_cb, 0, NULL},
538         {N_("/_Message/Insert si_gnature"),     "<control>G", compose_insert_sig_cb,  0, NULL},
539         {N_("/_Message/---"),                   NULL, NULL, 0, "<Separator>"},
540         {N_("/_Message/_Save"),
541                                                 "<control>S", compose_draft_cb, COMPOSE_KEEP_EDITING, NULL},
542         {N_("/_Message/---"),                   NULL, NULL, 0, "<Separator>"},
543         {N_("/_Message/_Close"),                        "<control>W", compose_close_cb, 0, NULL},
544
545         {N_("/_Edit"),                  NULL, NULL, 0, "<Branch>"},
546         {N_("/_Edit/_Undo"),            "<control>Z", compose_undo_cb, 0, NULL},
547         {N_("/_Edit/_Redo"),            "<control>Y", compose_redo_cb, 0, NULL},
548         {N_("/_Edit/---"),              NULL, NULL, 0, "<Separator>"},
549         {N_("/_Edit/Cu_t"),             "<control>X", compose_cut_cb,    0, NULL},
550         {N_("/_Edit/_Copy"),            "<control>C", compose_copy_cb,   0, NULL},
551         {N_("/_Edit/_Paste"),           "<control>V", compose_paste_cb,  0, NULL},
552         {N_("/_Edit/Special paste"),    NULL, NULL, 0, "<Branch>"},
553         {N_("/_Edit/Special paste/as _quotation"),
554                                         NULL, compose_paste_as_quote_cb, 0, NULL},
555         {N_("/_Edit/Special paste/_wrapped"),
556                                         NULL, compose_paste_wrap_cb, 0, NULL},
557         {N_("/_Edit/Special paste/_unwrapped"),
558                                         NULL, compose_paste_no_wrap_cb, 0, NULL},
559         {N_("/_Edit/Select _all"),      "<control>A", compose_allsel_cb, 0, NULL},
560         {N_("/_Edit/A_dvanced"),        NULL, NULL, 0, "<Branch>"},
561         {N_("/_Edit/A_dvanced/Move a character backward"),
562                                         "<shift><control>B",
563                                         compose_advanced_action_cb,
564                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_BACKWARD_CHARACTER,
565                                         NULL},
566         {N_("/_Edit/A_dvanced/Move a character forward"),
567                                         "<shift><control>F",
568                                         compose_advanced_action_cb,
569                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_FORWARD_CHARACTER,
570                                         NULL},
571         {N_("/_Edit/A_dvanced/Move a word backward"),
572                                         NULL, /* "<alt>B" */
573                                         compose_advanced_action_cb,
574                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_BACKWARD_WORD,
575                                         NULL},
576         {N_("/_Edit/A_dvanced/Move a word forward"),
577                                         NULL, /* "<alt>F" */
578                                         compose_advanced_action_cb,
579                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_FORWARD_WORD,
580                                         NULL},
581         {N_("/_Edit/A_dvanced/Move to beginning of line"),
582                                         NULL, /* "<control>A" */
583                                         compose_advanced_action_cb,
584                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_BEGINNING_OF_LINE,
585                                         NULL},
586         {N_("/_Edit/A_dvanced/Move to end of line"),
587                                         "<control>E",
588                                         compose_advanced_action_cb,
589                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_END_OF_LINE,
590                                         NULL},
591         {N_("/_Edit/A_dvanced/Move to previous line"),
592                                         "<control>P",
593                                         compose_advanced_action_cb,
594                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_PREVIOUS_LINE,
595                                         NULL},
596         {N_("/_Edit/A_dvanced/Move to next line"),
597                                         "<control>N",
598                                         compose_advanced_action_cb,
599                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_NEXT_LINE,
600                                         NULL},
601         {N_("/_Edit/A_dvanced/Delete a character backward"),
602                                         "<control>H",
603                                         compose_advanced_action_cb,
604                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_BACKWARD_CHARACTER,
605                                         NULL},
606         {N_("/_Edit/A_dvanced/Delete a character forward"),
607                                         "<control>D",
608                                         compose_advanced_action_cb,
609                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_FORWARD_CHARACTER,
610                                         NULL},
611         {N_("/_Edit/A_dvanced/Delete a word backward"),
612                                         NULL, /* "<control>W" */
613                                         compose_advanced_action_cb,
614                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_BACKWARD_WORD,
615                                         NULL},
616         {N_("/_Edit/A_dvanced/Delete a word forward"),
617                                         NULL, /* "<alt>D", */
618                                         compose_advanced_action_cb,
619                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_FORWARD_WORD,
620                                         NULL},
621         {N_("/_Edit/A_dvanced/Delete line"),
622                                         "<control>U",
623                                         compose_advanced_action_cb,
624                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_LINE,
625                                         NULL},
626         {N_("/_Edit/A_dvanced/Delete entire line"),
627                                         NULL,
628                                         compose_advanced_action_cb,
629                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_LINE_N,
630                                         NULL},
631         {N_("/_Edit/A_dvanced/Delete to end of line"),
632                                         "<control>K",
633                                         compose_advanced_action_cb,
634                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_TO_LINE_END,
635                                         NULL},
636         {N_("/_Edit/---"),              NULL, NULL, 0, "<Separator>"},
637         {N_("/_Edit/_Find"),
638                                         "<control>F", compose_find_cb, 0, NULL},
639         {N_("/_Edit/---"),                      NULL, NULL, 0, "<Separator>"},
640         {N_("/_Edit/_Wrap current paragraph"),
641                                         "<control>L", compose_wrap_cb, 0, NULL},
642         {N_("/_Edit/Wrap all long _lines"),
643                                         "<control><alt>L", compose_wrap_cb, 1, NULL},
644         {N_("/_Edit/Aut_o wrapping"),   "<shift><control>L", compose_toggle_autowrap_cb, 0, "<ToggleItem>"},
645         {N_("/_Edit/---"),              NULL, NULL, 0, "<Separator>"},
646         {N_("/_Edit/Edit with e_xternal editor"),
647                                         "<shift><control>X", compose_ext_editor_cb, 0, NULL},
648 #if USE_ASPELL
649         {N_("/_Spelling"),              NULL, NULL, 0, "<Branch>"},
650         {N_("/_Spelling/_Check all or check selection"),
651                                         NULL, compose_check_all, 0, NULL},
652         {N_("/_Spelling/_Highlight all misspelled words"),
653                                         NULL, compose_highlight_all, 0, NULL},
654         {N_("/_Spelling/Check _backwards misspelled word"),
655                                         NULL, compose_check_backwards , 0, NULL},
656         {N_("/_Spelling/_Forward to next misspelled word"),
657                                         NULL, compose_check_forwards_go, 0, NULL},
658         {N_("/_Spelling/---"),          NULL, NULL, 0, "<Separator>"},
659         {N_("/_Spelling/Options"),
660                                         NULL, NULL, 0, "<Branch>"},
661 #endif
662         {N_("/_Options"),               NULL, NULL, 0, "<Branch>"},
663         {N_("/_Options/Reply _mode"),           NULL, NULL,   0, "<Branch>"},
664         {N_("/_Options/Reply _mode/_Normal"),   NULL, compose_reply_change_mode,   COMPOSE_REPLY, "<RadioItem>"},
665         {N_("/_Options/Reply _mode/_All"),              NULL, compose_reply_change_mode,   COMPOSE_REPLY_TO_ALL, "/Options/Reply mode/Normal"},
666         {N_("/_Options/Reply _mode/_Sender"),           NULL, compose_reply_change_mode,   COMPOSE_REPLY_TO_SENDER, "/Options/Reply mode/Normal"},
667         {N_("/_Options/Reply _mode/_Mailing-list"),     NULL, compose_reply_change_mode,   COMPOSE_REPLY_TO_LIST, "/Options/Reply mode/Normal"},
668         {N_("/_Options/---"),           NULL,           NULL,   0, "<Separator>"},
669         {N_("/_Options/Privacy _System"),               NULL, NULL,   0, "<Branch>"},
670         {N_("/_Options/Privacy _System/None"),  NULL, NULL,   0, "<RadioItem>"},
671         {N_("/_Options/Si_gn"),         NULL, compose_toggle_sign_cb   , 0, "<ToggleItem>"},
672         {N_("/_Options/_Encrypt"),      NULL, compose_toggle_encrypt_cb, 0, "<ToggleItem>"},
673         {N_("/_Options/---"),           NULL,           NULL,   0, "<Separator>"},
674         {N_("/_Options/_Priority"),     NULL,           NULL,   0, "<Branch>"},
675         {N_("/_Options/Priority/_Highest"), NULL, compose_set_priority_cb, PRIORITY_HIGHEST, "<RadioItem>"},
676         {N_("/_Options/Priority/Hi_gh"),    NULL, compose_set_priority_cb, PRIORITY_HIGH, "/Options/Priority/Highest"},
677         {N_("/_Options/Priority/_Normal"),  NULL, compose_set_priority_cb, PRIORITY_NORMAL, "/Options/Priority/Highest"},
678         {N_("/_Options/Priority/Lo_w"),    NULL, compose_set_priority_cb, PRIORITY_LOW, "/Options/Priority/Highest"},
679         {N_("/_Options/Priority/_Lowest"),  NULL, compose_set_priority_cb, PRIORITY_LOWEST, "/Options/Priority/Highest"},
680         {N_("/_Options/---"),           NULL,           NULL,   0, "<Separator>"},
681         {N_("/_Options/_Request Return Receipt"),       NULL, compose_toggle_return_receipt_cb, 0, "<ToggleItem>"},
682         {N_("/_Options/---"),           NULL,           NULL,   0, "<Separator>"},
683         {N_("/_Options/Remo_ve references"),    NULL, compose_toggle_remove_refs_cb, 0, "<ToggleItem>"},
684         {N_("/_Options/---"),           NULL,           NULL,   0, "<Separator>"},
685
686 #define ENC_ACTION(action) \
687         NULL, compose_set_encoding_cb, action, \
688         "/Options/Character encoding/Automatic"
689
690         {N_("/_Options/Character _encoding"), NULL, NULL, 0, "<Branch>"},
691         {N_("/_Options/Character _encoding/_Automatic"),
692                         NULL, compose_set_encoding_cb, C_AUTO, "<RadioItem>"},
693         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
694
695         {N_("/_Options/Character _encoding/7bit ascii (US-ASC_II)"),
696          ENC_ACTION(C_US_ASCII)},
697         {N_("/_Options/Character _encoding/Unicode (_UTF-8)"),
698          ENC_ACTION(C_UTF_8)},
699         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
700
701         {N_("/_Options/Character _encoding/Western European (ISO-8859-_1)"),
702          ENC_ACTION(C_ISO_8859_1)},
703         {N_("/_Options/Character _encoding/Western European (ISO-8859-15)"),
704          ENC_ACTION(C_ISO_8859_15)},
705         {N_("/_Options/Character _encoding/Western European (Windows-1252)"),
706          ENC_ACTION(C_WINDOWS_1252)},
707         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
708
709         {N_("/_Options/Character _encoding/Central European (ISO-8859-_2)"),
710          ENC_ACTION(C_ISO_8859_2)},
711         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
712
713         {N_("/_Options/Character _encoding/_Baltic (ISO-8859-13)"),
714          ENC_ACTION(C_ISO_8859_13)},
715         {N_("/_Options/Character _encoding/Baltic (ISO-8859-_4)"),
716          ENC_ACTION(C_ISO_8859_4)},
717         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
718
719         {N_("/_Options/Character _encoding/Greek (ISO-8859-_7)"),
720          ENC_ACTION(C_ISO_8859_7)},
721         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
722
723         {N_("/_Options/Character _encoding/Hebrew (ISO-8859-_8)"),
724          ENC_ACTION(C_ISO_8859_8)},
725         {N_("/_Options/Character _encoding/Hebrew (Windows-1255)"),
726          ENC_ACTION(C_WINDOWS_1255)},
727         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
728
729         {N_("/_Options/Character _encoding/Arabic (ISO-8859-_6)"),
730          ENC_ACTION(C_ISO_8859_6)},
731         {N_("/_Options/Character _encoding/Arabic (Windows-1256)"),
732          ENC_ACTION(C_CP1256)},
733         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
734
735         {N_("/_Options/Character _encoding/Turkish (ISO-8859-_9)"),
736          ENC_ACTION(C_ISO_8859_9)},
737         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
738
739         {N_("/_Options/Character _encoding/Cyrillic (ISO-8859-_5)"),
740          ENC_ACTION(C_ISO_8859_5)},
741         {N_("/_Options/Character _encoding/Cyrillic (KOI8-_R)"),
742          ENC_ACTION(C_KOI8_R)},
743         {N_("/_Options/Character _encoding/Cyrillic (KOI8-U)"),
744          ENC_ACTION(C_KOI8_U)},
745         {N_("/_Options/Character _encoding/Cyrillic (Windows-1251)"),
746          ENC_ACTION(C_WINDOWS_1251)},
747         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
748
749         {N_("/_Options/Character _encoding/Japanese (ISO-2022-_JP)"),
750          ENC_ACTION(C_ISO_2022_JP)},
751         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
752
753         {N_("/_Options/Character _encoding/Simplified Chinese (_GB2312)"),
754          ENC_ACTION(C_GB2312)},
755         {N_("/_Options/Character _encoding/Simplified Chinese (GBK)"),
756          ENC_ACTION(C_GBK)},
757         {N_("/_Options/Character _encoding/Traditional Chinese (_Big5)"),
758          ENC_ACTION(C_BIG5)},
759         {N_("/_Options/Character _encoding/Traditional Chinese (EUC-_TW)"),
760          ENC_ACTION(C_EUC_TW)},
761         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
762
763         {N_("/_Options/Character _encoding/Korean (EUC-_KR)"),
764          ENC_ACTION(C_EUC_KR)},
765         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
766
767         {N_("/_Options/Character _encoding/Thai (TIS-620)"),
768          ENC_ACTION(C_TIS_620)},
769         {N_("/_Options/Character _encoding/Thai (Windows-874)"),
770          ENC_ACTION(C_WINDOWS_874)},
771
772         {N_("/_Tools"),                 NULL, NULL, 0, "<Branch>"},
773         {N_("/_Tools/Show _ruler"),     NULL, compose_toggle_ruler_cb, 0, "<ToggleItem>"},
774         {N_("/_Tools/_Address book"),   "<shift><control>A", compose_address_cb , 0, NULL},
775         {N_("/_Tools/_Template"),       NULL, NULL, 0, "<Branch>"},
776         {N_("/_Tools/Actio_ns"),        NULL, NULL, 0, "<Branch>"},
777         {N_("/_Help"),                  NULL, NULL, 0, "<Branch>"},
778         {N_("/_Help/_About"),           NULL, about_show, 0, NULL}
779 };
780
781 static GtkTargetEntry compose_mime_types[] =
782 {
783         {"text/uri-list", 0, 0},
784         {"UTF8_STRING", 0, 0},
785         {"text/plain", 0, 0}
786 };
787
788 static gboolean compose_put_existing_to_front(MsgInfo *info)
789 {
790         GList *compose_list = compose_get_compose_list();
791         GList *elem = NULL;
792         
793         if (compose_list) {
794                 for (elem = compose_list; elem != NULL && elem->data != NULL; 
795                      elem = elem->next) {
796                         Compose *c = (Compose*)elem->data;
797
798                         if (!c->targetinfo || !c->targetinfo->msgid ||
799                             !info->msgid)
800                                 continue;
801
802                         if (!strcmp(c->targetinfo->msgid, info->msgid)) {
803                                 gtkut_window_popup(c->window);
804                                 return TRUE;
805                         }
806                 }
807         }
808         return FALSE;
809 }
810
811 static GdkColor quote_color1 = 
812         {(gulong)0, (gushort)0, (gushort)0, (gushort)0};
813 static GdkColor quote_color2 = 
814         {(gulong)0, (gushort)0, (gushort)0, (gushort)0};
815 static GdkColor quote_color3 = 
816         {(gulong)0, (gushort)0, (gushort)0, (gushort)0};
817
818 static GdkColor quote_bgcolor1 = 
819         {(gulong)0, (gushort)0, (gushort)0, (gushort)0};
820 static GdkColor quote_bgcolor2 = 
821         {(gulong)0, (gushort)0, (gushort)0, (gushort)0};
822 static GdkColor quote_bgcolor3 = 
823         {(gulong)0, (gushort)0, (gushort)0, (gushort)0};
824
825 static GdkColor signature_color = {
826         (gulong)0,
827         (gushort)0x7fff,
828         (gushort)0x7fff,
829         (gushort)0x7fff
830 };
831
832 static GdkColor uri_color = {
833         (gulong)0,
834         (gushort)0,
835         (gushort)0,
836         (gushort)0
837 };
838
839 static void compose_create_tags(GtkTextView *text, Compose *compose)
840 {
841         GtkTextBuffer *buffer;
842         GdkColor black = {(gulong)0, (gushort)0, (gushort)0, (gushort)0};
843         GdkColormap *cmap;
844         GdkColor color[8];
845         gboolean success[8];
846         int i;
847
848         buffer = gtk_text_view_get_buffer(text);
849
850         if (prefs_common.enable_color) {
851                 /* grab the quote colors, converting from an int to a GdkColor */
852                 gtkut_convert_int_to_gdk_color(prefs_common.quote_level1_col,
853                                                &quote_color1);
854                 gtkut_convert_int_to_gdk_color(prefs_common.quote_level2_col,
855                                                &quote_color2);
856                 gtkut_convert_int_to_gdk_color(prefs_common.quote_level3_col,
857                                                &quote_color3);
858                 gtkut_convert_int_to_gdk_color(prefs_common.quote_level1_bgcol,
859                                                &quote_bgcolor1);
860                 gtkut_convert_int_to_gdk_color(prefs_common.quote_level2_bgcol,
861                                                &quote_bgcolor2);
862                 gtkut_convert_int_to_gdk_color(prefs_common.quote_level3_bgcol,
863                                                &quote_bgcolor3);
864                 gtkut_convert_int_to_gdk_color(prefs_common.signature_col,
865                                                &signature_color);
866                 gtkut_convert_int_to_gdk_color(prefs_common.uri_col,
867                                                &uri_color);
868         } else {
869                 signature_color = quote_color1 = quote_color2 = quote_color3 = 
870                         quote_bgcolor1 = quote_bgcolor2 = quote_bgcolor3 = uri_color = black;
871         }
872
873         if (prefs_common.enable_color && prefs_common.enable_bgcolor) {
874                 gtk_text_buffer_create_tag(buffer, "quote0",
875                                            "foreground-gdk", &quote_color1,
876                                            "paragraph-background-gdk", &quote_bgcolor1,
877                                            NULL);
878                 gtk_text_buffer_create_tag(buffer, "quote1",
879                                            "foreground-gdk", &quote_color2,
880                                            "paragraph-background-gdk", &quote_bgcolor2,
881                                            NULL);
882                 gtk_text_buffer_create_tag(buffer, "quote2",
883                                            "foreground-gdk", &quote_color3,
884                                            "paragraph-background-gdk", &quote_bgcolor3,
885                                            NULL);
886         } else {
887                 gtk_text_buffer_create_tag(buffer, "quote0",
888                                            "foreground-gdk", &quote_color1,
889                                            NULL);
890                 gtk_text_buffer_create_tag(buffer, "quote1",
891                                            "foreground-gdk", &quote_color2,
892                                            NULL);
893                 gtk_text_buffer_create_tag(buffer, "quote2",
894                                            "foreground-gdk", &quote_color3,
895                                            NULL);
896         }
897         
898         gtk_text_buffer_create_tag(buffer, "signature",
899                                    "foreground-gdk", &signature_color,
900                                    NULL);
901         gtk_text_buffer_create_tag(buffer, "link",
902                                         "foreground-gdk", &uri_color,
903                                          NULL);
904         compose->no_wrap_tag = gtk_text_buffer_create_tag(buffer, "no_wrap", NULL);
905         compose->no_join_tag = gtk_text_buffer_create_tag(buffer, "no_join", NULL);
906
907         color[0] = quote_color1;
908         color[1] = quote_color2;
909         color[2] = quote_color3;
910         color[3] = quote_bgcolor1;
911         color[4] = quote_bgcolor2;
912         color[5] = quote_bgcolor3;
913         color[6] = signature_color;
914         color[7] = uri_color;
915         cmap = gdk_drawable_get_colormap(compose->window->window);
916         gdk_colormap_alloc_colors(cmap, color, 8, FALSE, TRUE, success);
917
918         for (i = 0; i < 8; i++) {
919                 if (success[i] == FALSE) {
920                         GtkStyle *style;
921
922                         g_warning("Compose: color allocation failed.\n");
923                         style = gtk_widget_get_style(GTK_WIDGET(text));
924                         quote_color1 = quote_color2 = quote_color3 = 
925                                 quote_bgcolor1 = quote_bgcolor2 = quote_bgcolor3 = 
926                                 signature_color = uri_color = black;
927                 }
928         }
929 }
930
931 Compose *compose_new(PrefsAccount *account, const gchar *mailto,
932                      GPtrArray *attach_files)
933 {
934         return compose_generic_new(account, mailto, NULL, attach_files, NULL);
935 }
936
937 Compose *compose_new_with_folderitem(PrefsAccount *account, FolderItem *item, const gchar *mailto)
938 {
939         return compose_generic_new(account, mailto, item, NULL, NULL);
940 }
941
942 Compose *compose_new_with_list( PrefsAccount *account, GList *listAddress )
943 {
944         return compose_generic_new( account, NULL, NULL, NULL, listAddress );
945 }
946
947 Compose *compose_generic_new(PrefsAccount *account, const gchar *mailto, FolderItem *item,
948                              GPtrArray *attach_files, GList *listAddress )
949 {
950         Compose *compose;
951         GtkTextView *textview;
952         GtkTextBuffer *textbuf;
953         GtkTextIter iter;
954         GtkItemFactory *ifactory;
955
956         if (item && item->prefs && item->prefs->enable_default_account)
957                 account = account_find_from_id(item->prefs->default_account);
958
959         if (!account) account = cur_account;
960         g_return_val_if_fail(account != NULL, NULL);
961
962         compose = compose_create(account, COMPOSE_NEW, FALSE);
963
964         ifactory = gtk_item_factory_from_widget(compose->menubar);
965
966         compose->replyinfo = NULL;
967         compose->fwdinfo   = NULL;
968
969         textview = GTK_TEXT_VIEW(compose->text);
970         textbuf = gtk_text_view_get_buffer(textview);
971         compose_create_tags(textview, compose);
972
973         undo_block(compose->undostruct);
974 #ifdef USE_ASPELL
975         if (item && item->prefs && item->prefs->enable_default_dictionary &&
976             compose->gtkaspell) {
977                 gtkaspell_change_dict(compose->gtkaspell, 
978                     item->prefs->default_dictionary);
979                 compose_spell_menu_changed(compose);
980         }
981 #endif
982
983         if (account->auto_sig)
984                 compose_insert_sig(compose, FALSE);
985         gtk_text_buffer_get_start_iter(textbuf, &iter);
986         gtk_text_buffer_place_cursor(textbuf, &iter);
987
988         if (account->protocol != A_NNTP) {
989                 if (mailto && *mailto != '\0') {
990                         compose_entries_set(compose, mailto);
991
992                 } else if (item && item->prefs->enable_default_to) {
993                         compose_entry_append(compose, item->prefs->default_to, COMPOSE_TO);
994                         compose_entry_mark_default_to(compose, item->prefs->default_to);
995                 }
996                 if (item && item->ret_rcpt) {
997                         menu_set_active(ifactory, "/Options/Request Return Receipt", TRUE);
998                 }
999         } else {
1000                 if (mailto) {
1001                         compose_entry_append(compose, mailto, COMPOSE_NEWSGROUPS);
1002                 } else if (item && FOLDER_CLASS(item->folder) == news_get_class()) {
1003                         compose_entry_append(compose, item->path, COMPOSE_NEWSGROUPS);
1004                 }
1005                 /*
1006                  * CLAWS: just don't allow return receipt request, even if the user
1007                  * may want to send an email. simple but foolproof.
1008                  */
1009                 menu_set_sensitive(ifactory, "/Options/Request Return Receipt", FALSE); 
1010         }
1011         compose_add_field_list( compose, listAddress );
1012
1013         if (prefs_common.compose_with_format) {
1014                 MsgInfo* dummyinfo = NULL;
1015
1016                 if ( prefs_common.compose_subject_format
1017                          && *prefs_common.compose_subject_format != '\0' )
1018                 {
1019                         gchar *subject = NULL;
1020                         gchar *tmp = NULL;
1021                         gchar *buf = NULL;
1022
1023                         dummyinfo = compose_msginfo_new_from_compose(compose);
1024
1025                         /* decode \-escape sequences in the internal representation of the quote format */
1026                         tmp = malloc(strlen(prefs_common.compose_subject_format)+1);
1027                         pref_get_unescaped_pref(tmp, prefs_common.compose_subject_format);
1028
1029                         subject = gtk_editable_get_chars(GTK_EDITABLE(compose->subject_entry), 0, -1);
1030                         quote_fmt_init(dummyinfo, NULL, subject, FALSE, compose->account);
1031                         quote_fmt_scan_string(tmp);
1032                         quote_fmt_parse();
1033
1034                         buf = quote_fmt_get_buffer();
1035                         if (buf == NULL)
1036                                 alertpanel_error(_("New message subject format error."));
1037                         else
1038                                 gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), buf);
1039                         quote_fmt_reset_vartable();
1040
1041                         g_free(subject);
1042                         g_free(tmp);
1043                 }
1044
1045                 if ( prefs_common.compose_body_format
1046                          && *prefs_common.compose_body_format != '\0' )
1047                 {
1048                         GtkTextView *text;
1049                         GtkTextBuffer *buffer;
1050                         GtkTextIter start, end;
1051                         gchar *tmp = NULL;
1052
1053                         if ( dummyinfo == NULL )
1054                                 dummyinfo = compose_msginfo_new_from_compose(compose);
1055
1056                         text = GTK_TEXT_VIEW(compose->text);
1057                         buffer = gtk_text_view_get_buffer(text);
1058                         gtk_text_buffer_get_start_iter(buffer, &start);
1059                         gtk_text_buffer_get_iter_at_offset(buffer, &end, -1);
1060                         tmp = gtk_text_buffer_get_text(buffer, &start, &end, FALSE);
1061
1062                         compose_quote_fmt(compose, dummyinfo,
1063                                           prefs_common.compose_body_format,
1064                                           NULL, tmp, FALSE, TRUE,
1065                                                   _("New message body format error."));
1066                         quote_fmt_reset_vartable();
1067
1068                         g_free(tmp);
1069                 }
1070
1071                 procmsg_msginfo_free( dummyinfo );
1072         }
1073
1074         if (attach_files) {
1075                 gint i;
1076                 gchar *file;
1077
1078                 for (i = 0; i < attach_files->len; i++) {
1079                         file = g_ptr_array_index(attach_files, i);
1080                         compose_attach_append(compose, file, file, NULL);
1081                 }
1082         }
1083
1084         compose_show_first_last_header(compose, TRUE);
1085
1086         /* Set save folder */
1087         if (item && item->prefs && item->prefs->save_copy_to_folder) {
1088                 gchar *folderidentifier;
1089
1090                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), prefs_common.savemsg);
1091                 folderidentifier = folder_item_get_identifier(item);
1092                 gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), folderidentifier);
1093                 g_free(folderidentifier);
1094         }
1095         
1096         gtk_widget_grab_focus(compose->header_last->entry);
1097
1098         undo_unblock(compose->undostruct);
1099
1100         if (prefs_common.auto_exteditor)
1101                 compose_exec_ext_editor(compose);
1102
1103         compose->modified = FALSE;
1104         compose_set_title(compose);
1105         return compose;
1106 }
1107
1108 static void compose_force_encryption(Compose *compose, PrefsAccount *account,
1109                 gboolean override_pref)
1110 {
1111         gchar *privacy = NULL;
1112
1113         g_return_if_fail(compose != NULL);
1114         g_return_if_fail(account != NULL);
1115
1116         if (override_pref == FALSE && account->default_encrypt_reply == FALSE)
1117                 return;
1118
1119         if (account->default_privacy_system
1120         &&  strlen(account->default_privacy_system)) {
1121                 privacy = account->default_privacy_system;
1122         } else {
1123                 GSList *privacy_avail = privacy_get_system_ids();
1124                 if (privacy_avail && g_slist_length(privacy_avail)) {
1125                         privacy = (gchar *)(privacy_avail->data);
1126                 }
1127         }
1128         if (privacy != NULL) {
1129                 compose->privacy_system = g_strdup(privacy);
1130                 compose_update_privacy_system_menu_item(compose, FALSE);
1131                 compose_use_encryption(compose, TRUE);
1132         }
1133 }       
1134
1135 static void compose_force_signing(Compose *compose, PrefsAccount *account)
1136 {
1137         gchar *privacy = NULL;
1138
1139         if (account->default_privacy_system
1140         &&  strlen(account->default_privacy_system)) {
1141                 privacy = account->default_privacy_system;
1142         } else {
1143                 GSList *privacy_avail = privacy_get_system_ids();
1144                 if (privacy_avail && g_slist_length(privacy_avail)) {
1145                         privacy = (gchar *)(privacy_avail->data);
1146                 }
1147         }
1148         if (privacy != NULL) {
1149                 compose->privacy_system = g_strdup(privacy);
1150                 compose_update_privacy_system_menu_item(compose, FALSE);
1151                 compose_use_signing(compose, TRUE);
1152         }
1153 }       
1154
1155 Compose *compose_reply_mode(ComposeMode mode, GSList *msginfo_list, gchar *body)
1156 {
1157         MsgInfo *msginfo;
1158         guint list_len;
1159         Compose *compose = NULL;
1160         GtkItemFactory *ifactory = NULL;
1161         
1162         g_return_val_if_fail(msginfo_list != NULL, NULL);
1163
1164         msginfo = (MsgInfo*)g_slist_nth_data(msginfo_list, 0);
1165         g_return_val_if_fail(msginfo != NULL, NULL);
1166
1167         list_len = g_slist_length(msginfo_list);
1168
1169         switch (mode) {
1170         case COMPOSE_REPLY:
1171                 compose = compose_reply(msginfo, prefs_common.reply_with_quote,
1172                               FALSE, prefs_common.default_reply_list, FALSE, body);
1173                 break;
1174         case COMPOSE_REPLY_WITH_QUOTE:
1175                 compose = compose_reply(msginfo, TRUE, 
1176                         FALSE, prefs_common.default_reply_list, FALSE, body);
1177                 break;
1178         case COMPOSE_REPLY_WITHOUT_QUOTE:
1179                 compose = compose_reply(msginfo, FALSE, 
1180                         FALSE, prefs_common.default_reply_list, FALSE, NULL);
1181                 break;
1182         case COMPOSE_REPLY_TO_SENDER:
1183                 compose = compose_reply(msginfo, prefs_common.reply_with_quote,
1184                               FALSE, FALSE, TRUE, body);
1185                 break;
1186         case COMPOSE_FOLLOWUP_AND_REPLY_TO:
1187                 compose = compose_followup_and_reply_to(msginfo,
1188                                               prefs_common.reply_with_quote,
1189                                               FALSE, FALSE, body);
1190                 break;
1191         case COMPOSE_REPLY_TO_SENDER_WITH_QUOTE:
1192                 compose = compose_reply(msginfo, TRUE, 
1193                         FALSE, FALSE, TRUE, body);
1194                 break;
1195         case COMPOSE_REPLY_TO_SENDER_WITHOUT_QUOTE:
1196                 compose = compose_reply(msginfo, FALSE, 
1197                         FALSE, FALSE, TRUE, NULL);
1198                 break;
1199         case COMPOSE_REPLY_TO_ALL:
1200                 compose = compose_reply(msginfo, prefs_common.reply_with_quote,
1201                         TRUE, FALSE, FALSE, body);
1202                 break;
1203         case COMPOSE_REPLY_TO_ALL_WITH_QUOTE:
1204                 compose = compose_reply(msginfo, TRUE, 
1205                         TRUE, FALSE, FALSE, body);
1206                 break;
1207         case COMPOSE_REPLY_TO_ALL_WITHOUT_QUOTE:
1208                 compose = compose_reply(msginfo, FALSE, 
1209                         TRUE, FALSE, FALSE, NULL);
1210                 break;
1211         case COMPOSE_REPLY_TO_LIST:
1212                 compose = compose_reply(msginfo, prefs_common.reply_with_quote,
1213                         FALSE, TRUE, FALSE, body);
1214                 break;
1215         case COMPOSE_REPLY_TO_LIST_WITH_QUOTE:
1216                 compose = compose_reply(msginfo, TRUE, 
1217                         FALSE, TRUE, FALSE, body);
1218                 break;
1219         case COMPOSE_REPLY_TO_LIST_WITHOUT_QUOTE:
1220                 compose = compose_reply(msginfo, FALSE, 
1221                         FALSE, TRUE, FALSE, NULL);
1222                 break;
1223         case COMPOSE_FORWARD:
1224                 if (prefs_common.forward_as_attachment) {
1225                         compose = compose_reply_mode(COMPOSE_FORWARD_AS_ATTACH, msginfo_list, body);
1226                         return compose;
1227                 } else {
1228                         compose = compose_reply_mode(COMPOSE_FORWARD_INLINE, msginfo_list, body);
1229                         return compose;
1230                 }
1231                 break;
1232         case COMPOSE_FORWARD_INLINE:
1233                 /* check if we reply to more than one Message */
1234                 if (list_len == 1) {
1235                         compose = compose_forward(NULL, msginfo, FALSE, body, FALSE, FALSE);
1236                         break;
1237                 } 
1238                 /* more messages FALL THROUGH */
1239         case COMPOSE_FORWARD_AS_ATTACH:
1240                 compose = compose_forward_multiple(NULL, msginfo_list);
1241                 break;
1242         case COMPOSE_REDIRECT:
1243                 compose = compose_redirect(NULL, msginfo, FALSE);
1244                 break;
1245         default:
1246                 g_warning("compose_reply(): invalid Compose Mode: %d\n", mode);
1247         }
1248         
1249         ifactory = gtk_item_factory_from_widget(compose->menubar);
1250
1251         compose->rmode = mode;
1252         switch (compose->rmode) {
1253         case COMPOSE_REPLY:
1254         case COMPOSE_REPLY_WITH_QUOTE:
1255         case COMPOSE_REPLY_WITHOUT_QUOTE:
1256         case COMPOSE_FOLLOWUP_AND_REPLY_TO:
1257                 debug_print("reply mode Normal\n");
1258                 menu_set_active(ifactory, "/Options/Reply mode/Normal", TRUE);
1259                 compose_reply_change_mode(compose, COMPOSE_REPLY, NULL); /* force update */
1260                 break;
1261         case COMPOSE_REPLY_TO_SENDER:
1262         case COMPOSE_REPLY_TO_SENDER_WITH_QUOTE:
1263         case COMPOSE_REPLY_TO_SENDER_WITHOUT_QUOTE:
1264                 debug_print("reply mode Sender\n");
1265                 menu_set_active(ifactory, "/Options/Reply mode/Sender", TRUE);
1266                 break;
1267         case COMPOSE_REPLY_TO_ALL:
1268         case COMPOSE_REPLY_TO_ALL_WITH_QUOTE:
1269         case COMPOSE_REPLY_TO_ALL_WITHOUT_QUOTE:
1270                 debug_print("reply mode All\n");
1271                 menu_set_active(ifactory, "/Options/Reply mode/All", TRUE);
1272                 break;
1273         case COMPOSE_REPLY_TO_LIST:
1274         case COMPOSE_REPLY_TO_LIST_WITH_QUOTE:
1275         case COMPOSE_REPLY_TO_LIST_WITHOUT_QUOTE:
1276                 debug_print("reply mode List\n");
1277                 menu_set_active(ifactory, "/Options/Reply mode/Mailing-list", TRUE);
1278                 break;
1279         default:
1280                 break;
1281         }
1282         return compose;
1283 }
1284
1285 Compose *compose_reply(MsgInfo *msginfo, gboolean quote, gboolean to_all,
1286                    gboolean to_ml, gboolean to_sender, 
1287                    const gchar *body)
1288 {
1289         return compose_generic_reply(msginfo, quote, to_all, to_ml, 
1290                               to_sender, FALSE, body);
1291 }
1292
1293 Compose *compose_followup_and_reply_to(MsgInfo *msginfo, gboolean quote,
1294                                    gboolean to_all,
1295                                    gboolean to_sender,
1296                                    const gchar *body)
1297 {
1298         return compose_generic_reply(msginfo, quote, to_all, FALSE, 
1299                               to_sender, TRUE, body);
1300 }
1301
1302 static void compose_extract_original_charset(Compose *compose)
1303 {
1304         MsgInfo *info = NULL;
1305         if (compose->replyinfo) {
1306                 info = compose->replyinfo;
1307         } else if (compose->fwdinfo) {
1308                 info = compose->fwdinfo;
1309         } else if (compose->targetinfo) {
1310                 info = compose->targetinfo;
1311         }
1312         if (info) {
1313                 MimeInfo *mimeinfo = procmime_scan_message(info);
1314                 MimeInfo *partinfo = mimeinfo;
1315                 while (partinfo && partinfo->type != MIMETYPE_TEXT)
1316                         partinfo = procmime_mimeinfo_next(partinfo);
1317                 if (partinfo) {
1318                         compose->orig_charset = 
1319                                 g_strdup(procmime_mimeinfo_get_parameter(
1320                                                 partinfo, "charset"));
1321                 }
1322                 procmime_mimeinfo_free_all(mimeinfo);
1323         }
1324 }
1325
1326 #define SIGNAL_BLOCK(buffer) {                                  \
1327         g_signal_handlers_block_by_func(G_OBJECT(buffer),       \
1328                                 G_CALLBACK(compose_changed_cb), \
1329                                 compose);                       \
1330         g_signal_handlers_block_by_func(G_OBJECT(buffer),       \
1331                                 G_CALLBACK(text_inserted),      \
1332                                 compose);                       \
1333 }
1334
1335 #define SIGNAL_UNBLOCK(buffer) {                                \
1336         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),     \
1337                                 G_CALLBACK(compose_changed_cb), \
1338                                 compose);                       \
1339         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),     \
1340                                 G_CALLBACK(text_inserted),      \
1341                                 compose);                       \
1342 }
1343
1344 static Compose *compose_generic_reply(MsgInfo *msginfo, gboolean quote,
1345                                   gboolean to_all, gboolean to_ml,
1346                                   gboolean to_sender,
1347                                   gboolean followup_and_reply_to,
1348                                   const gchar *body)
1349 {
1350         GtkItemFactory *ifactory;
1351         Compose *compose;
1352         PrefsAccount *account = NULL;
1353         PrefsAccount *reply_account;
1354         GtkTextView *textview;
1355         GtkTextBuffer *textbuf;
1356
1357         g_return_val_if_fail(msginfo != NULL, NULL);
1358         g_return_val_if_fail(msginfo->folder != NULL, NULL);
1359
1360         account = account_get_reply_account(msginfo, prefs_common.reply_account_autosel);
1361
1362         g_return_val_if_fail(account != NULL, NULL);
1363
1364         if (to_sender && account->protocol == A_NNTP &&
1365             !followup_and_reply_to) {
1366                 reply_account =
1367                         account_find_from_address(account->address);
1368                 if (!reply_account)
1369                         reply_account = compose_current_mail_account();
1370                 if (!reply_account)
1371                         return NULL;
1372         } else
1373                 reply_account = account;
1374
1375         compose = compose_create(account, COMPOSE_REPLY, FALSE);
1376
1377         compose->updating = TRUE;
1378
1379         ifactory = gtk_item_factory_from_widget(compose->menubar);
1380
1381         menu_set_active(ifactory, "/Options/Remove references", FALSE);
1382         menu_set_sensitive(ifactory, "/Options/Remove references", TRUE);
1383
1384         compose->replyinfo = procmsg_msginfo_get_full_info(msginfo);
1385         if (!compose->replyinfo)
1386                 compose->replyinfo = procmsg_msginfo_copy(msginfo);
1387
1388         compose_extract_original_charset(compose);
1389         
1390         if (msginfo->folder && msginfo->folder->ret_rcpt)
1391                 menu_set_active(ifactory, "/Options/Request Return Receipt", TRUE);
1392
1393         /* Set save folder */
1394         if (msginfo->folder && msginfo->folder->prefs && msginfo->folder->prefs->save_copy_to_folder) {
1395                 gchar *folderidentifier;
1396
1397                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), TRUE);
1398                 folderidentifier = folder_item_get_identifier(msginfo->folder);
1399                 gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), folderidentifier);
1400                 g_free(folderidentifier);
1401         }
1402
1403         if (compose_parse_header(compose, msginfo) < 0) return NULL;
1404
1405         textview = (GTK_TEXT_VIEW(compose->text));
1406         textbuf = gtk_text_view_get_buffer(textview);
1407         compose_create_tags(textview, compose);
1408
1409         undo_block(compose->undostruct);
1410 #ifdef USE_ASPELL
1411         if (msginfo->folder && msginfo->folder->prefs && 
1412             msginfo->folder->prefs && 
1413             msginfo->folder->prefs->enable_default_dictionary &&
1414             compose->gtkaspell) {
1415                 gtkaspell_change_dict(compose->gtkaspell, 
1416                     msginfo->folder->prefs->default_dictionary);
1417                 compose_spell_menu_changed(compose);
1418         }
1419 #endif
1420
1421         if (quote) {
1422                 gchar *qmark;
1423
1424                 if (prefs_common.quotemark && *prefs_common.quotemark)
1425                         qmark = prefs_common.quotemark;
1426                 else
1427                         qmark = "> ";
1428
1429                 compose_quote_fmt(compose, compose->replyinfo,
1430                                   prefs_common.quotefmt,
1431                                   qmark, body, FALSE, TRUE,
1432                                           _("Message reply format error."));
1433                 quote_fmt_reset_vartable();
1434         }
1435         if (procmime_msginfo_is_encrypted(compose->replyinfo)) {
1436                 compose_force_encryption(compose, account, FALSE);
1437         }
1438
1439         SIGNAL_BLOCK(textbuf);
1440         
1441         if (account->auto_sig)
1442                 compose_insert_sig(compose, FALSE);
1443
1444         compose_wrap_all(compose);
1445
1446         SIGNAL_UNBLOCK(textbuf);
1447         
1448         gtk_widget_grab_focus(compose->text);
1449
1450         undo_unblock(compose->undostruct);
1451
1452         if (prefs_common.auto_exteditor)
1453                 compose_exec_ext_editor(compose);
1454                 
1455         compose->modified = FALSE;
1456         compose_set_title(compose);
1457
1458         compose->updating = FALSE;
1459
1460         if (compose->deferred_destroy) {
1461                 compose_destroy(compose);
1462                 return NULL;
1463         }
1464
1465         return compose;
1466 }
1467
1468 #define INSERT_FW_HEADER(var, hdr) \
1469 if (msginfo->var && *msginfo->var) { \
1470         gtk_stext_insert(text, NULL, NULL, NULL, hdr, -1); \
1471         gtk_stext_insert(text, NULL, NULL, NULL, msginfo->var, -1); \
1472         gtk_stext_insert(text, NULL, NULL, NULL, "\n", 1); \
1473 }
1474
1475 Compose *compose_forward(PrefsAccount *account, MsgInfo *msginfo,
1476                          gboolean as_attach, const gchar *body,
1477                          gboolean no_extedit,
1478                          gboolean batch)
1479 {
1480         Compose *compose;
1481         GtkTextView *textview;
1482         GtkTextBuffer *textbuf;
1483         GtkTextIter iter;
1484
1485         g_return_val_if_fail(msginfo != NULL, NULL);
1486         g_return_val_if_fail(msginfo->folder != NULL, NULL);
1487
1488         if (!account && 
1489             !(account = compose_guess_forward_account_from_msginfo
1490                                 (msginfo)))
1491                 account = cur_account;
1492
1493         compose = compose_create(account, COMPOSE_FORWARD, batch);
1494
1495         compose->updating = TRUE;
1496         compose->fwdinfo = procmsg_msginfo_get_full_info(msginfo);
1497         if (!compose->fwdinfo)
1498                 compose->fwdinfo = procmsg_msginfo_copy(msginfo);
1499
1500         compose_extract_original_charset(compose);
1501
1502         if (msginfo->subject && *msginfo->subject) {
1503                 gchar *buf, *buf2, *p;
1504
1505                 buf = p = g_strdup(msginfo->subject);
1506                 p += subject_get_prefix_length(p);
1507                 memmove(buf, p, strlen(p) + 1);
1508
1509                 buf2 = g_strdup_printf("Fw: %s", buf);
1510                 gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), buf2);
1511                 
1512                 g_free(buf);
1513                 g_free(buf2);
1514         }
1515
1516         textview = GTK_TEXT_VIEW(compose->text);
1517         textbuf = gtk_text_view_get_buffer(textview);
1518         compose_create_tags(textview, compose);
1519         
1520         undo_block(compose->undostruct);
1521         if (as_attach) {
1522                 gchar *msgfile;
1523
1524                 msgfile = procmsg_get_message_file_path(msginfo);
1525                 if (!is_file_exist(msgfile))
1526                         g_warning("%s: file not exist\n", msgfile);
1527                 else
1528                         compose_attach_append(compose, msgfile, msgfile,
1529                                               "message/rfc822");
1530
1531                 g_free(msgfile);
1532         } else {
1533                 gchar *qmark;
1534                 MsgInfo *full_msginfo;
1535
1536                 full_msginfo = procmsg_msginfo_get_full_info(msginfo);
1537                 if (!full_msginfo)
1538                         full_msginfo = procmsg_msginfo_copy(msginfo);
1539
1540                 if (prefs_common.fw_quotemark &&
1541                     *prefs_common.fw_quotemark)
1542                         qmark = prefs_common.fw_quotemark;
1543                 else
1544                         qmark = "> ";
1545
1546                 compose_quote_fmt(compose, full_msginfo,
1547                                   prefs_common.fw_quotefmt,
1548                                   qmark, body, FALSE, TRUE,
1549                                           _("Message forward format error."));
1550                 quote_fmt_reset_vartable();
1551                 compose_attach_parts(compose, msginfo);
1552
1553                 procmsg_msginfo_free(full_msginfo);
1554         }
1555
1556         SIGNAL_BLOCK(textbuf);
1557
1558         if (account->auto_sig)
1559                 compose_insert_sig(compose, FALSE);
1560
1561         compose_wrap_all(compose);
1562
1563         SIGNAL_UNBLOCK(textbuf);
1564         
1565         gtk_text_buffer_get_start_iter(textbuf, &iter);
1566         gtk_text_buffer_place_cursor(textbuf, &iter);
1567
1568         gtk_widget_grab_focus(compose->header_last->entry);
1569
1570         if (!no_extedit && prefs_common.auto_exteditor)
1571                 compose_exec_ext_editor(compose);
1572         
1573         /*save folder*/
1574         if (msginfo->folder && msginfo->folder->prefs && msginfo->folder->prefs->save_copy_to_folder) {
1575                 gchar *folderidentifier;
1576
1577                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), TRUE);
1578                 folderidentifier = folder_item_get_identifier(msginfo->folder);
1579                 gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), folderidentifier);
1580                 g_free(folderidentifier);
1581         }
1582
1583         undo_unblock(compose->undostruct);
1584         
1585         compose->modified = FALSE;
1586         compose_set_title(compose);
1587
1588         compose->updating = FALSE;
1589
1590         if (compose->deferred_destroy) {
1591                 compose_destroy(compose);
1592                 return NULL;
1593         }
1594
1595         return compose;
1596 }
1597
1598 #undef INSERT_FW_HEADER
1599
1600 Compose *compose_forward_multiple(PrefsAccount *account, GSList *msginfo_list)
1601 {
1602         Compose *compose;
1603         GtkTextView *textview;
1604         GtkTextBuffer *textbuf;
1605         GtkTextIter iter;
1606         GSList *msginfo;
1607         gchar *msgfile;
1608         gboolean single_mail = TRUE;
1609         
1610         g_return_val_if_fail(msginfo_list != NULL, NULL);
1611
1612         if (g_slist_length(msginfo_list) > 1)
1613                 single_mail = FALSE;
1614
1615         for (msginfo = msginfo_list; msginfo != NULL; msginfo = msginfo->next)
1616                 if (((MsgInfo *)msginfo->data)->folder == NULL)
1617                         return NULL;
1618
1619         /* guess account from first selected message */
1620         if (!account && 
1621             !(account = compose_guess_forward_account_from_msginfo
1622                                 (msginfo_list->data)))
1623                 account = cur_account;
1624
1625         g_return_val_if_fail(account != NULL, NULL);
1626
1627         for (msginfo = msginfo_list; msginfo != NULL; msginfo = msginfo->next) {
1628                 MSG_UNSET_PERM_FLAGS(((MsgInfo *)msginfo->data)->flags, MSG_REPLIED);
1629                 MSG_SET_PERM_FLAGS(((MsgInfo *)msginfo->data)->flags, MSG_FORWARDED);
1630         }
1631
1632         compose = compose_create(account, COMPOSE_FORWARD, FALSE);
1633
1634         compose->updating = TRUE;
1635
1636         textview = GTK_TEXT_VIEW(compose->text);
1637         textbuf = gtk_text_view_get_buffer(textview);
1638         compose_create_tags(textview, compose);
1639         
1640         undo_block(compose->undostruct);
1641         for (msginfo = msginfo_list; msginfo != NULL; msginfo = msginfo->next) {
1642                 msgfile = procmsg_get_message_file_path((MsgInfo *)msginfo->data);
1643
1644                 if (!is_file_exist(msgfile))
1645                         g_warning("%s: file not exist\n", msgfile);
1646                 else
1647                         compose_attach_append(compose, msgfile, msgfile,
1648                                 "message/rfc822");
1649                 g_free(msgfile);
1650         }
1651         
1652         if (single_mail) {
1653                 MsgInfo *info = (MsgInfo *)msginfo_list->data;
1654                 if (info->subject && *info->subject) {
1655                         gchar *buf, *buf2, *p;
1656
1657                         buf = p = g_strdup(info->subject);
1658                         p += subject_get_prefix_length(p);
1659                         memmove(buf, p, strlen(p) + 1);
1660
1661                         buf2 = g_strdup_printf("Fw: %s", buf);
1662                         gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), buf2);
1663
1664                         g_free(buf);
1665                         g_free(buf2);
1666                 }
1667         } else {
1668                 gtk_entry_set_text(GTK_ENTRY(compose->subject_entry),
1669                         _("Fw: multiple emails"));
1670         }
1671
1672         SIGNAL_BLOCK(textbuf);
1673         
1674         if (account->auto_sig)
1675                 compose_insert_sig(compose, FALSE);
1676
1677         compose_wrap_all(compose);
1678
1679         SIGNAL_UNBLOCK(textbuf);
1680         
1681         gtk_text_buffer_get_start_iter(textbuf, &iter);
1682         gtk_text_buffer_place_cursor(textbuf, &iter);
1683
1684         gtk_widget_grab_focus(compose->header_last->entry);
1685         undo_unblock(compose->undostruct);
1686         compose->modified = FALSE;
1687         compose_set_title(compose);
1688
1689         compose->updating = FALSE;
1690
1691         if (compose->deferred_destroy) {
1692                 compose_destroy(compose);
1693                 return NULL;
1694         }
1695
1696         return compose;
1697 }
1698
1699 static gboolean compose_is_sig_separator(Compose *compose, GtkTextBuffer *textbuf, GtkTextIter *iter) 
1700 {
1701         GtkTextIter start = *iter;
1702         GtkTextIter end_iter;
1703         int start_pos = gtk_text_iter_get_offset(&start);
1704         gchar *str = NULL;
1705         if (!compose->account->sig_sep)
1706                 return FALSE;
1707         
1708         gtk_text_buffer_get_iter_at_offset(textbuf, &end_iter,
1709                 start_pos+strlen(compose->account->sig_sep));
1710
1711         /* check sig separator */
1712         str = gtk_text_iter_get_text(&start, &end_iter);
1713         if (!strcmp(str, compose->account->sig_sep)) {
1714                 gchar *tmp = NULL;
1715                 /* check end of line (\n) */
1716                 gtk_text_buffer_get_iter_at_offset(textbuf, &start,
1717                         start_pos+strlen(compose->account->sig_sep));
1718                 gtk_text_buffer_get_iter_at_offset(textbuf, &end_iter,
1719                         start_pos+strlen(compose->account->sig_sep)+1);
1720                 tmp = gtk_text_iter_get_text(&start, &end_iter);
1721                 if (!strcmp(tmp,"\n")) {
1722                         g_free(str);
1723                         g_free(tmp);
1724                         return TRUE;
1725                 }
1726                 g_free(tmp);    
1727         }
1728         g_free(str);
1729
1730         return FALSE;
1731 }
1732
1733 static void compose_colorize_signature(Compose *compose)
1734 {
1735         GtkTextBuffer *buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(compose->text));
1736         GtkTextIter iter;
1737         GtkTextIter end_iter;
1738         gtk_text_buffer_get_start_iter(buffer, &iter);
1739         while (gtk_text_iter_forward_line(&iter))
1740                 if (compose_is_sig_separator(compose, buffer, &iter)) {
1741                         gtk_text_buffer_get_end_iter(buffer, &end_iter);
1742                         gtk_text_buffer_apply_tag_by_name(buffer,"signature",&iter, &end_iter);
1743                 }
1744 }
1745
1746 Compose *compose_reedit(MsgInfo *msginfo, gboolean batch)
1747 {
1748         Compose *compose = NULL;
1749         PrefsAccount *account = NULL;
1750         GtkTextView *textview;
1751         GtkTextBuffer *textbuf;
1752         GtkTextMark *mark;
1753         GtkTextIter iter;
1754         FILE *fp;
1755         gchar buf[BUFFSIZE];
1756         gboolean use_signing = FALSE;
1757         gboolean use_encryption = FALSE;
1758         gchar *privacy_system = NULL;
1759         int priority = PRIORITY_NORMAL;
1760         MsgInfo *replyinfo = NULL, *fwdinfo = NULL;
1761
1762         g_return_val_if_fail(msginfo != NULL, NULL);
1763         g_return_val_if_fail(msginfo->folder != NULL, NULL);
1764
1765         if (compose_put_existing_to_front(msginfo)) {
1766                 return NULL;
1767         }
1768
1769         if (folder_has_parent_of_type(msginfo->folder, F_QUEUE) ||
1770             folder_has_parent_of_type(msginfo->folder, F_DRAFT)) {
1771                 gchar queueheader_buf[BUFFSIZE];
1772                 gint id, param;
1773
1774                 /* Select Account from queue headers */
1775                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1776                                              sizeof(queueheader_buf), "X-Sylpheed-Account-Id:")) {
1777                         id = atoi(&queueheader_buf[strlen("X-Sylpheed-Account-Id:")]);
1778                         account = account_find_from_id(id);
1779                 }
1780                 if (!account && !procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1781                                              sizeof(queueheader_buf), "NAID:")) {
1782                         id = atoi(&queueheader_buf[strlen("NAID:")]);
1783                         account = account_find_from_id(id);
1784                 }
1785                 if (!account && !procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1786                                                     sizeof(queueheader_buf), "MAID:")) {
1787                         id = atoi(&queueheader_buf[strlen("MAID:")]);
1788                         account = account_find_from_id(id);
1789                 }
1790                 if (!account && !procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1791                                                                 sizeof(queueheader_buf), "S:")) {
1792                         account = account_find_from_address(queueheader_buf);
1793                 }
1794                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1795                                              sizeof(queueheader_buf), "X-Sylpheed-Sign:")) {
1796                         param = atoi(&queueheader_buf[strlen("X-Sylpheed-Sign:")]);
1797                         use_signing = param;
1798                         
1799                 }
1800                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1801                                              sizeof(queueheader_buf), "X-Sylpheed-Encrypt:")) {
1802                         param = atoi(&queueheader_buf[strlen("X-Sylpheed-Encrypt:")]);
1803                         use_encryption = param;
1804                 }
1805                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1806                                             sizeof(queueheader_buf), "X-Sylpheed-Privacy-System:")) {
1807                         privacy_system = g_strdup(&queueheader_buf[strlen("X-Sylpheed-Privacy-System:")]);
1808                 }
1809                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1810                                              sizeof(queueheader_buf), "X-Priority: ")) {
1811                         param = atoi(&queueheader_buf[strlen("X-Priority: ")]); /* mind the space */
1812                         priority = param;
1813                 }
1814                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1815                                              sizeof(queueheader_buf), "RMID:")) {
1816                         gchar **tokens = g_strsplit(&queueheader_buf[strlen("RMID:")], "\t", 0);
1817                         if (tokens[0] && tokens[1] && tokens[2]) {
1818                                 FolderItem *orig_item = folder_find_item_from_identifier(tokens[0]);
1819                                 if (orig_item != NULL) {
1820                                         replyinfo = folder_item_get_msginfo_by_msgid(orig_item, tokens[2]);
1821                                 }
1822                         }
1823                         g_strfreev(tokens);
1824                 }
1825                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1826                                              sizeof(queueheader_buf), "FMID:")) {
1827                         gchar **tokens = g_strsplit(&queueheader_buf[strlen("FMID:")], "\t", 0);
1828                         if (tokens[0] && tokens[1] && tokens[2]) {
1829                                 FolderItem *orig_item = folder_find_item_from_identifier(tokens[0]);
1830                                 if (orig_item != NULL) {
1831                                         fwdinfo = folder_item_get_msginfo_by_msgid(orig_item, tokens[2]);
1832                                 }
1833                         }
1834                         g_strfreev(tokens);
1835                 }
1836         } else {
1837                 account = msginfo->folder->folder->account;
1838         }
1839
1840         if (!account && prefs_common.reedit_account_autosel) {
1841                 gchar from[BUFFSIZE];
1842                 if (!procheader_get_header_from_msginfo(msginfo, from, sizeof(from), "FROM:")) {
1843                         extract_address(from);
1844                         account = account_find_from_address(from);
1845                 }
1846         }
1847         if (!account) {
1848                 account = cur_account;
1849         }
1850         g_return_val_if_fail(account != NULL, NULL);
1851
1852         compose = compose_create(account, COMPOSE_REEDIT, batch);
1853         
1854         compose->replyinfo = replyinfo;
1855         compose->fwdinfo = fwdinfo;
1856
1857         compose->updating = TRUE;
1858         compose->priority = priority;
1859
1860         if (privacy_system != NULL) {
1861                 compose->privacy_system = privacy_system;
1862                 compose_use_signing(compose, use_signing);
1863                 compose_use_encryption(compose, use_encryption);
1864                 compose_update_privacy_system_menu_item(compose, FALSE);
1865         } else {
1866                 activate_privacy_system(compose, account, FALSE);
1867         }
1868
1869         compose->targetinfo = procmsg_msginfo_copy(msginfo);
1870
1871         compose_extract_original_charset(compose);
1872
1873         if (folder_has_parent_of_type(msginfo->folder, F_QUEUE) ||
1874             folder_has_parent_of_type(msginfo->folder, F_DRAFT)) {
1875                 gchar queueheader_buf[BUFFSIZE];
1876
1877                 /* Set message save folder */
1878                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, sizeof(queueheader_buf), "SCF:")) {
1879                         gint startpos = 0;
1880
1881                         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), TRUE);
1882                         gtk_editable_delete_text(GTK_EDITABLE(compose->savemsg_entry), 0, -1);
1883                         gtk_editable_insert_text(GTK_EDITABLE(compose->savemsg_entry), &queueheader_buf[4], strlen(&queueheader_buf[4]), &startpos);
1884                 }
1885                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, sizeof(queueheader_buf), "RRCPT:")) {
1886                         gint active = atoi(&queueheader_buf[strlen("RRCPT:")]);
1887                         if (active) {
1888                                 GtkItemFactory *ifactory;
1889                                 ifactory = gtk_item_factory_from_widget(compose->menubar);
1890                                 menu_set_active(ifactory, "/Options/Request Return Receipt", TRUE);
1891                         }
1892                 }
1893         }
1894         
1895         if (compose_parse_header(compose, msginfo) < 0) {
1896                 compose->updating = FALSE;
1897                 compose_destroy(compose);
1898                 return NULL;
1899         }
1900         compose_reedit_set_entry(compose, msginfo);
1901
1902         textview = GTK_TEXT_VIEW(compose->text);
1903         textbuf = gtk_text_view_get_buffer(textview);
1904         compose_create_tags(textview, compose);
1905
1906         mark = gtk_text_buffer_get_insert(textbuf);
1907         gtk_text_buffer_get_iter_at_mark(textbuf, &iter, mark);
1908
1909         g_signal_handlers_block_by_func(G_OBJECT(textbuf),
1910                                         G_CALLBACK(compose_changed_cb),
1911                                         compose);
1912         
1913         if (procmime_msginfo_is_encrypted(msginfo)) {
1914                 fp = procmime_get_first_encrypted_text_content(msginfo);
1915                 if (fp) {
1916                         compose_force_encryption(compose, account, TRUE);
1917                 }
1918         } else {
1919                 fp = procmime_get_first_text_content(msginfo);
1920         }
1921         if (fp == NULL) {
1922                 g_warning("Can't get text part\n");
1923         }
1924
1925         if (fp != NULL) {
1926                 gboolean prev_autowrap = compose->autowrap;
1927
1928                 compose->autowrap = FALSE;
1929                 while (fgets(buf, sizeof(buf), fp) != NULL) {
1930                         strcrchomp(buf);
1931                         gtk_text_buffer_insert(textbuf, &iter, buf, -1);
1932                 }
1933                 compose_wrap_all_full(compose, FALSE);
1934                 compose->autowrap = prev_autowrap;
1935                 fclose(fp);
1936         }
1937         
1938         compose_attach_parts(compose, msginfo);
1939
1940         compose_colorize_signature(compose);
1941
1942         g_signal_handlers_unblock_by_func(G_OBJECT(textbuf),
1943                                         G_CALLBACK(compose_changed_cb),
1944                                         compose);
1945
1946         gtk_widget_grab_focus(compose->text);
1947
1948         if (prefs_common.auto_exteditor) {
1949                 compose_exec_ext_editor(compose);
1950         }
1951         compose->modified = FALSE;
1952         compose_set_title(compose);
1953
1954         compose->updating = FALSE;
1955
1956         if (compose->deferred_destroy) {
1957                 compose_destroy(compose);
1958                 return NULL;
1959         }
1960         
1961         compose->sig_str = compose_get_signature_str(compose);
1962         
1963         return compose;
1964 }
1965
1966 Compose *compose_redirect(PrefsAccount *account, MsgInfo *msginfo,
1967                                                  gboolean batch)
1968 {
1969         Compose *compose;
1970         gchar *filename;
1971         GtkItemFactory *ifactory;
1972         FolderItem *item;
1973
1974         g_return_val_if_fail(msginfo != NULL, NULL);
1975
1976         if (!account)
1977                 account = account_get_reply_account(msginfo,
1978                                         prefs_common.reply_account_autosel);
1979         g_return_val_if_fail(account != NULL, NULL);
1980
1981         compose = compose_create(account, COMPOSE_REDIRECT, batch);
1982
1983         compose->updating = TRUE;
1984
1985         ifactory = gtk_item_factory_from_widget(compose->menubar);
1986         compose_create_tags(GTK_TEXT_VIEW(compose->text), compose);
1987         compose->replyinfo = NULL;
1988         compose->fwdinfo = NULL;
1989
1990         compose_show_first_last_header(compose, TRUE);
1991
1992         gtk_widget_grab_focus(compose->header_last->entry);
1993
1994         filename = procmsg_get_message_file_path(msginfo);
1995
1996         if (filename == NULL) {
1997                 compose->updating = FALSE;
1998                 compose_destroy(compose);
1999
2000                 return NULL;
2001         }
2002
2003         compose->redirect_filename = filename;
2004         
2005         /* Set save folder */
2006         item = msginfo->folder;
2007         if (item && item->prefs && item->prefs->save_copy_to_folder) {
2008                 gchar *folderidentifier;
2009
2010                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), prefs_common.savemsg);
2011                 folderidentifier = folder_item_get_identifier(item);
2012                 gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), folderidentifier);
2013                 g_free(folderidentifier);
2014         }
2015
2016         compose_attach_parts(compose, msginfo);
2017
2018         if (msginfo->subject)
2019                 gtk_entry_set_text(GTK_ENTRY(compose->subject_entry),
2020                                    msginfo->subject);
2021         gtk_editable_set_editable(GTK_EDITABLE(compose->subject_entry), FALSE);
2022
2023         compose_quote_fmt(compose, msginfo, "%M", NULL, NULL, FALSE, FALSE,
2024                                           _("Message redirect format error."));
2025         quote_fmt_reset_vartable();
2026         gtk_text_view_set_editable(GTK_TEXT_VIEW(compose->text), FALSE);
2027
2028         compose_colorize_signature(compose);
2029
2030         ifactory = gtk_item_factory_from_widget(compose->popupmenu);
2031         menu_set_sensitive(ifactory, "/Add...", FALSE);
2032         menu_set_sensitive(ifactory, "/Remove", FALSE);
2033         menu_set_sensitive(ifactory, "/Properties...", FALSE);
2034
2035         ifactory = gtk_item_factory_from_widget(compose->menubar);
2036         menu_set_sensitive(ifactory, "/Message/Save", FALSE);
2037         menu_set_sensitive(ifactory, "/Message/Insert file", FALSE);
2038         menu_set_sensitive(ifactory, "/Message/Attach file", FALSE);
2039         menu_set_sensitive(ifactory, "/Message/Insert signature", FALSE);
2040         menu_set_sensitive(ifactory, "/Edit", FALSE);
2041         menu_set_sensitive(ifactory, "/Options", FALSE);
2042         menu_set_sensitive(ifactory, "/Tools/Show ruler", FALSE);
2043         menu_set_sensitive(ifactory, "/Tools/Actions", FALSE);
2044         
2045         if (compose->toolbar->draft_btn)
2046                 gtk_widget_set_sensitive(compose->toolbar->draft_btn, FALSE);
2047         if (compose->toolbar->insert_btn)
2048                 gtk_widget_set_sensitive(compose->toolbar->insert_btn, FALSE);
2049         if (compose->toolbar->attach_btn)
2050                 gtk_widget_set_sensitive(compose->toolbar->attach_btn, FALSE);
2051         if (compose->toolbar->sig_btn)
2052                 gtk_widget_set_sensitive(compose->toolbar->sig_btn, FALSE);
2053         if (compose->toolbar->exteditor_btn)
2054                 gtk_widget_set_sensitive(compose->toolbar->exteditor_btn, FALSE);
2055         if (compose->toolbar->linewrap_current_btn)
2056                 gtk_widget_set_sensitive(compose->toolbar->linewrap_current_btn, FALSE);
2057         if (compose->toolbar->linewrap_all_btn)
2058                 gtk_widget_set_sensitive(compose->toolbar->linewrap_all_btn, FALSE);
2059
2060         compose->modified = FALSE;
2061         compose_set_title(compose);
2062         compose->updating = FALSE;
2063
2064         if (compose->deferred_destroy) {
2065                 compose_destroy(compose);
2066                 return NULL;
2067         }
2068         
2069         return compose;
2070 }
2071
2072 GList *compose_get_compose_list(void)
2073 {
2074         return compose_list;
2075 }
2076
2077 void compose_entry_append(Compose *compose, const gchar *address,
2078                           ComposeEntryType type)
2079 {
2080         gchar *header;
2081         gchar *cur, *begin;
2082         gboolean in_quote = FALSE;
2083         if (!address || *address == '\0') return;
2084
2085         switch (type) {
2086         case COMPOSE_CC:
2087                 header = N_("Cc:");
2088                 break;
2089         case COMPOSE_BCC:
2090                 header = N_("Bcc:");
2091                 break;
2092         case COMPOSE_REPLYTO:
2093                 header = N_("Reply-To:");
2094                 break;
2095         case COMPOSE_NEWSGROUPS:
2096                 header = N_("Newsgroups:");
2097                 break;
2098         case COMPOSE_FOLLOWUPTO:
2099                 header = N_( "Followup-To:");
2100                 break;
2101         case COMPOSE_TO:
2102         default:
2103                 header = N_("To:");
2104                 break;
2105         }
2106         header = prefs_common.trans_hdr ? gettext(header) : header;
2107         
2108         cur = begin = (gchar *)address;
2109         
2110         /* we separate the line by commas, but not if we're inside a quoted
2111          * string */
2112         while (*cur != '\0') {
2113                 if (*cur == '"') 
2114                         in_quote = !in_quote;
2115                 if (*cur == ',' && !in_quote) {
2116                         gchar *tmp = g_strdup(begin);
2117                         gchar *o_tmp = tmp;
2118                         tmp[cur-begin]='\0';
2119                         cur++;
2120                         begin = cur;
2121                         while (*tmp == ' ' || *tmp == '\t')
2122                                 tmp++;
2123                         compose_add_header_entry(compose, header, tmp);
2124                         g_free(o_tmp);
2125                         continue;
2126                 }
2127                 cur++;
2128         }
2129         if (begin < cur) {
2130                 gchar *tmp = g_strdup(begin);
2131                 gchar *o_tmp = tmp;
2132                 tmp[cur-begin]='\0';
2133                 cur++;
2134                 begin = cur;
2135                 while (*tmp == ' ' || *tmp == '\t')
2136                         tmp++;
2137                 compose_add_header_entry(compose, header, tmp);
2138                 g_free(o_tmp);          
2139         }
2140 }
2141
2142 void compose_entry_mark_default_to(Compose *compose, const gchar *mailto)
2143 {
2144         static GdkColor yellow;
2145         static GdkColor black;
2146         static gboolean yellow_initialised = FALSE;
2147         GSList *h_list;
2148         GtkEntry *entry;
2149                 
2150         if (!yellow_initialised) {
2151                 gdk_color_parse("#f5f6be", &yellow);
2152                 gdk_color_parse("#000000", &black);
2153                 yellow_initialised = gdk_colormap_alloc_color(
2154                         gdk_colormap_get_system(), &yellow, FALSE, TRUE);
2155                 yellow_initialised &= gdk_colormap_alloc_color(
2156                         gdk_colormap_get_system(), &black, FALSE, TRUE);
2157         }
2158
2159         for (h_list = compose->header_list; h_list != NULL; h_list = h_list->next) {
2160                 entry = GTK_ENTRY(((ComposeHeaderEntry *)h_list->data)->entry);
2161                 if (gtk_entry_get_text(entry) && 
2162                     !g_utf8_collate(gtk_entry_get_text(entry), mailto)) {
2163                         if (yellow_initialised) {
2164                                 gtk_widget_modify_base(
2165                                         GTK_WIDGET(((ComposeHeaderEntry *)h_list->data)->entry),
2166                                         GTK_STATE_NORMAL, &yellow);
2167                                 gtk_widget_modify_text(
2168                                         GTK_WIDGET(((ComposeHeaderEntry *)h_list->data)->entry),
2169                                         GTK_STATE_NORMAL, &black);
2170                         }
2171                 }
2172         }
2173 }
2174
2175 void compose_toolbar_cb(gint action, gpointer data)
2176 {
2177         ToolbarItem *toolbar_item = (ToolbarItem*)data;
2178         Compose *compose = (Compose*)toolbar_item->parent;
2179         
2180         g_return_if_fail(compose != NULL);
2181
2182         switch(action) {
2183         case A_SEND:
2184                 compose_send_cb(compose, 0, NULL);
2185                 break;
2186         case A_SENDL:
2187                 compose_send_later_cb(compose, 0, NULL);
2188                 break;
2189         case A_DRAFT:
2190                 compose_draft_cb(compose, COMPOSE_QUIT_EDITING, NULL);
2191                 break;
2192         case A_INSERT:
2193                 compose_insert_file_cb(compose, 0, NULL);
2194                 break;
2195         case A_ATTACH:
2196                 compose_attach_cb(compose, 0, NULL);
2197                 break;
2198         case A_SIG:
2199                 compose_insert_sig(compose, FALSE);
2200                 break;
2201         case A_EXTEDITOR:
2202                 compose_ext_editor_cb(compose, 0, NULL);
2203                 break;
2204         case A_LINEWRAP_CURRENT:
2205                 compose_beautify_paragraph(compose, NULL, TRUE);
2206                 break;
2207         case A_LINEWRAP_ALL:
2208                 compose_wrap_all_full(compose, TRUE);
2209                 break;
2210         case A_ADDRBOOK:
2211                 compose_address_cb(compose, 0, NULL);
2212                 break;
2213 #ifdef USE_ASPELL
2214         case A_CHECK_SPELLING:
2215                 compose_check_all(compose);
2216                 break;
2217 #endif
2218         default:
2219                 break;
2220         }
2221 }
2222
2223 static void compose_entries_set(Compose *compose, const gchar *mailto)
2224 {
2225         gchar *to = NULL;
2226         gchar *cc = NULL;
2227         gchar *subject = NULL;
2228         gchar *body = NULL;
2229         gchar *temp = NULL;
2230         gsize  len = 0;
2231         gchar *attach = NULL;
2232         
2233         scan_mailto_url(mailto, &to, &cc, NULL, &subject, &body, &attach);
2234
2235         if (to)
2236                 compose_entry_append(compose, to, COMPOSE_TO);
2237         if (cc)
2238                 compose_entry_append(compose, cc, COMPOSE_CC);
2239         if (subject) {
2240                 if (!g_utf8_validate (subject, -1, NULL)) {
2241                         temp = g_locale_to_utf8 (subject, -1, NULL, &len, NULL);
2242                         gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), temp);
2243                         g_free(temp);
2244                 } else {
2245                         gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), subject);
2246                 }
2247         }
2248         if (body) {
2249                 GtkTextView *text = GTK_TEXT_VIEW(compose->text);
2250                 GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
2251                 GtkTextMark *mark;
2252                 GtkTextIter iter;
2253                 gboolean prev_autowrap = compose->autowrap;
2254
2255                 compose->autowrap = FALSE;
2256
2257                 mark = gtk_text_buffer_get_insert(buffer);
2258                 gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
2259
2260                 if (!g_utf8_validate (body, -1, NULL)) {
2261                         temp = g_locale_to_utf8 (body, -1, NULL, &len, NULL);
2262                         gtk_text_buffer_insert(buffer, &iter, temp, -1);
2263                         g_free(temp);
2264                 } else {
2265                         gtk_text_buffer_insert(buffer, &iter, body, -1);
2266                 }
2267                 gtk_text_buffer_insert(buffer, &iter, "\n", 1);
2268
2269                 compose->autowrap = prev_autowrap;
2270                 if (compose->autowrap)
2271                         compose_wrap_all(compose);
2272         }
2273
2274         if (attach) {
2275                 gchar *utf8_filename = conv_filename_to_utf8(attach);
2276                 if (utf8_filename) {
2277                         if (compose_attach_append(compose, attach, utf8_filename, NULL)) {
2278                                 alertpanel_notice(_("The file '%s' has been attached."), attach);
2279                         } 
2280                         g_free(utf8_filename);
2281                 } else {
2282                         alertpanel_error(_("Couldn't attach a file (charset conversion failed)."));
2283                 }
2284         }
2285         g_free(to);
2286         g_free(cc);
2287         g_free(subject);
2288         g_free(body);
2289         g_free(attach);
2290 }
2291
2292 static gint compose_parse_header(Compose *compose, MsgInfo *msginfo)
2293 {
2294         static HeaderEntry hentry[] = {{"Reply-To:",    NULL, TRUE},
2295                                        {"Cc:",          NULL, TRUE},
2296                                        {"References:",  NULL, FALSE},
2297                                        {"Bcc:",         NULL, TRUE},
2298                                        {"Newsgroups:",  NULL, TRUE},
2299                                        {"Followup-To:", NULL, TRUE},
2300                                        {"List-Post:",   NULL, FALSE},
2301                                        {"X-Priority:",  NULL, FALSE},
2302                                        {NULL,           NULL, FALSE}};
2303
2304         enum
2305         {
2306                 H_REPLY_TO      = 0,
2307                 H_CC            = 1,
2308                 H_REFERENCES    = 2,
2309                 H_BCC           = 3,
2310                 H_NEWSGROUPS    = 4,
2311                 H_FOLLOWUP_TO   = 5,
2312                 H_LIST_POST     = 6,
2313                 H_X_PRIORITY    = 7
2314         };
2315
2316         FILE *fp;
2317
2318         g_return_val_if_fail(msginfo != NULL, -1);
2319
2320         if ((fp = procmsg_open_message(msginfo)) == NULL) return -1;
2321         procheader_get_header_fields(fp, hentry);
2322         fclose(fp);
2323
2324         if (hentry[H_REPLY_TO].body != NULL) {
2325                 if (hentry[H_REPLY_TO].body[0] != '\0') {
2326                         compose->replyto =
2327                                 conv_unmime_header(hentry[H_REPLY_TO].body,
2328                                                    NULL);
2329                 }
2330                 g_free(hentry[H_REPLY_TO].body);
2331                 hentry[H_REPLY_TO].body = NULL;
2332         }
2333         if (hentry[H_CC].body != NULL) {
2334                 compose->cc = conv_unmime_header(hentry[H_CC].body, NULL);
2335                 g_free(hentry[H_CC].body);
2336                 hentry[H_CC].body = NULL;
2337         }
2338         if (hentry[H_REFERENCES].body != NULL) {
2339                 if (compose->mode == COMPOSE_REEDIT)
2340                         compose->references = hentry[H_REFERENCES].body;
2341                 else {
2342                         compose->references = compose_parse_references
2343                                 (hentry[H_REFERENCES].body, msginfo->msgid);
2344                         g_free(hentry[H_REFERENCES].body);
2345                 }
2346                 hentry[H_REFERENCES].body = NULL;
2347         }
2348         if (hentry[H_BCC].body != NULL) {
2349                 if (compose->mode == COMPOSE_REEDIT)
2350                         compose->bcc =
2351                                 conv_unmime_header(hentry[H_BCC].body, NULL);
2352                 g_free(hentry[H_BCC].body);
2353                 hentry[H_BCC].body = NULL;
2354         }
2355         if (hentry[H_NEWSGROUPS].body != NULL) {
2356                 compose->newsgroups = hentry[H_NEWSGROUPS].body;
2357                 hentry[H_NEWSGROUPS].body = NULL;
2358         }
2359         if (hentry[H_FOLLOWUP_TO].body != NULL) {
2360                 if (hentry[H_FOLLOWUP_TO].body[0] != '\0') {
2361                         compose->followup_to =
2362                                 conv_unmime_header(hentry[H_FOLLOWUP_TO].body,
2363                                                    NULL);
2364                 }
2365                 g_free(hentry[H_FOLLOWUP_TO].body);
2366                 hentry[H_FOLLOWUP_TO].body = NULL;
2367         }
2368         if (hentry[H_LIST_POST].body != NULL) {
2369                 gchar *to = NULL;
2370
2371                 extract_address(hentry[H_LIST_POST].body);
2372                 if (hentry[H_LIST_POST].body[0] != '\0') {
2373                         scan_mailto_url(hentry[H_LIST_POST].body,
2374                                         &to, NULL, NULL, NULL, NULL, NULL);
2375                         if (to) {
2376                                 g_free(compose->ml_post);
2377                                 compose->ml_post = to;
2378                         }
2379                 }
2380                 g_free(hentry[H_LIST_POST].body);
2381                 hentry[H_LIST_POST].body = NULL;
2382         }
2383
2384         /* CLAWS - X-Priority */
2385         if (compose->mode == COMPOSE_REEDIT)
2386                 if (hentry[H_X_PRIORITY].body != NULL) {
2387                         gint priority;
2388                         
2389                         priority = atoi(hentry[H_X_PRIORITY].body);
2390                         g_free(hentry[H_X_PRIORITY].body);
2391                         
2392                         hentry[H_X_PRIORITY].body = NULL;
2393                         
2394                         if (priority < PRIORITY_HIGHEST || 
2395                             priority > PRIORITY_LOWEST)
2396                                 priority = PRIORITY_NORMAL;
2397                         
2398                         compose->priority =  priority;
2399                 }
2400  
2401         if (compose->mode == COMPOSE_REEDIT) {
2402                 if (msginfo->inreplyto && *msginfo->inreplyto)
2403                         compose->inreplyto = g_strdup(msginfo->inreplyto);
2404                 return 0;
2405         }
2406
2407         if (msginfo->msgid && *msginfo->msgid)
2408                 compose->inreplyto = g_strdup(msginfo->msgid);
2409
2410         if (!compose->references) {
2411                 if (msginfo->msgid && *msginfo->msgid) {
2412                         if (msginfo->inreplyto && *msginfo->inreplyto)
2413                                 compose->references =
2414                                         g_strdup_printf("<%s>\n\t<%s>",
2415                                                         msginfo->inreplyto,
2416                                                         msginfo->msgid);
2417                         else
2418                                 compose->references =
2419                                         g_strconcat("<", msginfo->msgid, ">",
2420                                                     NULL);
2421                 } else if (msginfo->inreplyto && *msginfo->inreplyto) {
2422                         compose->references =
2423                                 g_strconcat("<", msginfo->inreplyto, ">",
2424                                             NULL);
2425                 }
2426         }
2427
2428         return 0;
2429 }
2430
2431 static gchar *compose_parse_references(const gchar *ref, const gchar *msgid)
2432 {
2433         GSList *ref_id_list, *cur;
2434         GString *new_ref;
2435         gchar *new_ref_str;
2436
2437         ref_id_list = references_list_append(NULL, ref);
2438         if (!ref_id_list) return NULL;
2439         if (msgid && *msgid)
2440                 ref_id_list = g_slist_append(ref_id_list, g_strdup(msgid));
2441
2442         for (;;) {
2443                 gint len = 0;
2444
2445                 for (cur = ref_id_list; cur != NULL; cur = cur->next)
2446                         /* "<" + Message-ID + ">" + CR+LF+TAB */
2447                         len += strlen((gchar *)cur->data) + 5;
2448
2449                 if (len > MAX_REFERENCES_LEN) {
2450                         /* remove second message-ID */
2451                         if (ref_id_list && ref_id_list->next &&
2452                             ref_id_list->next->next) {
2453                                 g_free(ref_id_list->next->data);
2454                                 ref_id_list = g_slist_remove
2455                                         (ref_id_list, ref_id_list->next->data);
2456                         } else {
2457                                 slist_free_strings(ref_id_list);
2458                                 g_slist_free(ref_id_list);
2459                                 return NULL;
2460                         }
2461                 } else
2462                         break;
2463         }
2464
2465         new_ref = g_string_new("");
2466         for (cur = ref_id_list; cur != NULL; cur = cur->next) {
2467                 if (new_ref->len > 0)
2468                         g_string_append(new_ref, "\n\t");
2469                 g_string_append_printf(new_ref, "<%s>", (gchar *)cur->data);
2470         }
2471
2472         slist_free_strings(ref_id_list);
2473         g_slist_free(ref_id_list);
2474
2475         new_ref_str = new_ref->str;
2476         g_string_free(new_ref, FALSE);
2477
2478         return new_ref_str;
2479 }
2480
2481 static gchar *compose_quote_fmt(Compose *compose, MsgInfo *msginfo,
2482                                 const gchar *fmt, const gchar *qmark,
2483                                 const gchar *body, gboolean rewrap,
2484                                 gboolean need_unescape,
2485                                 const gchar *err_msg)
2486 {
2487         MsgInfo* dummyinfo = NULL;
2488         gchar *quote_str = NULL;
2489         gchar *buf;
2490         gboolean prev_autowrap;
2491         const gchar *trimmed_body = body;
2492         gint cursor_pos = -1;
2493         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
2494         GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
2495         GtkTextIter iter;
2496         GtkTextMark *mark;
2497         
2498
2499         SIGNAL_BLOCK(buffer);
2500
2501         if (!msginfo) {
2502                 dummyinfo = compose_msginfo_new_from_compose(compose);
2503                 msginfo = dummyinfo;
2504         }
2505
2506         if (qmark != NULL) {
2507                 quote_fmt_init(msginfo, NULL, NULL, FALSE, compose->account);
2508                 quote_fmt_scan_string(qmark);
2509                 quote_fmt_parse();
2510
2511                 buf = quote_fmt_get_buffer();
2512                 if (buf == NULL)
2513                         alertpanel_error(_("Quote mark format error."));
2514                 else
2515                         Xstrdup_a(quote_str, buf, goto error)
2516         }
2517
2518         if (fmt && *fmt != '\0') {
2519
2520                 if (trimmed_body)
2521                         while (*trimmed_body == '\n')
2522                                 trimmed_body++;
2523
2524                 quote_fmt_init(msginfo, quote_str, trimmed_body, FALSE, compose->account);
2525                 if (need_unescape) {
2526                         gchar *tmp = NULL;
2527
2528                         /* decode \-escape sequences in the internal representation of the quote format */
2529                         tmp = malloc(strlen(fmt)+1);
2530                         pref_get_unescaped_pref(tmp, fmt);
2531                         quote_fmt_scan_string(tmp);
2532                         quote_fmt_parse();
2533                         g_free(tmp);
2534                 } else {
2535                         quote_fmt_scan_string(fmt);
2536                         quote_fmt_parse();
2537                 }
2538
2539                 buf = quote_fmt_get_buffer();
2540                 if (buf == NULL) {
2541                         alertpanel_error(err_msg);
2542                         goto error;
2543                 }
2544         } else
2545                 buf = "";
2546
2547         prev_autowrap = compose->autowrap;
2548         compose->autowrap = FALSE;
2549
2550         mark = gtk_text_buffer_get_insert(buffer);
2551         gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
2552         if (g_utf8_validate(buf, -1, NULL)) { 
2553                 gtk_text_buffer_insert(buffer, &iter, buf, -1);
2554         } else {
2555                 gchar *tmpout = NULL;
2556                 tmpout = conv_codeset_strdup
2557                         (buf, conv_get_locale_charset_str_no_utf8(),
2558                          CS_INTERNAL);
2559                 if (!tmpout || !g_utf8_validate(tmpout, -1, NULL)) {
2560                         g_free(tmpout);
2561                         tmpout = g_malloc(strlen(buf)*2+1);
2562                         conv_localetodisp(tmpout, strlen(buf)*2+1, buf);
2563                 }
2564                 gtk_text_buffer_insert(buffer, &iter, tmpout, -1);
2565                 g_free(tmpout);
2566         }
2567
2568         cursor_pos = quote_fmt_get_cursor_pos();
2569         compose->set_cursor_pos = cursor_pos;
2570         if (cursor_pos == -1) {
2571                 cursor_pos = 0;
2572         }
2573         gtk_text_buffer_get_start_iter(buffer, &iter);
2574         gtk_text_buffer_get_iter_at_offset(buffer, &iter, cursor_pos);
2575         gtk_text_buffer_place_cursor(buffer, &iter);
2576
2577         compose->autowrap = prev_autowrap;
2578         if (compose->autowrap && rewrap)
2579                 compose_wrap_all(compose);
2580
2581         goto ok;
2582
2583 error:
2584         buf = NULL;
2585 ok:
2586         SIGNAL_UNBLOCK(buffer);
2587
2588         procmsg_msginfo_free( dummyinfo );
2589
2590         return buf;
2591 }
2592
2593 /* if ml_post is of type addr@host and from is of type
2594  * addr-anything@host, return TRUE
2595  */
2596 static gboolean is_subscription(const gchar *ml_post, const gchar *from)
2597 {
2598         gchar *left_ml = NULL;
2599         gchar *right_ml = NULL;
2600         gchar *left_from = NULL;
2601         gchar *right_from = NULL;
2602         gboolean result = FALSE;
2603         
2604         if (!ml_post || !from)
2605                 return FALSE;
2606         
2607         left_ml = g_strdup(ml_post);
2608         if (strstr(left_ml, "@")) {
2609                 right_ml = strstr(left_ml, "@")+1;
2610                 *(strstr(left_ml, "@")) = '\0';
2611         }
2612         
2613         left_from = g_strdup(from);
2614         if (strstr(left_from, "@")) {
2615                 right_from = strstr(left_from, "@")+1;
2616                 *(strstr(left_from, "@")) = '\0';
2617         }
2618         
2619         if (left_ml && left_from && right_ml && right_from
2620         &&  !strncmp(left_from, left_ml, strlen(left_ml))
2621         &&  !strcmp(right_from, right_ml)) {
2622                 result = TRUE;
2623         }
2624         g_free(left_ml);
2625         g_free(left_from);
2626         
2627         return result;
2628 }
2629
2630 static gboolean same_address(const gchar *addr1, const gchar *addr2)
2631 {
2632         gchar *my_addr1, *my_addr2;
2633         
2634         if (!addr1 || !addr2)
2635                 return FALSE;
2636
2637         Xstrdup_a(my_addr1, addr1, return FALSE);
2638         Xstrdup_a(my_addr2, addr2, return FALSE);
2639         
2640         extract_address(my_addr1);
2641         extract_address(my_addr2);
2642         
2643         return !strcasecmp(my_addr1, my_addr2);
2644 }
2645
2646 static void compose_reply_set_entry(Compose *compose, MsgInfo *msginfo,
2647                                     gboolean to_all, gboolean to_ml,
2648                                     gboolean to_sender,
2649                                     gboolean followup_and_reply_to)
2650 {
2651         GSList *cc_list = NULL;
2652         GSList *cur;
2653         gchar *from = NULL;
2654         gchar *replyto = NULL;
2655         GHashTable *to_table;
2656
2657         gboolean reply_to_ml = FALSE;
2658         gboolean default_reply_to = FALSE;
2659
2660         g_return_if_fail(compose->account != NULL);
2661         g_return_if_fail(msginfo != NULL);
2662
2663         reply_to_ml = to_ml && compose->ml_post;
2664
2665         default_reply_to = msginfo->folder && 
2666                 msginfo->folder->prefs->enable_default_reply_to;
2667
2668         if (compose->account->protocol != A_NNTP) {
2669                 if (reply_to_ml && !default_reply_to) {
2670                         
2671                         gboolean is_subscr = is_subscription(compose->ml_post,
2672                                                              msginfo->from);
2673                         if (!is_subscr) {
2674                                 /* normal answer to ml post with a reply-to */
2675                                 compose_entry_append(compose,
2676                                            compose->ml_post,
2677                                            COMPOSE_TO);
2678                                 if (compose->replyto
2679                                 &&  !same_address(compose->ml_post, compose->replyto))
2680                                         compose_entry_append(compose,
2681                                                 compose->replyto,
2682                                                 COMPOSE_CC);
2683                         } else {
2684                                 /* answer to subscription confirmation */
2685                                 if (compose->replyto)
2686                                         compose_entry_append(compose,
2687                                                 compose->replyto,
2688                                                 COMPOSE_TO);
2689                                 else if (msginfo->from)
2690                                         compose_entry_append(compose,
2691                                                 msginfo->from,
2692                                                 COMPOSE_TO);
2693                         }
2694                 }
2695                 else if (!(to_all || to_sender) && default_reply_to) {
2696                         compose_entry_append(compose,
2697                             msginfo->folder->prefs->default_reply_to,
2698                             COMPOSE_TO);
2699                         compose_entry_mark_default_to(compose,
2700                                 msginfo->folder->prefs->default_reply_to);
2701                 } else {
2702                         gchar *tmp1 = NULL;
2703                         if (!msginfo->from)
2704                                 return;
2705                         Xstrdup_a(tmp1, msginfo->from, return);
2706                         extract_address(tmp1);
2707                         if (to_all || to_sender ||
2708                             !account_find_from_address(tmp1))
2709                                 compose_entry_append(compose,
2710                                  (compose->replyto && !to_sender)
2711                                           ? compose->replyto :
2712                                           msginfo->from ? msginfo->from : "",
2713                                           COMPOSE_TO);
2714                         else if (!to_all && !to_sender) {
2715                                 if (!folder_has_parent_of_type(msginfo->folder, F_QUEUE) &&
2716                                     !folder_has_parent_of_type(msginfo->folder, F_OUTBOX) &&
2717                                     !folder_has_parent_of_type(msginfo->folder, F_DRAFT)) {
2718                                         compose_entry_append(compose,
2719                                                   msginfo->from ? msginfo->from : "",
2720                                                   COMPOSE_TO);
2721                                 } else {
2722                                         /* replying to own mail, use original recp */
2723                                         compose_entry_append(compose,
2724                                                   msginfo->to ? msginfo->to : "",
2725                                                   COMPOSE_TO);
2726                                         compose_entry_append(compose,
2727                                                   msginfo->cc ? msginfo->cc : "",
2728                                                   COMPOSE_CC);
2729                                 }
2730                         }
2731                 }
2732         } else {
2733                 if (to_sender || (compose->followup_to && 
2734                         !strncmp(compose->followup_to, "poster", 6)))
2735                         compose_entry_append
2736                                 (compose, 
2737                                  (compose->replyto ? compose->replyto :
2738                                         msginfo->from ? msginfo->from : ""),
2739                                  COMPOSE_TO);
2740                                  
2741                 else if (followup_and_reply_to || to_all) {
2742                         compose_entry_append
2743                                 (compose,
2744                                  (compose->replyto ? compose->replyto :
2745                                  msginfo->from ? msginfo->from : ""),
2746                                  COMPOSE_TO);                           
2747                 
2748                         compose_entry_append
2749                                 (compose,
2750                                  compose->followup_to ? compose->followup_to :
2751                                  compose->newsgroups ? compose->newsgroups : "",
2752                                  COMPOSE_NEWSGROUPS);
2753                 } 
2754                 else 
2755                         compose_entry_append
2756                                 (compose,
2757                                  compose->followup_to ? compose->followup_to :
2758                                  compose->newsgroups ? compose->newsgroups : "",
2759                                  COMPOSE_NEWSGROUPS);
2760         }
2761
2762         if (msginfo->subject && *msginfo->subject) {
2763                 gchar *buf, *buf2;
2764                 gchar *p;
2765
2766                 buf = p = g_strdup(msginfo->subject);
2767                 p += subject_get_prefix_length(p);
2768                 memmove(buf, p, strlen(p) + 1);
2769
2770                 buf2 = g_strdup_printf("Re: %s", buf);
2771                 gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), buf2);
2772
2773                 g_free(buf2);
2774                 g_free(buf);
2775         } else
2776                 gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), "Re: ");
2777
2778         if (to_ml && compose->ml_post) return;
2779         if (!to_all || compose->account->protocol == A_NNTP) return;
2780
2781         if (compose->replyto) {
2782                 Xstrdup_a(replyto, compose->replyto, return);
2783                 extract_address(replyto);
2784         }
2785         if (msginfo->from) {
2786                 Xstrdup_a(from, msginfo->from, return);
2787                 extract_address(from);
2788         }
2789
2790         if (replyto && from)
2791                 cc_list = address_list_append_with_comments(cc_list, from);
2792         if (to_all && msginfo->folder && 
2793             msginfo->folder->prefs->enable_default_reply_to)
2794                 cc_list = address_list_append_with_comments(cc_list,
2795                                 msginfo->folder->prefs->default_reply_to);
2796         cc_list = address_list_append_with_comments(cc_list, msginfo->to);
2797         cc_list = address_list_append_with_comments(cc_list, compose->cc);
2798
2799         to_table = g_hash_table_new(g_str_hash, g_str_equal);
2800         if (replyto)
2801                 g_hash_table_insert(to_table, g_strdup(replyto), GINT_TO_POINTER(1));
2802         if (compose->account)
2803                 g_hash_table_insert(to_table, g_strdup(compose->account->address),
2804                                     GINT_TO_POINTER(1));
2805
2806         /* remove address on To: and that of current account */
2807         for (cur = cc_list; cur != NULL; ) {
2808                 GSList *next = cur->next;
2809                 gchar *addr;
2810
2811                 addr = g_strdup(cur->data);
2812                 extract_address(addr);
2813
2814                 if (GPOINTER_TO_INT(g_hash_table_lookup(to_table, addr)) == 1)
2815                         cc_list = g_slist_remove(cc_list, cur->data);
2816                 else
2817                         g_hash_table_insert(to_table, addr, GINT_TO_POINTER(1));
2818
2819                 cur = next;
2820         }
2821         hash_free_strings(to_table);
2822         g_hash_table_destroy(to_table);
2823
2824         if (cc_list) {
2825                 for (cur = cc_list; cur != NULL; cur = cur->next)
2826                         compose_entry_append(compose, (gchar *)cur->data,
2827                                              COMPOSE_CC);
2828                 slist_free_strings(cc_list);
2829                 g_slist_free(cc_list);
2830         }
2831
2832 }
2833
2834 #define SET_ENTRY(entry, str) \
2835 { \
2836         if (str && *str) \
2837                 gtk_entry_set_text(GTK_ENTRY(compose->entry), str); \
2838 }
2839
2840 #define SET_ADDRESS(type, str) \
2841 { \
2842         if (str && *str) \
2843                 compose_entry_append(compose, str, type); \
2844 }
2845
2846 static void compose_reedit_set_entry(Compose *compose, MsgInfo *msginfo)
2847 {
2848         g_return_if_fail(msginfo != NULL);
2849
2850         SET_ENTRY(subject_entry, msginfo->subject);
2851         SET_ENTRY(from_name, msginfo->from);
2852         SET_ADDRESS(COMPOSE_TO, msginfo->to);
2853         SET_ADDRESS(COMPOSE_CC, compose->cc);
2854         SET_ADDRESS(COMPOSE_BCC, compose->bcc);
2855         SET_ADDRESS(COMPOSE_REPLYTO, compose->replyto);
2856         SET_ADDRESS(COMPOSE_NEWSGROUPS, compose->newsgroups);
2857         SET_ADDRESS(COMPOSE_FOLLOWUPTO, compose->followup_to);
2858
2859         compose_update_priority_menu_item(compose);
2860         compose_update_privacy_system_menu_item(compose, FALSE);
2861         compose_show_first_last_header(compose, TRUE);
2862 }
2863
2864 #undef SET_ENTRY
2865 #undef SET_ADDRESS
2866
2867 static void compose_insert_sig(Compose *compose, gboolean replace)
2868 {
2869         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
2870         GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
2871         GtkTextMark *mark;
2872         GtkTextIter iter, iter_end;
2873         gint cur_pos;
2874         gchar *search = NULL;
2875         gboolean prev_autowrap;
2876         gboolean found = FALSE, shift = FALSE;
2877
2878         
2879         g_return_if_fail(compose->account != NULL);
2880
2881         prev_autowrap = compose->autowrap;
2882         compose->autowrap = FALSE;
2883
2884         g_signal_handlers_block_by_func(G_OBJECT(buffer),
2885                                         G_CALLBACK(compose_changed_cb),
2886                                         compose);
2887         
2888         mark = gtk_text_buffer_get_insert(buffer);
2889         gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
2890         cur_pos = gtk_text_iter_get_offset (&iter);
2891
2892         gtk_text_buffer_get_end_iter(buffer, &iter);
2893
2894         search = compose->sig_str;
2895 again:
2896         if (replace && search) {
2897                 GtkTextIter first_iter, start_iter, end_iter;
2898
2899                 gtk_text_buffer_get_start_iter(buffer, &first_iter);
2900
2901                 if (compose->sig_str[0] == '\0')
2902                         found = FALSE;
2903                 else
2904                         found = gtk_text_iter_forward_search(&first_iter,
2905                                                              search,
2906                                                              GTK_TEXT_SEARCH_TEXT_ONLY,
2907                                                              &start_iter, &end_iter,
2908                                                              NULL);
2909
2910                 if (found) {
2911                         gtk_text_buffer_delete(buffer, &start_iter, &end_iter);
2912                         iter = start_iter;
2913                 }
2914         } 
2915         if (replace && !found && search && strlen(search) > 2
2916         &&  search[0] == '\n' && search[1] == '\n') {
2917                 search ++;
2918                 shift = TRUE;
2919                 goto again;
2920         }
2921
2922         g_free(compose->sig_str);
2923         compose->sig_str = compose_get_signature_str(compose);
2924         if (!compose->sig_str || (replace && !compose->account->auto_sig))
2925                 compose->sig_str = g_strdup("");
2926
2927         cur_pos = gtk_text_iter_get_offset(&iter);
2928         if (shift && found)
2929                 gtk_text_buffer_insert(buffer, &iter, compose->sig_str + 1, -1);
2930         else
2931                 gtk_text_buffer_insert(buffer, &iter, compose->sig_str, -1);
2932         /* skip \n\n */
2933         gtk_text_buffer_get_iter_at_offset(buffer, &iter, cur_pos);
2934         gtk_text_iter_forward_char(&iter);
2935         gtk_text_iter_forward_char(&iter);
2936         gtk_text_buffer_get_end_iter(buffer, &iter_end);
2937         gtk_text_buffer_apply_tag_by_name(buffer,"signature",&iter, &iter_end);
2938
2939         if (cur_pos > gtk_text_buffer_get_char_count (buffer))
2940                 cur_pos = gtk_text_buffer_get_char_count (buffer);
2941
2942         /* put the cursor where it should be 
2943          * either where the quote_fmt says, either before the signature */
2944         if (compose->set_cursor_pos < 0)
2945                 gtk_text_buffer_get_iter_at_offset(buffer, &iter, cur_pos);
2946         else
2947                 gtk_text_buffer_get_iter_at_offset(buffer, &iter, 
2948                         compose->set_cursor_pos);
2949                 
2950         gtk_text_buffer_place_cursor(buffer, &iter);
2951         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),
2952                                         G_CALLBACK(compose_changed_cb),
2953                                         compose);
2954                 
2955         compose->autowrap = prev_autowrap;
2956         if (compose->autowrap)
2957                 compose_wrap_all(compose);
2958 }
2959
2960 static gchar *compose_get_signature_str(Compose *compose)
2961 {
2962         gchar *sig_body = NULL;
2963         gchar *sig_str = NULL;
2964         gchar *utf8_sig_str = NULL;
2965
2966         g_return_val_if_fail(compose->account != NULL, NULL);
2967
2968         if (!compose->account->sig_path)
2969                 return NULL;
2970
2971         if (compose->account->sig_type == SIG_FILE) {
2972                 if (!is_file_or_fifo_exist(compose->account->sig_path)) {
2973                         g_warning("can't open signature file: %s\n",
2974                                   compose->account->sig_path);
2975                         return NULL;
2976                 }
2977         }
2978
2979         if (compose->account->sig_type == SIG_COMMAND)
2980                 sig_body = get_command_output(compose->account->sig_path);
2981         else {
2982                 gchar *tmp;
2983
2984                 tmp = file_read_to_str(compose->account->sig_path);
2985                 if (!tmp)
2986                         return NULL;
2987                 sig_body = normalize_newlines(tmp);
2988                 g_free(tmp);
2989         }
2990
2991         if (compose->account->sig_sep) {
2992                 sig_str = g_strconcat("\n\n", compose->account->sig_sep, "\n", sig_body,
2993                                       NULL);
2994                 g_free(sig_body);
2995         } else
2996                 sig_str = g_strconcat("\n\n", sig_body, NULL);
2997
2998         if (sig_str) {
2999                 if (g_utf8_validate(sig_str, -1, NULL) == TRUE)
3000                         utf8_sig_str = sig_str;
3001                 else {
3002                         utf8_sig_str = conv_codeset_strdup
3003                                 (sig_str, conv_get_locale_charset_str_no_utf8(),
3004                                  CS_INTERNAL);
3005                         g_free(sig_str);
3006                 }
3007         }
3008
3009         return utf8_sig_str;
3010 }
3011
3012 static ComposeInsertResult compose_insert_file(Compose *compose, const gchar *file)
3013 {
3014         GtkTextView *text;
3015         GtkTextBuffer *buffer;
3016         GtkTextMark *mark;
3017         GtkTextIter iter;
3018         const gchar *cur_encoding;
3019         gchar buf[BUFFSIZE];
3020         gint len;
3021         FILE *fp;
3022         gboolean prev_autowrap;
3023         gboolean badtxt = FALSE;
3024
3025         g_return_val_if_fail(file != NULL, COMPOSE_INSERT_NO_FILE);
3026
3027         if ((fp = g_fopen(file, "rb")) == NULL) {
3028                 FILE_OP_ERROR(file, "fopen");
3029                 return COMPOSE_INSERT_READ_ERROR;
3030         }
3031
3032         prev_autowrap = compose->autowrap;
3033         compose->autowrap = FALSE;
3034
3035         text = GTK_TEXT_VIEW(compose->text);
3036         buffer = gtk_text_view_get_buffer(text);
3037         mark = gtk_text_buffer_get_insert(buffer);
3038         gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
3039
3040         g_signal_handlers_block_by_func(G_OBJECT(buffer),
3041                                         G_CALLBACK(text_inserted),
3042                                         compose);
3043
3044         cur_encoding = conv_get_locale_charset_str_no_utf8();
3045
3046         while (fgets(buf, sizeof(buf), fp) != NULL) {
3047                 gchar *str;
3048
3049                 if (g_utf8_validate(buf, -1, NULL) == TRUE)
3050                         str = g_strdup(buf);
3051                 else
3052                         str = conv_codeset_strdup
3053                                 (buf, cur_encoding, CS_INTERNAL);
3054                 if (!str) continue;
3055
3056                 /* strip <CR> if DOS/Windows file,
3057                    replace <CR> with <LF> if Macintosh file. */
3058                 strcrchomp(str);
3059                 len = strlen(str);
3060                 if (len > 0 && str[len - 1] != '\n') {
3061                         while (--len >= 0)
3062                                 if (str[len] == '\r') str[len] = '\n';
3063                 }
3064
3065                 gtk_text_buffer_insert(buffer, &iter, str, -1);
3066                 g_free(str);
3067         }
3068
3069         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),
3070                                           G_CALLBACK(text_inserted),
3071                                           compose);
3072         compose->autowrap = prev_autowrap;
3073         if (compose->autowrap)
3074                 compose_wrap_all(compose);
3075
3076         fclose(fp);
3077
3078         if (badtxt)
3079                 return COMPOSE_INSERT_INVALID_CHARACTER;
3080         else 
3081                 return COMPOSE_INSERT_SUCCESS;
3082 }
3083
3084 static gboolean compose_attach_append(Compose *compose, const gchar *file,
3085                                   const gchar *filename,
3086                                   const gchar *content_type)
3087 {
3088         AttachInfo *ainfo;
3089         GtkTreeIter iter;
3090         FILE *fp;
3091         off_t size;
3092         GAuto *auto_ainfo;
3093         gchar *size_text;
3094         GtkListStore *store;
3095         gchar *name;
3096         gboolean has_binary = FALSE;
3097
3098         if (!is_file_exist(file)) {
3099                 alertpanel_error("File %s doesn't exist\n", filename);
3100                 return FALSE;
3101         }
3102         if ((size = get_file_size(file)) < 0) {
3103                 alertpanel_error("Can't get file size of %s\n", filename);
3104                 return FALSE;
3105         }
3106         if (size == 0) {
3107                 alertpanel_error(_("File %s is empty."), filename);
3108                 return FALSE;
3109         }
3110         if ((fp = g_fopen(file, "rb")) == NULL) {
3111                 alertpanel_error(_("Can't read %s."), filename);
3112                 return FALSE;
3113         }
3114         fclose(fp);
3115
3116         ainfo = g_new0(AttachInfo, 1);
3117         auto_ainfo = g_auto_pointer_new_with_free
3118                         (ainfo, (GFreeFunc) compose_attach_info_free); 
3119         ainfo->file = g_strdup(file);
3120
3121         if (content_type) {
3122                 ainfo->content_type = g_strdup(content_type);
3123                 if (!g_ascii_strcasecmp(content_type, "message/rfc822")) {
3124                         MsgInfo *msginfo;
3125                         MsgFlags flags = {0, 0};
3126
3127                         if (procmime_get_encoding_for_text_file(file, &has_binary) == ENC_7BIT)
3128                                 ainfo->encoding = ENC_7BIT;
3129                         else
3130                                 ainfo->encoding = ENC_8BIT;
3131
3132                         msginfo = procheader_parse_file(file, flags, FALSE, FALSE);
3133                         if (msginfo && msginfo->subject)
3134                                 name = g_strdup(msginfo->subject);
3135                         else
3136                                 name = g_path_get_basename(filename ? filename : file);
3137
3138                         ainfo->name = g_strdup_printf(_("Message: %s"), name);
3139
3140                         procmsg_msginfo_free(msginfo);
3141                 } else {
3142                         if (!g_ascii_strncasecmp(content_type, "text", 4))
3143                                 ainfo->encoding = procmime_get_encoding_for_text_file(file, &has_binary);
3144                         else
3145                                 ainfo->encoding = ENC_BASE64;
3146                         name = g_path_get_basename(filename ? filename : file);
3147                         ainfo->name = g_strdup(name);
3148                 }
3149                 g_free(name);
3150         } else {
3151                 ainfo->content_type = procmime_get_mime_type(file);
3152                 if (!ainfo->content_type) {
3153                         ainfo->content_type =
3154                                 g_strdup("application/octet-stream");
3155                         ainfo->encoding = ENC_BASE64;
3156                 } else if (!g_ascii_strncasecmp(ainfo->content_type, "text", 4))
3157                         ainfo->encoding =
3158                                 procmime_get_encoding_for_text_file(file, &has_binary);
3159                 else
3160                         ainfo->encoding = ENC_BASE64;
3161                 name = g_path_get_basename(filename ? filename : file);
3162                 ainfo->name = g_strdup(name);   
3163                 g_free(name);
3164         }
3165
3166         if (ainfo->name != NULL
3167         &&  !strcmp(ainfo->name, ".")) {
3168                 g_free(ainfo->name);
3169                 ainfo->name = NULL;
3170         }
3171
3172         if (!strcmp(ainfo->content_type, "unknown") || has_binary) {
3173                 g_free(ainfo->content_type);
3174                 ainfo->content_type = g_strdup("application/octet-stream");
3175         }
3176
3177         ainfo->size = size;
3178         size_text = to_human_readable(size);
3179
3180         store = GTK_LIST_STORE(gtk_tree_view_get_model
3181                         (GTK_TREE_VIEW(compose->attach_clist)));
3182                 
3183         gtk_list_store_append(store, &iter);
3184         gtk_list_store_set(store, &iter, 
3185                            COL_MIMETYPE, ainfo->content_type,
3186                            COL_SIZE, size_text,
3187                            COL_NAME, ainfo->name,
3188                            COL_DATA, ainfo,
3189                            COL_AUTODATA, auto_ainfo,
3190                            -1);
3191         
3192         g_auto_pointer_free(auto_ainfo);
3193         return TRUE;
3194 }
3195
3196 static void compose_use_signing(Compose *compose, gboolean use_signing)
3197 {
3198         GtkItemFactory *ifactory;
3199         GtkWidget *menuitem = NULL;
3200
3201         compose->use_signing = use_signing;
3202         ifactory = gtk_item_factory_from_widget(compose->menubar);
3203         menuitem = gtk_item_factory_get_item
3204                 (ifactory, "/Options/Sign");
3205         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem), 
3206                                        use_signing);
3207 }
3208
3209 static void compose_use_encryption(Compose *compose, gboolean use_encryption)
3210 {
3211         GtkItemFactory *ifactory;
3212         GtkWidget *menuitem = NULL;
3213
3214         compose->use_encryption = use_encryption;
3215         ifactory = gtk_item_factory_from_widget(compose->menubar);
3216         menuitem = gtk_item_factory_get_item
3217                 (ifactory, "/Options/Encrypt");
3218
3219         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem), 
3220                                        use_encryption);
3221 }
3222
3223 #define NEXT_PART_NOT_CHILD(info)  \
3224 {  \
3225         node = info->node;  \
3226         while (node->children)  \
3227                 node = g_node_last_child(node);  \
3228         info = procmime_mimeinfo_next((MimeInfo *)node->data);  \
3229 }
3230
3231 static void compose_attach_parts(Compose *compose, MsgInfo *msginfo)
3232 {
3233         MimeInfo *mimeinfo;
3234         MimeInfo *child;
3235         MimeInfo *firsttext = NULL;
3236         MimeInfo *encrypted = NULL;
3237         GNode    *node;
3238         gchar *outfile;
3239         const gchar *partname = NULL;
3240
3241         mimeinfo = procmime_scan_message(msginfo);
3242         if (!mimeinfo) return;
3243
3244         if (mimeinfo->node->children == NULL) {
3245                 procmime_mimeinfo_free_all(mimeinfo);
3246                 return;
3247         }
3248
3249         /* find first content part */
3250         child = (MimeInfo *) mimeinfo->node->children->data;
3251         while (child && child->node->children && (child->type == MIMETYPE_MULTIPART))
3252                 child = (MimeInfo *)child->node->children->data;
3253
3254         if (child->type == MIMETYPE_TEXT) {
3255                 firsttext = child;
3256                 debug_print("First text part found\n");
3257         } else if (compose->mode == COMPOSE_REEDIT &&
3258                  child->type == MIMETYPE_APPLICATION &&
3259                  !g_ascii_strcasecmp(child->subtype, "pgp-encrypted")) {
3260                 encrypted = (MimeInfo *)child->node->parent->data;
3261         }
3262      
3263         child = (MimeInfo *) mimeinfo->node->children->data;
3264         while (child != NULL) {
3265                 if (child == encrypted) {
3266                         /* skip this part of tree */
3267                         NEXT_PART_NOT_CHILD(child);
3268                         continue;
3269                 }
3270
3271                 if (child->type == MIMETYPE_MULTIPART) {
3272                         /* get the actual content */
3273                         child = procmime_mimeinfo_next(child);
3274                         continue;
3275                 }
3276                     
3277                 if (child == firsttext) {
3278                         child = procmime_mimeinfo_next(child);
3279                         continue;
3280                 }
3281
3282                 outfile = procmime_get_tmp_file_name(child);
3283                 if (procmime_get_part(outfile, child) < 0)
3284                         g_warning("Can't get the part of multipart message.");
3285                 else {
3286                         gchar *content_type;
3287
3288                         content_type = procmime_get_content_type_str(child->type, child->subtype);
3289
3290                         /* if we meet a pgp signature, we don't attach it, but
3291                          * we force signing. */
3292                         if (strcmp(content_type, "application/pgp-signature")) {
3293                                 partname = procmime_mimeinfo_get_parameter(child, "filename");
3294                                 if (partname == NULL)
3295                                         partname = procmime_mimeinfo_get_parameter(child, "name");
3296                                 if (partname == NULL)
3297                                         partname = "";
3298                                 compose_attach_append(compose, outfile, 
3299                                                       partname, content_type);
3300                         } else {
3301                                 compose_force_signing(compose, compose->account);
3302                         }
3303                         g_free(content_type);
3304                 }
3305                 g_free(outfile);
3306                 NEXT_PART_NOT_CHILD(child);
3307         }
3308         procmime_mimeinfo_free_all(mimeinfo);
3309 }
3310
3311 #undef NEXT_PART_NOT_CHILD
3312
3313
3314
3315 typedef enum {
3316         WAIT_FOR_INDENT_CHAR,
3317         WAIT_FOR_INDENT_CHAR_OR_SPACE,
3318 } IndentState;
3319
3320 /* return indent length, we allow:
3321    indent characters followed by indent characters or spaces/tabs,
3322    alphabets and numbers immediately followed by indent characters,
3323    and the repeating sequences of the above
3324    If quote ends with multiple spaces, only the first one is included. */
3325 static gchar *compose_get_quote_str(GtkTextBuffer *buffer,
3326                                     const GtkTextIter *start, gint *len)
3327 {
3328         GtkTextIter iter = *start;
3329         gunichar wc;
3330         gchar ch[6];
3331         gint clen;
3332         IndentState state = WAIT_FOR_INDENT_CHAR;
3333         gboolean is_space;
3334         gboolean is_indent;
3335         gint alnum_count = 0;
3336         gint space_count = 0;
3337         gint quote_len = 0;
3338
3339         if (prefs_common.quote_chars == NULL) {
3340                 return 0 ;
3341         }
3342
3343         while (!gtk_text_iter_ends_line(&iter)) {
3344                 wc = gtk_text_iter_get_char(&iter);
3345                 if (g_unichar_iswide(wc))
3346                         break;
3347                 clen = g_unichar_to_utf8(wc, ch);
3348                 if (clen != 1)
3349                         break;
3350
3351                 is_indent = strchr(prefs_common.quote_chars, ch[0]) ? TRUE : FALSE;
3352                 is_space = g_unichar_isspace(wc);
3353
3354                 if (state == WAIT_FOR_INDENT_CHAR) {
3355                         if (!is_indent && !g_unichar_isalnum(wc))
3356                                 break;
3357                         if (is_indent) {
3358                                 quote_len += alnum_count + space_count + 1;
3359                                 alnum_count = space_count = 0;
3360                                 state = WAIT_FOR_INDENT_CHAR_OR_SPACE;
3361                         } else
3362                                 alnum_count++;
3363                 } else if (state == WAIT_FOR_INDENT_CHAR_OR_SPACE) {
3364                         if (!is_indent && !is_space && !g_unichar_isalnum(wc))
3365                                 break;
3366                         if (is_space)
3367                                 space_count++;
3368                         else if (is_indent) {
3369                                 quote_len += alnum_count + space_count + 1;
3370                                 alnum_count = space_count = 0;
3371                         } else {
3372                                 alnum_count++;
3373                                 state = WAIT_FOR_INDENT_CHAR;
3374                         }
3375                 }
3376
3377                 gtk_text_iter_forward_char(&iter);
3378         }
3379
3380         if (quote_len > 0 && space_count > 0)
3381                 quote_len++;
3382
3383         if (len)
3384                 *len = quote_len;
3385
3386         if (quote_len > 0) {
3387                 iter = *start;
3388                 gtk_text_iter_forward_chars(&iter, quote_len);
3389                 return gtk_text_buffer_get_text(buffer, start, &iter, FALSE);
3390         }
3391
3392         return NULL;
3393 }
3394
3395 /* return TRUE if the line is itemized */
3396 static gboolean compose_is_itemized(GtkTextBuffer *buffer,
3397                                     const GtkTextIter *start)
3398 {
3399         GtkTextIter iter = *start;
3400         gunichar wc;
3401         gchar ch[6];
3402         gint clen;
3403
3404         if (gtk_text_iter_ends_line(&iter))
3405                 return FALSE;
3406
3407         while (1) {
3408                 wc = gtk_text_iter_get_char(&iter);
3409                 if (!g_unichar_isspace(wc))
3410                         break;
3411                 gtk_text_iter_forward_char(&iter);
3412                 if (gtk_text_iter_ends_line(&iter))
3413                         return FALSE;
3414         }
3415
3416         clen = g_unichar_to_utf8(wc, ch);
3417         if (clen != 1)
3418                 return FALSE;
3419
3420         if (!strchr("*-+", ch[0]))
3421                 return FALSE;
3422
3423         gtk_text_iter_forward_char(&iter);
3424         if (gtk_text_iter_ends_line(&iter))
3425                 return FALSE;
3426         wc = gtk_text_iter_get_char(&iter);
3427         if (g_unichar_isspace(wc))
3428                 return TRUE;
3429
3430         return FALSE;
3431 }
3432
3433 static gboolean compose_get_line_break_pos(GtkTextBuffer *buffer,
3434                                            const GtkTextIter *start,
3435                                            GtkTextIter *break_pos,
3436                                            gint max_col,
3437                                            gint quote_len)
3438 {
3439         GtkTextIter iter = *start, line_end = *start;
3440         PangoLogAttr *attrs;
3441         gchar *str;
3442         gchar *p;
3443         gint len;
3444         gint i;
3445         gint col = 0;
3446         gint pos = 0;
3447         gboolean can_break = FALSE;
3448         gboolean do_break = FALSE;
3449         gboolean was_white = FALSE;
3450         gboolean prev_dont_break = FALSE;
3451
3452         gtk_text_iter_forward_to_line_end(&line_end);
3453         str = gtk_text_buffer_get_text(buffer, &iter, &line_end, FALSE);
3454         len = g_utf8_strlen(str, -1);
3455         /* g_print("breaking line: %d: %s (len = %d)\n",
3456                 gtk_text_iter_get_line(&iter), str, len); */
3457         attrs = g_new(PangoLogAttr, len + 1);
3458
3459         pango_default_break(str, -1, NULL, attrs, len + 1);
3460
3461         p = str;
3462
3463         /* skip quote and leading spaces */
3464         for (i = 0; *p != '\0' && i < len; i++) {
3465                 gunichar wc;
3466
3467                 wc = g_utf8_get_char(p);
3468                 if (i >= quote_len && !g_unichar_isspace(wc))
3469                         break;
3470                 if (g_unichar_iswide(wc))
3471                         col += 2;
3472                 else if (*p == '\t')
3473                         col += 8;
3474                 else
3475                         col++;
3476                 p = g_utf8_next_char(p);
3477         }
3478
3479         for (; *p != '\0' && i < len; i++) {
3480                 PangoLogAttr *attr = attrs + i;
3481                 gunichar wc;
3482                 gint uri_len;
3483
3484                 if (attr->is_line_break && can_break && was_white && !prev_dont_break)
3485                         pos = i;
3486                 
3487                 was_white = attr->is_white;
3488
3489                 /* don't wrap URI */
3490                 if ((uri_len = get_uri_len(p)) > 0) {
3491                         col += uri_len;
3492                         if (pos > 0 && col > max_col) {
3493                                 do_break = TRUE;
3494                                 break;
3495                         }
3496                         i += uri_len - 1;
3497                         p += uri_len;
3498                         can_break = TRUE;
3499                         continue;
3500                 }
3501
3502                 wc = g_utf8_get_char(p);
3503                 if (g_unichar_iswide(wc)) {
3504                         col += 2;
3505                         if (prev_dont_break && can_break && attr->is_line_break)
3506                                 pos = i;
3507                 } else if (*p == '\t')
3508                         col += 8;
3509                 else
3510                         col++;
3511                 if (pos > 0 && col > max_col) {
3512                         do_break = TRUE;
3513                         break;
3514                 }
3515
3516                 if (*p == '-' || *p == '/')
3517                         prev_dont_break = TRUE;
3518                 else
3519                         prev_dont_break = FALSE;
3520
3521                 p = g_utf8_next_char(p);
3522                 can_break = TRUE;
3523         }
3524
3525         debug_print("compose_get_line_break_pos(): do_break = %d, pos = %d, col = %d\n", do_break, pos, col);
3526
3527         g_free(attrs);
3528         g_free(str);
3529
3530         *break_pos = *start;
3531         gtk_text_iter_set_line_offset(break_pos, pos);
3532
3533         return do_break;
3534 }
3535
3536 static gboolean compose_join_next_line(Compose *compose,
3537                                        GtkTextBuffer *buffer,
3538                                        GtkTextIter *iter,
3539                                        const gchar *quote_str)
3540 {
3541         GtkTextIter iter_ = *iter, cur, prev, next, end;
3542         PangoLogAttr attrs[3];
3543         gchar *str;
3544         gchar *next_quote_str;
3545         gunichar wc1, wc2;
3546         gint quote_len;
3547         gboolean keep_cursor = FALSE;
3548
3549         if (!gtk_text_iter_forward_line(&iter_) ||
3550             gtk_text_iter_ends_line(&iter_))
3551                 return FALSE;
3552
3553         next_quote_str = compose_get_quote_str(buffer, &iter_, &quote_len);
3554
3555         if ((quote_str || next_quote_str) &&
3556             strcmp2(quote_str, next_quote_str) != 0) {
3557                 g_free(next_quote_str);
3558                 return FALSE;
3559         }
3560         g_free(next_quote_str);
3561
3562         end = iter_;
3563         if (quote_len > 0) {
3564                 gtk_text_iter_forward_chars(&end, quote_len);
3565                 if (gtk_text_iter_ends_line(&end))
3566                         return FALSE;
3567         }
3568
3569         /* don't join itemized lines */
3570         if (compose_is_itemized(buffer, &end))
3571                 return FALSE;
3572
3573         /* don't join signature separator */
3574         if (compose_is_sig_separator(compose, buffer, &iter_))
3575                 return FALSE;
3576
3577         /* delete quote str */
3578         if (quote_len > 0)
3579                 gtk_text_buffer_delete(buffer, &iter_, &end);
3580
3581         /* don't join line breaks put by the user */
3582         prev = cur = iter_;
3583         gtk_text_iter_backward_char(&cur);
3584         if (gtk_text_iter_has_tag(&cur, compose->no_join_tag)) {
3585                 gtk_text_iter_forward_char(&cur);
3586                 *iter = cur;
3587                 return FALSE;
3588         }
3589         gtk_text_iter_forward_char(&cur);
3590         /* delete linebreak and extra spaces */
3591         while (gtk_text_iter_backward_char(&cur)) {
3592                 wc1 = gtk_text_iter_get_char(&cur);
3593                 if (!g_unichar_isspace(wc1))
3594                         break;
3595                 prev = cur;
3596         }
3597         next = cur = iter_;
3598         while (!gtk_text_iter_ends_line(&cur)) {
3599                 wc1 = gtk_text_iter_get_char(&cur);
3600                 if (!g_unichar_isspace(wc1))
3601                         break;
3602                 gtk_text_iter_forward_char(&cur);
3603                 next = cur;
3604         }
3605         if (!gtk_text_iter_equal(&prev, &next)) {
3606                 GtkTextMark *mark;
3607
3608                 mark = gtk_text_buffer_get_insert(buffer);
3609                 gtk_text_buffer_get_iter_at_mark(buffer, &cur, mark);
3610                 if (gtk_text_iter_equal(&prev, &cur))
3611                         keep_cursor = TRUE;
3612                 gtk_text_buffer_delete(buffer, &prev, &next);
3613         }
3614         iter_ = prev;
3615
3616         /* insert space if required */
3617         gtk_text_iter_backward_char(&prev);
3618         wc1 = gtk_text_iter_get_char(&prev);
3619         wc2 = gtk_text_iter_get_char(&next);
3620         gtk_text_iter_forward_char(&next);
3621         str = gtk_text_buffer_get_text(buffer, &prev, &next, FALSE);
3622         pango_default_break(str, -1, NULL, attrs, 3);
3623         if (!attrs[1].is_line_break ||
3624             (!g_unichar_iswide(wc1) || !g_unichar_iswide(wc2))) {
3625                 gtk_text_buffer_insert(buffer, &iter_, " ", 1);
3626                 if (keep_cursor) {
3627                         gtk_text_iter_backward_char(&iter_);
3628                         gtk_text_buffer_place_cursor(buffer, &iter_);
3629                 }
3630         }
3631         g_free(str);
3632
3633         *iter = iter_;
3634         return TRUE;
3635 }
3636
3637 #define ADD_TXT_POS(bp_, ep_, pti_) \
3638         if ((last->next = alloca(sizeof(struct txtpos))) != NULL) { \
3639                 last = last->next; \
3640                 last->bp = (bp_); last->ep = (ep_); last->pti = (pti_); \
3641                 last->next = NULL; \
3642         } else { \
3643                 g_warning("alloc error scanning URIs\n"); \
3644         }
3645
3646 static gboolean automatic_break = FALSE;
3647 static void compose_beautify_paragraph(Compose *compose, GtkTextIter *par_iter, gboolean force)
3648 {
3649         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
3650         GtkTextBuffer *buffer;
3651         GtkTextIter iter, break_pos, end_of_line;
3652         gchar *quote_str = NULL;
3653         gint quote_len;
3654         gboolean wrap_quote = prefs_common.linewrap_quote;
3655         gboolean prev_autowrap = compose->autowrap;
3656         gint startq_offset = -1, noq_offset = -1;
3657         gint uri_start = -1, uri_stop = -1;
3658         gint nouri_start = -1, nouri_stop = -1;
3659         gint num_blocks = 0;
3660         gint quotelevel = -1;
3661
3662         compose->autowrap = FALSE;
3663
3664         buffer = gtk_text_view_get_buffer(text);
3665         undo_wrapping(compose->undostruct, TRUE);
3666         if (par_iter) {
3667                 iter = *par_iter;
3668         } else {
3669                 GtkTextMark *mark;
3670                 mark = gtk_text_buffer_get_insert(buffer);
3671                 gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
3672         }
3673
3674         /* move to paragraph start */
3675         gtk_text_iter_set_line_offset(&iter, 0);
3676         if (gtk_text_iter_ends_line(&iter)) {
3677                 while (gtk_text_iter_ends_line(&iter) &&
3678                        gtk_text_iter_forward_line(&iter))
3679                         ;
3680         } else {
3681                 while (gtk_text_iter_backward_line(&iter)) {
3682                         if (gtk_text_iter_ends_line(&iter)) {
3683                                 gtk_text_iter_forward_line(&iter);
3684                                 break;
3685                         }
3686                 }
3687         }
3688
3689         /* go until paragraph end (empty line) */
3690         
3691         while (!gtk_text_iter_ends_line(&iter)) {
3692                 gchar *scanpos = NULL;
3693                 /* parse table - in order of priority */
3694                 struct table {
3695                         const gchar *needle; /* token */
3696
3697                         /* token search function */
3698                         gchar    *(*search)     (const gchar *haystack,
3699                                                  const gchar *needle);
3700                         /* part parsing function */
3701                         gboolean  (*parse)      (const gchar *start,
3702                                                  const gchar *scanpos,
3703                                                  const gchar **bp_,
3704                                                  const gchar **ep_,
3705                                                  gboolean hdr);
3706                         /* part to URI function */
3707                         gchar    *(*build_uri)  (const gchar *bp,
3708                                                  const gchar *ep);
3709                 };
3710
3711                 static struct table parser[] = {
3712                         {"http://",  strcasestr, get_uri_part,   make_uri_string},
3713                         {"https://", strcasestr, get_uri_part,   make_uri_string},
3714                         {"ftp://",   strcasestr, get_uri_part,   make_uri_string},
3715                         {"sftp://",  strcasestr, get_uri_part,   make_uri_string},
3716                         {"www.",     strcasestr, get_uri_part,   make_http_string},
3717                         {"mailto:",  strcasestr, get_uri_part,   make_uri_string},
3718                         {"@",        strcasestr, get_email_part, make_email_string}
3719                 };
3720                 const gint PARSE_ELEMS = sizeof parser / sizeof parser[0];
3721                 gint last_index = PARSE_ELEMS;
3722                 gint  n;
3723                 gchar *o_walk = NULL, *walk = NULL, *bp = NULL, *ep = NULL;
3724                 gint walk_pos;
3725                 
3726                 if (!prev_autowrap && num_blocks == 0) {
3727                         num_blocks++;
3728                         g_signal_handlers_block_by_func(G_OBJECT(buffer),
3729                                         G_CALLBACK(text_inserted),
3730                                         compose);
3731                 }
3732                 if (gtk_text_iter_has_tag(&iter, compose->no_wrap_tag) && !force)
3733                         goto colorize;
3734
3735                 uri_start = uri_stop = -1;
3736                 quote_len = 0;
3737                 quote_str = compose_get_quote_str(buffer, &iter, &quote_len);
3738
3739                 if (quote_str) {
3740                         if (!wrap_quote) {
3741                                 if (startq_offset == -1) {
3742                                         startq_offset = gtk_text_iter_get_offset(&iter);
3743                                 }
3744                                 goto colorize;
3745                         }
3746                         debug_print("compose_beautify_paragraph(): quote_str = '%s'\n", quote_str);
3747                         if (startq_offset == -1) 
3748                                 startq_offset = gtk_text_iter_get_offset(&iter);
3749                         quotelevel = get_quote_level(quote_str, prefs_common.quote_chars);
3750                         if (quotelevel > 2) {
3751                                 /* recycle colors */
3752                                 if (prefs_common.recycle_quote_colors)
3753                                         quotelevel %= 3;
3754                                 else
3755                                         quotelevel = 2;
3756                         }
3757                 } else {
3758                         if (startq_offset == -1)
3759                                 noq_offset = gtk_text_iter_get_offset(&iter);
3760                         quotelevel = -1;
3761                 }
3762
3763                 if (prev_autowrap == FALSE && !force && !wrap_quote) {
3764                         goto colorize;
3765                 }
3766                 if (compose_get_line_break_pos(buffer, &iter, &break_pos,
3767                                                prefs_common.linewrap_len,
3768                                                quote_len)) {
3769                         GtkTextIter prev, next, cur;
3770                         
3771                         if (prev_autowrap != FALSE || force) {
3772                                 automatic_break = TRUE;
3773                                 gtk_text_buffer_insert(buffer, &break_pos, "\n", 1);
3774                                 automatic_break = FALSE;
3775                         } else if (quote_str && wrap_quote) {
3776                                 automatic_break = TRUE;
3777                                 gtk_text_buffer_insert(buffer, &break_pos, "\n", 1);
3778                                 automatic_break = FALSE;
3779                         } else 
3780                                 goto colorize;
3781                         /* remove trailing spaces */
3782                         cur = break_pos;
3783                         gtk_text_iter_backward_char(&cur);
3784                         prev = next = cur;
3785                         while (!gtk_text_iter_starts_line(&cur)) {
3786                                 gunichar wc;
3787
3788                                 gtk_text_iter_backward_char(&cur);
3789                                 wc = gtk_text_iter_get_char(&cur);
3790                                 if (!g_unichar_isspace(wc))
3791                                         break;
3792                                 prev = cur;
3793                         }
3794                         if (!gtk_text_iter_equal(&prev, &next)) {
3795                                 gtk_text_buffer_delete(buffer, &prev, &next);
3796                                 break_pos = next;
3797                                 gtk_text_iter_forward_char(&break_pos);
3798                         }
3799
3800                         if (quote_str)
3801                                 gtk_text_buffer_insert(buffer, &break_pos,
3802                                                        quote_str, -1);
3803
3804                         iter = break_pos;
3805                         compose_join_next_line(compose, buffer, &iter, quote_str);
3806
3807                         /* move iter to current line start */
3808                         gtk_text_iter_set_line_offset(&iter, 0);
3809                         if (quote_str) {
3810                                 g_free(quote_str);
3811                                 quote_str = NULL;
3812                         }
3813                         continue;
3814                 } else {
3815                         /* move iter to next line start */
3816                         iter = break_pos;
3817                 }
3818
3819 colorize:
3820                 if (!prev_autowrap && num_blocks > 0) {
3821                         num_blocks--;
3822                         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),
3823                                         G_CALLBACK(text_inserted),
3824                                         compose);
3825                 }
3826                 end_of_line = iter;
3827                 while (!gtk_text_iter_ends_line(&end_of_line)) {
3828                         gtk_text_iter_forward_char(&end_of_line);
3829                 }
3830                 o_walk = walk = gtk_text_buffer_get_text(buffer, &iter, &end_of_line, FALSE);
3831
3832                 nouri_start = gtk_text_iter_get_offset(&iter);
3833                 nouri_stop = gtk_text_iter_get_offset(&end_of_line);
3834
3835                 walk_pos = gtk_text_iter_get_offset(&iter);
3836                 /* FIXME: this looks phony. scanning for anything in the parse table */
3837                 for (n = 0; n < PARSE_ELEMS; n++) {
3838                         gchar *tmp;
3839
3840                         tmp = parser[n].search(walk, parser[n].needle);
3841                         if (tmp) {
3842                                 if (scanpos == NULL || tmp < scanpos) {
3843                                         scanpos = tmp;
3844                                         last_index = n;
3845                                 }
3846                         }                                       
3847                 }
3848
3849                 bp = ep = 0;
3850                 if (scanpos) {
3851                         /* check if URI can be parsed */
3852                         if (parser[last_index].parse(walk, scanpos, (const gchar **)&bp,
3853                                         (const gchar **)&ep, FALSE)
3854                             && (size_t) (ep - bp - 1) > strlen(parser[last_index].needle)) {
3855                                         walk = ep;
3856                         } else
3857                                 walk = scanpos +
3858                                         strlen(parser[last_index].needle);
3859                 } 
3860                 if (bp && ep) {
3861                         uri_start = walk_pos + (bp - o_walk);
3862                         uri_stop  = walk_pos + (ep - o_walk);
3863                 }
3864                 g_free(o_walk);
3865                 o_walk = NULL;
3866                 gtk_text_iter_forward_line(&iter);
3867                 g_free(quote_str);
3868                 quote_str = NULL;
3869                 if (startq_offset != -1) {
3870                         GtkTextIter startquote, endquote;
3871                         gtk_text_buffer_get_iter_at_offset(
3872                                 buffer, &startquote, startq_offset);
3873                         endquote = iter;
3874                         switch (quotelevel) {
3875                         case 0: gtk_text_buffer_apply_tag_by_name(
3876                                         buffer, "quote0", &startquote, &endquote);
3877                                 break;
3878                         case 1: gtk_text_buffer_apply_tag_by_name(
3879                                         buffer, "quote1", &startquote, &endquote);
3880                                 break;
3881                         case 2: gtk_text_buffer_apply_tag_by_name(
3882                                         buffer, "quote2", &startquote, &endquote);
3883                                 break;
3884                         }
3885                         startq_offset = -1;
3886                 } else if (noq_offset != -1) {
3887                         GtkTextIter startnoquote, endnoquote;
3888                         gtk_text_buffer_get_iter_at_offset(
3889                                 buffer, &startnoquote, noq_offset);
3890                         endnoquote = iter;
3891                         gtk_text_buffer_remove_tag_by_name(
3892                                 buffer, "quote0", &startnoquote, &endnoquote);
3893                         gtk_text_buffer_remove_tag_by_name(
3894                                 buffer, "quote1", &startnoquote, &endnoquote);
3895                         gtk_text_buffer_remove_tag_by_name(
3896                                 buffer, "quote2", &startnoquote, &endnoquote);
3897                         noq_offset = -1;
3898                 }
3899                 
3900                 /* always */ {
3901                         GtkTextIter nouri_start_iter, nouri_end_iter;
3902                         gtk_text_buffer_get_iter_at_offset(
3903                                 buffer, &nouri_start_iter, nouri_start);
3904                         gtk_text_buffer_get_iter_at_offset(
3905                                 buffer, &nouri_end_iter, nouri_stop);
3906                         gtk_text_buffer_remove_tag_by_name(
3907                                 buffer, "link", &nouri_start_iter, &nouri_end_iter);
3908                 }
3909                 if (uri_start > 0 && uri_stop > 0) {
3910                         GtkTextIter uri_start_iter, uri_end_iter;
3911                         gtk_text_buffer_get_iter_at_offset(
3912                                 buffer, &uri_start_iter, uri_start);
3913                         gtk_text_buffer_get_iter_at_offset(
3914                                 buffer, &uri_end_iter, uri_stop);
3915                         gtk_text_buffer_apply_tag_by_name(
3916                                 buffer, "link", &uri_start_iter, &uri_end_iter);
3917                 }
3918         }
3919
3920         if (par_iter)
3921                 *par_iter = iter;
3922         undo_wrapping(compose->undostruct, FALSE);
3923         compose->autowrap = prev_autowrap;
3924 }
3925
3926 void compose_action_cb(void *data)
3927 {
3928         Compose *compose = (Compose *)data;
3929         compose_wrap_all(compose);
3930 }
3931
3932 static void compose_wrap_all(Compose *compose)
3933 {
3934         compose_wrap_all_full(compose, FALSE);
3935 }
3936
3937 static void compose_wrap_all_full(Compose *compose, gboolean force)
3938 {
3939         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
3940         GtkTextBuffer *buffer;
3941         GtkTextIter iter;
3942
3943         buffer = gtk_text_view_get_buffer(text);
3944
3945         gtk_text_buffer_get_start_iter(buffer, &iter);
3946         while (!gtk_text_iter_is_end(&iter))
3947                 compose_beautify_paragraph(compose, &iter, force);
3948
3949 }
3950
3951 static void compose_set_title(Compose *compose)
3952 {
3953         gchar *str;
3954         gchar *edited;
3955         gchar *subject;
3956         
3957         edited = compose->modified ? _(" [Edited]") : "";
3958         
3959         subject = gtk_editable_get_chars(
3960                         GTK_EDITABLE(compose->subject_entry), 0, -1);
3961
3962         if (subject && strlen(subject))
3963                 str = g_strdup_printf(_("%s - Compose message%s"),
3964                                       subject, edited); 
3965         else
3966                 str = g_strdup_printf(_("[no subject] - Compose message%s"), edited);
3967         gtk_window_set_title(GTK_WINDOW(compose->window), str);
3968         g_free(str);
3969         g_free(subject);
3970 }
3971
3972 /**
3973  * compose_current_mail_account:
3974  * 
3975  * Find a current mail account (the currently selected account, or the
3976  * default account, if a news account is currently selected).  If a
3977  * mail account cannot be found, display an error message.
3978  * 
3979  * Return value: Mail account, or NULL if not found.
3980  **/
3981 static PrefsAccount *
3982 compose_current_mail_account(void)
3983 {
3984         PrefsAccount *ac;
3985
3986         if (cur_account && cur_account->protocol != A_NNTP)
3987                 ac = cur_account;
3988         else {
3989                 ac = account_get_default();
3990                 if (!ac || ac->protocol == A_NNTP) {
3991                         alertpanel_error(_("Account for sending mail is not specified.\n"
3992                                            "Please select a mail account before sending."));
3993                         return NULL;
3994                 }
3995         }
3996         return ac;
3997 }
3998
3999 #define QUOTE_IF_REQUIRED(out, str)                                     \
4000 {                                                                       \
4001         if (*str != '"' && strpbrk(str, ",.[]<>")) {                    \
4002                 gchar *__tmp;                                           \
4003                 gint len;                                               \
4004                                                                         \
4005                 len = strlen(str) + 3;                                  \
4006                 if ((__tmp = alloca(len)) == NULL) {                    \
4007                         g_warning("can't allocate memory\n");           \
4008                         g_string_free(header, TRUE);                    \
4009                         return NULL;                                    \
4010                 }                                                       \
4011                 g_snprintf(__tmp, len, "\"%s\"", str);                  \
4012                 out = __tmp;                                            \
4013         } else {                                                        \
4014                 gchar *__tmp;                                           \
4015                                                                         \
4016                 if ((__tmp = alloca(strlen(str) + 1)) == NULL) {        \
4017                         g_warning("can't allocate memory\n");           \
4018                         g_string_free(header, TRUE);                    \
4019                         return NULL;                                    \
4020                 } else                                                  \
4021                         strcpy(__tmp, str);                             \
4022                                                                         \
4023                 out = __tmp;                                            \
4024         }                                                               \
4025 }
4026
4027 #define QUOTE_IF_REQUIRED_NORMAL(out, str, errret)                      \
4028 {                                                                       \
4029         if (*str != '"' && strpbrk(str, ",.[]<>")) {                    \
4030                 gchar *__tmp;                                           \
4031                 gint len;                                               \
4032                                                                         \
4033                 len = strlen(str) + 3;                                  \
4034                 if ((__tmp = alloca(len)) == NULL) {                    \
4035                         g_warning("can't allocate memory\n");           \
4036                         errret;                                         \
4037                 }                                                       \
4038                 g_snprintf(__tmp, len, "\"%s\"", str);                  \
4039                 out = __tmp;                                            \
4040         } else {                                                        \
4041                 gchar *__tmp;                                           \
4042                                                                         \
4043                 if ((__tmp = alloca(strlen(str) + 1)) == NULL) {        \
4044                         g_warning("can't allocate memory\n");           \
4045                         errret;                                         \
4046                 } else                                                  \
4047                         strcpy(__tmp, str);                             \
4048                                                                         \
4049                 out = __tmp;                                            \
4050         }                                                               \
4051 }
4052
4053 static void compose_select_account(Compose *compose, PrefsAccount *account,
4054                                    gboolean init)
4055 {
4056         GtkItemFactory *ifactory;
4057         gchar *from = NULL;
4058
4059         g_return_if_fail(account != NULL);
4060
4061         compose->account = account;
4062
4063         if (account->name && *account->name) {
4064                 gchar *buf;
4065                 QUOTE_IF_REQUIRED_NORMAL(buf, account->name, return);
4066                 from = g_strdup_printf("%s <%s>",
4067                                        buf, account->address);
4068                 gtk_entry_set_text(GTK_ENTRY(compose->from_name), from);
4069         } else {
4070                 from = g_strdup_printf("<%s>",
4071                                        account->address);
4072                 gtk_entry_set_text(GTK_ENTRY(compose->from_name), from);
4073         }
4074
4075         g_free(from);
4076
4077         compose_set_title(compose);
4078
4079         ifactory = gtk_item_factory_from_widget(compose->menubar);
4080
4081         if (account->default_sign && compose->mode != COMPOSE_REDIRECT)
4082                 menu_set_active(ifactory, "/Options/Sign", TRUE);
4083         else
4084                 menu_set_active(ifactory, "/Options/Sign", FALSE);
4085         if (account->default_encrypt && compose->mode != COMPOSE_REDIRECT)
4086                 menu_set_active(ifactory, "/Options/Encrypt", TRUE);
4087         else
4088                 menu_set_active(ifactory, "/Options/Encrypt", FALSE);
4089                                        
4090         activate_privacy_system(compose, account, FALSE);
4091
4092         if (!init && compose->mode != COMPOSE_REDIRECT) {
4093                 undo_block(compose->undostruct);
4094                 compose_insert_sig(compose, TRUE);
4095                 undo_unblock(compose->undostruct);
4096         }
4097 }
4098
4099 gboolean compose_check_for_valid_recipient(Compose *compose) {
4100         gchar *recipient_headers_mail[] = {"To:", "Cc:", "Bcc:", NULL};
4101         gchar *recipient_headers_news[] = {"Newsgroups:", NULL};
4102         gboolean recipient_found = FALSE;
4103         GSList *list;
4104         gchar **strptr;
4105
4106         /* free to and newsgroup list */
4107         slist_free_strings(compose->to_list);
4108         g_slist_free(compose->to_list);
4109         compose->to_list = NULL;
4110                         
4111         slist_free_strings(compose->newsgroup_list);
4112         g_slist_free(compose->newsgroup_list);
4113         compose->newsgroup_list = NULL;
4114
4115         /* search header entries for to and newsgroup entries */
4116         for (list = compose->header_list; list; list = list->next) {
4117                 gchar *header;
4118                 gchar *entry;
4119                 header = gtk_editable_get_chars(GTK_EDITABLE(GTK_COMBO(((ComposeHeaderEntry *)list->data)->combo)->entry), 0, -1);
4120                 entry = gtk_editable_get_chars(GTK_EDITABLE(((ComposeHeaderEntry *)list->data)->entry), 0, -1);
4121
4122                 g_strstrip(entry);
4123                 if (entry[0] != '\0') {
4124                         for (strptr = recipient_headers_mail; *strptr != NULL; strptr++) {
4125                                 if (!strcmp(header, (prefs_common.trans_hdr ? gettext(*strptr) : *strptr))) {
4126                                         compose->to_list = address_list_append(compose->to_list, entry);
4127                                         recipient_found = TRUE;
4128                                 }
4129                         }
4130                         for (strptr = recipient_headers_news; *strptr != NULL; strptr++) {
4131                                 if (!strcmp(header, (prefs_common.trans_hdr ? gettext(*strptr) : *strptr))) {
4132                                         compose->newsgroup_list = newsgroup_list_append(compose->newsgroup_list, entry);
4133                                         recipient_found = TRUE;
4134                                 }
4135                         }
4136                 }
4137                 g_free(header);
4138                 g_free(entry);
4139         }
4140         return recipient_found;
4141 }
4142
4143 static gboolean compose_check_for_set_recipients(Compose *compose)
4144 {
4145         if (compose->account->set_autocc && compose->account->auto_cc) {
4146                 gboolean found_other = FALSE;
4147                 GSList *list;
4148                 /* search header entries for to and newsgroup entries */
4149                 for (list = compose->header_list; list; list = list->next) {
4150                         gchar *entry;
4151                         gchar *header;
4152                         entry = gtk_editable_get_chars(GTK_EDITABLE(((ComposeHeaderEntry *)list->data)->entry), 0, -1);
4153                         header = gtk_editable_get_chars(GTK_EDITABLE(GTK_COMBO(((ComposeHeaderEntry *)list->data)->combo)->entry), 0, -1);
4154                         g_strstrip(entry);
4155                         if (strcmp(entry, compose->account->auto_cc)
4156                         ||  strcmp(header, (prefs_common.trans_hdr ? gettext("Cc:") : "Cc:"))) {
4157                                 found_other = TRUE;
4158                                 g_free(entry);
4159                                 break;
4160                         }
4161                         g_free(entry);
4162                         g_free(header);
4163                 }
4164                 if (!found_other) {
4165                         AlertValue aval;
4166                         if (compose->batch) {
4167                                 gtk_widget_show_all(compose->window);
4168                         }
4169                         aval = alertpanel(_("Send"),
4170                                           _("The only recipient is the default CC address. Send anyway?"),
4171                                           GTK_STOCK_CANCEL, _("+_Send"), NULL);
4172                         if (aval != G_ALERTALTERNATE)
4173                                 return FALSE;
4174                 }
4175         }
4176         if (compose->account->set_autobcc && compose->account->auto_bcc) {
4177                 gboolean found_other = FALSE;
4178                 GSList *list;
4179                 /* search header entries for to and newsgroup entries */
4180                 for (list = compose->header_list; list; list = list->next) {
4181                         gchar *entry;
4182                         gchar *header;
4183                         entry = gtk_editable_get_chars(GTK_EDITABLE(((ComposeHeaderEntry *)list->data)->entry), 0, -1);
4184                         header = gtk_editable_get_chars(GTK_EDITABLE(GTK_COMBO(((ComposeHeaderEntry *)list->data)->combo)->entry), 0, -1);
4185                         g_strstrip(entry);
4186                         if (strcmp(entry, compose->account->auto_bcc)
4187                         ||  strcmp(header, (prefs_common.trans_hdr ? gettext("Bcc:") : "Bcc:"))) {
4188                                 found_other = TRUE;
4189                                 g_free(entry);
4190                                 break;
4191                         }
4192                         g_free(entry);
4193                         g_free(header);
4194                 }
4195                 if (!found_other) {
4196                         AlertValue aval;
4197                         if (compose->batch) {
4198                                 gtk_widget_show_all(compose->window);
4199                         }
4200                         aval = alertpanel(_("Send"),
4201                                           _("The only recipient is the default BCC address. Send anyway?"),
4202                                           GTK_STOCK_CANCEL, _("+_Send"), NULL);
4203                         if (aval != G_ALERTALTERNATE)
4204                                 return FALSE;
4205                 }
4206         }
4207         return TRUE;
4208 }
4209
4210 static gboolean compose_check_entries(Compose *compose, gboolean check_everything)
4211 {
4212         const gchar *str;
4213
4214         if (compose_check_for_valid_recipient(compose) == FALSE) {
4215                 if (compose->batch) {
4216                         gtk_widget_show_all(compose->window);
4217                 }
4218                 alertpanel_error(_("Recipient is not specified."));
4219                 return FALSE;
4220         }
4221
4222         if (compose_check_for_set_recipients(compose) == FALSE) {
4223                 return FALSE;
4224         }
4225
4226         if (!compose->batch) {
4227                 str = gtk_entry_get_text(GTK_ENTRY(compose->subject_entry));
4228                 if (*str == '\0' && check_everything == TRUE) {
4229                         AlertValue aval;
4230
4231                         aval = alertpanel(_("Send"),
4232                                           _("Subject is empty. Send it anyway?"),
4233                                           GTK_STOCK_CANCEL, _("+_Send"), NULL);
4234                         if (aval != G_ALERTALTERNATE)
4235                                 return FALSE;
4236                 }
4237         }
4238
4239         if (check_everything && hooks_invoke(COMPOSE_CHECK_BEFORE_SEND_HOOKLIST, compose))
4240                 return FALSE;
4241
4242         return TRUE;
4243 }
4244
4245 gint compose_send(Compose *compose)
4246 {
4247         gint msgnum;
4248         FolderItem *folder = NULL;
4249         gint val = -1;
4250         gchar *msgpath = NULL;
4251         gboolean discard_window = FALSE;
4252         gchar *errstr = NULL;
4253         gchar *tmsgid = NULL;
4254         MainWindow *mainwin = mainwindow_get_mainwindow();
4255
4256         if (prefs_common.send_dialog_mode != SEND_DIALOG_ALWAYS
4257                         || compose->batch == TRUE)
4258                 discard_window = TRUE;
4259
4260         compose_allow_user_actions (compose, FALSE);
4261         compose->sending = TRUE;
4262
4263         if (compose_check_entries(compose, TRUE) == FALSE) {
4264                 if (compose->batch) {
4265                         gtk_widget_show_all(compose->window);
4266                 }
4267                 goto bail;
4268         }
4269
4270         inc_lock();
4271         val = compose_queue(compose, &msgnum, &folder, &msgpath, TRUE);
4272
4273         if (val) {
4274                 if (compose->batch) {
4275                         gtk_widget_show_all(compose->window);
4276                 }
4277                 if (val == -4) {
4278                         alertpanel_error(_("Could not queue message for sending:\n\n"
4279                                            "Charset conversion failed."));
4280                 } else if (val == -5) {
4281                         alertpanel_error(_("Could not queue message for sending:\n\n"
4282                                            "Couldn't get recipient encryption key."));
4283                 } else if (val == -3) {
4284                         if (privacy_peek_error())
4285                         alertpanel_error(_("Could not queue message for sending:\n\n"
4286                                            "Signature failed: %s"), privacy_get_error());
4287                 } else if (val == -2 && errno != 0) {
4288                         alertpanel_error(_("Could not queue message for sending:\n\n%s."), strerror(errno));
4289                 } else {
4290                         alertpanel_error(_("Could not queue message for sending."));
4291                 }
4292                 goto bail;
4293         }
4294
4295         tmsgid = g_strdup(compose->msgid);
4296         if (discard_window) {
4297                 compose->sending = FALSE;
4298                 compose_close(compose);
4299                 /* No more compose access in the normal codepath 
4300                  * after this point! */
4301                 compose = NULL;
4302         }
4303
4304         if (msgnum == 0) {
4305                 alertpanel_error(_("The message was queued but could not be "
4306                                    "sent.\nUse \"Send queued messages\" from "
4307                                    "the main window to retry."));
4308                 if (!discard_window) {
4309                         goto bail;
4310                 }
4311                 inc_unlock();
4312                 g_free(tmsgid);
4313                 return -1;
4314         }
4315         if (msgpath == NULL) {
4316                 msgpath = folder_item_fetch_msg(folder, msgnum);
4317                 val = procmsg_send_message_queue(msgpath, &errstr, folder, msgnum);
4318                 g_free(msgpath);
4319         } else {
4320                 val = procmsg_send_message_queue(msgpath, &errstr, folder, msgnum);
4321                 g_unlink(msgpath);
4322                 g_free(msgpath);
4323         }
4324         if (!discard_window) {
4325                 compose->sending = FALSE;
4326                 compose_allow_user_actions (compose, TRUE);
4327                 if (val != 0) {
4328                         folder_item_remove_msg(folder, msgnum);
4329                         folder_item_scan(folder);
4330                         if (tmsgid) {
4331                                 /* make sure we delete that */
4332                                 MsgInfo *tmp = folder_item_get_msginfo_by_msgid(folder, tmsgid);
4333                                 if (tmp) {
4334                                         debug_print("removing %d via %s\n", tmp->msgnum, tmsgid);
4335                                         folder_item_remove_msg(folder, tmp->msgnum);
4336                                         procmsg_msginfo_free(tmp);
4337                                 } 
4338                         }
4339                 }
4340         }
4341
4342         if (val == 0) {
4343                 folder_item_remove_msg(folder, msgnum);
4344                 folder_item_scan(folder);
4345                 if (tmsgid) {
4346                         /* make sure we delete that */
4347                         MsgInfo *tmp = folder_item_get_msginfo_by_msgid(folder, tmsgid);
4348                         if (tmp) {
4349                                 debug_print("removing %d via %s\n", tmp->msgnum, tmsgid);
4350                                 folder_item_remove_msg(folder, tmp->msgnum);
4351                                 procmsg_msginfo_free(tmp);
4352                         }
4353                 }
4354                 if (!discard_window)
4355                         compose_close(compose);
4356         } else {
4357                 if (errstr) {
4358                         gchar *tmp = g_strdup_printf(_("%s\nUse \"Send queued messages\" from "
4359                                    "the main window to retry."), errstr);
4360                         g_free(errstr);
4361                         alertpanel_error_log(tmp);
4362                         g_free(tmp);
4363                 } else {
4364                         alertpanel_error_log(_("The message was queued but could not be "
4365                                    "sent.\nUse \"Send queued messages\" from "
4366                                    "the main window to retry."));
4367                 }
4368                 if (!discard_window) {
4369                         goto bail;              
4370                 }
4371                 inc_unlock();
4372                 g_free(tmsgid);
4373                 return -1;
4374         }
4375         g_free(tmsgid);
4376         inc_unlock();
4377         toolbar_main_set_sensitive(mainwin);
4378         main_window_set_menu_sensitive(mainwin);
4379         return 0;
4380
4381 bail:
4382         inc_unlock();
4383         g_free(tmsgid);
4384         compose_allow_user_actions (compose, TRUE);
4385         compose->sending = FALSE;
4386         compose->modified = TRUE; 
4387         toolbar_main_set_sensitive(mainwin);
4388         main_window_set_menu_sensitive(mainwin);
4389
4390         return -1;
4391 }
4392
4393 static gboolean compose_use_attach(Compose *compose) 
4394 {
4395         GtkTreeModel *model = gtk_tree_view_get_model
4396                                 (GTK_TREE_VIEW(compose->attach_clist));
4397         return gtk_tree_model_iter_n_children(model, NULL) > 0;
4398 }
4399
4400 static gint compose_redirect_write_headers_from_headerlist(Compose *compose, 
4401                                                            FILE *fp)
4402 {
4403         gchar buf[BUFFSIZE];
4404         gchar *str;
4405         gboolean first_to_address;
4406         gboolean first_cc_address;
4407         GSList *list;
4408         ComposeHeaderEntry *headerentry;
4409         const gchar *headerentryname;
4410         gchar *cc_hdr;
4411         gchar *to_hdr;
4412
4413         debug_print("Writing redirect header\n");
4414
4415         cc_hdr = prefs_common.trans_hdr ? _("Cc:") : "Cc:";
4416         to_hdr = prefs_common.trans_hdr ? _("To:") : "To:";
4417
4418         first_to_address = TRUE;
4419         for (list = compose->header_list; list; list = list->next) {
4420                 headerentry = ((ComposeHeaderEntry *)list->data);
4421                 headerentryname = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(headerentry->combo)->entry));
4422
4423                 if (g_utf8_collate(headerentryname, to_hdr) == 0) {
4424                         const gchar *entstr = gtk_entry_get_text(GTK_ENTRY(headerentry->entry));
4425                         Xstrdup_a(str, entstr, return -1);
4426                         g_strstrip(str);
4427                         if (str[0] != '\0') {
4428                                 compose_convert_header
4429                                         (compose, buf, sizeof(buf), str,
4430                                         strlen("Resent-To") + 2, TRUE);
4431
4432                                 if (first_to_address) {
4433                                         fprintf(fp, "Resent-To: ");
4434                                         first_to_address = FALSE;
4435                                 } else {
4436                                         fprintf(fp, ",");
4437                                 }
4438                                 fprintf(fp, "%s", buf);
4439                         }
4440                 }
4441         }
4442         if (!first_to_address) {
4443                 fprintf(fp, "\n");
4444         }
4445
4446         first_cc_address = TRUE;
4447         for (list = compose->header_list; list; list = list->next) {
4448                 headerentry = ((ComposeHeaderEntry *)list->data);
4449                 headerentryname = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(headerentry->combo)->entry));
4450
4451                 if (g_utf8_collate(headerentryname, cc_hdr) == 0) {
4452                         const gchar *strg = gtk_entry_get_text(GTK_ENTRY(headerentry->entry));
4453                         Xstrdup_a(str, strg, return -1);
4454                         g_strstrip(str);
4455                         if (str[0] != '\0') {
4456                                 compose_convert_header
4457                                         (compose, buf, sizeof(buf), str,
4458                                         strlen("Resent-Cc") + 2, TRUE);
4459
4460                                 if (first_cc_address) {
4461                                         fprintf(fp, "Resent-Cc: ");
4462                                         first_cc_address = FALSE;
4463                                 } else {
4464                                         fprintf(fp, ",");
4465                                 }
4466                                 fprintf(fp, "%s", buf);
4467                         }
4468                 }
4469         }
4470         if (!first_cc_address) {
4471                 fprintf(fp, "\n");
4472         }
4473         
4474         return(0);
4475 }
4476
4477 static gint compose_redirect_write_headers(Compose *compose, FILE *fp)
4478 {
4479         gchar buf[BUFFSIZE];
4480         gchar *str;
4481         const gchar *entstr;
4482         /* struct utsname utsbuf; */
4483
4484         g_return_val_if_fail(fp != NULL, -1);
4485         g_return_val_if_fail(compose->account != NULL, -1);
4486         g_return_val_if_fail(compose->account->address != NULL, -1);
4487
4488         /* Resent-Date */
4489         get_rfc822_date(buf, sizeof(buf));
4490         fprintf(fp, "Resent-Date: %s\n", buf);
4491
4492         /* Resent-From */
4493         if (compose->account->name && *compose->account->name) {
4494                 compose_convert_header
4495                         (compose, buf, sizeof(buf), compose->account->name,
4496                          strlen("From: "), TRUE);
4497                 fprintf(fp, "Resent-From: %s <%s>\n",
4498                         buf, compose->account->address);
4499         } else
4500                 fprintf(fp, "Resent-From: %s\n", compose->account->address);
4501
4502         /* Subject */
4503         entstr = gtk_entry_get_text(GTK_ENTRY(compose->subject_entry));
4504         if (*entstr != '\0') {
4505                 Xstrdup_a(str, entstr, return -1);
4506                 g_strstrip(str);
4507                 if (*str != '\0') {
4508                         compose_convert_header(compose, buf, sizeof(buf), str,
4509                                                strlen("Subject: "), FALSE);
4510                         fprintf(fp, "Subject: %s\n", buf);
4511                 }
4512         }
4513
4514         /* Resent-Message-ID */
4515         if (compose->account->gen_msgid) {
4516                 generate_msgid(buf, sizeof(buf));
4517                 fprintf(fp, "Resent-Message-ID: <%s>\n", buf);
4518                 compose->msgid = g_strdup(buf);
4519         }
4520
4521         compose_redirect_write_headers_from_headerlist(compose, fp);
4522
4523         /* separator between header and body */
4524         fputs("\n", fp);
4525
4526         return 0;
4527 }
4528
4529 static gint compose_redirect_write_to_file(Compose *compose, FILE *fdest)
4530 {
4531         FILE *fp;
4532         size_t len;
4533         gchar buf[BUFFSIZE];
4534         int i = 0;
4535         gboolean skip = FALSE;
4536         gchar *not_included[]={
4537                 "Return-Path:",         "Delivered-To:",        "Received:",
4538                 "Subject:",             "X-UIDL:",              "AF:",
4539                 "NF:",                  "PS:",                  "SRH:",
4540                 "SFN:",                 "DSR:",                 "MID:",
4541                 "CFG:",                 "PT:",                  "S:",
4542                 "RQ:",                  "SSV:",                 "NSV:",
4543                 "SSH:",                 "R:",                   "MAID:",
4544                 "NAID:",                "RMID:",                "FMID:",
4545                 "SCF:",                 "RRCPT:",               "NG:",
4546                 "X-Sylpheed-Privacy",   "X-Sylpheed-Sign:",     "X-Sylpheed-Encrypt",
4547                 "X-Sylpheed-End-Special-Headers:",
4548                 NULL
4549                 };
4550         if ((fp = g_fopen(compose->redirect_filename, "rb")) == NULL) {
4551                 FILE_OP_ERROR(compose->redirect_filename, "fopen");
4552                 return -1;
4553         }
4554
4555         while (procheader_get_one_field_asis(buf, sizeof(buf), fp) != -1) {
4556                 skip = FALSE;
4557                 for (i = 0; not_included[i] != NULL; i++) {
4558                         if (g_ascii_strncasecmp(buf, not_included[i],
4559                                                 strlen(not_included[i])) == 0) {
4560                                 skip = TRUE;
4561                                 break;
4562                         }
4563                 }
4564                 if (skip)
4565                         continue;
4566                 if (fputs(buf, fdest) == -1)
4567                         goto error;
4568
4569                 if (!prefs_common.redirect_keep_from) {
4570                         if (g_ascii_strncasecmp(buf, "From:",
4571                                           strlen("From:")) == 0) {
4572                                 fputs(" (by way of ", fdest);
4573                                 if (compose->account->name
4574                                     && *compose->account->name) {
4575                                         compose_convert_header
4576                                                 (compose, buf, sizeof(buf),
4577                                                  compose->account->name,
4578                                                  strlen("From: "),
4579                                                  FALSE);
4580                                         fprintf(fdest, "%s <%s>",
4581                                                 buf,
4582                                                 compose->account->address);
4583                                 } else
4584                                         fprintf(fdest, "%s",
4585                                                 compose->account->address);
4586                                 fputs(")", fdest);
4587                         }
4588                 }
4589
4590                 if (fputs("\n", fdest) == -1)
4591                         goto error;
4592         }
4593
4594         compose_redirect_write_headers(compose, fdest);
4595
4596         while ((len = fread(buf, sizeof(gchar), sizeof(buf), fp)) > 0) {
4597                 if (fwrite(buf, sizeof(gchar), len, fdest) != len)
4598                         goto error;
4599         }
4600
4601         fclose(fp);
4602
4603         return 0;
4604 error:
4605         fclose(fp);
4606
4607         return -1;
4608 }
4609
4610 static gint compose_write_to_file(Compose *compose, FILE *fp, gint action, gboolean attach_parts)
4611 {
4612         GtkTextBuffer *buffer;
4613         GtkTextIter start, end;
4614         gchar *chars;
4615         gchar *buf;
4616         const gchar *out_codeset;
4617         EncodingType encoding;
4618         MimeInfo *mimemsg, *mimetext;
4619         gint line;
4620
4621         if (action == COMPOSE_WRITE_FOR_SEND)
4622                 attach_parts = TRUE;
4623
4624         /* create message MimeInfo */
4625         mimemsg = procmime_mimeinfo_new();
4626         mimemsg->type = MIMETYPE_MESSAGE;
4627         mimemsg->subtype = g_strdup("rfc822");
4628         mimemsg->content = MIMECONTENT_MEM;
4629         mimemsg->tmp = TRUE; /* must free content later */
4630         mimemsg->data.mem = compose_get_header(compose);
4631
4632         /* Create text part MimeInfo */
4633         /* get all composed text */
4634         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(compose->text));
4635         gtk_text_buffer_get_start_iter(buffer, &start);
4636         gtk_text_buffer_get_end_iter(buffer, &end);
4637         chars = gtk_text_buffer_get_text(buffer, &start, &end, FALSE);
4638         if (is_ascii_str(chars)) {
4639                 buf = chars;
4640                 chars = NULL;
4641                 out_codeset = CS_US_ASCII;
4642                 encoding = ENC_7BIT;
4643         } else {
4644                 const gchar *src_codeset = CS_INTERNAL;
4645
4646                 out_codeset = conv_get_charset_str(compose->out_encoding);
4647
4648                 if (!out_codeset) {
4649                         gchar *test_conv_global_out = NULL;
4650                         gchar *test_conv_reply = NULL;
4651
4652                         /* automatic mode. be automatic. */
4653                         codeconv_set_strict(TRUE);
4654                         
4655                         out_codeset = conv_get_outgoing_charset_str();
4656                         if (out_codeset) {
4657                                 debug_print("trying to convert to %s\n", out_codeset);
4658                                 test_conv_global_out = conv_codeset_strdup(chars, src_codeset, out_codeset);
4659                         }
4660                         
4661                         if (!test_conv_global_out && compose->orig_charset
4662                         &&  strcmp(compose->orig_charset, CS_US_ASCII)) {
4663                                 out_codeset = compose->orig_charset;
4664                                 debug_print("failure; trying to convert to %s\n", out_codeset);
4665                                 test_conv_reply = conv_codeset_strdup(chars, src_codeset, out_codeset);
4666                         }
4667                         
4668                         if (!test_conv_global_out && !test_conv_reply) {
4669                                 /* we're lost */
4670                                 out_codeset = CS_INTERNAL;
4671                                 debug_print("failure; finally using %s\n", out_codeset);
4672                         }
4673                         g_free(test_conv_global_out);
4674                         g_free(test_conv_reply);
4675                         codeconv_set_strict(FALSE);
4676                 }
4677
4678                 if (!g_ascii_strcasecmp(out_codeset, CS_US_ASCII))
4679                         out_codeset = CS_ISO_8859_1;
4680
4681                 if (prefs_common.encoding_method == CTE_BASE64)
4682                         encoding = ENC_BASE64;
4683                 else if (prefs_common.encoding_method == CTE_QUOTED_PRINTABLE)
4684                         encoding = ENC_QUOTED_PRINTABLE;
4685                 else if (prefs_common.encoding_method == CTE_8BIT)
4686                         encoding = ENC_8BIT;
4687                 else
4688                         encoding = procmime_get_encoding_for_charset(out_codeset);
4689
4690                 debug_print("src encoding = %s, out encoding = %s, transfer encoding = %s\n",
4691                             src_codeset, out_codeset, procmime_get_encoding_str(encoding));
4692
4693                 if (action == COMPOSE_WRITE_FOR_SEND) {
4694                         codeconv_set_strict(TRUE);
4695                         buf = conv_codeset_strdup(chars, src_codeset, out_codeset);
4696                         codeconv_set_strict(FALSE);
4697
4698                         if (!buf) {
4699                                 AlertValue aval;
4700                                 gchar *msg;
4701
4702                                 msg = g_strdup_printf(_("Can't convert the character encoding of the message \n"
4703                                                         "to the specified %s charset.\n"
4704                                                         "Send it as %s?"), out_codeset, src_codeset);
4705                                 aval = alertpanel_full(_("Error"), msg, GTK_STOCK_CANCEL, _("+_Send"), NULL, FALSE,
4706                                                       NULL, ALERT_ERROR, G_ALERTDEFAULT);
4707                                 g_free(msg);
4708
4709                                 if (aval != G_ALERTALTERNATE) {
4710                                         g_free(chars);
4711                                         return -3;
4712                                 } else {
4713                                         buf = chars;
4714                                         out_codeset = src_codeset;
4715                                         chars = NULL;
4716                                 }
4717                         }
4718                 } else {
4719                         buf = chars;
4720                         out_codeset = src_codeset;
4721                         chars = NULL;
4722                 }
4723         }
4724         g_free(chars);
4725
4726         if (encoding == ENC_8BIT || encoding == ENC_7BIT) {
4727                 if (!strncmp(buf, "From ", sizeof("From ")-1) ||
4728                     strstr(buf, "\nFrom ") != NULL) {
4729                         encoding = ENC_QUOTED_PRINTABLE;
4730                 }
4731         }
4732
4733         mimetext = procmime_mimeinfo_new();
4734         mimetext->content = MIMECONTENT_MEM;
4735         mimetext->tmp = TRUE; /* must free content later */
4736         /* dup'ed because procmime_encode_content can turn it into a tmpfile
4737          * and free the data, which we need later. */
4738         mimetext->data.mem = g_strdup(buf); 
4739         mimetext->type = MIMETYPE_TEXT;
4740         mimetext->subtype = g_strdup("plain");
4741         g_hash_table_insert(mimetext->typeparameters, g_strdup("charset"),
4742                             g_strdup(out_codeset));
4743                             
4744         /* protect trailing spaces when signing message */
4745         if (action == COMPOSE_WRITE_FOR_SEND && compose->use_signing && 
4746             privacy_system_can_sign(compose->privacy_system)) {
4747                 encoding = ENC_QUOTED_PRINTABLE;
4748         }
4749         
4750         debug_print("main text: %d bytes encoded as %s in %d\n",
4751                 strlen(buf), out_codeset, encoding);
4752
4753         /* check for line length limit */
4754         if (action == COMPOSE_WRITE_FOR_SEND &&
4755             encoding != ENC_QUOTED_PRINTABLE && encoding != ENC_BASE64 &&
4756             check_line_length(buf, 1000, &line) < 0) {
4757                 AlertValue aval;
4758                 gchar *msg;
4759
4760                 msg = g_strdup_printf
4761                         (_("Line %d exceeds the line length limit (998 bytes).\n"
4762                            "The contents of the message might be broken on the way to the delivery.\n"
4763                            "\n"
4764                            "Send it anyway?"), line + 1);
4765                 aval = alertpanel(_("Warning"), msg, GTK_STOCK_CANCEL, GTK_STOCK_OK, NULL);
4766                 g_free(msg);
4767                 if (aval != G_ALERTALTERNATE) {
4768                         g_free(buf);
4769                         return -1;
4770                 }
4771         }
4772         
4773         if (encoding != ENC_UNKNOWN)
4774                 procmime_encode_content(mimetext, encoding);
4775
4776         /* append attachment parts */
4777         if (compose_use_attach(compose) && attach_parts) {
4778                 MimeInfo *mimempart;
4779                 gchar *boundary = NULL;
4780                 mimempart = procmime_mimeinfo_new();
4781                 mimempart->content = MIMECONTENT_EMPTY;
4782                 mimempart->type = MIMETYPE_MULTIPART;
4783                 mimempart->subtype = g_strdup("mixed");
4784
4785                 do {
4786                         g_free(boundary);
4787                         boundary = generate_mime_boundary(NULL);
4788                 } while (strstr(buf, boundary) != NULL);
4789
4790                 g_hash_table_insert(mimempart->typeparameters, g_strdup("boundary"),
4791                                     boundary);
4792
4793                 mimetext->disposition = DISPOSITIONTYPE_INLINE;
4794
4795                 g_node_append(mimempart->node, mimetext->node);
4796                 g_node_append(mimemsg->node, mimempart->node);
4797
4798                 compose_add_attachments(compose, mimempart);
4799         } else
4800                 g_node_append(mimemsg->node, mimetext->node);
4801
4802         g_free(buf);
4803
4804         /* sign message if sending */
4805         if (action == COMPOSE_WRITE_FOR_SEND && compose->use_signing && 
4806             privacy_system_can_sign(compose->privacy_system))
4807                 if (!privacy_sign(compose->privacy_system, mimemsg, compose->account))
4808                         return -2;
4809
4810         procmime_write_mimeinfo(mimemsg, fp);
4811         
4812         procmime_mimeinfo_free_all(mimemsg);
4813
4814         return 0;
4815 }
4816
4817 static gint compose_write_body_to_file(Compose *compose, const gchar *file)
4818 {
4819         GtkTextBuffer *buffer;
4820         GtkTextIter start, end;
4821         FILE *fp;
4822         size_t len;
4823         gchar *chars, *tmp;
4824
4825         if ((fp = g_fopen(file, "wb")) == NULL) {
4826                 FILE_OP_ERROR(file, "fopen");
4827                 return -1;
4828         }
4829
4830         /* chmod for security */
4831         if (change_file_mode_rw(fp, file) < 0) {
4832                 FILE_OP_ERROR(file, "chmod");
4833                 g_warning("can't change file mode\n");
4834         }
4835
4836         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(compose->text));
4837         gtk_text_buffer_get_start_iter(buffer, &start);
4838         gtk_text_buffer_get_end_iter(buffer, &end);
4839         tmp = gtk_text_buffer_get_text(buffer, &start, &end, FALSE);
4840
4841         chars = conv_codeset_strdup
4842                 (tmp, CS_INTERNAL, conv_get_locale_charset_str());
4843
4844         g_free(tmp);
4845         if (!chars) return -1;
4846
4847         /* write body */
4848         len = strlen(chars);
4849         if (fwrite(chars, sizeof(gchar), len, fp) != len) {
4850                 FILE_OP_ERROR(file, "fwrite");
4851                 g_free(chars);
4852                 fclose(fp);
4853                 g_unlink(file);
4854                 return -1;
4855         }
4856
4857         g_free(chars);
4858
4859         if (fclose(fp) == EOF) {
4860                 FILE_OP_ERROR(file, "fclose");
4861                 g_unlink(file);
4862                 return -1;
4863         }
4864         return 0;
4865 }
4866
4867 static gint compose_remove_reedit_target(Compose *compose, gboolean force)
4868 {
4869         FolderItem *item;
4870         MsgInfo *msginfo = compose->targetinfo;
4871
4872         g_return_val_if_fail(compose->mode == COMPOSE_REEDIT, -1);
4873         if (!msginfo) return -1;
4874
4875         if (!force && MSG_IS_LOCKED(msginfo->flags))
4876                 return 0;
4877
4878         item = msginfo->folder;
4879         g_return_val_if_fail(item != NULL, -1);
4880
4881         if (procmsg_msg_exist(msginfo) &&
4882             (folder_has_parent_of_type(item, F_QUEUE) ||
4883              folder_has_parent_of_type(item, F_DRAFT) 
4884              || msginfo == compose->autosaved_draft)) {
4885                 if (folder_item_remove_msg(item, msginfo->msgnum) < 0) {
4886                         g_warning("can't remove the old message\n");
4887                         return -1;
4888                 }
4889         }
4890
4891         return 0;
4892 }
4893
4894 void compose_remove_draft(Compose *compose)
4895 {
4896         FolderItem *drafts;
4897         MsgInfo *msginfo = compose->targetinfo;
4898         drafts = account_get_special_folder(compose->account, F_DRAFT);
4899
4900         if (procmsg_msg_exist(msginfo)) {
4901                 folder_item_remove_msg(drafts, msginfo->msgnum);
4902         }
4903
4904 }
4905
4906 gint compose_queue(Compose *compose, gint *msgnum, FolderItem **item, gchar **msgpath,
4907                    gboolean remove_reedit_target)
4908 {
4909         return compose_queue_sub (compose, msgnum, item, msgpath, FALSE, remove_reedit_target);
4910 }
4911 static gint compose_queue_sub(Compose *compose, gint *msgnum, FolderItem **item, 
4912                               gchar **msgpath, gboolean check_subject,
4913                               gboolean remove_reedit_target)
4914 {
4915         FolderItem *queue;
4916         gchar *tmp;
4917         FILE *fp;
4918         GSList *cur;
4919         gint num;
4920         static gboolean lock = FALSE;
4921         PrefsAccount *mailac = NULL, *newsac = NULL;
4922         
4923         debug_print("queueing message...\n");
4924         g_return_val_if_fail(compose->account != NULL, -1);
4925
4926         lock = TRUE;
4927         
4928         if (compose_check_entries(compose, check_subject) == FALSE) {
4929                 lock = FALSE;
4930                 if (compose->batch) {
4931                         gtk_widget_show_all(compose->window);
4932                 }
4933                 return -1;
4934         }
4935
4936         if (!compose->to_list && !compose->newsgroup_list) {
4937                 g_warning("can't get recipient list.");
4938                 lock = FALSE;
4939                 return -1;
4940         }
4941
4942         if (compose->to_list) {
4943                 if (compose->account->protocol != A_NNTP)
4944                         mailac = compose->account;
4945                 else if (cur_account && cur_account->protocol != A_NNTP)
4946                         mailac = cur_account;
4947                 else if (!(mailac = compose_current_mail_account())) {
4948                         lock = FALSE;
4949                         alertpanel_error(_("No account for sending mails available!"));
4950                         return -1;
4951                 }
4952         }
4953
4954         if (compose->newsgroup_list) {
4955                 if (compose->account->protocol == A_NNTP)
4956                         newsac = compose->account;
4957                 else if (!newsac->protocol != A_NNTP) {
4958                         lock = FALSE;
4959                         alertpanel_error(_("No account for posting news available!"));
4960                         return -1;
4961                 }                       
4962         }
4963
4964         /* write queue header */
4965         tmp = g_strdup_printf("%s%cqueue.%p", get_tmp_dir(),
4966                               G_DIR_SEPARATOR, compose);
4967         if ((fp = g_fopen(tmp, "wb")) == NULL) {
4968                 FILE_OP_ERROR(tmp, "fopen");
4969                 g_free(tmp);
4970                 lock = FALSE;
4971                 return -2;
4972         }
4973
4974         if (change_file_mode_rw(fp, tmp) < 0) {
4975                 FILE_OP_ERROR(tmp, "chmod");
4976                 g_warning("can't change file mode\n");
4977         }
4978
4979         /* queueing variables */
4980         fprintf(fp, "AF:\n");
4981         fprintf(fp, "NF:0\n");
4982         fprintf(fp, "PS:10\n");
4983         fprintf(fp, "SRH:1\n");
4984         fprintf(fp, "SFN:\n");
4985         fprintf(fp, "DSR:\n");
4986         if (compose->msgid)
4987                 fprintf(fp, "MID:<%s>\n", compose->msgid);
4988         else
4989                 fprintf(fp, "MID:\n");
4990         fprintf(fp, "CFG:\n");
4991         fprintf(fp, "PT:0\n");
4992         fprintf(fp, "S:%s\n", compose->account->address);
4993         fprintf(fp, "RQ:\n");
4994         if (mailac)
4995                 fprintf(fp, "SSV:%s\n", mailac->smtp_server);
4996         else
4997                 fprintf(fp, "SSV:\n");
4998         if (newsac)
4999                 fprintf(fp, "NSV:%s\n", newsac->nntp_server);
5000         else
5001                 fprintf(fp, "NSV:\n");
5002         fprintf(fp, "SSH:\n");
5003         /* write recepient list */
5004         if (compose->to_list) {
5005                 fprintf(fp, "R:<%s>", (gchar *)compose->to_list->data);
5006                 for (cur = compose->to_list->next; cur != NULL;
5007                      cur = cur->next)
5008                         fprintf(fp, ",<%s>", (gchar *)cur->data);
5009                 fprintf(fp, "\n");
5010         }
5011         /* write newsgroup list */
5012         if (compose->newsgroup_list) {
5013                 fprintf(fp, "NG:");
5014                 fprintf(fp, "%s", (gchar *)compose->newsgroup_list->data);
5015                 for (cur = compose->newsgroup_list->next; cur != NULL; cur = cur->next)
5016                         fprintf(fp, ",%s", (gchar *)cur->data);
5017                 fprintf(fp, "\n");
5018         }
5019         /* Sylpheed account IDs */
5020         if (mailac)
5021                 fprintf(fp, "MAID:%d\n", mailac->account_id);
5022         if (newsac)
5023                 fprintf(fp, "NAID:%d\n", newsac->account_id);
5024
5025         
5026         if (compose->privacy_system != NULL) {
5027                 fprintf(fp, "X-Sylpheed-Privacy-System:%s\n", compose->privacy_system);
5028                 fprintf(fp, "X-Sylpheed-Sign:%d\n", compose->use_signing);
5029                 if (compose->use_encryption) {
5030                         gchar *encdata;
5031                         if (mailac && mailac->encrypt_to_self) {
5032                                 GSList *tmp_list = g_slist_copy(compose->to_list);
5033                                 tmp_list = g_slist_append(tmp_list, compose->account->address);
5034                                 encdata = privacy_get_encrypt_data(compose->privacy_system, tmp_list);
5035                                 g_slist_free(tmp_list);
5036                         } else {
5037                                 encdata = privacy_get_encrypt_data(compose->privacy_system, compose->to_list);
5038                         }
5039                         if (encdata != NULL) {
5040                                 if (strcmp(encdata, "_DONT_ENCRYPT_")) {
5041                                         fprintf(fp, "X-Sylpheed-Encrypt:%d\n", compose->use_encryption);
5042                                         fprintf(fp, "X-Sylpheed-Encrypt-Data:%s\n", 
5043                                                 encdata);
5044                                 } /* else we finally dont want to encrypt */
5045                         } else {
5046                                 fprintf(fp, "X-Sylpheed-Encrypt:%d\n", compose->use_encryption);
5047                                 /* and if encdata was null, it means there's been a problem in 
5048                                  * key selection */
5049                                 lock = FALSE;
5050                                 fclose(fp);
5051                                 g_unlink(tmp);
5052                                 g_free(tmp);
5053                                 return -5;
5054                         }
5055                         g_free(encdata);
5056                 }
5057         }
5058
5059         /* Save copy folder */
5060         if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn))) {
5061                 gchar *savefolderid;
5062                 
5063                 savefolderid = gtk_editable_get_chars(GTK_EDITABLE(compose->savemsg_entry), 0, -1);
5064                 fprintf(fp, "SCF:%s\n", savefolderid);
5065                 g_free(savefolderid);
5066         }
5067         /* Save copy folder */
5068         if (compose->return_receipt) {
5069                 fprintf(fp, "RRCPT:1\n");
5070         }
5071         /* Message-ID of message replying to */
5072         if ((compose->replyinfo != NULL) && (compose->replyinfo->msgid != NULL)) {
5073                 gchar *folderid;
5074                 
5075                 folderid = folder_item_get_identifier(compose->replyinfo->folder);
5076                 fprintf(fp, "RMID:%s\t%d\t%s\n", folderid, compose->replyinfo->msgnum, compose->replyinfo->msgid);
5077                 g_free(folderid);
5078         }
5079         /* Message-ID of message forwarding to */
5080         if ((compose->fwdinfo != NULL) && (compose->fwdinfo->msgid != NULL)) {
5081                 gchar *folderid;
5082                 
5083                 folderid = folder_item_get_identifier(compose->fwdinfo->folder);
5084                 fprintf(fp, "FMID:%s\t%d\t%s\n", folderid, compose->fwdinfo->msgnum, compose->fwdinfo->msgid);
5085                 g_free(folderid);
5086         }
5087
5088         /* end of headers */
5089         fprintf(fp, "X-Sylpheed-End-Special-Headers: 1\n");
5090
5091         if (compose->redirect_filename != NULL) {
5092                 if (compose_redirect_write_to_file(compose, fp) < 0) {
5093                         lock = FALSE;
5094                         fclose(fp);
5095                         g_unlink(tmp);
5096                         g_free(tmp);
5097                         return -2;
5098                 }
5099         } else {
5100                 gint result = 0;
5101                 if ((result = compose_write_to_file(compose, fp, COMPOSE_WRITE_FOR_SEND, TRUE)) < 0) {
5102                         lock = FALSE;
5103                         fclose(fp);
5104                         g_unlink(tmp);
5105                         g_free(tmp);
5106                         return result - 1; /* -2 for a generic error, -3 for signing error, -4 for encoding */
5107                 }
5108         }
5109
5110         if (fclose(fp) == EOF) {
5111                 FILE_OP_ERROR(tmp, "fclose");
5112                 g_unlink(tmp);
5113                 g_free(tmp);
5114                 lock = FALSE;
5115                 return -2;
5116         }
5117
5118         if (item && *item) {
5119                 queue = *item;
5120         } else {
5121                 queue = account_get_special_folder(compose->account, F_QUEUE);
5122         }
5123         if (!queue) {
5124                 g_warning("can't find queue folder\n");
5125                 g_unlink(tmp);
5126                 g_free(tmp);
5127                 lock = FALSE;
5128                 return -1;
5129         }
5130         folder_item_scan(queue);
5131         if ((num = folder_item_add_msg(queue, tmp, NULL, FALSE)) < 0) {
5132                 g_warning("can't queue the message\n");
5133                 g_unlink(tmp);
5134                 g_free(tmp);
5135                 lock = FALSE;
5136                 return -1;
5137         }
5138         
5139         if (msgpath == NULL) {
5140                 g_unlink(tmp);
5141                 g_free(tmp);
5142         } else
5143                 *msgpath = tmp;
5144
5145         if (compose->mode == COMPOSE_REEDIT && remove_reedit_target) {
5146                 compose_remove_reedit_target(compose, FALSE);
5147         }
5148
5149         if ((msgnum != NULL) && (item != NULL)) {
5150                 *msgnum = num;
5151                 *item = queue;
5152         }
5153
5154         return 0;
5155 }
5156
5157 static void compose_add_attachments(Compose *compose, MimeInfo *parent)
5158 {
5159         AttachInfo *ainfo;
5160         GtkTreeView *tree_view = GTK_TREE_VIEW(compose->attach_clist);
5161         MimeInfo *mimepart;
5162         struct stat statbuf;
5163         gchar *type, *subtype;
5164         GtkTreeModel *model;
5165         GtkTreeIter iter;
5166
5167         model = gtk_tree_view_get_model(tree_view);
5168         
5169         if (!gtk_tree_model_get_iter_first(model, &iter))
5170                 return;
5171         do {
5172                 gtk_tree_model_get(model, &iter,
5173                                    COL_DATA, &ainfo,
5174                                    -1);
5175                                                            
5176                 mimepart = procmime_mimeinfo_new();
5177                 mimepart->content = MIMECONTENT_FILE;
5178                 mimepart->data.filename = g_strdup(ainfo->file);
5179                 mimepart->tmp = FALSE; /* or we destroy our attachment */
5180                 mimepart->offset = 0;
5181
5182                 stat(ainfo->file, &statbuf);
5183                 mimepart->length = statbuf.st_size;
5184
5185                 type = g_strdup(ainfo->content_type);
5186
5187                 if (!strchr(type, '/')) {
5188                         g_free(type);
5189                         type = g_strdup("application/octet-stream");
5190                 }
5191
5192                 subtype = strchr(type, '/') + 1;
5193                 *(subtype - 1) = '\0';
5194                 mimepart->type = procmime_get_media_type(type);
5195                 mimepart->subtype = g_strdup(subtype);
5196                 g_free(type);
5197
5198                 if (mimepart->type == MIMETYPE_MESSAGE && 
5199                     !g_ascii_strcasecmp(mimepart->subtype, "rfc822")) {
5200                         mimepart->disposition = DISPOSITIONTYPE_INLINE;
5201                 } else {
5202                         if (ainfo->name) {
5203                                 g_hash_table_insert(mimepart->typeparameters,
5204                                             g_strdup("name"), g_strdup(ainfo->name));
5205                                 g_hash_table_insert(mimepart->dispositionparameters,
5206                                             g_strdup("filename"), g_strdup(ainfo->name));
5207                                 mimepart->disposition = DISPOSITIONTYPE_ATTACHMENT;
5208                         }
5209                 }
5210
5211                 if (compose->use_signing) {
5212                         if (ainfo->encoding == ENC_7BIT)
5213                                 ainfo->encoding = ENC_QUOTED_PRINTABLE;
5214                         else if (ainfo->encoding == ENC_8BIT)
5215                                 ainfo->encoding = ENC_BASE64;
5216                 }
5217                 
5218                 procmime_encode_content(mimepart, ainfo->encoding);
5219
5220                 g_node_append(parent->node, mimepart->node);
5221         } while (gtk_tree_model_iter_next(model, &iter));
5222 }
5223
5224 #define IS_IN_CUSTOM_HEADER(header) \
5225         (compose->account->add_customhdr && \
5226          custom_header_find(compose->account->customhdr_list, header) != NULL)
5227
5228 static void compose_add_headerfield_from_headerlist(Compose *compose, 
5229                                                     GString *header, 
5230                                                     const gchar *fieldname,
5231                                                     const gchar *seperator)
5232 {
5233         gchar *str, *fieldname_w_colon, *trans_fieldname;
5234         gboolean add_field = FALSE;
5235         GSList *list;
5236         ComposeHeaderEntry *headerentry;
5237         const gchar * headerentryname;
5238         GString *fieldstr;
5239
5240         if (IS_IN_CUSTOM_HEADER(fieldname))
5241                 return;
5242
5243         debug_print("Adding %s-fields\n", fieldname);
5244
5245         fieldstr = g_string_sized_new(64);
5246
5247         fieldname_w_colon = g_strconcat(fieldname, ":", NULL);
5248         trans_fieldname = (prefs_common.trans_hdr ? gettext(fieldname_w_colon) : fieldname_w_colon);
5249
5250         for (list = compose->header_list; list; list = list->next) {
5251                 headerentry = ((ComposeHeaderEntry *)list->data);
5252                 headerentryname = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(headerentry->combo)->entry));
5253
5254                 if (!g_utf8_collate(trans_fieldname, headerentryname)) {
5255                         str = gtk_editable_get_chars(GTK_EDITABLE(headerentry->entry), 0, -1);
5256                         g_strstrip(str);
5257                         if (str[0] != '\0') {
5258                                 if (add_field)
5259                                         g_string_append(fieldstr, seperator);
5260                                 g_string_append(fieldstr, str);
5261                                 add_field = TRUE;
5262                         }
5263                         g_free(str);
5264                 }
5265         }
5266         if (add_field) {
5267                 gchar *buf;
5268
5269                 buf = g_new0(gchar, fieldstr->len * 4 + 256);
5270                 compose_convert_header
5271                         (compose, buf, fieldstr->len * 4  + 256, fieldstr->str,
5272                         strlen(fieldname) + 2, TRUE);
5273                 g_string_append_printf(header, "%s: %s\n", fieldname, buf);
5274                 g_free(buf);
5275         }
5276
5277         g_free(fieldname_w_colon);
5278         g_string_free(fieldstr, TRUE);
5279
5280         return;
5281 }
5282
5283 static gchar *compose_get_header(Compose *compose)
5284 {
5285         gchar buf[BUFFSIZE];
5286         const gchar *entry_str;
5287         gchar *str;
5288         gchar *name;
5289         GSList *list;
5290         gchar *std_headers[] = {"To:", "Cc:", "Bcc:", "Newsgroups:", "Reply-To:", "Followup-To:", NULL};
5291         GString *header;
5292         gchar *from_name = NULL, *from_address = NULL;
5293         gchar *tmp;
5294
5295         g_return_val_if_fail(compose->account != NULL, NULL);
5296         g_return_val_if_fail(compose->account->address != NULL, NULL);
5297
5298         header = g_string_sized_new(64);
5299
5300         /* Date */
5301         get_rfc822_date(buf, sizeof(buf));
5302         g_string_append_printf(header, "Date: %s\n", buf);
5303
5304         /* From */
5305         
5306         if (compose->account->name && *compose->account->name) {
5307                 gchar *buf;
5308                 QUOTE_IF_REQUIRED(buf, compose->account->name);
5309                 tmp = g_strdup_printf("%s <%s>",
5310                         buf, compose->account->address);
5311         } else {
5312                 tmp = g_strdup_printf("%s",
5313                         compose->account->address);
5314         }
5315         if (!strcmp(gtk_entry_get_text(GTK_ENTRY(compose->from_name)), tmp)
5316         ||  strlen(gtk_entry_get_text(GTK_ENTRY(compose->from_name))) == 0) {
5317                 /* use default */
5318                 from_name = compose->account->name ? g_strdup(compose->account->name):NULL;
5319                 from_address = g_strdup(compose->account->address);
5320         } else {
5321                 gchar *spec = gtk_editable_get_chars(GTK_EDITABLE(compose->from_name), 0, -1);
5322                 /* extract name and address */
5323                 if (strstr(spec, " <") && strstr(spec, ">")) {
5324                         from_address = g_strdup(strrchr(spec, '<')+1);
5325                         *(strrchr(from_address, '>')) = '\0';
5326                         from_name = g_strdup(spec);
5327                         *(strrchr(from_name, '<')) = '\0';
5328                 } else {
5329                         from_name = NULL;
5330                         from_address = g_strdup(spec);
5331                 }
5332                 g_free(spec);
5333         }
5334         g_free(tmp);
5335         
5336         
5337         if (from_name && *from_name) {
5338                 compose_convert_header
5339                         (compose, buf, sizeof(buf), from_name,
5340                          strlen("From: "), TRUE);
5341                 QUOTE_IF_REQUIRED(name, buf);
5342                 
5343                 g_string_append_printf(header, "From: %s <%s>\n",
5344                         name, from_address);
5345         } else
5346                 g_string_append_printf(header, "From: %s\n", from_address);
5347         
5348         g_free(from_name);
5349         g_free(from_address);
5350
5351         /* To */
5352         compose_add_headerfield_from_headerlist(compose, header, "To", ", ");
5353
5354         /* Newsgroups */
5355         compose_add_headerfield_from_headerlist(compose, header, "Newsgroups", ",");
5356
5357         /* Cc */
5358         compose_add_headerfield_from_headerlist(compose, header, "Cc", ", ");
5359
5360         /* Bcc */
5361         compose_add_headerfield_from_headerlist(compose, header, "Bcc", ", ");
5362
5363         /* Subject */
5364         str = gtk_editable_get_chars(GTK_EDITABLE(compose->subject_entry), 0, -1);
5365
5366         if (*str != '\0' && !IS_IN_CUSTOM_HEADER("Subject")) {
5367                 g_strstrip(str);
5368                 if (*str != '\0') {
5369                         compose_convert_header(compose, buf, sizeof(buf), str,
5370                                                strlen("Subject: "), FALSE);
5371                         g_string_append_printf(header, "Subject: %s\n", buf);
5372                 }
5373         }
5374         g_free(str);
5375
5376         /* Message-ID */
5377         if (compose->account->gen_msgid) {
5378                 generate_msgid(buf, sizeof(buf));
5379                 g_string_append_printf(header, "Message-ID: <%s>\n", buf);
5380                 compose->msgid = g_strdup(buf);
5381         }
5382
5383         if (compose->remove_references == FALSE) {
5384                 /* In-Reply-To */
5385                 if (compose->inreplyto && compose->to_list)
5386                         g_string_append_printf(header, "In-Reply-To: <%s>\n", compose->inreplyto);
5387         
5388                 /* References */
5389                 if (compose->references)
5390                         g_string_append_printf(header, "References: %s\n", compose->references);
5391         }
5392
5393         /* Followup-To */
5394         compose_add_headerfield_from_headerlist(compose, header, "Followup-To", ",");
5395
5396         /* Reply-To */
5397         compose_add_headerfield_from_headerlist(compose, header, "Reply-To", ", ");
5398
5399         /* Organization */
5400         if (compose->account->organization &&
5401             strlen(compose->account->organization) &&
5402             !IS_IN_CUSTOM_HEADER("Organization")) {
5403                 compose_convert_header(compose, buf, sizeof(buf),
5404                                        compose->account->organization,
5405                                        strlen("Organization: "), FALSE);
5406                 g_string_append_printf(header, "Organization: %s\n", buf);
5407         }
5408
5409         /* Program version and system info */
5410         if (g_slist_length(compose->to_list) && !IS_IN_CUSTOM_HEADER("X-Mailer") &&
5411             !compose->newsgroup_list) {
5412                 g_string_append_printf(header, "X-Mailer: %s (GTK+ %d.%d.%d; %s)\n",
5413                         prog_version,
5414                         gtk_major_version, gtk_minor_version, gtk_micro_version,
5415                         TARGET_ALIAS);
5416         }
5417         if (g_slist_length(compose->newsgroup_list) && !IS_IN_CUSTOM_HEADER("X-Newsreader")) {
5418                 g_string_append_printf(header, "X-Newsreader: %s (GTK+ %d.%d.%d; %s)\n",
5419                         prog_version,
5420                         gtk_major_version, gtk_minor_version, gtk_micro_version,
5421                         TARGET_ALIAS);
5422         }
5423
5424         /* custom headers */
5425         if (compose->account->add_customhdr) {
5426                 GSList *cur;
5427
5428                 for (cur = compose->account->customhdr_list; cur != NULL;
5429                      cur = cur->next) {
5430                         CustomHeader *chdr = (CustomHeader *)cur->data;
5431
5432                         if (custom_header_is_allowed(chdr->name)) {
5433                                 compose_convert_header
5434                                         (compose, buf, sizeof(buf),
5435                                          chdr->value ? chdr->value : "",
5436                                          strlen(chdr->name) + 2, FALSE);
5437                                 g_string_append_printf(header, "%s: %s\n", chdr->name, buf);
5438                         }
5439                 }
5440         }
5441
5442         /* PRIORITY */
5443         switch (compose->priority) {
5444                 case PRIORITY_HIGHEST: g_string_append_printf(header, "Importance: high\n"
5445                                                    "X-Priority: 1 (Highest)\n");
5446                         break;
5447                 case PRIORITY_HIGH: g_string_append_printf(header, "Importance: high\n"
5448                                                 "X-Priority: 2 (High)\n");
5449                         break;
5450                 case PRIORITY_NORMAL: break;
5451                 case PRIORITY_LOW: g_string_append_printf(header, "Importance: low\n"
5452                                                "X-Priority: 4 (Low)\n");
5453                         break;
5454                 case PRIORITY_LOWEST: g_string_append_printf(header, "Importance: low\n"
5455                                                   "X-Priority: 5 (Lowest)\n");
5456                         break;
5457                 default: debug_print("compose: priority unknown : %d\n",
5458                                      compose->priority);
5459         }
5460
5461         /* Request Return Receipt */
5462         if (!IS_IN_CUSTOM_HEADER("Disposition-Notification-To")) {
5463                 if (compose->return_receipt) {
5464                         if (compose->account->name
5465                             && *compose->account->name) {
5466                                 compose_convert_header(compose, buf, sizeof(buf), 
5467                                                        compose->account->name, 
5468                                                        strlen("Disposition-Notification-To: "),
5469                                                        TRUE);
5470                                 g_string_append_printf(header, "Disposition-Notification-To: %s <%s>\n", buf, compose->account->address);
5471                         } else
5472                                 g_string_append_printf(header, "Disposition-Notification-To: %s\n", compose->account->address);
5473                 }
5474         }
5475
5476         /* get special headers */
5477         for (list = compose->header_list; list; list = list->next) {
5478                 ComposeHeaderEntry *headerentry;
5479                 gchar *tmp;
5480                 gchar *headername;
5481                 gchar *headername_wcolon;
5482                 gchar *headername_trans;
5483                 gchar *headervalue;
5484                 gchar **string;
5485                 gboolean standard_header = FALSE;
5486
5487                 headerentry = ((ComposeHeaderEntry *)list->data);
5488                 
5489                 tmp = g_strdup(gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(headerentry->combo)->entry)));
5490                 if (strchr(tmp, ' ') != NULL || strchr(tmp, '\r') != NULL || strchr(tmp, '\n') != NULL) {
5491                         g_free(tmp);
5492                         continue;
5493                 }
5494
5495                 if (!strstr(tmp, ":")) {
5496                         headername_wcolon = g_strconcat(tmp, ":", NULL);
5497                         headername = g_strdup(tmp);
5498                 } else {
5499                         headername_wcolon = g_strdup(tmp);
5500                         headername = g_strdup(strtok(tmp, ":"));
5501                 }
5502                 g_free(tmp);
5503                 
5504                 entry_str = gtk_entry_get_text(GTK_ENTRY(headerentry->entry));
5505                 Xstrdup_a(headervalue, entry_str, return NULL);
5506                 subst_char(headervalue, '\r', ' ');
5507                 subst_char(headervalue, '\n', ' ');
5508                 string = std_headers;
5509                 while (*string != NULL) {
5510                         headername_trans = prefs_common.trans_hdr ? gettext(*string) : *string;
5511                         if (!strcmp(headername_trans,headername_wcolon))
5512                                 standard_header = TRUE;
5513                         string++;
5514                 }
5515                 if (!standard_header && !IS_IN_CUSTOM_HEADER(headername))
5516                         g_string_append_printf(header, "%s %s\n", headername_wcolon, headervalue);
5517                                 
5518                 g_free(headername);
5519                 g_free(headername_wcolon);              
5520         }
5521
5522         str = header->str;
5523         g_string_free(header, FALSE);
5524
5525         return str;
5526 }
5527
5528 #undef IS_IN_CUSTOM_HEADER
5529
5530 static void compose_convert_header(Compose *compose, gchar *dest, gint len, gchar *src,
5531                                    gint header_len, gboolean addr_field)
5532 {
5533         gchar *tmpstr = NULL;
5534         const gchar *out_codeset = NULL;
5535
5536         g_return_if_fail(src != NULL);
5537         g_return_if_fail(dest != NULL);
5538
5539         if (len < 1) return;
5540
5541         tmpstr = g_strdup(src);
5542
5543         subst_char(tmpstr, '\n', ' ');
5544         subst_char(tmpstr, '\r', ' ');
5545         g_strchomp(tmpstr);
5546
5547         if (!g_utf8_validate(tmpstr, -1, NULL)) {
5548                 gchar *mybuf = g_malloc(strlen(tmpstr)*2 +1);
5549                 conv_localetodisp(mybuf, strlen(tmpstr)*2 +1, tmpstr);
5550                 g_free(tmpstr);
5551                 tmpstr = mybuf;
5552         }
5553
5554         codeconv_set_strict(TRUE);
5555         conv_encode_header_full(dest, len, tmpstr, header_len, addr_field, 
5556                 conv_get_charset_str(compose->out_encoding));
5557         codeconv_set_strict(FALSE);
5558         
5559         if (!dest || *dest == '\0') {
5560                 gchar *test_conv_global_out = NULL;
5561                 gchar *test_conv_reply = NULL;
5562
5563                 /* automatic mode. be automatic. */
5564                 codeconv_set_strict(TRUE);
5565
5566                 out_codeset = conv_get_outgoing_charset_str();
5567                 if (out_codeset) {
5568                         debug_print("trying to convert to %s\n", out_codeset);
5569                         test_conv_global_out = conv_codeset_strdup(src, CS_INTERNAL, out_codeset);
5570                 }
5571
5572                 if (!test_conv_global_out && compose->orig_charset
5573                 &&  strcmp(compose->orig_charset, CS_US_ASCII)) {
5574                         out_codeset = compose->orig_charset;
5575                         debug_print("failure; trying to convert to %s\n", out_codeset);
5576                         test_conv_reply = conv_codeset_strdup(src, CS_INTERNAL, out_codeset);
5577                 }
5578
5579                 if (!test_conv_global_out && !test_conv_reply) {
5580                         /* we're lost */
5581                         out_codeset = CS_INTERNAL;
5582                         debug_print("finally using %s\n", out_codeset);
5583                 }
5584                 g_free(test_conv_global_out);
5585                 g_free(test_conv_reply);
5586                 conv_encode_header_full(dest, len, tmpstr, header_len, addr_field, 
5587                                         out_codeset);
5588                 codeconv_set_strict(FALSE);
5589         }
5590         g_free(tmpstr);
5591 }
5592
5593 static void compose_create_header_entry(Compose *compose) 
5594 {
5595         gchar *headers[] = {"To:", "Cc:", "Bcc:", "Newsgroups:", "Reply-To:", "Followup-To:", NULL};
5596
5597         GtkWidget *combo;
5598         GtkWidget *entry;
5599         GList *combo_list = NULL;
5600         gchar **string;
5601         const gchar *header = NULL;
5602         ComposeHeaderEntry *headerentry;
5603         gboolean standard_header = FALSE;
5604
5605         headerentry = g_new0(ComposeHeaderEntry, 1);
5606
5607         /* Combo box */
5608         combo = gtk_combo_new();
5609         string = headers; 
5610         while(*string != NULL) {
5611                 combo_list = g_list_append(combo_list, (prefs_common.trans_hdr ? gettext(*string) : *string));
5612                 string++;
5613         }
5614         gtk_combo_set_popdown_strings(GTK_COMBO(combo), combo_list);
5615         g_list_free(combo_list);
5616         gtk_editable_set_editable(GTK_EDITABLE(GTK_COMBO(combo)->entry), TRUE);
5617         g_signal_connect(G_OBJECT(GTK_COMBO(combo)->entry), "grab_focus",
5618                          G_CALLBACK(compose_grab_focus_cb), compose);
5619         gtk_widget_show(combo);
5620         gtk_table_attach(GTK_TABLE(compose->header_table), combo, 0, 1, compose->header_nextrow, compose->header_nextrow+1, GTK_SHRINK, GTK_FILL, 0, 0);
5621         if (compose->header_last) {     
5622                 const gchar *last_header_entry = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(compose->header_last->combo)->entry));
5623                 string = headers;
5624                 while (*string != NULL) {
5625                         if (!strcmp(*string, last_header_entry))
5626                                 standard_header = TRUE;
5627                         string++;
5628                 }
5629                 if (standard_header)
5630                         header = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(compose->header_last->combo)->entry));
5631         }
5632         if (!compose->header_last || !standard_header) {
5633                 switch(compose->account->protocol) {
5634                         case A_NNTP:
5635                                 header = prefs_common.trans_hdr ? _("Newsgroups:") : "Newsgroups:";
5636                                 break;
5637                         default:
5638                                 header = prefs_common.trans_hdr ? _("To:") : "To:";
5639                                 break;
5640                 }                                                                   
5641         }
5642         if (header)
5643                 gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), header);
5644
5645         g_signal_connect_after(G_OBJECT(GTK_COMBO(combo)->entry), "grab_focus",
5646                          G_CALLBACK(compose_grab_focus_cb), compose);
5647
5648         /* Entry field */
5649         entry = gtk_entry_new(); 
5650         gtk_widget_show(entry);
5651         gtk_tooltips_set_tip(compose->tooltips, entry,
5652                 _("Use <tab> to autocomplete from addressbook"), NULL);
5653         gtk_table_attach(GTK_TABLE(compose->header_table), entry, 1, 2, compose->header_nextrow, compose->header_nextrow+1, GTK_EXPAND | GTK_FILL, GTK_FILL, 0, 0);
5654
5655         g_signal_connect(G_OBJECT(entry), "key-press-event", 
5656                          G_CALLBACK(compose_headerentry_key_press_event_cb), 
5657                          headerentry);
5658         g_signal_connect(G_OBJECT(entry), "changed", 
5659                          G_CALLBACK(compose_headerentry_changed_cb), 
5660                          headerentry);
5661         g_signal_connect_after(G_OBJECT(entry), "grab_focus",
5662                          G_CALLBACK(compose_grab_focus_cb), compose);
5663                          
5664         /* email dnd */
5665         gtk_drag_dest_set(entry, GTK_DEST_DEFAULT_ALL, compose_mime_types, 
5666                           sizeof(compose_mime_types)/sizeof(compose_mime_types[0]),
5667                           GDK_ACTION_COPY | GDK_ACTION_MOVE);
5668         g_signal_connect(G_OBJECT(entry), "drag_data_received",
5669                          G_CALLBACK(compose_header_drag_received_cb),
5670                          entry);
5671         g_signal_connect(G_OBJECT(entry), "drag-drop",
5672                          G_CALLBACK(compose_drag_drop),
5673                          compose);
5674         
5675         address_completion_register_entry(GTK_ENTRY(entry), TRUE);
5676
5677         headerentry->compose = compose;
5678         headerentry->combo = combo;
5679         headerentry->entry = entry;
5680         headerentry->headernum = compose->header_nextrow;
5681
5682         compose->header_nextrow++;
5683         compose->header_last = headerentry;
5684 }
5685
5686 static void compose_add_header_entry(Compose *compose, gchar *header, gchar *text) 
5687 {
5688         ComposeHeaderEntry *last_header;
5689         
5690         last_header = compose->header_last;
5691         
5692         gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(last_header->combo)->entry), header);
5693         gtk_entry_set_text(GTK_ENTRY(last_header->entry), text);
5694 }
5695
5696 static void compose_remove_header_entries(Compose *compose) 
5697 {
5698         GSList *list;
5699         for (list = compose->header_list; list; list = list->next) {
5700                 ComposeHeaderEntry *headerentry = 
5701                         (ComposeHeaderEntry *)list->data;
5702                 gtk_widget_destroy(headerentry->combo);
5703                 gtk_widget_destroy(headerentry->entry);
5704                 g_free(headerentry);
5705         }
5706         g_slist_free(compose->header_list);
5707         compose->header_list = NULL;
5708         compose->header_nextrow = 1;
5709         compose_create_header_entry(compose);
5710 }
5711
5712 static GtkWidget *compose_create_header(Compose *compose) 
5713 {
5714         GtkWidget *from_optmenu_hbox;
5715         GtkWidget *header_scrolledwin;
5716         GtkWidget *header_table;
5717
5718         gint count = 0;
5719
5720         /* header labels and entries */
5721         header_scrolledwin = gtk_scrolled_window_new(NULL, NULL);
5722         gtk_widget_show(header_scrolledwin);
5723         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(header_scrolledwin), GTK_POLICY_NEVER, GTK_POLICY_AUTOMATIC);
5724
5725         header_table = gtk_table_new(2, 2, FALSE);
5726         gtk_widget_show(header_table);
5727         gtk_container_set_border_width(GTK_CONTAINER(header_table), BORDER_WIDTH);
5728         gtk_scrolled_window_add_with_viewport(GTK_SCROLLED_WINDOW(header_scrolledwin), header_table);
5729         gtk_viewport_set_shadow_type(GTK_VIEWPORT(GTK_BIN(header_scrolledwin)->child), GTK_SHADOW_ETCHED_IN);
5730         count = 0;
5731
5732         /* option menu for selecting accounts */
5733         from_optmenu_hbox = compose_account_option_menu_create(compose);
5734         gtk_table_attach(GTK_TABLE(header_table), from_optmenu_hbox,
5735                                   0, 2, count, count + 1, GTK_EXPAND | GTK_FILL, GTK_SHRINK, 0, 0);
5736         count++;
5737
5738         compose->header_table = header_table;
5739         compose->header_list = NULL;
5740         compose->header_nextrow = count;
5741
5742         compose_create_header_entry(compose);
5743
5744         compose->table            = NULL;
5745
5746         return header_scrolledwin ;
5747 }
5748
5749 GtkWidget *compose_create_attach(Compose *compose)
5750 {
5751         GtkWidget *attach_scrwin;
5752         GtkWidget *attach_clist;
5753
5754         GtkListStore *store;
5755         GtkCellRenderer *renderer;
5756         GtkTreeViewColumn *column;
5757         GtkTreeSelection *selection;
5758
5759         /* attachment list */
5760         attach_scrwin = gtk_scrolled_window_new(NULL, NULL);
5761         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(attach_scrwin),
5762                                        GTK_POLICY_AUTOMATIC,
5763                                        GTK_POLICY_AUTOMATIC);
5764         gtk_widget_set_size_request(attach_scrwin, -1, 80);
5765
5766         store = gtk_list_store_new(N_ATTACH_COLS, 
5767                                    G_TYPE_STRING,
5768                                    G_TYPE_STRING,
5769                                    G_TYPE_STRING,
5770                                    G_TYPE_POINTER,
5771                                    G_TYPE_AUTO_POINTER,
5772                                    -1);
5773         attach_clist = GTK_WIDGET(gtk_tree_view_new_with_model
5774                                         (GTK_TREE_MODEL(store)));
5775         gtk_container_add(GTK_CONTAINER(attach_scrwin), attach_clist);
5776         g_object_unref(store);
5777         
5778         renderer = gtk_cell_renderer_text_new();
5779         column = gtk_tree_view_column_new_with_attributes
5780                         (_("Mime type"), renderer, "text", 
5781                          COL_MIMETYPE, NULL);
5782         gtk_tree_view_append_column(GTK_TREE_VIEW(attach_clist), column);                        
5783         
5784         renderer = gtk_cell_renderer_text_new();
5785         column = gtk_tree_view_column_new_with_attributes
5786                         (_("Size"), renderer, "text", 
5787                          COL_SIZE, NULL);
5788         gtk_tree_view_append_column(GTK_TREE_VIEW(attach_clist), column);                        
5789         
5790         renderer = gtk_cell_renderer_text_new();
5791         column = gtk_tree_view_column_new_with_attributes
5792                         (_("Name"), renderer, "text", 
5793                          COL_NAME, NULL);
5794         gtk_tree_view_append_column(GTK_TREE_VIEW(attach_clist), column);
5795
5796         gtk_tree_view_set_rules_hint(GTK_TREE_VIEW(attach_clist),
5797                                      prefs_common.use_stripes_everywhere);
5798         selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(attach_clist));
5799         gtk_tree_selection_set_mode(selection, GTK_SELECTION_MULTIPLE);
5800
5801         g_signal_connect(G_OBJECT(attach_clist), "row_activated",
5802                          G_CALLBACK(attach_selected), compose);
5803         g_signal_connect(G_OBJECT(attach_clist), "button_press_event",
5804                          G_CALLBACK(attach_button_pressed), compose);
5805         g_signal_connect(G_OBJECT(attach_clist), "key_press_event",
5806                          G_CALLBACK(attach_key_pressed), compose);
5807
5808         /* drag and drop */
5809         gtk_drag_dest_set(attach_clist,
5810                           GTK_DEST_DEFAULT_ALL, compose_mime_types, 
5811                           sizeof(compose_mime_types)/sizeof(compose_mime_types[0]),
5812                           GDK_ACTION_COPY | GDK_ACTION_MOVE);
5813         g_signal_connect(G_OBJECT(attach_clist), "drag_data_received",
5814                          G_CALLBACK(compose_attach_drag_received_cb),
5815                          compose);
5816         g_signal_connect(G_OBJECT(attach_clist), "drag-drop",
5817                          G_CALLBACK(compose_drag_drop),
5818                          compose);
5819
5820         compose->attach_scrwin = attach_scrwin;
5821         compose->attach_clist  = attach_clist;
5822
5823         return attach_scrwin;
5824 }
5825
5826 static void compose_savemsg_checkbtn_cb(GtkWidget *widget, Compose *compose);
5827 static void compose_savemsg_select_cb(GtkWidget *widget, Compose *compose);
5828
5829 static GtkWidget *compose_create_others(Compose *compose)
5830 {
5831         GtkWidget *table;
5832         GtkWidget *savemsg_checkbtn;
5833         GtkWidget *savemsg_entry;
5834         GtkWidget *savemsg_select;
5835         
5836         guint rowcount = 0;
5837         gchar *folderidentifier;
5838
5839         /* Table for settings */
5840         table = gtk_table_new(3, 1, FALSE);
5841         gtk_container_set_border_width(GTK_CONTAINER(table), BORDER_WIDTH);
5842         gtk_widget_show(table);
5843         gtk_table_set_row_spacings(GTK_TABLE(table), VSPACING_NARROW);
5844         rowcount = 0;
5845
5846         /* Save Message to folder */
5847         savemsg_checkbtn = gtk_check_button_new_with_label(_("Save Message to "));
5848         gtk_widget_show(savemsg_checkbtn);
5849         gtk_table_attach(GTK_TABLE(table), savemsg_checkbtn, 0, 1, rowcount, rowcount + 1, GTK_SHRINK | GTK_FILL, GTK_SHRINK, 0, 0);
5850         if (account_get_special_folder(compose->account, F_OUTBOX)) {
5851                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(savemsg_checkbtn), prefs_common.savemsg);
5852         }
5853         g_signal_connect(G_OBJECT(savemsg_checkbtn), "toggled",
5854                          G_CALLBACK(compose_savemsg_checkbtn_cb), compose);
5855
5856         savemsg_entry = gtk_entry_new();
5857         gtk_widget_show(savemsg_entry);
5858         gtk_table_attach_defaults(GTK_TABLE(table), savemsg_entry, 1, 2, rowcount, rowcount + 1);
5859         gtk_editable_set_editable(GTK_EDITABLE(savemsg_entry), prefs_common.savemsg);
5860         g_signal_connect_after(G_OBJECT(savemsg_entry), "grab_focus",
5861                          G_CALLBACK(compose_grab_focus_cb), compose);
5862         if (account_get_special_folder(compose->account, F_OUTBOX)) {
5863                 folderidentifier = folder_item_get_identifier(account_get_special_folder
5864                                   (compose->account, F_OUTBOX));
5865                 gtk_entry_set_text(GTK_ENTRY(savemsg_entry), folderidentifier);
5866                 g_free(folderidentifier);
5867         }
5868
5869         savemsg_select = gtkut_get_browse_file_btn(_("_Browse"));
5870         gtk_widget_show(savemsg_select);
5871         gtk_table_attach(GTK_TABLE(table), savemsg_select, 2, 3, rowcount, rowcount + 1, GTK_SHRINK | GTK_FILL, GTK_SHRINK, 0, 0);
5872         g_signal_connect(G_OBJECT(savemsg_select), "clicked",
5873                          G_CALLBACK(compose_savemsg_select_cb),
5874                          compose);
5875
5876         rowcount++;
5877
5878         compose->savemsg_checkbtn = savemsg_checkbtn;
5879         compose->savemsg_entry = savemsg_entry;
5880
5881         return table;   
5882 }
5883
5884 static void compose_savemsg_checkbtn_cb(GtkWidget *widget, Compose *compose) 
5885 {
5886         gtk_editable_set_editable(GTK_EDITABLE(compose->savemsg_entry),
5887                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn)));
5888 }
5889
5890 static void compose_savemsg_select_cb(GtkWidget *widget, Compose *compose)
5891 {
5892         FolderItem *dest;
5893         gchar * path;
5894
5895         dest = foldersel_folder_sel(NULL, FOLDER_SEL_COPY, NULL);
5896         if (!dest) return;
5897
5898         path = folder_item_get_identifier(dest);
5899
5900         gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), path);
5901         g_free(path);
5902 }
5903
5904 static void entry_paste_clipboard(Compose *compose, GtkWidget *entry, gboolean wrap,
5905                                   GdkAtom clip, GtkTextIter *insert_place);
5906
5907 #define BLOCK_WRAP() {                                                  \
5908         prev_autowrap = compose->autowrap;                              \
5909         buffer = gtk_text_view_get_buffer(                              \
5910                                         GTK_TEXT_VIEW(compose->text));  \
5911         compose->autowrap = FALSE;                                      \
5912                                                                         \
5913         g_signal_handlers_block_by_func(G_OBJECT(buffer),               \
5914                                 G_CALLBACK(compose_changed_cb),         \
5915                                 compose);                               \
5916         g_signal_handlers_block_by_func(G_OBJECT(buffer),               \
5917                                 G_CALLBACK(text_inserted),              \
5918                                 compose);                               \
5919 }
5920 #define UNBLOCK_WRAP() {                                                \
5921         compose->autowrap = prev_autowrap;                              \
5922         if (compose->autowrap)                                          \
5923                 compose_wrap_all(compose);                              \
5924                                                                         \
5925         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),             \
5926                                 G_CALLBACK(compose_changed_cb),         \
5927                                 compose);                               \
5928         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),             \
5929                                 G_CALLBACK(text_inserted),              \
5930                                 compose);                               \
5931 }
5932
5933
5934 static gboolean text_clicked(GtkWidget *text, GdkEventButton *event,
5935                                        Compose *compose)
5936 {
5937         gint prev_autowrap;
5938         GtkTextBuffer *buffer;
5939 #if USE_ASPELL
5940         if (event->button == 3) {
5941                 GtkTextIter iter;
5942                 GtkTextIter sel_start, sel_end;
5943                 gboolean stuff_selected;
5944                 gint x, y;
5945                 /* move the cursor to allow GtkAspell to check the word
5946                  * under the mouse */
5947                 gtk_text_view_window_to_buffer_coords(GTK_TEXT_VIEW(text),
5948                         GTK_TEXT_WINDOW_TEXT, event->x, event->y,
5949                         &x, &y);
5950                 gtk_text_view_get_iter_at_location (GTK_TEXT_VIEW(text),
5951                         &iter, x, y);
5952                 /* get selection */
5953                 stuff_selected = gtk_text_buffer_get_selection_bounds(
5954                                 GTK_TEXT_VIEW(text)->buffer,
5955                                 &sel_start, &sel_end);
5956
5957                 gtk_text_buffer_place_cursor (GTK_TEXT_VIEW(text)->buffer, &iter);
5958                 /* reselect stuff */
5959                 if (stuff_selected 
5960                 && gtk_text_iter_in_range(&iter, &sel_start, &sel_end)) {
5961                         gtk_text_buffer_select_range(GTK_TEXT_VIEW(text)->buffer,
5962                                 &sel_start, &sel_end);
5963                 }
5964                 return FALSE; /* pass the event so that the right-click goes through */
5965         }
5966 #endif
5967         if (event->button == 2) {
5968                 GtkTextIter iter;
5969                 gint x, y;
5970                 BLOCK_WRAP();
5971                 
5972                 /* get the middle-click position to paste at the correct place */
5973                 gtk_text_view_window_to_buffer_coords(GTK_TEXT_VIEW(text),
5974                         GTK_TEXT_WINDOW_TEXT, event->x, event->y,
5975                         &x, &y);
5976                 gtk_text_view_get_iter_at_location (GTK_TEXT_VIEW(text),
5977                         &iter, x, y);
5978                 
5979                 entry_paste_clipboard(compose, text, 
5980                                 prefs_common.linewrap_pastes,
5981                                 GDK_SELECTION_PRIMARY, &iter);
5982                 UNBLOCK_WRAP();
5983                 return TRUE;
5984         }
5985         return FALSE;
5986 }
5987
5988 #if USE_ASPELL
5989 static void compose_spell_menu_changed(void *data)
5990 {
5991         Compose *compose = (Compose *)data;
5992         GSList *items;
5993         GtkWidget *menuitem;
5994         GtkWidget *parent_item;
5995         GtkMenu *menu = GTK_MENU(gtk_menu_new());
5996         GtkItemFactory *ifactory = gtk_item_factory_from_widget(compose->menubar);
5997         GSList *spell_menu;
5998
5999         if (compose->gtkaspell == NULL)
6000                 return;
6001
6002         parent_item = gtk_item_factory_get_item(ifactory, 
6003                         "/Spelling/Options");
6004
6005         /* setting the submenu removes /Spelling/Options from the factory 
6006          * so we need to save it */
6007
6008         if (parent_item == NULL) {
6009                 parent_item = compose->aspell_options_menu;
6010                 gtk_menu_item_remove_submenu(GTK_MENU_ITEM(parent_item));
6011         } else
6012                 compose->aspell_options_menu = parent_item;
6013
6014         spell_menu = gtkaspell_make_config_menu(compose->gtkaspell);
6015
6016         spell_menu = g_slist_reverse(spell_menu);
6017         for (items = spell_menu;
6018              items; items = items->next) {
6019                 menuitem = GTK_WIDGET(GTK_MENU_ITEM(items->data));
6020                 gtk_menu_shell_prepend(GTK_MENU_SHELL(menu), GTK_WIDGET(menuitem));
6021                 gtk_widget_show(GTK_WIDGET(menuitem));
6022         }
6023         g_slist_free(spell_menu);
6024
6025         gtk_menu_item_set_submenu(GTK_MENU_ITEM(parent_item), GTK_WIDGET(menu));
6026         
6027 }
6028 #endif
6029
6030 static gboolean compose_force_window_origin = TRUE;
6031 static Compose *compose_create(PrefsAccount *account, ComposeMode mode,
6032                                                  gboolean batch)
6033 {
6034         Compose   *compose;
6035         GtkWidget *window;
6036         GtkWidget *vbox;
6037         GtkWidget *menubar;
6038         GtkWidget *handlebox;
6039
6040         GtkWidget *notebook;
6041
6042         GtkWidget *vbox2;
6043
6044         GtkWidget *label;
6045         GtkWidget *subject_hbox;
6046         GtkWidget *subject_frame;
6047         GtkWidget *subject_entry;
6048         GtkWidget *subject;
6049         GtkWidget *paned;
6050
6051         GtkWidget *edit_vbox;
6052         GtkWidget *ruler_hbox;
6053         GtkWidget *ruler;
6054         GtkWidget *scrolledwin;
6055         GtkWidget *text;
6056         GtkTextBuffer *buffer;
6057         GtkClipboard *clipboard;
6058
6059         UndoMain *undostruct;
6060
6061         gchar *titles[N_ATTACH_COLS];
6062         guint n_menu_entries;
6063         GtkWidget *popupmenu;
6064         GtkItemFactory *popupfactory;
6065         GtkItemFactory *ifactory;
6066         GtkWidget *tmpl_menu;
6067         gint n_entries;
6068         GtkWidget *menuitem;
6069
6070 #if USE_ASPELL
6071         GtkAspell * gtkaspell = NULL;
6072 #endif
6073
6074         static GdkGeometry geometry;
6075
6076         g_return_val_if_fail(account != NULL, NULL);
6077
6078         debug_print("Creating compose window...\n");
6079         compose = g_new0(Compose, 1);
6080
6081         titles[COL_MIMETYPE] = _("MIME type");
6082         titles[COL_SIZE]     = _("Size");
6083         titles[COL_NAME]     = _("Name");
6084
6085         compose->batch = batch;
6086         compose->account = account;
6087         
6088         compose->mutex = g_mutex_new();
6089         compose->set_cursor_pos = -1;
6090
6091         compose->tooltips = gtk_tooltips_new();
6092
6093         window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
6094         gtk_window_set_resizable(GTK_WINDOW(window), TRUE);
6095         gtk_widget_set_size_request(window, -1, prefs_common.compose_height);
6096
6097         if (!geometry.max_width) {
6098                 geometry.max_width = gdk_screen_width();
6099                 geometry.max_height = gdk_screen_height();
6100         }
6101
6102         gtk_window_set_geometry_hints(GTK_WINDOW(window), NULL,
6103                                       &geometry, GDK_HINT_MAX_SIZE);
6104         if (!geometry.min_width) {
6105                 geometry.min_width = 600;
6106                 geometry.min_height = 480;
6107         }
6108         gtk_window_set_geometry_hints(GTK_WINDOW(window), NULL,
6109                                       &geometry, GDK_HINT_MIN_SIZE);
6110         
6111         if (compose_force_window_origin)
6112                 gtk_widget_set_uposition(window, prefs_common.compose_x, 
6113                                  prefs_common.compose_y);
6114
6115         g_signal_connect(G_OBJECT(window), "delete_event",
6116                          G_CALLBACK(compose_delete_cb), compose);
6117         MANAGE_WINDOW_SIGNALS_CONNECT(window);
6118         gtk_widget_realize(window);
6119
6120         gtkut_widget_set_composer_icon(window);
6121
6122         vbox = gtk_vbox_new(FALSE, 0);
6123         gtk_container_add(GTK_CONTAINER(window), vbox);
6124
6125         n_menu_entries = sizeof(compose_entries) / sizeof(compose_entries[0]);
6126         menubar = menubar_create(window, compose_entries,
6127                                  n_menu_entries, "<Compose>", compose);
6128         gtk_box_pack_start(GTK_BOX(vbox), menubar, FALSE, TRUE, 0);
6129
6130         if (prefs_common.toolbar_detachable) {
6131                 handlebox = gtk_handle_box_new();
6132         } else {
6133                 handlebox = gtk_hbox_new(FALSE, 0);
6134         }
6135         gtk_box_pack_start(GTK_BOX(vbox), handlebox, FALSE, FALSE, 0);
6136
6137         gtk_widget_realize(handlebox);
6138         compose->toolbar = toolbar_create(TOOLBAR_COMPOSE, handlebox,
6139                                           (gpointer)compose);
6140
6141         vbox2 = gtk_vbox_new(FALSE, 2);
6142         gtk_box_pack_start(GTK_BOX(vbox), vbox2, TRUE, TRUE, 0);
6143         gtk_container_set_border_width(GTK_CONTAINER(vbox2), 0);
6144         
6145         /* Notebook */
6146         notebook = gtk_notebook_new();
6147         gtk_widget_set_size_request(notebook, -1, 130);
6148         gtk_widget_show(notebook);
6149
6150         /* header labels and entries */
6151         gtk_notebook_append_page(GTK_NOTEBOOK(notebook),
6152                         compose_create_header(compose),
6153                         gtk_label_new_with_mnemonic(_("Hea_der")));
6154         /* attachment list */
6155         gtk_notebook_append_page(GTK_NOTEBOOK(notebook),
6156                         compose_create_attach(compose),
6157                         gtk_label_new_with_mnemonic(_("_Attachments")));
6158         /* Others Tab */
6159         gtk_notebook_append_page(GTK_NOTEBOOK(notebook),
6160                         compose_create_others(compose),
6161                         gtk_label_new_with_mnemonic(_("Othe_rs")));
6162
6163         /* Subject */
6164         subject_hbox = gtk_hbox_new(FALSE, 0);
6165         gtk_widget_show(subject_hbox);
6166
6167         subject_frame = gtk_frame_new(NULL);
6168         gtk_frame_set_shadow_type(GTK_FRAME(subject_frame), GTK_SHADOW_NONE);
6169         gtk_box_pack_start(GTK_BOX(subject_hbox), subject_frame, TRUE, TRUE, 0);
6170         gtk_widget_show(subject_frame);
6171
6172         subject = gtk_hbox_new(FALSE, 0);
6173         gtk_container_set_border_width(GTK_CONTAINER(subject), 0);
6174         gtk_widget_show(subject);
6175
6176         label = gtk_label_new(_("Subject:"));
6177         gtk_box_pack_start(GTK_BOX(subject), label, FALSE, FALSE, 0);
6178         gtk_widget_show(label);
6179
6180         subject_entry = gtk_entry_new();
6181         gtk_box_pack_start(GTK_BOX(subject), subject_entry, TRUE, TRUE, 0);
6182         g_signal_connect_after(G_OBJECT(subject_entry), "grab_focus",
6183                          G_CALLBACK(compose_grab_focus_cb), compose);
6184         gtk_widget_show(subject_entry);
6185         compose->subject_entry = subject_entry;
6186         gtk_container_add(GTK_CONTAINER(subject_frame), subject);
6187         
6188         edit_vbox = gtk_vbox_new(FALSE, 0);
6189
6190         gtk_box_pack_start(GTK_BOX(edit_vbox), subject_hbox, FALSE, FALSE, 0);
6191
6192         /* ruler */
6193         ruler_hbox = gtk_hbox_new(FALSE, 0);
6194         gtk_box_pack_start(GTK_BOX(edit_vbox), ruler_hbox, FALSE, FALSE, 0);
6195
6196         ruler = gtk_shruler_new();
6197         gtk_ruler_set_range(GTK_RULER(ruler), 0.0, 100.0, 1.0, 100.0);
6198         gtk_box_pack_start(GTK_BOX(ruler_hbox), ruler, TRUE, TRUE,
6199                            BORDER_WIDTH);
6200
6201         /* text widget */
6202         scrolledwin = gtk_scrolled_window_new(NULL, NULL);
6203         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrolledwin),
6204                                        GTK_POLICY_AUTOMATIC,
6205                                        GTK_POLICY_AUTOMATIC);
6206         gtk_scrolled_window_set_shadow_type(GTK_SCROLLED_WINDOW(scrolledwin),
6207                                             GTK_SHADOW_IN);
6208         gtk_box_pack_start(GTK_BOX(edit_vbox), scrolledwin, TRUE, TRUE, 0);
6209         gtk_widget_set_size_request(scrolledwin, prefs_common.compose_width, -1);
6210
6211         text = gtk_text_view_new();
6212         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6213         gtk_text_view_set_wrap_mode(GTK_TEXT_VIEW(text), GTK_WRAP_WORD_CHAR);
6214         gtk_text_view_set_editable(GTK_TEXT_VIEW(text), TRUE);
6215         clipboard = gtk_clipboard_get(GDK_SELECTION_PRIMARY);
6216         gtk_text_buffer_add_selection_clipboard(buffer, clipboard);
6217         
6218         gtk_container_add(GTK_CONTAINER(scrolledwin), text);
6219
6220         g_signal_connect_after(G_OBJECT(text), "size_allocate",
6221                                G_CALLBACK(compose_edit_size_alloc),
6222                                ruler);
6223         g_signal_connect(G_OBJECT(buffer), "changed",
6224                          G_CALLBACK(compose_changed_cb), compose);
6225         g_signal_connect(G_OBJECT(text), "grab_focus",
6226                          G_CALLBACK(compose_grab_focus_cb), compose);
6227         g_signal_connect(G_OBJECT(buffer), "insert_text",
6228                          G_CALLBACK(text_inserted), compose);
6229         g_signal_connect(G_OBJECT(text), "button_press_event",
6230                          G_CALLBACK(text_clicked), compose);
6231         g_signal_connect(G_OBJECT(subject_entry), "changed",
6232                          G_CALLBACK(compose_changed_cb), compose);
6233
6234         /* drag and drop */
6235         gtk_drag_dest_set(text, GTK_DEST_DEFAULT_ALL, compose_mime_types, 
6236                           sizeof(compose_mime_types)/sizeof(compose_mime_types[0]),
6237                           GDK_ACTION_COPY | GDK_ACTION_MOVE);
6238         g_signal_connect(G_OBJECT(text), "drag_data_received",
6239                          G_CALLBACK(compose_insert_drag_received_cb),
6240                          compose);
6241         g_signal_connect(G_OBJECT(text), "drag-drop",
6242                          G_CALLBACK(compose_drag_drop),
6243                          compose);
6244         gtk_widget_show_all(vbox);
6245
6246         /* pane between attach clist and text */
6247         paned = gtk_vpaned_new();
6248         gtk_paned_set_gutter_size(GTK_PANED(paned), 12);
6249         gtk_container_add(GTK_CONTAINER(vbox2), paned);
6250         gtk_paned_add1(GTK_PANED(paned), notebook);
6251         gtk_paned_add2(GTK_PANED(paned), edit_vbox);
6252         gtk_widget_show_all(paned);
6253
6254
6255         if (prefs_common.textfont) {
6256                 PangoFontDescription *font_desc;
6257
6258                 font_desc = pango_font_description_from_string
6259                         (prefs_common.textfont);
6260                 if (font_desc) {
6261                         gtk_widget_modify_font(text, font_desc);
6262                         pango_font_description_free(font_desc);
6263                 }
6264         }
6265
6266         n_entries = sizeof(compose_popup_entries) /
6267                 sizeof(compose_popup_entries[0]);
6268         popupmenu = menu_create_items(compose_popup_entries, n_entries,
6269                                       "<Compose>", &popupfactory,
6270                                       compose);
6271
6272         ifactory = gtk_item_factory_from_widget(menubar);
6273         menu_set_sensitive(ifactory, "/Edit/Undo", FALSE);
6274         menu_set_sensitive(ifactory, "/Edit/Redo", FALSE);
6275         menu_set_sensitive(ifactory, "/Options/Remove references", FALSE);
6276
6277         tmpl_menu = gtk_item_factory_get_item(ifactory, "/Tools/Template");
6278
6279         undostruct = undo_init(text);
6280         undo_set_change_state_func(undostruct, &compose_undo_state_changed,
6281                                    menubar);
6282
6283         address_completion_start(window);
6284
6285         compose->window        = window;
6286         compose->vbox          = vbox;
6287         compose->menubar       = menubar;
6288         compose->handlebox     = handlebox;
6289
6290         compose->vbox2         = vbox2;
6291
6292         compose->paned = paned;
6293
6294         compose->edit_vbox     = edit_vbox;
6295         compose->ruler_hbox    = ruler_hbox;
6296         compose->ruler         = ruler;
6297         compose->scrolledwin   = scrolledwin;
6298         compose->text          = text;
6299
6300         compose->focused_editable = NULL;
6301
6302         compose->popupmenu    = popupmenu;
6303         compose->popupfactory = popupfactory;
6304
6305         compose->tmpl_menu = tmpl_menu;
6306
6307         compose->mode = mode;
6308         compose->rmode = mode;
6309
6310         compose->targetinfo = NULL;
6311         compose->replyinfo  = NULL;
6312         compose->fwdinfo    = NULL;
6313
6314         compose->replyto     = NULL;
6315         compose->cc          = NULL;
6316         compose->bcc         = NULL;
6317         compose->followup_to = NULL;
6318
6319         compose->ml_post     = NULL;
6320
6321         compose->inreplyto   = NULL;
6322         compose->references  = NULL;
6323         compose->msgid       = NULL;
6324         compose->boundary    = NULL;
6325
6326         compose->autowrap       = prefs_common.autowrap;
6327
6328         compose->use_signing    = FALSE;
6329         compose->use_encryption = FALSE;
6330         compose->privacy_system = NULL;
6331
6332         compose->modified = FALSE;
6333
6334         compose->return_receipt = FALSE;
6335
6336         compose->to_list        = NULL;
6337         compose->newsgroup_list = NULL;
6338
6339         compose->undostruct = undostruct;
6340
6341         compose->sig_str = NULL;
6342
6343         compose->exteditor_file    = NULL;
6344         compose->exteditor_pid     = -1;
6345         compose->exteditor_tag     = -1;
6346         compose->draft_timeout_tag = -1;
6347
6348 #if USE_ASPELL
6349         menu_set_sensitive(ifactory, "/Spelling", FALSE);
6350         if (mode != COMPOSE_REDIRECT) {
6351                 if (prefs_common.enable_aspell && prefs_common.dictionary &&
6352                     strcmp(prefs_common.dictionary, "")) {
6353                         gtkaspell = gtkaspell_new(prefs_common.aspell_path,
6354                                                   prefs_common.dictionary,
6355                                                   conv_get_locale_charset_str(),
6356                                                   prefs_common.misspelled_col,
6357                                                   prefs_common.check_while_typing,
6358                                                   prefs_common.recheck_when_changing_dict,
6359                                                   prefs_common.use_alternate,
6360                                                   GTK_TEXT_VIEW(text),
6361                                                   GTK_WINDOW(compose->window),
6362                                                   compose_spell_menu_changed,
6363                                                   compose);
6364                         if (!gtkaspell) {
6365                                 alertpanel_error(_("Spell checker could not "
6366                                                 "be started.\n%s"),
6367                                                 gtkaspell_checkers_strerror());
6368                                 gtkaspell_checkers_reset_error();
6369                         } else {
6370                                 if (!gtkaspell_set_sug_mode(gtkaspell,
6371                                                 prefs_common.aspell_sugmode)) {
6372                                         debug_print("Aspell: could not set "
6373                                                     "suggestion mode %s\n",
6374                                                     gtkaspell_checkers_strerror());
6375                                         gtkaspell_checkers_reset_error();
6376                                 }
6377
6378                                 menu_set_sensitive(ifactory, "/Spelling", TRUE);
6379                         }
6380                 }
6381         }
6382         compose->gtkaspell = gtkaspell;
6383         compose_spell_menu_changed(compose);
6384 #endif
6385
6386         compose_select_account(compose, account, TRUE);
6387
6388         menu_set_active(ifactory, "/Edit/Auto wrapping", prefs_common.autowrap);
6389         if (account->set_autocc && account->auto_cc && mode != COMPOSE_REEDIT)
6390                 compose_entry_append(compose, account->auto_cc, COMPOSE_CC);
6391
6392         if (account->set_autobcc && account->auto_bcc && mode != COMPOSE_REEDIT) 
6393                 compose_entry_append(compose, account->auto_bcc, COMPOSE_BCC);
6394         
6395         if (account->set_autoreplyto && account->auto_replyto && mode != COMPOSE_REEDIT)
6396                 compose_entry_append(compose, account->auto_replyto, COMPOSE_REPLYTO);
6397
6398         menu_set_sensitive(ifactory, "/Options/Reply mode", compose->mode == COMPOSE_REPLY);
6399
6400         if (account->protocol != A_NNTP)
6401                 gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(compose->header_last->combo)->entry), prefs_common.trans_hdr ? _("To:") : "To:");
6402         else
6403                 gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(compose->header_last->combo)->entry), prefs_common.trans_hdr ? _("Newsgroups:") : "Newsgroups:");
6404
6405         addressbook_set_target_compose(compose);
6406         
6407         if (mode != COMPOSE_REDIRECT)
6408                 compose_set_template_menu(compose);
6409         else {
6410                 menuitem = gtk_item_factory_get_item(ifactory, "/Tools/Template");
6411                 menu_set_sensitive(ifactory, "/Tools/Template", FALSE);
6412         }
6413
6414         compose_list = g_list_append(compose_list, compose);
6415
6416         if (!prefs_common.show_ruler)
6417                 gtk_widget_hide(ruler_hbox);
6418                 
6419         menuitem = gtk_item_factory_get_item(ifactory, "/Tools/Show ruler");
6420         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem),
6421                                        prefs_common.show_ruler);
6422
6423         /* Priority */
6424         compose->priority = PRIORITY_NORMAL;
6425         compose_update_priority_menu_item(compose);
6426
6427         compose_set_out_encoding(compose);
6428         
6429         /* Actions menu */
6430         compose_update_actions_menu(compose);
6431
6432         /* Privacy Systems menu */
6433         compose_update_privacy_systems_menu(compose);
6434
6435         activate_privacy_system(compose, account, TRUE);
6436         toolbar_set_style(compose->toolbar->toolbar, compose->handlebox, prefs_common.toolbar_style);
6437         if (batch) {
6438                 gtk_widget_realize(window);
6439         } else {
6440                 gtk_widget_show(window);
6441         }
6442         
6443         return compose;
6444 }
6445
6446 static GtkWidget *compose_account_option_menu_create(Compose *compose)
6447 {
6448         GList *accounts;
6449         GtkWidget *hbox;
6450         GtkWidget *optmenu;
6451         GtkWidget *optmenubox;
6452         GtkListStore *menu;
6453         GtkTreeIter iter;
6454         GtkWidget *from_name = NULL;
6455
6456         gint num = 0, def_menu = 0;
6457         
6458         accounts = account_get_list();
6459         g_return_val_if_fail(accounts != NULL, NULL);
6460
6461         optmenubox = gtk_event_box_new();
6462         optmenu = gtkut_sc_combobox_create(optmenubox, FALSE);
6463         menu = GTK_LIST_STORE(gtk_combo_box_get_model(GTK_COMBO_BOX(optmenu)));
6464
6465         hbox = gtk_hbox_new(FALSE, 6);
6466         from_name = gtk_entry_new();
6467         
6468         g_signal_connect_after(G_OBJECT(from_name), "grab_focus",
6469                          G_CALLBACK(compose_grab_focus_cb), compose);
6470
6471         for (; accounts != NULL; accounts = accounts->next, num++) {
6472                 PrefsAccount *ac = (PrefsAccount *)accounts->data;
6473                 gchar *name, *from = NULL;
6474
6475                 if (ac == compose->account) def_menu = num;
6476
6477                 name = g_markup_printf_escaped(_("From: <i>%s</i>"),
6478                                        ac->account_name);
6479                 
6480                 if (ac == compose->account) {
6481                         if (ac->name && *ac->name) {
6482                                 gchar *buf;
6483                                 QUOTE_IF_REQUIRED_NORMAL(buf, ac->name, return NULL);
6484                                 from = g_strdup_printf("%s <%s>",
6485                                                        buf, ac->address);
6486                                 gtk_entry_set_text(GTK_ENTRY(from_name), from);
6487                         } else {
6488                                 from = g_strdup_printf("%s",
6489                                                        ac->address);
6490                                 gtk_entry_set_text(GTK_ENTRY(from_name), from);
6491                         }
6492                 }
6493                 COMBOBOX_ADD(menu, name, ac->account_id);
6494                 g_free(name);
6495                 g_free(from);
6496         }
6497
6498         gtk_combo_box_set_active(GTK_COMBO_BOX(optmenu), def_menu);
6499
6500         g_signal_connect(G_OBJECT(optmenu), "changed",
6501                         G_CALLBACK(account_activated),
6502                         compose);
6503
6504         gtk_box_pack_start(GTK_BOX(hbox), optmenubox, FALSE, FALSE, 0);
6505         gtk_box_pack_start(GTK_BOX(hbox), from_name, TRUE, TRUE, 0);
6506         
6507         gtk_tooltips_set_tip(compose->tooltips, optmenubox,
6508                 _("Account to use for this email"), NULL);
6509         gtk_tooltips_set_tip(compose->tooltips, from_name,
6510                 _("Sender address to be used"), NULL);
6511
6512         compose->from_name = from_name;
6513         
6514         return hbox;
6515 }
6516
6517 static void compose_set_priority_cb(gpointer data,
6518                                     guint action,
6519                                     GtkWidget *widget)
6520 {
6521         Compose *compose = (Compose *) data;
6522         compose->priority = action;
6523 }
6524
6525 static void compose_reply_change_mode(gpointer data,
6526                                     ComposeMode action,
6527                                     GtkWidget *widget)
6528 {
6529         Compose *compose = (Compose *) data;
6530         gboolean was_modified = compose->modified;
6531
6532         gboolean all = FALSE, ml = FALSE, sender = FALSE, followup = FALSE;
6533         
6534         g_return_if_fail(compose->replyinfo != NULL);
6535         
6536         if (action == COMPOSE_REPLY && prefs_common.default_reply_list)
6537                 ml = TRUE;
6538         if (action == COMPOSE_REPLY && compose->rmode == COMPOSE_FOLLOWUP_AND_REPLY_TO)
6539                 followup = TRUE;
6540         if (action == COMPOSE_REPLY_TO_ALL)
6541                 all = TRUE;
6542         if (action == COMPOSE_REPLY_TO_SENDER)
6543                 sender = TRUE;
6544         if (action == COMPOSE_REPLY_TO_LIST)
6545                 ml = TRUE;
6546
6547         compose_remove_header_entries(compose);
6548         compose_reply_set_entry(compose, compose->replyinfo, all, ml, sender, followup);
6549         if (compose->account->set_autocc && compose->account->auto_cc)
6550                 compose_entry_append(compose, compose->account->auto_cc, COMPOSE_CC);
6551
6552         if (compose->account->set_autobcc && compose->account->auto_bcc) 
6553                 compose_entry_append(compose, compose->account->auto_bcc, COMPOSE_BCC);
6554         
6555         if (compose->account->set_autoreplyto && compose->account->auto_replyto)
6556                 compose_entry_append(compose, compose->account->auto_replyto, COMPOSE_REPLYTO);
6557         compose_show_first_last_header(compose, TRUE);
6558         compose->modified = was_modified;
6559         compose_set_title(compose);
6560 }
6561
6562 static void compose_update_priority_menu_item(Compose * compose)
6563 {
6564         GtkItemFactory *ifactory;
6565         GtkWidget *menuitem = NULL;
6566
6567         ifactory = gtk_item_factory_from_widget(compose->menubar);
6568         
6569         switch (compose->priority) {
6570                 case PRIORITY_HIGHEST:
6571                         menuitem = gtk_item_factory_get_item
6572                                 (ifactory, "/Options/Priority/Highest");
6573                         break;
6574                 case PRIORITY_HIGH:
6575                         menuitem = gtk_item_factory_get_item
6576                                 (ifactory, "/Options/Priority/High");
6577                         break;
6578                 case PRIORITY_NORMAL:
6579                         menuitem = gtk_item_factory_get_item
6580                                 (ifactory, "/Options/Priority/Normal");
6581                         break;
6582                 case PRIORITY_LOW:
6583                         menuitem = gtk_item_factory_get_item
6584                                 (ifactory, "/Options/Priority/Low");
6585                         break;
6586                 case PRIORITY_LOWEST:
6587                         menuitem = gtk_item_factory_get_item
6588                                 (ifactory, "/Options/Priority/Lowest");
6589                         break;
6590         }
6591         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem), TRUE);
6592 }       
6593
6594 static void compose_set_privacy_system_cb(GtkWidget *widget, gpointer data)
6595 {
6596         Compose *compose = (Compose *) data;
6597         gchar *systemid;
6598         GtkItemFactory *ifactory;
6599         gboolean can_sign = FALSE, can_encrypt = FALSE;
6600
6601         g_return_if_fail(GTK_IS_CHECK_MENU_ITEM(widget));
6602
6603         if (!GTK_CHECK_MENU_ITEM(widget)->active)
6604                 return;
6605
6606         systemid = g_object_get_data(G_OBJECT(widget), "privacy_system");
6607         g_free(compose->privacy_system);
6608         compose->privacy_system = NULL;
6609         if (systemid != NULL) {
6610                 compose->privacy_system = g_strdup(systemid);
6611
6612                 can_sign = privacy_system_can_sign(systemid);
6613                 can_encrypt = privacy_system_can_encrypt(systemid);
6614         }
6615
6616         debug_print("activated privacy system: %s\n", systemid != NULL ? systemid : "None");
6617
6618         ifactory = gtk_item_factory_from_widget(compose->menubar);
6619         menu_set_sensitive(ifactory, "/Options/Sign", can_sign);
6620         menu_set_sensitive(ifactory, "/Options/Encrypt", can_encrypt);
6621 }
6622
6623 static void compose_update_privacy_system_menu_item(Compose * compose, gboolean warn)
6624 {
6625         static gchar *branch_path = "/Options/Privacy System";
6626         GtkItemFactory *ifactory;
6627         GtkWidget *menuitem = NULL;
6628         GList *amenu;
6629         gboolean can_sign = FALSE, can_encrypt = FALSE;
6630         gboolean found = FALSE;
6631
6632         ifactory = gtk_item_factory_from_widget(compose->menubar);
6633
6634         if (compose->privacy_system != NULL) {
6635                 gchar *systemid;
6636
6637                 menuitem = gtk_item_factory_get_widget(ifactory, branch_path);
6638                 g_return_if_fail(menuitem != NULL);
6639
6640                 amenu = GTK_MENU_SHELL(menuitem)->children;
6641                 menuitem = NULL;
6642                 while (amenu != NULL) {
6643                         GList *alist = amenu->next;
6644
6645                         systemid = g_object_get_data(G_OBJECT(amenu->data), "privacy_system");
6646                         if (systemid != NULL) {
6647                                 if (strcmp(systemid, compose->privacy_system) == 0) {
6648                                         menuitem = GTK_WIDGET(amenu->data);
6649
6650                                         can_sign = privacy_system_can_sign(systemid);
6651                                         can_encrypt = privacy_system_can_encrypt(systemid);
6652                                         found = TRUE;
6653                                         break;
6654                                 } 
6655                         } else if (strlen(compose->privacy_system) == 0) {
6656                                         menuitem = GTK_WIDGET(amenu->data);
6657
6658                                         can_sign = FALSE;
6659                                         can_encrypt = FALSE;
6660                                         found = TRUE;
6661                                         break;
6662                         }
6663
6664                         amenu = alist;
6665                 }
6666                 if (menuitem != NULL)
6667                         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem), TRUE);
6668                 
6669                 if (warn && !found && strlen(compose->privacy_system)) {
6670                         gchar *tmp = g_strdup_printf(
6671                                 _("The privacy system '%s' cannot be loaded. You "
6672                                   "will not be able to sign or encrypt this message."),
6673                                   compose->privacy_system);
6674                         alertpanel_warning(tmp);
6675                         g_free(tmp);
6676                 }
6677         } 
6678
6679         menu_set_sensitive(ifactory, "/Options/Sign", can_sign);
6680         menu_set_sensitive(ifactory, "/Options/Encrypt", can_encrypt);
6681 }       
6682  
6683 static void compose_set_out_encoding(Compose *compose)
6684 {
6685         GtkItemFactoryEntry *entry;
6686         GtkItemFactory *ifactory;
6687         CharSet out_encoding;
6688         gchar *path, *p, *q;
6689         GtkWidget *item;
6690
6691         out_encoding = conv_get_charset_from_str(prefs_common.outgoing_charset);
6692         ifactory = gtk_item_factory_from_widget(compose->menubar);
6693
6694         for (entry = compose_entries; entry->callback != compose_address_cb;
6695              entry++) {
6696                 if (entry->callback == compose_set_encoding_cb &&
6697                     (CharSet)entry->callback_action == out_encoding) {
6698                         p = q = path = g_strdup(entry->path);
6699                         while (*p) {
6700                                 if (*p == '_') {
6701                                         if (p[1] == '_') {
6702                                                 p++;
6703                                                 *q++ = '_';
6704                                         }
6705                                 } else
6706                                         *q++ = *p;
6707                                 p++;
6708                         }
6709                         *q = '\0';
6710                         item = gtk_item_factory_get_item(ifactory, path);
6711                         gtk_widget_activate(item);
6712                         g_free(path);
6713                         break;
6714                 }
6715         }
6716 }
6717
6718 static void compose_set_template_menu(Compose *compose)
6719 {
6720         GSList *tmpl_list, *cur;
6721         GtkWidget *menu;
6722         GtkWidget *item;
6723
6724         tmpl_list = template_get_config();
6725
6726         menu = gtk_menu_new();
6727
6728         for (cur = tmpl_list; cur != NULL; cur = cur->next) {
6729                 Template *tmpl = (Template *)cur->data;
6730
6731                 item = gtk_menu_item_new_with_label(tmpl->name);
6732                 gtk_menu_shell_append(GTK_MENU_SHELL(menu), item);
6733                 g_signal_connect(G_OBJECT(item), "activate",
6734                                  G_CALLBACK(compose_template_activate_cb),
6735                                  compose);
6736                 g_object_set_data(G_OBJECT(item), "template", tmpl);
6737                 gtk_widget_show(item);
6738         }
6739
6740         gtk_widget_show(menu);
6741         gtk_menu_item_set_submenu(GTK_MENU_ITEM(compose->tmpl_menu), menu);
6742 }
6743
6744 void compose_update_actions_menu(Compose *compose)
6745 {
6746         GtkItemFactory *ifactory;
6747
6748         ifactory = gtk_item_factory_from_widget(compose->menubar);
6749         action_update_compose_menu(ifactory, "/Tools/Actions", compose);
6750 }
6751
6752 void compose_update_privacy_systems_menu(Compose *compose)
6753 {
6754         static gchar *branch_path = "/Options/Privacy System";
6755         GtkItemFactory *ifactory;
6756         GtkWidget *menuitem;
6757         GSList *systems, *cur;
6758         GList *amenu;
6759         GtkWidget *widget;
6760         GtkWidget *system_none;
6761         GSList *group;
6762
6763         ifactory = gtk_item_factory_from_widget(compose->menubar);
6764
6765         /* remove old entries */
6766         menuitem = gtk_item_factory_get_widget(ifactory, branch_path);
6767         g_return_if_fail(menuitem != NULL);
6768
6769         amenu = GTK_MENU_SHELL(menuitem)->children->next;
6770         while (amenu != NULL) {
6771                 GList *alist = amenu->next;
6772                 gtk_widget_destroy(GTK_WIDGET(amenu->data));
6773                 amenu = alist;
6774         }
6775
6776         system_none = gtk_item_factory_get_widget(ifactory,
6777                 "/Options/Privacy System/None");
6778
6779         g_signal_connect(G_OBJECT(system_none), "activate",
6780                 G_CALLBACK(compose_set_privacy_system_cb), compose);
6781
6782         systems = privacy_get_system_ids();
6783         for (cur = systems; cur != NULL; cur = g_slist_next(cur)) {
6784                 gchar *systemid = cur->data;
6785
6786                 group = gtk_radio_menu_item_get_group(GTK_RADIO_MENU_ITEM(system_none));
6787                 widget = gtk_radio_menu_item_new_with_label(group,
6788                         privacy_system_get_name(systemid));
6789                 g_object_set_data_full(G_OBJECT(widget), "privacy_system",
6790                                        g_strdup(systemid), g_free);
6791                 g_signal_connect(G_OBJECT(widget), "activate",
6792                         G_CALLBACK(compose_set_privacy_system_cb), compose);
6793
6794                 gtk_menu_append(GTK_MENU(system_none->parent), widget);
6795                 gtk_widget_show(widget);
6796                 g_free(systemid);
6797         }
6798         g_slist_free(systems);
6799 }
6800
6801 void compose_reflect_prefs_all(void)
6802 {
6803         GList *cur;
6804         Compose *compose;
6805
6806         for (cur = compose_list; cur != NULL; cur = cur->next) {
6807                 compose = (Compose *)cur->data;
6808                 compose_set_template_menu(compose);
6809         }
6810 }
6811
6812 void compose_reflect_prefs_pixmap_theme(void)
6813 {
6814         GList *cur;
6815         Compose *compose;
6816
6817         for (cur = compose_list; cur != NULL; cur = cur->next) {
6818                 compose = (Compose *)cur->data;
6819                 toolbar_update(TOOLBAR_COMPOSE, compose);
6820         }
6821 }
6822
6823 static void compose_template_apply(Compose *compose, Template *tmpl,
6824                                    gboolean replace)
6825 {
6826         GtkTextView *text;
6827         GtkTextBuffer *buffer;
6828         GtkTextMark *mark;
6829         GtkTextIter iter;
6830         gchar *qmark;
6831         gchar *parsed_str = NULL;
6832         gint cursor_pos = 0;
6833         const gchar *err_msg = _("Template body format error.");
6834         if (!tmpl) return;
6835
6836         /* process the body */
6837
6838         text = GTK_TEXT_VIEW(compose->text);
6839         buffer = gtk_text_view_get_buffer(text);
6840
6841         if (tmpl->value) {
6842                 if (prefs_common.quotemark && *prefs_common.quotemark)
6843                         qmark = prefs_common.quotemark;
6844                 else
6845                         qmark = "> ";
6846
6847                 if (compose->replyinfo != NULL) {
6848
6849                         if (replace)
6850                                 gtk_text_buffer_set_text(buffer, "", -1);
6851                         mark = gtk_text_buffer_get_insert(buffer);
6852                         gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
6853
6854                         parsed_str = compose_quote_fmt(compose, compose->replyinfo,
6855                                                    tmpl->value, qmark, NULL, FALSE, FALSE, err_msg);
6856
6857                 } else if (compose->fwdinfo != NULL) {
6858
6859                         if (replace)
6860                                 gtk_text_buffer_set_text(buffer, "", -1);
6861                         mark = gtk_text_buffer_get_insert(buffer);
6862                         gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
6863
6864                         parsed_str = compose_quote_fmt(compose, compose->fwdinfo,
6865                                                    tmpl->value, qmark, NULL, FALSE, FALSE, err_msg);
6866
6867                 } else {
6868                         MsgInfo* dummyinfo = compose_msginfo_new_from_compose(compose);
6869
6870                         GtkTextIter start, end;
6871                         gchar *tmp = NULL;
6872
6873                         gtk_text_buffer_get_start_iter(buffer, &start);
6874                         gtk_text_buffer_get_iter_at_offset(buffer, &end, -1);
6875                         tmp = gtk_text_buffer_get_text(buffer, &start, &end, FALSE);
6876
6877                         /* clear the buffer now */
6878                         if (replace)
6879                                 gtk_text_buffer_set_text(buffer, "", -1);
6880
6881                         parsed_str = compose_quote_fmt(compose, dummyinfo,
6882                                                            tmpl->value, qmark, tmp, FALSE, FALSE, err_msg);
6883                         procmsg_msginfo_free( dummyinfo );
6884
6885                         g_free( tmp );
6886                 } 
6887         } else {
6888                 if (replace)
6889                         gtk_text_buffer_set_text(buffer, "", -1);
6890                 mark = gtk_text_buffer_get_insert(buffer);
6891                 gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
6892         }       
6893
6894         if (replace && parsed_str && compose->account->auto_sig)
6895                 compose_insert_sig(compose, FALSE);
6896
6897         if (replace && parsed_str) {
6898                 gtk_text_buffer_get_start_iter(buffer, &iter);
6899                 gtk_text_buffer_place_cursor(buffer, &iter);
6900         }
6901         
6902         if (parsed_str) {
6903                 cursor_pos = quote_fmt_get_cursor_pos();
6904                 compose->set_cursor_pos = cursor_pos;
6905                 if (cursor_pos == -1)
6906                         cursor_pos = 0;
6907                 gtk_text_buffer_get_start_iter(buffer, &iter);
6908                 gtk_text_buffer_get_iter_at_offset(buffer, &iter, cursor_pos);
6909                 gtk_text_buffer_place_cursor(buffer, &iter);
6910         }
6911
6912         /* process the other fields */
6913
6914         compose_template_apply_fields(compose, tmpl);
6915         quote_fmt_reset_vartable();
6916         compose_changed_cb(NULL, compose);
6917 }
6918
6919 void compose_template_apply_fields(Compose *compose, Template *tmpl)
6920 {
6921         MsgInfo* dummyinfo = NULL;
6922         MsgInfo *msginfo = NULL;
6923         gchar *buf = NULL;
6924
6925         if (compose->replyinfo != NULL)
6926                 msginfo = compose->replyinfo;
6927         else if (compose->fwdinfo != NULL)
6928                 msginfo = compose->fwdinfo;
6929         else {
6930                 dummyinfo = compose_msginfo_new_from_compose(compose);
6931                 msginfo = dummyinfo;
6932         }
6933
6934         if (tmpl->to && *tmpl->to != '\0') {
6935                 quote_fmt_init(msginfo, NULL, NULL, FALSE, compose->account);
6936                 quote_fmt_scan_string(tmpl->to);
6937                 quote_fmt_parse();
6938
6939                 buf = quote_fmt_get_buffer();
6940                 if (buf == NULL) {
6941                         alertpanel_error(_("Message To format error."));
6942                 } else {
6943                         compose_entry_append(compose, buf, COMPOSE_TO);
6944                 }
6945         }
6946
6947         if (tmpl->cc && *tmpl->cc != '\0') {
6948                 quote_fmt_init(msginfo, NULL, NULL, FALSE, compose->account);
6949                 quote_fmt_scan_string(tmpl->cc);
6950                 quote_fmt_parse();
6951
6952                 buf = quote_fmt_get_buffer();
6953                 if (buf == NULL) {
6954                         alertpanel_error(_("Message Cc format error."));
6955                 } else {
6956                         compose_entry_append(compose, buf, COMPOSE_CC);
6957                 }
6958         }
6959
6960         if (tmpl->bcc && *tmpl->bcc != '\0') {
6961                 quote_fmt_init(msginfo, NULL, NULL, FALSE, compose->account);
6962                 quote_fmt_scan_string(tmpl->bcc);
6963                 quote_fmt_parse();
6964
6965                 buf = quote_fmt_get_buffer();
6966                 if (buf == NULL) {
6967                         alertpanel_error(_("Message Bcc format error."));
6968                 } else {
6969                         compose_entry_append(compose, buf, COMPOSE_BCC);
6970                 }
6971         }
6972
6973         /* process the subject */
6974         if (tmpl->subject && *tmpl->subject != '\0') {
6975                 quote_fmt_init(msginfo, NULL, NULL, FALSE, compose->account);
6976                 quote_fmt_scan_string(tmpl->subject);
6977                 quote_fmt_parse();
6978
6979                 buf = quote_fmt_get_buffer();
6980                 if (buf == NULL) {
6981                         alertpanel_error(_("Message subject format error."));
6982                 } else {
6983                         gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), buf);
6984                 }
6985         }
6986
6987         procmsg_msginfo_free( dummyinfo );
6988 }
6989
6990 static void compose_destroy(Compose *compose)
6991 {
6992         GtkTextBuffer *buffer;
6993         GtkClipboard *clipboard;
6994
6995         compose_list = g_list_remove(compose_list, compose);
6996
6997         if (compose->updating) {
6998                 debug_print("danger, not destroying anything now\n");
6999                 compose->deferred_destroy = TRUE;
7000                 return;
7001         }
7002         /* NOTE: address_completion_end() does nothing with the window
7003          * however this may change. */
7004         address_completion_end(compose->window);
7005
7006         slist_free_strings(compose->to_list);
7007         g_slist_free(compose->to_list);
7008         slist_free_strings(compose->newsgroup_list);
7009         g_slist_free(compose->newsgroup_list);
7010         slist_free_strings(compose->header_list);
7011         g_slist_free(compose->header_list);
7012
7013         procmsg_msginfo_free(compose->targetinfo);
7014         procmsg_msginfo_free(compose->replyinfo);
7015         procmsg_msginfo_free(compose->fwdinfo);
7016
7017         g_free(compose->replyto);
7018         g_free(compose->cc);
7019         g_free(compose->bcc);
7020         g_free(compose->newsgroups);
7021         g_free(compose->followup_to);
7022
7023         g_free(compose->ml_post);
7024
7025         g_free(compose->inreplyto);
7026         g_free(compose->references);
7027         g_free(compose->msgid);
7028         g_free(compose->boundary);
7029
7030         g_free(compose->redirect_filename);
7031         if (compose->undostruct)
7032                 undo_destroy(compose->undostruct);
7033
7034         g_free(compose->sig_str);
7035
7036         g_free(compose->exteditor_file);
7037
7038         g_free(compose->orig_charset);
7039
7040         g_free(compose->privacy_system);
7041
7042         if (addressbook_get_target_compose() == compose)
7043                 addressbook_set_target_compose(NULL);
7044
7045 #if USE_ASPELL
7046         if (compose->gtkaspell) {
7047                 gtkaspell_delete(compose->gtkaspell);
7048                 compose->gtkaspell = NULL;
7049         }
7050 #endif
7051
7052         prefs_common.compose_width = compose->scrolledwin->allocation.width;
7053         prefs_common.compose_height = compose->window->allocation.height;
7054
7055         if (!gtk_widget_get_parent(compose->paned))
7056                 gtk_widget_destroy(compose->paned);
7057         gtk_widget_destroy(compose->popupmenu);
7058
7059         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(compose->text));
7060         clipboard = gtk_clipboard_get(GDK_SELECTION_PRIMARY);
7061         gtk_text_buffer_remove_selection_clipboard(buffer, clipboard);
7062
7063         gtk_widget_destroy(compose->window);
7064         toolbar_destroy(compose->toolbar);
7065         g_free(compose->toolbar);
7066         g_mutex_free(compose->mutex);
7067         g_free(compose);
7068 }
7069
7070 static void compose_attach_info_free(AttachInfo *ainfo)
7071 {
7072         g_free(ainfo->file);
7073         g_free(ainfo->content_type);
7074         g_free(ainfo->name);
7075         g_free(ainfo);
7076 }
7077
7078 static void compose_attach_remove_selected(Compose *compose)
7079 {
7080         GtkTreeView *tree_view = GTK_TREE_VIEW(compose->attach_clist);
7081         GtkTreeSelection *selection;
7082         GList *sel, *cur;
7083         GtkTreeModel *model;
7084
7085         selection = gtk_tree_view_get_selection(tree_view);
7086         sel = gtk_tree_selection_get_selected_rows(selection, &model);
7087
7088         if (!sel) 
7089                 return;
7090
7091         for (cur = sel; cur != NULL; cur = cur->next) {
7092                 GtkTreePath *path = cur->data;
7093                 GtkTreeRowReference *ref = gtk_tree_row_reference_new
7094                                                 (model, cur->data);
7095                 cur->data = ref;
7096                 gtk_tree_path_free(path);
7097         }
7098
7099         for (cur = sel; cur != NULL; cur = cur->next) {
7100                 GtkTreeRowReference *ref = cur->data;
7101                 GtkTreePath *path = gtk_tree_row_reference_get_path(ref);
7102                 GtkTreeIter iter;
7103
7104                 if (gtk_tree_model_get_iter(model, &iter, path))
7105                         gtk_list_store_remove(GTK_LIST_STORE(model), &iter);
7106                 
7107                 gtk_tree_path_free(path);
7108                 gtk_tree_row_reference_free(ref);
7109         }
7110
7111         g_list_free(sel);
7112 }
7113
7114 static struct _AttachProperty
7115 {
7116         GtkWidget *window;
7117         GtkWidget *mimetype_entry;
7118         GtkWidget *encoding_optmenu;
7119         GtkWidget *path_entry;
7120         GtkWidget *filename_entry;
7121         GtkWidget *ok_btn;
7122         GtkWidget *cancel_btn;
7123 } attach_prop;
7124
7125 static void gtk_tree_path_free_(gpointer ptr, gpointer data)
7126 {       
7127         gtk_tree_path_free((GtkTreePath *)ptr);
7128 }
7129
7130 static void compose_attach_property(Compose *compose)
7131 {
7132         GtkTreeView *tree_view = GTK_TREE_VIEW(compose->attach_clist);
7133         AttachInfo *ainfo;
7134         GtkComboBox *optmenu;
7135         GtkTreeSelection *selection;
7136         GList *sel;
7137         GtkTreeModel *model;
7138         GtkTreeIter iter;
7139         GtkTreePath *path;
7140         static gboolean cancelled;
7141
7142         /* only if one selected */
7143         selection = gtk_tree_view_get_selection(tree_view);
7144         if (gtk_tree_selection_count_selected_rows(selection) != 1) 
7145                 return;
7146
7147         sel = gtk_tree_selection_get_selected_rows(selection, &model);
7148         if (!sel)
7149                 return;
7150
7151         path = (GtkTreePath *) sel->data;
7152         gtk_tree_model_get_iter(model, &iter, path);
7153         gtk_tree_model_get(model, &iter, COL_DATA, &ainfo, -1); 
7154         
7155         if (!ainfo) {
7156                 g_list_foreach(sel, gtk_tree_path_free_, NULL);
7157                 g_list_free(sel);
7158                 return;
7159         }               
7160         g_list_free(sel);
7161
7162         if (!attach_prop.window)
7163                 compose_attach_property_create(&cancelled);
7164         gtk_widget_grab_focus(attach_prop.ok_btn);
7165         gtk_widget_show(attach_prop.window);
7166         manage_window_set_transient(GTK_WINDOW(attach_prop.window));
7167
7168         optmenu = GTK_COMBO_BOX(attach_prop.encoding_optmenu);
7169         if (ainfo->encoding == ENC_UNKNOWN)
7170                 combobox_select_by_data(optmenu, ENC_BASE64);
7171         else
7172                 combobox_select_by_data(optmenu, ainfo->encoding);
7173
7174         gtk_entry_set_text(GTK_ENTRY(attach_prop.mimetype_entry),
7175                            ainfo->content_type ? ainfo->content_type : "");
7176         gtk_entry_set_text(GTK_ENTRY(attach_prop.path_entry),
7177                            ainfo->file ? ainfo->file : "");
7178         gtk_entry_set_text(GTK_ENTRY(attach_prop.filename_entry),
7179                            ainfo->name ? ainfo->name : "");
7180
7181         for (;;) {
7182                 const gchar *entry_text;
7183                 gchar *text;
7184                 gchar *cnttype = NULL;
7185                 gchar *file = NULL;
7186                 off_t size = 0;
7187
7188                 cancelled = FALSE;
7189                 gtk_main();
7190
7191                 gtk_widget_hide(attach_prop.window);
7192                 
7193                 if (cancelled) 
7194                         break;
7195
7196                 entry_text = gtk_entry_get_text(GTK_ENTRY(attach_prop.mimetype_entry));
7197                 if (*entry_text != '\0') {
7198                         gchar *p;
7199
7200                         text = g_strstrip(g_strdup(entry_text));
7201                         if ((p = strchr(text, '/')) && !strchr(p + 1, '/')) {
7202                                 cnttype = g_strdup(text);
7203                                 g_free(text);
7204                         } else {
7205                                 alertpanel_error(_("Invalid MIME type."));
7206                                 g_free(text);
7207                                 continue;
7208                         }
7209                 }
7210
7211                 ainfo->encoding = combobox_get_active_data(optmenu);
7212
7213                 entry_text = gtk_entry_get_text(GTK_ENTRY(attach_prop.path_entry));
7214                 if (*entry_text != '\0') {
7215                         if (is_file_exist(entry_text) &&
7216                             (size = get_file_size(entry_text)) > 0)
7217                                 file = g_strdup(entry_text);
7218                         else {
7219                                 alertpanel_error
7220                                         (_("File doesn't exist or is empty."));
7221                                 g_free(cnttype);
7222                                 continue;
7223                         }
7224                 }
7225
7226                 entry_text = gtk_entry_get_text(GTK_ENTRY(attach_prop.filename_entry));
7227                 if (*entry_text != '\0') {
7228                         g_free(ainfo->name);
7229                         ainfo->name = g_strdup(entry_text);
7230                 }
7231
7232                 if (cnttype) {
7233                         g_free(ainfo->content_type);
7234                         ainfo->content_type = cnttype;
7235                 }
7236                 if (file) {
7237                         g_free(ainfo->file);
7238                         ainfo->file = file;
7239                 }
7240                 if (size)
7241                         ainfo->size = size;
7242
7243                 /* update tree store */
7244                 text = to_human_readable(ainfo->size);
7245                 gtk_tree_model_get_iter(model, &iter, path);
7246                 gtk_list_store_set(GTK_LIST_STORE(model), &iter,
7247                                    COL_MIMETYPE, ainfo->content_type,
7248                                    COL_SIZE, text,
7249                                    COL_NAME, ainfo->name,
7250                                    -1);
7251                 
7252                 break;
7253         }
7254
7255         gtk_tree_path_free(path);
7256 }
7257
7258 #define SET_LABEL_AND_ENTRY(str, entry, top) \
7259 { \
7260         label = gtk_label_new(str); \
7261         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), \
7262                          GTK_FILL, 0, 0, 0); \
7263         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5); \
7264  \
7265         entry = gtk_entry_new(); \
7266         gtk_table_attach(GTK_TABLE(table), entry, 1, 2, top, (top + 1), \
7267                          GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0); \
7268 }
7269
7270 static void compose_attach_property_create(gboolean *cancelled)
7271 {
7272         GtkWidget *window;
7273         GtkWidget *vbox;
7274         GtkWidget *table;
7275         GtkWidget *label;
7276         GtkWidget *mimetype_entry;
7277         GtkWidget *hbox;
7278         GtkWidget *optmenu;
7279         GtkListStore *optmenu_menu;
7280         GtkWidget *path_entry;
7281         GtkWidget *filename_entry;
7282         GtkWidget *hbbox;
7283         GtkWidget *ok_btn;
7284         GtkWidget *cancel_btn;
7285         GList     *mime_type_list, *strlist;
7286         GtkTreeIter iter;
7287
7288         debug_print("Creating attach_property window...\n");
7289
7290         window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
7291         gtk_widget_set_size_request(window, 480, -1);
7292         gtk_container_set_border_width(GTK_CONTAINER(window), 8);
7293         gtk_window_set_title(GTK_WINDOW(window), _("Properties"));
7294         gtk_window_set_position(GTK_WINDOW(window), GTK_WIN_POS_CENTER);
7295         gtk_window_set_modal(GTK_WINDOW(window), TRUE);
7296         g_signal_connect(G_OBJECT(window), "delete_event",
7297                          G_CALLBACK(attach_property_delete_event),
7298                          cancelled);
7299         g_signal_connect(G_OBJECT(window), "key_press_event",
7300                          G_CALLBACK(attach_property_key_pressed),
7301                          cancelled);
7302
7303         vbox = gtk_vbox_new(FALSE, 8);
7304         gtk_container_add(GTK_CONTAINER(window), vbox);
7305
7306         table = gtk_table_new(4, 2, FALSE);
7307         gtk_box_pack_start(GTK_BOX(vbox), table, FALSE, FALSE, 0);
7308         gtk_table_set_row_spacings(GTK_TABLE(table), 8);
7309         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
7310
7311         label = gtk_label_new(_("MIME type")); 
7312         gtk_table_attach(GTK_TABLE(table), label, 0, 1, 0, (0 + 1), 
7313                          GTK_FILL, 0, 0, 0); 
7314         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5); 
7315         mimetype_entry = gtk_combo_new(); 
7316         gtk_table_attach(GTK_TABLE(table), mimetype_entry, 1, 2, 0, (0 + 1), 
7317                          GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
7318                          
7319         /* stuff with list */
7320         mime_type_list = procmime_get_mime_type_list();
7321         strlist = NULL;
7322         for (; mime_type_list != NULL; mime_type_list = mime_type_list->next) {
7323                 MimeType *type = (MimeType *) mime_type_list->data;
7324                 gchar *tmp;
7325
7326                 tmp = g_strdup_printf("%s/%s", type->type, type->sub_type);
7327
7328                 if (g_list_find_custom(strlist, tmp, (GCompareFunc)strcmp2))
7329                         g_free(tmp);
7330                 else
7331                         strlist = g_list_insert_sorted(strlist, (gpointer)tmp,
7332                                         (GCompareFunc)strcmp2);
7333         }
7334
7335         gtk_combo_set_popdown_strings(GTK_COMBO(mimetype_entry), strlist);
7336
7337         for (mime_type_list = strlist; mime_type_list != NULL; 
7338                 mime_type_list = mime_type_list->next)
7339                 g_free(mime_type_list->data);
7340         g_list_free(strlist);
7341                          
7342         mimetype_entry = GTK_COMBO(mimetype_entry)->entry;                       
7343
7344         label = gtk_label_new(_("Encoding"));
7345         gtk_table_attach(GTK_TABLE(table), label, 0, 1, 1, 2,
7346                          GTK_FILL, 0, 0, 0);
7347         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
7348
7349         hbox = gtk_hbox_new(FALSE, 0);
7350         gtk_table_attach(GTK_TABLE(table), hbox, 1, 2, 1, 2,
7351                          GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
7352
7353         optmenu = gtkut_sc_combobox_create(NULL, TRUE);
7354         optmenu_menu = GTK_LIST_STORE(gtk_combo_box_get_model(GTK_COMBO_BOX(optmenu)));
7355
7356         COMBOBOX_ADD(optmenu_menu, "7bit", ENC_7BIT);
7357         COMBOBOX_ADD(optmenu_menu, "8bit", ENC_8BIT);
7358         COMBOBOX_ADD(optmenu_menu, "quoted-printable",  ENC_QUOTED_PRINTABLE);
7359         COMBOBOX_ADD(optmenu_menu, "base64", ENC_BASE64);
7360         gtk_combo_box_set_active(GTK_COMBO_BOX(optmenu), 0);
7361
7362         gtk_box_pack_start(GTK_BOX(hbox), optmenu, TRUE, TRUE, 0);
7363
7364         SET_LABEL_AND_ENTRY(_("Path"),      path_entry,     2);
7365         SET_LABEL_AND_ENTRY(_("File name"), filename_entry, 3);
7366
7367         gtkut_stock_button_set_create(&hbbox, &cancel_btn, GTK_STOCK_CANCEL,
7368                                       &ok_btn, GTK_STOCK_OK,
7369                                       NULL, NULL);
7370         gtk_box_pack_end(GTK_BOX(vbox), hbbox, FALSE, FALSE, 0);
7371         gtk_widget_grab_default(ok_btn);
7372
7373         g_signal_connect(G_OBJECT(ok_btn), "clicked",
7374                          G_CALLBACK(attach_property_ok),
7375                          cancelled);
7376         g_signal_connect(G_OBJECT(cancel_btn), "clicked",
7377                          G_CALLBACK(attach_property_cancel),
7378                          cancelled);
7379
7380         gtk_widget_show_all(vbox);
7381
7382         attach_prop.window           = window;
7383         attach_prop.mimetype_entry   = mimetype_entry;
7384         attach_prop.encoding_optmenu = optmenu;
7385         attach_prop.path_entry       = path_entry;
7386         attach_prop.filename_entry   = filename_entry;
7387         attach_prop.ok_btn           = ok_btn;
7388         attach_prop.cancel_btn       = cancel_btn;
7389 }
7390
7391 #undef SET_LABEL_AND_ENTRY
7392
7393 static void attach_property_ok(GtkWidget *widget, gboolean *cancelled)
7394 {
7395         *cancelled = FALSE;
7396         gtk_main_quit();
7397 }
7398
7399 static void attach_property_cancel(GtkWidget *widget, gboolean *cancelled)
7400 {
7401         *cancelled = TRUE;
7402         gtk_main_quit();
7403 }
7404
7405 static gint attach_property_delete_event(GtkWidget *widget, GdkEventAny *event,
7406                                          gboolean *cancelled)
7407 {
7408         *cancelled = TRUE;
7409         gtk_main_quit();
7410
7411         return TRUE;
7412 }
7413
7414 static gboolean attach_property_key_pressed(GtkWidget *widget,
7415                                             GdkEventKey *event,
7416                                             gboolean *cancelled)
7417 {
7418         if (event && event->keyval == GDK_Escape) {
7419                 *cancelled = TRUE;
7420                 gtk_main_quit();
7421         }
7422         return FALSE;
7423 }
7424
7425 static void compose_exec_ext_editor(Compose *compose)
7426 {
7427 #ifdef G_OS_UNIX
7428         gchar *tmp;
7429         pid_t pid;
7430         gint pipe_fds[2];
7431
7432         tmp = g_strdup_printf("%s%ctmpmsg.%p", get_tmp_dir(),
7433                               G_DIR_SEPARATOR, compose);
7434
7435         if (pipe(pipe_fds) < 0) {
7436                 perror("pipe");
7437                 g_free(tmp);
7438                 return;
7439         }
7440
7441         if ((pid = fork()) < 0) {
7442                 perror("fork");
7443                 g_free(tmp);
7444                 return;
7445         }
7446
7447         if (pid != 0) {
7448                 /* close the write side of the pipe */
7449                 close(pipe_fds[1]);
7450
7451                 compose->exteditor_file    = g_strdup(tmp);
7452                 compose->exteditor_pid     = pid;
7453
7454                 compose_set_ext_editor_sensitive(compose, FALSE);
7455
7456                 compose->exteditor_ch = g_io_channel_unix_new(pipe_fds[0]);
7457                 compose->exteditor_tag = g_io_add_watch(compose->exteditor_ch,
7458                                                         G_IO_IN,
7459                                                         compose_input_cb,
7460                                                         compose);
7461         } else {        /* process-monitoring process */
7462                 pid_t pid_ed;
7463
7464                 if (setpgid(0, 0))
7465                         perror("setpgid");
7466
7467                 /* close the read side of the pipe */
7468                 close(pipe_fds[0]);
7469
7470                 if (compose_write_body_to_file(compose, tmp) < 0) {
7471                         fd_write_all(pipe_fds[1], "2\n", 2);
7472                         _exit(1);
7473                 }
7474
7475                 pid_ed = compose_exec_ext_editor_real(tmp);
7476                 if (pid_ed < 0) {
7477                         fd_write_all(pipe_fds[1], "1\n", 2);
7478                         _exit(1);
7479                 }
7480
7481                 /* wait until editor is terminated */
7482                 waitpid(pid_ed, NULL, 0);
7483
7484                 fd_write_all(pipe_fds[1], "0\n", 2);
7485
7486                 close(pipe_fds[1]);
7487                 _exit(0);
7488         }
7489
7490         g_free(tmp);
7491 #endif /* G_OS_UNIX */
7492 }
7493
7494 #ifdef G_OS_UNIX
7495 static gint compose_exec_ext_editor_real(const gchar *file)
7496 {
7497         gchar buf[1024];
7498         gchar *p;
7499         gchar **cmdline;
7500         pid_t pid;
7501
7502         g_return_val_if_fail(file != NULL, -1);
7503
7504         if ((pid = fork()) < 0) {
7505                 perror("fork");
7506                 return -1;
7507         }
7508
7509         if (pid != 0) return pid;
7510
7511         /* grandchild process */
7512
7513         if (setpgid(0, getppid()))
7514                 perror("setpgid");
7515
7516         if (prefs_common.ext_editor_cmd &&
7517             (p = strchr(prefs_common.ext_editor_cmd, '%')) &&
7518             *(p + 1) == 's' && !strchr(p + 2, '%')) {
7519                 g_snprintf(buf, sizeof(buf), prefs_common.ext_editor_cmd, file);
7520         } else {
7521                 if (prefs_common.ext_editor_cmd)
7522                         g_warning("External editor command line is invalid: '%s'\n",
7523                                   prefs_common.ext_editor_cmd);
7524                 g_snprintf(buf, sizeof(buf), DEFAULT_EDITOR_CMD, file);
7525         }
7526
7527         cmdline = strsplit_with_quote(buf, " ", 1024);
7528         execvp(cmdline[0], cmdline);
7529
7530         perror("execvp");
7531         g_strfreev(cmdline);
7532
7533         _exit(1);
7534 }
7535
7536 static gboolean compose_ext_editor_kill(Compose *compose)
7537 {
7538         pid_t pgid = compose->exteditor_pid * -1;
7539         gint ret;
7540
7541         ret = kill(pgid, 0);
7542
7543         if (ret == 0 || (ret == -1 && EPERM == errno)) {
7544                 AlertValue val;
7545                 gchar *msg;
7546
7547                 msg = g_strdup_printf
7548                         (_("The external editor is still working.\n"
7549                            "Force terminating the process?\n"
7550                            "process group id: %d"), -pgid);
7551                 val = alertpanel_full(_("Notice"), msg, GTK_STOCK_NO, GTK_STOCK_YES,
7552                                       NULL, FALSE, NULL, ALERT_WARNING, G_ALERTDEFAULT);
7553                         
7554                 g_free(msg);
7555
7556                 if (val == G_ALERTALTERNATE) {
7557                         g_source_remove(compose->exteditor_tag);
7558                         g_io_channel_shutdown(compose->exteditor_ch,
7559                                               FALSE, NULL);
7560                         g_io_channel_unref(compose->exteditor_ch);
7561
7562                         if (kill(pgid, SIGTERM) < 0) perror("kill");
7563                         waitpid(compose->exteditor_pid, NULL, 0);
7564
7565                         g_warning("Terminated process group id: %d", -pgid);
7566                         g_warning("Temporary file: %s",
7567                                   compose->exteditor_file);
7568
7569                         compose_set_ext_editor_sensitive(compose, TRUE);
7570
7571                         g_free(compose->exteditor_file);
7572                         compose->exteditor_file    = NULL;
7573                         compose->exteditor_pid     = -1;
7574                         compose->exteditor_ch      = NULL;
7575                         compose->exteditor_tag     = -1;
7576                 } else
7577                         return FALSE;
7578         }
7579
7580         return TRUE;
7581 }
7582
7583 static gboolean compose_input_cb(GIOChannel *source, GIOCondition condition,
7584                                  gpointer data)
7585 {
7586         gchar buf[3] = "3";
7587         Compose *compose = (Compose *)data;
7588         gsize bytes_read;
7589
7590         debug_print(_("Compose: input from monitoring process\n"));
7591
7592         g_io_channel_read_chars(source, buf, sizeof(buf), &bytes_read, NULL);
7593
7594         g_io_channel_shutdown(source, FALSE, NULL);
7595         g_io_channel_unref(source);
7596
7597         waitpid(compose->exteditor_pid, NULL, 0);
7598
7599         if (buf[0] == '0') {            /* success */
7600                 GtkTextView *text = GTK_TEXT_VIEW(compose->text);
7601                 GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
7602
7603                 gtk_text_buffer_set_text(buffer, "", -1);
7604                 compose_insert_file(compose, compose->exteditor_file);
7605                 compose_changed_cb(NULL, compose);
7606
7607                 if (g_unlink(compose->exteditor_file) < 0)
7608                         FILE_OP_ERROR(compose->exteditor_file, "unlink");
7609         } else if (buf[0] == '1') {     /* failed */
7610                 g_warning("Couldn't exec external editor\n");
7611                 if (g_unlink(compose->exteditor_file) < 0)
7612                         FILE_OP_ERROR(compose->exteditor_file, "unlink");
7613         } else if (buf[0] == '2') {
7614                 g_warning("Couldn't write to file\n");
7615         } else if (buf[0] == '3') {
7616                 g_warning("Pipe read failed\n");
7617         }
7618
7619         compose_set_ext_editor_sensitive(compose, TRUE);
7620
7621         g_free(compose->exteditor_file);
7622         compose->exteditor_file    = NULL;
7623         compose->exteditor_pid     = -1;
7624         compose->exteditor_ch      = NULL;
7625         compose->exteditor_tag     = -1;
7626
7627         return FALSE;
7628 }
7629
7630 static void compose_set_ext_editor_sensitive(Compose *compose,
7631                                              gboolean sensitive)
7632 {
7633         GtkItemFactory *ifactory;
7634
7635         ifactory = gtk_item_factory_from_widget(compose->menubar);
7636
7637         menu_set_sensitive(ifactory, "/Message/Send", sensitive);
7638         menu_set_sensitive(ifactory, "/Message/Send later", sensitive);
7639         menu_set_sensitive(ifactory, "/Message/Insert file", sensitive);
7640         menu_set_sensitive(ifactory, "/Message/Insert signature", sensitive);
7641         menu_set_sensitive(ifactory, "/Edit/Wrap current paragraph", sensitive);
7642         menu_set_sensitive(ifactory, "/Edit/Wrap all long lines", sensitive);
7643         menu_set_sensitive(ifactory, "/Edit/Edit with external editor",
7644                            sensitive);
7645
7646         gtk_widget_set_sensitive(compose->text,                       sensitive);
7647         if (compose->toolbar->send_btn)
7648                 gtk_widget_set_sensitive(compose->toolbar->send_btn,      sensitive);
7649         if (compose->toolbar->sendl_btn)
7650                 gtk_widget_set_sensitive(compose->toolbar->sendl_btn,     sensitive);
7651         if (compose->toolbar->draft_btn)
7652                 gtk_widget_set_sensitive(compose->toolbar->draft_btn,     sensitive);
7653         if (compose->toolbar->insert_btn)
7654                 gtk_widget_set_sensitive(compose->toolbar->insert_btn,    sensitive);
7655         if (compose->toolbar->sig_btn)
7656                 gtk_widget_set_sensitive(compose->toolbar->sig_btn,       sensitive);
7657         if (compose->toolbar->exteditor_btn)
7658                 gtk_widget_set_sensitive(compose->toolbar->exteditor_btn, sensitive);
7659         if (compose->toolbar->linewrap_current_btn)
7660                 gtk_widget_set_sensitive(compose->toolbar->linewrap_current_btn, sensitive);
7661         if (compose->toolbar->linewrap_all_btn)
7662                 gtk_widget_set_sensitive(compose->toolbar->linewrap_all_btn, sensitive);
7663 }
7664 #endif /* G_OS_UNIX */
7665
7666 /**
7667  * compose_undo_state_changed:
7668  *
7669  * Change the sensivity of the menuentries undo and redo
7670  **/
7671 static void compose_undo_state_changed(UndoMain *undostruct, gint undo_state,
7672                                        gint redo_state, gpointer data)
7673 {
7674         GtkWidget *widget = GTK_WIDGET(data);
7675         GtkItemFactory *ifactory;
7676
7677         g_return_if_fail(widget != NULL);
7678
7679         ifactory = gtk_item_factory_from_widget(widget);
7680
7681         switch (undo_state) {
7682         case UNDO_STATE_TRUE:
7683                 if (!undostruct->undo_state) {
7684                         undostruct->undo_state = TRUE;
7685                         menu_set_sensitive(ifactory, "/Edit/Undo", TRUE);
7686                 }
7687                 break;
7688         case UNDO_STATE_FALSE:
7689                 if (undostruct->undo_state) {
7690                         undostruct->undo_state = FALSE;
7691                         menu_set_sensitive(ifactory, "/Edit/Undo", FALSE);
7692                 }
7693                 break;
7694         case UNDO_STATE_UNCHANGED:
7695                 break;
7696         case UNDO_STATE_REFRESH:
7697                 menu_set_sensitive(ifactory, "/Edit/Undo",
7698                                    undostruct->undo_state);
7699                 break;
7700         default:
7701                 g_warning("Undo state not recognized");
7702                 break;
7703         }
7704
7705         switch (redo_state) {
7706         case UNDO_STATE_TRUE:
7707                 if (!undostruct->redo_state) {
7708                         undostruct->redo_state = TRUE;
7709                         menu_set_sensitive(ifactory, "/Edit/Redo", TRUE);
7710                 }
7711                 break;
7712         case UNDO_STATE_FALSE:
7713                 if (undostruct->redo_state) {
7714                         undostruct->redo_state = FALSE;
7715                         menu_set_sensitive(ifactory, "/Edit/Redo", FALSE);
7716                 }
7717                 break;
7718         case UNDO_STATE_UNCHANGED:
7719                 break;
7720         case UNDO_STATE_REFRESH:
7721                 menu_set_sensitive(ifactory, "/Edit/Redo",
7722                                    undostruct->redo_state);
7723                 break;
7724         default:
7725                 g_warning("Redo state not recognized");
7726                 break;
7727         }
7728 }
7729
7730 /* callback functions */
7731
7732 /* compose_edit_size_alloc() - called when resized. don't know whether Gtk
7733  * includes "non-client" (windows-izm) in calculation, so this calculation
7734  * may not be accurate.
7735  */
7736 static gboolean compose_edit_size_alloc(GtkEditable *widget,
7737                                         GtkAllocation *allocation,
7738                                         GtkSHRuler *shruler)
7739 {
7740         if (prefs_common.show_ruler) {
7741                 gint char_width = 0, char_height = 0;
7742                 gint line_width_in_chars;
7743
7744                 gtkut_get_font_size(GTK_WIDGET(widget),
7745                                     &char_width, &char_height);
7746                 line_width_in_chars =
7747                         (allocation->width - allocation->x) / char_width;
7748
7749                 /* got the maximum */
7750                 gtk_ruler_set_range(GTK_RULER(shruler),
7751                                     0.0, line_width_in_chars, 0,
7752                                     /*line_width_in_chars*/ char_width);
7753         }
7754
7755         return TRUE;
7756 }
7757
7758 static void account_activated(GtkComboBox *optmenu, gpointer data)
7759 {
7760         Compose *compose = (Compose *)data;
7761
7762         PrefsAccount *ac;
7763         gchar *folderidentifier;
7764         gint account_id = 0;
7765         GtkTreeModel *menu;
7766         GtkTreeIter iter;
7767
7768         /* Get ID of active account in the combo box */
7769         menu = gtk_combo_box_get_model(optmenu);
7770         gtk_combo_box_get_active_iter(optmenu, &iter);
7771         gtk_tree_model_get(menu, &iter, 1, &account_id, -1);
7772
7773         ac = account_find_from_id(account_id);
7774         g_return_if_fail(ac != NULL);
7775
7776         if (ac != compose->account)
7777                 compose_select_account(compose, ac, FALSE);
7778
7779         /* Set message save folder */
7780         if (account_get_special_folder(compose->account, F_OUTBOX)) {
7781                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), prefs_common.savemsg);
7782         }
7783         g_signal_connect(G_OBJECT(compose->savemsg_checkbtn), "toggled",
7784                          G_CALLBACK(compose_savemsg_checkbtn_cb), compose);
7785                            
7786         gtk_editable_delete_text(GTK_EDITABLE(compose->savemsg_entry), 0, -1);
7787         if (account_get_special_folder(compose->account, F_OUTBOX)) {
7788                 folderidentifier = folder_item_get_identifier(account_get_special_folder
7789                                   (compose->account, F_OUTBOX));
7790                 gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), folderidentifier);
7791                 g_free(folderidentifier);
7792         }
7793 }
7794
7795 static void attach_selected(GtkTreeView *tree_view, GtkTreePath *tree_path,
7796                             GtkTreeViewColumn *column, Compose *compose)
7797 {
7798         compose_attach_property(compose);
7799 }
7800
7801 static gboolean attach_button_pressed(GtkWidget *widget, GdkEventButton *event,
7802                                       gpointer data)
7803 {
7804         Compose *compose = (Compose *)data;
7805         GtkTreeSelection *attach_selection;
7806         gint attach_nr_selected;
7807         GtkItemFactory *ifactory;
7808         
7809         if (!event) return FALSE;
7810
7811         if (event->button == 3) {
7812                 attach_selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(widget));
7813                 attach_nr_selected = gtk_tree_selection_count_selected_rows(attach_selection);
7814                 ifactory = gtk_item_factory_from_widget(compose->popupmenu);
7815                         
7816                 if (attach_nr_selected > 0)
7817                 {
7818                         menu_set_sensitive(ifactory, "/Remove", TRUE);
7819                         menu_set_sensitive(ifactory, "/Properties...", TRUE);
7820                 } else {
7821                         menu_set_sensitive(ifactory, "/Remove", FALSE);
7822                         menu_set_sensitive(ifactory, "/Properties...", FALSE);
7823                 }
7824                         
7825                 gtk_menu_popup(GTK_MENU(compose->popupmenu), NULL, NULL,
7826                                NULL, NULL, event->button, event->time);
7827                 return TRUE;                           
7828         }
7829
7830         return FALSE;
7831 }
7832
7833 static gboolean attach_key_pressed(GtkWidget *widget, GdkEventKey *event,
7834                                    gpointer data)
7835 {
7836         Compose *compose = (Compose *)data;
7837
7838         if (!event) return FALSE;
7839
7840         switch (event->keyval) {
7841         case GDK_Delete:
7842                 compose_attach_remove_selected(compose);
7843                 break;
7844         }
7845         return FALSE;
7846 }
7847
7848 static void compose_allow_user_actions (Compose *compose, gboolean allow)
7849 {
7850         GtkItemFactory *ifactory = gtk_item_factory_from_widget(compose->menubar);
7851         toolbar_comp_set_sensitive(compose, allow);
7852         menu_set_sensitive(ifactory, "/Message", allow);
7853         menu_set_sensitive(ifactory, "/Edit", allow);
7854 #if USE_ASPELL
7855         menu_set_sensitive(ifactory, "/Spelling", allow);
7856 #endif  
7857         menu_set_sensitive(ifactory, "/Options", allow);
7858         menu_set_sensitive(ifactory, "/Tools", allow);
7859         menu_set_sensitive(ifactory, "/Help", allow);
7860         
7861         gtk_text_view_set_editable(GTK_TEXT_VIEW(compose->text), allow);
7862
7863 }
7864
7865 static void compose_send_cb(gpointer data, guint action, GtkWidget *widget)
7866 {
7867         Compose *compose = (Compose *)data;
7868         
7869         if (prefs_common.work_offline && 
7870             !inc_offline_should_override(
7871                 _("Claws Mail needs network access in order "
7872                   "to send this email.")))
7873                 return;
7874         
7875         if (compose->draft_timeout_tag != -1) { /* CLAWS: disable draft timeout */
7876                 g_source_remove(compose->draft_timeout_tag);
7877                 compose->draft_timeout_tag = -1;
7878         }
7879
7880         compose_send(compose);
7881 }
7882
7883 static void compose_send_later_cb(gpointer data, guint action,
7884                                   GtkWidget *widget)
7885 {
7886         Compose *compose = (Compose *)data;
7887         gint val;
7888
7889         inc_lock();
7890         val = compose_queue_sub(compose, NULL, NULL, NULL, TRUE, TRUE);
7891         inc_unlock();
7892
7893         if (!val) {
7894                 compose_close(compose);
7895         } else if (val == -1) {
7896                 alertpanel_error(_("Could not queue message."));
7897         } else if (val == -2) {
7898                 alertpanel_error(_("Could not queue message:\n\n%s."), strerror(errno));
7899         } else if (val == -3) {
7900                 if (privacy_peek_error())
7901                 alertpanel_error(_("Could not queue message for sending:\n\n"
7902                                    "Signature failed: %s"), privacy_get_error());
7903         } else if (val == -4) {
7904                 alertpanel_error(_("Could not queue message for sending:\n\n"
7905                                    "Charset conversion failed."));
7906         } else if (val == -5) {
7907                 alertpanel_error(_("Could not queue message for sending:\n\n"
7908                                    "Couldn't get recipient encryption key."));
7909         }
7910         toolbar_main_set_sensitive(mainwindow_get_mainwindow());
7911 }
7912
7913 void compose_draft (gpointer data) 
7914 {
7915         compose_draft_cb(data, COMPOSE_QUIT_EDITING, NULL);     
7916 }
7917
7918 static void compose_draft_cb(gpointer data, guint action, GtkWidget *widget)
7919 {
7920         Compose *compose = (Compose *)data;
7921         FolderItem *draft;
7922         gchar *tmp;
7923         gint msgnum;
7924         MsgFlags flag = {0, 0};
7925         static gboolean lock = FALSE;
7926         MsgInfo *newmsginfo;
7927         FILE *fp;
7928         gboolean target_locked = FALSE;
7929         
7930         if (lock) return;
7931
7932         draft = account_get_special_folder(compose->account, F_DRAFT);
7933         g_return_if_fail(draft != NULL);
7934         
7935         if (!g_mutex_trylock(compose->mutex)) {
7936                 /* we don't want to lock the mutex once it's available,
7937                  * because as the only other part of compose.c locking
7938                  * it is compose_close - which means once unlocked,
7939                  * the compose struct will be freed */
7940                 debug_print("couldn't lock mutex, probably sending\n");
7941                 return;
7942         }
7943         
7944         lock = TRUE;
7945
7946         tmp = g_strdup_printf("%s%cdraft.%p", get_tmp_dir(),
7947                               G_DIR_SEPARATOR, compose);
7948         if ((fp = g_fopen(tmp, "wb")) == NULL) {
7949                 FILE_OP_ERROR(tmp, "fopen");
7950                 goto unlock;
7951         }
7952
7953         /* chmod for security */
7954         if (change_file_mode_rw(fp, tmp) < 0) {
7955                 FILE_OP_ERROR(tmp, "chmod");
7956                 g_warning("can't change file mode\n");
7957         }
7958
7959         /* Save draft infos */
7960         fprintf(fp, "X-Sylpheed-Account-Id:%d\n", compose->account->account_id);
7961         fprintf(fp, "S:%s\n", compose->account->address);
7962
7963         if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn))) {
7964                 gchar *savefolderid;
7965
7966                 savefolderid = gtk_editable_get_chars(GTK_EDITABLE(compose->savemsg_entry), 0, -1);
7967                 fprintf(fp, "SCF:%s\n", savefolderid);
7968                 g_free(savefolderid);
7969         }
7970         if (compose->return_receipt) {
7971                 fprintf(fp, "RRCPT:1\n");
7972         }
7973         if (compose->privacy_system) {
7974                 fprintf(fp, "X-Sylpheed-Sign:%d\n", compose->use_signing);
7975                 fprintf(fp, "X-Sylpheed-Encrypt:%d\n", compose->use_encryption);
7976                 fprintf(fp, "X-Sylpheed-Privacy-System:%s\n", compose->privacy_system);
7977         }
7978
7979         /* Message-ID of message replying to */
7980         if ((compose->replyinfo != NULL) && (compose->replyinfo->msgid != NULL)) {
7981                 gchar *folderid;
7982                 
7983                 folderid = folder_item_get_identifier(compose->replyinfo->folder);
7984                 fprintf(fp, "RMID:%s\t%d\t%s\n", folderid, compose->replyinfo->msgnum, compose->replyinfo->msgid);
7985                 g_free(folderid);
7986         }
7987         /* Message-ID of message forwarding to */
7988         if ((compose->fwdinfo != NULL) && (compose->fwdinfo->msgid != NULL)) {
7989                 gchar *folderid;
7990                 
7991                 folderid = folder_item_get_identifier(compose->fwdinfo->folder);
7992                 fprintf(fp, "FMID:%s\t%d\t%s\n", folderid, compose->fwdinfo->msgnum, compose->fwdinfo->msgid);
7993                 g_free(folderid);
7994         }
7995
7996         /* end of headers */
7997         fprintf(fp, "X-Sylpheed-End-Special-Headers: 1\n");
7998
7999         if (compose_write_to_file(compose, fp, COMPOSE_WRITE_FOR_STORE, action != COMPOSE_AUTO_SAVE) < 0) {
8000                 fclose(fp);
8001                 g_unlink(tmp);
8002                 g_free(tmp);
8003                 goto unlock;
8004         }
8005         fclose(fp);
8006         
8007         if (compose->targetinfo) {
8008                 target_locked = MSG_IS_LOCKED(compose->targetinfo->flags);
8009                 flag.perm_flags = target_locked?MSG_LOCKED:0;
8010         }
8011         flag.tmp_flags = MSG_DRAFT;
8012
8013         folder_item_scan(draft);
8014         if ((msgnum = folder_item_add_msg(draft, tmp, &flag, TRUE)) < 0) {
8015                 g_unlink(tmp);
8016                 g_free(tmp);
8017                 if (action != COMPOSE_AUTO_SAVE)
8018                         alertpanel_error(_("Could not save draft."));
8019                 goto unlock;
8020         }
8021         g_free(tmp);
8022
8023         if (compose->mode == COMPOSE_REEDIT) {
8024                 compose_remove_reedit_target(compose, TRUE);
8025         }
8026
8027         newmsginfo = folder_item_get_msginfo(draft, msgnum);
8028         if (newmsginfo) {
8029                 procmsg_msginfo_unset_flags(newmsginfo, ~0, ~0);
8030                 if (target_locked)
8031                         procmsg_msginfo_set_flags(newmsginfo, MSG_LOCKED, MSG_DRAFT);
8032                 else
8033                         procmsg_msginfo_set_flags(newmsginfo, 0, MSG_DRAFT);
8034                 if (compose_use_attach(compose) && action != COMPOSE_AUTO_SAVE)
8035                         procmsg_msginfo_set_flags(newmsginfo, 0,
8036                                                   MSG_HAS_ATTACHMENT);
8037
8038                 procmsg_msginfo_free(newmsginfo);
8039         }
8040         
8041         folder_item_scan(draft);
8042         
8043         if (action == COMPOSE_QUIT_EDITING) {
8044                 lock = FALSE;
8045                 g_mutex_unlock(compose->mutex); /* must be done before closing */
8046                 compose_close(compose);
8047                 return;
8048         } else {
8049                 struct stat s;
8050                 gchar *path;
8051
8052                 path = folder_item_fetch_msg(draft, msgnum);
8053                 if (path == NULL) {
8054                         debug_print("can't fetch %s:%d\n",draft->path, msgnum);
8055                         goto unlock;
8056                 }
8057                 if (g_stat(path, &s) < 0) {
8058                         FILE_OP_ERROR(path, "stat");
8059                         g_free(path);
8060                         goto unlock;
8061                 }
8062                 g_free(path);
8063
8064                 procmsg_msginfo_free(compose->targetinfo);
8065                 compose->targetinfo = procmsg_msginfo_new();
8066                 compose->targetinfo->msgnum = msgnum;
8067                 compose->targetinfo->size = s.st_size;
8068                 compose->targetinfo->mtime = s.st_mtime;
8069                 compose->targetinfo->folder = draft;
8070                 if (target_locked)
8071                         procmsg_msginfo_set_flags(compose->targetinfo, MSG_LOCKED, 0);
8072                 compose->mode = COMPOSE_REEDIT;
8073                 
8074                 if (action == COMPOSE_AUTO_SAVE) {
8075                         compose->autosaved_draft = compose->targetinfo;
8076                 }
8077                 compose->modified = FALSE;
8078                 compose_set_title(compose);
8079         }
8080 unlock:
8081         lock = FALSE;
8082         g_mutex_unlock(compose->mutex);
8083 }
8084
8085 static void compose_attach_cb(gpointer data, guint action, GtkWidget *widget)
8086 {
8087         Compose *compose = (Compose *)data;
8088         GList *file_list;
8089
8090         if (compose->redirect_filename != NULL)
8091                 return;
8092
8093         file_list = filesel_select_multiple_files_open(_("Select file"));
8094
8095         if (file_list) {
8096                 GList *tmp;
8097
8098                 for ( tmp = file_list; tmp; tmp = tmp->next) {
8099                         gchar *file = (gchar *) tmp->data;
8100                         gchar *utf8_filename = conv_filename_to_utf8(file);
8101                         compose_attach_append(compose, file, utf8_filename, NULL);
8102                         compose_changed_cb(NULL, compose);
8103                         g_free(file);
8104                         g_free(utf8_filename);
8105                 }
8106                 g_list_free(file_list);
8107         }               
8108 }
8109
8110 static void compose_insert_file_cb(gpointer data, guint action,
8111                                    GtkWidget *widget)
8112 {
8113         Compose *compose = (Compose *)data;
8114         GList *file_list;
8115
8116         file_list = filesel_select_multiple_files_open(_("Select file"));
8117
8118         if (file_list) {
8119                 GList *tmp;
8120
8121                 for ( tmp = file_list; tmp; tmp = tmp->next) {
8122                         gchar *file = (gchar *) tmp->data;
8123                         gchar *filedup = g_strdup(file);
8124                         gchar *shortfile = g_path_get_basename(filedup);
8125                         ComposeInsertResult res;
8126
8127                         res = compose_insert_file(compose, file);
8128                         if (res == COMPOSE_INSERT_READ_ERROR) {
8129                                 alertpanel_error(_("File '%s' could not be read."), shortfile);
8130                         } else if (res == COMPOSE_INSERT_INVALID_CHARACTER) {
8131                                 alertpanel_error(_("File '%s' contained invalid characters\n"
8132                                                    "for the current encoding, insertion may be incorrect."), shortfile);
8133                         }
8134                         g_free(shortfile);
8135                         g_free(filedup);
8136                         g_free(file);
8137                 }
8138                 g_list_free(file_list);
8139         }
8140 }
8141
8142 static void compose_insert_sig_cb(gpointer data, guint action,
8143                                   GtkWidget *widget)
8144 {
8145         Compose *compose = (Compose *)data;
8146
8147         compose_insert_sig(compose, FALSE);
8148 }
8149
8150 static gint compose_delete_cb(GtkWidget *widget, GdkEventAny *event,
8151                               gpointer data)
8152 {
8153         gint x, y;
8154         Compose *compose = (Compose *)data;
8155
8156         gtkut_widget_get_uposition(widget, &x, &y);
8157         prefs_common.compose_x = x;
8158         prefs_common.compose_y = y;
8159
8160         if (compose->sending || compose->updating)
8161                 return TRUE;
8162         compose_close_cb(compose, 0, NULL);
8163         return TRUE;
8164 }
8165
8166 static void compose_close_cb(gpointer data, guint action, GtkWidget *widget)
8167 {
8168         Compose *compose = (Compose *)data;
8169         AlertValue val;
8170
8171 #ifdef G_OS_UNIX
8172         if (compose->exteditor_tag != -1) {
8173                 if (!compose_ext_editor_kill(compose))
8174                         return;
8175         }
8176 #endif
8177
8178         if (compose->modified) {
8179                 val = alertpanel(_("Discard message"),
8180                                  _("This message has been modified. Discard it?"),
8181                                  _("_Discard"), _("_Save to Drafts"), GTK_STOCK_CANCEL);
8182
8183                 switch (val) {
8184                 case G_ALERTDEFAULT:
8185                         if (prefs_common.autosave)
8186                                 compose_remove_draft(compose);                  
8187                         break;
8188                 case G_ALERTALTERNATE:
8189                         compose_draft_cb(data, COMPOSE_QUIT_EDITING, NULL);
8190                         return;
8191                 default:
8192                         return;
8193                 }
8194         }
8195
8196         compose_close(compose);
8197 }
8198
8199 static void compose_set_encoding_cb(gpointer data, guint action,
8200                                     GtkWidget *widget)
8201 {
8202         Compose *compose = (Compose *)data;
8203
8204         if (GTK_CHECK_MENU_ITEM(widget)->active)
8205                 compose->out_encoding = (CharSet)action;
8206 }
8207
8208 static void compose_address_cb(gpointer data, guint action, GtkWidget *widget)
8209 {
8210         Compose *compose = (Compose *)data;
8211
8212         addressbook_open(compose);
8213 }
8214
8215 static void compose_template_activate_cb(GtkWidget *widget, gpointer data)
8216 {
8217         Compose *compose = (Compose *)data;
8218         Template *tmpl;
8219         gchar *msg;
8220         AlertValue val;
8221
8222         tmpl = g_object_get_data(G_OBJECT(widget), "template");
8223         g_return_if_fail(tmpl != NULL);
8224
8225         msg = g_strdup_printf(_("Do you want to apply the template '%s' ?"),
8226                               tmpl->name);
8227         val = alertpanel(_("Apply template"), msg,
8228                          _("_Replace"), _("_Insert"), GTK_STOCK_CANCEL);
8229         g_free(msg);
8230
8231         if (val == G_ALERTDEFAULT)
8232                 compose_template_apply(compose, tmpl, TRUE);
8233         else if (val == G_ALERTALTERNATE)
8234                 compose_template_apply(compose, tmpl, FALSE);
8235 }
8236
8237 static void compose_ext_editor_cb(gpointer data, guint action,
8238                                   GtkWidget *widget)
8239 {
8240         Compose *compose = (Compose *)data;
8241
8242         compose_exec_ext_editor(compose);
8243 }
8244
8245 static void compose_undo_cb(Compose *compose)
8246 {
8247         gboolean prev_autowrap = compose->autowrap;
8248
8249         compose->autowrap = FALSE;
8250         undo_undo(compose->undostruct);
8251         compose->autowrap = prev_autowrap;
8252 }
8253
8254 static void compose_redo_cb(Compose *compose)
8255 {
8256         gboolean prev_autowrap = compose->autowrap;
8257         
8258         compose->autowrap = FALSE;
8259         undo_redo(compose->undostruct);
8260         compose->autowrap = prev_autowrap;
8261 }
8262
8263 static void entry_cut_clipboard(GtkWidget *entry)
8264 {
8265         if (GTK_IS_EDITABLE(entry))
8266                 gtk_editable_cut_clipboard (GTK_EDITABLE(entry));
8267         else if (GTK_IS_TEXT_VIEW(entry))
8268                 gtk_text_buffer_cut_clipboard(
8269                         gtk_text_view_get_buffer(GTK_TEXT_VIEW(entry)),
8270                         gtk_clipboard_get(GDK_SELECTION_CLIPBOARD),
8271                         TRUE);
8272 }
8273
8274 static void entry_copy_clipboard(GtkWidget *entry)
8275 {
8276         if (GTK_IS_EDITABLE(entry))
8277                 gtk_editable_copy_clipboard (GTK_EDITABLE(entry));
8278         else if (GTK_IS_TEXT_VIEW(entry))
8279                 gtk_text_buffer_copy_clipboard(
8280                         gtk_text_view_get_buffer(GTK_TEXT_VIEW(entry)),
8281                         gtk_clipboard_get(GDK_SELECTION_CLIPBOARD));
8282 }
8283
8284 static void entry_paste_clipboard(Compose *compose, GtkWidget *entry, 
8285                                   gboolean wrap, GdkAtom clip, GtkTextIter *insert_place)
8286 {
8287         if (GTK_IS_TEXT_VIEW(entry)) {
8288                 GtkTextBuffer *buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(entry));
8289                 GtkTextMark *mark_start = gtk_text_buffer_get_insert(buffer);
8290                 GtkTextIter start_iter, end_iter;
8291                 gint start, end;
8292                 gchar *contents = gtk_clipboard_wait_for_text(gtk_clipboard_get(clip));
8293
8294                 if (contents == NULL)
8295                         return;
8296
8297                 undo_paste_clipboard(GTK_TEXT_VIEW(compose->text), compose->undostruct);
8298
8299                 /* we shouldn't delete the selection when middle-click-pasting, or we
8300                  * can't mid-click-paste our own selection */
8301                 if (clip != GDK_SELECTION_PRIMARY) {
8302                         gtk_text_buffer_delete_selection(buffer, FALSE, TRUE);
8303                 }
8304                 
8305                 if (insert_place == NULL) {
8306                         /* if insert_place isn't specified, insert at the cursor.
8307                          * used for Ctrl-V pasting */
8308                         gtk_text_buffer_get_iter_at_mark(buffer, &start_iter, mark_start);
8309                         start = gtk_text_iter_get_offset(&start_iter);
8310                         gtk_text_buffer_insert(buffer, &start_iter, contents, strlen(contents));
8311                 } else {
8312                         /* if insert_place is specified, paste here.
8313                          * used for mid-click-pasting */
8314                         start = gtk_text_iter_get_offset(insert_place);
8315                         gtk_text_buffer_insert(buffer, insert_place, contents, strlen(contents));
8316                 }
8317                 
8318                 if (!wrap) {
8319                         /* paste unwrapped: mark the paste so it's not wrapped later */
8320                         end = start + strlen(contents);
8321                         gtk_text_buffer_get_iter_at_offset(buffer, &start_iter, start);
8322                         gtk_text_buffer_get_iter_at_offset(buffer, &end_iter, end);
8323                         gtk_text_buffer_apply_tag_by_name(buffer, "no_wrap", &start_iter, &end_iter);
8324                 } else if (wrap && clip == GDK_SELECTION_PRIMARY) {
8325                         /* rewrap paragraph now (after a mid-click-paste) */
8326                         mark_start = gtk_text_buffer_get_insert(buffer);
8327                         gtk_text_buffer_get_iter_at_mark(buffer, &start_iter, mark_start);
8328                         gtk_text_iter_backward_char(&start_iter);
8329                         compose_beautify_paragraph(compose, &start_iter, TRUE);
8330                 }
8331         } else if (GTK_IS_EDITABLE(entry))
8332                 gtk_editable_paste_clipboard (GTK_EDITABLE(entry));
8333         
8334 }
8335
8336 static void entry_allsel(GtkWidget *entry)
8337 {
8338         if (GTK_IS_EDITABLE(entry))
8339                 gtk_editable_select_region(GTK_EDITABLE(entry), 0, -1);
8340         else if (GTK_IS_TEXT_VIEW(entry)) {
8341                 GtkTextIter startiter, enditer;
8342                 GtkTextBuffer *textbuf;
8343
8344                 textbuf = gtk_text_view_get_buffer(GTK_TEXT_VIEW(entry));
8345                 gtk_text_buffer_get_start_iter(textbuf, &startiter);
8346                 gtk_text_buffer_get_end_iter(textbuf, &enditer);
8347
8348                 gtk_text_buffer_move_mark_by_name(textbuf, 
8349                         "selection_bound", &startiter);
8350                 gtk_text_buffer_move_mark_by_name(textbuf, 
8351                         "insert", &enditer);
8352         }
8353 }
8354
8355 static void compose_cut_cb(Compose *compose)
8356 {
8357         if (compose->focused_editable &&
8358             GTK_WIDGET_HAS_FOCUS(compose->focused_editable))
8359                 entry_cut_clipboard(compose->focused_editable);
8360 }
8361
8362 static void compose_copy_cb(Compose *compose)
8363 {
8364         if (compose->focused_editable &&
8365             GTK_WIDGET_HAS_FOCUS(compose->focused_editable))
8366                 entry_copy_clipboard(compose->focused_editable);
8367 }
8368
8369 static void compose_paste_cb(Compose *compose)
8370 {
8371         gint prev_autowrap;
8372         GtkTextBuffer *buffer;
8373         BLOCK_WRAP();
8374         if (compose->focused_editable &&
8375             GTK_WIDGET_HAS_FOCUS(compose->focused_editable))
8376                 entry_paste_clipboard(compose, compose->focused_editable, 
8377                                 prefs_common.linewrap_pastes,
8378                                 GDK_SELECTION_CLIPBOARD, NULL);
8379         UNBLOCK_WRAP();
8380 }
8381
8382 static void compose_paste_as_quote_cb(Compose *compose)
8383 {
8384         gint wrap_quote = prefs_common.linewrap_quote;
8385         if (compose->focused_editable &&
8386             GTK_WIDGET_HAS_FOCUS(compose->focused_editable)) {
8387                 /* let text_insert() (called directly or at a later time
8388                  * after the gtk_editable_paste_clipboard) know that 
8389                  * text is to be inserted as a quotation. implemented
8390                  * by using a simple refcount... */
8391                 gint paste_as_quotation = GPOINTER_TO_INT(g_object_get_data(
8392                                                 G_OBJECT(compose->focused_editable),
8393                                                 "paste_as_quotation"));
8394                 g_object_set_data(G_OBJECT(compose->focused_editable),
8395                                     "paste_as_quotation",
8396                                     GINT_TO_POINTER(paste_as_quotation + 1));
8397                 prefs_common.linewrap_quote = prefs_common.linewrap_pastes;
8398                 entry_paste_clipboard(compose, compose->focused_editable, 
8399                                 prefs_common.linewrap_pastes,
8400                                 GDK_SELECTION_CLIPBOARD, NULL);
8401                 prefs_common.linewrap_quote = wrap_quote;
8402         }
8403 }
8404
8405 static void compose_paste_no_wrap_cb(Compose *compose)
8406 {
8407         gint prev_autowrap;
8408         GtkTextBuffer *buffer;
8409         BLOCK_WRAP();
8410         if (compose->focused_editable &&
8411             GTK_WIDGET_HAS_FOCUS(compose->focused_editable))
8412                 entry_paste_clipboard(compose, compose->focused_editable, FALSE,
8413                         GDK_SELECTION_CLIPBOARD, NULL);
8414         UNBLOCK_WRAP();
8415 }
8416
8417 static void compose_paste_wrap_cb(Compose *compose)
8418 {
8419         gint prev_autowrap;
8420         GtkTextBuffer *buffer;
8421         BLOCK_WRAP();
8422         if (compose->focused_editable &&
8423             GTK_WIDGET_HAS_FOCUS(compose->focused_editable))
8424                 entry_paste_clipboard(compose, compose->focused_editable, TRUE,
8425                         GDK_SELECTION_CLIPBOARD, NULL);
8426         UNBLOCK_WRAP();
8427 }
8428
8429 static void compose_allsel_cb(Compose *compose)
8430 {
8431         if (compose->focused_editable &&
8432             GTK_WIDGET_HAS_FOCUS(compose->focused_editable))
8433                 entry_allsel(compose->focused_editable);
8434 }
8435
8436 static void textview_move_beginning_of_line (GtkTextView *text)
8437 {
8438         GtkTextBuffer *buffer;
8439         GtkTextMark *mark;
8440         GtkTextIter ins;
8441
8442         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8443
8444         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8445         mark = gtk_text_buffer_get_insert(buffer);
8446         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8447         gtk_text_iter_set_line_offset(&ins, 0);
8448         gtk_text_buffer_place_cursor(buffer, &ins);
8449 }
8450
8451 static void textview_move_forward_character (GtkTextView *text)
8452 {
8453         GtkTextBuffer *buffer;
8454         GtkTextMark *mark;
8455         GtkTextIter ins;
8456
8457         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8458
8459         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8460         mark = gtk_text_buffer_get_insert(buffer);
8461         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8462         if (gtk_text_iter_forward_cursor_position(&ins))
8463                 gtk_text_buffer_place_cursor(buffer, &ins);
8464 }
8465
8466 static void textview_move_backward_character (GtkTextView *text)
8467 {
8468         GtkTextBuffer *buffer;
8469         GtkTextMark *mark;
8470         GtkTextIter ins;
8471
8472         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8473
8474         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8475         mark = gtk_text_buffer_get_insert(buffer);
8476         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8477         if (gtk_text_iter_backward_cursor_position(&ins))
8478                 gtk_text_buffer_place_cursor(buffer, &ins);
8479 }
8480
8481 static void textview_move_forward_word (GtkTextView *text)
8482 {
8483         GtkTextBuffer *buffer;
8484         GtkTextMark *mark;
8485         GtkTextIter ins;
8486         gint count;
8487
8488         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8489
8490         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8491         mark = gtk_text_buffer_get_insert(buffer);
8492         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8493         count = gtk_text_iter_inside_word (&ins) ? 2 : 1;
8494         if (gtk_text_iter_forward_word_ends(&ins, count)) {
8495                 gtk_text_iter_backward_word_start(&ins);
8496                 gtk_text_buffer_place_cursor(buffer, &ins);
8497         }
8498 }
8499
8500 static void textview_move_backward_word (GtkTextView *text)
8501 {
8502         GtkTextBuffer *buffer;
8503         GtkTextMark *mark;
8504         GtkTextIter ins;
8505         gint count;
8506
8507         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8508
8509         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8510         mark = gtk_text_buffer_get_insert(buffer);
8511         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8512         count = gtk_text_iter_inside_word (&ins) ? 2 : 1;
8513         if (gtk_text_iter_backward_word_starts(&ins, 1))
8514                 gtk_text_buffer_place_cursor(buffer, &ins);
8515 }
8516
8517 static void textview_move_end_of_line (GtkTextView *text)
8518 {
8519         GtkTextBuffer *buffer;
8520         GtkTextMark *mark;
8521         GtkTextIter ins;
8522
8523         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8524
8525         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8526         mark = gtk_text_buffer_get_insert(buffer);
8527         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8528         if (gtk_text_iter_forward_to_line_end(&ins))
8529                 gtk_text_buffer_place_cursor(buffer, &ins);
8530 }
8531
8532 static void textview_move_next_line (GtkTextView *text)
8533 {
8534         GtkTextBuffer *buffer;
8535         GtkTextMark *mark;
8536         GtkTextIter ins;
8537         gint offset;
8538
8539         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8540
8541         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8542         mark = gtk_text_buffer_get_insert(buffer);
8543         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8544         offset = gtk_text_iter_get_line_offset(&ins);
8545         if (gtk_text_iter_forward_line(&ins)) {
8546                 gtk_text_iter_set_line_offset(&ins, offset);
8547                 gtk_text_buffer_place_cursor(buffer, &ins);
8548         }
8549 }
8550
8551 static void textview_move_previous_line (GtkTextView *text)
8552 {
8553         GtkTextBuffer *buffer;
8554         GtkTextMark *mark;
8555         GtkTextIter ins;
8556         gint offset;
8557
8558         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8559
8560         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8561         mark = gtk_text_buffer_get_insert(buffer);
8562         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8563         offset = gtk_text_iter_get_line_offset(&ins);
8564         if (gtk_text_iter_backward_line(&ins)) {
8565                 gtk_text_iter_set_line_offset(&ins, offset);
8566                 gtk_text_buffer_place_cursor(buffer, &ins);
8567         }
8568 }
8569
8570 static void textview_delete_forward_character (GtkTextView *text)
8571 {
8572         GtkTextBuffer *buffer;
8573         GtkTextMark *mark;
8574         GtkTextIter ins, end_iter;
8575
8576         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8577
8578         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8579         mark = gtk_text_buffer_get_insert(buffer);
8580         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8581         end_iter = ins;
8582         if (gtk_text_iter_forward_char(&end_iter)) {
8583                 gtk_text_buffer_delete(buffer, &ins, &end_iter);
8584         }
8585 }
8586
8587 static void textview_delete_backward_character (GtkTextView *text)
8588 {
8589         GtkTextBuffer *buffer;
8590         GtkTextMark *mark;
8591         GtkTextIter ins, end_iter;
8592
8593         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8594
8595         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8596         mark = gtk_text_buffer_get_insert(buffer);
8597         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8598         end_iter = ins;
8599         if (gtk_text_iter_backward_char(&end_iter)) {
8600                 gtk_text_buffer_delete(buffer, &end_iter, &ins);
8601         }
8602 }
8603
8604 static void textview_delete_forward_word (GtkTextView *text)
8605 {
8606         GtkTextBuffer *buffer;
8607         GtkTextMark *mark;
8608         GtkTextIter ins, end_iter;
8609
8610         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8611
8612         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8613         mark = gtk_text_buffer_get_insert(buffer);
8614         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8615         end_iter = ins;
8616         if (gtk_text_iter_forward_word_end(&end_iter)) {
8617                 gtk_text_buffer_delete(buffer, &ins, &end_iter);
8618         }
8619 }
8620
8621 static void textview_delete_backward_word (GtkTextView *text)
8622 {
8623         GtkTextBuffer *buffer;
8624         GtkTextMark *mark;
8625         GtkTextIter ins, end_iter;
8626
8627         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8628
8629         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8630         mark = gtk_text_buffer_get_insert(buffer);
8631         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8632         end_iter = ins;
8633         if (gtk_text_iter_backward_word_start(&end_iter)) {
8634                 gtk_text_buffer_delete(buffer, &end_iter, &ins);
8635         }
8636 }
8637
8638 static void textview_delete_line (GtkTextView *text)
8639 {
8640         GtkTextBuffer *buffer;
8641         GtkTextMark *mark;
8642         GtkTextIter ins, start_iter, end_iter;
8643         gboolean found;
8644
8645         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8646
8647         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8648         mark = gtk_text_buffer_get_insert(buffer);
8649         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8650
8651         start_iter = ins;
8652         gtk_text_iter_set_line_offset(&start_iter, 0);
8653
8654         end_iter = ins;
8655         if (gtk_text_iter_ends_line(&end_iter))
8656                 found = gtk_text_iter_forward_char(&end_iter);
8657         else
8658                 found = gtk_text_iter_forward_to_line_end(&end_iter);
8659
8660         if (found)
8661                 gtk_text_buffer_delete(buffer, &start_iter, &end_iter);
8662 }
8663
8664 static void textview_delete_to_line_end (GtkTextView *text)
8665 {
8666         GtkTextBuffer *buffer;
8667         GtkTextMark *mark;
8668         GtkTextIter ins, end_iter;
8669         gboolean found;
8670
8671         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8672
8673         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8674         mark = gtk_text_buffer_get_insert(buffer);
8675         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8676         end_iter = ins;
8677         if (gtk_text_iter_ends_line(&end_iter))
8678                 found = gtk_text_iter_forward_char(&end_iter);
8679         else
8680                 found = gtk_text_iter_forward_to_line_end(&end_iter);
8681         if (found)
8682                 gtk_text_buffer_delete(buffer, &ins, &end_iter);
8683 }
8684
8685 static void compose_advanced_action_cb(Compose *compose,
8686                                         ComposeCallAdvancedAction action)
8687 {
8688         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
8689         static struct {
8690                 void (*do_action) (GtkTextView *text);
8691         } action_table[] = {
8692                 {textview_move_beginning_of_line},
8693                 {textview_move_forward_character},
8694                 {textview_move_backward_character},
8695                 {textview_move_forward_word},
8696                 {textview_move_backward_word},
8697                 {textview_move_end_of_line},
8698                 {textview_move_next_line},
8699                 {textview_move_previous_line},
8700                 {textview_delete_forward_character},
8701                 {textview_delete_backward_character},
8702                 {textview_delete_forward_word},
8703                 {textview_delete_backward_word},
8704                 {textview_delete_line},
8705                 {NULL}, /* gtk_stext_delete_line_n */
8706                 {textview_delete_to_line_end}
8707         };
8708
8709         if (!GTK_WIDGET_HAS_FOCUS(text)) return;
8710
8711         if (action >= COMPOSE_CALL_ADVANCED_ACTION_MOVE_BEGINNING_OF_LINE &&
8712             action <= COMPOSE_CALL_ADVANCED_ACTION_DELETE_TO_LINE_END) {
8713                 if (action_table[action].do_action)
8714                         action_table[action].do_action(text);
8715                 else
8716                         g_warning("Not implemented yet.");
8717         }
8718 }
8719
8720 static void compose_grab_focus_cb(GtkWidget *widget, Compose *compose)
8721 {
8722         gchar *str = NULL;
8723         
8724         if (GTK_IS_EDITABLE(widget)) {
8725                 str = gtk_editable_get_chars(GTK_EDITABLE(widget), 0, -1);
8726                 gtk_editable_set_position(GTK_EDITABLE(widget), 
8727                         strlen(str));
8728                 g_free(str);
8729                 if (widget->parent && widget->parent->parent
8730                  && widget->parent->parent->parent) {
8731                         if (GTK_IS_SCROLLED_WINDOW(widget->parent->parent->parent)) {
8732                                 gint y = widget->allocation.y;
8733                                 gint height = widget->allocation.height;
8734                                 GtkAdjustment *shown = gtk_scrolled_window_get_vadjustment
8735                                         (GTK_SCROLLED_WINDOW(widget->parent->parent->parent));
8736
8737                                 if (y < (int)shown->value) {
8738                                         gtk_adjustment_set_value(GTK_ADJUSTMENT(shown), y - 1);
8739                                 }
8740                                 if (y + height > (int)shown->value + (int)shown->page_size) {
8741                                         if (y - height - 1 < (int)shown->upper - (int)shown->page_size) {
8742                                                 gtk_adjustment_set_value(GTK_ADJUSTMENT(shown), 
8743                                                         y + height - (int)shown->page_size - 1);
8744                                         } else {
8745                                                 gtk_adjustment_set_value(GTK_ADJUSTMENT(shown), 
8746                                                         (int)shown->upper - (int)shown->page_size - 1);
8747                                         }
8748                                 }
8749                         }
8750                 }
8751         }
8752
8753         if (GTK_IS_EDITABLE(widget) || GTK_IS_TEXT_VIEW(widget))
8754                 compose->focused_editable = widget;
8755 }
8756
8757 static void compose_changed_cb(GtkTextBuffer *textbuf, Compose *compose)
8758 {
8759         compose->modified = TRUE;
8760         compose_set_title(compose);
8761 }
8762
8763 static void compose_wrap_cb(gpointer data, guint action, GtkWidget *widget)
8764 {
8765         Compose *compose = (Compose *)data;
8766
8767         if (action == 1)
8768                 compose_wrap_all_full(compose, TRUE);
8769         else
8770                 compose_beautify_paragraph(compose, NULL, TRUE);
8771 }
8772
8773 static void compose_find_cb(gpointer data, guint action, GtkWidget *widget)
8774 {
8775         Compose *compose = (Compose *)data;
8776
8777         message_search_compose(compose);
8778 }
8779
8780 static void compose_toggle_autowrap_cb(gpointer data, guint action,
8781                                        GtkWidget *widget)
8782 {
8783         Compose *compose = (Compose *)data;
8784         compose->autowrap = GTK_CHECK_MENU_ITEM(widget)->active;
8785         if (compose->autowrap)
8786                 compose_wrap_all_full(compose, TRUE);
8787         compose->autowrap = GTK_CHECK_MENU_ITEM(widget)->active;
8788 }
8789
8790 static void compose_toggle_sign_cb(gpointer data, guint action,
8791                                    GtkWidget *widget)
8792 {
8793         Compose *compose = (Compose *)data;
8794
8795         if (GTK_CHECK_MENU_ITEM(widget)->active)
8796                 compose->use_signing = TRUE;
8797         else
8798                 compose->use_signing = FALSE;
8799 }
8800
8801 static void compose_toggle_encrypt_cb(gpointer data, guint action,
8802                                       GtkWidget *widget)
8803 {
8804         Compose *compose = (Compose *)data;
8805
8806         if (GTK_CHECK_MENU_ITEM(widget)->active)
8807                 compose->use_encryption = TRUE;
8808         else
8809                 compose->use_encryption = FALSE;
8810 }
8811
8812 static void activate_privacy_system(Compose *compose, PrefsAccount *account, gboolean warn) 
8813 {
8814         g_free(compose->privacy_system);
8815
8816         compose->privacy_system = g_strdup(account->default_privacy_system);
8817         compose_update_privacy_system_menu_item(compose, warn);
8818 }
8819
8820 static void compose_toggle_ruler_cb(gpointer data, guint action,
8821                                     GtkWidget *widget)
8822 {
8823         Compose *compose = (Compose *)data;
8824
8825         if (GTK_CHECK_MENU_ITEM(widget)->active) {
8826                 gtk_widget_show(compose->ruler_hbox);
8827                 prefs_common.show_ruler = TRUE;
8828         } else {
8829                 gtk_widget_hide(compose->ruler_hbox);
8830                 gtk_widget_queue_resize(compose->edit_vbox);
8831                 prefs_common.show_ruler = FALSE;
8832         }
8833 }
8834
8835 static void compose_attach_drag_received_cb (GtkWidget          *widget,
8836                                              GdkDragContext     *context,
8837                                              gint                x,
8838                                              gint                y,
8839                                              GtkSelectionData   *data,
8840                                              guint               info,
8841                                              guint               time,
8842                                              gpointer            user_data)
8843 {
8844         Compose *compose = (Compose *)user_data;
8845         GList *list, *tmp;
8846
8847         if (gdk_atom_name(data->type) && 
8848             !strcmp(gdk_atom_name(data->type), "text/uri-list")
8849             && gtk_drag_get_source_widget(context) != 
8850                 summary_get_main_widget(mainwindow_get_mainwindow()->summaryview)) {
8851                 list = uri_list_extract_filenames((const gchar *)data->data);
8852                 for (tmp = list; tmp != NULL; tmp = tmp->next)
8853                         compose_attach_append
8854                                 (compose, (const gchar *)tmp->data,
8855                                  (const gchar *)tmp->data, NULL);
8856                 if (list) compose_changed_cb(NULL, compose);
8857                 list_free_strings(list);
8858                 g_list_free(list);
8859         } else if (gtk_drag_get_source_widget(context) 
8860                    == summary_get_main_widget(mainwindow_get_mainwindow()->summaryview)) {
8861                 /* comes from our summaryview */
8862                 SummaryView * summaryview = NULL;
8863                 GSList * list = NULL, *cur = NULL;
8864                 
8865                 if (mainwindow_get_mainwindow())
8866                         summaryview = mainwindow_get_mainwindow()->summaryview;
8867                 
8868                 if (summaryview)
8869                         list = summary_get_selected_msg_list(summaryview);
8870                 
8871                 for (cur = list; cur; cur = cur->next) {
8872                         MsgInfo *msginfo = (MsgInfo *)cur->data;
8873                         gchar *file = NULL;
8874                         if (msginfo)
8875                                 file = procmsg_get_message_file_full(msginfo, 
8876                                         TRUE, TRUE);
8877                         if (file) {
8878                                 compose_attach_append(compose, (const gchar *)file, 
8879                                         (const gchar *)file, "message/rfc822");
8880                                 g_free(file);
8881                         }
8882                 }
8883                 g_slist_free(list);
8884         }
8885 }
8886
8887 static gboolean compose_drag_drop(GtkWidget *widget,
8888                                   GdkDragContext *drag_context,
8889                                   gint x, gint y,
8890                                   guint time, gpointer user_data)
8891 {
8892         /* not handling this signal makes compose_insert_drag_received_cb
8893          * called twice */
8894         return TRUE;                                     
8895 }
8896
8897 static void compose_insert_drag_received_cb (GtkWidget          *widget,
8898                                              GdkDragContext     *drag_context,
8899                                              gint                x,
8900                                              gint                y,
8901                                              GtkSelectionData   *data,
8902                                              guint               info,
8903                                              guint               time,
8904                                              gpointer            user_data)
8905 {
8906         Compose *compose = (Compose *)user_data;
8907         GList *list, *tmp;
8908
8909         /* strangely, testing data->type == gdk_atom_intern("text/uri-list", TRUE)
8910          * does not work */
8911         if (gdk_atom_name(data->type) && !strcmp(gdk_atom_name(data->type), "text/uri-list")) {
8912                 AlertValue val = G_ALERTDEFAULT;
8913
8914                 switch (prefs_common.compose_dnd_mode) {
8915                         case COMPOSE_DND_ASK:
8916                                 val = alertpanel_full(_("Insert or attach?"),
8917                                          _("Do you want to insert the contents of the file(s) "
8918                                            "into the message body, or attach it to the email?"),
8919                                           GTK_STOCK_CANCEL, _("+_Insert"), _("_Attach"),
8920                                           TRUE, NULL, ALERT_QUESTION, G_ALERTALTERNATE);
8921                                 break;
8922                         case COMPOSE_DND_INSERT:
8923                                 val = G_ALERTALTERNATE;
8924                                 break;
8925                         case COMPOSE_DND_ATTACH:
8926                                 val = G_ALERTOTHER;
8927                                 break;
8928                         default:
8929                                 /* unexpected case */
8930                                 g_warning("error: unexpected compose_dnd_mode option value in compose_insert_drag_received_cb()");
8931                 }
8932
8933                 if (val & G_ALERTDISABLE) {
8934                         val &= ~G_ALERTDISABLE;
8935                         /* remember what action to perform by default, only if we don't click Cancel */
8936                         if (val == G_ALERTALTERNATE)
8937                                 prefs_common.compose_dnd_mode = COMPOSE_DND_INSERT;
8938                         else if (val == G_ALERTOTHER)
8939                                         prefs_common.compose_dnd_mode = COMPOSE_DND_ATTACH;
8940                 }
8941
8942                 if (val == G_ALERTDEFAULT || val == G_ALERTCANCEL) {
8943                         gtk_drag_finish(drag_context, FALSE, FALSE, time);
8944                         return;
8945                 } else if (val == G_ALERTOTHER) {
8946                         compose_attach_drag_received_cb(widget, drag_context, x, y, data, info, time, user_data);
8947                         return;
8948                 } 
8949                 list = uri_list_extract_filenames((const gchar *)data->data);
8950                 for (tmp = list; tmp != NULL; tmp = tmp->next) {
8951                         compose_insert_file(compose, (const gchar *)tmp->data);
8952                 }
8953                 list_free_strings(list);
8954                 g_list_free(list);
8955                 gtk_drag_finish(drag_context, TRUE, FALSE, time);
8956                 return;
8957         } else {
8958 #if GTK_CHECK_VERSION(2, 8, 0)
8959                 /* do nothing, handled by GTK */
8960 #else
8961                 gchar *tmpfile = get_tmp_file();
8962                 str_write_to_file((const gchar *)data->data, tmpfile);
8963                 compose_insert_file(compose, tmpfile);
8964                 g_unlink(tmpfile);
8965                 g_free(tmpfile);
8966                 gtk_drag_finish(drag_context, TRUE, FALSE, time);
8967 #endif
8968                 return;
8969         }
8970         gtk_drag_finish(drag_context, TRUE, FALSE, time);
8971 }
8972
8973 static void compose_header_drag_received_cb (GtkWidget          *widget,
8974                                              GdkDragContext     *drag_context,
8975                                              gint                x,
8976                                              gint                y,
8977                                              GtkSelectionData   *data,
8978                                              guint               info,
8979                                              guint               time,
8980                                              gpointer            user_data)
8981 {
8982         GtkEditable *entry = (GtkEditable *)user_data;
8983         gchar *email = (gchar *)data->data;
8984
8985         /* strangely, testing data->type == gdk_atom_intern("text/plain", TRUE)
8986          * does not work */
8987
8988         if (!strncmp(email, "mailto:", strlen("mailto:"))) {
8989                 gchar *decoded=g_new(gchar, strlen(email));
8990                 int start = 0;
8991
8992                 email += strlen("mailto:");
8993                 decode_uri(decoded, email); /* will fit */
8994                 gtk_editable_delete_text(entry, 0, -1);
8995                 gtk_editable_insert_text(entry, decoded, strlen(decoded), &start);
8996                 gtk_drag_finish(drag_context, TRUE, FALSE, time);
8997                 g_free(decoded);
8998                 return;
8999         }
9000         gtk_drag_finish(drag_context, TRUE, FALSE, time);
9001 }
9002
9003 static void compose_toggle_return_receipt_cb(gpointer data, guint action,
9004                                              GtkWidget *widget)
9005 {
9006         Compose *compose = (Compose *)data;
9007
9008         if (GTK_CHECK_MENU_ITEM(widget)->active)
9009                 compose->return_receipt = TRUE;
9010         else
9011                 compose->return_receipt = FALSE;
9012 }
9013
9014 static void compose_toggle_remove_refs_cb(gpointer data, guint action,
9015                                              GtkWidget *widget)
9016 {
9017         Compose *compose = (Compose *)data;
9018
9019         if (GTK_CHECK_MENU_ITEM(widget)->active)
9020                 compose->remove_references = TRUE;
9021         else
9022                 compose->remove_references = FALSE;
9023 }
9024
9025 gboolean compose_headerentry_key_press_event_cb(GtkWidget *entry,
9026                                             GdkEventKey *event,
9027                                             ComposeHeaderEntry *headerentry)
9028 {
9029         if ((g_slist_length(headerentry->compose->header_list) > 0) &&
9030             ((headerentry->headernum + 1) != headerentry->compose->header_nextrow) &&
9031             !(event->state & GDK_MODIFIER_MASK) &&
9032             (event->keyval == GDK_BackSpace) &&
9033             (strlen(gtk_entry_get_text(GTK_ENTRY(entry))) == 0)) {
9034                 gtk_container_remove
9035                         (GTK_CONTAINER(headerentry->compose->header_table),
9036                          headerentry->combo);
9037                 gtk_container_remove
9038                         (GTK_CONTAINER(headerentry->compose->header_table),
9039                          headerentry->entry);
9040                 headerentry->compose->header_list =
9041                         g_slist_remove(headerentry->compose->header_list,
9042                                        headerentry);
9043                 g_free(headerentry);
9044         } else  if (event->keyval == GDK_Tab) {
9045                 if (headerentry->compose->header_last == headerentry) {
9046                         /* Override default next focus, and give it to subject_entry
9047                          * instead of notebook tabs
9048                          */
9049                         g_signal_stop_emission_by_name(G_OBJECT(entry), "key-press-event"); 
9050                         gtk_widget_grab_focus(headerentry->compose->subject_entry);
9051                         return TRUE;
9052                 }
9053         }
9054         return FALSE;
9055 }
9056
9057 gboolean compose_headerentry_changed_cb(GtkWidget *entry,
9058                                     ComposeHeaderEntry *headerentry)
9059 {
9060         if (strlen(gtk_entry_get_text(GTK_ENTRY(entry))) != 0) {
9061                 headerentry->compose->header_list =
9062                         g_slist_append(headerentry->compose->header_list,
9063                                        headerentry);
9064                 
9065                 compose_create_header_entry(headerentry->compose);
9066                 g_signal_handlers_disconnect_matched
9067                         (G_OBJECT(entry), G_SIGNAL_MATCH_DATA,
9068                          0, 0, NULL, NULL, headerentry);
9069                 
9070                 /* Automatically scroll down */
9071                 compose_show_first_last_header(headerentry->compose, FALSE);
9072                 
9073         }
9074         return FALSE;
9075 }
9076
9077 static void compose_show_first_last_header(Compose *compose, gboolean show_first)
9078 {
9079         GtkAdjustment *vadj;
9080
9081         g_return_if_fail(compose);
9082         g_return_if_fail(GTK_IS_WIDGET(compose->header_table));
9083         g_return_if_fail(GTK_IS_VIEWPORT(compose->header_table->parent));
9084
9085         vadj = gtk_viewport_get_vadjustment(GTK_VIEWPORT(compose->header_table->parent));
9086         gtk_adjustment_set_value(vadj, (show_first ? vadj->lower : vadj->upper));
9087 }
9088
9089 static void text_inserted(GtkTextBuffer *buffer, GtkTextIter *iter,
9090                           const gchar *text, gint len, Compose *compose)
9091 {
9092         gint paste_as_quotation = GPOINTER_TO_INT(g_object_get_data
9093                                 (G_OBJECT(compose->text), "paste_as_quotation"));
9094         GtkTextMark *mark;
9095
9096         g_return_if_fail(text != NULL);
9097
9098         g_signal_handlers_block_by_func(G_OBJECT(buffer),
9099                                         G_CALLBACK(text_inserted),
9100                                         compose);
9101         if (paste_as_quotation) {
9102                 gchar *new_text;
9103                 gchar *qmark;
9104
9105                 if (len < 0)
9106                         len = strlen(text);
9107
9108                 new_text = g_strndup(text, len);
9109                 if (prefs_common.quotemark && *prefs_common.quotemark)
9110                         qmark = prefs_common.quotemark;
9111                 else
9112                         qmark = "> ";
9113
9114                 mark = gtk_text_buffer_create_mark(buffer, NULL, iter, FALSE);
9115                 gtk_text_buffer_place_cursor(buffer, iter);
9116
9117                 compose_quote_fmt(compose, NULL, "%Q", qmark, new_text, TRUE, FALSE,
9118                                                   _("Quote format error."));
9119                 quote_fmt_reset_vartable();
9120                 g_free(new_text);
9121                 g_object_set_data(G_OBJECT(compose->text), "paste_as_quotation",
9122                                   GINT_TO_POINTER(paste_as_quotation - 1));
9123                                   
9124                 gtk_text_buffer_get_iter_at_mark(buffer, iter, mark);
9125                 gtk_text_buffer_place_cursor(buffer, iter);
9126         } else {
9127                 if (strcmp(text, "\n") || automatic_break
9128                 || gtk_text_iter_starts_line(iter))
9129                         gtk_text_buffer_insert(buffer, iter, text, len);
9130                 else {
9131                         debug_print("insert nowrap \\n\n");
9132                         gtk_text_buffer_insert_with_tags_by_name(buffer, 
9133                                 iter, text, len, "no_join", NULL);
9134                 }
9135         }
9136         
9137         mark = gtk_text_buffer_create_mark(buffer, NULL, iter, FALSE);
9138         
9139         compose_beautify_paragraph(compose, iter, FALSE);
9140
9141         gtk_text_buffer_get_iter_at_mark(buffer, iter, mark);
9142         gtk_text_buffer_delete_mark(buffer, mark);
9143
9144         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),
9145                                           G_CALLBACK(text_inserted),
9146                                           compose);
9147         g_signal_stop_emission_by_name(G_OBJECT(buffer), "insert-text");
9148
9149         if (prefs_common.autosave && 
9150             gtk_text_buffer_get_char_count(buffer) % prefs_common.autosave_length == 0)
9151                 compose->draft_timeout_tag = g_timeout_add
9152                         (500, (GtkFunction) compose_defer_auto_save_draft, compose);
9153 }
9154 static gint compose_defer_auto_save_draft(Compose *compose)
9155 {
9156         compose->draft_timeout_tag = -1;
9157         compose_draft_cb((gpointer)compose, COMPOSE_AUTO_SAVE, NULL);
9158         return FALSE;
9159 }
9160
9161 #if USE_ASPELL
9162 static void compose_check_all(Compose *compose)
9163 {
9164         if (compose->gtkaspell)
9165                 gtkaspell_check_all(compose->gtkaspell);
9166 }
9167
9168 static void compose_highlight_all(Compose *compose)
9169 {
9170         if (compose->gtkaspell)
9171                 gtkaspell_highlight_all(compose->gtkaspell);
9172 }
9173
9174 static void compose_check_backwards(Compose *compose)
9175 {
9176         if (compose->gtkaspell) 
9177                 gtkaspell_check_backwards(compose->gtkaspell);
9178         else {
9179                 GtkItemFactory *ifactory;
9180                 ifactory = gtk_item_factory_from_widget(compose->popupmenu);
9181                 menu_set_sensitive(ifactory, "/Edit/Check backwards misspelled word", FALSE);
9182                 menu_set_sensitive(ifactory, "/Edit/Forward to next misspelled word", FALSE);
9183         }
9184 }
9185
9186 static void compose_check_forwards_go(Compose *compose)
9187 {
9188         if (compose->gtkaspell) 
9189                 gtkaspell_check_forwards_go(compose->gtkaspell);
9190         else {
9191                 GtkItemFactory *ifactory;
9192                 ifactory = gtk_item_factory_from_widget(compose->popupmenu);
9193                 menu_set_sensitive(ifactory, "/Edit/Check backwards misspelled word", FALSE);
9194                 menu_set_sensitive(ifactory, "/Edit/Forward to next misspelled word", FALSE);
9195         }
9196 }
9197 #endif
9198
9199 /*!
9200  *\brief        Guess originating forward account from MsgInfo and several 
9201  *              "common preference" settings. Return NULL if no guess. 
9202  */
9203 static PrefsAccount *compose_guess_forward_account_from_msginfo(MsgInfo *msginfo)
9204 {
9205         PrefsAccount *account = NULL;
9206         
9207         g_return_val_if_fail(msginfo, NULL);
9208         g_return_val_if_fail(msginfo->folder, NULL);
9209         g_return_val_if_fail(msginfo->folder->prefs, NULL);
9210
9211         if (msginfo->folder->prefs->enable_default_account)
9212                 account = account_find_from_id(msginfo->folder->prefs->default_account);
9213                 
9214         if (!account) 
9215                 account = msginfo->folder->folder->account;
9216                 
9217         if (!account && msginfo->to && prefs_common.forward_account_autosel) {
9218                 gchar *to;
9219                 Xstrdup_a(to, msginfo->to, return NULL);
9220                 extract_address(to);
9221                 account = account_find_from_address(to);
9222         }
9223
9224         if (!account && prefs_common.forward_account_autosel) {
9225                 gchar cc[BUFFSIZE];
9226                 if (!procheader_get_header_from_msginfo
9227                         (msginfo, cc,sizeof cc , "Cc:")) { 
9228                         gchar *buf = cc + strlen("Cc:");
9229                         extract_address(buf);
9230                         account = account_find_from_address(buf);
9231                 }
9232         }
9233         
9234         if (!account && prefs_common.forward_account_autosel) {
9235                 gchar deliveredto[BUFFSIZE];
9236                 if (!procheader_get_header_from_msginfo
9237                         (msginfo, deliveredto,sizeof deliveredto , "Delivered-To:")) { 
9238                         gchar *buf = deliveredto + strlen("Delivered-To:");
9239                         extract_address(buf);
9240                         account = account_find_from_address(buf);
9241                 }
9242         }
9243         
9244         return account;
9245 }
9246
9247 gboolean compose_close(Compose *compose)
9248 {
9249         gint x, y;
9250
9251         if (!g_mutex_trylock(compose->mutex)) {
9252                 /* we have to wait for the (possibly deferred by auto-save)
9253                  * drafting to be done, before destroying the compose under
9254                  * it. */
9255                 debug_print("waiting for drafting to finish...\n");
9256                 g_timeout_add (500, (GSourceFunc) compose_close, compose);
9257                 return FALSE;
9258         }
9259         g_return_val_if_fail(compose, FALSE);
9260         gtkut_widget_get_uposition(compose->window, &x, &y);
9261         prefs_common.compose_x = x;
9262         prefs_common.compose_y = y;
9263         g_mutex_unlock(compose->mutex);
9264         compose_destroy(compose);
9265         return FALSE;
9266 }
9267
9268 /**
9269  * Add entry field for each address in list.
9270  * \param compose     E-Mail composition object.
9271  * \param listAddress List of (formatted) E-Mail addresses.
9272  */
9273 static void compose_add_field_list( Compose *compose, GList *listAddress ) {
9274         GList *node;
9275         gchar *addr;
9276         node = listAddress;
9277         while( node ) {
9278                 addr = ( gchar * ) node->data;
9279                 compose_entry_append( compose, addr, COMPOSE_TO );
9280                 node = g_list_next( node );
9281         }
9282 }
9283
9284 static void compose_reply_from_messageview_real(MessageView *msgview, GSList *msginfo_list, 
9285                                     guint action, gboolean opening_multiple)
9286 {
9287         gchar *body = NULL;
9288         GSList *new_msglist = NULL;
9289         MsgInfo *tmp_msginfo = NULL;
9290         gboolean originally_enc = FALSE;
9291         Compose *compose = NULL;
9292
9293         g_return_if_fail(msgview != NULL);
9294
9295         g_return_if_fail(msginfo_list != NULL);
9296
9297         if (g_slist_length(msginfo_list) == 1 && !opening_multiple) {
9298                 MimeInfo *mimeinfo = messageview_get_selected_mime_part(msgview);
9299                 MsgInfo *orig_msginfo = (MsgInfo *)msginfo_list->data;
9300
9301                 if (mimeinfo != NULL && mimeinfo->type == MIMETYPE_MESSAGE && 
9302                     !g_ascii_strcasecmp(mimeinfo->subtype, "rfc822")) {
9303                         tmp_msginfo = procmsg_msginfo_new_from_mimeinfo(
9304                                                 orig_msginfo, mimeinfo);
9305                         if (tmp_msginfo != NULL) {
9306                                 new_msglist = g_slist_append(NULL, tmp_msginfo);
9307                                 if (procmime_msginfo_is_encrypted(orig_msginfo)) {
9308                                         originally_enc = TRUE;
9309                                 }
9310                         } 
9311                 }
9312         }
9313
9314         if (!opening_multiple)
9315                 body = messageview_get_selection(msgview);
9316
9317         if (new_msglist) {
9318                 compose = compose_reply_mode((ComposeMode)action, new_msglist, body);
9319                 procmsg_msginfo_free(tmp_msginfo);
9320                 g_slist_free(new_msglist);
9321         } else
9322                 compose = compose_reply_mode((ComposeMode)action, msginfo_list, body);
9323
9324         if (originally_enc) {
9325                 compose_force_encryption(compose, compose->account, FALSE);
9326         }
9327
9328         g_free(body);
9329 }
9330
9331 void compose_reply_from_messageview(MessageView *msgview, GSList *msginfo_list, 
9332                                     guint action)
9333 {
9334         if ((!prefs_common.forward_as_attachment || action != COMPOSE_FORWARD) 
9335         &&  action != COMPOSE_FORWARD_AS_ATTACH && g_slist_length(msginfo_list) > 1) {
9336                 GSList *cur = msginfo_list;
9337                 gchar *msg = g_strdup_printf(_("You are about to reply to %d "
9338                                                "messages. Opening the windows "
9339                                                "could take some time. Do you "
9340                                                "want to continue?"), 
9341                                                g_slist_length(msginfo_list));
9342                 if (g_slist_length(msginfo_list) > 9
9343                 &&  alertpanel(_("Warning"), msg, GTK_STOCK_CANCEL, "+" GTK_STOCK_YES, NULL)
9344                     != G_ALERTALTERNATE) {
9345                         g_free(msg);
9346                         return;
9347                 }
9348                 g_free(msg);
9349                 /* We'll open multiple compose windows */
9350                 /* let the WM place the next windows */
9351                 compose_force_window_origin = FALSE;
9352                 for (; cur; cur = cur->next) {
9353                         GSList tmplist;
9354                         tmplist.data = cur->data;
9355                         tmplist.next = NULL;
9356                         compose_reply_from_messageview_real(msgview, &tmplist, action, TRUE);
9357                 }
9358                 compose_force_window_origin = TRUE;
9359         } else {
9360                 /* forwarding multiple mails as attachments is done via a
9361                  * single compose window */
9362                 compose_reply_from_messageview_real(msgview, msginfo_list, action, FALSE);
9363         }
9364 }
9365
9366 void compose_set_position(Compose *compose, gint pos)
9367 {
9368         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
9369
9370         gtkut_text_view_set_position(text, pos);
9371 }
9372
9373 gboolean compose_search_string(Compose *compose,
9374                                 const gchar *str, gboolean case_sens)
9375 {
9376         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
9377
9378         return gtkut_text_view_search_string(text, str, case_sens);
9379 }
9380
9381 gboolean compose_search_string_backward(Compose *compose,
9382                                 const gchar *str, gboolean case_sens)
9383 {
9384         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
9385
9386         return gtkut_text_view_search_string_backward(text, str, case_sens);
9387 }
9388
9389 /* allocate a msginfo structure and populate its data from a compose data structure */
9390 static MsgInfo *compose_msginfo_new_from_compose(Compose *compose)
9391 {
9392         MsgInfo *newmsginfo;
9393         GSList *list;
9394         gchar buf[BUFFSIZE];
9395
9396         g_return_val_if_fail( compose != NULL, NULL );
9397
9398         newmsginfo = procmsg_msginfo_new();
9399
9400         /* date is now */
9401         get_rfc822_date(buf, sizeof(buf));
9402         newmsginfo->date = g_strdup(buf);
9403
9404         /* from */
9405         if (compose->from_name) {
9406                 newmsginfo->from = gtk_editable_get_chars(GTK_EDITABLE(compose->from_name), 0, -1);
9407                 newmsginfo->fromname = procheader_get_fromname(newmsginfo->from);
9408         }
9409
9410         /* subject */
9411         if (compose->subject_entry)
9412                 newmsginfo->subject = gtk_editable_get_chars(GTK_EDITABLE(compose->subject_entry), 0, -1);
9413
9414         /* to, cc, reply-to, newsgroups */
9415         for (list = compose->header_list; list; list = list->next) {
9416                 gchar *header = gtk_editable_get_chars(
9417                                                                 GTK_EDITABLE(
9418                                                                 GTK_COMBO(((ComposeHeaderEntry *)list->data)->combo)->entry), 0, -1);
9419                 gchar *entry = gtk_editable_get_chars(
9420                                                                 GTK_EDITABLE(((ComposeHeaderEntry *)list->data)->entry), 0, -1);
9421
9422                 if ( strcasecmp(header, (prefs_common.trans_hdr ? gettext("To:") : "To:")) == 0 ) {
9423                         if ( newmsginfo->to == NULL ) {
9424                                 newmsginfo->to = g_strdup(entry);
9425                         } else {
9426                                 gchar *tmp = g_strconcat(newmsginfo->to, ", ", entry, NULL);
9427                                 g_free(newmsginfo->to);
9428                                 newmsginfo->to = tmp;
9429                         }
9430                 } else
9431                 if ( strcasecmp(header, (prefs_common.trans_hdr ? gettext("Cc:") : "Cc:")) == 0 ) {
9432                         if ( newmsginfo->cc == NULL ) {
9433                                 newmsginfo->cc = g_strdup(entry);
9434                         } else {
9435                                 gchar *tmp = g_strconcat(newmsginfo->cc, ", ", entry, NULL);
9436                                 g_free(newmsginfo->cc);
9437                                 newmsginfo->cc = tmp;
9438                         }
9439                 } else
9440                 if ( strcasecmp(header,
9441                                                 (prefs_common.trans_hdr ? gettext("Newsgroups:") : "Newsgroups:")) == 0 ) {
9442                         if ( newmsginfo->newsgroups == NULL ) {
9443                                 newmsginfo->newsgroups = g_strdup(entry);
9444                         } else {
9445                                 gchar *tmp = g_strconcat(newmsginfo->newsgroups, ", ", entry, NULL);
9446                                 g_free(newmsginfo->newsgroups);
9447                                 newmsginfo->newsgroups = tmp;
9448                         }
9449                 }
9450
9451                 g_free(header);
9452                 g_free(entry);  
9453         }
9454
9455         /* other data is unset */
9456
9457         return newmsginfo;
9458 }
9459
9460 /*
9461  * End of Source.
9462  */