// Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005 Yokogawa Electric Corporation,
// IPA (Information-technology Promotion Agency, Japan).
// All rights reserved.
// 
// Redistribution and use of this software in source and binary forms, with 
// or without modification, are permitted provided that the following 
// conditions and disclaimer are agreed and accepted by the user:
// 
// 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.
// 
// 3. Neither the names of the copyrighters, the name of the project which 
// is related to this software (hereinafter referred to as "project") nor 
// the names of the contributors may be used to endorse or promote products 
// derived from this software without specific prior written permission.
// 
// 4. No merchantable use may be permitted without prior written 
// notification to the copyrighters. However, using this software for the 
// purpose of testing or evaluating any products including merchantable 
// products may be permitted without any notification to the copyrighters.
// 
// 
// 
// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHTERS, THE PROJECT AND 
// CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING 
// BUT NOT LIMITED THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS 
// FOR A PARTICULAR PURPOSE, ARE DISCLAIMED.  IN NO EVENT SHALL THE 
// COPYRIGHTERS, THE PROJECT 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.
//
// $TAHI: ct/nd/sendNsBasicGlobLink.def,v 1.7 2001/10/05 06:39:12 masaxmasa Exp $

//----------------------------------------------------------------------
// echo request
//	TN(global) ==> NUT(link-local)
//----------------------------------------------------------------------
FEM_icmp6_echo_request(echo_request, _HETHER_tn2nut,
	{
	 _SRC(tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN));
	 _DST(nutv6());},
	{
	 payload=echo_data;
	}
)

//----------------------------------------------------------------------
// echo-reply
//	NUT(link-local) ==> TN(global)
//----------------------------------------------------------------------
FEM_icmp6_echo_reply(echo_reply, _HETHER_nut2tn,
	{
	 _SRC(nutv6());
	 _DST(tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN));
	},
	{
	 payload=echo_data;
	}
)

//----------------------------------------------------------------------
Payload echo_data {
	data=repeat(0x11,10);
}

//----------------------------------------------------------------------
// unicast NA
//	TN(global) ==> NUT(global)
//	target=TN(global)
//	r=0, s=1, o=1
//	w/ TLLA
//----------------------------------------------------------------------
FEM_icmp6_na(na_to_global, _HETHER_tn2nut,
	{
	 _SRC(tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN));
	 _DST(nut2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN));
	 HopLimit=255;
	},
	{
	 RFlag=0;
	 SFlag=1;
	 OFlag=1;
	 TargetAddress=tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN);
	 option=_TLLOPT_tn;
	}
)

//----------------------------------------------------------------------
// unicast NA
//	TN(global) ==> NUT(link-local)
//	target=TN(global)
//	r=0, s=1, o=1
//	w/ TLLA
//----------------------------------------------------------------------
FEM_icmp6_na(na_to_link, _HETHER_tn2nut,
	{
	 _SRC(tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN));
	 _DST(nutv6());
	 HopLimit=255;
	},
	{
	 RFlag=0;
	 SFlag=1;
	 OFlag=1;
	 TargetAddress=tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN);
	 option=_TLLOPT_tn;
	}
)

//----------------------------------------------------------------------
// multicast NS
//	NUT(global) ==> TN(solicited-node[global])
//	target=TN(global)
//	w/ SLLA
//----------------------------------------------------------------------
FEM_icmp6_ns(multicast_ns_from_global, _HETHER_nut2tnsolnode,
	{
	 _SRC(nut2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN));
	 _DST(_IPV6_SOLNODE_MCAST(
		tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN)));
	 HopLimit=255;
	},
	{
	 TargetAddress=tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN);
	 option=_SLLOPT_nut;
	}
)

//----------------------------------------------------------------------
// multicast NS
//	NUT(link-local) ==> TN(solicited-node[global])
//	target=TN(global)
//	w/ SLLA
//----------------------------------------------------------------------
FEM_icmp6_ns(multicast_ns_from_local, _HETHER_nut2tnsolnode,
	{
	 _SRC(nutv6());
	 _DST(_IPV6_SOLNODE_MCAST(
		tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN)));
	 HopLimit=255;
	},
	{
	 TargetAddress=tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN);
	 option=_SLLOPT_nut;
	}
)

