quality: Add test cases for meter_mod message

This commit is contained in:
Eishun Kondoh 2019-04-29 03:07:31 +09:00
parent a0ee397921
commit c5e38155e1
4 changed files with 102 additions and 21 deletions

View file

@ -6,17 +6,17 @@ defmodule Openflow.MeterBand.Drop do
alias __MODULE__
def new(options) do
rate = Keyword.get(options, :rate, 0)
burst_size = Keyword.get(options, :burst_size, 0)
%Drop{rate: rate, burst_size: burst_size}
end
@type t :: %Drop{rate: 0..0xFFFFFFFF, burst_size: 0..0xFFFFFFFF}
def read(<<1::16, 16::16, rate::32, burst_size::32, _::size(4)-unit(8)>>) do
%Drop{rate: rate, burst_size: burst_size}
end
@spec new(rate: 0..0xFFFFFFFF, burst_size: 0..0xFFFFFFFF) :: t()
def new(options),
do: %Drop{rate: options[:rate] || 0, burst_size: options[:burst_size] || 0}
def to_binary(%Drop{rate: rate, burst_size: burst_size}) do
<<1::16, 16::16, rate::32, burst_size::32, 0::size(4)-unit(8)>>
end
@spec read(<<_::128>>) :: t()
def read(<<1::16, 16::16, rate::32, burst_size::32, _::size(4)-unit(8)>>),
do: %Drop{rate: rate, burst_size: burst_size}
@spec to_binary(t()) :: <<_::128>>
def to_binary(%Drop{rate: rate, burst_size: burst_size}),
do: <<1::16, 16::16, rate::32, burst_size::32, 0::size(4)-unit(8)>>
end

View file

@ -7,18 +7,30 @@ defmodule Openflow.MeterBand.Remark do
alias __MODULE__
@type t :: %Remark{
rate: 0..0xFFFFFFFF,
burst_size: 0..0xFFFFFFFF,
prec_level: 0..0xFF
}
@spec new(
rate: 0..0xFFFFFFFF,
burst_size: 0..0xFFFFFFFF,
prec_level: 0..0xFF
) :: t()
def new(options) do
rate = Keyword.get(options, :rate, 0)
burst_size = Keyword.get(options, :burst_size, 0)
prec_level = Keyword.get(options, :prec_level, 0)
%Remark{rate: rate, burst_size: burst_size, prec_level: prec_level}
%Remark{
rate: options[:rate] || 0,
burst_size: options[:burst_size] || 0,
prec_level: options[:prec_level] || 0
}
end
def read(<<2::16, 16::16, rate::32, burst_size::32, prec_level::8, _::size(3)-unit(8)>>) do
%Remark{rate: rate, burst_size: burst_size, prec_level: prec_level}
end
@spec read(<<_::128>>) :: t()
def read(<<2::16, 16::16, rate::32, burst_size::32, prec_level::8, _::size(3)-unit(8)>>),
do: %Remark{rate: rate, burst_size: burst_size, prec_level: prec_level}
def to_binary(%Remark{rate: rate, burst_size: burst_size, prec_level: prec_level}) do
<<2::16, 16::16, rate::32, burst_size::32, prec_level::8, 0::size(3)-unit(8)>>
end
@spec to_binary(t()) :: <<_::128>>
def to_binary(%Remark{rate: rate, burst_size: burst_size, prec_level: prec_level}),
do: <<2::16, 16::16, rate::32, burst_size::32, prec_level::8, 0::size(3)-unit(8)>>
end