CARAMAIL CLIENT FONCTIONNANT SUR NEW PROTOCOLE

Commentaire de TheIlluminati le 08/06/2003 09:52:43

Pas mal!!
Mais j'ai souvent une erreur lors des recherches...
J'ai pas trop le temps de chercher, mais c'est supre!
(Fais gaffe quand meme!)

Commentaire de EBArtSoft le 08/06/2003 11:36:22 administrateur CS

Bonjour Kawash,

Tout b'abrd j'ai un petit souci pour faire fonctionner ta source...
le serveur ne me renvoi pas de SESSIONID ! pk ? je ne sait pas !
ligne :

jsession = Mid(Mid(Chaine, InStr(Chaine, "JSESSIONID="), InStr(Mid(Chaine, InStr(Chaine, "JSESSIONID=")), ";") - 1), 12)

Ensuite je reste admiratif quand au travail accompli sur ta source !
biensur il reste encore bcp de chose a faire dessus et sa fait un peu brouillon mais Bravo !

Bonne pr@g

Commentaire de Billou le 08/06/2003 12:49:07

Fantastique trop puissant ton truc vraient bravo !! 10/10

Commentaire de kalif le 08/06/2003 14:10:06

lut kawash, je l'ai pas tester mais je suis sure k'il est super. @+ mec

Commentaire de Frostizz le 08/06/2003 18:53:08

Tu fait comment pour étudier le protocole, je voudrai porter le projet sur delphi, pour le mettre avec Kilyx...

Commentaire de Frostizz le 08/06/2003 19:01:07

tu peut me donner le liens du "sniffer" que tu utilise ?

Commentaire de DeAtHCrAsH le 09/06/2003 13:03:21

Voici mes commentaires !
Il n'y a plus aucun interet a coder un client caramail ! Comme Max12 te l'as fait remarquer ils vont te casser les couilles !
Puis franchement ca n'a aucun interet point de vue utilisation, il y a deja eu bcp de client caramail ...

Je te propose plutot d'innover un peu et de faire un client IRC .. Bcp plus pratique et bcp plus interressant a coder ...

Voici un screen du client que je suis en train de develloper si tu veux voir un peu a quoi ca ressemble : http://shellkode.free.fr/Screen/ClientIRC/screen3.jpg et http://shellkode.free.fr/Screen/ClientIRC/screen2.jpg

J'ai pas vu ton code mais apparement il a l'air bien...

Sur ce bonne continuatiuon ...
@ Plumlche

DeAtH_-_CrAsH

Commentaire de Krach le 12/06/2003 19:44:21

C'est trés bien, de plus les clients pour la version 2 de caramail se font assez rares.
Jolie boulot !

Commentaire de derbiman10 le 17/06/2003 13:53:27

slt je sais po si on me connait bcp mon psaudo sur le net c alienx je devloppe un client cara en java avec blhack bin je te dit un grand bravo pour ce client sauf que le vb est assez lent pour ca mais sinon ca marche impec encor bravo et bonne continuation si tu veut prendre contact avec moi pour certaine ameliorartion tu peut m'ecrire par mail a l---alienx---l@caramail.com

Lut tout le monde
Alienx

Commentaire de kawash le 19/06/2003 16:53:22

c normal pour les salons publics etc.. tu dois dabord etablir la connexion, caramail merde souvent, soit changement de serveur dans les options ou bien recommence plutard.. enfin je pense pas que ça soit un prob au niveau du client. a+

Commentaire de liquide le 20/06/2003 17:21:35