//----------------------------------------------------------------------
// unicast NS
//	NUT(global) ==> TN(global)
//	target=TN(global)
//----------------------------------------------------------------------
FEM_icmp6_ns(unicast_ns_from_global, _HETHER_nut2tn,
	{
	 _SRC(nut2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN));
	 _DST(tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN));
	 HopLimit=255;
	},
	{
	 TargetAddress=tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN);
	}
)

//----------------------------------------------------------------------
// unicast NS
//	NUT(global) ==> TN(global)
//	target=TN(global)
//	w/ SLLA
//----------------------------------------------------------------------
FEM_icmp6_ns(unicast_ns_from_global_sll, _HETHER_nut2tn,
	{
	 _SRC(nut2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN));
	 _DST(tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN));
	 HopLimit=255;
	},
	{
	 TargetAddress=tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN);
	 option=_SLLOPT_nut;
	}
)

//----------------------------------------------------------------------
// unicast NS
//	NUT(link-local) ==> TN(global)
//	target=TN(global)
//----------------------------------------------------------------------
FEM_icmp6_ns(unicast_ns_from_link, _HETHER_nut2tn,
	{
	 _SRC(nutv6());
	 _DST(tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN));
	 HopLimit=255;
	},
	{
	 TargetAddress=tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN);
	}
)

//----------------------------------------------------------------------
// unicast NS
//	NUT(link-local) ==> TN(global)
//	target=TN(global)
//	w/ SLLA
//----------------------------------------------------------------------
FEM_icmp6_ns(unicast_ns_from_link_sll, _HETHER_nut2tn,
	{
	 _SRC(nutv6());
	 _DST(tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN));
	 HopLimit=255;
	},
	{
	 TargetAddress=tn2v6(_GLOBAL0_UCAST_PRFX, _GLOBAL0_UCAST_PRFXLEN);
	 option=_SLLOPT_nut;
	}
)

//----------------------------------------------------------------------
_HETHER_define(hether_x2allnode, ether(A0N_MAC_ADDR),
	v62ethermulti(v6(_ALLNODES_MCAST_ADDR)))
_SLLOPT_define(sllopt_x, ether(A0N_MAC_ADDR))

//----------------------------------------------------------------------
// multicast RA
//	X(link-local) ==> all-node
//	m=0, o=0
//	lifetime=600, reachableTime=0, retransTimer=0
//	w/ SLLA
//	w/ prefix
//		l=1, a=1
//		ValidLifetime=2592000, PreferredLifetime=604800
//----------------------------------------------------------------------
FEM_icmp6_ra(unsol_ra, hether_x2allnode,
	{
	 _SRC(v6ether(A0N_MAC_ADDR));
	 _DST(v6(_ALLNODES_MCAST_ADDR));
	 HopLimit=255;
	},
	{
	 CurHopLimit=0;
	 MFlag=0;
	 OFlag=0;
	 LifeTime=600;
	 ReachableTime=0;
	 RetransTimer=0;
         option=sllopt_x;
	 option=prefixopt_a;
	}
)

//----------------------------------------------------------------------
FEM_icmp6_ra(unsol_ra_clrrtr, hether_x2allnode,
	{
	 _SRC(v6ether(A0N_MAC_ADDR));
	 _DST(v6(_ALLNODES_MCAST_ADDR));
	 HopLimit=255;
	},
	{
	 CurHopLimit=0;
	 MFlag=0;
	 OFlag=0;
	 LifeTime=0;
	 ReachableTime=0;
	 RetransTimer=0;
	}
)

//----------------------------------------------------------------------
Opt_ICMPv6_Prefix prefixopt_a {
//      Type=3;
//      Length=4;
//      PrefixLength=_GLOBAL0_UCAST_PRFXLEN;
        LFlag=1;
        AFlag=1;        
//      Reserved1=ZERO; 
        ValidLifetime=2592000;
        PreferredLifetime=604800;
//      Reserved2=ZERO; 
        Prefix=v6(_GLOBAL0_UCAST_PRFX);
}

//----------------------------------------------------------------------