Make regex stricter

cryptosense · Nov 10, 2023 · 4e6547c · 4e6547c
1 parent 201e7b4
commit 4e6547c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/cs_api_core/cs_api_core.ml b/cs_api_core/cs_api_core.ml
@@ -191,7 +191,7 @@ let parse_s3_signature_request ~body =
 
 let parse_s3_response ~body =
   try
-    let key_extractor = Str.regexp "<.*Key.*>\\([^<>]*\\)</.*Key.*>" in
+    let key_extractor = Str.regexp "<Key.*>\\([^<>]*\\)</Key>" in
     let _ = Str.search_forward key_extractor body 0 in
     Ok (Str.matched_group 1 body)
   with