Subversion Repositories php_antispam

Rev

Rev 5 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5 Rev 6
Line 1... Line 1...
1
<?php
1
<?php
2
 
2
 
3
/*
3
/*
4
 * ViaThinkSoft Anti-Spam Script for PHP
4
 * ViaThinkSoft Anti-Spam Script for PHP
5
 * (C) 2009-2013 ViaThinkSoft
5
 * (C) 2009-2022 ViaThinkSoft
6
 * Revision: 2013-03-04 (Version 4.01)
6
 * Revision: 2022-01-09 (Version 4.1)
-
 
7
 * License: Apache 2.0 License
7
 */
8
 */
8
 
9
 
9
function secure_email($email, $linktext, $crypt_linktext)
-
 
10
{
-
 
11
        // No new lines to avoid a JavaScript error!
10
class VtsAntiSpam4 {
12
        $linktext = str_replace("\r", ' ', $linktext);
-
 
13
        $linktext = str_replace("\n", ' ', $linktext);
-
 
14
 
11
 
15
        if (!defined('ALAS_INCLUDED')) {
12
        public $garbageLength = 5;
16
                // Anfagswert über aktuelle Mikrosekunde setzen
-
 
17
                // http://de2.php.net/manual/de/function.srand.php
-
 
-
 
13
 
18
                function make_seed() {
14
        public function __construct() {
19
                        list($usec, $sec) = explode(' ', microtime());
15
                self::randomize();
20
                        return (float) $sec + ((float) $usec * 100000);
-
 
21
                }
16
        }
22
                srand(make_seed());
-
 
23
 
17
 
24
                define('ALAS_GARBARGE_LENGTH', 5);
18
        private static function randomize() {
-
 
19
                // Anfagswert über aktuelle Mikrosekunde setzen
-
 
20
                // http://de2.php.net/manual/de/function.srand.php
-
 
21
                list($usec, $sec) = explode(' ', microtime());
-
 
22
                $seed = (int)($sec + ((float)$usec * 100000));
-
 
23
                srand($seed);
-
 
24
        }
25
 
25
 
-
 
26
        private function RandomString($len) {
26
                // http://www.jonasjohn.de/snippets/php/rand-str.htm
27
                // http://www.jonasjohn.de/snippets/php/rand-str.htm
27
                function RandomString($len) {
-
 
28
                        $randstr = '';
28
                $randstr = '';
29
                        srand((double)microtime()*1000000);
29
                //srand((double)microtime()*1000000);
30
                        for($i=0;$i<$len;$i++) {
30
                for($i=0;$i<$len;$i++) {
-
 
31
                        $n = rand(48,120);
-
 
32
                        while (($n >= 58 && $n <= 64) || ($n >= 91 && $n <= 96)) {
31
                                $n = rand(48,120);
33
                                $n = rand(48,120);
32
                                while (($n >= 58 && $n <= 64) || ($n >= 91 && $n <= 96)) {
-
 
33
                                        $n = rand(48,120);
-
 
34
                                }
-
 
35
                                $randstr .= chr($n);
-
 
36
                        }
34
                        }
37
                        return $randstr;
35
                        $randstr .= chr($n);
38
                }
36
                }
-
 
37
                return $randstr;
-
 
38
        }
39
 
39
 
40
                function js_randombreaks() {
40
        private function js_randombreaks() {
41
                        $len = rand(0, ALAS_GARBARGE_LENGTH);
41
                $len = rand(0, $this->garbageLength);
42
                        $r = '';
42
                $r = '';
43
                        $one_line_comment = false;
43
                $one_line_comment = false;
44
                        for($i=0;$i<$len;$i++) {
44
                for($i=0;$i<$len;$i++) {
45
                                $m = rand(0, 3);
45
                        $m = rand(0, 3);
46
                                if ($m == 0) {
46
                        if ($m == 0) {
47
                                        $r .= ' ';
47
                                $r .= ' ';
48
                                } else if ($m == 1) {
48
                        } else if ($m == 1) {
49
                                        $r .= '//';
49
                                $r .= '//';
50
                                        $r .= RandomString($i);
50
                                $r .= $this->RandomString($i);
51
                                        $one_line_comment = true;
51
                                $one_line_comment = true;
52
                                } else if ($m == 2) {
52
                        } else if ($m == 2) {
53
                                        $r .= "\r\n";
53
                                $r .= "\r\n";
54
                                        $one_line_comment = false;
54
                                $one_line_comment = false;
55
                                } else {
55
                        } else {
56
                                        $r .= "\t";
56
                                $r .= "\t";
57
                                }
-
 
58
                        }
57
                        }
59
                        if ($one_line_comment) $r .= "\r\n";
-
 
60
                        return $r;
-
 
61
                }
58
                }
-
 
59
                if ($one_line_comment) $r .= "\r\n";
-
 
60
                return $r;
-
 
61
        }
62
 
62
 
63
                function alas_js_crypt($text) {
63
        private function alas_js_crypt($text) {
64
                        $tmp = '';
64
                $tmp = '';
65
                        for ($i=0; $i<strlen($text); $i++) {
65
                for ($i=0; $i<strlen($text); $i++) {
66
                                $tmp .= js_randombreaks();
66
                        $tmp .= $this->js_randombreaks();
67
                                $tmp .= 'document.write("&#'.ord(substr($text, $i, 1)).';");';
67
                        $tmp .= 'document.write("&#'.ord(substr($text, $i, 1)).';");';
68
                                $tmp .= js_randombreaks();
68
                        $tmp .= $this->js_randombreaks();
69
                        }
-
 
70
                        $tmp = js_randombreaks().$tmp.js_randombreaks();
-
 
71
                        return $tmp;
-
 
72
                }
69
                }
-
 
70
                $tmp = $this->js_randombreaks().$tmp.$this->js_randombreaks();
-
 
71
                return $tmp;
-
 
72
        }
73
 
73
 
74
                function alas_noscript_crypt($text){
74
        private function alas_noscript_crypt($text){
75
                        $tmp = '';
75
                $tmp = '';
76
                        for ($i=0; $i<strlen($text); $i++) {
76
                for ($i=0; $i<strlen($text); $i++) {
77
                                $tmp .= '<span style="display:inline;">&#'.ord(substr($text, $i, 1)).';</span>';
77
                        $tmp .= '<span style="display:inline;">&#'.ord(substr($text, $i, 1)).';</span>';
78
                                $tmp .= '<!--'.js_randombreaks().'-->';
78
                        $tmp .= '<!--'.$this->js_randombreaks().'-->';
79
                                $tmp .= '<span style="display:none;">'.RandomString(rand(0, ALAS_GARBARGE_LENGTH)).'</span>';
79
                        $tmp .= '<span style="display:none;">'.$this->RandomString(rand(0, $this->garbageLength)).'</span>';
80
                        }
-
 
81
                        return $tmp;
-
 
82
                }
80
                }
-
 
81
                return $tmp;
-
 
82
        }
83
 
83
 
84
                function alas_js_write($text) {
84
        private function alas_js_write($text) {
85
                        $text = str_replace('\\', '\\\\', $text);
85
                $text = str_replace('\\', '\\\\', $text);
86
                        $text = str_replace('"', '\"', $text);
86
                $text = str_replace('"', '\"', $text);
87
                        $text = str_replace('/', '\/', $text); // W3C Validation </a> -> <\/a>
87
                $text = str_replace('/', '\/', $text); // W3C Validation </a> -> <\/a>
88
 
88
 
89
                        $ret  = '';
89
                $ret  = '';
90
                        $ret .= js_randombreaks();
90
                $ret .= $this->js_randombreaks();
91
                        $ret .= 'document.write("'.$text.'");';
91
                $ret .= 'document.write("'.$text.'");';
92
                        $ret .= js_randombreaks();
92
                $ret .= $this->js_randombreaks();
93
 
93
 
94
                        return $ret;
94
                return $ret;
-
 
95
        }
-
 
96
 
-
 
97
        public function secure_email($email, $linktext, $crypt_linktext)
-
 
98
        {
-
 
99
                // No new lines to avoid a JavaScript error!
-
 
100
                $linktext = str_replace("\r", ' ', $linktext);
-
 
101
                $linktext = str_replace("\n", ' ', $linktext);
-
 
102
 
-
 
103
                $aus = '';
-
 
104
                if ($email != '') {
-
 
105
                        $zid  = 'ALAS-4.0-'.DecHex(crc32($email)).'-'.DecHex(crc32($linktext)).'-'.($crypt_linktext ? 'S' : 'L');
-
 
106
                        $title = 'ViaThinkSoft "ALAS" Anti-Spam';
-
 
107
 
-
 
108
                        $aus .= "<!-- BEGIN $title [ID $zid] -->\r\n";
-
 
109
                        $aus .= '<script language="JavaScript" type="text/javascript"><!--'."\n";
-
 
110
                        $aus .= $this->alas_js_write('<a href="');
-
 
111
                        $aus .= $this->alas_js_crypt('mailto:'.$email);
-
 
112
                        $aus .= $this->alas_js_write('">');
-
 
113
                        $aus .= $crypt_linktext ? $this->alas_js_crypt($linktext) : $this->alas_js_write($linktext);
-
 
114
                        $aus .= $this->alas_js_write('</a>').'// --></script>';
-
 
115
 
-
 
116
                        $aus .= '<noscript>';
-
 
117
                        if ($linktext != $email) $aus .= ($crypt_linktext ? $this->alas_noscript_crypt($linktext) : $linktext).' ';
-
 
118
                        $aus .= $this->alas_noscript_crypt("[ $email ]");
-
 
119
                        $aus .= '</noscript>';
-
 
120
                        $aus .= "\r\n<!-- END $title [ID $zid] -->\r\n";
95
                }
121
                }
96
 
122
 
-
 
123
                return $aus;
-
 
124
        }
-
 
125
 
-
 
126
        public function secure_email_autodetect($email, $linktext) {
-
 
127
                // Automatisch erkennen, ob der $linktext für Spambots interessant ist oder nicht
97
                define('ALAS_INCLUDED', true);
128
                $pos = strpos($linktext, '@');
-
 
129
 
-
 
130
                return $this->secure_email($email, $linktext, $pos !== false);
98
        }
131
        }
99
 
132
 
100
        $aus = '';
-
 
101
        if ($email != '') {
-
 
102
                $zid  = 'ALAS-4.0-'.DecHex(crc32($email)).'-'.DecHex(crc32($linktext)).'-'.($crypt_linktext ? 'S' : 'L');
-
 
103
                $title = 'ViaThinkSoft "ALAS" Anti-Spam';
-
 
104
 
-
 
105
                $aus .= "<!-- BEGIN $title [ID $zid] -->\r\n";
-
 
106
                $aus .= '<script language="JavaScript" type="text/javascript"><!--'."\n";
-
 
107
                $aus .= alas_js_write('<a href="');
-
 
108
                $aus .= alas_js_crypt('mailto:'.$email);
133
        public function secure_email_identical_text($email) {
109
                $aus .= alas_js_write('">');
-
 
110
                $aus .= $crypt_linktext ? alas_js_crypt($linktext) : alas_js_write($linktext);
-
 
111
                $aus .= alas_js_write('</a>').'// --></script>';
-
 
112
 
-
 
113
                $aus .= '<noscript>';
-
 
114
                if ($linktext != $email) $aus .= ($crypt_linktext ? alas_noscript_crypt($linktext) : $linktext).' ';
-
 
115
                $aus .= alas_noscript_crypt("[ $email ]");
134
                return $this->secure_email_autodetect($email, $email);
116
                $aus .= '</noscript>';
-
 
117
                $aus .= "\r\n<!-- END $title [ID $zid] -->\r\n";
-
 
118
        }
135
        }
119
 
136
 
120
        return $aus;
-
 
121
}
137
}
122
 
