revise 'translatable string' policy
[claws.git] / src / pop.c
index 905c15f806004fe33bda136999fb9c2ee2a4ba83..942cf9adfc3fb8032d49f14280bde43b569621b5 100644 (file)
--- a/src/pop.c
+++ b/src/pop.c
@@ -1,6 +1,6 @@
 /*
  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
- * Copyright (C) 1999,2000 Hiroyuki Yamamoto
+ * Copyright (C) 1999-2004 Hiroyuki Yamamoto
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
 #include <stdarg.h>
 #include <ctype.h>
 #include <unistd.h>
+#include <time.h>
+#include <errno.h>
 
 #include "intl.h"
 #include "pop.h"
-#include "socket.h"
 #include "md5.h"
 #include "prefs_account.h"
 #include "utils.h"
-#include "inc.h"
 #include "recv.h"
 
-static gint pop3_ok(SockInfo *sock, gchar *argbuf);
-static void pop3_gen_send(SockInfo *sock, const gchar *format, ...);
-static gint pop3_gen_recv(SockInfo *sock, gchar *buf, gint size);
-
-gint pop3_greeting_recv(SockInfo *sock, gpointer data)
+#include "log.h"
+#include "hooks.h"
+
+static gint pop3_greeting_recv         (Pop3Session *session,
+                                        const gchar *msg);
+static gint pop3_getauth_user_send     (Pop3Session *session);
+static gint pop3_getauth_pass_send     (Pop3Session *session);
+static gint pop3_getauth_apop_send     (Pop3Session *session);
+#if USE_OPENSSL
+static gint pop3_stls_send             (Pop3Session *session);
+static gint pop3_stls_recv             (Pop3Session *session);
+#endif
+static gint pop3_getrange_stat_send    (Pop3Session *session);
+static gint pop3_getrange_stat_recv    (Pop3Session *session,
+                                        const gchar *msg);
+static gint pop3_getrange_last_send    (Pop3Session *session);
+static gint pop3_getrange_last_recv    (Pop3Session *session,
+                                        const gchar *msg);
+static gint pop3_getrange_uidl_send    (Pop3Session *session);
+static gint pop3_getrange_uidl_recv    (Pop3Session *session,
+                                        const gchar *data,
+                                        guint        len);
+static gint pop3_getsize_list_send     (Pop3Session *session);
+static gint pop3_getsize_list_recv     (Pop3Session *session,
+                                        const gchar *data,
+                                        guint        len);
+static gint pop3_retr_send             (Pop3Session *session);
+static gint pop3_retr_recv             (Pop3Session *session,
+                                        const gchar *data,
+                                        guint        len);
+static gint pop3_delete_send           (Pop3Session *session);
+static gint pop3_delete_recv           (Pop3Session *session);
+static gint pop3_logout_send           (Pop3Session *session);
+
+static void pop3_gen_send              (Pop3Session    *session,
+                                        const gchar    *format, ...);
+
+static void pop3_session_destroy       (Session        *session);
+
+static gint pop3_write_msg_to_file     (const gchar    *file,
+                                        const gchar    *data,
+                                        guint           len);
+
+static Pop3State pop3_lookup_next      (Pop3Session    *session);
+static Pop3ErrorValue pop3_ok          (Pop3Session    *session,
+                                        const gchar    *msg);
+
+static gint pop3_session_recv_msg              (Session        *session,
+                                                const gchar    *msg);
+static gint pop3_session_recv_data_finished    (Session        *session,
+                                                guchar         *data,
+                                                guint           len);
+
+
+static gint pop3_greeting_recv(Pop3Session *session, const gchar *msg)
 {
-       Pop3State *state = (Pop3State *)data;
-       gchar buf[POPBUFSIZE];
+       session->state = POP3_GREETING;
 
-       if (pop3_ok(sock, buf) == PS_SUCCESS) {
-               if (state->ac_prefs->protocol == A_APOP) {
-                       state->greeting = g_strdup(buf);
-                       return POP3_GETAUTH_APOP_SEND;
-               } else
-                       return POP3_GETAUTH_USER_SEND;
-       } else
-               return -1;
+       session->greeting = g_strdup(msg);
+       return PS_SUCCESS;
 }
 
-gint pop3_getauth_user_send(SockInfo *sock, gpointer data)
+#if USE_OPENSSL
+static gint pop3_stls_send(Pop3Session *session)
 {
-       Pop3State *state = (Pop3State *)data;
-
-       g_return_val_if_fail(state->user != NULL, -1);
-
-       inc_progress_update(state, POP3_GETAUTH_USER_SEND);
-
-       pop3_gen_send(sock, "USER %s", state->user);
-
-       return POP3_GETAUTH_USER_RECV;
+       session->state = POP3_STLS;
+       pop3_gen_send(session, "STLS");
+       return PS_SUCCESS;
 }
 
-gint pop3_getauth_user_recv(SockInfo *sock, gpointer data)
+static gint pop3_stls_recv(Pop3Session *session)
 {
-       if (pop3_ok(sock, NULL) == PS_SUCCESS)
-               return POP3_GETAUTH_PASS_SEND;
-       else
+       if (session_start_tls(SESSION(session)) < 0) {
+               session->error_val = PS_SOCKET;
                return -1;
+       }
+       return PS_SUCCESS;
 }
+#endif /* USE_OPENSSL */
 
