Packages

cwmp_ex

0.2.7
0.2.7 0.2.6 0.2.5 0.2.4 0.2.3 0.2.2 0.2.1

A module that implements the CWMP protocol

HexDocs

Current section

Files

Jump to
Readme
7 Versions
3 Dependencies
Dependants
Files
Activity
cwmp_ex lib generate get_parameter_attributes_response.ex
Raw

lib/generate/get_parameter_attributes_response.ex 

defimpl CWMP.Protocol.Generate, for: CWMP.Protocol.Messages.GetParameterAttributesResponse do

  import XmlBuilder



  use CWMP.Protocol.GenerateHelpers



  def generate(req) do

    params=for p <- req.parameters, do: parameterAttributeStruct(p)

    element("cwmp:GetParameterAttributesResponse", [element(:ParameterList, %{"SOAP-ENC:arrayType": "cwmp:ParameterAttributeStruct[#{length(params)}]"}, [params])])

  end



  defp parameterAttributeStruct(pas) do

    elements=for p <- pas.accesslist, do: element(:string, p)

    notification=integerValue(pas.notification, fn(x) -> x in 0..6 end)

    element(:ParameterAttributeStruct, [

      element(:Name, pas.name),

      element(:Notification, notification),

      element(:AccessList,elements) ])

  end



end