+++ /dev/null
-#!/usr/bin/perl
-# /usr/local/sbin/blocker.pl
-
-# Later we may increase the recent list
-# modprobe ipt_recent ip_list_tot=1000
-
-while (<>) {
- if ( /.*[1:1810:12].* -> ((d{1,3}.){3}d{1,3})/ )/ ) {
- system "echo $1 > /proc/net/ipt_recent/BLOCK";
- }
-}
\ No newline at end of file
--- /dev/null
+#!/usr/bin/python
+
+import sys,os,re
+#print sys.argv
+
+if len(sys.argv) < 2:
+ print 'Es wurden keine Parameter uebergeben.'
+ sys.exit()
+
+#os.system('modprobe ipt_recent ip_list_tot=1000')
+
+m = re.findall(r"[1-9]{1,1}[0-9]{0,2}\.[1-9]{1,1}[0-9]{0,2}\.[1-9]{1,1}[0-9]{0,2}\.[1-9]{1,1}[0-9]{0,2}", sys.argv[1])
+#print m
+os.system('echo %s > /proc/net/ipt_recent/BLOCK' % m[0])
destination console { usertty("root"); };
destination console_all { file("/dev/tty12"); };
-destination ids {program("/usr/local/sbin/blocker.pl"); );
+destination ids {program("/usr/sbin/blocker.py"); );
#destination loghost { tcp("10.0.0.1" port(514)); };
#log { source(src); destination(all); };
log { source(src); filter(f_ids); destination(ids); };
-log { source(src); filter(f_ssh); destination(ids); };
\ No newline at end of file
+log { source(src); filter(f_ssh); destination(ids); };
-mkdir -pv /etc/$(PKG_NAME)
cp -vf $(DIR_CONF)/$(PKG_NAME)/$(PKG_NAME).conf \
/etc/$(PKG_NAME)/$(PKG_NAME).conf
- cp -vf $(DIR_CONF)/$(PKG_NAME)/blocker.pl \
- /usr/local/sbin/blocker.pl
+ cp -vf $(DIR_CONF)/$(PKG_NAME)/blocker.py \
+ /usr/sbin/blocker.py
@rm -rf $(DIR_APP)
@$(POSTBUILD)