WebSVN – Moodle – Diff – /login/index.php

 <?php
-// This file is part of Moodle - http://moodle.org/
+// Este archivo es parte de Moodle - http://moodle.org/
 //
-// Moodle is free software: you can redistribute it and/or modify
+// Moodle es software libre: puedes redistribuirlo y/o modificarlo
-// it under the terms of the GNU General Public License as published by
+// bajo los términos de la Licencia Pública General GNU publicada por
-// the Free Software Foundation, either version 3 of the License, or
+// la Free Software Foundation, ya sea la versión 3 de la Licencia, o
-// (at your option) any later version.
+// (a tu elección) cualquier versión posterior.
 //
-// Moodle is distributed in the hope that it will be useful,
+// Moodle se distribuye con la esperanza de que sea útil,
-// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// pero SIN NINGUNA GARANTÍA; sin siquiera la garantía implícita de
-// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// COMERCIABILIDAD o IDONEIDAD PARA UN PROPÓSITO PARTICULAR. Ver la
-// GNU General Public License for more details.
+// Licencia Pública General GNU para más detalles.
 //
-// You should have received a copy of the GNU General Public License
+// Deberías haber recibido una copia de la Licencia Pública General GNU
-// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
+// junto con Moodle. Si no, ve <http://www.gnu.org/licenses/>.
+/**
+ * Página principal de inicio de sesión de Moodle.
+ * Este archivo maneja todo el proceso de autenticación de usuarios,
-/**
+ * incluyendo la validación de credenciales, manejo de sesiones,
- * Main login page.
+ * redirecciones y mensajes de error.
+ *
  * @package    core
  * @subpackage auth
  * @copyright  1999 onwards Martin Dougiamas  http://dougiamas.com
+ * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
- * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
  */
+// Incluir archivos de configuración y librerías necesarias
+require('../config.php');
 require_once('lib.php');
+// Verificar si se requiere una actualización mayor del sistema
+// Si es así, redirigir al usuario a la página de actualización
+redirect_if_major_upgrade_required();
-require('../config.php');
+// ============================================================================
-require_once('lib.php');
+// PARÁMETROS DE LA PÁGINA DE INICIO DE SESIÓN
+// ============================================================================
-redirect_if_major_upgrade_required();
-$testsession = optional_param('testsession', 0, PARAM_INT); // test session works properly
+// Parámetros opcionales que controlan el comportamiento del inicio de sesión
-$anchor      = optional_param('anchor', '', PARAM_RAW);     // Used to restore hash anchor to wantsurl.
+$testsession = optional_param('testsession', 0, PARAM_INT);     // Verifica el funcionamiento correcto de la sesión
-$loginredirect = optional_param('loginredirect', 1, PARAM_BOOL);   // Used to bypass alternateloginurl.
+$anchor = optional_param('anchor', '', PARAM_RAW);              // Mantiene la posición del ancla en la URL de destino
-$resendconfirmemail = optional_param('resendconfirmemail', false, PARAM_BOOL);
 $loginredirect = optional_param('loginredirect', 1, PARAM_BOOL); // Controla la redirección a URL de login alternativo
-// It might be safe to do this for non-Behat sites, or there might
+$resendconfirmemail = optional_param('resendconfirmemail', false, PARAM_BOOL); // Permite reenviar email de confirmación
 // be a security risk. For now we only allow it on Behat sites.
