diff options
author | vbenincasa <vbenincasa@gmail.com> | 2009-09-20 10:14:04 +0000 |
---|---|---|
committer | vbenincasa <vbenincasa@gmail.com> | 2009-09-20 10:14:04 +0000 |
commit | 67bb96fef159fd360a401f815e32c088f83401b0 (patch) | |
tree | faf109e4b6a3d1360ee90c3aab4aca6ca2a6cb43 /plugins/password/drivers/vpopmaild.php | |
parent | 587444f657dd6f1d64b2ea46374c253232bae879 (diff) |
- Password plugin: added vpopmaild driver
Diffstat (limited to 'plugins/password/drivers/vpopmaild.php')
-rw-r--r-- | plugins/password/drivers/vpopmaild.php | 57 |
1 files changed, 57 insertions, 0 deletions
diff --git a/plugins/password/drivers/vpopmaild.php b/plugins/password/drivers/vpopmaild.php new file mode 100644 index 000000000..b44734036 --- /dev/null +++ b/plugins/password/drivers/vpopmaild.php @@ -0,0 +1,57 @@ +<?php + +/** + * vpopmail Password Driver + * + * Driver to change passwords via vpopmaild + * + * @version 1.0 + * @author Johannes Hessellund + * + */ + +function password_save($curpass, $passwd) +{ + $rcmail = rcmail::get_instance(); +// include('Net/Socket.php'); + $vpopmaild = new Net_Socket(); + + if (PEAR::isError($vpopmaild->connect($rcmail->config->get('password_vpopmaild_host'), $rcmail->config->get('password_vpopmaild_port'), null))) { + return PASSWORD_CONNECT_ERROR; + } + else { + $result = $vpopmaild->readLine(); + if(!preg_match('/^\+OK/', $result)) { + $vpopmaild->disconnect(); + return PASSWORD_CONNECT_ERROR; + } + else { + $vpopmaild->writeLine("slogin ". $_SESSION['username'] . " " . $curpass); + $result = $vpopmaild->readLine(); + if(!preg_match('/^\+OK/', $result) ) { + $vpopmaild->disconnect(); + return PASSWORD_ERROR; + } + else { + $vpopmaild->writeLine("mod_user ". $_SESSION['username']); + $result = $vpopmaild->readLine(); + if(!preg_match('/^\+OK/', $result) ) { + $vpopmaild->disconnect(); + return PASSWORD_ERROR; + } + else { + $vpopmaild->writeLine("clear_text_password ". $passwd); + $vpopmaild->writeLine("."); + $result = $vpopmaild->readLine(); + $vpopmaild->disconnect(); + if (!preg_match('/^\+OK/', $result)) + return PASSWORD_ERROR; + else + return PASSWORD_SUCCESS; + } + } + } + } +} + +?> |