TsgcWebSocketHTTPServer › Ereignisse › OnAuthentication
Wird ausgelöst, wenn die Authentifizierung aktiviert ist, sodass die Anwendung Benutzer und Passwort prüfen und die Verbindung annehmen oder ablehnen kann.
property OnAuthentication: TsgcWSAuthenticationEvent;
// TsgcWSAuthenticationEvent = procedure(Connection: TsgcWSConnection; aUser, aPassword: String; var Authenticated: Boolean) of object
—
OnAuthentication wird jedes Mal ausgelöst, wenn der Server eine Authentifizierungsanforderung von einem Client empfängt, sofern Authentication.Enabled True ist und die Authentifizierungsmethode eines der integrierten Schemata ist (Basic, Session, URL). Die Parameter aUser und aPassword tragen die vom Client bereitgestellten Anmeldedaten; setzen Sie Authenticated auf True, um die Verbindung zu akzeptieren, oder auf False, um sie abzulehnen. Wenn die Anmeldedaten hier nicht validiert werden, wird die integrierte AuthUsers-Liste als Fallback verwendet. Verwenden Sie für benutzerdefinierte Schemata, die von der Komponente nicht erkannt werden (zum Beispiel JWT-Bearer-Tokens), stattdessen OnUnknownAuthentication. Das Ereignis gilt sowohl für WebSocket-Upgrades als auch für reine HTTP-Anforderungen.
procedure OnAuthentication(Connection: TsgcWSConnection; aUser, aPassword: string;
var Authenticated: Boolean);
begin
if ((aUser = 'user') and (aPassword = 'secret')) then
Authenticated := True
else
Authenticated := False;
end;