require 'pio/flow_mod'

describe Pio::FlowMod do
  Given(:dump) do
    [
      0x01,
      0x0e,
      0x00, 0x50,
      0x00, 0x00, 0x00, 0x15,
      0x00, 0x38, 0x20, 0xfe, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00,
      0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
      0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
      0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
      0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01,
      0x00, 0x00,
      0x00, 0x00,
      0x00, 0x00,
      0xff, 0xff,
      0xff, 0xff, 0xff, 0xff,
      0x00, 0x02,
      0x00, 0x03,
      0x00, 0x00, 0x00, 0x08, 0x00, 0x02, 0xff, 0xff
    ].pack('C*')
  end

  describe '.read' do
    context 'with a flow_mod message' do
      When(:flow_mod) do
        Pio::FlowMod.read(dump)
      end

      Then { flow_mod.class == Pio::FlowMod }
      Then { flow_mod.ofp_version == 0x1 }
      Then { flow_mod.message_type == 0xe }
      Then { flow_mod.message_length == 0x50 }
      Then { flow_mod.transaction_id == 0x15 }
      Then { flow_mod.xid == 0x15 }

      Then { !flow_mod.body.empty? }
      Then do
        flow_mod.match.wildcards.keys == [
          :dl_vlan,
          :dl_src,
          :dl_dst,
          :dl_type,
          :nw_proto,
          :tp_src,
          :tp_dst,
          :nw_src_all,
          :nw_dst_all,
          :dl_vlan_pcp,
          :nw_tos
        ]
      end
      Then { flow_mod.match.in_port == 1 }
      Then { flow_mod.match.dl_src == '00:00:00:00:00:00' }
      Then { flow_mod.match.dl_dst == '00:00:00:00:00:00' }
      Then { flow_mod.match.dl_vlan == 0 }
      Then { flow_mod.match.dl_vlan_pcp == 0 }
      Then { flow_mod.match.dl_type == 0 }
      Then { flow_mod.match.nw_tos == 0 }
      Then { flow_mod.match.nw_proto == 0 }
      Then { flow_mod.match.nw_src == '0.0.0.0' }
      Then { flow_mod.match.nw_dst == '0.0.0.0' }
      Then { flow_mod.match.tp_src == 0 }
      Then { flow_mod.match.tp_dst == 0 }
      Then { flow_mod.cookie == 1 }
      Then { flow_mod.command == :add }
      Then { flow_mod.idle_timeout == 0 }
      Then { flow_mod.hard_timeout == 0 }
      Then { flow_mod.priority == 0xffff }
      Then { flow_mod.buffer_id == 0xffffffff }
      Then { flow_mod.out_port == 2 }
      Then { flow_mod.flags == [:send_flow_rem, :check_overwrap] }
      Then { flow_mod.actions.length == 1 }
      Then { flow_mod.actions[0].is_a? Pio::SendOutPort }
      Then { flow_mod.actions[0].port_number == 2 }
      Then { flow_mod.actions[0].max_len == 2**16 - 1 }
    end
  end

  describe '.new' do
    context 'with a SendOutPort action' do
      When(:flow_mod) do
        Pio::FlowMod.new(transaction_id: 0x15,
                         buffer_id: 0xffffffff,
                         match: Pio::Match.new(in_port: 1),
                         cookie: 1,
                         command: :add,
                         priority: 0xffff,
                         out_port: 2,
                         flags: [:send_flow_rem, :check_overwrap],
                         actions: Pio::SendOutPort.new(2)
        )
      end

      Then { flow_mod.class == Pio::FlowMod }
      Then { flow_mod.ofp_version == 0x1 }
      Then { flow_mod.message_type == 0xe }
      Then { flow_mod.message_length == 0x50 }
      Then { flow_mod.transaction_id == 0x15 }
      Then { flow_mod.xid == 0x15 }

      Then { !flow_mod.body.empty? }
      Then do
        flow_mod.match.wildcards.keys == [
          :dl_vlan,
          :dl_src,
          :dl_dst,
          :dl_type,
          :nw_proto,
          :tp_src,
          :tp_dst,
          :nw_src_all,
          :nw_dst_all,
          :dl_vlan_pcp,
          :nw_tos
        ]
      end
      Then { flow_mod.match.in_port == 1 }
      Then { flow_mod.match.dl_src == '00:00:00:00:00:00' }
      Then { flow_mod.match.dl_dst == '00:00:00:00:00:00' }
      Then { flow_mod.match.dl_vlan == 0 }
      Then { flow_mod.match.dl_vlan_pcp == 0 }
      Then { flow_mod.match.dl_type == 0 }
      Then { flow_mod.match.nw_tos == 0 }
      Then { flow_mod.match.nw_proto == 0 }
      Then { flow_mod.match.nw_src == '0.0.0.0' }
      Then { flow_mod.match.nw_dst == '0.0.0.0' }
      Then { flow_mod.match.tp_src == 0 }
      Then { flow_mod.match.tp_dst == 0 }
      Then { flow_mod.cookie == 1 }
      Then { flow_mod.command == :add }
      Then { flow_mod.idle_timeout == 0 }
      Then { flow_mod.hard_timeout == 0 }
      Then { flow_mod.priority == 0xffff }
      Then { flow_mod.buffer_id == 0xffffffff }
      Then { flow_mod.out_port == 2 }
      Then { flow_mod.flags == [:send_flow_rem, :check_overwrap] }
      Then { flow_mod.actions.length == 1 }
      Then { flow_mod.actions[0].is_a? Pio::SendOutPort }
      Then { flow_mod.actions[0].port_number == 2 }
      Then { flow_mod.actions[0].max_len == 2**16 - 1 }

      context '#to_binary' do
        When(:binary) { flow_mod.to_binary }
        Then { binary == dump }
      end
    end
  end
end