Add sslversion_max flags

Author: lukepalmer

config/discover.ml

@@ -325,7 +325,10 @@ let curl_h_declarations = [
   "CURL_SSLVERSION_TLSv1_1";
   "CURL_SSLVERSION_TLSv1_2";
   "CURL_SSLVERSION_TLSv1_3";
-
+  "CURL_SSLVERSION_MAX_TLSv1_0";
+  "CURL_SSLVERSION_MAX_TLSv1_1";
+  "CURL_SSLVERSION_MAX_TLSv1_2";
+  "CURL_SSLVERSION_MAX_TLSv1_3";
   "CURL_VERSION_NTLM_WB";
   "CURL_VERSION_TLSAUTH_SRP";
 

curl-helper.c

@@ -2364,6 +2364,11 @@ static void handle_SSLVERSION(Connection *conn, value option)
     case 5: v = CURL_SSLVERSION_TLSv1_1; break;
     case 6: v = CURL_SSLVERSION_TLSv1_2; break;
     case 7: v = CURL_SSLVERSION_TLSv1_3; break;
+    case 8: v = CURL_SSLVERSION_MAX_TLSv1_0; break;
+    case 9: v = CURL_SSLVERSION_MAX_TLSv1_1; break;
+    case 10: v = CURL_SSLVERSION_MAX_TLSv1_2; break;
+    case 11: v = CURL_SSLVERSION_MAX_TLSv1_3; break;
+
     default:
         caml_failwith("Invalid SSLVERSION Option");
         break;

curl.ml

@@ -136,6 +136,10 @@ type curlSSLVersion =
   | SSLVERSION_TLSv1_1
   | SSLVERSION_TLSv1_2
   | SSLVERSION_TLSv1_3
+  | SSLVERSION_MAX_TLSv1_0
+  | SSLVERSION_MAX_TLSv1_1
+  | SSLVERSION_MAX_TLSv1_2
+  | SSLVERSION_MAX_TLSv1_3
 
 type curlTimeCondition =
   | TIMECOND_NONE

curl.mli

@@ -144,6 +144,10 @@ type curlSSLVersion =
   | SSLVERSION_TLSv1_1 (** Added in libcurl 7.34.0, will request TLSv1.x in previous versions *)
   | SSLVERSION_TLSv1_2 (** Added in libcurl 7.34.0, will request TLSv1.x in previous versions *)
   | SSLVERSION_TLSv1_3 (** Added in libcurl 7.52.0, will request TLSv1.x in previous versions *)
+  | SSLVERSION_MAX_TLSv1_0 (** Added in libcurl 7.54.0 *)
+  | SSLVERSION_MAX_TLSv1_1 (** Added in libcurl 7.54.0 *)
+  | SSLVERSION_MAX_TLSv1_2 (** Added in libcurl 7.54.0 *)
+  | SSLVERSION_MAX_TLSv1_3 (** Added in libcurl 7.54.0 *)
 
 type curlTimeCondition =
   | TIMECOND_NONE (** since 0.6.1 *)