OAuth2 | Récupérer les jetons d'accès

Si le serveur OAuth2 est détruit (parce qu'il est redémarré) et qu'il y a des Tokens d'accès valides émis, ceux-ci sont perdus par défaut. Vous pouvez récupérer ces Tokens d'accès en utilisant la méthode AddToken. Cette méthode stocke les tokens dans le serveur OAuth2.

 

L'ajout d'un jeton nécessite les informations suivantes :

 

• AppName : le nom de l'application.
• Jeton : jeton d'accès.
• Expires : date d'expiration du jeton.
• RefreshToken : jeton d'actualisation.

 

Vous pouvez sauvegarder les jetons émis en gérant l'événement OAuth2AfterAccessToken.

 

procedure OnOAuth2AfterAccessToken(Sender: TObject; Connection: TsgcWSConnection; OAuth2: TsgcHTTPOAuth2Request; 
  aResponse: string);
begin
  // ... store OAuth2 Token data
end;

OAuth2 := TsgcHTTP_OAuth2_Server.Create(nil);
OAuth2.Apps.AddApp('MyApp', 'http://127.0.0.1:8080', 'client-id', 'client-secret');
OAuth2.AddToken('MyApp', '12146ce12b0e4813987f2794f768905cefc39da6fbd54f6d9b38387489280608', EncodeDate(2022,1,1), 
  'ef3e3dfa56ec44109c3d345b1541f08e539ce21432d9433099b48a3d08d34bc0');
oServer.Authentication.Enabled := True;
oServer.Authentication.OAuth.OAuth2 := OAuth2;