-gint pop3_getauth_pass_send(SockInfo *sock, gpointer data)
+static gint pop3_getauth_user_send(Pop3Session *session)
 {
-       Pop3State *state = (Pop3State *)data;
+       g_return_val_if_fail(session->user != NULL, -1);
 
-       g_return_val_if_fail(state->pass != NULL, -1);
-
-       pop3_gen_send(sock, "PASS %s", state->pass);
-
-       return POP3_GETAUTH_PASS_RECV;
+       session->state = POP3_GETAUTH_USER;
+       pop3_gen_send(session, "USER %s", session->user);
+       return PS_SUCCESS;
 }
 
-gint pop3_getauth_pass_recv(SockInfo *sock, gpointer data)
+static gint pop3_getauth_pass_send(Pop3Session *session)
 {
-       Pop3State *state = (Pop3State *)data;
+       g_return_val_if_fail(session->pass != NULL, -1);
 
-       if (pop3_ok(sock, NULL) == PS_SUCCESS)
-               return POP3_GETRANGE_STAT_SEND;
-       else {
-               log_warning(_("error occurred on authorization\n"));
-               state->error_val = PS_AUTHFAIL;
-               return -1;
-       }
+       session->state = POP3_GETAUTH_PASS;
+       pop3_gen_send(session, "PASS %s", session->pass);
+       return PS_SUCCESS;
 }
 
-gint pop3_getauth_apop_send(SockInfo *sock, gpointer data)
+static gint pop3_getauth_apop_send(Pop3Session *session)
 {
-       Pop3State *state = (Pop3State *)data;
        gchar *start, *end;
        gchar *apop_str;
        gchar md5sum[33];
 
-       g_return_val_if_fail(state->user != NULL, -1);
-       g_return_val_if_fail(state->pass != NULL, -1);
+       g_return_val_if_fail(session->user != NULL, -1);
+       g_return_val_if_fail(session->pass != NULL, -1);
 
-       inc_progress_update(state, POP3_GETAUTH_APOP_SEND);
+       session->state = POP3_GETAUTH_APOP;
 
-       if ((start = strchr(state->greeting, '<')) == NULL) {
+       if ((start = strchr(session->greeting, '<')) == NULL) {
                log_warning(_("Required APOP timestamp not found "
-                             "in greeting\n"));
+                           "in greeting\n"));
+               session->error_val = PS_PROTOCOL;
                return -1;
        }
 
        if ((end = strchr(start, '>')) == NULL || end == start + 1) {
                log_warning(_("Timestamp syntax error in greeting\n"));
+               session->error_val = PS_PROTOCOL;
                return -1;
        }
 
        *(end + 1) = '\0';
 
-       apop_str = g_strconcat(start, state->pass, NULL);
+       apop_str = g_strconcat(start, session->pass, NULL);
        md5_hex_digest(md5sum, apop_str);
        g_free(apop_str);
 
-       pop3_gen_send(sock, "APOP %s %s", state->user, md5sum);
+       pop3_gen_send(session, "APOP %s %s", session->user, md5sum);
 
-       return POP3_GETAUTH_APOP_RECV;
+       return PS_SUCCESS;
 }
 
-gint pop3_getauth_apop_recv(SockInfo *sock, gpointer data)
+static gint pop3_getrange_stat_send(Pop3Session *session)
 {
-       Pop3State *state = (Pop3State *)data;
+       session->state = POP3_GETRANGE_STAT;
+       pop3_gen_send(session, "STAT");
+       return PS_SUCCESS;
+}
 
