packetgen 2.4.0 → 2.5.0

data/lib/packetgen/header/ospfv3/hello.rb

@@ -0,0 +1,104 @@
+# This file is part of PacketGen
+# See https://github.com/sdaubert/packetgen for more informations
+# Copyright (C) 2016 Sylvain Daubert <sylvain.daubert@laposte.net>
+# This program is published under MIT license.
+
+# frozen_string_literal: true
+
+module PacketGen
+  module Header
+    class OSPFv3
+
+      # This class handles {OSPFv3 OSPFv3} HELLO packets payload. The HELLO
+      # payload has the following format:
+      #    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
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |                        Interface ID                           |
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   | Rtr Priority  |             Options                           |
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |        HelloInterval          |       RouterDeadInterval      |
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |                   Designated Router ID                        |
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |                Backup Designated Router ID                    |
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |                         Neighbor ID                           |
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |                        ...                                    |
+      # A HELLO payload consists of:
+      # * a {#interface_id} field ({Types::Int32}),
+      # * a {#priority} field ({Types::Int8}),
+      # * an {#options} field ({Types::Int24}),
+      # * a {#hello_interval} field ({Types::Int16}),
+      # * a {#dead_interval} field ({Types::Int16}),
+      # * a {#designated_router} field ({IP::Addr}),
+      # * a {#backup_designated_router} field ({IP::Addr}),
+      # * a {#neighbors} array containing neighbors as {IP::Addr}.
+      #
+      # == Create a HELLO payload
+      #   # standalone
+      #   hello = PacketGen::Header::OSPFv3::Hello.new
+      #   # in a packet
+      #   pkt = PacketGen.gen('IPv6', src: source_ip).add('OSPFv3').add('OSPFv3::Hello')
+      #   # make IPv6 header correct for OSPF
+      #   pkt.ospfize
+      #   # access to Hello payload
+      #   pkt.ospfv3_hello    # => PacketGen::Header::OSPFv3::Hello
+      #
+      # == HELLO attributes
+      #   hello.interface_id = 1
+      #   hello.priority = 1
+      #   # set options. Options may also be set one by one with #v6_opt, #e_opt,
+      #   # #n_opt, #r_opt and #dc_opt
+      #   hello.options = 0x33
+      #   hello.hello_interval = 10
+      #   hello.dead_interval = 300
+      #   hello.designated_router = '0.0.0.1'
+      #   hello.backup_designated_router = '0.0.0.2'
+      #   # set neighbors identifiers
+      #   hello.neighbors << '1.1.1.1'
+      #   hello.neighbors << '2.2.2.2'
+      # @author Sylvain Daubert
+      class Hello < Base
+        # @!attribute interface_id
+        #  The network mask associated with this interface.
+        #  @return [String]
+        define_field :interface_id, Types::Int32
+        # @!attribute priority
+        #  This router's Router Priority.  Used in (Backup) Designated
+        #  Router election.
+        #  @return [Integer]
+        define_field :priority, Types::Int8
+        # @!macro define_ospfv3_options
+        OSPFv3.define_options(self)
+        # @!attribute hello_interval
+        #  The number of seconds between this router's Hello packets.
+        #  @return [Integer]
+        define_field :hello_interval, Types::Int16
+        # @!attribute dead_interval
+        #  The number of seconds before declaring a silent router down.
+        #  @return [Integer]
+        define_field :dead_interval, Types::Int16
+        # @!attribute designated_router
+        #  The identity of the Designated Router for this network, in the
+        #  view of the sending router.
+        #  @return [String]
+        define_field :designated_router, IP::Addr
+        # @!attribute backup_designated_router
+        #  The identity of the Backup Designated Router for this network,
+        #  in the view of the sending router.
+        #  @return [String]
+        define_field :backup_designated_router, IP::Addr
+        # @!attribute neighbors
+        #  Array of neighbors
+        #  @return [IP::ArrayOfAddr]
+        define_field :neighbors, IP::ArrayOfAddr
+      end
+    end
+    
+    self.add_class OSPFv3::Hello
+    OSPFv3.bind_header OSPFv3::Hello, type: OSPFv3::TYPES['HELLO']
+  end
+end

