Mikubot-2/plugins/librefm.lua

if not database.librefm then
	database.librefm = {}
end

local command = 'librefm'
local doc = [[```
/lnp [username]
Returns what you are or were last listening to. If you specify a username, info will be returned for that username.

/lfmset <username>
Sets your libre.fm username. Otherwise, /np will use your Telegram username. Use "/fmset -" to delete it.
```]]

local triggers = {
	'^/librefm[@'..bot.username..']*',
	'^/lnp[@'..bot.username..']*',
	'^/lfmset[@'..bot.username..']*'
}

local action = function(msg)

	local input = msg.text:input()

	if string.match(msg.text, '^/librefm') then
		sendMessage(msg.chat.id, doc, true, msg.message_id, true)
		return
	elseif string.match(msg.text, '^/lfmset') then
		if not input then
			sendMessage(msg.chat.id, doc, true, msg.message_id, true)
		elseif input == '-' then
			database.librefm[msg.from.id_str] = nil
			sendReply(msg, 'Your libre.fm username has been forgotten.')
		else
			database.librefm[msg.from.id_str] = input
			sendReply(msg, 'Your libre.fm username has been set to "' .. input .. '".')
		end
		return
	end

	local url = 'http://alpha.libre.fm/2.0/?method=user.getrecenttracks&format=json&limit=1&api_key=0&user='

	local username
	local alert = ''
	if input then
		username = input
	elseif database.librefm[msg.from.id_str] then
		username = database.librefm[msg.from.id_str]
	elseif msg.from.username then
		username = msg.from.username
		alert = '\n\nYour username has been set to ' .. username .. '.\nTo change it, use /lfmset <username>.'
		database.librefm[msg.from.id_str] = username
	else
		sendReply(msg, 'Please specify your libre.fm username or set it with /lfmset.')
		return
	end

	url = url .. URL.escape(username)

	jstr, res = HTTPS.request(url)
	if res ~= 200 then
		sendReply(msg, config.errors.connection)
		return
	end

	local jdat = JSON.decode(jstr)
	if jdat.error then
		sendReply(msg, 'Please specify your libre.fm username or set it with /lfmset.')
		return
	end

	local jdat = jdat.recenttracks.track[1] or jdat.recenttracks.track
	if not jdat then
		sendReply(msg, 'No history for this user.' .. alert)
		return
	end

	local output = input or msg.from.first_name
	output = '🎵  ' .. output

	if jdat['@attr'] and jdat['@attr'].nowplaying then
		output = output .. ' is currently listening to:\n'
	else
		output = output .. ' last listened to:\n'
	end

	local title = jdat.name or 'Unknown'
	local artist = 'Unknown'
	if jdat.artist then
		artist = jdat.artist['#text']
	end

	output = output .. title .. ' - ' .. artist .. alert
	sendMessage(msg.chat.id, output)

end

return {
	action = action,
	triggers = triggers,
	doc = doc,
	command = command
}