General bug fixes to get Imap working. It is getting good but still more

general cleanup need to be done.

+2001-02-20  Alain Magloire
+
+	* mailbox/mailbox.c (mailbox_set_ticket mailbox_set_authority
+	mailbox_set_stream) : Those objects are now part of th folder
+	if a folder is attached to the mailbox.
+	* mailbox/mbx_imap.c (imap_message_read imap_body_read) :
+	If offset == 0, reset the lines to 0.
+
+2001-02-19  Alain Magloire
+
+	* mailbox/mbx_pop.c (pop_body_read) : Move the CHECK_BUSY higher
+	it should be the first thing done.  If the state is POP_NO_STATE
+	reset the offset and the size to 0 i.e we are starting fresh.
+	(pop_header_read) : Likewise.
+	(pop_message_read) : Likewise.
+	* mailbox/stream.c (stream_write) : Don't call stream_flush().
+
 2001-02-04  Alain Magloire
 2001-02-04  Alain Magloire
 
 
 	* mailbox/message.c (message_get_uid) : Add message_get_uid() for
 	* mailbox/message.c (message_get_uid) : Add message_get_uid() for

@@ -1150,6 +1150,13 @@ imap_flags (f_imap_t f_imap, char **ptr)
 	  else
 	  else
 	    f_imap->flags |= MU_ATTRIBUTE_DRAFT;
 	    f_imap->flags |= MU_ATTRIBUTE_DRAFT;
 	}
 	}
+      else if (strcasecmp (flag, "\\Read") == 0)
+	{
+	  if (msg_imap)
+	    msg_imap->flags |= MU_ATTRIBUTE_READ;
+	  else
+	    f_imap->flags |= MU_ATTRIBUTE_READ;
+	}
     }
     }
   return 0;
   return 0;
 }
 }
@@ -1260,12 +1267,20 @@ imap_fetch (f_imap_t f_imap)
 	{
 	{
 	  status = imap_internaldate (f_imap, &sp);
 	  status = imap_internaldate (f_imap, &sp);
 	}
 	}
-      else if (strncmp (command, "RFC822.SIZE", 10) == 0)
+      else if (strncmp (command, "RFC822", 10) == 0)
 	{
 	{
-	  imap_token (command, &sp);
-	  if (f_imap->callback.msg_imap)
-	    f_imap->callback.msg_imap->message_size = strtoul (command,
-							       NULL, 10);
+	  if (*sp == '.')
+	    {
+	      sp++;
+	      imap_token (command, &sp);
+	      if (strcasecmp (command, "SIZE") == 0)
+		{
+		  imap_token (command, &sp);
+		  if (f_imap->callback.msg_imap)
+		    f_imap->callback.msg_imap->message_size =
+		      strtoul (command, NULL, 10);
+		}
+	    }
 	}
 	}
       else if (strncmp (command, "UID", 3) == 0)
       else if (strncmp (command, "UID", 3) == 0)
 	{
 	{
@@ -1281,6 +1296,7 @@ static int
 imap_token (char *buf, char **ptr)
 imap_token (char *buf, char **ptr)
 {
 {
   char *start = *ptr;
   char *start = *ptr;
+  /* Skip leading space.  */
   while (**ptr && **ptr == ' ')
   while (**ptr && **ptr == ' ')
     (*ptr)++;
     (*ptr)++;
   for (; **ptr; (*ptr)++, buf++)
   for (; **ptr; (*ptr)++, buf++)
@@ -1297,6 +1313,9 @@ imap_token (char *buf, char **ptr)
       *buf = **ptr;
       *buf = **ptr;
   }
   }
   *buf = '\0';
   *buf = '\0';
+  /* Skip tail space.  */
+  while (**ptr && **ptr == ' ')
+    (*ptr)++;
   return  *ptr - start;;
   return  *ptr - start;;
 }
 }
 
 

@@ -424,9 +424,11 @@ header_get_value (header_t header, const char *name, char *buffer,
 	      buflen = (len < buflen) ? len : buflen;
 	      buflen = (len < buflen) ? len : buflen;
 	      memcpy (buffer, buf, buflen);
 	      memcpy (buffer, buf, buflen);
 	      buffer[buflen] = '\0';
 	      buffer[buflen] = '\0';
-	      if (pn)
-		*pn = buflen;
 	    }
 	    }
