Send vers clients linux fonctionne pas
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:
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
rendre son serveur agnostique
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.