#!/bin/sh

################################################################################
##                                                                            ##
## Copyright (c) International Business Machines  Corp., 2005                 ##
##                                                                            ##
## This program is free software;  you can redistribute it and#or modify      ##
## it under the terms of the GNU General Public License as published by       ##
## the Free Software Foundation; either version 2 of the License, or          ##
## (at your option) any later version.                                        ##
##                                                                            ##
## This program is distributed in the hope that it will be useful, but        ##
## WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY ##
## or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License   ##
## for more details.                                                          ##
##                                                                            ##
## You should have received a copy of the GNU General Public License          ##
## along with this program;  if not, write to the Free Software               ##
## Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA    ##
##                                                                            ##
##                                                                            ##
################################################################################
#
# File:
#   tcp4-multi-diffport01
#
# Description:
#   Verify that the kernel is not crashed with multiple connection to the
#   different ports with the following condition:
#     - The version of IP is IPv4
#     - Network is not delayed
#     - IPsec is not used
#
#   *) This script may be read by the other test case
#
# Setup:
#   See testcases/network/stress/README
#
# Author:
#   Mitsuru Chinen <mitch@jp.ibm.com>
#
# History:
#	Oct 19 2005 - Created (Mitsuru Chinen)
#
#-----------------------------------------------------------------------
# Uncomment line below for debug output.
#trace_logic=${trace_logic:-"set -x"}
$trace_logic

# The test case ID, the test case count and the total number of test case
TCID=${TCID:-tcp4-multi-diffport01}
TST_TOTAL=1
TST_COUNT=1
export TCID
export TST_COUNT
export TST_TOTAL

# Test description
tst_resm TINFO "Verify that the kernel is not crashed with multiple connection to the different ports."

# Make sure the value of LTPROOT
LTPROOT=${LTPROOT:-`(cd ../../../../.. ; pwd)`}
export LTPROOT

# Check the environmanet variable
. check_envval || exit $TST_TOTAL

# Dulation of the test [sec]
NS_DURATION=${NS_DURATION:-3600}      # 1 hour

# Quantity of the connection for multi connection test
CONNECTION_TOTAL=${CONNECTION_TOTAL:-4000}

#The number of the test link where tests run
LINK_NUM=${LINK_NUM:-0}

# The version of IP
IP_VER=${IP_VER:-4}

# true, if ipsec is used
DO_IPSEC=${DO_IPSEC:-false}

# The value of SPI
SPI=${SPI:-1000}

# IPsec Protocol ( ah / esp / ipcomp )
IPSEC_PROTO=${IPSEC_PROTO:-ah}

# IPsec Mode ( transport / tunnel )
IPSEC_MODE=${IPSEC_MODE:-transport}

# true, if network is delayed
DO_NET_DELAY=${DO_NET_DELAY:-false}

# Amount of network delay [ms]
NET_DELAY=${NET_DELAY:-600}

# The deflection of network delay [ms]
NET_DELAY_DEFL=${NET_DELAY_DEFL:-200}


#-----------------------------------------------------------------------
#
# Function: do_cleanup
#
# Description:
#   Recover the system configuration
#
#-----------------------------------------------------------------------
do_cleanup()
{
    # Kill the tcp traffic server
    killall_tcp_traffic

    # Unset SAD/SPD
    output_ipsec_conf flush | setkey -c >/dev/null 2>&1
    $LTP_RSH $RHOST ${LTPROOT}/'testcases/bin/output_ipsec_conf flush | PATH=/sbin:/usr/sbin:$PATH setkey -c' >/dev/null 2>&1

    # Unset network delay
    if [ x$rhost_ifname = x ]; then
	rhost_ifname=`get_ifname rhost $LINK_NUM`
    fi
    $LTP_RSH $RHOST "PATH=/sbin:/usr/sbin:$PATH tc qdisc del dev $rhost_ifname root netem" >/dev/null 2>&1

    # Clean up each interface
    initialize_if lhost ${LINK_NUM}
    initialize_if rhost ${LINK_NUM}
}


#-----------------------------------------------------------------------
#
# Setup
#

# Unset the maximum number of processes
ulimit -u unlimited

