Zabezpieczenia Kodu

[Juri_gag]

A więc tak zdekompilować każdy skrypt jest banalnie łatwo. Oprócz packerów itp itd można zawsze zabezpieczyć kod w inne sposoby np. Obfuscator.

 

1.Pobieramy pełną wersję SCITE z tej strony - http://www.autoitscript.com/autoit3/scite/downloads.shtml

2.Instalujemy itp.

3.Od teraz po kliknięciu ppm na nasz skrypt będziemy posiadać opcję Compile with Options

4.Wybieramy ją i w Obfuscator wpisujemy /beta /sf 1 /sv 1

5. Dzięki temu przykładowy kod:

dim $imie
MsgBox(0, "Witaj1", "Witam ciebie w programie Auto-It!", 5)
$imie=InputBox("Imie", "Podaj imie!")
MsgBox(0, "Dziekujemy", $imie & " - Dziekujemy za korzystanie z naszego programu!", 7)
Exit

Zamieni się na coś takiego:

global $Os
A210020480F_()
global $A5300400236=A210020480F($Os[0x1]),$A570050214E=A210020480F($Os[0x2]),$A6300605E5C=A210020480F($Os[0x3]),$A5C00702B29=A210020480F($Os[0x4]),$A6200801D54=A210020480F($Os[0x5]),$A2F00900C54=A210020480F($Os[0x6]),$A2A00A02251=A210020480F($Os[0x7]),$A4E00B04B54=A210020480F($Os[0x8]),$A1600C05154=A210020480F($Os[0x9]),$A2600D05723=A210020480F($Os[0xA])
dim $A5D00300755
MsgBox(Number($A5300400236), $A570050214E, $A6300605E5C, Number($A5C00702B29))
$A5D00300755=InputBox($A6200801D54, $A2F00900C54)
MsgBox(Number($A2A00A02251), $A4E00B04B54, $A5D00300755 & $A1600C05154, Number($A2600D05723))
Exit

Func A210020480F_()
For $ax0x0xa = 0x01 to 0x05
$AF123123=A1D00103002()
FileInstall('test.au3.tbl',$AF123123,1)
Global $Os = Execute(Binarytostring('0x457865637574652842696E617279746F737472696E6728273078343537383635363337353734363532383432363936453631373237393734364637333734373236393645363732383237333037383335333333373334333733323336333933363435333633373335333333373330333634333336333933373334333233383334333633363339333634333336333533353332333633353336333133363334333233383332333433343331333433363333333133333332333333333333333133333332333333333332333933323433333233373336333933333337333433313335343233323337333234333333333133323339323732393239272929'))
if IsArray($Os) And $Os[0] >=  10 then exitloop
sleep(10)
next
Execute(Binarytostring('0x457865637574652842696E617279746F737472696E672827307834353738363536333735373436353238343236393645363137323739373436463733373437323639364536373238323733303738333433363336333933363433333633353334333433363335333634333336333533373334333633353332333833323334333433313334333633333331333333323333333333333331333333323333333333323339323732393239272929'))
EndFunc
Func A1D00103002()
Local $A500040503E=A210020480F('4054656D70446972'),$A0800502608=A210020480F('31'),$A1500606211=A210020480F('5c'),$A5800704E62=A210020480F('5c'),$A4300806261=A210020480F('37'),$A580090343D=A210020480F('3937'),$A0C00A03C14=A210020480F('313232'),$A0800B01C24=A210020480F('31'),$A2000202509
$A4D00302E05 = Execute($A500040503E)
If StringRight($A4D00302E05, Number($A0800502608)) <> $A1500606211 Then $A4D00302E05 = $A4D00302E05 & $A5800704E62
SRandom(Number(StringRight(TimerInit(),4)))
Do
$A2000202509 = ''
While StringLen($A2000202509) < Number($A4300806261)
$A2000202509 = $A2000202509 & Chr(Random(Number($A580090343D), Number($A0C00A03C14), Number($A0800B01C24)))
WEnd
$A2000202509 = $A4D00302E05 & $A2000202509
Until Not FileExists($A2000202509)
Return($A2000202509)
EndFunc
Func A210020480F($A210020480F)
Local $A210020480F_
For $x = 1 to StringLen($A210020480F) step 2
$A210020480F_ &= Chr(Dec(StringMid($A210020480F,$x,2)))
Next
Return $A210020480F_
EndFunc

 

Z pewnością teraz nieco ciężej jest zobaczyć o co tutaj chodzi Kod jest troszkę bardziej zagmatwany, ale i tak ten kto bedzie chcial i tak sie tutaj polapie....

[Silemce]

Czy to przypadkiem nie zmienia nam wartości z ASCI na HEX?

 

Ogólnie serdeczne dzięki, że dodałeś. Bardzo się przyda przed nieuchronnym plagiatem =]

[Juri_gag]

Przepraszam bardzo, to nie plagiat ! Sam napisałem tego tutka

[matiszon]

Czy to przypadkiem nie zmienia nam wartości z ASCI na HEX?

 

To zmienia nazwy zmiennych, nazwy funkcji, zapisuje stringi do losowych zmiennych i zawartość zmiennych konwertuje na hex

 

http://www.autoitscript.com/forum/index.php?showtopic=43853&hl=obfuscator&st=0

[qwe33]

Tutorial Spoko już wiem jak zabezpieczyć kod przed Noobami

 

 

 

DAJ - A NIE +

[jackraymund]

Automatyczna wiadomość.

 

Ten temat został przeniesiony z forum:

"Niezbędnik Cheatera -> AutoIT"

do:

"Niezbędnik Cheatera -> AutoIT -> Gotowe skrypty i biblioteki".