Probable bug in nnimap

Probable bug in nnimap

[Torgny Nyblom]

Hi

I got a strange error in nnimap. Kai Großjohann found the problem
(hopefully :) ) and suggested that I post the problem here.

When I try and read mail with nnimap gnus friezes up. The problem is
probably that the message number is to high for gnus (nnimap) to read.

Since I my self is quite the newbie I hope I enclose all information
that is relevant.

Message-log:
------->------
SMTPMail...
SMTPMail...Done
FeedMail...
FeedMail...Done
IMAP...
IMAP...Done
Loading cus-face...
Loading cus-face...done
Loading gnus...
Loading cl-macs...
Loading cl-macs...done
Loading gnus-xmas...
Loading gnus-xmas...done
Loading gnus...done
Loading gnus-start...
Loading gnus-start...done
Loading gnus-agent...
Loading gnus-agent...done
Loading efs-cu...
Loading efs-cu...done
Reading c:\Unix\.newsrc.eld...
Reading active file from news.algonet.se via nntp...
Reading active file via nnimap...
Opening nnimap server...
Waiting for response from imap.algonet.se...done
Loading passwd...
Loading passwd...done
Store password for this session? (y or n) 
Store password for this session? (y or n) Yes
Reading active file from archive via nnfolder...
Opening nnfolder server on archive...
Reading active file from archive via nnfolder...
Reading active file from archive via nnfolder...done
nnimap: Listing subscribed mailboxes...
Loading utf7...
Loading utf7...done
Quit
-----<------

~/imap-log
----->------
* OK BLUETAIL Mail Robustifier IMAP4rev1 frontend
1 CAPABILITY
* CAPABILITY IMAP4 IMAP4REV1 NAMESPACE SCAN SORT THREAD=ORDEREDSUBJECT
1 OK CAPABILITY completed
2 LOGIN "User" "PassWord"
2 OK LOGIN completed
3 LSUB "" "*%"
* LSUB () "/" INBOX
* LSUB () "/" Sent
* LSUB () "/" Drafts
* LSUB () "/" "Skickade brev"
* LSUB (\NoInferiors) NIL INBOX
* LSUB () "/" Sent
* LSUB () "/" Drafts
* LSUB () "/" "Skickade brev"
3 OK LSUB completed
4 EXAMINE "Drafts"
* 0 EXISTS
* OK [UIDVALIDITY 954858925] UID validity status
* OK [UIDNEXT 954932289] Predicted next UID
* FLAGS (\Answered \Flagged \Deleted \Draft \Seen)
* OK [PERMANENTFLAGS ()] Permanent flags
* 0 RECENT
4 OK [READ-ONLY] EXAMINE completed
-----<------
*warnings*
----->------
(1) (error/warning) Error in process filter: (invalid-read-syntax
Integer constant overflow in reader 954932289 10)
-----<------
*imap-debug*
----->------
| 2 -> imap-opened: buffer=" *nnimap* "
| 2 <- imap-opened: nil
| | 3 -> imap-open: server="imap.algonet.se" port=nil stream=nil auth=nil buffer=" *nnimap* "
| | | 4 -> imap-opened: buffer=" *nnimap* "
| | | 4 <- imap-opened: nil
| | | 4 -> imap-open-1: buffer=" *nnimap* "
| | | | 5 -> imap-network-open: name="imap" buffer=" *nnimap* " server="imap.algonet.se" port=nil
| | | | | 6 -> imap-parse-greeting: 
| | | | | 6 <- imap-parse-greeting: nil
| | | | | 6 -> imap-parse-greeting: 
| | | | | 6 <- imap-parse-greeting: nonauth
| | | | 5 <- imap-network-open: #<network connection "imap" (143 . "imap.algonet.se") state:run>
| | | 4 <- imap-open-1: #<network connection "imap" (143 . "imap.algonet.se") state:run>
| | | 4 -> imap-kerberos4s-p: buffer=" *nnimap* "
| | | | 5 -> imap-capability: identifier=AUTH=KERBEROS_V4 buffer=" *nnimap* "
| | | | | 6 -> imap-send-command-wait: command="CAPABILITY" buffer=nil
| | | | | | 7 -> imap-send-command: command="CAPABILITY" buffer=nil
| | | | | | | 8 -> imap-send-command-1: cmdstr="1 CAPABILITY"
| | | | | | | 8 <- imap-send-command-1: nil
| | | | | | 7 <- imap-send-command: 1
| | | | | | 7 -> imap-wait-for-tag: tag=1 buffer=nil
| | | | | | | 8 -> imap-arrival-filter: proc=#<network connection "imap" (143 . "imap.algonet.se") state:run> string="* CAPABILITY IMAP4 IMAP4REV1 NAMESPACE SCAN SORT THREAD=ORDEREDSUBJECT

