quality: Add test cases for meter stats messages
This commit is contained in:
parent
b5d0a5654a
commit
2e3f772b1f
3 changed files with 48 additions and 42 deletions
|
|
@ -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
|
||||
|
|
|
|||
|
|
@ -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
|
||||
Loading…
Add table
Add a link
Reference in a new issue