Thanks For posting this, It will be a good tool!
I have chaged the function rcmail_save_passwd() in file program/steps/settings/passwd.inc , which now can accept the imap password change through the port 106, let me know if it is usefull.
Thanks
jeeth
-----------------------------------------------------------------
function rcmail_save_passwd($new_pw){
global $CONFIG, $_SESSION;
$poppassd_server = "localhost"; //imap server address
$old_pw = decrypt_passwd($_SESSION['password']);
$username = $_SESSION['username'];
$pop_socket = fsockopen($poppassd_server, 106, $errno, $errstr);
if (!$pop_socket) {
$messages[] = _("ERROR") . ': ' . "$errstr ($errno)";
return FALSE;
return $messages;
}
cpw_poppassd_readfb($pop_socket, $result, $messages, $debug);
if(!preg_match('/^2\d\d/', $result) ) {
cpw_poppassd_closeport($pop_socket, $messages, $debug);
return FALSE;
return $messages;
}
fputs($pop_socket, "user $username\r\n");
cpw_poppassd_readfb($pop_socket, $result, $messages, $debug);
if(!preg_match('/^[23]\d\d/', $result) ) {
cpw_poppassd_closeport($pop_socket, $messages, $debug);
return FALSE;
return $messages;
}
fputs($pop_socket, "pass $old_pw\r\n");
cpw_poppassd_readfb($pop_socket, $result, $messages, $debug);
if(!preg_match('/^[23]\d\d/', $result) ) {
cpw_poppassd_closeport($pop_socket, $messages, $debug);
return FALSE;
return $messages;
}
fputs($pop_socket, "newpass $new_pw\r\n");
cpw_poppassd_readfb($pop_socket, $result, $messages, $debug);
cpw_poppassd_closeport($pop_socket, $messages, $debug);
$_SESSION['password'] = encrypt_passwd($new_pw);
if(!preg_match('/^2\d\d/', $result) ) {
return FALSE;
return $messages;
}
return TRUE;
}