Converter curl para OCaml

Cohttp é a biblioteca padrão de cliente e servidor HTTP para OCaml. Suporta backends Lwt (threads leves) e Async para E/S concorrente. Instale com opam install cohttp-lwt-unix. Fornece uma API funcional e segura em termos de tipos para pedidos HTTP. O curl2code utiliza o Cohttp para todas as conversões OCaml.

Cohttp é a biblioteca HTTP padrão do OCaml com suporte para Lwt/Async. ocurl envolve a libcurl, dando acesso a todas as funcionalidades do curl a partir do OCaml. piaf é mais recente e nativa para HTTP/2. Utilize o Cohttp para OCaml idiomático, e o ocurl quando precisar de funcionalidades específicas do curl. Para linguagens funcionais semelhantes, veja curl para Elixir ou curl para Clojure.

Adicione um cabeçalho de Autorização ao pedido: Header.add headers "Authorization" ("Bearer " ^ token). Para autenticação Basic, codifique as credenciais em base64 utilizando o pacote base64. Os cabeçalhos do Cohttp são imutáveis — construa-os com Header.of_list ou encadeie chamadas Header.add.

Construa o corpo multipart manualmente com strings de boundary, ou utilize uma biblioteca como multipart_form. Defina o cabeçalho Content-Type com o boundary. O corpo do Cohttp é uma simples string ou stream — formate o payload multipart de acordo com o RFC 2046. O curl2code lida com a conversão da flag -F.

O Cohttp com Lwt devolve promessas — utilize a sintaxe Lwt.catch ou try%lwt ... with para o tratamento de erros. Verifique o código de estado da resposta com Response.status response. O sistema de tipos do OCaml garante que lida com os casos de falha. Utilize pattern matching nos códigos de estado para um tratamento exaustivo.

Com o backend Lwt: utilize Lwt.all [request1; request2] para execução paralela ou Lwt_list.map_p para mapear sobre URLs. Com Async: utilize Deferred.all. A concorrência cooperativa do OCaml através de Lwt ou Async proporciona uma E/S concorrente segura e eficiente sem preocupações com a segurança de threads.

Com Lwt, utilize Lwt.pick [request; Lwt_unix.sleep timeout >>= fun () -> Lwt.fail Timeout] para colocar um pedido em competição com um temporizador. O Cohttp não tem opções de timeout integradas — envolva a promessa Lwt com um combinador de timeout. Para repetições, implemente uma função recursiva com tentativas decrescentes.

O Cohttp não tem suporte integrado para proxy. Utilize ocurl (bindings libcurl) para necessidades de proxy: defina a opção CURLOPT_PROXY. Alternativamente, defina a variável de ambiente HTTP_PROXY e configure a ligação para encaminhar através do host e porta do proxy manualmente.

Converta um comando curl POST como curl -X POST -H "Content-Type: application/json" -d '{"key":"value"}' URL para OCaml usando o curl2code. O código gerado utiliza Client.post ~body:(Cohttp_lwt.Body.of_string json) uri. O curl2code deteta automaticamente as flags -d/--data com conteúdo JSON e define o cabeçalho Content-Type apropriado no código Cohttp.

Passe curl -H "Authorization: Bearer YOUR_TOKEN" URL para o curl2code e este gera código Cohttp com o cabeçalho de autenticação: Header.add headers 'Authorization' 'Bearer YOUR_TOKEN'. O curl2code deteta tokens Bearer tanto de flags -H "Authorization: Bearer ..." como de --oauth2-bearer. Para Basic auth, utilize -u user:pass.

O curl2code converte curl -H "Content-Type: application/json" URL para código Cohttp com o cabeçalho correto: Header.add headers 'Content-Type' 'application/json'. Para dados -d, o curl assume por defeito application/x-www-form-urlencoded; para envios de formulários -F, utiliza multipart/form-data. O curl2code mapeia cada um para a API Cohttp correta.