标 题:Archive XP 2003 v10.92 SP9b
发信人:风马
时 间:2003/05/18 02:40pm
详细信息:

目标软件： Archive XP 2003 v10.92 SP9b

软件大小： 3.47 MB

软件语言： 英文

软件类别： 国外软件 / 共享版 / 压缩解压

运行环境： Win9x/NT/2000/XP/

下载地址： http://www.65888.com/soft/soft/870.htm

软件介绍：
          获得了“Designed for Windows”徽标认证的 Archive XP 2003 是一个高性能的文件压缩工具,支持包括ZIP,ACE,RAR,CAB,7ZIP,GZIP等在内的超过31种压缩格式,内置一个功能强大而且非常容易使用的文件管理器,可以让你轻松管理压缩包里的文件,支持快速对整个硬盘进行搜索功能,程序可以无缝整合到Windows中,使得操作更加简单方便,支持Plugin功能,可以无限制的增加压缩功能!

使用工具： TRW2000 V1.23、FengMa's Toy Beta1

破解过程：

首先，我们来看看我们在输入序列号而未点“OK”按钮的时候，程序是怎样验证你输入序列号的格式的：

PUSH     EBP
MOV      EBP,ESP
XOR      ECX,ECX
PUSH     ECX
PUSH     ECX
PUSH     ECX
PUSH     ECX
PUSH     ECX
PUSH     ECX
PUSH     ECX
PUSH     ECX
PUSH     EBX
PUSH     ESI
MOV      ESI,EAX
XOR      EAX,EAX
PUSH     EBP
PUSH     DWORD 004AA13C
PUSH     DWORD [FS:EAX]
MOV      [FS:EAX],ESP
MOV      BL,01
XOR      EDX,EDX
MOV      EAX,[ESI+033C]
CALL     0043966C
LEA      EDX,[EBP-04]
MOV      EAX,[ESI+02FC]
CALL     00475BD4                //序列号必须为 20 位
MOV      EAX,[EBP-04]
CALL     00405100
CMP      EAX,BYTE +04
JZ       004AA033
XOR      EBX,EBX
LEA      EDX,[EBP-08]
MOV      EAX,[ESI+0304]
CALL     00475BD4
MOV      EAX,[EBP-08]
CALL     00405100
CMP      EAX,BYTE +04
JZ       004AA050
XOR      EBX,EBX
LEA      EDX,[EBP-0C]
MOV      EAX,[ESI+030C]
CALL     00475BD4
MOV      EAX,[EBP-0C]
CALL     00405100
CMP      EAX,BYTE +04
JZ       004AA06D
XOR      EBX,EBX
LEA      EDX,[EBP-10]
MOV      EAX,[ESI+0314]
CALL     00475BD4
MOV      EAX,[EBP-10]
CALL     00405100
CMP      EAX,BYTE +04
JZ       004AA08A
XOR      EBX,EBX
LEA      EDX,[EBP-14]
MOV      EAX,[ESI+031C]
CALL     00475BD4
MOV      EAX,[EBP-14]
CALL     00405100
CMP      EAX,BYTE +04
JZ       004AA0A7
XOR      EBX,EBX
LEA      EDX,[EBP-18]
MOV      EAX,[ESI+0320]
CALL     00475BD4
MOV      EAX,[EBP-18]
CALL     00405100
TEST     EAX,EAX
JNZ      004AA0C5                 //邮件地址不能为空
XOR      EBX,EBX
JMP      SHORT 004AA107
LEA      EDX,[EBP-1C]
MOV      EAX,[ESI+0320]
CALL     00475BD4
MOV      EDX,[EBP-1C]
MOV      EAX,004AA154
CALL     00405444                 //是否有“@”
TEST     EAX,EAX
JNZ      004AA0E6
XOR      EBX,EBX
LEA      EDX,[EBP-20]
MOV      EAX,[ESI+0320]
CALL     00475BD4
MOV      EDX,[EBP-20]
MOV      EAX,004AA160
CALL     00405444                 //是否有“.”
TEST     EAX,EAX
JNZ      004AA107
XOR      EBX,EBX
MOV      EDX,EBX
MOV      EAX,[ESI+032C]
MOV      ECX,[EAX]
CALL     NEAR [ECX+64]
MOV      DL,01
MOV      EAX,[ESI+033C]
CALL     0043966C
XOR      EAX,EAX
POP      EDX
POP      ECX
POP      ECX
MOV      [FS:EAX],EDX
PUSH     DWORD 004AA143
LEA      EAX,[EBP-20]
MOV      EDX,08
CALL     00404E64
RET    

