#!/usr/bin/perl # # Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 # Yokogawa Electric Corporation. # 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. # # 5. The copyrighters, the project and the contributors may prohibit # the use of this software at any time. # # 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: dhcpv6.p2/rfc3736/S_RFC3736_5.2_SLDHCPRelaySvr.seq,v 1.2 2007/02/20 07:08:53 hide Exp $ ######################################################################## BEGIN { $V6evalTool::TestVersion = '$Name: DHCPv6_Self_Test_P2_1_0_14 $'; } use strict; use V6evalTool; use lib '../.'; use DHCPv6_common; use Server_pktdesc; dhcpExitNS if ChkFuncSupport('STATELESSDHCP'); #--------------------------------------------------------------# # Initialization #--------------------------------------------------------------# vLogHTML('==== NUT Initialization ====
'); my $IF0 = "Link0"; my $IF1 = "Link1"; my %NUT_Server_Config = ( 'if_nut0'=> "$V6evalTool::NutDef{Link0_device}", 'init_opcode' => "vRemote(\"dhcp6s.rmt\", \"start\",\"link0=$V6evalTool::NutDef{Link0_device}\",\"stateless\",\"dns=3ffe:501:ffff:100:200:ff:fe00:3f3e\",\"valduid=$DUID_CLIENT\")" ); dhcpSvrInitS(\%NUT_Server_Config); vClear($IF0); #--------------------------------------------------------------# # Main Procedure #--------------------------------------------------------------# vLogHTML('==== Creation and Transmission of Relay Reply Messages #1 ====
'); # set Options $CID_OPTION = "opt_CID_LLT_client1"; $OptionRequest_OPTION = "opt_ORO_dns_servers"; $ElapsedTime_OPTION = "opt_ElapsedTime"; # send DHCPv6 Relay Forward Message(Solicit) my($ret1, %rfsol1) = send_relay_forward($IF0, "relayforward_infomationrequest_client1_to_alldhcp_send"); if (0 != $ret1){ dhcpExitFail(); } # wait for DHCPv6 Relay Reply Message(reply) my ($ret2, %rrrep2) = wait_for_relay_reply_reply($IF0, 5); if (0 != $ret2){ dhcpExitFail(); } if(0!= options_exist(\%rrrep2,$CMP_RELAYMSG)){ dhcpExitError("The expected Relay Message option can not be found."); } my $option_base = "Frame_Ether.Packet_IPv6.Upp_UDP.Udp_DHCPv6_RelayReply.Opt_DHCPv6_RelayMessage"; my $option_code = $option_base."."."Code"; my $option_len = $option_base."."."Length"; my $option_message_type = $option_base."."."Udp_DHCPv6_Reply"; if(defined $rrrep2{$option_base}){ vLogHTML(" Relay Message option Code = $rrrep2{$option_code}
"); vLogHTML(" Relay Message option Length = $rrrep2{$option_len}
"); vLogHTML(" Relay Message option DHCP-relqy-message = $rrrep2{$option_message_type}
"); } #------------------------------------------------------------------- vLogHTML("The Message exchange is correct
"); #------------------------------------------------------------------- vClear($IF0); vStop($IF0); dhcpExitPass(); #NOTREACHED ######################################################################## __END__ =head1 NAME S_RFC3736_5.2_SLDHCPRelaySvr.seq - Checking Relay Message Option =head1 TARGET Server =head1 SYNOPSIS =begin html 
 S_RFC3736_5.2_SLDHCPRelaySvr.seq [-tooloption ...]
 -pkt S_RFC3736_5.2_SLDHCPRelaySvr.def 
 -tooloption: v6eval tool option
See Also  DHCPv6.def
=head1 INITIALIZATION =begin html
  • Network Topology
                TN(Client1)
                   |
Link1 -------------+-------+-------------- 3ffe:501:ffff:101::/64
                           |
                         TN (Relay1)
                           |
Link0 ---------------------+---------+--- 3ffe:501:ffff:100::/64
                                     |
                                 NUT(Server1)
  • Verification Points
    •        
      
Relay-reply Message Format
      
   The format of the Relay Message option is:
      
       0                   1                   2                   3
       0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1
      +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
      |        OPTION_RELAY_MSG       |           option-len          |
      +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
      |                                                               |
      .                       DHCP-relay-message                      .
      .                                                               .
      .                                                               .
      +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
      
    • msg-type
      • 
          RELAY-REPL(13)
      
    • transaction-id
      • 
	  Any
      
    • Server ID option
      • 
	  Any
      
    • Client ID option
      • 
	  Any
      
    • Relay Message option
      • 
	      
        
			
      • option-code
        • 
			OPTION_RELAY_MSG (9)
			
      • option-len
        • 
			Length of DHCP-relay-message
			
      • DHCP-relay-message
        • 
			In a Relay-forward message, the received
                    message, relayed verbatim to the next relay agent
                    or server; in a Relay-reply message, the message to
                    be copied and relayed to the relay agent or client
                    whose address is in the peer-address field of the
                    Relay-reply message
  • Configuration
    • Device Name Device Type I/F Assigned Prefix Link Local Addr MAC Addr
    Server1 NUT Link0 3ffe:501:ffff:100::/64 NUT's Linklocal address NUT's MAC address
    Relay1(Link1) TN Link1 3ffe:501:ffff:101::/64 fe80::200:ff:fe00:a2a2 00:00:00:00:a2:a2
    Relay1(Link0) TN Link0 3ffe:501:ffff:100::/64 fe80::200:ff:fe00:a4a4 00:00:00:00:a4:a4
    Client1 TN Link1 3ffe:501:ffff:101::/64 fe80::200:ff:fe00:a2a2 00:00:00:00:a2:a2
=end html =head1 TEST PROCEDURE =begin html 
       NUT     TN(Relay1)  TN(Client1)
        |       |           |
        |       |           |     initialize NUT (as a stateless DHCPv6 Server)
        |       | <----     |     Information-request 
        | <---- |           |     Relay-forward (Information-request)
        | ----> |           |     Relay-reply (Reply w/Relay Message option)  (*1)
        |       |           |
=end html =head1 JUDGEMENT 
(*1)PASS:  The server returns the Relay-reply message, it includes Relay Message option.
=head1 TERMINATION N/A =head1 REFERENCE =begin html 
   see also RFC3315
   22.10. Relay Message Option

   see also RFC3736
   5.2.  Options Required for Stateless DHCP Service
=end html =head1 SEE ALSO perldoc V6evalTool =cut