OAuth2 Server가 소멸되고(재시작되기 때문에) 발행된 유효한 Access Token이 있는 경우, 기본적으로 이들은 손실됩니다. AddToken 메서드를 사용하여 이러한 Access Token을 복구할 수 있습니다. 이 메서드는 토큰을 OAuth2 Server에 저장합니다.
Token 추가에는 다음 정보가 필요합니다:
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;