然后，我们来看看注册算法：

PUSH     EBP
MOV      EBP,ESP
PUSH     ECX
MOV      ECX,04
PUSH     BYTE +00
PUSH     BYTE +00
DEC      ECX
JNZ      004A4B39
XCHG     ECX,[EBP-04]
PUSH     EBX
PUSH     ESI
PUSH     EDI
MOV      EDI,ECX
MOV      EBX,EDX
MOV      [EBP-04],EAX
MOV      EAX,[EBP-04]
CALL     004052F0                  //取你输入的邮件地址
XOR      EAX,EAX
PUSH     EBP
PUSH     DWORD 004A4CF4
PUSH     DWORD [FS:EAX]
MOV      [FS:EAX],ESP
LEA      EDX,[EBP-14]
MOV      EAX,[EBP-04]
CALL     0040A1CC
MOV      EDX,[EBP-14]
LEA      EAX,[EBP-04]
CALL     00404ED8
TEST     BL,BL
JZ       004A4B89
MOV      DWORD [0053B770],5D79
JMP      SHORT 004A4B93
MOV      DWORD [0053B770],7AB7
LEA      EAX,[EBP-0C]
CALL     00404E40
MOV      EAX,[EBP-04]
CALL     00405100                 //其长度，作为下面循环的次数
MOV      ESI,EAX
TEST     ESI,ESI
JNG      004A4BCB
MOV      EAX,FF
CALL     004A4B00                 //重要的子运算
MOV      EDX,EAX
LEA      EAX,[EBP-18]
CALL     00405028
MOV      EDX,[EBP-18]
LEA      EAX,[EBP-0C]
CALL     00405108
DEC      ESI
JNZ      004A4BA9                 //向上循环
LEA      EAX,[EBP-10]
CALL     00404E40
MOV      EAX,[EBP-04]
CALL     00405100
MOV      ESI,EAX
ADD      ESI,ESI
DEC      ESI
TEST     ESI,ESI
JNG      004A4C45
MOV      EBX,01
MOV      EAX,EBX                  //这里的循环是将上面的结果插入到邮件地址中
AND      EAX,80000001
JNS      004A4BF7
DEC      EAX
OR       EAX,BYTE -02
INC      EAX
TEST     EAX,EAX
JNZ      004A4C1F
LEA      EAX,[EBP-1C]
MOV      EDX,EBX
SAR      EDX,1
JNS      004A4C07
ADC      EDX,BYTE +00
MOV      ECX,[EBP-0C]
MOV      DL,[ECX+EDX]
CALL     00405028
MOV      EDX,[EBP-1C]
LEA      EAX,[EBP-10]
CALL     00405108
JMP      SHORT 004A4C41
LEA      EAX,[EBP-20]
MOV      EDX,EBX
SAR      EDX,1
JNS      004A4C2B
ADC      EDX,BYTE +00
MOV      ECX,[EBP-04]
MOV      DL,[ECX+EDX]
CALL     00405028
MOV      EDX,[EBP-20]
LEA      EAX,[EBP-10]
CALL     00405108
INC      EBX
DEC      ESI
JNZ      004A4BE9                 //向上循环
XOR      EAX,EAX
MOV      [EBP-08],EAX
MOV      EAX,[EBP-10]
CALL     00405100
MOV      ESI,EAX
TEST     ESI,ESI
JNG      004A4C6C
MOV      EBX,01
MOV      EAX,[EBP-10]             //EAX中为插入后的结果
MOVZX    EAX,BYTE [EAX+EBX-01]
ADD      [EBP-08],EAX             //完成累加
INC      EBX
DEC      ESI
JNZ      004A4C5D                 //向上循环
MOV      EAX,[EBP-08]
MOV      [0053B770],EAX
MOV      EAX,EDI
CALL     00404E40
MOV      EBX,14
MOV      EAX,09                   //这里开始进行序列号的计算
CALL     004A4B00
LEA      EDX,[EBP-24]
CALL     0040A88C
MOV      EDX,[EBP-24]
MOV      EAX,EDI
CALL     00405108
DEC      EBX
JNZ      004A4C80                 //向上循环19次
MOV      EAX,[EDI]
CALL     00405100
MOV      ESI,EAX
TEST     ESI,ESI
JNG      004A4CD1
MOV      EBX,01
MOV      EAX,EBX                  //插入“-”号
MOV      ECX,05
CDQ    
IDIV     ECX
TEST     EDX,EDX
JNZ      004A4CCD
MOV      EDX,EDI
MOV      ECX,EBX
MOV      EAX,004A4D0C
CALL     004053E8
INC      EBX
DEC      ESI
JNZ      004A4CB1
XOR      EAX,EAX
POP      EDX
POP      ECX
POP      ECX
MOV      [FS:EAX],EDX
PUSH     DWORD 004A4CFB
LEA      EAX,[EBP-24]
MOV      EDX,07
CALL     00404E64
LEA      EAX,[EBP-04]
CALL     00404E40
RET                               //返回

