This repository has been archived on 2021-04-24. You can view files and clone it, but cannot push or open issues or pull requests.
Mikubot/plugins/music.lua
2015-06-23 16:41:00 +02:00

85 lines
2.1 KiB
Lua

do
-- Base search URL
local BASE_URL = 'http://pleer.com/mobile/search?q='
-- Base download URL
local BASE_DL_URL = 'http://pleer.com/mobile/files_mobile/'
local htmlparser = require 'htmlparser'
-- Provide download link
local function getDownloadLink(id)
return BASE_DL_URL .. id .. '.mp3'
end
local function getLyrics(q)
local b, c = http.request(BASE_URL .. URL.escape(q))
if c ~= 200 then
return "Oops! Netzwerkfehler!"
end
local root = htmlparser.parse(b)
local tracks = root('.track')
local output = ''
-- If no tracks found
if #tracks < 1 then
return 'Nichts gefunden!'
end
for i, track in pairs(tracks) do
-- Track id
local trackId = track.id
-- Remove that starting 't' in the id of element
trackId = trackId:sub(2)
-- Parse track
track = track:getcontent()
track = htmlparser.parse(track)
-- Track artist
local artist = track:select('.artist')[1]
artist = unescape_html(artist:getcontent())
-- Track title
local title = track:select('.title')[1]
title = unescape_html(title:getcontent())
-- Track time
local time = track:select('.time')[1]
time = time:getcontent()
time = time:sub(-5)
-- Track specs
local specs = track:select('.specs')[1]
specs = specs:getcontent()
specs = specs:split(',')
-- Size
local size = specs[1]:trim()
-- Bitrate
local bitrate = specs[2]:trim()
-- Generate an awesome, well formated output
output = output .. i .. '. ' .. artist .. ' - ' .. title .. '\n'
.. '🕚 ' .. time .. ' | ' .. ' 🎧 ' .. bitrate .. ' | ' .. ' 📎 ' .. size .. '\n'
.. '💾 : ' .. getDownloadLink(trackId) .. '\n\n'
end
return output
end
local function run(msg, matches)
return getLyrics(matches[1])
end
return {
description = 'Search and get music from pleer',
usage = {'/music','/musik'},
patterns = {'^/music (.*)$','^/musik (.*)$'},
run = run
}
end