IP spoofer使用经验
(1)、IP wizard不是必须的,其实也可以在设置网络连接属性里手工添加IP地址。
(2)、如果使用IP wizard添加IP地址,在网络连接属性中把相关的连接停用再启用即可生效,不用重启计算机!要知道重启是件累人的事!
(3)、网上抄来的:查看脚本执行过程中是否使用了设置的虚拟ip,可以如下设置
在脚本中添加代码:
char * ip=lr_get_vuser_ip();
if(ip)
lr_vuser_status_message("The ip address is %s",ip);
else
lr_vuser_status_message("IP spoofing disabled");
在脚本运行过程中点击"Vusers"可以查看得到各个虚拟用户使用的虚拟IP
(4)、要虚拟很多IP的情况:在一台机上虚拟的IP跨网段的处理,可通过在服务器端添加路由来实现。
例:
【服务器】IP:192.168.0.1
【测试机】IP:192.168.0.2
测试机上添加的虚拟IP: 192.168.10.1~254
那么在【服务器】端执行以下命令:
route add 192.168.10.0 mask 255.255.255.0 192.168.0.2
注:【格式: route add 虚拟IP网段号 mask 255.255.255.0 测试机固定IP】
完成后,在【服务器】端ping 一下192.168.10.1,能通即可。
(5)为了检查虚拟IP是否如所想的那样,我采用了以下asp代码作为测试对象,每访问一次都会把访问IP、时间记录到ipinfo.txt文件。
<%
dim IPinfo,FileName
IPinfo = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If IPinfo = "" Then IPinfo = Request.ServerVariables("REMOTE_ADDR") '获得访问者IP
IPinfo=IPinfo&" "&now()
response.write IPinfo
FileName="IPinfo.txt"
'保存IP信息在IPinfo.txt文件中
call SaveTextFile(FileName, IPinfo) '保存
'写文件
Sub SaveTextFile(strFile, strFileInnew)
Dim objFSO, objOutStream, strTestFile
strTestFile = Server.Mappath(strFile)
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objOutStream = objFSO.OpenTextFile(strTestFile,8,True,False)
objOutStream.WriteLine(strFileInnew)
objOutStream.Close
Set objOutStream = Nothing
Set objFSO = Nothing
End Sub
%>
(2)、如果使用IP wizard添加IP地址,在网络连接属性中把相关的连接停用再启用即可生效,不用重启计算机!要知道重启是件累人的事!
(3)、网上抄来的:查看脚本执行过程中是否使用了设置的虚拟ip,可以如下设置
在脚本中添加代码:
char * ip=lr_get_vuser_ip();
if(ip)
lr_vuser_status_message("The ip address is %s",ip);
else
lr_vuser_status_message("IP spoofing disabled");
在脚本运行过程中点击"Vusers"可以查看得到各个虚拟用户使用的虚拟IP
(4)、要虚拟很多IP的情况:在一台机上虚拟的IP跨网段的处理,可通过在服务器端添加路由来实现。
例:
【服务器】IP:192.168.0.1
【测试机】IP:192.168.0.2
测试机上添加的虚拟IP: 192.168.10.1~254
那么在【服务器】端执行以下命令:
route add 192.168.10.0 mask 255.255.255.0 192.168.0.2
注:【格式: route add 虚拟IP网段号 mask 255.255.255.0 测试机固定IP】
完成后,在【服务器】端ping 一下192.168.10.1,能通即可。
(5)为了检查虚拟IP是否如所想的那样,我采用了以下asp代码作为测试对象,每访问一次都会把访问IP、时间记录到ipinfo.txt文件。
<%
dim IPinfo,FileName
IPinfo = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If IPinfo = "" Then IPinfo = Request.ServerVariables("REMOTE_ADDR") '获得访问者IP
IPinfo=IPinfo&" "&now()
response.write IPinfo
FileName="IPinfo.txt"
'保存IP信息在IPinfo.txt文件中
call SaveTextFile(FileName, IPinfo) '保存
'写文件
Sub SaveTextFile(strFile, strFileInnew)
Dim objFSO, objOutStream, strTestFile
strTestFile = Server.Mappath(strFile)
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objOutStream = objFSO.OpenTextFile(strTestFile,8,True,False)
objOutStream.WriteLine(strFileInnew)
objOutStream.Close
Set objOutStream = Nothing
Set objFSO = Nothing
End Sub
%>
浙公网安备 33010602011771号