程序博客网 > base64转化为json格式

RMReport3.51破解手札㈢

来源：互联网 发布：base64转化为json格式 编辑：程序博客网 时间：2024/05/21 09:01
破解步骤三——代码重建：
　　在此需要将限制的代码恢复（改变）成原来正常的代码，正常打印的Pascal代码应该如下所示：
  1. procedure _DoPrintReport;
  2. var
  3.     i,j: integer;
  4. begin
  5.     if 逐份打印 then
  6.     begin
  7.         i := 0;
  8.         repeat
  9.             if CanPrint(i) then PrintOnePage(i);
  10.             i := i+1;
  11.         until ((i>=TRMEndPages.GetCount-1) or (UserCancel));
  12.     end 
  13.     else begin
  14.         //逐页打印
  15.         for i:=0 to TRMEndPages.GetCount-1 do
  16.             for j:=0 to copies{打印份数} do 
  17.             begin
  18.                 if CanPrint(i) then PrintOnePage(i);
  19.                 if UserCancel then Break;
  20.             end;
  21.     end;
  22. end;
文章出自:《编程手札》http://blog.csdn.net/nhconch
作者：狂歌痛饮
请从《编程手札》阅读原文，引用或转载可能导致内容不全。
    　　根据Pascal代码可以很轻易的写出对应的汇编代码：
    1. //第一段
    2. asm
    3.     mov eax, [ebp + $08]
    4.     cmp byte ptr [eax + $0C], $00   //判断是否逐份打印
    5.     jz @@579                        //不是转到逐页打印
    7. //`````````````````逐份打印`````````````````````````````
    8.     xor ebx, ebx                    //ebx保存当前打印份数
    9.     jmp @@557
    11. @@506:
    12.     mov eax, [ebp + $08]
    13.     mov eax, [eax - $08]
    14.     mov eax, [eax + $58]
    15.     call TRMEndPages.GetCount    //取总页数
    16.     dec eax                         //eax=页数-1
    17.     mov ecx, eax                    //ecx保存循环次数
    19.     xor eax, eax                    //eax保存当前打印页码
    21. @@1:
    22.     push ecx
    23.     push eax
    24.     push ebp
    25.     call _CanPrint
    26.     test al, al                     //判断是否要打印
    27.     jz @@528
    28.     pop ecx {push ebp}
    29.     
    30.     pop eax
    31.     push eax
    32.     push ebp
    33.     call _PrintOnePage
    34. @@528:
    35.     pop ecx {push ebp}
    36.     pop eax
    37.     pop ecx
    38.     
    39.     inc eax
    40.     loop @@1
    42.     inc ebx                         //打印份数加1
    43. @@557:
    44.     mov eax, [ebp + $08]
    45.     cmp ebx, [eax - $0c]            //对比打印份数
    46.     jnl @@679                       //打完退出
    47.     mov eax, [ebp + $08]
    48.     mov eax, [eax - $08]
    49.     cmp byte ptr [eax + $30], $00   //查看是否要终止
    50.     jz @@506                        //不是继续
    51.     jmp @@679                       //终止退出
    53. //`````````````````逐页打印`````````````````````````````
    54. @@579:
    55.     mov eax, [ebp + $08]
    56.     mov eax, [eax - $08]
    57.     mov eax, [eax + $58]
    58.     call TRMEndPages.GetCount       //取总页数
    59.     or eax, eax
    60.     jz @@679                        //页数为0时直接退出
    61.     dec eax
    62.     mov ecx, eax                    //ecx保存页数
    63.     xor eax, eax                    //eax保存当前打印页码
    65. @@2Check_and_print:
    66.     push ecx                        //保存循环次数（页数）
    67.     push eax                        //保存当前页码
    69.     xor ebx, ebx                    //ebx保存当前打印份数
    71.     push ebp
    72.     call _CanPrint                  //Tips:影响eax, ecx, edx
    73.     pop ecx {push ebp}
    74.     test al, al
    75.     jz @@2Print_next_page
    77. @@2PrintOut:
    78.     pop eax                         //取当前页码
    79.     push eax
    80.     push ebp
    81.     call _PrintOnePage              //Tips:影响eax, ecx
    82.     pop ecx {push ebp}
    84. @@2Check_terminated_flag:
    85.     mov eax, [ebp + $08]
    86.     mov eax, [eax - $08]
    87.     cmp byte ptr [eax + $30], $00
    88.     jnz @@2Exit
    90. @@2Check_copies:
    91.     inc ebx                         //份数加1
    92.     mov eax, [ebp + $08]
    93.     cmp ebx, [eax - $0C]
    94.     jl @@2PrintOut                  //继续打印
    96. @@2Print_next_page:
    97.     pop eax                         //取回页数和页码
    98.     pop ecx
    100.     inc eax
    102.     loop @@2Check_and_print
    104.     jmp @@679
    106. @@2Exit:
    107.     pop eax                         //平衡堆栈
    108.     pop eax
    109.     jmp @@679                       //退出
    111. @@679:
    112.     nop
    113. end;
    <script type="text/javascript"><!--google_ad_client = "pub-5395599807454886";/* 468x60, 创建于 08-12-15 */google_ad_slot = "2456405239";google_ad_width = 468;google_ad_height = 60;//--></script><script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>
    　　要把这段汇编代码填回原来的DCU里还存在两个问题：第一问题是，在DCU中，所有的Call XXXXX调用的机器码都是E8 00 00 00 00，也就是说Call的地址静态时全是00，在联编过程才将00替换成正确的地址写入到可执行文件中，如果直接修改了DCU文件，那么在联编过程中编译器依然试图进行地址替换，这将会破坏掉破解的代码段而产生不可知结果，所以编写破解代码时一方面必须绕开相应位置，避免被编译器破坏代码；另一方面，又需要充分利用编译器替换的结果，使破解代码能正确调用相应函数。于是便有了下面这段代码：
    1. //第二段
    2. asm
    3.     mov eax, [ebp + $08]
    4.     cmp byte ptr [eax + $0C], $00   //判断是否逐份打印
    5.     jz @@579                        //不是转到逐页打印
    7. //`````````````````逐份打印`````````````````````````````
    8.     xor ebx, ebx                    //ebx保存当前打印份数
    9.     jmp @@557
    11. {proc near }@@_IsCanPrint:
    12.     nop
    13.     nop
    14.     push ebp
    15.     db $E8, $00, $00, $00, $00      //call _CanPrint
    16.     pop edx
    17.     ret
    18. {end proc}
    20. {proc near}@@_Pages_GetCount:
    21.     mov eax, [ebp + $08]
    22.     jmp @@_Pages_GetCount_Block2
    23. //----------------------------
    24. {proc near }@@_PrintAPage:
    25.     push ebp
    26.     db $E8, $00, $00, $00, $00      //call _PrintOnePage
    27.     pop ecx
    28.     ret
    29. {end proc}
    30. //-----------------------------
    31. @@_Pages_GetCount_Block2:
    32.     mov eax, [eax - $08]
    34.     jmp @@_Pages_GetCount_Block3
    35.     db $E8, $00, $00, $00, $00      //第二处call _CanPrint，必须跳过
    37. @@_Pages_GetCount_Block3:
    38.     mov eax, [eax + $58]
    39.     mov eax, [eax + $08]
    40.     mov eax, [eax + $08]
    41.     dec eax
    42.     ret
    43. {end proc}
    45. @@57:
    46.     db $E8, $00, $00, $00, $00      //第二处call _PrintOnePage，必须跳过
    48. @@506:
    49.     call @@_Pages_GetCount
    50.     //or eax, eax
    51.     //jz @@679                        //页数为0时直接退出
    52.     //dec eax                         //eax=页数-1
    53.     mov ecx, eax                    //ecx保存循环次数
    55.     xor eax, eax                    //eax保存当前打印页码
    57. @@1:
    58.     push ecx
    59.     push eax
    60.     call @@_IsCanPrint
    61.     test al, al                     //判断是否要打印
    62.     jz @@528
    63.     pop eax
    64.     push eax
    66.     jmp @@1_2
    67.     nop
    68.     nop
    69.     nop
    70.     db $E8, $00, $00, $00, $00      //第三处call _CanPrint，必须跳过
    72. @@1_2:
    73.     call @@_PrintAPage
    74. @@528:
    75.     pop eax
    76.     pop ecx
    77.     inc eax
    78.     loop @@1
    80.     inc ebx                         //打印份数加1
    82.     jmp @@1_3
    83.     db $00, $00, $00, $00           //第三处call _PrintOnePage，必须跳过
    84. @@1_3:
    86. @@557:
    87.     mov eax, [ebp + $08]
    88.     cmp ebx, [eax - $0c]            //对比打印份数
    89.     jnl @@679                       //打完退出
    90.     //mov eax, [ebp + $08]
    91.     mov eax, [eax - $08]
    92.     cmp byte ptr [eax + $30], $00   //查看是否要终止
    93.     jz @@506                        //不是继续
    94.     jmp @@679                       //终止退出
    96. //`````````````````逐页打印`````````````````````````````
    97. @@579:
    98. (*    mov eax, [ebp + $08]
    99.     mov eax, [eax - $08]
    100.     mov eax, [eax + $58]
    101.     db $E8, $00, $00, $00, $00      //call TRMEndPages.GetCount //取总页数
    102.     or eax, eax
    103.     jz @@679                        //页数为0时直接退出
    104.     dec eax
    105. *)
    106.     call @@_Pages_GetCount          //取总页数
    107.     mov ecx, eax                    //ecx保存页数
    109.     jmp @@2_1
    110.     db $E8, $00, $00, $00, $00      //第四处call _CanPrint，必须跳过
    111. @@2_1:
    113.     xor eax, eax                    //eax保存当前打印页码
    115. @@2Check_and_print:
    116.     push ecx                        //保存循环次数（页数）
    117.     push eax                        //保存当前页码
    119.     xor ebx, ebx                    //ebx保存当前打印份数
    121. (*    push ebp
    122.     db $E8, $00, $00, $00, $00      //call _CanPrint    //Tips:影响eax, ecx, edx
    123.     pop ecx {push ebp}
    124. *)
    125.     call @@_IsCanPrint
    126.     test al, al
    128.     jmp @@2_2
    129.     db $E8, $00, $00, $00, $00      //第四处call _PrintOnePage，必须跳过
    130. @@2_2:
    132.     jz @@2Print_next_page
    134. @@2PrintOut:
    135.     pop eax                         //取当前页码
    136.     push eax
    137. (*    push ebp
    138.     db $E8, $00, $00, $00, $00      //call _PrintOnePage//Tips:影响eax, ecx
    139.     pop ecx {push ebp}
    140. *)
    141.     call @@_PrintAPage
    143. @@2Check_terminated_flag:
    144.     mov eax, [ebp + $08]
    145.     mov eax, [eax - $08]
    146.     cmp byte ptr [eax + $30], $00
    147.     jnz @@2Exit
    149. @@2Check_copies:
    150.     inc ebx                         //份数加1
    151.     mov eax, [ebp + $08]
    152.     cmp ebx, [eax - $0C]
    153.     jl @@2PrintOut                  //继续打印
    155. @@2Print_next_page:
    156.     pop eax                         //取回页数和页码
    157.     pop ecx
    159.     inc eax
    161.     loop @@2Check_and_print
    163.     jmp @@679
    165. @@2Exit:
    166.     pop eax                         //平衡堆栈
    167.     pop eax
    168.     jmp @@679                       //退出
    170. @@679:
    171.     db $90, $90, $90
    172. end;
    　　但是这段代码却多了19个字节，没法填回到DCU中。
    文章出自:《编程手札》http://blog.csdn.net/nhconch
    作者：狂歌痛饮
    请从《编程手札》阅读原文，引用或转载可能导致内容不全。
      　　第二个问题是，原来的汇编码中没有对TRMEndPages.GetCount的调用，编译器不知道要为可执行文件生成此函数的调用地址，因此必须另辟蹊径实现GetCount的功能。通过对GetCount函数的代码的分析（过程略），通过以下一段代码实现了GetCount函数的功能：
      1. //GetCount
      2.     mov eax, [ebp + $08]
      3.     mov eax, [eax - $08]
      4.     mov eax, [eax + $58]
      5.     mov eax, [eax + $08]
      6.     mov eax, [eax + $08]
      7. //ret
      　　综合以上问题，我写下第三段破解代码：
      1. asm
      2.     mov eax, [ebp + $08]
      3.     cmp [eax - $0C], $00
      4.     je @@2Go679                     //份数为0时直接退出
      5.     jmp @@579
      7. @@_IsCanPrint:
      8.     push ebp
      9.     db $E8, $00, $00, $00, $00      //call _CanPrint    //Tips:影响eax, ecx, edx
      10.     pop ecx {push ebp}
      11.     test al, al
      12.     jz @@2Print_next_page
      14. @@_PrintAPage:
      15.     pop eax                         //取当前页码
      16.     push eax
      17.     push ebp
      18.     db $E8, $00, $00, $00, $00      //call _PrintOnePage//Tips:影响eax, ecx
      19.     pop ecx
      20.     jmp @@2Check_terminated_flag
      22.     dd 0
      23.     db $E8, $00, $00, $00, $00      //跳过第二处call _CanPrint
      25. @@579:
      26.     mov eax, [ebp + $08]
      27.     mov eax, [eax - $08]
      28.     mov eax, [eax + $58]
      30.     jmp @@2Skip1
      31.     db $E8, $00, $00, $00, $00      //跳过第二处call _PrintOnePage
      32. @@2Skip1:
      34.     mov eax, [eax + $08]
      35.     mov eax, [eax + $08]            //TRMEndPages.GetCount //取总页数
      37.     or eax, eax
      38.     jz @@2Go679                     //页数为0时直接退出
      39.     dec eax
      40.     mov ecx, eax                    //ecx保存页数
      41.     xor eax, eax                    //eax保存当前打印页码
      43. @@2Check_and_print:
      44.     push ecx                        //保存循环次数（页数）
      45.     push eax                        //保存当前页码
      47.     xor ebx, ebx                    //ebx保存当前打印份数
      49.     jmp @@_IsCanPrint
      51.     dw 0, 0, 0
      52.     db $E8, $00, $00, $00, $00      //跳过第三处call _CanPrint
      53.     dd 0, 0, 0
      54.     db $E8, $00, $00, $00, $00      //跳过第三处call _PrintOnePage
      56. @@2Check_terminated_flag:
      57.     mov eax, [ebp + $08]
      58.     mov eax, [eax - $08]
      59.     cmp byte ptr [eax + $30], $00
      60.     jnz @@2Exit
      62. @@2Check_copies:
      63.     inc ebx                         //份数加1
      64.     mov eax, [ebp + $08]
      65.     cmp ebx, [eax - $0C]
      66.     jl @@_PrintAPage                //继续打印
      68. @@2Print_next_page:
      69.     pop eax                         //取回页数和页码
      70.     pop ecx
      72.     inc eax
      74.     loop @@2Check_and_print
      76.     jmp @@2Go679
      78.     db $E8, $00, $00, $00, $00      //跳过第四处call _CanPrint
      80. @@2Exit:
      81.     pop eax                         //平衡堆栈
      82.     pop eax
      83. @@2Go679:                           //通过此处跳到@@679，因编译器忽略jmp word ptr ..
      84.     nop                             //空指令，避免编译器优化代码
      85.     jmp @@679                       //到@@679退出
      87.     dd 0, 0, 0, 0, 0, 0, 0, 0, 0
      88.     db 0
      90. @@679:
      91.     inc eax
      93. end;
      文章出自:《编程手札》http://blog.csdn.net/nhconch
      作者：狂歌痛饮
      请从《编程手札》阅读原文，引用或转载可能导致内容不全。
        　　这段代码中裁剪掉了逐份打印功能（实际中也很少有人使用）以便有足够的空间书写代码，而实际证明这段代码工作得相当好。剩下的事就是把破解代码转换成机器码、用十六进制编辑器（UtralEdit、HexEdit、或更旧的PCToools等），把rm_Class.dcu中的代码替换为破解代码（rm3.51的偏移值为48EE7），方法很多这里不作述说。

        RMReport3.51破解手札㈠　　　RMReport3.51破解手札㈡
        base64转化为json格式 base64转化为json格式
        原创粉丝点击
        热门IT博客
        phpstorm使用教程知乎phpstorm使用教程知乎
        优酷网络节目街头采访优酷网络节目街头采访
        hadoop大数据解决方案
        mac装win10详细教程
        沈阳市软件行业协会
        python 3.5.2
        linux多线程面试题
        支付宝端口号
        吉利知豆电动汽车新款
        电商美工职责
        健身的女生很会夹 知乎
        信息与数据的联系
        网络硬件知识
        淘宝代购的东西能退吗
        c语言头常用头文件
        全国电动汽车台数据
        东方梦华录mac
        psd源码头像
        网络兼职工作有哪些
        c4d r18 mac
        热门问题 老师的惩罚 人脸识别 我在镇武司摸鱼那些年 重生之率土为王 我在大康的咸鱼生活 盘龙之生命进化 天生仙种 凡人之先天五行 春回大明朝 姑娘不必设防，我是瞎子 霹雳功德人生 我百万亿功德 超级功德系统 快穿功德无量 快穿之功德无量 六零之功德福女 女配功德无量快穿沉云香 功德印青衫烟雨 洪荒之功德金乌 繁星的功德簿 洪荒之功德玉莲 功德金光成精啦 功德簿txt下载 功德之主 荒古天帝 功德之主txt下载 药师琉璃光如来本愿功德经 河州贤孝韩起功抓兵45分钟 功放 功放机 甲类功放 功放电路图 dvd功放 电子管功放 dsp功放 纯后级功放 天龙功放 金嗓子功放 汽车功放 胆机功放 雅马哈功放 功放电路 安桥功放 功放板 马兰士功放 定压功放 功放的作用 ktv功放 音响功放 纯甲类功放 功放作用 功放调音台

        程序博客网，程序员的互联网技术博客家园。csdn论坛精品 msdn技术资料都在这里