"
| | | | | | | | 9 -> imap-find-next-line: 
| | | | | | | | 9 <- imap-find-next-line: 52
| | | | | | | | 9 -> imap-parse-response: 
| | | | | | | | | 10 -> imap-parse-resp-text: 
| | | | | | | | | | 11 -> imap-parse-resp-text-code: 
| | | | | | | | | | 11 <- imap-parse-resp-text-code: nil
| | | | | | | | | 10 <- imap-parse-resp-text: nil
| | | | | | | | 9 <- imap-parse-response: nil
| | | | | | | | 9 -> imap-find-next-line: 
| | | | | | | | 9 <- imap-find-next-line: 73
| | | | | | | | 9 -> imap-parse-response: 
| | | | | | | | 9 <- imap-parse-response: (IMAP4 IMAP4REV1 NAMESPACE SCAN SORT THREAD=ORDEREDSUBJECT)
| | | | | | | | 9 -> imap-find-next-line: 
| | | | | | | | 9 <- imap-find-next-line: nil
| | | | | | | 8 <- imap-arrival-filter: nil
| | | | | | | 8 -> imap-arrival-filter: proc=#<network connection "imap" (143 . "imap.algonet.se") state:run> string="1 OK CAPABILITY completed

"
| | | | | | | | 9 -> imap-find-next-line: 
| | | | | | | | 9 <- imap-find-next-line: 28
| | | | | | | | 9 -> imap-parse-response: 
| | | | | | | | | 10 -> imap-parse-resp-text: 
| | | | | | | | | | 11 -> imap-parse-resp-text-code: 
| | | | | | | | | | 11 <- imap-parse-resp-text-code: nil
| | | | | | | | | 10 <- imap-parse-resp-text: nil
| | | | | | | | 9 <- imap-parse-response: nil
| | | | | | | | 9 -> imap-find-next-line: 
| | | | | | | | 9 <- imap-find-next-line: nil
| | | | | | | 8 <- imap-arrival-filter: nil
| | | | | | 7 <- imap-wait-for-tag: OK
| | | | | 6 <- imap-send-command-wait: OK
| | | | 5 <- imap-capability: nil
| | | 4 <- imap-kerberos4s-p: nil
| | | 4 -> imap-ssl-p: buffer=" *nnimap* "
| | | 4 <- imap-ssl-p: nil
| | | 4 -> imap-network-p: buffer=" *nnimap* "
| | | 4 <- imap-network-p: t
| | | 4 -> imap-opened: buffer=" *nnimap* "
| | | 4 <- imap-opened: (open run)
| | | 4 -> imap-kerberos4a-p: buffer=" *nnimap* "
| | | | 5 -> imap-capability: identifier=AUTH=KERBEROS_V4 buffer=" *nnimap* "
| | | | 5 <- imap-capability: nil
| | | 4 <- imap-kerberos4a-p: nil
| | | 4 -> imap-cram-md5-p: buffer=" *nnimap* "
| | | | 5 -> imap-capability: identifier=AUTH=CRAM-MD5 buffer=" *nnimap* "
| | | | 5 <- imap-capability: nil
| | | 4 <- imap-cram-md5-p: nil
| | | 4 -> imap-login-p: buffer=" *nnimap* "
| | | | 5 -> imap-capability: identifier=X-LOGIN-CMD-DISABLED buffer=" *nnimap* "
| | | | 5 <- imap-capability: nil
| | | 4 <- imap-login-p: t
| | | 4 -> imap-opened: buffer=" *nnimap* "
| | | 4 <- imap-opened: (open run)
| | 3 <- imap-open: " *nnimap* "
| | 3 -> imap-capability: identifier=IMAP4 buffer=" *nnimap* "
| | 3 <- imap-capability: (IMAP4 IMAP4REV1 NAMESPACE SCAN SORT THREAD=ORDEREDSUBJECT)
| | 3 -> imap-authenticate: user=nil passwd=nil buffer=" *nnimap* "
| | | 4 -> imap-login-auth: buffer=" *nnimap* "
| | | | 5 -> imap-interactive-login: buffer=" *nnimap* " loginfunc=(lambda (user passwd) (imap-ok-p (imap-send-command-wait (concat "LOGIN \"" user "\" \"" passwd "\""))))
| | | | | 6 -> imap-read-passwd: prompt="IMAP password for User@imap.algonet.se: " args=nil
| | | | | 6 <- imap-read-passwd: "PassWord"
| | | | | 6 -> imap-send-command-wait: command="LOGIN \"User\" \"PassWord\"" buffer=nil
| | | | | | 7 -> imap-send-command: command="LOGIN \"User\" \"PassWord\"" buffer=nil
| | | | | | | 8 -> imap-send-command-1: cmdstr="2 LOGIN \"User\" \"PassWord\""
| | | | | | | 8 <- imap-send-command-1: nil
| | | | | | 7 <- imap-send-command: 2
| | | | | | 7 -> imap-wait-for-tag: tag=2 buffer=nil
| | | | | | | 8 -> imap-arrival-filter: proc=#<network connection "imap" (143 . "imap.algonet.se") state:run> string="2 OK LOGIN completed

