Re: [twsocket] ICS-SSL / Proxy, Must I add something ?

2013-11-04 Thread Bruno Mannina

Ok I will try tomorrow,

for info, it's my Appli_Id to have the right to get my Token

Regards


Le 04/11/2013 17:22, Arno Garrels a écrit :

On Monday, November 04, 2013 3:24 PM [GMT+1=CET],
Bruno Mannina wrote:


procedure TOPSKey.ssl2BeforeHeaderSend(Sender: TObject;
const Method: String; Headers: TStrings);
begin
Headers.Add('Authorization: Basic ..JQ0R6QWQ0ME1uMA==');
end;

Please try without this and report back.




---
Ce courrier électronique ne contient aucun virus ou logiciel malveillant parce 
que la protection avast! Antivirus est active.
http://www.avast.com

--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be


Re: [twsocket] ICS-SSL / Proxy, Must I add something ?

2013-11-04 Thread Arno Garrels
On Monday, November 04, 2013 3:24 PM [GMT+1=CET],
Bruno Mannina wrote:

> 
> procedure TOPSKey.ssl2BeforeHeaderSend(Sender: TObject;
>const Method: String; Headers: TStrings);
> begin
>Headers.Add('Authorization: Basic ..JQ0R6QWQ0ME1uMA==');
> end;

Please try without this and report back.

-- 
Arno 
-- 
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be


Re: [twsocket] ICS-SSL / Proxy, Must I add something ?

2013-11-04 Thread Bruno Mannina

Dear Angus,

If I use Firefox all work fine, I can access to the HTTPS server a get 
information.


I contact one of my client and tell him to ask to their technical 
support more information about their network restrictions.


May be, it's not a ICS problem but a user network security...

I will learn more tomorrow morning,

Thanks for your answer,

Regards,

Le 04/11/2013 15:42, Angus Robertson - Magenta Systems Ltd a écrit :

Does a browser like Firefox work through the same proxy server with the same
settings and site you are using with ICS?

One feature of SSL is that proxy servers can not intercept your traffic, I
believe you need a tunnelling proxy to work with SSL, but have never tried one
myself.



---
Ce courrier électronique ne contient aucun virus ou logiciel malveillant parce 
que la protection avast! Antivirus est active.
http://www.avast.com

--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be


Re: [twsocket] ICS-SSL / Proxy, Must I add something ?

2013-11-04 Thread Angus Robertson - Magenta Systems Ltd
> *Subject:* [twsocket] ICS-SSL / Proxy, Must I add something ?
> *From:* Bruno Mannina 
> I try to use HTTP-SSL behind a proxy server, so I give 
> host/port/user/pwd to the httpssl component.
> But it seems to not work.

Does a browser like Firefox work through the same proxy server with the same
settings and site you are using with ICS?  

One feature of SSL is that proxy servers can not intercept your traffic, I
believe you need a tunnelling proxy to work with SSL, but have never tried one
myself.

Angus

-- 
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be


Re: [twsocket] ICS-SSL / Proxy, Must I add something ?

2013-11-04 Thread Bruno Mannina

I have the first error:
Erreur: SSL2 Token

and second:
Connection failed : #404 : Connection aborted on request

Here my little code to get a Token on a server:

function TOPSKey.GetRemoteToken : String;
var
  Data: AnsiString;
  RcvStrm : TMemoryStream;
  SndStrm : TMemoryStream;
  c   : PChar;
  Cle : String;
begin
  Result:= '';
  SndStrm   := TMemoryStream.Create;
  RcvStrm   := TMemoryStream.Create;
  Data  := 'grant_type=client_credentials';

  SSL2.Proxy:= Trim(Main.ProxyHost);
  SSL2.ProxyPort:= Trim(Main.ProxyPort);
  SSL2.ProxyUsername:= Trim(Main.ProxyUser);
  SSL2.ProxyPassword:= Trim(Main.ProxyPwd);

  SSL2.SendStream   := SndStrm;
  SSL2.SendStream.Write(Data[1], Length(Data));
  SSL2.SendStream.Seek(0,0);
  SSL2.RcvdStream   := RcvStrm;
  SSL2.URL  := 'https://xxx.xxx.xxx.xxx/auth/accesstoken';
  try