# Output the informaion
tst_resm TINFO "- Test duration is $NS_DURATION [sec]"
tst_resm TINFO "- Target number of the connection is $CONNECTION_TOTAL"
tst_resm TINFO "- Version of IP is IPv${IP_VER}"

if $DO_NET_DELAY ; then
    message=`check_netem`
    if [ $? -ne 0 ]; then
	tst_resm TBROK "$message"
	exit 1
    fi
    tst_resm TINFO "- Network delay is ${NET_DELAY}ms +/- ${NET_DELAY_DEFL}ms"
fi

if $DO_IPSEC ; then
    message=`check_setkey`
    if [ $? -ne 0 ]; then
	tst_resm TBROK "$message"
	exit 1
    fi

    case $IPSEC_PROTO in
	ah)
	tst_resm TINFO "- IPsec [ AH / $IPSEC_MODE ]"
	;;
	esp)
	tst_resm TINFO "- IPsec [ ESP / $IPSEC_MODE ]"
	;;
	ipcomp)
	tst_resm TINFO "- IPcomp [ $IPSEC_MODE ]"
	;;
    esac
fi

# name of interface of the local/remote host
lhost_ifname=`get_ifname lhost $LINK_NUM`
if [ $? -ne 0 ]; then
    tst_resm TBROK "Failed to get the interface name at the local host"
    exit $TST_TOTAL
fi

rhost_ifname=`get_ifname rhost $LINK_NUM`
if [ $? -ne 0 ]; then
    tst_resm TBROK "Failed to get the interface name at the remote host"
    exit $TST_TOTAL
fi

# Initialize the system configuration
do_cleanup

# Call do_cleanup function before exit
trap do_cleanup 0

# Configurate IP addresses
case $IP_VER in
    4)
    # Network portion of the IPv4 address
    network_part=${IPV4_NETWORK:-"10.0.0"}

    # Netmask of the IPv4 network
    network_mask=24

    # Host portion of the IPv4 address
    lhost_host_part=${LHOST_IPV4_HOST:-"2"}     # local host
    rhost_host_part=${RHOST_IPV4_HOST:-"1"}     # remote host

    # Set IPv4 addresses to the interfaces
    set_ipv4addr lhost $LINK_NUM $network_part $lhost_host_part
    if [ $? -ne 0 ]; then
	tst_resm TBROK "Failed to add any IP address at the local host"
	exit 1
    fi
    set_ipv4addr rhost $LINK_NUM $network_part $rhost_host_part
    if [ $? -ne 0 ]; then
	tst_resm TBROK "Failed to add any IP address at the remote host"
	exit 1
    fi

    # IPv4 address of the local/remote host
    lhost_addr="${network_part}.${lhost_host_part}"
    rhost_addr="${network_part}.${rhost_host_part}"
    ;;

    6)
    # Network portion of the IPv6 address
    network_part="fd00:1:1:1"

    # Netmask of the IPv6 network
    network_mask=64

    # Host portion of the IPv6 address
    lhost_host_part=":2"     # local host
    rhost_host_part=":1"     # remote host

    # Set IPv6 addresses to the interfaces
    add_ipv6addr lhost $LINK_NUM $network_part $lhost_host_part
    if [ $? -ne 0 ]; then
	tst_resm TBROK "Failed to add any IP address at the local host"
	exit 1
    fi

    add_ipv6addr rhost $LINK_NUM $network_part $rhost_host_part
    if [ $? -ne 0 ]; then
	tst_resm TBROK "Failed to add any IP address at the remote host"
	exit 1
    fi

    # IPv6 address of the local/remote host
    lhost_addr="${network_part}:${lhost_host_part}"
    rhost_addr="${network_part}:${rhost_host_part}"
    ;;

    *)
    tst_resm TBROK "Unknown IP version"
    ;;
esac

# Make the network delay
if $DO_NET_DELAY ; then
    ret=`$LTP_RSH $RHOST 'PATH=/sbin:/usr/sbin:$PATH tc' qdisc add dev $rhost_ifname root netem delay ${NET_DELAY}ms ${NET_DELAY_DEFL}ms distribution normal' ; echo $?'`
    if [ $ret -ne 0 ]; then
	tst_resm TBROK "Failed to make the delayed network"
	exit 1
    fi
