AWS HTTPS Request

AWS HTTPS Request

[eduardsapotski]

------------------------------------
with Ada.Text_IO; use Ada.Text_IO;
with AWS.Client;
with AWS.Response;

procedure Main is
   resp : AWS.Response.Data;
begin
   resp := AWS.Client.Get (URL => "http://sourceforge.net/");
   Put_Line (AWS.Response.Message_Body (resp));
end Main;
------------------------------------
It works!
------------------------------------
with Ada.Text_IO; use Ada.Text_IO;
with AWS.Client;
with AWS.Response;

procedure Main is
   resp : AWS.Response.Data;
begin
   resp := AWS.Client.Get (URL => "https://sourceforge.net/");
   Put_Line (AWS.Response.Message_Body (resp));
end Main;
------------------------------------
This does not work!

raised PROGRAM_ERROR : aws-client.adb:391 finalize/adjust raised exception
[2018-02-22 10:18:01] process exited with status 1, elapsed time: 00.20s

Why?

As I understand it, need to send a certificate to the server? Where can I get it?
Thanks!

Re: AWS HTTPS Request

[Maxim Reznik]

You should build AWS from sources and enable explicitly enable SSL support
to be able to use https.
Prebuilded AWS included in GNAT GPL release has this feature disabled.

unpack AWS and run something like this
  make setup build install SOCKET=openssl

See documentation for more details:
http://docs.adacore.com/live/wave/aws/html/aws_ug/building_aws.html#building

Best regards,

-- 
Maxim Reznik