Anri/dns-toy
Archived
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

i think its 2 bytes

Browse source
This commit is contained in:
Mylloon 2023-06-14 18:53:13 +02:00
parent 121e93e0a0
commit 4c7f0a237a
Signed by: Anri
GPG key ID: A82D63DFF8D1317F
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lib/response.ml
View file

@ -28,7 +28,7 @@ and decode_name_simple reader =
else if length land 0b1100_0000 <> 0 else if length land 0b1100_0000 <> 0
then ( then (
let decoded_name = decode_compressed_name reader length in let decoded_name = decode_compressed_name reader length in
length + 1, decoded_name :: parts) 2, decoded_name :: parts)
else ( else (
let part = Bytes.sub_string reader.data (reader.pointer + pos + 1) length in let part = Bytes.sub_string reader.data (reader.pointer + pos + 1) length in
let last_length, parts' = read_parts (parts @ [ part ]) (pos + 1 + length) in let last_length, parts' = read_parts (parts @ [ part ]) (pos + 1 + length) in