Haciendo un sistema de comunicación por sockets sencillito

[[duilioisola]]

En el PC1 no es necesario abrir el puerto 1000. Normalmente los Firewalls y los routers dejan salir por cualquier puerto, pero solo entrar por algunos (80 http, 21 ftp, etc.)

La segunda parte es los que se llama NAT.
- Supongamos tu router tiene la IP pública 80.1.2.3.
- Supongamos que tu pc tiene la IP privada 192.168.1.2.

Pues: debes entrar al router, ir a la parte de NAT y decirle:
Todo lo que entre desde el PUERTO 9923 hasta el PUERTO 9923 se lo mandas a la IP 192.168.1.2.

Nota: si está en monopuesto, todo esto no vale. Funciona como si guera un modem y todo lo que entra al router entra directamente a tu PC.

[kakarotv5]

Empezado por duilioisola

En el PC1 no es necesario abrir el puerto 1000. Normalmente los Firewalls y los routers dejan salir por cualquier puerto, pero solo entrar por algunos (80 http, 21 ftp, etc.)

¿En vez del puerto 1000 puedo usar el 9923?

Mi idea es usar el mismo puerto tanto para el cliente como para el servidor.

Empezado por duilioisola

Pues: debes entrar al router, ir a la parte de NAT y decirle:
Todo lo que entre desde el PUERTO 9923 hasta el PUERTO 9923 se lo mandas a la IP 192.168.1.2.

Tengo esto

[[duilioisola]]

Del puerto por el que sale se encarta el sistema operativo. Lo que hace es ver el primero que tiene libre y usarlo.

Si quieres probarlo has lo siguiente:
- te conectas a una página (www.google.es por ejemplo)
sin cerrar el navegador haces lo siguiente en una consola (inicio-->ejecutar-->cmd) y escribes netstat o netstat -n.
En la columna de Direccion Local verás tu IP y por qué puerto está saliendo.
En la columna de Direccion Remota verás la dirección IP a la que estás conectado y el puerto.

C:\>netstat -n

Conexiones activas

  Proto  Dirección local        Dirección remota       Estado
  TCP    127.0.0.1:4378         127.0.0.1:4379         ESTABLISHED
  TCP    127.0.0.1:4379         127.0.0.1:4378         ESTABLISHED
  TCP    127.0.0.1:4380         127.0.0.1:4381         ESTABLISHED
  TCP    127.0.0.1:4381         127.0.0.1:4380         ESTABLISHED
  TCP    127.0.0.1:4386         127.0.0.1:4387         ESTABLISHED
  TCP    127.0.0.1:4387         127.0.0.1:4386         ESTABLISHED
  TCP    127.0.0.1:4394         127.0.0.1:4395         ESTABLISHED
  TCP    127.0.0.1:4395         127.0.0.1:4394         ESTABLISHED
  TCP    127.0.0.1:9999         127.0.0.1:2509         TIME_WAIT
  TCP    192.168.152.200:1797   209.85.137.18:80       ESTABLISHED
  TCP    192.168.152.200:1964   192.168.152.252:445    ESTABLISHED
  TCP    192.168.152.200:1966   192.168.152.252:3050   ESTABLISHED
  TCP    192.168.152.200:2511   66.249.91.83:80        ESTABLISHED
  TCP    192.168.152.200:4130   192.168.152.252:445    ESTABLISHED
  TCP    192.168.152.200:4443   66.249.91.19:80        ESTABLISHED
  TCP    192.168.152.200:4810   64.233.183.147:80      CLOSE_WAIT

C:\Documents and Settings\Duilio>netstat

Conexiones activas

  Proto  Dirección local        Dirección remota       Estado
  TCP    PC-Duilio:4378         localhost:4379         ESTABLISHED
  TCP    PC-Duilio:4379         localhost:4378         ESTABLISHED
  TCP    PC-Duilio:4380         localhost:4381         ESTABLISHED
  TCP    PC-Duilio:4381         localhost:4380         ESTABLISHED
  TCP    PC-Duilio:4386         localhost:4387         ESTABLISHED
  TCP    PC-Duilio:4387         localhost:4386         ESTABLISHED
  TCP    PC-Duilio:4394         localhost:4395         ESTABLISHED
  TCP    PC-Duilio:4395         localhost:4394         ESTABLISHED
  TCP    PC-Duilio:1797         mg-in-f18.google.com:http  ESTABLISHED
  TCP    PC-Duilio:1964         192.168.152.252:microsoft-ds  ESTABLISHED
  TCP    PC-Duilio:1966         192.168.152.252:3050   ESTABLISHED
  TCP    PC-Duilio:2511         ik-in-f83.google.com:http  ESTABLISHED
  TCP    PC-Duilio:4130         192.168.152.252:microsoft-ds  ESTABLISHED
  TCP    PC-Duilio:4443         ik-in-f19.google.com:http  ESTABLISHED
  TCP    PC-Duilio:4810         nf-in-f147.google.com:http  CLOSE_WAIT

Nota: netstat -n no traduce las direcciones. te muestea los numeros IP y los numeros de puerto.
- http = 80
- ftp = 21
- mg-in-f18.google.com = 209.85.137.18

[[duilioisola]]

Creo que puede andar por ahí, pero no es NAT.

Creo que eso es para que de una dirección y un puerto dado se conecten a una dirección y un puerto especícico.

De todas formas debería funcionar si lo configuras bien.

El NAT es solo enviar lo que entre por un puerto enviarlo a una dirección especificada (por ese mismo puerto)

Para que leas un poco más sobre el tema:
http://www.monografias.com/trabajos2...ctor-nat.shtml

[Kipow]

Precisamente lo que necesitas hacer es que todas las peticiones al puerto de tu aplicacion sean direccionadas a la ip local (donde se ejecuta el server). eso lo debes de hacer directamente en tu router. aca puedes darte una idea de como hacerlo www.portforward.com

Slds

[kakarotv5]

Al final lo he conseguido.

He conseguido establecer una comunicación entre dos ordenadores que sólo están conectados a través de Internet, únicamente he hecho lo siguiente:

En el ordenador PC1 se ejecuta el servidor, que lo único que hace es escuchar por el puerto 9923. He abierto el puerto 9923 en el router de este PC.

Luego en el ordenador PC2 se ejecuta el cliente, se pone la IP pública o real del PC2 en el Edit que está a la derecha del Label "Computadora" y luego se escribe lo que se quiera en el Memo de arriba como si fuera un chat. También he abierto el puerto 9923 en el router de este PC.

El servidor recibirá las cadenas de texto inmediatamente.

De esta forma la comunicación es unilateral, por lo que además he ejecutado en el PC1 el cliente y en el PC2 el servidor y he realizado la misma operación, con lo que se consigue una comunicación bilateral estilo chat.

Me doy por satisfecho, sólo tengo que mejorar un poco el programa y seguir trasteando para conseguir mis propósitos.

Al final no he tenido que configurar los routers de modo que todo lo que les llegue por el puerto 9923 lo envíen a la direccion interna de los PC´s.

Supongo que será porque están en monopuesto.

Muchas gracias y un saludo.

[[duilioisola]]

Felicitaciones!

Cuando tengas una aplicación interesante pasate por el club y muéstranosla.

También podrías hacer un pequeño ejemplo de un "micro-mini-chat" y ponerlo en la parte de trucos, por si alquien quiere aprender a hacerlo.

[kakarotv5]

¿Dónde podría encontrar adicinal sobre sockets para Delphi?

Busco en el Wiki de esta página pero nunca encuentro nada.

Saludos.