Windows新异步网络编程模型5 RIO-socks5服务端

已于 2023-02-26 20:05:11 修改
阅读量197 收藏
点赞数 1
分类专栏： Delphi 网络编程 文章标签： 网络 Powered by 金山文档
于 2023-02-26 17:07:49 首次发布
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/hksoobe/article/details/129228807
版权 
unit RioSocks5Server;
{
//chatGPT写的 编译没通过还要调整

调用例子
uses
  Winapi.Winsock2, System.SysUtils, RioSocks5Server, RioProxyServer;

var
  Socks5Server: TRioSocks5Server;
  ProxyServer: TRioProxyServer;
begin
  Socks5Server := TRioSocks5Server.Create;
  ProxyServer := TRioProxyServer.Create;
  try
    Socks5Server.Start('0.0.0.0', 1080, 1024);
    ProxyServer.Start('0.0.0.0', 0, 1024);
    ProxyServer.OnProxyComplete := Socks5Server.OnProxyComplete;
    ProxyServer.AuthRequired := True;
    ProxyServer.Authenticator := TMyAuthenticator.Create;
    TMyAuthenticator(ProxyServer.Authenticator).AddUser('username', 'password');
    while True do
    begin
      Sleep(1000);
    end;
  finally
    Socks5Server.Free;
    ProxyServer.Free;
  end;
end;

}

interface

uses
  System.SysUtils,
  System.Classes,
  System.SyncObjs,
  System.Win.ScktComp,
  Winapi.Windows,
  Winapi.WinSock2,
  IdWinsock2,
  Soap.Rio;

type
  TRioSocks5Server = class
  private
    FRioHandle: THandle;
    FRioCompletionPort: THandle;
    FServerSocket: TServerSocket;
    FNumBuffers: Integer;
    FBufferSize: Integer;
    FOverlappedArray: array of TOverlapped;
    FBufferArray: array of Pointer;
    FAcceptThread: TThread;
    FClientThreads: TThreadList;
    FUserName: string;
    FPassword: string;
    procedure CreateRIO;
    procedure DestroyRIO;
    procedure OnClientConnect(Sender: TObject; Socket: TCustomWinSocket);
    procedure OnClientRead(Sender: TObject; Socket: TCustomWinSocket);
    procedure OnClientDisconnect(Sender: TObject; Socket: TCustomWinSocket);
    procedure AcceptThreadFunc;
    procedure ClientThreadFunc(Socket: TCustomWinSocket);
  public
    constructor Create(ANumBuffers, ABufferSize: Integer; const AUserName, APassword: string);
    destructor Destroy; override;
    procedure Start;
    procedure Stop;
  end;
function RIOCreateExtensionFunctionTable(const FunctionTableId: TGUID; const FunctionTable: PRIO_EXTENSION_FUNCTION_TABLE): HRESULT; stdcall; external 'mswsock.dll' name 'RIOCreateExtensionFunctionTable';
implementation

type
  TRIOContext = record
    Socket: TCustomWinSocket;
    Buffer: Pointer;
    Overlapped: TOverlapped;
    ProxyConnected: Boolean;
  end;

  PRIOContext = ^TRIOContext;

const
  MAX_RIO_REQUESTS = 1024;
  MAX_RIO_RESULTS = 1024;
  MAX_RIO_THREADS = 16;
  SOCKS5_VERSION = $05;
  SOCKS5_AUTH_NONE = $00;
  SOCKS5_AUTH_USERNAME_PASSWORD = $02;
  SOCKS5_AUTH_NO_ACCEPTABLE_METHODS = $FF;
  SOCKS5_CMD_CONNECT = $01;
  SOCKS5_ATYP_IPV4 = $01;
  SOCKS5_ATYP_DOMAINNAME = $03;
  SOCKS5_REP_SUCCESS = $00;
  SOCKS5_REP_GENERAL_FAILURE = $01;
  SOCKS5_REP_CONNECTION_NOT_ALLOWED = $02;
  SOCKS5_REP_NETWORK_UNREACHABLE = $03;
  SOCKS5_REP_HOST_UNREACHABLE = $04;
  SOCKS5_REP_CONNECTION_REFUSED = $05;
  SOCKS5_REP_TTL_EXPIRED = $06;
  SOCKS5_REP_COMMAND_NOT_SUPPORTED = $07;
  SOCKS5_REP_ADDRESS_TYPE_NOT_SUPPORTED = $08;

