term.el (term-emulate-terminal)

[Harry Kuiper]

This bug report will be sent to the Free Software Foundation,
not to your local site managers!
Please write in English, because the Emacs maintainers do not have
translators to read other languages for them.

Your bug report will be posted to the bug-gnu-emacs@gnu.org mailing list,
and to the gnu.emacs.bug news group.

In GNU Emacs 21.2.1 (i686-pc-linux-gnu, X toolkit)
 of 2002-04-13 on mumon
Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: C
  locale-coding-system: nil
  default-enable-multibyte-characters: t

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

After starting term-mode with M-x term the terminal hangs after
handling just a few commands causing Emacs to block and draw 100% CPU.
The more output the command produces the likelier the terminal is to
hang.

Under X: Emacs can not be stopped by typing C-g twice.  Only by
killing it from an Xterminal.

At the console: Emacs stops after typing C-g twice and asks if it
should produce a dump.  I answered yes but then Emacs crashed hard
without producing the dump it promised.

I looked at the diffs between term.el in Emacs-21.1 and Emacs-21.2
using these I backed out the change Eli Zaretskii made at 2002-02-03
(see below, something about matching terminal prompt).  After that
term works OK again for me.

Apart from this little glitch I love Emacs-21.2.  Thanks!

<<<<< Eli's changes I backed out. >>>>>

+ 2002-02-03  Eli Zaretskii  <eliz@is.elta.co.il>
+ 
+       * mail/rmail.el (rmail): Use find-buffer-visiting instead of
+       get-file-buffer to check for rmail buffer existence.
+ 
+       * term.el (term-emulate-terminal): Extract proper command string
+       which is supplied to term-command-hook.
+ 

--- 797,814 ----
*************** See `term-prompt-regexp'."
*** 2856,2864 ****
                            (beep t)) ; Bell
                           ((eq char ?\032)
!                           (let ((end (string-match "\n" str i)))
                              (if end
                                  (progn (funcall term-command-hook
!                                                 (substring str (1+ i) (1- 
end)))
!                                        (setq i end))
                                (setq term-terminal-parameter
                                      (substring str i))
--- 2831,2839 ----
                            (beep t)) ; Bell
                           ((eq char ?\032)
!                           (let ((end (string-match "\r?$" str i)))
                              (if end
                                  (progn (funcall term-command-hook
!                                                 (substring str (1+ i) end))
!                                        (setq i (match-end 0)))
                                (setq term-terminal-parameter
                                      (substring str i))
<<<<< End >>>>>

Recent input:
C-g C-x d t m <tab> <return> C-c $ <down> <down> <down> 
<down> <down> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> D y e s <return> <up> <up> D y 
e s <return> <return> <next> <next> <next> <next> <next> 
<next> <next> q C-/ C-x k <return> <down> <down> <up> 
<up> <up> v C-s C-s t e r m . e l C-s C-s C-s C-s C-s 
C-s C-r C-r C-a C-s C-s C-s C-r C-r C-a C-x 5 b * s 
<tab> <return> <help-echo> <help-echo> <help-echo> 
<help-echo> <menu-bar> <help-menu> <report-emacs-b
ug>

Recent messages:
Undo!
Loading view...done
unzipping emacs-21.1-21.2.diff.gz...done
Loading diff-mode...
Loading easy-mmode...done
Loading diff-mode...done
Type C-h for help, h for commands, q to quit.
Mark saved where search started [2 times]
Loading emacsbug...done
Loading dabbrev...done

-- 
Harry Kuiper                 hkuiper@xs4all.nl
Haarlem, The Netherlands