/* GNU Mailutils -- a suite of utilities for electronic mail
   Copyright (C) 1999, 2000, 2001 Free Software Foundation, Inc.

   This library is free software; you can redistribute it and/or
   modify it under the terms of the GNU Lesser General Public
   License as published by the Free Software Foundation; either
   version 2 of the License, or (at your option) any later version.

   This library is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   Lesser General Public License for more details.

   You should have received a copy of the GNU Lesser General Public
   License along with this library; if not, write to the Free Software
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307  USA  */

#ifdef HAVE_CONFIG_H
# include <config.h>
#endif

#ifdef HAVE_STRING_H
# include <string.h>
#else
# include <strings.h>
#endif

#include <stdlib.h>
#include <mailutils/sys/pop3.h>

int
pop3_uidl_all (pop3_t pop3, iterator_t *piterator)
{
  int status;

  if (pop3 == NULL || piterator == NULL)
    return MU_ERROR_INVALID_PARAMETER;

  switch (pop3->state)
    {
    case POP3_NO_STATE:
      status = pop3_writeline (pop3, "UIDL\r\n");
      POP3_CHECK_ERROR (pop3, status);
      pop3_debug_cmd (pop3);
      pop3->state = POP3_UIDL;

    case POP3_UIDL:
      status = pop3_send (pop3);
      POP3_CHECK_EAGAIN (pop3, status);
      pop3->acknowledge = 0;
      pop3->state = POP3_UIDL_ACK;

    case POP3_UIDL_ACK:
      status = pop3_response (pop3, NULL, 0, NULL);
      POP3_CHECK_EAGAIN (pop3, status);
      pop3_debug_ack (pop3);
      POP3_CHECK_OK (pop3);
      pop3->state = POP3_UIDL_RX;

    case POP3_UIDL_RX:
      status = pop3_iterator_create (pop3, piterator);
      POP3_CHECK_ERROR (pop3, status);
      break;

      /* They must deal with the error first by reopening.  */
    case POP3_ERROR:
      status = MU_ERROR_OPERATION_CANCELED;
      break;

    default:
      status = MU_ERROR_OPERATION_IN_PROGRESS;
    }

  return status;
}

int
pop3_uidl_first (pop3_uidl_iterator_t iterator)
{
  return iterator_first (iterator);
}

int
pop3_uidl_is_done (pop3_uidl_iterator_t iterator)
{
  return iterator_is_done (iterator);
}

int
pop3_uidl_next (pop3_uidl_iterator_t iterator)
{
  return iterator_next (iterator);
}

void
pop3_uidl_destroy (pop3_uidl_iterator_t *piterator)
{
  iterator_destroy (piterator);
}

int
pop3_uidl_current (iterator_t iterator, unsigned int *pno, char **puidl)
{
  char *buf;
  int status = iterator_current (iterator, (void *)&buf);
  if (status == 0)
    {
      char *space;
      unsigned int msgno = 0;

      /* The format is: msgno uidlstring  */
      msgno = strtoul (buf, &space, 10);
      if (space && space[strlen (space) - 1] == '\n')
	space[strlen (space) - 1] = '\0';

      /* Oops.  */
      if (space == NULL)
	space = (char *)"";

      if (pno)
	*pno = msgno;
      if (puidl)
	*puidl = strdup (space);
      free (buf);
    }
  return status;
}