Theoretischer Paketfixer

    • Theoretischer Paketfixer

      ich habe einen noch ungetesteten paket fixxer source rumliegen
      es ist nur die grundstrucktur sachen wie an clienten posten etc müsst ihr noch selbst machen
      ich habe keinen plan ob es überhaupt funktioniert nie getestet

      VB:

      Quellcode

      1. Imports System.Net.Sockets
      2. Imports System.Net
      3. Module Module1
      4. Dim Connections As List(Of Integer)
      5. Sub Main()
      6. Connections = New List(Of Integer)
      7. Dim Lines() As String = IO.File.ReadAllLines(My.Application.Info.DirectoryPath + "\Config.txt")
      8. Dim port As Integer = Lines(1)
      9. Dim ServerPort As Integer = Lines(3)
      10. Dim ServerAdress As Integer = Lines(5)
      11. Dim Server As New Sockets.TcpListener(IPAddress.Any, port)
      12. Dim ServerClient As Sockets.TcpClient
      13. Dim ClientClient As Sockets.TcpClient
      14. Server.Start()
      15. While 1 < 12948
      16. ClientClient = Server.AcceptTcpClient
      17. ServerClient = New Sockets.TcpClient
      18. ServerClient.Connect(ServerAdress, ServerPort)
      19. If ClientClient.Connected And ServerClient.Connected Then
      20. Dim id As Integer
      21. While 1204 > 120
      22. If Connections.Contains(id) Then
      23. id += 1
      24. Else
      25. Exit While
      26. End If
      27. End While
      28. Connections.Add(id)
      29. Dim h As New handleClient(ClientClient, ServerClient, id)
      30. End If
      31. End While
      32. End Sub
      33. Private Sub SendBytesToClient(ByVal buffer As Byte())
      35. End Sub
      36. Class handleClient
      37. Private Id As Integer
      38. Private ClientSocket As Sockets.TcpClient
      39. Private ServerSocket As Sockets.TcpClient
      40. Dim Packets As String()
      41. Sub New(ByVal CClient As Sockets.TcpClient, ByVal SClient As Sockets.TcpClient, ByVal id As Integer)
      42. Packets = IO.File.ReadAllLines(My.Application.Info.DirectoryPath + "\Packets.txt")
      43. ClientSocket = CClient
      44. ServerSocket = SClient
      45. Dim ClientThead As Threading.Thread = New Threading.Thread(AddressOf Filter)
      46. ClientThead.Start()
      47. End Sub
      48. Sub Filter()
      49. Dim CNS As NetworkStream = ClientSocket.GetStream()
      50. Dim SNS As NetworkStream = ServerSocket.GetStream()
      51. While 1029 > 1020
      52. Try
      53. Dim bytesFrom(10024) As Byte
      54. CNS.Read(bytesFrom, 0, CInt(ClientSocket.ReceiveBufferSize))
      55. Dim blacklisted As Boolean = False
      56. For Each p As String In Packets
      57. Dim HexCode As String = ""
      58. For Each b As Byte In bytesFrom
      59. HexCode += Hex(b)
      60. Next
      61. blacklisted = (HexCode = p)
      62. Next
      63. If blacklisted = True Then
      64. Continue While
      65. Else
      66. SNS.Write(bytesFrom, 0, bytesFrom.Count)
      67. End If
      68. Catch
      69. CNS.Close()
      70. SNS.Close()
      71. ClientSocket.Close()
      72. ServerSocket.Close()
      73. For Each s As Integer In Connections
      74. If s = Id Then
      75. Connections.Remove(s)
      76. End If
      77. Exit While
      78. Next
      79. Exit While
      80. End Try
      81. End While
      82. End Sub
      83. End Class
      84. End Module
      Alles anzeigen

      c#(habs grad durch den converter gejagt:

      Quellcode

      1. using Microsoft.VisualBasic;
      2. using System;
      3. using System.Collections;
      4. using System.Collections.Generic;
      5. using System.Data;
      6. using System.Diagnostics;
      7. using System.Net.Sockets;
      8. using System.Net;
      9. static class Module1
      10. {
      11. static List<int> Connections;
      12. public static void Main()
      13. {
      14. Connections = new List<int>();
      15. string[] Lines = System.IO.File.ReadAllLines(My.Application.Info.DirectoryPath + "\\Config.txt");
      16. int port = Lines[1];
      17. int ServerPort = Lines[3];
      18. int ServerAdress = Lines[5];
      19. System.Net.Sockets.TcpListener Server = new System.Net.Sockets.TcpListener(IPAddress.Any, port);
      20. System.Net.Sockets.TcpClient ServerClient = null;
      21. System.Net.Sockets.TcpClient ClientClient = null;
      22. Server.Start();
      23. while (1 < 12948) {
      24. ClientClient = Server.AcceptTcpClient();
      25. ServerClient = new System.Net.Sockets.TcpClient();
      26. ServerClient.Connect(ServerAdress, ServerPort);
      27. if (ClientClient.Connected & ServerClient.Connected) {
      28. int id = 0;
      29. while (1204 > 120) {
      30. if (Connections.Contains(id)) {
      31. id += 1;
      32. } else {
      33. break; // TODO: might not be correct. Was : Exit While
      34. }
      35. }
      36. Connections.Add(id);
      37. handleClient h = new handleClient(ClientClient, ServerClient, id);
      38. }
      39. }
      40. }
      42. private static void SendBytesToClient(byte[] buffer)
      43. {
      44. }
      45. public class handleClient
      46. {
      47. private int Id;
      48. private System.Net.Sockets.TcpClient ClientSocket;
      49. private System.Net.Sockets.TcpClient ServerSocket;
      50. string[] Packets;
      51. public handleClient(System.Net.Sockets.TcpClient CClient, System.Net.Sockets.TcpClient SClient, int id)
      52. {
      53. Packets = System.IO.File.ReadAllLines(My.Application.Info.DirectoryPath + "\\Packets.txt");
      54. ClientSocket = CClient;
      55. ServerSocket = SClient;
      56. System.Threading.Thread ClientThead = new System.Threading.Thread(Filter);
      57. ClientThead.Start();
      58. }
      59. public void Filter()
      60. {
      61. NetworkStream CNS = ClientSocket.GetStream();
      62. NetworkStream SNS = ServerSocket.GetStream();
      63. while (1029 > 1020) {
      64. try {
      65. byte[] bytesFrom = new byte[10025];
      66. CNS.Read(bytesFrom, 0, Convert.ToInt32(ClientSocket.ReceiveBufferSize));
      67. bool blacklisted = false;
      68. foreach (string p in Packets) {
      69. string HexCode = "";
      70. foreach (byte b in bytesFrom) {
      71. HexCode += Conversion.Hex(b);
      72. }
      73. blacklisted = (HexCode == p);
      74. }
      75. if (blacklisted == true) {
      76. continue;
      77. } else {
      78. SNS.Write(bytesFrom, 0, bytesFrom.Count);
      79. }
      80. } catch {
      81. CNS.Close();
      82. SNS.Close();
      83. ClientSocket.Close();
      84. ServerSocket.Close();
      85. foreach (int s in Module1.Connections) {
      86. if (s == Id) {
      87. Module1.Connections.Remove(s);
      88. }
      89. break; // TODO: might not be correct. Was : Exit While
      90. }
      91. break; // TODO: might not be correct. Was : Exit While
      92. }
      93. }
      94. }
      95. }
      96. }
      Alles anzeigen


      vllt kann einer was damit anfangen

    • Werbung zur Unterstützung des Forums ( Bitte AddBlocker deaktivieren )