diff options
| author | Sverker Eriksson <[email protected]> | 2018-05-15 20:42:46 +0200 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2018-05-16 14:22:35 +0200 |
| commit | d7bacbc798d608f259eb2faaaf194cb9df323018 (patch) | |
| tree | 3f83cbd4c488c99322189ff8431e9ab60fb39848 /erts/emulator/test/nif_SUITE.erl | |
| parent | da06fd040775fffee17409ebbd6fa797e34d6f99 (diff) | |
| download | otp-d7bacbc798d608f259eb2faaaf194cb9df323018.tar.gz otp-d7bacbc798d608f259eb2faaaf194cb9df323018.tar.bz2 otp-d7bacbc798d608f259eb2faaaf194cb9df323018.zip | |
erts: Fix bug in enif_binary_to_term for immediates
Symptom: Heap corruption
Expanded test case to provoke this bug
and test some more term types.
Diffstat (limited to 'erts/emulator/test/nif_SUITE.erl')
| -rw-r--r-- | erts/emulator/test/nif_SUITE.erl | 17 |
1 files changed, 12 insertions, 5 deletions
diff --git a/erts/emulator/test/nif_SUITE.erl b/erts/emulator/test/nif_SUITE.erl index 9c1694fa8a..4c5109c4ac 100644 --- a/erts/emulator/test/nif_SUITE.erl +++ b/erts/emulator/test/nif_SUITE.erl @@ -2111,16 +2111,23 @@ nif_term_to_binary(Config) -> nif_binary_to_term(Config) -> ensure_lib_loaded(Config), - T = {#{ok => nok}, <<0:8096>>, lists:seq(1,100)}, + BigMap = maps:from_list([{I,-I} || I <- lists:seq(1,100)]), + [nif_binary_to_term_do(T) + || T <- [{#{ok => nok}, <<0:8096>>, lists:seq(1,100)}, + atom, 42, self(), BigMap]], + ok. + +nif_binary_to_term_do(T) -> + Dummy = [true|false], Bin = term_to_binary(T), Len = byte_size(Bin), - {Len,T} = binary_to_term_nif(Bin, undefined, 0), + {Len,T,Dummy} = binary_to_term_nif(Bin, undefined, 0), Len = binary_to_term_nif(Bin, self(), 0), - T = receive M -> M after 1000 -> timeout end, + {T,Dummy} = receive M -> M after 1000 -> timeout end, - {Len, T} = binary_to_term_nif(Bin, undefined, ?ERL_NIF_BIN2TERM_SAFE), + {Len,T,Dummy} = binary_to_term_nif(Bin, undefined, ?ERL_NIF_BIN2TERM_SAFE), false = binary_to_term_nif(<<131,100,0,14,"undefined_atom">>, - undefined, ?ERL_NIF_BIN2TERM_SAFE), + undefined, ?ERL_NIF_BIN2TERM_SAFE), false = binary_to_term_nif(Bin, undefined, 1), ok. |