//
// $Copyright$
//
// $Id: SAD_a_prm_prb_LLA.def,v 1.1.1.1 2000/10/31 22:38:50 sekiya Exp $

#include "icmp.def"


FEM_hdr_ipv6_exth(
        ipv6_tn2nut_unknown_nextheader_LLA,
        _HETHER_tn2nut,
        {
                _SRC(tnv6());
                _DST(nutv6());
        },
        {
                header = _HDR_IPV6_NAME(ipv6_tn2nut_unknown_nextheader_LLA);
                exthdr = _dst;
                upper = apl;
        }
)

Hdr_Destination _dst {
        NextHeader = 128;
        option = _Pad6;
}

Opt_PadN _Pad6 {
        pad = {0,0,0,0};
}

// ICMP error from NUT

FEM_icmp6_parameter_problem(
        parameter_problem_nut2tn_LLA_code_1_pointer_fourty,
        _HETHER_nut2tn,
        {
                _SRC(nutv6());
                _DST(tnv6());
        },
        {
                Code = 1;       // unrecognized Next Header type encounted
                Pointer = 40;
                payload = err;
        }
)

////////////////////////////////////////////////////////////////////////
// data
//

Payload apl {
        data = {};
}

Payload err {
        data = right(_PACKET_IPV6_NAME(ipv6_tn2nut_unknown_nextheader_LLA), 0);
}


FEM_udp(
	ipv6_udp_tn2nut_unknown_port,
	_HETHER_tn2nut,
		{
		_SRC(tnv6());
		_DST(nutv6());
	},
		{
		SourcePort=8000;
		DestinationPort=8000;
	},
	ping_data
)
	
FEM_icmp6_destination_unreachable(
	destination_unreachable_nut2tn_any_code_four,
	_HETHER_nut2tn,
		{
		_SRC(NUT_ONEOF_ADDRESSES);
		_DST(TN_ONEOF_ADDRESSES);
	},
		{
		Code = 4;
		payload = any;
	}
)