data/lib/packetgen/header/ospfv3/ipv6_prefix.rb

@@ -0,0 +1,103 @@
+# This file is part of PacketGen
+# See https://github.com/sdaubert/packetgen for more informations
+# Copyright (C) 2016 Sylvain Daubert <sylvain.daubert@laposte.net>
+# This program is published under MIT license.
+
+# frozen_string_literal: true
+
+module PacketGen
+  module Header
+    class OSPFv3
+
+      # Array of 32-bit words.
+      # @author Sylvain Daubert
+      class ArrayOfInt32 < Types::Array
+        set_of Types::Int32
+      end
+
+      # This class handles IPv6 prefixes, as defined in RFC 5340 §A.4.1.
+      # A IPv6 prefix consists of:
+      # * a 8-bit {#length} field (length of the prefix, in bits),
+      # * a 8-bit {#options} field, giving prefix capabilities,
+      # * a 16-bit {#reserved} field (but it may be used in some LSA),
+      # * and an array of 32-bit words to encode prefix itself ({#prefix}). This
+      #   array consumes ((PrefixLength + 31) / 32) 32-bit words.
+      # @author Sylvain Daubert
+      class IPv6Prefix < Types::Fields
+        # @!attribute length
+        #  Prefix length, in bits
+        #  @return [Integer]
+        define_field :length, Types::Int8
+        # @!attribute options
+        #  Prefix capabilities. See also capability bits: {#dn_opt}, {#p_opt},
+        #  {#la_opt} and {#nu_opt}.
+        #  @return [Options]
+        define_field :options, Types::Int8
+        # @!attribute reserved
+        #  Reserved field in most of LSA types.
+        #  @return [Integer]
+        define_field :reserved, Types::Int16
+        # @!attribute prefix
+        #  IPv6 Prefix as an array of 32-bit words
+        #  @return [Prefix]
+        define_field :prefix, ArrayOfInt32
+
+        # @!attribute dn_opt
+        #  This bit controls an inter-area-prefix-LSAs or AS-external-LSAs
+        #  re-advertisement in a VPN environment.
+        #  @return [Boolean]
+        # @!attribute p_opt
+        #  The "propagate" bit.  Set on NSSA area prefixes that should be
+        #  readvertised by the translating NSSA area border.
+        #  @return [Boolean]
+        # @!attribute la_opt
+        #  The "local address" capability bit.  If set, the prefix is
+        #  actually an IPv6 interface address of the Advertising Router.
+        #  @return [Boolean]
+        # @!attribute nu_opt
+        #  The "no unicast" capability bit.  If set, the prefix should be
+        #  excluded from IPv6 unicast calculations.
+        #  @return [Boolean]
+        define_bit_fields_on :options, :zz, 3, :dn_opt, :p_opt, :z, :la_opt, :nu_opt
+
+        # Get human-readable prefix
+        # @return [String]
+        def to_human
+          ary = prefix.map(&:to_i).map do |v|
+            "#{((v>>16) & 0xffff).to_s(16)}:#{(v & 0xffff).to_s(16)}"
+          end
+          pfx = ary.join(':')
+          pfx += '::' if prefix.size < (128/32)
+          "#{IPAddr.new(pfx).to_s}/#{length}"
+        end
+        
+        # Set prefix from a human-readable string. This method cannot set
+        # {#options} field.
+        # @param [String] str
+        # @return [void]
+        def from_human(str)
+          pfx, len = str.split('/')
+          len = (len || 128).to_i
+          addr = IPv6::Addr.new.from_human(pfx)
+          ary_size = (len + 31) / 32
+          ary = addr.to_a[0...ary_size*2]
+          self.prefix.clear
+          ary.each_with_index do |v, i|
+            if i % 2 == 0
+              self.prefix << v
+            else
+              self.prefix.last.value = (self.prefix.last.to_i << 16) | v.to_i
+            end
+          end
+          self.length = len
+        end
+      end
+      
+      # Array of {IPv6Prefix}
+      # @author Sylvain Daubert
+      class ArrayOfIPv6Prefix < Types::Array
+        set_of IPv6Prefix
+      end
+    end
+  end
+end

