Исследование TeleCount 4.00.02: Evaluation key

Before starting!

Вступление

Постановка задачи

Исследование

И чуть дальше, уже после джампа:

program test;
Uses SysUtils,WIndows;
{$APPTYPE CONSOLE}

var
f,f1,f2:file of byte;
i:integer;
b,b1:byte;
len:dword;
p,p1,p2:pointer;
pass:string='TeleCountSecurityLicenseProfile';

procedure FDecompress (adr1,adr2,adr3,adr4,adr5:DWORD);stdcall;external 'funcky60.dll' name 'MemDecompress';
procedure FCompress (adr1,adr2,adr3,adr4,adr5:DWORD);stdcall;external 'funcky60.dll' name 'MemCompress';

begin
for i:=1 to length(pass) do pass[i]:=chr(ord(pass[i]) or $80);
if paramstr(1)='-in' then begin
AssignFile(f,'tc.spv');
AssignFile(f1,'tc.in.spv');
ReWrite(f1);
ReSet(f);
GetMem(p,FileSize(f));
GetMem(p1,FileSize(f));
GetMem(p2,FileSize(f));
BlockRead(f,p^,FileSize(f));
FDecompress(DWORD(p),FileSize(f),0,0,DWORD(p2));
len:=DWORD(p2^);
FDecompress(DWORD(p),FileSize(f),DWORD(p2),len,DWORD(p1));
for i:=1 to len do begin
b:=Byte(pointer(Integer(p2)+i-1)^);
b1:=i mod 31;
if b1=0 then b1:=31;
b:=b xor ord(pass[b1]);
Byte(pointer(Integer(p2)+i-1)^):=b;
end;
BlockWrite(f1,p2^,len);
CloseFile(f);
CloseFile(f1);
end
else if paramstr(1)='-out' then begin
AssignFile(f1,'tc.in.spv');
AssignFile(f2,'tc.out.spv');
ReSet(f1);
ReWrite(f2);
GetMem(p,FileSize(f1)+1024);
GetMem(p1,FileSize(f1)+1024);
GetMem(p2,FileSize(f1)+1024);
BlockRead(f1,p2^,FileSize(f1));
len:=FileSize(f1);
for i:=1 to len do begin
b:=Byte(pointer(Integer(p2)+i-1)^);
b1:=i mod 31;
if b1=0 then b1:=31;
b:=b xor ord(pass[b1]);
Byte(pointer(Integer(p2)+i-1)^):=b;
end;
FCompress(DWORD(p2),len,DWORD(p),$138,DWORD(p1));
BlockWrite(f2,p^,DWORD(p1^));
CloseFile(f1);
CloseFile(f2);
end;
end.

Ну что же. Скармливаем ей tc.spv и получаем такое на выходе:

001=33858
002=1
003=33858
004=33825
005=CA,TF,FM,AR
006=0050
007=3382533825
008=1
009=1
010=65535
011=0
012=0
013=33825
014=33825
015=25508096

Теперь мы можем самостоятельно изменять параметры и модифицировать keyfile. Итак, методом научного тыка выяснились все параметры в KeyFile (я приведу их в виду схемы):

1. 001=Start of Expiration Period
2. 002=IsEval
3. 003=Evaluation Length
4. 004=Type of application:
   1- TeleCount *NOT For Resale*
   2- TeleCount Lite
   3- TeleCount Enterprise
   4- TeleCount IP
   5- TeleCount IP Enterprise
   6- TeleCount Enterprise Billing
   7- CommStats
   8- CommStars Enterprise
   
5. 005=Different addons (toll fraud, etc.)
6. 006=Version
7. 007=Serial number
8. 008=Number of extensions (0=Unlimited)
9. 009=Number of truncks (0=Unlimited)
10. 010=Number of voice ports (65535=Unlimited)
11. 011=Number of data ports (65535=Unlimited)
12. 012=Number of data servers (65535=Unlimited)
13. 013=Number of voice minutes (0=Unlimited)
14. 014=Number of billing customers (1=Unlimited)
15. 015=CRC

Подводим итоги:

Перепечатано с разрешения www.uofg.com.ua

Материалы находятся на сайте http://cracklab.narod.ru/doc/