:: |
Autor |
Poruka |
Doktor ~Sanjicino*slculence~
|
Godine: 38
Datum registracije: 17 Nov 2005 Poruke: 4264 Mesto: Novi Sad
|
|
Ovaj primer koristi biblioteku JwaWinBase koju možete pronaći i skinuti sa adrese http://members.chello.nl/m.vanbrakel2/. Autor ovog koda je holandjanin Arndt Dienstbier (jedan od najačih sistemskih programera na svetu) a razlog zbog čega ga predstavljam ovde je podatak da je do sada ostvareno preko 2 miliona downloada pomenutog unita. Ovaj kod koji se u žargonu naziva Cuckoo’s Way je pravi primer kako se može aktivirati odredjeni proces na nekom računaru, zaobilazeći pri tome sve zaštite. Kod ima praktičnu upotrebu kod mnogih servera za npr. snimanje coockja ili registrovanje nekog procesa na klijent mašini ne obazirući se na zaštitu koju klijent ima.
PAŽNJA: Ovaj primer ne prikazuje kako se odredjeni proces direktno smešta u sistemske procese zbog mogućnosti zloupotrebe koda u svrhu neovlašćenog pristupa nekom računaru (hakovanje). Ovo je samo primer jednog od načina kako se podmeće proces na neki računar koji radi pod Windowsom!
Code: |
uses
JwaWinBase;
//...
procedure TForm1.Button1Click(Sender: TObject);
var
si: STARTUPINFOW;
pif: PROCESS_INFORMATION;
res: Bool;
s: string;
begin
// postavljanje StartUpInfoW na početku izvršenja
si.cb := SizeOf(startupinfow);
si.dwFlags := STARTF_USESHOWWINDOW;
si.wShowWindow := SW_SHOWDEFAULT;
si.lpReserved := nil;
si.lpDesktop := nil;
si.lpTitle := 'Konsole';
// pokretanje CreateProcessWithLogonW rutine…
res := CreateProcessWithLogonW('Security', 'ArViCor', 'test', LOGON_WITH_PROFILE,
'c:\win2kas\system32\regedt32.exe', nil
, CREATE_DEFAULT_ERROR_MODE, nil, nil, si, pif);
if booltostr(res) = '0' then
begin
// u slučaju pojavljivanja greške, prikazuje se error-code koji se lako može prevesti pomoću “net helpmsg” u komandnu liniju…
str(GetLastError, s);
ShowMessage('CreateProcessWithLogonResult: ' + booltostr(res) + #10 +
'GetLastError: ' + s);
end;
end;
|
|
_________________ ~*~Vojim svoje srculence najvise na svetu ~*~ :322:
|
|
|
|
|
|
|
Vi ne možete otvarati nove teme u ovom forumu Vi ne možete odgovarati na teme u ovom forumu Vi ne možete menjati Vaše poruke u ovom forumu Vi ne možete brisati Vaše poruke u ovom forumu Vi ne možete glasati u anketama u ovom forumu Vi ne možete postavljati fajlove u ovom forumu Vi ne možete preuzeti fajlove sa ovog foruma
|
|