src/pop.c

   1 /*
   2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
   3  * Copyright (C) 1999-2003 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 "md5.h"
  36 #include "prefs_account.h"
  37 #include "utils.h"
  38 #include "inc.h"
  39 #include "recv.h"
  40
  41 #include "log.h"
  42 #include "hooks.h"
  43
  44 static gint pop3_greeting_recv          (Pop3Session *session,
  45                                          const gchar *msg);
  46 static gint pop3_getauth_user_send      (Pop3Session *session);
  47 static gint pop3_getauth_pass_send      (Pop3Session *session);
  48 static gint pop3_getauth_apop_send      (Pop3Session *session);
  49 #if USE_OPENSSL
  50 static gint pop3_stls_send              (Pop3Session *session);
  51 static gint pop3_stls_recv              (Pop3Session *session);
  52 #endif
  53 static gint pop3_getrange_stat_send     (Pop3Session *session);
  54 static gint pop3_getrange_stat_recv     (Pop3Session *session,
  55                                          const gchar *msg);
  56 static gint pop3_getrange_last_send     (Pop3Session *session);
  57 static gint pop3_getrange_last_recv     (Pop3Session *session,
  58                                          const gchar *msg);
  59 static gint pop3_getrange_uidl_send     (Pop3Session *session);
  60 static gint pop3_getrange_uidl_recv     (Pop3Session *session,
  61                                          const gchar *data,
  62                                          guint        len);
  63 static gint pop3_getsize_list_send      (Pop3Session *session);
  64 static gint pop3_getsize_list_recv      (Pop3Session *session,
  65                                          const gchar *data,
  66                                          guint        len);
  67 static gint pop3_retr_send              (Pop3Session *session);
  68 static gint pop3_retr_recv              (Pop3Session *session,
  69                                          const gchar *data,
  70                                          guint        len);
  71 static gint pop3_delete_send            (Pop3Session *session);
  72 static gint pop3_delete_recv            (Pop3Session *session);
  73 static gint pop3_logout_send            (Pop3Session *session);
  74
  75 static void pop3_gen_send               (Pop3Session    *session,
  76                                          const gchar    *format, ...);
  77
  78 static void pop3_session_destroy        (Session        *session);
  79
  80 static gint pop3_write_msg_to_file      (const gchar    *file,
  81                                          const gchar    *data,
  82                                          guint           len);
  83
  84 static Pop3State pop3_lookup_next       (Pop3Session    *session);
  85 static Pop3ErrorValue pop3_ok           (Pop3Session    *session,
  86                                          const gchar    *msg);
  87
  88 static gint pop3_session_recv_msg               (Session        *session,
  89                                                  const gchar    *msg);
  90 static gint pop3_session_recv_data_finished     (Session        *session,
  91                                                  guchar         *data,
  92                                                  guint           len);
  93
  94
  95 static gint pop3_greeting_recv(Pop3Session *session, const gchar *msg)
  96 {
  97         session->state = POP3_GREETING;
  98
  99         session->greeting = g_strdup(msg);
 100         return PS_SUCCESS;
 101 }
 102
 103 #if USE_OPENSSL
 104 static gint pop3_stls_send(Pop3Session *session)
 105 {
 106         session->state = POP3_STLS;
 107         pop3_gen_send(session, "STLS");
 108         return PS_SUCCESS;
 109 }
 110
 111 static gint pop3_stls_recv(Pop3Session *session)
 112 {
 113         if (session_start_tls(SESSION(session)) < 0) {
 114                 session->error_val = PS_SOCKET;
 115                 return -1;
 116         }
 117         return PS_SUCCESS;
 118 }
 119 #endif /* USE_OPENSSL */
 120
 121 static gint pop3_getauth_user_send(Pop3Session *session)
 122 {
 123         g_return_val_if_fail(session->user != NULL, -1);
 124
 125         session->state = POP3_GETAUTH_USER;
 126         pop3_gen_send(session, "USER %s", session->user);
 127         return PS_SUCCESS;
 128 }
 129
 130 static gint pop3_getauth_pass_send(Pop3Session *session)
 131 {
 132         g_return_val_if_fail(session->pass != NULL, -1);
 133
 134         session->state = POP3_GETAUTH_PASS;
 135         pop3_gen_send(session, "PASS %s", session->pass);
 136         return PS_SUCCESS;
 137 }
 138
 139 static gint pop3_getauth_apop_send(Pop3Session *session)
 140 {
 141         gchar *start, *end;
 142         gchar *apop_str;
 143         gchar md5sum[33];
 144
 145         g_return_val_if_fail(session->user != NULL, -1);
 146         g_return_val_if_fail(session->pass != NULL, -1);
 147
 148         session->state = POP3_GETAUTH_APOP;
 149
 150         if ((start = strchr(session->greeting, '<')) == NULL) {
 151                 log_warning(_("Required APOP timestamp not found "
 152                               "in greeting\n"));
 153                 session->error_val = PS_PROTOCOL;
 154                 return -1;
 155         }
 156
 157         if ((end = strchr(start, '>')) == NULL || end == start + 1) {
 158                 log_warning(_("Timestamp syntax error in greeting\n"));
 159                 session->error_val = PS_PROTOCOL;
 160                 return -1;
 161         }
 162
 163         *(end + 1) = '\0';
 164
 165         apop_str = g_strconcat(start, session->pass, NULL);
 166         md5_hex_digest(md5sum, apop_str);
 167         g_free(apop_str);
 168
 169         pop3_gen_send(session, "APOP %s %s", session->user, md5sum);
 170
 171         return PS_SUCCESS;
 172 }
 173
 174 static gint pop3_getrange_stat_send(Pop3Session *session)
 175 {
 176         session->state = POP3_GETRANGE_STAT;
 177         pop3_gen_send(session, "STAT");
 178         return PS_SUCCESS;
 179 }
 180
 181 static gint pop3_getrange_stat_recv(Pop3Session *session, const gchar *msg)
 182 {
 183         if (sscanf(msg, "%d %d", &session->count, &session->total_bytes) != 2) {
 184                 log_warning(_("POP3 protocol error\n"));
 185                 session->error_val = PS_PROTOCOL;
 186                 return -1;
 187         } else {
 188                 if (session->count == 0) {
 189                         session->uidl_is_valid = TRUE;
 190                 } else {
 191                         session->msg = g_new0(Pop3MsgInfo, session->count + 1);
 192                         session->cur_msg = 1;
 193                 }
 194         }
 195
 196         return PS_SUCCESS;
 197 }
 198
 199 static gint pop3_getrange_last_send(Pop3Session *session)
 200 {
 201         session->state = POP3_GETRANGE_LAST;
 202         pop3_gen_send(session, "LAST");
 203         return PS_SUCCESS;
 204 }
 205
 206 static gint pop3_getrange_last_recv(Pop3Session *session, const gchar *msg)
 207 {
 208         gint last;
 209
 210         if (sscanf(msg, "%d", &last) == 0) {
 211                 log_warning(_("POP3 protocol error\n"));
 212                 session->error_val = PS_PROTOCOL;
 213                 return -1;
 214         } else {
 215                 if (session->count > last) {
 216                         session->new_msg_exist = TRUE;
 217                         session->cur_msg = last + 1;
 218                 } else
 219                         session->cur_msg = 0;
 220         }
 221
 222         return PS_SUCCESS;
 223 }
 224
 225 static gint pop3_getrange_uidl_send(Pop3Session *session)
 226 {
 227         session->state = POP3_GETRANGE_UIDL;
 228         pop3_gen_send(session, "UIDL");
 229         return PS_SUCCESS;
 230 }
 231
 232 static gint pop3_getrange_uidl_recv(Pop3Session *session, const gchar *data,
 233                                     guint len)
 234 {
 235         gchar id[IDLEN + 1];
 236         gchar buf[POPBUFSIZE];
 237         gint buf_len;
 238         gint num;
 239         time_t recv_time;
 240         const gchar *p = data;
 241         const gchar *lastp = data + len;
 242         const gchar *newline;
 243
 244         while (p < lastp) {
 245                 if ((newline = memchr(p, '\r', lastp - p)) == NULL)
 246                         return -1;
 247                 buf_len = MIN(newline - p, sizeof(buf) - 1);
 248                 memcpy(buf, p, buf_len);
 249                 buf[buf_len] = '\0';
 250
 251                 p = newline + 1;
 252                 if (p < lastp && *p == '\n') p++;
 253
 254                 if (sscanf(buf, "%d %" Xstr(IDLEN) "s", &num, id) != 2)
 255                         return -1;
 256                 if (num <= 0 || num > session->count)
 257                         return -1;
 258
 259                 session->msg[num].uidl = g_strdup(id);
 260
 261                 recv_time = (time_t)g_hash_table_lookup(session->uidl_table, id);
 262                 session->msg[num].recv_time = recv_time;
 263
 264                 if (!session->ac_prefs->getall && recv_time != RECV_TIME_NONE)
 265                         session->msg[num].received = TRUE;
 266
 267                 if (!session->new_msg_exist &&
 268                     (session->ac_prefs->getall || recv_time == RECV_TIME_NONE ||
 269                      session->ac_prefs->rmmail)) {
 270                         session->cur_msg = num;
 271                         session->new_msg_exist = TRUE;
 272                 }
 273         }
 274
 275         session->uidl_is_valid = TRUE;
 276         return PS_SUCCESS;
 277 }
 278
 279 static gint pop3_getsize_list_send(Pop3Session *session)
 280 {
 281         session->state = POP3_GETSIZE_LIST;
 282         pop3_gen_send(session, "LIST");
 283         return PS_SUCCESS;
 284 }
 285
 286 static gint pop3_getsize_list_recv(Pop3Session *session, const gchar *data,
 287                                    guint len)
 288 {
 289         gchar buf[POPBUFSIZE];
 290         gint buf_len;
 291         guint num, size;
 292         const gchar *p = data;
 293         const gchar *lastp = data + len;
 294         const gchar *newline;
 295
 296         while (p < lastp) {
 297                 if ((newline = memchr(p, '\r', lastp - p)) == NULL)
 298                         return -1;
 299                 buf_len = MIN(newline - p, sizeof(buf) - 1);
 300                 memcpy(buf, p, buf_len);
 301                 buf[buf_len] = '\0';
 302
 303                 p = newline + 1;
 304                 if (p < lastp && *p == '\n') p++;
 305
 306                 if (sscanf(buf, "%u %u", &num, &size) != 2) {
 307                         session->error_val = PS_PROTOCOL;
 308                         return -1;
 309                 }
 310
 311                 if (num > 0 && num <= session->count)
 312                         session->msg[num].size = size;
 313                 if (num > 0 && num < session->cur_msg)
 314                         session->cur_total_bytes += size;
 315         }
 316
 317         return PS_SUCCESS;
 318 }
 319
 320 static gint pop3_retr_send(Pop3Session *session)
 321 {
 322         session->state = POP3_RETR;
 323         pop3_gen_send(session, "RETR %d", session->cur_msg);
 324         return PS_SUCCESS;
 325 }
 326
 327 static gint pop3_retr_recv(Pop3Session *session, const gchar *data, guint len)
 328 {
 329         gchar *file;
 330         gint drop_ok;
 331         MailReceiveData mail_receive_data;
 332
 333         mail_receive_data.session = session;
 334         mail_receive_data.data = g_strndup(data, len);
 335         hooks_invoke(MAIL_RECEIVE_HOOKLIST, &mail_receive_data);
 336
 337         file = get_tmp_file();
 338         if (pop3_write_msg_to_file(file, mail_receive_data.data,
 339                 strlen(mail_receive_data.data)) < 0) {
 340                 g_free(file);
 341                 g_free(mail_receive_data.data);
 342                 session->error_val = PS_IOERR;
 343                 return -1;
 344         }
 345         g_free(mail_receive_data.data);
 346
 347         /* drop_ok: 0: success 1: don't receive -1: error */
 348         drop_ok = inc_drop_message(file, session);
 349         g_free(file);
 350         if (drop_ok < 0) {
 351                 session->error_val = PS_IOERR;
 352                 return -1;
 353         }
 354
 355         session->cur_total_bytes += session->msg[session->cur_msg].size;
 356         session->cur_total_recv_bytes += session->msg[session->cur_msg].size;
 357         session->cur_total_num++;
 358
 359         session->msg[session->cur_msg].received = TRUE;
 360         session->msg[session->cur_msg].recv_time =
 361                 drop_ok == 1 ? RECV_TIME_KEEP : session->current_time;
 362
 363         return PS_SUCCESS;
 364 }
 365
 366 static gint pop3_delete_send(Pop3Session *session)
 367 {
 368         session->state = POP3_DELETE;
 369         pop3_gen_send(session, "DELE %d", session->cur_msg);
 370         return PS_SUCCESS;
 371 }
 372
 373 static gint pop3_delete_recv(Pop3Session *session)
 374 {
 375         session->msg[session->cur_msg].deleted = TRUE;
 376         return PS_SUCCESS;
 377 }
 378
 379 static gint pop3_logout_send(Pop3Session *session)
 380 {
 381         session->state = POP3_LOGOUT;
 382         pop3_gen_send(session, "QUIT");
 383         return PS_SUCCESS;
 384 }
 385
 386 static void pop3_gen_send(Pop3Session *session, const gchar *format, ...)
 387 {
 388         gchar buf[POPBUFSIZE + 1];
 389         va_list args;
 390
 391         va_start(args, format);
 392         g_vsnprintf(buf, sizeof(buf) - 2, format, args);
 393         va_end(args);
 394
 395         if (!strncasecmp(buf, "PASS ", 5))
 396                 log_print("POP3> PASS ********\n");
 397         else
 398                 log_print("POP3> %s\n", buf);
 399
 400         session_send_msg(SESSION(session), SESSION_MSG_NORMAL, buf);
 401 }
 402
 403 Session *pop3_session_new(PrefsAccount *account)
 404 {
 405         Pop3Session *session;
 406
 407         g_return_val_if_fail(account != NULL, NULL);
 408
 409         session = g_new0(Pop3Session, 1);
 410
 411         session_init(SESSION(session));
 412
 413         SESSION(session)->type = SESSION_POP3;
 414
 415         SESSION(session)->recv_msg = pop3_session_recv_msg;
 416         SESSION(session)->recv_data_finished = pop3_session_recv_data_finished;
 417         SESSION(session)->send_data_finished = NULL;
 418
 419         SESSION(session)->destroy = pop3_session_destroy;
 420
 421         session->state = POP3_READY;
 422         session->ac_prefs = account;
 423         session->uidl_table = pop3_get_uidl_table(account);
 424         session->current_time = time(NULL);
 425         session->error_val = PS_SUCCESS;
 426         session->error_msg = NULL;
 427
 428         return SESSION(session);
 429 }
 430
 431 static void pop3_session_destroy(Session *session)
 432 {
 433         Pop3Session *pop3_session = POP3_SESSION(session);
 434         gint n;
 435
 436         g_return_if_fail(session != NULL);
 437
 438         for (n = 1; n <= pop3_session->count; n++)
 439                 g_free(pop3_session->msg[n].uidl);
 440         g_free(pop3_session->msg);
 441
 442         if (pop3_session->uidl_table) {
 443                 hash_free_strings(pop3_session->uidl_table);
 444                 g_hash_table_destroy(pop3_session->uidl_table);
 445         }
 446
 447         g_free(pop3_session->greeting);
 448         g_free(pop3_session->user);
 449         g_free(pop3_session->pass);
 450         g_free(pop3_session->error_msg);
 451 }
 452
 453 GHashTable *pop3_get_uidl_table(PrefsAccount *ac_prefs)
 454 {
 455         GHashTable *table;
 456         gchar *path;
 457         FILE *fp;
 458         gchar buf[POPBUFSIZE];
 459         gchar uidl[POPBUFSIZE];
 460         time_t recv_time;
 461         time_t now;
 462
 463         table = g_hash_table_new(g_str_hash, g_str_equal);
 464
 465         path = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
 466                            "uidl", G_DIR_SEPARATOR_S, ac_prefs->recv_server,
 467                            "-", ac_prefs->userid, NULL);
 468         if ((fp = fopen(path, "rb")) == NULL) {
 469                 if (ENOENT != errno) FILE_OP_ERROR(path, "fopen");
 470                 g_free(path);
 471                 path = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
 472                                    "uidl-", ac_prefs->recv_server,
 473                                    "-", ac_prefs->userid, NULL);
 474                 if ((fp = fopen(path, "rb")) == NULL) {
 475                         if (ENOENT != errno) FILE_OP_ERROR(path, "fopen");
 476                         g_free(path);
 477                         return table;
 478                 }
 479         }
 480         g_free(path);
 481
 482         now = time(NULL);
 483
 484         while (fgets(buf, sizeof(buf), fp) != NULL) {
 485                 strretchomp(buf);
 486                 recv_time = RECV_TIME_NONE;
 487                 if (sscanf(buf, "%s\t%ld", uidl, &recv_time) != 2) {
 488                         if (sscanf(buf, "%s", uidl) != 1)
 489                                 continue;
 490                         else
 491                                 recv_time = now;
 492                 }
 493                 if (recv_time == RECV_TIME_NONE)
 494                         recv_time = RECV_TIME_RECEIVED;
 495                 g_hash_table_insert(table, g_strdup(uidl),
 496                                     GINT_TO_POINTER(recv_time));
 497         }
 498
 499         fclose(fp);
 500         return table;
 501 }
 502
 503 gint pop3_write_uidl_list(Pop3Session *session)
 504 {
 505         gchar *path;
 506         FILE *fp;
 507         Pop3MsgInfo *msg;
 508         gint n;
 509
 510         if (!session->uidl_is_valid) return 0;
 511
 512         path = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
 513                            "uidl", G_DIR_SEPARATOR_S,
 514                            session->ac_prefs->recv_server,
 515                            "-", session->ac_prefs->userid, NULL);
 516         if ((fp = fopen(path, "wb")) == NULL) {
 517                 FILE_OP_ERROR(path, "fopen");
 518                 g_free(path);
 519                 return -1;
 520         }
 521
 522         for (n = 1; n <= session->count; n++) {
 523                 msg = &session->msg[n];
 524                 if (msg->uidl && msg->received && !msg->deleted)
 525                         fprintf(fp, "%s\t%ld\n", msg->uidl, msg->recv_time);
 526         }
 527
 528         if (fclose(fp) == EOF) FILE_OP_ERROR(path, "fclose");
 529         g_free(path);
 530
 531         return 0;
 532 }
 533
 534 static gint pop3_write_msg_to_file(const gchar *file, const gchar *data,
 535                                    guint len)
 536 {
 537         FILE *fp;
 538         const gchar *prev, *cur;
 539
 540         g_return_val_if_fail(file != NULL, -1);
 541
 542         if ((fp = fopen(file, "wb")) == NULL) {
 543                 FILE_OP_ERROR(file, "fopen");
 544                 return -1;
 545         }
 546
 547         if (change_file_mode_rw(fp, file) < 0)
 548                 FILE_OP_ERROR(file, "chmod");
 549
 550         /* +------------------+----------------+--------------------------+ *
 551          * ^data              ^prev            ^cur             data+len-1^ */
 552
 553         prev = data;
 554         while ((cur = memchr(prev, '\r', len - (prev - data))) != NULL) {
 555                 if ((cur > prev && fwrite(prev, cur - prev, 1, fp) < 1) ||
 556                     fputc('\n', fp) == EOF) {
 557                         FILE_OP_ERROR(file, "fwrite");
 558                         g_warning("can't write to file: %s\n", file);
 559                         fclose(fp);
 560                         unlink(file);
 561                         return -1;
 562                 }
 563
 564                 if (cur == data + len - 1) {
 565                         prev = cur + 1;
 566                         break;
 567                 }
 568
 569                 if (*(cur + 1) == '\n')
 570                         prev = cur + 2;
 571                 else
 572                         prev = cur + 1;
 573
 574                 if (prev - data < len - 1 && *prev == '.' && *(prev + 1) == '.')
 575                         prev++;
 576
 577                 if (prev - data >= len)
 578                         break;
 579         }
 580
 581         if (prev - data < len &&
 582             fwrite(prev, len - (prev - data), 1, fp) < 1) {
 583                 FILE_OP_ERROR(file, "fwrite");
 584                 g_warning("can't write to file: %s\n", file);
 585                 fclose(fp);
 586                 unlink(file);
 587                 return -1;
 588         }
 589         if (data[len - 1] != '\r' && data[len - 1] != '\n') {
 590                 if (fputc('\n', fp) == EOF) {
 591                         FILE_OP_ERROR(file, "fputc");
 592                         g_warning("can't write to file: %s\n", file);
 593                         fclose(fp);
 594                         unlink(file);
 595                         return -1;
 596                 }
 597         }
 598
 599         if (fclose(fp) == EOF) {
 600                 FILE_OP_ERROR(file, "fclose");
 601                 unlink(file);
 602                 return -1;
 603         }
 604
 605         return 0;
 606 }
 607
 608 static Pop3State pop3_lookup_next(Pop3Session *session)
 609 {
 610         Pop3MsgInfo *msg;
 611         PrefsAccount *ac = session->ac_prefs;
 612         gint size;
 613         gboolean size_limit_over;
 614
 615         for (;;) {
 616                 msg = &session->msg[session->cur_msg];
 617                 size = msg->size;
 618                 size_limit_over =
 619                     (ac->enable_size_limit &&
 620                      ac->size_limit > 0 &&
 621                      size > ac->size_limit * 1024);
 622
 623                 if (ac->rmmail &&
 624                     msg->recv_time != RECV_TIME_NONE &&
 625                     msg->recv_time != RECV_TIME_KEEP &&
 626                     session->current_time - msg->recv_time >=
 627                     ac->msg_leave_time * 24 * 60 * 60) {
 628                         log_print(_("POP3: Deleting expired message %d\n"),
 629                                   session->cur_msg);
 630                         pop3_delete_send(session);
 631                         return POP3_DELETE;
 632                 }
 633
 634                 if (size_limit_over)
 635                         log_print
 636                                 (_("POP3: Skipping message %d (%d bytes)\n"),
 637                                   session->cur_msg, size);
 638
 639                 if (size == 0 || msg->received || size_limit_over) {
 640                         session->cur_total_bytes += size;
 641                         if (session->cur_msg == session->count) {
 642                                 pop3_logout_send(session);
 643                                 return POP3_LOGOUT;
 644                         } else
 645                                 session->cur_msg++;
 646                 } else
 647                         break;
 648         }
 649
 650         pop3_retr_send(session);
 651         return POP3_RETR;
 652 }
 653
 654 static Pop3ErrorValue pop3_ok(Pop3Session *session, const gchar *msg)
 655 {
 656         Pop3ErrorValue ok;
 657
 658         log_print("POP3< %s\n", msg);
 659
 660         if (!strncmp(msg, "+OK", 3))
 661                 ok = PS_SUCCESS;
 662         else if (!strncmp(msg, "-ERR", 4)) {
 663                 if (strstr(msg + 4, "lock") ||
 664                     strstr(msg + 4, "Lock") ||
 665                     strstr(msg + 4, "LOCK") ||
 666                     strstr(msg + 4, "wait")) {
 667                         log_warning(_("mailbox is locked\n"));
 668                         ok = PS_LOCKBUSY;
 669                 } else if (strcasestr(msg + 4, "timeout")) {
 670                         log_warning(_("session timeout\n"));
 671                         ok = PS_ERROR;
 672                 } else {
 673                         switch (session->state) {
 674 #if USE_OPENSSL
 675                         case POP3_STLS:
 676                                 log_warning(_("can't start TLS session\n"));
 677                                 ok = PS_ERROR;
 678                                 break;
 679 #endif
 680                         case POP3_GETAUTH_USER:
 681                         case POP3_GETAUTH_PASS:
 682                         case POP3_GETAUTH_APOP:
 683                                 log_warning(_("error occurred on authentication\n"));
 684                                 ok = PS_AUTHFAIL;
 685                                 break;
 686                         case POP3_GETRANGE_LAST:
 687                         case POP3_GETRANGE_UIDL:
 688                                 log_warning(_("command not supported\n"));
 689                                 ok = PS_NOTSUPPORTED;
 690                                 break;
 691                         default:
 692                                 log_warning(_("error occurred on POP3 session\n"));
 693                                 ok = PS_ERROR;
 694                         }
 695                 }
 696
 697                 g_free(session->error_msg);
 698                 session->error_msg = g_strdup(msg);
 699                 fprintf(stderr, "POP3: %s\n", msg);
 700         } else
 701                 ok = PS_PROTOCOL;
 702
 703         session->error_val = ok;
 704         return ok;
 705 }
 706
 707 static gint pop3_session_recv_msg(Session *session, const gchar *msg)
 708 {
 709         Pop3Session *pop3_session = POP3_SESSION(session);
 710         Pop3ErrorValue val = PS_SUCCESS;
 711         const gchar *body;
 712
 713         body = msg;
 714         if (pop3_session->state != POP3_GETRANGE_UIDL_RECV &&
 715             pop3_session->state != POP3_GETSIZE_LIST_RECV) {
 716                 val = pop3_ok(pop3_session, msg);
 717                 if (val != PS_SUCCESS) {
 718                         if (val != PS_NOTSUPPORTED) {
 719                                 pop3_session->state = POP3_ERROR;
 720                                 return -1;
 721                         }
 722                 }
 723
 724                 if (*body == '+' || *body == '-')
 725                         body++;
 726                 while (isalpha(*body))
 727                         body++;
 728                 while (isspace(*body))
 729                         body++;
 730         }
 731
 732         switch (pop3_session->state) {
 733         case POP3_READY:
 734         case POP3_GREETING:
 735                 pop3_greeting_recv(pop3_session, body);
 736 #if USE_OPENSSL
 737                 if (pop3_session->ac_prefs->ssl_pop == SSL_STARTTLS)
 738                         pop3_stls_send(pop3_session);
 739                 else
 740 #endif
 741                 if (pop3_session->ac_prefs->protocol == A_APOP)
 742                         pop3_getauth_apop_send(pop3_session);
 743                 else
 744                         pop3_getauth_user_send(pop3_session);
 745                 break;
 746 #if USE_OPENSSL
 747         case POP3_STLS:
 748                 if (pop3_stls_recv(pop3_session) != PS_SUCCESS)
 749                         return -1;
 750                 if (pop3_session->ac_prefs->protocol == A_APOP)
 751                         pop3_getauth_apop_send(pop3_session);
 752                 else
 753                         pop3_getauth_user_send(pop3_session);
 754                 break;
 755 #endif
 756         case POP3_GETAUTH_USER:
 757                 pop3_getauth_pass_send(pop3_session);
 758                 break;
 759         case POP3_GETAUTH_PASS:
 760         case POP3_GETAUTH_APOP:
 761                 pop3_getrange_stat_send(pop3_session);
 762                 break;
 763         case POP3_GETRANGE_STAT:
 764                 if (pop3_getrange_stat_recv(pop3_session, body) < 0)
 765                         return -1;
 766                 if (pop3_session->count > 0)
 767                         pop3_getrange_uidl_send(pop3_session);
 768                 else
 769                         pop3_logout_send(pop3_session);
 770                 break;
 771         case POP3_GETRANGE_LAST:
 772                 if (val == PS_NOTSUPPORTED)
 773                         pop3_session->error_val = PS_SUCCESS;
 774                 else if (pop3_getrange_last_recv(pop3_session, body) < 0)
 775                         return -1;
 776                 if (pop3_session->cur_msg > 0)
 777                         pop3_getsize_list_send(pop3_session);
 778                 else
 779                         pop3_logout_send(pop3_session);
 780                 break;
 781         case POP3_GETRANGE_UIDL:
 782                 if (val == PS_NOTSUPPORTED) {
 783                         pop3_session->error_val = PS_SUCCESS;
 784                         pop3_getrange_last_send(pop3_session);
 785                 } else {
 786                         pop3_session->state = POP3_GETRANGE_UIDL_RECV;
 787                         session_recv_data(session, 0, ".\r\n");
 788                 }
 789                 break;
 790         case POP3_GETSIZE_LIST:
 791                 pop3_session->state = POP3_GETSIZE_LIST_RECV;
 792                 session_recv_data(session, 0, ".\r\n");
 793                 break;
 794         case POP3_RETR:
 795                 pop3_session->state = POP3_RETR_RECV;
 796                 session_recv_data(session, 0, ".\r\n");
 797                 break;
 798         case POP3_DELETE:
 799                 pop3_delete_recv(pop3_session);
 800                 if (pop3_session->cur_msg == pop3_session->count)
 801                         pop3_logout_send(pop3_session);
 802                 else {
 803                         pop3_session->cur_msg++;
 804                         if (pop3_lookup_next(pop3_session) == POP3_ERROR)
 805                                 return -1;
 806                 }
 807                 break;
 808         case POP3_LOGOUT:
 809                 session_disconnect(session);
 810                 break;
 811         case POP3_ERROR:
 812         default:
 813                 return -1;
 814         }
 815
 816         return 0;
 817 }
 818
 819 static gint pop3_session_recv_data_finished(Session *session, guchar *data,
 820                                             guint len)
 821 {
 822         Pop3Session *pop3_session = POP3_SESSION(session);
 823         Pop3ErrorValue val = PS_SUCCESS;
 824
 825         switch (pop3_session->state) {
 826         case POP3_GETRANGE_UIDL_RECV:
 827                 val = pop3_getrange_uidl_recv(pop3_session, data, len);
 828                 if (val == PS_SUCCESS) {
 829                         if (pop3_session->new_msg_exist)
 830                                 pop3_getsize_list_send(pop3_session);
 831                         else
 832                                 pop3_logout_send(pop3_session);
 833                 } else
 834                         return -1;
 835                 break;
 836         case POP3_GETSIZE_LIST_RECV:
 837                 val = pop3_getsize_list_recv(pop3_session, data, len);
 838                 if (val == PS_SUCCESS) {
 839                         if (pop3_lookup_next(pop3_session) == POP3_ERROR)
 840                                 return -1;
 841                 } else
 842                         return -1;
 843                 break;
 844         case POP3_RETR_RECV:
 845                 if (pop3_retr_recv(pop3_session, data, len) < 0)
 846                         return -1;
 847
 848                 if (pop3_session->ac_prefs->rmmail &&
 849                     pop3_session->ac_prefs->msg_leave_time == 0 &&
 850                     pop3_session->msg[pop3_session->cur_msg].recv_time
 851                     != RECV_TIME_KEEP)
 852                         pop3_delete_send(pop3_session);
 853                 else if (pop3_session->cur_msg == pop3_session->count)
 854                         pop3_logout_send(pop3_session);
 855                 else {
 856                         pop3_session->cur_msg++;
 857                         if (pop3_lookup_next(pop3_session) == POP3_ERROR)
 858                                 return -1;
 859                 }
 860                 break;
 861         case POP3_ERROR:
 862         default:
 863                 return -1;
 864         }
 865
 866         return 0;
 867 }