* parse.y (regexp): fix /#{}\xa1\xa2/e to be EUC-JP.

(reg_fragment_setenc_gen): extracted from reg_compile_gen.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@14075 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
akr 2007-12-02 00:16:24 +00:00
Родитель 5a930580c9
Коммит 21729a1c77
3 изменённых файлов: 32 добавлений и 3 удалений

Просмотреть файл

@ -1,3 +1,8 @@
Sun Dec 2 09:12:48 2007 Tanaka Akira <akr@fsij.org>
* parse.y (regexp): fix /#{}\xa1\xa2/e to be EUC-JP.
(reg_fragment_setenc_gen): extracted from reg_compile_gen.
Sun Dec 2 01:39:51 2007 Tanaka Akira <akr@fsij.org> Sun Dec 2 01:39:51 2007 Tanaka Akira <akr@fsij.org>
* include/ruby/intern.h (rb_uv_to_utf8): declared. * include/ruby/intern.h (rb_uv_to_utf8): declared.

22
parse.y
Просмотреть файл

@ -442,6 +442,8 @@ extern int rb_parse_in_eval(void);
static VALUE reg_compile_gen(struct parser_params*, VALUE, int); static VALUE reg_compile_gen(struct parser_params*, VALUE, int);
#define reg_compile(str,options) reg_compile_gen(parser, str, options) #define reg_compile(str,options) reg_compile_gen(parser, str, options)
static void reg_fragment_setenc_gen(struct parser_params*, VALUE, int);
#define reg_fragment_setenc(str,options) reg_fragment_setenc_gen(parser, str, options)
#else #else
#define remove_begin(node) (node) #define remove_begin(node) (node)
#endif /* !RIPPER */ #endif /* !RIPPER */
@ -3642,6 +3644,7 @@ regexp : tREGEXP_BEG xstring_contents tREGEXP_END
/*%%%*/ /*%%%*/
int options = $3; int options = $3;
NODE *node = $2; NODE *node = $2;
NODE *list;
if (!node) { if (!node) {
node = NEW_LIT(reg_compile(STR_NEW0(), options)); node = NEW_LIT(reg_compile(STR_NEW0(), options));
} }
@ -3663,6 +3666,12 @@ regexp : tREGEXP_BEG xstring_contents tREGEXP_END
nd_set_type(node, NODE_DREGX); nd_set_type(node, NODE_DREGX);
} }
node->nd_cflag = options & RE_OPTION_MASK; node->nd_cflag = options & RE_OPTION_MASK;
reg_fragment_setenc(node->nd_lit, options);
for (list = node->nd_next; list; list = list->nd_next) {
if (nd_type(list->nd_head) == NODE_STR) {
reg_fragment_setenc(list->nd_head->nd_lit, options);
}
}
break; break;
} }
$$ = node; $$ = node;
@ -8436,10 +8445,9 @@ dvar_curr_gen(struct parser_params *parser, ID id)
VALUE rb_reg_compile(VALUE str, int options); VALUE rb_reg_compile(VALUE str, int options);
static VALUE static void
reg_compile_gen(struct parser_params* parser, VALUE str, int options) reg_fragment_setenc_gen(struct parser_params* parser, VALUE str, int options)
{ {
VALUE re;
int c = RE_OPTION_ENCODING_IDX(options); int c = RE_OPTION_ENCODING_IDX(options);
if (c) { if (c) {
@ -8453,6 +8461,14 @@ reg_compile_gen(struct parser_params* parser, VALUE str, int options)
} }
ENCODING_SET(str, idx); ENCODING_SET(str, idx);
} }
}
static VALUE
reg_compile_gen(struct parser_params* parser, VALUE str, int options)
{
VALUE re;
reg_fragment_setenc(str, options);
re = rb_reg_compile(str, options & RE_OPTION_MASK); re = rb_reg_compile(str, options & RE_OPTION_MASK);
if (NIL_P(re)) { if (NIL_P(re)) {
RB_GC_GUARD(re) = rb_obj_as_string(rb_errinfo()); RB_GC_GUARD(re) = rb_obj_as_string(rb_errinfo());

Просмотреть файл

@ -301,4 +301,12 @@ class TestM17N < Test::Unit::TestCase
} }
} }
end end
def test_dynamic_euc_regexp
assert_encoding("EUC-JP", /#{}\xc0\xa1/e.encoding)
assert_raise(RegexpError) { eval('/\xa1#{}/e') }
assert_raise(RegexpError) { eval('/#{}\xa1/e') }
#assert_raise(SyntaxError) { eval('/\xa1#{}\xa1/e') }
#assert_raise(SyntaxError) { s = e('\xa1'); /#{s}#{s}/ }
end
end end