complain about malformed item names in FETCH responses

5 years ago · 8acf56b311
1 changed files with 4 additions and 2 deletions
--- a/src/drv_imap.c
+++ b/src/drv_imap.c
@ -1056,8 +1056,10 @@ parse_fetch_rsp( imap_store_t *ctx, list_t *list, char *s ATTR_UNUSED )
 	}

 	for (tmp = list->child; tmp; tmp = tmp->next) {
-		if (!is_atom( tmp ))
-			continue;
+		if (!is_atom( tmp )) {
+			error( "IMAP error: bogus item name in FETCH response\n" );
+			goto ffail;
+		}
 		if (!strcmp( "UID", tmp->val )) {
 			tmp = tmp->next;
 			if (!is_atom( tmp ) || (uid = strtoul( tmp->val, &ep, 10 ), *ep)) {