From 0344b168276f80189e2254c75a762aff5b517b6b Mon Sep 17 00:00:00 2001
From: Aleksander Machniak <alec@alec.pl>
Date: Sun, 22 May 2016 06:32:57 -0400
Subject: [PATCH] Fix priority icon(s) position

---
 plugins/password/drivers/sql.php |  206 ++++++++++++++++++++++++++++++++++++++-------------
 1 files changed, 153 insertions(+), 53 deletions(-)

diff --git a/plugins/password/drivers/sql.php b/plugins/password/drivers/sql.php
index 98e878a..9659fa0 100644
--- a/plugins/password/drivers/sql.php
+++ b/plugins/password/drivers/sql.php
@@ -5,68 +5,168 @@
  *
  * Driver for passwords stored in SQL database
  *
- * @version 1.1
+ * @version 2.0
  * @author Aleksander 'A.L.E.C' Machniak <alec@alec.pl>
  *
+ * Copyright (C) 2005-2013, The Roundcube Dev Team
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program. If not, see http://www.gnu.org/licenses/.
  */
 
-function password_save($curpass, $passwd)
+class rcube_sql_password
 {
-    $rcmail = rcmail::get_instance();
+    function save($curpass, $passwd)
+    {
+        $rcmail = rcmail::get_instance();
 
-    if (!($sql = $rcmail->config->get('password_query')))
-        $sql = 'SELECT update_passwd(%c, %u)';
+        if (!($sql = $rcmail->config->get('password_query'))) {
+            $sql = 'SELECT update_passwd(%c, %u)';
+        }
 
-    if ($dsn = $rcmail->config->get('password_db_dsn')) {
-	// #1486067: enable new_link option
-	if (is_array($dsn) && empty($dsn['new_link']))
-	    $dsn['new_link'] = true;
-	else if (!is_array($dsn) && !preg_match('/\?new_link=true/', $dsn))
-	  $dsn .= '?new_link=true';
+        if ($dsn = $rcmail->config->get('password_db_dsn')) {
+            $db = rcube_db::factory($dsn, '', false);
+            $db->set_debug((bool)$rcmail->config->get('sql_debug'));
+        }
+        else {
+            $db = $rcmail->get_dbh();
+        }
 
-        $db = new rcube_mdb2($dsn, '', FALSE);
-        $db->set_debug((bool)$rcmail->config->get('sql_debug'));
-        $db->db_connect('w');
-    } else {
-        $db = $rcmail->get_dbh();
-    }
+        if ($db->is_error()) {
+            return PASSWORD_ERROR;
+        }
 
-    if ($err = $db->is_error())
+        // new password - default hash method
+        if (strpos($sql, '%P') !== false) {
+            $password = password::hash_password($passwd);
+
+            if ($password === false) {
+                return PASSWORD_CRYPT_ERROR;
+            }
+
+            $sql = str_replace('%P',  $db->quote($password), $sql);
+        }
+
+        // old password - default hash method
+        if (strpos($sql, '%O') !== false) {
+            $password = password::hash_password($curpass);
+
+            if ($password === false) {
+                return PASSWORD_CRYPT_ERROR;
+            }
+
+            $sql = str_replace('%O',  $db->quote($password), $sql);
+        }
+
+        // crypted password (deprecated, use %P)
+        if (strpos($sql, '%c') !== false) {
+            $password = password::hash_password($passwd, 'crypt', false);
+
+            if ($password === false) {
+                return PASSWORD_CRYPT_ERROR;
+            }
+
+            $sql = str_replace('%c',  $db->quote($password), $sql);
+        }
+
+        // dovecotpw (deprecated, use %P)
+        if (strpos($sql, '%D') !== false) {
+            $password = password::hash_password($passwd, 'dovecot', false);
+
+            if ($password === false) {
+                return PASSWORD_CRYPT_ERROR;
+            }
+
+            $sql = str_replace('%D', $db->quote($password), $sql);
+        }
+
+        // hashed passwords (deprecated, use %P)
+        if (strpos($sql, '%n') !== false) {
+            $password = password::hash_password($passwd, 'hash', false);
+
+            if ($password === false) {
+                return PASSWORD_CRYPT_ERROR;
+            }
+
+            $sql = str_replace('%n', $db->quote($password, 'text'), $sql);
+        }
+
+        // hashed passwords (deprecated, use %P)
+        if (strpos($sql, '%q') !== false) {
+            $password = password::hash_password($curpass, 'hash', false);
+
+            if ($password === false) {
+                return PASSWORD_CRYPT_ERROR;
+            }
+
+            $sql = str_replace('%q', $db->quote($password, 'text'), $sql);
+        }
+
+        // Handle clear text passwords securely (#1487034)
+        $sql_vars = array();
+        if (preg_match_all('/%[p|o]/', $sql, $m)) {
+            foreach ($m[0] as $var) {
+                if ($var == '%p') {
+                    $sql = preg_replace('/%p/', '?', $sql, 1);
+                    $sql_vars[] = (string) $passwd;
+                }
+                else { // %o
+                    $sql = preg_replace('/%o/', '?', $sql, 1);
+                    $sql_vars[] = (string) $curpass;
+                }
+            }
+        }
+
+        $local_part  = $rcmail->user->get_username('local');
+        $domain_part = $rcmail->user->get_username('domain');
+        $username    = $_SESSION['username'];
+        $host        = $_SESSION['imap_host'];
+
+        // convert domains to/from punnycode
+        if ($rcmail->config->get('password_idn_ascii')) {
+            $domain_part = rcube_utils::idn_to_ascii($domain_part);
+            $username    = rcube_utils::idn_to_ascii($username);
+            $host        = rcube_utils::idn_to_ascii($host);
+        }
+        else {
+            $domain_part = rcube_utils::idn_to_utf8($domain_part);
+            $username    = rcube_utils::idn_to_utf8($username);
+            $host        = rcube_utils::idn_to_utf8($host);
+        }
+
+        // at least we should always have the local part
+        $sql = str_replace('%l', $db->quote($local_part, 'text'), $sql);
+        $sql = str_replace('%d', $db->quote($domain_part, 'text'), $sql);
+        $sql = str_replace('%u', $db->quote($username, 'text'), $sql);
+        $sql = str_replace('%h', $db->quote($host, 'text'), $sql);
+
+        $res = $db->query($sql, $sql_vars);
+
+        if (!$db->is_error()) {
+            if (strtolower(substr(trim($sql),0,6)) == 'select') {
+                if ($db->fetch_array($res)) {
+                    return PASSWORD_SUCCESS;
+                }
+            }
+            else {
+                // This is the good case: 1 row updated
+                if ($db->affected_rows($res) == 1)
+                    return PASSWORD_SUCCESS;
+                // @TODO: Some queries don't affect any rows
+                // Should we assume a success if there was no error?
+            }
+        }
+
         return PASSWORD_ERROR;
-    
-    if (strpos($sql, '%c') !== FALSE) {
-        $salt = '';
-        if (CRYPT_MD5) { 
-    	    $len = rand(3, CRYPT_SALT_LENGTH);
-        } else if (CRYPT_STD_DES) {
-    	    $len = 2;
-        } else {
-    	    return PASSWORD_CRYPT_ERROR;
-        }
-        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);
-
-    if (!$db->is_error()) {
-	if (strtolower(substr(trim($query),0,6))=='select') {
-    	    if ($result = $db->fetch_array($res))
-		return PASSWORD_SUCCESS;
-	} else { 
-    	    if ($db->affected_rows($res) == 1)
-		return PASSWORD_SUCCESS; // This is the good case: 1 row updated
-	}
-    }
-
-    return PASSWORD_ERROR;
 }
-
-?>

--
Gitblit v1.9.1