Packages

hap

0.2.0
0.6.0 0.5.0 0.4.9 0.4.8 0.4.7 0.4.6 0.4.5 0.4.4 0.4.3 0.4.2 0.4.1 0.4.0 0.3.3 0.3.2 0.3.1 0.3.0 0.2.1 0.2.0 0.1.1 0.1.0

An implementation of the HomeKit Accessory Protocol

HexDocs

Current section

Files

Jump to
Readme
20 Versions
8 Dependencies
Dependants
Files
Activity
hap test hap tlv_parser_test.exs
Raw

test/hap/tlv_parser_test.exs 

defmodule HAP.TLVParserTest do

  use ExUnit.Case

  use Plug.Test



  test "parses multi-segment entries properly in a conn" do

    data =

      <<1, 255>> <>

        :binary.copy(<<0xAA>>, 255) <>

        <<1, 255>> <> :binary.copy(<<0xAB>>, 255) <> <<1, 10>> <> :binary.copy(<<0xBA>>, 10) <> <<2, 1, 3>>



    expected = %{

      1 => :binary.copy(<<0xAA>>, 255) <> :binary.copy(<<0xAB>>, 255) <> :binary.copy(<<0xBA>>, 10),

      2 => <<3>>

    }



    {:ok, result, _conn} =

      conn("METHOD", "path", data)

      |> HAP.TLVParser.parse("application", "pairing+tlv8", {}, {})



    assert result == expected

  end



  test "parses multi-segment entries properly as a string" do

    data =

      <<1, 255>> <>

        :binary.copy(<<0xAA>>, 255) <>

        <<1, 255>> <> :binary.copy(<<0xAB>>, 255) <> <<1, 10>> <> :binary.copy(<<0xBA>>, 10) <> <<2, 1, 3>>



    expected = %{

      1 => :binary.copy(<<0xAA>>, 255) <> :binary.copy(<<0xAB>>, 255) <> :binary.copy(<<0xBA>>, 10),

      2 => <<3>>

    }



    assert HAP.TLVParser.parse_tlv(data) == expected

  end



  test "parses multi-segment entries into a keyword list" do

    data =

      <<1, 255>> <>

        :binary.copy(<<0xAA>>, 255) <>

        <<1, 255>> <>

        :binary.copy(<<0xAB>>, 255) <>

        <<1, 10>> <>

        :binary.copy(<<0xBA>>, 10) <>

        <<2, 1, 3>> <>

        <<1, 255>> <>

        :binary.copy(<<0xAA>>, 255) <>

        <<1, 255>> <> :binary.copy(<<0xAB>>, 255) <> <<1, 10>> <> :binary.copy(<<0xBA>>, 10) <> <<2, 1, 3>>



    expected = [

      "1": :binary.copy(<<0xAA>>, 255) <> :binary.copy(<<0xAB>>, 255) <> :binary.copy(<<0xBA>>, 10),

      "2": <<3>>,

      "1": :binary.copy(<<0xAA>>, 255) <> :binary.copy(<<0xAB>>, 255) <> :binary.copy(<<0xBA>>, 10),

      "2": <<3>>

    ]



    assert HAP.TLVParser.parse_tlv_as_keyword(data) == expected

  end

end