[ruby-dev:12706] rb_include_module (SAFE LEVEL)

トップレベルでモジュールをインクルードするときは
セーフレベルのチェックが入りますが、
append_featuresメソッドを使ってObjectに対して
インクルードを行った場合はチェックが入っていません。

class Module
  public :append_features
end

module M
  def foo; end
end

$SAFE = 4
# include M
M::append_features(Object)
foo    # => OK!


--- class.c.orig	Wed Mar 28 17:43:24 2001
+++ class.c	Fri Mar 30 15:26:41 2001
@@ -224,6 +224,10 @@
 
     if (NIL_P(module)) return;
     if (klass == module) return;
+    rb_frozen_class_p(klass);
+    if (klass == rb_cObject) {
+      rb_secure(4);
+    }
 
     switch (TYPE(module)) {
       case T_MODULE:
@@ -246,7 +250,6 @@
 		return;
 	    }
 	}
-	rb_frozen_class_p(klass);
 	RCLASS(klass)->super = include_class_new(module, RCLASS(klass)->super);
 	klass = RCLASS(klass)->super;
 	module = RCLASS(module)->super;
----
小迫＠ソフネック   渋谷区恵比寿1-15-1