"
| | | | | | | | 9 -> imap-find-next-line: 
| | | | | | | | 9 <- imap-find-next-line: 23
| | | | | | | | 9 -> imap-parse-response: 
| | | | | | | | | 10 -> imap-parse-resp-text: 
| | | | | | | | | | 11 -> imap-parse-resp-text-code: 
| | | | | | | | | | 11 <- imap-parse-resp-text-code: nil
| | | | | | | | | 10 <- imap-parse-resp-text: nil
| | | | | | | | 9 <- imap-parse-response: nil
| | | | | | | | 9 -> imap-find-next-line: 
| | | | | | | | 9 <- imap-find-next-line: nil
| | | | | | | 8 <- imap-arrival-filter: nil
| | | | | | 7 <- imap-wait-for-tag: OK
| | | | | 6 <- imap-send-command-wait: OK
| | | | 5 <- imap-interactive-login: t
| | | 4 <- imap-login-auth: t
| | 3 <- imap-authenticate: auth
| 2 -> imap-opened: buffer=" *nnimap* "
| 2 <- imap-opened: (open run)
| 2 -> imap-mailbox-lsub: root="*" reference=nil add-delimiter=nil buffer=" *nnimap* "
| | 3 -> imap-mailbox-map-1: func=(lambda (mailbox) (imap-mailbox-put (quote lsub) nil mailbox)) mailbox-decoder=nil buffer=nil
| | 3 <- imap-mailbox-map-1: nil
| | 3 -> imap-utf7-encode: string="*"
| | 3 <- imap-utf7-encode: "*"
| | 3 -> imap-send-command-wait: command="LSUB \"\" \"*%\"" buffer=nil
| | | 4 -> imap-send-command: command="LSUB \"\" \"*%\"" buffer=nil
| | | | 5 -> imap-send-command-1: cmdstr="3 LSUB \"\" \"*%\""
| | | | 5 <- imap-send-command-1: nil
| | | 4 <- imap-send-command: 3
| | | 4 -> imap-wait-for-tag: tag=3 buffer=nil
| | | | 5 -> imap-arrival-filter: proc=#<network connection "imap" (143 . "imap.algonet.se") state:run> string="* LSUB () \"/\" INBOX
* LSUB () \"/\" Sent
* LSUB () \"/\" Drafts
* LSUB () \"/\" \"Skickade brev\"
* LSUB (\\NoInferiors) NIL INBOX
* LSUB () \"/\" Sent
* LSUB () \"/\" Drafts
* LSUB () \"/\" \"Skickade brev\"
3 OK LSUB completed
"
| | | | | 6 -> imap-find-next-line: 
| | | | | 6 <- imap-find-next-line: 22
| | | | | 6 -> imap-parse-response: 
| | | | | | 7 -> imap-parse-data-list: type=lsub
| | | | | | | 8 -> imap-parse-flag-list: 
| | | | | | | 8 <- imap-parse-flag-list: nil
| | | | | | | 8 -> imap-mailbox-put: propname=lsub value=t mailbox="INBOX" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=list-flags value=nil mailbox="INBOX" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=delimiter value="/" mailbox="INBOX" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | 7 <- imap-parse-data-list: t
| | | | | 6 <- imap-parse-response: t
| | | | | 6 -> imap-find-next-line: 
| | | | | 6 <- imap-find-next-line: 21
| | | | | 6 -> imap-parse-response: 
| | | | | | 7 -> imap-parse-data-list: type=lsub
| | | | | | | 8 -> imap-parse-flag-list: 
| | | | | | | 8 <- imap-parse-flag-list: nil
| | | | | | | 8 -> imap-mailbox-put: propname=lsub value=t mailbox="Sent" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=list-flags value=nil mailbox="Sent" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=delimiter value="/" mailbox="Sent" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | 7 <- imap-parse-data-list: t
| | | | | 6 <- imap-parse-response: t
| | | | | 6 -> imap-find-next-line: 
| | | | | 6 <- imap-find-next-line: 23
| | | | | 6 -> imap-parse-response: 
| | | | | | 7 -> imap-parse-data-list: type=lsub
| | | | | | | 8 -> imap-parse-flag-list: 
| | | | | | | 8 <- imap-parse-flag-list: nil
| | | | | | | 8 -> imap-mailbox-put: propname=lsub value=t mailbox="Drafts" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=list-flags value=nil mailbox="Drafts" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=delimiter value="/" mailbox="Drafts" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | 7 <- imap-parse-data-list: t
| | | | | 6 <- imap-parse-response: t
| | | | | 6 -> imap-find-next-line: 
| | | | | 6 <- imap-find-next-line: 32
| | | | | 6 -> imap-parse-response: 
| | | | | | 7 -> imap-parse-data-list: type=lsub
| | | | | | | 8 -> imap-parse-flag-list: 
| | | | | | | 8 <- imap-parse-flag-list: nil
| | | | | | | 8 -> imap-mailbox-put: propname=lsub value=t mailbox="Skickade brev" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=list-flags value=nil mailbox="Skickade brev" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=delimiter value="/" mailbox="Skickade brev" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | 7 <- imap-parse-data-list: t
| | | | | 6 <- imap-parse-response: t
| | | | | 6 -> imap-find-next-line: 
| | | | | 6 <- imap-find-next-line: 34
| | | | | 6 -> imap-parse-response: 
| | | | | | 7 -> imap-parse-data-list: type=lsub
| | | | | | | 8 -> imap-parse-flag-list: 
| | | | | | | 8 <- imap-parse-flag-list: ("\\NoInferiors")
| | | | | | | 8 -> imap-mailbox-put: propname=lsub value=t mailbox="INBOX" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=list-flags value=("\\NoInferiors") mailbox="INBOX" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=delimiter value=nil mailbox="INBOX" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | 7 <- imap-parse-data-list: t
| | | | | 6 <- imap-parse-response: t
| | | | | 6 -> imap-find-next-line: 
| | | | | 6 <- imap-find-next-line: 21
| | | | | 6 -> imap-parse-response: 
| | | | | | 7 -> imap-parse-data-list: type=lsub
| | | | | | | 8 -> imap-parse-flag-list: 
| | | | | | | 8 <- imap-parse-flag-list: nil
| | | | | | | 8 -> imap-mailbox-put: propname=lsub value=t mailbox="Sent" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=list-flags value=nil mailbox="Sent" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=delimiter value="/" mailbox="Sent" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | 7 <- imap-parse-data-list: t
| | | | | 6 <- imap-parse-response: t
| | | | | 6 -> imap-find-next-line: 
| | | | | 6 <- imap-find-next-line: 23
| | | | | 6 -> imap-parse-response: 
| | | | | | 7 -> imap-parse-data-list: type=lsub
| | | | | | | 8 -> imap-parse-flag-list: 
| | | | | | | 8 <- imap-parse-flag-list: nil
| | | | | | | 8 -> imap-mailbox-put: propname=lsub value=t mailbox="Drafts" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=list-flags value=nil mailbox="Drafts" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=delimiter value="/" mailbox="Drafts" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | 7 <- imap-parse-data-list: t
| | | | | 6 <- imap-parse-response: t
| | | | | 6 -> imap-find-next-line: 
| | | | | 6 <- imap-find-next-line: 32
| | | | | 6 -> imap-parse-response: 
| | | | | | 7 -> imap-parse-data-list: type=lsub
| | | | | | | 8 -> imap-parse-flag-list: 
| | | | | | | 8 <- imap-parse-flag-list: nil
| | | | | | | 8 -> imap-mailbox-put: propname=lsub value=t mailbox="Skickade brev" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=list-flags value=nil mailbox="Skickade brev" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | | 8 -> imap-mailbox-put: propname=delimiter value="/" mailbox="Skickade brev" buffer=nil
| | | | | | | 8 <- imap-mailbox-put: t
| | | | | | 7 <- imap-parse-data-list: t
| | | | | 6 <- imap-parse-response: t
| | | | | 6 -> imap-find-next-line: 
| | | | | 6 <- imap-find-next-line: 22
| | | | | 6 -> imap-parse-response: 
| | | | | | 7 -> imap-parse-resp-text: 
| | | | | | | 8 -> imap-parse-resp-text-code: 
| | | | | | | 8 <- imap-parse-resp-text-code: nil
| | | | | | 7 <- imap-parse-resp-text: nil
| | | | | 6 <- imap-parse-response: nil
| | | | | 6 -> imap-find-next-line: 
| | | | | 6 <- imap-find-next-line: nil
| | | | 5 <- imap-arrival-filter: nil
| | | 4 <- imap-wait-for-tag: OK
| | 3 <- imap-send-command-wait: OK
| | 3 -> imap-mailbox-map-1: func=(lambda (mailbox) (when (imap-mailbox-get-1 (quote lsub) mailbox) (push (imap-utf7-decode mailbox) out))) mailbox-decoder=nil buffer=nil
| | | 4 -> imap-utf7-decode: string="Drafts"
| | | 4 <- imap-utf7-decode: "Drafts"
| | | 4 -> imap-utf7-decode: string="Sent"
| | | 4 <- imap-utf7-decode: "Sent"
| | | 4 -> imap-utf7-decode: string="Skickade brev"
| | | 4 <- imap-utf7-decode: "Skickade brev"
| | | 4 -> imap-utf7-decode: string="INBOX"
| | | 4 <- imap-utf7-decode: "INBOX"
| | 3 <- imap-mailbox-map-1: (("INBOX" "Skickade brev" "Sent" "Drafts") ("Skickade brev" "Sent" "Drafts") ("Sent" "Drafts") ("Drafts"))
| 2 <- imap-mailbox-lsub: ("Drafts" "Sent" "Skickade brev" "INBOX")
| 2 -> imap-mailbox-get: propname=list-flags mailbox="Drafts" buffer=" *nnimap* "
| | 3 -> imap-utf7-encode: string="Drafts"
| | 3 <- imap-utf7-encode: "Drafts"
| 2 <- imap-mailbox-get: nil
| | 3 -> imap-mailbox-select: mailbox="Drafts" examine=examine buffer=nil
| | | 4 -> imap-utf7-encode: string="Drafts"
| | | 4 <- imap-utf7-encode: "Drafts"
| | | 4 -> imap-mailbox-select-1: mailbox="Drafts" examine=examine
| | | | 5 -> imap-current-mailbox-p-1: mailbox="Drafts" examine=examine
| | | | 5 <- imap-current-mailbox-p-1: nil
| | | | 5 -> imap-send-command-wait: command="EXAMINE \"Drafts\"" buffer=nil
| | | | | 6 -> imap-send-command: command="EXAMINE \"Drafts\"" buffer=nil
| | | | | | 7 -> imap-send-command-1: cmdstr="4 EXAMINE \"Drafts\""
| | | | | | 7 <- imap-send-command-1: nil
| | | | | 6 <- imap-send-command: 4
| | | | | 6 -> imap-wait-for-tag: tag=4 buffer=nil
| | | | | | 7 -> imap-arrival-filter: proc=#<network connection "imap" (143 . "imap.algonet.se") state:run> string="* 0 EXISTS
* OK [UIDVALIDITY 954858925] UID validity status
* OK [UIDNEXT 954932289] Predicted next UID
* FLAGS (\\Answered \\Flagged \\Deleted \\Draft \\Seen)
* OK [PERMANENTFLAGS ()] Permanent flags
* 0 RECENT
4 OK [READ-ONLY] EXAMINE completed
"
| | | | | | | 8 -> imap-find-next-line: 
| | | | | | | 8 <- imap-find-next-line: 13
| | | | | | | 8 -> imap-parse-response: 
| | | | | | | | 9 -> imap-mailbox-put: propname=exists value=0 mailbox=nil buffer=nil
| | | | | | | | 9 <- imap-mailbox-put: t
| | | | | | | 8 <- imap-parse-response: t
| | | | | | | 8 -> imap-find-next-line: 
| | | | | | | 8 <- imap-find-next-line: 51
| | | | | | | 8 -> imap-parse-response: 
| | | | | | | | 9 -> imap-parse-resp-text: 
| | | | | | | | | 10 -> imap-parse-resp-text-code: 
| | | | | | | | | | 11 -> imap-mailbox-put: propname=uidvalidity value="954858925" mailbox=nil buffer=nil
| | | | | | | | | | 11 <- imap-mailbox-put: t
| | | | | | | | | 10 <- imap-parse-resp-text-code: t
| | | | | | | | 9 <- imap-parse-resp-text: t
| | | | | | | 8 <- imap-parse-response: t
| | | | | | | 8 -> imap-find-next-line: 
| | | | | | | 8 <- imap-find-next-line: 46
| | | | | | | 8 -> imap-parse-response: 
| | | | | | | | 9 -> imap-parse-resp-text: 
| | | | | | | | | 10 -> imap-parse-resp-text-code: 
-----<------
*nnimap-debug*
----->------
======================================================================
1 -> nnimap-server-opened: server=""
1 <- nnimap-server-opened: nil
======================================================================
1 -> nnimap-open-server: server="" defs=((nnimap-address
"imap.algonet.se") (nnimap-list-patern ("Inbox" "*")))
| 2 -> nnimap-server-opened: server=""
| 2 <- nnimap-server-opened: nil
| 2 -> nnimap-open-connection: server=""
| | 3 -> nnimap-possibly-change-server: server=""
| | 3 <- nnimap-possibly-change-server: " *nnimap* "
| 2 <- nnimap-open-connection: (("" " *nnimap* "))
1 <- nnimap-open-server: (("" " *nnimap* "))
======================================================================
1 -> nnimap-request-scan: group=nil server=""
| 2 -> nnimap-split-articles: group=nil server=""
| | 3 -> nnimap-possibly-change-server: server=""
| | 3 <- nnimap-possibly-change-server: " *nnimap* "
| | 3 -> nnimap-split-find-inbox: server=""
| | 3 <- nnimap-split-find-inbox: nil
| 2 <- nnimap-split-articles: t
1 <- nnimap-request-scan: t
======================================================================
1 -> nnimap-server-opened: server=""
1 <- nnimap-server-opened: (open run)
======================================================================
1 -> nnimap-request-newgroups: date="Wed Apr 05 00:39:12 2000" server=""
| 2 -> nnimap-possibly-change-server: server=""
| 2 <- nnimap-possibly-change-server: " *nnimap* "
| 2 -> nnimap-pattern-to-list-arguments: pattern="*"
| 2 <- nnimap-pattern-to-list-arguments: ((nil . "*"))
| 2 -> nnimap-find-minmax-uid: group="Drafts" examine=examine
-----<-----

