TsgcWebSocketHTTPServer › Events › OnAuthentication
Se déclenche lorsque l'authentification est activée afin que l'application puisse vérifier le nom d'utilisateur et le mot de passe et accepter ou rejeter la connexion.
property OnAuthentication: TsgcWSAuthenticationEvent;
// TsgcWSAuthenticationEvent = procedure(Connection: TsgcWSConnection; aUser, aPassword: String; var Authenticated: Boolean) of object—
OnAuthentication est déclenché chaque fois que le serveur reçoit une demande d'authentification d'un client, à condition qu'Authentication.Enabled soit True et que la méthode d'authentification soit l'un des schémas intégrés (Basic, Session, URL). Les paramètres aUser et aPassword portent les informations d'identification fournies par le client ; définissez Authenticated à True pour accepter la connexion ou à False pour la rejeter. Lorsque les informations d'identification ne sont pas validées ici, la liste AuthUsers intégrée est utilisée comme solution de repli. Pour les schémas personnalisés non reconnus par le composant (par exemple les jetons JWT Bearer), utilisez plutôt OnUnknownAuthentication. L'événement s'applique aussi bien aux mises à niveau WebSocket qu'aux requêtes HTTP simples.
procedure OnAuthentication(Connection: TsgcWSConnection; aUser, aPassword: string;
var Authenticated: Boolean);
begin
if ((aUser = 'user') and (aPassword = 'secret')) then
Authenticated := True
else
Authenticated := False;
end;