-// If you wants to do the analysis, you may be able to remove the
+// Verificación especial para sitios Behat (entorno de pruebas)
-// if (BEHAT_SITE_RUNNING).
+// Esto podría ser seguro para sitios no-Behat, pero por ahora solo lo permitimos en sitios Behat
 if (defined('BEHAT_SITE_RUNNING') && BEHAT_SITE_RUNNING) {
+    $wantsurl = optional_param('wantsurl', '', PARAM_LOCALURL);   // Sobrescribe $SESSION->wantsurl si se proporciona
-    $wantsurl    = optional_param('wantsurl', '', PARAM_LOCALURL);   // Overrides $SESSION->wantsurl if given.
+    if ($wantsurl !== '') {
-    if ($wantsurl !== '') {
+        $SESSION->wantsurl = (new moodle_url($wantsurl))->out(false);
         $SESSION->wantsurl = (new moodle_url($wantsurl))->out(false);
+}
+// Configuración del contexto y la página
+$context = context_system::instance();
+$PAGE->set_url("$CFG->wwwroot/login/index.php");
-}
+$PAGE->set_context($context);
+$PAGE->set_pagelayout('login');
-$context = context_system::instance();
+// ============================================================================
+// CONFIGURACIÓN INICIAL Y VARIABLES
+// ============================================================================
-$PAGE->set_url("$CFG->wwwroot/login/index.php");
+// Inicialización de variables para el manejo de mensajes y errores
-$PAGE->set_context($context);
+$errormsg = '';    // Almacena mensajes de error para mostrar al usuario
-$PAGE->set_pagelayout('login');
+$infomsg = '';     // Almacena mensajes informativos para mostrar al usuario
 $errorcode = 0;    // Código numérico que identifica el tipo de error
-/// Initialize variables
+// ============================================================================
-$errormsg = '';
+// VERIFICACIÓN DE SESIÓN
-$infomsg = '';
+// ============================================================================
-$errorcode = 0;
 // Prueba de funcionamiento de la sesión
-// login page requested session test
+if ($testsession) {
-if ($testsession) {
+    if ($testsession == $USER->id) {
-    if ($testsession == $USER->id) {
+        // Si la sesión es válida, redirigir a la URL deseada
         if (isset($SESSION->wantsurl)) {
             $urltogo = $SESSION->wantsurl;
         } else {
-            $urltogo = $CFG->wwwroot.'/';
+            $urltogo = $CFG->wwwroot . '/';
+        }
+        unset($SESSION->wantsurl);
-        unset($SESSION->wantsurl);
+        redirect($urltogo);
+    } else {
+        // Si la sesión no es válida, mostrar error de cookies
+        $errormsg = get_string("cookiesnotenabled");
-        redirect($urltogo);
+        $errorcode = 1;
     } else {
         // TODO: try to find out what is the exact reason why sessions do not work
         $errormsg = get_string("cookiesnotenabled");
-        $errorcode = 1;
+// ============================================================================
 // MANEJO DE SESIONES EXPIRADAS
+// ============================================================================
-}
 // Verificar si la sesión actual ha expirado
+if (!empty($SESSION->has_timed_out)) {
-/// Check for timed out sessions
+    $session_has_timed_out = true;
-if (!empty($SESSION->has_timed_out)) {
+    unset($SESSION->has_timed_out);
-    $session_has_timed_out = true;
+} else {
-    unset($SESSION->has_timed_out);
+    $session_has_timed_out = false;
 } else {
     $session_has_timed_out = false;
+// Inicialización de variables para el formulario y usuario
+$frm = false;
+$user = false;
-}
 // Obtener la secuencia de plugins de autenticación habilitados
-$frm  = false;
+$authsequence = get_enabled_auth_plugins();
-$user = false;
-$authsequence = get_enabled_auth_plugins(); // Auths, in sequence.
+foreach ($authsequence as $authname) {
-foreach($authsequence as $authname) {
+    $authplugin = get_auth_plugin($authname);
-    $authplugin = get_auth_plugin($authname);
+    // El hook loginpage_hook() del plugin de autenticación puede establecer $frm y/o $user
-    // The auth plugin's loginpage_hook() can eventually set $frm and/or $user.
+    $authplugin->loginpage_hook();
+}
-    $authplugin->loginpage_hook();
+// ============================================================================
+// CONFIGURACIÓN DEL SITIO Y NAVEGACIÓN
+// ============================================================================
-}
+// Obtener información del sitio
+$site = get_site();
-/// Define variables used in page
-$site = get_site();
+// Ignorar páginas activas en la navegación/configuración
 $PAGE->navbar->ignore_active();
-// Ignore any active pages in the navigation/settings.
+$loginsite = get_string("loginsite");
-// We do this because there won't be an active page there, and by ignoring the active pages the
+$PAGE->navbar->add($loginsite);
 // navigation and settings won't be initialised unless something else needs them.
-$PAGE->navbar->ignore_active();
+// ============================================================================
-$loginsite = get_string("loginsite");
+// PROCESO DE AUTENTICACIÓN
-$PAGE->navbar->add($loginsite);
+// ============================================================================
 if ($user !== false or $frm !== false or $errormsg !== '') {
-    // some auth plugin already supplied full user, fake form data or prevented user login with error message
+// Verificar si algún plugin de autenticación ya proporcionó el usuario completo
 if ($user !== false or $frm !== false or $errormsg !== '') {
-} else if (!empty($SESSION->wantsurl) && file_exists($CFG->dirroot.'/login/weblinkauth.php')) {
+    // El plugin de autenticación ya proporcionó el usuario completo, datos del formulario falso
-    // Handles the case of another Moodle site linking into a page on this site
-    //TODO: move weblink into own auth plugin
-    include($CFG->dirroot.'/login/weblinkauth.php');
+    // o impidió el inicio de sesión con mensaje de error
-    if (function_exists('weblink_auth')) {
+} else if (!empty($SESSION->wantsurl) && file_exists($CFG->dirroot . '/login/weblinkauth.php')) {
-        $user = weblink_auth($SESSION->wantsurl);
+    // Maneja el caso de otro sitio Moodle vinculando a una página en este sitio
     include($CFG->dirroot . '/login/weblinkauth.php');
-    if ($user) {
+    if (function_exists('weblink_auth')) {
+        $user = weblink_auth($SESSION->wantsurl);
+    }
-        $frm->username = $user->username;
+    if ($user) {
-    } else {
+        $frm->username = $user->username;
+    } else {
         $frm = data_submitted();
-    }
+    }
 } else {
+    $frm = data_submitted();
-} else {
+}
     $frm = data_submitted();
-}
+// Restaurar el #anchor a la wantsurl original
 if ($anchor && isset($SESSION->wantsurl) && strpos($SESSION->wantsurl, '#') === false) {
-// Restore the #anchor to the original wantsurl. Note that this
+    $wantsurl = new moodle_url($SESSION->wantsurl);
-// will only work for internal auth plugins, SSO plugins such as
+    $wantsurl->set_anchor(substr($anchor, 1));
-// SAML / CAS / OIDC will have to handle this correctly directly.
+    $SESSION->wantsurl = $wantsurl->out();
+}
 if ($anchor && isset($SESSION->wantsurl) && strpos($SESSION->wantsurl, '#') === false) {
-    $wantsurl = new moodle_url($SESSION->wantsurl);
+// ============================================================================
-    $wantsurl->set_anchor(substr($anchor, 1));
+// VERIFICACIÓN DE CREDENCIALES
-    $SESSION->wantsurl = $wantsurl->out();
+// ============================================================================
 // Verificar si el usuario ha enviado datos de inicio de sesión
-/// Check if the user has actually submitted login data to us
+if ($frm and isset($frm->username)) {
+    // Normalizar el nombre de usuario
     $frm->username = trim(core_text::strtolower($frm->username));
 if ($frm and isset($frm->username)) {                             // Login WITH cookies
     // Verificar la autenticación 'none' si está habilitada
-    $frm->username = trim(core_text::strtolower($frm->username));
+    if (is_enabled_auth('none')) {
         if ($frm->username !== core_user::clean_field($frm->username, 'username')) {
+            $errormsg = get_string('username') . ': ' . get_string("invalidusername");
+            $errorcode = 2;
+            $user = null;
+        }
-    if (is_enabled_auth('none') ) {
+    }
         if ($frm->username !== core_user::clean_field($frm->username, 'username')) {
-            $errormsg = get_string('username').': '.get_string("invalidusername");
+    // Verificar si el usuario es invitado
-            $errorcode = 2;
+    if ($user) {
-            $user = null;
+        // El plugin de autenticación ya proporcionó el usuario
     } else if (($frm->username == 'guest') and empty($CFG->guestloginbutton)) {
         $user = false;    // No se puede iniciar sesión como invitado si el botón de invitado está deshabilitado
+        $frm = false;
-    if ($user) {
+    } else {
-        // The auth plugin has already provided the user via the loginpage_hook() called above.
+        if (empty($errormsg)) {
-    } else if (($frm->username == 'guest') and empty($CFG->guestloginbutton)) {
+            // Intentar autenticar al usuario
-        $user = false;    /// Can't log in as guest if guest button is disabled
+            $logintoken = isset($frm->logintoken) ? $frm->logintoken : '';
-        $frm = false;
+            $loginrecaptcha = login_captcha_enabled() ? $frm->{'g-recaptcha-response'} ?? '' : false;
+            $user = authenticate_user_login($frm->username, $frm->password, false, $errorcode, $logintoken, $loginrecaptcha);
-    } else {
+        }
+    }
-        if (empty($errormsg)) {
+    // ============================================================================
-            $logintoken = isset($frm->logintoken) ? $frm->logintoken : '';
+    // MANEJO DE USUARIOS RESTAURADOS
-            $loginrecaptcha = login_captcha_enabled() ? $frm->{'g-recaptcha-response'} ?? '' : false;
+    // ============================================================================
             $user = authenticate_user_login($frm->username, $frm->password, false, $errorcode, $logintoken, $loginrecaptcha);
-        }
     // Procesar usuarios que han sido restaurados desde una copia de seguridad
+    if (!$user and $frm and is_restored_user($frm->username)) {
-    // Intercept 'restored' users to provide them with info & reset password
+        $PAGE->set_title(get_string('restoredaccount'));
-    if (!$user and $frm and is_restored_user($frm->username)) {
+        $PAGE->set_heading($site->fullname);
+        echo $OUTPUT->header();
-        $PAGE->set_title(get_string('restoredaccount'));
+        echo $OUTPUT->heading(get_string('restoredaccount'));
-        $PAGE->set_heading($site->fullname);
+        echo $OUTPUT->box(get_string('restoredaccountinfo'), 'generalbox boxaligncenter');
-        echo $OUTPUT->header();
+        require_once('restored_password_form.php');
-        echo $OUTPUT->heading(get_string('restoredaccount'));
+        $form = new login_forgot_password_form('forgot_password.php', array('username' => $frm->username));
-        echo $OUTPUT->box(get_string('restoredaccountinfo'), 'generalbox boxaligncenter');
+        $form->display();
-        require_once('restored_password_form.php'); // Use our "supplanter" login_forgot_password_form. MDL-20846
+        echo $OUTPUT->footer();
                 } else {
                     echo $OUTPUT->notification(get_string('emailconfirmsentsuccess'), \core\output\notification::NOTIFY_SUCCESS);
+                }
+            }
             echo $OUTPUT->box(get_string("emailconfirmsent", "", s($user->email)), "generalbox boxaligncenter");
-            $resendconfirmurl = new moodle_url('/login/index.php',
+            $resendconfirmurl = new moodle_url(
+                '/login/index.php',
+                [
                     'username' => $frm->username,
                     'password' => $frm->password,
                     'resendconfirmemail' => true,
                     'logintoken' => \core\session\manager::get_login_token()
             echo $OUTPUT->single_button($resendconfirmurl, get_string('emailconfirmationresend'));
             echo $OUTPUT->footer();
             die;
+        }
+        // ============================================================================
+        // COMPLETAR INICIO DE SESIÓN
+        // ============================================================================
-    /// Let's get them all set up.
+        // Completar el proceso de inicio de sesión
+        complete_user_login($user);
         complete_user_login($user);
+        // Aplicar límite de inicio de sesión concurrente
         \core\session\manager::apply_concurrent_login_limit($user->id, session_id());
-        // sets the username cookie
-        if (!empty($CFG->nolastloggedin)) {
-            // do not store last logged in user in cookie
-            // auth plugins can temporarily override this from loginpage_hook()
+        // Configurar cookie de nombre de usuario
-            // do not save $CFG->nolastloggedin in database!
+        if (!empty($CFG->nolastloggedin)) {
             // No almacenar último usuario conectado en cookie
-        } else if (empty($CFG->rememberusername)) {
-            // no permanent cookies, delete old one if exists
+        } else if (empty($CFG->rememberusername)) {
-            set_moodle_cookie('');
+            // Sin cookies permanentes, eliminar la anterior si existe
             set_moodle_cookie('');
+        } else {
-        } else {
+            set_moodle_cookie($USER->username);
+        }
-            set_moodle_cookie($USER->username);
+        // Obtener URL de redirección
+        $urltogo = core_login_get_return_url();
-        }
         // ============================================================================
-        $urltogo = core_login_get_return_url();
+        // VERIFICACIÓN DE CONTRASEÑAS EXPIRADAS
         // ============================================================================
     /// check if user password has expired
-    /// Currently supported only for ldap-authentication module
+        // Verificar si la contraseña del usuario ha expirado (solo para autenticación LDAP)
         $userauth = get_auth_plugin($USER->auth);
         if (!isguestuser() and !empty($userauth->config->expiration) and $userauth->config->expiration == 1) {
             $externalchangepassword = false;
             if ($userauth->can_change_password()) {
                 $passwordchangeurl = $userauth->change_password_url();
                 if (!$passwordchangeurl) {
-                    $passwordchangeurl = $CFG->wwwroot.'/login/change_password.php';
+                    $passwordchangeurl = $CFG->wwwroot . '/login/change_password.php';
                 } else {
                     $externalchangepassword = true;
+                }
             } else {
-                $passwordchangeurl = $CFG->wwwroot.'/login/change_password.php';
+                $passwordchangeurl = $CFG->wwwroot . '/login/change_password.php';
+            }
             $days2expire = $userauth->password_expire($USER->username);
             $PAGE->set_title($loginsite);
             $PAGE->set_heading("$site->fullname");
             if (intval($days2expire) > 0 && intval($days2expire) < intval($userauth->config->expiration_warning)) {
                 echo $OUTPUT->header();
                 echo $OUTPUT->confirm(get_string('auth_passwordwillexpire', 'auth', $days2expire), $passwordchangeurl, $urltogo);
-                echo $OUTPUT->footer();
-                exit;
+                echo $OUTPUT->footer();
-            } elseif (intval($days2expire) < 0 ) {
+                exit;
-                if ($externalchangepassword) {
-                    // We end the session if the change password form is external. This prevents access to the site
+            } elseif (intval($days2expire) < 0) {
-                    // until the password is correctly changed.
+                if ($externalchangepassword) {
-                    require_logout();
+                    // Cerrar sesión si el formulario de cambio de contraseña es externo
-                } else {
+                    require_logout();
-                    // If we use the standard change password form, this user preference will be reset when the password
+                } else {
-                    // is changed. Until then it will prevent access to the site.
+                    // Forzar cambio de contraseña si se usa el formulario estándar
                     set_user_preference('auth_forcepasswordchange', 1, $USER);
+                }
                 echo $OUTPUT->header();
                 echo $OUTPUT->confirm(get_string('auth_passwordisexpired', 'auth'), $passwordchangeurl, $urltogo);
                 echo $OUTPUT->footer();
                 exit;
             }
+        }
-        // Discard any errors before the last redirect.
+        // Limpiar mensajes de error antes de la última redirección
         unset($SESSION->loginerrormsg);
-        unset($SESSION->logininfomsg);
         unset($SESSION->logininfomsg);
-        // Discard loginredirect if we are redirecting away.
+        // Descartar loginredirect si estamos redirigiendo
         unset($SESSION->loginredirect);
-        // test the session actually works by redirecting to self
+        // Probar que la sesión funciona redirigiendo a sí mismo
         $SESSION->wantsurl = $urltogo;
+            }
+        }
+    }
+}
+// ============================================================================
+// DETECCIÓN DE PROBLEMAS CON SESIONES
+// ============================================================================
-/// Detect problems with timedout sessions
+// Detectar problemas con sesiones con tiempo de espera agotado
 if ($session_has_timed_out and !data_submitted()) {
     $errormsg = get_string('sessionerroruser', 'error');
     $errorcode = 4;
+}
-}
+// ============================================================================
+// MANEJO DE URL DE DESTINO
 // ============================================================================
 /// First, let's remember where the user was trying to get to before they got here
 // Recordar dónde estaba intentando llegar el usuario antes de llegar aquí
+if (empty($SESSION->wantsurl)) {
-if (empty($SESSION->wantsurl)) {
+    $SESSION->wantsurl = null;
-    $SESSION->wantsurl = null;
+    $referer = get_local_referer(false);
-    $referer = get_local_referer(false);
+    if (
-    if ($referer &&
+        $referer &&
-            $referer != $CFG->wwwroot &&
+        $referer != $CFG->wwwroot &&
-            $referer != $CFG->wwwroot . '/' &&
+        $referer != $CFG->wwwroot . '/' &&
+        $referer != $CFG->wwwroot . '/login/' &&
-            $referer != $CFG->wwwroot . '/login/' &&
+        strpos($referer, $CFG->wwwroot . '/login/?') !== 0 &&
-            strpos($referer, $CFG->wwwroot . '/login/?') !== 0 &&
+        strpos($referer, $CFG->wwwroot . '/login/index.php') !== 0
-            strpos($referer, $CFG->wwwroot . '/login/index.php') !== 0) { // There might be some extra params such as ?lang=.
+    ) {
         $SESSION->wantsurl = $referer;
+    }
+}
-// Check if loginredirect is set in the SESSION.
+// Verificar si loginredirect está establecido en la SESSION
+if ($errorcode && isset($SESSION->loginredirect)) {
+    $loginredirect = $SESSION->loginredirect;
+}
+$SESSION->loginredirect = $loginredirect;
-if ($errorcode && isset($SESSION->loginredirect)) {
-    $loginredirect = $SESSION->loginredirect;
+// ============================================================================
 // REDIRECCIÓN A URL DE INICIO DE SESIÓN ALTERNATIVA
-$SESSION->loginredirect = $loginredirect;
 // ============================================================================
 /// Redirect to alternative login URL if needed
-if (!empty($CFG->alternateloginurl) && $loginredirect) {
+// Redirigir a URL de inicio de sesión alternativa si es necesario
-    $loginurl = new moodle_url($CFG->alternateloginurl);
+if (!empty($CFG->alternateloginurl) && $loginredirect) {
     $loginurl = new moodle_url($CFG->alternateloginurl);
     $loginurlstr = $loginurl->out(false);
     if ($SESSION->wantsurl != '' && strpos($SESSION->wantsurl, $loginurlstr) === 0) {
-        // We do not want to return to alternate url.
+        // No queremos volver a la URL alternativa
         $SESSION->wantsurl = null;
+    }
+    // Si hay código de error, agregarlo a la URL
+    if ($errorcode) {
+        $loginurl->param('errorcode', $errorcode);
     // If error code then add that to url.
     if ($errorcode) {
-        $loginurl->param('errorcode', $errorcode);
+    redirect($loginurl->out(false));
+}
-    }
 // ============================================================================
-    redirect($loginurl->out(false));
-}
+// GENERACIÓN DE LA PÁGINA DE INICIO DE SESIÓN
 // ============================================================================
 /// Generate the login page with forms
 // Inicializar el objeto del formulario si no existe
-if (!isset($frm) or !is_object($frm)) {
-    $frm = new stdClass();
+if (!isset($frm) or !is_object($frm)) {
     $frm = new stdClass();
+}
-if (empty($frm->username) && $authsequence[0] != 'shibboleth') {  // See bug 5184
-    if (!empty($_GET["username"])) {
+// Configurar valores predeterminados del formulario
-        // we do not want data from _POST here
+if (empty($frm->username) && $authsequence[0] != 'shibboleth') {
-        $frm->username = clean_param($_GET["username"], PARAM_RAW); // we do not want data from _POST here
+    if (!empty($_GET["username"])) {
-    } else {
+        $frm->username = clean_param($_GET["username"], PARAM_RAW);
-        $frm->username = get_moodle_cookie();
     } else {
-    $frm->password = "";
+        $frm->username = get_moodle_cookie();
+    }
-if (!empty($SESSION->loginerrormsg) || !empty($SESSION->logininfomsg)) {
+    $frm->password = "";
-    // We had some messages before redirect, show them now.
     $errormsg = $SESSION->loginerrormsg ?? '';
     $infomsg = $SESSION->logininfomsg ?? '';
-    unset($SESSION->loginerrormsg);
+// Manejar mensajes de error e información
-    unset($SESSION->logininfomsg);
-} else if ($testsession) {
+if (!empty($SESSION->loginerrormsg) || !empty($SESSION->logininfomsg)) {
-    // No need to redirect here.
+    $errormsg = $SESSION->loginerrormsg ?? '';
-    unset($SESSION->loginerrormsg);
-    unset($SESSION->logininfomsg);
+    $infomsg = $SESSION->logininfomsg ?? '';
     unset($SESSION->loginerrormsg);
+    unset($SESSION->logininfomsg);
+} else if ($testsession) {
+    unset($SESSION->loginerrormsg);
+    unset($SESSION->logininfomsg);
+} else if ($errormsg or !empty($frm->password)) {
-} else if ($errormsg or !empty($frm->password)) {
+    if ($errormsg) {
-    // We must redirect after every password submission.
+        $SESSION->loginerrormsg = $errormsg;
+    }
-    if ($errormsg) {
+    $loginurl = new moodle_url('/login/index.php');
+    $loginurl->param('loginredirect', $SESSION->loginredirect);
-        $SESSION->loginerrormsg = $errormsg;
+    redirect($loginurl->out(false));
-    }
+}
-    // Add redirect param to url.
+// ============================================================================
-    $loginurl = new moodle_url('/login/index.php');
+// RENDERIZADO DE LA PÁGINA
-    $loginurl->param('loginredirect', $SESSION->loginredirect);
+// ============================================================================
-    redirect($loginurl->out(false));
+// Configurar título y encabezado de la página
+$PAGE->set_title($loginsite);
 $PAGE->set_heading("$site->fullname");
-$PAGE->set_title($loginsite);
+// Mostrar el encabezado de la página
-$PAGE->set_heading("$site->fullname");
+echo $OUTPUT->header();
+// Verificar el estado de la sesión del usuario
-echo $OUTPUT->header();
+if (isloggedin() and !isguestuser()) {

Proyectos de Subversion Moodle

(root)/login/index.php – Rev 1 → 1391