spam/checker.php

   1 <?php
   2 // $Id: checker.php,v 1.7 2009/01/04 05:01:34 henoheno Exp $
   3 // Concept-work of spam-uri metrics
   4 // Copyright (C) 2006-2007 PukiWiki Developers Team
   5 // License: GPL v2 or (at your option) any later version
   6
   7 error_reporting(E_ALL); // Debug purpose
   8
   9 require('spam.php');
  10
  11 // Recursive array_map()
  12 // e.g. Sanitilze ALL values (Debug purpose): var_dump(recursive_map('htmlspecialchars', $array));
  13 function recursive_map($func, $array)
  14 {
  15         if (is_array($array)) {
  16                 if (! empty($array)) {
  17                         $array = array_map('recursive_map',
  18                                  array_fill(0, count($array), $func), $array);
  19                 }
  20         } else {
  21                 $array = $func($array);
  22         }
  23         return $array;
  24 }
  25
  26 function show_form($string, $asap = FALSE, $progress = TRUE, $pickup = TRUE)
  27 {
  28         $string   = htmlspecialchars($string);
  29         $asap     = $asap     ? ' checked' : '';
  30         $progress = $progress ? ' checked' : '';
  31         $pickup   = $pickup   ? ' checked' : '';
  32         $base     = basename(__FILE__);
  33
  34         return <<< EOF
  35 <form action="$base" method="post">
  36
  37         <textarea name="msg" rows="8" cols="80">$string</textarea><br />
  38
  39         <input type="checkbox" name="asap"   id="asap"   value="on"$asap>
  40         <label for="asap">asap</label><br />
  41
  42         <input type="checkbox" name="progress" id="progress" value="on"$progress>
  43         <label for="progress">Show \$progress</label><br />
  44
  45         <input type="checkbox" name="pickup" id="pickup" value="on"$pickup>
  46         <label for="pickup">Show pickuped URIs</label><br />
  47
  48         <input type="submit" name="write" value="Submit" />
  49
  50 </form>
  51 EOF;
  52
  53 }
  54
  55
  56 // ---- Show form and result
  57 echo basename(__FILE__) . '<br />';
  58
  59 $msg    = isset($_POST['msg'])      ? $_POST['msg'] : '';
  60 $asap   = isset($_POST['asap'])     ? TRUE : FALSE;
  61 $prog   = isset($_POST['progress']) ? TRUE : FALSE;
  62 $pickup = isset($_POST['pickup'])   ? TRUE : FALSE;
  63
  64 echo show_form(stripslashes($msg), $asap, $prog, $pickup);
  65 echo '<br/>';
  66
  67
  68 // -----------------------------------------------------
  69         $spam = array();
  70
  71         // Threshold and rules for insertion (default)
  72         $spam['method']['_default'] = array(
  73                 '_comment'     => '_default',
  74                 'quantity'     =>  8,
  75                 //'non_uniquri'  =>  3,
  76                 'non_uniqhost' =>  3,
  77                 'area_anchor'  =>  0,
  78                 'area_bbcode'  =>  0,
  79                 'uniqhost'     => TRUE,
  80                 'badhost'      => TRUE,
  81                 //'asap'         => TRUE, // Stop as soon as possible (quick but less-info)
  82         );
  83
  84         // For editing
  85         // NOTE:
  86         // Any thresholds may LOCK your contents by
  87         // "posting one URL" many times.
  88         // Any rules will lock contents that have NG things already.
  89         $spam['method']['edit'] = array(
  90                 // Supposed_by_you(n) * Edit_form_spec(2) * Margin(1.5)
  91                 '_comment'       => 'edit',
  92                 'quantity'       => 150 * 1.5,
  93                 'non_uniq'       =>   5 * 1.5,
  94                 //'non_uniquri'  =>   5 * 1.5,
  95                 //'non_uniqhost' =>  50 * 1.5,
  96                 'area_anchor'    =>   3 * 1.5,
  97                 'area_bbcode'    =>   1 * 1.5,
  98                 'uniqhost'       => TRUE,
  99                 'badhost'        => TRUE,
 100                 //'asap'         => TRUE,
 101         );
 102
 103
 104 $method = & $spam['method']['_default'];
 105 //$method = & $spam['method']['edit'];
 106 //$method = check_uri_spam_method();
 107 //var_dump($method);
 108 // -----------------------------------------------------
 109
 110 if ($asap) $method['asap'] = TRUE;
 111
 112 $progress = check_uri_spam(
 113         array(
 114                 'a http://foobaA.example.com',
 115                 $msg,
 116                 'b http://foobarB.example.com'
 117         ), $method);
 118
 119 if (! empty($progress)) {
 120
 121
 122         if (empty($progress['is_spam'])) {
 123                 echo 'ACTION: Seems not a spam';
 124                 echo '<br />';
 125         } else {
 126                 echo 'ACTION: Blocked by ' . summarize_spam_progress($progress, TRUE);
 127                 echo '<br />';
 128
 129                 if (! $asap) {
 130                         echo 'METRICS: ' . summarize_spam_progress($progress) . '<br />' . "\n";
 131                 }
 132
 133                 $action = 'Blocked by: ' . summarize_spam_progress($progress, TRUE);
 134
 135                 $tmp = summarize_detail_badhost($progress);
 136                 if ($tmp != '') {
 137                         echo 'DETAIL_BADHOST: ' .
 138                                 str_replace('  ', '&nbsp; ', nl2br(htmlspecialchars($tmp). "\n"));
 139                 }
 140         }
 141
 142         $tmp = summarize_detail_newtral($progress);
 143         if (! $asap && $tmp != '') {
 144                 echo 'DETAIL_NEUTRAL_HOST: ' .
 145                                 str_replace('  ', '&nbsp; ', nl2br(htmlspecialchars($tmp). "\n"));
 146         }
 147
 148         if ($prog) {
 149                 echo '<pre>';
 150                 echo '$progress:' . "\n";
 151                 echo htmlspecialchars(var_export($progress, TRUE));
 152                 echo '</pre>';
 153         }
 154 }
 155
 156 if ($pickup) {
 157         echo '<pre>';
 158         $results = spam_uri_pickup($msg);
 159         $results = uri_pickup_normalize($results);
 160         $results = uri_pickup_normalize_pathfile($results);
 161         echo '$results:' . "\n";
 162         echo htmlspecialchars(var_export($results, TRUE));
 163         echo '</pre>';
 164 }
 165 ?>