Forum: Programmieren allgemein
by Garfield,
11. Feb 2011
:oops: Habe jetzt mal das Beispiel aus der AVM Technical Note
als Test verwendet und musste feststellen, dass der richtige MD5Hash herauskommt. Damit ist die Codierung nicht der Grund für das ungültige Passwort.
Forum: Programmieren allgemein
by Garfield,
11. Feb 2011
Obwohl
function Chr ( IntValue : Integer ) : AnsiChar;
function Chr ( IntValue : Integer ) : WideChar;
sein soll, bekomme ich in Turbo Delphi bei
for i := 1 to Length(S) do
S := Chr((Ord(S) shl 8) or (Ord(S) shr 8));
die Meldung
E2010 Inkompatible Typen: 'WideChar' und 'Char'
Nachtrag: Mit WideChar anstelle Chr geht es. Aber das Passwort ist dann immernoch ungültig.
Forum: Programmieren allgemein
by Garfield,
10. Feb 2011
Bei der Anmeldung an der Fritzbox wird ein Response benötigt, für welchen die Challenge mit dem Password zu einem UTF16LE formatierten String und der daraus resultierende MD5Hash wiederum mit der Challenge verbunden wird:
aResponse := FSession.Challenge + '-' + MD5Hash(AnsiToUtf16(Format('%s-%s', )));
Die Function
function AnsiToUtf16(const aStr: AnsiString): WideString;
var
len :...