Changeset 30

Timestamp:

02/16/05 08:59:16

Author:

tobias

Message:

Added link count moderation/blocking

Files:

• trunk/plugins/dnsbl/dnsbl.pl (modified) (11 diffs)
• trunk/plugins/dnsbl/tmpl/dnsbl.tmpl (modified) (1 diff)
• trunk/readme.txt (modified) (1 diff)

trunk/plugins/dnsbl/dnsbl.pl

@@ -44 +44 @@
-        caching_enabled cache_limit
-        headers_enabled headers_moderate headers_ignore
+        urlcount_enabled urlcount_moderate_limit urlcount_block_limit
-    );
-}
@@ -103 +104 @@
-        unless exists $data->{headers_ignore};
-
+    $data->{urlcount_enabled} = 0 unless exists $data->{urlcount_enabled};
+    $data->{urlcount_moderate_limit} = 5 unless exists $data->{urlcount_moderate_limit};
+    $data->{urlcount_block_limit} = 10 unless exists $data->{urlcount_block_limit};
+
-    $data->{proxycheck_enabled} = 0 unless exists $data->{proxycheck_enabled};
-    $data->{proxycheck_moderate} = 1 unless exists $data->{proxycheck_moderate};
@@ -114 +119 @@
-sub filter {
-    my ($eh, $app, $obj) = @_;
-
+
-    # pull these from user configuration settings...
-    my $data = $plugin->get_config_hash();
-
-
+, $nurls
-    if (ref $obj eq 'MT::Comment') {
-        return 1 unless $data->{comment_filter};
@@ -125 +130 @@
-
-        # comment
-
+, 0, \$nurls
-        push @urls, extract_urls($obj->url) if $obj->url;
-        $data->{source_url} = $obj->url;
@@ -147 +152 @@
-        $data->{__type} = 'Trackback ping';
-
-
-
+ || $data->{urlcount_enabled}
+, 0, \$nurls
-            push @urls, extract_urls($obj->source_url) if $obj->source_url;
-        }
@@ -154 +159 @@
-    }
-    $data->{__urls} = \@urls;
+    $data->{__nurls} = $nurls;
-
-    require MT::Blog;
@@ -177 +183 @@
-    push @tests, \&ipbl_check if $data->{ipbl_enabled};
-    push @tests, \&domainbl_check if $data->{domainbl_enabled};
+    push @tests, \&urlcount_check if $data->{urlcount_enabled};
-    push @tests, \&proxy_check if $data->{proxycheck_enabled};
-
@@ -400 +407 @@
-}
-
+sub urlcount_check {
+    my ($eh, $app, $obj, $data) = @_;
+
+    my $type = $data->{__type};
+    my $nurls = $data->{__nurls};
+    if($nurls >= $data->{urlcount_block_limit}) {
+        $eh->error("Blocking $type on blog "  . $obj->blog_id .
+                   " because of too many (" . $nurls .
+                   ") links");
+        return BLOCK;
+
+    }elsif($nurls >= $data->{urlcount_moderate_limit}) {
+        # what should we do for trackbacks?
+        if($type eq 'comment') {
+            $eh->error("Moderating $type on blog "  . $obj->blog_id .
+                       " because of many (" . $nurls .
+                       ") links");
+            return MODERATE;
+        }
+    }
+    return IGNORE;
+}
+
-sub cache_check {
-    my ($eh, $app, $obj, $data) = @_;
@@ -477 +507 @@
-
-sub extract_urls {
-
+, $total
-
-    # unmunge so we can see encoded urls as well
@@ -492 +522 @@
-        next unless @parts;
-        if (($domain =~ m/^\d+\.\d+\.\d+\.\d+$/) || ($domain =~ m/^\d+$/)) {
+            $$total++ if(defined($total));
-            next if $seen{$domain};
-            $seen{$domain} = 1;
@@ -498 +529 @@
-        }
-        return $domain if $single;
+        $$total++ if(defined($total));
-        my $last = $#parts;
-        my $start = length($parts[$last]) < 3 ? 2 : 1;

trunk/plugins/dnsbl/tmpl/dnsbl.tmpl

@@ -71 +71 @@
-    <hr />
-
+    <input onclick="toggle(this, 'urlcount_prefs')" value="1" type="checkbox" name="urlcount_enabled" id="urlcount_enabled" <TMPL_IF NAME=URLCOUNT_ENABLED>checked="checked"</TMPL_IF> /><label for="urlcount_enabled">Enable link count limits. Moderation/Blocking of comments/trackbacks based on the number of links. </label><br />
+    <div id="urlcount_prefs" class="sub-field" <TMPL_IF NAME=URLCOUNT_ENABLED>style="display: block"</TMPL_IF>>
+        <p>Moderation Limit. Comments with more links will be moderated automatically:<br />
+        <input type="text" name="urlcount_moderate_limit" value="<TMPL_VAR NAME=URLCOUNT_MODERATE_LIMIT ESCAPE=HTML>" />
+        </p>
+        <p>Block Limit. Comments/Trackbacks with more links will be blocked automatically:<br />
+        <input type="text" name="urlcount_block_limit" value="<TMPL_VAR NAME=URLCOUNT_BLOCK_LIMIT ESCAPE=HTML>" />
+        </p>
+
+    </div>
+
+    <hr />      
+
-    <input onclick="toggle(this, 'proxycheck_prefs')" value="1" type="checkbox" name="proxycheck_enabled" id="proxycheck_enabled" <TMPL_IF NAME=PROXYCHECK_ENABLED>checked="checked"</TMPL_IF> /><label for="proxycheck_enabled">Enable dynamic proxy checking. This involves a limited port scan for IPs that are not blacklisted. Not recommended if your web server cannot make outbound TCP/IP connections.</label><br />
-    <div id="proxycheck_prefs" class="sub-field" <TMPL_IF NAME=PROXYCHECK_ENABLED>style="display: block"</TMPL_IF>>

trunk/readme.txt

@@ -81 +81 @@
-      legitimate cases.
-
+    * Link count limitation. Moderate/Block comments and trackbacks
+      based on the number of links that appear in the message. 
-
-CREDITS