aboutsummaryrefslogtreecommitdiffstats
path: root/lib/ssl/src/dtls_record.erl
diff options
context:
space:
mode:
authorIngela Anderton Andin <[email protected]>2017-03-17 16:15:29 +0100
committerIngela Anderton Andin <[email protected]>2017-04-13 11:30:14 +0200
commitbabaa7132c4f14515b8f53e998aab2d93b16cf04 (patch)
treec82057a0515f5c917f43159aa49efae468aed9ea /lib/ssl/src/dtls_record.erl
parentd669ce6f7693c7b3a71b1eb9df0fb1674a4643b0 (diff)
downloadotp-babaa7132c4f14515b8f53e998aab2d93b16cf04.tar.gz
otp-babaa7132c4f14515b8f53e998aab2d93b16cf04.tar.bz2
otp-babaa7132c4f14515b8f53e998aab2d93b16cf04.zip
ssl, dtls: Correct integer type for sequence number
Diffstat (limited to 'lib/ssl/src/dtls_record.erl')
-rw-r--r--lib/ssl/src/dtls_record.erl3
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/ssl/src/dtls_record.erl b/lib/ssl/src/dtls_record.erl
index 0ee51c24b6..c5992a72fa 100644
--- a/lib/ssl/src/dtls_record.erl
+++ b/lib/ssl/src/dtls_record.erl
@@ -528,5 +528,4 @@ mac_hash(Version, MacAlg, MacSecret, SeqNo, Type, Length, Fragment) ->
Length, Fragment).
calc_aad(Type, {MajVer, MinVer}, Epoch, SeqNo) ->
- NewSeq = (Epoch bsl 48) + SeqNo,
- <<NewSeq:64/integer, ?BYTE(Type), ?BYTE(MajVer), ?BYTE(MinVer)>>.
+ <<?UINT16(Epoch), ?UINT48(SeqNo), ?BYTE(Type), ?BYTE(MajVer), ?BYTE(MinVer)>>.