upstream: https://github.com/mirage/mirage-crypto
Reject duplicate CBOR keys in VDS import
import used List.find_opt on raw map pairs, so a duplicate
"version" or "entries" key would shadow later occurrences.
Now checks for byte-equal duplicate keys before field extraction,
consistent with the receipt parser's cbor_check_unique_keys.
+4
-5
+4
-5
fuzz/dune
+4
-5
fuzz/dune
···
20
20
(alias fuzz)
21
21
(enabled_if
22
22
(= %{profile} afl))
23
-
(deps
24
-
(source_tree corpus)
25
-
fuzz.exe
26
-
gen_corpus.exe)
23
+
(deps fuzz.exe)
27
24
(action
28
-
(echo "AFL fuzzer built: %{exe:fuzz.exe}\n")))
25
+
(progn
26
+
(run %{exe:fuzz.exe} --gen-corpus corpus)
27
+
(run afl-fuzz -V 60 -i corpus -o _fuzz -- %{exe:fuzz.exe} @@))))