* file.c (win32_io_info): UTF-8 handling.

unak · unak · commit d1010584b9a7 · 2009-10-15T06:02:51.000Z
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/win32-unicode-test@25349 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
diff --git a/ChangeLog b/ChangeLog
@@ -1,3 +1,7 @@
+Thu Oct 15 15:02:29 2009  NAKAMURA Usaku  <usa@ruby-lang.org>
+
+	* file.c (win32_io_info): UTF-8 handling.
+
 Thu Oct 15 14:52:34 2009  NAKAMURA Usaku  <usa@ruby-lang.org>
 
 	* file.c (rb_str_encode_ospath): no more gurantee that the returned
diff --git a/file.c b/file.c
@@ -806,9 +806,14 @@ w32_io_info(VALUE *file, BY_HANDLE_FILE_INFORMATION *st)
     }
     else {
 	VALUE tmp;
+	WCHAR *ptr;
+	int len;
 	FilePathValue(*file);
 	tmp = rb_str_encode_ospath(*file);
-	f = CreateFileW((WCHAR *)RSTRING_PTR(tmp), 0,
+	len = MultiByteToWideChar(CP_UTF8, 0, RSTRING_PTR(tmp), -1, NULL, 0);
+	ptr = ALLOCA_N(WCHAR, len);
+	MultiByteToWideChar(CP_UTF8, 0, RSTRING_PTR(tmp), -1, ptr, len);
+	f = CreateFileW(ptr, 0,
 			FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING,
 			rb_w32_iswin95() ? 0 : FILE_FLAG_BACKUP_SEMANTICS,
 			NULL);
