-
Notifications
You must be signed in to change notification settings - Fork 9
/
humidity_control_setpoint_set.ex
60 lines (48 loc) · 1.72 KB
/
humidity_control_setpoint_set.ex
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
defmodule Grizzly.ZWave.Commands.HumidityControlSetpointSet do
@moduledoc """
HumidityControlSetpointSet
## Parameters
* `:setpoint_type` - see `t:HumidityControlSetpoint.type/0`
* `:scale` - see `t:HumidityControlSetpoint.scale/0`
* `:value` - setpoint value
"""
@behaviour Grizzly.ZWave.Command
import Grizzly.ZWave.Encoding
import Grizzly.ZWave.CommandClasses.HumidityControlSetpoint
alias Grizzly.ZWave.{Command, DecodeError}
alias Grizzly.ZWave.CommandClasses.HumidityControlSetpoint
@type param ::
{:setpoint_type, HumidityControlSetpoint.type()}
| {:scale, HumidityControlSetpoint.scale()}
| {:value, number()}
@impl Grizzly.ZWave.Command
@spec new([param()]) :: {:ok, Command.t()}
def new(params) do
command = %Command{
name: :humidity_control_setpoint_set,
command_byte: 0x01,
command_class: HumidityControlSetpoint,
params: params,
impl: __MODULE__
}
{:ok, command}
end
@impl Grizzly.ZWave.Command
@spec encode_params(Command.t()) :: binary()
def encode_params(command) do
type = Command.param!(command, :setpoint_type)
scale = Command.param!(command, :scale)
value = Command.param!(command, :value)
<<0::4, encode_type(type)::4>> <> zwave_float_to_binary(value, encode_scale(scale))
end
@impl Grizzly.ZWave.Command
@spec decode_params(binary()) :: {:ok, [param()]} | {:error, DecodeError.t()}
def decode_params(
<<_::4, type::4, precision::3, scale::2, bytes::3, int_value::signed-size(bytes * 8)>>
) do
type = decode_type(type)
scale = decode_scale(scale)
value = decode_zwave_float(int_value, precision)
{:ok, [setpoint_type: type, scale: scale, value: value]}
end
end