TsgcHTTPServer › Eventos › OnUnknownProtocol
Disparado quando os primeiros bytes recebidos não se parecem com uma requisição HTTP válida, para que a conexão possa ser aceita ou rejeitada.
property OnUnknownProtocol: TsgcWSUnknownProtocolEvent;
// TsgcWSUnknownProtocolEvent = procedure(Connection: TsgcWSConnection; var Accept: Boolean) of object—
OnUnknownProtocol é gerado quando o servidor recebe os primeiros bytes de um cliente que está se conectando e não consegue reconhecer uma requisição HTTP válida. É normalmente usado para aceitar clientes TCP simples no mesmo listener, ou para rejeitar conexões não solicitadas/inválidas antes que consumam mais recursos. Defina Accept como True para manter a sessão aberta (OnConnect será então disparado) ou como False para fechá-la. O parâmetro Connection identifica a sessão; inspecione os bytes brutos já armazenados nela em buffer para decidir se deve permitir a conexão.
procedure OnUnknownProtocol(Connection: TsgcWSConnection; var Accept: Boolean);
begin
Accept := True;
end;