OAuth2 | Autenticación del servidor

Cuando un cliente OAuth2 solicita una nueva autorización, el servidor muestra una página web donde el usuario debe permitir la conexión e iniciar sesión. Esta página es proporcionada por la biblioteca sgcWebSockets y se envía automáticamente cuando un cliente solicita una autorización.

 

 

Si el usuario permite el acceso, se mostrará un formulario de inicio de sesión donde el usuario deberá introducir el nombre de usuario y la contraseña.

Estos datos se recibirán en el evento OnOAuth2Authentication, por lo que debe validar que el usuario/contraseña sea correcto y, si lo es, establecer el parámetro Authenticated en true.

 

procedure OnAuth2Authentication(Connection: TsgcWSConnection; OAuth2: TsgcHTTPOAuth2Request; aUser, 
  aPassword: string; var Authenticated: Boolean);
begin
  if ((aUser = 'user') and (aPassword = 'secret')) then
    Authenticated := True;
end;