关于wsock32.dll

mygo 2000-12-22 11:51:00
请教各位大虾，如何在保留system\wsock32.dll的情况下，把所有网络包转发到自己目录下的wsock32.dll中，以实现截取的功能。
例如MS proxy以及大多数防火墙软件就实现了
...全文
1302 24 打赏 收藏 转发到动态 举报
写回复
用AI写文章
24 条回复
切换为时间正序
请发表友善的回复…
发表回复
mygo 2000-12-26
  • 打赏
  • 举报
 回复
how
com235 2000-12-26
  • 打赏
  • 举报
 回复
think
mygo 2000-12-24
  • 打赏
  • 举报
 回复
请教各位，winsock1.1是否支持IPX/SPX，即wsock32.dll
是否只有winsock2.0才支持,即ws2_32.dll
sxbyl 2000-12-23
  • 打赏
  • 举报
 回复
因为我现在在忙别的程序，而且对这类东西知道很少，所以还是等高手来吧:)
mygo 2000-12-23
  • 打赏
  • 举报
 回复
他好像是用强行替换的办法
mygo 2000-12-23
  • 打赏
  • 举报
 回复
我用的是win98, 你在win2000下试验成功了吗？
谢谢
那个帖子的源代码我有，下载路径：
http://www.vchelp.net/source/submit/wsock32_sub.htm
sxbyl 2000-12-23
  • 打赏
  • 举报
 回复
对了，昨天我看到一个贴子，对你可能有用：http://www.csdn.net/expert/TopicView.asp?id=49942
sxbyl 2000-12-23
  • 打赏
  • 举报
 回复
