[ruby-dev:11312] confused error message on Windows 2000

小松です。

Windows 2000では、FormatMessage()がWinsockのエラー文字列も返すように
なったのですが、mswin32版のrubyを80x25のコマンドプロンプトで動かすと、
[変更前]のように"\r"でメッセージの一部が消えたり、"connect(2)"が後から
表示されたりとメッセージが混乱してしまいました。

どうも"\r"や"\n"でどこかのバッファリングが混乱しているみたいなのですが、
FormatMessage()の結果の最後に改行が入っているのをそのまま返しているのが
悪いということにして、win32/win32.cのmystrerror()を変更してみました。

[変更前]
C:\lang\ruby>ver

Microsoft Windows 2000 [Version 5.00.2195]

C:\lang\ruby>type test.rb
require 'socket'
p TCPsocket.new('localhost', 9999)

C:\lang\ruby>ruby -v
ruby 1.6.2 (2000-10-25) [i586-mswin32]

C:\lang\ruby>ruby test.rb
test.rb:2:in `new': 対象のコンピュータによって拒否されたため、接続できませんでし
 (Errno::E10061)
 - "connect(2)"
	from test.rb:2

C:\lang\ruby>ruby test.rb > out1 2>&1

C:\lang\ruby>hd out1
00000000  74 65 73 74 2E 72 62 3A  32 3A 69 6E 20 60 6E 65  test.rb:2:in `ne
00000010  77 27 3A 20 91 CE 8F DB  82 CC 83 52 83 93 83 73  w': 対象のコンピ
00000020  83 85 81 5B 83 5E 82 C9  82 E6 82 C1 82 C4 8B 91  ュータによって拒
00000030  94 DB 82 B3 82 EA 82 BD  82 BD 82 DF 81 41 90 DA  否されたため、接
00000040  91 B1 82 C5 82 AB 82 DC  82 B9 82 F1 82 C5 82 B5  続できませんでし
00000050  82 BD 81 42 0D 20 28 45  72 72 6E 6F 3A 3A 45 31  た。. (Errno::E1
00000060  30 30 36 31 29 0D 0A 20  2D 20 22 63 6F 6E 6E 65  0061).. - "conne
00000070  63 74 28 32 29 22 0D 0A  09 66 72 6F 6D 20 74 65  ct(2)"...from te
00000080  73 74 2E 72 62 3A 32 0D  0A                       st.rb:2..

C:\lang\ruby>

[変更後]
C:\lang\ruby>ruby test.rb
test.rb:2:in `new': 対象のコンピュータによって拒否されたため、接続できませんでし
た。 - "connect(2)" (Errno::E10061)
	from test.rb:2

C:\lang\ruby>ruby test.rb > out2 2>&1

C:\lang\ruby>hd out2
00000000  74 65 73 74 2E 72 62 3A  32 3A 69 6E 20 60 6E 65  test.rb:2:in `ne
00000010  77 27 3A 20 91 CE 8F DB  82 CC 83 52 83 93 83 73  w': 対象のコンピ
00000020  83 85 81 5B 83 5E 82 C9  82 E6 82 C1 82 C4 8B 91  ュータによって拒
00000030  94 DB 82 B3 82 EA 82 BD  82 BD 82 DF 81 41 90 DA  否されたため、接
00000040  91 B1 82 C5 82 AB 82 DC  82 B9 82 F1 82 C5 82 B5  続できませんでし
00000050  82 BD 81 42 20 2D 20 22  63 6F 6E 6E 65 63 74 28  た。 - "connect(
00000060  32 29 22 20 28 45 72 72  6E 6F 3A 3A 45 31 30 30  2)" (Errno::E100
00000070  36 31 29 0D 0A 09 66 72  6F 6D 20 74 65 73 74 2E  61)...from test.
00000080  72 62 3A 32 0D 0A                                 rb:2..

C:\lang\ruby>

diff -ru1p ruby-1.6.2.dist/win32/win32.c ruby-1.6.2/win32/win32.c
--- ruby-1.6.2.dist/win32/win32.c	Mon Oct  2 16:48:42 2000
+++ ruby-1.6.2/win32/win32.c	Sun Oct 29 22:40:07 2000
@@ -1726,4 +1726,4 @@ myfdclose(FILE *fp)
 
-char * 
-mystrerror(int e) 
+char *
+mystrerror(int e)
 {
@@ -1734,2 +1734,3 @@ mystrerror(int e) 
     DWORD source = 0;
+    char *p;
 
@@ -1740,3 +1741,7 @@ mystrerror(int e) 
 			  buffer, 512, NULL) == 0) {
-	    strcpy (buffer, "Unknown Error");
+	    strcpy(buffer, "Unknown Error");
+	}
+	for (p = buffer + strlen(buffer) - 1; buffer <= p; p--) {
+	    if (*p != '\r' && *p != '\n') break;
+	    *p = 0;
 	}
@@ -1745,3 +1750,2 @@ mystrerror(int e) 
     return strerror(e);
-	
 }

--
小松克行 / Katsuyuki Komatsu <[e-mail]>