|
1 <?php |
|
2 /** |
|
3 * Smarty plugin |
|
4 * @package Smarty |
|
5 * @subpackage plugins |
|
6 */ |
|
7 |
|
8 |
|
9 /** |
|
10 * Smarty {mailto} function plugin |
|
11 * |
|
12 * Type: function<br> |
|
13 * Name: mailto<br> |
|
14 * Date: May 21, 2002 |
|
15 * Purpose: automate mailto address link creation, and optionally |
|
16 * encode them.<br> |
|
17 * Input:<br> |
|
18 * - address = e-mail address |
|
19 * - text = (optional) text to display, default is address |
|
20 * - encode = (optional) can be one of: |
|
21 * * none : no encoding (default) |
|
22 * * javascript : encode with javascript |
|
23 * * javascript_charcode : encode with javascript charcode |
|
24 * * hex : encode with hexidecimal (no javascript) |
|
25 * - cc = (optional) address(es) to carbon copy |
|
26 * - bcc = (optional) address(es) to blind carbon copy |
|
27 * - subject = (optional) e-mail subject |
|
28 * - newsgroups = (optional) newsgroup(s) to post to |
|
29 * - followupto = (optional) address(es) to follow up to |
|
30 * - extra = (optional) extra tags for the href link |
|
31 * |
|
32 * Examples: |
|
33 * <pre> |
|
34 * {mailto address="me@domain.com"} |
|
35 * {mailto address="me@domain.com" encode="javascript"} |
|
36 * {mailto address="me@domain.com" encode="hex"} |
|
37 * {mailto address="me@domain.com" subject="Hello to you!"} |
|
38 * {mailto address="me@domain.com" cc="you@domain.com,they@domain.com"} |
|
39 * {mailto address="me@domain.com" extra='class="mailto"'} |
|
40 * </pre> |
|
41 * @link http://smarty.php.net/manual/en/language.function.mailto.php {mailto} |
|
42 * (Smarty online manual) |
|
43 * @version 1.2 |
|
44 * @author Monte Ohrt <monte at ohrt dot com> |
|
45 * @author credits to Jason Sweat (added cc, bcc and subject functionality) |
|
46 * @param array |
|
47 * @param Smarty |
|
48 * @return string |
|
49 */ |
|
50 function smarty_function_mailto($params, &$smarty) |
|
51 { |
|
52 $extra = ''; |
|
53 |
|
54 if (empty($params['address'])) { |
|
55 $smarty->trigger_error("mailto: missing 'address' parameter"); |
|
56 return; |
|
57 } else { |
|
58 $address = $params['address']; |
|
59 } |
|
60 |
|
61 $text = $address; |
|
62 |
|
63 // netscape and mozilla do not decode %40 (@) in BCC field (bug?) |
|
64 // so, don't encode it. |
|
65 $search = array('%40', '%2C'); |
|
66 $replace = array('@', ','); |
|
67 $mail_parms = array(); |
|
68 foreach ($params as $var=>$value) { |
|
69 switch ($var) { |
|
70 case 'cc': |
|
71 case 'bcc': |
|
72 case 'followupto': |
|
73 if (!empty($value)) |
|
74 $mail_parms[] = $var.'='.str_replace($search,$replace,rawurlencode($value)); |
|
75 break; |
|
76 |
|
77 case 'subject': |
|
78 case 'newsgroups': |
|
79 $mail_parms[] = $var.'='.rawurlencode($value); |
|
80 break; |
|
81 |
|
82 case 'extra': |
|
83 case 'text': |
|
84 $$var = $value; |
|
85 |
|
86 default: |
|
87 } |
|
88 } |
|
89 |
|
90 $mail_parm_vals = ''; |
|
91 for ($i=0; $i<count($mail_parms); $i++) { |
|
92 $mail_parm_vals .= (0==$i) ? '?' : '&'; |
|
93 $mail_parm_vals .= $mail_parms[$i]; |
|
94 } |
|
95 $address .= $mail_parm_vals; |
|
96 |
|
97 $encode = (empty($params['encode'])) ? 'none' : $params['encode']; |
|
98 if (!in_array($encode,array('javascript','javascript_charcode','hex','none')) ) { |
|
99 $smarty->trigger_error("mailto: 'encode' parameter must be none, javascript or hex"); |
|
100 return; |
|
101 } |
|
102 |
|
103 if ($encode == 'javascript' ) { |
|
104 $string = 'document.write(\'<a href="mailto:'.$address.'" '.$extra.'>'.$text.'</a>\');'; |
|
105 |
|
106 $js_encode = ''; |
|
107 for ($x=0; $x < strlen($string); $x++) { |
|
108 $js_encode .= '%' . bin2hex($string[$x]); |
|
109 } |
|
110 |
|
111 return '<script type="text/javascript">eval(unescape(\''.$js_encode.'\'))</script>'; |
|
112 |
|
113 } elseif ($encode == 'javascript_charcode' ) { |
|
114 $string = '<a href="mailto:'.$address.'" '.$extra.'>'.$text.'</a>'; |
|
115 |
|
116 for($x = 0, $y = strlen($string); $x < $y; $x++ ) { |
|
117 $ord[] = ord($string[$x]); |
|
118 } |
|
119 |
|
120 $_ret = "<script type=\"text/javascript\" language=\"javascript\">\n"; |
|
121 $_ret .= "<!--\n"; |
|
122 $_ret .= "{document.write(String.fromCharCode("; |
|
123 $_ret .= implode(',',$ord); |
|
124 $_ret .= "))"; |
|
125 $_ret .= "}\n"; |
|
126 $_ret .= "//-->\n"; |
|
127 $_ret .= "</script>\n"; |
|
128 |
|
129 return $_ret; |
|
130 |
|
131 |
|
132 } elseif ($encode == 'hex') { |
|
133 |
|
134 preg_match('!^(.*)(\?.*)$!',$address,$match); |
|
135 if(!empty($match[2])) { |
|
136 $smarty->trigger_error("mailto: hex encoding does not work with extra attributes. Try javascript."); |
|
137 return; |
|
138 } |
|
139 $address_encode = ''; |
|
140 for ($x=0; $x < strlen($address); $x++) { |
|
141 if(preg_match('!\w!',$address[$x])) { |
|
142 $address_encode .= '%' . bin2hex($address[$x]); |
|
143 } else { |
|
144 $address_encode .= $address[$x]; |
|
145 } |
|
146 } |
|
147 $text_encode = ''; |
|
148 for ($x=0; $x < strlen($text); $x++) { |
|
149 $text_encode .= '&#x' . bin2hex($text[$x]).';'; |
|
150 } |
|
151 |
|
152 $mailto = "mailto:"; |
|
153 return '<a href="'.$mailto.$address_encode.'" '.$extra.'>'.$text_encode.'</a>'; |
|
154 |
|
155 } else { |
|
156 // no encoding |
|
157 return '<a href="mailto:'.$address.'" '.$extra.'>'.$text.'</a>'; |
|
158 |
|
159 } |
|
160 |
|
161 } |
|
162 |
|
163 /* vim: set expandtab: */ |
|
164 |
|
165 ?> |