pack.c: unpack "M" may be ASCII only
* pack.c (pack_unpack_internal): set ASCII only properly on "M", may be ASCII only. [ruby-core:83055] [Bug #13949] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@60059 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
parent
b455b8391d
commit
d35b5a4726
8
pack.c
8
pack.c
@ -1597,6 +1597,7 @@ pack_unpack_internal(VALUE str, VALUE fmt, int mode)
|
||||
{
|
||||
VALUE buf = infected_str_new(0, send - s, str);
|
||||
char *ptr = RSTRING_PTR(buf), *ss = s;
|
||||
int csum = 0;
|
||||
int c1, c2;
|
||||
|
||||
while (s < send) {
|
||||
@ -1608,18 +1609,19 @@ pack_unpack_internal(VALUE str, VALUE fmt, int mode)
|
||||
if ((c1 = hex2num(*s)) == -1) break;
|
||||
if (++s == send) break;
|
||||
if ((c2 = hex2num(*s)) == -1) break;
|
||||
*ptr++ = castchar(c1 << 4 | c2);
|
||||
csum |= *ptr++ = castchar(c1 << 4 | c2);
|
||||
}
|
||||
}
|
||||
else {
|
||||
*ptr++ = *s;
|
||||
csum |= *ptr++ = *s;
|
||||
}
|
||||
s++;
|
||||
ss = s;
|
||||
}
|
||||
rb_str_set_len(buf, ptr - RSTRING_PTR(buf));
|
||||
rb_str_buf_cat(buf, ss, send-ss);
|
||||
ENCODING_CODERANGE_SET(buf, rb_ascii8bit_encindex(), ENC_CODERANGE_VALID);
|
||||
csum = ISASCII(csum) ? ENC_CODERANGE_7BIT : ENC_CODERANGE_VALID;
|
||||
ENCODING_CODERANGE_SET(buf, rb_ascii8bit_encindex(), csum);
|
||||
UNPACK_PUSH(buf);
|
||||
}
|
||||
break;
|
||||
|
@ -686,6 +686,11 @@ EXPECTED
|
||||
assert_equal(["pre=hoge"], "pre=hoge".unpack("M"))
|
||||
assert_equal(["pre==31after"], "pre==31after".unpack("M"))
|
||||
assert_equal(["pre===31after"], "pre===31after".unpack("M"))
|
||||
|
||||
bug = '[ruby-core:83055] [Bug #13949]'
|
||||
s = "abcdef".unpack1("M")
|
||||
assert_equal(Encoding::ASCII_8BIT, s.encoding)
|
||||
assert_predicate(s, :ascii_only?, bug)
|
||||
end
|
||||
|
||||
def test_pack_unpack_P2
|
||||
|
Loading…
x
Reference in New Issue
Block a user