spam/spam_pickup.php

   1 <?php
   2 // $Id: spam_pickup.php,v 1.17 2006/11/26 14:01:14 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 // $array[0] => $array['name']
  27 function array_rename_key(& $array, $from, $to, $force = FALSE, $default = '')
  28 {
  29         if (isset($array[$from])) {
  30                 $array[$to] = & $array[$from];
  31                 unset($array[$from]);
  32         } else if ($force) {
  33                 $array[$to] = $default;
  34         } else {
  35                 return FALSE;
  36         }
  37         return TRUE;
  38 }
  39
  40 function show_form($string)
  41 {
  42         $base = basename(__FILE__);
  43         $string = htmlspecialchars($string);
  44         print <<< EOF
  45 <form action="$base" method="post">
  46         <textarea name="msg" rows="8" cols="80">$string</textarea><br />
  47         <input type="submit" name="write" value="Submit" />
  48 </form>
  49 <br/>
  50 EOF;
  51 }
  52
  53
  54 // ---- Show form and result
  55 echo basename(__FILE__) . '<br />';
  56 $msg = isset($_POST['msg']) ? $_POST['msg'] : '';
  57 show_form($msg);
  58 echo '<pre>';
  59
  60 $pickup = TRUE;
  61
  62 list($is_spam, $progress) = check_uri_spam($msg, array(), FALSE);
  63 //list($is_spam, $progress) = check_uri_spam(array($msg, $msg), array(), FALSE);
  64 if ($is_spam) {
  65         $action = 'Blocked by: ' . summarize_check_uri_spam_progress($progress);
  66         var_dump($action);
  67 }
  68
  69 var_dump('check_uri_spam($msg)', $progress);
  70
  71 if ($pickup) {
  72         $results = spam_uri_pickup($msg);
  73         var_dump('$results', $results);
  74 }
  75 echo '</pre>';
  76
  77 ?>