TCP_State

4D v20 R8

TCP_State


TCP_State ( tcp_ID ; codigoEstado ) -> Resultado

Parâmetro	Tipo	Descrição
tcp_ID	Inteiro longo	Referencia de uma sessão TCP aberta
codigoEstado	Inteiro	Código do estado TCP
Resultado	Inteiro	Código de erro

Descrição

O comando TCP_State devolve um valor inteiro que indica o estado de uma conexão TCP particular.

tcp_ID contém a referencia de uma sessão TCP aberta com o comando TCP_Open ou TCP_Listen.

O parâmetro codigoEstado é uma variável que devolve um dos seguintes códigos de estado.

0	Conexão fechada
2	Escuta de uma conexão de entrada
8	Conexão estabelecida

Este exemplo assume que foi estabelecida uma conexão TCP válida e se identifica pela variável $tcp_id. Neste exemplo, é enviado um comando a um servidor web para solicitar uma página de informação e os resultados se recuperam em um laço de tipo Repeat. Como os servidores web fecham automaticamente as conexões uma vez realizam sua ação, este método continua recebendo os dados até que a conexão para ou é produzido um erro.

 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

Ver também

TCP_Listen
TCP_Open

TCP_State

Descrição

Exemplo