From daf194745bc8a9b3b5a1b802beaf0a5f0c81ac1e Mon Sep 17 00:00:00 2001
From: ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Thu, 4 Oct 2018 15:22:53 +0000
Subject: check argument type.

* iseq.c (iseqw_s_compile): check argument type (T_STRING) to
  avoid SEGV.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@64915 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 iseq.c | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'iseq.c')

diff --git a/iseq.c b/iseq.c
index 20c5fff2f2..831a9e8109 100644
--- a/iseq.c
+++ b/iseq.c
@@ -1075,9 +1075,14 @@ iseqw_s_compile(int argc, VALUE *argv, VALUE self)
       case 3: path = argv[--i];
       case 2: file = argv[--i];
     }
+
     if (NIL_P(file)) file = rb_fstring_cstr("<compiled>");
+    if (NIL_P(path)) path = file;
     if (NIL_P(line)) line = INT2FIX(1);
 
+    Check_Type(path, T_STRING);
+    Check_Type(file, T_STRING);
+
     return iseqw_new(rb_iseq_compile_with_option(src, file, path, line, 0, opt));
 }
 
-- 
cgit v1.2.3