quality: Add test cases for instructions

This commit is contained in:
Eishun Kondoh 2019-04-28 23:57:22 +09:00
parent b4c6f0822c
commit a0ee397921
9 changed files with 120 additions and 43 deletions

View file

@ -3,15 +3,19 @@ defmodule Openflow.Instruction.Experimenter do
alias __MODULE__
def new(exp_id, data \\ "") do
%Experimenter{exp_id: exp_id, data: data}
end
@type t :: %Experimenter{exp_id: 0..0xFFFFFFFF, data: binary()}
@spec new(exp_id :: 0..0xFFFFFFFF, data :: String.t()) :: t()
def new(exp_id, data \\ ""),
do: %Experimenter{exp_id: exp_id, data: data}
@spec to_binary(t()) :: <<_::64, _::_*8>>
def to_binary(%Experimenter{exp_id: exp_id, data: data}) do
length = 8 + byte_size(data)
<<0xFFFF::16, length::16, exp_id::32, data::bytes>>
end
@spec read(<<_::64, _::_*8>>) :: t()
def read(<<0xFFFF::16, _::16, exp_id::32, data::bytes>>) do
%Experimenter{exp_id: exp_id, data: data}
end