minetest-mods/mpd/init.lua
2021-04-27 20:58:49 +02:00

214 lines
6 KiB
Lua

mpd={}
mpd.pause_between_songs=minetest.settings:get("mpd.pause_between_songs") or 30
--end config
mpd.modpath=minetest.get_modpath("mpd")
if not mpd.modpath then
error("mpd mod folder has to be named 'mpd'!")
end
--{name, length, gain~1}
mpd.songs = {}
local sfile, sfileerr=io.open(mpd.modpath..DIR_DELIM.."songs.txt")
if not sfile then error("Error opening songs.txt: "..sfileerr) end
for linent in sfile:lines() do
-- trim leading and trailing spaces away
local line = string.match(linent, "^%s*(.-)%s*$")
if line~="" and string.sub(line,1,1)~="#" then
local name, timeMinsStr, timeSecsStr, gainStr, title = string.match(line, "^(%S+)%s+(%d+):([%d%.]+)%s+([%d%.]+)%s*(.*)$")
local timeMins, timeSecs, gain = tonumber(timeMinsStr), tonumber(timeSecsStr), tonumber(gainStr)
if title=="" then title = name end
if name and timeMins and timeSecs and gain then
mpd.songs[#mpd.songs+1]={name=name, length=timeMins*60+timeSecs, lengthhr=timeMinsStr..":"..timeSecsStr, gain=gain, title=title}
else
minetest.log("warning", "[mpd] Misformatted song entry in songs.txt: "..line)
end
end
end
sfile:close()
if #mpd.songs==0 then
print("[mpd]no songs registered, not doing anything")
return
end
mpd.storage = minetest.get_mod_storage()
mpd.handles={}
mpd.playing=false
mpd.id_playing=nil
mpd.song_time_left=nil
mpd.time_next=10 --sekunden
mpd.id_last_played=nil
minetest.register_globalstep(function(dtime)
if mpd.playing then
if mpd.song_time_left<=0 then
mpd.stop_song()
mpd.time_next=mpd.pause_between_songs
else
mpd.song_time_left=mpd.song_time_left-dtime
end
elseif mpd.time_next then
if mpd.time_next<=0 then
mpd.next_song()
else
mpd.time_next=mpd.time_next-dtime
end
end
end)
mpd.play_song=function(id)
if mpd.playing then
mpd.stop_song()
end
local song=mpd.songs[id]
if not song then return end
for _,player in ipairs(minetest.get_connected_players()) do
local pname=player:get_player_name()
local pvolume=tonumber(mpd.storage:get_string("vol_"..pname))
if not pvolume then pvolume=1 end
if pvolume>0 then
local handle = minetest.sound_play(song.name, {to_player=pname, gain=song.gain*pvolume})
if handle then
mpd.handles[pname]=handle
end
end
end
mpd.playing=id
--adding 2 seconds as security
mpd.song_time_left = song.length + 2
end
mpd.stop_song=function()
for pname, handle in pairs(mpd.handles) do
minetest.sound_stop(handle)
end
mpd.id_last_played=mpd.playing
mpd.playing=nil
mpd.handles={}
mpd.time_next=nil
end
mpd.next_song=function()
local next
repeat
next=math.random(1,#mpd.songs)
until #mpd.songs==1 or next~=mpd.id_last_played
mpd.play_song(next)
end
mpd.song_human_readable=function(id)
if not tonumber(id) then return "<error>" end
local song=mpd.songs[id]
if not song then return "<error>" end
return id..": "..song.title.." ["..song.lengthhr.."]"
end
minetest.register_privilege("mpd", "may control the music player daemon (mpd) mod")
minetest.register_chatcommand("mpd_stop", {
params = "",
description = "Stop the song currently playing",
privs = {mpd=true},
func = function(name, param)
mpd.stop_song()
end,
})
minetest.register_chatcommand("mpd_list", {
params = "",
description = "List all available songs and their IDs",
privs = {mpd=true},
func = function(name, param)
for k,v in ipairs(mpd.songs) do
minetest.chat_send_player(name, mpd.song_human_readable(k))
end
end,
})
minetest.register_chatcommand("mpd_play", {
params = "<id>",
description = "Play the songs with the given ID (see ids with /mpd_list)",
privs = {mpd=true},
func = function(name, param)
if param=="" then
mpd.next_song()
return true,"Playing: "..mpd.song_human_readable(mpd.playing)
end
id=tonumber(param)
if id and id>0 and id<=#mpd.songs then
mpd.play_song(id)
return true,"Playing: "..mpd.song_human_readable(id)
end
return false, "Invalid song ID!"
end,
})
minetest.register_chatcommand("mpd_what", {
params = "",
description = "Display the currently played song.",
privs = {mpd=true},
func = function(name, param)
if not mpd.playing then
if mpd.time_next and mpd.time_next~=0 then
return true,"Nothing playing, "..math.floor(mpd.time_next or 0).." sec. left until next song."
else
return true,"Nothing playing."
end
end
return true,"Playing: "..mpd.song_human_readable(mpd.playing).."\nTime Left: "..math.floor(mpd.song_time_left or 0).." sec."
end,
})
minetest.register_chatcommand("mpd_next", {
params = "[seconds]",
description = "Start the next song, either immediately (no parameters) or after n seconds.",
privs = {mpd=true},
func = function(name, param)
mpd.stop_song()
if param and tonumber(param) then
mpd.time_next=tonumber(param)
return true,"Next song in "..param.." seconds!"
else
mpd.next_song()
return true,"Next song started!"
end
end,
})
minetest.register_chatcommand("mvolume", {
params = "[volume level (0-1)]",
description = "Set your background music volume. Use /mvolume 0 to turn off background music for you. Without parameters, show your current setting.",
privs = {},
func = function(pname, param)
if not param or param=="" then
local pvolume=tonumber(mpd.storage:get_string("vol_"..pname))
if not pvolume then pvolume=0.5 end
if pvolume>0 then
return true, "Your music volume is set to "..pvolume.."."
else
if mpd.handles[pname] then
minetest.sound_stop(mpd.handles[pname])
end
return true, "Background music is disabled for you. Use '/mvolume 1' to enable it again."
end
end
local pvolume=tonumber(param)
if not pvolume then
return false, "Invalid usage: /mvolume [volume level (0-1)]"
end
pvolume = math.min(pvolume, 1)
pvolume = math.max(pvolume, 0)
mpd.storage:set_string("vol_"..pname, pvolume)
if pvolume>0 then
return true, "Music volume set to "..pvolume..". Change will take effect when the next song starts."
else
if mpd.handles[pname] then
minetest.sound_stop(mpd.handles[pname])
end
return true, "Disabled background music for you. Use /mvolume to enable it again."
end
end,
})
if vote then
dofile(mpd.modpath..DIR_DELIM.."vote.lua")
end