+	  else
+	    buflen = len;
+	  if (pn)
+	    *pn = buflen;
 	}
 	}
       return err;
       return err;
     }
     }

@@ -308,6 +308,8 @@ mailbox_set_authority (mailbox_t mbox, authority_t authority)
 {
 {
   if (mbox == NULL)
   if (mbox == NULL)
     return EINVAL;
     return EINVAL;
+  if (mbox->folder)
+    return folder_set_authority (mbox->folder, authority);
   if (mbox->authority)
   if (mbox->authority)
     authority_destroy (&(mbox->authority), mbox);
     authority_destroy (&(mbox->authority), mbox);
   mbox->authority = authority;
   mbox->authority = authority;
@@ -319,6 +321,8 @@ mailbox_get_authority (mailbox_t mbox, authority_t *pauthority)
 {
 {
   if (mbox == NULL || pauthority == NULL)
   if (mbox == NULL || pauthority == NULL)
     return EINVAL;
     return EINVAL;
+  if (mbox->folder)
+    return folder_get_authority  (mbox->folder, pauthority);
   *pauthority = mbox->authority;
   *pauthority = mbox->authority;
   return 0;
   return 0;
 }
 }
@@ -328,6 +332,8 @@ mailbox_set_ticket (mailbox_t mbox, ticket_t ticket)
 {
 {
   if (mbox == NULL)
   if (mbox == NULL)
     return EINVAL;
     return EINVAL;
+  if (mbox->folder)
+    return folder_set_ticket (mbox->folder, ticket);
   if (mbox->ticket)
   if (mbox->ticket)
     ticket_destroy (&(mbox->ticket), mbox);
     ticket_destroy (&(mbox->ticket), mbox);
   mbox->ticket = ticket;
   mbox->ticket = ticket;
@@ -339,6 +345,8 @@ mailbox_get_ticket (mailbox_t mbox, ticket_t *pticket)
 {
 {
   if (mbox == NULL || pticket == NULL)
   if (mbox == NULL || pticket == NULL)
     return EINVAL;
     return EINVAL;
+  if (mbox->folder)
+    return folder_get_ticket (mbox->folder, pticket);
   *pticket = mbox->ticket;
   *pticket = mbox->ticket;
   return 0;
   return 0;
 }
 }
@@ -348,6 +356,8 @@ mailbox_set_stream (mailbox_t mbox, stream_t stream)
 {
 {
   if (mbox == NULL)
   if (mbox == NULL)
     return EINVAL;
     return EINVAL;
+  if (mbox->folder)
+    return folder_set_stream (mbox->folder, stream);
   if (mbox->stream)
   if (mbox->stream)
     stream_destroy (&(mbox->stream), mbox);
     stream_destroy (&(mbox->stream), mbox);
   mbox->stream = stream;
   mbox->stream = stream;
@@ -359,6 +369,8 @@ mailbox_get_stream (mailbox_t mbox, stream_t *pstream)
 {
 {
   if (mbox == NULL || pstream)
   if (mbox == NULL || pstream)
     return EINVAL;
     return EINVAL;
+  if (mbox->folder)
+    return folder_get_stream (mbox->folder, pstream);
   *pstream = mbox->stream;
   *pstream = mbox->stream;
   return 0;
   return 0;
 }
 }

@@ -649,6 +649,10 @@ imap_message_read (stream_t stream, char *buffer, size_t buflen,
   m_imap_t m_imap = msg_imap->m_imap;
   m_imap_t m_imap = msg_imap->m_imap;
   f_imap_t f_imap = m_imap->f_imap;
   f_imap_t f_imap = m_imap->f_imap;
 
 
+  /* Start over.  */
+  if (offset == 0)
+    msg_imap->message_lines = 0;
+
   /* Select first.  */
   /* Select first.  */
   if (f_imap->state == IMAP_NO_STATE)
   if (f_imap->state == IMAP_NO_STATE)
     {
     {
@@ -1007,8 +1011,10 @@ imap_attr_set_flags (attribute_t attribute, int flags)
     {
     {
       status = imap_writeline (f_imap, "g%d STORE %d +FLAGS.SILENT (%s %s %s %s)\r\n",
       status = imap_writeline (f_imap, "g%d STORE %d +FLAGS.SILENT (%s %s %s %s)\r\n",
 			       f_imap->seq++, msg_imap->num,
 			       f_imap->seq++, msg_imap->num,
-			       (flags & MU_ATTRIBUTE_SEEN) ? "\\Seen" : "",
 			       (flags & MU_ATTRIBUTE_ANSWERED) ? "\\Answered" : "",
 			       (flags & MU_ATTRIBUTE_ANSWERED) ? "\\Answered" : "",
+			       (flags & MU_ATTRIBUTE_RECENT) ? "\\Recent" : "",
+			       (flags & MU_ATTRIBUTE_READ) ? "\\Read" : "",
+			       (flags & MU_ATTRIBUTE_SEEN) ? "\\Seen" : "",
 			       (flags & MU_ATTRIBUTE_DRAFT) ? "\\Draft" : "",
 			       (flags & MU_ATTRIBUTE_DRAFT) ? "\\Draft" : "",
 			       (flags & MU_ATTRIBUTE_FLAGGED) ? "\\Flagged" : "");
 			       (flags & MU_ATTRIBUTE_FLAGGED) ? "\\Flagged" : "");
       CHECK_ERROR (f_imap, status);
       CHECK_ERROR (f_imap, status);
@@ -1128,6 +1134,10 @@ imap_header_read (header_t header, char *buffer, size_t buflen, off_t offset,
   m_imap_t m_imap = msg_imap->m_imap;
   m_imap_t m_imap = msg_imap->m_imap;
   f_imap_t f_imap = m_imap->f_imap;
   f_imap_t f_imap = m_imap->f_imap;
 
 
+  /* Start over.  */
+  if (offset == 0)
+    msg_imap->header_lines = 0;
+
   /* Select first.  */
   /* Select first.  */
   if (f_imap->state == IMAP_NO_STATE)
   if (f_imap->state == IMAP_NO_STATE)
     {
     {
@@ -1168,7 +1178,15 @@ imap_body_size (body_t body, size_t *psize)
   message_t msg = body_get_owner (body);
   message_t msg = body_get_owner (body);
   msg_imap_t msg_imap = message_get_owner (msg);
   msg_imap_t msg_imap = message_get_owner (msg);
   if (psize && msg_imap)
   if (psize && msg_imap)
-    *psize = msg_imap->body_size;
+    {
+      if (msg_imap->body_size)
+	*psize = msg_imap->body_size;
+      else if (msg_imap->message_size)
+	*psize = msg_imap->message_size
+	  - (msg_imap->header_size + msg_imap->header_lines);
+      else
+	*psize = 0;
+    }
   return 0;
   return 0;
 }
 }
 
 
@@ -1200,7 +1218,7 @@ imap_body_read (stream_t stream, char *buffer, size_t buflen, off_t offset,
      example "\n" to retrieve from the server, IMAP will transform this to
      example "\n" to retrieve from the server, IMAP will transform this to
      "\r\n" and since you ask for only 1, the server will send '\r' only.
      "\r\n" and since you ask for only 1, the server will send '\r' only.
      And ... '\r' will be stripped by (imap_readline()) the number of char
      And ... '\r' will be stripped by (imap_readline()) the number of char
-     read will be 0 which means we're done .... sigh ...  So we guard to at
+     read will be 0 which means we're done .... sigh ...  So we guard by at
      least ask for 2 chars.  */
      least ask for 2 chars.  */
   if (buflen == 1)
   if (buflen == 1)
     {
     {
@@ -1208,6 +1226,11 @@ imap_body_read (stream_t stream, char *buffer, size_t buflen, off_t offset,
       buffer = newbuf;
       buffer = newbuf;
       buflen = 2;
       buflen = 2;
     }
     }
+
+  /* Start over.  */
+  if (offset == 0)
+      msg_imap->body_lines = 0;
+
   /* Select first.  */
   /* Select first.  */
   if (f_imap->state == IMAP_NO_STATE)
   if (f_imap->state == IMAP_NO_STATE)
     {
     {