diff options
Diffstat (limited to 'init.lua')
| -rw-r--r-- | init.lua | 182 |
1 files changed, 182 insertions, 0 deletions
diff --git a/init.lua b/init.lua new file mode 100644 index 0000000..164dc6b --- /dev/null +++ b/init.lua @@ -0,0 +1,182 @@ +mail = {} + +mail.highlightedmessages = {} + +mail.messages = {} + +function mail.load() + local file = io.open(minetest.get_worldpath().."/mail.db","r") + if file then + local data = file:read("*a") + mail.messages = minetest.deserialize(data) + file:close() + end +end + +function mail.save() + local file = io.open(minetest.get_worldpath().."/mail.db","w") + if file and file:write(minetest.serialize(mail.messages)) and file:close() then + return true + else + minetest.log("error","[mail] Save failed - messages may be lost!") + return false + end +end + +mail.inboxformspec = "size[8,9;]".. + "button_exit[7.5,0;0.5,0.5;quit;X]".. + "button[6.25,1;1.5,0.5;new;New Message]".. + "button[6.25,2;1.5,0.5;read;Read]".. + "button[6.25,3;1.5,0.5;delete;Delete]".. + "button[6.25,4;1.5,0.5;markread;Mark Read]".. + "button[6.25,5;1.5,0.5;markunread;Mark Unread]".. + "textlist[0,0.5;6,8.5;message;" + +function mail.send(src,dst,subject,body) + if not mail.messages[dst] then mail.messages[dst] = {} end + table.insert(mail.messages[dst],1,{unread=true,sender=src,subject=subject,body=body}) + for _,player in ipairs(minetest.get_connected_players()) do + local name = player:get_player_name() + if name == dst then + if subject == "" then subject = "(No subject)" end + minetest.chat_send_player(dst,string.format("You have a new message from %s!. Use the /mail command" .. (minetest.get_modpath("unified_inventory") and " or the mail button in the inventory " or " ") .. "to view it. Subject: %s",src,(string.len(subject) > 30 and string.sub(subject,1,27) .. "..." or subject))) + end + end + mail.save() +end + +function mail.showinbox(name) + local formspec = mail.inboxformspec + if not mail.messages[name] then mail.messages[name] = {} end + local idx, message + if mail.messages[name][1] then + for idx,message in ipairs(mail.messages[name]) do + if idx ~= 1 then formspec = formspec .. "," end + if message.unread then + formspec = formspec .. "#FF8888" + end + formspec = formspec .. "From: " .. minetest.formspec_escape(message.sender) .. " Subject: " + if message.subject ~= "" then + if string.len(message.subject) > 30 then + formspec = formspec .. minetest.formspec_escape(string.sub(message.subject,1,27)).. "..." + else + formspec = formspec .. minetest.formspec_escape(message.subject) + end + else + formspec = formspec .. "(No subject)" + end + end + formspec = formspec .. "]label[0,0;Welcome! You've got mail!]" + else + formspec = formspec .. "No mail :(]label[0,0;Welcome!]" + end + minetest.show_formspec(name,"mail:inbox",formspec) +end + +function mail.showmessage(name,msgnumber) + local message = mail.messages[name][msgnumber] + local formspec = "size[8,6]label[0,0;From: %s]label[0,0.5;Subject: %s]textarea[0.25,1;8,4;body;;%s]button[3,5;2,1;back;Back]" + local sender = minetest.formspec_escape(message.sender) + local subject = minetest.formspec_escape(message.subject) + local body = minetest.formspec_escape(message.body) + formspec = string.format(formspec,sender,subject,body) + minetest.show_formspec(name,"mail:message",formspec) +end + +function mail.showcompose(name,defaulttgt,defaultsubj,defaultbody) + local formspec = "size[8,8]field[0.25,0.5;4,1;to;To:;%s]field[0.25,1.5;4,1;subject;Subject:;%s]textarea[0.25,2.5;8,4;body;;%s]button[1,7;2,1;cancel;Cancel]button[5,7;2,1;send;Send]" + formspec = string.format(formspec,defaulttgt,defaultsubj,defaultbody) + minetest.show_formspec(name,"mail:compose",formspec) +end + +minetest.register_on_player_receive_fields(function(player,formname,fields) + if formname == "mail:inbox" then + local name = player:get_player_name() + if fields.message then + local event = minetest.explode_textlist_event(fields.message) + mail.highlightedmessages[name] = event.index + if event.type == "DCL" and mail.messages[name][mail.highlightedmessages[name]] then + mail.messages[name][mail.highlightedmessages[name]].unread = false + mail.showmessage(name,mail.highlightedmessages[name]) + end + end + if fields.read then + if mail.messages[name][mail.highlightedmessages[name]] then + mail.messages[name][mail.highlightedmessages[name]].unread = false + mail.showmessage(name,mail.highlightedmessages[name]) + end + elseif fields.delete then + if mail.messages[name][mail.highlightedmessages[name]] then table.remove(mail.messages[name],mail.highlightedmessages[name]) end + mail.showinbox(name) + mail.save() + elseif fields.markread then + if mail.messages[name][mail.highlightedmessages[name]] then mail.messages[name][mail.highlightedmessages[name]].unread = false end + mail.showinbox(name) + mail.save() + elseif fields.markunread then + if mail.messages[name][mail.highlightedmessages[name]] then mail.messages[name][mail.highlightedmessages[name]].unread = true end + mail.showinbox(name) + mail.save() + elseif fields.new then + mail.showcompose(name,"","","Type your message here.") + elseif fields.quit then + if minetest.get_modpath("unified_inventory") then + unified_inventory.set_inventory_formspec(player, "craft") + end + end + return true + elseif formname == "mail:message" then + mail.showinbox(player:get_player_name()) + return true + elseif formname == "mail:compose" then + if fields.send then + mail.send(player:get_player_name(),fields.to,fields.subject,fields.body) + end + mail.showinbox(player:get_player_name()) + return true + elseif formname == "mail:unreadnag" then + if fields.yes then + mail.showinbox(player:get_player_name()) + else + minetest.chat_send_player(player:get_player_name(),"You can use the /mail command" .. (minetest.get_modpath("unified_inventory") and " or the mail button in the inventory " or " ") .. "to read your messages later.") + end + return true + elseif fields.mail then + mail.showinbox(player:get_player_name()) + else + return false + end +end) + +if minetest.get_modpath("unified_inventory") then + unified_inventory.register_button("mail", { + type = "image", + image = "mail_button.png", + tooltip = "Mail" + }) +end + +minetest.register_chatcommand("mail",{ + description = "Open the mail interface", + func = function(name) + mail.showinbox(name) + end + } +) + +minetest.register_on_joinplayer(function(player) + minetest.after(0,function(player) + local name = player:get_player_name() + local unreadflag = false + if mail.messages[name] then + for _,message in ipairs(mail.messages[name]) do + if message.unread then unreadflag = true end + end + end + if unreadflag then + minetest.show_formspec(name,"mail:unreadnag","size[3,2]label[0,0;You have unread messages in your inbox.]label[0,0.5;Go there now?]button[0.5,0.75;2,1;yes;Yes]button_exit[0.5,1.5;2,1;no;No]") + end + end,player) +end) + +mail.load() |