[cherry-iv]

Подскажите пожалуйста, где можно найти нормальный(адекватный) алгоритм хеширования HAVAL. Кроме википедии ничего не могу найти. Исходник есть но, разобраться очень сложно.

[M.A.D.M.A.N.]

Выкладывай.

[cherry-iv]

Вот исходник...

[M.A.D.M.A.N.]

Ну по сути надо вызвать последовательно

Код:

  HavalInit
  HavalUpdate (передать указатель на данные и их объем)
  HavalFinal

или воспользоваться готовой оберткой

Код:

var
  s, data: string;
begin
  data := 'some text';
  s := emptystring;
  HashBuf(HASH_HAVAL128, PChar(data), length(data), s);
  showmessage(s);
end;

[cherry-iv]

M.A.D.M.A.N. Где что и в какой последовательности надо выполнять понятно, а вот что и зачем делается не понятно... Нужен алгоритм...

[M.A.D.M.A.N.]

Я там дописал.