Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

расшифровка PWL [D5, Win95/98]

Страницы: < 1 2 3
Di_wind © (2001-11-03 14:23:00)
Может кто все-таки скажет я уже неоднократно поднимал сей вопрос только все ссылалсиь на то что гд-то это уже есть но на самом деле нигде ничего про рашифровку нету так может кто скажет все-таки как?

Ajax (2001-11-04 14:03:00) [41]
По-моему, приведенный код позволяет узнать кешированные пароли, а вот к расшифровке PWL никакого отношения не имеет. Сорри если не прав.

Remy (2001-11-04 09:44:00) [42]
Надеюсь разберешься ...

function WNetEnumCachedPasswords(lp: lpStr; w: Word; b: Byte; PC: PChar; dw: DWord): Word; external mpr name "WNetEnumCachedPasswords";

type
PWinPassword = ^TWinPassword;
TWinPassword = record
EntrySize: Word;
ResourceSize: Word;
PasswordSize: Word;
EntryIndex: Byte;
EntryType: Byte;
PasswordC: Char;
end;

var
WinPassword: TWinPassword;

function AddPassword(WinPassword: PWinPassword; dw: DWord): LongBool; stdcall;
var
Password: String;
PC: Array[0..$FF] of Char;
begin
inc(Count);

Move(WinPassword.PasswordC, PC, WinPassword.ResourceSize);
PC[WinPassword.ResourceSize] := #0;
CharToOem(PC, PC);
Password := StrPas(PC);

Move(WinPassword.PasswordC, PC, WinPassword.PasswordSize + WinPassword.ResourceSize);
Move(PC[WinPassword.ResourceSize], PC, WinPassword.PasswordSize);
PC[WinPassword.PasswordSize] := #0;
CharToOem(PC, PC);
Password := Password + ": " + StrPas(PC);
Form1.Memo1.Lines.Add(Password);//на форму бросаешь memo и видишь login и possword
Result := True;
end;

Ajax (2001-11-03 16:25:00) [43]
2Dima-k17: жадный, да???!!!

Di_wind (2001-11-03 15:43:00) [44]
я где-то дыбал какую-то фигню которая мне его в хеш виде выдавала ...толко на хрен он мне в хэш виде нужен...к слову: троянов не пишу...

Dima-k17 (2001-11-03 15:06:00) [45]
К слову, когда-то у меня была такая проблема, когда очень хотелось написать 1-ый троян:) pwl он воровал, но расшифровать я не мог, а всё оказалось просто. Алгоритм не дам, но сам ищи на www.passwords.ru или на подобных серверах. Спроси на xakep.ru или ещё лучше на hackzone.ru

Knight (2001-11-03 14:28:00) [46]
Там алгоритм офигенный - раз , во-вторых поисковики юзаешь? Статья где-то была. Не на сурсес.ру часом? Но я не помню...
И вообще, юзай ПВЛтул
У меня вопрос в тему - пароль текущего юзверя не зашифрован. Где он?(находится)

Страницы: < 1 2 3

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »