From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/28754 Path: main.gmane.org!not-for-mail From: Janne Rinta-Manty Newsgroups: gmane.emacs.gnus.general Subject: Re: B c with nnimap: extra newlines Date: Fri, 14 Jan 2000 12:05:53 GMT Organization: "SunSITE Denmark -- sunsite.auc.dk Sender: owner-ding@hpc.uh.edu Message-ID: References: NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit X-Trace: main.gmane.org 1035165545 31485 80.91.224.250 (21 Oct 2002 01:59:05 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 01:59:05 +0000 (UTC) Return-Path: Original-Received: from spinoza.math.uh.edu (spinoza.math.uh.edu [129.7.128.18]) by mailhost.sclp.com (Postfix) with ESMTP id C2964D051E for ; Fri, 14 Jan 2000 07:13:59 -0500 (EST) Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5]) by spinoza.math.uh.edu (8.9.1/8.9.1) with ESMTP id GAB08659; Fri, 14 Jan 2000 06:10:26 -0600 (CST) Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Fri, 14 Jan 2000 06:07:43 -0600 (CST) Original-Received: from mailhost.sclp.com (postfix@sclp3.sclp.com [204.252.123.139]) by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id GAA21843 for ; Fri, 14 Jan 2000 06:07:30 -0600 (CST) Original-Received: from sunsite.auc.dk (sunsite.auc.dk [130.225.51.30]) by mailhost.sclp.com (Postfix) with SMTP id 9AC18D051E for ; Fri, 14 Jan 2000 07:05:55 -0500 (EST) Original-Received: (qmail 21376 invoked by uid 509); 14 Jan 2000 12:05:54 -0000 Original-To: ding@gnus.org Original-Path: not-for-mail Original-Newsgroups: emacs.ding Original-Lines: 102 User-Agent: Gnus/5.0803 (Gnus v5.8.3) Emacs/20.3 Original-NNTP-Posting-Host: 128.214.48.213 Original-X-Trace: twister.sunsite.auc.dk 947851553 128.214.48.213 (Fri, 14 Jan 2000 13:05:53 MET) Original-NNTP-Posting-Date: Fri, 14 Jan 2000 13:05:53 MET Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:28754 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:28754 Simon Josefsson 2000-01-13T16:14:25Z: SJ> Are you using SSH port-forwarding? Perhaps it doesn't preserve SJ> CRLF? Was that the reason for changing `imap-client-eol'? No port-forwarding - I added ssh straight into imap streams (mostly by adapting code from the other streams' functions). The reason for changing imap-client-eol was that commands sent to the server with "\r\n" didn't work but "\n" was OK. I suspect there must be something wrong with my hack then? (BTW the SSH connection is pre-authenticated.) (defvar imap-ssh-program "ssh -p %p %s exec /etc/rimapd" "Program for SSH connection. The %s is replaced with server and %p with port.") (setq imap-streams '(ssh kerberos4 ssl network)) (setq imap-stream-alist '((ssh imap-ssh-p imap-ssh-open) (kerberos4 imap-kerberos4s-p imap-kerberos4-open) (ssl imap-ssl-p imap-ssl-open) (network imap-network-p imap-network-open))) (setq nnimap-stream 'ssh) (setq nnimap-authenticator 'ssh) (setq imap-authenticators '(ssh kerberos4 cram-md5 login anonymous)) (setq imap-authenticator-alist '((ssh imap-ssha-p imap-ssh-auth) (kerberos4 imap-kerberos4a-p imap-kerberos4-auth) (cram-md5 imap-cram-md5-p imap-cram-md5-auth) (login imap-login-p imap-login-auth) (anonymous imap-anonymous-p imap-anonymous-auth))) (defun imap-ssha-p (buffer) t) (defun imap-ssh-auth (buffer) (eq imap-stream 'ssh)) (defconst imap-default-ssh-port 22) (defun imap-ssh-p (buffer) t) (defun imap-ssh-open (name buffer server port) (message "imap: Opening ssh connection to %s..." server) (let* ((port (or port imap-default-ssh-port)) (coding-system-for-read imap-coding-system-for-read) (coding-system-for-write imap-coding-system-for-write) (process (start-process name buffer shell-file-name shell-command-switch (format-spec imap-ssh-program (format-spec-make ?s server ?p (number-to-string port)))))) (when process (with-current-buffer buffer (goto-char (point-min)) (while (and (memq (process-status process) '(open run)) (goto-char (point-max)) (forward-line -1) (not (imap-parse-greeting))) (accept-process-output process 1) (sit-for 1)) (and imap-log (with-current-buffer (get-buffer-create imap-log) (imap-disable-multibyte) (buffer-disable-undo) (goto-char (point-max)) (insert-buffer-substring buffer))) (erase-buffer)) (when (memq (process-status process) '(open run)) process)))) SJ> Anyway, I think there was a bug involved when modifying SJ> `imap-client-eol'. Could you please back out your patch and test SJ> this instead? Ok, tested it, and it made gnus hang (waiting for something from IMAP server?) when I tried to copy a message. Pressed C-g and tried to quit the group with Q (q made it hang again), and got this: Signaling: (error "Internal error, tag 570 status BAD code nil text Argument given to APPEND when none expected") signal(error ("Internal error, tag 570 status BAD code nil text Argument given to APPEND when none expected")) error("Internal error, tag %s status %s code %s text %s" 570 BAD nil "Argument given to APPEND when none expected") imap-parse-response() imap-arrival-filter(# "570 BAD Argument given to APPEND when none expected \n") accept-process-output(# 1) imap-wait-for-tag(573 nil) imap-send-command-wait("SELECT \"Mail/fetchmail\"") imap-mailbox-select-1("Mail/fetchmail" nil) imap-mailbox-select("Mail/fetchmail") nnimap-possibly-change-group("Mail/fetchmail" "porsta") nnimap-close-group("Mail/fetchmail" "porsta") gnus-close-group("nnimap+porsta:Mail/fetchmail") gnus-summary-exit-no-update() * call-interactively(gnus-summary-exit-no-update) -- Janne Rinta-Mänty