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