2005-08-05 [colin] 1.9.13cvs16
[claws.git] / src / compose.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2005 Hiroyuki Yamamoto
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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, 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 <sys/utsname.h> */
70 #include <stdlib.h>
71 #include <sys/wait.h>
72 #include <signal.h>
73 #include <errno.h>
74 #include <libgen.h>
75
76 #if (HAVE_WCTYPE_H && HAVE_WCHAR_H)
77 #  include <wchar.h>
78 #  include <wctype.h>
79 #endif
80
81 #include "main.h"
82 #include "mainwindow.h"
83 #include "compose.h"
84 #include "addressbook.h"
85 #include "folderview.h"
86 #include "procmsg.h"
87 #include "menu.h"
88 #include "stock_pixmap.h"
89 #include "send_message.h"
90 #include "imap.h"
91 #include "news.h"
92 #include "customheader.h"
93 #include "prefs_common.h"
94 #include "prefs_account.h"
95 #include "action.h"
96 #include "account.h"
97 #include "filesel.h"
98 #include "procheader.h"
99 #include "procmime.h"
100 #include "statusbar.h"
101 #include "about.h"
102 #include "base64.h"
103 #include "quoted-printable.h"
104 #include "codeconv.h"
105 #include "utils.h"
106 #include "gtkutils.h"
107 #include "socket.h"
108 #include "alertpanel.h"
109 #include "manage_window.h"
110 #include "gtkshruler.h"
111 #include "folder.h"
112 #include "addr_compl.h"
113 #include "quote_fmt.h"
114 #include "template.h"
115 #include "undo.h"
116 #include "foldersel.h"
117 #include "toolbar.h"
118
119 enum
120 {
121         COL_MIMETYPE = 0,
122         COL_SIZE     = 1,
123         COL_NAME     = 2,
124         COL_DATA     = 3,
125         COL_AUTODATA = 4,
126         N_COL_COLUMNS
127 };
128
129 #define N_ATTACH_COLS   (N_COL_COLUMNS)
130
131 typedef enum
132 {
133         COMPOSE_CALL_ADVANCED_ACTION_MOVE_BEGINNING_OF_LINE,
134         COMPOSE_CALL_ADVANCED_ACTION_MOVE_FORWARD_CHARACTER,
135         COMPOSE_CALL_ADVANCED_ACTION_MOVE_BACKWARD_CHARACTER,
136         COMPOSE_CALL_ADVANCED_ACTION_MOVE_FORWARD_WORD,
137         COMPOSE_CALL_ADVANCED_ACTION_MOVE_BACKWARD_WORD,
138         COMPOSE_CALL_ADVANCED_ACTION_MOVE_END_OF_LINE,
139         COMPOSE_CALL_ADVANCED_ACTION_MOVE_NEXT_LINE,
140         COMPOSE_CALL_ADVANCED_ACTION_MOVE_PREVIOUS_LINE,
141         COMPOSE_CALL_ADVANCED_ACTION_DELETE_FORWARD_CHARACTER,
142         COMPOSE_CALL_ADVANCED_ACTION_DELETE_BACKWARD_CHARACTER,
143         COMPOSE_CALL_ADVANCED_ACTION_DELETE_FORWARD_WORD,
144         COMPOSE_CALL_ADVANCED_ACTION_DELETE_BACKWARD_WORD,
145         COMPOSE_CALL_ADVANCED_ACTION_DELETE_LINE,
146         COMPOSE_CALL_ADVANCED_ACTION_DELETE_LINE_N,
147         COMPOSE_CALL_ADVANCED_ACTION_DELETE_TO_LINE_END
148 } ComposeCallAdvancedAction;
149
150 typedef enum
151 {
152         PRIORITY_HIGHEST = 1,
153         PRIORITY_HIGH,
154         PRIORITY_NORMAL,
155         PRIORITY_LOW,
156         PRIORITY_LOWEST
157 } PriorityLevel;
158
159 typedef enum
160 {
161         COMPOSE_INSERT_SUCCESS,
162         COMPOSE_INSERT_READ_ERROR,
163         COMPOSE_INSERT_INVALID_CHARACTER,
164         COMPOSE_INSERT_NO_FILE
165 } ComposeInsertResult;
166
167 typedef enum
168 {
169         COMPOSE_QUIT_EDITING,
170         COMPOSE_KEEP_EDITING,
171         COMPOSE_AUTO_SAVE
172 } ComposeDraftAction;
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 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
196 static GtkWidget *compose_account_option_menu_create
197                                                 (Compose        *compose);
198 static void compose_set_out_encoding            (Compose        *compose);
199 static void compose_set_template_menu           (Compose        *compose);
200 static void compose_template_apply              (Compose        *compose,
201                                                  Template       *tmpl,
202                                                  gboolean        replace);
203 static void compose_destroy                     (Compose        *compose);
204
205 static void compose_entries_set                 (Compose        *compose,
206                                                  const gchar    *mailto);
207 static gint compose_parse_header                (Compose        *compose,
208                                                  MsgInfo        *msginfo);
209 static gchar *compose_parse_references          (const gchar    *ref,
210                                                  const gchar    *msgid);
211
212 static gchar *compose_quote_fmt                 (Compose        *compose,
213                                                  MsgInfo        *msginfo,
214                                                  const gchar    *fmt,
215                                                  const gchar    *qmark,
216                                                  const gchar    *body);
217
218 static void compose_reply_set_entry             (Compose        *compose,
219                                                  MsgInfo        *msginfo,
220                                                  gboolean        to_all,
221                                                  gboolean        to_ml,
222                                                  gboolean        to_sender,
223                                                  gboolean
224                                                  followup_and_reply_to);
225 static void compose_reedit_set_entry            (Compose        *compose,
226                                                  MsgInfo        *msginfo);
227
228 static void compose_insert_sig                  (Compose        *compose,
229                                                  gboolean        replace);
230 static gchar *compose_get_signature_str         (Compose        *compose);
231 static ComposeInsertResult compose_insert_file  (Compose        *compose,
232                                                  const gchar    *file);
233
234 static void compose_attach_append               (Compose        *compose,
235                                                  const gchar    *file,
236                                                  const gchar    *type,
237                                                  const gchar    *content_type);
238 static void compose_attach_parts                (Compose        *compose,
239                                                  MsgInfo        *msginfo);
240
241 static void compose_wrap_paragraph              (Compose        *compose,
242                                                  GtkTextIter    *par_iter,
243                                                  gboolean        force);
244 static void compose_wrap_all                    (Compose        *compose);
245 static void compose_wrap_all_full               (Compose        *compose,
246                                                  gboolean        autowrap);
247
248 static void compose_set_title                   (Compose        *compose);
249 static void compose_select_account              (Compose        *compose,
250                                                  PrefsAccount   *account,
251                                                  gboolean        init);
252
253 static PrefsAccount *compose_current_mail_account(void);
254 /* static gint compose_send                     (Compose        *compose); */
255 static gboolean compose_check_for_valid_recipient
256                                                 (Compose        *compose);
257 static gboolean compose_check_entries           (Compose        *compose,
258                                                  gboolean       check_subject);
259 static gint compose_write_to_file               (Compose        *compose,
260                                                  FILE           *fp,
261                                                  gint            action);
262 static gint compose_write_body_to_file          (Compose        *compose,
263                                                  const gchar    *file);
264 static gint compose_remove_reedit_target        (Compose        *compose);
265 void compose_remove_draft                       (Compose        *compose);
266 static gint compose_queue                       (Compose        *compose,
267                                                  gint           *msgnum,
268                                                  FolderItem     **item);
269 static gint compose_queue_sub                   (Compose        *compose,
270                                                  gint           *msgnum,
271                                                  FolderItem     **item,
272                                                  gboolean       check_subject);
273 static void compose_add_attachments             (Compose        *compose,
274                                                  MimeInfo       *parent);
275 static gchar *compose_get_header                (Compose        *compose);
276
277 static void compose_convert_header              (Compose        *compose,
278                                                  gchar          *dest,
279                                                  gint            len,
280                                                  gchar          *src,
281                                                  gint            header_len,
282                                                  gboolean        addr_field);
283
284 static void compose_attach_info_free            (AttachInfo     *ainfo);
285 static void compose_attach_remove_selected      (Compose        *compose);
286
287 static void compose_attach_property             (Compose        *compose);
288 static void compose_attach_property_create      (gboolean       *cancelled);
289 static void attach_property_ok                  (GtkWidget      *widget,
290                                                  gboolean       *cancelled);
291 static void attach_property_cancel              (GtkWidget      *widget,
292                                                  gboolean       *cancelled);
293 static gint attach_property_delete_event        (GtkWidget      *widget,
294                                                  GdkEventAny    *event,
295                                                  gboolean       *cancelled);
296 static gboolean attach_property_key_pressed     (GtkWidget      *widget,
297                                                  GdkEventKey    *event,
298                                                  gboolean       *cancelled);
299
300 static void compose_exec_ext_editor             (Compose        *compose);
301 static gint compose_exec_ext_editor_real        (const gchar    *file);
302 static gboolean compose_ext_editor_kill         (Compose        *compose);
303 static gboolean compose_input_cb                (GIOChannel     *source,
304                                                  GIOCondition    condition,
305                                                  gpointer        data);
306 static void compose_set_ext_editor_sensitive    (Compose        *compose,
307                                                  gboolean        sensitive);
308
309 static void compose_undo_state_changed          (UndoMain       *undostruct,
310                                                  gint            undo_state,
311                                                  gint            redo_state,
312                                                  gpointer        data);
313
314 static void compose_create_header_entry (Compose *compose);
315 static void compose_add_header_entry    (Compose *compose, gchar *header, gchar *text);
316 static void compose_update_priority_menu_item(Compose * compose);
317
318 static void compose_add_field_list      ( Compose *compose,
319                                           GList *listAddress );
320
321 /* callback functions */
322
323 static gboolean compose_edit_size_alloc (GtkEditable    *widget,
324                                          GtkAllocation  *allocation,
325                                          GtkSHRuler     *shruler);
326 static void account_activated           (GtkMenuItem    *menuitem,
327                                          gpointer        data);
328 static void attach_selected             (GtkTreeView    *tree_view, 
329                                          GtkTreePath    *tree_path,
330                                          GtkTreeViewColumn *column, 
331                                          Compose *compose);
332 static gboolean attach_button_pressed   (GtkWidget      *widget,
333                                          GdkEventButton *event,
334                                          gpointer        data);
335 static gboolean attach_key_pressed      (GtkWidget      *widget,
336                                          GdkEventKey    *event,
337                                          gpointer        data);
338
339 static void compose_send_cb             (gpointer        data,
340                                          guint           action,
341                                          GtkWidget      *widget);
342 static void compose_send_later_cb       (gpointer        data,
343                                          guint           action,
344                                          GtkWidget      *widget);
345
346 static void compose_draft_cb            (gpointer        data,
347                                          guint           action,
348                                          GtkWidget      *widget);
349
350 static void compose_attach_cb           (gpointer        data,
351                                          guint           action,
352                                          GtkWidget      *widget);
353 static void compose_insert_file_cb      (gpointer        data,
354                                          guint           action,
355                                          GtkWidget      *widget);
356 static void compose_insert_sig_cb       (gpointer        data,
357                                          guint           action,
358                                          GtkWidget      *widget);
359
360 static void compose_close_cb            (gpointer        data,
361                                          guint           action,
362                                          GtkWidget      *widget);
363
364 static void compose_set_encoding_cb     (gpointer        data,
365                                          guint           action,
366                                          GtkWidget      *widget);
367
368 static void compose_address_cb          (gpointer        data,
369                                          guint           action,
370                                          GtkWidget      *widget);
371 static void compose_template_activate_cb(GtkWidget      *widget,
372                                          gpointer        data);
373
374 static void compose_ext_editor_cb       (gpointer        data,
375                                          guint           action,
376                                          GtkWidget      *widget);
377
378 static gint compose_delete_cb           (GtkWidget      *widget,
379                                          GdkEventAny    *event,
380                                          gpointer        data);
381
382 static void compose_undo_cb             (Compose        *compose);
383 static void compose_redo_cb             (Compose        *compose);
384 static void compose_cut_cb              (Compose        *compose);
385 static void compose_copy_cb             (Compose        *compose);
386 static void compose_paste_cb            (Compose        *compose);
387 static void compose_paste_as_quote_cb   (Compose        *compose);
388 static void compose_allsel_cb           (Compose        *compose);
389
390 static void compose_advanced_action_cb  (Compose                   *compose,
391                                          ComposeCallAdvancedAction  action);
392
393 static void compose_grab_focus_cb       (GtkWidget      *widget,
394                                          Compose        *compose);
395
396 static void compose_changed_cb          (GtkTextBuffer  *textbuf,
397                                          Compose        *compose);
398
399 static void compose_wrap_cb             (gpointer        data,
400                                          guint           action,
401                                          GtkWidget      *widget);
402 static void compose_toggle_autowrap_cb  (gpointer        data,
403                                          guint           action,
404                                          GtkWidget      *widget);
405
406 static void compose_toggle_ruler_cb     (gpointer        data,
407                                          guint           action,
408                                          GtkWidget      *widget);
409 static void compose_toggle_sign_cb      (gpointer        data,
410                                          guint           action,
411                                          GtkWidget      *widget);
412 static void compose_toggle_encrypt_cb   (gpointer        data,
413                                          guint           action,
414                                          GtkWidget      *widget);
415 static void compose_set_privacy_system_cb(GtkWidget      *widget,
416                                           gpointer        data);
417 static void compose_update_privacy_system_menu_item(Compose * compose);
418 static void activate_privacy_system     (Compose *compose, 
419                                          PrefsAccount *account);
420 static void compose_use_signing(Compose *compose, gboolean use_signing);
421 static void compose_use_encryption(Compose *compose, gboolean use_encryption);
422 static void compose_toggle_return_receipt_cb(gpointer data, guint action,
423                                              GtkWidget *widget);
424 static void compose_toggle_remove_refs_cb(gpointer data, guint action,
425                                              GtkWidget *widget);
426 static void compose_set_priority_cb     (gpointer        data,
427                                          guint           action,
428                                          GtkWidget      *widget);
429
430 static void compose_attach_drag_received_cb (GtkWidget          *widget,
431                                              GdkDragContext     *drag_context,
432                                              gint                x,
433                                              gint                y,
434                                              GtkSelectionData   *data,
435                                              guint               info,
436                                              guint               time,
437                                              gpointer            user_data);
438 static void compose_insert_drag_received_cb (GtkWidget          *widget,
439                                              GdkDragContext     *drag_context,
440                                              gint                x,
441                                              gint                y,
442                                              GtkSelectionData   *data,
443                                              guint               info,
444                                              guint               time,
445                                              gpointer            user_data);
446 static void compose_header_drag_received_cb (GtkWidget          *widget,
447                                              GdkDragContext     *drag_context,
448                                              gint                x,
449                                              gint                y,
450                                              GtkSelectionData   *data,
451                                              guint               info,
452                                              guint               time,
453                                              gpointer            user_data);
454
455 static gboolean compose_drag_drop           (GtkWidget *widget,
456                                              GdkDragContext *drag_context,
457                                              gint x, gint y,
458                                              guint time, gpointer user_data);
459
460 static void text_inserted               (GtkTextBuffer  *buffer,
461                                          GtkTextIter    *iter,
462                                          const gchar    *text,
463                                          gint            len,
464                                          Compose        *compose);
465 static void compose_generic_reply(MsgInfo *msginfo, gboolean quote,
466                                   gboolean to_all, gboolean to_ml,
467                                   gboolean to_sender,
468                                   gboolean followup_and_reply_to,
469                                   const gchar *body);
470
471 gboolean compose_headerentry_changed_cb    (GtkWidget          *entry,
472                                             ComposeHeaderEntry *headerentry);
473 gboolean compose_headerentry_key_press_event_cb(GtkWidget              *entry,
474                                             GdkEventKey        *event,
475                                             ComposeHeaderEntry *headerentry);
476
477 static void compose_show_first_last_header (Compose *compose, gboolean show_first);
478
479 static void compose_allow_user_actions (Compose *compose, gboolean allow);
480
481 #if USE_ASPELL
482 static void compose_check_all              (Compose *compose);
483 static void compose_highlight_all          (Compose *compose);
484 static void compose_check_backwards        (Compose *compose);
485 static void compose_check_forwards_go      (Compose *compose);
486 #endif
487
488 static gint compose_defer_auto_save_draft       (Compose        *compose);
489 static PrefsAccount *compose_guess_forward_account_from_msginfo (MsgInfo *msginfo);
490
491 static void compose_close       (Compose *compose);
492
493 static GtkItemFactoryEntry compose_popup_entries[] =
494 {
495         {N_("/_Add..."),        NULL, compose_attach_cb, 0, NULL},
496         {N_("/_Remove"),        NULL, compose_attach_remove_selected, 0, NULL},
497         {N_("/---"),            NULL, NULL, 0, "<Separator>"},
498         {N_("/_Properties..."), NULL, compose_attach_property, 0, NULL}
499 };
500
501 static GtkItemFactoryEntry compose_entries[] =
502 {
503         {N_("/_Message"),                               NULL, NULL, 0, "<Branch>"},
504         {N_("/_Message/_Send"),         "<control>Return",
505                                         compose_send_cb, 0, NULL},
506         {N_("/_Message/Send _later"),   "<shift><control>S",
507                                         compose_send_later_cb,  0, NULL},
508         {N_("/_Message/---"),                   NULL, NULL, 0, "<Separator>"},
509         {N_("/_Message/_Attach file"),          "<control>M", compose_attach_cb,      0, NULL},
510         {N_("/_Message/_Insert file"),          "<control>I", compose_insert_file_cb, 0, NULL},
511         {N_("/_Message/Insert si_gnature"),     "<control>G", compose_insert_sig_cb,  0, NULL},
512         {N_("/_Message/---"),                   NULL, NULL, 0, "<Separator>"},
513         {N_("/_Message/_Save"),
514                                                 "<control>S", compose_draft_cb, COMPOSE_KEEP_EDITING, NULL},
515         {N_("/_Message/---"),                   NULL, NULL, 0, "<Separator>"},
516         {N_("/_Message/_Close"),                        "<control>W", compose_close_cb, 0, NULL},
517
518         {N_("/_Edit"),                  NULL, NULL, 0, "<Branch>"},
519         {N_("/_Edit/_Undo"),            "<control>Z", compose_undo_cb, 0, NULL},
520         {N_("/_Edit/_Redo"),            "<control>Y", compose_redo_cb, 0, NULL},
521         {N_("/_Edit/---"),              NULL, NULL, 0, "<Separator>"},
522         {N_("/_Edit/Cu_t"),             "<control>X", compose_cut_cb,    0, NULL},
523         {N_("/_Edit/_Copy"),            "<control>C", compose_copy_cb,   0, NULL},
524         {N_("/_Edit/_Paste"),           "<control>V", compose_paste_cb,  0, NULL},
525         {N_("/_Edit/Paste as _quotation"),
526                                         NULL, compose_paste_as_quote_cb, 0, NULL},
527         {N_("/_Edit/Select _all"),      "<control>A", compose_allsel_cb, 0, NULL},
528         {N_("/_Edit/A_dvanced"),        NULL, NULL, 0, "<Branch>"},
529         {N_("/_Edit/A_dvanced/Move a character backward"),
530                                         "<control>B",
531                                         compose_advanced_action_cb,
532                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_BACKWARD_CHARACTER,
533                                         NULL},
534         {N_("/_Edit/A_dvanced/Move a character forward"),
535                                         "<control>F",
536                                         compose_advanced_action_cb,
537                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_FORWARD_CHARACTER,
538                                         NULL},
539         {N_("/_Edit/A_dvanced/Move a word backward"),
540                                         NULL, /* "<alt>B" */
541                                         compose_advanced_action_cb,
542                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_BACKWARD_WORD,
543                                         NULL},
544         {N_("/_Edit/A_dvanced/Move a word forward"),
545                                         NULL, /* "<alt>F" */
546                                         compose_advanced_action_cb,
547                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_FORWARD_WORD,
548                                         NULL},
549         {N_("/_Edit/A_dvanced/Move to beginning of line"),
550                                         NULL, /* "<control>A" */
551                                         compose_advanced_action_cb,
552                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_BEGINNING_OF_LINE,
553                                         NULL},
554         {N_("/_Edit/A_dvanced/Move to end of line"),
555                                         "<control>E",
556                                         compose_advanced_action_cb,
557                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_END_OF_LINE,
558                                         NULL},
559         {N_("/_Edit/A_dvanced/Move to previous line"),
560                                         "<control>P",
561                                         compose_advanced_action_cb,
562                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_PREVIOUS_LINE,
563                                         NULL},
564         {N_("/_Edit/A_dvanced/Move to next line"),
565                                         "<control>N",
566                                         compose_advanced_action_cb,
567                                         COMPOSE_CALL_ADVANCED_ACTION_MOVE_NEXT_LINE,
568                                         NULL},
569         {N_("/_Edit/A_dvanced/Delete a character backward"),
570                                         "<control>H",
571                                         compose_advanced_action_cb,
572                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_BACKWARD_CHARACTER,
573                                         NULL},
574         {N_("/_Edit/A_dvanced/Delete a character forward"),
575                                         "<control>D",
576                                         compose_advanced_action_cb,
577                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_FORWARD_CHARACTER,
578                                         NULL},
579         {N_("/_Edit/A_dvanced/Delete a word backward"),
580                                         NULL, /* "<control>W" */
581                                         compose_advanced_action_cb,
582                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_BACKWARD_WORD,
583                                         NULL},
584         {N_("/_Edit/A_dvanced/Delete a word forward"),
585                                         NULL, /* "<alt>D", */
586                                         compose_advanced_action_cb,
587                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_FORWARD_WORD,
588                                         NULL},
589         {N_("/_Edit/A_dvanced/Delete line"),
590                                         "<control>U",
591                                         compose_advanced_action_cb,
592                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_LINE,
593                                         NULL},
594         {N_("/_Edit/A_dvanced/Delete entire line"),
595                                         NULL,
596                                         compose_advanced_action_cb,
597                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_LINE_N,
598                                         NULL},
599         {N_("/_Edit/A_dvanced/Delete to end of line"),
600                                         "<control>K",
601                                         compose_advanced_action_cb,
602                                         COMPOSE_CALL_ADVANCED_ACTION_DELETE_TO_LINE_END,
603                                         NULL},
604         {N_("/_Edit/---"),              NULL, NULL, 0, "<Separator>"},
605         {N_("/_Edit/_Wrap current paragraph"),
606                                         "<control>L", compose_wrap_cb, 0, NULL},
607         {N_("/_Edit/Wrap all long _lines"),
608                                         "<control><alt>L", compose_wrap_cb, 1, NULL},
609         {N_("/_Edit/Aut_o wrapping"),   "<shift><control>L", compose_toggle_autowrap_cb, 0, "<ToggleItem>"},
610         {N_("/_Edit/---"),              NULL, NULL, 0, "<Separator>"},
611         {N_("/_Edit/Edit with e_xternal editor"),
612                                         "<shift><control>X", compose_ext_editor_cb, 0, NULL},
613 #if USE_ASPELL
614         {N_("/_Spelling"),              NULL, NULL, 0, "<Branch>"},
615         {N_("/_Spelling/_Check all or check selection"),
616                                         NULL, compose_check_all, 0, NULL},
617         {N_("/_Spelling/_Highlight all misspelled words"),
618                                         NULL, compose_highlight_all, 0, NULL},
619         {N_("/_Spelling/Check _backwards misspelled word"),
620                                         NULL, compose_check_backwards , 0, NULL},
621         {N_("/_Spelling/_Forward to next misspelled word"),
622                                         NULL, compose_check_forwards_go, 0, NULL},
623         {N_("/_Spelling/---"),          NULL, NULL, 0, "<Separator>"},
624         {N_("/_Spelling/_Spelling Configuration"),
625                                         NULL, NULL, 0, "<Branch>"},
626 #endif
627         {N_("/_Options"),               NULL, NULL, 0, "<Branch>"},
628         {N_("/_Options/Privacy System"),                NULL, NULL,   0, "<Branch>"},
629         {N_("/_Options/Privacy System/None"),   NULL, NULL,   0, "<RadioItem>"},
630         {N_("/_Options/Si_gn"),         NULL, compose_toggle_sign_cb   , 0, "<ToggleItem>"},
631         {N_("/_Options/_Encrypt"),      NULL, compose_toggle_encrypt_cb, 0, "<ToggleItem>"},
632         {N_("/_Options/---"),           NULL,           NULL,   0, "<Separator>"},
633         {N_("/_Options/_Priority"),     NULL,           NULL,   0, "<Branch>"},
634         {N_("/_Options/Priority/_Highest"), NULL, compose_set_priority_cb, PRIORITY_HIGHEST, "<RadioItem>"},
635         {N_("/_Options/Priority/Hi_gh"),    NULL, compose_set_priority_cb, PRIORITY_HIGH, "/Options/Priority/Highest"},
636         {N_("/_Options/Priority/_Normal"),  NULL, compose_set_priority_cb, PRIORITY_NORMAL, "/Options/Priority/Highest"},
637         {N_("/_Options/Priority/Lo_w"),    NULL, compose_set_priority_cb, PRIORITY_LOW, "/Options/Priority/Highest"},
638         {N_("/_Options/Priority/_Lowest"),  NULL, compose_set_priority_cb, PRIORITY_LOWEST, "/Options/Priority/Highest"},
639         {N_("/_Options/---"),           NULL,           NULL,   0, "<Separator>"},
640         {N_("/_Options/_Request Return Receipt"),       NULL, compose_toggle_return_receipt_cb, 0, "<ToggleItem>"},
641         {N_("/_Options/---"),           NULL,           NULL,   0, "<Separator>"},
642         {N_("/_Options/Remo_ve references"),    NULL, compose_toggle_remove_refs_cb, 0, "<ToggleItem>"},
643         {N_("/_Options/---"),           NULL,           NULL,   0, "<Separator>"},
644
645 #define ENC_ACTION(action) \
646         NULL, compose_set_encoding_cb, action, \
647         "/Options/Character encoding/Automatic"
648
649         {N_("/_Options/Character _encoding"), NULL, NULL, 0, "<Branch>"},
650         {N_("/_Options/Character _encoding/_Automatic"),
651                         NULL, compose_set_encoding_cb, C_AUTO, "<RadioItem>"},
652         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
653
654         {N_("/_Options/Character _encoding/7bit ascii (US-ASC_II)"),
655          ENC_ACTION(C_US_ASCII)},
656         {N_("/_Options/Character _encoding/Unicode (_UTF-8)"),
657          ENC_ACTION(C_UTF_8)},
658         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
659
660         {N_("/_Options/Character _encoding/Western European (ISO-8859-_1)"),
661          ENC_ACTION(C_ISO_8859_1)},
662         {N_("/_Options/Character _encoding/Western European (ISO-8859-15)"),
663          ENC_ACTION(C_ISO_8859_15)},
664         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
665
666         {N_("/_Options/Character _encoding/Central European (ISO-8859-_2)"),
667          ENC_ACTION(C_ISO_8859_2)},
668         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
669
670         {N_("/_Options/Character _encoding/_Baltic (ISO-8859-13)"),
671          ENC_ACTION(C_ISO_8859_13)},
672         {N_("/_Options/Character _encoding/Baltic (ISO-8859-_4)"),
673          ENC_ACTION(C_ISO_8859_4)},
674         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
675
676         {N_("/_Options/Character _encoding/Greek (ISO-8859-_7)"),
677          ENC_ACTION(C_ISO_8859_7)},
678         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
679
680         {N_("/_Options/Character _encoding/Hebrew (ISO-8859-_8)"),
681          ENC_ACTION(C_ISO_8859_8)},
682         {N_("/_Options/Character _encoding/Hebrew (Windows-1255)"),
683          ENC_ACTION(C_WINDOWS_1255)},
684         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
685
686         {N_("/_Options/Character _encoding/Turkish (ISO-8859-_9)"),
687          ENC_ACTION(C_ISO_8859_9)},
688         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
689
690         {N_("/_Options/Character _encoding/Cyrillic (ISO-8859-_5)"),
691          ENC_ACTION(C_ISO_8859_5)},
692         {N_("/_Options/Character _encoding/Cyrillic (KOI8-_R)"),
693          ENC_ACTION(C_KOI8_R)},
694         {N_("/_Options/Character _encoding/Cyrillic (KOI8-U)"),
695          ENC_ACTION(C_KOI8_U)},
696         {N_("/_Options/Character _encoding/Cyrillic (Windows-1251)"),
697          ENC_ACTION(C_WINDOWS_1251)},
698         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
699
700         {N_("/_Options/Character _encoding/Japanese (ISO-2022-_JP)"),
701          ENC_ACTION(C_ISO_2022_JP)},
702         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
703
704         {N_("/_Options/Character _encoding/Simplified Chinese (_GB2312)"),
705          ENC_ACTION(C_GB2312)},
706         {N_("/_Options/Character _encoding/Simplified Chinese (GBK)"),
707          ENC_ACTION(C_GBK)},
708         {N_("/_Options/Character _encoding/Traditional Chinese (_Big5)"),
709          ENC_ACTION(C_BIG5)},
710         {N_("/_Options/Character _encoding/Traditional Chinese (EUC-_TW)"),
711          ENC_ACTION(C_EUC_TW)},
712         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
713
714         {N_("/_Options/Character _encoding/Korean (EUC-_KR)"),
715          ENC_ACTION(C_EUC_KR)},
716         {N_("/_Options/Character _encoding/---"), NULL, NULL, 0, "<Separator>"},
717
718         {N_("/_Options/Character _encoding/Thai (TIS-620)"),
719          ENC_ACTION(C_TIS_620)},
720         {N_("/_Options/Character _encoding/Thai (Windows-874)"),
721          ENC_ACTION(C_WINDOWS_874)},
722
723         {N_("/_Tools"),                 NULL, NULL, 0, "<Branch>"},
724         {N_("/_Tools/Show _ruler"),     NULL, compose_toggle_ruler_cb, 0, "<ToggleItem>"},
725         {N_("/_Tools/_Address book"),   "<shift><control>A", compose_address_cb , 0, NULL},
726         {N_("/_Tools/_Template"),       NULL, NULL, 0, "<Branch>"},
727         {N_("/_Tools/Actio_ns"),        NULL, NULL, 0, "<Branch>"},
728         {N_("/_Help"),                  NULL, NULL, 0, "<Branch>"},
729         {N_("/_Help/_About"),           NULL, about_show, 0, NULL}
730 };
731
732 static GtkTargetEntry compose_mime_types[] =
733 {
734         {"text/uri-list", 0, 0},
735         {"text/plain", 0, 0},
736         {"STRING", 0, 0}
737 };
738
739 static gboolean compose_put_existing_to_front(MsgInfo *info)
740 {
741         GList *compose_list = compose_get_compose_list();
742         GList *elem = NULL;
743         
744         if (compose_list) {
745                 for (elem = compose_list; elem != NULL && elem->data != NULL; 
746                      elem = elem->next) {
747                         Compose *c = (Compose*)elem->data;
748
749                         if (!c->targetinfo || !c->targetinfo->msgid ||
750                             !info->msgid)
751                                 continue;
752
753                         if (!strcmp(c->targetinfo->msgid, info->msgid)) {
754                                 gtkut_window_popup(c->window);
755                                 return TRUE;
756                         }
757                 }
758         }
759         return FALSE;
760 }
761
762 static GdkColor quote_color = 
763         {(gulong)0, (gushort)0, (gushort)0, (gushort)0};
764
765 static GdkColor signature_color = {
766         (gulong)0,
767         (gushort)0x7fff,
768         (gushort)0x7fff,
769         (gushort)0x7fff
770 };
771
772 static GdkColor uri_color = {
773         (gulong)0,
774         (gushort)0,
775         (gushort)0,
776         (gushort)0
777 };
778
779 static void compose_create_tags(GtkTextView *text, Compose *compose)
780 {
781         GtkTextBuffer *buffer;
782         GdkColor black = {(gulong)0, (gushort)0, (gushort)0, (gushort)0};
783
784         buffer = gtk_text_view_get_buffer(text);
785         
786         if (prefs_common.enable_color) {
787                 /* grab the quote colors, converting from an int to a GdkColor */
788                 gtkut_convert_int_to_gdk_color(prefs_common.quote_level1_col,
789                                                &quote_color);
790                 gtkut_convert_int_to_gdk_color(prefs_common.signature_col,
791                                                &signature_color);
792                 gtkut_convert_int_to_gdk_color(prefs_common.uri_col,
793                                                &uri_color);
794         } else {
795                 signature_color = quote_color = uri_color = black;
796         }
797
798         gtk_text_buffer_create_tag(buffer, "quote",
799                                    "foreground-gdk", &quote_color,
800                                    NULL);
801         gtk_text_buffer_create_tag(buffer, "signature",
802                                    "foreground-gdk", &signature_color,
803                                    NULL);
804         gtk_text_buffer_create_tag(buffer, "link",
805                                          "foreground-gdk", &uri_color,
806                                          NULL);
807 }
808
809 Compose *compose_new(PrefsAccount *account, const gchar *mailto,
810                      GPtrArray *attach_files)
811 {
812         return compose_generic_new(account, mailto, NULL, attach_files, NULL);
813 }
814
815 Compose *compose_new_with_folderitem(PrefsAccount *account, FolderItem *item)
816 {
817         return compose_generic_new(account, NULL, item, NULL, NULL);
818 }
819
820 Compose *compose_new_with_list( PrefsAccount *account, GList *listAddress )
821 {
822         return compose_generic_new( account, NULL, NULL, NULL, listAddress );
823 }
824
825 Compose *compose_generic_new(PrefsAccount *account, const gchar *mailto, FolderItem *item,
826                              GPtrArray *attach_files, GList *listAddress )
827 {
828         Compose *compose;
829         GtkTextView *textview;
830         GtkTextBuffer *textbuf;
831         GtkTextIter iter;
832         GtkItemFactory *ifactory;
833
834         if (item && item->prefs && item->prefs->enable_default_account)
835                 account = account_find_from_id(item->prefs->default_account);
836
837         if (!account) account = cur_account;
838         g_return_val_if_fail(account != NULL, NULL);
839
840         compose = compose_create(account, COMPOSE_NEW);
841         ifactory = gtk_item_factory_from_widget(compose->menubar);
842
843         compose->replyinfo = NULL;
844         compose->fwdinfo   = NULL;
845
846         textview = GTK_TEXT_VIEW(compose->text);
847         textbuf = gtk_text_view_get_buffer(textview);
848         compose_create_tags(textview, compose);
849
850         undo_block(compose->undostruct);
851 #ifdef USE_ASPELL
852         if (item && item->prefs && item->prefs->enable_default_dictionary &&
853             compose->gtkaspell) 
854                 gtkaspell_change_dict(compose->gtkaspell, 
855                     item->prefs->default_dictionary);
856 #endif
857
858         if (account->auto_sig)
859                 compose_insert_sig(compose, FALSE);
860         gtk_text_buffer_get_start_iter(textbuf, &iter);
861         gtk_text_buffer_place_cursor(textbuf, &iter);
862
863         if (account->protocol != A_NNTP) {
864                 if (mailto && *mailto != '\0') {
865                         compose_entries_set(compose, mailto);
866
867                 } else if (item && item->prefs->enable_default_to) {
868                         compose_entry_append(compose, item->prefs->default_to, COMPOSE_TO);
869                         compose_entry_mark_default_to(compose, item->prefs->default_to);
870                 }
871                 if (item && item->ret_rcpt) {
872                         menu_set_active(ifactory, "/Options/Request Return Receipt", TRUE);
873                 }
874         } else {
875                 if (mailto) {
876                         compose_entry_append(compose, mailto, COMPOSE_NEWSGROUPS);
877                 }
878                 /*
879                  * CLAWS: just don't allow return receipt request, even if the user
880                  * may want to send an email. simple but foolproof.
881                  */
882                 menu_set_sensitive(ifactory, "/Options/Request Return Receipt", FALSE); 
883         }
884         compose_add_field_list( compose, listAddress );
885
886         if (attach_files) {
887                 gint i;
888                 gchar *file;
889
890                 for (i = 0; i < attach_files->len; i++) {
891                         file = g_ptr_array_index(attach_files, i);
892                         compose_attach_append(compose, file, file, NULL);
893                 }
894         }
895
896         compose_show_first_last_header(compose, TRUE);
897
898         /* Set save folder */
899         if (item && item->prefs && item->prefs->save_copy_to_folder) {
900                 gchar *folderidentifier;
901
902                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), prefs_common.savemsg);
903                 folderidentifier = folder_item_get_identifier(item);
904                 gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), folderidentifier);
905                 g_free(folderidentifier);
906         }
907         
908         gtk_widget_grab_focus(compose->header_last->entry);
909
910         undo_unblock(compose->undostruct);
911
912         if (prefs_common.auto_exteditor)
913                 compose_exec_ext_editor(compose);
914
915         return compose;
916 }
917
918 static void compose_force_encryption(Compose *compose, PrefsAccount *account,
919                 gboolean override_pref)
920 {
921         gchar *privacy = NULL;
922
923         if (override_pref == FALSE && account->default_encrypt_reply == FALSE)
924                 return;
925
926         if (account->default_privacy_system
927         &&  strlen(account->default_privacy_system)) {
928                 privacy = account->default_privacy_system;
929         } else {
930                 GSList *privacy_avail = privacy_get_system_ids();
931                 if (privacy_avail && g_slist_length(privacy_avail)) {
932                         privacy = (gchar *)(privacy_avail->data);
933                 }
934         }
935         if (privacy != NULL) {
936                 compose->privacy_system = g_strdup(privacy);
937                 compose_update_privacy_system_menu_item(compose);
938                 compose_use_encryption(compose, TRUE);
939         }
940 }       
941
942 void compose_reply_mode(ComposeMode mode, GSList *msginfo_list, gchar *body)
943 {
944         MsgInfo *msginfo;
945         guint list_len;
946
947         g_return_if_fail(msginfo_list != NULL);
948
949         msginfo = (MsgInfo*)g_slist_nth_data(msginfo_list, 0);
950         g_return_if_fail(msginfo != NULL);
951
952         list_len = g_slist_length(msginfo_list);
953
954         switch (mode) {
955         case COMPOSE_REPLY:
956                 compose_reply(msginfo, prefs_common.reply_with_quote,
957                               FALSE, prefs_common.default_reply_list, FALSE, body);
958                 break;
959         case COMPOSE_REPLY_WITH_QUOTE:
960                 compose_reply(msginfo, TRUE, FALSE, prefs_common.default_reply_list, FALSE, body);
961                 break;
962         case COMPOSE_REPLY_WITHOUT_QUOTE:
963                 compose_reply(msginfo, FALSE, FALSE, prefs_common.default_reply_list, FALSE, NULL);
964                 break;
965         case COMPOSE_REPLY_TO_SENDER:
966                 compose_reply(msginfo, prefs_common.reply_with_quote,
967                               FALSE, FALSE, TRUE, body);
968                 break;
969         case COMPOSE_FOLLOWUP_AND_REPLY_TO:
970                 compose_followup_and_reply_to(msginfo,
971                                               prefs_common.reply_with_quote,
972                                               FALSE, FALSE, body);
973                 break;
974         case COMPOSE_REPLY_TO_SENDER_WITH_QUOTE:
975                 compose_reply(msginfo, TRUE, FALSE, FALSE, TRUE, body);
976                 break;
977         case COMPOSE_REPLY_TO_SENDER_WITHOUT_QUOTE:
978                 compose_reply(msginfo, FALSE, FALSE, FALSE, TRUE, NULL);
979                 break;
980         case COMPOSE_REPLY_TO_ALL:
981                 compose_reply(msginfo, prefs_common.reply_with_quote,
982                               TRUE, FALSE, FALSE, body);
983                 break;
984         case COMPOSE_REPLY_TO_ALL_WITH_QUOTE:
985                 compose_reply(msginfo, TRUE, TRUE, FALSE, FALSE, body);
986                 break;
987         case COMPOSE_REPLY_TO_ALL_WITHOUT_QUOTE:
988                 compose_reply(msginfo, FALSE, TRUE, FALSE, FALSE, NULL);
989                 break;
990         case COMPOSE_REPLY_TO_LIST:
991                 compose_reply(msginfo, prefs_common.reply_with_quote,
992                               FALSE, TRUE, FALSE, body);
993                 break;
994         case COMPOSE_REPLY_TO_LIST_WITH_QUOTE:
995                 compose_reply(msginfo, TRUE, FALSE, TRUE, FALSE, body);
996                 break;
997         case COMPOSE_REPLY_TO_LIST_WITHOUT_QUOTE:
998                 compose_reply(msginfo, FALSE, FALSE, TRUE, FALSE, NULL);
999                 break;
1000         case COMPOSE_FORWARD:
1001                 if (prefs_common.forward_as_attachment) {
1002                         compose_reply_mode(COMPOSE_FORWARD_AS_ATTACH, msginfo_list, body);
1003                         return;
1004                 } else {
1005                         compose_reply_mode(COMPOSE_FORWARD_INLINE, msginfo_list, body);
1006                         return;
1007                 }
1008                 break;
1009         case COMPOSE_FORWARD_INLINE:
1010                 /* check if we reply to more than one Message */
1011                 if (list_len == 1) {
1012                         compose_forward(NULL, msginfo, FALSE, body, FALSE);
1013                         break;
1014                 } 
1015                 /* more messages FALL THROUGH */
1016         case COMPOSE_FORWARD_AS_ATTACH:
1017                 compose_forward_multiple(NULL, msginfo_list);
1018                 break;
1019         case COMPOSE_REDIRECT:
1020                 compose_redirect(NULL, msginfo);
1021                 break;
1022         default:
1023                 g_warning("compose_reply(): invalid Compose Mode: %d\n", mode);
1024         }
1025 }
1026
1027 void compose_reply(MsgInfo *msginfo, gboolean quote, gboolean to_all,
1028                    gboolean to_ml, gboolean to_sender, 
1029                    const gchar *body)
1030 {
1031         compose_generic_reply(msginfo, quote, to_all, to_ml, 
1032                               to_sender, FALSE, body);
1033 }
1034
1035 void compose_followup_and_reply_to(MsgInfo *msginfo, gboolean quote,
1036                                    gboolean to_all,
1037                                    gboolean to_sender,
1038                                    const gchar *body)
1039 {
1040         compose_generic_reply(msginfo, quote, to_all, FALSE, 
1041                               to_sender, TRUE, body);
1042 }
1043
1044 static void compose_generic_reply(MsgInfo *msginfo, gboolean quote,
1045                                   gboolean to_all, gboolean to_ml,
1046                                   gboolean to_sender,
1047                                   gboolean followup_and_reply_to,
1048                                   const gchar *body)
1049 {
1050         GtkItemFactory *ifactory;
1051         Compose *compose;
1052         PrefsAccount *account = NULL;
1053         PrefsAccount *reply_account;
1054         GtkTextView *textview;
1055         GtkTextBuffer *textbuf;
1056         GtkTextIter iter;
1057         int cursor_pos;
1058
1059         g_return_if_fail(msginfo != NULL);
1060         g_return_if_fail(msginfo->folder != NULL);
1061
1062         account = account_get_reply_account(msginfo, prefs_common.reply_account_autosel);
1063         
1064         g_return_if_fail(account != NULL);
1065
1066         if (to_sender && account->protocol == A_NNTP &&
1067             !followup_and_reply_to) {
1068                 reply_account =
1069                         account_find_from_address(account->address);
1070                 if (!reply_account)
1071                         reply_account = compose_current_mail_account();
1072                 if (!reply_account)
1073                         return;
1074         } else
1075                 reply_account = account;
1076
1077         compose = compose_create(account, COMPOSE_REPLY);
1078         ifactory = gtk_item_factory_from_widget(compose->menubar);
1079
1080         menu_set_active(ifactory, "/Options/Remove references", FALSE);
1081         menu_set_sensitive(ifactory, "/Options/Remove references", TRUE);
1082
1083         compose->replyinfo = procmsg_msginfo_get_full_info(msginfo);
1084         if (!compose->replyinfo)
1085                 compose->replyinfo = procmsg_msginfo_copy(msginfo);
1086
1087         if (msginfo->folder && msginfo->folder->ret_rcpt)
1088                 menu_set_active(ifactory, "/Options/Request Return Receipt", TRUE);
1089
1090         /* Set save folder */
1091         if (msginfo->folder && msginfo->folder->prefs && msginfo->folder->prefs->save_copy_to_folder) {
1092                 gchar *folderidentifier;
1093
1094                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), TRUE);
1095                 folderidentifier = folder_item_get_identifier(msginfo->folder);
1096                 gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), folderidentifier);
1097                 g_free(folderidentifier);
1098         }
1099
1100         if (compose_parse_header(compose, msginfo) < 0) return;
1101         compose_reply_set_entry(compose, msginfo, to_all, to_ml, 
1102                                 to_sender, followup_and_reply_to);
1103         compose_show_first_last_header(compose, TRUE);
1104
1105         textview = (GTK_TEXT_VIEW(compose->text));
1106         textbuf = gtk_text_view_get_buffer(textview);
1107         compose_create_tags(textview, compose);
1108
1109         undo_block(compose->undostruct);
1110 #ifdef USE_ASPELL
1111         if (msginfo->folder && msginfo->folder->prefs && 
1112             msginfo->folder->prefs && 
1113             msginfo->folder->prefs->enable_default_dictionary &&
1114             compose->gtkaspell)
1115                 gtkaspell_change_dict(compose->gtkaspell, 
1116                     msginfo->folder->prefs->default_dictionary);
1117 #endif
1118
1119         if (quote) {
1120                 gchar *qmark;
1121
1122                 if (prefs_common.quotemark && *prefs_common.quotemark)
1123                         qmark = prefs_common.quotemark;
1124                 else
1125                         qmark = "> ";
1126
1127                 compose_quote_fmt(compose, compose->replyinfo,
1128                                   prefs_common.quotefmt,
1129                                   qmark, body);
1130         }
1131         if (procmime_msginfo_is_encrypted(compose->replyinfo)) {
1132                 compose_force_encryption(compose, account, FALSE);
1133         }
1134
1135         if (account->auto_sig)
1136                 compose_insert_sig(compose, FALSE);
1137
1138         cursor_pos = quote_fmt_get_cursor_pos();
1139         gtk_text_buffer_get_start_iter(textbuf, &iter);
1140         gtk_text_buffer_get_iter_at_offset(textbuf, &iter, cursor_pos);
1141         gtk_text_buffer_place_cursor(textbuf, &iter);
1142         
1143         compose_wrap_all(compose);
1144
1145         gtk_widget_grab_focus(compose->text);
1146
1147         undo_unblock(compose->undostruct);
1148
1149         if (prefs_common.auto_exteditor)
1150                 compose_exec_ext_editor(compose);
1151 }
1152
1153 #define INSERT_FW_HEADER(var, hdr) \
1154 if (msginfo->var && *msginfo->var) { \
1155         gtk_stext_insert(text, NULL, NULL, NULL, hdr, -1); \
1156         gtk_stext_insert(text, NULL, NULL, NULL, msginfo->var, -1); \
1157         gtk_stext_insert(text, NULL, NULL, NULL, "\n", 1); \
1158 }
1159
1160 Compose *compose_forward(PrefsAccount *account, MsgInfo *msginfo,
1161                          gboolean as_attach, const gchar *body,
1162                          gboolean no_extedit)
1163 {
1164         Compose *compose;
1165         GtkTextView *textview;
1166         GtkTextBuffer *textbuf;
1167         GtkTextIter iter;
1168
1169         g_return_val_if_fail(msginfo != NULL, NULL);
1170         g_return_val_if_fail(msginfo->folder != NULL, NULL);
1171
1172         if (!account && 
1173             !(account = compose_guess_forward_account_from_msginfo
1174                                 (msginfo)))
1175                 account = cur_account;
1176
1177         compose = compose_create(account, COMPOSE_FORWARD);
1178
1179         compose->fwdinfo = procmsg_msginfo_get_full_info(msginfo);
1180         if (!compose->fwdinfo)
1181                 compose->fwdinfo = procmsg_msginfo_copy(msginfo);
1182
1183         if (msginfo->subject && *msginfo->subject) {
1184                 gchar *buf, *buf2, *p;
1185
1186                 buf = p = g_strdup(msginfo->subject);
1187                 p += subject_get_prefix_length(p);
1188                 memmove(buf, p, strlen(p) + 1);
1189
1190                 buf2 = g_strdup_printf("Fw: %s", buf);
1191                 gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), buf2);
1192                 
1193                 g_free(buf);
1194                 g_free(buf2);
1195         }
1196
1197         textview = GTK_TEXT_VIEW(compose->text);
1198         textbuf = gtk_text_view_get_buffer(textview);
1199         compose_create_tags(textview, compose);
1200
1201         if (as_attach) {
1202                 gchar *msgfile;
1203
1204                 msgfile = procmsg_get_message_file_path(msginfo);
1205                 if (!is_file_exist(msgfile))
1206                         g_warning("%s: file not exist\n", msgfile);
1207                 else
1208                         compose_attach_append(compose, msgfile, msgfile,
1209                                               "message/rfc822");
1210
1211                 g_free(msgfile);
1212         } else {
1213                 gchar *qmark;
1214                 MsgInfo *full_msginfo;
1215
1216                 full_msginfo = procmsg_msginfo_get_full_info(msginfo);
1217                 if (!full_msginfo)
1218                         full_msginfo = procmsg_msginfo_copy(msginfo);
1219
1220                 if (prefs_common.fw_quotemark &&
1221                     *prefs_common.fw_quotemark)
1222                         qmark = prefs_common.fw_quotemark;
1223                 else
1224                         qmark = "> ";
1225
1226                 compose_quote_fmt(compose, full_msginfo,
1227                                   prefs_common.fw_quotefmt,
1228                                   qmark, body);
1229                 compose_attach_parts(compose, msginfo);
1230
1231                 procmsg_msginfo_free(full_msginfo);
1232         }
1233
1234         if (account->auto_sig)
1235                 compose_insert_sig(compose, FALSE);
1236
1237         compose_wrap_all(compose);
1238
1239         gtk_text_buffer_get_start_iter(textbuf, &iter);
1240         gtk_text_buffer_place_cursor(textbuf, &iter);
1241
1242         gtk_widget_grab_focus(compose->header_last->entry);
1243
1244         if (!no_extedit && prefs_common.auto_exteditor)
1245                 compose_exec_ext_editor(compose);
1246         
1247         /*save folder*/
1248         if (msginfo->folder && msginfo->folder->prefs && msginfo->folder->prefs->save_copy_to_folder) {
1249                 gchar *folderidentifier;
1250
1251                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), TRUE);
1252                 folderidentifier = folder_item_get_identifier(msginfo->folder);
1253                 gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), folderidentifier);
1254                 g_free(folderidentifier);
1255         }
1256
1257         return compose;
1258 }
1259
1260 #undef INSERT_FW_HEADER
1261
1262 Compose *compose_forward_multiple(PrefsAccount *account, GSList *msginfo_list)
1263 {
1264         Compose *compose;
1265         GtkTextView *textview;
1266         GtkTextBuffer *textbuf;
1267         GtkTextIter iter;
1268         GSList *msginfo;
1269         gchar *msgfile;
1270
1271         g_return_val_if_fail(msginfo_list != NULL, NULL);
1272
1273         for (msginfo = msginfo_list; msginfo != NULL; msginfo = msginfo->next)
1274                 if (((MsgInfo *)msginfo->data)->folder == NULL)
1275                         return NULL;
1276
1277         /* guess account from first selected message */
1278         if (!account && 
1279             !(account = compose_guess_forward_account_from_msginfo
1280                                 (msginfo_list->data)))
1281                 account = cur_account;
1282
1283         g_return_val_if_fail(account != NULL, NULL);
1284
1285         for (msginfo = msginfo_list; msginfo != NULL; msginfo = msginfo->next) {
1286                 MSG_UNSET_PERM_FLAGS(((MsgInfo *)msginfo->data)->flags, MSG_REPLIED);
1287                 MSG_SET_PERM_FLAGS(((MsgInfo *)msginfo->data)->flags, MSG_FORWARDED);
1288         }
1289
1290         compose = compose_create(account, COMPOSE_FORWARD);
1291
1292         textview = GTK_TEXT_VIEW(compose->text);
1293         textbuf = gtk_text_view_get_buffer(textview);
1294         compose_create_tags(textview, compose);
1295
1296         for (msginfo = msginfo_list; msginfo != NULL; msginfo = msginfo->next) {
1297                 msgfile = procmsg_get_message_file_path((MsgInfo *)msginfo->data);
1298                 if (!is_file_exist(msgfile))
1299                         g_warning("%s: file not exist\n", msgfile);
1300                 else
1301                         compose_attach_append(compose, msgfile, msgfile,
1302                                 "message/rfc822");
1303                 g_free(msgfile);
1304         }
1305
1306         if (account->auto_sig)
1307                 compose_insert_sig(compose, FALSE);
1308
1309         compose_wrap_all(compose);
1310
1311         gtk_text_buffer_get_start_iter(textbuf, &iter);
1312         gtk_text_buffer_place_cursor(textbuf, &iter);
1313
1314         gtk_widget_grab_focus(compose->header_last->entry);
1315         
1316         return compose;
1317 }
1318
1319 void compose_reedit(MsgInfo *msginfo)
1320 {
1321         Compose *compose = NULL;
1322         PrefsAccount *account = NULL;
1323         GtkTextView *textview;
1324         GtkTextBuffer *textbuf;
1325         GtkTextMark *mark;
1326         GtkTextIter iter;
1327         FILE *fp;
1328         gchar buf[BUFFSIZE];
1329         gboolean use_signing = FALSE;
1330         gboolean use_encryption = FALSE;
1331         gchar *privacy_system = NULL;
1332
1333         g_return_if_fail(msginfo != NULL);
1334         g_return_if_fail(msginfo->folder != NULL);
1335
1336         if (compose_put_existing_to_front(msginfo)) 
1337                 return;
1338
1339         if (msginfo->folder->stype == F_QUEUE || msginfo->folder->stype == F_DRAFT) {
1340                 gchar queueheader_buf[BUFFSIZE];
1341                 gint id, param;
1342
1343                 /* Select Account from queue headers */
1344                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1345                                              sizeof(queueheader_buf), "X-Sylpheed-Account-Id:")) {
1346                         id = atoi(&queueheader_buf[strlen("X-Sylpheed-Account-Id:")]);
1347                         account = account_find_from_id(id);
1348                 }
1349                 if (!account && !procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1350                                              sizeof(queueheader_buf), "NAID:")) {
1351                         id = atoi(&queueheader_buf[strlen("NAID:")]);
1352                         account = account_find_from_id(id);
1353                 }
1354                 if (!account && !procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1355                                                     sizeof(queueheader_buf), "MAID:")) {
1356                         id = atoi(&queueheader_buf[strlen("MAID:")]);
1357                         account = account_find_from_id(id);
1358                 }
1359                 if (!account && !procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1360                                                                 sizeof(queueheader_buf), "S:")) {
1361                         account = account_find_from_address(queueheader_buf);
1362                 }
1363                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1364                                              sizeof(queueheader_buf), "X-Sylpheed-Sign:")) {
1365                         param = atoi(&queueheader_buf[strlen("X-Sylpheed-Sign:")]);
1366                         use_signing = param;
1367                         
1368                 }
1369                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1370                                              sizeof(queueheader_buf), "X-Sylpheed-Encrypt:")) {
1371                         param = atoi(&queueheader_buf[strlen("X-Sylpheed-Encrypt:")]);
1372                         use_encryption = param;
1373                 }
1374                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1375                                             sizeof(queueheader_buf), "X-Sylpheed-Privacy-System:")) {
1376                         privacy_system = g_strdup(&queueheader_buf[strlen("X-Sylpheed-Privacy-System:")]);
1377                 }
1378                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, 
1379                                              sizeof(queueheader_buf), "X-Priority: ")) {
1380                         param = atoi(&queueheader_buf[strlen("X-Priority: ")]); /* mind the space */
1381                         compose->priority = param;
1382                 }
1383         } else 
1384                 account = msginfo->folder->folder->account;
1385
1386         if (!account && prefs_common.reedit_account_autosel) {
1387                 gchar from[BUFFSIZE];
1388                 if (!procheader_get_header_from_msginfo(msginfo, from, sizeof(from), "FROM:")){
1389                         extract_address(from);
1390                         account = account_find_from_address(from);
1391                 }
1392         }
1393         if (!account) account = cur_account;
1394         g_return_if_fail(account != NULL);
1395
1396         compose = compose_create(account, COMPOSE_REEDIT);
1397         compose->privacy_system = privacy_system;
1398         compose_use_signing(compose, use_signing);
1399         compose_use_encryption(compose, use_encryption);
1400         compose->targetinfo = procmsg_msginfo_copy(msginfo);
1401
1402         if (msginfo->folder->stype == F_QUEUE
1403         ||  msginfo->folder->stype == F_DRAFT) {
1404                 gchar queueheader_buf[BUFFSIZE];
1405
1406                 /* Set message save folder */
1407                 if (!procheader_get_header_from_msginfo(msginfo, queueheader_buf, sizeof(queueheader_buf), "SCF:")) {
1408                         gint startpos = 0;
1409
1410                         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), TRUE);
1411                         gtk_editable_delete_text(GTK_EDITABLE(compose->savemsg_entry), 0, -1);
1412                         gtk_editable_insert_text(GTK_EDITABLE(compose->savemsg_entry), &queueheader_buf[4], strlen(&queueheader_buf[4]), &startpos);
1413                 }
1414         }
1415         
1416         if (compose_parse_header(compose, msginfo) < 0) return;
1417         compose_reedit_set_entry(compose, msginfo);
1418
1419         textview = GTK_TEXT_VIEW(compose->text);
1420         textbuf = gtk_text_view_get_buffer(textview);
1421         compose_create_tags(textview, compose);
1422
1423         mark = gtk_text_buffer_get_insert(textbuf);
1424         gtk_text_buffer_get_iter_at_mark(textbuf, &iter, mark);
1425
1426         g_signal_handlers_block_by_func(G_OBJECT(textbuf),
1427                                         G_CALLBACK(compose_changed_cb),
1428                                         compose);
1429         
1430         if (procmime_msginfo_is_encrypted(msginfo)) {
1431                 fp = procmime_get_first_encrypted_text_content(msginfo);
1432                 if (fp) 
1433                         compose_force_encryption(compose, account, TRUE);
1434         } else
1435                 fp = procmime_get_first_text_content(msginfo);
1436         if (fp == NULL)
1437                 g_warning("Can't get text part\n");
1438
1439         if (fp != NULL) {
1440                 gboolean prev_autowrap = compose->autowrap;
1441
1442                 compose->autowrap = FALSE;
1443                 while (fgets(buf, sizeof(buf), fp) != NULL) {
1444                         strcrchomp(buf);
1445                         gtk_text_buffer_insert(textbuf, &iter, buf, -1);
1446                 }
1447                 compose->autowrap = prev_autowrap;
1448                 fclose(fp);
1449         }
1450         
1451         compose_attach_parts(compose, msginfo);
1452
1453         g_signal_handlers_unblock_by_func(G_OBJECT(textbuf),
1454                                         G_CALLBACK(compose_changed_cb),
1455                                         compose);
1456
1457         gtk_widget_grab_focus(compose->text);
1458
1459         if (prefs_common.auto_exteditor)
1460                 compose_exec_ext_editor(compose);
1461 }
1462
1463 Compose *compose_redirect(PrefsAccount *account, MsgInfo *msginfo)
1464 {
1465         Compose *compose;
1466         gchar *filename;
1467         GtkItemFactory *ifactory;
1468         FolderItem *item;
1469
1470         g_return_val_if_fail(msginfo != NULL, NULL);
1471
1472         if (!account)
1473                 account = account_get_reply_account(msginfo,
1474                                         prefs_common.reply_account_autosel);
1475         g_return_val_if_fail(account != NULL, NULL);
1476
1477         compose = compose_create(account, COMPOSE_REDIRECT);
1478         ifactory = gtk_item_factory_from_widget(compose->menubar);
1479         compose_create_tags(GTK_TEXT_VIEW(compose->text), compose);
1480         compose->replyinfo = NULL;
1481         compose->fwdinfo = NULL;
1482
1483         compose_show_first_last_header(compose, TRUE);
1484
1485         gtk_widget_grab_focus(compose->header_last->entry);
1486
1487         filename = procmsg_get_message_file_path(msginfo);
1488         if (filename == NULL)
1489                 return NULL;
1490
1491         compose->redirect_filename = filename;
1492         
1493         /* Set save folder */
1494         item = msginfo->folder;
1495         if (item && item->prefs && item->prefs->save_copy_to_folder) {
1496                 gchar *folderidentifier;
1497
1498                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), prefs_common.savemsg);
1499                 folderidentifier = folder_item_get_identifier(item);
1500                 gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), folderidentifier);
1501                 g_free(folderidentifier);
1502         }
1503
1504         compose_attach_parts(compose, msginfo);
1505
1506         if (msginfo->subject)
1507                 gtk_entry_set_text(GTK_ENTRY(compose->subject_entry),
1508                                    msginfo->subject);
1509         gtk_editable_set_editable(GTK_EDITABLE(compose->subject_entry), FALSE);
1510
1511         compose_quote_fmt(compose, msginfo, "%M", NULL, NULL);
1512         gtk_text_view_set_editable(GTK_TEXT_VIEW(compose->text), FALSE);
1513
1514         ifactory = gtk_item_factory_from_widget(compose->popupmenu);
1515         menu_set_sensitive(ifactory, "/Add...", FALSE);
1516         menu_set_sensitive(ifactory, "/Remove", FALSE);
1517         menu_set_sensitive(ifactory, "/Properties...", FALSE);
1518
1519         ifactory = gtk_item_factory_from_widget(compose->menubar);
1520         menu_set_sensitive(ifactory, "/Message/Save", FALSE);
1521         menu_set_sensitive(ifactory, "/Message/Insert file", FALSE);
1522         menu_set_sensitive(ifactory, "/Message/Attach file", FALSE);
1523         menu_set_sensitive(ifactory, "/Message/Insert signature", FALSE);
1524         menu_set_sensitive(ifactory, "/Edit", FALSE);
1525         menu_set_sensitive(ifactory, "/Options", FALSE);
1526         menu_set_sensitive(ifactory, "/Tools/Show ruler", FALSE);
1527         menu_set_sensitive(ifactory, "/Tools/Actions", FALSE);
1528         
1529         gtk_widget_set_sensitive(compose->toolbar->draft_btn, FALSE);
1530         gtk_widget_set_sensitive(compose->toolbar->insert_btn, FALSE);
1531         gtk_widget_set_sensitive(compose->toolbar->attach_btn, FALSE);
1532         gtk_widget_set_sensitive(compose->toolbar->sig_btn, FALSE);
1533         gtk_widget_set_sensitive(compose->toolbar->exteditor_btn, FALSE);
1534         gtk_widget_set_sensitive(compose->toolbar->linewrap_current_btn, FALSE);
1535         gtk_widget_set_sensitive(compose->toolbar->linewrap_all_btn, FALSE);
1536
1537         return compose;
1538 }
1539
1540 GList *compose_get_compose_list(void)
1541 {
1542         return compose_list;
1543 }
1544
1545 void compose_entry_append(Compose *compose, const gchar *address,
1546                           ComposeEntryType type)
1547 {
1548         gchar *header;
1549         gchar *cur, *begin;
1550         gboolean in_quote = FALSE;
1551         if (!address || *address == '\0') return;
1552
1553         switch (type) {
1554         case COMPOSE_CC:
1555                 header = N_("Cc:");
1556                 break;
1557         case COMPOSE_BCC:
1558                 header = N_("Bcc:");
1559                 break;
1560         case COMPOSE_REPLYTO:
1561                 header = N_("Reply-To:");
1562                 break;
1563         case COMPOSE_NEWSGROUPS:
1564                 header = N_("Newsgroups:");
1565                 break;
1566         case COMPOSE_FOLLOWUPTO:
1567                 header = N_( "Followup-To:");
1568                 break;
1569         case COMPOSE_TO:
1570         default:
1571                 header = N_("To:");
1572                 break;
1573         }
1574         header = prefs_common.trans_hdr ? gettext(header) : header;
1575         
1576         cur = begin = (gchar *)address;
1577         
1578         /* we separate the line by commas, but not if we're inside a quoted
1579          * string */
1580         while (*cur != '\0') {
1581                 if (*cur == '"') 
1582                         in_quote = !in_quote;
1583                 if (*cur == ',' && !in_quote) {
1584                         gchar *tmp = g_strdup(begin);
1585                         gchar *o_tmp = tmp;
1586                         tmp[cur-begin]='\0';
1587                         cur++;
1588                         begin = cur;
1589                         while (*tmp == ' ')
1590                                 tmp++;
1591                         compose_add_header_entry(compose, header, tmp);
1592                         g_free(o_tmp);
1593                         continue;
1594                 }
1595                 cur++;
1596         }
1597         if (begin < cur) {
1598                 gchar *tmp = g_strdup(begin);
1599                 gchar *o_tmp = tmp;
1600                 tmp[cur-begin]='\0';
1601                 cur++;
1602                 begin = cur;
1603                 while (*tmp == ' ')
1604                         tmp++;
1605                 compose_add_header_entry(compose, header, tmp);
1606                 g_free(o_tmp);          
1607         }
1608 }
1609
1610 void compose_entry_mark_default_to(Compose *compose, const gchar *mailto)
1611 {
1612         static GtkStyle *bold_style = NULL;
1613         static GdkColor bold_color;
1614         GSList *h_list;
1615         GtkEntry *entry;
1616                 
1617         for (h_list = compose->header_list; h_list != NULL; h_list = h_list->next) {
1618                 entry = GTK_ENTRY(((ComposeHeaderEntry *)h_list->data)->entry);
1619                 if (gtk_entry_get_text(entry) && 
1620                     !g_utf8_collate(gtk_entry_get_text(entry), mailto)) {
1621                         gtk_widget_ensure_style(GTK_WIDGET(entry));
1622                         if (!bold_style) {
1623                                 PangoFontDescription *font_desc = NULL;
1624                                 gtkut_convert_int_to_gdk_color
1625                                         (prefs_common.color_new, &bold_color);
1626                                 bold_style = gtk_style_copy(gtk_widget_get_style
1627                                         (GTK_WIDGET(entry)));
1628                                 if (BOLD_FONT)
1629                                         font_desc = pango_font_description_from_string
1630                                                         (BOLD_FONT);
1631                                 if (font_desc) {
1632                                         if (bold_style->font_desc)
1633                                                 pango_font_description_free
1634                                                         (bold_style->font_desc);
1635                                         bold_style->font_desc = font_desc;
1636                                 }
1637                                 bold_style->fg[GTK_STATE_NORMAL] = bold_color;
1638                         }
1639                         gtk_widget_set_style(GTK_WIDGET(entry), bold_style);
1640                 }
1641         }
1642 }
1643
1644 void compose_toolbar_cb(gint action, gpointer data)
1645 {
1646         ToolbarItem *toolbar_item = (ToolbarItem*)data;
1647         Compose *compose = (Compose*)toolbar_item->parent;
1648         
1649         g_return_if_fail(compose != NULL);
1650
1651         switch(action) {
1652         case A_SEND:
1653                 compose_send_cb(compose, 0, NULL);
1654                 break;
1655         case A_SENDL:
1656                 compose_send_later_cb(compose, 0, NULL);
1657                 break;
1658         case A_DRAFT:
1659                 compose_draft_cb(compose, COMPOSE_QUIT_EDITING, NULL);
1660                 break;
1661         case A_INSERT:
1662                 compose_insert_file_cb(compose, 0, NULL);
1663                 break;
1664         case A_ATTACH:
1665                 compose_attach_cb(compose, 0, NULL);
1666                 break;
1667         case A_SIG:
1668                 compose_insert_sig(compose, FALSE);
1669                 break;
1670         case A_EXTEDITOR:
1671                 compose_ext_editor_cb(compose, 0, NULL);
1672                 break;
1673         case A_LINEWRAP_CURRENT:
1674                 compose_wrap_paragraph(compose, NULL, TRUE);
1675                 break;
1676         case A_LINEWRAP_ALL:
1677                 compose_wrap_all_full(compose, TRUE);
1678                 break;
1679         case A_ADDRBOOK:
1680                 compose_address_cb(compose, 0, NULL);
1681                 break;
1682 #ifdef USE_ASPELL
1683         case A_CHECK_SPELLING:
1684                 compose_check_all(compose);
1685                 break;
1686 #endif
1687         default:
1688                 break;
1689         }
1690 }
1691
1692 static void compose_entries_set(Compose *compose, const gchar *mailto)
1693 {
1694         gchar *to = NULL;
1695         gchar *cc = NULL;
1696         gchar *subject = NULL;
1697         gchar *body = NULL;
1698         gchar *temp = NULL;
1699         gint  len = 0;
1700
1701         scan_mailto_url(mailto, &to, &cc, NULL, &subject, &body);
1702
1703         if (to)
1704                 compose_entry_append(compose, to, COMPOSE_TO);
1705         if (cc)
1706                 compose_entry_append(compose, cc, COMPOSE_CC);
1707         if (subject) {
1708                 if (!g_utf8_validate (subject, -1, NULL)) {
1709                         temp = g_locale_to_utf8 (subject, -1, NULL, &len, NULL);
1710                         gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), temp);
1711                         g_free(temp);
1712                 } else {
1713                         gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), subject);
1714                 }
1715         }
1716         if (body) {
1717                 GtkTextView *text = GTK_TEXT_VIEW(compose->text);
1718                 GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
1719                 GtkTextMark *mark;
1720                 GtkTextIter iter;
1721                 gboolean prev_autowrap = compose->autowrap;
1722
1723                 compose->autowrap = FALSE;
1724
1725                 mark = gtk_text_buffer_get_insert(buffer);
1726                 gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
1727
1728                 if (!g_utf8_validate (body, -1, NULL)) {
1729                         temp = g_locale_to_utf8 (body, -1, NULL, &len, NULL);
1730                         gtk_text_buffer_insert(buffer, &iter, temp, -1);
1731                         g_free(temp);
1732                 } else {
1733                         gtk_text_buffer_insert(buffer, &iter, body, -1);
1734                 }
1735                 gtk_text_buffer_insert(buffer, &iter, "\n", 1);
1736
1737                 compose->autowrap = prev_autowrap;
1738                 if (compose->autowrap)
1739                         compose_wrap_all(compose);
1740         }
1741
1742         g_free(to);
1743         g_free(cc);
1744         g_free(subject);
1745         g_free(body);
1746 }
1747
1748 static gint compose_parse_header(Compose *compose, MsgInfo *msginfo)
1749 {
1750         static HeaderEntry hentry[] = {{"Reply-To:",    NULL, TRUE},
1751                                        {"Cc:",          NULL, TRUE},
1752                                        {"References:",  NULL, FALSE},
1753                                        {"Bcc:",         NULL, TRUE},
1754                                        {"Newsgroups:",  NULL, TRUE},
1755                                        {"Followup-To:", NULL, TRUE},
1756                                        {"List-Post:",   NULL, FALSE},
1757                                        {"X-Priority:",  NULL, FALSE},
1758                                        {NULL,           NULL, FALSE}};
1759
1760         enum
1761         {
1762                 H_REPLY_TO      = 0,
1763                 H_CC            = 1,
1764                 H_REFERENCES    = 2,
1765                 H_BCC           = 3,
1766                 H_NEWSGROUPS    = 4,
1767                 H_FOLLOWUP_TO   = 5,
1768                 H_LIST_POST     = 6,
1769                 H_X_PRIORITY    = 7
1770         };
1771
1772         FILE *fp;
1773
1774         g_return_val_if_fail(msginfo != NULL, -1);
1775
1776         if ((fp = procmsg_open_message(msginfo)) == NULL) return -1;
1777         procheader_get_header_fields(fp, hentry);
1778         fclose(fp);
1779
1780         if (hentry[H_REPLY_TO].body != NULL) {
1781                 if (hentry[H_REPLY_TO].body[0] != '\0') {
1782                         compose->replyto =
1783                                 conv_unmime_header(hentry[H_REPLY_TO].body,
1784                                                    NULL);
1785                 }
1786                 g_free(hentry[H_REPLY_TO].body);
1787                 hentry[H_REPLY_TO].body = NULL;
1788         }
1789         if (hentry[H_CC].body != NULL) {
1790                 compose->cc = conv_unmime_header(hentry[H_CC].body, NULL);
1791                 g_free(hentry[H_CC].body);
1792                 hentry[H_CC].body = NULL;
1793         }
1794         if (hentry[H_REFERENCES].body != NULL) {
1795                 if (compose->mode == COMPOSE_REEDIT)
1796                         compose->references = hentry[H_REFERENCES].body;
1797                 else {
1798                         compose->references = compose_parse_references
1799                                 (hentry[H_REFERENCES].body, msginfo->msgid);
1800                         g_free(hentry[H_REFERENCES].body);
1801                 }
1802                 hentry[H_REFERENCES].body = NULL;
1803         }
1804         if (hentry[H_BCC].body != NULL) {
1805                 if (compose->mode == COMPOSE_REEDIT)
1806                         compose->bcc =
1807                                 conv_unmime_header(hentry[H_BCC].body, NULL);
1808                 g_free(hentry[H_BCC].body);
1809                 hentry[H_BCC].body = NULL;
1810         }
1811         if (hentry[H_NEWSGROUPS].body != NULL) {
1812                 compose->newsgroups = hentry[H_NEWSGROUPS].body;
1813                 hentry[H_NEWSGROUPS].body = NULL;
1814         }
1815         if (hentry[H_FOLLOWUP_TO].body != NULL) {
1816                 if (hentry[H_FOLLOWUP_TO].body[0] != '\0') {
1817                         compose->followup_to =
1818                                 conv_unmime_header(hentry[H_FOLLOWUP_TO].body,
1819                                                    NULL);
1820                 }
1821                 g_free(hentry[H_FOLLOWUP_TO].body);
1822                 hentry[H_FOLLOWUP_TO].body = NULL;
1823         }
1824         if (hentry[H_LIST_POST].body != NULL) {
1825                 gchar *to = NULL;
1826
1827                 extract_address(hentry[H_LIST_POST].body);
1828                 if (hentry[H_LIST_POST].body[0] != '\0') {
1829                         scan_mailto_url(hentry[H_LIST_POST].body,
1830                                         &to, NULL, NULL, NULL, NULL);
1831                         if (to) {
1832                                 g_free(compose->ml_post);
1833                                 compose->ml_post = to;
1834                         }
1835                 }
1836                 g_free(hentry[H_LIST_POST].body);
1837                 hentry[H_LIST_POST].body = NULL;
1838         }
1839
1840         /* CLAWS - X-Priority */
1841         if (compose->mode == COMPOSE_REEDIT)
1842                 if (hentry[H_X_PRIORITY].body != NULL) {
1843                         gint priority;
1844                         
1845                         priority = atoi(hentry[H_X_PRIORITY].body);
1846                         g_free(hentry[H_X_PRIORITY].body);
1847                         
1848                         hentry[H_X_PRIORITY].body = NULL;
1849                         
1850                         if (priority < PRIORITY_HIGHEST || 
1851                             priority > PRIORITY_LOWEST)
1852                                 priority = PRIORITY_NORMAL;
1853                         
1854                         compose->priority =  priority;
1855                 }
1856  
1857         if (compose->mode == COMPOSE_REEDIT) {
1858                 if (msginfo->inreplyto && *msginfo->inreplyto)
1859                         compose->inreplyto = g_strdup(msginfo->inreplyto);
1860                 return 0;
1861         }
1862
1863         if (msginfo->msgid && *msginfo->msgid)
1864                 compose->inreplyto = g_strdup(msginfo->msgid);
1865
1866         if (!compose->references) {
1867                 if (msginfo->msgid && *msginfo->msgid) {
1868                         if (msginfo->inreplyto && *msginfo->inreplyto)
1869                                 compose->references =
1870                                         g_strdup_printf("<%s>\n\t<%s>",
1871                                                         msginfo->inreplyto,
1872                                                         msginfo->msgid);
1873                         else
1874                                 compose->references =
1875                                         g_strconcat("<", msginfo->msgid, ">",
1876                                                     NULL);
1877                 } else if (msginfo->inreplyto && *msginfo->inreplyto) {
1878                         compose->references =
1879                                 g_strconcat("<", msginfo->inreplyto, ">",
1880                                             NULL);
1881                 }
1882         }
1883
1884         return 0;
1885 }
1886
1887 static gchar *compose_parse_references(const gchar *ref, const gchar *msgid)
1888 {
1889         GSList *ref_id_list, *cur;
1890         GString *new_ref;
1891         gchar *new_ref_str;
1892
1893         ref_id_list = references_list_append(NULL, ref);
1894         if (!ref_id_list) return NULL;
1895         if (msgid && *msgid)
1896                 ref_id_list = g_slist_append(ref_id_list, g_strdup(msgid));
1897
1898         for (;;) {
1899                 gint len = 0;
1900
1901                 for (cur = ref_id_list; cur != NULL; cur = cur->next)
1902                         /* "<" + Message-ID + ">" + CR+LF+TAB */
1903                         len += strlen((gchar *)cur->data) + 5;
1904
1905                 if (len > MAX_REFERENCES_LEN) {
1906                         /* remove second message-ID */
1907                         if (ref_id_list && ref_id_list->next &&
1908                             ref_id_list->next->next) {
1909                                 g_free(ref_id_list->next->data);
1910                                 ref_id_list = g_slist_remove
1911                                         (ref_id_list, ref_id_list->next->data);
1912                         } else {
1913                                 slist_free_strings(ref_id_list);
1914                                 g_slist_free(ref_id_list);
1915                                 return NULL;
1916                         }
1917                 } else
1918                         break;
1919         }
1920
1921         new_ref = g_string_new("");
1922         for (cur = ref_id_list; cur != NULL; cur = cur->next) {
1923                 if (new_ref->len > 0)
1924                         g_string_append(new_ref, "\n\t");
1925                 g_string_append_printf(new_ref, "<%s>", (gchar *)cur->data);
1926         }
1927
1928         slist_free_strings(ref_id_list);
1929         g_slist_free(ref_id_list);
1930
1931         new_ref_str = new_ref->str;
1932         g_string_free(new_ref, FALSE);
1933
1934         return new_ref_str;
1935 }
1936
1937 static gchar *compose_quote_fmt(Compose *compose, MsgInfo *msginfo,
1938                                 const gchar *fmt, const gchar *qmark,
1939                                 const gchar *body)
1940 {
1941         static MsgInfo dummyinfo;
1942         gchar *quote_str = NULL;
1943         gchar *buf;
1944         gchar *p, *lastp;
1945         gint len;
1946         gboolean prev_autowrap;
1947         const gchar *trimmed_body = body;
1948         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
1949         GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
1950         
1951         if (!msginfo)
1952                 msginfo = &dummyinfo;
1953
1954         if (qmark != NULL) {
1955                 quote_fmt_init(msginfo, NULL, NULL);
1956                 quote_fmt_scan_string(qmark);
1957                 quote_fmt_parse();
1958
1959                 buf = quote_fmt_get_buffer();
1960                 if (buf == NULL)
1961                         alertpanel_error(_("Quote mark format error."));
1962                 else
1963                         Xstrdup_a(quote_str, buf, return NULL)
1964         }
1965
1966         if (fmt && *fmt != '\0') {
1967                 while (trimmed_body && strlen(trimmed_body) > 1
1968                         && trimmed_body[0]=='\n')
1969                         *trimmed_body++;
1970
1971                 quote_fmt_init(msginfo, quote_str, trimmed_body);
1972                 quote_fmt_scan_string(fmt);
1973                 quote_fmt_parse();
1974
1975                 buf = quote_fmt_get_buffer();
1976                 if (buf == NULL) {
1977                         alertpanel_error(_("Message reply/forward format error."));
1978                         return NULL;
1979                 }
1980         } else
1981                 buf = "";
1982
1983         prev_autowrap = compose->autowrap;
1984         compose->autowrap = FALSE;
1985
1986         g_signal_handlers_block_by_func(G_OBJECT(buffer),
1987                                 G_CALLBACK(compose_changed_cb),
1988                                 compose);
1989         g_signal_handlers_block_by_func(G_OBJECT(buffer),
1990                                 G_CALLBACK(text_inserted),
1991                                 compose);
1992         for (p = buf; *p != '\0'; ) {
1993                 GtkTextMark *mark;
1994                 GtkTextIter iter;
1995
1996                 
1997                 mark = gtk_text_buffer_get_insert(buffer);
1998                 gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
1999
2000                 lastp = strchr(p, '\n');
2001                 len = lastp ? lastp - p + 1 : -1;
2002
2003                 gtk_text_buffer_insert(buffer, &iter, p, len);
2004
2005                 if (lastp)
2006                         p = lastp + 1;
2007                 else
2008                         break;
2009         }
2010
2011         compose->autowrap = prev_autowrap;
2012         if (compose->autowrap)
2013                 compose_wrap_all(compose);
2014
2015         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),
2016                                 G_CALLBACK(compose_changed_cb),
2017                                 compose);
2018         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),
2019                                 G_CALLBACK(text_inserted),
2020                                 compose);
2021
2022
2023         return buf;
2024 }
2025
2026 static void compose_reply_set_entry(Compose *compose, MsgInfo *msginfo,
2027                                     gboolean to_all, gboolean to_ml,
2028                                     gboolean to_sender,
2029                                     gboolean followup_and_reply_to)
2030 {
2031         GSList *cc_list = NULL;
2032         GSList *cur;
2033         gchar *from = NULL;
2034         gchar *replyto = NULL;
2035         GHashTable *to_table;
2036
2037         g_return_if_fail(compose->account != NULL);
2038         g_return_if_fail(msginfo != NULL);
2039
2040         if (compose->account->protocol != A_NNTP) {
2041                 if (!compose->replyto && to_ml && compose->ml_post
2042                     && !(msginfo->folder && msginfo->folder->prefs->enable_default_reply_to))
2043                         compose_entry_append(compose,
2044                                            compose->ml_post,
2045                                            COMPOSE_TO);
2046                 else if (!(to_all || to_sender)
2047                          && msginfo->folder
2048                          && msginfo->folder->prefs->enable_default_reply_to) {
2049                         compose_entry_append(compose,
2050                             msginfo->folder->prefs->default_reply_to,
2051                             COMPOSE_TO);
2052                 } else
2053                         compose_entry_append(compose,
2054                                  (compose->replyto && !to_sender)
2055                                   ? compose->replyto :
2056                                   msginfo->from ? msginfo->from : "",
2057                                   COMPOSE_TO);
2058         } else {
2059                 if (to_sender || (compose->followup_to && 
2060                         !strncmp(compose->followup_to, "poster", 6)))
2061                         compose_entry_append
2062                                 (compose, 
2063                                  (compose->replyto ? compose->replyto :
2064                                         msginfo->from ? msginfo->from : ""),
2065                                  COMPOSE_TO);
2066                                  
2067                 else if (followup_and_reply_to || to_all) {
2068                         compose_entry_append
2069                                 (compose,
2070                                  (compose->replyto ? compose->replyto :
2071                                  msginfo->from ? msginfo->from : ""),
2072                                  COMPOSE_TO);                           
2073                 
2074                         compose_entry_append
2075                                 (compose,
2076                                  compose->followup_to ? compose->followup_to :
2077                                  compose->newsgroups ? compose->newsgroups : "",
2078                                  COMPOSE_NEWSGROUPS);
2079                 } 
2080                 else 
2081                         compose_entry_append
2082                                 (compose,
2083                                  compose->followup_to ? compose->followup_to :
2084                                  compose->newsgroups ? compose->newsgroups : "",
2085                                  COMPOSE_NEWSGROUPS);
2086         }
2087
2088         if (msginfo->subject && *msginfo->subject) {
2089                 gchar *buf, *buf2;
2090                 guchar *p;
2091
2092                 buf = p = g_strdup(msginfo->subject);
2093                 p += subject_get_prefix_length(p);
2094                 memmove(buf, p, strlen(p) + 1);
2095
2096                 buf2 = g_strdup_printf("Re: %s", buf);
2097                 gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), buf2);
2098
2099                 g_free(buf2);
2100                 g_free(buf);
2101         } else
2102                 gtk_entry_set_text(GTK_ENTRY(compose->subject_entry), "Re: ");
2103
2104         if (to_ml && compose->ml_post) return;
2105         if (!to_all || compose->account->protocol == A_NNTP) return;
2106
2107         if (compose->replyto) {
2108                 Xstrdup_a(replyto, compose->replyto, return);
2109                 extract_address(replyto);
2110         }
2111         if (msginfo->from) {
2112                 Xstrdup_a(from, msginfo->from, return);
2113                 extract_address(from);
2114         }
2115
2116         if (replyto && from)
2117                 cc_list = address_list_append_with_comments(cc_list, from);
2118         if (to_all && msginfo->folder && 
2119             msginfo->folder->prefs->enable_default_reply_to)
2120                 cc_list = address_list_append_with_comments(cc_list,
2121                                 msginfo->folder->prefs->default_reply_to);
2122         cc_list = address_list_append_with_comments(cc_list, msginfo->to);
2123         cc_list = address_list_append_with_comments(cc_list, compose->cc);
2124
2125         to_table = g_hash_table_new(g_str_hash, g_str_equal);
2126         if (replyto)
2127                 g_hash_table_insert(to_table, g_strdup(replyto), GINT_TO_POINTER(1));
2128         if (compose->account)
2129                 g_hash_table_insert(to_table, g_strdup(compose->account->address),
2130                                     GINT_TO_POINTER(1));
2131
2132         /* remove address on To: and that of current account */
2133         for (cur = cc_list; cur != NULL; ) {
2134                 GSList *next = cur->next;
2135                 gchar *addr;
2136
2137                 addr = g_strdup(cur->data);
2138                 extract_address(addr);
2139
2140                 if (GPOINTER_TO_INT(g_hash_table_lookup(to_table, addr)) == 1)
2141                         cc_list = g_slist_remove(cc_list, cur->data);
2142                 else
2143                         g_hash_table_insert(to_table, addr, GINT_TO_POINTER(1));
2144
2145                 cur = next;
2146         }
2147         hash_free_strings(to_table);
2148         g_hash_table_destroy(to_table);
2149
2150         if (cc_list) {
2151                 for (cur = cc_list; cur != NULL; cur = cur->next)
2152                         compose_entry_append(compose, (gchar *)cur->data,
2153                                              COMPOSE_CC);
2154                 slist_free_strings(cc_list);
2155                 g_slist_free(cc_list);
2156         }
2157
2158 }
2159
2160 #define SET_ENTRY(entry, str) \
2161 { \
2162         if (str && *str) \
2163                 gtk_entry_set_text(GTK_ENTRY(compose->entry), str); \
2164 }
2165
2166 #define SET_ADDRESS(type, str) \
2167 { \
2168         if (str && *str) \
2169                 compose_entry_append(compose, str, type); \
2170 }
2171
2172 static void compose_reedit_set_entry(Compose *compose, MsgInfo *msginfo)
2173 {
2174         g_return_if_fail(msginfo != NULL);
2175
2176         SET_ENTRY(subject_entry, msginfo->subject);
2177         SET_ADDRESS(COMPOSE_TO, msginfo->to);
2178         SET_ADDRESS(COMPOSE_CC, compose->cc);
2179         SET_ADDRESS(COMPOSE_BCC, compose->bcc);
2180         SET_ADDRESS(COMPOSE_REPLYTO, compose->replyto);
2181         SET_ADDRESS(COMPOSE_NEWSGROUPS, compose->newsgroups);
2182         SET_ADDRESS(COMPOSE_FOLLOWUPTO, compose->followup_to);
2183
2184         compose_update_priority_menu_item(compose);
2185         compose_update_privacy_system_menu_item(compose);
2186         compose_show_first_last_header(compose, TRUE);
2187 }
2188
2189 #undef SET_ENTRY
2190 #undef SET_ADDRESS
2191
2192 static void compose_insert_sig(Compose *compose, gboolean replace)
2193 {
2194         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
2195         GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
2196         GtkTextMark *mark;
2197         GtkTextIter iter, iter_end;
2198         gint cur_pos;
2199         gboolean prev_autowrap;
2200
2201         
2202         g_return_if_fail(compose->account != NULL);
2203
2204         prev_autowrap = compose->autowrap;
2205         compose->autowrap = FALSE;
2206
2207         g_signal_handlers_block_by_func(G_OBJECT(buffer),
2208                                         G_CALLBACK(compose_changed_cb),
2209                                         compose);
2210         
2211         mark = gtk_text_buffer_get_insert(buffer);
2212         gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
2213         cur_pos = gtk_text_iter_get_offset (&iter);
2214
2215         gtk_text_buffer_get_end_iter(buffer, &iter);
2216
2217         if (replace && compose->sig_str) {
2218                 gboolean found;
2219                 GtkTextIter first_iter, start_iter, end_iter;
2220
2221                 gtk_text_buffer_get_start_iter(buffer, &first_iter);
2222
2223                 if (compose->sig_str[0] == '\0')
2224                         found = FALSE;
2225                 else
2226                         found = gtk_text_iter_forward_search(&first_iter,
2227                                                              compose->sig_str,
2228                                                              GTK_TEXT_SEARCH_TEXT_ONLY,
2229                                                              &start_iter, &end_iter,
2230                                                              NULL);
2231
2232                 if (found) {
2233                         gtk_text_buffer_delete(buffer, &start_iter, &end_iter);
2234                         iter = start_iter;
2235                 }
2236         }
2237
2238         g_free(compose->sig_str);
2239         compose->sig_str = compose_get_signature_str(compose);
2240         if (!compose->sig_str || (replace && !compose->account->auto_sig))
2241                 compose->sig_str = g_strdup("");
2242
2243         cur_pos = gtk_text_iter_get_offset(&iter);
2244         gtk_text_buffer_insert(buffer, &iter, compose->sig_str, -1);
2245         /* skip \n\n */
2246         gtk_text_buffer_get_iter_at_offset(buffer, &iter, cur_pos);
2247         gtk_text_iter_forward_char(&iter);
2248         gtk_text_iter_forward_char(&iter);
2249         gtk_text_buffer_get_end_iter(buffer, &iter_end);
2250         gtk_text_buffer_apply_tag_by_name(buffer,"signature",&iter, &iter_end);
2251
2252         if (cur_pos > gtk_text_buffer_get_char_count (buffer))
2253                 cur_pos = gtk_text_buffer_get_char_count (buffer);
2254
2255         gtk_text_buffer_get_iter_at_offset(buffer, &iter, cur_pos);
2256         gtk_text_buffer_place_cursor(buffer, &iter);
2257
2258         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),
2259                                         G_CALLBACK(compose_changed_cb),
2260                                         compose);
2261                 
2262         compose->autowrap = prev_autowrap;
2263         if (compose->autowrap)
2264                 compose_wrap_all(compose);
2265 }
2266
2267 static gchar *compose_get_signature_str(Compose *compose)
2268 {
2269         gchar *sig_body = NULL;
2270         gchar *sig_str = NULL;
2271         gchar *utf8_sig_str = NULL;
2272
2273         g_return_val_if_fail(compose->account != NULL, NULL);
2274
2275         if (!compose->account->sig_path)
2276                 return NULL;
2277
2278         if (compose->account->sig_type == SIG_FILE) {
2279                 if (!is_file_or_fifo_exist(compose->account->sig_path)) {
2280                         g_warning("can't open signature file: %s\n",
2281                                   compose->account->sig_path);
2282                         return NULL;
2283                 }
2284         }
2285
2286         if (compose->account->sig_type == SIG_COMMAND)
2287                 sig_body = get_command_output(compose->account->sig_path);
2288         else {
2289                 gchar *tmp;
2290
2291                 tmp = file_read_to_str(compose->account->sig_path);
2292                 if (!tmp)
2293                         return NULL;
2294                 sig_body = normalize_newlines(tmp);
2295                 g_free(tmp);
2296         }
2297
2298         if (compose->account->sig_sep) {
2299                 sig_str = g_strconcat("\n\n", compose->account->sig_sep, "\n", sig_body,
2300                                       NULL);
2301                 g_free(sig_body);
2302         } else
2303                 sig_str = g_strconcat("\n\n", sig_body, NULL);
2304
2305         if (sig_str) {
2306                 if (g_utf8_validate(sig_str, -1, NULL) == TRUE)
2307                         utf8_sig_str = sig_str;
2308                 else {
2309                         utf8_sig_str = conv_codeset_strdup
2310                                 (sig_str, conv_get_locale_charset_str(),
2311                                  CS_INTERNAL);
2312                         g_free(sig_str);
2313                 }
2314         }
2315
2316         return utf8_sig_str;
2317 }
2318
2319 static ComposeInsertResult compose_insert_file(Compose *compose, const gchar *file)
2320 {
2321         GtkTextView *text;
2322         GtkTextBuffer *buffer;
2323         GtkTextMark *mark;
2324         GtkTextIter iter;
2325         const gchar *cur_encoding;
2326         gchar buf[BUFFSIZE];
2327         gint len;
2328         FILE *fp;
2329         gboolean prev_autowrap;
2330         gboolean badtxt = FALSE;
2331
2332         g_return_val_if_fail(file != NULL, COMPOSE_INSERT_NO_FILE);
2333
2334         if ((fp = fopen(file, "rb")) == NULL) {
2335                 FILE_OP_ERROR(file, "fopen");
2336                 return COMPOSE_INSERT_READ_ERROR;
2337         }
2338
2339         prev_autowrap = compose->autowrap;
2340         compose->autowrap = FALSE;
2341
2342         text = GTK_TEXT_VIEW(compose->text);
2343         buffer = gtk_text_view_get_buffer(text);
2344         mark = gtk_text_buffer_get_insert(buffer);
2345         gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
2346
2347         g_signal_handlers_block_by_func(G_OBJECT(buffer),
2348                                         G_CALLBACK(text_inserted),
2349                                         compose);
2350
2351         cur_encoding = conv_get_locale_charset_str();
2352
2353         while (fgets(buf, sizeof(buf), fp) != NULL) {
2354                 gchar *str;
2355
2356                 if (g_utf8_validate(buf, -1, NULL) == TRUE)
2357                         str = g_strdup(buf);
2358                 else
2359                         str = conv_codeset_strdup
2360                                 (buf, cur_encoding, CS_INTERNAL);
2361                 if (!str) continue;
2362
2363                 /* strip <CR> if DOS/Windows file,
2364                    replace <CR> with <LF> if Macintosh file. */
2365                 strcrchomp(str);
2366                 len = strlen(str);
2367                 if (len > 0 && str[len - 1] != '\n') {
2368                         while (--len >= 0)
2369                                 if (str[len] == '\r') str[len] = '\n';
2370                 }
2371
2372                 gtk_text_buffer_insert(buffer, &iter, str, -1);
2373                 g_free(str);
2374         }
2375
2376         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),
2377                                           G_CALLBACK(text_inserted),
2378                                           compose);
2379         compose->autowrap = prev_autowrap;
2380         if (compose->autowrap)
2381                 compose_wrap_all(compose);
2382
2383         fclose(fp);
2384
2385         if (badtxt)
2386                 return COMPOSE_INSERT_INVALID_CHARACTER;
2387         else 
2388                 return COMPOSE_INSERT_SUCCESS;
2389 }
2390
2391 static void compose_attach_append(Compose *compose, const gchar *file,
2392                                   const gchar *filename,
2393                                   const gchar *content_type)
2394 {
2395         AttachInfo *ainfo;
2396         GtkTreeIter iter;
2397         FILE *fp;
2398         off_t size;
2399         GAuto *auto_ainfo;
2400         gchar *size_text;
2401         GtkListStore *store;
2402         gchar *name;
2403
2404         if (!is_file_exist(file)) {
2405                 g_warning("File %s doesn't exist\n", filename);
2406                 return;
2407         }
2408         if ((size = get_file_size(file)) < 0) {
2409                 g_warning("Can't get file size of %s\n", filename);
2410                 return;
2411         }
2412         if (size == 0) {
2413                 alertpanel_notice(_("File %s is empty."), filename);
2414                 return;
2415         }
2416         if ((fp = fopen(file, "rb")) == NULL) {
2417                 alertpanel_error(_("Can't read %s."), filename);
2418                 return;
2419         }
2420         fclose(fp);
2421
2422         ainfo = g_new0(AttachInfo, 1);
2423         auto_ainfo = g_auto_pointer_new_with_free
2424                         (ainfo, (GFreeFunc) compose_attach_info_free); 
2425         ainfo->file = g_strdup(file);
2426
2427         if (content_type) {
2428                 ainfo->content_type = g_strdup(content_type);
2429                 if (!g_ascii_strcasecmp(content_type, "message/rfc822")) {
2430                         MsgInfo *msginfo;
2431                         MsgFlags flags = {0, 0};
2432
2433                         if (procmime_get_encoding_for_text_file(file) == ENC_7BIT)
2434                                 ainfo->encoding = ENC_7BIT;
2435                         else
2436                                 ainfo->encoding = ENC_8BIT;
2437
2438                         msginfo = procheader_parse_file(file, flags, FALSE, FALSE);
2439                         if (msginfo && msginfo->subject)
2440                                 name = g_strdup(msginfo->subject);
2441                         else
2442                                 name = g_path_get_basename(filename ? filename : file);
2443
2444                         ainfo->name = g_strdup_printf(_("Message: %s"), name);
2445
2446                         procmsg_msginfo_free(msginfo);
2447                 } else {
2448                         if (!g_ascii_strncasecmp(content_type, "text", 4))
2449                                 ainfo->encoding = procmime_get_encoding_for_text_file(file);
2450                         else
2451                                 ainfo->encoding = ENC_BASE64;
2452                         name = g_path_get_basename(filename ? filename : file);
2453                         ainfo->name = g_strdup(name);
2454                 }
2455                 g_free(name);
2456         } else {
2457                 ainfo->content_type = procmime_get_mime_type(file);
2458                 if (!ainfo->content_type) {
2459                         ainfo->content_type =
2460                                 g_strdup("application/octet-stream");
2461                         ainfo->encoding = ENC_BASE64;
2462                 } else if (!g_ascii_strncasecmp(ainfo->content_type, "text", 4))
2463                         ainfo->encoding =
2464                                 procmime_get_encoding_for_text_file(file);
2465                 else
2466                         ainfo->encoding = ENC_BASE64;
2467                 name = g_path_get_basename(filename ? filename : file);
2468                 ainfo->name = g_strdup(name);   
2469                 g_free(name);
2470         }
2471
2472         if (!strcmp(ainfo->content_type, "unknown")) {
2473                 g_free(ainfo->content_type);
2474                 ainfo->content_type = g_strdup("application/octet-stream");
2475         }
2476
2477         ainfo->size = size;
2478         size_text = to_human_readable(size);
2479
2480         store = GTK_LIST_STORE(gtk_tree_view_get_model
2481                         (GTK_TREE_VIEW(compose->attach_clist)));
2482                 
2483         gtk_list_store_append(store, &iter);
2484         gtk_list_store_set(store, &iter, 
2485                            COL_MIMETYPE, ainfo->content_type,
2486                            COL_SIZE, size_text,
2487                            COL_NAME, ainfo->name,
2488                            COL_DATA, ainfo,
2489                            COL_AUTODATA, auto_ainfo,
2490                            -1);
2491         
2492         g_auto_pointer_free(auto_ainfo);
2493 }
2494
2495 static void compose_use_signing(Compose *compose, gboolean use_signing)
2496 {
2497         GtkItemFactory *ifactory;
2498         GtkWidget *menuitem = NULL;
2499
2500         compose->use_signing = use_signing;
2501         ifactory = gtk_item_factory_from_widget(compose->menubar);
2502         menuitem = gtk_item_factory_get_item
2503                 (ifactory, "/Options/Sign");
2504         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem), 
2505                                        use_signing);
2506 }
2507
2508 static void compose_use_encryption(Compose *compose, gboolean use_encryption)
2509 {
2510         GtkItemFactory *ifactory;
2511         GtkWidget *menuitem = NULL;
2512
2513         compose->use_encryption = use_encryption;
2514         ifactory = gtk_item_factory_from_widget(compose->menubar);
2515         menuitem = gtk_item_factory_get_item
2516                 (ifactory, "/Options/Encrypt");
2517
2518         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem), 
2519                                        use_encryption);
2520 }
2521
2522 #define NEXT_PART_NOT_CHILD(info)  \
2523 {  \
2524         node = info->node;  \
2525         while (node->children)  \
2526                 node = g_node_last_child(node);  \
2527         info = procmime_mimeinfo_next((MimeInfo *)node->data);  \
2528 }
2529
2530 static void compose_attach_parts(Compose *compose, MsgInfo *msginfo)
2531 {
2532         MimeInfo *mimeinfo;
2533         MimeInfo *child;
2534         MimeInfo *firsttext = NULL;
2535         MimeInfo *encrypted = NULL;
2536         GNode    *node;
2537         gchar *outfile;
2538         const gchar *partname = NULL;
2539
2540         mimeinfo = procmime_scan_message(msginfo);
2541         if (!mimeinfo) return;
2542
2543         if (mimeinfo->node->children == NULL) {
2544                 procmime_mimeinfo_free_all(mimeinfo);
2545                 return;
2546         }
2547
2548         /* find first content part */
2549         child = (MimeInfo *) mimeinfo->node->children->data;
2550         while (child && child->node->children && (child->type == MIMETYPE_MULTIPART))
2551                 child = (MimeInfo *)child->node->children->data;
2552
2553         if (child->type == MIMETYPE_TEXT) {
2554                 firsttext = child;
2555                 debug_print("First text part found\n");
2556         } else if (compose->mode == COMPOSE_REEDIT &&
2557                  child->type == MIMETYPE_APPLICATION &&
2558                  !g_ascii_strcasecmp(child->subtype, "pgp-encrypted")) {
2559                 encrypted = (MimeInfo *)child->node->parent->data;
2560         }
2561      
2562         child = (MimeInfo *) mimeinfo->node->children->data;
2563         while (child != NULL) {
2564                 if (child == encrypted) {
2565                         /* skip this part of tree */
2566                         NEXT_PART_NOT_CHILD(child);
2567                         continue;
2568                 }
2569
2570                 if (child->type == MIMETYPE_MULTIPART) {
2571                         /* get the actual content */
2572                         child = procmime_mimeinfo_next(child);
2573                         continue;
2574                 }
2575                     
2576                 if (child == firsttext) {
2577                         child = procmime_mimeinfo_next(child);
2578                         continue;
2579                 }
2580
2581                 outfile = procmime_get_tmp_file_name(child);
2582                 if (procmime_get_part(outfile, child) < 0)
2583                         g_warning("Can't get the part of multipart message.");
2584                 else {
2585                         gchar *content_type;
2586
2587                         content_type = procmime_get_content_type_str(child->type, child->subtype);
2588                         partname = procmime_mimeinfo_get_parameter(child, "name");
2589                         if (partname == NULL)
2590                                 partname = "";
2591                         compose_attach_append(compose, outfile, 
2592                                               partname, content_type);
2593                         g_free(content_type);
2594                 }
2595                 g_free(outfile);
2596                 NEXT_PART_NOT_CHILD(child);
2597         }
2598         procmime_mimeinfo_free_all(mimeinfo);
2599 }
2600
2601 #undef NEXT_PART_NOT_CHILD
2602
2603
2604
2605 typedef enum {
2606         WAIT_FOR_INDENT_CHAR,
2607         WAIT_FOR_INDENT_CHAR_OR_SPACE,
2608 } IndentState;
2609
2610 /* return indent length, we allow:
2611    indent characters followed by indent characters or spaces/tabs,
2612    alphabets and numbers immediately followed by indent characters,
2613    and the repeating sequences of the above
2614    If quote ends with multiple spaces, only the first one is included. */
2615 static gchar *compose_get_quote_str(GtkTextBuffer *buffer,
2616                                     const GtkTextIter *start, gint *len)
2617 {
2618         GtkTextIter iter = *start;
2619         gunichar wc;
2620         gchar ch[6];
2621         gint clen;
2622         IndentState state = WAIT_FOR_INDENT_CHAR;
2623         gboolean is_space;
2624         gboolean is_indent;
2625         gint alnum_count = 0;
2626         gint space_count = 0;
2627         gint quote_len = 0;
2628
2629         if (prefs_common.quote_chars == NULL) {
2630                 return 0 ;
2631         }
2632
2633         while (!gtk_text_iter_ends_line(&iter)) {
2634                 wc = gtk_text_iter_get_char(&iter);
2635                 if (g_unichar_iswide(wc))
2636                         break;
2637                 clen = g_unichar_to_utf8(wc, ch);
2638                 if (clen != 1)
2639                         break;
2640
2641                 is_indent = strchr(prefs_common.quote_chars, ch[0]) ? TRUE : FALSE;
2642                 is_space = g_unichar_isspace(wc);
2643
2644                 if (state == WAIT_FOR_INDENT_CHAR) {
2645                         if (!is_indent && !g_unichar_isalnum(wc))
2646                                 break;
2647                         if (is_indent) {
2648                                 quote_len += alnum_count + space_count + 1;
2649                                 alnum_count = space_count = 0;
2650                                 state = WAIT_FOR_INDENT_CHAR_OR_SPACE;
2651                         } else
2652                                 alnum_count++;
2653                 } else if (state == WAIT_FOR_INDENT_CHAR_OR_SPACE) {
2654                         if (!is_indent && !is_space && !g_unichar_isalnum(wc))
2655                                 break;
2656                         if (is_space)
2657                                 space_count++;
2658                         else if (is_indent) {
2659                                 quote_len += alnum_count + space_count + 1;
2660                                 alnum_count = space_count = 0;
2661                         } else {
2662                                 alnum_count++;
2663                                 state = WAIT_FOR_INDENT_CHAR;
2664                         }
2665                 }
2666
2667                 gtk_text_iter_forward_char(&iter);
2668         }
2669
2670         if (quote_len > 0 && space_count > 0)
2671                 quote_len++;
2672
2673         if (len)
2674                 *len = quote_len;
2675
2676         if (quote_len > 0) {
2677                 iter = *start;
2678                 gtk_text_iter_forward_chars(&iter, quote_len);
2679                 return gtk_text_buffer_get_text(buffer, start, &iter, FALSE);
2680         }
2681
2682         return NULL;
2683 }
2684
2685 /* return TRUE if the line is itemized */
2686 static gboolean compose_is_itemized(GtkTextBuffer *buffer,
2687                                     const GtkTextIter *start)
2688 {
2689         GtkTextIter iter = *start;
2690         gunichar wc;
2691         gchar ch[6];
2692         gint clen;
2693
2694         if (gtk_text_iter_ends_line(&iter))
2695                 return FALSE;
2696
2697         while (1) {
2698                 wc = gtk_text_iter_get_char(&iter);
2699                 if (!g_unichar_isspace(wc))
2700                         break;
2701                 gtk_text_iter_forward_char(&iter);
2702                 if (gtk_text_iter_ends_line(&iter))
2703                         return FALSE;
2704         }
2705
2706         clen = g_unichar_to_utf8(wc, ch);
2707         if (clen != 1)
2708                 return FALSE;
2709
2710         if (!strchr("*-+", ch[0]))
2711                 return FALSE;
2712
2713         gtk_text_iter_forward_char(&iter);
2714         if (gtk_text_iter_ends_line(&iter))
2715                 return FALSE;
2716         wc = gtk_text_iter_get_char(&iter);
2717         if (g_unichar_isspace(wc))
2718                 return TRUE;
2719
2720         return FALSE;
2721 }
2722
2723 static gboolean compose_get_line_break_pos(GtkTextBuffer *buffer,
2724                                            const GtkTextIter *start,
2725                                            GtkTextIter *break_pos,
2726                                            gint max_col,
2727                                            gint quote_len)
2728 {
2729         GtkTextIter iter = *start, line_end = *start;
2730         PangoLogAttr *attrs;
2731         gchar *str;
2732         gchar *p;
2733         gint len;
2734         gint i;
2735         gint col = 0;
2736         gint pos = 0;
2737         gboolean can_break = FALSE;
2738         gboolean do_break = FALSE;
2739         gboolean was_white = FALSE;
2740         gboolean prev_dont_break = FALSE;
2741
2742         gtk_text_iter_forward_to_line_end(&line_end);
2743         str = gtk_text_buffer_get_text(buffer, &iter, &line_end, FALSE);
2744         len = g_utf8_strlen(str, -1);
2745         /* g_print("breaking line: %d: %s (len = %d)\n",
2746                 gtk_text_iter_get_line(&iter), str, len); */
2747         attrs = g_new(PangoLogAttr, len + 1);
2748
2749         pango_default_break(str, -1, NULL, attrs, len + 1);
2750
2751         p = str;
2752
2753         /* skip quote and leading spaces */
2754         for (i = 0; *p != '\0' && i < len; i++) {
2755                 gunichar wc;
2756
2757                 wc = g_utf8_get_char(p);
2758                 if (i >= quote_len && !g_unichar_isspace(wc))
2759                         break;
2760                 if (g_unichar_iswide(wc))
2761                         col += 2;
2762                 else if (*p == '\t')
2763                         col += 8;
2764                 else
2765                         col++;
2766                 p = g_utf8_next_char(p);
2767         }
2768
2769         for (; *p != '\0' && i < len; i++) {
2770                 PangoLogAttr *attr = attrs + i;
2771                 gunichar wc;
2772                 gint uri_len;
2773
2774                 if (attr->is_line_break && can_break && was_white && !prev_dont_break)
2775                         pos = i;
2776                 
2777                 was_white = attr->is_white;
2778
2779                 /* don't wrap URI */
2780                 if ((uri_len = get_uri_len(p)) > 0) {
2781                         col += uri_len;
2782                         if (pos > 0 && col > max_col) {
2783                                 do_break = TRUE;
2784                                 break;
2785                         }
2786                         i += uri_len - 1;
2787                         p += uri_len;
2788                         can_break = TRUE;
2789                         continue;
2790                 }
2791
2792                 wc = g_utf8_get_char(p);
2793                 if (g_unichar_iswide(wc)) {
2794                         col += 2;
2795                         if (prev_dont_break && can_break && attr->is_line_break)
2796                                 pos = i;
2797                 } else if (*p == '\t')
2798                         col += 8;
2799                 else
2800                         col++;
2801                 if (pos > 0 && col > max_col) {
2802                         do_break = TRUE;
2803                         break;
2804                 }
2805
2806                 if (*p == '-' || *p == '/')
2807                         prev_dont_break = TRUE;
2808                 else
2809                         prev_dont_break = FALSE;
2810
2811                 p = g_utf8_next_char(p);
2812                 can_break = TRUE;
2813         }
2814
2815         debug_print("compose_get_line_break_pos(): do_break = %d, pos = %d, col = %d\n", do_break, pos, col);
2816
2817         g_free(attrs);
2818         g_free(str);
2819
2820         *break_pos = *start;
2821         gtk_text_iter_set_line_offset(break_pos, pos);
2822
2823         return do_break;
2824 }
2825
2826 static gboolean compose_is_sig_separator(Compose *compose, GtkTextBuffer *textbuf, GtkTextIter *iter) 
2827 {
2828         GtkTextIter start = *iter;
2829         GtkTextIter end_iter;
2830         int start_pos = gtk_text_iter_get_offset(&start);
2831
2832         if (!compose->account->sig_sep)
2833                 return FALSE;
2834         
2835         gtk_text_buffer_get_iter_at_offset(textbuf, &end_iter,
2836                 start_pos+strlen(compose->account->sig_sep));
2837
2838         /* check sig separator */
2839         if (!strcmp(gtk_text_iter_get_text(&start, &end_iter),
2840                         compose->account->sig_sep)) {
2841                 /* check end of line (\n) */
2842                 gtk_text_buffer_get_iter_at_offset(textbuf, &start,
2843                         start_pos+strlen(compose->account->sig_sep));
2844                 gtk_text_buffer_get_iter_at_offset(textbuf, &end_iter,
2845                         start_pos+strlen(compose->account->sig_sep)+1);
2846
2847                 if (!strcmp(gtk_text_iter_get_text(&start, &end_iter),"\n"));
2848                         return TRUE;
2849                 
2850
2851         }
2852
2853         return FALSE;
2854 }
2855
2856 static gboolean compose_join_next_line(Compose *compose,
2857                                        GtkTextBuffer *buffer,
2858                                        GtkTextIter *iter,
2859                                        const gchar *quote_str)
2860 {
2861         GtkTextIter iter_ = *iter, cur, prev, next, end;
2862         PangoLogAttr attrs[3];
2863         gchar *str;
2864         gchar *next_quote_str;
2865         gunichar wc1, wc2;
2866         gint quote_len;
2867         gboolean keep_cursor = FALSE;
2868
2869         if (!gtk_text_iter_forward_line(&iter_) ||
2870             gtk_text_iter_ends_line(&iter_))
2871                 return FALSE;
2872
2873         next_quote_str = compose_get_quote_str(buffer, &iter_, &quote_len);
2874
2875         if ((quote_str || next_quote_str) &&
2876             strcmp2(quote_str, next_quote_str) != 0) {
2877                 g_free(next_quote_str);
2878                 return FALSE;
2879         }
2880         g_free(next_quote_str);
2881
2882         end = iter_;
2883         if (quote_len > 0) {
2884                 gtk_text_iter_forward_chars(&end, quote_len);
2885                 if (gtk_text_iter_ends_line(&end))
2886                         return FALSE;
2887         }
2888
2889         /* don't join itemized lines */
2890         if (compose_is_itemized(buffer, &end))
2891                 return FALSE;
2892
2893         /* don't join signature separator */
2894         if (compose_is_sig_separator(compose, buffer, &iter_))
2895                 return FALSE;
2896
2897         /* delete quote str */
2898         if (quote_len > 0)
2899                 gtk_text_buffer_delete(buffer, &iter_, &end);
2900
2901         /* delete linebreak and extra spaces */
2902         prev = cur = iter_;
2903         while (gtk_text_iter_backward_char(&cur)) {
2904                 wc1 = gtk_text_iter_get_char(&cur);
2905                 if (!g_unichar_isspace(wc1))
2906                         break;
2907                 prev = cur;
2908         }
2909         next = cur = iter_;
2910         while (!gtk_text_iter_ends_line(&cur)) {
2911                 wc1 = gtk_text_iter_get_char(&cur);
2912                 if (!g_unichar_isspace(wc1))
2913                         break;
2914                 gtk_text_iter_forward_char(&cur);
2915                 next = cur;
2916         }
2917         if (!gtk_text_iter_equal(&prev, &next)) {
2918                 GtkTextMark *mark;
2919
2920                 mark = gtk_text_buffer_get_insert(buffer);
2921                 gtk_text_buffer_get_iter_at_mark(buffer, &cur, mark);
2922                 if (gtk_text_iter_equal(&prev, &cur))
2923                         keep_cursor = TRUE;
2924                 gtk_text_buffer_delete(buffer, &prev, &next);
2925         }
2926         iter_ = prev;
2927
2928         /* insert space if required */
2929         gtk_text_iter_backward_char(&prev);
2930         wc1 = gtk_text_iter_get_char(&prev);
2931         wc2 = gtk_text_iter_get_char(&next);
2932         gtk_text_iter_forward_char(&next);
2933         str = gtk_text_buffer_get_text(buffer, &prev, &next, FALSE);
2934         pango_default_break(str, -1, NULL, attrs, 3);
2935         if (!attrs[1].is_line_break ||
2936             (!g_unichar_iswide(wc1) || !g_unichar_iswide(wc2))) {
2937                 gtk_text_buffer_insert(buffer, &iter_, " ", 1);
2938                 if (keep_cursor) {
2939                         gtk_text_iter_backward_char(&iter_);
2940                         gtk_text_buffer_place_cursor(buffer, &iter_);
2941                 }
2942         }
2943         g_free(str);
2944
2945         *iter = iter_;
2946         return TRUE;
2947 }
2948
2949 #define ADD_TXT_POS(bp_, ep_, pti_) \
2950         if ((last->next = alloca(sizeof(struct txtpos))) != NULL) { \
2951                 last = last->next; \
2952                 last->bp = (bp_); last->ep = (ep_); last->pti = (pti_); \
2953                 last->next = NULL; \
2954         } else { \
2955                 g_warning("alloc error scanning URIs\n"); \
2956         }
2957
2958 static void compose_wrap_paragraph(Compose *compose, GtkTextIter *par_iter, gboolean force)
2959 {
2960         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
2961         GtkTextBuffer *buffer;
2962         GtkTextIter iter, break_pos, end_of_line;
2963         gchar *quote_str = NULL;
2964         gint quote_len;
2965         gboolean wrap_quote = prefs_common.linewrap_quote;
2966         gboolean prev_autowrap = compose->autowrap;
2967         gint startq_offset = -1, noq_offset = -1;
2968         gint uri_start = -1, uri_stop = -1;
2969         gint nouri_start = -1, nouri_stop = -1;
2970
2971         compose->autowrap = FALSE;
2972
2973         buffer = gtk_text_view_get_buffer(text);
2974
2975         undo_block(compose->undostruct);
2976         
2977         if (par_iter) {
2978                 iter = *par_iter;
2979         } else {
2980                 GtkTextMark *mark;
2981                 mark = gtk_text_buffer_get_insert(buffer);
2982                 gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
2983         }
2984
2985         /* move to paragraph start */
2986         gtk_text_iter_set_line_offset(&iter, 0);
2987         if (gtk_text_iter_ends_line(&iter)) {
2988                 while (gtk_text_iter_ends_line(&iter) &&
2989                        gtk_text_iter_forward_line(&iter))
2990                         ;
2991         } else {
2992                 while (gtk_text_iter_backward_line(&iter)) {
2993                         if (gtk_text_iter_ends_line(&iter)) {
2994                                 gtk_text_iter_forward_line(&iter);
2995                                 break;
2996                         }
2997                 }
2998         }
2999
3000         /* go until paragraph end (empty line) */
3001         while (!gtk_text_iter_ends_line(&iter)) {
3002                 gchar *scanpos = NULL;
3003                 /* parse table - in order of priority */
3004                 struct table {
3005                         const gchar *needle; /* token */
3006
3007                         /* token search function */
3008                         gchar    *(*search)     (const gchar *haystack,
3009                                                  const gchar *needle);
3010                         /* part parsing function */
3011                         gboolean  (*parse)      (const gchar *start,
3012                                                  const gchar *scanpos,
3013                                                  const gchar **bp_,
3014                                                  const gchar **ep_);
3015                         /* part to URI function */
3016                         gchar    *(*build_uri)  (const gchar *bp,
3017                                                  const gchar *ep);
3018                 };
3019
3020                 static struct table parser[] = {
3021                         {"http://",  strcasestr, get_uri_part,   make_uri_string},
3022                         {"https://", strcasestr, get_uri_part,   make_uri_string},
3023                         {"ftp://",   strcasestr, get_uri_part,   make_uri_string},
3024                         {"www.",     strcasestr, get_uri_part,   make_http_string},
3025                         {"mailto:",  strcasestr, get_uri_part,   make_uri_string},
3026                         {"@",        strcasestr, get_email_part, make_email_string}
3027                 };
3028                 const gint PARSE_ELEMS = sizeof parser / sizeof parser[0];
3029                 gint last_index = PARSE_ELEMS;
3030                 gint  n;
3031                 gchar *o_walk, *walk, *bp, *ep;
3032                 gint walk_pos;
3033
3034                 uri_start = uri_stop = -1;
3035                 quote_str = compose_get_quote_str(buffer, &iter, &quote_len);
3036
3037                 if (quote_str) {
3038                         if (!wrap_quote) {
3039                                 if (startq_offset == -1) {
3040                                         startq_offset = gtk_text_iter_get_offset(&iter);
3041                                 }
3042                                 goto colorize;
3043                         }
3044                         debug_print("compose_wrap_paragraph(): quote_str = '%s'\n", quote_str);
3045                         startq_offset = gtk_text_iter_get_offset(&iter);
3046                 } else {
3047                         if (startq_offset == -1)
3048                                 noq_offset = gtk_text_iter_get_offset(&iter);
3049                 }
3050
3051                 if (prev_autowrap == FALSE && !force) {
3052                         goto colorize;
3053                 }
3054                 if (compose_get_line_break_pos(buffer, &iter, &break_pos,
3055                                                prefs_common.linewrap_len,
3056                                                quote_len)) {
3057                         GtkTextIter prev, next, cur;
3058
3059                         gtk_text_buffer_insert(buffer, &break_pos, "\n", 1);
3060                         
3061                         /* remove trailing spaces */
3062                         cur = break_pos;
3063                         gtk_text_iter_backward_char(&cur);
3064                         prev = next = cur;
3065                         while (!gtk_text_iter_starts_line(&cur)) {
3066                                 gunichar wc;
3067
3068                                 gtk_text_iter_backward_char(&cur);
3069                                 wc = gtk_text_iter_get_char(&cur);
3070                                 if (!g_unichar_isspace(wc))
3071                                         break;
3072                                 prev = cur;
3073                         }
3074                         if (!gtk_text_iter_equal(&prev, &next)) {
3075                                 gtk_text_buffer_delete(buffer, &prev, &next);
3076                                 break_pos = next;
3077                                 gtk_text_iter_forward_char(&break_pos);
3078                         }
3079
3080                         if (quote_str)
3081                                 gtk_text_buffer_insert(buffer, &break_pos,
3082                                                        quote_str, -1);
3083
3084                         iter = break_pos;
3085                         compose_join_next_line(compose, buffer, &iter, quote_str);
3086
3087                         /* move iter to current line start */
3088                         gtk_text_iter_set_line_offset(&iter, 0);
3089                         continue;
3090                 } else {
3091                         /* move iter to next line start */
3092                         iter = break_pos;
3093                 }
3094
3095 colorize:
3096                 end_of_line = iter;
3097                 while (!gtk_text_iter_ends_line(&end_of_line)) {
3098                         gtk_text_iter_forward_char(&end_of_line);
3099                 }
3100                 o_walk = walk = gtk_text_buffer_get_text(buffer, &iter, &end_of_line, FALSE);
3101
3102                 nouri_start = gtk_text_iter_get_offset(&iter);
3103                 nouri_stop = gtk_text_iter_get_offset(&end_of_line);
3104
3105                 walk_pos = gtk_text_iter_get_offset(&iter);
3106                 /* FIXME: this looks phony. scanning for anything in the parse table */
3107                 for (n = 0; n < PARSE_ELEMS; n++) {
3108                         gchar *tmp;
3109
3110                         tmp = parser[n].search(walk, parser[n].needle);
3111                         if (tmp) {
3112                                 if (scanpos == NULL || tmp < scanpos) {
3113                                         scanpos = tmp;
3114                                         last_index = n;
3115                                 }
3116                         }                                       
3117                 }
3118
3119                 bp = ep = 0;
3120                 if (scanpos) {
3121                         /* check if URI can be parsed */
3122                         if (parser[last_index].parse(walk, scanpos, (const gchar **)&bp,(const gchar **)&ep)
3123                             && (size_t) (ep - bp - 1) > strlen(parser[last_index].needle)) {
3124                                         walk = ep;
3125                         } else
3126                                 walk = scanpos +
3127                                         strlen(parser[last_index].needle);
3128                 } 
3129                 if (bp && ep) {
3130                         uri_start = walk_pos + (bp - o_walk);
3131                         uri_stop  = walk_pos + (ep - o_walk);
3132                 }
3133                 g_free(o_walk);
3134                 gtk_text_iter_forward_line(&iter);
3135                 g_free(quote_str);
3136                 if (startq_offset != -1) {
3137                         GtkTextIter startquote, endquote;
3138                         gtk_text_buffer_get_iter_at_offset(
3139                                 buffer, &startquote, startq_offset);
3140                         endquote = iter;
3141                         gtk_text_buffer_apply_tag_by_name(
3142                                 buffer, "quote", &startquote, &endquote);
3143                         startq_offset = -1;
3144                 } else if (noq_offset != -1) {
3145                         GtkTextIter startnoquote, endnoquote;
3146                         gtk_text_buffer_get_iter_at_offset(
3147                                 buffer, &startnoquote, noq_offset);
3148                         endnoquote = iter;
3149                         gtk_text_buffer_remove_tag_by_name(
3150                                 buffer, "quote", &startnoquote, &endnoquote);
3151                         noq_offset = -1;
3152                 }
3153                 
3154                 /* always */ {
3155                         GtkTextIter nouri_start_iter, nouri_end_iter;
3156                         gtk_text_buffer_get_iter_at_offset(
3157                                 buffer, &nouri_start_iter, nouri_start);
3158                         gtk_text_buffer_get_iter_at_offset(
3159                                 buffer, &nouri_end_iter, nouri_stop);
3160                         gtk_text_buffer_remove_tag_by_name(
3161                                 buffer, "link", &nouri_start_iter, &nouri_end_iter);
3162                 }
3163                 if (uri_start > 0 && uri_stop > 0) {
3164                         GtkTextIter uri_start_iter, uri_end_iter;
3165                         gtk_text_buffer_get_iter_at_offset(
3166                                 buffer, &uri_start_iter, uri_start);
3167                         gtk_text_buffer_get_iter_at_offset(
3168                                 buffer, &uri_end_iter, uri_stop);
3169                         gtk_text_buffer_apply_tag_by_name(
3170                                 buffer, "link", &uri_start_iter, &uri_end_iter);
3171                 }
3172         }
3173
3174         if (par_iter)
3175                 *par_iter = iter;
3176
3177         undo_unblock(compose->undostruct);
3178         compose->autowrap = prev_autowrap;
3179 }
3180
3181 static void compose_wrap_all(Compose *compose)
3182 {
3183         compose_wrap_all_full(compose, FALSE);
3184 }
3185
3186 static void compose_wrap_all_full(Compose *compose, gboolean force)
3187 {
3188         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
3189         GtkTextBuffer *buffer;
3190         GtkTextIter iter;
3191
3192         buffer = gtk_text_view_get_buffer(text);
3193
3194         undo_block(compose->undostruct);
3195
3196         gtk_text_buffer_get_start_iter(buffer, &iter);
3197         while (!gtk_text_iter_is_end(&iter))
3198                 compose_wrap_paragraph(compose, &iter, force);
3199
3200         undo_unblock(compose->undostruct);
3201 }
3202
3203 static void compose_set_title(Compose *compose)
3204 {
3205         gchar *str;
3206         gchar *edited;
3207
3208         edited = compose->modified ? _(" [Edited]") : "";
3209         if (compose->account && compose->account->address)
3210                 str = g_strdup_printf(_("%s - Compose message%s"),
3211                                       compose->account->address, edited);
3212         else
3213                 str = g_strdup_printf(_("Compose message%s"), edited);
3214         gtk_window_set_title(GTK_WINDOW(compose->window), str);
3215         g_free(str);
3216 }
3217
3218 /**
3219  * compose_current_mail_account:
3220  * 
3221  * Find a current mail account (the currently selected account, or the
3222  * default account, if a news account is currently selected).  If a
3223  * mail account cannot be found, display an error message.
3224  * 
3225  * Return value: Mail account, or NULL if not found.
3226  **/
3227 static PrefsAccount *
3228 compose_current_mail_account(void)
3229 {
3230         PrefsAccount *ac;
3231
3232         if (cur_account && cur_account->protocol != A_NNTP)
3233                 ac = cur_account;
3234         else {
3235                 ac = account_get_default();
3236                 if (!ac || ac->protocol == A_NNTP) {
3237                         alertpanel_error(_("Account for sending mail is not specified.\n"
3238                                            "Please select a mail account before sending."));
3239                         return NULL;
3240                 }
3241         }
3242         return ac;
3243 }
3244
3245 static void compose_select_account(Compose *compose, PrefsAccount *account,
3246                                    gboolean init)
3247 {
3248         GtkItemFactory *ifactory;
3249
3250         g_return_if_fail(account != NULL);
3251
3252         compose->account = account;
3253
3254         compose_set_title(compose);
3255
3256         ifactory = gtk_item_factory_from_widget(compose->menubar);
3257
3258         if (account->default_sign && compose->mode != COMPOSE_REDIRECT)
3259                 menu_set_active(ifactory, "/Options/Sign", TRUE);
3260         else
3261                 menu_set_active(ifactory, "/Options/Sign", FALSE);
3262         if (account->default_encrypt && compose->mode != COMPOSE_REDIRECT)
3263                 menu_set_active(ifactory, "/Options/Encrypt", TRUE);
3264         else
3265                 menu_set_active(ifactory, "/Options/Encrypt", FALSE);
3266                                        
3267         activate_privacy_system(compose, account);
3268
3269         if (!init && compose->mode != COMPOSE_REDIRECT)
3270                 compose_insert_sig(compose, TRUE);
3271 }
3272
3273 gboolean compose_check_for_valid_recipient(Compose *compose) {
3274         gchar *recipient_headers_mail[] = {"To:", "Cc:", "Bcc:", NULL};
3275         gchar *recipient_headers_news[] = {"Newsgroups:", NULL};
3276         gboolean recipient_found = FALSE;
3277         GSList *list;
3278         gchar **strptr;
3279
3280         /* free to and newsgroup list */
3281         slist_free_strings(compose->to_list);
3282         g_slist_free(compose->to_list);
3283         compose->to_list = NULL;
3284                         
3285         slist_free_strings(compose->newsgroup_list);
3286         g_slist_free(compose->newsgroup_list);
3287         compose->newsgroup_list = NULL;
3288
3289         /* search header entries for to and newsgroup entries */
3290         for (list = compose->header_list; list; list = list->next) {
3291                 gchar *header;
3292                 gchar *entry;
3293                 header = gtk_editable_get_chars(GTK_EDITABLE(GTK_COMBO(((ComposeHeaderEntry *)list->data)->combo)->entry), 0, -1);
3294                 entry = gtk_editable_get_chars(GTK_EDITABLE(((ComposeHeaderEntry *)list->data)->entry), 0, -1);
3295                 g_strstrip(entry);
3296                 if (entry[0] != '\0') {
3297                         for (strptr = recipient_headers_mail; *strptr != NULL; strptr++) {
3298                                 if (!strcmp(header, (prefs_common.trans_hdr ? gettext(*strptr) : *strptr))) {
3299                                         compose->to_list = address_list_append(compose->to_list, entry);
3300                                         recipient_found = TRUE;
3301                                 }
3302                         }
3303                         for (strptr = recipient_headers_news; *strptr != NULL; strptr++) {
3304                                 if (!strcmp(header, (prefs_common.trans_hdr ? gettext(*strptr) : *strptr))) {
3305                                         compose->newsgroup_list = newsgroup_list_append(compose->newsgroup_list, entry);
3306                                         recipient_found = TRUE;
3307                                 }
3308                         }
3309                 }
3310                 g_free(header);
3311                 g_free(entry);
3312         }
3313         return recipient_found;
3314 }
3315
3316 static gboolean compose_check_entries(Compose *compose, gboolean check_subject)
3317 {
3318         const gchar *str;
3319
3320         if (compose_check_for_valid_recipient(compose) == FALSE) {
3321                 alertpanel_error(_("Recipient is not specified."));
3322                 return FALSE;
3323         }
3324
3325         str = gtk_entry_get_text(GTK_ENTRY(compose->subject_entry));
3326         if (*str == '\0' && check_subject == TRUE) {
3327                 AlertValue aval;
3328
3329                 aval = alertpanel(_("Send"),
3330                                   _("Subject is empty. Send it anyway?"),
3331                                   GTK_STOCK_YES, GTK_STOCK_NO, NULL);
3332                 if (aval != G_ALERTDEFAULT)
3333                         return FALSE;
3334         }
3335
3336         return TRUE;
3337 }
3338
3339 gint compose_send(Compose *compose)
3340 {
3341         gint msgnum;
3342         FolderItem *folder;
3343         gint val = -1;
3344         gchar *msgpath;
3345
3346         compose_allow_user_actions (compose, FALSE);
3347         compose->sending = TRUE;
3348
3349         if (compose_check_entries(compose, TRUE) == FALSE)
3350                 goto bail;
3351
3352         val = compose_queue(compose, &msgnum, &folder);
3353
3354         if (val) {
3355                 if (val == -2) {
3356                         alertpanel_error(_("Could not queue message for sending:\n\n%s."), strerror(errno));
3357                 } else {
3358                         alertpanel_error(_("Could not queue message for sending."));
3359                 }
3360                 goto bail;
3361         }
3362
3363
3364         if (prefs_common.send_dialog_mode != SEND_DIALOG_ALWAYS) {
3365                 compose->sending = FALSE;
3366                 compose_close(compose);
3367                 /* No more compose access in the normal codepath 
3368                  * after this point! */
3369                 compose = NULL;
3370         }
3371
3372         if (msgnum == 0) {
3373                 alertpanel_error(_("The message was queued but could not be "
3374                                    "sent.\nUse \"Send queued messages\" from "
3375                                    "the main window to retry."));
3376                 if (prefs_common.send_dialog_mode == SEND_DIALOG_ALWAYS) {
3377                         compose->sending = FALSE;
3378                         compose_allow_user_actions (compose, TRUE);
3379                 }
3380                 return 0;
3381         }
3382         
3383         msgpath = folder_item_fetch_msg(folder, msgnum);
3384         val = procmsg_send_message_queue(msgpath);
3385         g_free(msgpath);
3386
3387         if (prefs_common.send_dialog_mode == SEND_DIALOG_ALWAYS) {
3388                 compose->sending = FALSE;
3389                 compose_allow_user_actions (compose, TRUE);
3390                 if (val != 0) {
3391                         folder_item_remove_msg(folder, msgnum);
3392                         folder_item_scan(folder);
3393                 }
3394         }
3395
3396         if (val == 0) {
3397                 folder_item_remove_msg(folder, msgnum);
3398                 folder_item_scan(folder);
3399                 if (prefs_common.send_dialog_mode == SEND_DIALOG_ALWAYS)
3400                         compose_close(compose);
3401         } else {
3402                 alertpanel_error(_("The message was queued but could not be "
3403                                    "sent.\nUse \"Send queued messages\" from "
3404                                    "the main window to retry."));
3405                 if (prefs_common.send_dialog_mode == SEND_DIALOG_ALWAYS) {
3406                         compose_allow_user_actions (compose, TRUE);
3407                         compose->sending = FALSE;               
3408                 }
3409                 return -1;
3410         }
3411
3412         return 0;
3413
3414 bail:
3415         compose_allow_user_actions (compose, TRUE);
3416         compose->sending = FALSE;
3417
3418         return -1;
3419 }
3420
3421 static gboolean compose_use_attach(Compose *compose) 
3422 {
3423         GtkTreeModel *model = gtk_tree_view_get_model
3424                                 (GTK_TREE_VIEW(compose->attach_clist));
3425         return gtk_tree_model_iter_n_children(model, NULL) > 0;
3426 }
3427
3428 static gint compose_redirect_write_headers_from_headerlist(Compose *compose, 
3429                                                            FILE *fp)
3430 {
3431         gchar buf[BUFFSIZE];
3432         gchar *str;
3433         gboolean first_to_address;
3434         gboolean first_cc_address;
3435         GSList *list;
3436         ComposeHeaderEntry *headerentry;
3437         const gchar *headerentryname;
3438         gchar *cc_hdr;
3439         gchar *to_hdr;
3440
3441         debug_print("Writing redirect header\n");
3442
3443         cc_hdr = prefs_common.trans_hdr ? _("Cc:") : "Cc:";
3444         to_hdr = prefs_common.trans_hdr ? _("To:") : "To:";
3445
3446         first_to_address = TRUE;
3447         for (list = compose->header_list; list; list = list->next) {
3448                 headerentry = ((ComposeHeaderEntry *)list->data);
3449                 headerentryname = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(headerentry->combo)->entry));
3450
3451                 if (g_utf8_collate(headerentryname, to_hdr) == 0) {
3452                         const gchar *entstr = gtk_entry_get_text(GTK_ENTRY(headerentry->entry));
3453                         Xstrdup_a(str, entstr, return -1);
3454                         g_strstrip(str);
3455                         if (str[0] != '\0') {
3456                                 compose_convert_header
3457                                         (compose, buf, sizeof(buf), str,
3458                                         strlen("Resent-To") + 2, TRUE);
3459
3460                                 if (first_to_address) {
3461                                         fprintf(fp, "Resent-To: ");
3462                                         first_to_address = FALSE;
3463                                 } else {
3464                                         fprintf(fp, ",");
3465                                 }
3466                                 fprintf(fp, "%s", buf);
3467                         }
3468                 }
3469         }
3470         if (!first_to_address) {
3471                 fprintf(fp, "\n");
3472         }
3473
3474         first_cc_address = TRUE;
3475         for (list = compose->header_list; list; list = list->next) {
3476                 headerentry = ((ComposeHeaderEntry *)list->data);
3477                 headerentryname = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(headerentry->combo)->entry));
3478
3479                 if (g_utf8_collate(headerentryname, cc_hdr) == 0) {
3480                         const gchar *strg = gtk_entry_get_text(GTK_ENTRY(headerentry->entry));
3481                         Xstrdup_a(str, strg, return -1);
3482                         g_strstrip(str);
3483                         if (str[0] != '\0') {
3484                                 compose_convert_header
3485                                         (compose, buf, sizeof(buf), str,
3486                                         strlen("Resent-Cc") + 2, TRUE);
3487
3488                                 if (first_cc_address) {
3489                                         fprintf(fp, "Resent-Cc: ");
3490                                         first_cc_address = FALSE;
3491                                 } else {
3492                                         fprintf(fp, ",");
3493                                 }
3494                                 fprintf(fp, "%s", buf);
3495                         }
3496                 }
3497         }
3498         if (!first_cc_address) {
3499                 fprintf(fp, "\n");
3500         }
3501         
3502         return(0);
3503 }
3504
3505 static gint compose_redirect_write_headers(Compose *compose, FILE *fp)
3506 {
3507         gchar buf[BUFFSIZE];
3508         gchar *str;
3509         const gchar *entstr;
3510         /* struct utsname utsbuf; */
3511
3512         g_return_val_if_fail(fp != NULL, -1);
3513         g_return_val_if_fail(compose->account != NULL, -1);
3514         g_return_val_if_fail(compose->account->address != NULL, -1);
3515
3516         /* Resent-Date */
3517         get_rfc822_date(buf, sizeof(buf));
3518         fprintf(fp, "Resent-Date: %s\n", buf);
3519
3520         /* Resent-From */
3521         if (compose->account->name && *compose->account->name) {
3522                 compose_convert_header
3523                         (compose, buf, sizeof(buf), compose->account->name,
3524                          strlen("From: "), TRUE);
3525                 fprintf(fp, "Resent-From: %s <%s>\n",
3526                         buf, compose->account->address);
3527         } else
3528                 fprintf(fp, "Resent-From: %s\n", compose->account->address);
3529
3530         /* Subject */
3531         entstr = gtk_entry_get_text(GTK_ENTRY(compose->subject_entry));
3532         if (*entstr != '\0') {
3533                 Xstrdup_a(str, entstr, return -1);
3534                 g_strstrip(str);
3535                 if (*str != '\0') {
3536                         compose_convert_header(compose, buf, sizeof(buf), str,
3537                                                strlen("Subject: "), FALSE);
3538                         fprintf(fp, "Subject: %s\n", buf);
3539                 }
3540         }
3541
3542         /* Resent-Message-ID */
3543         if (compose->account->gen_msgid) {
3544                 generate_msgid(buf, sizeof(buf));
3545                 fprintf(fp, "Resent-Message-ID: <%s>\n", buf);
3546                 compose->msgid = g_strdup(buf);
3547         }
3548
3549         compose_redirect_write_headers_from_headerlist(compose, fp);
3550
3551         /* separator between header and body */
3552         fputs("\n", fp);
3553
3554         return 0;
3555 }
3556
3557 static gint compose_redirect_write_to_file(Compose *compose, FILE *fdest)
3558 {
3559         FILE *fp;
3560         size_t len;
3561         gchar buf[BUFFSIZE];
3562
3563         if ((fp = fopen(compose->redirect_filename, "rb")) == NULL) {
3564                 FILE_OP_ERROR(compose->redirect_filename, "fopen");
3565                 return -1;
3566         }
3567
3568         while (procheader_get_one_field_asis(buf, sizeof(buf), fp) != -1) {
3569                 /* should filter returnpath, delivered-to */
3570                 if (g_ascii_strncasecmp(buf, "Return-Path:",
3571                                         strlen("Return-Path:")) == 0 ||
3572                     g_ascii_strncasecmp(buf, "Delivered-To:",
3573                                         strlen("Delivered-To:")) == 0 ||
3574                     g_ascii_strncasecmp(buf, "Received:",
3575                                         strlen("Received:")) == 0 ||
3576                     g_ascii_strncasecmp(buf, "Subject:",
3577                                         strlen("Subject:")) == 0 ||
3578                     g_ascii_strncasecmp(buf, "X-UIDL:",
3579                                         strlen("X-UIDL:")) == 0)
3580                         continue;
3581
3582                 if (fputs(buf, fdest) == -1)
3583                         goto error;
3584
3585                 if (!prefs_common.redirect_keep_from) {
3586                         if (g_ascii_strncasecmp(buf, "From:",
3587                                           strlen("From:")) == 0) {
3588                                 fputs(" (by way of ", fdest);
3589                                 if (compose->account->name
3590                                     && *compose->account->name) {
3591                                         compose_convert_header
3592                                                 (compose, buf, sizeof(buf),
3593                                                  compose->account->name,
3594                                                  strlen("From: "),
3595                                                  FALSE);
3596                                         fprintf(fdest, "%s <%s>",
3597                                                 buf,
3598                                                 compose->account->address);
3599                                 } else
3600                                         fprintf(fdest, "%s",
3601                                                 compose->account->address);
3602                                 fputs(")", fdest);
3603                         }
3604                 }
3605
3606                 if (fputs("\n", fdest) == -1)
3607                         goto error;
3608         }
3609
3610         compose_redirect_write_headers(compose, fdest);
3611
3612         while ((len = fread(buf, sizeof(gchar), sizeof(buf), fp)) > 0) {
3613                 if (fwrite(buf, sizeof(gchar), len, fdest) != len)
3614                         goto error;
3615         }
3616
3617         fclose(fp);
3618
3619         return 0;
3620 error:
3621         fclose(fp);
3622
3623         return -1;
3624 }
3625
3626 static gint compose_write_to_file(Compose *compose, FILE *fp, gint action)
3627 {
3628         GtkTextBuffer *buffer;
3629         GtkTextIter start, end;
3630         gchar *chars;
3631         gchar *buf;
3632         const gchar *out_codeset;
3633         EncodingType encoding;
3634         MimeInfo *mimemsg, *mimetext;
3635         gint line;
3636
3637         /* create message MimeInfo */
3638         mimemsg = procmime_mimeinfo_new();
3639         mimemsg->type = MIMETYPE_MESSAGE;
3640         mimemsg->subtype = g_strdup("rfc822");
3641         mimemsg->content = MIMECONTENT_MEM;
3642         mimemsg->data.mem = compose_get_header(compose);
3643
3644         /* Create text part MimeInfo */
3645         /* get all composed text */
3646         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(compose->text));
3647         gtk_text_buffer_get_start_iter(buffer, &start);
3648         gtk_text_buffer_get_end_iter(buffer, &end);
3649         chars = gtk_text_buffer_get_text(buffer, &start, &end, FALSE);
3650         if (is_ascii_str(chars)) {
3651                 buf = chars;
3652                 chars = NULL;
3653                 out_codeset = CS_US_ASCII;
3654                 encoding = ENC_7BIT;
3655         } else {
3656                 const gchar *src_codeset;
3657
3658                 out_codeset = conv_get_charset_str(compose->out_encoding);
3659                 if (!out_codeset)
3660                         out_codeset = conv_get_outgoing_charset_str();
3661
3662                 if (!g_ascii_strcasecmp(out_codeset, CS_US_ASCII))
3663                         out_codeset = CS_ISO_8859_1;
3664
3665                 if (prefs_common.encoding_method == CTE_BASE64)
3666                         encoding = ENC_BASE64;
3667                 else if (prefs_common.encoding_method == CTE_QUOTED_PRINTABLE)
3668                         encoding = ENC_QUOTED_PRINTABLE;
3669                 else if (prefs_common.encoding_method == CTE_8BIT)
3670                         encoding = ENC_8BIT;
3671                 else
3672                         encoding = procmime_get_encoding_for_charset(out_codeset);
3673
3674                 src_codeset = CS_INTERNAL;
3675                 /* if current encoding is US-ASCII, set it the same as
3676                    outgoing one to prevent code conversion failure */
3677                 if (!g_ascii_strcasecmp(src_codeset, CS_US_ASCII))
3678                         src_codeset = out_codeset;
3679
3680                 debug_print("src encoding = %s, out encoding = %s, transfer encoding = %s\n",
3681                             src_codeset, out_codeset, procmime_get_encoding_str(encoding));
3682
3683                 if (action == COMPOSE_WRITE_FOR_SEND) {
3684                         buf = conv_codeset_strdup(chars, src_codeset, out_codeset);
3685                         
3686                         if (!buf) {
3687                                 AlertValue aval;
3688                                 gchar *msg;
3689
3690                                 msg = g_strdup_printf(_("Can't convert the character encoding of the message from\n"
3691                                                         "%s to %s.\n"
3692                                                         "Send it anyway?"), src_codeset, out_codeset);
3693                                 aval = alertpanel_full(_("Error"), msg, GTK_STOCK_YES, GTK_STOCK_NO, NULL, FALSE,
3694                                                       NULL, ALERT_ERROR, G_ALERTALTERNATE);
3695         g_free(msg);
3696
3697                                 if (aval != G_ALERTDEFAULT) {
3698                                         g_free(chars);
3699                                         return -1;
3700                                 } else {
3701                                         buf = chars;
3702                                         out_codeset = src_codeset;
3703                                         chars = NULL;
3704                                 }
3705                         }
3706                 } else {
3707                         buf = chars;
3708                         out_codeset = src_codeset;
3709                         chars = NULL;
3710                 }
3711         }
3712         g_free(chars);
3713
3714         if (encoding == ENC_8BIT || encoding == ENC_7BIT) {
3715                 if (!strncmp(buf, "From ", sizeof("From ")-1) ||
3716                     strstr(buf, "\nFrom ") != NULL) {
3717                         encoding = ENC_QUOTED_PRINTABLE;
3718                 }
3719         }
3720
3721         mimetext = procmime_mimeinfo_new();
3722         mimetext->content = MIMECONTENT_MEM;
3723         mimetext->data.mem = buf;
3724         mimetext->type = MIMETYPE_TEXT;
3725         mimetext->subtype = g_strdup("plain");
3726         g_hash_table_insert(mimetext->typeparameters, g_strdup("charset"),
3727                             g_strdup(out_codeset));
3728         /* protect trailing spaces when signing message */
3729         if (action == COMPOSE_WRITE_FOR_SEND && compose->use_signing && 
3730             privacy_system_can_sign(compose->privacy_system)) {
3731                 if (encoding == ENC_7BIT)
3732                         encoding = ENC_QUOTED_PRINTABLE;
3733                 else if (encoding == ENC_8BIT)
3734                         encoding = ENC_BASE64;
3735         }
3736         
3737         /* check for line length limit */
3738         if (encoding != ENC_QUOTED_PRINTABLE && encoding != ENC_BASE64 &&
3739             check_line_length(buf, 1000, &line) < 0) {
3740                 AlertValue aval;
3741                 gchar *msg;
3742
3743                 msg = g_strdup_printf
3744                         (_("Line %d exceeds the line length limit (998 bytes).\n"
3745                            "The contents of the message might be broken on the way to the delivery.\n"
3746                            "\n"
3747                            "Send it anyway?"), line + 1);
3748                 aval = alertpanel(_("Warning"), msg, GTK_STOCK_OK, GTK_STOCK_CANCEL, NULL);
3749                 if (aval != G_ALERTDEFAULT) {
3750                         g_free(msg);
3751                         fclose(fp);
3752                         g_free(buf);
3753                         return -1;
3754                 }
3755         }
3756         
3757         if (encoding != ENC_UNKNOWN)
3758                 procmime_encode_content(mimetext, encoding);
3759
3760         /* append attachment parts */
3761         if (compose_use_attach(compose)) {
3762                 MimeInfo *mimempart;
3763
3764                 mimempart = procmime_mimeinfo_new();
3765                 mimempart->content = MIMECONTENT_EMPTY;
3766                 mimempart->type = MIMETYPE_MULTIPART;
3767                 mimempart->subtype = g_strdup("mixed");
3768                 g_hash_table_insert(mimempart->typeparameters, g_strdup("boundary"),
3769                                     generate_mime_boundary(NULL));
3770
3771                 mimetext->disposition = DISPOSITIONTYPE_INLINE;
3772
3773                 g_node_append(mimempart->node, mimetext->node);
3774                 g_node_append(mimemsg->node, mimempart->node);
3775
3776                 compose_add_attachments(compose, mimempart);
3777         } else
3778                 g_node_append(mimemsg->node, mimetext->node);
3779
3780         /* sign message if sending */
3781         if (action == COMPOSE_WRITE_FOR_SEND && compose->use_signing && 
3782             privacy_system_can_sign(compose->privacy_system))
3783                 if (!privacy_sign(compose->privacy_system, mimemsg, compose->account))
3784                         return -1;
3785
3786         procmime_write_mimeinfo(mimemsg, fp);
3787         
3788         procmime_mimeinfo_free_all(mimemsg);
3789
3790         return 0;
3791 }
3792
3793 static gint compose_write_body_to_file(Compose *compose, const gchar *file)
3794 {
3795         GtkTextBuffer *buffer;
3796         GtkTextIter start, end;
3797         FILE *fp;
3798         size_t len;
3799         gchar *chars, *tmp;
3800
3801         if ((fp = fopen(file, "wb")) == NULL) {
3802                 FILE_OP_ERROR(file, "fopen");
3803                 return -1;
3804         }
3805
3806         /* chmod for security */
3807         if (change_file_mode_rw(fp, file) < 0) {
3808                 FILE_OP_ERROR(file, "chmod");
3809                 g_warning("can't change file mode\n");
3810         }
3811
3812         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(compose->text));
3813         gtk_text_buffer_get_start_iter(buffer, &start);
3814         gtk_text_buffer_get_end_iter(buffer, &end);
3815         tmp = gtk_text_buffer_get_text(buffer, &start, &end, FALSE);
3816
3817         chars = conv_codeset_strdup
3818                 (tmp, CS_INTERNAL, conv_get_locale_charset_str());
3819
3820         g_free(tmp);
3821         if (!chars) return -1;
3822
3823         /* write body */
3824         len = strlen(chars);
3825         if (fwrite(chars, sizeof(gchar), len, fp) != len) {
3826                 FILE_OP_ERROR(file, "fwrite");
3827                 g_free(chars);
3828                 fclose(fp);
3829                 unlink(file);
3830                 return -1;
3831         }
3832
3833         g_free(chars);
3834
3835         if (fclose(fp) == EOF) {
3836                 FILE_OP_ERROR(file, "fclose");
3837                 unlink(file);
3838                 return -1;
3839         }
3840         return 0;
3841 }
3842
3843 static gint compose_remove_reedit_target(Compose *compose)
3844 {
3845         FolderItem *item;
3846         MsgInfo *msginfo = compose->targetinfo;
3847
3848         g_return_val_if_fail(compose->mode == COMPOSE_REEDIT, -1);
3849         if (!msginfo) return -1;
3850
3851         item = msginfo->folder;
3852         g_return_val_if_fail(item != NULL, -1);
3853
3854         if (procmsg_msg_exist(msginfo) &&
3855             (item->stype == F_DRAFT || item->stype == F_QUEUE 
3856              || msginfo == compose->autosaved_draft)) {
3857                 if (folder_item_remove_msg(item, msginfo->msgnum) < 0) {
3858                         g_warning("can't remove the old message\n");
3859                         return -1;
3860                 }
3861         }
3862
3863         return 0;
3864 }
3865
3866 void compose_remove_draft(Compose *compose)
3867 {
3868         FolderItem *drafts;
3869         MsgInfo *msginfo = compose->targetinfo;
3870         drafts = account_get_special_folder(compose->account, F_DRAFT);
3871
3872         if (procmsg_msg_exist(msginfo)) {
3873                 folder_item_remove_msg(drafts, msginfo->msgnum);
3874         }
3875
3876 }
3877
3878 static gint compose_queue(Compose *compose, gint *msgnum, FolderItem **item)
3879 {
3880         return compose_queue_sub (compose, msgnum, item, FALSE);
3881 }
3882 static gint compose_queue_sub(Compose *compose, gint *msgnum, FolderItem **item, gboolean check_subject)
3883 {
3884         FolderItem *queue;
3885         gchar *tmp;
3886         FILE *fp;
3887         GSList *cur;
3888         gint num;
3889         static gboolean lock = FALSE;
3890         PrefsAccount *mailac = NULL, *newsac = NULL;
3891         
3892         debug_print("queueing message...\n");
3893         g_return_val_if_fail(compose->account != NULL, -1);
3894
3895         lock = TRUE;
3896         
3897         if (compose_check_entries(compose, check_subject) == FALSE) {
3898                 lock = FALSE;
3899                 return -1;
3900         }
3901
3902         if (!compose->to_list && !compose->newsgroup_list) {
3903                 g_warning("can't get recipient list.");
3904                 lock = FALSE;
3905                 return -1;
3906         }
3907
3908         if (compose->to_list) {
3909                 if (compose->account->protocol != A_NNTP)
3910                         mailac = compose->account;
3911                 else if (cur_account && cur_account->protocol != A_NNTP)
3912                         mailac = cur_account;
3913                 else if (!(mailac = compose_current_mail_account())) {
3914                         lock = FALSE;
3915                         alertpanel_error(_("No account for sending mails available!"));
3916                         return -1;
3917                 }
3918         }
3919
3920         if (compose->newsgroup_list) {
3921                 if (compose->account->protocol == A_NNTP)
3922                         newsac = compose->account;
3923                 else if (!newsac->protocol != A_NNTP) {
3924                         lock = FALSE;
3925                         alertpanel_error(_("No account for posting news available!"));
3926                         return -1;
3927                 }                       
3928         }
3929
3930         if (prefs_common.linewrap_at_send)
3931                 compose_wrap_all(compose);
3932
3933         /* write queue header */
3934         tmp = g_strdup_printf("%s%cqueue.%p", get_tmp_dir(),
3935                               G_DIR_SEPARATOR, compose);
3936         if ((fp = fopen(tmp, "wb")) == NULL) {
3937                 FILE_OP_ERROR(tmp, "fopen");
3938                 g_free(tmp);
3939                 return -2;
3940         }
3941
3942         if (change_file_mode_rw(fp, tmp) < 0) {
3943                 FILE_OP_ERROR(tmp, "chmod");
3944                 g_warning("can't change file mode\n");
3945         }
3946
3947         /* queueing variables */
3948         fprintf(fp, "AF:\n");
3949         fprintf(fp, "NF:0\n");
3950         fprintf(fp, "PS:10\n");
3951         fprintf(fp, "SRH:1\n");
3952         fprintf(fp, "SFN:\n");
3953         fprintf(fp, "DSR:\n");
3954         if (compose->msgid)
3955                 fprintf(fp, "MID:<%s>\n", compose->msgid);
3956         else
3957                 fprintf(fp, "MID:\n");
3958         fprintf(fp, "CFG:\n");
3959         fprintf(fp, "PT:0\n");
3960         fprintf(fp, "S:%s\n", compose->account->address);
3961         fprintf(fp, "RQ:\n");
3962         if (mailac)
3963                 fprintf(fp, "SSV:%s\n", mailac->smtp_server);
3964         else
3965                 fprintf(fp, "SSV:\n");
3966         if (newsac)
3967                 fprintf(fp, "NSV:%s\n", newsac->nntp_server);
3968         else
3969                 fprintf(fp, "NSV:\n");
3970         fprintf(fp, "SSH:\n");
3971         /* write recepient list */
3972         if (compose->to_list) {
3973                 fprintf(fp, "R:<%s>", (gchar *)compose->to_list->data);
3974                 for (cur = compose->to_list->next; cur != NULL;
3975                      cur = cur->next)
3976                         fprintf(fp, ",<%s>", (gchar *)cur->data);
3977                 fprintf(fp, "\n");
3978         }
3979         /* write newsgroup list */
3980         if (compose->newsgroup_list) {
3981                 fprintf(fp, "NG:");
3982                 fprintf(fp, "%s", (gchar *)compose->newsgroup_list->data);
3983                 for (cur = compose->newsgroup_list->next; cur != NULL; cur = cur->next)
3984                         fprintf(fp, ",%s", (gchar *)cur->data);
3985                 fprintf(fp, "\n");
3986         }
3987         /* Sylpheed account IDs */
3988         if (mailac)
3989                 fprintf(fp, "MAID:%d\n", mailac->account_id);
3990         if (newsac)
3991                 fprintf(fp, "NAID:%d\n", newsac->account_id);
3992
3993         if (compose->privacy_system != NULL) {
3994                 fprintf(fp, "X-Sylpheed-Privacy-System:%s\n", compose->privacy_system);
3995                 fprintf(fp, "X-Sylpheed-Sign:%d\n", compose->use_signing);
3996                 fprintf(fp, "X-Sylpheed-Encrypt:%d\n", compose->use_encryption);
3997                 if (compose->use_encryption) {
3998                         gchar *encdata;
3999
4000                         encdata = privacy_get_encrypt_data(compose->privacy_system, compose->to_list);
4001                         if (encdata != NULL)
4002                                 fprintf(fp, "X-Sylpheed-Encrypt-Data:%s\n", 
4003                                         encdata);
4004                         g_free(encdata);
4005                 }
4006         }
4007
4008         /* Save copy folder */
4009         if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn))) {
4010                 gchar *savefolderid;
4011                 
4012                 savefolderid = gtk_editable_get_chars(GTK_EDITABLE(compose->savemsg_entry), 0, -1);
4013                 fprintf(fp, "SCF:%s\n", savefolderid);
4014                 g_free(savefolderid);
4015         }
4016         /* Message-ID of message replying to */
4017         if ((compose->replyinfo != NULL) && (compose->replyinfo->msgid != NULL)) {
4018                 gchar *folderid;
4019                 
4020                 folderid = folder_item_get_identifier(compose->replyinfo->folder);
4021                 fprintf(fp, "RMID:%s\x7f%d\x7f%s\n", folderid, compose->replyinfo->msgnum, compose->replyinfo->msgid);
4022                 g_free(folderid);
4023         }
4024         /* Message-ID of message forwarding to */
4025         if ((compose->fwdinfo != NULL) && (compose->fwdinfo->msgid != NULL)) {
4026                 gchar *folderid;
4027                 
4028                 folderid = folder_item_get_identifier(compose->fwdinfo->folder);
4029                 fprintf(fp, "FMID:%s\x7f%d\x7f%s\n", folderid, compose->fwdinfo->msgnum, compose->fwdinfo->msgid);
4030                 g_free(folderid);
4031         }
4032         fprintf(fp, "\n");
4033
4034         if (compose->redirect_filename != NULL) {
4035                 if (compose_redirect_write_to_file(compose, fp) < 0) {
4036                         lock = FALSE;
4037                         fclose(fp);
4038                         unlink(tmp);
4039                         g_free(tmp);
4040                         return -2;
4041                 }
4042         } else {
4043                 if (compose_write_to_file(compose, fp, COMPOSE_WRITE_FOR_SEND) < 0) {
4044                         lock = FALSE;
4045                         fclose(fp);
4046                         unlink(tmp);
4047                         g_free(tmp);
4048                         return -2;
4049                 }
4050         }
4051
4052         if (fclose(fp) == EOF) {
4053                 FILE_OP_ERROR(tmp, "fclose");
4054                 unlink(tmp);
4055                 g_free(tmp);
4056                 return -2;
4057         }
4058
4059         queue = account_get_special_folder(compose->account, F_QUEUE);
4060         if (!queue) {
4061                 g_warning("can't find queue folder\n");
4062                 unlink(tmp);
4063                 g_free(tmp);
4064                 return -1;
4065         }
4066         folder_item_scan(queue);
4067         if ((num = folder_item_add_msg(queue, tmp, NULL, TRUE)) < 0) {
4068                 g_warning("can't queue the message\n");
4069                 unlink(tmp);
4070                 g_free(tmp);
4071                 return -1;
4072         }
4073         unlink(tmp);
4074         g_free(tmp);
4075
4076         if (compose->mode == COMPOSE_REEDIT) {
4077                 compose_remove_reedit_target(compose);
4078         }
4079
4080         if ((msgnum != NULL) && (item != NULL)) {
4081                 *msgnum = num;
4082                 *item = queue;
4083         }
4084
4085         return 0;
4086 }
4087
4088 static void compose_add_attachments(Compose *compose, MimeInfo *parent)
4089 {
4090         AttachInfo *ainfo;
4091         GtkTreeView *tree_view = GTK_TREE_VIEW(compose->attach_clist);
4092         MimeInfo *mimepart;
4093         struct stat statbuf;
4094         gchar *type, *subtype;
4095         GtkTreeModel *model;
4096         GtkTreeIter iter;
4097
4098         model = gtk_tree_view_get_model(tree_view);
4099         
4100         if (!gtk_tree_model_get_iter_first(model, &iter))
4101                 return;
4102         do {
4103                 gtk_tree_model_get(model, &iter,
4104                                    COL_DATA, &ainfo,
4105                                    -1);
4106                                                            
4107                 mimepart = procmime_mimeinfo_new();
4108                 mimepart->content = MIMECONTENT_FILE;
4109                 mimepart->data.filename = g_strdup(ainfo->file);
4110                 mimepart->offset = 0;
4111
4112                 stat(ainfo->file, &statbuf);
4113                 mimepart->length = statbuf.st_size;
4114
4115                 type = g_strdup(ainfo->content_type);
4116
4117                 if (!strchr(type, '/')) {
4118                         g_free(type);
4119                         type = g_strdup("application/octet-stream");
4120                 }
4121
4122                 subtype = strchr(type, '/') + 1;
4123                 *(subtype - 1) = '\0';
4124                 mimepart->type = procmime_get_media_type(type);
4125                 mimepart->subtype = g_strdup(subtype);
4126                 g_free(type);
4127
4128                 if (mimepart->type == MIMETYPE_MESSAGE && 
4129                     !g_ascii_strcasecmp(mimepart->subtype, "rfc822")) {
4130                         mimepart->disposition = DISPOSITIONTYPE_INLINE;
4131                 } else {
4132                         g_hash_table_insert(mimepart->typeparameters,
4133                                             g_strdup("name"), g_strdup(ainfo->name));
4134                         g_hash_table_insert(mimepart->dispositionparameters,
4135                                             g_strdup("filename"), g_strdup(ainfo->name));
4136                         mimepart->disposition = DISPOSITIONTYPE_ATTACHMENT;
4137                 }
4138
4139                 if (compose->use_signing) {
4140                         if (ainfo->encoding == ENC_7BIT)
4141                                 ainfo->encoding = ENC_QUOTED_PRINTABLE;
4142                         else if (ainfo->encoding == ENC_8BIT)
4143                                 ainfo->encoding = ENC_BASE64;
4144                 }
4145                 
4146                 procmime_encode_content(mimepart, ainfo->encoding);
4147
4148                 g_node_append(parent->node, mimepart->node);
4149         } while (gtk_tree_model_iter_next(model, &iter));
4150 }
4151
4152 #define QUOTE_IF_REQUIRED(out, str)                                     \
4153 {                                                                       \
4154         if (*str != '"' && strpbrk(str, ",.[]<>")) {                    \
4155                 gchar *__tmp;                                           \
4156                 gint len;                                               \
4157                                                                         \
4158                 len = strlen(str) + 3;                                  \
4159                 if ((__tmp = alloca(len)) == NULL) {                    \
4160                         g_warning("can't allocate memory\n");           \
4161                         g_string_free(header, TRUE);                    \
4162                         return NULL;                                    \
4163                 }                                                       \
4164                 g_snprintf(__tmp, len, "\"%s\"", str);                  \
4165                 out = __tmp;                                            \
4166         } else {                                                        \
4167                 gchar *__tmp;                                           \
4168                                                                         \
4169                 if ((__tmp = alloca(strlen(str) + 1)) == NULL) {        \
4170                         g_warning("can't allocate memory\n");           \
4171                         g_string_free(header, TRUE);                    \
4172                         return NULL;                                    \
4173                 } else                                                  \
4174                         strcpy(__tmp, str);                             \
4175                                                                         \
4176                 out = __tmp;                                            \
4177         }                                                               \
4178 }
4179
4180 #define IS_IN_CUSTOM_HEADER(header) \
4181         (compose->account->add_customhdr && \
4182          custom_header_find(compose->account->customhdr_list, header) != NULL)
4183
4184 static void compose_add_headerfield_from_headerlist(Compose *compose, 
4185                                                     GString *header, 
4186                                                     const gchar *fieldname,
4187                                                     const gchar *seperator)
4188 {
4189         gchar *str, *fieldname_w_colon, *trans_fieldname;
4190         gboolean add_field = FALSE;
4191         GSList *list;
4192         ComposeHeaderEntry *headerentry;
4193         const gchar * headerentryname;
4194         GString *fieldstr;
4195
4196         if (IS_IN_CUSTOM_HEADER(fieldname))
4197                 return;
4198
4199         debug_print("Adding %s-fields\n", fieldname);
4200
4201         fieldstr = g_string_sized_new(64);
4202
4203         fieldname_w_colon = g_strconcat(fieldname, ":", NULL);
4204         trans_fieldname = (prefs_common.trans_hdr ? gettext(fieldname_w_colon) : fieldname_w_colon);
4205
4206         for (list = compose->header_list; list; list = list->next) {
4207                 headerentry = ((ComposeHeaderEntry *)list->data);
4208                 headerentryname = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(headerentry->combo)->entry));
4209
4210                 if (!g_utf8_collate(trans_fieldname, headerentryname)) {
4211                         str = gtk_editable_get_chars(GTK_EDITABLE(headerentry->entry), 0, -1);
4212                         g_strstrip(str);
4213                         if (str[0] != '\0') {
4214                                 if (add_field)
4215                                         g_string_append(fieldstr, seperator);
4216                                 g_string_append(fieldstr, str);
4217                                 add_field = TRUE;
4218                         }
4219                         g_free(str);
4220                 }
4221         }
4222         if (add_field) {
4223                 gchar *buf;
4224
4225                 buf = g_new0(gchar, fieldstr->len * 4 + 256);
4226                 compose_convert_header
4227                         (compose, buf, fieldstr->len * 4  + 256, fieldstr->str,
4228                         strlen(fieldname) + 2, TRUE);
4229                 g_string_append_printf(header, "%s: %s\n", fieldname, buf);
4230                 g_free(buf);
4231         }
4232
4233         g_free(fieldname_w_colon);
4234         g_string_free(fieldstr, TRUE);
4235
4236         return;
4237 }
4238
4239 static gchar *compose_get_header(Compose *compose)
4240 {
4241         gchar buf[BUFFSIZE];
4242         const gchar *entry_str;
4243         gchar *str;
4244         gchar *name;
4245         GSList *list;
4246         gchar *std_headers[] = {"To:", "Cc:", "Bcc:", "Newsgroups:", "Reply-To:", "Followup-To:", NULL};
4247         GString *header;
4248
4249         /* struct utsname utsbuf; */
4250
4251         g_return_val_if_fail(compose->account != NULL, NULL);
4252         g_return_val_if_fail(compose->account->address != NULL, NULL);
4253
4254         header = g_string_sized_new(64);
4255
4256         /* Date */
4257         if (compose->account->add_date) {
4258                 get_rfc822_date(buf, sizeof(buf));
4259                 g_string_append_printf(header, "Date: %s\n", buf);
4260         }
4261
4262         /* From */
4263         if (compose->account->name && *compose->account->name) {
4264                 compose_convert_header
4265                         (compose, buf, sizeof(buf), compose->account->name,
4266                          strlen("From: "), TRUE);
4267                 QUOTE_IF_REQUIRED(name, buf);
4268                 g_string_append_printf(header, "From: %s <%s>\n",
4269                         name, compose->account->address);
4270         } else
4271                 g_string_append_printf(header, "From: %s\n", compose->account->address);
4272         
4273         /* To */
4274         compose_add_headerfield_from_headerlist(compose, header, "To", ", ");
4275
4276         /* Newsgroups */
4277         compose_add_headerfield_from_headerlist(compose, header, "Newsgroups", ",");
4278
4279         /* Cc */
4280         compose_add_headerfield_from_headerlist(compose, header, "Cc", ", ");
4281
4282         /* Bcc */
4283         compose_add_headerfield_from_headerlist(compose, header, "Bcc", ", ");
4284
4285         /* Subject */
4286         str = gtk_editable_get_chars(GTK_EDITABLE(compose->subject_entry), 0, -1);
4287         if (*str != '\0' && !IS_IN_CUSTOM_HEADER("Subject")) {
4288                 g_strstrip(str);
4289                 if (*str != '\0') {
4290                         compose_convert_header(compose, buf, sizeof(buf), str,
4291                                                strlen("Subject: "), FALSE);
4292                         g_string_append_printf(header, "Subject: %s\n", buf);
4293                 }
4294         }
4295         g_free(str);
4296
4297         /* Message-ID */
4298         if (compose->account->gen_msgid) {
4299                 generate_msgid(buf, sizeof(buf));
4300                 g_string_append_printf(header, "Message-ID: <%s>\n", buf);
4301                 compose->msgid = g_strdup(buf);
4302         }
4303
4304         if (compose->remove_references == FALSE) {
4305                 /* In-Reply-To */
4306                 if (compose->inreplyto && compose->to_list)
4307                         g_string_append_printf(header, "In-Reply-To: <%s>\n", compose->inreplyto);
4308         
4309                 /* References */
4310                 if (compose->references)
4311                         g_string_append_printf(header, "References: %s\n", compose->references);
4312         }
4313
4314         /* Followup-To */
4315         compose_add_headerfield_from_headerlist(compose, header, "Followup-To", ",");
4316
4317         /* Reply-To */
4318         compose_add_headerfield_from_headerlist(compose, header, "Reply-To", ", ");
4319
4320         /* Organization */
4321         if (compose->account->organization &&
4322             strlen(compose->account->organization) &&
4323             !IS_IN_CUSTOM_HEADER("Organization")) {
4324                 compose_convert_header(compose, buf, sizeof(buf),
4325                                        compose->account->organization,
4326                                        strlen("Organization: "), FALSE);
4327                 g_string_append_printf(header, "Organization: %s\n", buf);
4328         }
4329
4330         /* Program version and system info */
4331         /* uname(&utsbuf); */
4332         if (g_slist_length(compose->to_list) && !IS_IN_CUSTOM_HEADER("X-Mailer") &&
4333             !compose->newsgroup_list) {
4334                 g_string_append_printf(header, "X-Mailer: %s (GTK+ %d.%d.%d; %s)\n",
4335                         prog_version,
4336                         gtk_major_version, gtk_minor_version, gtk_micro_version,
4337                         TARGET_ALIAS);
4338                         /* utsbuf.sysname, utsbuf.release, utsbuf.machine); */
4339         }
4340         if (g_slist_length(compose->newsgroup_list) && !IS_IN_CUSTOM_HEADER("X-Newsreader")) {
4341                 g_string_append_printf(header, "X-Newsreader: %s (GTK+ %d.%d.%d; %s)\n",
4342                         prog_version,
4343                         gtk_major_version, gtk_minor_version, gtk_micro_version,
4344                         TARGET_ALIAS);
4345                         /* utsbuf.sysname, utsbuf.release, utsbuf.machine); */
4346         }
4347
4348         /* custom headers */
4349         if (compose->account->add_customhdr) {
4350                 GSList *cur;
4351
4352                 for (cur = compose->account->customhdr_list; cur != NULL;
4353                      cur = cur->next) {
4354                         CustomHeader *chdr = (CustomHeader *)cur->data;
4355
4356                         if (custom_header_is_allowed(chdr->name)) {
4357                                 compose_convert_header
4358                                         (compose, buf, sizeof(buf),
4359                                          chdr->value ? chdr->value : "",
4360                                          strlen(chdr->name) + 2, FALSE);
4361                                 g_string_append_printf(header, "%s: %s\n", chdr->name, buf);
4362                         }
4363                 }
4364         }
4365
4366         /* PRIORITY */
4367         switch (compose->priority) {
4368                 case PRIORITY_HIGHEST: g_string_append_printf(header, "Importance: high\n"
4369                                                    "X-Priority: 1 (Highest)\n");
4370                         break;
4371                 case PRIORITY_HIGH: g_string_append_printf(header, "Importance: high\n"
4372                                                 "X-Priority: 2 (High)\n");
4373                         break;
4374                 case PRIORITY_NORMAL: break;
4375                 case PRIORITY_LOW: g_string_append_printf(header, "Importance: low\n"
4376                                                "X-Priority: 4 (Low)\n");
4377                         break;
4378                 case PRIORITY_LOWEST: g_string_append_printf(header, "Importance: low\n"
4379                                                   "X-Priority: 5 (Lowest)\n");
4380                         break;
4381                 default: debug_print("compose: priority unknown : %d\n",
4382                                      compose->priority);
4383         }
4384
4385         /* Request Return Receipt */
4386         if (!IS_IN_CUSTOM_HEADER("Disposition-Notification-To")) {
4387                 if (compose->return_receipt) {
4388                         if (compose->account->name
4389                             && *compose->account->name) {
4390                                 compose_convert_header(compose, buf, sizeof(buf), 
4391                                                        compose->account->name, 
4392                                                        strlen("Disposition-Notification-To: "),
4393                                                        TRUE);
4394                                 g_string_append_printf(header, "Disposition-Notification-To: %s <%s>\n", buf, compose->account->address);
4395                         } else
4396                                 g_string_append_printf(header, "Disposition-Notification-To: %s\n", compose->account->address);
4397                 }
4398         }
4399
4400         /* get special headers */
4401         for (list = compose->header_list; list; list = list->next) {
4402                 ComposeHeaderEntry *headerentry;
4403                 gchar *tmp;
4404                 gchar *headername;
4405                 gchar *headername_wcolon;
4406                 gchar *headername_trans;
4407                 gchar *headervalue;
4408                 gchar **string;
4409                 gboolean standard_header = FALSE;
4410
4411                 headerentry = ((ComposeHeaderEntry *)list->data);
4412                 
4413                 tmp = g_strdup(gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(headerentry->combo)->entry)));
4414                 if (strchr(tmp, ' ') != NULL || strchr(tmp, '\r') != NULL || strchr(tmp, '\n') != NULL) {
4415                         g_free(tmp);
4416                         continue;
4417                 }
4418
4419                 if (!strstr(tmp, ":")) {
4420                         headername_wcolon = g_strconcat(tmp, ":", NULL);
4421                         headername = g_strdup(tmp);
4422                 } else {
4423                         headername_wcolon = g_strdup(tmp);
4424                         headername = g_strdup(strtok(tmp, ":"));
4425                 }
4426                 g_free(tmp);
4427                 
4428                 entry_str = gtk_entry_get_text(GTK_ENTRY(headerentry->entry));
4429                 Xstrdup_a(headervalue, entry_str, return NULL);
4430                 subst_char(headervalue, '\r', ' ');
4431                 subst_char(headervalue, '\n', ' ');
4432                 string = std_headers;
4433                 while (*string != NULL) {
4434                         headername_trans = prefs_common.trans_hdr ? gettext(*string) : *string;
4435                         if (!strcmp(headername_trans,headername_wcolon))
4436                                 standard_header = TRUE;
4437                         string++;
4438                 }
4439                 if (!standard_header && !IS_IN_CUSTOM_HEADER(headername))
4440                         g_string_append_printf(header, "%s %s\n", headername_wcolon, headervalue);
4441                                 
4442                 g_free(headername);
4443                 g_free(headername_wcolon);              
4444         }
4445
4446         str = header->str;
4447         g_string_free(header, FALSE);
4448
4449         return str;
4450 }
4451
4452 #undef IS_IN_CUSTOM_HEADER
4453
4454 static void compose_convert_header(Compose *compose, gchar *dest, gint len, gchar *src,
4455                                    gint header_len, gboolean addr_field)
4456 {
4457         gchar *tmpstr = NULL;
4458         
4459         g_return_if_fail(src != NULL);
4460         g_return_if_fail(dest != NULL);
4461
4462         if (len < 1) return;
4463
4464         tmpstr = g_strdup(src);
4465
4466         subst_char(tmpstr, '\n', ' ');
4467         subst_char(tmpstr, '\r', ' ');
4468         g_strchomp(tmpstr);
4469
4470         conv_encode_header_full(dest, len, tmpstr, header_len, addr_field, 
4471                 conv_get_charset_str(compose->out_encoding));
4472         g_free(tmpstr);
4473 }
4474
4475 static void compose_create_header_entry(Compose *compose) 
4476 {
4477         gchar *headers[] = {"To:", "Cc:", "Bcc:", "Newsgroups:", "Reply-To:", "Followup-To:", NULL};
4478
4479         GtkWidget *combo;
4480         GtkWidget *entry;
4481         GList *combo_list = NULL;
4482         gchar **string;
4483         const gchar *header = NULL;
4484         ComposeHeaderEntry *headerentry;
4485         gboolean standard_header = FALSE;
4486
4487         headerentry = g_new0(ComposeHeaderEntry, 1);
4488
4489         /* Combo box */
4490         combo = gtk_combo_new();
4491         string = headers; 
4492         while(*string != NULL) {
4493                 combo_list = g_list_append(combo_list, (prefs_common.trans_hdr ? gettext(*string) : *string));
4494                 string++;
4495         }
4496         gtk_combo_set_popdown_strings(GTK_COMBO(combo), combo_list);
4497         g_list_free(combo_list);
4498         gtk_editable_set_editable(GTK_EDITABLE(GTK_COMBO(combo)->entry), TRUE);
4499         g_signal_connect(G_OBJECT(GTK_COMBO(combo)->entry), "grab_focus",
4500                          G_CALLBACK(compose_grab_focus_cb), compose);
4501         gtk_widget_show(combo);
4502         gtk_table_attach(GTK_TABLE(compose->header_table), combo, 0, 1, compose->header_nextrow, compose->header_nextrow+1, GTK_SHRINK, GTK_FILL, 0, 0);
4503         if (compose->header_last) {     
4504                 const gchar *last_header_entry = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(compose->header_last->combo)->entry));
4505                 string = headers;
4506                 while (*string != NULL) {
4507                         if (!strcmp(*string, last_header_entry))
4508                                 standard_header = TRUE;
4509                         string++;
4510                 }
4511                 if (standard_header)
4512                         header = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(compose->header_last->combo)->entry));
4513         }
4514         if (!compose->header_last || !standard_header) {
4515                 switch(compose->account->protocol) {
4516                         case A_NNTP:
4517                                 header = prefs_common.trans_hdr ? _("Newsgroups:") : "Newsgroups:";
4518                                 break;
4519                         default:
4520                                 header = prefs_common.trans_hdr ? _("To:") : "To:";
4521                                 break;
4522                 }                                                                   
4523         }
4524         if (header)
4525                 gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(combo)->entry), header);
4526
4527         g_signal_connect_after(G_OBJECT(GTK_COMBO(combo)->entry), "grab_focus",
4528                          G_CALLBACK(compose_grab_focus_cb), compose);
4529
4530         /* Entry field */
4531         entry = gtk_entry_new(); 
4532         gtk_widget_show(entry);
4533         gtk_table_attach(GTK_TABLE(compose->header_table), entry, 1, 2, compose->header_nextrow, compose->header_nextrow+1, GTK_EXPAND | GTK_FILL, GTK_FILL, 0, 0);
4534
4535         g_signal_connect(G_OBJECT(entry), "key-press-event", 
4536                          G_CALLBACK(compose_headerentry_key_press_event_cb), 
4537                          headerentry);
4538         g_signal_connect(G_OBJECT(entry), "changed", 
4539                          G_CALLBACK(compose_headerentry_changed_cb), 
4540                          headerentry);
4541         g_signal_connect_after(G_OBJECT(entry), "grab_focus",
4542                          G_CALLBACK(compose_grab_focus_cb), compose);
4543                          
4544         /* email dnd */
4545         gtk_drag_dest_set(entry, GTK_DEST_DEFAULT_ALL, compose_mime_types, 
4546                           sizeof(compose_mime_types)/sizeof(compose_mime_types[0]),
4547                           GDK_ACTION_COPY | GDK_ACTION_MOVE);
4548         g_signal_connect(G_OBJECT(entry), "drag_data_received",
4549                          G_CALLBACK(compose_header_drag_received_cb),
4550                          entry);
4551         g_signal_connect(G_OBJECT(entry), "drag-drop",
4552                          G_CALLBACK(compose_drag_drop),
4553                          compose);
4554         
4555         address_completion_register_entry(GTK_ENTRY(entry));
4556
4557         headerentry->compose = compose;
4558         headerentry->combo = combo;
4559         headerentry->entry = entry;
4560         headerentry->headernum = compose->header_nextrow;
4561
4562         compose->header_nextrow++;
4563         compose->header_last = headerentry;
4564 }
4565
4566 static void compose_add_header_entry(Compose *compose, gchar *header, gchar *text) 
4567 {
4568         ComposeHeaderEntry *last_header;
4569         
4570         last_header = compose->header_last;
4571         
4572         gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(last_header->combo)->entry), header);
4573         gtk_entry_set_text(GTK_ENTRY(last_header->entry), text);
4574 }
4575
4576 static GtkWidget *compose_create_header(Compose *compose) 
4577 {
4578         GtkWidget *label;
4579         GtkWidget *hbox;
4580         GtkWidget *from_optmenu_hbox;
4581         GtkWidget *header_scrolledwin;
4582         GtkWidget *header_table;
4583
4584         gint count = 0;
4585
4586         /* header labels and entries */
4587         header_scrolledwin = gtk_scrolled_window_new(NULL, NULL);
4588         gtk_widget_show(header_scrolledwin);
4589         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(header_scrolledwin), GTK_POLICY_NEVER, GTK_POLICY_AUTOMATIC);
4590
4591         header_table = gtk_table_new(2, 2, FALSE);
4592         gtk_widget_show(header_table);
4593         gtk_container_set_border_width(GTK_CONTAINER(header_table), 2);
4594         gtk_scrolled_window_add_with_viewport(GTK_SCROLLED_WINDOW(header_scrolledwin), header_table);
4595         gtk_viewport_set_shadow_type(GTK_VIEWPORT(GTK_BIN(header_scrolledwin)->child), GTK_SHADOW_ETCHED_IN);
4596         count = 0;
4597
4598         /* option menu for selecting accounts */
4599         hbox = gtk_hbox_new(FALSE, 0);
4600         label = gtk_label_new(prefs_common.trans_hdr ? _("From:") : "From:");
4601         gtk_box_pack_end(GTK_BOX(hbox), label, FALSE, FALSE, 0);
4602         gtk_table_attach(GTK_TABLE(header_table), hbox, 0, 1, count, count + 1,
4603                          GTK_FILL, 0, 2, 0);
4604         from_optmenu_hbox = compose_account_option_menu_create(compose);
4605         gtk_table_attach(GTK_TABLE(header_table), from_optmenu_hbox,
4606                                   1, 2, count, count + 1, GTK_EXPAND | GTK_FILL, GTK_SHRINK, 0, 0);
4607         count++;
4608
4609         compose->header_table = header_table;
4610         compose->header_list = NULL;
4611         compose->header_nextrow = count;
4612
4613         compose_create_header_entry(compose);
4614
4615         compose->table            = NULL;
4616
4617         return header_scrolledwin ;
4618 }
4619
4620 GtkWidget *compose_create_attach(Compose *compose)
4621 {
4622         GtkWidget *attach_scrwin;
4623         GtkWidget *attach_clist;
4624
4625         GtkListStore *store;
4626         GtkCellRenderer *renderer;
4627         GtkTreeViewColumn *column;
4628         GtkTreeSelection *selection;
4629
4630         /* attachment list */
4631         attach_scrwin = gtk_scrolled_window_new(NULL, NULL);
4632         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(attach_scrwin),
4633                                        GTK_POLICY_AUTOMATIC,
4634                                        GTK_POLICY_AUTOMATIC);
4635         gtk_widget_set_size_request(attach_scrwin, -1, 80);
4636
4637         store = gtk_list_store_new(N_ATTACH_COLS, 
4638                                    G_TYPE_STRING,
4639                                    G_TYPE_STRING,
4640                                    G_TYPE_STRING,
4641                                    G_TYPE_POINTER,
4642                                    G_TYPE_AUTO_POINTER,
4643                                    -1);
4644         attach_clist = GTK_WIDGET(gtk_tree_view_new_with_model
4645                                         (GTK_TREE_MODEL(store)));
4646         gtk_container_add(GTK_CONTAINER(attach_scrwin), attach_clist);
4647         g_object_unref(store);
4648         
4649         renderer = gtk_cell_renderer_text_new();
4650         column = gtk_tree_view_column_new_with_attributes
4651                         (_("Mime type"), renderer, "text", 
4652                          COL_MIMETYPE, NULL);
4653         gtk_tree_view_append_column(GTK_TREE_VIEW(attach_clist), column);                        
4654         
4655         renderer = gtk_cell_renderer_text_new();
4656         column = gtk_tree_view_column_new_with_attributes
4657                         (_("Size"), renderer, "text", 
4658                          COL_SIZE, NULL);
4659         gtk_tree_view_append_column(GTK_TREE_VIEW(attach_clist), column);                        
4660         
4661         renderer = gtk_cell_renderer_text_new();
4662         column = gtk_tree_view_column_new_with_attributes
4663                         (_("Name"), renderer, "text", 
4664                          COL_NAME, NULL);
4665         gtk_tree_view_append_column(GTK_TREE_VIEW(attach_clist), column);
4666
4667         gtk_tree_view_set_rules_hint(GTK_TREE_VIEW(attach_clist),
4668                                      prefs_common.enable_rules_hint);
4669         selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(attach_clist));
4670         gtk_tree_selection_set_mode(selection, GTK_SELECTION_MULTIPLE);
4671
4672         g_signal_connect(G_OBJECT(attach_clist), "row_activated",
4673                          G_CALLBACK(attach_selected), compose);
4674         g_signal_connect(G_OBJECT(attach_clist), "button_press_event",
4675                          G_CALLBACK(attach_button_pressed), compose);
4676         g_signal_connect(G_OBJECT(attach_clist), "key_press_event",
4677                          G_CALLBACK(attach_key_pressed), compose);
4678
4679         /* drag and drop */
4680         gtk_drag_dest_set(attach_clist,
4681                           GTK_DEST_DEFAULT_ALL, compose_mime_types, 
4682                           sizeof(compose_mime_types)/sizeof(compose_mime_types[0]),
4683                           GDK_ACTION_COPY | GDK_ACTION_MOVE);
4684         g_signal_connect(G_OBJECT(attach_clist), "drag_data_received",
4685                          G_CALLBACK(compose_attach_drag_received_cb),
4686                          compose);
4687         g_signal_connect(G_OBJECT(attach_clist), "drag-drop",
4688                          G_CALLBACK(compose_drag_drop),
4689                          compose);
4690
4691         compose->attach_scrwin = attach_scrwin;
4692         compose->attach_clist  = attach_clist;
4693
4694         return attach_scrwin;
4695 }
4696
4697 static void compose_savemsg_checkbtn_cb(GtkWidget *widget, Compose *compose);
4698 static void compose_savemsg_select_cb(GtkWidget *widget, Compose *compose);
4699
4700 static GtkWidget *compose_create_others(Compose *compose)
4701 {
4702         GtkWidget *table;
4703         GtkWidget *savemsg_checkbtn;
4704         GtkWidget *savemsg_entry;
4705         GtkWidget *savemsg_select;
4706         
4707         guint rowcount = 0;
4708         gchar *folderidentifier;
4709
4710         /* Table for settings */
4711         table = gtk_table_new(3, 1, FALSE);
4712         gtk_widget_show(table);
4713         gtk_table_set_row_spacings(GTK_TABLE(table), VSPACING_NARROW);
4714         rowcount = 0;
4715
4716         /* Save Message to folder */
4717         savemsg_checkbtn = gtk_check_button_new_with_label(_("Save Message to "));
4718         gtk_widget_show(savemsg_checkbtn);
4719         gtk_table_attach(GTK_TABLE(table), savemsg_checkbtn, 0, 1, rowcount, rowcount + 1, GTK_SHRINK | GTK_FILL, GTK_SHRINK, 0, 0);
4720         if (account_get_special_folder(compose->account, F_OUTBOX)) {
4721                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(savemsg_checkbtn), prefs_common.savemsg);
4722         }
4723         g_signal_connect(G_OBJECT(savemsg_checkbtn), "toggled",
4724                          G_CALLBACK(compose_savemsg_checkbtn_cb), compose);
4725
4726         savemsg_entry = gtk_entry_new();
4727         gtk_widget_show(savemsg_entry);
4728         gtk_table_attach_defaults(GTK_TABLE(table), savemsg_entry, 1, 2, rowcount, rowcount + 1);
4729         gtk_editable_set_editable(GTK_EDITABLE(savemsg_entry), prefs_common.savemsg);
4730         g_signal_connect_after(G_OBJECT(savemsg_entry), "grab_focus",
4731                          G_CALLBACK(compose_grab_focus_cb), compose);
4732         if (account_get_special_folder(compose->account, F_OUTBOX)) {
4733                 folderidentifier = folder_item_get_identifier(account_get_special_folder
4734                                   (compose->account, F_OUTBOX));
4735                 gtk_entry_set_text(GTK_ENTRY(savemsg_entry), folderidentifier);
4736                 g_free(folderidentifier);
4737         }
4738
4739         savemsg_select = gtk_button_new_with_label (_("Select ..."));
4740         gtk_widget_show(savemsg_select);
4741         gtk_table_attach(GTK_TABLE(table), savemsg_select, 2, 3, rowcount, rowcount + 1, GTK_SHRINK | GTK_FILL, GTK_SHRINK, 0, 0);
4742         g_signal_connect(G_OBJECT(savemsg_select), "clicked",
4743                          G_CALLBACK(compose_savemsg_select_cb),
4744                          compose);
4745
4746         rowcount++;
4747
4748         compose->savemsg_checkbtn = savemsg_checkbtn;
4749         compose->savemsg_entry = savemsg_entry;
4750
4751         return table;   
4752 }
4753
4754 static void compose_savemsg_checkbtn_cb(GtkWidget *widget, Compose *compose) 
4755 {
4756         gtk_editable_set_editable(GTK_EDITABLE(compose->savemsg_entry),
4757                 gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn)));
4758 }
4759
4760 static void compose_savemsg_select_cb(GtkWidget *widget, Compose *compose)
4761 {
4762         FolderItem *dest;
4763         gchar * path;
4764
4765         dest = foldersel_folder_sel(NULL, FOLDER_SEL_COPY, NULL);
4766         if (!dest) return;
4767
4768         path = folder_item_get_identifier(dest);
4769
4770         gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), path);
4771         g_free(path);
4772 }
4773
4774 static Compose *compose_create(PrefsAccount *account, ComposeMode mode)
4775 {
4776         Compose   *compose;
4777         GtkWidget *window;
4778         GtkWidget *vbox;
4779         GtkWidget *menubar;
4780         GtkWidget *handlebox;
4781
4782         GtkWidget *notebook;
4783
4784         GtkWidget *vbox2;
4785
4786         GtkWidget *label;
4787         GtkWidget *subject_hbox;
4788         GtkWidget *subject_frame;
4789         GtkWidget *subject_entry;
4790         GtkWidget *subject;
4791         GtkWidget *paned;
4792
4793         GtkWidget *edit_vbox;
4794         GtkWidget *ruler_hbox;
4795         GtkWidget *ruler;
4796         GtkWidget *scrolledwin;
4797         GtkWidget *text;
4798         GtkTextBuffer *buffer;
4799         GtkClipboard *clipboard;
4800
4801         UndoMain *undostruct;
4802
4803         gchar *titles[N_ATTACH_COLS];
4804         guint n_menu_entries;
4805         GdkColormap *cmap;
4806         GdkColor color[1];
4807         gboolean success[1];
4808         GtkWidget *popupmenu;
4809         GtkItemFactory *popupfactory;
4810         GtkItemFactory *ifactory;
4811         GtkWidget *tmpl_menu;
4812         gint n_entries;
4813         GtkWidget *menuitem;
4814
4815 #if USE_ASPELL
4816         GtkAspell * gtkaspell = NULL;
4817 #endif
4818
4819         static GdkGeometry geometry;
4820
4821         g_return_val_if_fail(account != NULL, NULL);
4822
4823         debug_print("Creating compose window...\n");
4824         compose = g_new0(Compose, 1);
4825
4826         titles[COL_MIMETYPE] = _("MIME type");
4827         titles[COL_SIZE]     = _("Size");
4828         titles[COL_NAME]     = _("Name");
4829
4830         compose->account = account;
4831
4832         window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
4833         gtk_window_set_resizable(GTK_WINDOW(window), TRUE);
4834         gtk_widget_set_size_request(window, -1, prefs_common.compose_height);
4835
4836         if (!geometry.max_width) {
4837                 geometry.max_width = gdk_screen_width();
4838                 geometry.max_height = gdk_screen_height();
4839         }
4840         gtk_window_set_geometry_hints(GTK_WINDOW(window), NULL,
4841                                       &geometry, GDK_HINT_MAX_SIZE);
4842         if (!geometry.min_width) {
4843                 geometry.min_width = 600;
4844                 geometry.min_height = 480;
4845         }
4846         gtk_window_set_geometry_hints(GTK_WINDOW(window), NULL,
4847                                       &geometry, GDK_HINT_MIN_SIZE);
4848         gtk_widget_set_uposition(window, prefs_common.compose_x, 
4849                                  prefs_common.compose_y);
4850
4851         g_signal_connect(G_OBJECT(window), "delete_event",
4852                          G_CALLBACK(compose_delete_cb), compose);
4853         MANAGE_WINDOW_SIGNALS_CONNECT(window);
4854         gtk_widget_realize(window);
4855
4856         gtkut_widget_set_composer_icon(window);
4857
4858         vbox = gtk_vbox_new(FALSE, 0);
4859         gtk_container_add(GTK_CONTAINER(window), vbox);
4860
4861         n_menu_entries = sizeof(compose_entries) / sizeof(compose_entries[0]);
4862         menubar = menubar_create(window, compose_entries,
4863                                  n_menu_entries, "<Compose>", compose);
4864         gtk_box_pack_start(GTK_BOX(vbox), menubar, FALSE, TRUE, 0);
4865
4866         handlebox = gtk_handle_box_new();
4867         gtk_box_pack_start(GTK_BOX(vbox), handlebox, FALSE, FALSE, 0);
4868
4869         gtk_widget_realize(handlebox);
4870         compose->toolbar = toolbar_create(TOOLBAR_COMPOSE, handlebox,
4871                                           (gpointer)compose);
4872
4873         vbox2 = gtk_vbox_new(FALSE, 2);
4874         gtk_box_pack_start(GTK_BOX(vbox), vbox2, TRUE, TRUE, 0);
4875         gtk_container_set_border_width(GTK_CONTAINER(vbox2), BORDER_WIDTH);
4876         
4877         /* Notebook */
4878         notebook = gtk_notebook_new();
4879         gtk_widget_set_size_request(notebook, -1, 130);
4880         gtk_widget_show(notebook);
4881
4882         /* header labels and entries */
4883         gtk_notebook_append_page(GTK_NOTEBOOK(notebook), compose_create_header(compose), gtk_label_new(_("Header")));
4884         /* attachment list */
4885         gtk_notebook_append_page(GTK_NOTEBOOK(notebook), compose_create_attach(compose), gtk_label_new(_("Attachments")));
4886         /* Others Tab */
4887         gtk_notebook_append_page(GTK_NOTEBOOK(notebook), compose_create_others(compose), gtk_label_new(_("Others")));
4888
4889         /* Subject */
4890         subject_hbox = gtk_hbox_new(FALSE, 0);
4891         gtk_widget_show(subject_hbox);
4892
4893         subject_frame = gtk_frame_new(NULL);
4894         gtk_frame_set_shadow_type(GTK_FRAME(subject_frame), GTK_SHADOW_OUT);
4895         gtk_box_pack_start(GTK_BOX(subject_hbox), subject_frame, TRUE, TRUE, BORDER_WIDTH+1);
4896         gtk_widget_show(subject_frame);
4897
4898         subject = gtk_hbox_new(FALSE, 0);
4899         gtk_container_set_border_width(GTK_CONTAINER(subject), BORDER_WIDTH);
4900         gtk_widget_show(subject);
4901
4902         label = gtk_label_new(_("Subject:"));
4903         gtk_box_pack_start(GTK_BOX(subject), label, FALSE, FALSE, 4);
4904         gtk_widget_show(label);
4905
4906         subject_entry = gtk_entry_new();
4907         gtk_box_pack_start(GTK_BOX(subject), subject_entry, TRUE, TRUE, 2);
4908         g_signal_connect_after(G_OBJECT(subject_entry), "grab_focus",
4909                          G_CALLBACK(compose_grab_focus_cb), compose);
4910         gtk_widget_show(subject_entry);
4911         compose->subject_entry = subject_entry;
4912         gtk_container_add(GTK_CONTAINER(subject_frame), subject);
4913         
4914         edit_vbox = gtk_vbox_new(FALSE, 0);
4915
4916         gtk_box_pack_start(GTK_BOX(edit_vbox), subject_hbox, FALSE, FALSE, 0);
4917
4918         /* ruler */
4919         ruler_hbox = gtk_hbox_new(FALSE, 0);
4920         gtk_box_pack_start(GTK_BOX(edit_vbox), ruler_hbox, FALSE, FALSE, 0);
4921
4922         ruler = gtk_shruler_new();
4923         gtk_ruler_set_range(GTK_RULER(ruler), 0.0, 100.0, 1.0, 100.0);
4924         gtk_box_pack_start(GTK_BOX(ruler_hbox), ruler, TRUE, TRUE,
4925                            BORDER_WIDTH);
4926
4927         /* text widget */
4928         scrolledwin = gtk_scrolled_window_new(NULL, NULL);
4929         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrolledwin),
4930                                        GTK_POLICY_AUTOMATIC,
4931                                        GTK_POLICY_AUTOMATIC);
4932         gtk_scrolled_window_set_shadow_type(GTK_SCROLLED_WINDOW(scrolledwin),
4933                                             GTK_SHADOW_IN);
4934         gtk_box_pack_start(GTK_BOX(edit_vbox), scrolledwin, TRUE, TRUE, 0);
4935         gtk_widget_set_size_request(scrolledwin, prefs_common.compose_width, -1);
4936
4937         text = gtk_text_view_new();
4938         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
4939         gtk_text_view_set_wrap_mode(GTK_TEXT_VIEW(text), GTK_WRAP_WORD_CHAR);
4940         gtk_text_view_set_editable(GTK_TEXT_VIEW(text), TRUE);
4941         clipboard = gtk_clipboard_get(GDK_SELECTION_PRIMARY);
4942         gtk_text_buffer_add_selection_clipboard(buffer, clipboard);
4943         
4944         gtk_container_add(GTK_CONTAINER(scrolledwin), text);
4945
4946         g_signal_connect_after(G_OBJECT(text), "size_allocate",
4947                                G_CALLBACK(compose_edit_size_alloc),
4948                                ruler);
4949         g_signal_connect(G_OBJECT(buffer), "changed",
4950                          G_CALLBACK(compose_changed_cb), compose);
4951         g_signal_connect(G_OBJECT(text), "grab_focus",
4952                          G_CALLBACK(compose_grab_focus_cb), compose);
4953         g_signal_connect(G_OBJECT(buffer), "insert_text",
4954                          G_CALLBACK(text_inserted), compose);
4955
4956         /* drag and drop */
4957         gtk_drag_dest_set(text, GTK_DEST_DEFAULT_ALL, compose_mime_types, 
4958                           sizeof(compose_mime_types)/sizeof(compose_mime_types[0]),
4959                           GDK_ACTION_COPY | GDK_ACTION_MOVE);
4960         g_signal_connect(G_OBJECT(text), "drag_data_received",
4961                          G_CALLBACK(compose_insert_drag_received_cb),
4962                          compose);
4963         g_signal_connect(G_OBJECT(text), "drag-drop",
4964                          G_CALLBACK(compose_drag_drop),
4965                          compose);
4966         gtk_widget_show_all(vbox);
4967
4968         /* pane between attach clist and text */
4969         paned = gtk_vpaned_new();
4970         gtk_paned_set_gutter_size(GTK_PANED(paned), 12);
4971         gtk_container_add(GTK_CONTAINER(vbox2), paned);
4972         gtk_paned_add1(GTK_PANED(paned), notebook);
4973         gtk_paned_add2(GTK_PANED(paned), edit_vbox);
4974         gtk_widget_show_all(paned);
4975
4976
4977         if (prefs_common.textfont) {
4978                 PangoFontDescription *font_desc;
4979
4980                 font_desc = pango_font_description_from_string
4981                         (prefs_common.textfont);
4982                 if (font_desc) {
4983                         gtk_widget_modify_font(text, font_desc);
4984                         pango_font_description_free(font_desc);
4985                 }
4986         }
4987
4988         color[0] = quote_color;
4989         cmap = gdk_window_get_colormap(window->window);
4990         gdk_colormap_alloc_colors(cmap, color, 1, FALSE, TRUE, success);
4991         if (success[0] == FALSE) {
4992                 GtkStyle *style;
4993
4994                 g_warning("Compose: color allocation failed.\n");
4995                 style = gtk_widget_get_style(text);
4996                 quote_color = style->black;
4997         }
4998
4999         n_entries = sizeof(compose_popup_entries) /
5000                 sizeof(compose_popup_entries[0]);
5001         popupmenu = menu_create_items(compose_popup_entries, n_entries,
5002                                       "<Compose>", &popupfactory,
5003                                       compose);
5004
5005         ifactory = gtk_item_factory_from_widget(menubar);
5006         menu_set_sensitive(ifactory, "/Edit/Undo", FALSE);
5007         menu_set_sensitive(ifactory, "/Edit/Redo", FALSE);
5008         menu_set_sensitive(ifactory, "/Options/Remove references", FALSE);
5009
5010         tmpl_menu = gtk_item_factory_get_item(ifactory, "/Tools/Template");
5011
5012         undostruct = undo_init(text);
5013         undo_set_change_state_func(undostruct, &compose_undo_state_changed,
5014                                    menubar);
5015
5016         address_completion_start(window);
5017
5018         compose->window        = window;
5019         compose->vbox          = vbox;
5020         compose->menubar       = menubar;
5021         compose->handlebox     = handlebox;
5022
5023         compose->vbox2         = vbox2;
5024
5025         compose->paned = paned;
5026
5027         compose->edit_vbox     = edit_vbox;
5028         compose->ruler_hbox    = ruler_hbox;
5029         compose->ruler         = ruler;
5030         compose->scrolledwin   = scrolledwin;
5031         compose->text          = text;
5032
5033         compose->focused_editable = NULL;
5034
5035         compose->popupmenu    = popupmenu;
5036         compose->popupfactory = popupfactory;
5037
5038         compose->tmpl_menu = tmpl_menu;
5039
5040         compose->mode = mode;
5041
5042         compose->targetinfo = NULL;
5043         compose->replyinfo  = NULL;
5044         compose->fwdinfo    = NULL;
5045
5046         compose->replyto     = NULL;
5047         compose->cc          = NULL;
5048         compose->bcc         = NULL;
5049         compose->followup_to = NULL;
5050
5051         compose->ml_post     = NULL;
5052
5053         compose->inreplyto   = NULL;
5054         compose->references  = NULL;
5055         compose->msgid       = NULL;
5056         compose->boundary    = NULL;
5057
5058         compose->autowrap       = prefs_common.autowrap;
5059
5060         compose->use_signing    = FALSE;
5061         compose->use_encryption = FALSE;
5062         compose->privacy_system = NULL;
5063
5064         compose->modified = FALSE;
5065
5066         compose->return_receipt = FALSE;
5067
5068         compose->to_list        = NULL;
5069         compose->newsgroup_list = NULL;
5070
5071         compose->undostruct = undostruct;
5072
5073         compose->sig_str = NULL;
5074
5075         compose->exteditor_file    = NULL;
5076         compose->exteditor_pid     = -1;
5077         compose->exteditor_tag     = -1;
5078         compose->draft_timeout_tag = -1;
5079
5080 #if USE_ASPELL
5081         menu_set_sensitive(ifactory, "/Spelling", FALSE);
5082         if (mode != COMPOSE_REDIRECT) {
5083                 if (prefs_common.enable_aspell && prefs_common.dictionary &&
5084                     strcmp(prefs_common.dictionary, _("None"))) {
5085                         gtkaspell = gtkaspell_new(prefs_common.aspell_path,
5086                                                   prefs_common.dictionary,
5087                                                   conv_get_locale_charset_str(),
5088                                                   prefs_common.misspelled_col,
5089                                                   prefs_common.check_while_typing,
5090                                                   prefs_common.use_alternate,
5091                                                   GTK_TEXT_VIEW(text),
5092                                                   GTK_WINDOW(compose->window));
5093                         if (!gtkaspell) {
5094                                 alertpanel_error(_("Spell checker could not "
5095                                                 "be started.\n%s"),
5096                                                 gtkaspell_checkers_strerror());
5097                                 gtkaspell_checkers_reset_error();
5098                         } else {
5099
5100                                 GtkWidget *menuitem;
5101
5102                                 if (!gtkaspell_set_sug_mode(gtkaspell,
5103                                                 prefs_common.aspell_sugmode)) {
5104                                         debug_print("Aspell: could not set "
5105                                                     "suggestion mode %s\n",
5106                                                     gtkaspell_checkers_strerror());
5107                                         gtkaspell_checkers_reset_error();
5108                                 }
5109
5110                                 menuitem = gtk_item_factory_get_item(ifactory,
5111                                         "/Spelling/Spelling Configuration");
5112                                 gtkaspell_populate_submenu(gtkaspell, menuitem);
5113                                 menu_set_sensitive(ifactory, "/Spelling", TRUE);
5114                         }
5115                 }
5116         }
5117         compose->gtkaspell = gtkaspell;
5118 #endif
5119
5120         compose_select_account(compose, account, TRUE);
5121
5122         menu_set_active(ifactory, "/Edit/Auto wrapping", prefs_common.autowrap);
5123         if (account->set_autocc && account->auto_cc && mode != COMPOSE_REEDIT)
5124                 compose_entry_append(compose, account->auto_cc, COMPOSE_CC);
5125
5126         if (account->set_autobcc && account->auto_bcc && mode != COMPOSE_REEDIT) 
5127                 compose_entry_append(compose, account->auto_bcc, COMPOSE_BCC);
5128         
5129         if (account->set_autoreplyto && account->auto_replyto && mode != COMPOSE_REEDIT)
5130                 compose_entry_append(compose, account->auto_replyto, COMPOSE_REPLYTO);
5131
5132
5133         if (account->protocol != A_NNTP)
5134                 gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(compose->header_last->combo)->entry), prefs_common.trans_hdr ? _("To:") : "To:");
5135         else
5136                 gtk_entry_set_text(GTK_ENTRY(GTK_COMBO(compose->header_last->combo)->entry), prefs_common.trans_hdr ? _("Newsgroups:") : "Newsgroups:");
5137
5138         addressbook_set_target_compose(compose);
5139         
5140         if (mode != COMPOSE_REDIRECT)
5141                 compose_set_template_menu(compose);
5142         else {
5143                 menuitem = gtk_item_factory_get_item(ifactory, "/Tools/Template");
5144                 menu_set_sensitive(ifactory, "/Tools/Template", FALSE);
5145         }
5146
5147         compose_list = g_list_append(compose_list, compose);
5148
5149         if (!prefs_common.show_ruler)
5150                 gtk_widget_hide(ruler_hbox);
5151                 
5152         menuitem = gtk_item_factory_get_item(ifactory, "/Tools/Show ruler");
5153         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem),
5154                                        prefs_common.show_ruler);
5155
5156         /* Priority */
5157         compose->priority = PRIORITY_NORMAL;
5158         compose_update_priority_menu_item(compose);
5159
5160         compose_set_out_encoding(compose);
5161         
5162         /* Actions menu */
5163         compose_update_actions_menu(compose);
5164
5165         /* Privacy Systems menu */
5166         compose_update_privacy_systems_menu(compose);
5167
5168         activate_privacy_system(compose, account);
5169         toolbar_set_style(compose->toolbar->toolbar, compose->handlebox, prefs_common.toolbar_style);
5170         gtk_widget_show(window);
5171         
5172         return compose;
5173 }
5174
5175 static GtkWidget *compose_account_option_menu_create(Compose *compose)
5176 {
5177         GList *accounts;
5178         GtkWidget *hbox;
5179         GtkWidget *optmenu;
5180         GtkWidget *menu;
5181         gint num = 0, def_menu = 0;
5182
5183         accounts = account_get_list();
5184         g_return_val_if_fail(accounts != NULL, NULL);
5185
5186         hbox = gtk_hbox_new(FALSE, 0);
5187         optmenu = gtk_option_menu_new();
5188         gtk_box_pack_start(GTK_BOX(hbox), optmenu, FALSE, FALSE, 0);
5189         menu = gtk_menu_new();
5190
5191         for (; accounts != NULL; accounts = accounts->next, num++) {
5192                 PrefsAccount *ac = (PrefsAccount *)accounts->data;
5193                 GtkWidget *menuitem;
5194                 gchar *name;
5195
5196                 if (ac == compose->account) def_menu = num;
5197
5198                 if (ac->name)
5199                         name = g_strdup_printf("%s: %s <%s>",
5200                                                ac->account_name,
5201                                                ac->name, ac->address);
5202                 else
5203                         name = g_strdup_printf("%s: %s",
5204                                                ac->account_name, ac->address);
5205                 MENUITEM_ADD(menu, menuitem, name, ac->account_id);
5206                 g_free(name);
5207                 g_signal_connect(G_OBJECT(menuitem), "activate",
5208                                  G_CALLBACK(account_activated),
5209                                  compose);
5210         }
5211
5212         gtk_option_menu_set_menu(GTK_OPTION_MENU(optmenu), menu);
5213         gtk_option_menu_set_history(GTK_OPTION_MENU(optmenu), def_menu);
5214
5215         return hbox;
5216 }
5217
5218 static void compose_set_priority_cb(gpointer data,
5219                                     guint action,
5220                                     GtkWidget *widget)
5221 {
5222         Compose *compose = (Compose *) data;
5223         compose->priority = action;
5224 }
5225
5226 static void compose_update_priority_menu_item(Compose * compose)
5227 {
5228         GtkItemFactory *ifactory;
5229         GtkWidget *menuitem = NULL;
5230
5231         ifactory = gtk_item_factory_from_widget(compose->menubar);
5232         
5233         switch (compose->priority) {
5234                 case PRIORITY_HIGHEST:
5235                         menuitem = gtk_item_factory_get_item
5236                                 (ifactory, "/Options/Priority/Highest");
5237                         break;
5238                 case PRIORITY_HIGH:
5239                         menuitem = gtk_item_factory_get_item
5240                                 (ifactory, "/Options/Priority/High");
5241                         break;
5242                 case PRIORITY_NORMAL:
5243                         menuitem = gtk_item_factory_get_item
5244                                 (ifactory, "/Options/Priority/Normal");
5245                         break;
5246                 case PRIORITY_LOW:
5247                         menuitem = gtk_item_factory_get_item
5248                                 (ifactory, "/Options/Priority/Low");
5249                         break;
5250                 case PRIORITY_LOWEST:
5251                         menuitem = gtk_item_factory_get_item
5252                                 (ifactory, "/Options/Priority/Lowest");
5253                         break;
5254         }
5255         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem), TRUE);
5256 }       
5257
5258 static void compose_set_privacy_system_cb(GtkWidget *widget, gpointer data)
5259 {
5260         Compose *compose = (Compose *) data;
5261         gchar *systemid;
5262         GtkItemFactory *ifactory;
5263         gboolean can_sign = FALSE, can_encrypt = FALSE;
5264
5265         g_return_if_fail(GTK_IS_CHECK_MENU_ITEM(widget));
5266
5267         if (!GTK_CHECK_MENU_ITEM(widget)->active)
5268                 return;
5269
5270         systemid = g_object_get_data(G_OBJECT(widget), "privacy_system");
5271         g_free(compose->privacy_system);
5272         compose->privacy_system = NULL;
5273         if (systemid != NULL) {
5274                 compose->privacy_system = g_strdup(systemid);
5275
5276                 can_sign = privacy_system_can_sign(systemid);
5277                 can_encrypt = privacy_system_can_encrypt(systemid);
5278         }
5279
5280         debug_print("activated privacy system: %s\n", systemid != NULL ? systemid : "None");
5281
5282         ifactory = gtk_item_factory_from_widget(compose->menubar);
5283         menu_set_sensitive(ifactory, "/Options/Sign", can_sign);
5284         menu_set_sensitive(ifactory, "/Options/Encrypt", can_encrypt);
5285 }
5286
5287 static void compose_update_privacy_system_menu_item(Compose * compose)
5288 {
5289         static gchar *branch_path = "/Options/Privacy System";
5290         GtkItemFactory *ifactory;
5291         GtkWidget *menuitem = NULL;
5292         GList *amenu;
5293         gboolean can_sign = FALSE, can_encrypt = FALSE;
5294
5295         ifactory = gtk_item_factory_from_widget(compose->menubar);
5296
5297         if (compose->privacy_system != NULL) {
5298                 gchar *systemid;
5299
5300                 menuitem = gtk_item_factory_get_widget(ifactory, branch_path);
5301                 g_return_if_fail(menuitem != NULL);
5302
5303                 amenu = GTK_MENU_SHELL(menuitem)->children;
5304                 menuitem = NULL;
5305                 while (amenu != NULL) {
5306                         GList *alist = amenu->next;
5307
5308                         systemid = g_object_get_data(G_OBJECT(amenu->data), "privacy_system");
5309                         if (systemid != NULL)
5310                                 if (strcmp(systemid, compose->privacy_system) == 0) {
5311                                         menuitem = GTK_WIDGET(amenu->data);
5312
5313                                         can_sign = privacy_system_can_sign(systemid);
5314                                         can_encrypt = privacy_system_can_encrypt(systemid);
5315
5316                                         break;
5317                                 }
5318
5319                         amenu = alist;
5320                 }
5321                 if (menuitem != NULL)
5322                         gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(menuitem), TRUE);
5323         }
5324
5325         menu_set_sensitive(ifactory, "/Options/Sign", can_sign);
5326         menu_set_sensitive(ifactory, "/Options/Encrypt", can_encrypt);
5327 }       
5328  
5329 static void compose_set_out_encoding(Compose *compose)
5330 {
5331         GtkItemFactoryEntry *entry;
5332         GtkItemFactory *ifactory;
5333         CharSet out_encoding;
5334         gchar *path, *p, *q;
5335         GtkWidget *item;
5336
5337         out_encoding = conv_get_charset_from_str(prefs_common.outgoing_charset);
5338         ifactory = gtk_item_factory_from_widget(compose->menubar);
5339
5340         for (entry = compose_entries; entry->callback != compose_address_cb;
5341              entry++) {
5342                 if (entry->callback == compose_set_encoding_cb &&
5343                     (CharSet)entry->callback_action == out_encoding) {
5344                         p = q = path = g_strdup(entry->path);
5345                         while (*p) {
5346                                 if (*p == '_') {
5347                                         if (p[1] == '_') {
5348                                                 p++;
5349                                                 *q++ = '_';
5350                                         }
5351                                 } else
5352                                         *q++ = *p;
5353                                 p++;
5354                         }
5355                         *q = '\0';
5356                         item = gtk_item_factory_get_item(ifactory, path);
5357                         gtk_widget_activate(item);
5358                         g_free(path);
5359                         break;
5360                 }
5361         }
5362 }
5363
5364 static void compose_set_template_menu(Compose *compose)
5365 {
5366         GSList *tmpl_list, *cur;
5367         GtkWidget *menu;
5368         GtkWidget *item;
5369
5370         tmpl_list = template_get_config();
5371
5372         menu = gtk_menu_new();
5373
5374         for (cur = tmpl_list; cur != NULL; cur = cur->next) {
5375                 Template *tmpl = (Template *)cur->data;
5376
5377                 item = gtk_menu_item_new_with_label(tmpl->name);
5378                 gtk_menu_shell_append(GTK_MENU_SHELL(menu), item);
5379                 g_signal_connect(G_OBJECT(item), "activate",
5380                                  G_CALLBACK(compose_template_activate_cb),
5381                                  compose);
5382                 g_object_set_data(G_OBJECT(item), "template", tmpl);
5383                 gtk_widget_show(item);
5384         }
5385
5386         gtk_widget_show(menu);
5387         gtk_menu_item_set_submenu(GTK_MENU_ITEM(compose->tmpl_menu), menu);
5388 }
5389
5390 void compose_update_actions_menu(Compose *compose)
5391 {
5392         GtkItemFactory *ifactory;
5393
5394         ifactory = gtk_item_factory_from_widget(compose->menubar);
5395         action_update_compose_menu(ifactory, "/Tools/Actions", compose);
5396 }
5397
5398 void compose_update_privacy_systems_menu(Compose *compose)
5399 {
5400         static gchar *branch_path = "/Options/Privacy System";
5401         GtkItemFactory *ifactory;
5402         GtkWidget *menuitem;
5403         GSList *systems, *cur;
5404         GList *amenu;
5405         GtkWidget *widget;
5406         GtkWidget *system_none;
5407         GSList *group;
5408
5409         ifactory = gtk_item_factory_from_widget(compose->menubar);
5410
5411         /* remove old entries */
5412         menuitem = gtk_item_factory_get_widget(ifactory, branch_path);
5413         g_return_if_fail(menuitem != NULL);
5414
5415         amenu = GTK_MENU_SHELL(menuitem)->children->next;
5416         while (amenu != NULL) {
5417                 GList *alist = amenu->next;
5418                 gtk_widget_destroy(GTK_WIDGET(amenu->data));
5419                 amenu = alist;
5420         }
5421
5422         system_none = gtk_item_factory_get_widget(ifactory,
5423                 "/Options/Privacy System/None");
5424
5425         g_signal_connect(G_OBJECT(system_none), "activate",
5426                 G_CALLBACK(compose_set_privacy_system_cb), compose);
5427
5428         systems = privacy_get_system_ids();
5429         for (cur = systems; cur != NULL; cur = g_slist_next(cur)) {
5430                 gchar *systemid = cur->data;
5431
5432                 group = gtk_radio_menu_item_get_group(GTK_RADIO_MENU_ITEM(system_none));
5433                 widget = gtk_radio_menu_item_new_with_label(group,
5434                         privacy_system_get_name(systemid));
5435                 g_object_set_data_full(G_OBJECT(widget), "privacy_system",
5436                                        g_strdup(systemid), g_free);
5437                 g_signal_connect(G_OBJECT(widget), "activate",
5438                         G_CALLBACK(compose_set_privacy_system_cb), compose);
5439
5440                 gtk_menu_append(GTK_MENU(system_none->parent), widget);
5441                 gtk_widget_show(widget);
5442                 g_free(systemid);
5443         }
5444         g_slist_free(systems);
5445 }
5446
5447 void compose_reflect_prefs_all(void)
5448 {
5449         GList *cur;
5450         Compose *compose;
5451
5452         for (cur = compose_list; cur != NULL; cur = cur->next) {
5453                 compose = (Compose *)cur->data;
5454                 compose_set_template_menu(compose);
5455         }
5456 }
5457
5458 void compose_reflect_prefs_pixmap_theme(void)
5459 {
5460         GList *cur;
5461         Compose *compose;
5462
5463         for (cur = compose_list; cur != NULL; cur = cur->next) {
5464                 compose = (Compose *)cur->data;
5465                 toolbar_update(TOOLBAR_COMPOSE, compose);
5466         }
5467 }
5468
5469 static void compose_template_apply(Compose *compose, Template *tmpl,
5470                                    gboolean replace)
5471 {
5472         GtkTextView *text;
5473         GtkTextBuffer *buffer;
5474         GtkTextMark *mark;
5475         GtkTextIter iter;
5476         gchar *qmark;
5477         gchar *parsed_str;
5478
5479         if (!tmpl || !tmpl->value) return;
5480
5481         text = GTK_TEXT_VIEW(compose->text);
5482         buffer = gtk_text_view_get_buffer(text);
5483
5484         if (tmpl->subject && *tmpl->subject != '\0')
5485                 gtk_entry_set_text(GTK_ENTRY(compose->subject_entry),
5486                                    tmpl->subject);
5487         if (tmpl->to && *tmpl->to != '\0')
5488                 compose_entry_append(compose, tmpl->to, COMPOSE_TO);
5489         if (tmpl->cc && *tmpl->cc != '\0')
5490                 compose_entry_append(compose, tmpl->cc, COMPOSE_CC);
5491
5492         if (tmpl->bcc && *tmpl->bcc != '\0')
5493                 compose_entry_append(compose, tmpl->bcc, COMPOSE_BCC);
5494
5495         if (replace)
5496                 gtk_text_buffer_set_text(buffer, "", -1);
5497
5498         mark = gtk_text_buffer_get_insert(buffer);
5499         gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
5500
5501         if ((compose->replyinfo == NULL) && (compose->fwdinfo == NULL)) {
5502                 parsed_str = compose_quote_fmt(compose, NULL, tmpl->value,
5503                                                NULL, NULL);
5504         } else {
5505                 if (prefs_common.quotemark && *prefs_common.quotemark)
5506                         qmark = prefs_common.quotemark;
5507                 else
5508                         qmark = "> ";
5509
5510                 if (compose->replyinfo != NULL)
5511                         parsed_str = compose_quote_fmt(compose, compose->replyinfo,
5512                                                        tmpl->value, qmark, NULL);
5513                 else if (compose->fwdinfo != NULL)
5514                         parsed_str = compose_quote_fmt(compose, compose->fwdinfo,
5515                                                        tmpl->value, qmark, NULL);
5516                 else
5517                         parsed_str = NULL;
5518         }
5519
5520         if (replace && parsed_str && compose->account->auto_sig)
5521                 compose_insert_sig(compose, FALSE);
5522
5523         if (replace && parsed_str) {
5524                 gtk_text_buffer_get_start_iter(buffer, &iter);
5525                 gtk_text_buffer_place_cursor(buffer, &iter);
5526         }
5527
5528         if (parsed_str)
5529                 compose_changed_cb(NULL, compose);
5530 }
5531
5532 static void compose_destroy(Compose *compose)
5533 {
5534         compose_list = g_list_remove(compose_list, compose);
5535
5536         /* NOTE: address_completion_end() does nothing with the window
5537          * however this may change. */
5538         address_completion_end(compose->window);
5539
5540         slist_free_strings(compose->to_list);
5541         g_slist_free(compose->to_list);
5542         slist_free_strings(compose->newsgroup_list);
5543         g_slist_free(compose->newsgroup_list);
5544         slist_free_strings(compose->header_list);
5545         g_slist_free(compose->header_list);
5546
5547         procmsg_msginfo_free(compose->targetinfo);
5548         procmsg_msginfo_free(compose->replyinfo);
5549         procmsg_msginfo_free(compose->fwdinfo);
5550
5551         g_free(compose->replyto);
5552         g_free(compose->cc);
5553         g_free(compose->bcc);
5554         g_free(compose->newsgroups);
5555         g_free(compose->followup_to);
5556
5557         g_free(compose->ml_post);
5558
5559         g_free(compose->inreplyto);
5560         g_free(compose->references);
5561         g_free(compose->msgid);
5562         g_free(compose->boundary);
5563
5564         if (compose->redirect_filename)
5565                 g_free(compose->redirect_filename);
5566         if (compose->undostruct)
5567                 undo_destroy(compose->undostruct);
5568
5569         g_free(compose->sig_str);
5570
5571         g_free(compose->exteditor_file);
5572
5573         if (addressbook_get_target_compose() == compose)
5574                 addressbook_set_target_compose(NULL);
5575
5576 #if USE_ASPELL
5577         if (compose->gtkaspell) {
5578                 gtkaspell_delete(compose->gtkaspell);
5579                 compose->gtkaspell = NULL;
5580         }
5581 #endif
5582
5583         prefs_common.compose_width = compose->scrolledwin->allocation.width;
5584         prefs_common.compose_height = compose->window->allocation.height;
5585
5586         if (!gtk_widget_get_parent(compose->paned))
5587                 gtk_widget_destroy(compose->paned);
5588         gtk_widget_destroy(compose->popupmenu);
5589
5590         gtk_widget_destroy(compose->window);
5591         toolbar_destroy(compose->toolbar);
5592         g_free(compose->toolbar);
5593         g_free(compose);
5594 }
5595
5596 static void compose_attach_info_free(AttachInfo *ainfo)
5597 {
5598         g_free(ainfo->file);
5599         g_free(ainfo->content_type);
5600         g_free(ainfo->name);
5601         g_free(ainfo);
5602 }
5603
5604 static void compose_attach_remove_selected(Compose *compose)
5605 {
5606         GtkTreeView *tree_view = GTK_TREE_VIEW(compose->attach_clist);
5607         GtkTreeSelection *selection;
5608         GList *sel, *cur;
5609         GtkTreeModel *model;
5610
5611         selection = gtk_tree_view_get_selection(tree_view);
5612         sel = gtk_tree_selection_get_selected_rows(selection, &model);
5613
5614         if (!sel) 
5615                 return;
5616
5617         for (cur = sel; cur != NULL; cur = cur->next) {
5618                 GtkTreePath *path = cur->data;
5619                 GtkTreeRowReference *ref = gtk_tree_row_reference_new
5620                                                 (model, cur->data);
5621                 cur->data = ref;
5622                 gtk_tree_path_free(path);
5623         }
5624
5625         for (cur = sel; cur != NULL; cur = cur->next) {
5626                 GtkTreeRowReference *ref = cur->data;
5627                 GtkTreePath *path = gtk_tree_row_reference_get_path(ref);
5628                 GtkTreeIter iter;
5629
5630                 if (gtk_tree_model_get_iter(model, &iter, path))
5631                         gtk_list_store_remove(GTK_LIST_STORE(model), &iter);
5632                 
5633                 gtk_tree_path_free(path);
5634                 gtk_tree_row_reference_free(ref);
5635         }
5636
5637         g_list_free(sel);
5638 }
5639
5640 static struct _AttachProperty
5641 {
5642         GtkWidget *window;
5643         GtkWidget *mimetype_entry;
5644         GtkWidget *encoding_optmenu;
5645         GtkWidget *path_entry;
5646         GtkWidget *filename_entry;
5647         GtkWidget *ok_btn;
5648         GtkWidget *cancel_btn;
5649 } attach_prop;
5650
5651 static void gtk_tree_path_free_(gpointer ptr, gpointer data)
5652 {       
5653         gtk_tree_path_free((GtkTreePath *)ptr);
5654 }
5655
5656 static void compose_attach_property(Compose *compose)
5657 {
5658         GtkTreeView *tree_view = GTK_TREE_VIEW(compose->attach_clist);
5659         AttachInfo *ainfo;
5660         GtkOptionMenu *optmenu;
5661         GtkTreeSelection *selection;
5662         GList *sel;
5663         GtkTreeModel *model;
5664         GtkTreeIter iter;
5665         GtkTreePath *path;
5666         static gboolean cancelled;
5667
5668         /* only if one selected */
5669         selection = gtk_tree_view_get_selection(tree_view);
5670         if (gtk_tree_selection_count_selected_rows(selection) != 1) 
5671                 return;
5672
5673         sel = gtk_tree_selection_get_selected_rows(selection, &model);
5674         if (!sel)
5675                 return;
5676
5677         path = (GtkTreePath *) sel->data;
5678         gtk_tree_model_get_iter(model, &iter, path);
5679         gtk_tree_model_get(model, &iter, COL_DATA, &ainfo, -1); 
5680         
5681         if (!ainfo) {
5682                 g_list_foreach(sel, gtk_tree_path_free_, NULL);
5683                 g_list_free(sel);
5684                 return;
5685         }               
5686         g_list_free(sel);
5687
5688         if (!attach_prop.window)
5689                 compose_attach_property_create(&cancelled);
5690         gtk_widget_grab_focus(attach_prop.ok_btn);
5691         gtk_widget_show(attach_prop.window);
5692         manage_window_set_transient(GTK_WINDOW(attach_prop.window));
5693
5694         optmenu = GTK_OPTION_MENU(attach_prop.encoding_optmenu);
5695         if (ainfo->encoding == ENC_UNKNOWN)
5696                 menu_select_by_data(GTK_MENU(gtk_option_menu_get_menu(optmenu)),
5697                                     GINT_TO_POINTER(ENC_BASE64));
5698         else
5699                 menu_select_by_data(GTK_MENU(gtk_option_menu_get_menu(optmenu)),
5700                                     GINT_TO_POINTER(ainfo->encoding));
5701
5702         gtk_entry_set_text(GTK_ENTRY(attach_prop.mimetype_entry),
5703                            ainfo->content_type ? ainfo->content_type : "");
5704         gtk_entry_set_text(GTK_ENTRY(attach_prop.path_entry),
5705                            ainfo->file ? ainfo->file : "");
5706         gtk_entry_set_text(GTK_ENTRY(attach_prop.filename_entry),
5707                            ainfo->name ? ainfo->name : "");
5708
5709         for (;;) {
5710                 const gchar *entry_text;
5711                 gchar *text;
5712                 gchar *cnttype = NULL;
5713                 gchar *file = NULL;
5714                 off_t size = 0;
5715                 GtkWidget *menu;
5716                 GtkWidget *menuitem;
5717
5718                 cancelled = FALSE;
5719                 gtk_main();
5720
5721                 gtk_widget_hide(attach_prop.window);
5722                 
5723                 if (cancelled) 
5724                         break;
5725
5726                 entry_text = gtk_entry_get_text(GTK_ENTRY(attach_prop.mimetype_entry));
5727                 if (*entry_text != '\0') {
5728                         gchar *p;
5729
5730                         text = g_strstrip(g_strdup(entry_text));
5731                         if ((p = strchr(text, '/')) && !strchr(p + 1, '/')) {
5732                                 cnttype = g_strdup(text);
5733                                 g_free(text);
5734                         } else {
5735                                 alertpanel_error(_("Invalid MIME type."));
5736                                 g_free(text);
5737                                 continue;
5738                         }
5739                 }
5740
5741                 menu = gtk_option_menu_get_menu(optmenu);
5742                 menuitem = gtk_menu_get_active(GTK_MENU(menu));
5743                 ainfo->encoding = GPOINTER_TO_INT
5744                         (g_object_get_data(G_OBJECT(menuitem), MENU_VAL_ID));
5745
5746                 entry_text = gtk_entry_get_text(GTK_ENTRY(attach_prop.path_entry));
5747                 if (*entry_text != '\0') {
5748                         if (is_file_exist(entry_text) &&
5749                             (size = get_file_size(entry_text)) > 0)
5750                                 file = g_strdup(entry_text);
5751                         else {
5752                                 alertpanel_error
5753                                         (_("File doesn't exist or is empty."));
5754                                 g_free(cnttype);
5755                                 continue;
5756                         }
5757                 }
5758
5759                 entry_text = gtk_entry_get_text(GTK_ENTRY(attach_prop.filename_entry));
5760                 if (*entry_text != '\0') {
5761                         g_free(ainfo->name);
5762                         ainfo->name = g_strdup(entry_text);
5763                 }
5764
5765                 if (cnttype) {
5766                         g_free(ainfo->content_type);
5767                         ainfo->content_type = cnttype;
5768                 }
5769                 if (file) {
5770                         g_free(ainfo->file);
5771                         ainfo->file = file;
5772                 }
5773                 if (size)
5774                         ainfo->size = size;
5775
5776                 /* update tree store */
5777                 text = to_human_readable(ainfo->size);
5778                 gtk_tree_model_get_iter(model, &iter, path);
5779                 gtk_list_store_set(GTK_LIST_STORE(model), &iter,
5780                                    COL_MIMETYPE, ainfo->content_type,
5781                                    COL_SIZE, text,
5782                                    COL_NAME, ainfo->file,
5783                                    -1);
5784                 
5785                 break;
5786         }
5787
5788         gtk_tree_path_free(path);
5789 }
5790
5791 #define SET_LABEL_AND_ENTRY(str, entry, top) \
5792 { \
5793         label = gtk_label_new(str); \
5794         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), \
5795                          GTK_FILL, 0, 0, 0); \
5796         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5); \
5797  \
5798         entry = gtk_entry_new(); \
5799         gtk_table_attach(GTK_TABLE(table), entry, 1, 2, top, (top + 1), \
5800                          GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0); \
5801 }
5802
5803 static void compose_attach_property_create(gboolean *cancelled)
5804 {
5805         GtkWidget *window;
5806         GtkWidget *vbox;
5807         GtkWidget *table;
5808         GtkWidget *label;
5809         GtkWidget *mimetype_entry;
5810         GtkWidget *hbox;
5811         GtkWidget *optmenu;
5812         GtkWidget *optmenu_menu;
5813         GtkWidget *menuitem;
5814         GtkWidget *path_entry;
5815         GtkWidget *filename_entry;
5816         GtkWidget *hbbox;
5817         GtkWidget *ok_btn;
5818         GtkWidget *cancel_btn;
5819         GList     *mime_type_list, *strlist;
5820
5821         debug_print("Creating attach_property window...\n");
5822
5823         window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
5824         gtk_widget_set_size_request(window, 480, -1);
5825         gtk_container_set_border_width(GTK_CONTAINER(window), 8);
5826         gtk_window_set_title(GTK_WINDOW(window), _("Properties"));
5827         gtk_window_set_position(GTK_WINDOW(window), GTK_WIN_POS_CENTER);
5828         gtk_window_set_modal(GTK_WINDOW(window), TRUE);
5829         g_signal_connect(G_OBJECT(window), "delete_event",
5830                          G_CALLBACK(attach_property_delete_event),
5831                          cancelled);
5832         g_signal_connect(G_OBJECT(window), "key_press_event",
5833                          G_CALLBACK(attach_property_key_pressed),
5834                          cancelled);
5835
5836         vbox = gtk_vbox_new(FALSE, 8);
5837         gtk_container_add(GTK_CONTAINER(window), vbox);
5838
5839         table = gtk_table_new(4, 2, FALSE);
5840         gtk_box_pack_start(GTK_BOX(vbox), table, FALSE, FALSE, 0);
5841         gtk_table_set_row_spacings(GTK_TABLE(table), 8);
5842         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
5843
5844         label = gtk_label_new(_("MIME type")); 
5845         gtk_table_attach(GTK_TABLE(table), label, 0, 1, 0, (0 + 1), 
5846                          GTK_FILL, 0, 0, 0); 
5847         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5); 
5848         mimetype_entry = gtk_combo_new(); 
5849         gtk_table_attach(GTK_TABLE(table), mimetype_entry, 1, 2, 0, (0 + 1), 
5850                          GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
5851                          
5852         /* stuff with list */
5853         mime_type_list = procmime_get_mime_type_list();
5854         strlist = NULL;
5855         for (; mime_type_list != NULL; mime_type_list = mime_type_list->next) {
5856                 MimeType *type = (MimeType *) mime_type_list->data;
5857                 strlist = g_list_append(strlist, 
5858                                 g_strdup_printf("%s/%s",
5859                                         type->type, type->sub_type));
5860         }
5861         
5862         gtk_combo_set_popdown_strings(GTK_COMBO(mimetype_entry), strlist);
5863
5864         for (mime_type_list = strlist; mime_type_list != NULL; 
5865                 mime_type_list = mime_type_list->next)
5866                 g_free(mime_type_list->data);
5867         g_list_free(strlist);
5868                          
5869         mimetype_entry = GTK_COMBO(mimetype_entry)->entry;                       
5870
5871         label = gtk_label_new(_("Encoding"));
5872         gtk_table_attach(GTK_TABLE(table), label, 0, 1, 1, 2,
5873                          GTK_FILL, 0, 0, 0);
5874         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
5875
5876         hbox = gtk_hbox_new(FALSE, 0);
5877         gtk_table_attach(GTK_TABLE(table), hbox, 1, 2, 1, 2,
5878                          GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
5879
5880         optmenu = gtk_option_menu_new();
5881         gtk_box_pack_start(GTK_BOX(hbox), optmenu, TRUE, TRUE, 0);
5882
5883         optmenu_menu = gtk_menu_new();
5884         MENUITEM_ADD(optmenu_menu, menuitem, "7bit", ENC_7BIT);
5885         gtk_option_menu_set_menu(GTK_OPTION_MENU(optmenu), optmenu_menu);
5886         MENUITEM_ADD(optmenu_menu, menuitem, "8bit", ENC_8BIT);
5887         gtk_option_menu_set_menu(GTK_OPTION_MENU(optmenu), optmenu_menu);
5888         MENUITEM_ADD(optmenu_menu, menuitem, "quoted-printable",
5889                      ENC_QUOTED_PRINTABLE);
5890         gtk_option_menu_set_menu(GTK_OPTION_MENU(optmenu), optmenu_menu);
5891
5892         MENUITEM_ADD(optmenu_menu, menuitem, "base64", ENC_BASE64);
5893
5894         gtk_option_menu_set_menu(GTK_OPTION_MENU(optmenu), optmenu_menu);
5895
5896         SET_LABEL_AND_ENTRY(_("Path"),      path_entry,     2);
5897         SET_LABEL_AND_ENTRY(_("File name"), filename_entry, 3);
5898
5899         gtkut_stock_button_set_create(&hbbox, &ok_btn, GTK_STOCK_OK,
5900                                       &cancel_btn, GTK_STOCK_CANCEL,
5901                                       NULL, NULL);
5902         gtk_box_pack_end(GTK_BOX(vbox), hbbox, FALSE, FALSE, 0);
5903         gtk_widget_grab_default(ok_btn);
5904
5905         g_signal_connect(G_OBJECT(ok_btn), "clicked",
5906                          G_CALLBACK(attach_property_ok),
5907                          cancelled);
5908         g_signal_connect(G_OBJECT(cancel_btn), "clicked",
5909                          G_CALLBACK(attach_property_cancel),
5910                          cancelled);
5911
5912         gtk_widget_show_all(vbox);
5913
5914         attach_prop.window           = window;
5915         attach_prop.mimetype_entry   = mimetype_entry;
5916         attach_prop.encoding_optmenu = optmenu;
5917         attach_prop.path_entry       = path_entry;
5918         attach_prop.filename_entry   = filename_entry;
5919         attach_prop.ok_btn           = ok_btn;
5920         attach_prop.cancel_btn       = cancel_btn;
5921 }
5922
5923 #undef SET_LABEL_AND_ENTRY
5924
5925 static void attach_property_ok(GtkWidget *widget, gboolean *cancelled)
5926 {
5927         *cancelled = FALSE;
5928         gtk_main_quit();
5929 }
5930
5931 static void attach_property_cancel(GtkWidget *widget, gboolean *cancelled)
5932 {
5933         *cancelled = TRUE;
5934         gtk_main_quit();
5935 }
5936
5937 static gint attach_property_delete_event(GtkWidget *widget, GdkEventAny *event,
5938                                          gboolean *cancelled)
5939 {
5940         *cancelled = TRUE;
5941         gtk_main_quit();
5942
5943         return TRUE;
5944 }
5945
5946 static gboolean attach_property_key_pressed(GtkWidget *widget,
5947                                             GdkEventKey *event,
5948                                             gboolean *cancelled)
5949 {
5950         if (event && event->keyval == GDK_Escape) {
5951                 *cancelled = TRUE;
5952                 gtk_main_quit();
5953         }
5954         return FALSE;
5955 }
5956
5957 static void compose_exec_ext_editor(Compose *compose)
5958 {
5959         gchar *tmp;
5960         pid_t pid;
5961         gint pipe_fds[2];
5962
5963         tmp = g_strdup_printf("%s%ctmpmsg.%p", get_tmp_dir(),
5964                               G_DIR_SEPARATOR, compose);
5965
5966         if (pipe(pipe_fds) < 0) {
5967                 perror("pipe");
5968                 g_free(tmp);
5969                 return;
5970         }
5971
5972         if ((pid = fork()) < 0) {
5973                 perror("fork");
5974                 g_free(tmp);
5975                 return;
5976         }
5977
5978         if (pid != 0) {
5979                 /* close the write side of the pipe */
5980                 close(pipe_fds[1]);
5981
5982                 compose->exteditor_file    = g_strdup(tmp);
5983                 compose->exteditor_pid     = pid;
5984
5985                 compose_set_ext_editor_sensitive(compose, FALSE);
5986
5987                 compose->exteditor_ch = g_io_channel_unix_new(pipe_fds[0]);
5988                 compose->exteditor_tag = g_io_add_watch(compose->exteditor_ch,
5989                                                         G_IO_IN,
5990                                                         compose_input_cb,
5991                                                         compose);
5992         } else {        /* process-monitoring process */
5993                 pid_t pid_ed;
5994
5995                 if (setpgid(0, 0))
5996                         perror("setpgid");
5997
5998                 /* close the read side of the pipe */
5999                 close(pipe_fds[0]);
6000
6001                 if (compose_write_body_to_file(compose, tmp) < 0) {
6002                         fd_write_all(pipe_fds[1], "2\n", 2);
6003                         _exit(1);
6004                 }
6005
6006                 pid_ed = compose_exec_ext_editor_real(tmp);
6007                 if (pid_ed < 0) {
6008                         fd_write_all(pipe_fds[1], "1\n", 2);
6009                         _exit(1);
6010                 }
6011
6012                 /* wait until editor is terminated */
6013                 waitpid(pid_ed, NULL, 0);
6014
6015                 fd_write_all(pipe_fds[1], "0\n", 2);
6016
6017                 close(pipe_fds[1]);
6018                 _exit(0);
6019         }
6020
6021         g_free(tmp);
6022 }
6023
6024 static gint compose_exec_ext_editor_real(const gchar *file)
6025 {
6026         static gchar *def_cmd = "emacs %s";
6027         gchar buf[1024];
6028         gchar *p;
6029         gchar **cmdline;
6030         pid_t pid;
6031
6032         g_return_val_if_fail(file != NULL, -1);
6033
6034         if ((pid = fork()) < 0) {
6035                 perror("fork");
6036                 return -1;
6037         }
6038
6039         if (pid != 0) return pid;
6040
6041         /* grandchild process */
6042
6043         if (setpgid(0, getppid()))
6044                 perror("setpgid");
6045
6046         if (prefs_common.ext_editor_cmd &&
6047             (p = strchr(prefs_common.ext_editor_cmd, '%')) &&
6048             *(p + 1) == 's' && !strchr(p + 2, '%')) {
6049                 g_snprintf(buf, sizeof(buf), prefs_common.ext_editor_cmd, file);
6050         } else {
6051                 if (prefs_common.ext_editor_cmd)
6052                         g_warning("External editor command line is invalid: '%s'\n",
6053                                   prefs_common.ext_editor_cmd);
6054                 g_snprintf(buf, sizeof(buf), def_cmd, file);
6055         }
6056
6057         cmdline = strsplit_with_quote(buf, " ", 1024);
6058         execvp(cmdline[0], cmdline);
6059
6060         perror("execvp");
6061         g_strfreev(cmdline);
6062
6063         _exit(1);
6064 }
6065
6066 static gboolean compose_ext_editor_kill(Compose *compose)
6067 {
6068         pid_t pgid = compose->exteditor_pid * -1;
6069         gint ret;
6070
6071         ret = kill(pgid, 0);
6072
6073         if (ret == 0 || (ret == -1 && EPERM == errno)) {
6074                 AlertValue val;
6075                 gchar *msg;
6076
6077                 msg = g_strdup_printf
6078                         (_("The external editor is still working.\n"
6079                            "Force terminating the process?\n"
6080                            "process group id: %d"), -pgid);
6081                 val = alertpanel_full(_("Notice"), msg, GTK_STOCK_YES, GTK_STOCK_NO,
6082                                       NULL, FALSE, NULL, ALERT_WARNING, G_ALERTALTERNATE);
6083                         
6084                 g_free(msg);
6085
6086                 if (val == G_ALERTDEFAULT) {
6087                         g_source_remove(compose->exteditor_tag);
6088                         g_io_channel_shutdown(compose->exteditor_ch,
6089                                               FALSE, NULL);
6090                         g_io_channel_unref(compose->exteditor_ch);
6091
6092                         if (kill(pgid, SIGTERM) < 0) perror("kill");
6093                         waitpid(compose->exteditor_pid, NULL, 0);
6094
6095                         g_warning("Terminated process group id: %d", -pgid);
6096                         g_warning("Temporary file: %s",
6097                                   compose->exteditor_file);
6098
6099                         compose_set_ext_editor_sensitive(compose, TRUE);
6100
6101                         g_free(compose->exteditor_file);
6102                         compose->exteditor_file    = NULL;
6103                         compose->exteditor_pid     = -1;
6104                         compose->exteditor_ch      = NULL;
6105                         compose->exteditor_tag     = -1;
6106                 } else
6107                         return FALSE;
6108         }
6109
6110         return TRUE;
6111 }
6112
6113 static gboolean compose_input_cb(GIOChannel *source, GIOCondition condition,
6114                                  gpointer data)
6115 {
6116         gchar buf[3] = "3";
6117         Compose *compose = (Compose *)data;
6118         gsize bytes_read;
6119
6120         debug_print(_("Compose: input from monitoring process\n"));
6121
6122         g_io_channel_read_chars(source, buf, sizeof(buf), &bytes_read, NULL);
6123
6124         g_io_channel_shutdown(source, FALSE, NULL);
6125         g_io_channel_unref(source);
6126
6127         waitpid(compose->exteditor_pid, NULL, 0);
6128
6129         if (buf[0] == '0') {            /* success */
6130                 GtkTextView *text = GTK_TEXT_VIEW(compose->text);
6131                 GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
6132
6133                 gtk_text_buffer_set_text(buffer, "", -1);
6134                 compose_insert_file(compose, compose->exteditor_file);
6135                 compose_changed_cb(NULL, compose);
6136
6137                 if (unlink(compose->exteditor_file) < 0)
6138                         FILE_OP_ERROR(compose->exteditor_file, "unlink");
6139         } else if (buf[0] == '1') {     /* failed */
6140                 g_warning("Couldn't exec external editor\n");
6141                 if (unlink(compose->exteditor_file) < 0)
6142                         FILE_OP_ERROR(compose->exteditor_file, "unlink");
6143         } else if (buf[0] == '2') {
6144                 g_warning("Couldn't write to file\n");
6145         } else if (buf[0] == '3') {
6146                 g_warning("Pipe read failed\n");
6147         }
6148
6149         compose_set_ext_editor_sensitive(compose, TRUE);
6150
6151         g_free(compose->exteditor_file);
6152         compose->exteditor_file    = NULL;
6153         compose->exteditor_pid     = -1;
6154         compose->exteditor_ch      = NULL;
6155         compose->exteditor_tag     = -1;
6156
6157         return FALSE;
6158 }
6159
6160 static void compose_set_ext_editor_sensitive(Compose *compose,
6161                                              gboolean sensitive)
6162 {
6163         GtkItemFactory *ifactory;
6164
6165         ifactory = gtk_item_factory_from_widget(compose->menubar);
6166
6167         menu_set_sensitive(ifactory, "/Message/Send", sensitive);
6168         menu_set_sensitive(ifactory, "/Message/Send later", sensitive);
6169         menu_set_sensitive(ifactory, "/Message/Insert file", sensitive);
6170         menu_set_sensitive(ifactory, "/Message/Insert signature", sensitive);
6171         menu_set_sensitive(ifactory, "/Edit/Wrap current paragraph", sensitive);
6172         menu_set_sensitive(ifactory, "/Edit/Wrap all long lines", sensitive);
6173         menu_set_sensitive(ifactory, "/Edit/Edit with external editor",
6174                            sensitive);
6175
6176         gtk_widget_set_sensitive(compose->text,                   sensitive);
6177         gtk_widget_set_sensitive(compose->toolbar->send_btn,      sensitive);
6178         gtk_widget_set_sensitive(compose->toolbar->sendl_btn,     sensitive);
6179         gtk_widget_set_sensitive(compose->toolbar->draft_btn,     sensitive);
6180         gtk_widget_set_sensitive(compose->toolbar->insert_btn,    sensitive);
6181         gtk_widget_set_sensitive(compose->toolbar->sig_btn,       sensitive);
6182         gtk_widget_set_sensitive(compose->toolbar->exteditor_btn, sensitive);
6183         gtk_widget_set_sensitive(compose->toolbar->linewrap_current_btn,  sensitive);
6184         gtk_widget_set_sensitive(compose->toolbar->linewrap_all_btn,  sensitive);
6185 }
6186
6187 /**
6188  * compose_undo_state_changed:
6189  *
6190  * Change the sensivity of the menuentries undo and redo
6191  **/
6192 static void compose_undo_state_changed(UndoMain *undostruct, gint undo_state,
6193                                        gint redo_state, gpointer data)
6194 {
6195         GtkWidget *widget = GTK_WIDGET(data);
6196         GtkItemFactory *ifactory;
6197
6198         g_return_if_fail(widget != NULL);
6199
6200         ifactory = gtk_item_factory_from_widget(widget);
6201
6202         switch (undo_state) {
6203         case UNDO_STATE_TRUE:
6204                 if (!undostruct->undo_state) {
6205                         undostruct->undo_state = TRUE;
6206                         menu_set_sensitive(ifactory, "/Edit/Undo", TRUE);
6207                 }
6208                 break;
6209         case UNDO_STATE_FALSE:
6210                 if (undostruct->undo_state) {
6211                         undostruct->undo_state = FALSE;
6212                         menu_set_sensitive(ifactory, "/Edit/Undo", FALSE);
6213                 }
6214                 break;
6215         case UNDO_STATE_UNCHANGED:
6216                 break;
6217         case UNDO_STATE_REFRESH:
6218                 menu_set_sensitive(ifactory, "/Edit/Undo",
6219                                    undostruct->undo_state);
6220                 break;
6221         default:
6222                 g_warning("Undo state not recognized");
6223                 break;
6224         }
6225
6226         switch (redo_state) {
6227         case UNDO_STATE_TRUE:
6228                 if (!undostruct->redo_state) {
6229                         undostruct->redo_state = TRUE;
6230                         menu_set_sensitive(ifactory, "/Edit/Redo", TRUE);
6231                 }
6232                 break;
6233         case UNDO_STATE_FALSE:
6234                 if (undostruct->redo_state) {
6235                         undostruct->redo_state = FALSE;
6236                         menu_set_sensitive(ifactory, "/Edit/Redo", FALSE);
6237                 }
6238                 break;
6239         case UNDO_STATE_UNCHANGED:
6240                 break;
6241         case UNDO_STATE_REFRESH:
6242                 menu_set_sensitive(ifactory, "/Edit/Redo",
6243                                    undostruct->redo_state);
6244                 break;
6245         default:
6246                 g_warning("Redo state not recognized");
6247                 break;
6248         }
6249 }
6250
6251 /* callback functions */
6252
6253 /* compose_edit_size_alloc() - called when resized. don't know whether Gtk
6254  * includes "non-client" (windows-izm) in calculation, so this calculation
6255  * may not be accurate.
6256  */
6257 static gboolean compose_edit_size_alloc(GtkEditable *widget,
6258                                         GtkAllocation *allocation,
6259                                         GtkSHRuler *shruler)
6260 {
6261         if (prefs_common.show_ruler) {
6262                 gint char_width = 0, char_height = 0;
6263                 gint line_width_in_chars;
6264
6265                 gtkut_get_font_size(GTK_WIDGET(widget),
6266                                     &char_width, &char_height);
6267                 line_width_in_chars =
6268                         (allocation->width - allocation->x) / char_width;
6269
6270                 /* got the maximum */
6271                 gtk_ruler_set_range(GTK_RULER(shruler),
6272                                     0.0, line_width_in_chars, 0,
6273                                     /*line_width_in_chars*/ char_width);
6274         }
6275
6276         return TRUE;
6277 }
6278
6279 static void account_activated(GtkMenuItem *menuitem, gpointer data)
6280 {
6281         Compose *compose = (Compose *)data;
6282
6283         PrefsAccount *ac;
6284         gchar *folderidentifier;
6285
6286         ac = account_find_from_id(
6287                 GPOINTER_TO_INT(g_object_get_data(G_OBJECT(menuitem), MENU_VAL_ID)));
6288         g_return_if_fail(ac != NULL);
6289
6290         if (ac != compose->account)
6291                 compose_select_account(compose, ac, FALSE);
6292
6293         /* Set message save folder */
6294         if (account_get_special_folder(compose->account, F_OUTBOX)) {
6295                 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn), prefs_common.savemsg);
6296         }
6297         g_signal_connect(G_OBJECT(compose->savemsg_checkbtn), "toggled",
6298                          G_CALLBACK(compose_savemsg_checkbtn_cb), compose);
6299                            
6300         gtk_editable_delete_text(GTK_EDITABLE(compose->savemsg_entry), 0, -1);
6301         if (account_get_special_folder(compose->account, F_OUTBOX)) {
6302                 folderidentifier = folder_item_get_identifier(account_get_special_folder
6303                                   (compose->account, F_OUTBOX));
6304                 gtk_entry_set_text(GTK_ENTRY(compose->savemsg_entry), folderidentifier);
6305                 g_free(folderidentifier);
6306         }
6307 }
6308
6309 static void attach_selected(GtkTreeView *tree_view, GtkTreePath *tree_path,
6310                             GtkTreeViewColumn *column, Compose *compose)
6311 {
6312         compose_attach_property(compose);
6313 }
6314
6315 static gboolean attach_button_pressed(GtkWidget *widget, GdkEventButton *event,
6316                                       gpointer data)
6317 {
6318         Compose *compose = (Compose *)data;
6319
6320         if (!event) return FALSE;
6321
6322         if (event->button == 3) {
6323                 gtk_menu_popup(GTK_MENU(compose->popupmenu), NULL, NULL,
6324                                NULL, NULL, event->button, event->time);
6325                 return TRUE;                           
6326         }
6327
6328         return FALSE;
6329 }
6330
6331 static gboolean attach_key_pressed(GtkWidget *widget, GdkEventKey *event,
6332                                    gpointer data)
6333 {
6334         Compose *compose = (Compose *)data;
6335
6336         if (!event) return FALSE;
6337
6338         switch (event->keyval) {
6339         case GDK_Delete:
6340                 compose_attach_remove_selected(compose);
6341                 break;
6342         }
6343         return FALSE;
6344 }
6345
6346 static void compose_allow_user_actions (Compose *compose, gboolean allow)
6347 {
6348         GtkItemFactory *ifactory = gtk_item_factory_from_widget(compose->menubar);
6349         toolbar_comp_set_sensitive(compose, allow);
6350         menu_set_sensitive(ifactory, "/Message", allow);
6351         menu_set_sensitive(ifactory, "/Edit", allow);
6352 #if USE_ASPELL
6353         menu_set_sensitive(ifactory, "/Spelling", allow);
6354 #endif  
6355         menu_set_sensitive(ifactory, "/Options", allow);
6356         menu_set_sensitive(ifactory, "/Tools", allow);
6357         menu_set_sensitive(ifactory, "/Help", allow);
6358         
6359         gtk_text_view_set_editable(GTK_TEXT_VIEW(compose->text), allow);
6360
6361 }
6362
6363 static void compose_send_cb(gpointer data, guint action, GtkWidget *widget)
6364 {
6365         Compose *compose = (Compose *)data;
6366         
6367         if (prefs_common.work_offline)
6368                 if (alertpanel(_("Offline warning"), 
6369                                _("You're working offline. Override?"),
6370                                GTK_STOCK_YES, GTK_STOCK_NO, NULL) != G_ALERTDEFAULT)
6371                         return;
6372         
6373         if (compose->draft_timeout_tag != -1) { /* CLAWS: disable draft timeout */
6374                 gtk_timeout_remove(compose->draft_timeout_tag);
6375                 compose->draft_timeout_tag = -1;
6376         }
6377
6378         compose_send(compose);
6379 }
6380
6381 static void compose_send_later_cb(gpointer data, guint action,
6382                                   GtkWidget *widget)
6383 {
6384         Compose *compose = (Compose *)data;
6385         gint val;
6386
6387         val = compose_queue_sub(compose, NULL, NULL, TRUE);
6388         if (!val) 
6389                 compose_close(compose);
6390         else if (val == -2) {
6391                 alertpanel_error(_("Could not queue message:\n\n%s."), strerror(errno));
6392         }
6393 }
6394
6395 void compose_draft (gpointer data) 
6396 {
6397         compose_draft_cb(data, COMPOSE_QUIT_EDITING, NULL);     
6398 }
6399
6400 static void compose_draft_cb(gpointer data, guint action, GtkWidget *widget)
6401 {
6402         Compose *compose = (Compose *)data;
6403         FolderItem *draft;
6404         gchar *tmp;
6405         gint msgnum;
6406         MsgFlags flag = {0, 0};
6407         static gboolean lock = FALSE;
6408         MsgInfo *newmsginfo;
6409         FILE *fp;
6410         
6411         if (lock) return;
6412
6413         draft = account_get_special_folder(compose->account, F_DRAFT);
6414         g_return_if_fail(draft != NULL);
6415
6416         lock = TRUE;
6417
6418         tmp = g_strdup_printf("%s%cdraft.%p", get_tmp_dir(),
6419                               G_DIR_SEPARATOR, compose);
6420         if ((fp = fopen(tmp, "wb")) == NULL) {
6421                 FILE_OP_ERROR(tmp, "fopen");
6422                 return;
6423         }
6424
6425         /* chmod for security */
6426         if (change_file_mode_rw(fp, tmp) < 0) {
6427                 FILE_OP_ERROR(tmp, "chmod");
6428                 g_warning("can't change file mode\n");
6429         }
6430
6431         /* Save draft infos */
6432         fprintf(fp, "X-Sylpheed-Account-Id:%d\n", compose->account->account_id);
6433         fprintf(fp, "S:%s\n", compose->account->address);
6434         if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(compose->savemsg_checkbtn))) {
6435                 gchar *savefolderid;
6436
6437                 savefolderid = gtk_editable_get_chars(GTK_EDITABLE(compose->savemsg_entry), 0, -1);
6438                 fprintf(fp, "SCF:%s\n", savefolderid);
6439                 g_free(savefolderid);
6440         }
6441         if (compose->privacy_system) {
6442                 fprintf(fp, "X-Sylpheed-Sign:%d\n", compose->use_signing);
6443                 fprintf(fp, "X-Sylpheed-Encrypt:%d\n", compose->use_encryption);
6444                 fprintf(fp, "X-Sylpheed-Privacy-System:%s\n", compose->privacy_system);
6445         }
6446         fprintf(fp, "\n");
6447
6448         if (compose_write_to_file(compose, fp, COMPOSE_WRITE_FOR_STORE) < 0) {
6449                 fclose(fp);
6450                 unlink(tmp);
6451                 g_free(tmp);
6452                 lock = FALSE;
6453                 return;
6454         }
6455         fclose(fp);
6456
6457         folder_item_scan(draft);
6458         if ((msgnum = folder_item_add_msg(draft, tmp, &flag, TRUE)) < 0) {
6459                 unlink(tmp);
6460                 g_free(tmp);
6461                 lock = FALSE;
6462                 return;
6463         }
6464         g_free(tmp);
6465         draft->mtime = 0;       /* force updating */
6466
6467         if (compose->mode == COMPOSE_REEDIT) {
6468                 compose_remove_reedit_target(compose);
6469         }
6470
6471         newmsginfo = folder_item_get_msginfo(draft, msgnum);
6472         if (newmsginfo) {
6473                 procmsg_msginfo_unset_flags(newmsginfo, ~0, ~0);
6474                 procmsg_msginfo_set_flags(newmsginfo, 0, MSG_DRAFT);
6475                 if (compose_use_attach(compose))
6476                         procmsg_msginfo_set_flags(newmsginfo, 0,
6477                                                   MSG_HAS_ATTACHMENT);
6478
6479                 procmsg_msginfo_free(newmsginfo);
6480         }
6481         
6482         folder_item_scan(draft);
6483         
6484         lock = FALSE;
6485
6486         if (action == COMPOSE_QUIT_EDITING)
6487                 compose_close(compose);
6488         else {
6489                 struct stat s;
6490                 gchar *path;
6491
6492                 path = folder_item_fetch_msg(draft, msgnum);
6493                 g_return_if_fail(path != NULL);
6494                 if (stat(path, &s) < 0) {
6495                         FILE_OP_ERROR(path, "stat");
6496                         g_free(path);
6497                         lock = FALSE;
6498                         return;
6499                 }
6500                 g_free(path);
6501
6502                 procmsg_msginfo_free(compose->targetinfo);
6503                 compose->targetinfo = procmsg_msginfo_new();
6504                 compose->targetinfo->msgnum = msgnum;
6505                 compose->targetinfo->size = s.st_size;
6506                 compose->targetinfo->mtime = s.st_mtime;
6507                 compose->targetinfo->folder = draft;
6508                 compose->mode = COMPOSE_REEDIT;
6509                 
6510                 if (action == COMPOSE_AUTO_SAVE) {
6511                         compose->autosaved_draft = compose->targetinfo;
6512                 }
6513         }
6514 }
6515
6516 static void compose_attach_cb(gpointer data, guint action, GtkWidget *widget)
6517 {
6518         Compose *compose = (Compose *)data;
6519         GList *file_list;
6520
6521         if (compose->redirect_filename != NULL)
6522                 return;
6523
6524         file_list = filesel_select_multiple_files_open(_("Select file"));
6525
6526         if (file_list) {
6527                 GList *tmp;
6528
6529                 for ( tmp = file_list; tmp; tmp = tmp->next) {
6530                         gchar *file = (gchar *) tmp->data;
6531                         gchar *utf8_filename = conv_filename_to_utf8(file);
6532                         compose_attach_append(compose, file, utf8_filename, NULL);
6533                         compose_changed_cb(NULL, compose);
6534                         g_free(file);
6535                         g_free(utf8_filename);
6536                 }
6537                 g_list_free(file_list);
6538         }               
6539 }
6540
6541 static void compose_insert_file_cb(gpointer data, guint action,
6542                                    GtkWidget *widget)
6543 {
6544         Compose *compose = (Compose *)data;
6545         GList *file_list;
6546
6547         file_list = filesel_select_multiple_files_open(_("Select file"));
6548
6549         if (file_list) {
6550                 GList *tmp;
6551
6552                 for ( tmp = file_list; tmp; tmp = tmp->next) {
6553                         gchar *file = (gchar *) tmp->data;
6554                         gchar *filedup = g_strdup(file);
6555                         gchar *shortfile = g_path_get_basename(filedup);
6556                         ComposeInsertResult res;
6557
6558                         res = compose_insert_file(compose, file);
6559                         if (res == COMPOSE_INSERT_READ_ERROR) {
6560                                 alertpanel_error(_("File '%s' could not be read."), shortfile);
6561                         } else if (res == COMPOSE_INSERT_INVALID_CHARACTER) {
6562                                 alertpanel_error(_("File '%s' contained invalid characters\n"
6563                                                    "for the current encoding, insertion may be incorrect."), shortfile);
6564                         }
6565                         g_free(shortfile);
6566                         g_free(filedup);
6567                         g_free(file);
6568                 }
6569                 g_list_free(file_list);
6570         }
6571 }
6572
6573 static void compose_insert_sig_cb(gpointer data, guint action,
6574                                   GtkWidget *widget)
6575 {
6576         Compose *compose = (Compose *)data;
6577
6578         compose_insert_sig(compose, FALSE);
6579 }
6580
6581 static gint compose_delete_cb(GtkWidget *widget, GdkEventAny *event,
6582                               gpointer data)
6583 {
6584         gint x, y;
6585         Compose *compose = (Compose *)data;
6586
6587         gtkut_widget_get_uposition(widget, &x, &y);
6588         prefs_common.compose_x = x;
6589         prefs_common.compose_y = y;
6590
6591         if (compose->sending)
6592                 return TRUE;
6593         compose_close_cb(compose, 0, NULL);
6594         return TRUE;
6595 }
6596
6597 static void compose_close_cb(gpointer data, guint action, GtkWidget *widget)
6598 {
6599         Compose *compose = (Compose *)data;
6600         AlertValue val;
6601
6602         if (compose->exteditor_tag != -1) {
6603                 if (!compose_ext_editor_kill(compose))
6604                         return;
6605         }
6606
6607         if (compose->modified) {
6608                 val = alertpanel(_("Discard message"),
6609                                  _("This message has been modified. discard it?"),
6610                                  _("Discard"), _("to Draft"), GTK_STOCK_CANCEL);
6611
6612                 switch (val) {
6613                 case G_ALERTDEFAULT:
6614                         if (prefs_common.autosave)
6615                                 compose_remove_draft(compose);                  
6616                         break;
6617                 case G_ALERTALTERNATE:
6618                         compose_draft_cb(data, COMPOSE_QUIT_EDITING, NULL);
6619                         return;
6620                 default:
6621                         return;
6622                 }
6623         }
6624
6625         compose_close(compose);
6626 }
6627
6628 static void compose_set_encoding_cb(gpointer data, guint action,
6629                                     GtkWidget *widget)
6630 {
6631         Compose *compose = (Compose *)data;
6632
6633         if (GTK_CHECK_MENU_ITEM(widget)->active)
6634                 compose->out_encoding = (CharSet)action;
6635 }
6636
6637 static void compose_address_cb(gpointer data, guint action, GtkWidget *widget)
6638 {
6639         Compose *compose = (Compose *)data;
6640
6641         addressbook_open(compose);
6642 }
6643
6644 static void compose_template_activate_cb(GtkWidget *widget, gpointer data)
6645 {
6646         Compose *compose = (Compose *)data;
6647         Template *tmpl;
6648         gchar *msg;
6649         AlertValue val;
6650
6651         tmpl = g_object_get_data(G_OBJECT(widget), "template");
6652         g_return_if_fail(tmpl != NULL);
6653
6654         msg = g_strdup_printf(_("Do you want to apply the template '%s' ?"),
6655                               tmpl->name);
6656         val = alertpanel(_("Apply template"), msg,
6657                          _("_Replace"), _("_Insert"), GTK_STOCK_CANCEL);
6658         g_free(msg);
6659
6660         if (val == G_ALERTDEFAULT)
6661                 compose_template_apply(compose, tmpl, TRUE);
6662         else if (val == G_ALERTALTERNATE)
6663                 compose_template_apply(compose, tmpl, FALSE);
6664 }
6665
6666 static void compose_ext_editor_cb(gpointer data, guint action,
6667                                   GtkWidget *widget)
6668 {
6669         Compose *compose = (Compose *)data;
6670
6671         compose_exec_ext_editor(compose);
6672 }
6673
6674 static void compose_undo_cb(Compose *compose)
6675 {
6676         gboolean prev_autowrap = compose->autowrap;
6677
6678         compose->autowrap = FALSE;
6679         undo_undo(compose->undostruct);
6680         compose->autowrap = prev_autowrap;
6681 }
6682
6683 static void compose_redo_cb(Compose *compose)
6684 {
6685         gboolean prev_autowrap = compose->autowrap;
6686         
6687         compose->autowrap = FALSE;
6688         undo_redo(compose->undostruct);
6689         compose->autowrap = prev_autowrap;
6690 }
6691
6692 static void entry_cut_clipboard(GtkWidget *entry)
6693 {
6694         if (GTK_IS_EDITABLE(entry))
6695                 gtk_editable_cut_clipboard (GTK_EDITABLE(entry));
6696         else if (GTK_IS_TEXT_VIEW(entry))
6697                 gtk_text_buffer_cut_clipboard(
6698                         gtk_text_view_get_buffer(GTK_TEXT_VIEW(entry)),
6699                         gtk_clipboard_get(GDK_SELECTION_CLIPBOARD),
6700                         TRUE);
6701 }
6702
6703 static void entry_copy_clipboard(GtkWidget *entry)
6704 {
6705         if (GTK_IS_EDITABLE(entry))
6706                 gtk_editable_copy_clipboard (GTK_EDITABLE(entry));
6707         else if (GTK_IS_TEXT_VIEW(entry))
6708                 gtk_text_buffer_copy_clipboard(
6709                         gtk_text_view_get_buffer(GTK_TEXT_VIEW(entry)),
6710                         gtk_clipboard_get(GDK_SELECTION_CLIPBOARD));
6711 }
6712
6713 static void entry_paste_clipboard(GtkWidget *entry)
6714 {
6715         if (GTK_IS_EDITABLE(entry))
6716                 gtk_editable_paste_clipboard (GTK_EDITABLE(entry));
6717         else if (GTK_IS_TEXT_VIEW(entry))
6718                 gtk_text_buffer_paste_clipboard(
6719                         gtk_text_view_get_buffer(GTK_TEXT_VIEW(entry)),
6720                         gtk_clipboard_get(GDK_SELECTION_CLIPBOARD),
6721                         NULL, TRUE);
6722 }
6723
6724 static void entry_allsel(GtkWidget *entry)
6725 {
6726         if (GTK_IS_EDITABLE(entry))
6727                 gtk_editable_select_region(GTK_EDITABLE(entry), 0, -1);
6728         else if (GTK_IS_TEXT_VIEW(entry)) {
6729                 GtkTextIter startiter, enditer;
6730                 GtkTextBuffer *textbuf;
6731
6732                 textbuf = gtk_text_view_get_buffer(GTK_TEXT_VIEW(entry));
6733                 gtk_text_buffer_get_start_iter(textbuf, &startiter);
6734                 gtk_text_buffer_get_end_iter(textbuf, &enditer);
6735
6736                 gtk_text_buffer_move_mark_by_name(textbuf, 
6737                         "selection_bound", &startiter);
6738                 gtk_text_buffer_move_mark_by_name(textbuf, 
6739                         "insert", &enditer);
6740         }
6741 }
6742
6743 static void compose_cut_cb(Compose *compose)
6744 {
6745         if (compose->focused_editable &&
6746             GTK_WIDGET_HAS_FOCUS(compose->focused_editable))
6747                 entry_cut_clipboard(compose->focused_editable);
6748 }
6749
6750 static void compose_copy_cb(Compose *compose)
6751 {
6752         if (compose->focused_editable &&
6753             GTK_WIDGET_HAS_FOCUS(compose->focused_editable))
6754                 entry_copy_clipboard(compose->focused_editable);
6755 }
6756
6757 static void compose_paste_cb(Compose *compose)
6758 {
6759         if (compose->focused_editable &&
6760             GTK_WIDGET_HAS_FOCUS(compose->focused_editable))
6761                 entry_paste_clipboard(compose->focused_editable);
6762 }
6763
6764 static void compose_paste_as_quote_cb(Compose *compose)
6765 {
6766         if (compose->focused_editable &&
6767             GTK_WIDGET_HAS_FOCUS(compose->focused_editable)) {
6768                 /* let text_insert() (called directly or at a later time
6769                  * after the gtk_editable_paste_clipboard) know that 
6770                  * text is to be inserted as a quotation. implemented
6771                  * by using a simple refcount... */
6772                 gint paste_as_quotation = GPOINTER_TO_INT(g_object_get_data(
6773                                                 G_OBJECT(compose->focused_editable),
6774                                                 "paste_as_quotation"));
6775                 g_object_set_data(G_OBJECT(compose->focused_editable),
6776                                     "paste_as_quotation",
6777                                     GINT_TO_POINTER(paste_as_quotation + 1));
6778                 entry_paste_clipboard(compose->focused_editable);
6779         }
6780 }
6781
6782 static void compose_allsel_cb(Compose *compose)
6783 {
6784         if (compose->focused_editable &&
6785             GTK_WIDGET_HAS_FOCUS(compose->focused_editable))
6786                 entry_allsel(compose->focused_editable);
6787 }
6788
6789 static void textview_move_beginning_of_line (GtkTextView *text)
6790 {
6791         GtkTextBuffer *buffer;
6792         GtkTextMark *mark;
6793         GtkTextIter ins;
6794
6795         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6796
6797         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6798         mark = gtk_text_buffer_get_insert(buffer);
6799         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
6800         gtk_text_iter_set_line_offset(&ins, 0);
6801         gtk_text_buffer_place_cursor(buffer, &ins);
6802 }
6803
6804 static void textview_move_forward_character (GtkTextView *text)
6805 {
6806         GtkTextBuffer *buffer;
6807         GtkTextMark *mark;
6808         GtkTextIter ins;
6809
6810         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6811
6812         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6813         mark = gtk_text_buffer_get_insert(buffer);
6814         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
6815         if (gtk_text_iter_forward_cursor_position(&ins))
6816                 gtk_text_buffer_place_cursor(buffer, &ins);
6817 }
6818
6819 static void textview_move_backward_character (GtkTextView *text)
6820 {
6821         GtkTextBuffer *buffer;
6822         GtkTextMark *mark;
6823         GtkTextIter ins;
6824
6825         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6826
6827         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6828         mark = gtk_text_buffer_get_insert(buffer);
6829         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
6830         if (gtk_text_iter_backward_cursor_position(&ins))
6831                 gtk_text_buffer_place_cursor(buffer, &ins);
6832 }
6833
6834 static void textview_move_forward_word (GtkTextView *text)
6835 {
6836         GtkTextBuffer *buffer;
6837         GtkTextMark *mark;
6838         GtkTextIter ins;
6839         gint count;
6840
6841         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6842
6843         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6844         mark = gtk_text_buffer_get_insert(buffer);
6845         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
6846         count = gtk_text_iter_inside_word (&ins) ? 2 : 1;
6847         if (gtk_text_iter_forward_word_ends(&ins, count)) {
6848                 gtk_text_iter_backward_word_start(&ins);
6849                 gtk_text_buffer_place_cursor(buffer, &ins);
6850         }
6851 }
6852
6853 static void textview_move_backward_word (GtkTextView *text)
6854 {
6855         GtkTextBuffer *buffer;
6856         GtkTextMark *mark;
6857         GtkTextIter ins;
6858         gint count;
6859
6860         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6861
6862         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6863         mark = gtk_text_buffer_get_insert(buffer);
6864         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
6865         count = gtk_text_iter_inside_word (&ins) ? 2 : 1;
6866         if (gtk_text_iter_backward_word_starts(&ins, 1))
6867                 gtk_text_buffer_place_cursor(buffer, &ins);
6868 }
6869
6870 static void textview_move_end_of_line (GtkTextView *text)
6871 {
6872         GtkTextBuffer *buffer;
6873         GtkTextMark *mark;
6874         GtkTextIter ins;
6875
6876         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6877
6878         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6879         mark = gtk_text_buffer_get_insert(buffer);
6880         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
6881         if (gtk_text_iter_forward_to_line_end(&ins))
6882                 gtk_text_buffer_place_cursor(buffer, &ins);
6883 }
6884
6885 static void textview_move_next_line (GtkTextView *text)
6886 {
6887         GtkTextBuffer *buffer;
6888         GtkTextMark *mark;
6889         GtkTextIter ins;
6890         gint offset;
6891
6892         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6893
6894         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6895         mark = gtk_text_buffer_get_insert(buffer);
6896         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
6897         offset = gtk_text_iter_get_line_offset(&ins);
6898         if (gtk_text_iter_forward_line(&ins)) {
6899                 gtk_text_iter_set_line_offset(&ins, offset);
6900                 gtk_text_buffer_place_cursor(buffer, &ins);
6901         }
6902 }
6903
6904 static void textview_move_previous_line (GtkTextView *text)
6905 {
6906         GtkTextBuffer *buffer;
6907         GtkTextMark *mark;
6908         GtkTextIter ins;
6909         gint offset;
6910
6911         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6912
6913         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6914         mark = gtk_text_buffer_get_insert(buffer);
6915         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
6916         offset = gtk_text_iter_get_line_offset(&ins);
6917         if (gtk_text_iter_backward_line(&ins)) {
6918                 gtk_text_iter_set_line_offset(&ins, offset);
6919                 gtk_text_buffer_place_cursor(buffer, &ins);
6920         }
6921 }
6922
6923 static void textview_delete_forward_character (GtkTextView *text)
6924 {
6925         GtkTextBuffer *buffer;
6926         GtkTextMark *mark;
6927         GtkTextIter ins, end_iter;
6928
6929         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6930
6931         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6932         mark = gtk_text_buffer_get_insert(buffer);
6933         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
6934         end_iter = ins;
6935         if (gtk_text_iter_forward_char(&end_iter)) {
6936                 gtk_text_buffer_delete(buffer, &ins, &end_iter);
6937         }
6938 }
6939
6940 static void textview_delete_backward_character (GtkTextView *text)
6941 {
6942         GtkTextBuffer *buffer;
6943         GtkTextMark *mark;
6944         GtkTextIter ins, end_iter;
6945
6946         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6947
6948         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6949         mark = gtk_text_buffer_get_insert(buffer);
6950         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
6951         end_iter = ins;
6952         if (gtk_text_iter_backward_char(&end_iter)) {
6953                 gtk_text_buffer_delete(buffer, &end_iter, &ins);
6954         }
6955 }
6956
6957 static void textview_delete_forward_word (GtkTextView *text)
6958 {
6959         GtkTextBuffer *buffer;
6960         GtkTextMark *mark;
6961         GtkTextIter ins, end_iter;
6962
6963         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6964
6965         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6966         mark = gtk_text_buffer_get_insert(buffer);
6967         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
6968         end_iter = ins;
6969         if (gtk_text_iter_forward_word_end(&end_iter)) {
6970                 gtk_text_buffer_delete(buffer, &ins, &end_iter);
6971         }
6972 }
6973
6974 static void textview_delete_backward_word (GtkTextView *text)
6975 {
6976         GtkTextBuffer *buffer;
6977         GtkTextMark *mark;
6978         GtkTextIter ins, end_iter;
6979
6980         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6981
6982         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
6983         mark = gtk_text_buffer_get_insert(buffer);
6984         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
6985         end_iter = ins;
6986         if (gtk_text_iter_backward_word_start(&end_iter)) {
6987                 gtk_text_buffer_delete(buffer, &end_iter, &ins);
6988         }
6989 }
6990
6991 static void textview_delete_line (GtkTextView *text)
6992 {
6993         GtkTextBuffer *buffer;
6994         GtkTextMark *mark;
6995         GtkTextIter ins, start_iter, end_iter;
6996         gboolean found;
6997
6998         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
6999
7000         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
7001         mark = gtk_text_buffer_get_insert(buffer);
7002         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
7003
7004         start_iter = ins;
7005         gtk_text_iter_set_line_offset(&start_iter, 0);
7006
7007         end_iter = ins;
7008         if (gtk_text_iter_ends_line(&end_iter))
7009                 found = gtk_text_iter_forward_char(&end_iter);
7010         else
7011                 found = gtk_text_iter_forward_to_line_end(&end_iter);
7012
7013         if (found)
7014                 gtk_text_buffer_delete(buffer, &start_iter, &end_iter);
7015 }
7016
7017 static void textview_delete_to_line_end (GtkTextView *text)
7018 {
7019         GtkTextBuffer *buffer;
7020         GtkTextMark *mark;
7021         GtkTextIter ins, end_iter;
7022         gboolean found;
7023
7024         g_return_if_fail(GTK_IS_TEXT_VIEW(text));
7025
7026         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
7027         mark = gtk_text_buffer_get_insert(buffer);
7028         gtk_text_buffer_get_iter_at_mark(buffer, &ins, mark);
7029         end_iter = ins;
7030         if (gtk_text_iter_ends_line(&end_iter))
7031                 found = gtk_text_iter_forward_char(&end_iter);
7032         else
7033                 found = gtk_text_iter_forward_to_line_end(&end_iter);
7034         if (found)
7035                 gtk_text_buffer_delete(buffer, &ins, &end_iter);
7036 }
7037
7038 static void compose_advanced_action_cb(Compose *compose,
7039                                         ComposeCallAdvancedAction action)
7040 {
7041         GtkTextView *text = GTK_TEXT_VIEW(compose->text);
7042         static struct {
7043                 void (*do_action) (GtkTextView *text);
7044         } action_table[] = {
7045                 {textview_move_beginning_of_line},
7046                 {textview_move_forward_character},
7047                 {textview_move_backward_character},
7048                 {textview_move_forward_word},
7049                 {textview_move_backward_word},
7050                 {textview_move_end_of_line},
7051                 {textview_move_next_line},
7052                 {textview_move_previous_line},
7053                 {textview_delete_forward_character},
7054                 {textview_delete_backward_character},
7055                 {textview_delete_forward_word},
7056                 {textview_delete_backward_word},
7057                 {textview_delete_line},
7058                 {NULL}, /* gtk_stext_delete_line_n */
7059                 {textview_delete_to_line_end}
7060         };
7061
7062         if (!GTK_WIDGET_HAS_FOCUS(text)) return;
7063
7064         if (action >= COMPOSE_CALL_ADVANCED_ACTION_MOVE_BEGINNING_OF_LINE &&
7065             action <= COMPOSE_CALL_ADVANCED_ACTION_DELETE_TO_LINE_END) {
7066                 if (action_table[action].do_action)
7067                         action_table[action].do_action(text);
7068                 else
7069                         g_warning("Not implemented yet.");
7070         }
7071 }
7072
7073 static void compose_grab_focus_cb(GtkWidget *widget, Compose *compose)
7074 {
7075         gchar *str = NULL;
7076         
7077         if (GTK_IS_EDITABLE(widget)) {
7078                 str = gtk_editable_get_chars(GTK_EDITABLE(widget), 0, -1);
7079                 gtk_editable_set_position(GTK_EDITABLE(widget), 
7080                         strlen(str));
7081                 g_free(str);
7082         }
7083
7084         if (GTK_IS_EDITABLE(widget) || GTK_IS_TEXT_VIEW(widget))
7085                 compose->focused_editable = widget;
7086 }
7087
7088 static void compose_changed_cb(GtkTextBuffer *textbuf, Compose *compose)
7089 {
7090         if (compose->modified == FALSE) {
7091                 compose->modified = TRUE;
7092                 compose_set_title(compose);
7093         }
7094 }
7095
7096 static void compose_wrap_cb(gpointer data, guint action, GtkWidget *widget)
7097 {
7098         Compose *compose = (Compose *)data;
7099
7100         if (action == 1)
7101                 compose_wrap_all_full(compose, TRUE);
7102         else
7103                 compose_wrap_paragraph(compose, NULL, TRUE);
7104 }
7105
7106 static void compose_toggle_autowrap_cb(gpointer data, guint action,
7107                                        GtkWidget *widget)
7108 {
7109         Compose *compose = (Compose *)data;
7110         compose->autowrap = GTK_CHECK_MENU_ITEM(widget)->active;
7111         if (compose->autowrap)
7112                 compose_wrap_all_full(compose, TRUE);
7113 }
7114
7115 static void compose_toggle_sign_cb(gpointer data, guint action,
7116                                    GtkWidget *widget)
7117 {
7118         Compose *compose = (Compose *)data;
7119
7120         if (GTK_CHECK_MENU_ITEM(widget)->active)
7121                 compose->use_signing = TRUE;
7122         else
7123                 compose->use_signing = FALSE;
7124 }
7125
7126 static void compose_toggle_encrypt_cb(gpointer data, guint action,
7127                                       GtkWidget *widget)
7128 {
7129         Compose *compose = (Compose *)data;
7130
7131         if (GTK_CHECK_MENU_ITEM(widget)->active)
7132                 compose->use_encryption = TRUE;
7133         else
7134                 compose->use_encryption = FALSE;
7135 }
7136
7137 static void activate_privacy_system(Compose *compose, PrefsAccount *account) 
7138 {
7139         g_free(compose->privacy_system);
7140         compose->privacy_system = g_strdup(account->default_privacy_system);
7141         compose_update_privacy_system_menu_item(compose);
7142 }
7143
7144 static void compose_toggle_ruler_cb(gpointer data, guint action,
7145                                     GtkWidget *widget)
7146 {
7147         Compose *compose = (Compose *)data;
7148
7149         if (GTK_CHECK_MENU_ITEM(widget)->active) {
7150                 gtk_widget_show(compose->ruler_hbox);
7151                 prefs_common.show_ruler = TRUE;
7152         } else {
7153                 gtk_widget_hide(compose->ruler_hbox);
7154                 gtk_widget_queue_resize(compose->edit_vbox);
7155                 prefs_common.show_ruler = FALSE;
7156         }
7157 }
7158
7159 static void compose_attach_drag_received_cb (GtkWidget          *widget,
7160                                              GdkDragContext     *drag_context,
7161                                              gint                x,
7162                                              gint                y,
7163                                              GtkSelectionData   *data,
7164                                              guint               info,
7165                                              guint               time,
7166                                              gpointer            user_data)
7167 {
7168         Compose *compose = (Compose *)user_data;
7169         GList *list, *tmp;
7170         
7171         if (gdk_atom_name(data->type) && !strcmp(gdk_atom_name(data->type), "text/uri-list")) {
7172                 list = uri_list_extract_filenames((const gchar *)data->data);
7173                 for (tmp = list; tmp != NULL; tmp = tmp->next)
7174                         compose_attach_append
7175                                 (compose, (const gchar *)tmp->data,
7176                                  (const gchar *)tmp->data, NULL);
7177                 if (list) compose_changed_cb(NULL, compose);
7178                 list_free_strings(list);
7179                 g_list_free(list);
7180         }
7181 }
7182
7183 static gboolean compose_drag_drop(GtkWidget *widget,
7184                                   GdkDragContext *drag_context,
7185                                   gint x, gint y,
7186                                   guint time, gpointer user_data)
7187 {
7188         /* not handling this signal makes compose_insert_drag_received_cb
7189          * called twice */
7190         return TRUE;                                     
7191 }
7192
7193 static void compose_insert_drag_received_cb (GtkWidget          *widget,
7194                                              GdkDragContext     *drag_context,
7195                                              gint                x,
7196                                              gint                y,
7197                                              GtkSelectionData   *data,
7198                                              guint               info,
7199                                              guint               time,
7200                                              gpointer            user_data)
7201 {
7202         Compose *compose = (Compose *)user_data;
7203         GList *list, *tmp;
7204
7205         /* strangely, testing data->type == gdk_atom_intern("text/uri-list", TRUE)
7206          * does not work */
7207         if (gdk_atom_name(data->type) && !strcmp(gdk_atom_name(data->type), "text/uri-list")) {
7208                 list = uri_list_extract_filenames((const gchar *)data->data);
7209                 for (tmp = list; tmp != NULL; tmp = tmp->next) {
7210                                 compose_insert_file(compose, (const gchar *)tmp->data);
7211                 }
7212                 list_free_strings(list);
7213                 g_list_free(list);
7214                 gtk_drag_finish(drag_context, TRUE, FALSE, time);
7215                 return;
7216         } else {
7217                 gchar *tmpfile = get_tmp_file();
7218                 str_write_to_file((const gchar *)data->data, tmpfile);
7219                 compose_insert_file(compose, tmpfile);
7220                 unlink(tmpfile);
7221                 g_free(tmpfile);
7222                 gtk_drag_finish(drag_context, TRUE, FALSE, time);
7223                 return;
7224         }
7225         gtk_drag_finish(drag_context, TRUE, FALSE, time);
7226 }
7227
7228 static void compose_header_drag_received_cb (GtkWidget          *widget,
7229                                              GdkDragContext     *drag_context,
7230                                              gint                x,
7231                                              gint                y,
7232                                              GtkSelectionData   *data,
7233                                              guint               info,
7234                                              guint               time,
7235                                              gpointer            user_data)
7236 {
7237         GtkEditable *entry = (GtkEditable *)user_data;
7238         gchar *email = (gchar *)data->data;
7239
7240         /* strangely, testing data->type == gdk_atom_intern("text/plain", TRUE)
7241          * does not work */
7242
7243         if (!strncmp(email, "mailto:", strlen("mailto:"))) {
7244                 gchar *decoded=g_new(gchar, strlen(email));
7245                 int start = 0;
7246
7247                 email += strlen("mailto:");
7248                 decode_uri(decoded, email); /* will fit */
7249                 gtk_editable_delete_text(entry, 0, -1);
7250                 gtk_editable_insert_text(entry, decoded, strlen(decoded), &start);
7251                 gtk_drag_finish(drag_context, TRUE, FALSE, time);
7252                 g_free(decoded);
7253                 return;
7254         }
7255         gtk_drag_finish(drag_context, TRUE, FALSE, time);
7256 }
7257
7258 static void compose_toggle_return_receipt_cb(gpointer data, guint action,
7259                                              GtkWidget *widget)
7260 {
7261         Compose *compose = (Compose *)data;
7262
7263         if (GTK_CHECK_MENU_ITEM(widget)->active)
7264                 compose->return_receipt = TRUE;
7265         else
7266                 compose->return_receipt = FALSE;
7267 }
7268
7269 static void compose_toggle_remove_refs_cb(gpointer data, guint action,
7270                                              GtkWidget *widget)
7271 {
7272         Compose *compose = (Compose *)data;
7273
7274         if (GTK_CHECK_MENU_ITEM(widget)->active)
7275                 compose->remove_references = TRUE;
7276         else
7277                 compose->remove_references = FALSE;
7278 }
7279
7280 gboolean compose_headerentry_key_press_event_cb(GtkWidget *entry,
7281                                             GdkEventKey *event,
7282                                             ComposeHeaderEntry *headerentry)
7283 {
7284         if ((g_slist_length(headerentry->compose->header_list) > 0) &&
7285             ((headerentry->headernum + 1) != headerentry->compose->header_nextrow) &&
7286             !(event->state & GDK_MODIFIER_MASK) &&
7287             (event->keyval == GDK_BackSpace) &&
7288             (strlen(gtk_entry_get_text(GTK_ENTRY(entry))) == 0)) {
7289                 gtk_container_remove
7290                         (GTK_CONTAINER(headerentry->compose->header_table),
7291                          headerentry->combo);
7292                 gtk_container_remove
7293                         (GTK_CONTAINER(headerentry->compose->header_table),
7294                          headerentry->entry);
7295                 headerentry->compose->header_list =
7296                         g_slist_remove(headerentry->compose->header_list,
7297                                        headerentry);
7298                 g_free(headerentry);
7299         } else  if (event->keyval == GDK_Tab) {
7300                 if (headerentry->compose->header_last == headerentry) {
7301                         /* Override default next focus, and give it to subject_entry
7302                          * instead of notebook tabs
7303                          */
7304                         g_signal_stop_emission_by_name(G_OBJECT(entry), "key-press-event"); 
7305                         gtk_widget_grab_focus(headerentry->compose->subject_entry);
7306                         return TRUE;
7307                 }
7308         }
7309         return FALSE;
7310 }
7311
7312 gboolean compose_headerentry_changed_cb(GtkWidget *entry,
7313                                     ComposeHeaderEntry *headerentry)
7314 {
7315         if (strlen(gtk_entry_get_text(GTK_ENTRY(entry))) != 0) {
7316                 headerentry->compose->header_list =
7317                         g_slist_append(headerentry->compose->header_list,
7318                                        headerentry);
7319                 
7320                 compose_create_header_entry(headerentry->compose);
7321                 g_signal_handlers_disconnect_matched
7322                         (G_OBJECT(entry), G_SIGNAL_MATCH_DATA,
7323                          0, 0, NULL, NULL, headerentry);
7324                 
7325                 /* Automatically scroll down */
7326                 compose_show_first_last_header(headerentry->compose, FALSE);
7327                 
7328         }
7329         return FALSE;
7330 }
7331
7332 static void compose_show_first_last_header(Compose *compose, gboolean show_first)
7333 {
7334         GtkAdjustment *vadj;
7335
7336         g_return_if_fail(compose);
7337         g_return_if_fail(GTK_IS_WIDGET(compose->header_table));
7338         g_return_if_fail(GTK_IS_VIEWPORT(compose->header_table->parent));
7339
7340         vadj = gtk_viewport_get_vadjustment(GTK_VIEWPORT(compose->header_table->parent));
7341         gtk_adjustment_set_value(vadj, (show_first ? vadj->lower : vadj->upper));
7342 }
7343
7344 static void text_inserted(GtkTextBuffer *buffer, GtkTextIter *iter,
7345                           const gchar *text, gint len, Compose *compose)
7346 {
7347         gint paste_as_quotation = GPOINTER_TO_INT(g_object_get_data
7348                                 (G_OBJECT(compose->text), "paste_as_quotation"));
7349         GtkTextMark *mark;
7350
7351         g_return_if_fail(text != NULL);
7352
7353         g_signal_handlers_block_by_func(G_OBJECT(buffer),
7354                                         G_CALLBACK(text_inserted),
7355                                         compose);
7356         if (paste_as_quotation) {
7357                 gchar *new_text;
7358                 gchar *qmark;
7359
7360                 if (len < 0)
7361                         len = strlen(text);
7362
7363                 new_text = g_strndup(text, len);
7364                 if (prefs_common.quotemark && *prefs_common.quotemark)
7365                         qmark = prefs_common.quotemark;
7366                 else
7367                         qmark = "> ";
7368                 gtk_text_buffer_place_cursor(buffer, iter);
7369                 compose_quote_fmt(compose, NULL, "%Q", qmark, new_text);
7370                 g_free(new_text);
7371                 g_object_set_data(G_OBJECT(compose->text), "paste_as_quotation",
7372                                   GINT_TO_POINTER(paste_as_quotation - 1));
7373         } else
7374                 gtk_text_buffer_insert(buffer, iter, text, len);
7375
7376         mark = gtk_text_buffer_create_mark(buffer, NULL, iter, FALSE);
7377         compose_wrap_all_full(compose, FALSE);
7378         gtk_text_buffer_get_iter_at_mark(buffer, iter, mark);
7379         gtk_text_buffer_delete_mark(buffer, mark);
7380
7381         g_signal_handlers_unblock_by_func(G_OBJECT(buffer),
7382                                           G_CALLBACK(text_inserted),
7383                                           compose);
7384         g_signal_stop_emission_by_name(G_OBJECT(buffer), "insert-text");
7385
7386         if (prefs_common.autosave && 
7387             gtk_text_buffer_get_char_count(buffer) % prefs_common.autosave_length == 0)
7388                 compose->draft_timeout_tag = gtk_timeout_add
7389                         (500, (GtkFunction) compose_defer_auto_save_draft, compose);
7390 }
7391 static gint compose_defer_auto_save_draft(Compose *compose)
7392 {
7393         compose->draft_timeout_tag = -1;
7394         compose_draft_cb((gpointer)compose, COMPOSE_AUTO_SAVE, NULL);
7395         return FALSE;
7396 }
7397
7398 #if USE_ASPELL
7399 static void compose_check_all(Compose *compose)
7400 {
7401         if (compose->gtkaspell)
7402                 gtkaspell_check_all(compose->gtkaspell);
7403 }
7404
7405 static void compose_highlight_all(Compose *compose)
7406 {
7407         if (compose->gtkaspell)
7408                 gtkaspell_highlight_all(compose->gtkaspell);
7409 }
7410
7411 static void compose_check_backwards(Compose *compose)
7412 {
7413         if (compose->gtkaspell) 
7414                 gtkaspell_check_backwards(compose->gtkaspell);
7415         else {
7416                 GtkItemFactory *ifactory;
7417                 ifactory = gtk_item_factory_from_widget(compose->popupmenu);
7418                 menu_set_sensitive(ifactory, "/Edit/Check backwards misspelled word", FALSE);
7419                 menu_set_sensitive(ifactory, "/Edit/Forward to next misspelled word", FALSE);
7420         }
7421 }
7422
7423 static void compose_check_forwards_go(Compose *compose)
7424 {
7425         if (compose->gtkaspell) 
7426                 gtkaspell_check_forwards_go(compose->gtkaspell);
7427         else {
7428                 GtkItemFactory *ifactory;
7429                 ifactory = gtk_item_factory_from_widget(compose->popupmenu);
7430                 menu_set_sensitive(ifactory, "/Edit/Check backwards misspelled word", FALSE);
7431                 menu_set_sensitive(ifactory, "/Edit/Forward to next misspelled word", FALSE);
7432         }
7433 }
7434 #endif
7435
7436 /*!
7437  *\brief        Guess originating forward account from MsgInfo and several 
7438  *              "common preference" settings. Return NULL if no guess. 
7439  */
7440 static PrefsAccount *compose_guess_forward_account_from_msginfo(MsgInfo *msginfo)
7441 {
7442         PrefsAccount *account = NULL;
7443         
7444         g_return_val_if_fail(msginfo, NULL);
7445         g_return_val_if_fail(msginfo->folder, NULL);
7446         g_return_val_if_fail(msginfo->folder->prefs, NULL);
7447
7448         if (msginfo->folder->prefs->enable_default_account)
7449                 account = account_find_from_id(msginfo->folder->prefs->default_account);
7450                 
7451         if (!account) 
7452                 account = msginfo->folder->folder->account;
7453                 
7454         if (!account && msginfo->to && prefs_common.forward_account_autosel) {
7455                 gchar *to;
7456                 Xstrdup_a(to, msginfo->to, return NULL);
7457                 extract_address(to);
7458                 account = account_find_from_address(to);
7459         }
7460
7461         if (!account && prefs_common.forward_account_autosel) {
7462                 gchar cc[BUFFSIZE];
7463                 if (!procheader_get_header_from_msginfo
7464                         (msginfo, cc,sizeof cc , "CC:")) { /* Found a CC header */
7465                         extract_address(cc);
7466                         account = account_find_from_address(cc);
7467                 }
7468         }
7469         
7470         return account;
7471 }
7472
7473 static void compose_close(Compose *compose)
7474 {
7475         gint x, y;
7476
7477         g_return_if_fail(compose);
7478         gtkut_widget_get_uposition(compose->window, &x, &y);
7479         prefs_common.compose_x = x;
7480         prefs_common.compose_y = y;
7481         compose_destroy(compose);
7482 }
7483
7484 /**
7485  * Add entry field for each address in list.
7486  * \param compose     E-Mail composition object.
7487  * \param listAddress List of (formatted) E-Mail addresses.
7488  */
7489 static void compose_add_field_list( Compose *compose, GList *listAddress ) {
7490         GList *node;
7491         gchar *addr;
7492         node = listAddress;
7493         while( node ) {
7494                 addr = ( gchar * ) node->data;
7495                 compose_entry_append( compose, addr, COMPOSE_TO );
7496                 node = g_list_next( node );
7497         }
7498 }
7499
7500 void compose_reply_from_messageview(MessageView *msgview, GSList *msginfo_list, 
7501                                     guint action)
7502 {
7503         gchar *body;
7504         GSList *new_msglist = NULL;
7505         MsgInfo *tmp_msginfo = NULL;
7506         
7507         g_return_if_fail(msgview != NULL);
7508
7509         g_return_if_fail(msginfo_list != NULL);
7510
7511         if (g_slist_length(msginfo_list) == 1) {
7512                 MimeInfo *mimeinfo = messageview_get_selected_mime_part(msgview);
7513                 MsgInfo *orig_msginfo = (MsgInfo *)msginfo_list->data;
7514                 
7515                 if (mimeinfo != NULL && mimeinfo->type == MIMETYPE_MESSAGE && 
7516                     !g_ascii_strcasecmp(mimeinfo->subtype, "rfc822")) {
7517                         
7518                         tmp_msginfo = procmsg_msginfo_new_from_mimeinfo(
7519                                                 orig_msginfo, mimeinfo);
7520                         if (tmp_msginfo != NULL) {
7521                                 new_msglist = g_slist_append(NULL, tmp_msginfo);
7522                         } 
7523                 }
7524         }
7525
7526         body = messageview_get_selection(msgview);
7527
7528         if (new_msglist) {
7529                 compose_reply_mode((ComposeMode)action, new_msglist, body);
7530                 procmsg_msginfo_free(tmp_msginfo);
7531                 g_slist_free(new_msglist);
7532         } else
7533                 compose_reply_mode((ComposeMode)action, msginfo_list, body);
7534
7535         g_free(body);
7536 }
7537
7538 /*
7539  * End of Source.
7540  */