2 files changed, 86 insertions, 0 deletions
diff --git a/app/php/components/PasswordChange.php b/app/php/components/PasswordChange.php
new file mode 100644
index 0000000..8aedcab
--- /dev/null
+++ b/app/php/components/PasswordChange.php
@@ -0,0 +1,34 @@
+<?php
+
+Prado::using('Application.user.DbUser');
+
+class PasswordChange extends TTemplateControl {
+
+    public function getUserToChange() {
+        return $this->getControlState('user');
+    }
+
+    public function setUserToChange(DbUser $user) {
+        $this->setControlState('user', $user);
+    }
+
+    public function checkPassword($sender, $param) {
+        $param->IsValid = DbUser::verifyPassword(
+            $this->Password->Text, $this->UserToChange->DbRecord->Password
+        );
+    }
+
+    public function changePassword($sender, $param) {
+        $this->SuccessMessage->Visible = FALSE;
+        if ($this->Page->IsValid) {
+            $this->UserToChange->DbRecord->Password = DbUser::generatePassword(
+                $this->NewPassword->Text
+            );
+            $this->UserToChange->DbRecord->save();
+            $this->SuccessMessage->Visible = TRUE;
+        }
+    }
+
+}
+
+?>
diff --git a/app/php/components/PasswordChange.tpl b/app/php/components/PasswordChange.tpl
new file mode 100644
index 0000000..c1eb793
--- /dev/null
+++ b/app/php/components/PasswordChange.tpl
@@ -0,0 +1,52 @@
+Change password<br />
+Current password:
+<com:TTextBox ID="Password"
+              TextMode="Password"
+              ValidationGroup="ChangePasswordGroup" />
+<com:TRequiredFieldValidator
+   ControlToValidate="Password"
+   Display="Dynamic"
+   ErrorMessage="Current password cannot be empty"
+   ValidationGroup="ChangePasswordGroup" />
+<com:TCustomValidator
+   ControlToValidate="Password"
+   OnServerValidate="checkPassword"
+   Display="Dynamic"
+   ErrorMessage="Password is incorrect"
+   ValidationGroup="ChangePasswordGroup" />
+<br />
+New password:
+<com:TTextBox ID="NewPassword"
+              TextMode="Password"
+              ValidationGroup="ChangePasswordGroup" />
+<com:TRequiredFieldValidator
+   ControlToValidate="NewPassword"
+   Display="Dynamic"
+   ErrorMessage="New password cannot be empty"
+   ValidationGroup="ChangePasswordGroup" />
+<br />
+Repeat password:
+<com:TTextBox ID="ReNewPassword"
+              TextMode="Password"
+              ValidationGroup="ChangePasswordGroup" />
+<com:TRequiredFieldValidator
+   ControlToValidate="ReNewPassword"
+   Display="Dynamic"
+   ErrorMessage="New password cannot be empty"
+   ValidationGroup="ChangePasswordGroup" />
+<com:TCompareValidator
+   ControlToValidate="ReNewPassword"
+   ControlToCompare="NewPassword"
+   DataType="String"
+   Operator="Equal"
+   Display="Dynamic"
+   ErrorMessage="Passwords don't match"
+   ValidationGroup="ChangePasswordGroup" />
+<br />
+<com:TButton
+   Text="Change password"
+   OnCommand="changePassword"
+   ValidationGroup="ChangePasswordGroup" />
+<com:TLabel ID="SuccessMessage"
+            Text="Your password has been changed"
+            Visible="false" />