From cf356bcb360509734e6c44e1f08f1092043d19d9 Mon Sep 17 00:00:00 2001 From: alecpl Date: Tue, 21 Apr 2009 08:11:03 +0000 Subject: - improved password plugin (#1485810) --- plugins/password/password.php | 154 +++++++++++++++++++++++++++++++++++------- 1 file changed, 128 insertions(+), 26 deletions(-) (limited to 'plugins/password/password.php') diff --git a/plugins/password/password.php b/plugins/password/password.php index 4a35da119..1ff755bfd 100644 --- a/plugins/password/password.php +++ b/plugins/password/password.php @@ -3,11 +3,81 @@ /** * Change Password * - * Sample plugin that adds a possibility to change password + * Plugin that adds a possibility to change password using a database * (Settings -> Password tab) * - * @version 1.0 + * @version 1.1 * @author Aleksander 'A.L.E.C' Machniak + * @editor Daniel Black + * + * Configuration Items (config/main.inc.php): + * password_confirm_current - boolean to determine whether current password + * is required to change password. Defaults to FALSE. + * db_passwd_dsn - is the PEAR database DSN for performing the query. Defaults + * to the default databse setting in config/db.inc.php + * password_query - the SQL query used to change the password. + * If the SQL query is a SELECT it will return an error message in a row if unsuccessful + * If the SQL query is a UPDATE it will update a single row only. + * An UPDATE where zero rows changed will be inteperated to be a wrong username/password + * More than one row changed will be inteperated as an internal error + * The query can contain the following macros that will be expanded as follows: + * %p is replaced with the plaintext new password + * %c is replaced with the crypt version of the new password, MD5 if available + * otherwise DES. + * %u is replaced with the username (from the session info) + * %o is replaced with the password before the change + * %h is replaced with the imap host (from the session info) + * Escaping of macros is handled by this module. + * Defaults to "SELECT update_passwd(%c, %u)" + * To use this you need to define the update_passwd function in your + * database. + * + * Example SQL queries: + * These will typically need to define a function to change the password: + * + * Example implementations of an update_passwd function: + * + * This is for use with LMS (http://lms.org.pl) database and postgres: + * CREATE OR REPLACE FUNCTION update_passwd(hash text, account text) RETURNS integer AS $$ + * DECLARE + * res integer; + * BEGIN + * UPDATE passwd SET password = hash + * WHERE login = split_part(account, '@', 1) + * AND domainid = (SELECT id FROM domains WHERE name = split_part(account, '@', 2)) + * RETURNING id INTO res; + * RETURN res; + * END; + * $$ LANGUAGE plpgsql SECURITY DEFINER; + * + * This is for use with a SELECT update_passwd(%o,%c,%u) query + * Uupdates the password only when the old password matches the MD5 password in the database + * CREATE FUNCTION update_password (oldpass text, cryptpass text, user text) RETURNS text + * MODIFIES SQL DATA + * BEGIN + * DECLARE currentsalt varchar(20); + * DECLARE error text; + * SET error = 'incorrect current password'; + * SELECT substring_index(substr(user.password,4),_latin1'$',1) INTO currentsalt FROM users WHERE username=user; + * SELECT '' INTO error FROM users WHERE username=user AND password=ENCRYPT(oldpass,currentsalt); + * UPDATE users SET password=cryptpass WHERE username=user AND password=ENCRYPT(oldpass,currentsalt); + * RETURN error; + * END + * + * Example SQL UPDATEs: + * + * Plain text passwords: + * UPDATE users SET password=%p WHERE username=%u AND password=%o AND domain=%h LIMIT 1 + * + * Crypt text passwords: + * UPDATE users SET password=%c WHERE username=%u LIMIT 1 + * + * Use a MYSQL crypt function (*nix only) with random 8 character salt + * UPDATE users SET password=ENCRYPT(%p,concat(_utf8'$1$',right(md5(rand()),8),_utf8'$')) WHERE username=%u LIMIT 1 + * + * MD5 stored passwords: + * UPDATE users SET password=MD5(%p) WHERE username=%u AND password=MD5(%o) LIMIT 1 + * */ class password extends rcube_plugin { @@ -34,21 +104,22 @@ class password extends rcube_plugin { $rcmail = rcmail::get_instance(); + $confirm = $this->_confirm($rcmail->config); $this->add_texts('localization/'); - if (!isset($_POST['_curpasswd']) || !isset($_POST['_newpasswd'])) + if (($confirm && !isset($_POST['_curpasswd'])) || !isset($_POST['_newpasswd'])) $rcmail->output->command('display_message', $this->gettext('nopassword'), 'error'); else { $curpwd = get_input_value('_curpasswd', RCUBE_INPUT_POST); $newpwd = get_input_value('_newpasswd', RCUBE_INPUT_POST); - if ($_SESSION['password'] != $rcmail->encrypt_passwd($curpwd)) + if ($confirm && $_SESSION['password'] != $rcmail->encrypt_passwd($curpwd)) $rcmail->output->command('display_message', $this->gettext('passwordincorrect'), 'error'); - else if ($res = $this->_save($newpwd)) { + else if (!($res = $this->_save($curpwd,$newpwd))) { $rcmail->output->command('display_message', $this->gettext('successfullysaved'), 'confirmation'); $_SESSION['password'] = $rcmail->encrypt_passwd($newpwd); } else - $rcmail->output->command('display_message', $this->gettext('errorsaving'), 'error'); + $rcmail->output->command('display_message', $res, 'error'); } rcmail_overwrite_action('plugin.password'); @@ -59,6 +130,7 @@ class password extends rcube_plugin { $rcmail = rcmail::get_instance(); + $confirm = $this->_confirm($rcmail->config); // add some labels to client $rcmail->output->add_label( 'password.nopassword', @@ -75,18 +147,20 @@ class password extends rcube_plugin // return the complete edit form as table $out = '\n\n"; - $a_show_cols = array('curpasswd' => array('type' => 'text'), - 'newpasswd' => array('type' => 'text'), + $a_show_cols = array('newpasswd' => array('type' => 'text'), 'confpasswd' => array('type' => 'text')); - // show current password selection - $field_id = 'curpasswd'; - $input_newpasswd = new html_passwordfield(array('name' => '_curpasswd', 'id' => $field_id, 'size' => 20)); - - $out .= sprintf("%s\n", - $field_id, - rep_specialchars_output($this->gettext('curpasswd')), - $input_newpasswd->show($rcmail->config->get('curpasswd'))); + if ($confirm) { + $a_show_cols['curpasswd'] = array('type' => 'text'); + // show current password selection + $field_id = 'curpasswd'; + $input_newpasswd = new html_passwordfield(array('name' => '_curpasswd', 'id' => $field_id, 'size' => 20)); + + $out .= sprintf("%s\n", + $field_id, + rep_specialchars_output($this->gettext('curpasswd')), + $input_newpasswd->show($rcmail->config->get('curpasswd'))); + } // show new password selection $field_id = 'newpasswd'; @@ -127,16 +201,18 @@ class password extends rcube_plugin ), $out); } + private function _confirm($cfg) { + $val = $cfg->get('password_confirm_current'); + //return empty($val) || $val; + return $val; + } - private function _save($passwd) + private function _save($curpass,$passwd) { $cfg = rcmail::get_instance()->config; if (!($sql = $cfg->get('password_query'))) - $sql = "SELECT update_passwd('%p', '%u')"; - - $sql = str_replace('%u', $_SESSION['username'], $sql); - $sql = str_replace('%p', crypt($passwd), $sql); + $sql = "SELECT update_passwd(%c, %u)"; if ($dsn = $cfg->get('db_passwd_dsn')) { $db = new rcube_mdb2($dsn, '', FALSE); @@ -145,14 +221,40 @@ class password extends rcube_plugin } else { $db = rcmail::get_instance()->get_dbh(); } + if ($err = $db->is_error()) + return $err; - if (!$db->db_connected) - return false; - + if (strpos($sql,'%c') !== FALSE) { + $salt = ''; + if (CRYPT_MD5) { + $len = rand(3,CRYPT_SALT_LENGTH); + } else if (CRYPT_STD_DES) { + $len = 2; + } else { + return $this->gettext('nocryptfunction'); + } + for ($i = 0; $i < $len ; $i++) { + $salt .= chr(rand(ord('.'),ord('z'))); + } + $sql = str_replace('%c', $db->quote(crypt($passwd, CRYPT_MD5 ? '$1$'.$salt.'$' : $salt)), $sql); + } + $sql = str_replace('%u', $db->quote($_SESSION['username'],'text'), $sql); + $sql = str_replace('%p', $db->quote($passwd,'text'), $sql); + $sql = str_replace('%o', $db->quote($curpass,'text'), $sql); + $sql = str_replace('%h', $db->quote($_SESSION['imap_host'],'text'), $sql); + $res = $db->query($sql); - $res = $db->fetch_array($res); + if ($err = $db->is_error()) + return $err; + if (strtolower(substr(trim($query),0,6))=='select') { + return $db->fetch_array($res); + } else { + $res = $db->affected_rows($res); + if ($res == 0) return $this->gettext('errorsaving'); + if ($res == 1) return FALSE; // THis is the good case - 1 row updated + return $this->gettext('internalerror'); + } - return $res; } } -- cgit v1.2.3