constructor TRioSocks5Server.Create(ANumBuffers, ABufferSize: Integer; const AUserName, APassword: string);
begin
  FNumBuffers := ANumBuffers;
  FBufferSize := ABufferSize;
  FServerSocket := TServerSocket.Create(nil);
  FServerSocket.OnClientConnect := OnClientConnect;
  FServerSocket.OnClientRead := OnClientRead;
  FServerSocket.OnClientDisconnect := OnClientDisconnect;
  FClientThreads := TThreadList.Create;
  FUserName := AUserName;
  FPassword := APassword;
end;

destructor TRioSocks5Server.Destroy;
begin
  Stop;
  FClientThreads.Free;
  FServerSocket.Free;
  inherited;
end;

procedure TRioSocks5Server.Start;
begin
  CreateRIO;
  FServerSocket.Active := True;
  FAcceptThread := TThread.CreateAnonymousThread(AcceptThreadFunc);
  FAcceptThread.FreeOnTerminate := False;
  FAcceptThread.Start;
end;

procedure TRioSocks5Server.Stop;
begin
  FServerSocket.Active := False;
  FAcceptThread.Terminate;
  FAcceptThread.WaitFor;
  DestroyRIO;
end;

procedure TRioSocks5Server.CreateRIO;
var
  ExtensionFunctionTable: RIO_EXTENSION_FUNCTION_TABLE;
  I: Integer;
  Result: HRESULT;