data/lib/packetgen/header/ospfv3/ls_ack.rb

@@ -0,0 +1,51 @@
+# This file is part of PacketGen
+# See https://github.com/sdaubert/packetgen for more informations
+# Copyright (C) 2016 Sylvain Daubert <sylvain.daubert@laposte.net>
+# This program is published under MIT license.
+
+# frozen_string_literal: true
+
+module PacketGen
+  module Header
+    class OSPFv3
+
+      # This class handles {OSPFv3 OSPFv3} Link State Acknownledgment packets
+      # payload. The LSAck payload has the following format:
+      #    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
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |                                                               |
+      #   +-                                                            +-+
+      #   |                             LSAs                              |
+      #   +-                                                            +-+
+      #   |                              ...                              |
+      #
+      # This paylod is implemented with only one field:
+      # * {#lsas}, an {ArrayOfLSA} object.
+      #
+      # == Create a LSAck payload
+      #   # standalone
+      #   lsack = PacketGen::Header::OSPFv3::LSAck.new
+      #   # in a packet
+      #   pkt = PacketGen.gen('IPv6', src: source_ip).add('OSPFv3').add('OSPFv3::LSAck')
+      #   # access to LSAck payload
+      #   lasck = pkt.ospfv3_lsack    # => PacketGen::Header::OSPFv3::LSAck
+      #
+      # == Adding LSA headers to a LSAck payload
+      #   lsack.lsas << { type: 'Router', age: 40, link_state_id: '0.0.0.1', advertising_router: '1.1.1.1', sequence_number: 42, checksum: 0x1234, length: 56 }
+      #   # a header may also be set from an existing lsa
+      #   lasck.lsas << existing_lsa.to_lsa_header
+      # @author Sylvain Daubert
+      class LSAck < Base
+        # @!attribute lsas
+        #  Array of {LSA LSAs}
+        #  @return [ArrayOfLSA]
+        define_field :lsas, ArrayOfLSA,
+                     builder: ->(h, t) { t.new(only_headers: true) }
+      end
+    end
+
+    self.add_class OSPFv3::LSAck
+    OSPFv3.bind_header OSPFv3::LSAck, type: OSPFv3::TYPES['LS_ACK']
+  end
+end

data/lib/packetgen/header/ospfv3/ls_request.rb

