首页
社区
课程
招聘
[原创]Absolute MP3 Splitter Converter v2.5.6算法分析(RSA)兼FGInt库的使用
发表于: 2007-1-19 16:33 9712

[原创]Absolute MP3 Splitter Converter v2.5.6算法分析(RSA)兼FGInt库的使用

2007-1-19 16:33
9712

【文章标题】: Absolute MP3 Splitter Converter v2.5.6算法分析(RSA)兼FGInt库的使用
【软件名称】: Absolute MP3 Splitter Converter v2.5.6
【保护方式】: RSA-100
--------------------------------------------------------------------------------
【详细过程】
  1. PEid分析是Delphi程序,kanal插件识别出了几个FGInt的库函数;
  2. 用DeDe分析出注册对话框中OK按钮的事件地址是0050016C,同时用DeDe导出map文件;
  3. OD上场,加载上一步的map文件;
  4. 手动给PEiD识别出来的那几个函数加上标签。估计是程序作者使用的FGInt库和我的版本不同,导致

IDA没能识别出其库函数。
  
  0050016C >/.>push    ebp                          ;  <-TRegForm@BtnOKClick
  0050016D  |.>mov     ebp, esp
  0050016F  |.>push    0
  00500171  |.>push    0
  00500173  |.>push    ebx
  00500174  |.>mov     ebx, eax
  00500176  |.>xor     eax, eax
  00500178  |.>push    ebp
  00500179  |.>push    <->System.@HandleFinally;>
  0050017E  |.>push    dword ptr fs:[eax]
  00500181  |.>mov     fs:[eax], esp
  00500184  |.>lea     edx, [ebp-4]                 ;  取用户名
  00500187 >|.>mov     eax, [ebx+314]               ;  *Edit1:N.A.
  0050018D >|.>call    00469D48                     ;  ->Controls.TControl.GetText

(TControl):TCaption;
  00500192  |.>lea     edx, [ebp-8]                 ;  取注册码
  00500195 >|.>mov     eax, [ebx+318]               ;  *Edit2:N.A.
  0050019B >|.>call    00469D48                     ;  ->Controls.TControl.GetText

(TControl):TCaption;
  005001A0  |.>mov     eax, [505500]
  005001A5  |.>mov     eax, [eax]
  005001A7  |.>mov     ecx, [ebp-8]
  005001AA  |.>mov     edx, [ebp-4]
  005001AD >|.>call    004FF1B4                     ;  ->:TMainForm._PROC_004FF1B4()
  005001B2  |.>test    al, al
  005001B4  |.>je      short 0050020E               ;  比较注册成功与否
  005001B6  |.>mov     eax, [505500]
  005001BB  |.>mov     eax, [eax]
  005001BD  |.>mov     edx, [ebp-4]
  005001C0  |.>call    004FF528
  005001C5  |.>push    40
  005001C7  |.>mov     ecx, 00500250                ;  ASCII "Congratulations!"
  005001CC  |.>mov     edx, 00500264                ;  ASCII "Register successfully!  Thank

you for your support!"
  005001D1  |.>mov     eax, [5057BC]
  005001D6  |.>mov     eax, [eax]
  005001D8 >|.>call    0048A080                     ;  ->Forms.TApplication.MessageBox

(TApplication;PChar;PChar;Longint):Integer;
  
  可以看出,005001AD是关键call,跟进去:
  004FF1B4  /$>push    ebp
  004FF1B5  |.>mov     ebp, esp
  004FF1B7  |.>add     esp, -1C
  004FF1BA  |.>push    ebx
  004FF1BB  |.>xor     ebx, ebx
  004FF1BD  |.>mov     [ebp-C], ebx
  004FF1C0  |.>mov     [ebp-8], ecx
  004FF1C3  |.>mov     [ebp-4], edx
  004FF1C6  |.>mov     eax, [ebp-4]
  004FF1C9  |.>call    00404C2C
  004FF1CE  |.>mov     eax, [ebp-8]
  004FF1D1  |.>call    00404C2C
  004FF1D6  |.>lea     eax, [ebp-14]
  004FF1D9  |.>mov     edx, [4BF084]                ;  Absolute.004BF088
  004FF1DF  |.>call    0040524C
  004FF1E4  |.>lea     eax, [ebp-1C]
  004FF1E7  |.>mov     edx, [4BF084]                ;  Absolute.004BF088
  004FF1ED  |.>call    0040524C
  004FF1F2  |.>xor     eax, eax
  004FF1F4  |.>push    ebp
  004FF1F5  |.>push    004FF276
  004FF1FA  |.>push    dword ptr fs:[eax]
  004FF1FD  |.>mov     fs:[eax], esp
  004FF200  |.>xor     ebx, ebx
  004FF202  |.>lea     edx, [ebp-14]
  004FF205  |.>mov     eax, [50533C]                ;  e:65537 = 0x10001
  004FF20A  |.>call    <Base10StringToFGInt>
  004FF20F  |.>lea     edx, [ebp-1C]
  004FF212  |.>mov     eax, [505340]                ;  n
  004FF217  |.>call    <Base10StringToFGInt>
  004FF21C  |.>lea     eax, [ebp-4]
  004FF21F  |.>push    eax
  004FF220  |.>lea     ecx, [ebp-1C]
  004FF223  |.>lea     edx, [ebp-14]
  004FF226  |.>mov     eax, [ebp-4]                 ;  name
  004FF229  |.>call    <RsaEncrypt>
  004FF22E  |.>lea     edx, [ebp-C]
  004FF231  |.>mov     eax, [ebp-4]
  004FF234  |.>call    <ConvertBase256to64>         ;  这个函数PEid没能识别出来,是我猜+试出

