[ruby-dev:26587] Re: SystemCallError.new("abc") => #<SystemCallError: unknown error - ab>

山本です。

さらに手抜きですが、vsnprintf が C99 準拠であれば、こんな方法もあるようです。

http://ktarn.www.linux.or.jp/JM/html/LDP_man-pages/man3/printf.3.html

によると SUSv2 では「size に 0 を指定すると必要サイズが得られる」機能は
ないらしいのですが、Borland 純正の vsnprintf は C99 に準拠している
ようでこれで動きました。ruby の使ってる　vsnprintf は -1 を返すので
SUSv2 準拠のようですね。

# 二度 vsnprintf を呼ぶのがいかにも遅そうですが、realloc が必要ない分、
# あるいは・・・

Index: error.c
===================================================================
RCS file: /src/ruby/error.c,v
retrieving revision 1.114
diff -u -w -b -p -r1.114 error.c
--- error.c	20 Jul 2005 01:08:13 -0000	1.114
+++ error.c	20 Jul 2005 13:03:52 -0000
@@ -956,14 +956,9 @@ syserr_initialize(argc, argv, self)
     else err = "unknown error";
     if (!NIL_P(mesg)) {
 	VALUE str = mesg;
-	size_t len;
-
 	StringValue(str);
-	len = strlen(err)+RSTRING(str)->len+3;
-	mesg = rb_str_new(0, len);
-	snprintf(RSTRING(mesg)->ptr, len+1, "%s - %.*s", err,
+	mesg = rb_sprintf("%s - %.*s", err,
 		(int)RSTRING(str)->len, RSTRING(str)->ptr);
-	RSTRING(mesg)->len = strlen(RSTRING(mesg)->ptr);
     }
     else {
 	mesg = rb_str_new2(err);
Index: intern.h
===================================================================
RCS file: /src/ruby/intern.h,v
retrieving revision 1.172
diff -u -w -b -p -r1.172 intern.h
--- intern.h	14 Jul 2005 15:11:52 -0000	1.172
+++ intern.h	20 Jul 2005 12:45:40 -0000
@@ -490,6 +490,7 @@ void rb_str_associate _((VALUE, VALUE));
 VALUE rb_str_associated _((VALUE));
 void rb_str_setter _((VALUE, ID, VALUE*));
 VALUE rb_str_intern _((VALUE));
+VALUE rb_sprintf __((const char*, ...));
 /* struct.c */
 VALUE rb_struct_new __((VALUE, ...));
 VALUE rb_struct_define __((const char*, ...));
Index: string.c
===================================================================
RCS file: /src/ruby/string.c,v
retrieving revision 1.230
diff -u -w -b -p -r1.230 string.c
--- string.c	4 Mar 2005 06:47:41 -0000	1.230
+++ string.c	20 Jul 2005 13:11:22 -0000
@@ -25,6 +25,14 @@
 #include <unistd.h>
 #endif
 
+#ifdef HAVE_STDARG_PROTOTYPES
+#include <stdarg.h>
+#define va_init_list(a,b) va_start(a,b)
+#else
+#include <varargs.h>
+#define va_init_list(a,b) va_start(a)
+#endif
+
 VALUE rb_cString;
 
 #define STR_TMPLOCK FL_USER1
@@ -462,6 +470,31 @@ rb_str_format(str, arg)
     return rb_f_sprintf(2, argv);
 }
 
+#undef vsnprintf /* use platform vsnprintf */
+
+VALUE
+#ifdef HAVE_STDARG_PROTOTYPES
+rb_sprintf(const char *fmt, ...)
+#else
+rb_sprintf(format, va_alist)
+    const char *fmt;
+    va_dcl
+#endif
+{
+    VALUE str;
+    int len;
+    va_list args;
+
+    va_init_list(args, fmt);
+    len = vsnprintf(NULL, 0, fmt, args);
+    str = rb_str_new(0, len);
+    vsnprintf(RSTRING(str)->ptr, len+1, fmt, args);
+    RSTRING(str)->len = strlen(RSTRING(str)->ptr);
+    va_end(args);
+
+    return str;
+}
+
 static int
 str_independent(str)
     VALUE str;