~/.emacs
----->-----
(setq gnus-nntp-server nil)
(setq gnus-select-method '(nntp "news.algonet.se"))
;;-----SMTP-----
(message "SMTPMail...")
(setq smtpmail-smtp-server "smtp.algonet.se")
(setq smtpmail-smtp-service "smtp")
(setq smtpmail-local-domain "linux.nu")
(setq smtpmail-debug-info t)
(setq smtpmail-default-smtp-server "smtp.algonet.se")
(message "SMTPMail...Done")
(message "FeedMail...")
(setq feedmail-queue-directory "~/Mail/queue")
(setq feedmail-enable-queue t)
(setq feedmail-nuke-bcc nil)
(setq feedmail-from-line nil)
(setq feedmail-confirm-outgoing nil)
(message "FeedMail...Done")
;;-----IMAP-----
(message "IMAP...")
;(setq gnus-message-archive-method (quote (nnfolder "archive"
(nnfolder-directory "~/Mail/archive") (nnfolder-active-file
"~/Mail/archive/active") (nnfolder-get-new-mail t)
(nnfolder-inhibit-expiry t))))

(setq imap-log "~/imap-log")
(setq pop3-debug "~/pop3.log")

(setq gnus-secondary-select-methods
	'(
		(nnimap ""
			(nnimap-address "imap.algonet.se")
			(nnimap-list-patern ("Inbox" "*"))
		)
;		(nnml "LTH"
;			(server-address "kobra.lth.se")
;		)
	)
)
(setq nnimap-authinfo-file "~/authinfo")
(setq nnimap-expunge-on-close 'never)
(setq imap-debug "*imap-debug*")

(message "IMAP...Done")
(setq gnus-kill-files-directory "~/News/")
(setq gnus-default-subscribed-newsgroups (quote ("algonet.test"
"algonet.diverse" "algonet.unix" "se.dator.sys.unix" "gnu.emacs.gnus")))
(setq message-generate-headers-first t)
(setq message-auto-save-directory "~/Mail/drafts/")
(setq nnmail-message-id-cache-file "~/.nnmail-cache")
(setq message-forward-as-mime nil)
(setq mail-abbrev-mailrc-file "~/Mail/adresses.txt")
(setq message-yank-prefix ">")
(setq message-required-mail-headers (quote (From Subject Date Message-ID
Lines)))
(setq gnus-init-file "~/.gnus")
(setq gnus-use-cache t)
(setq gnus-home-directory "~/")
(setq bbdb-default-area-code 4646)
(setq smtpmail-local-domain "linux.nu")
(setq message-from-style (quote angles))
(setq gnus-local-domain "linux.nu")
(setq mail-source-directory "~/Mail/")
(setq mail-alias-separator-string ",\\n   ")
(setq bbdb-north-american-phone-numbers-p nil)
(setq gnus-cache-remove-articles nil)
(setq message-default-charset (quote iso-8859-1))
(setq message-indentation-spaces 0)
(setq gnus-directory "~/News/")
(setq gnus-cacheable-groups "^.*")
(setq gnus-always-force-window-configuration t)
(setq message-elide-ellipsis "
 [....]
 ")
(setq message-required-news-headers (quote (From Newsgroups Subject Date
Message-ID Lines)))
(setq mail-source-delete-incoming nil)
(setq gnus-agent-expire-days 60)
(setq gnus-xmas-logo-color-style (quote sky))
(setq mail-source-crash-box "~/.emacs-mail-crash-box")
(setq bbdb-message-caching-enabled t)
(setq message-send-mail-function (quote
message-send-mail-with-sendmail))
(setq gnus-default-posting-charset (quote iso-8859-1))
(setq message-cite-function (quote
message-cite-original-without-signature))
(setq gnus-nntpserver-file "~/nntpserver")
(setq smtpmail-debug-info t)
(setq gnus-agent-directory "~/News/agent/")
;(setq user-full-name "Nagatoro" t)
(setq message-max-buffers 5)
(setq mail-user-agent (quote message-user-agent))
(setq message-signature-file "~/signature.txt")
(setq message-user-organization-file "~/organization")
(setq message-directory "~/Mail/")
(setq mail-use-rfc822 t)
(setq eudc-options-file "/.eudc-options")
;(setq user-mail-address "torgny@linux.nu" t)
(setq nnmail-keep-last-article t)
(setq gnus-use-full-window nil)
(setq query-user-mail-address t)
(setq gnus-cache-enter-articles (quote (ticked dormant unread read)))
(setq gnus-cache-directory "~/News/cache/")
(setq gnus-message-archive-group (quote (if (message-news-p) "misc-news"
"misc-mail")))
(setq nnmail-expiry-wait (quote never))
(setq gnus-startup-file "~/.newsrc")
(setq gnus-cache-active-file "~/News/cache/active")
;;)
(custom-set-variables
 '(gnus-verbose 10))
-----<-----



// Torgny
--
<torgny@linux.nu>
-----------------------------------------------------
Estne volumen in toga, an solum tibi libet me videre?
-----------------------------------------------------

Re: Probable bug in nnimap

[Nagatoro]

Hi (again)

I forgot to tell what versions of XEmaxs & Gnus I use.

Xemacs: 21.1.9
Gnus: 5.8.3

Re: Probable bug in nnimap

[Simon Josefsson]

Torgny Nyblom <nyblom-torgny@algonet.se> writes:

> When I try and read mail with nnimap gnus friezes up. The problem is
> probably that the message number is to high for gnus (nnimap) to
> read.

It's too high for emacs. Elisp integers are 28 bits and IMAP UIDs are
32 bit. XEmacs compiled with --with-minimal-tagbits raise the limit to
31 bits though, so that might be a "solution" for you.

I don't think I'll have time nor patience to work around this emacs
limitation in (nn)imap.el. Sorry. Of course anyone else is welcome.

> * OK [UIDNEXT 954932289] Predicted next UID
...
> (1) (error/warning) Error in process filter: (invalid-read-syntax
> Integer constant overflow in reader 954932289 10)

Re: Probable bug in nnimap

[Nagatoro]

"Simon Josefsson" <jas@pdc.kth.se> Writes:

> I don't think I'll have time nor patience to work around this emacs
> limitation in (nn)imap.el. Sorry. Of course anyone else is welcome.

Thanks anyway

// Torgny

Re: Probable bug in nnimap

[Jeff Senn]

Simon Josefsson <jas@pdc.kth.se> writes:
> It's too high for emacs. Elisp integers are 28 bits and IMAP UIDs are
> 32 bit. XEmacs compiled with --with-minimal-tagbits raise the limit to
> 31 bits though, so that might be a "solution" for you.
> 
> I don't think I'll have time nor patience to work around this emacs
> limitation in (nn)imap.el. Sorry. Of course anyone else is welcome.

(I haven't looked at nnimap.el lately...) Is there some reason it
needs to be an integer as far as emacs is concerned (rather than a
string)? You can still do lexical sorting on (an non-interpreted)
string value. ...Might be somewhat less efficient, I guess...

-- 
-Jas

Re: Probable bug in nnimap

[Simon Josefsson]

Jeff Senn <senn@maya.com> writes:

> (I haven't looked at nnimap.el lately...) Is there some reason it
> needs to be an integer as far as emacs is concerned (rather than a
> string)? You can still do lexical sorting on (an non-interpreted)
> string value. ...Might be somewhat less efficient, I guess...

Emacs doesn't care, Gnus does. It would take quite a rewrite of Gnus
to make it use strings to reference articles, instead of integers. And
IMHO the amount of work needed isn't worth it.

But we never know what tricks Easter Gnus might perform. ;-)

Re: Probable bug in nnimap

[Jeff Senn]

Simon Josefsson <jas@pdc.kth.se> writes:

> Jeff Senn <senn@maya.com> writes:
> 
> > (I haven't looked at nnimap.el lately...) Is there some reason it
> > needs to be an integer as far as emacs is concerned (rather than a
> > string)? You can still do lexical sorting on (an non-interpreted)
> > string value. ...Might be somewhat less efficient, I guess...
> 
> Emacs doesn't care, Gnus does. It would take quite a rewrite of Gnus
> to make it use strings to reference articles, instead of integers. And
> IMHO the amount of work needed isn't worth it.

Ah...yes (duh!) 

Well how about this (in case someone is desperate and in this
situation): since it is much less likely that there is a _range_ of
uids bigger than 24-bits, you could have an offset (lowest known uid)
that was determined (and remembered) the first time that nnimap sees
the group.  Then you just need a emacs-safe add/subtract for numbers
represented as long strings of digits...

> But we never know what tricks Easter Gnus might perform. ;-)

True :-)

On a more philosophical note: it will be nice when(if?) this
dependence on a linear, numeric primary key for article identity goes
away in gnus... Indeed gnus started life as a nntp-news reader, but I
don't even use it for that anymore... email (in various flavors) and
the web-group stuff is far more useful day-to-day...

I would love (even more) a gnus that was my integrated browser/reader
of all kinds of collections of "documents" that are made up of
"attribute-values"...

-- 
-Jas

Re: Probable bug in nnimap

[Kai Großjohann]

Jeff Senn <senn@maya.com> writes:

> On a more philosophical note: it will be nice when(if?) this
> dependence on a linear, numeric primary key for article identity goes
> away in gnus... Indeed gnus started life as a nntp-news reader, but I
> don't even use it for that anymore... email (in various flavors) and
> the web-group stuff is far more useful day-to-day...

Yes, it would be useful to think about an ADT `article number' (though
number is the wrong word, didn't want to use id lest there be
confusion with message id).  What operations does one need on that
ADT?  Gnus could then be changed to use that ADT and then the ADT
could evolve to accomodate new backends.

It seems that backends like nnslashdot and nnweb use klugy workarounds
for the existing article number requirement.

kai
-- 
~/.signature: No such file or directory

Re: Probable bug in nnimap

[Simon Josefsson]

Kai.Grossjohann@CS.Uni-Dortmund.DE (Kai Großjohann) writes:

> > On a more philosophical note: it will be nice when(if?) this
> > dependence on a linear, numeric primary key for article identity goes
> > away in gnus... Indeed gnus started life as a nntp-news reader, but I
> > don't even use it for that anymore... email (in various flavors) and
> > the web-group stuff is far more useful day-to-day...
> 
> Yes, it would be useful to think about an ADT `article number' (though
> number is the wrong word, didn't want to use id lest there be
> confusion with message id).  What operations does one need on that
> ADT?  Gnus could then be changed to use that ADT and then the ADT
> could evolve to accomodate new backends.

I remember a silly idea I had some time ago, we could use wmperry's
URL package as an interface to backends, and simply have Gnus be a
yet-another-generic-url-viewer.

(w3+Gnus?  That would be the Grand Unified Program, wouldn't it?  Hm.
GUP.  Sounds nice.)

Anyway, so, in the group buffer "groups" are simply URLs, on the form
"imap://myserver/INBOX.foo", "nnml://mailbox/?nnml-directory=~/foobar"
or whatever. The corresponding url-handler for nnml, imap etc must be
able to somehow return short, quick data for the group (such as number
of read articles). (Is there something to utilize HTTP HEAD in the
url-package?  The nnml url handler might return "X-gnus-read: 42" or
something then.).

The summary buffer also render URLs, now on the form of
"nnml://mailbox/42". Article info (subject, from, to etc) should be
returned in a HTTP HEAD-similar manner too. When fetching the entire
URLs, all data should be MIME tagged (nnml backends only support
message/rfc822 content, but other backends might support other stuff).

While I'm at it, we'd might as well make it work in JEmacs and have
multithreading and cool GUI widgets too.

I'm being quite silly. I'll shut up now. :-)