来的
  004FF239  |.>mov     eax, [ebp-8]                 ;  sn
  004FF23C  |.>mov     edx, [ebp-C]                 ;  真正注册码
  004FF23F  |.>call    00404B88                     ;  明码比较
  004FF244  |.>jnz     short 004FF248
  004FF246  |.>mov     bl, 1
  004FF248  |>>xor     eax, eax
  004FF24A  |.>pop     edx
  004FF24B  |.>pop     ecx
  004FF24C  |.>pop     ecx
  004FF24D  |.>mov     fs:[eax], edx
  004FF250  |.>push    004FF27D
  004FF255  |>>lea     eax, [ebp-1C]
  004FF258  |.>mov     edx, [4BF084]                ;  Absolute.004BF088
  004FF25E  |.>mov     ecx, 2
  004FF263  |.>call    00405368
  004FF268  |.>lea     eax, [ebp-C]
  004FF26B  |.>mov     edx, 3
  004FF270  |.>call    004047A0
  004FF275  \.>retn
  
  尽管是明码比较,但我们还是尝试着来写个注册机,以熟悉FGInt库:
  
  //为了减小Delphi程序的体积,我们没有使用VCL,而使用console,这样代码更加清晰明了。
  //Coded by [HappyTown]/2007-01-16
  Program KeyGen;
  {$APPTYPE CONSOLE}
  
  Uses Windows,Messages,FGInt,FGIntRSA;
  Var
          n,e: TFGInt;
          name,sn: String;
  Begin
          Base10StringToFGInt('874802157929661091407425794781', n);
          Base10StringToFGInt('65537', e);
          Write('User name:');
          ReadLn(name);//name应该小于n,但我偷懒了,没有对它作限制
          RSAEncrypt(name, e, n, name);
          ConvertBase256to64(name, sn);
          FGIntdestroy(n);
          FGIntdestroy(e);
          WriteLn('Registration code:', sn);
          MessageBox(0, PChar(sn), 'Registration code:', MB_OK);//同时用MessageBox显示出来,方

便拷贝
  End.
         
  给3组可用的注册码:
  name:HappyTown
  sn:aRTyKEge7YjReqyGmq
  
  name:pediy
  sn:bWmLoHqb7PWltKEwla
  
  name:看雪学院
  sn:bIkBPy79c06kZKX77y
  
--------------------------------------------------------------------------------
【经验总结】
  这个算法没有正确使用RSA,因而没有任何挑战性;但让我们知道了RSA的明码比较以及几个FGInt库函

数的使用方法,呵呵。
  
--------------------------------------------------------------------------------
【版权声明】: 本文原创于看雪技术论坛, 转载请注明作者并保持文章的完整, 谢谢!

                                                       2008年01月16日 10:35:23


[注意]传递专业知识、拓宽行业人脉——看雪讲师团队等你加入!

收藏
免费 7
支持
分享
最新回复 (8)
雪    币: 440
活跃值: (737)
能力值: ( LV9,RANK:690 )
在线值:
发帖
回帖
粉丝
2
支持
楼主介绍一下制作FGInt库的sig的方法吧
2007-1-19 16:39
0
雪    币: 405
活跃值: (10)
能力值: ( LV9,RANK:1130 )
在线值:
发帖
回帖
粉丝
3
源码我喜欢。
顺便问下,map文件到底有甚么用呢
2007-1-19 16:44
0
雪    币: 721
活跃值: (350)
能力值: ( LV9,RANK:1250 )
在线值:
发帖
回帖
粉丝
4
最初由 winndy 发布
支持
楼主介绍一下制作FGInt库的sig的方法吧

参考IDA的说明
2007-1-19 16:49
0
雪    币: 721
活跃值: (350)
能力值: ( LV9,RANK:1250 )
在线值:
发帖
回帖
粉丝
5
最初由 binbinbin 发布
...map文件到底有甚么用呢

帮助识别库函数
2007-1-19 16:49
0
雪    币: 309
活跃值: (15)
能力值: ( LV9,RANK:610 )
在线值:
发帖
回帖
粉丝
6
RSA不是
c = m^e ( mod n )
吗??
在学习斑竹以前关于RSA的破文是,我都是根据上面那个公式用大数计算器计算出来的结果啊?

这个和上面这个式子计算出来的结果有什么关系???
如果继续用大数计算器应该怎么计算?
哪位大虾指点下小弟???
2007-4-27 13:35
0
雪    币: 222
活跃值: (40)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
7
学习....
  .
2007-4-27 15:09
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
8
烦请happytown
看看这帖:http://bbs.pediy.com/showthread.php?t=46708
2007-6-25 22:51
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
ltr
9
下载以后学习。
2007-6-26 12:07
0
游客
登录 | 注册 方可回帖
返回
//