TsgcHTTPServer › Ereignisse › OnUnknownAuthentication
Wird ausgelöst, wenn die Authentifizierung aktiviert ist und die Authentifizierungsmethode vom Server nicht erkannt wird.
property OnUnknownAuthentication: TsgcWSUnknownAuthenticationEvent;
// TsgcWSUnknownAuthenticationEvent = procedure(Connection: TsgcWSConnection; AuthType, AuthData: String; var aUser, aPassword: String; var Authenticated: Boolean) of object
—
OnUnknownAuthentication wird ausgelöst, wenn der Client einen Authorization-Header sendet, der keinem der integrierten Schemata entspricht (Basic, Session, URL), zum Beispiel ein JWT-Bearer-Token oder ein benutzerdefiniertes Schema. Der Parameter AuthType enthält den Schemanamen, und AuthData enthält die vom Client gesendeten Rohdaten der Anmeldeinformationen; die Anwendung kann sie parsen, die Ausgabeparameter aUser und aPassword befüllen (sodass die Sitzung mit einem Benutzernamen versehen wird) und schließlich Authenticated auf True setzen, um die Verbindung anzunehmen, oder auf False, um sie abzulehnen. Gilt für HTTP-Anfragen, wenn Authentication.Enabled auf True gesetzt ist.
procedure OnUnknownAuthentication(Connection: TsgcWSConnection; AuthType, AuthData: string;
var aUser, aPassword: string; var Authenticated: Boolean);
begin
if AuthType = 'Bearer' then
begin
if AuthData = 'jwt_token' then
Authenticated := True
else
Authenticated := False;
end
else
Authenticated := False;
end;