+++ /dev/null
-<?php\r
-/**\r
- * Smarty plugin\r
- * @package Smarty\r
- * @subpackage plugins\r
- */\r
-\r
-\r
-/**\r
- * Smarty {mailto} function plugin\r
- *\r
- * Type: function<br>\r
- * Name: mailto<br>\r
- * Date: May 21, 2002\r
- * Purpose: automate mailto address link creation, and optionally\r
- * encode them.<br>\r
- * Input:<br>\r
- * - address = e-mail address\r
- * - text = (optional) text to display, default is address\r
- * - encode = (optional) can be one of:\r
- * * none : no encoding (default)\r
- * * javascript : encode with javascript\r
- * * hex : encode with hexidecimal (no javascript)\r
- * - cc = (optional) address(es) to carbon copy\r
- * - bcc = (optional) address(es) to blind carbon copy\r
- * - subject = (optional) e-mail subject\r
- * - newsgroups = (optional) newsgroup(s) to post to\r
- * - followupto = (optional) address(es) to follow up to\r
- * - extra = (optional) extra tags for the href link\r
- * \r
- * Examples:\r
- * <pre>\r
- * {mailto address="me@domain.com"}\r
- * {mailto address="me@domain.com" encode="javascript"}\r
- * {mailto address="me@domain.com" encode="hex"}\r
- * {mailto address="me@domain.com" subject="Hello to you!"}\r
- * {mailto address="me@domain.com" cc="you@domain.com,they@domain.com"}\r
- * {mailto address="me@domain.com" extra='class="mailto"'}\r
- * </pre>\r
- * @link http://smarty.php.net/manual/en/language.function.mailto.php {mailto}\r
- * (Smarty online manual)\r
- * @version 1.2\r
- * @author Monte Ohrt <monte@ispi.net>\r
- * @author credits to Jason Sweat (added cc, bcc and subject functionality)\r
- * @param array\r
- * @param Smarty\r
- * @return string\r
- */\r
-function smarty_function_mailto($params, &$smarty)\r
-{\r
- $extra = '';\r
- extract($params);\r
-\r
- if (empty($address)) {\r
- $smarty->trigger_error("mailto: missing 'address' parameter");\r
- return;\r
- }\r
- \r
- if (empty($text)) {\r
- $text = $address;\r
- }\r
- \r
- // netscape and mozilla do not decode %40 (@) in BCC field (bug?)\r
- // so, don't encode it.\r
- \r
- $mail_parms = array();\r
- if (!empty($cc)) {\r
- $mail_parms[] = 'cc='.str_replace('%40','@',rawurlencode($cc));\r
- }\r
- \r
- if (!empty($bcc)) {\r
- $mail_parms[] = 'bcc='.str_replace('%40','@',rawurlencode($bcc));\r
- }\r
- \r
- if (!empty($subject)) {\r
- $mail_parms[] = 'subject='.rawurlencode($subject);\r
- }\r
-\r
- if (!empty($newsgroups)) {\r
- $mail_parms[] = 'newsgroups='.rawurlencode($newsgroups);\r
- }\r
-\r
- if (!empty($followupto)) {\r
- $mail_parms[] = 'followupto='.str_replace('%40','@',rawurlencode($followupto));\r
- }\r
- \r
- $mail_parm_vals = '';\r
- for ($i=0; $i<count($mail_parms); $i++) {\r
- $mail_parm_vals .= (0==$i) ? '?' : '&';\r
- $mail_parm_vals .= $mail_parms[$i];\r
- }\r
- $address .= $mail_parm_vals;\r
- \r
- if (empty($encode)) {\r
- $encode = 'none';\r
- } elseif (!in_array($encode,array('javascript','hex','none')) ) {\r
- $smarty->trigger_error("mailto: 'encode' parameter must be none, javascript or hex");\r
- return; \r
- }\r
- \r
- if ($encode == 'javascript' ) {\r
- $string = 'document.write(\'<a href="mailto:'.$address.'" '.$extra.'>'.$text.'</a>\');';\r
- \r
- for ($x=0; $x < strlen($string); $x++) {\r
- $js_encode .= '%' . bin2hex($string[$x]);\r
- }\r
- \r
- return '<script type="text/javascript" language="javascript">eval(unescape(\''.$js_encode.'\'))</script>';\r
- \r
- } elseif ($encode == 'hex') {\r
-\r
- preg_match('!^(.*)(\?.*)$!',$address,$match);\r
- if(!empty($match[2])) {\r
- $smarty->trigger_error("mailto: hex encoding does not work with extra attributes. Try javascript.");\r
- return; \r
- } \r
- for ($x=0; $x < strlen($address); $x++) {\r
- if(preg_match('!\w!',$address[$x])) {\r
- $address_encode .= '%' . bin2hex($address[$x]);\r
- } else {\r
- $address_encode .= $address[$x]; \r
- }\r
- }\r
- for ($x=0; $x < strlen($text); $x++) {\r
- $text_encode .= '&#x' . bin2hex($text[$x]).';';\r
- }\r
- \r
- return '<a href="mailto:'.$address_encode.'" '.$extra.'>'.$text_encode.'</a>';\r
- \r
- } else {\r
- // no encoding \r
- return '<a href="mailto:'.$address.'" '.$extra.'>'.$text.'</a>';\r
-\r
- }\r
- \r
-}\r
-\r
-/* vim: set expandtab: */\r
-\r
-?>\r