不对，你用的不是2000:(
sxbyl 2000-12-23
  • 打赏
  • 举报
 回复
不是吧？你用的是Win2000?
mygo 2000-12-23
  • 打赏
  • 举报
 回复
测试结果：不行
测试方法：
1、把wsock32.dll拷贝到目录d:\tmp中
2、修改注册表的所有相关项，目录指向d:\tmp\wsock32.dll
3、在DOS下删除system\wsock32.dll
4、重新启动，报错！找不到wsock32.dll
mygo 2000-12-23
  • 打赏
  • 举报
 回复
对不起，发错了
mygo 2000-12-23
  • 打赏
  • 举报
 回复
在MFC Dll Wizard中选中"MFC Extension"试试
mygo 2000-12-23
  • 打赏
  • 举报
 回复
似乎ms proxy不是采用截取API的方法，有没有其它方法，大虾们
舟中夜起 2000-12-23
  • 打赏
  • 举报
 回复
我琢磨了一下vcbear所给帖子的例子，使用截取Dll中的单个输出函数的办法，不能是全部的替换，而且不大可靠，有没有截取dll的handle的方法？谢谢
还有wsock32.dll是不是调用wsock.vxd,如果那样的话，我可用用Hook_PM_API的方法截取wsock.vxd中的输出函数
vcbear 2000-12-23
  • 打赏
  • 举报
 回复
看看精华的
http://www.csdn.net/expert/Topic/7167.shtm

应该有点提示
mygo 2000-12-23
  • 打赏
  • 举报
 回复
可不可以截取wsock32.dll的handle,然后替换成自己的handle,wsock32.dll在系统一运行就打开了，我对handle机制不大了解，那位大虾可以介绍一下，谢谢
sxbyl 2000-12-23
  • 打赏
  • 举报
 回复
To:squiffy 但是这种方法在Win2000下实行起来麻烦，因为Win2000对所有的系统文件都有一个备份，一旦发现系统文件有所改变，它就立即用备份恢复。你只有把它的备份文件改个名字才行，总之很麻烦，不利于用户使用
squiffy 2000-12-23
  • 打赏
  • 举报
 回复
你非得保留Winsock.dll干吗？
你就把这个Winsock.dll改名，改成winsock.aaa。
然后自己写一个Winsock.dll，然后你的这个dll里面都调用winsock.aaa相应的函数，对你想处理的数据包就在你的函数前面处理一下不就行了。
sxbyl 2000-12-22
  • 打赏
  • 举报
 回复
修改以下三个地方：
\HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\Tcpip\ServiceProvider
\HKEY_LOCAL_MACHINE\SYSTEM\ControlSet002\Services\Tcpip\ServiceProvider
\HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\ServiceProvider
mygo 2000-12-22
  • 打赏
  • 举报
 回复
我这就去试试
加载更多回复（4）
YURI_1000-1001 + wsock32.dll + rulesmd.ini + XCC Mixer.exe
YURI_1000-1001 + wsock32.dll + rulesmd.ini + XCC Mixer.exe
wsock32.dll
wsock32
系统dll文件修复小工具
可修复常用的dll文件，例如：Dsound.dll,Ddraw.dll,D3d8.dll,rpcss.dll,olepro32.dll,d3d8thk.dll,wsock32.dll,comdlg32.dll,d3d9.dll,lpk.dll,kernel32.dll,ksuser.dll,urlmon.dll,npptools.dll,rundll32.exe,comres.dll,imm32.dll,usp10.dll, midimap.dll,dinput8.dll,userenv.dll,,ctfmon.exe,conime.exe,msvcrt.dll,dbghelp.dll,D3D8THK.DLL
获得IPWINSOCK.DLL
function int WSACleanup() library "wsock32.dll" function int WSAGetLastError ( ) library "wsock32.dll" function int gethostname ( ref string name, int namelen ) library "wsock32.dll" function string GetHost(string lpszhost, ref blob lpszaddress ) library "pbws32.dll"
omron plc fins 通信源码
omron plc fins 通信源码 Private Declare Function WSAGetLastError Lib "WSOCK32.DLL" () As Long Private Declare Function WSAStartup Lib "WSOCK32.DLL" _ (ByVal wVersionRequired As Long, lpWSADATA As WSADATA) As Long Private Declare Function WSACleanup Lib "WSOCK32.DLL" () As Long Private Declare Function gethostname Lib "WSOCK32.DLL" _ (ByVal szHost As String, ByVal dwHostLen As Long) As Long Private Declare Function gethostbyname Lib "WSOCK32.DLL" _ (ByVal szHost As String) As Long Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" _ (hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long) Private ICF As String Private RSV As String Private GCT As String Private DNA As String Private DA1 As String Private DA2 As String Private SNA As String Private SA1 As String Private SA2 As String Private SID As Byte Private HostNode As String Private HeaderCode As String Private DelayTim As String Private Memory As String Private CommandCode As String Private Address As String Private Bit As String Private Num As String Private WriteData As String Private EndStr As String Dim EtnFins() As Byte Dim RevInfo() As Byte Dim RevInfoStr As String Dim RevinfoCnt As Long
VC/MFC

16,472

社区成员

421,732

社区内容

发帖
与我相关
我的任务
社区描述
VC/MFC相关问题讨论
社区管理员
  • 基础类社区
  • Web++
  • encoderlee
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告

        VC/MFC社区版块或许是CSDN最“古老”的版块了，记忆之中，与CSDN的年龄几乎差不多。随着时间的推移，MFC技术渐渐的偏离了开发主流，若干年之后的今天，当我们面对着微软的这个经典之笔，内心充满着敬意，那些曾经的记忆，可以说代表着二十年前曾经的辉煌……
        向经典致敬，或许是老一代程序员内心里面难以释怀的感受。互联网大行其道的今天，我们期待着MFC技术能够恢复其曾经的辉煌，或许这个期待会永远成为一种“梦想”，或许一切皆有可能……
        我们希望这个版块可以很好的适配Web时代，期待更好的互联网技术能够使得MFC技术框架得以重现活力，……

试试用AI创作助手写篇文章吧

+ 用AI写文章