quality: Add test cases for queue_stats messages

This commit is contained in:
Eishun Kondoh 2019-05-05 23:46:50 +09:00
parent 599f1947db
commit 2bfccd693f
3 changed files with 75 additions and 12 deletions

View file

@ -13,12 +13,8 @@ defmodule Openflow.Multipart.Queue.Reply do
def ofp_type, do: 18
def new(queues \\ []) do
%Reply{queues: queues}
end
def read(<<queues_bin::bytes>>) do
queues = Openflow.Multipart.Queue.read(queues_bin)
queues = Openflow.Multipart.QueueStats.read(queues_bin)
%Reply{queues: queues}
end
@ -36,7 +32,7 @@ defmodule Openflow.Multipart.Queue.Reply do
end
end
defmodule Openflow.Multipart.Queue do
defmodule Openflow.Multipart.QueueStats do
defstruct(
port_number: 0,
queue_id: 0,
@ -65,7 +61,7 @@ defmodule Openflow.Multipart.Queue do
<<port_no::32, queue_id::32, tx_bytes::64, tx_packets::64, tx_errors::64,
duration_sec::32, duration_nsec::32>>
) do
%Queue{
%QueueStats{
port_number: port_no,
queue_id: queue_id,
tx_bytes: tx_bytes,

View file

@ -13,11 +13,12 @@ defmodule Openflow.Multipart.Queue.Request do
def ofp_type, do: 18
def new(options) do
xid = Keyword.get(options, :xid, 0)
port_no = Keyword.get(options, :port_number, :any)
queue_id = Keyword.get(options, :queue_id, :all)
%Request{xid: xid, port_number: port_no, queue_id: queue_id}
def new(options \\ []) do
%Request{
xid: options[:xid] || 0,
port_number: options[:port_number] || :any,
queue_id: options[:queue_id] || :all
}
end
def read(<<port_no_int::32, queue_id_int::32>>) do