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