source: spip-zone/_plugins_/nospam/nospam_pipelines.php @ 70229

Last change on this file since 70229 was 70229, checked in by philippeboussin@…, 7 years ago

Eviter un warning

File size: 9.1 KB
Line 
1<?php
2/**
3 * Plugin No-SPAM
4 * (c) 2008-2011 Cedric Morin Yterium.net
5 * Licence GPL
6 *
7 */
8
9if (!defined("_ECRIRE_INC_VERSION")) return;
10
11/**
12 * Lister les formulaires a prendre en charge contre le SPAM
13 * pour verifier le nobot et le jeton sur un formulaire, l'ajouter a cette liste
14 * par le pipeline nospam_lister_formulaires
15 * @return void
16 */
17function nospam_lister_formulaires() {
18        if (!isset($GLOBALS['formulaires_no_spam']))
19                $GLOBALS['formulaires_no_spam'] = array();
20        $formulaires = array_merge($GLOBALS['formulaires_no_spam'], array('forum', 'ecrire_auteur', 'signature'));
21        return pipeline('nospam_lister_formulaires', $formulaires);
22}
23
24/**
25 * Ajouter le champ de formulaire 'nobot' au besoin
26 *
27 * @param array $flux
28 * @return array
29 */
30function nospam_recuperer_fond($flux) {
31        // determiner le nom du formulaire
32        $fond = strval($flux['args']['fond']);
33        if (false !== $pos = strpos($fond, 'formulaires/')) {
34                $form = substr($fond, $pos + 12);
35                if (in_array($form, nospam_lister_formulaires())) {
36                        // on ajoute le champ 'nobot' si pas present dans le formulaire
37                        $texte = &$flux['data']['texte'];
38                        if ((false === strpos($texte, 'name="nobot"'))
39                                and (false !== $pos = strpos($texte, '</form>'))
40                        ) {
41                                $nobot = recuperer_fond("inclure/nobot", array('nobot' => ''));
42                                $texte = substr_replace($texte, $nobot, $pos, 0);
43                        }
44                }
45        }
46        return $flux;
47}
48
49/**
50 * Ajouter un jeton temporaire lie a l'heure et a l'IP pour limiter la reutilisation possible du formulaire
51 *
52 * @param array $flux
53 * @return array
54 */
55function nospam_formulaire_charger($flux) {
56        $form = $flux['args']['form'];
57        if (in_array($form, nospam_lister_formulaires())
58                AND $flux['data']
59                        AND is_array($flux['data'])
60        ) {
61                include_spip("inc/nospam");
62                $jeton = creer_jeton($form);
63                $flux['data']['_hidden'] .= "<input type='hidden' name='_jeton' value='$jeton' />";
64        }
65        return $flux;
66}
67
68/**
69 * Verifier le jeton temporaire lie a l'heure et a l'IP pour limiter la reutilisation possible du formulaire
70 *
71 * @param array $flux
72 * @return array
73 */
74function nospam_formulaire_verifier($flux) {
75        $form = $flux['args']['form'];
76        if (in_array($form, nospam_lister_formulaires())) {
77                include_spip("inc/nospam");
78                $jeton = _request('_jeton');
79                // le jeton prend en compte l'heure et l'ip de l'internaute
80                if (_request('nobot') // trop facile !
81                        OR (!verifier_jeton($jeton, $form))
82                ) {
83                        #spip_log('pas de jeton pour '.var_export($flux,true),'nospam');
84                        $flux['data']['message_erreur'] .= _T('nospam:erreur_jeton');
85                        if ($form == 'forum')
86                                unset($flux['data']['previsu']);
87                }
88
89                // pas la peine de filtrer les contenus postés par un admin
90                if (isset($GLOBALS['visiteur_session']['statut']) AND $GLOBALS['visiteur_session']['statut'] != '0minirezo') {
91                        if ($verifier_formulaire = charger_fonction("verifier_formulaire_$form", "nospam", true)) {
92                                $flux = $verifier_formulaire($flux);
93                        }
94                }
95        }
96        return $flux;
97}
98
99/**
100 * Au moment de decider du statut d'un forum,
101 * quelques verifications et une moderation si necessaire !
102 *
103 * @param array $flux
104 * @return array
105 */
106function nospam_pre_edition($flux) {
107        if ($flux['args']['table'] == 'spip_forum'
108                AND $flux['args']['action'] == 'instituer'
109        ) {
110
111                // ne pas publier automatiquement certains messages suspects ...
112                // sauf si le posteur a de toute facon le pouvoir de moderer et de se publier
113                include_spip('inc/autoriser');
114                if ($flux['data']['statut'] == 'publie'
115                        AND (!isset($GLOBALS['visiteur_session']['id_auteur']) OR !autoriser('modererforum'))
116                ) {
117
118                        $email = strlen($flux['data']['email_auteur']) ? " OR email_auteur=" . sql_quote($flux['data']['email_auteur']) : "";
119                        $spammeur_connu = (!isset($GLOBALS['visiteur_session']['statut']) AND (sql_countsel('spip_forum', '(ip=' . sql_quote($GLOBALS['ip']) . "$email) AND statut='spam'") > 0));
120
121                  // activer aussi le flag spammeur connu en cas de flood, meme si aucune detection spam jusqu'ici
122                  // on sera plus severe sur les liens dans ce cas
123                  // cas du spammeur qui envoie que des messages a 3 liens a haute frequence (passe a travers tous les filtres)
124                  // au bout du 5e message en <10min ou 10e en <30min on va moderer tout message avec un lien
125                  if (!$spammeur_connu){
126                          if (($nb=sql_countsel('spip_forum','(ip='.sql_quote($GLOBALS['ip']).$email.') AND '.sql_date_proche('date_heure','-30','minute')))>=7){
127                          spip_log("[Flood] $nb message pour (ip=".$GLOBALS['ip']."$email) dans les 30 dernieres minutes",'nospam');
128                          $spammeur_connu = true;
129                          }
130                  }
131                  if (!$spammeur_connu){
132                          if (($nb=sql_countsel('spip_forum','(ip='.sql_quote($GLOBALS['ip']).$email.') AND '.sql_date_proche('date_heure','-10','minute')))>=3){
133                          spip_log("[Flood] $nb message pour (ip=".$GLOBALS['ip']."$email) dans les 10 dernieres minutes",'nospam');
134                          $spammeur_connu = true;
135                          }
136                  }
137
138                        // si c'est un spammeur connu,
139                        // verifier que cette ip n'en est pas a son N-ieme spam en peu de temps
140                        // a partir d'un moment on refuse carrement le spam massif, le posteur devra attendre pour reposter
141                        if ($spammeur_connu) {
142                                // plus de 30 spams dans les dernieres 2h, faut se calmer ...
143                                // ou plus de 10 spams dans la dernieres 1h, faut se calmer ...
144                                if (
145                                        ($nb = sql_countsel('spip_forum', 'statut=\'spam\' AND (ip=' . sql_quote($GLOBALS['ip']) . $email . ') AND ' . sql_date_proche('date_heure','-120','minute'))) >= 30
146                                        OR
147                                        ($nb = sql_countsel('spip_forum', 'statut=\'spam\' AND (ip=' . sql_quote($GLOBALS['ip']) . $email .') AND ' . sql_date_proche('date_heure','-60','minute'))) >= 10
148                                        ){
149                                        $flux['data']['statut'] = ''; // on n'en veut pas !
150                                        spip_log("[Refuse] $nb spam pour (ip=" . $GLOBALS['ip'] . "$email) dans les 2 dernieres heures", 'nospam');
151                                        return $flux;
152                                }
153                        }
154
155                        // si c'est un message bourre de liens, on le modere
156                        // le seuil varie selon le champ et le fait que le spammeur est deja connu ou non
157                        $seuils = array(
158                                // seuils par defaut
159                                0 => array(
160                                        0 => array(1 => 'prop', 3 => 'spam'), // seuils par defaut
161                                        'url_site' => array(2 => 'spam'), // 2 liens dans le champ url, c'est vraiment louche
162                                        'texte' => array(4 => 'prop', 20 => 'spam') // pour le champ texte
163                                ),
164                                // seuils severises pour les spammeurs connus
165                                'spammeur' => array(
166                                        0 => array(1 => 'spam'),
167                                        'url_site' => array(2 => 'spam'), // 2 liens dans le champ url, c'est vraiment louche
168                                        'texte' => array(1 => 'prop', 5 => 'spam')
169                                )
170                        );
171
172                        $seuils = $spammeur_connu ? $seuils['spammeur'] : $seuils[0];
173                        include_spip("inc/nospam"); // pour analyser_spams()
174                        foreach ($flux['data'] as $champ => $valeur) {
175                                $infos = analyser_spams($valeur);
176                                if ($infos['contenu_cache']) {
177                                        // s'il y a du contenu caché avec des styles => spam direct
178                                        $flux['data']['statut'] = 'spam';
179                                        spip_log("\t" . $flux['data']['auteur'] . "\t" . $GLOBALS['ip'] . "\t" . "requalifié en spam car contenu cache", 'nospam');
180                                }
181                                elseif ($infos['nombre_liens'] > 0) {
182                                        // si un lien a un titre de moins de 3 caracteres, c'est louche...
183                                        if ($infos['caracteres_texte_lien_min'] < 3) {
184                                                $flux['data']['statut'] = 'prop'; // en dur en attendant une idee plus generique
185                                                spip_log("\t" . $flux['data']['auteur'] . "\t" . $GLOBALS['ip'] . "\t" . "requalifié en prop car moins de 3car hors liens", 'nospam');
186                                        }
187
188                                        if (isset($seuils[$champ]))
189                                                $seuil = $seuils[$champ];
190                                        else
191                                                $seuil = $seuils[0];
192
193                                        foreach ($seuil as $s => $stat)
194                                                if ($infos['nombre_liens'] >= $s) {
195                                                        $flux['data']['statut'] = $stat;
196                                                        spip_log("\t" . $flux['data']['auteur'] . "\t" . $GLOBALS['ip'] . "\t" . "requalifié en " . $stat . " car nombre_liens >= " . $s, 'nospam');
197                                                }
198
199                                        if ($flux['data']['statut'] != 'spam') {
200                                                $champs = array_unique(array('texte', $champ));
201                                                if ($h = rechercher_presence_liens_spammes($infos['liens'], 1, 'spip_forum', $champs)) {
202                                                        $flux['data']['statut'] = 'spam';
203                                                        spip_log("\t" . $flux['data']['auteur'] . "\t" . $GLOBALS['ip'] . "\t" . "requalifié en spam car lien $h deja dans un spam", 'nospam');
204                                                }
205                                        }
206                                }
207                        }
208
209
210                        // verifier qu'un message identique n'a pas ete publie il y a peu
211                        if ($flux['data']['statut'] != 'spam') {
212                                if (sql_countsel('spip_forum', 'texte=' . sql_quote($flux['data']['texte']) . " AND statut IN ('publie','off','spam')") > 0){
213                                        $flux['data']['statut'] = 'spam';
214                                        spip_log("\t" . $flux['data']['auteur'] . "\t" . $GLOBALS['ip'] . "\t" . "requalifié en spam car message identique deja existant", 'nospam');
215                                }
216                        }
217                        // verifier que cette ip n'en est pas a son N-ieme post en peu de temps
218                        // plus de 5 messages en 5 minutes c'est suspect ...
219                        if ($flux['data']['statut'] != 'spam') {
220                                if (($nb = sql_countsel('spip_forum', 'ip=' . sql_quote($GLOBALS['ip']) . ' AND ' . sql_date_proche('date_heure','-5','minute'))) >= 5){
221                                        $flux['data']['statut'] = 'spam';
222                                        spip_log("[Flood2] $nb message pour (ip=".$GLOBALS['ip']."$email) dans les 5 dernieres minutes : requalif en spam",'nospam');
223                                }
224                        }
225                }
226        }
227        return $flux;
228}
229
230
231?>
Note: See TracBrowser for help on using the repository browser.