jianting
所属分类:网络
开发工具:Delphi
文件大小:345KB
下载次数:49
上传日期:2004-06-14 10:03:11
上 传 者:
linzhong
说明: 网络监听程序
(Network monitoring program)
文件列表:
jianting (0, 2004-06-14)
jianting\ipmandelphi (0, 2004-06-14)
jianting\ipmandelphi\Vpacket.vxd (13393, 1998-02-01)
jianting\ipmandelphi\communit.dcu (7042, 1999-05-23)
jianting\ipmandelphi\communit.pas (8458, 1999-05-23)
jianting\ipmandelphi\getethaddr.~dp (246, 1999-05-19)
jianting\ipmandelphi\getethaddr.~ds (3241, 1999-06-02)
jianting\ipmandelphi\getethaddr.cfg (282, 1999-05-23)
jianting\ipmandelphi\getethaddr.dof (1229, 1999-05-23)
jianting\ipmandelphi\getethaddr.dpr (246, 1999-05-19)
jianting\ipmandelphi\getethaddr.dsk (3495, 1999-06-02)
jianting\ipmandelphi\getethaddr.exe (336384, 1999-06-02)
jianting\ipmandelphi\getethaddr.res (876, 1999-05-20)
jianting\ipmandelphi\main.~df (1016, 1999-05-23)
jianting\ipmandelphi\main.~pa (7996, 1999-06-02)
jianting\ipmandelphi\main.dcu (9161, 1999-06-02)
jianting\ipmandelphi\main.dfm (1016, 1999-05-23)
jianting\ipmandelphi\main.pas (7998, 1999-06-02)
jianting\ipmandelphi\netfun.~pa (9775, 1999-05-23)
jianting\ipmandelphi\netfun.dcu (7436, 1999-06-02)
jianting\ipmandelphi\netfun.pas (9785, 1999-06-02)
jianting\ipmandelphi\communit.~pa (8407, 1999-05-23)
jianting\netthread (0, 2004-06-14)
jianting\netthread\Vpacket.vxd (13393, 1998-02-01)
jianting\netthread\communit.dcu (6807, 1999-05-23)
jianting\netthread\communit.pas (8446, 1999-05-23)
jianting\netthread\ether.~dp (241, 1999-05-23)
jianting\netthread\ether.~ds (3021, 1999-05-24)
jianting\netthread\ether.cfg (282, 1999-05-23)
jianting\netthread\ether.dof (1340, 1999-05-23)
jianting\netthread\ether.dpr (268, 1999-05-23)
jianting\netthread\ether.dsk (3275, 1999-06-02)
jianting\netthread\ether.exe (318976, 1999-06-02)
jianting\netthread\ether.res (876, 1999-05-23)
jianting\netthread\main.~df (748, 1999-05-23)
jianting\netthread\main.~pa (3094, 1999-05-23)
jianting\netthread\main.dcu (5861, 1999-06-02)
jianting\netthread\main.dfm (748, 1999-05-23)
jianting\netthread\main.pas (3065, 1999-06-02)
... ...
1。源程序共有两个,分别在目录IPMANDELPHI和目录NETTHREAD下。
ipmandelphi没有用线程,所以按下侦听键后,程序一直要收到300
个包才会停止。NETTHREAD用线程解决了这个问题。当然,该程序的
线程的用法比较怪异,但我一直这样用,也挺好使。当然,程序还是
有问题,如果网上发包的频率过高,该程序会漏掉某些包。
2。两个程序都还比较初级,仅仅只是收到了包而已,并没有对包的结
构进行分析,所以如对包的分析及构造感兴趣,请参照IPMAN源程序继
续进行完善,并请予以发布。
3。源程序中有一个参数需大家修改,即NDIS,
Bind(hVxd,'0001');
后面的参数请到注册表的以下部分寻找:
HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\Net
IPMAN的说明文件所指的地方有误。大家也可以自己试试,反正是0000、
0001、0002、0003中的某一个。
4。由于本人能力有限,程序还有一个很大的bug,即如果程序读取了以太网
卡地址,则程序只能侦听与本网卡有关的包,听不到其它包。所以如想侦听
所有的包,请将以下这句注释掉:
if(GetHardEtherAddr(hVxD,@m_EtherAddr)<>OK) then exit;
5。两个程序所发送的包只构造了以太网部分,当然发送方和接受方的地址
都是假的。如有谁继续构造了假的TCPIP包,请公布。
近期下载者:
相关文件:
收藏者: