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