quality: Add test cases for meter stats messages

This commit is contained in:
Eishun Kondoh 2019-05-05 23:22:01 +09:00
parent b5d0a5654a
commit 2e3f772b1f
3 changed files with 48 additions and 42 deletions

View file

@ -12,11 +12,7 @@ defmodule Openflow.Multipart.Meter.Request do
def ofp_type, do: 18
def new(meter_id) when is_integer(meter_id) or is_atom(meter_id) do
%Request{meter_id: meter_id}
end
def new(options) when is_list(options) do
def new(options \\ []) do
%Request{
xid: options[:xid] || 0,
meter_id: options[:meter_id] || :all

View file

@ -1,37 +0,0 @@
defmodule Openflow.Multipart.MeterConfig.Request do
defstruct(
version: 4,
xid: 0,
# virtual field
datapath_id: nil,
flags: [],
meter_id: :all
)
alias __MODULE__
def ofp_type, do: 18
def new(meter_id) when is_integer(meter_id) or is_atom(meter_id) do
%Request{meter_id: meter_id}
end
def new(options) when is_list(options) do
%Request{
xid: options[:xid] || 0,
meter_id: options[:meter_id] || :all
}
end
def read(<<meter_id_int::32, _::size(4)-unit(8)>>) do
meter_id = Openflow.Utils.get_enum(meter_id_int, :meter_id)
%Request{meter_id: meter_id}
end
def to_binary(%Request{meter_id: meter_id} = msg) do
meter_id_int = Openflow.Utils.get_enum(meter_id, :meter_id)
body_bin = <<meter_id_int::32, 0::size(4)-unit(8)>>
header_bin = Openflow.Multipart.Request.header(msg)
<<header_bin::bytes, body_bin::bytes>>
end
end