Ok, that's a bug but not even with it fixed, it still does not work.

Thanks,

SZ

On Mon, Sep 21, 2009 at 10:23 AM, Arno Garrels <arno.garr...@gmx.de> wrote:

> Fastream Technologies wrote:
> > 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.
>
> If you actually use the function above, why do you append stuff to the
> returned string at all?
>
> --
> Arno Garrels
>
>
> > 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 <arno.garr...@gmx.de>
> > 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
>
--
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

Reply via email to