@@ -0,0 +1,108 @@
+# This file is part of PacketGen
+# See https://github.com/sdaubert/packetgen for more informations
+# Copyright (C) 2016 Sylvain Daubert <sylvain.daubert@laposte.net>
+# This program is published under MIT license.
+
+# frozen_string_literal: true
+
+module PacketGen
+  module Header
+    class OSPFv3
+
+      # This class handle LSA requests, as used in {LSRequest} payloads.
+      # The LSA request payload has the following format:
+      #   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
+      #  +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #  |              0                |        LS Type                |
+      #  +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #  |                         Link State ID                         |
+      #  +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #  |                       Advertising Router                      |
+      #  +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #
+      # It is composed of:
+      # * a 16-bit {#reserved} field,
+      # * a 16-bit {#type} field,
+      # * a 32-bit {#link_state_id} field,
+      # * and a 32-bit {#advertising_router} field.
+      # @author Sylvain Daubert
+      class LSR < Types::Fields
+        # @!attribute reserved
+        #  reserved field.
+        #  @return [Integer]
+        define_field :reserved, Types::Int16, default: 0
+        # @!attribute type
+        #  The type of the LSA to request.
+        #  @return [Integer]
+        define_field :type, Types::Int16Enum, enum: LSAHeader::TYPES
+        # @!attribute link_state_id
+        #  This field identifies the portion of the internet environment
+        #  that is being described by the LSA to request.
+        #  @return [String]
+        define_field :link_state_id, IP::Addr
+        # @!attribute advertising_router
+        #  The Router ID of the requested LSA.
+        #  @return [String]
+        define_field :advertising_router, IP::Addr
+
+        # Get human-readable type
+        # @return [String]
+        def human_type
+          self[:type].to_human
+        end
+
+        # @return [String]
+        def to_human
+          "LSR<#{human_type},#{link_state_id},#{advertising_router}>"
+        end
+      end
+      
+      # This class defines a specialized {Types::Array array} to handle series
+      # of {LSR LSRs}.
+      # @author Sylvain Daubert
+      class ArrayOfLSR < Types::Array
+        set_of LSR
+      end
+
+      # This class handles {OSPFv3 OSPFv3} Link State Request packets
+      # payload. The LSR payload has the following format:
+      #    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
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |              0                |        LS Type                |
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |                       Link State ID                           |
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |                     Advertising Router                        |
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |                              ...                              |
+      #
+      # This paylod is implemented as a unique field: {#lsrs}, which is an
+      # {ArrayOfLSR} object.
+      #
+      # == Create a LSRequest payload
+      #   # standalone
+      #   lsr = PacketGen::Header::OSPFv3::LSRequest.new
+      #   # in a packet
+      #   pkt = PacketGen.gen('IPv6', src: source_ip).add('OSPFv3').add('OSPFv3::LSRequest')
+      #   # make IPv6 header correct for OSPF
+      #   pkt.ospfize
+      #   # access to LSRequest payload
+      #   pkt.ospfv3_lsrequest    # => PacketGen::Header::OSPFv3::LSRequest
+      #
+      # == Add LSA requests to a LSRequest
+      #   lsr.lsrs << { type: 'Router', link_state_id: '0.0.0.1', advertising_router: '1.1.1.1'}
+      # @author Sylvain Daubert
+      class LSRequest < Base
+        # @!attribute lsrs
+        #  Array of {LSR}
+        #  @return [ArrayOfLSR]
+        define_field :lsrs, ArrayOfLSR
+      end
+    end
+
+    self.add_class OSPFv3::LSRequest
+    OSPFv3.bind_header OSPFv3::LSRequest, type: OSPFv3::TYPES['LS_REQUEST']
+  end
+end

data/lib/packetgen/header/ospfv3/ls_update.rb

