Discussion :

[aroslide]

Je développe un serveur direct connect en delphi qui fonctionne assez bien sous windows par contre dès que j'essaie d'envoyer des informations a des clients direct connect sous linux, ils ne reçoivent rien ou semblent ne rien recevoir. si quelqu'un a une idée voici l'exemple de ma procedure :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure DCCMD_SendToUserMsg(Socket: tsocket; msg: ansiString);
var
tmpmsg:string;
response,waitresult:integer;
begin
tmpmsg:=concat(msg+#124);
response:=0;
try
entercriticalsection(criticalpart);
if length(tmpmsg) >0 then response:=Send(socket, tmpmsg[1], Length(tmpmsg), 0);
leavecriticalsection(criticalpart);
except
if response=SOCKET_ERROR then  leavecriticalsection(criticalpart);
end;
end;

Si quelqu'un a une idée ça pourrait m'aider énormément merci

[Jipété]

Salut !

Pas d'idée pour le moment, juste une remarque :

tmpmsg:=concat(msg+#124);

Comme je ne connaissais pas "concat" (même si le nom est parlant), j'ai fait F1 dessus, il en ressort que (aide D7) :

function Concat(s1 [, s2,..., sn]: string): string;
(...)
L'utilisation de l'opérateur plus (+) sur deux chaînes a le même effet que l'utilisation de la fonction Concat :
S := 'ABC' + 'DEF';
Conseil : L'opérateur + plus est plus rapide que Concat.

Donc,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

tmpmsg := concat(msg, #124);

ou, mieux,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

tmpmsg := msg + #124;

Sinon, ça serait bien de nous dire exactement ce qui se passe (ou pas), car ça c'est un peu léger :

ils ne reçoivent rien ou semblent ne rien recevoir

Problème de message(s) vide(s) ou foirage de connexion Ouinouin-pingouin ?

Mes 2 cts,
--
jp

[Paul TOTH]

déjà si ton socket est en TCP, un Send() ne garanti pas l'envoie de la totalité des données.

il faut faire une boucle pour s'assurer que tout le paquet est parti...voir ma fonction SendStr

[aroslide]

En tout cas la fonction de sendstr m'est bien utile merci Paul. Les quelques erreurs que j'avais parfois sur le send avec des résultats aléatoires en cas de surcharge du serveur ont disparus.
Cette fonction d'envois de chaines de caractères aurait du figurer dans le livre de Delphi 7 studio c'est vraiment un "must".
Comme le reste figurant sur votre site concernant l'envoi et la réception de chaines.

[Paul TOTH]

En tout cas la fonction de sendstr m'est bien utile merci Paul. Les quelques erreurs que j'avais parfois sur le send avec des résultats aléatoires en cas de surcharge du serveur ont disparus.
Cette fonction d'envois de chaines de caractères aurait du figurer dans le livre de Delphi 7 studio c'est vraiment un "must".
Comme le reste figurant sur votre site concernant l'envoi et la réception de chaines.

lol, comme quoi même après avoir écrit un bouquin sur Delphi on apprend encore, et il y a probablement des chapitres que j'aurais rédigé différemment aujourd'hui

[aroslide]

j'ai donc fait différents test avec des #13#10 les clients programmés sous windows répondent normalement et ceux sous linux ne reçoivent toujours rien hélas ... Cela est il possible que les clients linux qui ont été programmés en C utilisent les chaines azt ? et que dans mon context de réception et d'envois de chaines de caractères je me retrouve dans l'obligation de tout modifier et transformer en AZT ? le client Linux êtant écrit en C sela aurait il une incidence sur mon serveur écrit en delphi ?


pourtant Telnet reçoit bien ma clé de connection à savoir :

$Lock inpo\WI2@kW&K^F@f[+Rq=y/gf/n-<(iLVvIAr>Fu.fdYen\J Pk=ARODCHub|

le | symbolisant la fin de la ligne à traiter.

[Paul TOTH]

peu importe sur quel système et avec quel langage est développé l'application.

la question est de savoir ce qu'il attend dans le tuyau

et ça tu peux pas l'inventer, ça dépend du protocole.

[aroslide]

Avec l'évolution et le grossissement du nombre d'internautes, j'ai peur qu'à courte échéance les appliquations serveurs développées risquent de devenir obsolétes très rapidement, je me suis procuré l'ouvrage "basic 32 bit communications programming" de alan c.moore et celui traite à un moment d'une méthode pour rendre son serveur capable d'utiliser aussi bien ipv6 qu' ipv4 en utilisant PF_UNSPEC par contre je vois pas comment initialiser mon serveur avec cette valeur et surtout comment l'utiliser en réception et envoi de donnée.

[Paul TOTH]

dans la mesure ou il existe des passerelles entre IPv4 et IPv6, les serveurs IPv4 risque de disparaitre aussi vite que...les applications DOS sur PC