SSL2.Post;
  except
ShowMessage('Erreur: SSL2 Token');
  end;

  Case SSL2.StatusCode of
   200: // Ok
Begin
  RcvStrm.Seek(0, 0);
  SetLength(Data, RcvStrm.Size);
  RcvStrm.Read(Data[1], Length(Data));

  c := PChar(Data);
  If Scan('"access_token" : "', '",', c, Cle) then
result  := Cle
  else
ShowMessage(Data);

  RcvStrm.Free;
  SndStrm.Free;
end;
  Else // Connection Failed
Begin
  Showmessage('Connection failed : #' + 
IntToStr(SSL2.StatusCode) + ' : ' + SSL2.ReasonPhrase);


  Exit;
end;
  End;

end;

procedure TOPSKey.ssl2BeforeHeaderSend(Sender: TObject;
  const Method: String; Headers: TStrings);
begin
  Headers.Add('Authorization: Basic ..JQ0R6QWQ0ME1uMA==');
end;



Le 04/11/2013 14:48, Bruno Mannina a écrit :

Hi all,

I get this error when I try my little programme behind a proxy server:

Connection failed : #404 : Connection aborted on request

Any ideas are welcome,

Note: if my little prog is not behind a proxy, it works fine

regards,
Bruno

Le 04/11/2013 00:19, Bruno Mannina a écrit :

Dear ICS support, users,

Delphi 7

I try to use HTTP-SSL behind a proxy server, so I give 
host/port/user/pwd to the httpssl component.


But it seems to not work.

I added also ssl context to the HttpSsl component.

I must add something more ?

Thanks a lot,
Bruno

---
Ce courrier électronique ne contient aucun virus ou logiciel 
malveillant parce que la protection avast! Antivirus est active.

http://www.avast.com





---
Ce courrier électronique ne contient aucun virus ou logiciel 
malveillant parce que la protection avast! Antivirus est active.

http://www.avast.com



---
Ce courrier électronique ne contient aucun virus ou logiciel malveillant parce 
que la protection avast! Antivirus est active.
http://www.avast.com

--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be


Re: [twsocket] ICS-SSL / Proxy, Must I add something ?

2013-11-04 Thread Bruno Mannina

Hi all,

I get this error when I try my little programme behind a proxy server:

Connection failed : #404 : Connection aborted on request

Any ideas are welcome,

Note: if my little prog is not behind a proxy, it works fine

regards,
Bruno

Le 04/11/2013 00:19, Bruno Mannina a écrit :

Dear ICS support, users,

Delphi 7

I try to use HTTP-SSL behind a proxy server, so I give 
host/port/user/pwd to the httpssl component.


But it seems to not work.

I added also ssl context to the HttpSsl component.

I must add something more ?

Thanks a lot,
Bruno

---
Ce courrier électronique ne contient aucun virus ou logiciel 
malveillant parce que la protection avast! Antivirus est active.

http://www.avast.com





---
Ce courrier électronique ne contient aucun virus ou logiciel malveillant parce 
que la protection avast! Antivirus est active.
http://www.avast.com
--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be


[twsocket] ICS-SSL / Proxy, Must I add something ?

2013-11-03 Thread Bruno Mannina

Dear ICS support, users,

Delphi 7

I try to use HTTP-SSL behind a proxy server, so I give 
host/port/user/pwd to the httpssl component.


But it seems to not work.

I added also ssl context to the HttpSsl component.

I must add something more ?

Thanks a lot,
Bruno

---
Ce courrier électronique ne contient aucun virus ou logiciel malveillant parce 
que la protection avast! Antivirus est active.
http://www.avast.com

--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be