<?xml version="1.0" encoding="UTF-8"?>
<component name="UserAgent" extends="Task" >
	<script type="text/brightscript" uri="pkg:/components/generalUtils.brs"/>
  	<script type="text/brightscript">
		<![CDATA[
		sub init()
		    m.top.functionName = "go"
		    
		end sub
		
		sub go()
		  'print "in UserAgentTask"
		  request = CreateObject("roUrlTransfer")
		  url = m.global.serverURL +"/RokuDevSG/user_agent.php"
		  usuario = getStrValFromReg("user_tv", "datos_tv")
	      pass = getStrValFromReg("pass_tv", "datos_tv")
	      ba = CreateObject("roByteArray") 
	      ba.FromAsciiString(usuario+":"+pass) 
	      request.AddHeader("X-Content", ba.ToBase64String())  
		  request.SetUrl(url)
		  html = request.GetToString()
		  body = html.Trim()
		
		  xml = CreateObject("roXMLElement")
		  if xml.Parse(body)
		    if UCase(xml.status.GetText()) = "SUCCESS"
				m.top.key = xml.key.GetText()
		    else 
		    	m.top.key = ""
		    end if
		    'print "Key: " + m.top.key
		  end if
		end sub
		]]>
	</script>
  	<interface>
	  	<field id="key" type="string"/>
  	</interface>
</component>