@@ -0,0 +1,74 @@
+# This file is part of PacketGen
+# See https://github.com/sdaubert/packetgen for more informations
+# Copyright (C) 2016 Sylvain Daubert <sylvain.daubert@laposte.net>
+# This program is published under MIT license.
+
+# frozen_string_literal: true
+
+module PacketGen
+  module Header
+    class OSPFv3
+
+      # This class handles {OSPFv3 OSPFv3} Link State Update packets
+      # payload. The LSU payload has the following format:
+      #    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
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |                            # LSAs                             |
+      #   +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+      #   |                                                               |
+      #   +-                                                            +-+
+      #   |                             LSAs                              |
+      #   +-                                                            +-+
+      #   |                              ...                              |
+      #
+      # This paylod is implemented with two fields:
+      # * {#lsas_count}, a {Types::Int32} field,
+      # * and {#lsas}, an {ArrayOfLSA} object.
+      #
+      # == Create a LSUpdate payload
+      #   # standalone
+      #   lsu = PacketGen::Header::OSPFv3::LSUpdate.new
+      #   # in a packet
+      #   pkt = PacketGen.gen('IPv6', src: source_ip).add('OSPFv3').add('OSPFv3::LSUpdate')
+      #   # make IPv6 header correct for OSPF
+      #   pkt.ospfize
+      #   # access to LSUpdate payload
+      #   lsu = pkt.ospfv3_lsupdate    # => PacketGen::Header::OSPFv3::LSUpdate
+      #
+      # == Add LSAs to a LSUpdate payload
+      # Adding LSAs with {ArrayOfLSA#<< ArrayOfLSA#<<} automagically update
+      # {#lsas_count}. To not update it, use {ArrayOfLSA#push ArrayOfLSA#push}.
+      #   lsu.lsas << { type: 'Router', age: 40, link_state_id: '0.0.0.1', advertising_router: '1.1.1.1', sequence_number: 42 }
+      #   lsu.lsas_count     #=> 1
+      #   # add a link to Router LSA
+      #   lsu.lsas.first.links << { type: 1, metric: 10, interface_id: 1, neighbor_interface_id: 2, neighbor_router_id: '2.2.2.2'}
+      # @author Sylvain Daubert
+      class LSUpdate < Base
+        # @!attribute lsas_count
+        #  Count of LSAs included in this update
+        #  @return [Integer]
+        define_field :lsas_count, Types::Int32
+        # @!attribute lsas
+        #  Array of {LSA LSAs}
+        #  @return [ArrayOfLSA]
+        define_field :lsas, ArrayOfLSA,
+                     builder: ->(h, t) { t.new(counter: h[:lsas_count]) }
+        
+        # Calculate checksums of all LSAs
+        # @return [void]
+        def calc_checksum
+          lsas.each { |lsa| lsa.calc_checksum }
+        end
+        
+        # Calculate length of all LSAs
+        def calc_length
+          lsas.each { |lsa| lsa.calc_length }
+        end
+      end
+    end
+
+    self.add_class OSPFv3::LSUpdate
+    OSPFv3.bind_header OSPFv3::LSUpdate, type: OSPFv3::TYPES['LS_UPDATE']
+  end
+end

data/lib/packetgen/header/ospfv3/lsa.rb