begin
  FillChar(ExtensionFunctionTable, SizeOf(ExtensionFunctionTable), 0);
  ExtensionFunctionTable.cbSize := SizeOf(ExtensionFunctionTable);
  Result := RIOCreateExtensionFunctionTable(@ExtensionFunctionTable, RIO_CORRUPT_CQ or RIO_MSG_DONT_NOTIFY);
  if Result <> S_OK then
    raise Exception.Create('Failed to create RIO extension function table');
  ExtensionFunctionTable.RIOReceive := RIOReceive;
  ExtensionFunctionTable.RIOSend := RIOSend;
  ExtensionFunctionTable.RIOCloseCompletionQueue := RIOCloseCompletionQueue;
  ExtensionFunctionTable.RIOCreateCompletionQueue := RIOCreateCompletionQueue;
  ExtensionFunctionTable.RIOCreateRequestQueue := RIOCreateRequestQueue;
  ExtensionFunctionTable.RIODequeueCompletion := RIODequeueCompletion;
  ExtensionFunctionTable.RIODeregisterBuffer := RIODeregisterBuffer;
  ExtensionFunctionTable.RIORegisterBuffer := RIORegisterBuffer;
  ExtensionFunctionTable.RIONotify := RIONotify;
  ExtensionFunctionTable.RIOReceiveEx := RIOReceiveEx;
  ExtensionFunctionTable.RIOSendEx := RIOSendEx;
  ExtensionFunctionTable.RIOSendMessages := RIOSendMessages;
  ExtensionFunctionTable.RIOReceiveMessages := RIOReceiveMessages;
  ExtensionFunctionTable.RIOResizeCompletionQueue := RIOResizeCompletionQueue;
  ExtensionFunctionTable.RIOResizeRequestQueue := RIOResizeRequestQueue;
  ExtensionFunctionTable.RIOGetCompletionEx := RIOGetCompletionEx;
  ExtensionFunctionTable.RIOGetRequestEx := RIOGetRequestEx;
  ExtensionFunctionTable.RIOGetResultEx := RIOGetResultEx;
  ExtensionFunctionTable.RIODestroyRequestQueue := RIODestroyRequestQueue;
  ExtensionFunctionTable.RIODestroyCompletionQueue := RIODestroyCompletionQueue;
  ExtensionFunctionTable.RIOReceiveMsg := RIOReceiveMsg;
  ExtensionFunctionTable.RIOSendMsg := RIOSendMsg;

  FillChar(FOverlappedArray[0], Length(FOverlappedArray) * SizeOf(TOverlapped), 0);
  FillChar(FBufferArray[0], Length(FBufferArray) * SizeOf(Pointer), 0);

  FRioHandle := CreateEvent(nil, False, False, nil);
  if FRioHandle = 0 then
    raise Exception.Create('Failed to create RIO event');

  Result := RIORegisterBuffer(FBufferArray[0], Length(FBufferArray) * FBufferSize);
  if Result <> S_OK then
    raise Exception.Create('Failed to register RIO buffers');

  ExtensionFunctionTable.MaxOutstandingReceive := FNumBuffers;
  ExtensionFunctionTable.MaxOutstandingSend := FNumBuffers;

  ExtensionFunctionTable.MaxReceiveDataBuffers := 1;
  ExtensionFunctionTable.MaxSendDataBuffers := 1;

  ExtensionFunctionTable.RegistrationGuid := TGUID.Empty;

  ExtensionFunctionTable.ReceiveCompletionRoutine := nil;
  ExtensionFunctionTable.SendCompletionRoutine := nil;

  ExtensionFunctionTable.ReceiveExCancellationRoutine := nil;
  ExtensionFunctionTable.SendExCancellationRoutine := nil;

  ExtensionFunctionTable.GetOverlappedResultEx := nil;

  FRioCompletionPort := ExtensionFunctionTable.RIOCreateCompletionQueue(MAX_RIO_REQUESTS, nil);
  if FRioCompletionPort = RIO_INVALID_CQ then
    raise Exception.Create('Failed to create RIO completion port');

  Result := ExtensionFunctionTable.RIORegisterBuffer(FBufferArray[0], Length(FBufferArray) * FBufferSize);
  if Result <> S_OK then
    raise Exception.Create('Failed to register RIO buffers');

  for I := 0 to MAX_RIO_REQUESTS - 1 do
  begin
    PRIOContext(@FOverlappedArray[I])^.Buffer := Pointer(UIntPtr(FBufferArray[0]) + (I * FBufferSize));
    PRIOContext(@FOverlappedArray[I])^.ProxyConnected := False;
  end;

  Result := ExtensionFunctionTable.RIOCreateRequestQueue(FServerSocket.SocketHandle, MAX_RIO_REQUESTS, 1, MAX_RIO_REQUESTS, FBufferSize, FBufferSize, 0, nil, FRioCompletionPort, nil);
  if Result <> S_OK then
    raise Exception.Create('Failed to create RIO request queue');
end;

procedure TRioSocks5Server.DestroyRIO;
var
  ExtensionFunctionTable: RIO_EXTENSION_FUNCTION_TABLE;
  Result: HRESULT;
begin
  FillChar(ExtensionFunctionTable, SizeOf(ExtensionFunctionTable), 0);
  ExtensionFunctionTable.cbSize := SizeOf(ExtensionFunctionTable);
  Result := RIOCreateExtensionFunctionTable(@ExtensionFunctionTable, RIO_CORRUPT_CQ or RIO_MSG_DONT_NOTIFY);
  if Result <> S_OK then
    raise Exception.Create('Failed to create RIO extension function table');
  Result := ExtensionFunctionTable.RIOCloseCompletionQueue(FRioCompletionPort);
  if Result <> S_OK then
    raise Exception.Create('Failed to close RIO completion port');
  Result := ExtensionFunctionTable.RIODeregisterBuffer(FBufferArray[0]);
  if Result <> S_OK then
    raise Exception.Create('Failed to deregister RIO buffers');
  CloseHandle(FRioHandle);
end;

procedure TRioSocks5Server.OnClientConnect(Sender: TObject; Socket: TCustomWinSocket);
var
  RioRequestContext: PRIOContext;
  BytesReceived: DWORD;
