Add ability to control the display of the "Check Spelling" button. Allows administrat...
[squirrelmail.git] / plugins / change_password / backend / poppassd.php
1 <?php
2
3 /**
4 * Poppassd change password backend
5 *
6 * @author Seth Randall <sethr at missoulafcu.org>
7 * @copyright 2004-2017 The SquirrelMail Project Team
8 * @license http://opensource.org/licenses/gpl-license.php GNU Public License
9 * @version $Id$
10 * @package plugins
11 * @subpackage change_password
12 */
13
14 /**
15 * Config vars
16 */
17
18 /**
19 * Set the address of the server your poppass daemon runs on.
20 * If it's the same as your imap server, you can leave it blank
21 */
22 global $poppassd_server;
23
24 $poppassd_server = '';
25
26 /* get overrides from config.php */
27 if (isset($cpw_poppassd['server'])) $poppassd_server=$cpw_poppassd['server'];
28
29 /**
30 * Define here the name of your password changing function.
31 */
32 global $squirrelmail_plugin_hooks;
33 $squirrelmail_plugin_hooks['change_password_dochange']['poppassd'] = 'cpw_poppassd_dochange';
34
35 /**
36 * This is the function that is specific to your backend. It takes
37 * the current password (as supplied by the user) and the desired
38 * new password. It will return an array of messages. If everything
39 * was successful, the array will be empty. Else, it will contain
40 * the errormessage(s).
41 * Constants to be used for these messages:
42 * CPW_CURRENT_NOMATCH -> "Your current password is not correct."
43 * CPW_INVALID_PW -> "Your new password contains invalid characters."
44 *
45 * @param array data The username/currentpw/newpw data.
46 * @return array Array of error messages.
47 */
48 function cpw_poppassd_dochange($data) {
49 // unfortunately, we can only pass one parameter to a hook function,
50 // so we have to pass it as an array.
51 $username = $data['username'];
52 $curpw = $data['curpw'];
53 $newpw = $data['newpw'];
54
55 $msgs = array();
56
57 // your code here to change the password for $username from
58 // $currentpw into $newpw.
59 $msgs = cpw_poppassd_go($username, $curpw, $newpw, 0);
60
61 return $msgs;
62 }
63
64 function cpw_poppassd_closeport($pop_socket, &$messages, $debug = 0) {
65 if ($debug) {
66 array_push($messages, _("Closing Connection"));
67 }
68 fputs($pop_socket, "quit\r\n");
69 fclose($pop_socket);
70 }
71
72 function cpw_poppassd_readfb($pop_socket, &$result, &$messages, $debug = 0) {
73 $strResp = '';
74 $result = '';
75
76 if (!feof($pop_socket)) {
77 $strResp = fgets($pop_socket, 1024);
78 $result = substr(trim($strResp), 0, 3); // 200, 500
79 if(!preg_match('/^[23]\d\d/', $result) || $debug) {
80 $messages[] = "--> $strResp";
81 }
82 }
83 }
84
85 function cpw_poppassd_go($username, $old_pw, $new_pw, $debug = 0) {
86 global $poppassd_server;
87 global $imapServerAddress;
88
89 /** sqimap_get_user_server() function */
90 include_once(SM_PATH . 'functions/imap_general.php');
91
92 if($poppassd_server == '') {
93 // if poppassd address is not set, use imap server's address
94 // make sure that setting contains address and not mapping
95 $poppassd_server = sqimap_get_user_server($imapServerAddress,$username);
96 }
97
98 $messages = array();
99
100 if ($debug) {
101 $messages[] = _("Connecting to Password Server");
102 }
103 $pop_socket = fsockopen($poppassd_server, 106, $errno, $errstr);
104 if (!$pop_socket) {
105 $messages[] = _("ERROR") . ': ' . "$errstr ($errno)";
106 return $messages;
107 }
108
109 cpw_poppassd_readfb($pop_socket, $result, $messages, $debug);
110 if(!preg_match('/^2\d\d/', $result) ) {
111 cpw_poppassd_closeport($pop_socket, $messages, $debug);
112 return $messages;
113 }
114
115 fputs($pop_socket, "user $username\r\n");
116 cpw_poppassd_readfb($pop_socket, $result, $messages, $debug);
117 if(!preg_match('/^[23]\d\d/', $result) ) {
118 cpw_poppassd_closeport($pop_socket, $messages, $debug);
119 return $messages;
120 }
121
122 fputs($pop_socket, "pass $old_pw\r\n");
123 cpw_poppassd_readfb($pop_socket, $result, $messages, $debug);
124 if(!preg_match('/^[23]\d\d/', $result) ) {
125 cpw_poppassd_closeport($pop_socket, $messages, $debug);
126 return $messages;
127 }
128
129 fputs($pop_socket, "newpass $new_pw\r\n");
130 cpw_poppassd_readfb($pop_socket, $result, $messages, $debug);
131 cpw_poppassd_closeport($pop_socket, $messages, $debug);
132 if(!preg_match('/^2\d\d/', $result) ) {
133 return $messages;
134 }
135
136 return $messages;
137 }