What gnus should *really* be (was: Re: Probable bug in nnimap)

[Jeff Senn]

Simon Josefsson <jas@pdc.kth.se> writes:
> Kai.Grossjohann@CS.Uni-Dortmund.DE (Kai Grossjohann) writes:
...
> > Yes, it would be useful to think about an ADT `article number' (though
> > number is the wrong word, didn't want to use id lest there be
> > confusion with message id).  What operations does one need on that
> > ADT?  Gnus could then be changed to use that ADT and then the ADT
> > could evolve to accomodate new backends.
> 
> I remember a silly idea I had some time ago, we could use wmperry's
> URL package as an interface to backends, and simply have Gnus be a
> yet-another-generic-url-viewer.
> 
> (w3+Gnus?  That would be the Grand Unified Program, wouldn't it?  Hm.
> GUP.  Sounds nice.)
> 
> Anyway, so, in the group buffer "groups" are simply URLs, on the form
...
> The summary buffer also render URLs, now on the form of
...
> While I'm at it, we'd might as well make it work in JEmacs and have
> multithreading and cool GUI widgets too.
> 
> I'm being quite silly. I'll shut up now. :-)

No-no! not silly. [Well -- the HTTP/URL everything-must-be-a-web-browser 
thing is a bit silly... ;-) ]

Imagine this world:

Each "source of data" (let us call it a "repository"): provides an
interface to data objects.  Each of these objects is pure data -- it
has no "computational interface". Let us use some easy to understand
and flexible form for these objects -- say each one is an extensible
"dictionary", a-list, or a list of name-typed-value pairs (let us call
this data object an "E-form" -- a term coined by the esteemed Michael
Dertouzos).  Further each object should be universally and uniquely
identified by a UUID (not hard -- e.g. the email Message-Id) -- let's
call such objects "U-Forms".

Given such a (wonderful) world where various repositories serve up
pure-data U-Forms, can inform me when they change, edit them on my
behalf, and move them around to manage replication, what do I need for
a UI?

I need a browser/editor for collections of U-Forms (clearly collections
should just be U-Forms themselves), a browser/editor of uform "structure"
(list of attributes), and a browser/editor for large value-blobs of various
types (text, images, {ht,x}ml, sound, ...).

I posit that gnus is very close to this world already (e.g. backend
almost-repositories, group and summary buffer "collection-viewer" (are
they so different?), message buffer) -- so are many other things in
the world: file explorers/filesystems (anyone looked at BeOS lately?),
other e-mail/news clients, SQL/database browsers, OO class browsers...

Slowly, but surely, (although it *is* frustrating sometimes) we are
homing in on a tractable world for managing information...

--
-Jas
---------------------------------------------------------    / / |-/ \ / /|
Jeff Senn           412-488-2900      MAYA Design Group     /|/| |/ o | /-|
Chief Technologist  412-488-2940 fax  2100 Wharton Street  Taming Complexity
Head of R&D         senn@maya.com     Pittsburgh, PA 15203   www.maya.com