src/pop.c

   1 /*
   2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
   3  * Copyright (C) 1999-2002 Hiroyuki Yamamoto
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18  */
  19
  20 #ifdef HAVE_CONFIG_H
  21 #  include "config.h"
  22 #endif
  23
  24 #include <glib.h>
  25 #include <stdio.h>
  26 #include <string.h>
  27 #include <stdarg.h>
  28 #include <ctype.h>
  29 #include <unistd.h>
  30 #include <time.h>
  31 #include <errno.h>
  32
  33 #include "intl.h"
  34 #include "pop.h"
  35 #include "socket.h"
  36 #include "md5.h"
  37 #include "prefs_account.h"
  38 #include "utils.h"
  39 #include "inc.h"
  40 #include "recv.h"
  41 #include "selective_download.h"
  42 #include "log.h"
  43 #if USE_OPENSSL
  44 #  include "ssl.h"
  45 #endif
  46
  47 #define LOOKUP_NEXT_MSG()                                                       \
  48 {                                                                               \
  49         Pop3MsgInfo *msg;                                                       \
  50         PrefsAccount *ac = state->ac_prefs;                                     \
  51         gint size;                                                              \
  52         gboolean size_limit_over;                                               \
  53                                                                                 \
  54         for (;;) {                                                              \
  55                 msg = &state->msg[state->cur_msg];                              \
  56                 size = msg->size;                                               \
  57                 size_limit_over =                                               \
  58                     (ac->enable_size_limit &&                                   \
  59                      ac->size_limit > 0 &&                                      \
  60                      size > ac->size_limit * 1024);                             \
  61                                                                                 \
  62                 if (ac->rmmail &&                                               \
  63                     msg->recv_time != RECV_TIME_NONE &&                         \
  64                     msg->recv_time != RECV_TIME_KEEP &&                         \
  65                     state->current_time - msg->recv_time >=                     \
  66                     ac->msg_leave_time * 24 * 60 * 60) {                        \
  67                         log_print(_("POP3: Deleting expired message %d\n"),     \
  68                                   state->cur_msg);                              \
  69                         return POP3_DELETE_SEND;                                \
  70                 }                                                               \
  71                                                                                 \
  72                 if (size_limit_over)                                            \
  73                         log_print(_("POP3: Skipping message %d (%d bytes)\n"),  \
  74                                   state->cur_msg, size);                        \
  75                                                                                 \
  76                 if (size == 0 || msg->received || size_limit_over) {            \
  77                         state->cur_total_bytes += size;                         \
  78                         if (state->cur_msg == state->count)                     \
  79                                 return POP3_LOGOUT_SEND;                        \
  80                         else                                                    \
  81                                 state->cur_msg++;                               \
  82                 } else                                                          \
  83                         break;                                                  \
  84         }                                                                       \
  85 }
  86
  87 static gint pop3_ok(SockInfo *sock, gchar *argbuf);
  88 static void pop3_gen_send(SockInfo *sock, const gchar *format, ...);
  89 static gint pop3_gen_recv(SockInfo *sock, gchar *buf, gint size);
  90 static gboolean pop3_sd_get_next (Pop3State *state);
  91 static void pop3_sd_new_header(Pop3State *state);
  92 gboolean pop3_sd_state(Pop3State *state, gint cur_state, guint *next_state);
  93
  94 gint pop3_greeting_recv(SockInfo *sock, gpointer data)
  95 {
  96         Pop3State *state = (Pop3State *)data;
  97         gchar buf[POPBUFSIZE];
  98         gint ok;
  99
 100         if ((ok = pop3_ok(sock, buf)) == PS_SUCCESS) {
 101                 state->greeting = g_strdup(buf);
 102 #if USE_OPENSSL
 103                 if (state->ac_prefs->ssl_pop == SSL_STARTTLS)
 104                         return POP3_STLS_SEND;
 105 #endif
 106                 if (state->ac_prefs->protocol == A_APOP)
 107                         return POP3_GETAUTH_APOP_SEND;
 108                 else
 109                         return POP3_GETAUTH_USER_SEND;
 110         } else {
 111                 state->error_val = ok;
 112                 return -1;
 113         }
 114 }
 115
 116 #if USE_OPENSSL
 117 gint pop3_stls_send(SockInfo *sock, gpointer data)
 118 {
 119         pop3_gen_send(sock, "STLS");
 120
 121         return POP3_STLS_RECV;
 122 }
 123
 124 gint pop3_stls_recv(SockInfo *sock, gpointer data)
 125 {
 126         Pop3State *state = (Pop3State *)data;
 127         gint ok;
 128
 129         if ((ok = pop3_ok(sock, NULL)) == PS_SUCCESS) {
 130                 if (!ssl_init_socket_with_method(sock, SSL_METHOD_TLSv1)) {
 131                         state->error_val = PS_SOCKET;
 132                         return -1;
 133                 }
 134                 if (state->ac_prefs->protocol == A_APOP)
 135                         return POP3_GETAUTH_APOP_SEND;
 136                 else
 137                         return POP3_GETAUTH_USER_SEND;
 138         } else if (ok == PS_PROTOCOL) {
 139                 log_warning(_("can't start TLS session\n"));
 140                 state->error_val = ok;
 141                 return POP3_LOGOUT_SEND;
 142         } else {
 143                 state->error_val = ok;
 144                 return -1;
 145         }
 146 }
 147 #endif /* USE_OPENSSL */
 148
 149 gint pop3_getauth_user_send(SockInfo *sock, gpointer data)
 150 {
 151         Pop3State *state = (Pop3State *)data;
 152
 153         g_return_val_if_fail(state->user != NULL, -1);
 154
 155         pop3_gen_send(sock, "USER %s", state->user);
 156
 157         return POP3_GETAUTH_USER_RECV;
 158 }
 159
 160 gint pop3_getauth_user_recv(SockInfo *sock, gpointer data)
 161 {
 162         Pop3State *state = (Pop3State *)data;
 163
 164         if (pop3_ok(sock, NULL) == PS_SUCCESS)
 165                 return POP3_GETAUTH_PASS_SEND;
 166         else {
 167                 log_warning(_("error occurred on authentication\n"));
 168                 state->error_val = PS_AUTHFAIL;
 169                 return -1;
 170         }
 171 }
 172
 173 gint pop3_getauth_pass_send(SockInfo *sock, gpointer data)
 174 {
 175         Pop3State *state = (Pop3State *)data;
 176
 177         g_return_val_if_fail(state->pass != NULL, -1);
 178
 179         pop3_gen_send(sock, "PASS %s", state->pass);
 180
 181         return POP3_GETAUTH_PASS_RECV;
 182 }
 183
 184 gint pop3_getauth_pass_recv(SockInfo *sock, gpointer data)
 185 {
 186         Pop3State *state = (Pop3State *)data;
 187         gint ok;
 188
 189         if ((ok = pop3_ok(sock, NULL)) == PS_SUCCESS)
 190                 return POP3_GETRANGE_STAT_SEND;
 191         else if (ok == PS_LOCKBUSY) {
 192                 log_warning(_("mailbox is locked\n"));
 193                 state->error_val = ok;
 194                 return -1;
 195         } else {
 196                 log_warning(_("error occurred on authentication\n"));
 197                 state->error_val = PS_AUTHFAIL;
 198                 return -1;
 199         }
 200 }
 201
 202 gint pop3_getauth_apop_send(SockInfo *sock, gpointer data)
 203 {
 204         Pop3State *state = (Pop3State *)data;
 205         gchar *start, *end;
 206         gchar *apop_str;
 207         gchar md5sum[33];
 208
 209         g_return_val_if_fail(state->user != NULL, -1);
 210         g_return_val_if_fail(state->pass != NULL, -1);
 211
 212         if ((start = strchr(state->greeting, '<')) == NULL) {
 213                 log_warning(_("Required APOP timestamp not found "
 214                               "in greeting\n"));
 215                 state->error_val = PS_PROTOCOL;
 216                 return -1;
 217         }
 218
 219         if ((end = strchr(start, '>')) == NULL || end == start + 1) {
 220                 log_warning(_("Timestamp syntax error in greeting\n"));
 221                 state->error_val = PS_PROTOCOL;
 222                 return -1;
 223         }
 224
 225         *(end + 1) = '\0';
 226
 227         apop_str = g_strconcat(start, state->pass, NULL);
 228         md5_hex_digest(md5sum, apop_str);
 229         g_free(apop_str);
 230
 231         pop3_gen_send(sock, "APOP %s %s", state->user, md5sum);
 232
 233         return POP3_GETAUTH_APOP_RECV;
 234 }
 235
 236 gint pop3_getauth_apop_recv(SockInfo *sock, gpointer data)
 237 {
 238         Pop3State *state = (Pop3State *)data;
 239         gint ok;
 240
 241         if ((ok = pop3_ok(sock, NULL)) == PS_SUCCESS)
 242                 return POP3_GETRANGE_STAT_SEND;
 243         else if (ok == PS_LOCKBUSY) {
 244                 log_warning(_("mailbox is locked\n"));
 245                 state->error_val = ok;
 246                 return -1;
 247         } else {
 248                 log_warning(_("error occurred on authentication\n"));
 249                 state->error_val = PS_AUTHFAIL;
 250                 return -1;
 251         }
 252 }
 253
 254 gint pop3_getrange_stat_send(SockInfo *sock, gpointer data)
 255 {
 256         pop3_gen_send(sock, "STAT");
 257
 258         return POP3_GETRANGE_STAT_RECV;
 259 }
 260
 261 gint pop3_getrange_stat_recv(SockInfo *sock, gpointer data)
 262 {
 263         Pop3State *state = (Pop3State *)data;
 264         gchar buf[POPBUFSIZE + 1];
 265         gint ok;
 266
 267         if ((ok = pop3_ok(sock, buf)) == PS_SUCCESS) {
 268                 if (sscanf(buf, "%d %d", &state->count, &state->total_bytes)
 269                     != 2) {
 270                         log_warning(_("POP3 protocol error\n"));
 271                         state->error_val = PS_PROTOCOL;
 272                         return -1;
 273                 } else {
 274                         if (state->count == 0) {
 275                                 state->uidl_is_valid = TRUE;
 276                                 return POP3_LOGOUT_SEND;
 277                         } else {
 278                                 state->msg = g_new0
 279                                         (Pop3MsgInfo, state->count + 1);
 280                                 state->cur_msg = 1;
 281                                 return POP3_GETRANGE_UIDL_SEND;
 282                         }
 283                 }
 284         } else if (ok == PS_PROTOCOL) {
 285                 state->error_val = ok;
 286                 return POP3_LOGOUT_SEND;
 287         } else {
 288                 state->error_val = ok;
 289                 return -1;
 290         }
 291 }
 292
 293 gint pop3_getrange_last_send(SockInfo *sock, gpointer data)
 294 {
 295         pop3_gen_send(sock, "LAST");
 296
 297         return POP3_GETRANGE_LAST_RECV;
 298 }
 299
 300 gint pop3_getrange_last_recv(SockInfo *sock, gpointer data)
 301 {
 302         Pop3State *state = (Pop3State *)data;
 303         gchar buf[POPBUFSIZE + 1];
 304
 305         if (pop3_ok(sock, buf) == PS_SUCCESS) {
 306                 gint last;
 307
 308                 if (sscanf(buf, "%d", &last) == 0) {
 309                         log_warning(_("POP3 protocol error\n"));
 310                         state->error_val = PS_PROTOCOL;
 311                         return -1;
 312                 } else {
 313                         if (state->count == last)
 314                                 return POP3_LOGOUT_SEND;
 315                         else {
 316                                 state->cur_msg = last + 1;
 317                                 return POP3_GETSIZE_LIST_SEND;
 318                         }
 319                 }
 320         } else
 321                 return POP3_GETSIZE_LIST_SEND;
 322 }
 323
 324 gint pop3_getrange_uidl_send(SockInfo *sock, gpointer data)
 325 {
 326         pop3_gen_send(sock, "UIDL");
 327
 328         return POP3_GETRANGE_UIDL_RECV;
 329 }
 330
 331 gint pop3_getrange_uidl_recv(SockInfo *sock, gpointer data)
 332 {
 333         Pop3State *state = (Pop3State *)data;
 334         gboolean new = FALSE;
 335         gboolean get_all = FALSE;
 336         gchar buf[POPBUFSIZE];
 337         gchar id[IDLEN + 1];
 338         gint len;
 339         gint next_state;
 340
 341         if (!state->uidl_table) new = TRUE;
 342 #if 0
 343         if (state->ac_prefs->getall ||
 344             (state->ac_prefs->rmmail && state->ac_prefs->msg_leave_time == 0))
 345 #endif
 346         if (state->ac_prefs->getall)
 347                 get_all = TRUE;
 348
 349         if (pop3_ok(sock, NULL) != PS_SUCCESS) {
 350                 /* UIDL is not supported */
 351                 if (pop3_sd_state(state, POP3_GETRANGE_UIDL_RECV, &next_state))
 352                         return next_state;
 353
 354                 if (!get_all)
 355                         return POP3_GETRANGE_LAST_SEND;
 356                 else
 357                         return POP3_GETSIZE_LIST_SEND;
 358         }
 359
 360         while ((len = sock_gets(sock, buf, sizeof(buf))) > 0) {
 361                 gint num;
 362                 time_t recv_time;
 363
 364                 if (buf[0] == '.') break;
 365                 if (sscanf(buf, "%d %" Xstr(IDLEN) "s", &num, id) != 2)
 366                         continue;
 367                 if (num <= 0 || num > state->count) continue;
 368
 369                 state->msg[num].uidl = g_strdup(id);
 370
 371                 if (!state->uidl_table) continue;
 372
 373                 recv_time = (time_t)g_hash_table_lookup(state->uidl_table, id);
 374                 state->msg[num].recv_time = recv_time;
 375
 376                 if (!get_all && recv_time != RECV_TIME_NONE)
 377                         state->msg[num].received = TRUE;
 378
 379                 if (new == FALSE &&
 380                     (get_all || recv_time == RECV_TIME_NONE ||
 381                      state->ac_prefs->rmmail)) {
 382                         state->cur_msg = num;
 383                         new = TRUE;
 384                 }
 385         }
 386
 387         if (len < 0) {
 388                 log_error(_("Socket error\n"));
 389                 state->error_val = PS_SOCKET;
 390                 return -1;
 391         }
 392
 393         state->uidl_is_valid = TRUE;
 394         if (pop3_sd_state(state, POP3_GETRANGE_UIDL_RECV, &next_state))
 395                 return next_state;
 396
 397         if (new == TRUE)
 398                 return POP3_GETSIZE_LIST_SEND;
 399         else
 400                 return POP3_LOGOUT_SEND;
 401 }
 402
 403 gint pop3_getsize_list_send(SockInfo *sock, gpointer data)
 404 {
 405         pop3_gen_send(sock, "LIST");
 406
 407         return POP3_GETSIZE_LIST_RECV;
 408 }
 409
 410 gint pop3_getsize_list_recv(SockInfo *sock, gpointer data)
 411 {
 412         Pop3State *state = (Pop3State *)data;
 413         gchar buf[POPBUFSIZE];
 414         gint len;
 415         gint next_state;
 416
 417         if (pop3_ok(sock, NULL) != PS_SUCCESS) return POP3_LOGOUT_SEND;
 418
 419         state->cur_total_bytes = 0;
 420         state->cur_total_recv_bytes = 0;
 421
 422         while ((len = sock_gets(sock, buf, sizeof(buf))) > 0) {
 423                 guint num, size;
 424
 425                 if (buf[0] == '.') break;
 426                 if (sscanf(buf, "%u %u", &num, &size) != 2) {
 427                         state->error_val = PS_PROTOCOL;
 428                         return -1;
 429                 }
 430
 431                 if (num > 0 && num <= state->count)
 432                         state->msg[num].size = size;
 433                 if (num > 0 && num < state->cur_msg)
 434                         state->cur_total_bytes += size;
 435         }
 436
 437         if (len < 0) {
 438                 log_error(_("Socket error\n"));
 439                 state->error_val = PS_SOCKET;
 440                 return -1;
 441         }
 442
 443         if (pop3_sd_state(state, POP3_GETSIZE_LIST_RECV, &next_state))
 444                 return next_state;
 445
 446         LOOKUP_NEXT_MSG();
 447         return POP3_RETR_SEND;
 448 }
 449
 450 gint pop3_top_send(SockInfo *sock, gpointer data)
 451 {
 452         Pop3State *state = (Pop3State *)data;
 453
 454         inc_progress_update(state, POP3_TOP_SEND);
 455
 456         pop3_gen_send(sock, "TOP %i 0", state->cur_msg );
 457
 458         return POP3_TOP_RECV;
 459 }
 460
 461 gint pop3_top_recv(SockInfo *sock, gpointer data)
 462 {
 463         Pop3State *state = (Pop3State *)data;
 464         gchar *filename, *path;
 465         gint next_state;
 466         gint write_val;
 467         if (pop3_ok(sock, NULL) != PS_SUCCESS)
 468                 return POP3_LOGOUT_SEND;
 469
 470         path = g_strconcat(get_header_cache_dir(), G_DIR_SEPARATOR_S, NULL);
 471
 472         if ( !is_dir_exist(path) )
 473                 make_dir_hier(path);
 474
 475         filename = g_strdup_printf("%s%i", path, state->cur_msg);
 476
 477         if ( (write_val = recv_write_to_file(sock, filename)) < 0) {
 478                 state->error_val = (write_val == -1 ? PS_IOERR : PS_SOCKET);
 479                 g_free(path);
 480                 g_free(filename);
 481                 return -1;
 482         }
 483
 484         g_free(path);
 485         g_free(filename);
 486
 487         pop3_sd_state(state, POP3_TOP_RECV, &next_state);
 488
 489         if (state->cur_msg < state->count) {
 490                 state->cur_msg++;
 491                 return POP3_TOP_SEND;
 492         } else
 493                 return POP3_LOGOUT_SEND;
 494 }
 495
 496 gint pop3_retr_send(SockInfo *sock, gpointer data)
 497 {
 498         Pop3State *state = (Pop3State *)data;
 499
 500         pop3_gen_send(sock, "RETR %d", state->cur_msg);
 501
 502         return POP3_RETR_RECV;
 503 }
 504
 505 gint pop3_retr_recv(SockInfo *sock, gpointer data)
 506 {
 507         Pop3State *state = (Pop3State *)data;
 508         gchar *file;
 509         gint ok, drop_ok;
 510         gint next_state;
 511         gint write_val;
 512         if ((ok = pop3_ok(sock, NULL)) == PS_SUCCESS) {
 513                 file = get_tmp_file();
 514                 if ((write_val = recv_write_to_file(sock, file)) < 0) {
 515                         g_free(file);
 516                         if (!state->cancelled)
 517                                 state->error_val =
 518                                         (write_val == -1 ? PS_IOERR : PS_SOCKET);
 519                         return -1;
 520                 }
 521
 522                 /* drop_ok: 0: success 1: don't receive -1: error */
 523                 drop_ok = inc_drop_message(file, state);
 524                 g_free(file);
 525                 if (drop_ok < 0) {
 526                         state->error_val = PS_ERROR;
 527                         return -1;
 528                 }
 529
 530                 if (pop3_sd_state(state, POP3_RETR_RECV, &next_state))
 531                         return next_state;
 532
 533                 state->cur_total_bytes += state->msg[state->cur_msg].size;
 534                 state->cur_total_recv_bytes += state->msg[state->cur_msg].size;
 535                 state->cur_total_num++;
 536
 537                 state->msg[state->cur_msg].received = TRUE;
 538                 state->msg[state->cur_msg].recv_time =
 539                         drop_ok == 1 ? RECV_TIME_KEEP : state->current_time;
 540
 541                 if (drop_ok == 0 && state->ac_prefs->rmmail &&
 542                     state->ac_prefs->msg_leave_time == 0)
 543                         return POP3_DELETE_SEND;
 544
 545                 if (state->cur_msg < state->count) {
 546                         state->cur_msg++;
 547                         LOOKUP_NEXT_MSG();
 548                         return POP3_RETR_SEND;
 549                 } else
 550                         return POP3_LOGOUT_SEND;
 551         } else if (ok == PS_PROTOCOL) {
 552                 state->error_val = ok;
 553                 return POP3_LOGOUT_SEND;
 554         } else {
 555                 state->error_val = ok;
 556                 return -1;
 557         }
 558 }
 559
 560 gint pop3_delete_send(SockInfo *sock, gpointer data)
 561 {
 562         Pop3State *state = (Pop3State *)data;
 563
 564         pop3_gen_send(sock, "DELE %d", state->cur_msg);
 565
 566         return POP3_DELETE_RECV;
 567 }
 568
 569 gint pop3_delete_recv(SockInfo *sock, gpointer data)
 570 {
 571         Pop3State *state = (Pop3State *)data;
 572         gint next_state;
 573         gint ok;
 574
 575         if ((ok = pop3_ok(sock, NULL)) == PS_SUCCESS) {
 576                 state->msg[state->cur_msg].deleted = TRUE;
 577
 578                 if (pop3_sd_state(state, POP3_DELETE_RECV, &next_state))
 579                         return next_state;
 580
 581                 if (state->cur_msg < state->count) {
 582                         state->cur_msg++;
 583                         LOOKUP_NEXT_MSG();
 584                         return POP3_RETR_SEND;
 585                 } else
 586                         return POP3_LOGOUT_SEND;
 587         } else if (ok == PS_PROTOCOL) {
 588                 state->error_val = ok;
 589                 return POP3_LOGOUT_SEND;
 590         } else {
 591                 state->error_val = ok;
 592                 return -1;
 593         }
 594 }
 595
 596 gint pop3_logout_send(SockInfo *sock, gpointer data)
 597 {
 598         pop3_gen_send(sock, "QUIT");
 599
 600         return POP3_LOGOUT_RECV;
 601 }
 602
 603 gint pop3_logout_recv(SockInfo *sock, gpointer data)
 604 {
 605         Pop3State *state = (Pop3State *)data;
 606         gint ok;
 607
 608         if ((ok = pop3_ok(sock, NULL)) != PS_SUCCESS)
 609                 state->error_val = ok;
 610
 611         return -1;
 612 }
 613
 614 static gint pop3_ok(SockInfo *sock, gchar *argbuf)
 615 {
 616         gint ok;
 617         gchar buf[POPBUFSIZE + 1];
 618         gchar *bufp;
 619
 620         if ((ok = pop3_gen_recv(sock, buf, sizeof(buf))) == PS_SUCCESS) {
 621                 bufp = buf;
 622                 if (*bufp == '+' || *bufp == '-')
 623                         bufp++;
 624                 else
 625                         return PS_PROTOCOL;
 626
 627                 while (isalpha(*bufp))
 628                         bufp++;
 629
 630                 if (*bufp)
 631                         *(bufp++) = '\0';
 632
 633                 if (!strcmp(buf, "+OK"))
 634                         ok = PS_SUCCESS;
 635                 else if (!strncmp(buf, "-ERR", 4)) {
 636                         if (strstr(bufp, "lock") ||
 637                                  strstr(bufp, "Lock") ||
 638                                  strstr(bufp, "LOCK") ||
 639                                  strstr(bufp, "wait"))
 640                                 ok = PS_LOCKBUSY;
 641                         else
 642                                 ok = PS_PROTOCOL;
 643
 644                         if (*bufp)
 645                                 fprintf(stderr, "POP3: %s\n", bufp);
 646                 } else
 647                         ok = PS_PROTOCOL;
 648
 649                 if (argbuf)
 650                         strcpy(argbuf, bufp);
 651         }
 652
 653         return ok;
 654 }
 655
 656 static void pop3_gen_send(SockInfo *sock, const gchar *format, ...)
 657 {
 658         gchar buf[POPBUFSIZE + 1];
 659         va_list args;
 660
 661         va_start(args, format);
 662         g_vsnprintf(buf, sizeof(buf) - 2, format, args);
 663         va_end(args);
 664
 665         if (!strncasecmp(buf, "PASS ", 5))
 666                 log_print("POP3> PASS ********\n");
 667         else
 668                 log_print("POP3> %s\n", buf);
 669
 670         strcat(buf, "\r\n");
 671         sock_write(sock, buf, strlen(buf));
 672 }
 673
 674 static gint pop3_gen_recv(SockInfo *sock, gchar *buf, gint size)
 675 {
 676         if (sock_gets(sock, buf, size) < 0) {
 677                 return PS_SOCKET;
 678         } else {
 679                 strretchomp(buf);
 680                 log_print("POP3< %s\n", buf);
 681
 682                 return PS_SUCCESS;
 683         }
 684 }
 685
 686 static void pop3_sd_new_header(Pop3State *state)
 687 {
 688         HeaderItems *new_msg;
 689         if (state->cur_msg <= state->count) {
 690                 new_msg = g_new0(HeaderItems, 1);
 691
 692                 new_msg->index              = state->cur_msg;
 693                 new_msg->state              = SD_UNCHECKED;
 694                 new_msg->size               = state->msg[state->cur_msg].size;
 695                 new_msg->received           = state->msg[state->cur_msg].received;
 696                 new_msg->del_by_old_session = FALSE;
 697
 698                 state->ac_prefs->msg_list = g_slist_append(state->ac_prefs->msg_list,
 699                                                            new_msg);
 700                 debug_print("received ?: msg %i, received: %i\n",new_msg->index, new_msg->received);
 701         }
 702 }
 703
 704 gboolean pop3_sd_state(Pop3State *state, gint cur_state, guint *next_state)
 705 {
 706         gint session = state->ac_prefs->session;
 707         guint goto_state = -1;
 708
 709         switch (cur_state) {
 710         case POP3_GETRANGE_UIDL_RECV:
 711                 switch (session) {
 712                 case STYPE_POP_BEFORE_SMTP:
 713                         goto_state = POP3_LOGOUT_SEND;
 714                         break;
 715                 case STYPE_DOWNLOAD:
 716                 case STYPE_DELETE:
 717                 case STYPE_PREVIEW_ALL:
 718                         goto_state = POP3_GETSIZE_LIST_SEND;
 719                 default:
 720                         break;
 721                 }
 722                 break;
 723         case POP3_GETSIZE_LIST_RECV:
 724                 switch (session) {
 725                 case STYPE_PREVIEW_ALL:
 726                         state->cur_msg = 1;
 727                 case STYPE_PREVIEW_NEW:
 728                         goto_state = POP3_TOP_SEND;
 729                         break;
 730                 case STYPE_DELETE:
 731                         if (pop3_sd_get_next(state))
 732                                 goto_state = POP3_DELETE_SEND;
 733                         else
 734                                 goto_state = POP3_LOGOUT_SEND;
 735                         break;
 736                 case STYPE_DOWNLOAD:
 737                         if (pop3_sd_get_next(state))
 738                                 goto_state = POP3_RETR_SEND;
 739                         else
 740                                 goto_state = POP3_LOGOUT_SEND;
 741                 default:
 742                         break;
 743                 }
 744                 break;
 745         case POP3_TOP_RECV:
 746                 switch (session) {
 747                 case STYPE_PREVIEW_ALL:
 748                 case STYPE_PREVIEW_NEW:
 749                         pop3_sd_new_header(state);
 750                 default:
 751                         break;
 752                 }
 753                 break;
 754         case POP3_RETR_RECV:
 755                 switch (session) {
 756                 case STYPE_DOWNLOAD:
 757                         if (state->ac_prefs->sd_rmmail_on_download)
 758                                 goto_state = POP3_DELETE_SEND;
 759                         else {
 760                                 if (pop3_sd_get_next(state))
 761                                         goto_state = POP3_RETR_SEND;
 762                                 else
 763                                         goto_state = POP3_LOGOUT_SEND;
 764                         }
 765                 default:
 766                         break;
 767                 }
 768                 break;
 769         case POP3_DELETE_RECV:
 770                 switch (session) {
 771                 case STYPE_DELETE:
 772                         if (pop3_sd_get_next(state))
 773                                 goto_state = POP3_DELETE_SEND;
 774                         else
 775                                 goto_state =  POP3_LOGOUT_SEND;
 776                         break;
 777                 case STYPE_DOWNLOAD:
 778                         if (pop3_sd_get_next(state))
 779                                 goto_state = POP3_RETR_SEND;
 780                         else
 781                                 goto_state = POP3_LOGOUT_SEND;
 782                 default:
 783                         break;
 784                 }
 785         default:
 786                 break;
 787
 788         }
 789
 790         *next_state = goto_state;
 791         if (goto_state != -1)
 792                 return TRUE;
 793         else
 794                 return FALSE;
 795 }
 796
 797 gboolean pop3_sd_get_next(Pop3State *state)
 798 {
 799         GSList *cur;
 800         gint deleted_msgs = 0;
 801
 802         switch (state->ac_prefs->session) {
 803         case STYPE_DOWNLOAD:
 804         case STYPE_DELETE:
 805                 for (cur = state->ac_prefs->msg_list; cur != NULL; cur = cur->next) {
 806                         HeaderItems *items = (HeaderItems*)cur->data;
 807
 808                         if (items->del_by_old_session)
 809                                 deleted_msgs++;
 810
 811                         switch (items->state) {
 812                         case SD_REMOVE:
 813                                 items->state = SD_REMOVED;
 814                                 break;
 815                         case SD_DOWNLOAD:
 816                                 items->state = SD_DOWNLOADED;
 817                                 break;
 818                         case SD_CHECKED:
 819                                 state->cur_msg = items->index - deleted_msgs;
 820                                 if (state->ac_prefs->session == STYPE_DELETE)
 821                                         items->state = SD_REMOVE;
 822                                 else
 823                                         items->state = SD_DOWNLOAD;
 824                                 return TRUE;
 825                         default:
 826                                 break;
 827                         }
 828                 }
 829                 return FALSE;
 830         default:
 831                 return FALSE;
 832         }
 833 }
 834
 835 Pop3State *pop3_state_new(PrefsAccount *account)
 836 {
 837         Pop3State *state;
 838
 839         g_return_val_if_fail(account != NULL, NULL);
 840
 841         state = g_new0(Pop3State, 1);
 842
 843         state->ac_prefs = account;
 844         state->uidl_table = pop3_get_uidl_table(account);
 845         state->current_time = time(NULL);
 846         state->error_val = PS_SUCCESS;
 847
 848         return state;
 849 }
 850
 851 void pop3_state_destroy(Pop3State *state)
 852 {
 853         gint n;
 854
 855         g_return_if_fail(state != NULL);
 856
 857         for (n = 1; n <= state->count; n++)
 858                 g_free(state->msg[n].uidl);
 859         g_free(state->msg);
 860
 861         if (state->uidl_table) {
 862                 hash_free_strings(state->uidl_table);
 863                 g_hash_table_destroy(state->uidl_table);
 864         }
 865
 866         g_free(state->greeting);
 867         g_free(state->user);
 868         g_free(state->pass);
 869         g_free(state->prev_folder);
 870
 871         g_free(state);
 872 }
 873
 874 GHashTable *pop3_get_uidl_table(PrefsAccount *ac_prefs)
 875 {
 876         GHashTable *table;
 877         gchar *path;
 878         FILE *fp;
 879         gchar buf[POPBUFSIZE];
 880         gchar uidl[POPBUFSIZE];
 881         time_t recv_time;
 882         time_t now;
 883
 884         path = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
 885                            "uidl", G_DIR_SEPARATOR_S, ac_prefs->recv_server,
 886                            "-", ac_prefs->userid, NULL);
 887         if ((fp = fopen(path, "rb")) == NULL) {
 888                 if (ENOENT != errno) FILE_OP_ERROR(path, "fopen");
 889                 g_free(path);
 890                 path = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
 891                                    "uidl-", ac_prefs->recv_server,
 892                                    "-", ac_prefs->userid, NULL);
 893                 if ((fp = fopen(path, "rb")) == NULL) {
 894                         if (ENOENT != errno) FILE_OP_ERROR(path, "fopen");
 895                         g_free(path);
 896                         return NULL;
 897                 }
 898         }
 899         g_free(path);
 900
 901         table = g_hash_table_new(g_str_hash, g_str_equal);
 902
 903         now = time(NULL);
 904
 905         while (fgets(buf, sizeof(buf), fp) != NULL) {
 906                 strretchomp(buf);
 907                 recv_time = RECV_TIME_NONE;
 908                 if (sscanf(buf, "%s\t%ld", uidl, &recv_time) != 2) {
 909                         if (sscanf(buf, "%s", uidl) != 1)
 910                                 continue;
 911                         else
 912                                 recv_time = now;
 913                 }
 914                 if (recv_time == RECV_TIME_NONE)
 915                         recv_time = RECV_TIME_RECEIVED;
 916                 g_hash_table_insert(table, g_strdup(uidl),
 917                                     GINT_TO_POINTER(recv_time));
 918         }
 919
 920         fclose(fp);
 921         return table;
 922 }
 923
 924 gint pop3_write_uidl_list(Pop3State *state)
 925 {
 926         gchar *path;
 927         FILE *fp;
 928         Pop3MsgInfo *msg;
 929         gint n;
 930
 931         if (!state->uidl_is_valid) return 0;
 932
 933         path = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
 934                            "uidl", G_DIR_SEPARATOR_S,
 935                            state->ac_prefs->recv_server,
 936                            "-", state->ac_prefs->userid, NULL);
 937         if ((fp = fopen(path, "wb")) == NULL) {
 938                 FILE_OP_ERROR(path, "fopen");
 939                 g_free(path);
 940                 return -1;
 941         }
 942
 943         for (n = 1; n <= state->count; n++) {
 944                 msg = &state->msg[n];
 945                 if (msg->uidl && msg->received && !msg->deleted)
 946                         fprintf(fp, "%s\t%ld\n", msg->uidl, msg->recv_time);
 947         }
 948
 949         if (fclose(fp) == EOF) FILE_OP_ERROR(path, "fclose");
 950         g_free(path);
 951
 952         return 0;
 953 }