src/procmsg.c

   1 /*
   2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
   3  * Copyright (C) 1999-2001 Hiroyuki Yamamoto
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18  */
  19
  20 #include "defs.h"
  21
  22 #include <glib.h>
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25
  26 #include "intl.h"
  27 #include "main.h"
  28 #include "utils.h"
  29 #include "procmsg.h"
  30 #include "procheader.h"
  31 #include "send.h"
  32 #include "procmime.h"
  33 #include "statusbar.h"
  34 #include "folder.h"
  35
  36 typedef struct _FlagInfo        FlagInfo;
  37
  38 struct _FlagInfo
  39 {
  40         guint    msgnum;
  41         MsgFlags flags;
  42 };
  43
  44 static void mark_sum_func                       (gpointer        key,
  45                                                  gpointer        value,
  46                                                  gpointer        data);
  47
  48 static GHashTable *procmsg_read_mark_file       (const gchar    *folder);
  49 static gint procmsg_cmp_msgnum                  (gconstpointer   a,
  50                                                  gconstpointer   b);
  51 static gint procmsg_cmp_flag_msgnum             (gconstpointer   a,
  52                                                  gconstpointer   b);
  53
  54
  55 GHashTable *procmsg_msg_hash_table_create(GSList *mlist)
  56 {
  57         GHashTable *msg_table;
  58
  59         if (mlist == NULL) return NULL;
  60
  61         msg_table = g_hash_table_new(NULL, g_direct_equal);
  62         procmsg_msg_hash_table_append(msg_table, mlist);
  63
  64         return msg_table;
  65 }
  66
  67 void procmsg_msg_hash_table_append(GHashTable *msg_table, GSList *mlist)
  68 {
  69         GSList *cur;
  70         MsgInfo *msginfo;
  71
  72         if (msg_table == NULL || mlist == NULL) return;
  73
  74         for (cur = mlist; cur != NULL; cur = cur->next) {
  75                 msginfo = (MsgInfo *)cur->data;
  76
  77                 g_hash_table_insert(msg_table,
  78                                     GUINT_TO_POINTER(msginfo->msgnum),
  79                                     msginfo);
  80         }
  81 }
  82
  83 GHashTable *procmsg_to_folder_hash_table_create(GSList *mlist)
  84 {
  85         GHashTable *msg_table;
  86         GSList *cur;
  87         MsgInfo *msginfo;
  88
  89         if (mlist == NULL) return NULL;
  90
  91         msg_table = g_hash_table_new(NULL, g_direct_equal);
  92
  93         for (cur = mlist; cur != NULL; cur = cur->next) {
  94                 msginfo = (MsgInfo *)cur->data;
  95                 g_hash_table_insert(msg_table, msginfo->to_folder, msginfo);
  96         }
  97
  98         return msg_table;
  99 }
 100
 101 static gint procmsg_read_cache_data_str(FILE *fp, gchar **str)
 102 {
 103         gchar buf[BUFFSIZE];
 104         gint ret = 0;
 105         size_t len;
 106
 107         if (fread(&len, sizeof(len), 1, fp) == 1) {
 108                 if (len < 0)
 109                         ret = -1;
 110                 else {
 111                         gchar *tmp = NULL;
 112
 113                         while (len > 0) {
 114                                 size_t size = MIN(len, BUFFSIZE - 1);
 115
 116                                 if (fread(buf, size, 1, fp) != 1) {
 117                                         ret = -1;
 118                                         if (tmp) g_free(tmp);
 119                                         *str = NULL;
 120                                         break;
 121                                 }
 122
 123                                 buf[size] = '\0';
 124                                 if (tmp) {
 125                                         *str = g_strconcat(tmp, buf, NULL);
 126                                         g_free(tmp);
 127                                         tmp = *str;
 128                                 } else
 129                                         tmp = *str = g_strdup(buf);
 130
 131                                 len -= size;
 132                         }
 133                 }
 134         } else
 135                 ret = -1;
 136
 137         if (ret < 0)
 138                 g_warning(_("Cache data is corrupted\n"));
 139
 140         return ret;
 141 }
 142
 143 #define READ_CACHE_DATA(data, fp) \
 144 { \
 145         if (procmsg_read_cache_data_str(fp, &data) < 0) { \
 146                 procmsg_msginfo_free(msginfo); \
 147                 break; \
 148         } \
 149 }
 150
 151 #define READ_CACHE_DATA_INT(n, fp) \
 152 { \
 153         if (fread(&n, sizeof(n), 1, fp) != 1) { \
 154                 g_warning(_("Cache data is corrupted\n")); \
 155                 procmsg_msginfo_free(msginfo); \
 156                 break; \
 157         } \
 158 }
 159
 160 GSList *procmsg_read_cache(FolderItem *item, gboolean scan_file)
 161 {
 162         GSList *mlist = NULL;
 163         GSList *last = NULL;
 164         gchar *cache_file;
 165         FILE *fp;
 166         MsgInfo *msginfo;
 167         MsgFlags default_flags;
 168         gchar file_buf[BUFFSIZE];
 169         gint ver;
 170         guint num;
 171         FolderType type;
 172
 173         g_return_val_if_fail(item != NULL, NULL);
 174         g_return_val_if_fail(item->folder != NULL, NULL);
 175         type = item->folder->type;
 176
 177         default_flags.perm_flags = MSG_NEW|MSG_UNREAD;
 178         default_flags.tmp_flags = MSG_CACHED;
 179         if (type == F_MH) {
 180                 if (item->stype == F_QUEUE) {
 181                         MSG_SET_TMP_FLAGS(default_flags, MSG_QUEUED);
 182                 } else if (item->stype == F_DRAFT) {
 183                         MSG_SET_TMP_FLAGS(default_flags, MSG_DRAFT);
 184                 }
 185         } else if (type == F_IMAP) {
 186                 MSG_SET_TMP_FLAGS(default_flags, MSG_IMAP);
 187         } else if (type == F_NEWS) {
 188                 MSG_SET_TMP_FLAGS(default_flags, MSG_NEWS);
 189         }
 190
 191         if (type == F_MH) {
 192                 gchar *path;
 193
 194                 path = folder_item_get_path(item);
 195                 if (change_dir(path) < 0) {
 196                         g_free(path);
 197                         return NULL;
 198                 }
 199                 g_free(path);
 200         }
 201         cache_file = folder_item_get_cache_file(item);
 202         if ((fp = fopen(cache_file, "r")) == NULL) {
 203                 debug_print(_("\tNo cache file\n"));
 204                 g_free(cache_file);
 205                 return NULL;
 206         }
 207         setvbuf(fp, file_buf, _IOFBF, sizeof(file_buf));
 208         g_free(cache_file);
 209
 210         debug_print(_("\tReading summary cache...\n"));
 211
 212         /* compare cache version */
 213         if (fread(&ver, sizeof(ver), 1, fp) != 1 ||
 214             CACHE_VERSION != ver) {
 215                 debug_print(_("Cache version is different. Discarding it.\n"));
 216                 fclose(fp);
 217                 return NULL;
 218         }
 219
 220         while (fread(&num, sizeof(num), 1, fp) == 1) {
 221                 msginfo = g_new0(MsgInfo, 1);
 222                 msginfo->msgnum = num;
 223                 READ_CACHE_DATA_INT(msginfo->size, fp);
 224                 READ_CACHE_DATA_INT(msginfo->mtime, fp);
 225                 READ_CACHE_DATA_INT(msginfo->date_t, fp);
 226                 READ_CACHE_DATA_INT(msginfo->flags.tmp_flags, fp);
 227
 228                 READ_CACHE_DATA(msginfo->fromname, fp);
 229
 230                 READ_CACHE_DATA(msginfo->date, fp);
 231                 READ_CACHE_DATA(msginfo->from, fp);
 232                 READ_CACHE_DATA(msginfo->to, fp);
 233                 READ_CACHE_DATA(msginfo->cc, fp);
 234                 READ_CACHE_DATA(msginfo->newsgroups, fp);
 235                 READ_CACHE_DATA(msginfo->subject, fp);
 236                 READ_CACHE_DATA(msginfo->msgid, fp);
 237                 READ_CACHE_DATA(msginfo->inreplyto, fp);
 238                 READ_CACHE_DATA(msginfo->references, fp);
 239
 240                 MSG_SET_PERM_FLAGS(msginfo->flags, default_flags.perm_flags);
 241                 MSG_SET_TMP_FLAGS(msginfo->flags, default_flags.tmp_flags);
 242
 243                 /* if the message file doesn't exist or is changed,
 244                    don't add the data */
 245                 if (type == F_MH && scan_file &&
 246                     folder_item_is_msg_changed(item, msginfo))
 247                         procmsg_msginfo_free(msginfo);
 248                 else {
 249                         msginfo->folder = item;
 250
 251                         if (!mlist)
 252                                 last = mlist = g_slist_append(NULL, msginfo);
 253                         else {
 254                                 last = g_slist_append(last, msginfo);
 255                                 last = last->next;
 256                         }
 257                 }
 258         }
 259
 260         fclose(fp);
 261         debug_print(_("done.\n"));
 262
 263         return mlist;
 264 }
 265
 266 #undef READ_CACHE_DATA
 267 #undef READ_CACHE_DATA_INT
 268
 269 void procmsg_set_flags(GSList *mlist, FolderItem *item)
 270 {
 271         GSList *cur, *tmp;
 272         gint newmsg = 0;
 273         gint lastnum = 0;
 274         gchar *markdir;
 275         MsgInfo *msginfo;
 276         GHashTable *mark_table;
 277         MsgFlags *flags;
 278
 279         if (!mlist) return;
 280         g_return_if_fail(item != NULL);
 281         g_return_if_fail(item->folder != NULL);
 282
 283         debug_print(_("\tMarking the messages...\n"));
 284
 285         markdir = folder_item_get_path(item);
 286         if (!is_dir_exist(markdir))
 287                 make_dir_hier(markdir);
 288
 289         mark_table = procmsg_read_mark_file(markdir);
 290         g_free(markdir);
 291
 292         if (!mark_table) return;
 293
 294         for (cur = mlist; cur != NULL; cur = cur->next) {
 295                 msginfo = (MsgInfo *)cur->data;
 296
 297                 if (lastnum < msginfo->msgnum)
 298                         lastnum = msginfo->msgnum;
 299
 300                 flags = g_hash_table_lookup
 301                         (mark_table, GUINT_TO_POINTER(msginfo->msgnum));
 302
 303                 if (flags != NULL) {
 304                         /* add the permanent flags only */
 305                         msginfo->flags.perm_flags = flags->perm_flags;
 306                         if (item->folder->type == F_IMAP) {
 307                                 MSG_SET_TMP_FLAGS(msginfo->flags, MSG_IMAP);
 308                         } else if (item->folder->type == F_NEWS) {
 309                                 MSG_SET_TMP_FLAGS(msginfo->flags, MSG_NEWS);
 310                         }
 311                 } else {
 312                         /* not found (new message) */
 313                         if (newmsg == 0) {
 314                                 for (tmp = mlist; tmp != cur; tmp = tmp->next)
 315                                         MSG_UNSET_PERM_FLAGS
 316                                                 (((MsgInfo *)tmp->data)->flags,
 317                                                  MSG_NEW);
 318                         }
 319                         newmsg++;
 320                 }
 321         }
 322
 323         item->last_num = lastnum;
 324
 325         debug_print(_("done.\n"));
 326         if (newmsg)
 327                 debug_print(_("\t%d new message(s)\n"), newmsg);
 328
 329         hash_free_value_mem(mark_table);
 330         g_hash_table_destroy(mark_table);
 331 }
 332
 333 gint procmsg_get_last_num_in_cache(GSList *mlist)
 334 {
 335         GSList *cur;
 336         MsgInfo *msginfo;
 337         gint last = 0;
 338
 339         if (mlist == NULL) return 0;
 340
 341         for (cur = mlist; cur != NULL; cur = cur->next) {
 342                 msginfo = (MsgInfo *)cur->data;
 343                 if (msginfo && msginfo->msgnum > last)
 344                         last = msginfo->msgnum;
 345         }
 346
 347         return last;
 348 }
 349
 350 void procmsg_msg_list_free(GSList *mlist)
 351 {
 352         GSList *cur;
 353         MsgInfo *msginfo;
 354
 355         for (cur = mlist; cur != NULL; cur = cur->next) {
 356                 msginfo = (MsgInfo *)cur->data;
 357                 procmsg_msginfo_free(msginfo);
 358         }
 359         g_slist_free(mlist);
 360 }
 361
 362 void procmsg_write_cache(MsgInfo *msginfo, FILE *fp)
 363 {
 364         MsgTmpFlags flags = msginfo->flags.tmp_flags & MSG_CACHED_FLAG_MASK;
 365
 366         WRITE_CACHE_DATA_INT(msginfo->msgnum, fp);
 367         WRITE_CACHE_DATA_INT(msginfo->size, fp);
 368         WRITE_CACHE_DATA_INT(msginfo->mtime, fp);
 369         WRITE_CACHE_DATA_INT(msginfo->date_t, fp);
 370         WRITE_CACHE_DATA_INT(flags, fp);
 371
 372         WRITE_CACHE_DATA(msginfo->fromname, fp);
 373
 374         WRITE_CACHE_DATA(msginfo->date, fp);
 375         WRITE_CACHE_DATA(msginfo->from, fp);
 376         WRITE_CACHE_DATA(msginfo->to, fp);
 377         WRITE_CACHE_DATA(msginfo->cc, fp);
 378         WRITE_CACHE_DATA(msginfo->newsgroups, fp);
 379         WRITE_CACHE_DATA(msginfo->subject, fp);
 380         WRITE_CACHE_DATA(msginfo->msgid, fp);
 381         WRITE_CACHE_DATA(msginfo->inreplyto, fp);
 382         WRITE_CACHE_DATA(msginfo->references, fp);
 383 }
 384
 385 void procmsg_write_flags(MsgInfo *msginfo, FILE *fp)
 386 {
 387         MsgPermFlags flags = msginfo->flags.perm_flags;
 388
 389         WRITE_CACHE_DATA_INT(msginfo->msgnum, fp);
 390         WRITE_CACHE_DATA_INT(flags, fp);
 391 }
 392
 393 struct MarkSum {
 394         gint *new;
 395         gint *unread;
 396         gint *total;
 397 };
 398
 399 static void mark_sum_func(gpointer key, gpointer value, gpointer data)
 400 {
 401         MsgFlags *flags = value;
 402         struct MarkSum *marksum = data;
 403
 404         if (MSG_IS_NEW(*flags) && !MSG_IS_IGNORE_THREAD(*flags)) (*marksum->new)++;
 405         if (MSG_IS_UNREAD(*flags) && !MSG_IS_IGNORE_THREAD(*flags)) (*marksum->unread)++;
 406         (*marksum->total)++;
 407
 408         g_free(flags);
 409 }
 410
 411 void procmsg_get_mark_sum(const gchar *folder,
 412                           gint *new, gint *unread, gint *total)
 413 {
 414         GHashTable *mark_table;
 415         struct MarkSum marksum;
 416
 417         *new = *unread = *total = 0;
 418         marksum.new    = new;
 419         marksum.unread = unread;
 420         marksum.total  = total;
 421
 422         mark_table = procmsg_read_mark_file(folder);
 423
 424         if (mark_table) {
 425                 g_hash_table_foreach(mark_table, mark_sum_func, &marksum);
 426                 g_hash_table_destroy(mark_table);
 427         }
 428 }
 429
 430 static GHashTable *procmsg_read_mark_file(const gchar *folder)
 431 {
 432         FILE *fp;
 433         GHashTable *mark_table = NULL;
 434         gint num;
 435         MsgFlags *flags;
 436         MsgPermFlags perm_flags;
 437
 438         if ((fp = procmsg_open_mark_file(folder, FALSE)) == NULL)
 439                 return NULL;
 440
 441         mark_table = g_hash_table_new(NULL, g_direct_equal);
 442
 443         while (fread(&num, sizeof(num), 1, fp) == 1) {
 444                 if (fread(&perm_flags, sizeof(flags), 1, fp) != 1) break;
 445
 446                 flags = g_new0(MsgFlags, 1);
 447                 flags->perm_flags = perm_flags;
 448
 449                 g_hash_table_insert(mark_table, GUINT_TO_POINTER(num), flags);
 450         }
 451
 452         fclose(fp);
 453         return mark_table;
 454 }
 455
 456 FILE *procmsg_open_mark_file(const gchar *folder, gboolean append)
 457 {
 458         gchar *markfile;
 459         FILE *fp;
 460         gint ver;
 461
 462         markfile = g_strconcat(folder, G_DIR_SEPARATOR_S, MARK_FILE, NULL);
 463
 464         if ((fp = fopen(markfile, "r")) == NULL)
 465                 debug_print(_("Mark file not found.\n"));
 466         else if (fread(&ver, sizeof(ver), 1, fp) != 1 || MARK_VERSION != ver) {
 467                 debug_print(_("Mark version is different (%d != %d). "
 468                               "Discarding it.\n"), ver, MARK_VERSION);
 469                 fclose(fp);
 470                 fp = NULL;
 471         }
 472
 473         /* read mode */
 474         if (append == FALSE) {
 475                 g_free(markfile);
 476                 return fp;
 477         }
 478
 479         if (fp) {
 480                 /* reopen with append mode */
 481                 fclose(fp);
 482                 if ((fp = fopen(markfile, "a")) == NULL)
 483                         g_warning(_("Can't open mark file with append mode.\n"));
 484         } else {
 485                 /* open with overwrite mode if mark file doesn't exist or
 486                    version is different */
 487                 if ((fp = fopen(markfile, "w")) == NULL)
 488                         g_warning(_("Can't open mark file with write mode.\n"));
 489                 else {
 490                         ver = MARK_VERSION;
 491                         WRITE_CACHE_DATA_INT(ver, fp);
 492                 }
 493         }
 494
 495         g_free(markfile);
 496         return fp;
 497 }
 498
 499 /* return the reversed thread tree */
 500 GNode *procmsg_get_thread_tree(GSList *mlist)
 501 {
 502         GNode *root, *parent, *node, *next;
 503         GHashTable *msgid_table;
 504         GHashTable *subject_table;
 505         MsgInfo *msginfo;
 506         const gchar *msgid;
 507         const gchar *subject;
 508
 509         root = g_node_new(NULL);
 510         msgid_table = g_hash_table_new(g_str_hash, g_str_equal);
 511         subject_table = g_hash_table_new(g_str_hash, g_str_equal);
 512
 513         for (; mlist != NULL; mlist = mlist->next) {
 514                 msginfo = (MsgInfo *)mlist->data;
 515                 parent = root;
 516
 517                 if (msginfo->inreplyto) {
 518                         parent = g_hash_table_lookup(msgid_table, msginfo->inreplyto);
 519                         if (parent == NULL) {
 520                                 parent = root;
 521                         } else {
 522                                 if(MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags)) {
 523                                         MSG_SET_PERM_FLAGS(msginfo->flags, MSG_IGNORE_THREAD);
 524                                 }
 525                         }
 526                 }
 527                 node = g_node_insert_data_before
 528                         (parent, parent == root ? parent->children : NULL,
 529                          msginfo);
 530                 if ((msgid = msginfo->msgid) &&
 531                     g_hash_table_lookup(msgid_table, msgid) == NULL)
 532                         g_hash_table_insert(msgid_table, (gchar *)msgid, node);
 533
 534                 subject = msginfo->subject;
 535                 if (subject_table_lookup(subject_table,
 536                                          (gchar *) subject) == NULL)
 537                         subject_table_insert(subject_table, (gchar *)subject,
 538                                              node);
 539         }
 540
 541         /* complete the unfinished threads */
 542         for (node = root->children; node != NULL; ) {
 543                 next = node->next;
 544                 msginfo = (MsgInfo *)node->data;
 545                 parent = NULL;
 546
 547                 if (msginfo->inreplyto)
 548                         parent = g_hash_table_lookup(msgid_table, msginfo->inreplyto);
 549                 if (parent == NULL && !subject_is_reply(msginfo->subject))
 550                         parent = subject_table_lookup(subject_table, msginfo->subject);
 551
 552                 if (parent && parent != node) {
 553                         g_node_unlink(node);
 554                         g_node_insert_before
 555                                 (parent, parent->children, node);
 556                         if(MSG_IS_IGNORE_THREAD(((MsgInfo *)parent->data)->flags)) {
 557                                 MSG_SET_PERM_FLAGS(msginfo->flags, MSG_IGNORE_THREAD);
 558                         }
 559                 }
 560                 node = next;
 561         }
 562
 563         g_hash_table_destroy(subject_table);
 564         g_hash_table_destroy(msgid_table);
 565
 566         return root;
 567 }
 568
 569 void procmsg_move_messages(GSList *mlist)
 570 {
 571         GSList *cur, *movelist = NULL;
 572         MsgInfo *msginfo;
 573         FolderItem *dest = NULL;
 574         GHashTable *hash;
 575
 576         if (!mlist) return;
 577
 578         hash = procmsg_to_folder_hash_table_create(mlist);
 579         folder_item_scan_foreach(hash);
 580         g_hash_table_destroy(hash);
 581
 582         for (cur = mlist; cur != NULL; cur = cur->next) {
 583                 msginfo = (MsgInfo *)cur->data;
 584                 if (!dest) {
 585                         dest = msginfo->to_folder;
 586                         movelist = g_slist_append(movelist, msginfo);
 587                 } else if (dest == msginfo->to_folder) {
 588                         movelist = g_slist_append(movelist, msginfo);
 589                 } else {
 590                         folder_item_move_msgs_with_dest(dest, movelist);
 591                         g_slist_free(movelist);
 592                         movelist = NULL;
 593                         dest = msginfo->to_folder;
 594                         movelist = g_slist_append(movelist, msginfo);
 595                 }
 596         }
 597
 598         if (movelist) {
 599                 folder_item_move_msgs_with_dest(dest, movelist);
 600                 g_slist_free(movelist);
 601         }
 602 }
 603
 604 void procmsg_copy_messages(GSList *mlist)
 605 {
 606         GSList *cur, *copylist = NULL;
 607         MsgInfo *msginfo;
 608         FolderItem *dest = NULL;
 609         GHashTable *hash;
 610
 611         if (!mlist) return;
 612
 613         hash = procmsg_to_folder_hash_table_create(mlist);
 614         folder_item_scan_foreach(hash);
 615         g_hash_table_destroy(hash);
 616
 617         for (cur = mlist; cur != NULL; cur = cur->next) {
 618                 msginfo = (MsgInfo *)cur->data;
 619                 if (!dest) {
 620                         dest = msginfo->to_folder;
 621                         copylist = g_slist_append(copylist, msginfo);
 622                 } else if (dest == msginfo->to_folder) {
 623                         copylist = g_slist_append(copylist, msginfo);
 624                 } else {
 625                         folder_item_copy_msgs_with_dest(dest, copylist);
 626                         g_slist_free(copylist);
 627                         copylist = NULL;
 628                         dest = msginfo->to_folder;
 629                         copylist = g_slist_append(copylist, msginfo);
 630                 }
 631         }
 632
 633         if (copylist) {
 634                 folder_item_copy_msgs_with_dest(dest, copylist);
 635                 g_slist_free(copylist);
 636         }
 637 }
 638
 639 gchar *procmsg_get_message_file_path(MsgInfo *msginfo)
 640 {
 641         gchar *path, *file;
 642
 643         g_return_val_if_fail(msginfo != NULL, NULL);
 644
 645         if (msginfo->plaintext_file)
 646                 file = g_strdup(msginfo->plaintext_file);
 647         else {
 648                 path = folder_item_get_path(msginfo->folder);
 649                 file = g_strconcat(path, G_DIR_SEPARATOR_S,
 650                                    itos(msginfo->msgnum), NULL);
 651                 g_free(path);
 652         }
 653
 654         return file;
 655 }
 656
 657 gchar *procmsg_get_message_file(MsgInfo *msginfo)
 658 {
 659         gchar *filename = NULL;
 660
 661         g_return_val_if_fail(msginfo != NULL, NULL);
 662
 663         filename = folder_item_fetch_msg(msginfo->folder, msginfo->msgnum);
 664         if (!filename)
 665                 g_warning(_("can't fetch message %d\n"), msginfo->msgnum);
 666
 667         return filename;
 668 }
 669
 670 FILE *procmsg_open_message(MsgInfo *msginfo)
 671 {
 672         FILE *fp;
 673         gchar *file;
 674
 675         g_return_val_if_fail(msginfo != NULL, NULL);
 676
 677         file = procmsg_get_message_file_path(msginfo);
 678         g_return_val_if_fail(file != NULL, NULL);
 679
 680         if ((fp = fopen(file, "r")) == NULL) {
 681                 FILE_OP_ERROR(file, "fopen");
 682                 g_free(file);
 683                 return NULL;
 684         }
 685
 686         g_free(file);
 687
 688         if (MSG_IS_QUEUED(msginfo->flags)) {
 689                 gchar buf[BUFFSIZE];
 690
 691                 while (fgets(buf, sizeof(buf), fp) != NULL)
 692                         if (buf[0] == '\r' || buf[0] == '\n') break;
 693         }
 694
 695         return fp;
 696 }
 697
 698 gboolean procmsg_msg_exist(MsgInfo *msginfo)
 699 {
 700         gchar *path;
 701         gboolean ret;
 702
 703         if (!msginfo) return FALSE;
 704
 705         path = folder_item_get_path(msginfo->folder);
 706         change_dir(path);
 707         ret = !folder_item_is_msg_changed(msginfo->folder, msginfo);
 708         g_free(path);
 709
 710         return ret;
 711 }
 712
 713 void procmsg_empty_trash(void)
 714 {
 715         FolderItem *trash;
 716         GList *cur;
 717
 718         for (cur = folder_get_list(); cur != NULL; cur = cur->next) {
 719                 trash = FOLDER(cur->data)->trash;
 720                 if (trash) folder_item_remove_all_msg(trash);
 721         }
 722 }
 723
 724 gint procmsg_send_queue(void)
 725 {
 726         FolderItem *queue;
 727         gint i;
 728         gint ret = 0;
 729
 730         queue = folder_get_default_queue();
 731         g_return_val_if_fail(queue != NULL, -1);
 732         folder_item_scan(queue);
 733         if (queue->last_num < 0) return -1;
 734         else if (queue->last_num == 0) return 0;
 735
 736         for (i = 1; i <= queue->last_num; i++) {
 737                 gchar *file;
 738
 739                 file = folder_item_fetch_msg(queue, i);
 740                 if (file) {
 741                         if (send_message_queue(file) < 0) {
 742                                 g_warning(_("Sending queued message %d failed.\n"), i);
 743                                 ret = -1;
 744                         } else
 745                                 folder_item_remove_msg(queue, i);
 746                         g_free(file);
 747                 }
 748         }
 749
 750         return ret;
 751 }
 752
 753 void procmsg_print_message(MsgInfo *msginfo, const gchar *cmdline)
 754 {
 755         static const gchar *def_cmd = "lpr %s";
 756         static guint id = 0;
 757         gchar *prtmp;
 758         FILE *tmpfp, *prfp;
 759         gchar buf[1024];
 760         gchar *p;
 761
 762         g_return_if_fail(msginfo);
 763
 764         if ((tmpfp = procmime_get_first_text_content(msginfo)) == NULL) {
 765                 g_warning(_("Can't get text part\n"));
 766                 return;
 767         }
 768
 769         prtmp = g_strdup_printf("%s%cprinttmp.%08x",
 770                                 get_mime_tmp_dir(), G_DIR_SEPARATOR, id++);
 771
 772         if ((prfp = fopen(prtmp, "w")) == NULL) {
 773                 FILE_OP_ERROR(prtmp, "fopen");
 774                 g_free(prtmp);
 775                 fclose(tmpfp);
 776                 return;
 777         }
 778
 779         if (msginfo->date) fprintf(prfp, "Date: %s\n", msginfo->date);
 780         if (msginfo->from) fprintf(prfp, "From: %s\n", msginfo->from);
 781         if (msginfo->to)   fprintf(prfp, "To: %s\n", msginfo->to);
 782         if (msginfo->cc)   fprintf(prfp, "Cc: %s\n", msginfo->cc);
 783         if (msginfo->newsgroups)
 784                 fprintf(prfp, "Newsgroups: %s\n", msginfo->newsgroups);
 785         if (msginfo->subject) fprintf(prfp, "Subject: %s\n", msginfo->subject);
 786         fputc('\n', prfp);
 787
 788         while (fgets(buf, sizeof(buf), tmpfp) != NULL)
 789                 fputs(buf, prfp);
 790
 791         fclose(prfp);
 792         fclose(tmpfp);
 793
 794         if (cmdline && (p = strchr(cmdline, '%')) && *(p + 1) == 's' &&
 795             !strchr(p + 2, '%'))
 796                 g_snprintf(buf, sizeof(buf) - 1, cmdline, prtmp);
 797         else {
 798                 if (cmdline)
 799                         g_warning(_("Print command line is invalid: `%s'\n"),
 800                                   cmdline);
 801                 g_snprintf(buf, sizeof(buf) - 1, def_cmd, prtmp);
 802         }
 803
 804         g_free(prtmp);
 805
 806         g_strchomp(buf);
 807         if (buf[strlen(buf) - 1] != '&') strcat(buf, "&");
 808         system(buf);
 809 }
 810
 811 MsgInfo *procmsg_msginfo_copy(MsgInfo *msginfo)
 812 {
 813         MsgInfo *newmsginfo;
 814
 815         if (msginfo == NULL) return NULL;
 816
 817         newmsginfo = g_new0(MsgInfo, 1);
 818
 819 #define MEMBCOPY(mmb)   newmsginfo->mmb = msginfo->mmb
 820 #define MEMBDUP(mmb)    newmsginfo->mmb = msginfo->mmb ? \
 821                         g_strdup(msginfo->mmb) : NULL
 822
 823         MEMBCOPY(msgnum);
 824         MEMBCOPY(size);
 825         MEMBCOPY(mtime);
 826         MEMBCOPY(date_t);
 827         MEMBCOPY(flags);
 828
 829         MEMBDUP(fromname);
 830
 831         MEMBDUP(date);
 832         MEMBDUP(from);
 833         MEMBDUP(to);
 834         MEMBDUP(cc);
 835         MEMBDUP(newsgroups);
 836         MEMBDUP(subject);
 837         MEMBDUP(msgid);
 838         MEMBDUP(inreplyto);
 839
 840         MEMBCOPY(folder);
 841         MEMBCOPY(to_folder);
 842
 843         MEMBDUP(xface);
 844         MEMBDUP(dispositionnotificationto);
 845         MEMBDUP(returnreceiptto);
 846         MEMBDUP(references);
 847
 848         MEMBCOPY(score);
 849         MEMBCOPY(threadscore);
 850
 851         return newmsginfo;
 852 }
 853
 854 void procmsg_msginfo_free(MsgInfo *msginfo)
 855 {
 856         if (msginfo == NULL) return;
 857
 858         g_free(msginfo->fromspace);
 859         g_free(msginfo->references);
 860         g_free(msginfo->returnreceiptto);
 861         g_free(msginfo->dispositionnotificationto);
 862         g_free(msginfo->xface);
 863
 864         g_free(msginfo->fromname);
 865
 866         g_free(msginfo->date);
 867         g_free(msginfo->from);
 868         g_free(msginfo->to);
 869         g_free(msginfo->cc);
 870         g_free(msginfo->newsgroups);
 871         g_free(msginfo->subject);
 872         g_free(msginfo->msgid);
 873         g_free(msginfo->inreplyto);
 874
 875         g_free(msginfo);
 876 }
 877
 878 static gint procmsg_cmp_msgnum(gconstpointer a, gconstpointer b)
 879 {
 880         const MsgInfo *msginfo = a;
 881         const guint msgnum = GPOINTER_TO_UINT(b);
 882
 883         if (!msginfo)
 884                 return -1;
 885
 886         return msginfo->msgnum - msgnum;
 887 }
 888
 889 gint procmsg_cmp_msgnum_for_sort(gconstpointer a, gconstpointer b)
 890 {
 891         const MsgInfo *msginfo1 = a;
 892         const MsgInfo *msginfo2 = b;
 893
 894         if (!msginfo1)
 895                 return -1;
 896         if (!msginfo2)
 897                 return -1;
 898
 899         return msginfo1->msgnum - msginfo2->msgnum;
 900 }
 901
 902 static gint procmsg_cmp_flag_msgnum(gconstpointer a, gconstpointer b)
 903 {
 904         const FlagInfo *finfo = a;
 905         const guint msgnum = GPOINTER_TO_UINT(b);
 906
 907         if (!finfo)
 908                 return -1;
 909
 910         return finfo->msgnum - msgnum;
 911 }