138
 
123
function secure_email_autodetect($email, $linktext) {
-
 
124
        // Automatisch erkennen, ob der $linktext für Spambots interessant ist oder nicht
139
# ------------------------------------------------------------------------------
125
        $pos = strpos($linktext, '@');
-
 
126
 
140
 
-
 
141
function secure_email($email, $linktext, $crypt_linktext, $css_class='') {
-
 
142
        if (!empty($css_class)) {
-
 
143
                // TODO
-
 
144
                throw new Exception("CSSClass is not yet implemented in AntiSpam v4");
-
 
145
        }
-
 
146
 
-
 
147
        $antispam = new VtsAntiSpam4();
127
        return secure_email($email, $linktext, $pos !== false);
148
        $res = $antispam->secure_email($email, $linktext, $crypt_linktext);
-
 
149
        return $res;
-
 
150
}
-
 
151
 
-
 
152
function secure_email_autodetect($email, $linktext) {
-
 
153
        $antispam = new VtsAntiSpam4();
-
 
154
        $res = $antispam->secure_email_autodetect($email, $linktext);
-
 
155
        return $res;
128
}
156
}
129
 
157
 
130
function secure_email_identical_text($email) {
158
function secure_email_identical_text($email) {
-
 
159
        $antispam = new VtsAntiSpam4();
131
        return secure_email_autodetect($email, $email);
160
        $res = $antispam->secure_email_identical_text($email);
-
 
161
        return $res;
132
}
162
}