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