fi

# Configure SAD/SPD
if $DO_IPSEC ; then
    ipsec_log=`mktemp -p $TMPDIR`

    output_ipsec_conf src \
	$IPSEC_PROTO $IPSEC_MODE $SPI $lhost_addr $rhost_addr \
	    |  setkey -c 2>&1 | tee $ipsec_log
    if [ $? -ne 0 -o -s $ipsec_log ]; then
	tst_resm TBROK "Failed to configure SAD/SPD on the local host."
	rm -f $ipsec_log
	exit 1
    fi

    $LTP_RSH $RHOST ${LTPROOT}/testcases/bin/output_ipsec_conf dst $IPSEC_PROTO $IPSEC_MODE $SPI $lhost_addr $rhost_addr' | PATH=/sbin:/usr/sbin:$PATH setkey -c' 2>&1 | tee $ipsec_log
    if [ $? -ne 0 -o -s $ipsec_log ]; then
	tst_resm TBROK "Failed to configure SAD/SPD on the remote host."
	rm -f $ipsec_log
	exit 1
    fi
    rm -f $ipsec_log
fi

# Make sure the connectvity
case $IP_VER in
    4)
    ret=`$LTP_RSH $RHOST ${LTPROOT}/testcases/bin/check_icmpv4_connectivity $rhost_ifname $lhost_addr' ; echo $?'`
    if [ $ret -ne 0 ]; then
	tst_resm TBROK "There is no IPv4 connectivity."
	exit 1
    fi
    ;;

    6)
    ret=`$LTP_RSH $RHOST ${LTPROOT}/testcases/bin/check_icmpv6_connectivity $rhost_ifname $lhost_addr' ; echo $?'`
    if [ $ret -ne 0 ]; then
	tst_resm TBROK "There is no IPv6 connectivity."
	exit 1
    fi
    ;;
esac


#-----------------------------------------------------------------------
#
# Main
#
#

# Find the available consecutive ports
portbundle=`find_portbundle tcp 1025 $CONNECTION_TOTAL`
if [ $? -ne 0 ]; then
    tst_resm TBROK "No port is available."
    exit 1
fi

start_port=`echo $portbundle | cut -f 1 -d '-'`
end_port=`echo $portbundle | cut -f 2 -d '-'`

# Making connections
connection_num=0
current_port=$start_port
while [ $current_port -le $end_port ]; do
    # Run a server
    ns-tcpserver -b -f $IP_VER -p $current_port
    if [ $? -ne 0 ]; then
	# Failed to start no server
	if [ $connection_num -eq 0 ]; then
	    tst_resm TFAIL "Failed to run a server"
	    exit 1
	fi
	# Failed to start a server
	tst_resm TINFO "$connection_num seems the maximum number of the server"
	break
    fi

    # Run a clinet
    ret=`$LTP_RSH $RHOST ${LTPROOT}/testcases/bin/ns-tcpclient -b -f $IP_VER -S $lhost_addr -p $current_port' ; echo $?'`
    if [ $ret -ne 0 ]; then
	# Failed to start any client
	if [ $connection_num -eq 0 ]; then
	    tst_resm TFAIL "Failed to run any client."
	    exit 1
	fi
	# Failed to start a client
	tst_resm TINFO "$connection_num seems the maximum number of the client"
	break
    fi

    current_port=`expr $current_port + 1`
    connection_num=`expr $connection_num + 1`
done


# Watch the TCP traffic server
start_epoc=`date +%s`
while true ; do
    current_epoc=`date +%s`
    elapse_epoc=`expr $current_epoc - $start_epoc`
    if [ $elapse_epoc -ge $NS_DURATION ]; then
	killall -SIGHUP ns-tcpserver
	break
    else
	ps auxw | fgrep -v grep | fgrep -l ns-tcpserver >/dev/null 2>&1
	if [ $? -ne 0 ]; then
	    tst_resm TFAIL "All tcp traffic servers are dead in $elapse_epoc [sec]"
	    exit 1
	fi
    fi
    sleep 1
done

#-----------------------------------------------------------------------
#
# Clean up
#

tst_resm TPASS "Test is finished successfully."
exit 0