Re: remote tramp hangs

[Michael Albinus <michael.albinus@gmx.de>]

[-- Attachment #1: Type: text/plain, Size: 1247 bytes --]

raphael.berbain@gmail.com (Raphaël Berbain) writes:

> Hi again,

Hi,

> I tried my use-case with CVS head tramp (tramp-version 2.1.18-pre,
> tramp.el CVS revision 2.757) and I am sorry to report that it doesn't
> work for me.

> 15:06:48.386653 tramp-send-command (6) # exec env ENV='' PROMPT_COMMAND='' PS1=\#\$\  PS2='' PS3='' /bin/sh
> 15:06:48.472304 tramp-wait-for-regexp (6) # 
> exec env ENV='' PROMPT_COMMAND='' PS1=\#\$\  PS2='' PS3='' /bin/sh.
> #$ 

At least, we have fixed the prompt problem :-)

> 15:06:48.533579 tramp-send-command (6) # _echo\b\b\b\b\bstty icanon erase ^H cols 32767_echo\b\b\b\b\b
> 15:06:48.561471 tramp-accept-process-output (10) # 
> _echo\b \b\b \b\b \b\b \b\b \bstty icanon erase ^H cols 32767_echo\b \b\b \b\b \b\b \b\b \b.

Your shell on the remote side cannot suppress echoing the sent
command. Therefore, Tramp applies some special workarounds.

> 15:06:48.746775 tramp-accept-process-output (10) # *tramp/scp root@harry* run
> 15:06:48.811461 tramp-accept-process-output (10) # 
> "OpenBSD 4.5"
> tramp_exit_status 0

Surprisingly, your remote shell stops to echo the sent command. Tramp
looks for the echo, and is confused ...

Could you, please, test the appended fix?

Best regards, Michael.


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Type: text/x-patch, Size: 1065 bytes --]

*** /home/albinus/src/tramp/lisp/tramp.el.~2.757.~	2009-12-09 10:06:48.000000000 +0100
--- /home/albinus/src/tramp/lisp/tramp.el	2009-12-15 07:18:45.000000000 +0100
***************
*** 6562,6568 ****
  	  (delete-region begin (point))
  	  (goto-char (point-min)))))
  
!     (when (not (tramp-get-connection-property proc "check-remote-echo" nil))
        ;; No echo to be handled, now we can look for the regexp.
        (goto-char (point-min))
        (re-search-forward regexp nil t))))
--- 6562,6573 ----
  	  (delete-region begin (point))
  	  (goto-char (point-min)))))
  
!     (when (or (not (tramp-get-connection-property proc "check-remote-echo" nil))
! 	      ;; Sometimes, the echo string is suppressed on the remote side.
! 	      (not (string-equal
! 		    (substring-no-properties
! 		     tramp-echo-mark-marker 0 (min 5 (1- (point-max))))
! 		    (buffer-substring-no-properties 1 (min 6 (point-max))))))
        ;; No echo to be handled, now we can look for the regexp.
        (goto-char (point-min))
        (re-search-forward regexp nil t))))