^^&&^^

Edit File: broadcast-tellstick-discover.nse

local nmap = require "nmap"
local stdnse = require "stdnse"
local table = require "table"

description=[[
Discovers Telldus Technologies TellStickNet devices on the LAN. The Telldus
TellStick is used to wirelessly control electric devices such as lights,
dimmers and electric outlets. For more information: http://www.telldus.com/
]]

author = "Patrik Karlsson"
license = "Same as Nmap--See http://nmap.org/book/man-legal.html"
categories = {"broadcast", "safe"}

prerule = function() return ( nmap.address_family() == 'inet' ) end

local function fail(err) return ("\n  ERROR: %s"):format(err or "") end

action = function()
	local socket = nmap.new_socket("udp")
	local host, port = { ip = "255.255.255.255" }, { number = 30303, protocol = "udp" }
	
	socket:set_timeout(5000)
	if ( not(socket:sendto(host, port, "D")) ) then
		return fail("Failed to send discovery request to server")
	end

local output = {}

while( true ) do
		local status, response = socket:receive()
		if ( not(status) ) then
			break
		end

local status, _, _, ip = socket:get_info()
		if ( not(status) ) then
			stdnse.print_debug(2, "Failed to get socket information")
			break
		end

local prod, mac, activation, version = response:match("^([^:]*):([^:]*):([^:]*):([^:]*)$")
		if ( prod and mac and activation and version ) then
			local output_part = {
				name = ip,
				("Product: %s"):format(prod),
				("MAC: %s"):format(mac),
				("Activation code: %s"):format(activation),
				("Version: %s"):format(version)
			}
			table.insert(output, output_part)
		end
	end
	
	if ( 0 < #output ) then
		return stdnse.format_output(true, output)
	end
end