#!/usr/bin/perl
#
# $Copyright$
#
# $Id: initPMTU.seq,v 1.1.1.1 2000/10/31 22:39:04 sekiya Exp $

########################################################################
BEGIN { $V6evalTool::TestVersion = '$Name:  $'; }
use V6evalTool;
use PMTU;

%pktdesc = (
	frag1 => 'TN --Fragmented Echo Request 1st 800/1460-> NUT',
	frag2 => 'TN --Fragmented Echo Request 2nd 660/1460-> NUT',
	receive_reply => 'TN <-A Echo Reply-- NUT'
);

checkNUT(hostrouter);

$IF=Link0;

vCapture($IF);

$ret=initNUT();
if( $ret !=0) {
        vLog("NUT can not be initialized !!");
		vLog("FAIL");
        exit $V6evalTool::exitFail;
}
	
vSend($IF,frag1);

vSend($IF,frag2);

%ret=vRecv($IF,5,0,0,receive_reply);
if( $ret{status} !=0) {
        vLog("Can not receive Echo Reply !!");
		vLog("FAIL");
        exit $V6evalTool::exitFail;
}

vLog("Success: Initialized Path MTU of this path in NUT ");
vLog(OK);
exit $V6evalTool::exitPass;



########################################################################
__END__

=head1 NAME

	initPMTU - Verify that the NUT initialize Path MTU

=head1 TARGET

	Host

=head1 SYNOPSIS

	initPMTU.seq [-tooloption ...] -p initPMTU.def

=head1 NETWORK CONFIGURATION

	This test is OFF-LINK Network Configuration test.
	In this test, TN play a Roll of the Router.
	
	Phisical Network configuration
	
	---------------------------------------
		|		|
		NUT		TN



	Logical Network Configuration

				HOST A (globaladdress:A)
				|
	----------------------------------
			|
			Router
			|
	----------------------------------
		| 
		NUT (globaladdress:B)

	NUT < --- Router --- > HOST A

	In this configuration, Packets are send and received. 

	for example,
		In Logical
			HOST A           -- Echo Reply --> NUT
		Actually, in physical
			TN (as Router X) -- Echo Reply --> NUT

=head1 INITIALIZATION

	There are 2 patterns for initialize.	

	-- Test for host --

        The TN send a RA to assign global address prefix.

        TN              NUT

        -------------------

        ===multicast RA===>
        src=TN's link-local
        dst=LinkLocal-all-node                                                  
        M=0, O=0,
        Lifetime=3600, ReachableTime=60000, RetransTImer=1005
        Prefix:
           L=1, A=1,                       
           ValidLifetime=3600005, PreferredLifetime=3600005
           Prefix=3ffe:501:ffff:100::, PrefixLength=64                      
   
          Wait (5 sec.)
                 Ignoring DAD packets for global address.                 

	-- Test for router --

	TN attempt to execute remote command 'vRemote(route.rmt)'.
	
	'route add -inet6 3ffe:501:ffff:109 TN'slink-local-address' 

=head1 TEST PROCEDURE

	"initPMTU" verifies that the node sets Path MTU of a path
	 to the MTU of the first hop in the path.

	TN			NUT

	---------------------------

	1.
	After NUT is initialized ( reboot e.t.c) , NUT sets 
	the PMTU of a path to 1500 of Ether's Link MTU.

	2.
	TN send Echo Request which is fragmented.

	 === echo request 1st ===>


	 === echo request 2nd ===>

	3.
	<< JUDGMENT >>
	NUT send Echo Reply 

	 <=== echo reply ===


=head1 JUDGMENT

	<< PASS >>
		NUT send Echo Reply which is no fragmented.
		
		NUT's Path MTU sets 1500 which is Ether Link MTU.

	<< FAIL >>	
		NUT send Echo Reply which is fragmented.
		
		NUT can not initialize Path MTU of MTU.

		etc.


=head1 SEE ALSO

	  perldoc V6evalTool
	  perldoc V6evalRemote

=cut