Openflow parser

lib/openflow/meter_band/drop.ex

@@ -0,0 +1,22 @@
+defmodule Openflow.MeterBand.Drop do
+  defstruct(
+    rate:       0,
+    burst_size: 0
+  )
+
+  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
+
+  def read(<<1::16, 16::16, rate::32, burst_size::32, _::size(4)-unit(8)>>) do
+    %Drop{rate: rate, burst_size: burst_size}
+  end
+
+  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
+end

lib/openflow/meter_band/experimenter.ex

@@ -0,0 +1,24 @@
+defmodule Openflow.MeterBand.Experimenter do
+  defstruct(
+    rate:         0,
+    burst_size:   0,
+    experimenter: 0,
+  )
+
+  alias __MODULE__
+
+  def new(options) do
+    rate = Keyword.get(options, :rate, 0)
+    burst_size = Keyword.get(options, :burst_size, 0)
+    experimenter = Keyword.get(options, :experimenter, 0)
+    %Experimenter{rate: rate, burst_size: burst_size, experimenter: experimenter}
+  end
+
+  def read(<<0xffff::16, _::16, rate::32, burst_size::32, experimenter::32>>) do
+    %Experimenter{rate: rate, burst_size: burst_size, experimenter: experimenter}
+  end
+
+  def to_binary(%Experimenter{rate: rate, burst_size: burst_size, experimenter: experimenter}) do
+    <<0xffff::16, 16::16, rate::32, burst_size::32, experimenter::32>>
+  end
+end

lib/openflow/meter_band/remark.ex

@@ -0,0 +1,24 @@
+defmodule Openflow.MeterBand.Remark do
+  defstruct(
+    rate:       0,
+    burst_size: 0,
+    prec_level: 0
+  )
+
+  alias __MODULE__
+
+  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}
+  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
+
+  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
+end