Discussion :

[yopziggy]

salut, je suis entrain de realiser une application client/serveur sous kylix2 avec des sockets et je voudrais que le client puisse entrer l'adresse IP du serveur dans un Edit.
Je crois kil faut utiliser la fonction gethostbyname mais je ne sais pas comment lutiliser correctement.



sockname.sin_addr.s_addr := inet_addr('ip du serveur');

[RDM]

j'ai pas compris ce que tu voulais réellement.... précise STP

[yopziggy]

Ben dans lapplication client, lutilisateur devra entrer ladresse ip du serveur dans un edit.

[RDM]

et donc ? ou est le problème ?

[yopziggy]

Ben il faut utiliser la fonction gethostbyname() je crois pour mettre lavaleur retournee par cette fonction dans le sin family

[RDM]

gethostbyname() prend comme son nom l'indique le nom de l'hote pas l'adresse ip.
man gethostbyname

[yopziggy]

oui ok, mais je crois kon peut aussi mettre une ip.

[RDM]

utilise inet_addr() pour transformer ton ip du type "192.168.1.2" eau format binaire que tu donneras en paramètre a gethostbyaddr()

[yopziggy]

heuuuuu, ...
yaurait pas une qq part une aide paske là je m'en sort plus trop avec les @, les ^ et les Pmachins.
Une aide comme l'autre fois ou javais besoin pour les librairies???

[RDM]

heuuuu tu pourrais pas nous aider à t'aider parce que tu n'arrête pas de donner des bribes de tes problèmes donc on peut pas t'aider si tu donnes pas toutes les infos qui faut. A savoir
un bout de code, une erreur, etc... du concret quoi !

[yopziggy]

ok, jvous donne un bout de code :

var
sockfd, longueur_adr : integer;
sockname : sockaddr_in;
sIP : string[15];
hIP : Phostent;


procedure TForm1.BitBtnConnexionServeurClick(Sender: TObject);
begin

{========== Creation de la socket =======}

sockfd := socket(AF_INET, SOCK_STREAM, 0); -> là ca va!

sIP := EditIP.Text; -> je rentre l'IP du serveur dans l'edit

hIP := gethostbyaddr(@sIP, sizeof(hostent), AF_INET); -> je suis pas sur

{==== Configuration du sin_family ======}

sockname.sin_family := AF_INET;
sockname.sin_addr.s_addr := inet_addr(@hIP); -> ????
sockname.sin_port := htons(9734);

longueur_adr := sizeof(sockname);



{==== Connection au serveur ====}

Resultat := connect(sockfd, Psockaddr(@sockname)^, longueur_adr);
|->là c bon aussi!



Voilà jespere que ca peut vous aider!!

[RDM]

ok, jvous donne un bout de code :

[b]
hIP := gethostbyaddr(@hIP, sizeof(hostent), AF_INEt); -> je suis pas

euh la forcément ca va pas marché. tu passes en argument ce que tu veux récupéré en retour !!!
il faut mettre l'adresse de sIP !

[yopziggy]

ah oui, jme suis trompé !!!
Mais sinon, tu vois rien de particulierement faux ????

[RDM]

le sIP en string[15] c'est pas une bonne idée
mais le en string normale et:

hIP := gethostbyaddr(PChar(sIP), sizeof(hostent), AF_INEt);

[yopziggy]

ok, jvé essayer ca demain!!
Mais quelle est la difference entre Pchar(hIP) et @hIP ??
Je m'en sort plus trop avec tout ca et encore les ^

[RDM]

tout dépend su type string que tu as pour sIP
toi tu as
sip: string[15];
c'est une chaîne de carctère de type Turbo Pascal :
sIP[0] octet de longeur
sIP[i] i eme caractère

alors que sIP: string; (par défaut au niveau des options de compile)
est une chaine longue, a zero terminal mais avec allocation et desallocation automatique (comteur de référence et longeur)
bref faire un PChar(sIP) permet de transfomert la string en char* du C
ce qui est demandé normalement par gethostbyaddr()

[yopziggy]

C pas possible, ca marche tjs pas.

Jte remet du code mis a jour :

var
hIP : Phostent;
sIP : String;
sockfd : integer;


procedure TForm1.BitBtnConnexionServeurClick(Sender: TObject);
begin

{========== Creation de la socket =======}

sockfd := socket(AF_INET, SOCK_STREAM, 0);

sIP := EditIP.Text; --> je rentre ip du serveur dans edit

hIP := Gethostbyaddr(PChar(sIP), sizeof(hostent), AF_INET);


{==== Configuration du sin_family ====}

sockname.sin_family := AF_INET;
[u ] sockname.sin_addr.s_addr := inet_addr(@hIP);[/u] -> juste ou pas ???
sockname.sin_port := htons(9734);

longueur_adr := sizeof(sockname);

{==== Connection au serveur ====}

Resultat := connect(sockfd, Psockaddr(@sockname)^, longueur_adr);


Voilà, je sais pas si la declaration de hIP en Phostent est correcte.