bug#18420: 24.3; interaction with external process hangs emacs

[Stephen Leake]

A few more data points:

- The hang occurs with emacs -Q

- The hang does not occur with Cygwin Emacs 23.4 (so I can debug the
  external process, at least :)

- I've built Emacs 23.3.93 pretest from source, with debugging
  information. The hang occurs there, and an attached debugger shows a
  full stack trace when it hangs:

(gdb) thread 1
[Switching to thread 1 (Thread 5552.0x864)]
#0  0x7709f93d in ntdll!ZwWriteFile () from C:\Windows\SysWOW64\ntdll.dll
(gdb) where
#0  0x7709f93d in ntdll!ZwWriteFile () from C:\Windows\SysWOW64\ntdll.dll
#1  0x755912cc in WriteFile () from C:\Windows\syswow64\kernel32.dll
#2  0x74b94035 in msvcrt!fprintf () from C:\Windows\syswow64\msvcrt.dll
#3  0x74b940eb in write () from C:\Windows\syswow64\msvcrt.dll
#4  0x01184f8f in sys_write (fd=<optimized out>, fd@entry=8, 
    buffer=<optimized out>, buffer@entry=0xff1b00c, count=8969928, 
    count@entry=7273) at w32.c:8337
#5  0x010b12a8 in emacs_full_write (fildes=8, 
    buf=buf@entry=0xff1b00c "--  Abstract :\n--\n--  Emacs background process 
for Ada mode; parse buffer text, return wisi Actions.\n--\n--  Copyright (C) 
2014  All Rights Reserved.\n--\n--  This program is free software; you can 
redis"..., nbyte=nbyte@entry=7273, process_signals=true) at sysdep.c:2297
#6  0x010b23f9 in emacs_write_sig (fildes=<optimized out>, 
    buf=buf@entry=0xff1b00c, nbyte=nbyte@entry=7273) at sysdep.c:2334
#7  0x01141f75 in send_process (proc=267455925, buf=<optimized out>, 
    len=<optimized out>, object=<optimized out>, object@entry=266841793)
    at process.c:5528
#8  0x01142325 in Fprocess_send_string (process=267455925, string=266841793)
    at process.c:5645
#9  0x01105430 in Ffuncall (nargs=nargs@entry=3, args=args@entry=0x88e8d4)
    at eval.c:2818
#10 0x0113890f in exec_byte_code (bytestr=<optimized out>, vector=260525805, 
    maxdepth=16, args_template=81815586, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x0) at bytecode.c:916
#11 0x01104ed5 in funcall_lambda (fun=260521925, nargs=nargs@entry=0, 
    arg_vector=arg_vector@entry=0x88ea38) at eval.c:3049
#12 0x0110521b in Ffuncall (nargs=nargs@entry=1, args=args@entry=0x88ea34)
    at eval.c:2876
#13 0x0113890f in exec_byte_code (bytestr=<optimized out>, vector=260529781, 
    maxdepth=20, args_template=81815586, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x0) at bytecode.c:916
#14 0x01104ed5 in funcall_lambda (fun=260526045, nargs=nargs@entry=0, 
    arg_vector=arg_vector@entry=0x88eb98) at eval.c:3049
#15 0x0110521b in Ffuncall (nargs=nargs@entry=1, args=args@entry=0x88eb94)
    at eval.c:2876
#16 0x0113890f in exec_byte_code (bytestr=<optimized out>, vector=255630965, 
    maxdepth=16, args_template=81815586, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x0) at bytecode.c:916
#17 0x01104ed5 in funcall_lambda (fun=255565773, nargs=nargs@entry=0, 
    arg_vector=arg_vector@entry=0x88ecf8) at eval.c:3049
#18 0x0110521b in Ffuncall (nargs=nargs@entry=1, args=args@entry=0x88ecf4)
    at eval.c:2876
#19 0x0113890f in exec_byte_code (bytestr=<optimized out>, 
    bytestr@entry=266875825, vector=vector@entry=255565797, 
    maxdepth=maxdepth@entry=8, args_template=81815586, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x0) at bytecode.c:916
#20 0x0113b418 in Fbyte_code (bytestr=266875825, vector=255565797, maxdepth=8)
    at bytecode.c:482
#21 0x011048a7 in eval_sub (form=264366286) at eval.c:2191
#22 0x01107b66 in internal_lisp_condition_case (var=83517026, 
    bodyform=<optimized out>, handlers=<optimized out>) at eval.c:1323
#23 0x01139983 in exec_byte_code (bytestr=<optimized out>, vector=255631045, 
    maxdepth=24, args_template=81815586, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x0) at bytecode.c:1162
