2 // $Id: spam_pickup.php,v 1.38 2007/01/21 14:54:57 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
7 error_reporting(E_ALL); // Debug purpose
11 // Recursive array_map()
12 // e.g. Sanitilze ALL values (Debug purpose): var_dump(recursive_map('htmlspecialchars', $array));
13 function recursive_map($func, $array)
15 if (is_array($array)) {
16 if (! empty($array)) {
17 $array = array_map('recursive_map',
18 array_fill(0, count($array), $func), $array);
21 $array = $func($array);
26 function show_form($string, $asap = FALSE, $progress = TRUE, $pickup = TRUE)
28 $string = htmlspecialchars($string);
29 $asap = $asap ? ' checked' : '';
30 $progress = $progress ? ' checked' : '';
31 $pickup = $pickup ? ' checked' : '';
32 $base = basename(__FILE__);
35 <form action="$base" method="post">
37 <textarea name="msg" rows="8" cols="80">$string</textarea><br />
39 <input type="checkbox" name="asap" id="asap" value="on"$asap>
40 <label for="asap">asap</label><br />
42 <input type="checkbox" name="progress" id="progress" value="on"$progress>
43 <label for="progress">Show \$progress</label><br />
45 <input type="checkbox" name="pickup" id="pickup" value="on"$pickup>
46 <label for="pickup">Show pickuped URIs</label><br />
48 <input type="submit" name="write" value="Submit" />
56 // ---- Show form and result
57 echo basename(__FILE__) . '<br />';
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;
64 echo show_form($msg, $asap, $prog, $pickup);
69 $method = check_uri_spam_method();
70 if ($asap) $method['asap'] = TRUE;
72 $progress = check_uri_spam(array('a', $msg, 'b'), $method);
74 if (! empty($progress)) {
77 if (empty($progress['is_spam'])) {
78 var_dump('ACTION: Seems not a spam');
80 var_dump('ACTION: Blocked by ' . summarize_spam_progress($progress, TRUE));
82 if (! $asap) var_dump('METRICS: ' . summarize_spam_progress($progress));
84 $action = 'Blocked by: ' . summarize_spam_progress($progress, TRUE);
85 if (isset($progress['is_spam']['badhost'])) {
87 foreach($progress['is_spam']['badhost'] as $glob=>$number) {
88 $badhost[] = $glob . '(' . $number . ')';
90 var_dump('DETAIL_BADHOST: ' . implode(', ', $badhost));
91 //var_dump($progress['is_spam']['badhost']);
95 if (isset($progress['remains']['badhost'])) {
96 $count = count($progress['remains']['badhost']);
97 var_dump('DETAIL_NEUTRAL_HOST: ' . $count .
100 '/[^, a-z0-9.-]/i', '',
101 implode(', ', array_keys($progress['remains']['badhost']))
107 if ($prog) var_dump($progress);
111 $results = spam_uri_pickup($msg);
112 $results = uri_array_normalize($results, TRUE);
113 var_dump('$results', $results);