-       if (pop3_ok(sock, NULL) == PS_SUCCESS)
-               return POP3_GETRANGE_STAT_SEND;
-       else {
-               log_warning(_("error occurred on authorization\n"));
-               state->error_val = PS_AUTHFAIL;
+static gint pop3_getrange_stat_recv(Pop3Session *session, const gchar *msg)
+{
+       if (sscanf(msg, "%d %d", &session->count, &session->total_bytes) != 2) {
+               log_warning(_("POP3 protocol error\n"));
+               session->error_val = PS_PROTOCOL;
                return -1;
+       } else {
+               if (session->count == 0) {
+                       session->uidl_is_valid = TRUE;
+               } else {
+                       session->msg = g_new0(Pop3MsgInfo, session->count + 1);
+                       session->cur_msg = 1;
+               }
        }
+
+       return PS_SUCCESS;
 }
 
-gint pop3_getrange_stat_send(SockInfo *sock, gpointer data)
+static gint pop3_getrange_last_send(Pop3Session *session)
 {
-       Pop3State *state = (Pop3State *)data;
-
-       inc_progress_update(state, POP3_GETRANGE_STAT_SEND);
-
-       pop3_gen_send(sock, "STAT");
-
-       return POP3_GETRANGE_STAT_RECV;
+       session->state = POP3_GETRANGE_LAST;
+       pop3_gen_send(session, "LAST");
+       return PS_SUCCESS;
 }
 
-gint pop3_getrange_stat_recv(SockInfo *sock, gpointer data)
+static gint pop3_getrange_last_recv(Pop3Session *session, const gchar *msg)
 {
-       Pop3State *state = (Pop3State *)data;
-       gchar buf[POPBUFSIZE + 1];
-       gint ok;
+       gint last;
 
-       if ((ok = pop3_ok(sock, buf)) == PS_SUCCESS) {
-               if (sscanf(buf, "%d %d", &state->count, &state->total_bytes)
-                   != 2) {
-                       log_warning(_("POP3 protocol error\n"));
-                       return -1;
-               } else {
-                       if (state->count == 0)
-                               return POP3_LOGOUT_SEND;
-                       else {
-                               state->cur_msg = 1;
-                               state->new = state->count;
-                               if (state->ac_prefs->rmmail ||
-                                   state->ac_prefs->getall)
-                                       return POP3_GETSIZE_LIST_SEND;
-                               else
-                                       return POP3_GETRANGE_UIDL_SEND;
-                       }
-               }
-       } else if (ok == PS_PROTOCOL)
-               return POP3_LOGOUT_SEND;
-       else
+       if (sscanf(msg, "%d", &last) == 0) {
+               log_warning(_("POP3 protocol error\n"));
+               session->error_val = PS_PROTOCOL;
                return -1;
+       } else {
+               if (session->count > last) {
+                       session->new_msg_exist = TRUE;
+                       session->cur_msg = last + 1;
+               } else
+                       session->cur_msg = 0;
+       }
+
+       return PS_SUCCESS;
 }
 
-gint pop3_getrange_last_send(SockInfo *sock, gpointer data)
+static gint pop3_getrange_uidl_send(Pop3Session *session)
 {
-       pop3_gen_send(sock, "LAST");
-
-       return POP3_GETRANGE_LAST_RECV;
+       session->state = POP3_GETRANGE_UIDL;
+       pop3_gen_send(session, "UIDL");
+       return PS_SUCCESS;
 }
 
-gint pop3_getrange_last_recv(SockInfo *sock, gpointer data)
+static gint pop3_getrange_uidl_recv(Pop3Session *session, const gchar *data,
+                                   guint len)
 {
-       Pop3State *state = (Pop3State *)data;
-       gchar buf[POPBUFSIZE + 1];
+       gchar id[IDLEN + 1];
+       gchar buf[POPBUFSIZE];
+       gint buf_len;
+       gint num;
+       time_t recv_time;
+       const gchar *p = data;
+       const gchar *lastp = data + len;
+       const gchar *newline;
+
+       while (p < lastp) {
+               if ((newline = memchr(p, '\r', lastp - p)) == NULL)
+                       return -1;
+               buf_len = MIN(newline - p, sizeof(buf) - 1);
+               memcpy(buf, p, buf_len);
+               buf[buf_len] = '\0';
 
-       if (pop3_ok(sock, buf) == PS_SUCCESS) {
-               gint last;
+               p = newline + 1;
+               if (p < lastp && *p == '\n') p++;
 
-               if (sscanf(buf, "%d", &last) == 0) {
-                       log_warning(_("POP3 protocol error\n"));
+               if (sscanf(buf, "%d %" Xstr(IDLEN) "s", &num, id) != 2)
                        return -1;
-               } else {
-                       if (state->count == last)
-                               return POP3_LOGOUT_SEND;
-                       else {
-                               state->new = state->count - last;
-                               state->cur_msg = last + 1;
-                               return POP3_GETSIZE_LIST_SEND;
-                       }
+               if (num <= 0 || num > session->count)
+                       return -1;
+
+               session->msg[num].uidl = g_strdup(id);
+
+               recv_time = (time_t)g_hash_table_lookup(session->uidl_table, id);
+               session->msg[num].recv_time = recv_time;
+
+               if (!session->ac_prefs->getall && recv_time != RECV_TIME_NONE)
+                       session->msg[num].received = TRUE;
+
+               if (!session->new_msg_exist &&
+                   (session->ac_prefs->getall || recv_time == RECV_TIME_NONE ||
+                    session->ac_prefs->rmmail)) {
+                       session->cur_msg = num;
+                       session->new_msg_exist = TRUE;
                }
-       } else
-               return POP3_GETSIZE_LIST_SEND;
+       }
+
+       session->uidl_is_valid = TRUE;
+       return PS_SUCCESS;
 }
 
-gint pop3_getrange_uidl_send(SockInfo *sock, gpointer data)
+static gint pop3_getsize_list_send(Pop3Session *session)
 {
-       pop3_gen_send(sock, "UIDL");
-
-       return POP3_GETRANGE_UIDL_RECV;
+       session->state = POP3_GETSIZE_LIST;
+       pop3_gen_send(session, "LIST");
+       return PS_SUCCESS;
 }
 
-gint pop3_getrange_uidl_recv(SockInfo *sock, gpointer data)
+static gint pop3_getsize_list_recv(Pop3Session *session, const gchar *data,
+                                  guint len)
 {
-       Pop3State *state = (Pop3State *)data;
-       gboolean nb;
-       gboolean new = FALSE;
        gchar buf[POPBUFSIZE];
-       gchar id[IDLEN + 1];
+       gint buf_len;
+       guint num, size;
+       const gchar *p = data;
+       const gchar *lastp = data + len;
+       const gchar *newline;
+
+       while (p < lastp) {
+               if ((newline = memchr(p, '\r', lastp - p)) == NULL)
+                       return -1;
+               buf_len = MIN(newline - p, sizeof(buf) - 1);
+               memcpy(buf, p, buf_len);
+               buf[buf_len] = '\0';
 
-       if (pop3_ok(sock, NULL) != PS_SUCCESS) return POP3_GETRANGE_LAST_SEND;
+               p = newline + 1;
+               if (p < lastp && *p == '\n') p++;
 
-       if (!state->id_table) new = TRUE;
+               if (sscanf(buf, "%u %u", &num, &size) != 2) {
+                       session->error_val = PS_PROTOCOL;
+                       return -1;
+               }
 
-       nb = sock_is_nonblocking_mode(sock);
-       if (nb && (sock_set_nonblocking_mode(sock, FALSE) < 0)) return -1;
+               if (num > 0 && num <= session->count)
+                       session->msg[num].size = size;
+               if (num > 0 && num < session->cur_msg)
+                       session->cur_total_bytes += size;
+       }
 
-       while (sock_read(sock, buf, sizeof(buf)) >= 0) {
-               gint num;
+       return PS_SUCCESS;
+}
 
-               if (buf[0] == '.') break;
-               if (sscanf(buf, "%d %" Xstr(IDLEN) "s", &num, id) != 2)
-                       continue;
+static gint pop3_retr_send(Pop3Session *session)
+{
+       session->state = POP3_RETR;
+       pop3_gen_send(session, "RETR %d", session->cur_msg);
+       return PS_SUCCESS;
+}
 
-               if (new == FALSE &&
-                   g_hash_table_lookup(state->id_table, id) == NULL) {
-                       state->new = state->count - num + 1;
-                       state->cur_msg = num;
-                       new = TRUE;
-               }
+static gint pop3_retr_recv(Pop3Session *session, const gchar *data, guint len)
+{
+       gchar *file;
+       gint drop_ok;
+       MailReceiveData mail_receive_data;
+
+       mail_receive_data.session = session;
+       mail_receive_data.data = g_strndup(data, len);
+       hooks_invoke(MAIL_RECEIVE_HOOKLIST, &mail_receive_data);
+
+       file = get_tmp_file();
+       if (pop3_write_msg_to_file(file, mail_receive_data.data,
+               strlen(mail_receive_data.data)) < 0) {
+               g_free(file);
+               g_free(mail_receive_data.data);
+               session->error_val = PS_IOERR;
+               return -1;
+       }
+       g_free(mail_receive_data.data);
 
-               if (new == TRUE)
-                       state->new_id_list = g_slist_append
-                               (state->new_id_list, g_strdup(id));
-               else
-                       state->id_list = g_slist_append
-                               (state->id_list, g_strdup(id));
+       /* drop_ok: 0: success 1: don't receive -1: error */
+       drop_ok = session->drop_message(session, file);
+       g_free(file);
+       if (drop_ok < 0) {
+               session->error_val = PS_IOERR;
+               return -1;
        }
 
-       if (nb && (sock_set_nonblocking_mode(sock, TRUE) < 0)) return -1;
+       session->cur_total_bytes += session->msg[session->cur_msg].size;
+       session->cur_total_recv_bytes += session->msg[session->cur_msg].size;
+       session->cur_total_num++;
 
-       if (new == TRUE)
-               return POP3_GETSIZE_LIST_SEND;
-       else
-               return POP3_LOGOUT_SEND;
+       session->msg[session->cur_msg].received = TRUE;
+       session->msg[session->cur_msg].recv_time =
+               drop_ok == 1 ? RECV_TIME_KEEP : session->current_time;
+
+       return PS_SUCCESS;
 }
 
-gint pop3_getsize_list_send(SockInfo *sock, gpointer data)
+static gint pop3_delete_send(Pop3Session *session)
 {
-       pop3_gen_send(sock, "LIST");
+       session->state = POP3_DELETE;
+       pop3_gen_send(session, "DELE %d", session->cur_msg);
+       return PS_SUCCESS;
+}
 
-       return POP3_GETSIZE_LIST_RECV;
+static gint pop3_delete_recv(Pop3Session *session)
+{
+       session->msg[session->cur_msg].deleted = TRUE;
+       return PS_SUCCESS;
 }
 
-gint pop3_getsize_list_recv(SockInfo *sock, gpointer data)
+static gint pop3_logout_send(Pop3Session *session)
 {
-       Pop3State *state = (Pop3State *)data;
-       gboolean nb;
-       gchar buf[POPBUFSIZE];
+       session->state = POP3_LOGOUT;
+       pop3_gen_send(session, "QUIT");
+       return PS_SUCCESS;
+}
 
-       if (pop3_ok(sock, NULL) != PS_SUCCESS) return POP3_LOGOUT_SEND;
+static void pop3_gen_send(Pop3Session *session, const gchar *format, ...)
+{
+       gchar buf[POPBUFSIZE + 1];
+       va_list args;
 
-       state->sizes = g_new0(gint, state->count + 1);
-       state->cur_total_bytes = 0;
+       va_start(args, format);
+       g_vsnprintf(buf, sizeof(buf) - 2, format, args);
+       va_end(args);
 
-       nb = sock_is_nonblocking_mode(sock);
-       if (nb && (sock_set_nonblocking_mode(sock, FALSE) < 0)) return -1;
+       if (!strncasecmp(buf, "PASS ", 5))
+               log_print("POP3> PASS ********\n");
+       else
+               log_print("POP3> %s\n", buf);
 
-       while (sock_read(sock, buf, sizeof(buf)) >= 0) {
-               gint num, size;
+       session_send_msg(SESSION(session), SESSION_MSG_NORMAL, buf);
+}
 
-               if (buf[0] == '.') break;
-               if (sscanf(buf, "%d %d", &num, &size) != 2)
-                       continue;
+Session *pop3_session_new(PrefsAccount *account)
+{
+       Pop3Session *session;
 
-               if (num <= state->count)
-                       state->sizes[num] = size;
-               if (num < state->cur_msg)
-                       state->cur_total_bytes += size;
-       }
+       g_return_val_if_fail(account != NULL, NULL);
 
-       if (nb && (sock_set_nonblocking_mode(sock, TRUE) < 0)) return -1;
+       session = g_new0(Pop3Session, 1);
 
-       return POP3_RETR_SEND;
-}
+       session_init(SESSION(session));
 
-gint pop3_retr_send(SockInfo *sock, gpointer data)
-{
-       Pop3State *state = (Pop3State *)data;
+       SESSION(session)->type = SESSION_POP3;
+
+       SESSION(session)->recv_msg = pop3_session_recv_msg;
+       SESSION(session)->recv_data_finished = pop3_session_recv_data_finished;
+       SESSION(session)->send_data_finished = NULL;
 
-       inc_progress_update(state, POP3_RETR_SEND);
+       SESSION(session)->destroy = pop3_session_destroy;
 
-       pop3_gen_send(sock, "RETR %d", state->cur_msg);
+       session->state = POP3_READY;
+       session->ac_prefs = account;
+       session->uidl_table = pop3_get_uidl_table(account);
+       session->current_time = time(NULL);
+       session->error_val = PS_SUCCESS;
+       session->error_msg = NULL;
 
-       return POP3_RETR_RECV;
+       return SESSION(session);
 }
 
-gint pop3_retr_recv(SockInfo *sock, gpointer data)
+static void pop3_session_destroy(Session *session)
 {
-       Pop3State *state = (Pop3State *)data;
-       const gchar *file;
-       gint ok, drop_ok;
+       Pop3Session *pop3_session = POP3_SESSION(session);
+       gint n;
 
-       if ((ok = pop3_ok(sock, NULL)) == PS_SUCCESS) {
-               state->cur_msg_bytes = 0;
+       g_return_if_fail(session != NULL);
 
-               if (recv_write_to_file(sock, (file = get_tmp_file())) < 0) {
-                       state->inc_state = INC_NOSPACE;
-                       return -1;
-               }
+       for (n = 1; n <= pop3_session->count; n++)
+               g_free(pop3_session->msg[n].uidl);
+       g_free(pop3_session->msg);
 
-               state->cur_total_bytes += state->sizes[state->cur_msg];
+       if (pop3_session->uidl_table) {
+               hash_free_strings(pop3_session->uidl_table);
+               g_hash_table_destroy(pop3_session->uidl_table);
+       }
 
-               if ((drop_ok = inc_drop_message(file, state)) < 0) {
-                       state->inc_state = INC_ERROR;
-                       return -1;
+       g_free(pop3_session->greeting);
+       g_free(pop3_session->user);
+       g_free(pop3_session->pass);
+       g_free(pop3_session->error_msg);
+}
+
+GHashTable *pop3_get_uidl_table(PrefsAccount *ac_prefs)
+{
+       GHashTable *table;
+       gchar *path;
+       FILE *fp;
+       gchar buf[POPBUFSIZE];
+       gchar uidl[POPBUFSIZE];
+       time_t recv_time;
+       time_t now;
+
+       table = g_hash_table_new(g_str_hash, g_str_equal);
+
+       path = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
+                          "uidl", G_DIR_SEPARATOR_S, ac_prefs->recv_server,
+                          "-", ac_prefs->userid, NULL);
+       if ((fp = fopen(path, "rb")) == NULL) {
+               if (ENOENT != errno) FILE_OP_ERROR(path, "fopen");
+               g_free(path);
+               path = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
+                                  "uidl-", ac_prefs->recv_server,
+                                  "-", ac_prefs->userid, NULL);
+               if ((fp = fopen(path, "rb")) == NULL) {
+                       if (ENOENT != errno) FILE_OP_ERROR(path, "fopen");
+                       g_free(path);
+                       return table;
                }
-               if (drop_ok == 0 && state->ac_prefs->rmmail)
-                       return POP3_DELETE_SEND;
-
-               if (state->new_id_list) {
-                       state->id_list = g_slist_append
-                               (state->id_list, state->new_id_list->data);
-                       state->new_id_list =
-                               g_slist_remove(state->new_id_list,
-                                              state->new_id_list->data);
+       }
+       g_free(path);
+
+       now = time(NULL);
+
+       while (fgets(buf, sizeof(buf), fp) != NULL) {
+               strretchomp(buf);
+               recv_time = RECV_TIME_NONE;
+               if (sscanf(buf, "%s\t%ld", uidl, &recv_time) != 2) {
+                       if (sscanf(buf, "%s", uidl) != 1)
+                               continue;
+                       else
+                               recv_time = now;
                }
+               if (recv_time == RECV_TIME_NONE)
+                       recv_time = RECV_TIME_RECEIVED;
+               g_hash_table_insert(table, g_strdup(uidl),
+                                   GINT_TO_POINTER(recv_time));
+       }
 
-               if (state->cur_msg < state->count) {
-                       state->cur_msg++;
-                       return POP3_RETR_SEND;
-               } else
-                       return POP3_LOGOUT_SEND;
-       } else if (ok == PS_PROTOCOL)
-               return POP3_LOGOUT_SEND;
-       else
-               return -1;
+       fclose(fp);
+       return table;
 }
 
-gint pop3_delete_send(SockInfo *sock, gpointer data)
+gint pop3_write_uidl_list(Pop3Session *session)
 {
-       Pop3State *state = (Pop3State *)data;
+       gchar *path;
+       FILE *fp;
+       Pop3MsgInfo *msg;
+       gint n;
+
+       if (!session->uidl_is_valid) return 0;
+
+       path = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
+                          "uidl", G_DIR_SEPARATOR_S,
+                          session->ac_prefs->recv_server,
+                          "-", session->ac_prefs->userid, NULL);
+       if ((fp = fopen(path, "wb")) == NULL) {
+               FILE_OP_ERROR(path, "fopen");
+               g_free(path);
+               return -1;
+       }
 
-       //inc_progress_update(state, POP3_DELETE_SEND);
+       for (n = 1; n <= session->count; n++) {
+               msg = &session->msg[n];
+               if (msg->uidl && msg->received && !msg->deleted)
+                       fprintf(fp, "%s\t%ld\n", msg->uidl, msg->recv_time);
+       }
 
-       pop3_gen_send(sock, "DELE %d", state->cur_msg);
+       if (fclose(fp) == EOF) FILE_OP_ERROR(path, "fclose");
+       g_free(path);
 
-       return POP3_DELETE_RECV;
+       return 0;
 }
 
-gint pop3_delete_recv(SockInfo *sock, gpointer data)
+static gint pop3_write_msg_to_file(const gchar *file, const gchar *data,
+                                  guint len)
 {
-       Pop3State *state = (Pop3State *)data;
-       gint ok;
+       FILE *fp;
+       const gchar *prev, *cur;
 
-       if ((ok = pop3_ok(sock, NULL)) == PS_SUCCESS) {
-               if (state->cur_msg < state->count) {
-                       state->cur_msg++;
-                       return POP3_RETR_SEND;
-               } else
-                       return POP3_LOGOUT_SEND;
-       } else if (ok == PS_PROTOCOL)
-               return POP3_LOGOUT_SEND;
-       else
+       g_return_val_if_fail(file != NULL, -1);
+
+       if ((fp = fopen(file, "wb")) == NULL) {
+               FILE_OP_ERROR(file, "fopen");
                return -1;
-}
+       }
 
-gint pop3_logout_send(SockInfo *sock, gpointer data)
-{
-       Pop3State *state = (Pop3State *)data;
+       if (change_file_mode_rw(fp, file) < 0)
+               FILE_OP_ERROR(file, "chmod");
 
-       inc_progress_update(state, POP3_LOGOUT_SEND);
+       /* +------------------+----------------+--------------------------+ *
+        * ^data              ^prev            ^cur             data+len-1^ */
 
-       pop3_gen_send(sock, "QUIT");
+       prev = data;
+       while ((cur = memchr(prev, '\r', len - (prev - data))) != NULL) {
+               if ((cur > prev && fwrite(prev, cur - prev, 1, fp) < 1) ||
+                   fputc('\n', fp) == EOF) {
+                       FILE_OP_ERROR(file, "fwrite");
+                       g_warning("can't write to file: %s\n", file);
+                       fclose(fp);
+                       unlink(file);
+                       return -1;
+               }
 
-       return POP3_LOGOUT_RECV;
-}
+               if (cur == data + len - 1) {
+                       prev = cur + 1;
+                       break;
+               }
 
-gint pop3_logout_recv(SockInfo *sock, gpointer data)
-{
-       if (pop3_ok(sock, NULL) == PS_SUCCESS)
+               if (*(cur + 1) == '\n')
+                       prev = cur + 2;
+               else
+                       prev = cur + 1;
+
+               if (prev - data < len - 1 && *prev == '.' && *(prev + 1) == '.')
+                       prev++;
+
+               if (prev - data >= len)
+                       break;
+       }
+
+       if (prev - data < len &&
+           fwrite(prev, len - (prev - data), 1, fp) < 1) {
+               FILE_OP_ERROR(file, "fwrite");
+               g_warning("can't write to file: %s\n", file);
+               fclose(fp);
+               unlink(file);
                return -1;
-       else
+       }
+       if (data[len - 1] != '\r' && data[len - 1] != '\n') {
+               if (fputc('\n', fp) == EOF) {
+                       FILE_OP_ERROR(file, "fputc");
+                       g_warning("can't write to file: %s\n", file);
+                       fclose(fp);
+                       unlink(file);
+                       return -1;
+               }
+       }
+
+       if (fclose(fp) == EOF) {
+               FILE_OP_ERROR(file, "fclose");
+               unlink(file);
                return -1;
+       }
+
+       return 0;
 }
 
-static gint pop3_ok(SockInfo *sock, gchar *argbuf)
+static Pop3State pop3_lookup_next(Pop3Session *session)
 {
-       gint ok;
-       gchar buf[POPBUFSIZE + 1];
-       gchar *bufp;
-
-       if ((ok = pop3_gen_recv(sock, buf, sizeof(buf))) == PS_SUCCESS) {
-               bufp = buf;
-               if (*bufp == '+' || *bufp == '-')
-                       bufp++;
-               else
-                       return PS_PROTOCOL;
-
-               while (isalpha(*bufp))
-                       bufp++;
-
-               if (*bufp)
-                       *(bufp++) = '\0';
-
-               if (!strcmp(buf, "+OK"))
-                       ok = PS_SUCCESS;
-               else if (!strncmp(buf, "-ERR", 4)) {
-                       if (strstr(bufp, "lock") ||
-                                strstr(bufp, "Lock") ||
-                                strstr(bufp, "LOCK") ||
-                                strstr(bufp, "wait"))
-                               ok = PS_LOCKBUSY;
-                       else
-                               ok = PS_PROTOCOL;
+       Pop3MsgInfo *msg;
+       PrefsAccount *ac = session->ac_prefs;
+       gint size;
+       gboolean size_limit_over;
+
+       for (;;) {
+               msg = &session->msg[session->cur_msg];
+               size = msg->size;
+               size_limit_over =
+                   (ac->enable_size_limit &&
+                    ac->size_limit > 0 &&
+                    size > ac->size_limit * 1024);
+
+               if (ac->rmmail &&
+                   msg->recv_time != RECV_TIME_NONE &&
+                   msg->recv_time != RECV_TIME_KEEP &&
+                   session->current_time - msg->recv_time >=
+                   ac->msg_leave_time * 24 * 60 * 60) {
+                       log_message
+                               (_("POP3: Deleting expired message %d\n"),
+                                  session->cur_msg);
+                       pop3_delete_send(session);
+                       return POP3_DELETE;
+               }
 
-                       if (*bufp)
-                               fprintf(stderr, "POP3: %s\n", bufp);
+               if (size_limit_over)
+                       log_message
+                               (_("POP3: Skipping message %d (%d bytes)\n"),
+                                  session->cur_msg, size);
+
+               if (size == 0 || msg->received || size_limit_over) {
+                       session->cur_total_bytes += size;
+                       if (session->cur_msg == session->count) {
+                               pop3_logout_send(session);
+                               return POP3_LOGOUT;
+                       } else
+                               session->cur_msg++;
                } else
-                       ok = PS_PROTOCOL;
-
-               if (argbuf)
-                       strcpy(argbuf, bufp);
+                       break;
        }
 
-       return ok;
+       pop3_retr_send(session);
+       return POP3_RETR;
 }
 
-static void pop3_gen_send(SockInfo *sock, const gchar *format, ...)
+static Pop3ErrorValue pop3_ok(Pop3Session *session, const gchar *msg)
 {
-       gchar buf[POPBUFSIZE + 1];
-       va_list args;
-
-       va_start(args, format);
-       g_vsnprintf(buf, sizeof(buf) - 2, format, args);
-       va_end(args);
+       Pop3ErrorValue ok;
+
+       log_print("POP3< %s\n", msg);
+
+       if (!strncmp(msg, "+OK", 3))
+               ok = PS_SUCCESS;
+       else if (!strncmp(msg, "-ERR", 4)) {
+               if (strstr(msg + 4, "lock") ||
+                   strstr(msg + 4, "Lock") ||
+                   strstr(msg + 4, "LOCK") ||
+                   strstr(msg + 4, "wait")) {
+                       log_warning(_("mailbox is locked\n"));
+                       ok = PS_LOCKBUSY;
+               } else if (strcasestr(msg + 4, "timeout")) {
+                       log_warning(_("session timeout\n"));
+                       ok = PS_ERROR;
+               } else {
+                       switch (session->state) {
+#if USE_OPENSSL
+                       case POP3_STLS:
+                               log_warning(_("can't start TLS session\n"));
+                               ok = PS_ERROR;
+                               break;
+#endif
+                       case POP3_GETAUTH_USER:
+                       case POP3_GETAUTH_PASS:
+                       case POP3_GETAUTH_APOP:
+                               log_warning(_("error occurred on authentication\n"));
+                               ok = PS_AUTHFAIL;
+                               break;
+                       case POP3_GETRANGE_LAST:
+                       case POP3_GETRANGE_UIDL:
+                               log_warning(_("command not supported\n"));
+                               ok = PS_NOTSUPPORTED;
+                               break;
+                       default:
+                               log_warning(_("error occurred on POP3 session\n"));
+                               ok = PS_ERROR;
+                       }
+               }
 
-       if (!strncasecmp(buf, "PASS ", 5))
-               log_print("POP3> PASS ********\n");
-       else
-               log_print("POP3> %s\n", buf);
+               g_free(session->error_msg);
+               session->error_msg = g_strdup(msg);
+               fprintf(stderr, "POP3: %s\n", msg);
+       } else
+               ok = PS_PROTOCOL;
 
-       strcat(buf, "\r\n");
-       sock_write(sock, buf, strlen(buf));
+       session->error_val = ok;
+       return ok;
 }
 
-static gint pop3_gen_recv(SockInfo *sock, gchar *buf, gint size)
+static gint pop3_session_recv_msg(Session *session, const gchar *msg)
 {
-       gboolean nb;
+       Pop3Session *pop3_session = POP3_SESSION(session);
+       Pop3ErrorValue val = PS_SUCCESS;
+       const guchar *body;
+
+       body = msg;
+       if (pop3_session->state != POP3_GETRANGE_UIDL_RECV &&
+           pop3_session->state != POP3_GETSIZE_LIST_RECV) {
+               val = pop3_ok(pop3_session, msg);
+               if (val != PS_SUCCESS) {
+                       if (val != PS_NOTSUPPORTED) {
+                               pop3_session->state = POP3_ERROR;
+                               return -1;
+                       }
+               }
 
-       nb = sock_is_nonblocking_mode(sock);
+               if (*body == '+' || *body == '-')
+                       body++;
+               while (isalpha(*body))
+                       body++;
+               while (isspace(*body))
+                       body++;
+       }
 
-       if (nb && (sock_set_nonblocking_mode(sock, FALSE) < 0))
-               return PS_SOCKET;
-       if (sock_read(sock, buf, size) < 0) {
-               return PS_SOCKET;
-       } else {
-               strretchomp(buf);
-               log_print("POP3< %s\n", buf);
-               if (nb && (sock_set_nonblocking_mode(sock, TRUE) < 0))
-                       return PS_SOCKET;
+       switch (pop3_session->state) {
+       case POP3_READY:
+       case POP3_GREETING:
+               pop3_greeting_recv(pop3_session, body);
+#if USE_OPENSSL
+               if (pop3_session->ac_prefs->ssl_pop == SSL_STARTTLS)
+                       pop3_stls_send(pop3_session);
+               else
+#endif
+               if (pop3_session->ac_prefs->protocol == A_APOP)
+                       pop3_getauth_apop_send(pop3_session);
+               else
+                       pop3_getauth_user_send(pop3_session);
+               break;
+#if USE_OPENSSL
+       case POP3_STLS:
+               if (pop3_stls_recv(pop3_session) != PS_SUCCESS)
+                       return -1;
+               if (pop3_session->ac_prefs->protocol == A_APOP)
+                       pop3_getauth_apop_send(pop3_session);
+               else
+                       pop3_getauth_user_send(pop3_session);
+               break;
+#endif
+       case POP3_GETAUTH_USER:
+               pop3_getauth_pass_send(pop3_session);
+               break;
+       case POP3_GETAUTH_PASS:
+       case POP3_GETAUTH_APOP:
+               pop3_getrange_stat_send(pop3_session);
+               break;
+       case POP3_GETRANGE_STAT:
+               if (pop3_getrange_stat_recv(pop3_session, body) < 0)
+                       return -1;
+               if (pop3_session->count > 0)
+                       pop3_getrange_uidl_send(pop3_session);
+               else
+                       pop3_logout_send(pop3_session);
+               break;
+       case POP3_GETRANGE_LAST:
+               if (val == PS_NOTSUPPORTED)
+                       pop3_session->error_val = PS_SUCCESS;
+               else if (pop3_getrange_last_recv(pop3_session, body) < 0)
+                       return -1;
+               if (pop3_session->cur_msg > 0)
+                       pop3_getsize_list_send(pop3_session);
+               else
+                       pop3_logout_send(pop3_session);
+               break;
+       case POP3_GETRANGE_UIDL:
+               if (val == PS_NOTSUPPORTED) {
+                       pop3_session->error_val = PS_SUCCESS;
+                       pop3_getrange_last_send(pop3_session);
+               } else {
+                       pop3_session->state = POP3_GETRANGE_UIDL_RECV;
+                       session_recv_data(session, 0, ".\r\n");
+               }
+               break;
+       case POP3_GETSIZE_LIST:
+               pop3_session->state = POP3_GETSIZE_LIST_RECV;
+               session_recv_data(session, 0, ".\r\n");
+               break;
+       case POP3_RETR:
+               pop3_session->state = POP3_RETR_RECV;
+               session_recv_data(session, 0, ".\r\n");
+               break;
+       case POP3_DELETE:
+               pop3_delete_recv(pop3_session);
+               if (pop3_session->cur_msg == pop3_session->count)
+                       pop3_logout_send(pop3_session);
+               else {
+                       pop3_session->cur_msg++;
+                       if (pop3_lookup_next(pop3_session) == POP3_ERROR)
+                               return -1;
+               }
+               break;
+       case POP3_LOGOUT:
+               session_disconnect(session);
+               break;
+       case POP3_ERROR:
+       default:
+               return -1;
+       }
+
+       return 0;
+}
 
-               return PS_SUCCESS;
+static gint pop3_session_recv_data_finished(Session *session, guchar *data,
+                                           guint len)
+{
+       Pop3Session *pop3_session = POP3_SESSION(session);
+       Pop3ErrorValue val = PS_SUCCESS;
+
+       switch (pop3_session->state) {
+       case POP3_GETRANGE_UIDL_RECV:
+               val = pop3_getrange_uidl_recv(pop3_session, data, len);
+               if (val == PS_SUCCESS) {
+                       if (pop3_session->new_msg_exist)
+                               pop3_getsize_list_send(pop3_session);
+                       else
+                               pop3_logout_send(pop3_session);
+               } else
+                       return -1;
+               break;
+       case POP3_GETSIZE_LIST_RECV:
+               val = pop3_getsize_list_recv(pop3_session, data, len);
+               if (val == PS_SUCCESS) {
+                       if (pop3_lookup_next(pop3_session) == POP3_ERROR)
+                               return -1;
+               } else
+                       return -1;
+               break;
+       case POP3_RETR_RECV:
+               if (pop3_retr_recv(pop3_session, data, len) < 0)
+                       return -1;
+
+               if (pop3_session->ac_prefs->rmmail &&
+                   pop3_session->ac_prefs->msg_leave_time == 0 &&
+                   pop3_session->msg[pop3_session->cur_msg].recv_time
+                   != RECV_TIME_KEEP)
+                       pop3_delete_send(pop3_session);
+               else if (pop3_session->cur_msg == pop3_session->count)
+                       pop3_logout_send(pop3_session);
+               else {
+                       pop3_session->cur_msg++;
+                       if (pop3_lookup_next(pop3_session) == POP3_ERROR)
+                               return -1;
+               }
+               break;
+       case POP3_ERROR:
+       default:
+               return -1;
        }
+
+       return 0;
 }