Hi Arno,
Ok, let me explain: due to stupid BCB linker errors,I had to place the
function below in a pascal unit for calling the function you said:
function THttpMTConnection.GenerateDigestChallenge : String;
begin
Result := AuthDigestGenerateChallenge(
FServer.FAuthDigestMethod,
FServer.FAuthDigestServerSecret,
FAuthRealm, '', FAuthDigestStale,
FAuthDigestServerNonce,
FAuthDigestServerOpaque);
end;
And it still does not work. Isn't there anybody with proxy authentication
experience? I had basic and NTLM and HTML working fine--only digest left...
Regards,
SZ
On Mon, Sep 21, 2009 at 9:38 AM, Arno Garrels <[email protected]> wrote:
> Fastream Technologies wrote:
> > headerHead += "Proxy-Authenticate: Digest " + // I only changed this
> > line from rproxy to forward proxy
> > GenerateDigestChallenge() +
> > ", domain=\"" + prefix + FAuthRealm + ":" + serverPort + "\"" +
> > ", uri=\"" + URI + "\"" +
> > //", algorithm=\"MD5\"" +
> > staleString + "\r\n";
>
> This obviously is your own implementation, current ICS uses :
>
> function AuthDigestGenerateChallenge(
> DigestMethod: TAuthDigestMethod; Secret: TULargeInteger; const Realm,
> Domain : String; Stale: Boolean; var Nonce, Opaque: String): String;
>
> procedure THttpConnection.Answer401;
> [..]
> Header := Header + 'WWW-Authenticate: Digest ' +
> AuthDigestGenerateChallenge(
> FServer.FAuthDigestMethod,
> FServer.FAuthDigestServerSecret,
> FAuthRealm, '', FAuthDigestStale,
> FAuthDigestServerNonce,
> FAuthDigestServerOpaque) + #13#10;
>
> --
> Arno Garrels
> --
> 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
>
--
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
