Mercurial > epgrec.yaz
comparison Smarty/plugins/function.mailto.php @ 1:f5a9f0eb4858
deleted: LICENSE.ja
author | Sushi-k <epgrec@park.mda.or.jp> |
---|---|
date | Wed, 08 Jul 2009 11:44:50 +0900 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
0:96312e6ab8d4 | 1:f5a9f0eb4858 |
---|---|
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 ?> |