begin
  if Socket.SocketType = stStream then
  begin
    BytesReceived := Socket.ReceiveBuf(FBufferArray[0]^, FBufferSize, 0);
    if BytesReceived >= 3 then
    begin
      if (PByte(FBufferArray[0])^ = SOCKS5_VERSION) and (PByte(FBufferArray[0])^ = BytesReceived - 1) and ((PByte(FBufferArray[0]) + 1)^ > 0) then
      begin
        RioRequestContext := PRIOContext(FOverlappedArray[0].hEvent);
        RioRequestContext.Socket := Socket;
        Move(FBufferArray[0]^, PByte(@RioRequestContext.Buffer)^, BytesReceived);
        RioRequestContext.Buffer := Pointer(UIntPtr(RioRequestContext.Buffer) + BytesReceived);
        RioRequestContext.Overlapped.Offset := 0;
        RioRequestContext.Overlapped.OffsetHigh := 0;
        RioRequestContext.Overlapped.hEvent := FRioHandle;
        RioRequestContext.ProxyConnected := False;
        if (PByte(FBufferArray[0]) + 1)^ >= 1 then
          RioRequestContext.ProxyConnected := True;
        RIOReceive(FServerSocket.SocketHandle, RioRequestContext.Overlapped, @FBufferArray[0]^, 1, 0, RioRequestContext);
        Exit;
      end;
    end;
  end;
  Socket.Close;
end;

procedure TRioSocks5Server.OnClientRead(Sender: TObject; Socket: TCustomWinSocket);
var
  RioRequestContext: PRIOContext;
  BytesReceived: DWORD;
  UserName: string;
  Password: string;
