baitang36 发表于 2022-2-17 08:03:14

[原创]把lisp程序加密成fas(有升级)

本帖最后由 baitang36 于 2023-9-27 07:30 编辑

原理很简单,就是把lisp文件变换成乱码,然后嵌入一个fas框架中,变成一个fas文件。这个fas框架是手工打造的,不是标准的,一般的反编译工具对它无效。加密强度和acad自带的原始lsp加密protected类似,用于保护免费软件够用了。卖钱的软件建议购买专业的pfas2.x
这个fas在被加载的时候,会自行把乱码解密成一个字符串,从内存中加载,不会产生临时文件。
程序内定义了一个函数 c:l2f
用法:L2F回车,选需要加密的lisp文件,点打开就可以加密成功。
注意lisp文件的大小不能超过64k,因为lsp中字符串的定义是用了两个字节,能表示的最大数是65535



为方便批量处理,新版定义了一个函数 lsp2fas用法:(lsp2fas "d:/111.lsp")



有朋友问我,为什么升级后还是不支持大于64k的文件?
因为这种加密是把lsp文件加密后作为一个字符串来处理的,相当于给lsp文件直接加了一个壳,脱壳后拿到的是你完整的带注释的源码。
加密强度不够高,因此只适用于免费软件和小插件。大于64k的程序,编译后用免费的pvlx2.21加密更安全。
对于能卖钱的程序,建议不要用免费加密工具,购买收费的pfas3.0更专业,更安全。

baitang36 发表于 2022-2-17 12:55:14

无币的可以在这里下载

baitang36 发表于 2022-2-17 10:12:30

本帖最后由 baitang36 于 2022-2-23 12:37 编辑 <br /><br /><div class="quote"><blockquote><font size="2"><a href="forum.php?mod=redirect&amp;goto=findpost&amp;pid=906288&amp;ptid=184781" target="_blank"><font color="#999999">yyzhan12 发表于 2022-2-17 09:20</font></a></font><br>感谢分享。<br><br>有bug<br></blockquote></div><br>好的,谢谢测试

baitang36 发表于 2022-2-18 16:18:00

emk 发表于 2022-2-17 15:23
lisp文件的大小不能超过64k,能再改大些吗?
命令太短冲突,最好直接改成 lisp2fas

如果大于64k需要用到字符串拼接,处理起来比较麻烦。你可以把lsp分段加密,然后把多个fas组合成一个。太大的lsp不建议用这种方式加密,速度慢,加密强度不高。可以考虑用pfas2.x专业加密

f4800 发表于 2022-2-17 08:24:05

不错 好用 支持   点赞

xj6019 发表于 2022-2-17 08:32:04

不错 好用 支持   点赞   支持大佬新作感谢分享!!

baitang36 发表于 2022-2-17 08:46:00

本帖最后由 baitang36 于 2022-2-17 12:56 编辑

无币的请去15楼下载

p-3-ianlcc 发表于 2022-2-17 08:56:42

支持,讚~
版大的東西都很棒!

paulpipi 发表于 2022-2-17 09:13:37

很好,太牛丁,感谢

yyzhan12 发表于 2022-2-17 09:20:53

感谢分享。

有bug
CAD 2022加载出错
命令: (LOAD "D:/搜狗高速下载/lsp2fas.fas") ; 错误: 无效的二进制文件格式: 体 (2) 错误

加密后的fas在cad 2022不可加载

yanchao316 发表于 2022-2-17 10:29:07

谢谢分享。

流氓兔 发表于 2022-2-17 11:23:50

太牛了,增加多选功能,更香,更顺滑,大师出品
页: [1] 2 3 4 5
查看完整版本: [原创]把lisp程序加密成fas(有升级)