运行分析
- 需要破解Name和Serial
PE分析
- Delphi程序,32位,无壳
静态分析&动态调试
- ida无法找到有用字符串,这边使用PE Explore分析
- 将程序拉进PE Explore,Ctrl + R分析
- 找到RC data\TFORM4\Button1为关键事件
- Ctrl + M进行反汇编,点击Start Now分析
- Ctrl + F查找Button1click,多次查找下一个后,发现可疑地址00421DC8
- 发现关键函数
- 进行动态调试,发现伪代码不是很准确
- 主要逻辑是通过Name计算出v4,比较v4和Serial,相等弹窗破解成功
算法分析
Name = 'concealbear'
v4 = 55
for i in range(len(Name)):
v4 += ord(Name[i-1]) << 9
print(Name + '的Serial为:\n' + v4)
- 验证成功