begin
  RioRequestContext := PRIOContext(Socket.Data);
  BytesReceived := 0;
  try
    BytesReceived := Socket.ReceiveBuf(Pointer(UIntPtr(RioRequestContext.Buffer) + RioRequestContext.Overlapped.InternalHigh)^, FBufferSize - RioRequestContext.Overlapped.InternalHigh, 0);
  except
  end;
  if BytesReceived > 0 then
  begin
    if not RioRequestContext.ProxyConnected then
    begin
      if (PByte(RioRequestContext.Buffer)^ = SOCKS5_VERSION) and (PByte(RioRequestContext.Buffer + 1)^ = SOCKS5_AUTH_USERNAME_PASSWORD) and (BytesReceived = 3) then
      begin
        RioRequestContext.Buffer := Pointer(UIntPtr(RioRequestContext.Buffer) + BytesReceived);
        RioRequestContext.Overlapped.Offset := 0;
        RioRequestContext.Overlapped.OffsetHigh := 0;
        RioRequestContext.Overlapped.hEvent := FRioHandle;
        RioRequestContext.ProxyConnected := True;
        RIOReceive(FServerSocket.SocketHandle, RioRequestContext.Overlapped, @FBufferArray[0]^, 1, 0, RioRequestContext);
        Exit;
      end
      else if (PByte(RioRequestContext.Buffer)^ = SOCKS5_VERSION) and (PByte(RioRequestContext.Buffer + 1)^ = SOCKS5_AUTH_NONE) and (BytesReceived = 2) then
      begin
        RioRequestContext.Buffer := Pointer(UIntPtr(RioRequestContext.Buffer) + BytesReceived);
        RioRequestContext.Overlapped.Offset := 0;
        RioRequestContext.Overlapped.OffsetHigh := 0;
        RioRequestContext.Overlapped.hEvent := FRioHandle;
        RioRequestContext.ProxyConnected := True;
        RIOReceive(FServerSocket.SocketHandle, RioRequestContext.Overlapped, @FBufferArray[0]^, 1, 0, RioRequestContext);
        Exit;
      end
      else
      begin
        Socket.Close;
        Exit;
      end;
    end
    else if (PByte(RioRequestContext.Buffer)^ = SOCKS5_VERSION) and (PByte(RioRequestContext.Buffer + 1)^ = SOCKS5_CMD_CONNECT) and (PByte(RioRequestContext.Buffer + 2)^ = 0) then
    begin
      case PByte(RioRequestContext.Buffer + 3)^ of
        SOCKS5_ATYP_IPV4:
          begin
            if BytesReceived >= 10 then
            begin
              RioRequestContext.Buffer := Pointer(UIntPtr(RioRequestContext.Buffer) + BytesReceived);
              RioRequestContext.Overlapped.Offset := 0;
              RioRequestContext.Overlapped.OffsetHigh := 0;
              RioRequestContext.Overlapped.hEvent := FRioHandle;
              RIOReceive(FServerSocket.SocketHandle, RioRequestContext.Overlapped, @FBufferArray[0]^, 1, 0, RioRequestContext);
              Exit;
            end;
          end;
        SOCKS5_ATYP_DOMAINNAME:
          begin
            if (BytesReceived >= 5) and (BytesReceived = 5 + PByte(RioRequestContext.Buffer + 4)^) then
            begin
              RioRequestContext.Buffer := Pointer(UIntPtr(RioRequestContext.Buffer) + BytesReceived);
              RioRequestContext.Overlapped.Offset := 0;
              RioRequestContext.Overlapped.OffsetHigh := 0;
              RioRequestContext.Overlapped.hEvent := FRioHandle;
              RIOReceive(FServerSocket.SocketHandle, RioRequestContext.Overlapped, @FBufferArray[0]^, 1, 0, RioRequestContext);
              Exit;
            end;
          end;
        SOCKS5_ATYP_IPV6:
          begin
            if BytesReceived >= 22 then
            begin
              RioRequestContext.Buffer := Pointer(UIntPtr(RioRequestContext.Buffer) + BytesReceived);
              RioRequestContext.Overlapped.Offset := 0;
              RioRequestContext.Overlapped.OffsetHigh := 0;
              RioRequestContext.Overlapped.hEvent := FRioHandle;
              RIOReceive(FServerSocket.SocketHandle, RioRequestContext.Overlapped, @FBufferArray[0]^, 1, 0, RioRequestContext);
              Exit;
            end;
          end;
      end;
      Socket.Close;
      Exit;
    end
    else if (PByte(RioRequestContext.Buffer)^ = SOCKS5_VERSION) and (PByte(RioRequestContext.Buffer + 1)^ = SOCKS5_CMD_CONNECT) and (PByte(RioRequestContext.Buffer + 2)^ = $FF) then
    begin
      Socket.Close;
      Exit;
    end
    else if (PByte(RioRequestContext.Buffer)^ = SOCKS5_VERSION) and (PByte(RioRequestContext.Buffer + 1)^ = SOCKS5_CMD_CONNECT) and (PByte(RioRequestContext.Buffer + 2)^ = $02) and (BytesReceived >= 3) then
    begin
      if (PByte(RioRequestContext.Buffer + 3)^ = 0) and (BytesReceived = 4) then
      begin
        RioRequestContext.Buffer := Pointer(UIntPtr(RioRequestContext.Buffer) + BytesReceived);
        RioRequestContext.Overlapped.Offset := 0;
        RioRequestContext.Overlapped.OffsetHigh := 0;
        RioRequestContext.Overlapped.hEvent := FRioHandle;
        RIOReceive(FServerSocket.SocketHandle, RioRequestContext.Overlapped, @FBufferArray[0]^, 1, 0, RioRequestContext);
        Exit;
      end
      else if (PByte(RioRequestContext.Buffer + 3)^ = 1) and (BytesReceived >= 5) and (PByte(RioRequestContext.Buffer + 4)^ > 0) then
      begin
        SetLength(UserName, PByte(RioRequestContext.Buffer + 4)^);
        Move((PByte(RioRequestContext.Buffer + 5))^, PByte(UserName)^, Length(UserName));
        RioRequestContext.Buffer := Pointer(UIntPtr(RioRequestContext.Buffer) + BytesReceived);
        RioRequestContext.Overlapped.Offset := 0;
        RioRequestContext.Overlapped.OffsetHigh := 0;
        RioRequestContext.Overlapped.hEvent := FRioHandle;
        RIOReceive(FServerSocket.SocketHandle, RioRequestContext.Overlapped, @FBufferArray[0]^, 1, 0, RioRequestContext);
        Exit;
      end
      else if (PByte(RioRequestContext.Buffer + 3)^ = 2) and (BytesReceived >= 6) and (PByte(RioRequestContext.Buffer + 4)^ > 0) then
      begin
        SetLength(UserName, PByte(RioRequestContext.Buffer + 4)^);
        Move((PByte(RioRequestContext.Buffer + 5))^, PByte(UserName)^, Length(UserName));
        if (BytesReceived >= 6 + Length(UserName)) and (PByte(RioRequestContext.Buffer + 5 + Length(UserName))^ > 0) then
        begin
          SetLength(Password, PByte(RioRequestContext.Buffer + 5 + Length(UserName))^);
          Move((PByte(RioRequestContext.Buffer + 6 + Length(UserName)))^, PByte(Password)^, Length(Password));
          if (not FAuthRequired) or ((FAuthRequired) and (FAuthenticator.Authenticate(UserName, Password))) then
          begin
            RioRequestContext.Buffer := Pointer(UIntPtr(RioRequestContext.Buffer) + BytesReceived);
            RioRequestContext.Overlapped.Offset := 0;
            RioRequestContext.Overlapped.OffsetHigh := 0;
            RioRequestContext.Overlapped.hEvent := FRioHandle;
            RIOReceive(FServerSocket.SocketHandle, RioRequestContext.Overlapped, @FBufferArray[0]^, 1, 0, RioRequestContext);
            Exit;
          end
          else
          begin
            FServerSocket.SocketConnection[Socket.Handle].SendBuf(SOCKS5_AUTH_FAILED_RESPONSE, 2);
            Socket.Close;
            Exit;
          end;
        end;
      end;
      Socket.Close;
      Exit;
    end
    else
    begin
      RioRequestContext.Socket.SocketType := stCustom;
      FProxyServer.BeginProxyRequest(RioRequestContext.Socket, FBufferArray[0]^, BytesReceived);
      RioRequestContext.Socket := nil;
      RioRequestContext.ProxyConnected := False;
      RioRequestContext.Buffer := Pointer(UIntPtr(RioRequestContext.Buffer) + BytesReceived);
      RioRequestContext.Overlapped.Offset := 0;
      RioRequestContext.Overlapped.OffsetHigh := 0;
      RioRequestContext.Overlapped.hEvent := FRioHandle;
      RIOReceive(FServerSocket.SocketHandle, RioRequestContext.Overlapped, @FBufferArray[0]^, 1, 0, RioRequestContext);
      Exit;
    end;
  end;
  Socket.Close;
