<?php
/**
 * $URL: svn://svn.mzz.ru/mzz/trunk/system/template/drivers/native/mailNativePlugin.php $
 *
 * MZZ Content Management System (c) 2010
 * Website : http://www.mzz.ru
 *
 * This program is free software and released under
 * the GNU/GPL License (See /docs/GPL.txt).
 *
 * @link http://www.mzz.ru
 * @package system
 * @subpackage template
 * @version $Id: mailNativePlugin.php 4222 2010-05-17 04:50:56Z striker $
 */

/**
 * Порт {mail} функции для нативных шаблонов
 *
 * @package system
 * @subpackage template
 * @version 0.0.1
 */
class mailNativePlugin extends aNativePlugin
{
    public function run(Array $params = array())
    {
        $extra = '';

        if (empty($params['address'])) {
            throw new Exception ("mailto: missing 'address' parameter");
            return;
        } else {
            $address = $params['address'];
        }

        $text = $address;
        // netscape and mozilla do not decode %40 (@) in BCC field (bug?)
        // so, don't encode it.
        $search = array('%40', '%2C');
        $replace = array('@', ',');
        $mail_parms = array();
        foreach ($params as $var => $value) {
            switch ($var) {
                case 'cc':
                case 'bcc':
                case 'followupto':
                    if (!empty($value))
                        $mail_parms[] = $var . '=' . str_replace($search, $replace, rawurlencode($value));
                    break;

                case 'subject':
                case 'newsgroups':
                    $mail_parms[] = $var . '=' . rawurlencode($value);
                    break;

                case 'extra':
                case 'text':
                    $$var = $value;

                default:
            }
        }

        $mail_parm_vals = '';
        for ($i = 0; $i < count($mail_parms); $i++) {
            $mail_parm_vals .= (0 == $i) ? '?' : '&';
            $mail_parm_vals .= $mail_parms[$i];
        }
        $address .= $mail_parm_vals;

        $encode = (empty($params['encode'])) ? 'none' : $params['encode'];
        if (!in_array($encode, array('javascript', 'javascript_charcode', 'hex', 'none'))) {
            throw new Exception ("mailto: 'encode' parameter must be none, javascript or hex");
            return;
        }

        if ($encode == 'javascript') {
            $string = 'document.write(\'<a href="mailto:' . $address . '" ' . $extra . '>' . $text . '</a>\');';

            $js_encode = '';
            for ($x = 0; $x < strlen($string); $x++) {
                $js_encode .= '%' . bin2hex($string[$x]);
            }

            return '<script type="text/javascript">eval(unescape(\'' . $js_encode . '\'))</script>';
        } elseif ($encode == 'javascript_charcode') {
            $string = '<a href="mailto:' . $address . '" ' . $extra . '>' . $text . '</a>';

            for($x = 0, $y = strlen($string); $x < $y; $x++) {
                $ord[] = ord($string[$x]);
            }

            $_ret = "<script type=\"text/javascript\" language=\"javascript\">\n";
            $_ret .= "<!--\n";
            $_ret .= "{document.write(String.fromCharCode(";
            $_ret .= implode(',', $ord);
            $_ret .= "))";
            $_ret .= "}\n";
            $_ret .= "//-->\n";
            $_ret .= "</script>\n";

            return $_ret;
        } elseif ($encode == 'hex') {
            preg_match('!^(.*)(\?.*)$!', $address, $match);
            if (!empty($match[2])) {
                throw new Exception ("mailto: hex encoding does not work with extra attributes. Try javascript.");
                return;
            }
            $address_encode = '';
            for ($x = 0; $x < strlen($address); $x++) {
                if (preg_match('!\w!', $address[$x])) {
                    $address_encode .= '%' . bin2hex($address[$x]);
                } else {
                    $address_encode .= $address[$x];
                }
            }
            $text_encode = '';
            for ($x = 0; $x < strlen($text); $x++) {
                $text_encode .= '&#x' . bin2hex($text[$x]) . ';';
            }

            $mailto = "&#109;&#97;&#105;&#108;&#116;&#111;&#58;";
            return '<a href="' . $mailto . $address_encode . '" ' . $extra . '>' . $text_encode . '</a>';
        } else {
            // no encoding
            return '<a href="mailto:' . $address . '" ' . $extra . '>' . $text . '</a>';
        }
    }
}
?>