From 996a4c6cbb001181f0679b7416f631cd5b19f4f1 Mon Sep 17 00:00:00 2001
From: Wuzzy <almikes@aol.com>
Date: Thu, 2 Feb 2017 00:54:51 +0100
Subject: [PATCH] Add book signing and written books

---
 mods/mcl_books/init.lua | 69 +++++++++++++++++++++++++++++++++++++----
 1 file changed, 63 insertions(+), 6 deletions(-)

diff --git a/mods/mcl_books/init.lua b/mods/mcl_books/init.lua
index 8d63179cb..decbf674b 100644
--- a/mods/mcl_books/init.lua
+++ b/mods/mcl_books/init.lua
@@ -9,17 +9,33 @@ minetest.register_craftitem("mcl_books:book", {
 minetest.register_craft({
 	type = 'shapeless',
 	output = 'mcl_books:book',
-	recipe = { 'mcl_core:paper', 'mcl_core:paper', 'mcl_core:paper', 'mcl_mobitems:leather',
-	}
+	recipe = { 'mcl_core:paper', 'mcl_core:paper', 'mcl_core:paper', 'mcl_mobitems:leather', }
 })
 
 local write = function(itemstack, user, pointed_thing)
 	local text = itemstack:get_metadata()
+	local formspec = "size[8,9]"..
+		"background[-0.5,-0.5;9,10;mcl_books_book_bg.png]"..
+		"textarea[0.5,0.25;7.5,9.25;text;;"..minetest.formspec_escape(text).."]"..
+		"button_exit[0.5,8.15;3,1;sign;Sign]"..
+		"button_exit[4,8.15;3,1;ok;Done]"
+	minetest.show_formspec(user:get_player_name(), "mcl_books:writable_book", formspec)
+end
+
+local read = function(itemstack, user, pointed_thing)
+	local meta = minetest.deserialize(itemstack:get_metadata())
+	local text
+	if meta ~= nil then
+		text = meta.text
+	end
+	if text == nil then
+		text = ""
+	end
 	local formspec = "size[8,9]"..
 		"background[-0.5,-0.5;9,10;mcl_books_book_bg.png]"..
 		"textarea[0.5,0.25;7.5,9.25;text;;"..minetest.formspec_escape(text).."]"..
 		"button_exit[2.5,8.15;3,1;ok;Done]"
-		minetest.show_formspec(user:get_player_name(), "mcl_books:writable_book", formspec)
+	minetest.show_formspec(user:get_player_name(), "mcl_books:written_book", formspec)
 end
 
 -- Book and Quill
@@ -36,9 +52,40 @@ minetest.register_on_player_receive_fields(function ( player, formname, fields )
 	if ((formname == "mcl_books:writable_book") and fields and fields.text) then
 		local stack = player:get_wielded_item()
 		if (stack:get_name() and (stack:get_name() == "mcl_books:writable_book")) then
-			local t = stack:to_table()
-			t.metadata = fields.text
-			player:set_wielded_item(ItemStack(t))
+			if fields.ok then
+				local t = stack:to_table()
+				t.metadata = fields.text
+				player:set_wielded_item(ItemStack(t))
+			elseif fields.sign then
+				local text = stack:get_metadata()
+				local name = player:get_player_name()
+				local formspec = "size[8,9]"..
+					"background[-0.5,-0.5;9,10;mcl_books_book_bg.png]"..
+					"field[0.5,1;7.5,1;title;"..core.colorize("#000000", "Enter book title:")..";]"..
+					"label[0.5,1.5;"..core.colorize("#404040", minetest.formspec_escape("by " .. name)).."]"..
+					"label[0.5,7.15;"..core.colorize("#000000", "Note: The book will no longer") .. "\n" .. core.colorize("#000000", "be editable after signing.").."]"..
+					"button_exit[0.5,8.15;3,1;sign;Sign and Close]"..
+					"button_exit[4,8.15;3,1;cancel;Cancel]"
+				minetest.show_formspec(player:get_player_name(), "mcl_books:signing", formspec)
+			end
+		end
+	elseif ((formname == "mcl_books:signing") and fields and fields.sign and fields.title) then
+		local newbook = ItemStack("mcl_books:written_book")
+		local book = player:get_wielded_item()
+		local name = player:get_player_name()
+		if book:get_name() == "mcl_books:writable_book" then
+			if fields.title == "" then
+				fields.title = "Nameless Book"
+			end
+			local meta = {
+				title = fields.title,
+				author = name,
+				text = book:get_metadata()
+			}
+			newbook:set_metadata(minetest.serialize(meta))
+			player:set_wielded_item(newbook)
+		else
+			minetest.log("error", "[mcl_books] "..name.." failed to sign a book!")
 		end
 	end
 end)
@@ -49,6 +96,16 @@ minetest.register_craft({
 	recipe = { "mcl_books:books", "mcl_dyes:black", "mcl_mobitems:feather" },
 })
 
+-- Written Book
+minetest.register_craftitem("mcl_books:written_book", {
+	description = "Written Book",
+	inventory_image = "mcl_books_book_written.png",
+	groups = { not_in_creative_inventory=1, book=1 },
+	stack_max = 1,
+	on_place = read,
+	on_secondary_use = read
+})
+
 -- Bookshelf
 minetest.register_node("mcl_books:bookshelf", {
 	description = "Bookshelf",