#!/bin/sh
# Copyright (c) 2007 Jeremie Le Hen <jeremie@le-hen.org>.  All rights reserved.
# Copyright (c) 2004, 2005
#     Stephan Schmieder <ssc@unix-geek.info>.  All rights reserved.
#
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions
# are met:
# 1. Redistributions of source code must retain the above copyright
#    notice, this list of conditions and the following disclaimer.
# 2. Redistributions in binary form must reproduce the above copyright
#    notice, this list of conditions and the following disclaimer in the
#    documentation and/or other materials provided with the distribution.
#
# THIS SOFTWARE IS PROVIDED BY STEPHAN SCHMIEDER AND CONTRIBUTORS ``AS IS'' AND
# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
# ARE DISCLAIMED.  IN NO EVENT SHALL STEPHAN SCHMIEDER OR CONTRIBUTORS BE LIABLE
# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
# OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
# HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
# SUCH DAMAGE.
#
# $Id: snort2pfmon,v 1.2 2007/11/21 07:35:58 tataz Exp $

ANCHOR='snort2pf'
INTERVAL=
COUNT=

PATH=/sbin:/bin:/usr/sbin:/usr/bin

show() {
	set -e
	for a in `pfctl -a $ANCHOR -s Anchor`; do
		print ${a##*/}
	done
	set +e
}

if [ $# -gt 0 ]; then
	# Interval.
	if expr "$1" : '[0-9][0-9]*$' > /dev/null; then
		INTERVAL="$1"
	fi
	# Count.
	if expr "$2" : '[0-9][0-9]*$' > /dev/null; then
		COUNT="$2"
	fi
fi

if [ -z "$INTERVAL" ]; then	
	show
	exit 0
fi

# Eheh, you won't bug me with cases throwed up by your twisted mind...
[ "$COUNT" -eq 0 ] && exit 0

i=0
while :; do
	echo "Hosts currently blocked by Snort2Pf:"
	show
	i=$(($i + 1))
	[ $i -lt $COUNT ] || break
	sleep $INTERVAL
	clear
done
exit 0
