Add the stuffs

5 files changed, 221 insertions, 0 deletions

diff --git a/LICENSE b/LICENSE
new file mode 100644
index 0000000..745bdb1
--- /dev/null
+++ b/LICENSE
@@ -0,0 +1,12 @@
+The file textures/mail_button.png was created by bas080 and is licensed under the WTFPL.
+
+All other files:
+
+Copyright (c) 2016 Carter Kolwey ("Cheapie Systems")
+
+
+Permission is hereby granted, free of charge, to any person obtaining a copy of this software and/or any associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
diff --git a/README b/README
new file mode 100644
index 0000000..cc371d2
--- /dev/null
+++ b/README
@@ -0,0 +1,26 @@
+Mail mod for Minetest
+=====================
+
+This mod adds a system to Minetest that allows players to send each other messages within the game. Unlike chat messages or /msgs, these can be sent to an offline player and will still be present the next time they join.
+
+License: See the "LICENSE" file
+
+Dependencies: None, but will integrate with unified_inventory if it is present.
+
+Crafting: N/A
+
+Instructions:
+
+The inbox can be accessed by using the /mail command or by pressing the "Mail" button in unified_inventory if that mod is installed. In that window, all messages that the player currently has have the sender and subject (truncated if necessary) shown in a list. Unread messages are shown in red, while read messages are shown in white. The "Mark Read" and "Mark Unread" buttons will change this status, as well as viewing the message.
+
+To view a message, either single-click on it and press "Read", or just double-click on it. A window will then open showing the sender, subject, and body of the message, with a button to return to the inbox.
+
+Single-clicking a message and pressing the "delete" button will remove the message from the inbox.
+
+The compose window can be opened by pressing the "New Message" button in the inbox. This opens a window where the recipient, subject, and body can be entered, along with buttons to cancel or send the message. Since messages can be sent to any name, including ones that have not yet joined the server for the first time, there is no validation to ensure that the recipient exists.
+
+If a message is sent to a player that is currently online, they will see a notification in the chat that a message has arrived, along with the sender and subject (truncated if necessary) of the message and a brief reminder that they can use the /mail command (or the mail button, if applicable) to view the message.
+
+If a player has unread messages in their inbox when they join, a notification will appear to notify them of this. It offers the option to either go to the inbox now, or not. If they choose not to, a reminder is shown in the chat to remind them that they can use the /mail command (or the mail button, if applicable) to view the message(s) later.
+
+All activity (sending messages, marking them as read/unread, deleting them, etc.) is immediately saved to a file called "mail.db" in the world directory. This file is then read at server startup. If an error occurs while saving this file, a message is printed in the server logs.
diff --git a/depends.txt b/depends.txt
new file mode 100644
index 0000000..20b7c42
--- /dev/null
+++ b/depends.txt
@@ -0,0 +1 @@
+unified_inventory?
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()
diff --git a/textures/mail_button.png b/textures/mail_button.png
new file mode 100644
index 0000000..8adf3ea
--- /dev/null
+++ b/textures/mail_button.png