<?php
+
/**
* Change password LDAP backend
*
+ * @copyright 2005-2020 The SquirrelMail Project Team
+ * @license http://opensource.org/licenses/gpl-license.php GNU Public License
* @version $Id$
* @package plugins
* @subpackage change_password
*/
-/** get imap server global */
-global $imapServerAddress;
+/**
+ * do not allow to call this file directly
+ */
+if (isset($_SERVER['SCRIPT_FILENAME']) && $_SERVER['SCRIPT_FILENAME'] == __FILE__) {
+ header("Location: ../../../src/login.php");
+ die();
+}
+
+/** load required functions */
+
+/** sqimap_get_user_server() function */
+include_once(SM_PATH . 'functions/imap_general.php');
+
+/** get imap server and username globals */
+global $imapServerAddress, $username;
/** Default plugin configuration.*/
/**
/**
* BindDN that should be able to change password.
- * WARNING: usually user has enough privileges to change own password.
+ * WARNING: sometimes user has enough privileges to change own password.
* If you leave default value, plugin will try to connect with DN that
* is detected in $cpw_ldap_username_attr=$username search and current
* user password will be used for authentication.
if (isset($cpw_ldap['userid_attr'])) $cpw_ldap_userid_attr=$cpw_ldap['userid_attr'];
if (isset($cpw_ldap['default_crypto'])) $cpw_ldap_default_crypto=$cpw_ldap['default_crypto'];
+/** make sure that setting does not contain mapping */
+$cpw_ldap_server=sqimap_get_user_server($cpw_ldap_server,$username);
+
/**
* Adding plugin hooks
*/
* Makes sure that required functions and configuration options are set.
*/
function cpw_ldap_init() {
- global $color;
- global $cpw_ldap_basedn;
-
- /**
- * If SM_PATH isn't defined, define it. Required to include files.
- * @ignore
- */
- if (!defined('SM_PATH')) define('SM_PATH','../../../');
-
- // load error_box() function
- include_once(SM_PATH . 'functions/display_messages.php');
+ global $oTemplate, $cpw_ldap_basedn;
// set initial value for error tracker
$cpw_ldap_initerr=false;
// check for ldap support in php
if (! function_exists('ldap_connect')) {
- error_box(_("Current configuration requires LDAP support in PHP."),$color);
+ error_box(_("Current configuration requires LDAP support in PHP."));
$cpw_ldap_initerr=true;
}
// chech required configuration settings.
if ($cpw_ldap_basedn=='') {
- error_box(_("Plugin is not configured correctly."),$color);
+ error_box(_("Plugin is not configured correctly."));
$cpw_ldap_initerr=true;
}
// if error var is positive, close html and stop execution
if ($cpw_ldap_initerr) {
- echo '</body></html>';
+ $oTemplate->display('footer.tpl');
exit;
}
}
// encrypt/hash password
switch ($crypto) {
+ case 'md4':
+ // minimal requirement = php with mhash extension
+ if ( function_exists( 'mhash' ) && defined('MHASH_MD4')) {
+ $ret = '{MD4}' . base64_encode( mhash( MHASH_MD4, $pass) );
+ } else {
+ array_push($msgs,
+ sprintf(_("Unsupported crypto: %s"),'md4'),
+ _("PHP mhash extension is missing or does not support selected crypto."));
+ }
+ break;
case 'md5':
$ret='{MD5}' . base64_encode(pack('H*',md5($pass)));
break;
case 'smd5':
- // minimal requirement mhash extension and php 4.0.4.
- if( function_exists( 'mhash' ) && function_exists( 'mhash_keygen_s2k' ) ) {
- sq_mt_seed( (double) microtime() * 1000000 );
+ // minimal requirement = mhash extension with md5 support and php 4.0.4.
+ if( function_exists( 'mhash' ) && function_exists( 'mhash_keygen_s2k' ) && defined('MHASH_MD5')) {
if ($forced_salt!='') {
$salt=$forced_salt;
} else {
// use two array_push calls in order to display messages in different lines.
array_push($msgs,
sprintf(_("Unsupported crypto: %s"),'smd5'),
- _("PHP mhash extension is missing."));
+ _("PHP mhash extension is missing or does not support selected crypto."));
+ }
+ break;
+ case 'rmd160':
+ // minimal requirement = php with mhash extension
+ if ( function_exists( 'mhash' ) && defined('MHASH_RIPEMD160')) {
+ $ret = '{RMD160}' . base64_encode( mhash( MHASH_RIPEMD160, $pass) );
+ } else {
+ array_push($msgs,
+ sprintf(_("Unsupported crypto: %s"),'ripe-md160'),
+ _("PHP mhash extension is missing or does not support selected crypto."));
}
break;
case 'sha':
// minimal requirement = php 4.3.0+ or php with mhash extension
- if ( function_exists('sha1') ) {
+ if ( function_exists('sha1') && defined('MHASH_SHA1')) {
// use php 4.3.0+ sha1 function, if it is available.
$ret = '{SHA}' . base64_encode(pack('H*',sha1($pass)));
} elseif( function_exists( 'mhash' ) ) {
} else {
array_push($msgs,
sprintf(_("Unsupported crypto: %s"),'sha'),
- _("PHP mhash extension is missing."));
+ _("PHP mhash extension is missing or does not support selected crypto."));
}
break;
case 'ssha':
// minimal requirement = mhash extension and php 4.0.4
- if( function_exists( 'mhash' ) && function_exists( 'mhash_keygen_s2k' ) ) {
- sq_mt_seed( (double) microtime() * 1000000 );
+ if( function_exists( 'mhash' ) && function_exists( 'mhash_keygen_s2k' ) && defined('MHASH_SHA1')) {
if ($forced_salt!='') {
$salt=$forced_salt;
} else {
} else {
array_push($msgs,
sprintf(_("Unsupported crypto: %s"),'ssha'),
- _("PHP mhash extension is missing."));
+ _("PHP mhash extension is missing or does not support selected crypto."));
}
break;
case 'crypt':
case 'extcrypt':
// check if crypt() supports extended des
if (defined('CRYPT_EXT_DES') && CRYPT_EXT_DES==1) {
- // FIXME: guinea pigs with extended des support needed.
$ret = '{CRYPT}' . crypt($pass,'_' . GenerateRandomString(8,$extra_salt_chars,7));
} else {
array_push($msgs,
case 'blowfish':
// check if crypt() supports blowfish
if (defined('CRYPT_BLOWFISH') && CRYPT_BLOWFISH==1) {
- // FIXME: guinea pigs with blowfish support needed.
$ret = '{CRYPT}' . crypt($pass,'$2a$12$' . GenerateRandomString(13,$extra_salt_chars,7));
} else {
array_push($msgs,
break;
default:
array_push($msgs,sprintf(_("Unsupported crypto: %s"),
- (is_string($ldap_crypto) ? htmlspecialchars($ldap_crypto) : _("unknown"))));
+ (is_string($ldap_crypto) ? sm_encode_html_special_chars($ldap_crypto) : _("unknown"))));
}
return $ret;
}
* Code reuse. See phpldapadmin password_compare() function.
* Some parts of code was rewritten to backend specifics.
* @link http://phpldapadmin.sf.net
- * @param string $pass_hash
- * @param string $pass_clear
- * @param array $msgs
+ * @param string $pass_hash hashed password string with password type indicators
+ * @param string $pass_clear plain text password
+ * @param array $msgs error messages
* @return boolean true, if passwords match
*/
function cpw_ldap_compare_pass($pass_hash,$pass_clear,&$msgs) {
case 'ssha':
// Salted SHA
// check for mhash support
- if ( function_exists('mhash') ) {
+ if ( function_exists('mhash') && defined('MHASH_SHA1')) {
$hash = base64_decode($pass_hash);
$salt = substr($hash, -4);
$new_hash = base64_encode( mhash( MHASH_SHA1, $pass_clear.$salt).$salt );
} else {
array_push($msgs,
_("Unable to validate user's password."),
- _("PHP mhash extension is missing."));
+ _("PHP mhash extension is missing or does not support selected crypto."));
}
break;
case 'smd5':
// Salted MD5
// check for mhash support
- if ( function_exists('mhash') ) {
+ if ( function_exists('mhash') && defined('MHASH_MD5')) {
$hash = base64_decode($pass_hash);
$salt = substr($hash, -4);
$new_hash = base64_encode( mhash( MHASH_MD5, $pass_clear.$salt).$salt );
} else {
array_push($msgs,
_("Unable to validate user's password."),
- _("PHP mhash extension is missing."));
+ _("PHP mhash extension is missing or does not support selected crypto."));
}
break;
case 'sha':
if( strcasecmp( cpw_ldap_password_hash($pass_clear,'sha',$msgs), "{SHA}".$pass_hash ) == 0)
$ret=true;
break;
+ case 'rmd160':
+ // RIPE-MD160 crypted passwords
+ if( strcasecmp( cpw_ldap_password_hash($pass_clear,'rmd160',$msgs), "{RMD160}".$pass_hash ) == 0 )
+ $ret=true;
+ break;
case 'md5':
// MD5 crypted passwords
if( strcasecmp( cpw_ldap_password_hash($pass_clear,'md5',$msgs), "{MD5}".$pass_hash ) == 0 )
$ret=true;
break;
+ case 'md4':
+ // MD4 crypted passwords
+ if( strcasecmp( cpw_ldap_password_hash($pass_clear,'md4',$msgs), "{MD4}".$pass_hash ) == 0 )
+ $ret=true;
+ break;
case 'crypt':
// Crypt passwords
if( preg_match( "/^\\\$2+/",$pass_hash ) ) { // Check if it's blowfish crypt
}
return $ret;
}
-?>
\ No newline at end of file
projects / squirrelmail.git / blobdiff