#24 0x01104ed5 in funcall_lambda (fun=255631149, nargs=nargs@entry=1, 
    arg_vector=arg_vector@entry=0x88f028) at eval.c:3049
#25 0x0110521b in Ffuncall (nargs=nargs@entry=2, args=args@entry=0x88f024)
    at eval.c:2876
#26 0x0113890f in exec_byte_code (bytestr=<optimized out>, vector=255917973, 
    maxdepth=8, args_template=81815586, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x0) at bytecode.c:916
#27 0x01104ed5 in funcall_lambda (fun=255917989, nargs=nargs@entry=0, 
    arg_vector=arg_vector@entry=0x88f194) at eval.c:3049
#28 0x0110521b in Ffuncall (nargs=nargs@entry=1, args=args@entry=0x88f190)
    at eval.c:2876
#29 0x01106837 in apply1 (fn=fn@entry=263136994, arg=arg@entry=81815586)
    at eval.c:2581
#30 0x0110140f in Fcall_interactively (function=263136994, 
    record_flag=84547650, keys=81836917) at callint.c:378
#31 0x01105419 in Ffuncall (nargs=nargs@entry=4, args=args@entry=0x88f2ac)
    at eval.c:2822
#32 0x0113890f in exec_byte_code (bytestr=<optimized out>, vector=19070677, 
    maxdepth=52, args_template=args_template@entry=4100, nargs=nargs@entry=2, 
    args=<optimized out>, args@entry=0x88f428) at bytecode.c:916
#33 0x01104f62 in funcall_lambda (fun=19070637, nargs=nargs@entry=2, 
    arg_vector=arg_vector@entry=0x88f428) at eval.c:2983
#34 0x0110521b in Ffuncall (nargs=nargs@entry=3, args=args@entry=0x88f424)
    at eval.c:2876
#35 0x0113890f in exec_byte_code (bytestr=<optimized out>, vector=19070349, 
    maxdepth=60, args_template=args_template@entry=2052, nargs=nargs@entry=2, 
    args=<optimized out>, args@entry=0x88f594) at bytecode.c:916
#36 0x01104f62 in funcall_lambda (fun=19070301, nargs=nargs@entry=2, 
    arg_vector=arg_vector@entry=0x88f594) at eval.c:2983
#37 0x0110521b in Ffuncall (nargs=3, args=args@entry=0x88f590) at eval.c:2876
#38 0x01106613 in Fapply (nargs=nargs@entry=2, args=args@entry=0x88f5f8)
    at eval.c:2354
#39 0x0110681f in apply1 (fn=fn@entry=82018402, arg=arg@entry=263985686)
    at eval.c:2588
#40 0x0110140f in Fcall_interactively (function=82018402, 
    record_flag=81815586, keys=81836917) at callint.c:378
#41 0x01105419 in Ffuncall (nargs=nargs@entry=4, args=args@entry=0x88f72c)
    at eval.c:2822
#42 0x0113890f in exec_byte_code (bytestr=<optimized out>, vector=19070677, 
    maxdepth=52, args_template=args_template@entry=4100, nargs=nargs@entry=1, 
    args=<optimized out>, args@entry=0x88f89c) at bytecode.c:916
#43 0x01104f62 in funcall_lambda (fun=19070637, nargs=nargs@entry=1, 
    arg_vector=arg_vector@entry=0x88f89c) at eval.c:2983
#44 0x0110521b in Ffuncall (nargs=nargs@entry=2, args=args@entry=0x88f898)
    at eval.c:2876
#45 0x01105587 in call1 (fn=81861730, arg1=82018402) at eval.c:2614
#46 0x010a73e7 in command_loop_1 () at keyboard.c:1559
#47 0x01103963 in internal_condition_case (
    bfun=bfun@entry=0x10a70c0 <command_loop_1>, handlers=81867042, 
    hfun=hfun@entry=0x109ed50 <cmd_error>) at eval.c:1354
#48 0x0109a610 in command_loop_2 (ignore=81815586) at keyboard.c:1177
#49 0x0110386d in internal_catch (tag=81862402, 
    func=func@entry=0x109a5f0 <command_loop_2>, arg=81815586) at eval.c:1118
#50 0x0109e9ba in command_loop () at keyboard.c:1156
#51 recursive_edit_1 () at keyboard.c:777
#52 0x0109ec8e in Frecursive_edit () at keyboard.c:848
#53 0x011b7dd8 in main (argc=<optimized out>, argv=0xd31b40) at emacs.c:1646

Is there any way to get lisp names from the Ffuncall entries? That would
be nice.

-- 
-- Stephe