[ruby-dev:13940] IO#read

　IO#read を使って何度もストリームから読み込むような処理をする
とき、今のように毎回文字列オブジェクトを生成してそこに読み込んで
返すのは結構コストが大きいようです。

		*		*		*

　まず、次のスクリプトに 4MB ほどのファイルを食わせて time で
掛かる時間を計測してみました。(もちろんキャッシュが利くように
繰り返しました)

	require 'digest/md5'

	md = Digest::MD5.new
	until STDIN.eof?
	  md << STDIN.read(16384)
	end
	puts md

結果は 4.16 real  2.81 user  1.23 sys でした。


　次に、 IO#read を改造して第二引数にバッファとして使う文字列
オブジェクトを受け付ける(IO#read(len=nil, buf=""))ようにし、
スクリプトを次のように変更して再度計測してみました。(io.c への
パッチは添付)

	require 'digest/md5'

	md = Digest::MD5.new
	buf = ""
	until STDIN.eof?
	  md << STDIN.read(16384, buf)
	end
	puts md

結果は 3.54 real  2.55 user  0.88 sys となり、目に見えて速くなり
ました。

		*		*		*

　そこで質問なのですが、こういうインターフェースは邪道でしょうか？
あるいは IO にバッファをアサインするようなメソッドを考えるべき？

-- 
                     /
                    /__  __            Akinori.org / MUSHA.org
                   / )  )  ) )  /     FreeBSD.org / Ruby-lang.org
Akinori MUSHA aka / (_ /  ( (__(  @ iDaemons.org / and.or.jp

"Freeze this moment a little bit longer, make each impression
  a little bit stronger..  Experience slips away -- Time stand still"

Index: io.c
===================================================================
RCS file: /mirror/ruby/src/ruby/io.c,v
retrieving revision 1.90
diff -u -r1.90 io.c
--- io.c	2001/07/14 15:17:18	1.90
+++ io.c	2001/07/19 15:05:17
@@ -564,7 +564,7 @@
     int n, len;
     VALUE length, str;
 
-    rb_scan_args(argc, argv, "01", &length);
+    rb_scan_args(argc, argv, "02", &length, &str);
     if (NIL_P(length)) {
 	return read_all(io);
     }
@@ -577,7 +577,13 @@
     rb_io_check_readable(fptr);
 
     if (feof(fptr->f)) return Qnil;
-    str = rb_str_new(0, len);
+    if (NIL_P(str)) {
+	str = rb_str_new(0, len);
+    }
+    else {
+	Check_Type(str, T_STRING);
+	rb_str_resize(str, len);
+    }
     if (len == 0) return str;
 
     READ_CHECK(fptr->f);