Re: [Caml-list] https... which lib?

["Török Edwin" <edwintorok@gmail.com>]

On 2010-12-25 22:21, oliver@first.in-berlin.de wrote:
> On Sat, Dec 25, 2010 at 07:30:21PM +0100, oliver@first.in-berlin.de wrote:
>> On Sat, Dec 25, 2010 at 10:07:16AM +0200, Török Edwin wrote:
>>> On 2010-12-25 02:44, oliver@first.in-berlin.de wrote:
>>>> Hi,
>>>>
>>>> AFAIK I can't use ocamlnet for https-files?!
>>>>
>>>> Which lib do I need for that?
>>>
>>> I used libcurl-ocaml for https recently.
>> [...]
>>
>> http://curl.haxx.se/libcurl/ocaml/
>>
>> Has a simple easy-to-start example...
>> ... and https works out of the box.
> [...]
> 
> But documentation lacks....
> 
> The functions seem not to have the same names as the C-counterparts...
> 
> What function do I need for not getting the webpage printed to stdout,
> but into a string?

Here's a snippet from my code:

let new_curl_connection () =
    let buffer = Buffer.create 4096
    and connection = new Curl.handle in
    let write_function str =
        Buffer.add_string buffer str;
        String.length str;
    in
    connection#set_writefunction write_function;
    connection#set_useragent Config.user_agent;
    connection#set_timeout Config.timeout;
    connection#set_followlocation true;
    connection#set_connecttimeout Config.connect_timeout;
(*  connection#set_verbose true;*)
    (connection, buffer);;

let _ =
	let conn, buffer = new_curl_connection() in
	conn#set_url url;
	conn#perform;
	let http_code = conn#get_responsecode in
	if http_code < 400 then
		let result = Buffer.contents buffer;
....

Also since you're using HTTPS you might want this:
            sslconn#set_sslverifypeer true;
            (* verify that certificate is valid for target host *)
            sslconn#set_sslverifyhost Curl.SSLVERIFYHOST_HOSTNAME;
            (* only accept our servers, optional *)
            sslconn#set_cainfo "ourserver_ca.pem";