[ruby-list:15764] Re: ruby debugger (like gdb attach)

青山です。

より手抜きの案としては、ファイルを経由させるというのも思い付きましたが、
それ以前に slang の改善が必要そうです。

リファレンスマニュアルの TCP server の例と、slang のサンプルを組み合わ
せて(test 1)試してみると、サーバーからの反応がありませんでした。test 2
で試してみると、slang が動き出すと他の Thread が止まるようです。

まず、これをなんとかする必要があるように思われます。curses は一部対応
したというような話があったような気がします。get で止まっていたのを少し
なんとかしたというような話だったような。


----- test 1
require "socket"

gs = TCPserver.open(0)
addr = gs.addr
addr.shift
#printf("server is on %d\n", addr.join(":"))

Thread.start do
  while TRUE
    ns = gs.accept
    #print(ns, " is accepted\n")
    Thread.start do
      s = ns                      # save to dynamic variable
      while s.gets
        s.write($_)
      end
      #print(s, " is gone\n")
      s.close
    end
  end
end

term = IO::popen("kterm -e telnet localhost #{gs.addr[1]}")
# ここに sleep 30 とかを入れると、それまでの間は応答があります。

require "slang"
include Slang

slsmg_set_color SL_RED
init_terminal(1, 1)

slsmg_cls

slsmg_gotorc( (sltt_screen_rows-1)/2, (sltt_screen_cols-1)/2-1 )
slsmg_set_color SL_BG_WHITE+SL_RED
slsmg_write_string ">*<"
slsmg_set_color SL_BG_WHITE+SL_BLACK
slsmg_write_string "←ここが真中じゃよ"
slsmg_refresh
slkp_getkey

sl_reset
exit

----- test 2
log = open("test_log", "w")
Thread.start do
  i = 0
  while TRUE
    log.print i += 1, "\n"
    sleep 0.3
  end
end

sleep 3

require "slang"
include Slang

slsmg_set_color SL_RED
init_terminal(1, 1)

slsmg_cls

slsmg_gotorc( (sltt_screen_rows-1)/2, (sltt_screen_cols-1)/2-1 )
slsmg_set_color SL_BG_WHITE+SL_RED
slsmg_write_string ">*<"
slsmg_set_color SL_BG_WHITE+SL_BLACK
slsmg_write_string "←ここが真中じゃよ"
slsmg_refresh
slkp_getkey

sl_reset
exit


-- 
青山 和光 Wakou Aoyama <[e-mail]>