[ruby-dev:31172] Re: 構造体オブジェクトのcloneメソッド呼び出しでメモリリーク発生

なかだです。

At Mon, 9 Jul 2007 23:19:10 +0900,
Mitsuhiko OHKUBO wrote in [ruby-dev:31170]:
> > > 【回避策】
> > > 次の修正で現象が発生しないことを確認（ただし、適切ではない）。
> > 
> > 「適切ではない」というのは、Structのサイズが変わること自体がお
> > かしい、という意味でしょうか。それを許容するとすれば、正しい修
> > 正だと思いますが。
>     いいえ、そうではありません。
>     意図どおりに表現できてなくてすみません。本意は「『回避策の内
> 容が』適切ではない『かもしれない』」でした。

その後考えてみたのですが、Structのサイズは通常変更不可能なこと
から、エラーにすべきではないかという気がして来ました。


Index: stable/struct.c
===================================================================
--- stable/struct.c	(revision 12726)
+++ stable/struct.c	(working copy)
@@ -558,6 +558,7 @@ rb_struct_init_copy(copy, s)
 	rb_raise(rb_eTypeError, "wrong argument class");
     }
-    RSTRUCT(copy)->ptr = ALLOC_N(VALUE, RSTRUCT(s)->len);
-    RSTRUCT(copy)->len = RSTRUCT(s)->len;
+    if (RSTRUCT(copy)->len != RSTRUCT(s)->len) {
+	rb_raise(rb_eTypeError, "struct size mismatch");
+    }
     MEMCPY(RSTRUCT(copy)->ptr, RSTRUCT(s)->ptr, VALUE, RSTRUCT(copy)->len);
 
Index: trunk/struct.c
===================================================================
--- trunk/struct.c	(revision 12726)
+++ trunk/struct.c	(working copy)
@@ -516,11 +516,6 @@ rb_struct_init_copy(VALUE copy, VALUE s)
 	rb_raise(rb_eTypeError, "wrong argument class");
     }
-    if (0 < RSTRUCT_LEN(s) && RSTRUCT_LEN(s) <= RSTRUCT_EMBED_LEN_MAX) {
-        RBASIC(copy)->flags &= ~RSTRUCT_EMBED_LEN_MASK;
-        RBASIC(copy)->flags |= RSTRUCT_LEN(s) << RSTRUCT_EMBED_LEN_SHIFT;
-    }
-    else {
-	RSTRUCT(copy)->as.heap.ptr = ALLOC_N(VALUE, RSTRUCT_LEN(s));
-	RSTRUCT(copy)->as.heap.len = RSTRUCT_LEN(s);
+    if (RSTRUCT_LEN(copy) != RSTRUCT_LEN(s)) {
+	rb_raise(rb_eTypeError, "struct size mismatch");
     }
     MEMCPY(RSTRUCT_PTR(copy), RSTRUCT_PTR(s), VALUE, RSTRUCT_LEN(copy));


-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