spam_pickup.php

   1 <?php
   2 // $Id: spam_pickup.php,v 1.34 2007/01/03 14:09:06 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         $action = 'METRICS: ' . summarize_spam_progress($progress, $asap);
  77         var_dump($action);
  78         if (! empty($progress['is_spam'])) {
  79                 $action = 'Blocked by: ' . summarize_spam_progress($progress, TRUE);
  80                 if (isset($progress['is_spam']['badhost'])) {
  81                         $badhost = array();
  82                         foreach($progress['is_spam']['badhost'] as $glob=>$number) {
  83                                 $badhost[] = $glob . '(' . $number . ')';
  84                         }
  85                         var_dump('DETAIL_BADHOST: ' . implode(', ', $badhost));
  86                         //var_dump($progress['is_spam']['badhost']);
  87                 }
  88         }
  89         if (isset($progress['remains']['badhost'])) {
  90                 $count = count($progress['remains']['badhost']);
  91                 var_dump('DETAIL_NEUTRAL_HOST: ' . $count .
  92                         ' (' .
  93                                 preg_replace(
  94                                         '/[^, a-z0-9.-]/i', '',
  95                                         implode(', ', array_keys($progress['remains']['badhost']))
  96                                 ) .
  97                         ')'
  98                 );
  99         }
 100
 101         if ($prog) var_dump($progress);
 102 }
 103
 104 if ($pickup) {
 105         $results = spam_uri_pickup($msg);
 106         $results = uri_array_normalize($results, TRUE);
 107         var_dump('$results', $results);
 108 }
 109 echo '</pre>';
 110
 111 ?>