トップ «前の日記(2009-10-12) 最新 次の日記(2009-10-14)» 編集

日々の破片

著作一覧

2009-10-13

_ 昨日のやつ

結局、子プロセスの標準出力も読むことにしようとすると、readline内で止まる(拡張ライブラリ内のIOだからだな、多分)ので標準出力を読み切れないし、かといって昨日の状態のままだと、標準出力をまじめに使っているプログラム(たとえばirb)を起動するとプロンプトが表示されなくなるし(ここは原理がまだわかってない)、ftp.exeのようにキーボードを直接読んでいるらしいプログラムを呼び出すと殺されるし(なんとなく理由はわかる)、cmd.exeの内部コマンドを実行するには便利だが、対話型プログラムの実行には向かないことがわかり、がっかりだ。

最終状態

#!/usr/local/bin/ruby -Ks
# coding: cp932
require 'readline'
def mode(m)
  if m == 'vi'
    Readline.vi_editing_mode
  elsif m == 'emacs'  
    Readline.emacs_editing_mode
  end
end
IO.popen("#{ENV['ComSpec']} /A /Q", "w") do |cmd|
  loop do
    buf = Readline.readline('', true)
    if buf.nil?
      cmd.puts "\x1a"
      puts
    else 
      Readline::HISTORY.pop if buf =~ /\A\s*\Z/
      if buf.size == 0
        cmd.puts "\x1a"
      elsif buf == 'exit'
        exit 0
      elsif buf[0] == ?:
        mode buf[1..-1].lstrip
        cmd.puts
      else
        p "-#{buf.length}-#{buf}--" if $DEBUG
        cmd.puts buf
      end
    end
  end
end

2003|06|07|08|09|10|11|12|
2004|01|02|03|04|05|06|07|08|09|10|11|12|
2005|01|02|03|04|05|06|07|08|09|10|11|12|
2006|01|02|03|04|05|06|07|08|09|10|11|12|
2007|01|02|03|04|05|06|07|08|09|10|11|12|
2008|01|02|03|04|05|06|07|08|09|10|11|12|
2009|01|02|03|04|05|06|07|08|09|10|11|12|
2010|01|02|03|04|05|06|07|08|09|10|11|12|
2011|01|02|03|04|05|06|07|08|09|10|11|12|
2012|01|02|03|04|05|06|07|08|09|10|11|12|
2013|01|02|03|04|05|06|07|08|09|10|11|12|
2014|01|02|03|04|05|06|07|08|09|10|11|12|
2015|01|02|03|04|05|06|07|08|09|10|11|12|
2016|01|02|03|04|05|06|07|08|09|10|11|12|
2017|01|02|03|04|05|06|07|08|09|10|11|12|
2018|01|02|03|04|05|06|07|08|09|10|11|12|
2019|01|02|03|04|05|06|07|08|09|10|11|12|
2020|01|02|03|04|05|06|07|08|09|10|11|12|
2021|01|02|03|04|05|06|07|08|09|10|11|12|
2022|01|02|03|04|05|06|07|08|09|10|11|12|
2023|01|02|03|04|05|06|07|08|09|10|11|12|
2024|01|02|03|04|05|06|07|08|09|10|11|12|

ジェズイットを見習え