pour canibalus et puis peut etre pour les autres, cara change completement son protocole, non seulement il reste en version V2 mais il prend (archive="normal-3-1-1-b43.jar") et viens d'y passé definitivement. Donc plus aucun client ne passe. apres une galere pas possible car j'ai vraiment du mal a capter tous les envois et retour des paquets et a les analyser. mais j'ai une solution( pour moi ca marche):
recuperer dans la page le tempid (qui est bcp plus long qu'avant), recuperer l'adress IP ainsi que le port, qui n'est plus du tout le meme et change a chaque connection.
en prenant comme variable:
cookies etant le tempid
IP ----->Hostchat
Port ----->Portchat
WinChat.RemoteHost = HostChat
WinChat.RemotePort = PortChat
WinChat.Connect
et dans la foulé balancer,
Private Sub WinChat_Connect()
    DoEvents
    WinChat.senddata ("0" & vbTab & "0" & vbTab & Cookies & Chr(10))
et chacun recoit son ID du chat
alors la !!! gros pb, car les ID changent literalement et passent de la forme @SIDxxxxx:xxxxxx:0, et puis quand il s'agit de faire des recherches et bien c'est le bordel, mais je pense que qq'un va nous resoudre ca lol
sur ce, je tiens a remercier cara pour son tres bon tchat malgre tout ce que l'on dit
bonne prog a tous

Commentaire de liquide le 21/06/2003 21:10:21

regarde si tu prend bien toute la longueur du tempid, il est bcp plus long qu'avant
et ma connection se fait de cette maniere (mais par variable):
WinChat.RemoteHost = "213.193.12.173"
(ou WinChat.RemoteHost = HostChat)
WinChat.RemotePort = "6678"
(ou WinChat.RemotePort = PortChat)
WinChat.Connect

Commentaire de liquide le 21/06/2003 23:12:59

Essayer ca:
*******************************
Private Sub Socket4_DataArrival(ByVal bytesTotal As Long)


Form1.RichTextBox1.SelColor = vbRed
Form1.RichTextBox1.SelFontSize = 8
Form1.RichTextBox1.SelText = "Réception du TempID" & vbNewLine
Form1.RichTextBox1.SelStart = Len(Form1.RichTextBox1.Text)

Dim datas As String
Socket4.GetData datas
Debug.Print datas


If InStr(datas, "HTTP/1.1 200 OK") Then
                
    tempid = Mid(datas, InStr(datas, "<param name=""tempid"" value=""") + Len("<param name=""tempid"" value="""), InStr(Mid(datas, InStr(datas, "<param name=""tempid"" value=""") + Len("<param name=""tempid"" value=""")), ">") - 2)
    Form1.TxtCookie.Text = Cookie
    Form1.TxtTempsID.Text = tempid
        
    MDIForm1.WinChat.Close
    Socket4.Close
    
    If Form1.TxtTempsID.Text <> "" Then
        HostChat = (Mid(datas, InStr(datas, "http://") + Len("http://"), 14))
        PortChat = (Mid(datas, InStr(datas, "<param name=""port"" value=""") + Len("<param name=""port"" value="""), 4))
        Debug.Print HostChat
        Debug.Print PortChat
        Debug.Print tempid
            WinChat.RemoteHost = HostChat
            WinChat.RemotePort = PortChat
            WinChat.connect

    Else
        Socket4.Close
        MsgBox "Problème de connection lors de la réception du TempID."
    End If
Else
Socket4.Close
MsgBox "Problème de connection, le chat doit être en maintenance."
End If


End Sub
***********************************************
Private Sub WinChat_Connect()
MDIForm1.WinChat.SendData ("0" & vbTab & "0" & vbTab & Form1.TxtTempsID.Text & Chr(10))
End Sub

Commentaire de derbiman10 le 24/06/2003 03:13:14

hello les code client serveur n'on po changer seul le tempid est maintenant generé avec le port (ex : 6660) et l'ip (ex : 213.193.12.179) si l'ip et le port ne coresponde po au tempid cad que si tu recuper que le tempid et que tu met un port et une ip au pif ca ne marchera po j'ai modifier ca et tout marche chez moi y a 3 ligne a rajouter comme le dit liquid voila
bon prog

BY alienx

Commentaire de Krach le 24/06/2003 18:26:50

Caramail sort sa nouvelle interface, voici les nouvelle variables de connexion pour l'entrée dans Caramail, pour le chat c'est une autre histoire... :
http://wwwv2-18.caramail.lycos.fr/Local/Bin/Authentication/baltop.jsp?membername=LELOGIN&password=LEPASS

Commentaire de liquide le 26/06/2003 06:37:15

pour tortugeniale, soit patient ou alors contact kawash ou alors contacte moi

Commentaire de ansuketor le 29/06/2003 13:22:19

Hellow,
tout d'abord pas mal le client =p.
Caramail a encore changé le proto pr recup le cookie :
essayé ça :
**********
Private Sub Socket1_Connect()
Dim dat As String
Form1.RichTextBox1.SelColor = vbRed
Form1.RichTextBox1.SelFontSize = 8
Form1.RichTextBox1.SelText = "Demande du Cookie" & vbNewLine
Form1.RichTextBox1.SelStart = Len(Form1.RichTextBox1.Text)

LOGIN = Form1.TxtUserName.Text
pass = Form1.TxtPassword.Text
dat = "service=lycos&redirect=http%3A%2F%2Fwww.caramail.lycos.fr%2F&redir_fail=http%3A%2F%2Fwww.caramail.lycos.fr%2F&target_url=&product=Email&membername=" & LOGIN & "&password=" & pass & ""

Socket1.SendData "POST /Local/Bin/Authentication/baltop.jsp HTTP/1.0" & vbCrLf & _
"Referer: " & Form1.Combo6.Text & "/general.jsp" & vbCrLf & _
"Host: " & Form1.Combo6.Text & vbCrLf & _
"User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:0.9.2)" & vbCrLf & _
"Content-Type: application/x-www-form-urlencoded" & vbCrLf & _
"Content-Length: " & Len(dat) & vbCrLf & vbCrLf & dat
End Sub
*******
Pr la récupération ça aussi changer, déja dans le POST de chat.jsp (hé oui c'est plus GET)
*****************
Private Sub Socket2_Connect()
Dim infox As String
Form1.RichTextBox1.SelColor = vbRed
Form1.RichTextBox1.SelFontSize = 8
Form1.RichTextBox1.SelText = "Demande de chat..." & vbNewLine
Form1.RichTextBox1.SelStart = Len(Form1.RichTextBox1.Text)

infox = "pager=0&nickname=" & Form1.Combo3.Text & "&a=" & Form1.agebox.Text & "&c=" & Form1.villebox.Text & "&g=0&invisible=1&status=" & Form1.etat.Text & "&room0=" & Form1.saloname.Text & "&version=java&r=800&m=0"

Socket2.SendData "POST /Local/Bin/Chat/chat.jsp HTTP/1.0" & vbCrLf & _
"Referer: " & Form1.Combo6.Text & "/Local/Bin/Chat/chat.jsp" & vbCrLf & _
"Host: " & Form1.Combo6.Text & vbCrLf & _
"Content-Length: " & Len(infox) & vbCrLf & _
"Content-Type: application/x-www-form-urlencoded" & vbCrLf & _
"Cookie: IDENTIFIANT=" & Cookie & vbCrLf & _
"User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)" & vbCrLf & vbCrLf & infox

End Sub
*****************
pour le reste des POST pr récup le tempid c'est la même chose,
just "lesinfos" qui changent :
********
lesinfos1 = "pager=0&&nickname=" & Form1.Combo3.Text & "&a=" & Form1.agebox.Text & "&c=" & Form1.villebox.Text & "&g=0&invisible=0&status=" & Form1.etat.Text & "&room0=" & Form1.saloname.Text & "&version=java&r=800&m=2"
*****
même chose pour "lesinfos2"
Now j'ai un problème, quand j'envoi le tempid sous cette forme :
MDIForm1.WinChat.SendData ("0" & vbTab & "0" & vbTab & Form1.TxtTempsID.Text & Chr(10))
je ne reçois pas de réponse du serveur, quo normalement devrait me répondre mon SID sous cette forme :
0.@SIDXXXX:XXXXXX:0.0.0.pseudo.

voila...
suis bloqué la :(

A+
ansuketor

Commentaire de kawash le 29/06/2003 22:59:57

salut ansuketor tu peux contacter liquide ou moi on te filera la suite des requettes... a+
kawash

Commentaire de kawash le 30/06/2003 12:27:14

j'ai pratiquement terminé j'ai refais totalement les pvs ainsi que d'autres petites fonctions.. maintenant bcp moins de bugs que la version précédente

Commentaire de cyrou le 30/06/2003 15:07:29

salut a tous... je bosse aussi sur un client... mais un script mIRC, je vais tester le Chr(10) je bloquais là moi aussi... si je trouve des choses je vous ferai profiter... Merci pour les infos
a+
Icq: 156238882
Cyrou

Commentaire de liquide le 30/06/2003 18:56:14

pour nargzul, normal qu'il bloque, tu a eu la version avant changement de protocole de chez cara, donc celle la est a exclure, ceci dit ce qui est a prevoir est bien., je peux toujours donné ce que j'ai mais j'envois tout en brut, apres vous vous debrouillez car chez moi ca passe bien mais apparement pas chez tout le monde. Auquel cas contactez moi.
bonne prog

Commentaire de Nargzul le 30/06/2003 21:43:56

et tu pourrais remettre la source à jour
???

Commentaire de kawash le 01/07/2003 00:29:19

oui biensur le proto a changé! donc je le repete: Le client est en train d'etre mis à jour donc soyez patient!

Kawash

Commentaire de yanzik le 06/07/2003 20:35:22

Alors moi je comprend pas trop, je n'arrive pas à me connecter pourtantil me semble que tout est configuré com il faut.

Commentaire de reyhishido le 07/07/2003 19:29:02

Salut les gars,
je suis content de trouver enfin des sources pour cara, je viens d'entamer mon p'tit chat à moi en Java, et aucun sniffer ne marche sous AOL, donc problème pour le protocole!
Mon autre problème, c'est que j'ai plus fais de VB depuis 3 ans et relire du code VB me donne mal au crane :(
Enfin, tout ca pour vous demander:
Il est ou le tempid? je vois rien de toute ca dans ce que le serveur http me renvoie, juste une tonne de cookies (dont un "IDENTIFIANT"), une ip et un port.
Quelqu'un a la liste aussi des codes du protocole? Ca serait cool, c'est fatiguant de lire le code décompiler du client d'origine!
Merci à tous!
pour me contacter si ca vous dit :
MSN: reyhishido@hotmail.com

Commentaire de reyhishido le 07/07/2003 21:17:01

Ben chez moi impossible d'accéder à la liaison PPP, et ce avec preques une dixaine de sniffer différents. A noter qu'ils marchent très bien sur le même PC branché à l'ADSL.
Sinon j'ai essayé de me connecter au serveur indiqué sur le port indiqué, la connexion marche... mais rien! Pas de réponse, j'envoie tout ce que je veux, la connexion tient bon mais le serveur ne me répond rien :(

Commentaire de bskizo le 08/07/2003 10:13:56

Salut,
j'utilise ton client sous windows 2000 et en ce moment sa merde parce que je passe par un proxy.
Je me demandias si tu avais pas une idées pour arranger ça?
apparement il merde au moment de la receptions du cookies sa dur des heures et irne ne se passe

Commentaire de kawash le 08/07/2003 11:04:32

justement on ma déjà fait la remarque.. malheureusement je métrise pas trop le truc pour établir une connexion par un proxy donc si quelqu'un pourrait m'aider ça serait sympa.

Kawash

Commentaire de EBArtSoft le 08/07/2003 11:12:57 administrateur CS

Il y a plusieurs source sur les connexions par proxy sur vbfrance
faite une recherche...

Commentaire de TheIlluminati le 08/07/2003 11:16:53

Merci ido, mais j'avais essayé en déposant mon message plus haut... je viens d'en reçevoir environ 7 depuis...
C pas génial...
Nix tu veux pas m'aider si tu passe ici step??

Commentaire de TheIlluminati le 08/07/2003 11:24:59

Je vais essayé, mais vu kil est un peu surchargé jespere pas trop avoir une rep...
Merci kan meme! A+

Commentaire de reyhishido le 08/07/2003 17:48:51

slt Cyrou,
les admins et modo soit invisible, soit "normaux", soit coloré (rouge et vert). Ya qu'un seul cas ou tu peux les repérer. Tu peux aussi repérer les gars qui chattent sur le salon alors qu'ils ne sont pas dans la liste des gars du salon, c'est des admins à tous les coups.
Sinon, puisque ton client a l'air de marcher, tu peux m'aider pour le mien? Je ne trouve plus de tempid dans les pages html de cara et une fois connecté au serveur de chat, quoi que je lui envoie je ne recois absolument rien :(
mon mail au cas ou: reyhishido@yahoo.com
Voilà, merci pour tout aide éventuelle!

Commentaire de Tortuegeniale le 09/07/2003 02:12:24

c clair la liste des connectés au début c chaud lol, mais moi depuis que j'ai découvert split dans vb6 ça passe tout seul.

Pour ceux qui connaissent pas : split(chaine, caractere) coupe une chaine suivant caractere et la met dans un tableau

Pour les connectés suffit de faire split(connecte,vbtab) et ensuite de jouer avec le for ... step ...

c utile pour plein d'autre chose dans le client et ça simplifie la vie je trouve

Commentaire de liquide le 10/07/2003 10:31:54

Pour reyhishido: tu as le retour de l'identifiant quand tu envoi la commande:

LesData = "&service=lycos&redirect=http://www.caramail.lycos.fr&redir_fail=http://www.caramail.lycos.fr&target_url=&product=Email&membername=" & Login & "&password=" & Pass
s = "POST /Local/Bin/Authentication/baltop.jsp HTTP/1.1" & vbCrLf & _
    "Referer: http://" & Serveur & "/general.html" & vbCrLf & _
    "Accept -Language: fr" & vbCrLf & _
    "Content-Type: application/x-www-form-urlencoded" & vbCrLf & _
    "User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)" & vbCrLf & _
    "Host: " & Serveur & vbCrLf & _
    "Content-Length: " & Len(LesData) & vbCrLf & _
    "Connection: Keep -Alive" & vbCrLf & _
    "cache -Control: no -cache" & vbCrLf & vbCrLf & LesData

'**************************************************************
Debug.Print s
Socket1.senddata s

puis une fois que tu as ca: le tempid est recuperer par

s = "GET /a.jsp?m=0&r=800&s=0&r0=France&p=0&i=1& HTTP/1.1" & vbCrLf & _
    "Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel, application/msword, application/x-gsarcade-launch, */*" & vbCrLf & _
    "Accept -Language: fr" & vbCrLf & _
    "Accept -Encoding: gzip , deflate" & vbCrLf & _
    "User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)" & vbCrLf & _
    "Host: " & Serveur & vbCrLf & _
    "Connection: Keep -Alive" & vbCrLf & _
    "Cookie: LBC=b71271cd948be04ab259269f9306f4b8; IDENTIFIANT=" & Cookies & "; AAD=1; JSESSIONID=" & SessionID & vbCrLf & vbCrLf

Socket7.senddata s

******Ce n'est plus la bonne commande mais elle fonctionne toujours, de plus tu recuperes l'IP, et le port de connection en meme temps.

apres: tu balances

WinChat.senddata ("0" & vbTab & PPrevenir & vbTab & Cookies & Chr(10))
et la tu aura un retour de ta connection au chat

alors je crois que tout a deja ete plus ou moins expliquer au dessus mais vu que peu de personne lisent les info il faut répéter, nous sommes 2 a avoir balancer du code dans cette page, et tout y est, en combinant les 2 codes parties de code, de plus j'ai bien dit que j'avais une source sur lequel je travail et que je voulais bien la donné auquel cas il fallait me contacter. si avec ca ca ne suffit pas pour vous aider je ne peux plus rien ........

Commentaire de kawash le 11/07/2003 01:22:20

/! Sources de la nouvelle version de Carapace dispo sur http://www.vbfrance.com/article.aspx?Val=9676

Commentaire de mutley le 03/10/2004 22:42:58

Je crains que cette source ne marche plus... ou bien ?