<?php

/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */

/**
 * Net_Vpopmaild_Exception 
 * 
 * PHP Version 5
 * 
 * @uses     PEAR_Exception
 * @category Net
 * @package  Net_Vpopmaild
 * @author   Bill Shupp <hostmaster@shupp.org>
 * @license  PHP 3.01  {@link http://www.php.net/license/3_01.txt}
 * @link     http://shupp.org/Net_Vpopmaild NetVpopmaild
 */

require_once 'PEAR/Exception.php';

/**
 * Net_Vpopmaild_Exception
 *
 * A small layer above 
 * {@link http://pear.php.net/manual/en/core.pear.pear-exception.php PEAR_Exception} 
 *  with which you can send vpopmaild error message strings
 *
 * @category Net
 * @package  Net_Vpopmaild
 * @author   Bill Shupp <hostmaster@shupp.org>
 * @license  PHP 3.01  {@link http://www.php.net/license/3_01.txt}
 * @link     http://shupp.org/Net_Vpopmaild NetVpopmaild
 */
class Net_Vpopmaild_Exception extends PEAR_Exception
{
    /**
     * __construct
     *
     * @param mixed $message message or -ERR message from vpopmaild
     * @param int   $code    An error code
     *
     * @access public
     * @return void
     */
    public function __construct($message, $code = 0)
    {

        if (preg_match('/^[-]ERR /', $message)) {
            $code = preg_replace('/^-ERR ([^ ]+) .*$/', '\1', $message);
            $msg  = preg_replace('/^-ERR ([^ ]+) (.*$)/', '\2', $message);
        }

        $this->message = $msg;
        $this->code    = $code;
    }
}

?>