Re: XEmacs/GNUs eats all memory and dies

[Simon Josefsson <jas@extundo.com>]

Reiner Steib <reinersteib+from-uce@imap.cc> writes:

> On Tue, Mar 14 2006, Julian Stecklina wrote:
>
>> Gnus v5.10.7
>> XEmacs 21.5  (beta24) "dandelion" [Lucid] (i386--freebsd, Mule) of Sat Jan  7 2006 on dellbeast.localnet
>> 200 news.gmane.org InterNetNews NNRP server INN 2.4.1 ready (posting ok).
>>
>> Hello,
>>
>> when I try to open the INBOX of my web.de IMAP account in the group
>> buffer, XEmacs eats all available memory and dies, because it tries to
>> build a ridiculously large list in gnus-uncompress-range. Is there any
>> workaround for this?
>
> Maybe the change below which has been installed in the development
> version might help.
>
> Simon, maybe we should also install it in v5-10 now, but choose the
> method depending on some variable which should default to "old method"
> in the v5-10 branch and "new method" in the trunk.  If we have enough
> testing, we can default to "new method" in all versions and remove the
> "old method" code.  WDYT?

If it positively solve this report, I think we should install it on
v5-10 too.

> ,----[ lisp/ChangeLog ]
> | 2006-03-03  Daniel Pittman <daniel@rimspace.net>
> | 
> | 	* nnimap.el (nnimap-request-update-info-internal): Optimize.
> `----
>
> --- nnimap.el	21 Feb 2006 07:14:23 -0000	7.30
> +++ nnimap.el	3 Mar 2006 09:33:38 -0000	7.31
> @@ -1183,18 +1183,12 @@
>  	  (let (seen unseen)
>  	    ;; read info could contain articles marked unread by other
>  	    ;; imap clients!  we correct this
> -	    (setq seen (gnus-uncompress-range (gnus-info-read info))
> -		  unseen (imap-search "UNSEEN UNDELETED")
> -		  seen (gnus-set-difference seen unseen)
> -		  ;; seen might lack articles marked as read by other
> -		  ;; imap clients! we correct this
> -		  seen (append seen (imap-search "SEEN"))
> -		  ;; remove dupes
> -		  seen (sort seen '<)
> -		  seen (gnus-compress-sequence seen t)
> -		  ;; we can't return '(1) since this isn't a "list of ranges",
> -		  ;; and we can't return '((1)) since g-list-of-unread-articles
> -		  ;; is buggy so we return '((1 . 1)).
> +	    (setq unseen (gnus-compress-sequence 
> +			  (imap-search "UNSEEN UNDELETED"))
> +		  seen (gnus-range-difference (gnus-info-read info) unseen)
> +		  seen (gnus-range-add seen 
> +				       (gnus-compress-sequence 
> +					(imap-search "SEEN")))
>  		  seen (if (and (integerp (car seen))
>  				(null (cdr seen)))
>  			   (list (cons (car seen) (car seen)))
>
> [...]
>> Debugger entered--Lisp error: (quit)
>>   gnus-uncompress-range(((1 . 937046050)))
>>   nnimap-request-update-info-internal("INBOX" ("nnimap+web:INBOX" 3
>>   ((1 . 937046050)) ((seen ...) (recent ...)) "nnimap:web"
>>   ((uidvalidity . "1") (spam-contents
>>   gnus-group-spam-classification-ham) (spam-process ...)
>>   (spam-process-destination "mail.spam") (ham-process-destination
>>   "mail.inbox"))) "web")
>>   nnimap-request-group("INBOX" "web" t)
>>   gnus-request-group("nnimap+web:INBOX" t)
>>   gnus-select-newsgroup("nnimap+web:INBOX" nil nil)
>>   gnus-summary-read-group-1("nnimap+web:INBOX" nil t nil nil nil)
>>   gnus-summary-read-group("nnimap+web:INBOX" nil t nil nil nil nil)
>>   gnus-group-read-group(nil t)
>>   gnus-group-select-group(nil)
>>   call-interactively(gnus-group-select-group)
>>
>> ------------------ Environment follows ------------------
> [...]
>> (setq gnus-secondary-select-methods '((nntp "news.gmane.org")
>> 				      (nnimap "web"
>> 				       (nnimap-authinfo-file "/home/blitz/.xemacs/web.auth")
>> 				       (nnimap-address "imap.web.de")
>> 				       (nnimap-stream ssl))
> [...]
>
> Bye, Reiner.
> -- 
>        ,,,
>       (o o)
> ---ooO-(_)-Ooo---  |  PGP key available  |  http://rsteib.home.pages.de/