Vyvolani AV apod.

[< z >]

Nema nekdo predstavu, jak nasilne vyvolat nejaky skaredy AV, ktere by program uz nerozchodil? 

[pepak]

Co tohle?

Kód: Delphi [Vybrat]

1. Application.Free;

[pf1957]

Nema nekdo predstavu, jak nasilne vyvolat nejaky skaredy AV, ktere by program uz nerozchodil? 

Tvuj program, cizi program?
Co ma byt smyslem? Nahradit Halt() raisnutim AV?

[pf1957]

Co tohle?

Kód: Delphi [Vybrat]

1. Application.Free;

To je dobry 

Akorat ze ta aplikace zmizi z obrazovky, ale v pameti jako proces zustane.

[pf1957]

Jinak aby aplikace vyfucela a aspon probliknul nejaky dialog lze docilit treba nekonecnou rekurzi, kdy nejaka subroutina bude volat samu sebe. Kdyz se ji nadefinuje nejaka automaticka promenna, pujde to rychleji.

[< z >]

Application.Free; je moc rychly

muj program ... osetruju situace proti nenechavcum ... tak hledam neco hnusneho,
jak bylo kdysi ve Win98 a tan exception dialog pokryl celou plochu

zrejme nejak prepsat pamet, aby potom program kolaboval ...

juuu, tohle je nadhera v timeru

Kód: Delphi [Vybrat]

1. var
2.   s: TStringList;
3. begin
4.   s.Add('text');
5. end;

ted jeste, jak menit adresu toho AV, aby byla vetsi sranda

[pepak]

Myslel jsem si to.

Můžeš se inspirovat starými viry - v nějakém pravidelném časovém intervalu vygenerovat vždy dvě čísla - jedno poslouží jako adresa, druhé jako hodnota, kterou na tu adresu vložíš...

[< z >]

predpokladam, ze na to u je potreba asm, se kterym se nekamaradim

co na to pak UAC a DEP?

[Radek Červinka]

Na takové modifikace bacha, cracker to spatne otestuje a pusti to jako release a pak budes za blbce ty - ze ti to pada a ne cracker ze to spatne cracknul.

[pepak]

predpokladam, ze na to u je potreba asm, se kterym se nekamaradim

Proč?

Kód: Delphi [Vybrat]

1. var
2.   p: ^longint;
3. begin
4.   p := Pointer(Random(MaxInt));
5.   p^ := Random(MaxInt);
6. end;

Netestováno, ale zhruba tímto stylem to rozhodně půjde udělat.

co na to pak UAC a DEP?

Nic, ani jeden z nich s tímto nijak nesouvisí. Respektive, DEP by v určitých situacích mohl zareagovat, ale co už...

[pepak]

Na takové modifikace bacha, cracker to spatne otestuje a pusti to jako release a pak budes za blbce ty - ze ti to pada a ne cracker ze to spatne cracknul.

Mezi námi, pokud někdo píše podobné ochrany, tak to skutečně je blbec. Takže to dostane správně, i když špatnou cestou.

[< z >]

mrknu, co s tim svedu, dik

vim, jak je to s ochranama, nema to byt ochrana, ale zabava pro nenechavce

Na takové modifikace bacha, cracker to spatne otestuje a pusti to jako release a pak budes za blbce ty - ze ti to pada a ne cracker ze to spatne cracknul.

PS: ja mam momentalne opacny problem ... nejakej sikula to udelal spatne a prepisuje pamet na spatnych mistech spatnymi daty

[Vrtule]

Také by šlo něco takovéhoto:

Kód: Delphi [Vybrat]

1. Type
2.   TProc = Procedure ();
3.  
4. Var
5.   P : TProc;
6. begin
7. P;
8. end.
9.  

Ale v této formě to bude snadno viditelné.