end;

procedure TRioSocks5Server.OnProxyComplete(Sender: TObject; ClientSocket, ProxySocket: TCustomWinSocket; Request: TProxyRequest; Buffer: TBytes; BytesTransferred: Integer);
var
  RioRequestContext: PRIOContext;
  SentBytes: Integer;
begin
  if not Assigned(ClientSocket) or not Assigned(ProxySocket) then
    Exit;
  if not (ClientSocket.SocketType = stCustom) or not (ProxySocket.SocketType = stCustom) then
    Exit;
  RioRequestContext := PRIOContext(ClientSocket.Data);
  if not Assigned(RioRequestContext) then
  begin
    ClientSocket.Close;
    ProxySocket.Close;
    Exit;
  end;
  if not RioRequestContext.ProxyConnected then
  begin
    ClientSocket.Close;
    ProxySocket.Close;
    Exit;
  end;
  try
    ProxySocket.SendBuf(Buffer[0], BytesTransferred);
    RioRequestContext.Socket := ProxySocket;
    RioRequestContext.Overlapped.Offset := 0;
    RioRequestContext.Overlapped.OffsetHigh := 0;
    RioRequestContext.Overlapped.hEvent := FRioHandle;
    RIOReceive(FServerSocket.SocketHandle, RioRequestContext.Overlapped, @FBufferArray[0]^, 1, 0, RioRequestContext);
  except
    ClientSocket.Close;
    ProxySocket.Close;
  end;
end;

