Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Assertion `*hekp' failed, Perl_hv_ename_add (hv.c:2393) #15615

Open
p5pRT opened this issue Sep 18, 2016 · 4 comments
Open

Assertion `*hekp' failed, Perl_hv_ename_add (hv.c:2393) #15615

p5pRT opened this issue Sep 18, 2016 · 4 comments

Comments

@p5pRT
Copy link

p5pRT commented Sep 18, 2016

Migrated from rt.perl.org#129302 (status was 'open')

Searchable as RT129302$

@p5pRT
Copy link
Author

p5pRT commented Sep 18, 2016

From @geeknik

Triggered with Perl v5.25.5 (v5.25.4-130-g7aa7bbc) and AFL+ASAN+libdislocator. afl-tmin minimized this into the null pointer deref in #129301.

./perl -e 'Hacpa* mapcpa* map*​::,*​:=​::,,*​:=% :<+C,,​::,,*​:=a* map*​::,*​:=​::,,*​:=% :<+C,,​::,,*​:=%​:=​::,*​:=​::,,*​:=% :<+C,,​::,,*​:=% :<+C,,,%​:=​::,*​:=​::,,*​:=% :<+C,,,%​:=​::,*​:<+C,,,%​:=​::,*​:=​::,*​::​::=​::,*​:=​::,*​:=% :<

                                                                                                                                                                                               C\,\,\,I\_root'

perl​: hv.c​:2393​: void Perl_hv_ename_add(HV *, const char *, U32, U32)​: Assertion `*hekp' failed.
Aborted

od -tx1 test-211
0000000 48 61 63 70 61 2a 20 6d 61 70 63 70 61 2a 20 6d
0000020 61 70 2a 3a 3a 2c 2a 3a 3d 3a 3a 2c 2c 2a 3a 3d
0000040 25 20 3a 3c 2b 43 2c 2c 3a 3a 2c 2c 2a 3a 3d 61
0000060 2a 20 6d 61 70 2a 3a 3a 2c 2a 3a 3d 3a 3a 2c 2c
0000100 2a 3a 3d 25 20 3a 3c 2b 43 2c 2c 3a 3a 2c 2c 2a
0000120 3a 3d 25 3a 3d 3a 3a 2c 2a 3a 3d 3a 3a 2c 2c 2a
0000140 3a 3d 25 20 3a 3c 2b 43 2c 2c 3a 3a 2c 2c 2a 3a
0000160 3d 25 20 3a 3c 2b 43 2c 2c 2c 25 3a 3d 3a 3a 2c
0000200 2a 3a 3d 3a 3a 2c 2c 2a 3a 3d 25 20 3a 3c 2b 43
0000220 2c 2c 2c 25 3a 3d 3a 3a 2c 2a 3a 3c 2b 43 2c 2c
0000240 2c 25 3a 3d 3a 3a 2c 2a 3a 3d 3a 3a 2c 2a 3a 3a
0000260 3a 3a 3d 3a 3a 2c 2a 3a 3d 3a 3a 2c 2a 3a 3d 25
0000300 20 3a 3c 0b 43 2c 2c 2c 49 5f
0000312

@p5pRT
Copy link
Author

p5pRT commented Sep 18, 2016

From @geeknik

test-211.gz

@p5pRT
Copy link
Author

p5pRT commented Sep 19, 2016

From @cpansprout

On Sun Sep 18 12​:56​:40 2016, brian.carpenter@​gmail.com wrote​:

Triggered with Perl v5.25.5 (v5.25.4-130-g7aa7bbc) and
AFL+ASAN+libdislocator. afl-tmin minimized this into the null pointer
deref in #129301.

./perl -e 'Hacpa* mapcpa* map*​::,*​:=​::,,*​:=% :<+C,,​::,,*​:=a*
map*​::,*​:=​::,,*​:=% :<+C,,​::,,*​:=%​:=​::,*​:=​::,,*​:=% :<+C,,​::,,*​:=%
:<+C,,,%​:=​::,*​:=​::,,*​:=%
:<+C,,,%​:=​::,*​:<+C,,,%​:=​::,*​:=​::,*​::​::=​::,*​:=​::,*​:=% :<

C,,,I_root'

perl​: hv.c​:2393​: void Perl_hv_ename_add(HV *, const char *, U32, U32)​:
Assertion `*hekp' failed.
Aborted

Minimising it by hand, I got three different assertion failures​:

$ ./perl -e '*​:=""; *​:=%​:=​::; *​:=​::; *​::​::=​::; *​:=""'
Assertion failed​: (*hekp), function Perl_hv_ename_add, file hv.c, line 2393.
Abort trap​: 6

$ ./perl -e '*​: = 0 * (*​:="", *​:=%​:, *​:="", *​::​::=​::)'
Assertion failed​: (!oldstash || HvENAME(oldstash)), function S_mro_gather_and_rename, file mro_core.c, line 1059.
Abort trap​: 6

$ ./perl -e '*​: = *​::; *​: = %​: = *​::; *​: = "​::"'
Assertion failed​: (SvTYPE(_gvgp) == SVt_PVGV || SvTYPE(_gvgp) == SVt_PVLV), function Perl_sv_setsv_flags, file sv.c, line 4552.
Abort trap​: 6

--

Father Chrysostomos

@p5pRT
Copy link
Author

p5pRT commented Sep 19, 2016

The RT System itself - Status changed from 'new' to 'open'

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

2 participants