<?php 
/** 
 * Smarty plugin 
 * 
 * @package    Smarty 
 * @subpackage PluginsFunction 
 */ 
 
/** 
 * Smarty {mailto} function plugin 
 * Type:     function<br> 
 * Name:     mailto<br> 
 * Date:     May 21, 2002 
 * Purpose:  automate mailto address link creation, and optionally encode them.<br> 
 * Params: 
 * <pre> 
 * - address    - (required) - e-mail address 
 * - text       - (optional) - text to display, default is address 
 * - encode     - (optional) - can be one of: 
 *                             * none : no encoding (default) 
 *                             * javascript : encode with javascript 
 *                             * javascript_charcode : encode with javascript charcode 
 *                             * hex : encode with hexadecimal (no javascript) 
 * - cc         - (optional) - address(es) to carbon copy 
 * - bcc        - (optional) - address(es) to blind carbon copy 
 * - subject    - (optional) - e-mail subject 
 * - newsgroups - (optional) - newsgroup(s) to post to 
 * - followupto - (optional) - address(es) to follow up to 
 * - extra      - (optional) - extra tags for the href link 
 * </pre> 
 * Examples: 
 * <pre> 
 * {mailto address="[email protected]"} 
 * {mailto address="[email protected]" encode="javascript"} 
 * {mailto address="[email protected]" encode="hex"} 
 * {mailto address="[email protected]" subject="Hello to you!"} 
 * {mailto address="[email protected]" cc="[email protected],[email protected]"} 
 * {mailto address="[email protected]" extra='class="mailto"'} 
 * </pre> 
 * 
 * @link     http://www.smarty.net/manual/en/language.function.mailto.php {mailto} 
 *           (Smarty online manual) 
 * @version  1.2 
 * @author   Monte Ohrt <monte at ohrt dot com> 
 * @author   credits to Jason Sweat (added cc, bcc and subject functionality) 
 * 
 * @param array $params parameters 
 * 
 * @return string 
 */ 
function smarty_function_mailto($params) 
{ 
    static $_allowed_encoding = 
        array('javascript' => true, 'javascript_charcode' => true, 'hex' => true, 'none' => true); 
    $extra = ''; 
 
    if (empty($params[ 'address' ])) { 
        trigger_error("mailto: missing 'address' parameter", E_USER_WARNING); 
 
        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: 
        } 
    } 
 
    if ($mail_parms) { 
        $address .= '?' . join('&', $mail_parms); 
    } 
 
    $encode = (empty($params[ 'encode' ])) ? 'none' : $params[ 'encode' ]; 
    if (!isset($_allowed_encoding[ $encode ])) { 
        trigger_error("mailto: 'encode' parameter must be none, javascript, javascript_charcode or hex", 
                      E_USER_WARNING); 
 
        return; 
    } 
    // FIXME: (rodneyrehm) document.write() excues me what? 1998 has passed! 
    if ($encode == 'javascript') { 
        $string = 'document.write(\'<a href="mailto:' . $address . '" ' . $extra . '>' . $text . '</a>\');'; 
 
        $js_encode = ''; 
        for ($x = 0, $_length = strlen($string); $x < $_length; $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" . "{document.write(String.fromCharCode(" . 
                implode(',', $ord) . "))" . "}\n" . "</script>\n"; 
 
        return $_ret; 
    } elseif ($encode == 'hex') { 
        preg_match('!^(.*)(\?.*)$!', $address, $match); 
        if (!empty($match[ 2 ])) { 
            trigger_error("mailto: hex encoding does not work with extra attributes. Try javascript.", E_USER_WARNING); 
 
            return; 
        } 
        $address_encode = ''; 
        for ($x = 0, $_length = strlen($address); $x < $_length; $x ++) { 
            if (preg_match('!\w!' . Smarty::$_UTF8_MODIFIER, $address[ $x ])) { 
                $address_encode .= '%' . bin2hex($address[ $x ]); 
            } else { 
                $address_encode .= $address[ $x ]; 
            } 
        } 
        $text_encode = ''; 
        for ($x = 0, $_length = strlen($text); $x < $_length; $x ++) { 
            $text_encode .= '&#x' . bin2hex($text[ $x ]) . ';'; 
        } 
 
        $mailto = "mailto:"; 
 
        return '<a href="' . $mailto . $address_encode . '" ' . $extra . '>' . $text_encode . '</a>'; 
    } else { 
        // no encoding 
        return '<a href="mailto:' . $address . '" ' . $extra . '>' . $text . '</a>'; 
    } 
} 
 
 |