end.
hksoobe
关注
  • 1
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
蓝恒 Windows Scoket5 代理服务器搭建程序
09-16
蓝恒Socket5服务器 是一款用于在Windows系统下架设Socket5代理的服务器程序，可对客户端提供各类相关网络服。 蓝恒Socket5服务器功能介绍： Socket5代理为一种互谅网类似于Http代理的一种高效稳定的代理,可用户代理各类相关网络服务。 程序支持账户批量生成,批量管理,可完全根据您的设定设置用户代理的可用是,支持IP与端口的完全自定等. 完美支持第三方开发接口对接,可与各类第三方应用程序完美结合使用，符合Socket5完全接口标准. 快速高效持久稳定运行,可根据服务器进行全智能自动调节网络资源,简单操作,方便快捷。 全能后方技术保障,时时程序支持,时时免费更新,提供解决各类网络应用组建建议,让您的后顾无忧。
Windows新异步网络编程模型1 RIO-函数列举
hksoobe的专栏
02-26 424
RIO 全部函数
C#高性能TCP服务的多种实现方式
orichisonic的专栏
02-14 3795
哎~~ 想想大部分园友应该对 "高性能" 字样更感兴趣，为了吸引眼球所以标题中一定要突出，其实我更喜欢的标题是《猴赛雷，C#编写TCP服务的花样姿势！》。 本篇文章的主旨是使用 .NET/C# 实现 TCP 高性能服务的不同方式，包括但不限于如下内容： APM 方式，即 Asynchronous Programming ModelTAP 方式，即 Task-based Asyn
网络编程学习（六）
cyynid的博客
08-19 418
网络编程学习（六） WinSock编程 函数 描述 accept 允许在套接字上进行传入连接尝试。 AcceptEx 接受新连接，返回本地和远程地址，并接收客户端应用程序发送的第一个数据块。 bind 将本地地址与套接字关联。 closesocket 关闭现有套接字。 connect 建立与指定套接字的连接。 ConnectEx 建立与指定套接字的连接，并可选择在建立连接后发送数据。 仅在面向连接的套接字上受支持。 DisconnectEx 关闭套接字上的连接，并允许重用套接字句柄。 EnumProtoco
Socks5代理在Windows下的应用及网络安全问题
jxyS5的博客
05-13 1132
Socks5代理是一种非常流行的代理方式，它不仅可以隐藏你的IP地址，还可以加密你的网络流量，提高网络安全性。因此，需要选择可靠的代理服务器，并采取一些其他的加密措施，例如使用VPN。代理服务器可能会记录用户的上网记录、IP地址等敏感信息，因此需要选择不记录日志的代理服务器，或者在使用代理服务器时采取一些隐私保护措施，例如使用Tor网络。某些网络可能会对代理服务器进行封锁，因此在使用Socks5代理时需要选择合适的代理服务器，并采取一些其他的防封锁措施，例如使用Shadowsocks等工具。
Windows网络异步IO模型
weixin_30332705的博客
06-03 234
话不多说，直接进入主题。 编写一个TCP\UDP网络服务器，自然就想到最简单的api，通过socket、bind、listen、accept、send、recv可以搭建一个阻塞的服务器。 一分钱一分货，简单的搭建，必然带来简陋的性能，或者说，可以通过一些多线程、事件通知等工具，亲手打造一个更优的服务器，但毕竟这些工作，已经有现成的模型，何必呢。 现成的模型分为以下几类： SELECT ...
SimpleSocks5:一个简单的Socks5服务器，支持CONNECT请求
04-03
SimpleSocks5 一个简单的异步（异步/等待）Socks5服务器，用于处理CONNECT请求。 （它不支持BIND或UDP ASSOCIATE） 您只需要SimpleSocks5.py 。 它不需要任何第三方库。 灵感来自
RioSockets:通过已注册IO的高性能零拷贝UDP套接字抽象
05-03
这是具有双重堆栈IPv4 / IPv6支持的通过的UDP套接字的高性能，零复制，内存有效的抽象。 此实现基于单线程完成轮询，并为有效负载使用了大的连续页面对齐的环形缓冲区。 它设计用于低延迟和高吞吐量，并为多人游戏等应用程序提供大量小消息。 此实现了NIC吞吐量限制，即通过网络传输超过。 建造 可以使用带有GNU Make或Visual Studio的构建该库。 它需要Windows 8 / Windows Server 2012或更高版本。 用法 开始工作之前，应使用riosockets_initialize();初始化库riosockets_initialize(); 功能。 工作完成后，使用riosockets_deinitialize();对库进行riosockets_deinitialize(); 功能。 启动新服务器 void callback (RioSocket se
Windows新异步网络编程模型2 RIO-函数原型
hksoobe的专栏
02-26 477
RIO函数原型
RIOTcpServer:使用Windows注册IO（RIO）的高性能TCP服务器示例
05-22
RIOTcpServer 使用Windows注册I / O（RIO）的高性能和低延迟TCP服务器示例 如果找到UDP服务器，请单击 要求：Windows 8或Windows Server 2012，Visual Studio 2013，x64 幻灯片：
hev-socks5-tproxy:适用于 Linux 的简单、轻量级的 socks5 透明代理。 (TCPUDP over TCPIPv4IPv6)
08-04
HevSocks5Tproxy HevSocks5Tproxy 是一个简单、轻量级的 Linux 透明代理。 特征IPv4/IPv6。 （双栈） 重定向 TCP 连接。 重定向 UDP 数据包。 （基于 TCP 的 UDP）如何建造Linux ： git clone --recursive git://...
async-socks5:async.await SOCKS5实现
04-15
异步袜子5 一个async .await 实现。例子通过my-proxy-server.com:54321连接到google.com:80 ： use tokio :: net :: TcpStream;use tokio :: io :: BufStream;use async_socks5 :: {connect, Result };#[tokio::main...
go-socks5-server:原始但又现代的socks5-server与auth
05-17
去socks5服务器 原始但现代。 通过config（/etc/go-socks5-server.config.json）进行授权，而不是通过Linux PAM进行授权。 在Go上编写的Socks5代理服务器（基于： : ） 如何安装 CentOS6（已测试）或其他sysvinit...
nim-socks5：Nim Socks5库
02-02
nim-socks5：Nim Socks5库
易语言-易语言http socks4 socks5 超级代理服务端
06-26
基于 hp-socket 开发的代理服务器， 多连接，速度非常的快可基于一个端口开放 HTTP 和 SOCKS4 和 SOCKS5 的代理协议 支持 HTTPS 连接HTTP 和 SOCKS4 比较简单 只是单纯的转发这次增加了 SOCKS5 协议SOCKS5 协议支持...
Delphi 2010 DevExpressVCL.13.1.4 安装方法
hksoobe的专栏
06-15 4310
1.解压DevExpressVCL.13.1.4.7z 如D:\Program Files\DevExpressVCL.13.1.4 2.打开DevExpressVCL一键编译安装工具_2.14(免费分享版）.rar 3.
XE8安装JVCL(D7-X10通用)
hksoobe的专栏
12-16 2032
这里以XE8安装为例其它版本应该差不多 下载地址：http://sourceforge.net/projects/jvcl/files/JVCL%203/JVCL%203.49/ 下载JVCL349CompleteJCL27-Build5676.zip 解压到如下位置 D:\Program Files (x86)\Embarcadero\RAD Studio\16.0\Components
推荐一个代码编辑器控件 LMD SyntaxEdit
hksoobe的专栏
12-08 1879
一直没有找到第二个好用的代码编辑器控件一直用的SynEdit，最新版本是2.0.8从13年开始就一直没有更新了像代码收缩，代码自动补全功能一直都没有支持，XE2下测试也不支持UNICODE,无奈之下想找更好的控件，可一直没有找到，今天无意中看到了sailxia的文章 http://blog.csdn.net/sailxia/article/details/5624252才知道LMD SyntaxE
如何查当前Delphi版本宏VERXXX和编译版本号CompilerVersion
hksoobe的专栏
07-24 1357
现在Delphi的版本更新速度太快基本上一年一个版本，但有些花钱买的老控件想安装到最新的Delphi上因为里面的版本宏没定义导致安装失败，解决方法就是自己去宏定义里面加一个当前版本的Delphi版本宏就可以正常安装。 如果自己查看当前最新的Delphi的编译版本号和版本宏呢？ 我前版本是Delphi 10.3 编译版本号CompilerVersion： 这个在Delphi里其实定义的是一...
serjs/go-socks5-proxy
最新发布
09-14
一个 SOCKS5 代理服务器可以让用户在浏览网页或进行网络连接时隐藏真实的网络地址，提高用户的隐私和安全性。 这个项目的目标是提供一个高性能和可扩展的 SOCKS5 代理服务器。通过使用 Go 语言，它能够有效地处理...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值