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包,请公布。

近期下载者

相关文件


收藏者