$password1 = trim($password1);
$password2 = trim($password2);
if (strlen($password1) < 5 or strlen($password2) < 5) {
$formerror .= my_("The password entered must be at least five characters") . "\n";
}
if ($password1 != $password2) {
$formerror .= my_("The passwords entered do not match") . "\n";
}
if (!$formerror) {
if ($user and getAuthUsername() == ADMINUSER) {
$userid = $user;
} else {
$userid = getAuthUsername();
}
$password = crypt($password1, 'xq');
$ds->DbfTransactionStart();
$result =& $ds->ds->Execute("UPDATE users\n SET password="******"\n WHERE userid=" . $ds->ds->qstr($userid));
$ds->AuditLog(sprintf(my_("User %s changed password"), $userid));
if ($result) {
$ds->DbfTransactionEnd();
insert($w, text(my_("Password changed")));
} else {
$formerror .= my_("Password could not be changed") . "\n";
}
}
}
if (!$_POST || $formerror) {
myError($w, $p, $formerror, FALSE);
if ($user) {
insert($w, heading(3, sprintf(my_("Change password for user %s"), $user)));
} else {
