libxmljs = require 'libxmljs'

SERVER_NAME = 'Genie/0.1'

NAMESPACES = {
  'soap-enc' : 'http://schemas.xmlsoap.org/soap/encoding/',
  'soap-env' : 'http://schemas.xmlsoap.org/soap/envelope/',
  'xsd' : 'http://www.w3.org/2001/XMLSchema',
  'xsi' : 'http://www.w3.org/2001/XMLSchema-instance',
  'cwmp' : 'urn:dslforum-org:cwmp-1-0',
}

trim = (str) ->
  str.replace /^\s+|\s+$/g, ''


cookiesToObj = (cookieLine) ->
  cookies = {}
  for c in trim(cookieLine).split ','
    nv = c.split '='
    continue if nv.length < 2
    cookies[trim(nv[0])] = trim(nv[1])
  return cookies


cookiesToStr = (obj) ->
  l = []
  for cn, cv of obj
    l.push("#{cn}=#{cv}")
  return l# + 'path=/'


sessionId = (xml) ->
  e = xml.get('//soap-env:Envelope/soap-env:Header/cwmp:ID', NAMESPACES)
  if e?
    return trim(e.text())
  return undefined


deviceId = (xml) ->
  e = xml.find('//soap-env:Envelope/soap-env:Body/cwmp:Inform/DeviceId/child::*', NAMESPACES)
  if e?
    id = {}
    for n in e
      id[n.name()] = trim(n.text())
    return id
  return undefined


eventCodes = (xml) ->
  (trim(e.text()) for e in xml.find('//soap-env:Envelope/soap-env:Body/cwmp:Inform/Event/EventStruct/EventCode', NAMESPACES))


retryCount = (xml) ->
  e = xml.get('//soap-env:Envelope/soap-env:Body/cwmp:Inform/RetryCount', NAMESPACES)
  if e
    return JSON.parse(e.text())
  return undefined


informParameterValues = (xml) ->
  if not xml.get( '//soap-env:Envelope/soap-env:Body/cwmp:Inform/ParameterList', NAMESPACES)
    return undefined

  values = []
  for e in xml.find('//soap-env:Envelope/soap-env:Body/cwmp:Inform/ParameterList/ParameterValueStruct', NAMESPACES)
    valueType = trim(e.get('Value').attr('type').value())
    name = trim(e.get('Name').text())
    switch valueType
      when 'xsd:boolean'
        value = Boolean(JSON.parse(e.get('Value').text()))
      when 'xsd:unsignedInt'
        value = JSON.parse(e.get('Value').text())
      else
        value = trim(e.get('Value').text())

    values.push([name, value])
  return values


getParameterNamesResponse = (xml) ->
  if not xml.get('//soap-env:Envelope/soap-env:Body/cwmp:GetParameterNamesResponse', NAMESPACES)
    return undefined

  response = []
  for e in xml.find('//soap-env:Envelope/soap-env:Body/cwmp:GetParameterNamesResponse/ParameterList/ParameterInfoStruct', NAMESPACES)
    name = trim(e.get('Name').text())
    writable = Boolean(JSON.parse(e.get('Writable').text()))
    response.push([name, writable])
  return response


getParameterValuesResponse = (xml) ->
  if not xml.get( '//soap-env:Envelope/soap-env:Body/cwmp:GetParameterValuesResponse', NAMESPACES)
    return undefined

  values = []
  for e in xml.find('//soap-env:Envelope/soap-env:Body/cwmp:GetParameterValuesResponse/ParameterList/ParameterValueStruct', NAMESPACES)
    valueType = trim(e.get('Value').attr('type').value())
    name = trim(e.get('Name').text())
    switch valueType
      when 'xsd:boolean'
        value = Boolean(JSON.parse(e.get('Value').text()))
      when 'xsd:unsignedInt'
        value = JSON.parse(e.get('Value').text())
      else
        value = trim(e.get('Value').text())

    values.push([name, value])
  return values


setParameterValuesResponse = (xml) ->
  e = xml.get('//soap-env:Envelope/soap-env:Body/cwmp:SetParameterValuesResponse/Status', NAMESPACES)
  if e
    return JSON.parse(e.text())
  return undefined


exports.request = (headers, data) ->
  #console.log '<<< REQUEST'
  #console.dir [headers, data]
  #console.log data

  req = {cookies: {}}
  req.cookies = cookiesToObj(headers.cookie) if headers.cookie

  if +headers['Content-Length'] > 0 || data.length > 0
    xml = libxmljs.parseXml data
    req.sessionId = sessionId xml
    req.inform = true if xml.get('//soap-env:Envelope/soap-env:Body/cwmp:Inform', NAMESPACES)
    req.informParameterValues = informParameterValues xml
    req.reboot = true if xml.get('//soap-env:Envelope/soap-env:Body/cwmp:RebootResponse', NAMESPACES)
    req.deviceId = deviceId xml
    req.eventCodes = eventCodes xml
    req.retryCount = retryCount xml
    req.getParameterNamesResponse = getParameterNamesResponse xml
    req.getParameterValuesResponse = getParameterValuesResponse xml
    req.setParameterValuesResponse = setParameterValuesResponse xml
  return req


exports.response = (sessionId, params, cookies = null) ->
  headers = {
    'Content-Type' : 'text/xml; charset="utf-8"',
    'Server' : SERVER_NAME,
    'SOAPServer' : SERVER_NAME,
  }

  if cookies? and Object.keys(cookies).length > 0
    headers['Set-Cookie'] = cookiesToStr(cookies)

  if params is null or Object.keys(params).length == 0
    #console.log '>>> EMPTY RESPONSE'
    # send empty response
    headers['Content-Length'] = 0
    return {code: 204, headers: headers, data: null}

  xml = libxmljs.Document()
  env = xml.node('soap-env:Envelope')
  for prefix, url of NAMESPACES
    env.defineNamespace prefix, url

  header = env.node('soap-env:Header')
  header.node('cwmp:ID').attr({'soap-env:mustUnderstand' : 1}).text(sessionId)
  #header.node('cwmp:NoMoreRequests').text(0) # depracated
  body = env.node('soap-env:Body')

  if params.inform
    body.node('cwmp:InformResponse').node('MaxEnvelopes').text(1)

  if params.getParameterNames?
    getParameterNames = body.node('cwmp:GetParameterNames')
    getParameterNames.node('cwmp:ParameterPath').text(params.getParameterNames[0])
    getParameterNames.node('cwmp:NextLevel').text(+params.getParameterNames[1])

  if params.getParameterValues?
    parameterNames = body.node('cwmp:GetParameterValues').node('cwmp:ParameterNames')
    for p in params.getParameterValues
      parameterNames.node('xsd:string').text(p)

  if params.setParameterValues?
    setParameterValuesNode = body.node('cwmp:SetParameterValues')
    parameterList = setParameterValuesNode.node('ParameterList')
    for i in params.setParameterValues
      pvs = parameterList.node('ParameterValueStruct')
      pvs.node('Name').text(i[0])
      pvs.node('Value').text(i[1])
    setParameterValuesNode.node('ParameterKey')

  if params.reboot?
    body.node('cwmp:Reboot').node('CommandKey').text(params.reboot)

  
  data = xml.toString()
  headers['Content-Length'] = data.length

  #console.log '>>> RESPONSE'
  #console.dir headers
  #console.log data
  
  return {code: 200, headers: headers, data: data}