
#-----------------------------------------------------------------------
# CHANGES
#-----------------------------------------------------------------------
#
# 2001-02-07  Jean-Sebastien Morisset <jsmoriss@mvlan.net>
#             Replaced ipchain rules by Accept_Hostports function.
# 2000-12-06  Jean-Sebastien Morisset <jsmoriss@mvlan.net>
#             Initial module written for v5.1.
#
#-----------------------------------------------------------------------
# MODULE CONFIGURATION
#-----------------------------------------------------------------------
#
#m# 3
#i# cluster novirtual
#
#-----------------------------------------------------------------------
# START OF MODULE CODE
#-----------------------------------------------------------------------

pasvhosts="`Option_Value accept $INTOPT ftppasv servers`"
actvhosts="`Option_Value accept $INTOPT ftpactv servers`"

hostlist="`{
	for host in $pasvhosts $actvhosts
	do
		echo $host
	done
} | sort -u`"

unset pasvhosts actvhosts

hostlist="`echo $hostlist | sed 's/^.*\(any\/0\).*$/\1/'`"

for host in $hostlist
do
	Hostports accept remote tcp "FTP" $host ftp
done
unset hostlist host

