4D Doc Center : TCP

4D Internet Commands v14

TCP_State


TCP_State ( tcp_ID ; codigoEstado ) -> resultado

Parámetro	Tipo	Descripción
tcp_ID	Entero largo	Referencia de una sesión TCP abierta
codigoEstado	Entero	Código del estado TCP
resultado	Entero	Código de error

Descripción

El comando TCP_State devuelve un valor entero que indica el estado de una conexión TCP particular.

tcp_ID contiene la referencia de una sesión TCP abierta con el comando TCP_Open o TCP_Listen.

El parámetro codigoEstado es una variable que devuelve uno de los siguientes códigos de estado.

0	Conexión cerrada
2	Escucha de una conexión entrante
8	Conexión establecida

Este ejemplo asume que se estableció una conexión TCP válida y se identifica por la variable $tcp_id. En este ejemplo, se envía un comando a un servidor web para solicitar una página de información y los resultados se recuperan en un bucle de tipo Repeat. Como los servidores web cierran automáticamente las conexiones una vez realizan su acción, este método continúa recibiendo los datos hasta que la conexión se detiene o se produce un error.

 C_LONGINT($tcp_id)

 C_INTEGER(vState;$err)

 C_TEXT($command;$buffer;$response)

 If(TCP_Send($tcp_id;$command)=0)

    vState:=0

    Repeat

       $err:=TCP_Receive($tcp_id;$buffer)

       $err:=TCP_State($tcp_id;vState)

       $response:=$response+$buffer

    Until((vState=0)|($err#0))

 End if

4D Internet Commands v14

TCP_State

TCP_State

Descripción

Ejemplo