一处重要的子运算：

PUSH     EBX
PUSH     ESI
MOV      EBX,EAX
IMUL     ECX,[0053B770],5F11
ADD      ECX,43A0
MOV      EAX,ECX
MOV      ESI,7FFF
CDQ    
IDIV     ESI
MOV      [0053B770],EDX
MOV      EAX,ECX
CDQ    
IDIV     EBX
MOV      ECX,EDX
MOV      EAX,ECX
POP      ESI
POP      EBX
RET    

最后总结：

（1）：序列号必须为 20 位，邮件地址必须包含“@”和“.”；

（2）：根据邮件地址的长度进行 i 组运算；

（3）：将步骤（2）的结果插入到邮件地址中；

（4）：根据步骤（3）的结果进行累加；

（5）：步骤（4）的结果作为基值，进行 20 组运算；

（6）：将步骤（5）的结果连接成为字符串；

（7）：将符号“-”每隔 4 位插入到步骤（6）的结果中去。

然后据此写出注册机：

Option Explicit

Private Sub form_Load()
  cmdCalc.Enabled = False
End Sub

Private Sub txtUserName_Change()
Dim i As Byte
Dim MailOK As Byte
 For i = 1 To Len(txtUserName.Text)
   If Mid(txtUserName.Text, i, 1) = "@" Or Mid(txtUserName.Text, i, 1) = "." Then
     MailOK = MailOK + 1
   End If
   If MailOK = 2 Then
     cmdCalc.Enabled = True
   Else
     cmdCalc.Enabled = False
   End If
 Next i
End Sub

Private Sub cmdCalc_Click() '序列号计算过程
On Error Resume Next

  Dim i As Byte
  Dim BaseA As Double
  Dim BaseB As Integer
  Dim BaseC As Double
  Dim BaseD As Integer
  Dim BaseE As Byte
  Dim BaseF As Byte
  Dim Sum As Double
  Dim AddSum As Double
  Dim InsertSum As Double
 
  Dim SN As String

  BaseA = 31415
  BaseB = 24337
  BaseC = 17312
  BaseD = 32767
  BaseE = 255
  BaseF = 9
 
  For i = 1 To Len(txtUserName.Text)
     Sum = BaseA * BaseB + BaseC
     BaseA = Sum Mod BaseD
     
     If i <> 1 Then
       InsertSum = InsertSum + Sum Mod BaseE
     End If
     
     AddSum = AddSum + Asc(Mid(txtUserName.Text, i, 1))
     
  Next i
 
  BaseA = InsertSum + AddSum
 
  For i = 1 To 24
    If i Mod 5 = 0 Then
      SN = SN & "-"
    Else
      Sum = BaseA * BaseB + BaseC
      BaseA = Sum Mod BaseD
      SN = SN & Chr(Sum Mod BaseF + 48)
    End If
  Next i
 
  txtSerial = SN
  cmdCalc.Enabled = False
 
End Sub

注册成功之后，注册信息保存在：

HKEY_CURRENT_USER\Software\MimarSinan\Codex\2.0\Licensing

子键中。

这篇文章我写得很详细，希望初学者朋友能够看懂，并掌握 Crack 的一般思路。

ThE frEE crAckIng GrOup Of ChinA

fengma

于 21:20 03-5-17