@@ -0,0 +1,252 @@
+# This file is part of PacketGen
+# See https://github.com/sdaubert/packetgen for more informations
+# Copyright (C) 2016 Sylvain Daubert <sylvain.daubert@laposte.net>
+# This program is published under MIT license.
+
+# frozen_string_literal: true
+
+module PacketGen
+  module Header
+    class OSPFv3
+
+      # This class handles links in a {LSARouter OSPFv3 LSA router payload}.
+      # @author Sylvain Daubert
+      class Link < Types::Fields
+        # @!attribute type
+        #  @return [Integer]
+        define_field :type, Types::Int8
+        # @!attribute reserved
+        #  @return [Integer]
+        define_field :reserved, Types::Int8, default: 0
+        # @!attribute metric
+        #  @return [Integer]
+        define_field :metric, Types::Int16
+        # @!attribute interface_id
+        #  @return [Integer]
+        define_field :interface_id, Types::Int32
+        # @!attribute neighbor_interface_id
+        #  @return [Integer]
+        define_field :neighbor_interface_id, Types::Int32
+        # @!attribute neighbor_router_id
+        #  @return [String]
+        define_field :neighbor_router_id, IP::Addr
+
+        # @return [String]
+        def to_human
+          "Link<type:#{type},metric:#{metric},id:#{interface_id}," \
+          "neighbor_id:#{neighbor_interface_id},neighbor_router:#{neighbor_router_id}>"
+        end
+      end
+
+      # This class defines a specialized {Types::Array array} to handle series
+      # of {Link Links}.
+      # @author Sylvain Daubert
+      class ArrayOfLink < Types::Array
+        set_of Link
+      end
+
+      # This class handles unsupported {OSPFv3 OSPFv3} LSA payloads.
+      # A LSA payload is a {LSAHeader} with a {#body} field.
+      # @author Sylvain Daubert
+      class LSA < LSAHeader
+        # @!attribute body
+        #  LSA body
+        #  @return [String]
+        define_field :body, Types::String,
+                     builder: ->(h,t) { t.new(length_from: ->() { h.length - 20 }) }
+      end
+
+      # This class handles OSPFv3 LSA Router payloads.
+      #
+      # A LSA router payload is composed of:
+      # * a header (see methods inherited from {LSAHeader}),
+      # * a 8-bit flag word {#flags} ({Types::Int8}),
+      # * a 24-bit {#options} field ({Types::Int24}),
+      # * and an array of {#links} ({ArrayOfLink}).
+      # @author Sylvain Daubert
+      class LSARouter < LSAHeader
+        # @attribute flags
+        #  8-bit flag word
+        #  @return [Integer]
+        define_field :flags, Types::Int8
+        # @!macro define_ospfv3_options
+        OSPFv3.define_options(self)
+        # @attribute links
+        #  @return [ArrayOfLink]
+        define_field :links, ArrayOfLink
+
+        # @!attribute nt_flag
+        #  @return [Boolean]
+        # @!attribute v_flag
+        #  @return [Boolean]
+        # @!attribute e_flag
+        #  @return [Boolean]
+        # @!attribute b_flag
+        #  @return [Boolean]
+        define_bit_fields_on :flags, :zz, 3, :nt_flag, :x_flag, :v_flag, :e_flag,
+                             :b_flag
+      end
+
+      # This class handles OSPFv3 LSA Network payloads.
+      #
+      # A LSA network payload is composed of:
+      # * a header (see methods inherited from {LSAHeader}),
+      # * a 8-bit {#reserved} field,
+      # * a 24-bit {#options} field,
+      # * and an array of router IDs ({#routers}, {IP::ArrayOfAddr}).
+      # @author Sylvain Daubert
+      class LSANetwork < LSAHeader
+        # @!attribute reserved
+        #  @return [Integer]
+        define_field :reserved, Types::Int8
+        # @!macro define_ospfv3_options
+        OSPFv3.define_options(self)
+        # @!attribute routers
+        #  List of routers attached to the link.
+        #  @return [IP::ArrayOfAddr]
+        define_field :routers, IP::ArrayOfAddr
+      end
+
+      # This class handles OSPFv3 LSA Intra-Area-Prefix payloads.
+      #
+      # An Intra-Area-Prefix payloads is composed of:
+      # * a 16-bit {#prefix_count} field ({Types::Int16}),
+      # * a 16-bit {#ref_ls_type} field ({Types::Int16Enum}),
+      # * a 32-bit {#ref_link_state_id} ({IP::Addr}),
+      # * a 32-bit {#ref_advertising_router} ({IP::Addr}),
+      # * and an array of {IPv6Prefix} ({#prefixes}, {ArrayOfIPv6Prefix}). In
+      #   this array, {IPv6Prefix#reserved} is used as +metric+ value.
+      # @author Sylvain Daubert
+      class LSAIntraAreaPrefix < LSAHeader
+        # @!attribute prefix_count
+        #  The number of IPv6 address prefixes contained in the LSA.
+        #  @return [Integer]
+        define_field :prefix_count, Types::Int16
+        # @!attribute ref_ls_type
+        #  Used to identify  the router-LSA or network-LSA with which the IPv6
+        #  address prefixes should be associated, in association with
+        #  {#ref_link_state_id} and {#ref_advertising_router}.
+        #  @return [Integer]
+        define_field :ref_ls_type, Types::Int16Enum, enum: TYPES
+        # @!attribute ref_link_state_id
+        #  Used to identify  the router-LSA or network-LSA with which the IPv6
+        #  address prefixes should be associated, in association with
+        #  {#ref_ls_type} and {#ref_advertising_router}.
+        #  @return [String]
+        define_field :ref_link_state_id, IP::Addr
+        # @!attribute ref_advertising_router
+        #  Used to identify  the router-LSA or network-LSA with which the IPv6
+        #  address prefixes should be associated, in association with
+        #  {#ref_link_state_id} and {#ref_ls_type}.
+        #  @return [String]
+        define_field :ref_advertising_router, IP::Addr
+        # @!attribute prefixes
+        #  Array of {IPv6Prefix}. Note for this LSA, {IPv6Prefix#reserved} is
+        #  used as +metric+ value.
+        #  @return [ArrayOfIPv6Prefix]
+        define_field :prefixes, ArrayOfIPv6Prefix,
+                     builder: ->(h, t) { t.new(counter: h[:prefix_count]) }
+      end
+
+      # This class handles OSPFv3 LSA Link payloads.
+      #
+      # A Link payloads is composed of:
+      # * a 8-bit {#router_priority} field ({Types::Int8}),
+      # * a 24-bit {#options} field ({Types::Int24}),
+      # * a 128-bit IPv6 {#interface_addr} ({IPv6::Addr}),
+      # * a 32-bit {#prefix_count} field ({Types::Int32}),
+      # * and an array of {IPv6Prefix} ({#prefixes}, {ArrayOfIPv6Prefix}).
+      # @author Sylvain Daubert
+      class LSALink < LSAHeader
+        # @!attribute router_priority
+        #  The Router Priority of the interface attaching the originating
+        #  router to the link.
+        #  @return [Integer]
+        define_field :router_priority, Types::Int8
+        # @!macro define_ospfv3_options
+        OSPFv3.define_options(self)
+        # @!attribute interface_addr
+        #  The originating router's link-local interface address on the link.
+        #  @return [String]
+        define_field :interface_addr, IPv6::Addr
+        # @!attribute prefix_count
+        #  The number of IPv6 address prefixes contained in the LSA.
+        #  @return [Integer]
+        define_field :prefix_count, Types::Int32
+        # @!attribute prefixes
+        #  List of IPv6 prefixes to be associated with the link.
+        #  @return [ArrayOfIPv6Prefix]
+        define_field :prefixes, ArrayOfIPv6Prefix
+      end
+
+      # This class defines a specialized {Types::Array array} to handle series
+      # of {LSA LSAs} or {LSAHeader LSAHeaders}. It recognizes known LSA types
+      # and infers correct type.
+      # @author Sylvain Daubert
+      class ArrayOfLSA < Types::Array
+        set_of LSA
+        
+        # @param [Hash] options
+        # @option options [Types::Int] counter Int object used as a counter for this set
+        # @option options [Boolean] only_headers if +true+, only {LSAHeader LSAHeaders}
+        #  will be added to this array.
+        def initialize(options={})
+          super
+          @only_headers = options[:only_headers] || false
+        end
+
+        # Populate object from a string
+        # @param [String] str
+        # @return [self]
+        def read(str)
+          clear
+          return self if str.nil?
+          return self if @counter and @counter.to_i == 0
+          force_binary str
+          while str.length > 0
+            lsa = LSAHeader.new.read(str)
+            if !@only_headers
+              klass = get_lsa_class_by_human_type(lsa.human_type)
+              lsa = klass.new.read(str[0...lsa.length])
+            end
+            self.push lsa
+            str.slice!(0, lsa.sz)
+            break if @counter and self.size == @counter.to_i
+          end
+          self
+        end
+
+        private
+
+        def record_from_hash(hsh)
+          unless hsh.has_key? :type
+            raise ArgumentError, "hash should have :type key"
+          end
+          
+          klass = if @only_headers
+                    LSAHeader
+                  else
+                    case hsh[:type]
+                    when String
+                      get_lsa_class_by_human_type(hsh[:type])
+                    when Integer
+                      get_lsa_class_by_human_type(LSAHeader::TYPES.key(hsh[:type]))
+                    else
+                      LSA
+                    end
+                  end
+          klass.new(hsh)
+        end
+
+        def get_lsa_class_by_human_type(htype)
+          klassname = "LSA#{htype.to_s.gsub(/-/, '')}"
+          if OSPFv3.const_defined? klassname
+            OSPFv3.const_get klassname
+          else
+            LSA
+          end
+        end
+      end
+    end
+  end
+end