Merge pull request #530 from pradosoft/prado-3.2.43.2.4prado-3.2

Backports for Prado 3.2.4

1 files changed, 33 insertions, 0 deletions

diff --git a/framework/Wsat/pages/TWsatLogin.php b/framework/Wsat/pages/TWsatLogin.php
new file mode 100644
index 00000000..21994c07
--- /dev/null
+++ b/framework/Wsat/pages/TWsatLogin.php
@@ -0,0 +1,33 @@
+<?php
+
+/**
+ * @author Daniel Sampedro Bello <darthdaniel85@gmail.com>
+ * @link http://www.pradosoft.com/
+ * @copyright Copyright &copy; 2005-2013 PradoSoft
+ * @license http://www.pradosoft.com/license/
+ * @version $Id$
+ * @since 3.3
+ * @package Wsat.pages
+ */
+class TWsatLogin extends TPage
+{
+
+        public function login()
+        {
+                if ($this->IsValid)
+                {
+                        $this->Session["wsat_password"] = $this->getService()->getPassword();
+
+                        $url = $this->Service->constructUrl('TWsatHome');
+                        $this->Response->redirect($url);
+                }
+        }
+
+        public function validatePassword($sender, $param)
+        {
+                $config_pass = $this->Service->Password;
+                $user_pass = $this->password->Text;
+                $param->IsValid = $user_pass === $config_pass;
+        }
+
+}
\ No newline at end of file