HTML tag
- 'bbcode' => $t_area, // Inside [url] or [link] BBCode
- );
+ if ((! $asap || ! $is_spam) && isset($method['badhost'])) {
+ $list = get_blocklist('list');
+ $blocked = array_merge_leaves(
+ $blocked,
+ blocklist_distiller($hosts, array_keys($list), $asap),
+ FALSE
+ );
+ foreach($list as $key=>$type){
+ if (! $type) unset($blocked[$key]); // Ignore goodhost etc
+ }
+ unset($list);
+ if (! empty($blocked)) $is_spam['badhost'] = TRUE;
+ }
- // Rules
- $rules = array(
- 'asap' => FALSE, // Quit As Soon As Possible
- 'uniqhost' => TRUE, // Show uniq host (at block notification mail)
- 'badhost' => TRUE, // Check badhost
- );
+ // Return if ...
+ //if ($asap && $is_spam) return $progress;
- // Remove unused
- foreach (array_keys($method) as $key) {
- if ($method[$key] < 0) unset($method[$key]);
- }
- foreach (array_keys($area) as $key) {
- if ($area[$key] < 0) unset($area[$key]);
- }
- $area = empty($area) ? array() : array('area' => $area);
- $rules = $rule ? $rules : array();
+ // ----------------------------------------
+ // End
- return $method + $area + $rules;
+ return $progress;
}
-// Simple/fast spam check
-function check_uri_spam($target = '', $method = array())
-{
- if (! is_array($method) || empty($method)) {
- $method = check_uri_spam_method();
- }
-
- $asap = isset($method['asap']) ? $method['asap'] : TRUE;
- $sum = array(
- 'quantity' => 0,
- 'uniqhost' => 0,
- 'non_uniq' => 0,
- 'badhost' => 0,
- 'area_total' => 0,
- 'area_anchor' => 0,
- 'area_bbcode' => 0,
- );
- $is_spam = array();
- $progress = array(
- 'sum' => & $sum,
- 'is_spam' => & $is_spam,
- 'method' => & $method,
- );
+// ---------------------
+// Reporting
- if (is_array($target)) {
- // Recurse
- foreach($target as $str) {
- $_progress = check_uri_spam($str, $method);
- foreach (array_keys($_progress['sum']) as $key) {
- $sum[$key] += $_progress['sum'][$key];
- }
- foreach(array_keys($_progress['is_spam']) as $key) {
- $is_spam[$key] = TRUE;
- }
- if ($asap && $is_spam) break;
- }
+// Summarize $progress (blocked only)
+function summarize_spam_progress($progress = array(), $blockedonly = FALSE)
+{
+ if ($blockedonly) {
+ $tmp = array_keys($progress['is_spam']);
} else {
- $pickups = spam_uri_pickup($target);
- if (! empty($pickups)) {
- $sum['quantity'] += count($pickups);
-
- // URI quantity
- if ((! $asap || ! $is_spam) && isset($method['quantity']) &&
- $sum['quantity'] > $method['quantity']) {
- $is_spam['quantity'] = TRUE;
- }
- //var_dump($method['quantity'], $is_spam);
-
- // Using invalid area
- if ((! $asap || ! $is_spam) && isset($method['area'])) {
- foreach($pickups as $pickup) {
- foreach ($pickup['area'] as $key => $value) {
- if ($key == 'offset') continue;
- // Total
- $sum['area_total'] += $value;
- if (isset($method['area']['total']) &&
- $sum['area_total'] > $method['area']['total']) {
- $is_spam['area_total'] = TRUE;
- if ($asap && $is_spam) break;
- }
- // Each area
- $p_key = 'area_' . $key;
- $sum[$p_key] += $value;
- if(isset($method['area'][$key]) &&
- $sum[$p_key] > $method['area'][$key]) {
- $is_spam[$p_key] = TRUE;
- if ($asap && $is_spam) break;
- }
- }
- if ($asap && $is_spam) break;
- }
- }
- //var_dump($method['area'], $is_spam);
-
- // URI uniqueness (and removing non-uniques)
- if ((! $asap || ! $is_spam) && isset($method['non_uniq'])) {
-
- // Destructive normalize of URIs
- uri_array_normalize($pickups);
-
- $uris = array();
- foreach (array_keys($pickups) as $key) {
- $uris[$key] = uri_array_implode($pickups[$key]);
- }
- $count = count($uris);
- $uris = array_unique($uris);
- $sum['non_uniq'] += $count - count($uris);
- if ($sum['non_uniq'] > $method['non_uniq']) {
- $is_spam['non_uniq'] = TRUE;
- }
- if (! $asap || ! $is_spam) {
- foreach (array_diff(array_keys($pickups),
- array_keys($uris)) as $remove) {
- unset($pickups[$remove]);
- }
+ $tmp = array();
+ $method = & $progress['method'];
+ if (isset($progress['sum'])) {
+ foreach ($progress['sum'] as $key => $value) {
+ if (isset($method[$key]) && $value) {
+ $tmp[] = $key . '(' . $value . ')';
}
- unset($uris);
- }
- //var_dump($method['non_uniq'], $is_spam);
-
- // Unique host
- $hosts = array();
- foreach ($pickups as $pickup) $hosts[] = & $pickup['host'];
- $hosts = array_unique($hosts);
- $sum['uniqhost'] += count($hosts);
- //var_dump($method['uniqhost'], $is_spam);
-
- // Bad host
- if ((! $asap || ! $is_spam) && isset($method['badhost'])) {
- $count = array_count_leaves(is_badhost($hosts, $asap));
- $sum['badhost'] += $count;
- if ($count != 0) $is_spam['badhost'] = TRUE;
}
- //var_dump($method['badhost'], $is_spam);
}
}
- return $progress;
+ return implode(', ', $tmp);
}
-// Count leaves
-function array_count_leaves($array = array(), $count_empty_array = FALSE)
+function summarize_detail_badhost($progress = array())
{
- if (! is_array($array) || (empty($array) && $count_empty_array))
- return 1;
+ if (! isset($progress['blocked']) || empty($progress['blocked'])) return '';
+
+ // Flat per group
+ $blocked = array();
+ foreach($progress['blocked'] as $list => $lvalue) {
+ foreach($lvalue as $group => $gvalue) {
+ $flat = implode(', ', array_flat_leaves($gvalue));
+ if ($flat === $group) {
+ $blocked[$list][] = $flat;
+ } else {
+ $blocked[$list][$group] = $flat;
+ }
+ }
+ }
- // Recurse
- $result = 0;
- foreach ($array as $part) {
- $result += array_count_leaves($part, $count_empty_array);
+ // Shrink per list
+ // From: 'A-1' => array('ie.to')
+ // To: 'A-1' => 'ie.to'
+ foreach($blocked as $list => $lvalue) {
+ if (is_array($lvalue) &&
+ count($lvalue) == 1 &&
+ is_numeric(key($lvalue))) {
+ $blocked[$list] = current($lvalue);
+ }
}
- return $result;
-}
-// ---------------------
-// Reporting
+ return var_export_shrink($blocked, TRUE, TRUE);
+}
-// TODO: Don't show unused $method!
-// Summarize $progress (blocked only)
-function summarize_spam_progress($progress = array(), $blockedonly = FALSE)
+function summarize_detail_newtral($progress = array())
{
- $method = $progress['method'];
- if (isset($method['area'])) {
- foreach(array_keys($method['area']) as $key) {
- $method['area_' . $key] = TRUE;
+ if (! isset($progress['hosts']) ||
+ ! is_array($progress['hosts']) ||
+ empty($progress['hosts'])) return '';
+
+ // Generate a responsible $trie
+ $trie = array();
+ foreach($progress['hosts'] as $value) {
+ // 'A.foo.bar.example.com'
+ $resp = whois_responsibility($value); // 'example.com'
+ if (empty($resp)) {
+ // One or more test, or do nothing here
+ $resp = strval($value);
+ $rest = '';
+ } else {
+ $rest = rtrim(substr($value, 0, - strlen($resp)), '.'); // 'A.foo.bar'
}
+ $trie = array_merge_leaves($trie, array($resp => array($rest => NULL)), FALSE);
}
- if ($blockedonly) {
- $tmp = array_keys($progress['is_spam']);
- } else {
- $tmp = array();
- foreach ($progress['sum'] as $key => $value) {
- if (isset($method[$key])) {
- $tmp[] = $key . '(' . $value . ')';
+ // Format: var_export_shrink() -like output
+ $result = array();
+ ksort_by_domain($trie);
+ foreach(array_keys($trie) as $key) {
+ ksort_by_domain($trie[$key]);
+ if (count($trie[$key]) == 1 && key($trie[$key]) == '') {
+ // Just one 'responsibility.example.com'
+ $result[] = ' \'' . $key . '\',';
+ } else {
+ // One subdomain-or-host, or several ones
+ $subs = array();
+ foreach(array_keys($trie[$key]) as $sub) {
+ if ($sub == '') {
+ $subs[] = $key; // 'example.com'
+ } else {
+ $subs[] = $sub . '. '; // 'A.foo.bar. '
+ }
}
+ $result[] = ' \'' . $key . '\' => \'' . implode(', ', $subs) . '\',';
}
+ unset($trie[$key]);
}
-
- return implode(', ', $tmp);
+ return
+ 'array (' . "\n" .
+ implode("\n", $result) . "\n" .
+ ')';
}
+
// ---------------------
// Exit
+// Freeing memories
+function spam_dispose()
+{
+ get_blocklist(NULL);
+ whois_responsibility(NULL);
+}
+
// Common bahavior for blocking
// NOTE: Call this function from various blocking feature, to disgueise the reason 'why blocked'
-function spam_exit()
+function spam_exit($mode = '', $data = array())
{
- die("\n");
+ $exit = TRUE;
+
+ switch ($mode) {
+ case '':
+ echo("\n");
+ break;
+ case 'dump':
+ echo('' . "\n");
+ echo htmlsc(var_export($data, TRUE));
+ echo('' . "\n");
+ break;
+ };
+
+ if ($exit) exit; // Force exit
}
@@ -886,17 +678,23 @@ function spam_exit()
// TODO: Record them
// Simple/fast spam filter ($target: 'a string' or an array())
-function pkwk_spamfilter($action, $page, $target = array('title' => ''), $method = array())
+function pkwk_spamfilter($action, $page, $target = array('title' => ''), $method = array(), $exitmode = '')
{
- global $notify;
-
$progress = check_uri_spam($target, $method);
- if (! empty($progress['is_spam'])) {
- // Mail to administrator(s)
- if ($notify) pkwk_spamnotify($action, $page, $target, $progress, $method);
- // End
- spam_exit();
+ if (empty($progress['is_spam'])) {
+ spam_dispose();
+ } else {
+
+// TODO: detect encoding from $target for mbstring functions
+// $tmp = array();
+// foreach(array_keys($target) as $key) {
+// $tmp[strings($key, 0, FALSE, TRUE)] = strings($target[$key], 0, FALSE, TRUE); // Removing "\0" etc
+// }
+// $target = & $tmp;
+
+ pkwk_spamnotify($action, $page, $target, $progress, $method);
+ spam_exit($exitmode, $progress);
}
}
@@ -906,21 +704,29 @@ function pkwk_spamfilter($action, $page, $target = array('title' => ''), $method
// Mail to administrator(s)
function pkwk_spamnotify($action, $page, $target = array('title' => ''), $progress = array(), $method = array())
{
- global $notify_subject;
+ global $notify, $notify_subject;
- $asap = isset($method['asap']) ? $method['asap'] : TRUE;
+ if (! $notify) return;
- $footer['ACTION'] = 'Blocked by: ' . summarize_spam_progress($progress, TRUE);
+ $asap = isset($method['asap']);
+ $summary['ACTION'] = 'Blocked by: ' . summarize_spam_progress($progress, TRUE);
if (! $asap) {
- $footer['METRICS'] = summarize_spam_progress($progress);
+ $summary['METRICS'] = summarize_spam_progress($progress);
}
- $footer['COMMENT'] = $action;
- $footer['PAGE'] = '[blocked] ' . $page;
- $footer['URI'] = get_script_uri() . '?' . rawurlencode($page);
- $footer['USER_AGENT'] = TRUE;
- $footer['REMOTE_ADDR'] = TRUE;
- pkwk_mail_notify($notify_subject, var_export($target, TRUE), $footer);
+
+ $tmp = summarize_detail_badhost($progress);
+ if ($tmp != '') $summary['DETAIL_BADHOST'] = $tmp;
+
+ $tmp = summarize_detail_newtral($progress);
+ if (! $asap && $tmp != '') $summary['DETAIL_NEUTRAL_HOST'] = $tmp;
+
+ $summary['COMMENT'] = $action;
+ $summary['PAGE'] = '[blocked] ' . (is_pagename($page) ? $page : '');
+ $summary['URI'] = get_script_uri() . '?' . rawurlencode($page);
+ $summary['USER_AGENT'] = TRUE;
+ $summary['REMOTE_ADDR'] = TRUE;
+ pkwk_mail_notify($notify_subject, var_export($target, TRUE), $summary, TRUE);
}
?>