Posted to tcl by emiliano at Wed Sep 21 15:37:37 GMT 2011view raw

  1. Trunk compiled with --enable-symbols=mem. Platform is netbsd amd-64
  2.  
  3. crash.tcl
  4. ===============================================================
  5. set fdin [open sample.wav]
  6. set fdout [open /dev/audio w]
  7. chan configure $fdin -translation binary -encoding binary
  8. chan configure $fdout -translation binary -encoding binary
  9.  
  10. # prepare the audio device
  11. exec audioctl -w play.encoding=slinear_le play.rate=44100 \
  12. play.precision=16 play.channels=2
  13. # listen only the last few seconds
  14. chan seek $fdin [expr {4 * 10000000}]
  15. chan copy $fdin $fdout
  16. vwait foo
  17. ===============================================================
  18.  
  19. emiliano@beaujolais:~/src/fossil/sunaudio$ tclsh8.6 crash.tcl
  20. Fallo de segmentación (`core' generado)
  21. emiliano@beaujolais:~/src/fossil/sunaudio$ gdb tclsh8.6 -core tclsh8.6.core
  22. GNU gdb 6.5
  23. Copyright (C) 2006 Free Software Foundation, Inc.
  24. GDB is free software, covered by the GNU General Public License, and you are
  25. welcome to change it and/or distribute copies of it under certain conditions.
  26. Type "show copying" to see the conditions.
  27. There is absolutely no warranty for GDB. Type "show warranty" for details.
  28. This GDB was configured as "x86_64--netbsd"...
  29. Reading symbols from /usr/local/lib/libtcl8.6.so...done.
  30. Loaded symbols for /usr/local/lib/libtcl8.6.so
  31. Reading symbols from /usr/lib/libz.so.1...done.
  32. Loaded symbols for /usr/lib/libz.so.1
  33. Reading symbols from /usr/lib/libpthread.so.1...done.
  34. Loaded symbols for /usr/lib/libpthread.so.1
  35. Reading symbols from /usr/lib/libm.so.0...done.
  36. Loaded symbols for /usr/lib/libm.so.0
  37. Reading symbols from /usr/lib/libc.so.12...done.
  38. Loaded symbols for /usr/lib/libc.so.12
  39. Reading symbols from /usr/libexec/ld.elf_so...done.
  40. Loaded symbols for /usr/libexec/ld.elf_so
  41. Core was generated by `tclsh8.6'.
  42. Program terminated with signal 11, Segmentation fault.
  43. #0 0x00007f7ff78ede46 in CopyData (csPtr=0x7f7ff7311038, mask=2)
  44. at /home/emiliano/src/fossil/tcl/generic/tclIO.c:9120
  45. 9120 inStatePtr = csPtr->readPtr->state;
  46. (gdb) bt
  47. #0 0x00007f7ff78ede46 in CopyData (csPtr=0x7f7ff7311038, mask=2)
  48. at /home/emiliano/src/fossil/tcl/generic/tclIO.c:9120
  49. #1 0x00007f7ff78ef22c in CopyEventProc (clientData=0x7f7ff7311038, mask=2)
  50. at /home/emiliano/src/fossil/tcl/generic/tclIO.c:9977
  51. #2 0x00007f7ff78ed05b in Tcl_NotifyChannel (channel=0x7f7ff7306038, mask=2)
  52. at /home/emiliano/src/fossil/tcl/generic/tclIO.c:8290
  53. #3 0x00007f7ff7962c7f in FileHandlerEventProc (evPtr=0x7f7ff731d7d8, flags=-3)
  54. at /home/emiliano/src/fossil/tcl/unix/tclUnixNotfy.c:652
  55. #4 0x00007f7ff790f446 in Tcl_ServiceEvent (flags=-3)
  56. at /home/emiliano/src/fossil/tcl/generic/tclNotify.c:670
  57. #5 0x00007f7ff790f8ab in Tcl_DoOneEvent (flags=-3)
  58. at /home/emiliano/src/fossil/tcl/generic/tclNotify.c:971
  59. #6 0x00007f7ff78c174b in Tcl_VwaitObjCmd (clientData=0x0,
  60. interp=0x7f7ff7730838, objc=2, objv=0x7f7ff7740320)
  61. at /home/emiliano/src/fossil/tcl/generic/tclEvent.c:1413
  62. #7 0x00007f7ff783fd58 in TclNREvalObjv (interp=0x7f7ff7730838, objc=2,
  63. objv=0x7f7ff7740320, flags=2097152, cmdPtr=0x7f7ff7746db8)
  64. at /home/emiliano/src/fossil/tcl/generic/tclBasic.c:4273
  65. #8 0x00007f7ff783f7e5 in Tcl_EvalObjv (interp=0x7f7ff7730838, objc=2,
  66. objv=0x7f7ff7740320, flags=2097152)
  67. at /home/emiliano/src/fossil/tcl/generic/tclBasic.c:4106
  68. #9 0x00007f7ff7841b73 in TclEvalEx (interp=0x7f7ff7730838,
  69. script=0x7f7ff73091b8 "set fdin [open sample.wav]\nset fdout [open /dev/audio w]\n\nchan configure $fdin -translation binary -encoding binary\nchan configure $fdout -translation binary -encoding binary\n\nexec audioctl -w play.e"...,
  70. numBytes=346, flags=0, line=12, clNextOuter=0x0,
  71. outerScript=0x7f7ff73091b8 "set fdin [open sample.wav]\nset fdout [open /dev/audio w]\n\nchan configure $fdin -translation binary -encoding binary\nchan configure $fdout -translation binary -encoding binary\n\nexec audioctl -w play.e"...) at /home/emiliano/src/fossil/tcl/generic/tclBasic.c:5213
  72. #10 0x00007f7ff7840f65 in Tcl_EvalEx (interp=0x7f7ff7730838,
  73. script=0x7f7ff73091b8 "set fdin [open sample.wav]\nset fdout [open /dev/audio w]\n\nchan configure $fdin -translation binary -encoding binary\nchan configure $fdout -translation binary -encoding binary\n\nexec audioctl -w play.e"...,
  74. numBytes=346, flags=0)
  75. at /home/emiliano/src/fossil/tcl/generic/tclBasic.c:4871
  76. #11 0x00007f7ff78fe2dd in Tcl_FSEvalFileEx (interp=0x7f7ff7730838,
  77. pathPtr=0x7f7ff77c1938, encodingName=0x0)
  78. at /home/emiliano/src/fossil/tcl/generic/tclIOUtil.c:1751
  79. #12 0x00007f7ff7907c87 in Tcl_MainEx (argc=-1, argv=0x7f7fffffdb28,
  80. appInitProc=0x400b5e <Tcl_AppInit>, interp=0x7f7ff7730838)
  81. at /home/emiliano/src/fossil/tcl/generic/tclMain.c:407
  82. #13 0x0000000000400b52 in main (argc=2, argv=0x7f7fffffdb18)
  83. at /home/emiliano/src/fossil/tcl/unix/tclAppInit.c:84