Bonjour j'ai un problème dans le D..WriterJ'essaie d'intercepter le paquet 42 et envoyer un autre paquet avec l'adresse locale "127.0.0.1"paquet 42``` if ID=42 then Dim message As New SelectedServerDataMessage message.Deserialize(PacketData) Dim address As String = message.address message.address = "127.0.0.1" message.Serialize(writer) DofusWriter.Send(42) socket_jeu = TcPSock.AcceptSocket Dim socket As New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp) socket.Connect(address, &H15B3) socket_Server = socket else _socket_Jeu.Send(data) end if ```Serialize/SelectedServerDataMessage:``` Public Sub Serialize(ByVal writer As DofusWriter) writer.WriteShort(Me.v_serverId) writer.WriteUTF(Me.v_address) writer.WriteShort(Me.v_port) writer.WriteBoolean(Me.v_canCreateNewCharacter) writer.WriteUTF(Me.v_ticket) End Sub ```problème :parsing(server) WriteShort -> L'opération arithmétique a provoqué un dépassement de capacité.problème : le paquet n'est pas écrite correctement ....

Remplace writeshort par writeint16.Un conseil au lieu de mettre if id = xxx fait un select case.

> lolodu92 a dit : "Remplace writeshort par writeint16.Un conseil au lieu de mettre if id = xxx fait un select case."merci mais le client Do*** ne répond pasrecu : id server= 42, taille = 560x62A80029040000000A00592602000774657374687574000B2D482D552D542D544553540335AEB8000000000000000000000000A938000F00envoie TO Client : id = 42, taille = 500x000F00093132372E302E302E3115B30000203930373234653831396434383638363466333139353437373762306338646632recu : id server= 1, taille = 80x0005080000059300recu : id server= 101, taille = 00x

La sa doit venir d'un précédent packet, ton 42 est clean.C'est bizard. Ta pas mal renseigné une info précédamment ?

> lolodu92 a dit : "La sa doit venir d'un précédent packet, ton 42 est clean.C'est bizard. Ta pas mal renseigné une info précédamment ?" Dim messagein As New SelectedServerDataMessage Dim messageout As New SelectedServerDataMessage messagein.Deserialize(PacketData) Dim address As String = messagein.address messageout.address = "127.0.0.1" messageout.port = 5555 messageout.serverId = messagein.serverId messageout.ticket = messagein.ticket messageout.canCreateNewCharacter = messagein.canCreateNewCharacter messageout.Serialize(writer) DofusWriter.Sends(42) Dim socket As New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp) socket.Connect(address, &H15B3) _socket_Connexion = socketnormalement, le client se connecte à 127.0.0.1:5555

Aucune idée si quelqu'un a une piste.

> lolodu92 a dit : "Aucune idée si quelqu'un a une piste."merci en tout cas :)

D..Send(42)Sans la censure ca donne quoi ?(ca pue la decompilation l'hexa dans le port)

> ToOnS a dit : "D..Send(42)Sans la censure ca donne quoi ?(ca pue la decompilation l'hexa dans le port)"Dofus.DofusWriter.ClientSend(42)envoie TO Client : id = 42, taille = 500x000F00093132372E302E302E3115B30000203930373234653831396434383638363466333139353437373762306338646632dans le DofusWriter ClientSend = Form1._socket_Jeu.Send(BytesToWrite)_socket_Jeu= Socket De client

essais en deconnectant a la fin du 42 la partie "client officiel bot" et en le reconnectant (car le client doit attendre la deco avant de reco)

> ToOnS a dit : "essais en deconnectant a la fin du 42 la partie "client officiel bot" et en le reconnectant (car le client doit attendre la deco avant de reco)"déjà fait :) mais le client ne répond pas au paquet 42 normalement le TcpListener attraper le nouveau socket sur 127.0.0.1:5555

Ce site est optimisé pour être consulté depuis un navigateur moderne dans lequel JavaScript est activé.

problème D..Writer

Anonymous

tifoux a dit : "Déja que ToOnS à partager les source d'un Mitm maintenant essaye au minimum de comprend."

essayé au moins comprendre le problème ....problème D..Writer c'est pas le MITM ...

le début problème lorsque j'ai changé Net 2.0 ...

tifoux

je ne parle pas de sa je parle du problème du multi compte.

« Page précédente