TsgcWebSocketProxyServer › Eventos › OnAuthentication
Disparado quando a autenticação está habilitada, de modo que a aplicação possa verificar o usuário e a senha e aceitar ou rejeitar a conexão do cliente downstream.
property OnAuthentication: TsgcWSAuthenticationEvent;
// TsgcWSAuthenticationEvent = procedure(Connection: TsgcWSConnection; aUser, aPassword: String; var Authenticated: Boolean) of object—
OnAuthentication é gerado toda vez que o servidor proxy recebe uma requisição de autenticação de um cliente downstream, desde que Authentication.Enabled seja True e o método de autenticação seja um dos esquemas integrados (Basic, Session, URL). Os parâmetros aUser e aPassword carregam as credenciais fornecidas pelo cliente; defina Authenticated como True para aceitar a conexão (para que o proxy abra a sessão TCP upstream em seu nome) ou como False para rejeitá-la. Quando as credenciais não são validadas aqui, a lista integrada AuthUsers é usada como fallback. Para esquemas personalizados não reconhecidos pelo componente (por exemplo, JWT Bearer tokens), use OnUnknownAuthentication.
procedure OnAuthentication(Connection: TsgcWSConnection; aUser, aPassword: string;
var Authenticated: Boolean);
begin
if ((aUser = 'user') and (aPassword = 'secret')) then
Authenticated := True
else
Authenticated := False;
end;