Convertir curl a OCaml

Cohttp es la biblioteca estándar de cliente y servidor HTTP para OCaml. Soporta backends tanto Lwt (hilos ligeros) como Async para E/S concurrente. Instálala con opam install cohttp-lwt-unix. Proporciona una API funcional y con tipos seguros para peticiones HTTP. curl2code utiliza Cohttp para todas las conversiones de OCaml.

Cohttp es la biblioteca HTTP estándar de OCaml con soporte para Lwt/Async. ocurl envuelve libcurl, dando acceso a todas las funciones de curl desde OCaml. piaf es más reciente y nativa de HTTP/2. Usa Cohttp para un OCaml idiomático, ocurl cuando necesites características específicas de curl. Para lenguajes funcionales similares, consulta curl a Elixir o curl a Clojure.

Añade una cabecera Authorization a la petición: Header.add headers "Authorization" ("Bearer " ^ token). Para Basic auth, codifica las credenciales en base64 usando el paquete base64. Las cabeceras de Cohttp son inmutables — constrúyelas con Header.of_list o encadena llamadas a Header.add.

Construye el cuerpo multipart manualmente con cadenas de límite (boundary), o usa una biblioteca como multipart_form. Establece la cabecera Content-Type con el límite. El cuerpo de Cohttp es una simple cadena o flujo — formatea la carga útil multipart según el RFC 2046. curl2code maneja la conversión del flag -F.

Cohttp con Lwt devuelve promesas — usa la sintaxis Lwt.catch o try%lwt ... with para el manejo de errores. Verifica el código de estado de la respuesta con Response.status response. El sistema de tipos de OCaml asegura que manejes los casos de fallo. Usa pattern matching sobre los códigos de estado para un manejo exhaustivo.

Con el backend Lwt: usa Lwt.all [request1; request2] para ejecución paralela o Lwt_list.map_p para mapear sobre URLs. Con Async: usa Deferred.all. La concurrencia cooperativa de OCaml a través de Lwt o Async proporciona una E/S concurrente segura y eficiente sin preocupaciones de seguridad de hilos (thread safety).

Con Lwt, usa Lwt.pick [request; Lwt_unix.sleep timeout >>= fun () -> Lwt.fail Timeout] para hacer competir una petición contra un temporizador. Cohttp no tiene opciones de timeout integradas — envuelve la promesa Lwt con un combinador de timeout. Para reintentos, implementa una función recursiva con intentos decrecientes.

Cohttp no tiene soporte de proxy integrado. Usa ocurl (bindings de libcurl) para necesidades de proxy: establece la opción CURLOPT_PROXY. Alternativamente, establece la variable de entorno HTTP_PROXY y configura la conexión para enrutar a través del host y puerto del proxy manualmente.

Convierte un comando curl POST como curl -X POST -H "Content-Type: application/json" -d '{"key":"value"}' URL a OCaml usando curl2code. El código generado utiliza Client.post ~body:(Cohttp_lwt.Body.of_string json) uri. curl2code detecta automáticamente los flags -d/--data con contenido JSON y establece el encabezado Content-Type adecuado en el código de Cohttp.

Pasa curl -H "Authorization: Bearer YOUR_TOKEN" URL a curl2code y este generará código de Cohttp con el encabezado de autorización: Header.add headers 'Authorization' 'Bearer YOUR_TOKEN'. curl2code detecta tokens Bearer tanto en los flags -H "Authorization: Bearer ..." como en --oauth2-bearer. Para Basic auth, utiliza -u user:pass.

curl2code convierte curl -H "Content-Type: application/json" URL a código de Cohttp con el encabezado correcto: Header.add headers 'Content-Type' 'application/json'. Para los datos de -d, curl utiliza por defecto application/x-www-form-urlencoded; para subidas de formularios con -F, utiliza multipart/form-data. curl2code mapea cada uno a la API de Cohttp correcta.