Packages

modbux

0.3.13
0.3.14 0.3.13 0.3.12 0.3.11 0.3.10 0.3.9 0.3.8

Modbus for network and serial communication, this library implements TCP (Client & Server) and RTU (Master & Slave) protocols.

HexDocs

Current section

Files

Jump to
Readme
7 Versions
2 Dependencies
Dependants
Files
Activity
modbux test model_test.exs
Raw

test/model_test.exs 

defmodule ModelTest do

  use ExUnit.Case

  alias Modbux.Model

  @state %{0x50 => %{{:c, 0x5152} => 0, {:c, 0x5153} => 0, {:c, 0x5155} => 0}}



  test "invalid slave" do

    assert {nil, @state} == Model.reads(@state, {81, :c, 20818, 1})

    assert {nil, @state} == Model.write(@state, {81, :c, 20818, 1})

    assert {nil, @state} == Model.writes(@state, {81, :c, 20818, [1, 1]})

  end



  test "invalid address" do

    assert {{:error, :eaddr}, @state} == Model.reads(@state, {80, :c, 20830, 1})

    assert {{:error, :eaddr}, @state} == Model.write(@state, {80, :c, 20830, 1})

    assert {{:error, :eaddr}, @state} == Model.writes(@state, {80, :c, 20830, [1, 1]})

  end



  test "invalid address (# bytes to read)" do

    assert {{:error, :eaddr}, @state} == Model.reads(@state, {80, :c, 20818, 3})

    assert {{:error, :eaddr}, @state} == Model.writes(@state, {80, :c, 20818, [1, 1, 1]})

  end



  test "illegal function" do

    assert {{:error, :eaddr}, @state} == Model.reads(@state, {80, :fc, 20818, 1})

    assert {{:error, :eaddr}, @state} == Model.write(@state, {80, :fc, 20818, 1})

    assert {{:error, :eaddr}, @state} == Model.writes(@state, {80, :fc, 20818, [1, 1]})

  end



  test "valid slave, function, address and number of bytes" do

    assert {{:ok, [0]}, @state} == Model.reads(@state, {80, :c, 20818, 1})

    d_state = %{0x50 => %{{:c, 0x5152} => 1, {:c, 0x5153} => 0, {:c, 0x5155} => 0}}

    assert {{:ok, nil}, d_state} == Model.write(@state, {80, :c, 20818, 1})

    d_state = %{0x50 => %{{:c, 0x5152} => 1, {:c, 0x5153} => 1, {:c, 0x5155} => 0}}

    assert {{:ok, nil}, d_state} == Model.writes(@state, {80, :c, 20818, [1, 1]})

  end

end