spam/spam_pickup.php

   1 <?php
   2 // $Id: spam_pickup.php,v 1.35 2007/01/03 14:13:52 henoheno Exp $
   3 // Concept-work of spam-uri metrics
   4 // Copyright (C) 2006 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         if ($asap) {
  29                 $asap = ' checked';
  30         } else {
  31                 $asap = '';
  32         }
  33         if ($pickup) {
  34                 $pickup = ' checked';
  35         } else {
  36                 $pickup = '';
  37         }
  38         if ($progress) {
  39                 $progress = ' checked';
  40         } else {
  41                 $progress = '';
  42         }
  43         $base = basename(__FILE__);
  44         $string = htmlspecialchars($string);
  45         print <<< EOF
  46 <form action="$base" method="post">
  47         <textarea name="msg" rows="8" cols="80">$string</textarea><br />
  48         <input type="checkbox" name="asap"   id="asap"   value="on"$asap>
  49         <label for="asap">asap</label><br />
  50         <input type="checkbox" name="progress" id="progress" value="on"$progress>
  51         <label for="progress">Show \$progress</label><br />
  52         <input type="checkbox" name="pickup" id="pickup" value="on"$pickup>
  53         <label for="pickup">Show pickuped URIs</label><br />
  54         <input type="submit" name="write" value="Submit" />
  55 </form>
  56 <br/>
  57 EOF;
  58 }
  59
  60
  61 // ---- Show form and result
  62 echo basename(__FILE__) . '<br />';
  63 $msg    = isset($_POST['msg'])      ? $_POST['msg'] : '';
  64 $asap   = isset($_POST['asap'])     ? TRUE : FALSE;
  65 $prog   = isset($_POST['progress']) ? TRUE : FALSE;
  66 $pickup = isset($_POST['pickup'])   ? TRUE : FALSE;
  67 show_form($msg, $asap, $prog, $pickup);
  68 echo '<pre>';
  69
  70 $method = check_uri_spam_method();
  71 if ($asap) $method['asap'] = TRUE;
  72
  73 $progress = check_uri_spam(array('a', $msg, 'b'), $method);
  74
  75 if (! empty($progress)) {
  76         var_dump('ACTION: Blocked by ' . summarize_spam_progress($progress, TRUE));
  77         if (! $asap) {
  78                 var_dump('METRICS: ' . summarize_spam_progress($progress))s;
  79         }
  80         if (! empty($progress['is_spam'])) {
  81                 $action = 'Blocked by: ' . summarize_spam_progress($progress, TRUE);
  82                 if (isset($progress['is_spam']['badhost'])) {
  83                         $badhost = array();
  84                         foreach($progress['is_spam']['badhost'] as $glob=>$number) {
  85                                 $badhost[] = $glob . '(' . $number . ')';
  86                         }
  87                         var_dump('DETAIL_BADHOST: ' . implode(', ', $badhost));
  88                         //var_dump($progress['is_spam']['badhost']);
  89                 }
  90         }
  91         if (isset($progress['remains']['badhost'])) {
  92                 $count = count($progress['remains']['badhost']);
  93                 var_dump('DETAIL_NEUTRAL_HOST: ' . $count .
  94                         ' (' .
  95                                 preg_replace(
  96                                         '/[^, a-z0-9.-]/i', '',
  97                                         implode(', ', array_keys($progress['remains']['badhost']))
  98                                 ) .
  99                         ')'
 100                 );
 101         }
 102
 103         if ($prog) var_dump($progress);
 104 }
 105
 106 if ($pickup) {
 107         $results = spam_uri_pickup($msg);
 108         $results = uri_array_normalize($results, TRUE);
 109         var_dump('$results', $results);
 110 }
 111 echo '</pre>';
 112
 113 ?>