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
