Pular para o conteúdo principal

Método - Obter Authorization Code - oAuth2

Lucas Santos
Atualizado

 

OAuth2AuthorizationRequest(aconst aRedirectionEndpoint: String = '')

 

Método responsável fazer a requisição ao provedor de email oAuth2

Essa requisição necessita de interação do usuário para dar a permissão de uso da autenticação do email

 

Esse método é capaz de fazer a requisição ao provedor, capturar o auth Code e fazer a requisição para gerar os Tokens

caso queira ter controle sobre a url de redirecionamento para que você mesmo capture o Auth Code, basta informar a URL no parametro do método

 

Método

function OAuth2AuthorizationRequest(const aRedirectionEndpoint: String = ''): String;

 

Parâmetros

 

Argumento Tipo   Detalhes
aRedirectionEndpoint String opcional url de redirecionamento para capturar Auth Code (não é o AcessToken)

 

 

Funcionamento

Caso não seja informado o aRedirectionEndpoint, o próprio Componente irá levantar um webserver interno temporário para realizar a autenticação, abrindo a página de autenticação no navegador padrão.

Após realizada a autenticação, serão gerados os tokens "RefreshToken" e "AccessToken", e também a validade do "AccessToken" para futura renovação. Esses dados são armazenados nas configurações de email, então recomendamos usar SaveConfig para guardá-las permanentemente. A rotina então retornará uma string vazia..

 


Caso seja informado o aRedirectionEndpoint, a rotina apenas retornará uma URL que deverá ser aberta no navegador, para realizar a autenticação OAuth2.

A página de autenticação, por sua vez, irá disparar uma requisição HTTP para a URL informada no parâmetro aRedirectionEndpoint, que deve ter um webserver pronto para receber essa requisição, ler o parâmetro de query "code", devolver uma resposta de "autenticação bem sucedida" (tipicamente HTML), e dar sequência na autenticação, através da rotina OAuth2AuthCodeToTokens.

 

 

Retorno

url para capturar o auth code

 

Exemplos

sem informar Url de redirecionamento

Delphi

retorno := spdNFe.OAuth2AuthorizationRequest();

spdNFe.SaveConfig()

 

C#

public spdNFeX spdNFe = new spdNFeX();

 

retorno = spdNFe.OAuth2AuthorizationRequest();

spdNFe.SaveConfig()

 

VB6

Public spdNFe As NFeX.spdNFeX

Set spdNFe = New NFeX.spdNFeX


retorno = spdNFe.OAuth2AuthorizationRequest

spdNFe.SaveConfig()

PHP

$spdNFe = new COM("NFeX.spdNFeX");

 

$retorno = $spdNFe->OAuth2AuthorizationRequest("");

$spdNFe->SaveConfig("");

 

JAVA

ActiveXComponent spdNFe = new ActiveXComponent("NFeX.spdNFeX");

 

retorno = spdNFe.invoke("OAuth2AuthorizationRequest","").toString();

spdNFe.invoke("SaveConfig","")

 


Informando url de Redirecionamento (caso queira ter mais controle sobre a pagina html)

Delphi

 

var
FIdHTTPServer: TIdHTTPServer;
FOAuth2Event: TEvent;
FAuthCode: string;
 
    procedure IdHTTPServer1CommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo;
    AResponseInfo: TIdHTTPResponseInfo);
    var
      _Code: string;
    begin
      try
          if ARequestInfo.QueryParams = '' then
            Exit;
 
          // Obter o parâmetro "code"
          FAuthCode := ARequestInfo.Params.Values['code'];
 
         AResponseInfo.ContentText :=
          '<html><body><h1 style="font-family: Arial; text-align: center">DEMONSTRAÇÃO COMPONENTE             NFCE<br>Autenticado com sucesso! Pode fechar essa aba.</h1></body>'+
          '<script>setTimeout(function(){window.close()},5000);</script>'+
          '</html>';
      finally
        FOAuth2Event.SetEvent;
      end;
    end;
 
begin
    try
      FIdHTTPServer1 := TIdHTTPServer.Create;
      FOAuth2Event := TEvent.Create;
 
      _URI := spdNFCe.OAuth2AuthorizationRequest("http://localhost:2133");
      FIdHTTPServer.DefaultPort := 2133;
      FIdHTTPServer.OnCommandGet := IdHTTPServer1CommandGet;
      FIdHTTPServer.Active := True;
 
      ShellExecute(0, 'open', PChar(C:\Program Files\Google\Chrome\Application\chrome.exe), PChar('--profile-directory="Profile 1"' + ' ' + _URI), nil, 0);
 
      FOAuth2Event.WaitFor(60 * 1000);
      Sleep(500);
    finally
      FIdHTTPServer.Active := False;
      FIdHTTPServer.Free;
      FreeAndNil(FOAuth2Event);
    end;
end

Artigos relacionados

Comentários

0 comentário

Por favor, entre para comentar.