Source for file poppassd.php

Documentation is available at poppassd.php

  1. <?php
  2.  
  3. /**
  4.  * Poppassd change password backend
  5.  *
  6.  * @author Seth Randall <sethr at missoulafcu.org>
  7.  * @copyright &copy; 2004-2006 The SquirrelMail Project Team
  8.  * @license http://opensource.org/licenses/gpl-license.php GNU Public License
  9.  * @version $Id: poppassd.php,v 1.10 2006/07/15 12:01:09 tokul Exp $
  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. }

Documentation generated on Sat, 07 Oct 2006 16:13:05 +0300 by phpDocumentor 1.3.0RC6