PluginProbe ʕ •ᴥ•ʔ
Email Encoder – Protect Email Addresses and Phone Numbers / 0.21
Email Encoder – Protect Email Addresses and Phone Numbers v0.21
2.5.0 2.4.8 trunk 0.10 0.11 0.12 0.20 0.21 0.22 0.30 0.31 0.32 0.40 0.41 0.42 0.50 0.60 0.70 0.71 0.80 1.0.0 1.0.1 1.0.2 1.1.0 1.2.0 1.2.1 1.3.0 1.4.0 1.4.1 1.4.2 1.4.3 1.4.4 1.4.5 1.4.6 1.5 1.5.2 1.51 1.53 2.0.0 2.0.1 2.0.2 2.0.3 2.0.4 2.0.5 2.0.6 2.0.7 2.0.8 2.0.9 2.1.0 2.1.1 2.1.10 2.1.2 2.1.3 2.1.4 2.1.5 2.1.6 2.1.7 2.1.8 2.1.9 2.2.0 2.2.1 2.2.2 2.2.3 2.2.4 2.2.5 2.3.0 2.3.1 2.3.3 2.3.4 2.3.5 2.3.6 2.3.7 2.3.8 2.3.9 2.4.0 2.4.1 2.4.2 2.4.3 2.4.4 2.4.5 2.4.6 2.4.7
email-encoder-bundle / methods / ascii.php
email-encoder-bundle / methods Last commit date
ascii.php 15 years ago escape.php 15 years ago html_encode.php 15 years ago
ascii.php
59 lines
1 <?php
2 if ( ! function_exists( 'lim_email_ascii' ) ):
3
4 // Info (optional)
5 $lim_email_ascii = array(
6 'name' => 'JavaScript ASCII',
7 'description' => 'Uses javascript (<a href="http://rumkin.com/tools/mailto_encoder/" target="_blank">original source</a>).',
8 );
9
10 /**
11 * lim_email_ascii()
12 * Based on function from Tyler Akins (http://rumkin.com/tools/mailto_encoder/)
13 *
14 * @package Lim_Email_Encoder
15 * @param string $email the email to encode
16 * @param string $display the display showing on the page
17 * @return string
18 */
19 function lim_email_ascii( $email, $display ) {
20 $MailLink = '<a href="mailto:' . $email . '">' . $display . '</a>';
21
22 $MailLetters = '';
23
24 for ($i = 0; $i < strlen($MailLink); $i ++)
25 {
26 $l = substr($MailLink, $i, 1);
27 if (strpos($MailLetters, $l) === false)
28 {
29 $p = rand(0, strlen($MailLetters));
30 $MailLetters = substr($MailLetters, 0, $p) .
31 $l . substr($MailLetters, $p, strlen($MailLetters));
32 }
33 }
34
35 $MailLettersEnc = str_replace("\\", "\\\\", $MailLetters);
36 $MailLettersEnc = str_replace("\"", "\\\"", $MailLettersEnc);
37
38 $MailIndexes = '';
39 for ($i = 0; $i < strlen($MailLink); $i ++)
40 {
41 $index = strpos($MailLetters, substr($MailLink, $i, 1));
42 $index += 48;
43 $MailIndexes .= chr($index);
44 }
45 $MailIndexes = str_replace("\\", "\\\\", $MailIndexes);
46 $MailIndexes = str_replace("\"", "\\\"", $MailIndexes);
47
48 return '<script language="javascript"><!--
49 ML="'. $MailLettersEnc .'";
50 MI="'. $MailIndexes .'";
51 OT="";
52 for(j=0;j<MI.length;j++){
53 OT+=ML.charAt(MI.charCodeAt(j)-48);
54 }document.write(OT);
55 // --></script>';
56 }
57
58 endif;
59 ?>