http://d.namipan.com/d/7a29e746df9f3879129bbdaa88432c4ab17bb2230c5f0a00
键盘过滤驱动勘误《寒江独钓》
Keydata=Irp->AssociatedIrp.SystemBuffer;
numKeys=Irp->IoStatus.Information / Sizeof(KEYBOARD_INPUT_DATA);
for ( i=0;i<numKeys;i++)
{
DbgPrint(("numKeys : %d ",numKeys));
DbgPrint(("Scan code : %x ",KeyData->MakeCode));
DbgPrint(("%s\n",KeyData->Flags? "up":"down"));
MyPrintKeyStroke((UCHAR)KeyData->MakeCode);
if (KeyData->MakeCode==CAPS_LOCK)
{
KeyData->MakeCode=LCONTROL;
}
}
以上是书上的源代码,整个循环体只遍历了第一个结构体,后面的并没有进行操作,虽然有个循环但是并没有什么实质的作用,正确的遍历代码应该是下面的样子。程序代码所在页面Page-73
Keydata=Irp->AssociatedIrp.SystemBuffer;
numKeys=Irp->IoStatus.Information / Sizeof(KEYBOARD_INPUT_DATA);
for ( i=0;i<numKeys;i++,numKeys++)
{
DbgPrint(("numKeys : %d ",numKeys));
DbgPrint(("Scan code : %x ",KeyData->MakeCode));
DbgPrint(("%s\n",KeyData->Flags? "up":"down"));
MyPrintKeyStroke((UCHAR)KeyData->MakeCode);
if (KeyData->MakeCode==CAPS_LOCK)
{
KeyData->MakeCode=LCONTROL;
}
}
IP Sender [IP 发送者 ] beta 2
话说前几天又有人问关于能不能获取公网ip的问题,今天修改了下,增加了公网ip的获取,猛击此处下载文件!
最终获取的ip为如下的格式:
可能的公网ip:124.128.77.XXX
本地ip:192.168.5.146
2010-1-18 17:31:07
火星黑客研究院-论坛挂机工具
Delphi 记事本【有码有真相】
字符转转换(汉字 Unicode Base64加密解密)
IP发送者(IP sender)
说明:这个小程序说白了也没什么意思。就是获取主机的ip,然后发送到制定的FTP,或者Email。现在远程控制多是反向连接的。也没必要用这个东西, 但是如果对于adsl用户来说,如果用dameware,或者3389终端之类的管理这个小工具或许还有点用处吧。这个东西就是根据前面那篇ftpmyip的代码进一步修改的。程序不会判断内网或者外网ip,感觉没必要,只会获取本机ip。判断感觉不是很有必要。就没做。
另外程序如果加壳了,请加壳后再配置服务端,否则将不能正常发送。并且夹加壳后要在文件末尾留出300字节的空白区域,这个直接用c32asm添加就行了。程序获取ip发送ip时间间隔为一小时,这个时间不能手工设置,如果需要的话再说吧。本来是不想写这个东西的,但是受人之托忠人之事,虽然功能不多,但是写起来还是费了一番周折 。好了,就到这里,猛击此处下载程序!
ps:如果想把ip文件传到默认目录下请将目标路径保持为fuck。否则将不能上传。源程序由于加密解密算法问题,不能正常发送ip,现在已经修正,如果下载了请重新下载文件。 :oups: :oups: