作者chengcti (版主请投我一票!)
看板CodeJob
标题Re: [讨论] 授权逾期？
时间Wed Apr 27 12:28:17 2016
花个 30min 做点逆向工程 tracking code
1. Delphi 7 + Quickreport + Access 无压缩, 无加壳
2. 本来我以为写的多麽的厉害, tracking 到授权程式部分
搞了很长的时间 一直陷在里面 本来打算重写好了
後来发现那段授权程式 "是垃圾"
原本他在每个功能会增加授权机制, 就是可以让多使用者使用
依据不同的使用者 可以开启不同的function (新增 删除 修改)
这段码是去存取另外一个 table
我原本计画重建这个授权的 table (Basicpp)
结果发现 "这段是垃圾"
因为他根本就没有 call 这段码
他只做一个
当你去选择 menuitem 上面的功能时 会 check 可不可以进去
if bAccess then dosomething else ShowMessage('授权逾期')
cmp [$0048648], 00 ;if bAccess
jz exit ;jump ShowMessage
call [$0058304] ;next function
3. 本来我想改所 bAccess 把所有的 bAccess remake 掉 (塞 nop)
结果又发现 这是初学者写的 所以
他在 FormCreate 做了一件事情 (default value)
bool bAccess := false;
mov [$0048648], 00 ; bAccess := 0;
然後检查日期
if LeftStr(NowDate) < '2009/xx' then bAccess := true;
结果我发现... 我直接把最前面的 default 为 true 就行了
bool bAccess := true;
mov [$0048648], 01
只改一个 byte
30min (price: free)
原本我想把时间压在十分钟内 结果失策
4. 送去业主测试 因为我机器没有 XP 我只有 Windows 10 64bit
上面不能跑这麽旧的程式
而且都是 delphi 10.1 没有 delphi 7 没办法 build
只能改完送去给业主 debug
我还是继续逆向工程 Delphi 10.1 Berlin
他的 rsa1024 license management 比较有挑战性
unis 写了破解 xe7 ~ xe10 结果 Embarcadero 受不了
直接请他到公司去上班
p.s.
java & .net 比较好 decompiler
我一大堆试用版改成正常版
delphi 8 之後 就很难了 因为他是 native code
※ 引述《hius (2.3S)》之铭言：
: 很久之前有请人写一套进销存
: 最近要移转到另一台电脑，重新安装後
: 功能都没办法用了，都跳出授权逾期
: http://i.imgur.com/O820gv9.jpg
: 询问原作者，他也退休了，资料也没保留。
: 把东西都丢给他看後，他说没法处理...说牵扯到什麽元件之类的
: 请问这有的解吗？当初安装的套件都有留着。
: 实在是不想再花一笔费用请人重写阿~~~~~
--
Sent from my USS Nimitz
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 1.34.153.98
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/CodeJob/M.1461731300.A.7D6.html
※ 编辑: chengcti (1.34.153.98), 04/27/2016 12:32:07
1F：推 hius: 虽然看不懂但受小的一拜，若可以修改功能，还请跟我联络後续 04/27 13:01
2F：→ alog: 楼上原po 逆向工程帮你做到这样很佛心了啦xd 04/27 13:03
3F：→ alog: 多功能改功能，除非原始码你有买断并保留着 04/27 13:04
4F：推 annies5: 请受小第一拜~ 04/27 13:24
5F：推 hius: 当初程式合约也找不到了，也忘记有无跟他买断。若可以修改功 04/27 13:55
6F：→ hius: 能，一定要支付费用的话，原作者退休找不到人维护挺麻烦的 04/27 13:56
7F：→ hius: 这一套进销存已经是公司的第三套了，都是找SOHO，看来下次如 04/27 13:57
8F：→ hius: 果有要新增的话，看直接买大公司套装的好了... 04/27 13:57
9F：推 TobyH4cker: 推 不过小缺点 decompile 04/28 14:35
10F：→ xdraculax: 不要以为大公司的就不会倒，旧版不继续支援也有 05/12 17:45