2007-04-23 [colin] 2.9.1cvs15
[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_translated_header_name(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_translated_header_name(*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_translated_header_name(*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_translated_header_name("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_translated_header_name("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_translated_header_name("Cc:");
4481         to_hdr = prefs_common_translated_header_name("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_translated_header_name(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_translated_header_name(*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_translated_header_name(*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_translated_header_name("Newsgroups:");
5748                                 break;
5749                         default:
5750                                 header = prefs_common_translated_header_name("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         if (!compose->first_combo)
5803                 compose->first_combo = combo;
5804         if (!compose->first_entry)
5805                 compose->first_entry = entry;
5806                 
5807 }
5808
5809 static void compose_add_header_entry(Compose *compose, gchar *header, gchar *text) 
5810 {
5811         ComposeHeaderEntry *last_header;
5812         
5813         last_header = compose->header_last;
5814         
5815         gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(last_header->combo)->entry), header);
5816         gtk_entry_set_text(GTK_ENTRY(last_header->entry), text);
5817 }
5818
5819 static void compose_remove_header_entries(Compose *compose) 
5820 {
5821         GSList *list;
5822         for (list = compose->header_list; list; list = list->next) {
5823                 ComposeHeaderEntry *headerentry = 
5824                         (ComposeHeaderEntry *)list->data;
5825                 if (headerentry->combo == compose->first_combo)
5826                         compose->first_combo = NULL;
5827                 if (headerentry->entry == compose->first_entry)
5828                         compose->first_entry = NULL;
5829                 gtk_widget_destroy(headerentry->combo);
5830                 gtk_widget_destroy(headerentry->entry);
5831                 g_free(headerentry);
5832         }
5833         if (compose->first_combo)
5834                 gtk_widget_destroy(compose->first_combo);
5835         if (compose->first_entry)
5836                 gtk_widget_destroy(compose->first_entry);
5837         compose->header_last = NULL;
5838         g_slist_free(compose->header_list);
5839         compose->header_list = NULL;
5840         compose->header_nextrow = 1;
5841         compose_create_header_entry(compose);
5842 }
5843
5844 static GtkWidget *compose_create_header(Compose *compose) 
5845 {
5846         GtkWidget *from_optmenu_hbox;
5847         GtkWidget *header_scrolledwin;
5848         GtkWidget *header_table;
5849
5850         gint count = 0;
5851
5852         /* header labels and entries */
5853         header_scrolledwin = gtk_scrolled_window_new(NULL, NULL);
5854         gtk_widget_show(header_scrolledwin);
5855         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(header_scrolledwin), GTK_POLICY_NEVER, GTK_POLICY_AUTOMATIC);
5856
5857         header_table = gtk_table_new(2, 2, FALSE);
5858         gtk_widget_show(header_table);
5859         gtk_container_set_border_width(GTK_CONTAINER(header_table), BORDER_WIDTH);
5860         gtk_scrolled_window_add_with_viewport(GTK_SCROLLED_WINDOW(header_scrolledwin), header_table);
5861         gtk_viewport_set_shadow_type(GTK_VIEWPORT(GTK_BIN(header_scrolledwin)->child), GTK_SHADOW_ETCHED_IN);
5862         count = 0;
5863
5864         /* option menu for selecting accounts */
5865         from_optmenu_hbox = compose_account_option_menu_create(compose);
5866         gtk_table_attach(GTK_TABLE(header_table), from_optmenu_hbox,
5867                                   0, 2, count, count + 1, GTK_EXPAND | GTK_FILL, GTK_SHRINK, 0, 0);
5868         count++;
5869
5870         compose->header_table = header_table;
5871         compose->header_list = NULL;
5872         compose->header_nextrow = count;
5873
5874         compose_create_header_entry(compose);
5875
5876         compose->table            = NULL;
5877
5878         return header_scrolledwin ;
5879 }
5880
5881 static gboolean popup_attach_button_pressed(GtkWidget *widget, gpointer data)
5882 {
5883         Compose *compose = (Compose *)data;
5884         GdkEventButton event;
5885         
5886         event.button = 3;
5887         event.time = gtk_get_current_event_time();
5888
5889         return attach_button_pressed(compose->attach_clist, &event, compose);
5890 }
5891
5892 static GtkWidget *compose_create_attach(Compose *compose)
5893 {
5894         GtkWidget *attach_scrwin;
5895         GtkWidget *attach_clist;
5896
5897         GtkListStore *store;
5898         GtkCellRenderer *renderer;
5899         GtkTreeViewColumn *column;
5900         GtkTreeSelection *selection;
5901
5902         /* attachment list */
5903         attach_scrwin = gtk_scrolled_window_new(NULL, NULL);
5904         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(attach_scrwin),
5905                                        GTK_POLICY_AUTOMATIC,
5906                                        GTK_POLICY_AUTOMATIC);
5907         gtk_widget_set_size_request(attach_scrwin, -1, 80);
5908
5909         store = gtk_list_store_new(N_ATTACH_COLS, 
5910                                    G_TYPE_STRING,
5911                                    G_TYPE_STRING,
5912                                    G_TYPE_STRING,
5913                                    G_TYPE_POINTER,
5914                                    G_TYPE_AUTO_POINTER,
5915                                    -1);
5916         attach_clist = GTK_WIDGET(gtk_tree_view_new_with_model
5917                                         (GTK_TREE_MODEL(store)));
5918         gtk_container_add(GTK_CONTAINER(attach_scrwin), attach_clist);
5919         g_object_unref(store);
5920         
5921         renderer = gtk_cell_renderer_text_new();
5922         column = gtk_tree_view_column_new_with_attributes
5923                         (_("Mime type"), renderer, "text", 
5924                          COL_MIMETYPE, NULL);
5925         gtk_tree_view_append_column(GTK_TREE_VIEW(attach_clist), column);                        
5926         
5927         renderer = gtk_cell_renderer_text_new();
5928         column = gtk_tree_view_column_new_with_attributes
5929                         (_("Size"), renderer, "text", 
5930                          COL_SIZE, NULL);
5931         gtk_tree_view_append_column(GTK_TREE_VIEW(attach_clist), column);                        
5932         
5933         renderer = gtk_cell_renderer_text_new();
5934         column = gtk_tree_view_column_new_with_attributes
5935                         (_("Name"), renderer, "text", 
5936                          COL_NAME, NULL);
5937         gtk_tree_view_append_column(GTK_TREE_VIEW(attach_clist), column);
5938
5939         gtk_tree_view_set_rules_hint(GTK_TREE_VIEW(attach_clist),
5940                                      prefs_common.use_stripes_everywhere);
5941         selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(attach_clist));
5942         gtk_tree_selection_set_mode(selection, GTK_SELECTION_MULTIPLE);
5943
5944         g_signal_connect(G_OBJECT(attach_clist), "row_activated",
5945                          G_CALLBACK(attach_selected), compose);
5946         g_signal_connect(G_OBJECT(attach_clist), "button_press_event",
5947                          G_CALLBACK(attach_button_pressed), compose);
5948 #ifndef MAEMO
5949         g_signal_connect(G_OBJECT(attach_clist), "popup-menu",
5950                          G_CALLBACK(popup_attach_button_pressed), compose);
5951 #else
5952         gtk_widget_tap_and_hold_setup(GTK_WIDGET(attach_clist), NULL, NULL,
5953                         GTK_TAP_AND_HOLD_NONE | GTK_TAP_AND_HOLD_NO_INTERNALS);
5954         g_signal_connect(G_OBJECT(attach_clist), "tap-and-hold",
5955                          G_CALLBACK(popup_attach_button_pressed), compose);
5956 #endif
5957         g_signal_connect(G_OBJECT(attach_clist), "key_press_event",
5958                          G_CALLBACK(attach_key_pressed), compose);
5959
5960         /* drag and drop */
5961         gtk_drag_dest_set(attach_clist,
5962                           GTK_DEST_DEFAULT_ALL, compose_mime_types, 
5963                           sizeof(compose_mime_types)/sizeof(compose_mime_types[0]),
5964                           GDK_ACTION_COPY | GDK_ACTION_MOVE);
5965         g_signal_connect(G_OBJECT(attach_clist), "drag_data_received",
5966                          G_CALLBACK(compose_attach_drag_received_cb),
5967                          compose);
5968         g_signal_connect(G_OBJECT(attach_clist), "drag-drop",
5969                          G_CALLBACK(compose_drag_drop),
5970                          compose);
5971
5972         compose->attach_scrwin = attach_scrwin;
5973         compose->attach_clist  = attach_clist;
5974
5975         return attach_scrwin;
5976 }
5977
5978 static void compose_savemsg_checkbtn_cb(GtkWidget *widget, Compose *compose);
5979 static void compose_savemsg_select_cb(GtkWidget *widget, Compose *compose);
5980
5981 static GtkWidget *compose_create_others(Compose *compose)
5982 {
5983         GtkWidget *table;
5984         GtkWidget *savemsg_checkbtn;
5985         GtkWidget *savemsg_entry;
5986         GtkWidget *savemsg_select;
5987         
5988         guint rowcount = 0;
5989         gchar *folderidentifier;
5990
5991         /* Table for settings */
5992         table = gtk_table_new(3, 1, FALSE);
5993         gtk_container_set_border_width(GTK_CONTAINER(table), BORDER_WIDTH);
5994         gtk_widget_show(table);
5995         gtk_table_set_row_spacings(GTK_TABLE(table), VSPACING_NARROW);
5996         rowcount = 0;
5997
5998         /* Save Message to folder */
5999         savemsg_checkbtn = gtk_check_button_new_with_label(_("Save Message to "));
6000         gtk_widget_show(savemsg_checkbtn);
6001         gtk_table_attach(GTK_TABLE(table), savemsg_checkbtn, 0, 1, rowcount, rowcount + 1, GTK_SHRINK | GTK_FILL, GTK_SHRINK, 0, 0);
6002         if (account_get_special_folder(compose->account, F_OUTBOX)) {
6003                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(savemsg_checkbtn), prefs_common.savemsg);
6004         }
6005         g_signal_connect(G_OBJECT(savemsg_checkbtn), "toggled",
6006                          G_CALLBACK(compose_savemsg_checkbtn_cb), compose);
6007
6008         savemsg_entry = gtk_entry_new();
6009         gtk_widget_show(savemsg_entry);
6010         gtk_table_attach_defaults(GTK_TABLE(table), savemsg_entry, 1, 2, rowcount, rowcount + 1);
6011         gtk_editable_set_editable(GTK_EDITABLE(savemsg_entry), prefs_common.savemsg);
6012         g_signal_connect_after(G_OBJECT(savemsg_entry), "grab_focus",
6013                          G_CALLBACK(compose_grab_focus_cb), compose);
6014         if (account_get_special_folder(compose->account, F_OUTBOX)) {
6015                 folderidentifier = folder_item_get_identifier(account_get_special_folder
6016                                   (compose->account, F_OUTBOX));
6017                 gtk_entry_set_text(GTK_ENTRY(savemsg_entry), folderidentifier);
6018                 g_free(folderidentifier);
6019         }
6020
6021         savemsg_select = gtkut_get_browse_file_btn(_("_Browse"));
6022         gtk_widget_show(savemsg_select);
6023         gtk_table_attach(GTK_TABLE(table), savemsg_select, 2, 3, rowcount, rowcount + 1, GTK_SHRINK | GTK_FILL, GTK_SHRINK, 0, 0);
6024         g_signal_connect(G_OBJECT(savemsg_select), "clicked",
6025                          G_CALLBACK(compose_savemsg_select_cb),
6026                          compose);
6027
6028         rowcount++;
6029
6030         compose->savemsg_checkbtn = savemsg_checkbtn;
6031         compose->savemsg_entry = savemsg_entry;
6032
6033         return table;   
6034 }
6035
6036 static void compose_savemsg_checkbtn_cb(GtkWidget *widget, Compose *compose) 
6037 {
6038         gtk_editable_set_editable(GTK_EDITABLE(compose->savemsg_entry),
6039                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn)));
6040 }
6041
6042 static void compose_savemsg_select_cb(GtkWidget *widget, Compose *compose)
6043 {
6044         FolderItem *dest;
6045         gchar * path;
6046
6047         dest = foldersel_folder_sel(NULL, FOLDER_SEL_COPY, NULL);
6048         if (!dest) return;
6049
6050         path = folder_item_get_identifier(dest);
6051
6052         gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), path);
6053         g_free(path);
6054 }
6055
6056 static void entry_paste_clipboard(Compose *compose, GtkWidget *entry, gboolean wrap,
6057                                   GdkAtom clip, GtkTextIter *insert_place);
6058
6059 #define BLOCK_WRAP() {                                                  \
6060         prev_autowrap = compose->autowrap;                              \
6061         buffer = gtk_text_view_get_buffer(                              \
6062                                         GTK_TEXT_VIEW(compose->text));  \
6063         compose->autowrap = FALSE;                                      \
6064                                                                         \
6065         g_signal_handlers_block_by_func(G_OBJECT(buffer),               \
6066                                 G_CALLBACK(compose_changed_cb),         \
6067                                 compose);                               \
6068         g_signal_handlers_block_by_func(G_OBJECT(buffer),               \
6069                                 G_CALLBACK(text_inserted),              \
6070                                 compose);                               \
6071 }
6072 #define UNBLOCK_WRAP() {                                                \
6073         compose->autowrap = prev_autowrap;                              \
6074         if (compose->autowrap)                                          \
6075                 compose_wrap_all(compose);                              \
6076                                                                         \
6077         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),             \
6078                                 G_CALLBACK(compose_changed_cb),         \
6079                                 compose);                               \
6080         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),             \
6081                                 G_CALLBACK(text_inserted),              \
6082                                 compose);                               \
6083 }
6084
6085
6086 static gboolean text_clicked(GtkWidget *text, GdkEventButton *event,
6087                                        Compose *compose)
6088 {
6089         gint prev_autowrap;
6090         GtkTextBuffer *buffer;
6091 #if USE_ASPELL
6092         if (event->button == 3) {
6093                 GtkTextIter iter;
6094                 GtkTextIter sel_start, sel_end;
6095                 gboolean stuff_selected;
6096                 gint x, y;
6097                 /* move the cursor to allow GtkAspell to check the word
6098                  * under the mouse */
6099                 gtk_text_view_window_to_buffer_coords(GTK_TEXT_VIEW(text),
6100                         GTK_TEXT_WINDOW_TEXT, event->x, event->y,
6101                         &x, &y);
6102                 gtk_text_view_get_iter_at_location (GTK_TEXT_VIEW(text),
6103                         &iter, x, y);
6104                 /* get selection */
6105                 stuff_selected = gtk_text_buffer_get_selection_bounds(
6106                                 GTK_TEXT_VIEW(text)->buffer,
6107                                 &sel_start, &sel_end);
6108
6109                 gtk_text_buffer_place_cursor (GTK_TEXT_VIEW(text)->buffer, &iter);
6110                 /* reselect stuff */
6111                 if (stuff_selected 
6112                 && gtk_text_iter_in_range(&iter, &sel_start, &sel_end)) {
6113                         gtk_text_buffer_select_range(GTK_TEXT_VIEW(text)->buffer,
6114                                 &sel_start, &sel_end);
6115                 }
6116                 return FALSE; /* pass the event so that the right-click goes through */
6117         }
6118 #endif
6119         if (event->button == 2) {
6120                 GtkTextIter iter;
6121                 gint x, y;
6122                 BLOCK_WRAP();
6123                 
6124                 /* get the middle-click position to paste at the correct place */
6125                 gtk_text_view_window_to_buffer_coords(GTK_TEXT_VIEW(text),
6126                         GTK_TEXT_WINDOW_TEXT, event->x, event->y,
6127                         &x, &y);
6128                 gtk_text_view_get_iter_at_location (GTK_TEXT_VIEW(text),
6129                         &iter, x, y);
6130                 
6131                 entry_paste_clipboard(compose, text, 
6132                                 prefs_common.linewrap_pastes,
6133                                 GDK_SELECTION_PRIMARY, &iter);
6134                 UNBLOCK_WRAP();
6135                 return TRUE;
6136         }
6137         return FALSE;
6138 }
6139
6140 #if USE_ASPELL
6141 static void compose_spell_menu_changed(void *data)
6142 {
6143         Compose *compose = (Compose *)data;
6144         GSList *items;
6145         GtkWidget *menuitem;
6146         GtkWidget *parent_item;
6147         GtkMenu *menu = GTK_MENU(gtk_menu_new());
6148         GtkItemFactory *ifactory = gtk_item_factory_from_widget(compose->menubar);
6149         GSList *spell_menu;
6150
6151         if (compose->gtkaspell == NULL)
6152                 return;
6153
6154         parent_item = gtk_item_factory_get_item(ifactory, 
6155                         "/Spelling/Options");
6156
6157         /* setting the submenu removes /Spelling/Options from the factory 
6158          * so we need to save it */
6159
6160         if (parent_item == NULL) {
6161                 parent_item = compose->aspell_options_menu;
6162                 gtk_menu_item_remove_submenu(GTK_MENU_ITEM(parent_item));
6163         } else
6164                 compose->aspell_options_menu = parent_item;
6165
6166         spell_menu = gtkaspell_make_config_menu(compose->gtkaspell);
6167
6168         spell_menu = g_slist_reverse(spell_menu);
6169         for (items = spell_menu;
6170              items; items = items->next) {
6171                 menuitem = GTK_WIDGET(GTK_MENU_ITEM(items->data));
6172                 gtk_menu_shell_prepend(GTK_MENU_SHELL(menu), GTK_WIDGET(menuitem));
6173                 gtk_widget_show(GTK_WIDGET(menuitem));
6174         }
6175         g_slist_free(spell_menu);
6176
6177         gtk_menu_item_set_submenu(GTK_MENU_ITEM(parent_item), GTK_WIDGET(menu));
6178         
6179 }
6180 #endif
6181
6182 static gboolean compose_popup_menu(GtkWidget *widget, gpointer data)
6183 {
6184         Compose *compose = (Compose *)data;
6185         GdkEventButton event;
6186         
6187         event.button = 3;
6188         event.time = gtk_get_current_event_time();
6189
6190         return text_clicked(compose->text, &event, compose);
6191 }
6192
6193 static gboolean compose_force_window_origin = TRUE;
6194 static Compose *compose_create(PrefsAccount *account, ComposeMode mode,
6195                                                  gboolean batch)
6196 {
6197         Compose   *compose;
6198         GtkWidget *window;
6199         GtkWidget *vbox;
6200         GtkWidget *menubar;
6201         GtkWidget *handlebox;
6202
6203         GtkWidget *notebook;
6204
6205         GtkWidget *vbox2;
6206
6207         GtkWidget *label;
6208         GtkWidget *subject_hbox;
6209         GtkWidget *subject_frame;
6210         GtkWidget *subject_entry;
6211         GtkWidget *subject;
6212         GtkWidget *paned;
6213
6214         GtkWidget *edit_vbox;
6215         GtkWidget *ruler_hbox;
6216         GtkWidget *ruler;
6217         GtkWidget *scrolledwin;
6218         GtkWidget *text;
6219         GtkTextBuffer *buffer;
6220         GtkClipboard *clipboard;
6221
6222         UndoMain *undostruct;
6223
6224         gchar *titles[N_ATTACH_COLS];
6225         guint n_menu_entries;
6226         GtkWidget *popupmenu;
6227         GtkItemFactory *popupfactory;
6228         GtkItemFactory *ifactory;
6229         GtkWidget *tmpl_menu;
6230         gint n_entries;
6231         GtkWidget *menuitem;
6232
6233 #if USE_ASPELL
6234         GtkAspell * gtkaspell = NULL;
6235 #endif
6236
6237         static GdkGeometry geometry;
6238
6239         g_return_val_if_fail(account != NULL, NULL);
6240
6241         debug_print("Creating compose window...\n");
6242         compose = g_new0(Compose, 1);
6243
6244         titles[COL_MIMETYPE] = _("MIME type");
6245         titles[COL_SIZE]     = _("Size");
6246         titles[COL_NAME]     = _("Name");
6247
6248         compose->batch = batch;
6249         compose->account = account;
6250         
6251         compose->mutex = g_mutex_new();
6252         compose->set_cursor_pos = -1;
6253
6254         compose->tooltips = gtk_tooltips_new();
6255
6256         window = gtkut_window_new(GTK_WINDOW_TOPLEVEL, "compose");
6257
6258         gtk_window_set_resizable(GTK_WINDOW(window), TRUE);
6259         gtk_widget_set_size_request(window, -1, prefs_common.compose_height);
6260
6261         if (!geometry.max_width) {
6262                 geometry.max_width = gdk_screen_width();
6263                 geometry.max_height = gdk_screen_height();
6264         }
6265
6266         gtk_window_set_geometry_hints(GTK_WINDOW(window), NULL,
6267                                       &geometry, GDK_HINT_MAX_SIZE);
6268         if (!geometry.min_width) {
6269                 geometry.min_width = 600;
6270                 geometry.min_height = 480;
6271         }
6272         gtk_window_set_geometry_hints(GTK_WINDOW(window), NULL,
6273                                       &geometry, GDK_HINT_MIN_SIZE);
6274
6275 #ifndef MAEMO   
6276         if (compose_force_window_origin)
6277                 gtk_widget_set_uposition(window, prefs_common.compose_x, 
6278                                  prefs_common.compose_y);
6279 #endif
6280         g_signal_connect(G_OBJECT(window), "delete_event",
6281                          G_CALLBACK(compose_delete_cb), compose);
6282         MANAGE_WINDOW_SIGNALS_CONNECT(window);
6283         gtk_widget_realize(window);
6284
6285         gtkut_widget_set_composer_icon(window);
6286
6287         vbox = gtk_vbox_new(FALSE, 0);
6288         gtk_container_add(GTK_CONTAINER(window), vbox);
6289
6290         n_menu_entries = sizeof(compose_entries) / sizeof(compose_entries[0]);
6291         menubar = menubar_create(window, compose_entries,
6292                                  n_menu_entries, "<Compose>", compose);
6293         gtk_box_pack_start(GTK_BOX(vbox), menubar, FALSE, TRUE, 0);
6294
6295         if (prefs_common.toolbar_detachable) {
6296                 handlebox = gtk_handle_box_new();
6297         } else {
6298                 handlebox = gtk_hbox_new(FALSE, 0);
6299         }
6300         gtk_box_pack_start(GTK_BOX(vbox), handlebox, FALSE, FALSE, 0);
6301
6302         gtk_widget_realize(handlebox);
6303         compose->toolbar = toolbar_create(TOOLBAR_COMPOSE, handlebox,
6304                                           (gpointer)compose);
6305
6306         vbox2 = gtk_vbox_new(FALSE, 2);
6307         gtk_box_pack_start(GTK_BOX(vbox), vbox2, TRUE, TRUE, 0);
6308         gtk_container_set_border_width(GTK_CONTAINER(vbox2), 0);
6309         
6310         /* Notebook */
6311         notebook = gtk_notebook_new();
6312         gtk_widget_set_size_request(notebook, -1, 130);
6313         gtk_widget_show(notebook);
6314
6315         /* header labels and entries */
6316         gtk_notebook_append_page(GTK_NOTEBOOK(notebook),
6317                         compose_create_header(compose),
6318                         gtk_label_new_with_mnemonic(_("Hea_der")));
6319         /* attachment list */
6320         gtk_notebook_append_page(GTK_NOTEBOOK(notebook),
6321                         compose_create_attach(compose),
6322                         gtk_label_new_with_mnemonic(_("_Attachments")));
6323         /* Others Tab */
6324         gtk_notebook_append_page(GTK_NOTEBOOK(notebook),
6325                         compose_create_others(compose),
6326                         gtk_label_new_with_mnemonic(_("Othe_rs")));
6327
6328         /* Subject */
6329         subject_hbox = gtk_hbox_new(FALSE, 0);
6330         gtk_widget_show(subject_hbox);
6331
6332         subject_frame = gtk_frame_new(NULL);
6333         gtk_frame_set_shadow_type(GTK_FRAME(subject_frame), GTK_SHADOW_NONE);
6334         gtk_box_pack_start(GTK_BOX(subject_hbox), subject_frame, TRUE, TRUE, 0);
6335         gtk_widget_show(subject_frame);
6336
6337         subject = gtk_hbox_new(FALSE, HSPACING_NARROW);
6338         gtk_container_set_border_width(GTK_CONTAINER(subject), 0);
6339         gtk_widget_show(subject);
6340
6341         label = gtk_label_new(_("Subject:"));
6342         gtk_box_pack_start(GTK_BOX(subject), label, FALSE, FALSE, 0);
6343         gtk_widget_show(label);
6344
6345         subject_entry = gtk_entry_new();
6346         gtk_box_pack_start(GTK_BOX(subject), subject_entry, TRUE, TRUE, 0);
6347         g_signal_connect_after(G_OBJECT(subject_entry), "grab_focus",
6348                          G_CALLBACK(compose_grab_focus_cb), compose);
6349         gtk_widget_show(subject_entry);
6350         compose->subject_entry = subject_entry;
6351         gtk_container_add(GTK_CONTAINER(subject_frame), subject);
6352         
6353         edit_vbox = gtk_vbox_new(FALSE, 0);
6354
6355         gtk_box_pack_start(GTK_BOX(edit_vbox), subject_hbox, FALSE, FALSE, 0);
6356
6357         /* ruler */
6358         ruler_hbox = gtk_hbox_new(FALSE, 0);
6359         gtk_box_pack_start(GTK_BOX(edit_vbox), ruler_hbox, FALSE, FALSE, 0);
6360
6361         ruler = gtk_shruler_new();
6362         gtk_ruler_set_range(GTK_RULER(ruler), 0.0, 100.0, 1.0, 100.0);
6363         gtk_box_pack_start(GTK_BOX(ruler_hbox), ruler, TRUE, TRUE,
6364                            BORDER_WIDTH);
6365
6366         /* text widget */
6367         scrolledwin = gtk_scrolled_window_new(NULL, NULL);
6368         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrolledwin),
6369                                        GTK_POLICY_AUTOMATIC,
6370                                        GTK_POLICY_AUTOMATIC);
6371         gtk_scrolled_window_set_shadow_type(GTK_SCROLLED_WINDOW(scrolledwin),
6372                                             GTK_SHADOW_IN);
6373         gtk_box_pack_start(GTK_BOX(edit_vbox), scrolledwin, TRUE, TRUE, 0);
6374         gtk_widget_set_size_request(scrolledwin, prefs_common.compose_width, -1);
6375
6376         text = gtk_text_view_new();
6377         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6378         gtk_text_view_set_wrap_mode(GTK_TEXT_VIEW(text), GTK_WRAP_WORD_CHAR);
6379         gtk_text_view_set_editable(GTK_TEXT_VIEW(text), TRUE);
6380         clipboard = gtk_clipboard_get(GDK_SELECTION_PRIMARY);
6381         gtk_text_buffer_add_selection_clipboard(buffer, clipboard);
6382         
6383         gtk_container_add(GTK_CONTAINER(scrolledwin), text);
6384
6385         g_signal_connect_after(G_OBJECT(text), "size_allocate",
6386                                G_CALLBACK(compose_edit_size_alloc),
6387                                ruler);
6388         g_signal_connect(G_OBJECT(buffer), "changed",
6389                          G_CALLBACK(compose_changed_cb), compose);
6390         g_signal_connect(G_OBJECT(text), "grab_focus",
6391                          G_CALLBACK(compose_grab_focus_cb), compose);
6392         g_signal_connect(G_OBJECT(buffer), "insert_text",
6393                          G_CALLBACK(text_inserted), compose);
6394         g_signal_connect(G_OBJECT(text), "button_press_event",
6395                          G_CALLBACK(text_clicked), compose);
6396 #ifndef MAEMO
6397         g_signal_connect(G_OBJECT(text), "popup-menu",
6398                          G_CALLBACK(compose_popup_menu), compose);
6399 #else
6400         gtk_widget_tap_and_hold_setup(GTK_WIDGET(text), NULL, NULL,
6401                         GTK_TAP_AND_HOLD_NONE | GTK_TAP_AND_HOLD_NO_INTERNALS);
6402         g_signal_connect(G_OBJECT(text), "tap-and-hold",
6403                          G_CALLBACK(compose_popup_menu), compose);
6404 #endif
6405         g_signal_connect(G_OBJECT(subject_entry), "changed",
6406                          G_CALLBACK(compose_changed_cb), compose);
6407
6408         /* drag and drop */
6409         gtk_drag_dest_set(text, GTK_DEST_DEFAULT_ALL, compose_mime_types, 
6410                           sizeof(compose_mime_types)/sizeof(compose_mime_types[0]),
6411                           GDK_ACTION_COPY | GDK_ACTION_MOVE);
6412         g_signal_connect(G_OBJECT(text), "drag_data_received",
6413                          G_CALLBACK(compose_insert_drag_received_cb),
6414                          compose);
6415         g_signal_connect(G_OBJECT(text), "drag-drop",
6416                          G_CALLBACK(compose_drag_drop),
6417                          compose);
6418         gtk_widget_show_all(vbox);
6419
6420         /* pane between attach clist and text */
6421         paned = gtk_vpaned_new();
6422         gtk_paned_set_gutter_size(GTK_PANED(paned), 12);
6423         gtk_container_add(GTK_CONTAINER(vbox2), paned);
6424 #ifdef MAEMO
6425         if( maemo_mainwindow_is_fullscreen(mainwindow_get_mainwindow()->window) )
6426                 gtk_widget_set_size_request(edit_vbox, -1, mode == COMPOSE_NEW ? 300 : 280);
6427         else
6428                 gtk_widget_set_size_request(edit_vbox, -1, mode == COMPOSE_NEW ? 250 : 230);
6429 #endif
6430         gtk_paned_add1(GTK_PANED(paned), notebook);
6431         gtk_paned_add2(GTK_PANED(paned), edit_vbox);
6432         gtk_widget_show_all(paned);
6433
6434
6435         if (prefs_common.textfont) {
6436                 PangoFontDescription *font_desc;
6437
6438                 font_desc = pango_font_description_from_string
6439                         (prefs_common.textfont);
6440                 if (font_desc) {
6441                         gtk_widget_modify_font(text, font_desc);
6442                         pango_font_description_free(font_desc);
6443                 }
6444         }
6445
6446         n_entries = sizeof(compose_popup_entries) /
6447                 sizeof(compose_popup_entries[0]);
6448         popupmenu = menu_create_items(compose_popup_entries, n_entries,
6449                                       "<Compose>", &popupfactory,
6450                                       compose);
6451
6452         ifactory = gtk_item_factory_from_widget(menubar);
6453         menu_set_sensitive(ifactory, "/Edit/Undo", FALSE);
6454         menu_set_sensitive(ifactory, "/Edit/Redo", FALSE);
6455         menu_set_sensitive(ifactory, "/Options/Remove references", FALSE);
6456
6457         tmpl_menu = gtk_item_factory_get_item(ifactory, "/Tools/Template");
6458
6459         undostruct = undo_init(text);
6460         undo_set_change_state_func(undostruct, &compose_undo_state_changed,
6461                                    menubar);
6462
6463         address_completion_start(window);
6464
6465         compose->window        = window;
6466         compose->vbox          = vbox;
6467         compose->menubar       = menubar;
6468         compose->handlebox     = handlebox;
6469
6470         compose->vbox2         = vbox2;
6471
6472         compose->paned = paned;
6473
6474         compose->notebook      = notebook;
6475         compose->edit_vbox     = edit_vbox;
6476         compose->ruler_hbox    = ruler_hbox;
6477         compose->ruler         = ruler;
6478         compose->scrolledwin   = scrolledwin;
6479         compose->text          = text;
6480
6481         compose->focused_editable = NULL;
6482
6483         compose->popupmenu    = popupmenu;
6484         compose->popupfactory = popupfactory;
6485
6486         compose->tmpl_menu = tmpl_menu;
6487
6488         compose->mode = mode;
6489         compose->rmode = mode;
6490
6491         compose->targetinfo = NULL;
6492         compose->replyinfo  = NULL;
6493         compose->fwdinfo    = NULL;
6494
6495         compose->replyto     = NULL;
6496         compose->cc          = NULL;
6497         compose->bcc         = NULL;
6498         compose->followup_to = NULL;
6499
6500         compose->ml_post     = NULL;
6501
6502         compose->inreplyto   = NULL;
6503         compose->references  = NULL;
6504         compose->msgid       = NULL;
6505         compose->boundary    = NULL;
6506
6507         compose->autowrap       = prefs_common.autowrap;
6508
6509         compose->use_signing    = FALSE;
6510         compose->use_encryption = FALSE;
6511         compose->privacy_system = NULL;
6512
6513         compose->modified = FALSE;
6514
6515         compose->return_receipt = FALSE;
6516
6517         compose->to_list        = NULL;
6518         compose->newsgroup_list = NULL;
6519
6520         compose->undostruct = undostruct;
6521
6522         compose->sig_str = NULL;
6523
6524         compose->exteditor_file    = NULL;
6525         compose->exteditor_pid     = -1;
6526         compose->exteditor_tag     = -1;
6527         compose->draft_timeout_tag = -1;
6528
6529 #if USE_ASPELL
6530         menu_set_sensitive(ifactory, "/Spelling", FALSE);
6531         if (mode != COMPOSE_REDIRECT) {
6532                 if (prefs_common.enable_aspell && prefs_common.dictionary &&
6533                     strcmp(prefs_common.dictionary, "")) {
6534                         gtkaspell = gtkaspell_new(prefs_common.aspell_path,
6535                                                   prefs_common.dictionary,
6536                                                   prefs_common.alt_dictionary,
6537                                                   conv_get_locale_charset_str(),
6538                                                   prefs_common.misspelled_col,
6539                                                   prefs_common.check_while_typing,
6540                                                   prefs_common.recheck_when_changing_dict,
6541                                                   prefs_common.use_alternate,
6542                                                   prefs_common.use_both_dicts,
6543                                                   GTK_TEXT_VIEW(text),
6544                                                   GTK_WINDOW(compose->window),
6545                                                   compose_spell_menu_changed,
6546                                                   compose);
6547                         if (!gtkaspell) {
6548                                 alertpanel_error(_("Spell checker could not "
6549                                                 "be started.\n%s"),
6550                                                 gtkaspell_checkers_strerror());
6551                                 gtkaspell_checkers_reset_error();
6552                         } else {
6553                                 if (!gtkaspell_set_sug_mode(gtkaspell,
6554                                                 prefs_common.aspell_sugmode)) {
6555                                         debug_print("Aspell: could not set "
6556                                                     "suggestion mode %s\n",
6557                                                     gtkaspell_checkers_strerror());
6558                                         gtkaspell_checkers_reset_error();
6559                                 }
6560
6561                                 menu_set_sensitive(ifactory, "/Spelling", TRUE);
6562                         }
6563                 }
6564         }
6565         compose->gtkaspell = gtkaspell;
6566         compose_spell_menu_changed(compose);
6567 #endif
6568
6569         compose_select_account(compose, account, TRUE);
6570
6571         menu_set_active(ifactory, "/Edit/Auto wrapping", prefs_common.autowrap);
6572         if (account->set_autocc && account->auto_cc && mode != COMPOSE_REEDIT)
6573                 compose_entry_append(compose, account->auto_cc, COMPOSE_CC);
6574
6575         if (account->set_autobcc && account->auto_bcc && mode != COMPOSE_REEDIT) 
6576                 compose_entry_append(compose, account->auto_bcc, COMPOSE_BCC);
6577         
6578         if (account->set_autoreplyto && account->auto_replyto && mode != COMPOSE_REEDIT)
6579                 compose_entry_append(compose, account->auto_replyto, COMPOSE_REPLYTO);
6580
6581         menu_set_sensitive(ifactory, "/Options/Reply mode", compose->mode == COMPOSE_REPLY);
6582
6583         if (account->protocol != A_NNTP)
6584                 gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(compose->header_last->combo)->entry),
6585                                 prefs_common_translated_header_name("To:"));
6586         else
6587                 gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(compose->header_last->combo)->entry),
6588                                 prefs_common_translated_header_name("Newsgroups:"));
6589
6590         addressbook_set_target_compose(compose);
6591         
6592         if (mode != COMPOSE_REDIRECT)
6593                 compose_set_template_menu(compose);
6594         else {
6595                 menuitem = gtk_item_factory_get_item(ifactory, "/Tools/Template");
6596                 menu_set_sensitive(ifactory, "/Tools/Template", FALSE);
6597         }
6598
6599         compose_list = g_list_append(compose_list, compose);
6600
6601         if (!prefs_common.show_ruler)
6602                 gtk_widget_hide(ruler_hbox);
6603                 
6604         menuitem = gtk_item_factory_get_item(ifactory, "/Tools/Show ruler");
6605         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem),
6606                                        prefs_common.show_ruler);
6607
6608         /* Priority */
6609         compose->priority = PRIORITY_NORMAL;
6610         compose_update_priority_menu_item(compose);
6611
6612         compose_set_out_encoding(compose);
6613         
6614         /* Actions menu */
6615         compose_update_actions_menu(compose);
6616
6617         /* Privacy Systems menu */
6618         compose_update_privacy_systems_menu(compose);
6619
6620         activate_privacy_system(compose, account, TRUE);
6621         toolbar_set_style(compose->toolbar->toolbar, compose->handlebox, prefs_common.toolbar_style);
6622         if (batch) {
6623                 gtk_widget_realize(window);
6624         } else {
6625                 gtk_widget_show(window);
6626 #ifdef MAEMO
6627                 maemo_window_full_screen_if_needed(GTK_WINDOW(window));
6628                 maemo_connect_key_press_to_mainwindow(GTK_WINDOW(window));
6629 #endif
6630         }
6631         
6632         return compose;
6633 }
6634
6635 static GtkWidget *compose_account_option_menu_create(Compose *compose)
6636 {
6637         GList *accounts;
6638         GtkWidget *hbox;
6639         GtkWidget *optmenu;
6640         GtkWidget *optmenubox;
6641         GtkListStore *menu;
6642         GtkTreeIter iter;
6643         GtkWidget *from_name = NULL;
6644
6645         gint num = 0, def_menu = 0;
6646         
6647         accounts = account_get_list();
6648         g_return_val_if_fail(accounts != NULL, NULL);
6649
6650         optmenubox = gtk_event_box_new();
6651         optmenu = gtkut_sc_combobox_create(optmenubox, FALSE);
6652         menu = GTK_LIST_STORE(gtk_combo_box_get_model(GTK_COMBO_BOX(optmenu)));
6653
6654         hbox = gtk_hbox_new(FALSE, 6);
6655         from_name = gtk_entry_new();
6656         
6657         g_signal_connect_after(G_OBJECT(from_name), "grab_focus",
6658                          G_CALLBACK(compose_grab_focus_cb), compose);
6659
6660         for (; accounts != NULL; accounts = accounts->next, num++) {
6661                 PrefsAccount *ac = (PrefsAccount *)accounts->data;
6662                 gchar *name, *from = NULL;
6663
6664                 if (ac == compose->account) def_menu = num;
6665
6666                 name = g_markup_printf_escaped(_("From: <i>%s</i>"),
6667                                        ac->account_name);
6668                 
6669                 if (ac == compose->account) {
6670                         if (ac->name && *ac->name) {
6671                                 gchar *buf;
6672                                 QUOTE_IF_REQUIRED_NORMAL(buf, ac->name, return NULL);
6673                                 from = g_strdup_printf("%s <%s>",
6674                                                        buf, ac->address);
6675                                 gtk_entry_set_text(GTK_ENTRY(from_name), from);
6676                         } else {
6677                                 from = g_strdup_printf("%s",
6678                                                        ac->address);
6679                                 gtk_entry_set_text(GTK_ENTRY(from_name), from);
6680                         }
6681                 }
6682                 COMBOBOX_ADD(menu, name, ac->account_id);
6683                 g_free(name);
6684                 g_free(from);
6685         }
6686
6687         gtk_combo_box_set_active(GTK_COMBO_BOX(optmenu), def_menu);
6688
6689         g_signal_connect(G_OBJECT(optmenu), "changed",
6690                         G_CALLBACK(account_activated),
6691                         compose);
6692         g_signal_connect(G_OBJECT(from_name), "populate-popup",
6693                          G_CALLBACK(compose_entry_popup_extend),
6694                          NULL);
6695
6696         gtk_box_pack_start(GTK_BOX(hbox), optmenubox, FALSE, FALSE, 0);
6697         gtk_box_pack_start(GTK_BOX(hbox), from_name, TRUE, TRUE, 0);
6698         
6699         gtk_tooltips_set_tip(compose->tooltips, optmenubox,
6700                 _("Account to use for this email"), NULL);
6701         gtk_tooltips_set_tip(compose->tooltips, from_name,
6702                 _("Sender address to be used"), NULL);
6703
6704         compose->from_name = from_name;
6705         
6706         return hbox;
6707 }
6708
6709 static void compose_set_priority_cb(gpointer data,
6710                                     guint action,
6711                                     GtkWidget *widget)
6712 {
6713         Compose *compose = (Compose *) data;
6714         compose->priority = action;
6715 }
6716
6717 static void compose_reply_change_mode(gpointer data,
6718                                     ComposeMode action,
6719                                     GtkWidget *widget)
6720 {
6721         Compose *compose = (Compose *) data;
6722         gboolean was_modified = compose->modified;
6723
6724         gboolean all = FALSE, ml = FALSE, sender = FALSE, followup = FALSE;
6725         
6726         g_return_if_fail(compose->replyinfo != NULL);
6727         
6728         if (action == COMPOSE_REPLY && prefs_common.default_reply_list)
6729                 ml = TRUE;
6730         if (action == COMPOSE_REPLY && compose->rmode == COMPOSE_FOLLOWUP_AND_REPLY_TO)
6731                 followup = TRUE;
6732         if (action == COMPOSE_REPLY_TO_ALL)
6733                 all = TRUE;
6734         if (action == COMPOSE_REPLY_TO_SENDER)
6735                 sender = TRUE;
6736         if (action == COMPOSE_REPLY_TO_LIST)
6737                 ml = TRUE;
6738
6739         compose_remove_header_entries(compose);
6740         compose_reply_set_entry(compose, compose->replyinfo, all, ml, sender, followup);
6741         if (compose->account->set_autocc && compose->account->auto_cc)
6742                 compose_entry_append(compose, compose->account->auto_cc, COMPOSE_CC);
6743
6744         if (compose->account->set_autobcc && compose->account->auto_bcc) 
6745                 compose_entry_append(compose, compose->account->auto_bcc, COMPOSE_BCC);
6746         
6747         if (compose->account->set_autoreplyto && compose->account->auto_replyto)
6748                 compose_entry_append(compose, compose->account->auto_replyto, COMPOSE_REPLYTO);
6749         compose_show_first_last_header(compose, TRUE);
6750         compose->modified = was_modified;
6751         compose_set_title(compose);
6752 }
6753
6754 static void compose_update_priority_menu_item(Compose * compose)
6755 {
6756         GtkItemFactory *ifactory;
6757         GtkWidget *menuitem = NULL;
6758
6759         ifactory = gtk_item_factory_from_widget(compose->menubar);
6760         
6761         switch (compose->priority) {
6762                 case PRIORITY_HIGHEST:
6763                         menuitem = gtk_item_factory_get_item
6764                                 (ifactory, "/Options/Priority/Highest");
6765                         break;
6766                 case PRIORITY_HIGH:
6767                         menuitem = gtk_item_factory_get_item
6768                                 (ifactory, "/Options/Priority/High");
6769                         break;
6770                 case PRIORITY_NORMAL:
6771                         menuitem = gtk_item_factory_get_item
6772                                 (ifactory, "/Options/Priority/Normal");
6773                         break;
6774                 case PRIORITY_LOW:
6775                         menuitem = gtk_item_factory_get_item
6776                                 (ifactory, "/Options/Priority/Low");
6777                         break;
6778                 case PRIORITY_LOWEST:
6779                         menuitem = gtk_item_factory_get_item
6780                                 (ifactory, "/Options/Priority/Lowest");
6781                         break;
6782         }
6783         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem), TRUE);
6784 }       
6785
6786 static void compose_set_privacy_system_cb(GtkWidget *widget, gpointer data)
6787 {
6788         Compose *compose = (Compose *) data;
6789         gchar *systemid;
6790         GtkItemFactory *ifactory;
6791         gboolean can_sign = FALSE, can_encrypt = FALSE;
6792
6793         g_return_if_fail(GTK_IS_CHECK_MENU_ITEM(widget));
6794
6795         if (!GTK_CHECK_MENU_ITEM(widget)->active)
6796                 return;
6797
6798         systemid = g_object_get_data(G_OBJECT(widget), "privacy_system");
6799         g_free(compose->privacy_system);
6800         compose->privacy_system = NULL;
6801         if (systemid != NULL) {
6802                 compose->privacy_system = g_strdup(systemid);
6803
6804                 can_sign = privacy_system_can_sign(systemid);
6805                 can_encrypt = privacy_system_can_encrypt(systemid);
6806         }
6807
6808         debug_print("activated privacy system: %s\n", systemid != NULL ? systemid : "None");
6809
6810         ifactory = gtk_item_factory_from_widget(compose->menubar);
6811         menu_set_sensitive(ifactory, "/Options/Sign", can_sign);
6812         menu_set_sensitive(ifactory, "/Options/Encrypt", can_encrypt);
6813 }
6814
6815 static void compose_update_privacy_system_menu_item(Compose * compose, gboolean warn)
6816 {
6817         static gchar *branch_path = "/Options/Privacy System";
6818         GtkItemFactory *ifactory;
6819         GtkWidget *menuitem = NULL;
6820         GList *amenu;
6821         gboolean can_sign = FALSE, can_encrypt = FALSE;
6822         gboolean found = FALSE;
6823
6824         ifactory = gtk_item_factory_from_widget(compose->menubar);
6825
6826         if (compose->privacy_system != NULL) {
6827                 gchar *systemid;
6828
6829                 menuitem = gtk_item_factory_get_widget(ifactory, branch_path);
6830                 g_return_if_fail(menuitem != NULL);
6831
6832                 amenu = GTK_MENU_SHELL(menuitem)->children;
6833                 menuitem = NULL;
6834                 while (amenu != NULL) {
6835                         GList *alist = amenu->next;
6836
6837                         systemid = g_object_get_data(G_OBJECT(amenu->data), "privacy_system");
6838                         if (systemid != NULL) {
6839                                 if (strcmp(systemid, compose->privacy_system) == 0) {
6840                                         menuitem = GTK_WIDGET(amenu->data);
6841
6842                                         can_sign = privacy_system_can_sign(systemid);
6843                                         can_encrypt = privacy_system_can_encrypt(systemid);
6844                                         found = TRUE;
6845                                         break;
6846                                 } 
6847                         } else if (strlen(compose->privacy_system) == 0) {
6848                                         menuitem = GTK_WIDGET(amenu->data);
6849
6850                                         can_sign = FALSE;
6851                                         can_encrypt = FALSE;
6852                                         found = TRUE;
6853                                         break;
6854                         }
6855
6856                         amenu = alist;
6857                 }
6858                 if (menuitem != NULL)
6859                         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem), TRUE);
6860                 
6861                 if (warn && !found && strlen(compose->privacy_system)) {
6862                         gchar *tmp = g_strdup_printf(
6863                                 _("The privacy system '%s' cannot be loaded. You "
6864                                   "will not be able to sign or encrypt this message."),
6865                                   compose->privacy_system);
6866                         alertpanel_warning(tmp);
6867                         g_free(tmp);
6868                 }
6869         } 
6870
6871         menu_set_sensitive(ifactory, "/Options/Sign", can_sign);
6872         menu_set_sensitive(ifactory, "/Options/Encrypt", can_encrypt);
6873 }       
6874  
6875 static void compose_set_out_encoding(Compose *compose)
6876 {
6877         GtkItemFactoryEntry *entry;
6878         GtkItemFactory *ifactory;
6879         CharSet out_encoding;
6880         gchar *path, *p, *q;
6881         GtkWidget *item;
6882
6883         out_encoding = conv_get_charset_from_str(prefs_common.outgoing_charset);
6884         ifactory = gtk_item_factory_from_widget(compose->menubar);
6885
6886         for (entry = compose_entries; entry->callback != compose_address_cb;
6887              entry++) {
6888                 if (entry->callback == compose_set_encoding_cb &&
6889                     (CharSet)entry->callback_action == out_encoding) {
6890                         p = q = path = g_strdup(entry->path);
6891                         while (*p) {
6892                                 if (*p == '_') {
6893                                         if (p[1] == '_') {
6894                                                 p++;
6895                                                 *q++ = '_';
6896                                         }
6897                                 } else
6898                                         *q++ = *p;
6899                                 p++;
6900                         }
6901                         *q = '\0';
6902                         item = gtk_item_factory_get_item(ifactory, path);
6903                         gtk_widget_activate(item);
6904                         g_free(path);
6905                         break;
6906                 }
6907         }
6908 }
6909
6910 static void compose_set_template_menu(Compose *compose)
6911 {
6912         GSList *tmpl_list, *cur;
6913         GtkWidget *menu;
6914         GtkWidget *item;
6915
6916         tmpl_list = template_get_config();
6917
6918         menu = gtk_menu_new();
6919
6920         for (cur = tmpl_list; cur != NULL; cur = cur->next) {
6921                 Template *tmpl = (Template *)cur->data;
6922
6923                 item = gtk_menu_item_new_with_label(tmpl->name);
6924                 gtk_menu_shell_append(GTK_MENU_SHELL(menu), item);
6925                 g_signal_connect(G_OBJECT(item), "activate",
6926                                  G_CALLBACK(compose_template_activate_cb),
6927                                  compose);
6928                 g_object_set_data(G_OBJECT(item), "template", tmpl);
6929                 gtk_widget_show(item);
6930         }
6931
6932         gtk_widget_show(menu);
6933         gtk_menu_item_set_submenu(GTK_MENU_ITEM(compose->tmpl_menu), menu);
6934 }
6935
6936 void compose_update_actions_menu(Compose *compose)
6937 {
6938         GtkItemFactory *ifactory;
6939
6940         ifactory = gtk_item_factory_from_widget(compose->menubar);
6941         action_update_compose_menu(ifactory, "/Tools/Actions", compose);
6942 }
6943
6944 static void compose_update_privacy_systems_menu(Compose *compose)
6945 {
6946         static gchar *branch_path = "/Options/Privacy System";
6947         GtkItemFactory *ifactory;
6948         GtkWidget *menuitem;
6949         GSList *systems, *cur;
6950         GList *amenu;
6951         GtkWidget *widget;
6952         GtkWidget *system_none;
6953         GSList *group;
6954
6955         ifactory = gtk_item_factory_from_widget(compose->menubar);
6956
6957         /* remove old entries */
6958         menuitem = gtk_item_factory_get_widget(ifactory, branch_path);
6959         g_return_if_fail(menuitem != NULL);
6960
6961         amenu = GTK_MENU_SHELL(menuitem)->children->next;
6962         while (amenu != NULL) {
6963                 GList *alist = amenu->next;
6964                 gtk_widget_destroy(GTK_WIDGET(amenu->data));
6965                 amenu = alist;
6966         }
6967
6968         system_none = gtk_item_factory_get_widget(ifactory,
6969                 "/Options/Privacy System/None");
6970
6971         g_signal_connect(G_OBJECT(system_none), "activate",
6972                 G_CALLBACK(compose_set_privacy_system_cb), compose);
6973
6974         systems = privacy_get_system_ids();
6975         for (cur = systems; cur != NULL; cur = g_slist_next(cur)) {
6976                 gchar *systemid = cur->data;
6977
6978                 group = gtk_radio_menu_item_get_group(GTK_RADIO_MENU_ITEM(system_none));
6979                 widget = gtk_radio_menu_item_new_with_label(group,
6980                         privacy_system_get_name(systemid));
6981                 g_object_set_data_full(G_OBJECT(widget), "privacy_system",
6982                                        g_strdup(systemid), g_free);
6983                 g_signal_connect(G_OBJECT(widget), "activate",
6984                         G_CALLBACK(compose_set_privacy_system_cb), compose);
6985
6986                 gtk_menu_append(GTK_MENU(system_none->parent), widget);
6987                 gtk_widget_show(widget);
6988                 g_free(systemid);
6989         }
6990         g_slist_free(systems);
6991 }
6992
6993 void compose_reflect_prefs_all(void)
6994 {
6995         GList *cur;
6996         Compose *compose;
6997
6998         for (cur = compose_list; cur != NULL; cur = cur->next) {
6999                 compose = (Compose *)cur->data;
7000                 compose_set_template_menu(compose);
7001         }
7002 }
7003
7004 void compose_reflect_prefs_pixmap_theme(void)
7005 {
7006         GList *cur;
7007         Compose *compose;
7008
7009         for (cur = compose_list; cur != NULL; cur = cur->next) {
7010                 compose = (Compose *)cur->data;
7011                 toolbar_update(TOOLBAR_COMPOSE, compose);
7012         }
7013 }
7014
7015 static void compose_template_apply(Compose *compose, Template *tmpl,
7016                                    gboolean replace)
7017 {
7018         GtkTextView *text;
7019         GtkTextBuffer *buffer;
7020         GtkTextMark *mark;
7021         GtkTextIter iter;
7022         gchar *qmark;
7023         gchar *parsed_str = NULL;
7024         gint cursor_pos = 0;
7025         const gchar *err_msg = _("Template body format error.");
7026         if (!tmpl) return;
7027
7028         /* process the body */
7029
7030         text = GTK_TEXT_VIEW(compose->text);
7031         buffer = gtk_text_view_get_buffer(text);
7032
7033         if (tmpl->value) {
7034                 if (prefs_common.quotemark && *prefs_common.quotemark)
7035                         qmark = prefs_common.quotemark;
7036                 else
7037                         qmark = "> ";
7038
7039                 if (compose->replyinfo != NULL) {
7040
7041                         if (replace)
7042                                 gtk_text_buffer_set_text(buffer, "", -1);
7043                         mark = gtk_text_buffer_get_insert(buffer);
7044                         gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
7045
7046                         parsed_str = compose_quote_fmt(compose, compose->replyinfo,
7047                                                    tmpl->value, qmark, NULL, FALSE, FALSE, err_msg);
7048
7049                 } else if (compose->fwdinfo != NULL) {
7050
7051                         if (replace)
7052                                 gtk_text_buffer_set_text(buffer, "", -1);
7053                         mark = gtk_text_buffer_get_insert(buffer);
7054                         gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
7055
7056                         parsed_str = compose_quote_fmt(compose, compose->fwdinfo,
7057                                                    tmpl->value, qmark, NULL, FALSE, FALSE, err_msg);
7058
7059                 } else {
7060                         MsgInfo* dummyinfo = compose_msginfo_new_from_compose(compose);
7061
7062                         GtkTextIter start, end;
7063                         gchar *tmp = NULL;
7064
7065                         gtk_text_buffer_get_start_iter(buffer, &start);
7066                         gtk_text_buffer_get_iter_at_offset(buffer, &end, -1);
7067                         tmp = gtk_text_buffer_get_text(buffer, &start, &end, FALSE);
7068
7069                         /* clear the buffer now */
7070                         if (replace)
7071                                 gtk_text_buffer_set_text(buffer, "", -1);
7072
7073                         parsed_str = compose_quote_fmt(compose, dummyinfo,
7074                                                            tmpl->value, qmark, tmp, FALSE, FALSE, err_msg);
7075                         procmsg_msginfo_free( dummyinfo );
7076
7077                         g_free( tmp );
7078                 } 
7079         } else {
7080                 if (replace)
7081                         gtk_text_buffer_set_text(buffer, "", -1);
7082                 mark = gtk_text_buffer_get_insert(buffer);
7083                 gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
7084         }       
7085
7086         if (replace && parsed_str && compose->account->auto_sig)
7087                 compose_insert_sig(compose, FALSE);
7088
7089         if (replace && parsed_str) {
7090                 gtk_text_buffer_get_start_iter(buffer, &iter);
7091                 gtk_text_buffer_place_cursor(buffer, &iter);
7092         }
7093         
7094         if (parsed_str) {
7095                 cursor_pos = quote_fmt_get_cursor_pos();
7096                 compose->set_cursor_pos = cursor_pos;
7097                 if (cursor_pos == -1)
7098                         cursor_pos = 0;
7099                 gtk_text_buffer_get_start_iter(buffer, &iter);
7100                 gtk_text_buffer_get_iter_at_offset(buffer, &iter, cursor_pos);
7101                 gtk_text_buffer_place_cursor(buffer, &iter);
7102         }
7103
7104         /* process the other fields */
7105
7106         compose_template_apply_fields(compose, tmpl);
7107         quote_fmt_reset_vartable();
7108         compose_changed_cb(NULL, compose);
7109 }
7110
7111 static void compose_template_apply_fields(Compose *compose, Template *tmpl)
7112 {
7113         MsgInfo* dummyinfo = NULL;
7114         MsgInfo *msginfo = NULL;
7115         gchar *buf = NULL;
7116
7117         if (compose->replyinfo != NULL)
7118                 msginfo = compose->replyinfo;
7119         else if (compose->fwdinfo != NULL)
7120                 msginfo = compose->fwdinfo;
7121         else {
7122                 dummyinfo = compose_msginfo_new_from_compose(compose);
7123                 msginfo = dummyinfo;
7124         }
7125
7126         if (tmpl->to && *tmpl->to != '\0') {
7127                 quote_fmt_init(msginfo, NULL, NULL, FALSE, compose->account);
7128                 quote_fmt_scan_string(tmpl->to);
7129                 quote_fmt_parse();
7130
7131                 buf = quote_fmt_get_buffer();
7132                 if (buf == NULL) {
7133                         alertpanel_error(_("Template To format error."));
7134                 } else {
7135                         compose_entry_append(compose, buf, COMPOSE_TO);
7136                 }
7137         }
7138
7139         if (tmpl->cc && *tmpl->cc != '\0') {
7140                 quote_fmt_init(msginfo, NULL, NULL, FALSE, compose->account);
7141                 quote_fmt_scan_string(tmpl->cc);
7142                 quote_fmt_parse();
7143
7144                 buf = quote_fmt_get_buffer();
7145                 if (buf == NULL) {
7146                         alertpanel_error(_("Template Cc format error."));
7147                 } else {
7148                         compose_entry_append(compose, buf, COMPOSE_CC);
7149                 }
7150         }
7151
7152         if (tmpl->bcc && *tmpl->bcc != '\0') {
7153                 quote_fmt_init(msginfo, NULL, NULL, FALSE, compose->account);
7154                 quote_fmt_scan_string(tmpl->bcc);
7155                 quote_fmt_parse();
7156
7157                 buf = quote_fmt_get_buffer();
7158                 if (buf == NULL) {
7159                         alertpanel_error(_("Template Bcc format error."));
7160                 } else {
7161                         compose_entry_append(compose, buf, COMPOSE_BCC);
7162                 }
7163         }
7164
7165         /* process the subject */
7166         if (tmpl->subject && *tmpl->subject != '\0') {
7167                 quote_fmt_init(msginfo, NULL, NULL, FALSE, compose->account);
7168                 quote_fmt_scan_string(tmpl->subject);
7169                 quote_fmt_parse();
7170
7171                 buf = quote_fmt_get_buffer();
7172                 if (buf == NULL) {
7173                         alertpanel_error(_("Template subject format error."));
7174                 } else {
7175                         gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), buf);
7176                 }
7177         }
7178
7179         procmsg_msginfo_free( dummyinfo );
7180 }
7181
7182 static void compose_destroy(Compose *compose)
7183 {
7184         GtkTextBuffer *buffer;
7185         GtkClipboard *clipboard;
7186
7187         compose_list = g_list_remove(compose_list, compose);
7188
7189         if (compose->updating) {
7190                 debug_print("danger, not destroying anything now\n");
7191                 compose->deferred_destroy = TRUE;
7192                 return;
7193         }
7194         /* NOTE: address_completion_end() does nothing with the window
7195          * however this may change. */
7196         address_completion_end(compose->window);
7197
7198         slist_free_strings(compose->to_list);
7199         g_slist_free(compose->to_list);
7200         slist_free_strings(compose->newsgroup_list);
7201         g_slist_free(compose->newsgroup_list);
7202         slist_free_strings(compose->header_list);
7203         g_slist_free(compose->header_list);
7204
7205         procmsg_msginfo_free(compose->targetinfo);
7206         procmsg_msginfo_free(compose->replyinfo);
7207         procmsg_msginfo_free(compose->fwdinfo);
7208
7209         g_free(compose->replyto);
7210         g_free(compose->cc);
7211         g_free(compose->bcc);
7212         g_free(compose->newsgroups);
7213         g_free(compose->followup_to);
7214
7215         g_free(compose->ml_post);
7216
7217         g_free(compose->inreplyto);
7218         g_free(compose->references);
7219         g_free(compose->msgid);
7220         g_free(compose->boundary);
7221
7222         g_free(compose->redirect_filename);
7223         if (compose->undostruct)
7224                 undo_destroy(compose->undostruct);
7225
7226         g_free(compose->sig_str);
7227
7228         g_free(compose->exteditor_file);
7229
7230         g_free(compose->orig_charset);
7231
7232         g_free(compose->privacy_system);
7233
7234         if (addressbook_get_target_compose() == compose)
7235                 addressbook_set_target_compose(NULL);
7236
7237 #if USE_ASPELL
7238         if (compose->gtkaspell) {
7239                 gtkaspell_delete(compose->gtkaspell);
7240                 compose->gtkaspell = NULL;
7241         }
7242 #endif
7243
7244         prefs_common.compose_width = compose->scrolledwin->allocation.width;
7245         prefs_common.compose_height = compose->window->allocation.height;
7246
7247         if (!gtk_widget_get_parent(compose->paned))
7248                 gtk_widget_destroy(compose->paned);
7249         gtk_widget_destroy(compose->popupmenu);
7250
7251         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(compose->text));
7252         clipboard = gtk_clipboard_get(GDK_SELECTION_PRIMARY);
7253         gtk_text_buffer_remove_selection_clipboard(buffer, clipboard);
7254
7255         gtk_widget_destroy(compose->window);
7256         toolbar_destroy(compose->toolbar);
7257         g_free(compose->toolbar);
7258         g_mutex_free(compose->mutex);
7259         g_free(compose);
7260 }
7261
7262 static void compose_attach_info_free(AttachInfo *ainfo)
7263 {
7264         g_free(ainfo->file);
7265         g_free(ainfo->content_type);
7266         g_free(ainfo->name);
7267         g_free(ainfo);
7268 }
7269
7270 static void compose_attach_remove_selected(Compose *compose)
7271 {
7272         GtkTreeView *tree_view = GTK_TREE_VIEW(compose->attach_clist);
7273         GtkTreeSelection *selection;
7274         GList *sel, *cur;
7275         GtkTreeModel *model;
7276
7277         selection = gtk_tree_view_get_selection(tree_view);
7278         sel = gtk_tree_selection_get_selected_rows(selection, &model);
7279
7280         if (!sel) 
7281                 return;
7282
7283         for (cur = sel; cur != NULL; cur = cur->next) {
7284                 GtkTreePath *path = cur->data;
7285                 GtkTreeRowReference *ref = gtk_tree_row_reference_new
7286                                                 (model, cur->data);
7287                 cur->data = ref;
7288                 gtk_tree_path_free(path);
7289         }
7290
7291         for (cur = sel; cur != NULL; cur = cur->next) {
7292                 GtkTreeRowReference *ref = cur->data;
7293                 GtkTreePath *path = gtk_tree_row_reference_get_path(ref);
7294                 GtkTreeIter iter;
7295
7296                 if (gtk_tree_model_get_iter(model, &iter, path))
7297                         gtk_list_store_remove(GTK_LIST_STORE(model), &iter);
7298                 
7299                 gtk_tree_path_free(path);
7300                 gtk_tree_row_reference_free(ref);
7301         }
7302
7303         g_list_free(sel);
7304 }
7305
7306 static struct _AttachProperty
7307 {
7308         GtkWidget *window;
7309         GtkWidget *mimetype_entry;
7310         GtkWidget *encoding_optmenu;
7311         GtkWidget *path_entry;
7312         GtkWidget *filename_entry;
7313         GtkWidget *ok_btn;
7314         GtkWidget *cancel_btn;
7315 } attach_prop;
7316
7317 static void gtk_tree_path_free_(gpointer ptr, gpointer data)
7318 {       
7319         gtk_tree_path_free((GtkTreePath *)ptr);
7320 }
7321
7322 static void compose_attach_property(Compose *compose)
7323 {
7324         GtkTreeView *tree_view = GTK_TREE_VIEW(compose->attach_clist);
7325         AttachInfo *ainfo;
7326         GtkComboBox *optmenu;
7327         GtkTreeSelection *selection;
7328         GList *sel;
7329         GtkTreeModel *model;
7330         GtkTreeIter iter;
7331         GtkTreePath *path;
7332         static gboolean cancelled;
7333
7334         /* only if one selected */
7335         selection = gtk_tree_view_get_selection(tree_view);
7336         if (gtk_tree_selection_count_selected_rows(selection) != 1) 
7337                 return;
7338
7339         sel = gtk_tree_selection_get_selected_rows(selection, &model);
7340         if (!sel)
7341                 return;
7342
7343         path = (GtkTreePath *) sel->data;
7344         gtk_tree_model_get_iter(model, &iter, path);
7345         gtk_tree_model_get(model, &iter, COL_DATA, &ainfo, -1); 
7346         
7347         if (!ainfo) {
7348                 g_list_foreach(sel, gtk_tree_path_free_, NULL);
7349                 g_list_free(sel);
7350                 return;
7351         }               
7352         g_list_free(sel);
7353
7354         if (!attach_prop.window)
7355                 compose_attach_property_create(&cancelled);
7356         gtk_widget_grab_focus(attach_prop.ok_btn);
7357         gtk_widget_show(attach_prop.window);
7358         manage_window_set_transient(GTK_WINDOW(attach_prop.window));
7359
7360         optmenu = GTK_COMBO_BOX(attach_prop.encoding_optmenu);
7361         if (ainfo->encoding == ENC_UNKNOWN)
7362                 combobox_select_by_data(optmenu, ENC_BASE64);
7363         else
7364                 combobox_select_by_data(optmenu, ainfo->encoding);
7365
7366         gtk_entry_set_text(GTK_ENTRY(attach_prop.mimetype_entry),
7367                            ainfo->content_type ? ainfo->content_type : "");
7368         gtk_entry_set_text(GTK_ENTRY(attach_prop.path_entry),
7369                            ainfo->file ? ainfo->file : "");
7370         gtk_entry_set_text(GTK_ENTRY(attach_prop.filename_entry),
7371                            ainfo->name ? ainfo->name : "");
7372
7373         for (;;) {
7374                 const gchar *entry_text;
7375                 gchar *text;
7376                 gchar *cnttype = NULL;
7377                 gchar *file = NULL;
7378                 off_t size = 0;
7379
7380                 cancelled = FALSE;
7381                 gtk_main();
7382
7383                 gtk_widget_hide(attach_prop.window);
7384                 
7385                 if (cancelled) 
7386                         break;
7387
7388                 entry_text = gtk_entry_get_text(GTK_ENTRY(attach_prop.mimetype_entry));
7389                 if (*entry_text != '\0') {
7390                         gchar *p;
7391
7392                         text = g_strstrip(g_strdup(entry_text));
7393                         if ((p = strchr(text, '/')) && !strchr(p + 1, '/')) {
7394                                 cnttype = g_strdup(text);
7395                                 g_free(text);
7396                         } else {
7397                                 alertpanel_error(_("Invalid MIME type."));
7398                                 g_free(text);
7399                                 continue;
7400                         }
7401                 }
7402
7403                 ainfo->encoding = combobox_get_active_data(optmenu);
7404
7405                 entry_text = gtk_entry_get_text(GTK_ENTRY(attach_prop.path_entry));
7406                 if (*entry_text != '\0') {
7407                         if (is_file_exist(entry_text) &&
7408                             (size = get_file_size(entry_text)) > 0)
7409                                 file = g_strdup(entry_text);
7410                         else {
7411                                 alertpanel_error
7412                                         (_("File doesn't exist or is empty."));
7413                                 g_free(cnttype);
7414                                 continue;
7415                         }
7416                 }
7417
7418                 entry_text = gtk_entry_get_text(GTK_ENTRY(attach_prop.filename_entry));
7419                 if (*entry_text != '\0') {
7420                         g_free(ainfo->name);
7421                         ainfo->name = g_strdup(entry_text);
7422                 }
7423
7424                 if (cnttype) {
7425                         g_free(ainfo->content_type);
7426                         ainfo->content_type = cnttype;
7427                 }
7428                 if (file) {
7429                         g_free(ainfo->file);
7430                         ainfo->file = file;
7431                 }
7432                 if (size)
7433                         ainfo->size = size;
7434
7435                 /* update tree store */
7436                 text = to_human_readable(ainfo->size);
7437                 gtk_tree_model_get_iter(model, &iter, path);
7438                 gtk_list_store_set(GTK_LIST_STORE(model), &iter,
7439                                    COL_MIMETYPE, ainfo->content_type,
7440                                    COL_SIZE, text,
7441                                    COL_NAME, ainfo->name,
7442                                    -1);
7443                 
7444                 break;
7445         }
7446
7447         gtk_tree_path_free(path);
7448 }
7449
7450 #define SET_LABEL_AND_ENTRY(str, entry, top) \
7451 { \
7452         label = gtk_label_new(str); \
7453         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), \
7454                          GTK_FILL, 0, 0, 0); \
7455         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5); \
7456  \
7457         entry = gtk_entry_new(); \
7458         gtk_table_attach(GTK_TABLE(table), entry, 1, 2, top, (top + 1), \
7459                          GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0); \
7460 }
7461
7462 static void compose_attach_property_create(gboolean *cancelled)
7463 {
7464         GtkWidget *window;
7465         GtkWidget *vbox;
7466         GtkWidget *table;
7467         GtkWidget *label;
7468         GtkWidget *mimetype_entry;
7469         GtkWidget *hbox;
7470         GtkWidget *optmenu;
7471         GtkListStore *optmenu_menu;
7472         GtkWidget *path_entry;
7473         GtkWidget *filename_entry;
7474         GtkWidget *hbbox;
7475         GtkWidget *ok_btn;
7476         GtkWidget *cancel_btn;
7477         GList     *mime_type_list, *strlist;
7478         GtkTreeIter iter;
7479
7480         debug_print("Creating attach_property window...\n");
7481
7482         window = gtkut_window_new(GTK_WINDOW_TOPLEVEL, "compose_attach_property");
7483         gtk_widget_set_size_request(window, 480, -1);
7484         gtk_container_set_border_width(GTK_CONTAINER(window), 8);
7485         gtk_window_set_title(GTK_WINDOW(window), _("Properties"));
7486         gtk_window_set_position(GTK_WINDOW(window), GTK_WIN_POS_CENTER);
7487         gtk_window_set_modal(GTK_WINDOW(window), TRUE);
7488         g_signal_connect(G_OBJECT(window), "delete_event",
7489                          G_CALLBACK(attach_property_delete_event),
7490                          cancelled);
7491         g_signal_connect(G_OBJECT(window), "key_press_event",
7492                          G_CALLBACK(attach_property_key_pressed),
7493                          cancelled);
7494
7495         vbox = gtk_vbox_new(FALSE, 8);
7496         gtk_container_add(GTK_CONTAINER(window), vbox);
7497
7498         table = gtk_table_new(4, 2, FALSE);
7499         gtk_box_pack_start(GTK_BOX(vbox), table, FALSE, FALSE, 0);
7500         gtk_table_set_row_spacings(GTK_TABLE(table), 8);
7501         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
7502
7503         label = gtk_label_new(_("MIME type")); 
7504         gtk_table_attach(GTK_TABLE(table), label, 0, 1, 0, (0 + 1), 
7505                          GTK_FILL, 0, 0, 0); 
7506         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5); 
7507         mimetype_entry = gtk_combo_new(); 
7508         gtk_table_attach(GTK_TABLE(table), mimetype_entry, 1, 2, 0, (0 + 1), 
7509                          GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
7510                          
7511         /* stuff with list */
7512         mime_type_list = procmime_get_mime_type_list();
7513         strlist = NULL;
7514         for (; mime_type_list != NULL; mime_type_list = mime_type_list->next) {
7515                 MimeType *type = (MimeType *) mime_type_list->data;
7516                 gchar *tmp;
7517
7518                 tmp = g_strdup_printf("%s/%s", type->type, type->sub_type);
7519
7520                 if (g_list_find_custom(strlist, tmp, (GCompareFunc)strcmp2))
7521                         g_free(tmp);
7522                 else
7523                         strlist = g_list_insert_sorted(strlist, (gpointer)tmp,
7524                                         (GCompareFunc)strcmp2);
7525         }
7526
7527         gtk_combo_set_popdown_strings(GTK_COMBO(mimetype_entry), strlist);
7528
7529         for (mime_type_list = strlist; mime_type_list != NULL; 
7530                 mime_type_list = mime_type_list->next)
7531                 g_free(mime_type_list->data);
7532         g_list_free(strlist);
7533                          
7534         mimetype_entry = GTK_COMBO(mimetype_entry)->entry;                       
7535
7536         label = gtk_label_new(_("Encoding"));
7537         gtk_table_attach(GTK_TABLE(table), label, 0, 1, 1, 2,
7538                          GTK_FILL, 0, 0, 0);
7539         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
7540
7541         hbox = gtk_hbox_new(FALSE, 0);
7542         gtk_table_attach(GTK_TABLE(table), hbox, 1, 2, 1, 2,
7543                          GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
7544
7545         optmenu = gtkut_sc_combobox_create(NULL, TRUE);
7546         optmenu_menu = GTK_LIST_STORE(gtk_combo_box_get_model(GTK_COMBO_BOX(optmenu)));
7547
7548         COMBOBOX_ADD(optmenu_menu, "7bit", ENC_7BIT);
7549         COMBOBOX_ADD(optmenu_menu, "8bit", ENC_8BIT);
7550         COMBOBOX_ADD(optmenu_menu, "quoted-printable",  ENC_QUOTED_PRINTABLE);
7551         COMBOBOX_ADD(optmenu_menu, "base64", ENC_BASE64);
7552         gtk_combo_box_set_active(GTK_COMBO_BOX(optmenu), 0);
7553
7554         gtk_box_pack_start(GTK_BOX(hbox), optmenu, TRUE, TRUE, 0);
7555
7556         SET_LABEL_AND_ENTRY(_("Path"),      path_entry,     2);
7557         SET_LABEL_AND_ENTRY(_("File name"), filename_entry, 3);
7558
7559         gtkut_stock_button_set_create(&hbbox, &cancel_btn, GTK_STOCK_CANCEL,
7560                                       &ok_btn, GTK_STOCK_OK,
7561                                       NULL, NULL);
7562         gtk_box_pack_end(GTK_BOX(vbox), hbbox, FALSE, FALSE, 0);
7563         gtk_widget_grab_default(ok_btn);
7564
7565         g_signal_connect(G_OBJECT(ok_btn), "clicked",
7566                          G_CALLBACK(attach_property_ok),
7567                          cancelled);
7568         g_signal_connect(G_OBJECT(cancel_btn), "clicked",
7569                          G_CALLBACK(attach_property_cancel),
7570                          cancelled);
7571
7572         gtk_widget_show_all(vbox);
7573
7574         attach_prop.window           = window;
7575         attach_prop.mimetype_entry   = mimetype_entry;
7576         attach_prop.encoding_optmenu = optmenu;
7577         attach_prop.path_entry       = path_entry;
7578         attach_prop.filename_entry   = filename_entry;
7579         attach_prop.ok_btn           = ok_btn;
7580         attach_prop.cancel_btn       = cancel_btn;
7581 }
7582
7583 #undef SET_LABEL_AND_ENTRY
7584
7585 static void attach_property_ok(GtkWidget *widget, gboolean *cancelled)
7586 {
7587         *cancelled = FALSE;
7588         gtk_main_quit();
7589 }
7590
7591 static void attach_property_cancel(GtkWidget *widget, gboolean *cancelled)
7592 {
7593         *cancelled = TRUE;
7594         gtk_main_quit();
7595 }
7596
7597 static gint attach_property_delete_event(GtkWidget *widget, GdkEventAny *event,
7598                                          gboolean *cancelled)
7599 {
7600         *cancelled = TRUE;
7601         gtk_main_quit();
7602
7603         return TRUE;
7604 }
7605
7606 static gboolean attach_property_key_pressed(GtkWidget *widget,
7607                                             GdkEventKey *event,
7608                                             gboolean *cancelled)
7609 {
7610         if (event && event->keyval == GDK_Escape) {
7611                 *cancelled = TRUE;
7612                 gtk_main_quit();
7613         }
7614         return FALSE;
7615 }
7616
7617 static void compose_exec_ext_editor(Compose *compose)
7618 {
7619 #ifdef G_OS_UNIX
7620         gchar *tmp;
7621         pid_t pid;
7622         gint pipe_fds[2];
7623
7624         tmp = g_strdup_printf("%s%ctmpmsg.%p", get_tmp_dir(),
7625                               G_DIR_SEPARATOR, compose);
7626
7627         if (pipe(pipe_fds) < 0) {
7628                 perror("pipe");
7629                 g_free(tmp);
7630                 return;
7631         }
7632
7633         if ((pid = fork()) < 0) {
7634                 perror("fork");
7635                 g_free(tmp);
7636                 return;
7637         }
7638
7639         if (pid != 0) {
7640                 /* close the write side of the pipe */
7641                 close(pipe_fds[1]);
7642
7643                 compose->exteditor_file    = g_strdup(tmp);
7644                 compose->exteditor_pid     = pid;
7645
7646                 compose_set_ext_editor_sensitive(compose, FALSE);
7647
7648                 compose->exteditor_ch = g_io_channel_unix_new(pipe_fds[0]);
7649                 compose->exteditor_tag = g_io_add_watch(compose->exteditor_ch,
7650                                                         G_IO_IN,
7651                                                         compose_input_cb,
7652                                                         compose);
7653         } else {        /* process-monitoring process */
7654                 pid_t pid_ed;
7655
7656                 if (setpgid(0, 0))
7657                         perror("setpgid");
7658
7659                 /* close the read side of the pipe */
7660                 close(pipe_fds[0]);
7661
7662                 if (compose_write_body_to_file(compose, tmp) < 0) {
7663                         fd_write_all(pipe_fds[1], "2\n", 2);
7664                         _exit(1);
7665                 }
7666
7667                 pid_ed = compose_exec_ext_editor_real(tmp);
7668                 if (pid_ed < 0) {
7669                         fd_write_all(pipe_fds[1], "1\n", 2);
7670                         _exit(1);
7671                 }
7672
7673                 /* wait until editor is terminated */
7674                 waitpid(pid_ed, NULL, 0);
7675
7676                 fd_write_all(pipe_fds[1], "0\n", 2);
7677
7678                 close(pipe_fds[1]);
7679                 _exit(0);
7680         }
7681
7682         g_free(tmp);
7683 #endif /* G_OS_UNIX */
7684 }
7685
7686 #ifdef G_OS_UNIX
7687 static gint compose_exec_ext_editor_real(const gchar *file)
7688 {
7689         gchar buf[1024];
7690         gchar *p;
7691         gchar **cmdline;
7692         pid_t pid;
7693
7694         g_return_val_if_fail(file != NULL, -1);
7695
7696         if ((pid = fork()) < 0) {
7697                 perror("fork");
7698                 return -1;
7699         }
7700
7701         if (pid != 0) return pid;
7702
7703         /* grandchild process */
7704
7705         if (setpgid(0, getppid()))
7706                 perror("setpgid");
7707
7708         if (prefs_common.ext_editor_cmd &&
7709             (p = strchr(prefs_common.ext_editor_cmd, '%')) &&
7710             *(p + 1) == 's' && !strchr(p + 2, '%')) {
7711                 g_snprintf(buf, sizeof(buf), prefs_common.ext_editor_cmd, file);
7712         } else {
7713                 if (prefs_common.ext_editor_cmd)
7714                         g_warning("External editor command line is invalid: '%s'\n",
7715                                   prefs_common.ext_editor_cmd);
7716                 g_snprintf(buf, sizeof(buf), DEFAULT_EDITOR_CMD, file);
7717         }
7718
7719         cmdline = strsplit_with_quote(buf, " ", 1024);
7720         execvp(cmdline[0], cmdline);
7721
7722         perror("execvp");
7723         g_strfreev(cmdline);
7724
7725         _exit(1);
7726 }
7727
7728 static gboolean compose_ext_editor_kill(Compose *compose)
7729 {
7730         pid_t pgid = compose->exteditor_pid * -1;
7731         gint ret;
7732
7733         ret = kill(pgid, 0);
7734
7735         if (ret == 0 || (ret == -1 && EPERM == errno)) {
7736                 AlertValue val;
7737                 gchar *msg;
7738
7739                 msg = g_strdup_printf
7740                         (_("The external editor is still working.\n"
7741                            "Force terminating the process?\n"
7742                            "process group id: %d"), -pgid);
7743                 val = alertpanel_full(_("Notice"), msg, GTK_STOCK_NO, GTK_STOCK_YES,
7744                                       NULL, FALSE, NULL, ALERT_WARNING, G_ALERTDEFAULT);
7745                         
7746                 g_free(msg);
7747
7748                 if (val == G_ALERTALTERNATE) {
7749                         g_source_remove(compose->exteditor_tag);
7750                         g_io_channel_shutdown(compose->exteditor_ch,
7751                                               FALSE, NULL);
7752                         g_io_channel_unref(compose->exteditor_ch);
7753
7754                         if (kill(pgid, SIGTERM) < 0) perror("kill");
7755                         waitpid(compose->exteditor_pid, NULL, 0);
7756
7757                         g_warning("Terminated process group id: %d", -pgid);
7758                         g_warning("Temporary file: %s",
7759                                   compose->exteditor_file);
7760
7761                         compose_set_ext_editor_sensitive(compose, TRUE);
7762
7763                         g_free(compose->exteditor_file);
7764                         compose->exteditor_file    = NULL;
7765                         compose->exteditor_pid     = -1;
7766                         compose->exteditor_ch      = NULL;
7767                         compose->exteditor_tag     = -1;
7768                 } else
7769                         return FALSE;
7770         }
7771
7772         return TRUE;
7773 }
7774
7775 static gboolean compose_input_cb(GIOChannel *source, GIOCondition condition,
7776                                  gpointer data)
7777 {
7778         gchar buf[3] = "3";
7779         Compose *compose = (Compose *)data;
7780         gsize bytes_read;
7781
7782         debug_print(_("Compose: input from monitoring process\n"));
7783
7784         g_io_channel_read_chars(source, buf, sizeof(buf), &bytes_read, NULL);
7785
7786         g_io_channel_shutdown(source, FALSE, NULL);
7787         g_io_channel_unref(source);
7788
7789         waitpid(compose->exteditor_pid, NULL, 0);
7790
7791         if (buf[0] == '0') {            /* success */
7792                 GtkTextView *text = GTK_TEXT_VIEW(compose->text);
7793                 GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
7794
7795                 gtk_text_buffer_set_text(buffer, "", -1);
7796                 compose_insert_file(compose, compose->exteditor_file);
7797                 compose_changed_cb(NULL, compose);
7798
7799                 if (g_unlink(compose->exteditor_file) < 0)
7800                         FILE_OP_ERROR(compose->exteditor_file, "unlink");
7801         } else if (buf[0] == '1') {     /* failed */
7802                 g_warning("Couldn't exec external editor\n");
7803                 if (g_unlink(compose->exteditor_file) < 0)
7804                         FILE_OP_ERROR(compose->exteditor_file, "unlink");
7805         } else if (buf[0] == '2') {
7806                 g_warning("Couldn't write to file\n");
7807         } else if (buf[0] == '3') {
7808                 g_warning("Pipe read failed\n");
7809         }
7810
7811         compose_set_ext_editor_sensitive(compose, TRUE);
7812
7813         g_free(compose->exteditor_file);
7814         compose->exteditor_file    = NULL;
7815         compose->exteditor_pid     = -1;
7816         compose->exteditor_ch      = NULL;
7817         compose->exteditor_tag     = -1;
7818
7819         return FALSE;
7820 }
7821
7822 static void compose_set_ext_editor_sensitive(Compose *compose,
7823                                              gboolean sensitive)
7824 {
7825         GtkItemFactory *ifactory;
7826
7827         ifactory = gtk_item_factory_from_widget(compose->menubar);
7828
7829         menu_set_sensitive(ifactory, "/Message/Send", sensitive);
7830         menu_set_sensitive(ifactory, "/Message/Send later", sensitive);
7831         menu_set_sensitive(ifactory, "/Message/Insert file", sensitive);
7832         menu_set_sensitive(ifactory, "/Message/Insert signature", sensitive);
7833         menu_set_sensitive(ifactory, "/Edit/Wrap current paragraph", sensitive);
7834         menu_set_sensitive(ifactory, "/Edit/Wrap all long lines", sensitive);
7835         menu_set_sensitive(ifactory, "/Edit/Edit with external editor",
7836                            sensitive);
7837
7838         gtk_widget_set_sensitive(compose->text,                       sensitive);
7839         if (compose->toolbar->send_btn)
7840                 gtk_widget_set_sensitive(compose->toolbar->send_btn,      sensitive);
7841         if (compose->toolbar->sendl_btn)
7842                 gtk_widget_set_sensitive(compose->toolbar->sendl_btn,     sensitive);
7843         if (compose->toolbar->draft_btn)
7844                 gtk_widget_set_sensitive(compose->toolbar->draft_btn,     sensitive);
7845         if (compose->toolbar->insert_btn)
7846                 gtk_widget_set_sensitive(compose->toolbar->insert_btn,    sensitive);
7847         if (compose->toolbar->sig_btn)
7848                 gtk_widget_set_sensitive(compose->toolbar->sig_btn,       sensitive);
7849         if (compose->toolbar->exteditor_btn)
7850                 gtk_widget_set_sensitive(compose->toolbar->exteditor_btn, sensitive);
7851         if (compose->toolbar->linewrap_current_btn)
7852                 gtk_widget_set_sensitive(compose->toolbar->linewrap_current_btn, sensitive);
7853         if (compose->toolbar->linewrap_all_btn)
7854                 gtk_widget_set_sensitive(compose->toolbar->linewrap_all_btn, sensitive);
7855 }
7856 #endif /* G_OS_UNIX */
7857
7858 /**
7859  * compose_undo_state_changed:
7860  *
7861  * Change the sensivity of the menuentries undo and redo
7862  **/
7863 static void compose_undo_state_changed(UndoMain *undostruct, gint undo_state,
7864                                        gint redo_state, gpointer data)
7865 {
7866         GtkWidget *widget = GTK_WIDGET(data);
7867         GtkItemFactory *ifactory;
7868
7869         g_return_if_fail(widget != NULL);
7870
7871         ifactory = gtk_item_factory_from_widget(widget);
7872
7873         switch (undo_state) {
7874         case UNDO_STATE_TRUE:
7875                 if (!undostruct->undo_state) {
7876                         undostruct->undo_state = TRUE;
7877                         menu_set_sensitive(ifactory, "/Edit/Undo", TRUE);
7878                 }
7879                 break;
7880         case UNDO_STATE_FALSE:
7881                 if (undostruct->undo_state) {
7882                         undostruct->undo_state = FALSE;
7883                         menu_set_sensitive(ifactory, "/Edit/Undo", FALSE);
7884                 }
7885                 break;
7886         case UNDO_STATE_UNCHANGED:
7887                 break;
7888         case UNDO_STATE_REFRESH:
7889                 menu_set_sensitive(ifactory, "/Edit/Undo",
7890                                    undostruct->undo_state);
7891                 break;
7892         default:
7893                 g_warning("Undo state not recognized");
7894                 break;
7895         }
7896
7897         switch (redo_state) {
7898         case UNDO_STATE_TRUE:
7899                 if (!undostruct->redo_state) {
7900                         undostruct->redo_state = TRUE;
7901                         menu_set_sensitive(ifactory, "/Edit/Redo", TRUE);
7902                 }
7903                 break;
7904         case UNDO_STATE_FALSE:
7905                 if (undostruct->redo_state) {
7906                         undostruct->redo_state = FALSE;
7907                         menu_set_sensitive(ifactory, "/Edit/Redo", FALSE);
7908                 }
7909                 break;
7910         case UNDO_STATE_UNCHANGED:
7911                 break;
7912         case UNDO_STATE_REFRESH:
7913                 menu_set_sensitive(ifactory, "/Edit/Redo",
7914                                    undostruct->redo_state);
7915                 break;
7916         default:
7917                 g_warning("Redo state not recognized");
7918                 break;
7919         }
7920 }
7921
7922 /* callback functions */
7923
7924 /* compose_edit_size_alloc() - called when resized. don't know whether Gtk
7925  * includes "non-client" (windows-izm) in calculation, so this calculation
7926  * may not be accurate.
7927  */
7928 static gboolean compose_edit_size_alloc(GtkEditable *widget,
7929                                         GtkAllocation *allocation,
7930                                         GtkSHRuler *shruler)
7931 {
7932         if (prefs_common.show_ruler) {
7933                 gint char_width = 0, char_height = 0;
7934                 gint line_width_in_chars;
7935
7936                 gtkut_get_font_size(GTK_WIDGET(widget),
7937                                     &char_width, &char_height);
7938                 line_width_in_chars =
7939                         (allocation->width - allocation->x) / char_width;
7940
7941                 /* got the maximum */
7942                 gtk_ruler_set_range(GTK_RULER(shruler),
7943                                     0.0, line_width_in_chars, 0,
7944                                     /*line_width_in_chars*/ char_width);
7945         }
7946
7947         return TRUE;
7948 }
7949
7950 static void account_activated(GtkComboBox *optmenu, gpointer data)
7951 {
7952         Compose *compose = (Compose *)data;
7953
7954         PrefsAccount *ac;
7955         gchar *folderidentifier;
7956         gint account_id = 0;
7957         GtkTreeModel *menu;
7958         GtkTreeIter iter;
7959
7960         /* Get ID of active account in the combo box */
7961         menu = gtk_combo_box_get_model(optmenu);
7962         gtk_combo_box_get_active_iter(optmenu, &iter);
7963         gtk_tree_model_get(menu, &iter, 1, &account_id, -1);
7964
7965         ac = account_find_from_id(account_id);
7966         g_return_if_fail(ac != NULL);
7967
7968         if (ac != compose->account)
7969                 compose_select_account(compose, ac, FALSE);
7970
7971         /* Set message save folder */
7972         if (account_get_special_folder(compose->account, F_OUTBOX)) {
7973                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), prefs_common.savemsg);
7974         }
7975         g_signal_connect(G_OBJECT(compose->savemsg_checkbtn), "toggled",
7976                          G_CALLBACK(compose_savemsg_checkbtn_cb), compose);
7977                            
7978         gtk_editable_delete_text(GTK_EDITABLE(compose->savemsg_entry), 0, -1);
7979         if (account_get_special_folder(compose->account, F_OUTBOX)) {
7980                 folderidentifier = folder_item_get_identifier(account_get_special_folder
7981                                   (compose->account, F_OUTBOX));
7982                 gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), folderidentifier);
7983                 g_free(folderidentifier);
7984         }
7985 }
7986
7987 static void attach_selected(GtkTreeView *tree_view, GtkTreePath *tree_path,
7988                             GtkTreeViewColumn *column, Compose *compose)
7989 {
7990         compose_attach_property(compose);
7991 }
7992
7993 static gboolean attach_button_pressed(GtkWidget *widget, GdkEventButton *event,
7994                                       gpointer data)
7995 {
7996         Compose *compose = (Compose *)data;
7997         GtkTreeSelection *attach_selection;
7998         gint attach_nr_selected;
7999         GtkItemFactory *ifactory;
8000         
8001         if (!event) return FALSE;
8002
8003         if (event->button == 3) {
8004                 attach_selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(widget));
8005                 attach_nr_selected = gtk_tree_selection_count_selected_rows(attach_selection);
8006                 ifactory = gtk_item_factory_from_widget(compose->popupmenu);
8007                         
8008                 if (attach_nr_selected > 0)
8009                 {
8010                         menu_set_sensitive(ifactory, "/Remove", TRUE);
8011                         menu_set_sensitive(ifactory, "/Properties...", TRUE);
8012                 } else {
8013                         menu_set_sensitive(ifactory, "/Remove", FALSE);
8014                         menu_set_sensitive(ifactory, "/Properties...", FALSE);
8015                 }
8016                         
8017                 gtk_menu_popup(GTK_MENU(compose->popupmenu), NULL, NULL,
8018                                NULL, NULL, event->button, event->time);
8019                 return TRUE;                           
8020         }
8021
8022         return FALSE;
8023 }
8024
8025 static gboolean attach_key_pressed(GtkWidget *widget, GdkEventKey *event,
8026                                    gpointer data)
8027 {
8028         Compose *compose = (Compose *)data;
8029
8030         if (!event) return FALSE;
8031
8032         switch (event->keyval) {
8033         case GDK_Delete:
8034                 compose_attach_remove_selected(compose);
8035                 break;
8036         }
8037         return FALSE;
8038 }
8039
8040 static void compose_allow_user_actions (Compose *compose, gboolean allow)
8041 {
8042         GtkItemFactory *ifactory = gtk_item_factory_from_widget(compose->menubar);
8043         toolbar_comp_set_sensitive(compose, allow);
8044         menu_set_sensitive(ifactory, "/Message", allow);
8045         menu_set_sensitive(ifactory, "/Edit", allow);
8046 #if USE_ASPELL
8047         menu_set_sensitive(ifactory, "/Spelling", allow);
8048 #endif  
8049         menu_set_sensitive(ifactory, "/Options", allow);
8050         menu_set_sensitive(ifactory, "/Tools", allow);
8051         menu_set_sensitive(ifactory, "/Help", allow);
8052         
8053         gtk_text_view_set_editable(GTK_TEXT_VIEW(compose->text), allow);
8054
8055 }
8056
8057 static void compose_send_cb(gpointer data, guint action, GtkWidget *widget)
8058 {
8059         Compose *compose = (Compose *)data;
8060         
8061         if (prefs_common.work_offline && 
8062             !inc_offline_should_override(TRUE,
8063                 _("Claws Mail needs network access in order "
8064                   "to send this email.")))
8065                 return;
8066         
8067         if (compose->draft_timeout_tag != -1) { /* CLAWS: disable draft timeout */
8068                 g_source_remove(compose->draft_timeout_tag);
8069                 compose->draft_timeout_tag = -1;
8070         }
8071
8072         compose_send(compose);
8073 }
8074
8075 static void compose_send_later_cb(gpointer data, guint action,
8076                                   GtkWidget *widget)
8077 {
8078         Compose *compose = (Compose *)data;
8079         gint val;
8080
8081         inc_lock();
8082         val = compose_queue_sub(compose, NULL, NULL, NULL, TRUE, TRUE);
8083         inc_unlock();
8084
8085         if (!val) {
8086                 compose_close(compose);
8087         } else if (val == -1) {
8088                 alertpanel_error(_("Could not queue message."));
8089         } else if (val == -2) {
8090                 alertpanel_error(_("Could not queue message:\n\n%s."), strerror(errno));
8091         } else if (val == -3) {
8092                 if (privacy_peek_error())
8093                 alertpanel_error(_("Could not queue message for sending:\n\n"
8094                                    "Signature failed: %s"), privacy_get_error());
8095         } else if (val == -4) {
8096                 alertpanel_error(_("Could not queue message for sending:\n\n"
8097                                    "Charset conversion failed."));
8098         } else if (val == -5) {
8099                 alertpanel_error(_("Could not queue message for sending:\n\n"
8100                                    "Couldn't get recipient encryption key."));
8101         }
8102         toolbar_main_set_sensitive(mainwindow_get_mainwindow());
8103 }
8104
8105 void compose_draft (gpointer data, guint action) 
8106 {
8107         compose_draft_cb(data, action, NULL);   
8108 }
8109
8110 #define DRAFTED_AT_EXIT "drafted_at_exit"
8111 void compose_clear_exit_drafts(void)
8112 {
8113         gchar *filepath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
8114                                       DRAFTED_AT_EXIT, NULL);
8115         if (is_file_exist(filepath))
8116                 g_unlink(filepath);
8117         
8118         g_free(filepath);
8119 }
8120
8121 static void compose_register_draft(MsgInfo *info)
8122 {
8123         gchar *filepath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
8124                                       DRAFTED_AT_EXIT, NULL);
8125         FILE *fp = fopen(filepath, "ab");
8126         
8127         if (fp) {
8128                 fprintf(fp, "%s\t%d\n", folder_item_get_identifier(info->folder), 
8129                                 info->msgnum);
8130                 fclose(fp);
8131         }
8132                 
8133         g_free(filepath);       
8134 }
8135
8136 void compose_reopen_exit_drafts(void)
8137 {
8138         gchar *filepath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
8139                                       DRAFTED_AT_EXIT, NULL);
8140         FILE *fp = fopen(filepath, "rb");
8141         gchar buf[1024];
8142         
8143         if (fp) {
8144                 while (fgets(buf, sizeof(buf), fp)) {
8145                         gchar **parts = g_strsplit(buf, "\t", 2);
8146                         const gchar *folder = parts[0];
8147                         int msgnum = parts[1] ? atoi(parts[1]):-1;
8148                         
8149                         if (folder && *folder && msgnum > -1) {
8150                                 FolderItem *item = folder_find_item_from_identifier(folder);
8151                                 MsgInfo *info = folder_item_get_msginfo(item, msgnum);
8152                                 if (info)
8153                                         compose_reedit(info, FALSE);
8154                         }
8155                         g_strfreev(parts);
8156                 }       
8157                 fclose(fp);
8158         }       
8159         g_free(filepath);
8160         compose_clear_exit_drafts();
8161 }
8162
8163 static void compose_draft_cb(gpointer data, guint action, GtkWidget *widget)
8164 {
8165         Compose *compose = (Compose *)data;
8166         FolderItem *draft;
8167         gchar *tmp;
8168         gint msgnum;
8169         MsgFlags flag = {0, 0};
8170         static gboolean lock = FALSE;
8171         MsgInfo *newmsginfo;
8172         FILE *fp;
8173         gboolean target_locked = FALSE;
8174         
8175         if (lock) return;
8176
8177         draft = account_get_special_folder(compose->account, F_DRAFT);
8178         g_return_if_fail(draft != NULL);
8179         
8180         if (!g_mutex_trylock(compose->mutex)) {
8181                 /* we don't want to lock the mutex once it's available,
8182                  * because as the only other part of compose.c locking
8183                  * it is compose_close - which means once unlocked,
8184                  * the compose struct will be freed */
8185                 debug_print("couldn't lock mutex, probably sending\n");
8186                 return;
8187         }
8188         
8189         lock = TRUE;
8190
8191         tmp = g_strdup_printf("%s%cdraft.%p", get_tmp_dir(),
8192                               G_DIR_SEPARATOR, compose);
8193         if ((fp = g_fopen(tmp, "wb")) == NULL) {
8194                 FILE_OP_ERROR(tmp, "fopen");
8195                 goto unlock;
8196         }
8197
8198         /* chmod for security */
8199         if (change_file_mode_rw(fp, tmp) < 0) {
8200                 FILE_OP_ERROR(tmp, "chmod");
8201                 g_warning("can't change file mode\n");
8202         }
8203
8204         /* Save draft infos */
8205         fprintf(fp, "X-Claws-Account-Id:%d\n", compose->account->account_id);
8206         fprintf(fp, "S:%s\n", compose->account->address);
8207
8208         if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn))) {
8209                 gchar *savefolderid;
8210
8211                 savefolderid = gtk_editable_get_chars(GTK_EDITABLE(compose->savemsg_entry), 0, -1);
8212                 fprintf(fp, "SCF:%s\n", savefolderid);
8213                 g_free(savefolderid);
8214         }
8215         if (compose->return_receipt) {
8216                 fprintf(fp, "RRCPT:1\n");
8217         }
8218         if (compose->privacy_system) {
8219                 fprintf(fp, "X-Claws-Sign:%d\n", compose->use_signing);
8220                 fprintf(fp, "X-Claws-Encrypt:%d\n", compose->use_encryption);
8221                 fprintf(fp, "X-Claws-Privacy-System:%s\n", compose->privacy_system);
8222         }
8223
8224         /* Message-ID of message replying to */
8225         if ((compose->replyinfo != NULL) && (compose->replyinfo->msgid != NULL)) {
8226                 gchar *folderid;
8227                 
8228                 folderid = folder_item_get_identifier(compose->replyinfo->folder);
8229                 fprintf(fp, "RMID:%s\t%d\t%s\n", folderid, compose->replyinfo->msgnum, compose->replyinfo->msgid);
8230                 g_free(folderid);
8231         }
8232         /* Message-ID of message forwarding to */
8233         if ((compose->fwdinfo != NULL) && (compose->fwdinfo->msgid != NULL)) {
8234                 gchar *folderid;
8235                 
8236                 folderid = folder_item_get_identifier(compose->fwdinfo->folder);
8237                 fprintf(fp, "FMID:%s\t%d\t%s\n", folderid, compose->fwdinfo->msgnum, compose->fwdinfo->msgid);
8238                 g_free(folderid);
8239         }
8240
8241         /* end of headers */
8242         fprintf(fp, "X-Claws-End-Special-Headers: 1\n");
8243
8244         if (compose_write_to_file(compose, fp, COMPOSE_WRITE_FOR_STORE, action != COMPOSE_AUTO_SAVE) < 0) {
8245                 fclose(fp);
8246                 g_unlink(tmp);
8247                 g_free(tmp);
8248                 goto unlock;
8249         }
8250         fclose(fp);
8251         
8252         if (compose->targetinfo) {
8253                 target_locked = MSG_IS_LOCKED(compose->targetinfo->flags);
8254                 flag.perm_flags = target_locked?MSG_LOCKED:0;
8255         }
8256         flag.tmp_flags = MSG_DRAFT;
8257
8258         folder_item_scan(draft);
8259         if ((msgnum = folder_item_add_msg(draft, tmp, &flag, TRUE)) < 0) {
8260                 g_unlink(tmp);
8261                 g_free(tmp);
8262                 if (action != COMPOSE_AUTO_SAVE)
8263                         alertpanel_error(_("Could not save draft."));
8264                 goto unlock;
8265         }
8266         g_free(tmp);
8267
8268         if (compose->mode == COMPOSE_REEDIT) {
8269                 compose_remove_reedit_target(compose, TRUE);
8270         }
8271
8272         newmsginfo = folder_item_get_msginfo(draft, msgnum);
8273         if (newmsginfo) {
8274                 procmsg_msginfo_unset_flags(newmsginfo, ~0, ~0);
8275                 if (target_locked)
8276                         procmsg_msginfo_set_flags(newmsginfo, MSG_LOCKED, MSG_DRAFT);
8277                 else
8278                         procmsg_msginfo_set_flags(newmsginfo, 0, MSG_DRAFT);
8279                 if (compose_use_attach(compose) && action != COMPOSE_AUTO_SAVE)
8280                         procmsg_msginfo_set_flags(newmsginfo, 0,
8281                                                   MSG_HAS_ATTACHMENT);
8282
8283                 if (action == COMPOSE_DRAFT_FOR_EXIT) {
8284                         compose_register_draft(newmsginfo);
8285                 }
8286                 procmsg_msginfo_free(newmsginfo);
8287         }
8288         
8289         folder_item_scan(draft);
8290         
8291         if (action == COMPOSE_QUIT_EDITING || action == COMPOSE_DRAFT_FOR_EXIT) {
8292                 lock = FALSE;
8293                 g_mutex_unlock(compose->mutex); /* must be done before closing */
8294                 compose_close(compose);
8295                 return;
8296         } else {
8297                 struct stat s;
8298                 gchar *path;
8299
8300                 path = folder_item_fetch_msg(draft, msgnum);
8301                 if (path == NULL) {
8302                         debug_print("can't fetch %s:%d\n",draft->path, msgnum);
8303                         goto unlock;
8304                 }
8305                 if (g_stat(path, &s) < 0) {
8306                         FILE_OP_ERROR(path, "stat");
8307                         g_free(path);
8308                         goto unlock;
8309                 }
8310                 g_free(path);
8311
8312                 procmsg_msginfo_free(compose->targetinfo);
8313                 compose->targetinfo = procmsg_msginfo_new();
8314                 compose->targetinfo->msgnum = msgnum;
8315                 compose->targetinfo->size = s.st_size;
8316                 compose->targetinfo->mtime = s.st_mtime;
8317                 compose->targetinfo->folder = draft;
8318                 if (target_locked)
8319                         procmsg_msginfo_set_flags(compose->targetinfo, MSG_LOCKED, 0);
8320                 compose->mode = COMPOSE_REEDIT;
8321                 
8322                 if (action == COMPOSE_AUTO_SAVE) {
8323                         compose->autosaved_draft = compose->targetinfo;
8324                 }
8325                 compose->modified = FALSE;
8326                 compose_set_title(compose);
8327         }
8328 unlock:
8329         lock = FALSE;
8330         g_mutex_unlock(compose->mutex);
8331 }
8332
8333 static void compose_attach_cb(gpointer data, guint action, GtkWidget *widget)
8334 {
8335         Compose *compose = (Compose *)data;
8336         GList *file_list;
8337
8338         if (compose->redirect_filename != NULL)
8339                 return;
8340
8341         file_list = filesel_select_multiple_files_open(_("Select file"));
8342
8343         if (file_list) {
8344                 GList *tmp;
8345
8346                 for ( tmp = file_list; tmp; tmp = tmp->next) {
8347                         gchar *file = (gchar *) tmp->data;
8348                         gchar *utf8_filename = conv_filename_to_utf8(file);
8349                         compose_attach_append(compose, file, utf8_filename, NULL);
8350                         compose_changed_cb(NULL, compose);
8351                         g_free(file);
8352                         g_free(utf8_filename);
8353                 }
8354                 g_list_free(file_list);
8355         }               
8356 }
8357
8358 static void compose_insert_file_cb(gpointer data, guint action,
8359                                    GtkWidget *widget)
8360 {
8361         Compose *compose = (Compose *)data;
8362         GList *file_list;
8363
8364         file_list = filesel_select_multiple_files_open(_("Select file"));
8365
8366         if (file_list) {
8367                 GList *tmp;
8368
8369                 for ( tmp = file_list; tmp; tmp = tmp->next) {
8370                         gchar *file = (gchar *) tmp->data;
8371                         gchar *filedup = g_strdup(file);
8372                         gchar *shortfile = g_path_get_basename(filedup);
8373                         ComposeInsertResult res;
8374
8375                         res = compose_insert_file(compose, file);
8376                         if (res == COMPOSE_INSERT_READ_ERROR) {
8377                                 alertpanel_error(_("File '%s' could not be read."), shortfile);
8378                         } else if (res == COMPOSE_INSERT_INVALID_CHARACTER) {
8379                                 alertpanel_error(_("File '%s' contained invalid characters\n"
8380                                                    "for the current encoding, insertion may be incorrect."), shortfile);
8381                         }
8382                         g_free(shortfile);
8383                         g_free(filedup);
8384                         g_free(file);
8385                 }
8386                 g_list_free(file_list);
8387         }
8388 }
8389
8390 static void compose_insert_sig_cb(gpointer data, guint action,
8391                                   GtkWidget *widget)
8392 {
8393         Compose *compose = (Compose *)data;
8394
8395         compose_insert_sig(compose, FALSE);
8396 }
8397
8398 static gint compose_delete_cb(GtkWidget *widget, GdkEventAny *event,
8399                               gpointer data)
8400 {
8401         gint x, y;
8402         Compose *compose = (Compose *)data;
8403
8404         gtkut_widget_get_uposition(widget, &x, &y);
8405         prefs_common.compose_x = x;
8406         prefs_common.compose_y = y;
8407
8408         if (compose->sending || compose->updating)
8409                 return TRUE;
8410         compose_close_cb(compose, 0, NULL);
8411         return TRUE;
8412 }
8413
8414 void compose_close_toolbar(Compose *compose)
8415 {
8416         compose_close_cb(compose, 0, NULL);
8417 }
8418
8419 static void compose_close_cb(gpointer data, guint action, GtkWidget *widget)
8420 {
8421         Compose *compose = (Compose *)data;
8422         AlertValue val;
8423
8424 #ifdef G_OS_UNIX
8425         if (compose->exteditor_tag != -1) {
8426                 if (!compose_ext_editor_kill(compose))
8427                         return;
8428         }
8429 #endif
8430
8431         if (compose->modified) {
8432                 val = alertpanel(_("Discard message"),
8433                                  _("This message has been modified. Discard it?"),
8434                                  _("_Discard"), _("_Save to Drafts"), GTK_STOCK_CANCEL);
8435
8436                 switch (val) {
8437                 case G_ALERTDEFAULT:
8438                         if (prefs_common.autosave)
8439                                 compose_remove_draft(compose);                  
8440                         break;
8441                 case G_ALERTALTERNATE:
8442                         compose_draft_cb(data, COMPOSE_QUIT_EDITING, NULL);
8443                         return;
8444                 default:
8445                         return;
8446                 }
8447         }
8448
8449         compose_close(compose);
8450 }
8451
8452 static void compose_set_encoding_cb(gpointer data, guint action,
8453                                     GtkWidget *widget)
8454 {
8455         Compose *compose = (Compose *)data;
8456
8457         if (GTK_CHECK_MENU_ITEM(widget)->active)
8458                 compose->out_encoding = (CharSet)action;
8459 }
8460
8461 static void compose_address_cb(gpointer data, guint action, GtkWidget *widget)
8462 {
8463         Compose *compose = (Compose *)data;
8464
8465         addressbook_open(compose);
8466 }
8467
8468 static void compose_template_activate_cb(GtkWidget *widget, gpointer data)
8469 {
8470         Compose *compose = (Compose *)data;
8471         Template *tmpl;
8472         gchar *msg;
8473         AlertValue val;
8474
8475         tmpl = g_object_get_data(G_OBJECT(widget), "template");
8476         g_return_if_fail(tmpl != NULL);
8477
8478         msg = g_strdup_printf(_("Do you want to apply the template '%s' ?"),
8479                               tmpl->name);
8480         val = alertpanel(_("Apply template"), msg,
8481                          _("_Replace"), _("_Insert"), GTK_STOCK_CANCEL);
8482         g_free(msg);
8483
8484         if (val == G_ALERTDEFAULT)
8485                 compose_template_apply(compose, tmpl, TRUE);
8486         else if (val == G_ALERTALTERNATE)
8487                 compose_template_apply(compose, tmpl, FALSE);
8488 }
8489
8490 static void compose_ext_editor_cb(gpointer data, guint action,
8491                                   GtkWidget *widget)
8492 {
8493         Compose *compose = (Compose *)data;
8494
8495         compose_exec_ext_editor(compose);
8496 }
8497
8498 static void compose_undo_cb(Compose *compose)
8499 {
8500         gboolean prev_autowrap = compose->autowrap;
8501
8502         compose->autowrap = FALSE;
8503         undo_undo(compose->undostruct);
8504         compose->autowrap = prev_autowrap;
8505 }
8506
8507 static void compose_redo_cb(Compose *compose)
8508 {
8509         gboolean prev_autowrap = compose->autowrap;
8510         
8511         compose->autowrap = FALSE;
8512         undo_redo(compose->undostruct);
8513         compose->autowrap = prev_autowrap;
8514 }
8515
8516 static void entry_cut_clipboard(GtkWidget *entry)
8517 {
8518         if (GTK_IS_EDITABLE(entry))
8519                 gtk_editable_cut_clipboard (GTK_EDITABLE(entry));
8520         else if (GTK_IS_TEXT_VIEW(entry))
8521                 gtk_text_buffer_cut_clipboard(
8522                         gtk_text_view_get_buffer(GTK_TEXT_VIEW(entry)),
8523                         gtk_clipboard_get(GDK_SELECTION_CLIPBOARD),
8524                         TRUE);
8525 }
8526
8527 static void entry_copy_clipboard(GtkWidget *entry)
8528 {
8529         if (GTK_IS_EDITABLE(entry))
8530                 gtk_editable_copy_clipboard (GTK_EDITABLE(entry));
8531         else if (GTK_IS_TEXT_VIEW(entry))
8532                 gtk_text_buffer_copy_clipboard(
8533                         gtk_text_view_get_buffer(GTK_TEXT_VIEW(entry)),
8534                         gtk_clipboard_get(GDK_SELECTION_CLIPBOARD));
8535 }
8536
8537 static void entry_paste_clipboard(Compose *compose, GtkWidget *entry, 
8538                                   gboolean wrap, GdkAtom clip, GtkTextIter *insert_place)
8539 {
8540         if (GTK_IS_TEXT_VIEW(entry)) {
8541                 GtkTextBuffer *buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(entry));
8542                 GtkTextMark *mark_start = gtk_text_buffer_get_insert(buffer);
8543                 GtkTextIter start_iter, end_iter;
8544                 gint start, end;
8545                 gchar *contents = gtk_clipboard_wait_for_text(gtk_clipboard_get(clip));
8546
8547                 if (contents == NULL)
8548                         return;
8549
8550                 undo_paste_clipboard(GTK_TEXT_VIEW(compose->text), compose->undostruct);
8551
8552                 /* we shouldn't delete the selection when middle-click-pasting, or we
8553                  * can't mid-click-paste our own selection */
8554                 if (clip != GDK_SELECTION_PRIMARY) {
8555                         gtk_text_buffer_delete_selection(buffer, FALSE, TRUE);
8556                 }
8557                 
8558                 if (insert_place == NULL) {
8559                         /* if insert_place isn't specified, insert at the cursor.
8560                          * used for Ctrl-V pasting */
8561                         gtk_text_buffer_get_iter_at_mark(buffer, &start_iter, mark_start);
8562                         start = gtk_text_iter_get_offset(&start_iter);
8563                         gtk_text_buffer_insert(buffer, &start_iter, contents, strlen(contents));
8564                 } else {
8565                         /* if insert_place is specified, paste here.
8566                          * used for mid-click-pasting */
8567                         start = gtk_text_iter_get_offset(insert_place);
8568                         gtk_text_buffer_insert(buffer, insert_place, contents, strlen(contents));
8569                 }
8570                 
8571                 if (!wrap) {
8572                         /* paste unwrapped: mark the paste so it's not wrapped later */
8573                         end = start + strlen(contents);
8574                         gtk_text_buffer_get_iter_at_offset(buffer, &start_iter, start);
8575                         gtk_text_buffer_get_iter_at_offset(buffer, &end_iter, end);
8576                         gtk_text_buffer_apply_tag_by_name(buffer, "no_wrap", &start_iter, &end_iter);
8577                 } else if (wrap && clip == GDK_SELECTION_PRIMARY) {
8578                         /* rewrap paragraph now (after a mid-click-paste) */
8579                         mark_start = gtk_text_buffer_get_insert(buffer);
8580                         gtk_text_buffer_get_iter_at_mark(buffer, &start_iter, mark_start);
8581                         gtk_text_iter_backward_char(&start_iter);
8582                         compose_beautify_paragraph(compose, &start_iter, TRUE);
8583                 }
8584         } else if (GTK_IS_EDITABLE(entry))
8585                 gtk_editable_paste_clipboard (GTK_EDITABLE(entry));
8586         
8587 }
8588
8589 static void entry_allsel(GtkWidget *entry)
8590 {
8591         if (GTK_IS_EDITABLE(entry))
8592                 gtk_editable_select_region(GTK_EDITABLE(entry), 0, -1);
8593         else if (GTK_IS_TEXT_VIEW(entry)) {
8594                 GtkTextIter startiter, enditer;
8595                 GtkTextBuffer *textbuf;
8596
8597                 textbuf = gtk_text_view_get_buffer(GTK_TEXT_VIEW(entry));
8598                 gtk_text_buffer_get_start_iter(textbuf, &startiter);
8599                 gtk_text_buffer_get_end_iter(textbuf, &enditer);
8600
8601                 gtk_text_buffer_move_mark_by_name(textbuf, 
8602                         "selection_bound", &startiter);
8603                 gtk_text_buffer_move_mark_by_name(textbuf, 
8604                         "insert", &enditer);
8605         }
8606 }
8607
8608 static void compose_cut_cb(Compose *compose)
8609 {
8610         if (compose->focused_editable 
8611 #ifndef MAEMO
8612             && GTK_WIDGET_HAS_FOCUS(compose->focused_editable)
8613 #endif
8614             )
8615                 entry_cut_clipboard(compose->focused_editable);
8616 }
8617
8618 static void compose_copy_cb(Compose *compose)
8619 {
8620         if (compose->focused_editable 
8621 #ifndef MAEMO
8622             && GTK_WIDGET_HAS_FOCUS(compose->focused_editable)
8623 #endif
8624             )
8625                 entry_copy_clipboard(compose->focused_editable);
8626 }
8627
8628 static void compose_paste_cb(Compose *compose)
8629 {
8630         gint prev_autowrap;
8631         GtkTextBuffer *buffer;
8632         BLOCK_WRAP();
8633         if (compose->focused_editable &&
8634             GTK_WIDGET_HAS_FOCUS(compose->focused_editable))
8635                 entry_paste_clipboard(compose, compose->focused_editable, 
8636                                 prefs_common.linewrap_pastes,
8637                                 GDK_SELECTION_CLIPBOARD, NULL);
8638         UNBLOCK_WRAP();
8639 }
8640
8641 static void compose_paste_as_quote_cb(Compose *compose)
8642 {
8643         gint wrap_quote = prefs_common.linewrap_quote;
8644         if (compose->focused_editable 
8645 #ifndef MAEMO
8646             && GTK_WIDGET_HAS_FOCUS(compose->focused_editable)
8647 #endif
8648             ) {
8649                 /* let text_insert() (called directly or at a later time
8650                  * after the gtk_editable_paste_clipboard) know that 
8651                  * text is to be inserted as a quotation. implemented
8652                  * by using a simple refcount... */
8653                 gint paste_as_quotation = GPOINTER_TO_INT(g_object_get_data(
8654                                                 G_OBJECT(compose->focused_editable),
8655                                                 "paste_as_quotation"));
8656                 g_object_set_data(G_OBJECT(compose->focused_editable),
8657                                     "paste_as_quotation",
8658                                     GINT_TO_POINTER(paste_as_quotation + 1));
8659                 prefs_common.linewrap_quote = prefs_common.linewrap_pastes;
8660                 entry_paste_clipboard(compose, compose->focused_editable, 
8661                                 prefs_common.linewrap_pastes,
8662                                 GDK_SELECTION_CLIPBOARD, NULL);
8663                 prefs_common.linewrap_quote = wrap_quote;
8664         }
8665 }
8666
8667 static void compose_paste_no_wrap_cb(Compose *compose)
8668 {
8669         gint prev_autowrap;
8670         GtkTextBuffer *buffer;
8671         BLOCK_WRAP();
8672         if (compose->focused_editable 
8673 #ifndef MAEMO
8674             && GTK_WIDGET_HAS_FOCUS(compose->focused_editable)
8675 #endif
8676             )
8677                 entry_paste_clipboard(compose, compose->focused_editable, FALSE,
8678                         GDK_SELECTION_CLIPBOARD, NULL);
8679         UNBLOCK_WRAP();
8680 }
8681
8682 static void compose_paste_wrap_cb(Compose *compose)
8683 {
8684         gint prev_autowrap;
8685         GtkTextBuffer *buffer;
8686         BLOCK_WRAP();
8687         if (compose->focused_editable 
8688 #ifndef MAEMO
8689             && GTK_WIDGET_HAS_FOCUS(compose->focused_editable)
8690 #endif
8691             )
8692                 entry_paste_clipboard(compose, compose->focused_editable, TRUE,
8693                         GDK_SELECTION_CLIPBOARD, NULL);
8694         UNBLOCK_WRAP();
8695 }
8696
8697 static void compose_allsel_cb(Compose *compose)
8698 {
8699         if (compose->focused_editable 
8700 #ifndef MAEMO
8701             && GTK_WIDGET_HAS_FOCUS(compose->focused_editable)
8702 #endif
8703             )
8704                 entry_allsel(compose->focused_editable);
8705 }
8706
8707 static void textview_move_beginning_of_line (GtkTextView *text)
8708 {
8709         GtkTextBuffer *buffer;
8710         GtkTextMark *mark;
8711         GtkTextIter ins;
8712
8713         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8714
8715         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8716         mark = gtk_text_buffer_get_insert(buffer);
8717         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8718         gtk_text_iter_set_line_offset(&ins, 0);
8719         gtk_text_buffer_place_cursor(buffer, &ins);
8720 }
8721
8722 static void textview_move_forward_character (GtkTextView *text)
8723 {
8724         GtkTextBuffer *buffer;
8725         GtkTextMark *mark;
8726         GtkTextIter ins;
8727
8728         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8729
8730         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8731         mark = gtk_text_buffer_get_insert(buffer);
8732         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8733         if (gtk_text_iter_forward_cursor_position(&ins))
8734                 gtk_text_buffer_place_cursor(buffer, &ins);
8735 }
8736
8737 static void textview_move_backward_character (GtkTextView *text)
8738 {
8739         GtkTextBuffer *buffer;
8740         GtkTextMark *mark;
8741         GtkTextIter ins;
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         if (gtk_text_iter_backward_cursor_position(&ins))
8749                 gtk_text_buffer_place_cursor(buffer, &ins);
8750 }
8751
8752 static void textview_move_forward_word (GtkTextView *text)
8753 {
8754         GtkTextBuffer *buffer;
8755         GtkTextMark *mark;
8756         GtkTextIter ins;
8757         gint count;
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         count = gtk_text_iter_inside_word (&ins) ? 2 : 1;
8765         if (gtk_text_iter_forward_word_ends(&ins, count)) {
8766                 gtk_text_iter_backward_word_start(&ins);
8767                 gtk_text_buffer_place_cursor(buffer, &ins);
8768         }
8769 }
8770
8771 static void textview_move_backward_word (GtkTextView *text)
8772 {
8773         GtkTextBuffer *buffer;
8774         GtkTextMark *mark;
8775         GtkTextIter ins;
8776         gint count;
8777
8778         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8779
8780         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8781         mark = gtk_text_buffer_get_insert(buffer);
8782         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8783         count = gtk_text_iter_inside_word (&ins) ? 2 : 1;
8784         if (gtk_text_iter_backward_word_starts(&ins, 1))
8785                 gtk_text_buffer_place_cursor(buffer, &ins);
8786 }
8787
8788 static void textview_move_end_of_line (GtkTextView *text)
8789 {
8790         GtkTextBuffer *buffer;
8791         GtkTextMark *mark;
8792         GtkTextIter ins;
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         if (gtk_text_iter_forward_to_line_end(&ins))
8800                 gtk_text_buffer_place_cursor(buffer, &ins);
8801 }
8802
8803 static void textview_move_next_line (GtkTextView *text)
8804 {
8805         GtkTextBuffer *buffer;
8806         GtkTextMark *mark;
8807         GtkTextIter ins;
8808         gint offset;
8809
8810         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8811
8812         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8813         mark = gtk_text_buffer_get_insert(buffer);
8814         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8815         offset = gtk_text_iter_get_line_offset(&ins);
8816         if (gtk_text_iter_forward_line(&ins)) {
8817                 gtk_text_iter_set_line_offset(&ins, offset);
8818                 gtk_text_buffer_place_cursor(buffer, &ins);
8819         }
8820 }
8821
8822 static void textview_move_previous_line (GtkTextView *text)
8823 {
8824         GtkTextBuffer *buffer;
8825         GtkTextMark *mark;
8826         GtkTextIter ins;
8827         gint offset;
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         offset = gtk_text_iter_get_line_offset(&ins);
8835         if (gtk_text_iter_backward_line(&ins)) {
8836                 gtk_text_iter_set_line_offset(&ins, offset);
8837                 gtk_text_buffer_place_cursor(buffer, &ins);
8838         }
8839 }
8840
8841 static void textview_delete_forward_character (GtkTextView *text)
8842 {
8843         GtkTextBuffer *buffer;
8844         GtkTextMark *mark;
8845         GtkTextIter ins, end_iter;
8846
8847         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8848
8849         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8850         mark = gtk_text_buffer_get_insert(buffer);
8851         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8852         end_iter = ins;
8853         if (gtk_text_iter_forward_char(&end_iter)) {
8854                 gtk_text_buffer_delete(buffer, &ins, &end_iter);
8855         }
8856 }
8857
8858 static void textview_delete_backward_character (GtkTextView *text)
8859 {
8860         GtkTextBuffer *buffer;
8861         GtkTextMark *mark;
8862         GtkTextIter ins, end_iter;
8863
8864         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8865
8866         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8867         mark = gtk_text_buffer_get_insert(buffer);
8868         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8869         end_iter = ins;
8870         if (gtk_text_iter_backward_char(&end_iter)) {
8871                 gtk_text_buffer_delete(buffer, &end_iter, &ins);
8872         }
8873 }
8874
8875 static void textview_delete_forward_word (GtkTextView *text)
8876 {
8877         GtkTextBuffer *buffer;
8878         GtkTextMark *mark;
8879         GtkTextIter ins, end_iter;
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         end_iter = ins;
8887         if (gtk_text_iter_forward_word_end(&end_iter)) {
8888                 gtk_text_buffer_delete(buffer, &ins, &end_iter);
8889         }
8890 }
8891
8892 static void textview_delete_backward_word (GtkTextView *text)
8893 {
8894         GtkTextBuffer *buffer;
8895         GtkTextMark *mark;
8896         GtkTextIter ins, end_iter;
8897
8898         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8899
8900         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8901         mark = gtk_text_buffer_get_insert(buffer);
8902         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8903         end_iter = ins;
8904         if (gtk_text_iter_backward_word_start(&end_iter)) {
8905                 gtk_text_buffer_delete(buffer, &end_iter, &ins);
8906         }
8907 }
8908
8909 static void textview_delete_line (GtkTextView *text)
8910 {
8911         GtkTextBuffer *buffer;
8912         GtkTextMark *mark;
8913         GtkTextIter ins, start_iter, end_iter;
8914         gboolean found;
8915
8916         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8917
8918         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8919         mark = gtk_text_buffer_get_insert(buffer);
8920         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8921
8922         start_iter = ins;
8923         gtk_text_iter_set_line_offset(&start_iter, 0);
8924
8925         end_iter = ins;
8926         if (gtk_text_iter_ends_line(&end_iter))
8927                 found = gtk_text_iter_forward_char(&end_iter);
8928         else
8929                 found = gtk_text_iter_forward_to_line_end(&end_iter);
8930
8931         if (found)
8932                 gtk_text_buffer_delete(buffer, &start_iter, &end_iter);
8933 }
8934
8935 static void textview_delete_to_line_end (GtkTextView *text)
8936 {
8937         GtkTextBuffer *buffer;
8938         GtkTextMark *mark;
8939         GtkTextIter ins, end_iter;
8940         gboolean found;
8941
8942         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
8943
8944         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
8945         mark = gtk_text_buffer_get_insert(buffer);
8946         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
8947         end_iter = ins;
8948         if (gtk_text_iter_ends_line(&end_iter))
8949                 found = gtk_text_iter_forward_char(&end_iter);
8950         else
8951                 found = gtk_text_iter_forward_to_line_end(&end_iter);
8952         if (found)
8953                 gtk_text_buffer_delete(buffer, &ins, &end_iter);
8954 }
8955
8956 static void compose_advanced_action_cb(Compose *compose,
8957                                         ComposeCallAdvancedAction action)
8958 {
8959         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
8960         static struct {
8961                 void (*do_action) (GtkTextView *text);
8962         } action_table[] = {
8963                 {textview_move_beginning_of_line},
8964                 {textview_move_forward_character},
8965                 {textview_move_backward_character},
8966                 {textview_move_forward_word},
8967                 {textview_move_backward_word},
8968                 {textview_move_end_of_line},
8969                 {textview_move_next_line},
8970                 {textview_move_previous_line},
8971                 {textview_delete_forward_character},
8972                 {textview_delete_backward_character},
8973                 {textview_delete_forward_word},
8974                 {textview_delete_backward_word},
8975                 {textview_delete_line},
8976                 {NULL}, /* gtk_stext_delete_line_n */
8977                 {textview_delete_to_line_end}
8978         };
8979
8980         if (!GTK_WIDGET_HAS_FOCUS(text)) return;
8981
8982         if (action >= COMPOSE_CALL_ADVANCED_ACTION_MOVE_BEGINNING_OF_LINE &&
8983             action <= COMPOSE_CALL_ADVANCED_ACTION_DELETE_TO_LINE_END) {
8984                 if (action_table[action].do_action)
8985                         action_table[action].do_action(text);
8986                 else
8987                         g_warning("Not implemented yet.");
8988         }
8989 }
8990
8991 static void compose_grab_focus_cb(GtkWidget *widget, Compose *compose)
8992 {
8993         gchar *str = NULL;
8994         
8995         if (GTK_IS_EDITABLE(widget)) {
8996                 str = gtk_editable_get_chars(GTK_EDITABLE(widget), 0, -1);
8997                 gtk_editable_set_position(GTK_EDITABLE(widget), 
8998                         strlen(str));
8999                 g_free(str);
9000                 if (widget->parent && widget->parent->parent
9001                  && widget->parent->parent->parent) {
9002                         if (GTK_IS_SCROLLED_WINDOW(widget->parent->parent->parent)) {
9003                                 gint y = widget->allocation.y;
9004                                 gint height = widget->allocation.height;
9005                                 GtkAdjustment *shown = gtk_scrolled_window_get_vadjustment
9006                                         (GTK_SCROLLED_WINDOW(widget->parent->parent->parent));
9007
9008                                 if (y < (int)shown->value) {
9009                                         gtk_adjustment_set_value(GTK_ADJUSTMENT(shown), y - 1);
9010                                 }
9011                                 if (y + height > (int)shown->value + (int)shown->page_size) {
9012                                         if (y - height - 1 < (int)shown->upper - (int)shown->page_size) {
9013                                                 gtk_adjustment_set_value(GTK_ADJUSTMENT(shown), 
9014                                                         y + height - (int)shown->page_size - 1);
9015                                         } else {
9016                                                 gtk_adjustment_set_value(GTK_ADJUSTMENT(shown), 
9017                                                         (int)shown->upper - (int)shown->page_size - 1);
9018                                         }
9019                                 }
9020                         }
9021                 }
9022         }
9023
9024         if (GTK_IS_EDITABLE(widget) || GTK_IS_TEXT_VIEW(widget))
9025                 compose->focused_editable = widget;
9026         
9027 #ifdef MAEMO
9028         if (GTK_IS_TEXT_VIEW(widget) 
9029             && gtk_paned_get_child1(GTK_PANED(compose->paned)) != compose->edit_vbox) {
9030                 gtk_widget_ref(compose->notebook);
9031                 gtk_widget_ref(compose->edit_vbox);
9032                 gtk_container_remove(GTK_CONTAINER(compose->paned), compose->notebook);
9033                 gtk_container_remove(GTK_CONTAINER(compose->paned), compose->edit_vbox);
9034                 gtk_paned_add1(GTK_PANED(compose->paned), compose->edit_vbox);
9035                 gtk_paned_add2(GTK_PANED(compose->paned), compose->notebook);
9036                 gtk_widget_unref(compose->notebook);
9037                 gtk_widget_unref(compose->edit_vbox);
9038                 g_signal_handlers_block_by_func(G_OBJECT(widget),
9039                                         G_CALLBACK(compose_grab_focus_cb),
9040                                         compose);
9041                 gtk_widget_grab_focus(widget);
9042                 g_signal_handlers_unblock_by_func(G_OBJECT(widget),
9043                                         G_CALLBACK(compose_grab_focus_cb),
9044                                         compose);
9045         } else if (!GTK_IS_TEXT_VIEW(widget) 
9046                    && gtk_paned_get_child1(GTK_PANED(compose->paned)) != compose->notebook) {
9047                 gtk_widget_ref(compose->notebook);
9048                 gtk_widget_ref(compose->edit_vbox);
9049                 gtk_container_remove(GTK_CONTAINER(compose->paned), compose->notebook);
9050                 gtk_container_remove(GTK_CONTAINER(compose->paned), compose->edit_vbox);
9051                 gtk_paned_add1(GTK_PANED(compose->paned), compose->notebook);
9052                 gtk_paned_add2(GTK_PANED(compose->paned), compose->edit_vbox);
9053                 gtk_widget_unref(compose->notebook);
9054                 gtk_widget_unref(compose->edit_vbox);
9055                 g_signal_handlers_block_by_func(G_OBJECT(widget),
9056                                         G_CALLBACK(compose_grab_focus_cb),
9057                                         compose);
9058                 gtk_widget_grab_focus(widget);
9059                 g_signal_handlers_unblock_by_func(G_OBJECT(widget),
9060                                         G_CALLBACK(compose_grab_focus_cb),
9061                                         compose);
9062         }
9063 #endif
9064 }
9065
9066 static void compose_changed_cb(GtkTextBuffer *textbuf, Compose *compose)
9067 {
9068         compose->modified = TRUE;
9069 #ifndef MAEMO
9070         compose_set_title(compose);
9071 #endif
9072 }
9073
9074 static void compose_wrap_cb(gpointer data, guint action, GtkWidget *widget)
9075 {
9076         Compose *compose = (Compose *)data;
9077
9078         if (action == 1)
9079                 compose_wrap_all_full(compose, TRUE);
9080         else
9081                 compose_beautify_paragraph(compose, NULL, TRUE);
9082 }
9083
9084 static void compose_find_cb(gpointer data, guint action, GtkWidget *widget)
9085 {
9086         Compose *compose = (Compose *)data;
9087
9088         message_search_compose(compose);
9089 }
9090
9091 static void compose_toggle_autowrap_cb(gpointer data, guint action,
9092                                        GtkWidget *widget)
9093 {
9094         Compose *compose = (Compose *)data;
9095         compose->autowrap = GTK_CHECK_MENU_ITEM(widget)->active;
9096         if (compose->autowrap)
9097                 compose_wrap_all_full(compose, TRUE);
9098         compose->autowrap = GTK_CHECK_MENU_ITEM(widget)->active;
9099 }
9100
9101 static void compose_toggle_sign_cb(gpointer data, guint action,
9102                                    GtkWidget *widget)
9103 {
9104         Compose *compose = (Compose *)data;
9105
9106         if (GTK_CHECK_MENU_ITEM(widget)->active)
9107                 compose->use_signing = TRUE;
9108         else
9109                 compose->use_signing = FALSE;
9110 }
9111
9112 static void compose_toggle_encrypt_cb(gpointer data, guint action,
9113                                       GtkWidget *widget)
9114 {
9115         Compose *compose = (Compose *)data;
9116
9117         if (GTK_CHECK_MENU_ITEM(widget)->active)
9118                 compose->use_encryption = TRUE;
9119         else
9120                 compose->use_encryption = FALSE;
9121 }
9122
9123 static void activate_privacy_system(Compose *compose, PrefsAccount *account, gboolean warn) 
9124 {
9125         g_free(compose->privacy_system);
9126
9127         compose->privacy_system = g_strdup(account->default_privacy_system);
9128         compose_update_privacy_system_menu_item(compose, warn);
9129 }
9130
9131 static void compose_toggle_ruler_cb(gpointer data, guint action,
9132                                     GtkWidget *widget)
9133 {
9134         Compose *compose = (Compose *)data;
9135
9136         if (GTK_CHECK_MENU_ITEM(widget)->active) {
9137                 gtk_widget_show(compose->ruler_hbox);
9138                 prefs_common.show_ruler = TRUE;
9139         } else {
9140                 gtk_widget_hide(compose->ruler_hbox);
9141                 gtk_widget_queue_resize(compose->edit_vbox);
9142                 prefs_common.show_ruler = FALSE;
9143         }
9144 }
9145
9146 static void compose_attach_drag_received_cb (GtkWidget          *widget,
9147                                              GdkDragContext     *context,
9148                                              gint                x,
9149                                              gint                y,
9150                                              GtkSelectionData   *data,
9151                                              guint               info,
9152                                              guint               time,
9153                                              gpointer            user_data)
9154 {
9155         Compose *compose = (Compose *)user_data;
9156         GList *list, *tmp;
9157
9158         if (gdk_atom_name(data->type) && 
9159             !strcmp(gdk_atom_name(data->type), "text/uri-list")
9160             && gtk_drag_get_source_widget(context) != 
9161                 summary_get_main_widget(mainwindow_get_mainwindow()->summaryview)) {
9162                 list = uri_list_extract_filenames((const gchar *)data->data);
9163                 for (tmp = list; tmp != NULL; tmp = tmp->next) {
9164                         gchar *utf8_filename = conv_filename_to_utf8((const gchar *)tmp->data);
9165                         compose_attach_append
9166                                 (compose, (const gchar *)tmp->data,
9167                                  utf8_filename, NULL);
9168                         g_free(utf8_filename);
9169                 }
9170                 if (list) compose_changed_cb(NULL, compose);
9171                 list_free_strings(list);
9172                 g_list_free(list);
9173         } else if (gtk_drag_get_source_widget(context) 
9174                    == summary_get_main_widget(mainwindow_get_mainwindow()->summaryview)) {
9175                 /* comes from our summaryview */
9176                 SummaryView * summaryview = NULL;
9177                 GSList * list = NULL, *cur = NULL;
9178                 
9179                 if (mainwindow_get_mainwindow())
9180                         summaryview = mainwindow_get_mainwindow()->summaryview;
9181                 
9182                 if (summaryview)
9183                         list = summary_get_selected_msg_list(summaryview);
9184                 
9185                 for (cur = list; cur; cur = cur->next) {
9186                         MsgInfo *msginfo = (MsgInfo *)cur->data;
9187                         gchar *file = NULL;
9188                         if (msginfo)
9189                                 file = procmsg_get_message_file_full(msginfo, 
9190                                         TRUE, TRUE);
9191                         if (file) {
9192                                 compose_attach_append(compose, (const gchar *)file, 
9193                                         (const gchar *)file, "message/rfc822");
9194                                 g_free(file);
9195                         }
9196                 }
9197                 g_slist_free(list);
9198         }
9199 }
9200
9201 static gboolean compose_drag_drop(GtkWidget *widget,
9202                                   GdkDragContext *drag_context,
9203                                   gint x, gint y,
9204                                   guint time, gpointer user_data)
9205 {
9206         /* not handling this signal makes compose_insert_drag_received_cb
9207          * called twice */
9208         return TRUE;                                     
9209 }
9210
9211 static void compose_insert_drag_received_cb (GtkWidget          *widget,
9212                                              GdkDragContext     *drag_context,
9213                                              gint                x,
9214                                              gint                y,
9215                                              GtkSelectionData   *data,
9216                                              guint               info,
9217                                              guint               time,
9218                                              gpointer            user_data)
9219 {
9220         Compose *compose = (Compose *)user_data;
9221         GList *list, *tmp;
9222
9223         /* strangely, testing data->type == gdk_atom_intern("text/uri-list", TRUE)
9224          * does not work */
9225         if (gdk_atom_name(data->type) && !strcmp(gdk_atom_name(data->type), "text/uri-list")) {
9226                 AlertValue val = G_ALERTDEFAULT;
9227
9228                 switch (prefs_common.compose_dnd_mode) {
9229                         case COMPOSE_DND_ASK:
9230                                 val = alertpanel_full(_("Insert or attach?"),
9231                                          _("Do you want to insert the contents of the file(s) "
9232                                            "into the message body, or attach it to the email?"),
9233                                           GTK_STOCK_CANCEL, _("+_Insert"), _("_Attach"),
9234                                           TRUE, NULL, ALERT_QUESTION, G_ALERTALTERNATE);
9235                                 break;
9236                         case COMPOSE_DND_INSERT:
9237                                 val = G_ALERTALTERNATE;
9238                                 break;
9239                         case COMPOSE_DND_ATTACH:
9240                                 val = G_ALERTOTHER;
9241                                 break;
9242                         default:
9243                                 /* unexpected case */
9244                                 g_warning("error: unexpected compose_dnd_mode option value in compose_insert_drag_received_cb()");
9245                 }
9246
9247                 if (val & G_ALERTDISABLE) {
9248                         val &= ~G_ALERTDISABLE;
9249                         /* remember what action to perform by default, only if we don't click Cancel */
9250                         if (val == G_ALERTALTERNATE)
9251                                 prefs_common.compose_dnd_mode = COMPOSE_DND_INSERT;
9252                         else if (val == G_ALERTOTHER)
9253                                         prefs_common.compose_dnd_mode = COMPOSE_DND_ATTACH;
9254                 }
9255
9256                 if (val == G_ALERTDEFAULT || val == G_ALERTCANCEL) {
9257                         gtk_drag_finish(drag_context, FALSE, FALSE, time);
9258                         return;
9259                 } else if (val == G_ALERTOTHER) {
9260                         compose_attach_drag_received_cb(widget, drag_context, x, y, data, info, time, user_data);
9261                         return;
9262                 } 
9263                 list = uri_list_extract_filenames((const gchar *)data->data);
9264                 for (tmp = list; tmp != NULL; tmp = tmp->next) {
9265                         compose_insert_file(compose, (const gchar *)tmp->data);
9266                 }
9267                 list_free_strings(list);
9268                 g_list_free(list);
9269                 gtk_drag_finish(drag_context, TRUE, FALSE, time);
9270                 return;
9271         } else {
9272 #if GTK_CHECK_VERSION(2, 8, 0)
9273                 /* do nothing, handled by GTK */
9274 #else
9275                 gchar *tmpfile = get_tmp_file();
9276                 str_write_to_file((const gchar *)data->data, tmpfile);
9277                 compose_insert_file(compose, tmpfile);
9278                 g_unlink(tmpfile);
9279                 g_free(tmpfile);
9280                 gtk_drag_finish(drag_context, TRUE, FALSE, time);
9281 #endif
9282                 return;
9283         }
9284         gtk_drag_finish(drag_context, TRUE, FALSE, time);
9285 }
9286
9287 static void compose_header_drag_received_cb (GtkWidget          *widget,
9288                                              GdkDragContext     *drag_context,
9289                                              gint                x,
9290                                              gint                y,
9291                                              GtkSelectionData   *data,
9292                                              guint               info,
9293                                              guint               time,
9294                                              gpointer            user_data)
9295 {
9296         GtkEditable *entry = (GtkEditable *)user_data;
9297         gchar *email = (gchar *)data->data;
9298
9299         /* strangely, testing data->type == gdk_atom_intern("text/plain", TRUE)
9300          * does not work */
9301
9302         if (!strncmp(email, "mailto:", strlen("mailto:"))) {
9303                 gchar *decoded=g_new(gchar, strlen(email));
9304                 int start = 0;
9305
9306                 email += strlen("mailto:");
9307                 decode_uri(decoded, email); /* will fit */
9308                 gtk_editable_delete_text(entry, 0, -1);
9309                 gtk_editable_insert_text(entry, decoded, strlen(decoded), &start);
9310                 gtk_drag_finish(drag_context, TRUE, FALSE, time);
9311                 g_free(decoded);
9312                 return;
9313         }
9314         gtk_drag_finish(drag_context, TRUE, FALSE, time);
9315 }
9316
9317 static void compose_toggle_return_receipt_cb(gpointer data, guint action,
9318                                              GtkWidget *widget)
9319 {
9320         Compose *compose = (Compose *)data;
9321
9322         if (GTK_CHECK_MENU_ITEM(widget)->active)
9323                 compose->return_receipt = TRUE;
9324         else
9325                 compose->return_receipt = FALSE;
9326 }
9327
9328 static void compose_toggle_remove_refs_cb(gpointer data, guint action,
9329                                              GtkWidget *widget)
9330 {
9331         Compose *compose = (Compose *)data;
9332
9333         if (GTK_CHECK_MENU_ITEM(widget)->active)
9334                 compose->remove_references = TRUE;
9335         else
9336                 compose->remove_references = FALSE;
9337 }
9338
9339 static gboolean compose_headerentry_key_press_event_cb(GtkWidget *entry,
9340                                             GdkEventKey *event,
9341                                             ComposeHeaderEntry *headerentry)
9342 {
9343         if ((g_slist_length(headerentry->compose->header_list) > 0) &&
9344             ((headerentry->headernum + 1) != headerentry->compose->header_nextrow) &&
9345             !(event->state & GDK_MODIFIER_MASK) &&
9346             (event->keyval == GDK_BackSpace) &&
9347             (strlen(gtk_entry_get_text(GTK_ENTRY(entry))) == 0)) {
9348                 gtk_container_remove
9349                         (GTK_CONTAINER(headerentry->compose->header_table),
9350                          headerentry->combo);
9351                 gtk_container_remove
9352                         (GTK_CONTAINER(headerentry->compose->header_table),
9353                          headerentry->entry);
9354                 headerentry->compose->header_list =
9355                         g_slist_remove(headerentry->compose->header_list,
9356                                        headerentry);
9357                 g_free(headerentry);
9358         } else  if (event->keyval == GDK_Tab) {
9359                 if (headerentry->compose->header_last == headerentry) {
9360                         /* Override default next focus, and give it to subject_entry
9361                          * instead of notebook tabs
9362                          */
9363                         g_signal_stop_emission_by_name(G_OBJECT(entry), "key-press-event"); 
9364                         gtk_widget_grab_focus(headerentry->compose->subject_entry);
9365                         return TRUE;
9366                 }
9367         }
9368         return FALSE;
9369 }
9370
9371 static gboolean compose_headerentry_changed_cb(GtkWidget *entry,
9372                                     ComposeHeaderEntry *headerentry)
9373 {
9374         if (strlen(gtk_entry_get_text(GTK_ENTRY(entry))) != 0) {
9375                 headerentry->compose->header_list =
9376                         g_slist_append(headerentry->compose->header_list,
9377                                        headerentry);
9378                 
9379                 compose_create_header_entry(headerentry->compose);
9380                 g_signal_handlers_disconnect_matched
9381                         (G_OBJECT(entry), G_SIGNAL_MATCH_DATA,
9382                          0, 0, NULL, NULL, headerentry);
9383                 
9384                 /* Automatically scroll down */
9385                 compose_show_first_last_header(headerentry->compose, FALSE);
9386                 
9387         }
9388         return FALSE;
9389 }
9390
9391 static void compose_show_first_last_header(Compose *compose, gboolean show_first)
9392 {
9393         GtkAdjustment *vadj;
9394
9395         g_return_if_fail(compose);
9396         g_return_if_fail(GTK_IS_WIDGET(compose->header_table));
9397         g_return_if_fail(GTK_IS_VIEWPORT(compose->header_table->parent));
9398
9399         vadj = gtk_viewport_get_vadjustment(GTK_VIEWPORT(compose->header_table->parent));
9400         gtk_adjustment_set_value(vadj, (show_first ? vadj->lower : vadj->upper));
9401 }
9402
9403 static void text_inserted(GtkTextBuffer *buffer, GtkTextIter *iter,
9404                           const gchar *text, gint len, Compose *compose)
9405 {
9406         gint paste_as_quotation = GPOINTER_TO_INT(g_object_get_data
9407                                 (G_OBJECT(compose->text), "paste_as_quotation"));
9408         GtkTextMark *mark;
9409
9410         g_return_if_fail(text != NULL);
9411
9412         g_signal_handlers_block_by_func(G_OBJECT(buffer),
9413                                         G_CALLBACK(text_inserted),
9414                                         compose);
9415         if (paste_as_quotation) {
9416                 gchar *new_text;
9417                 gchar *qmark;
9418
9419                 if (len < 0)
9420                         len = strlen(text);
9421
9422                 new_text = g_strndup(text, len);
9423                 if (prefs_common.quotemark && *prefs_common.quotemark)
9424                         qmark = prefs_common.quotemark;
9425                 else
9426                         qmark = "> ";
9427
9428                 mark = gtk_text_buffer_create_mark(buffer, NULL, iter, FALSE);
9429                 gtk_text_buffer_place_cursor(buffer, iter);
9430
9431                 compose_quote_fmt(compose, NULL, "%Q", qmark, new_text, TRUE, FALSE,
9432                                                   _("Quote format error."));
9433                 quote_fmt_reset_vartable();
9434                 g_free(new_text);
9435                 g_object_set_data(G_OBJECT(compose->text), "paste_as_quotation",
9436                                   GINT_TO_POINTER(paste_as_quotation - 1));
9437                                   
9438                 gtk_text_buffer_get_iter_at_mark(buffer, iter, mark);
9439                 gtk_text_buffer_place_cursor(buffer, iter);
9440         } else {
9441                 if (strcmp(text, "\n") || automatic_break
9442                 || gtk_text_iter_starts_line(iter))
9443                         gtk_text_buffer_insert(buffer, iter, text, len);
9444                 else {
9445                         debug_print("insert nowrap \\n\n");
9446                         gtk_text_buffer_insert_with_tags_by_name(buffer, 
9447                                 iter, text, len, "no_join", NULL);
9448                 }
9449         }
9450         
9451         mark = gtk_text_buffer_create_mark(buffer, NULL, iter, FALSE);
9452         
9453         compose_beautify_paragraph(compose, iter, FALSE);
9454
9455         gtk_text_buffer_get_iter_at_mark(buffer, iter, mark);
9456         gtk_text_buffer_delete_mark(buffer, mark);
9457
9458         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),
9459                                           G_CALLBACK(text_inserted),
9460                                           compose);
9461         g_signal_stop_emission_by_name(G_OBJECT(buffer), "insert-text");
9462
9463         if (prefs_common.autosave && 
9464             gtk_text_buffer_get_char_count(buffer) % prefs_common.autosave_length == 0)
9465                 compose->draft_timeout_tag = g_timeout_add
9466                         (500, (GtkFunction) compose_defer_auto_save_draft, compose);
9467 }
9468 static gint compose_defer_auto_save_draft(Compose *compose)
9469 {
9470         compose->draft_timeout_tag = -1;
9471         compose_draft_cb((gpointer)compose, COMPOSE_AUTO_SAVE, NULL);
9472         return FALSE;
9473 }
9474
9475 #if USE_ASPELL
9476 static void compose_check_all(Compose *compose)
9477 {
9478         if (compose->gtkaspell)
9479                 gtkaspell_check_all(compose->gtkaspell);
9480 }
9481
9482 static void compose_highlight_all(Compose *compose)
9483 {
9484         if (compose->gtkaspell)
9485                 gtkaspell_highlight_all(compose->gtkaspell);
9486 }
9487
9488 static void compose_check_backwards(Compose *compose)
9489 {
9490         if (compose->gtkaspell) 
9491                 gtkaspell_check_backwards(compose->gtkaspell);
9492         else {
9493                 GtkItemFactory *ifactory;
9494                 ifactory = gtk_item_factory_from_widget(compose->popupmenu);
9495                 menu_set_sensitive(ifactory, "/Edit/Check backwards misspelled word", FALSE);
9496                 menu_set_sensitive(ifactory, "/Edit/Forward to next misspelled word", FALSE);
9497         }
9498 }
9499
9500 static void compose_check_forwards_go(Compose *compose)
9501 {
9502         if (compose->gtkaspell) 
9503                 gtkaspell_check_forwards_go(compose->gtkaspell);
9504         else {
9505                 GtkItemFactory *ifactory;
9506                 ifactory = gtk_item_factory_from_widget(compose->popupmenu);
9507                 menu_set_sensitive(ifactory, "/Edit/Check backwards misspelled word", FALSE);
9508                 menu_set_sensitive(ifactory, "/Edit/Forward to next misspelled word", FALSE);
9509         }
9510 }
9511 #endif
9512
9513 /*!
9514  *\brief        Guess originating forward account from MsgInfo and several 
9515  *              "common preference" settings. Return NULL if no guess. 
9516  */
9517 static PrefsAccount *compose_guess_forward_account_from_msginfo(MsgInfo *msginfo)
9518 {
9519         PrefsAccount *account = NULL;
9520         
9521         g_return_val_if_fail(msginfo, NULL);
9522         g_return_val_if_fail(msginfo->folder, NULL);
9523         g_return_val_if_fail(msginfo->folder->prefs, NULL);
9524
9525         if (msginfo->folder->prefs->enable_default_account)
9526                 account = account_find_from_id(msginfo->folder->prefs->default_account);
9527                 
9528         if (!account) 
9529                 account = msginfo->folder->folder->account;
9530                 
9531         if (!account && msginfo->to && prefs_common.forward_account_autosel) {
9532                 gchar *to;
9533                 Xstrdup_a(to, msginfo->to, return NULL);
9534                 extract_address(to);
9535                 account = account_find_from_address(to);
9536         }
9537
9538         if (!account && prefs_common.forward_account_autosel) {
9539                 gchar cc[BUFFSIZE];
9540                 if (!procheader_get_header_from_msginfo
9541                         (msginfo, cc,sizeof cc , "Cc:")) { 
9542                         gchar *buf = cc + strlen("Cc:");
9543                         extract_address(buf);
9544                         account = account_find_from_address(buf);
9545                 }
9546         }
9547         
9548         if (!account && prefs_common.forward_account_autosel) {
9549                 gchar deliveredto[BUFFSIZE];
9550                 if (!procheader_get_header_from_msginfo
9551                         (msginfo, deliveredto,sizeof deliveredto , "Delivered-To:")) { 
9552                         gchar *buf = deliveredto + strlen("Delivered-To:");
9553                         extract_address(buf);
9554                         account = account_find_from_address(buf);
9555                 }
9556         }
9557         
9558         return account;
9559 }
9560
9561 gboolean compose_close(Compose *compose)
9562 {
9563         gint x, y;
9564
9565         if (!g_mutex_trylock(compose->mutex)) {
9566                 /* we have to wait for the (possibly deferred by auto-save)
9567                  * drafting to be done, before destroying the compose under
9568                  * it. */
9569                 debug_print("waiting for drafting to finish...\n");
9570                 g_timeout_add (500, (GSourceFunc) compose_close, compose);
9571                 return FALSE;
9572         }
9573         g_return_val_if_fail(compose, FALSE);
9574         gtkut_widget_get_uposition(compose->window, &x, &y);
9575         prefs_common.compose_x = x;
9576         prefs_common.compose_y = y;
9577         g_mutex_unlock(compose->mutex);
9578         compose_destroy(compose);
9579         return FALSE;
9580 }
9581
9582 /**
9583  * Add entry field for each address in list.
9584  * \param compose     E-Mail composition object.
9585  * \param listAddress List of (formatted) E-Mail addresses.
9586  */
9587 static void compose_add_field_list( Compose *compose, GList *listAddress ) {
9588         GList *node;
9589         gchar *addr;
9590         node = listAddress;
9591         while( node ) {
9592                 addr = ( gchar * ) node->data;
9593                 compose_entry_append( compose, addr, COMPOSE_TO );
9594                 node = g_list_next( node );
9595         }
9596 }
9597
9598 static void compose_reply_from_messageview_real(MessageView *msgview, GSList *msginfo_list, 
9599                                     guint action, gboolean opening_multiple)
9600 {
9601         gchar *body = NULL;
9602         GSList *new_msglist = NULL;
9603         MsgInfo *tmp_msginfo = NULL;
9604         gboolean originally_enc = FALSE;
9605         Compose *compose = NULL;
9606
9607         g_return_if_fail(msgview != NULL);
9608
9609         g_return_if_fail(msginfo_list != NULL);
9610
9611         if (g_slist_length(msginfo_list) == 1 && !opening_multiple) {
9612                 MimeInfo *mimeinfo = messageview_get_selected_mime_part(msgview);
9613                 MsgInfo *orig_msginfo = (MsgInfo *)msginfo_list->data;
9614
9615                 if (mimeinfo != NULL && mimeinfo->type == MIMETYPE_MESSAGE && 
9616                     !g_ascii_strcasecmp(mimeinfo->subtype, "rfc822")) {
9617                         tmp_msginfo = procmsg_msginfo_new_from_mimeinfo(
9618                                                 orig_msginfo, mimeinfo);
9619                         if (tmp_msginfo != NULL) {
9620                                 new_msglist = g_slist_append(NULL, tmp_msginfo);
9621                                 if (procmime_msginfo_is_encrypted(orig_msginfo)) {
9622                                         originally_enc = TRUE;
9623                                 }
9624                         } 
9625                 }
9626         }
9627
9628         if (!opening_multiple)
9629                 body = messageview_get_selection(msgview);
9630
9631         if (new_msglist) {
9632                 compose = compose_reply_mode((ComposeMode)action, new_msglist, body);
9633                 procmsg_msginfo_free(tmp_msginfo);
9634                 g_slist_free(new_msglist);
9635         } else
9636                 compose = compose_reply_mode((ComposeMode)action, msginfo_list, body);
9637
9638         if (originally_enc) {
9639                 compose_force_encryption(compose, compose->account, FALSE);
9640         }
9641
9642         g_free(body);
9643 }
9644
9645 void compose_reply_from_messageview(MessageView *msgview, GSList *msginfo_list, 
9646                                     guint action)
9647 {
9648         if ((!prefs_common.forward_as_attachment || action != COMPOSE_FORWARD) 
9649         &&  action != COMPOSE_FORWARD_AS_ATTACH && g_slist_length(msginfo_list) > 1) {
9650                 GSList *cur = msginfo_list;
9651                 gchar *msg = g_strdup_printf(_("You are about to reply to %d "
9652                                                "messages. Opening the windows "
9653                                                "could take some time. Do you "
9654                                                "want to continue?"), 
9655                                                g_slist_length(msginfo_list));
9656                 if (g_slist_length(msginfo_list) > 9
9657                 &&  alertpanel(_("Warning"), msg, GTK_STOCK_CANCEL, "+" GTK_STOCK_YES, NULL)
9658                     != G_ALERTALTERNATE) {
9659                         g_free(msg);
9660                         return;
9661                 }
9662                 g_free(msg);
9663                 /* We'll open multiple compose windows */
9664                 /* let the WM place the next windows */
9665                 compose_force_window_origin = FALSE;
9666                 for (; cur; cur = cur->next) {
9667                         GSList tmplist;
9668                         tmplist.data = cur->data;
9669                         tmplist.next = NULL;
9670                         compose_reply_from_messageview_real(msgview, &tmplist, action, TRUE);
9671                 }
9672                 compose_force_window_origin = TRUE;
9673         } else {
9674                 /* forwarding multiple mails as attachments is done via a
9675                  * single compose window */
9676                 compose_reply_from_messageview_real(msgview, msginfo_list, action, FALSE);
9677         }
9678 }
9679
9680 void compose_set_position(Compose *compose, gint pos)
9681 {
9682         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
9683
9684         gtkut_text_view_set_position(text, pos);
9685 }
9686
9687 gboolean compose_search_string(Compose *compose,
9688                                 const gchar *str, gboolean case_sens)
9689 {
9690         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
9691
9692         return gtkut_text_view_search_string(text, str, case_sens);
9693 }
9694
9695 gboolean compose_search_string_backward(Compose *compose,
9696                                 const gchar *str, gboolean case_sens)
9697 {
9698         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
9699
9700         return gtkut_text_view_search_string_backward(text, str, case_sens);
9701 }
9702
9703 /* allocate a msginfo structure and populate its data from a compose data structure */
9704 static MsgInfo *compose_msginfo_new_from_compose(Compose *compose)
9705 {
9706         MsgInfo *newmsginfo;
9707         GSList *list;
9708         gchar buf[BUFFSIZE];
9709
9710         g_return_val_if_fail( compose != NULL, NULL );
9711
9712         newmsginfo = procmsg_msginfo_new();
9713
9714         /* date is now */
9715         get_rfc822_date(buf, sizeof(buf));
9716         newmsginfo->date = g_strdup(buf);
9717
9718         /* from */
9719         if (compose->from_name) {
9720                 newmsginfo->from = gtk_editable_get_chars(GTK_EDITABLE(compose->from_name), 0, -1);
9721                 newmsginfo->fromname = procheader_get_fromname(newmsginfo->from);
9722         }
9723
9724         /* subject */
9725         if (compose->subject_entry)
9726                 newmsginfo->subject = gtk_editable_get_chars(GTK_EDITABLE(compose->subject_entry), 0, -1);
9727
9728         /* to, cc, reply-to, newsgroups */
9729         for (list = compose->header_list; list; list = list->next) {
9730                 gchar *header = gtk_editable_get_chars(
9731                                                                 GTK_EDITABLE(
9732                                                                 GTK_COMBO(((ComposeHeaderEntry *)list->data)->combo)->entry), 0, -1);
9733                 gchar *entry = gtk_editable_get_chars(
9734                                                                 GTK_EDITABLE(((ComposeHeaderEntry *)list->data)->entry), 0, -1);
9735
9736                 if ( strcasecmp(header, prefs_common_translated_header_name("To:")) == 0 ) {
9737                         if ( newmsginfo->to == NULL ) {
9738                                 newmsginfo->to = g_strdup(entry);
9739                         } else {
9740                                 gchar *tmp = g_strconcat(newmsginfo->to, ", ", entry, NULL);
9741                                 g_free(newmsginfo->to);
9742                                 newmsginfo->to = tmp;
9743                         }
9744                 } else
9745                 if ( strcasecmp(header, prefs_common_translated_header_name("Cc:")) == 0 ) {
9746                         if ( newmsginfo->cc == NULL ) {
9747                                 newmsginfo->cc = g_strdup(entry);
9748                         } else {
9749                                 gchar *tmp = g_strconcat(newmsginfo->cc, ", ", entry, NULL);
9750                                 g_free(newmsginfo->cc);
9751                                 newmsginfo->cc = tmp;
9752                         }
9753                 } else
9754                 if ( strcasecmp(header,
9755                                                 prefs_common_translated_header_name("Newsgroups:")) == 0 ) {
9756                         if ( newmsginfo->newsgroups == NULL ) {
9757                                 newmsginfo->newsgroups = g_strdup(entry);
9758                         } else {
9759                                 gchar *tmp = g_strconcat(newmsginfo->newsgroups, ", ", entry, NULL);
9760                                 g_free(newmsginfo->newsgroups);
9761                                 newmsginfo->newsgroups = tmp;
9762                         }
9763                 }
9764
9765                 g_free(header);
9766                 g_free(entry);  
9767         }
9768
9769         /* other data is unset */
9770
9771         return newmsginfo;
9772 }
9773
9774 #ifdef USE_ASPELL
9775 /* update compose's dictionaries from folder dict settings */
9776 static void compose_set_dictionaries_from_folder_prefs(Compose *compose,
9777                                                 FolderItem *folder_item)
9778 {
9779         g_return_if_fail(compose != NULL);
9780
9781         if (compose->gtkaspell && folder_item && folder_item->prefs) {
9782                 FolderItemPrefs *prefs = folder_item->prefs;
9783
9784                 if (prefs->enable_default_dictionary)
9785                         gtkaspell_change_dict(compose->gtkaspell,
9786                                         prefs->default_dictionary, FALSE);
9787                 if (folder_item->prefs->enable_default_alt_dictionary)
9788                         gtkaspell_change_alt_dict(compose->gtkaspell,
9789                                         prefs->default_alt_dictionary);
9790                 if (prefs->enable_default_dictionary
9791                         || prefs->enable_default_alt_dictionary)
9792                         compose_spell_menu_changed(compose);
9793         }
9794 }
9795 #endif
9796
9797 /*
9798  * End of Source.
9799  */