Improve glass
[oweals/minetest.git] / src / inventory.cpp
index 3899c9394186cdf3e5cac86ed81d115c64618c88..1929761a58213897a00fa4637f08df0784f4c6af 100644 (file)
@@ -1,6 +1,6 @@
 /*
 Minetest-c55
-Copyright (C) 2010 celeron55, Perttu Ahola <celeron55@gmail.com>
+Copyright (C) 2010-2011 celeron55, Perttu Ahola <celeron55@gmail.com>
 
 This program is free software; you can redistribute it and/or modify
 it under the terms of the GNU General Public License as published by
@@ -17,30 +17,50 @@ with this program; if not, write to the Free Software Foundation, Inc.,
 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 */
 
-/*
-(c) 2010 Perttu Ahola <celeron55@gmail.com>
-*/
-
 #include "inventory.h"
 #include "serialization.h"
 #include "utility.h"
 #include "debug.h"
 #include <sstream>
-#include "main.h"
+#include "main.h" // For tsrc, g_toolmanager
+#include "serverobject.h"
+#include "content_mapnode.h"
+#include "content_inventory.h"
+#include "content_sao.h"
+#include "player.h"
+#include "log.h"
+#include "nodedef.h"
+#include "tooldef.h"
+#include "gamedef.h"
 
 /*
        InventoryItem
 */
 
-InventoryItem::InventoryItem()
+InventoryItem::InventoryItem(IGameDef *gamedef, u16 count):
+       m_gamedef(gamedef),
+       m_count(count)
 {
+       assert(m_gamedef);
 }
 
 InventoryItem::~InventoryItem()
 {
 }
 
-InventoryItem* InventoryItem::deSerialize(std::istream &is)
+content_t content_translate_from_19_to_internal(content_t c_from)
+{
+       for(u32 i=0; i<sizeof(trans_table_19)/sizeof(trans_table_19[0]); i++)
+       {
+               if(trans_table_19[i][1] == c_from)
+               {
+                       return trans_table_19[i][0];
+               }
+       }
+       return c_from;
+}
+
+InventoryItem* InventoryItem::deSerialize(std::istream &is, IGameDef *gamedef)
 {
        DSTACK(__FUNCTION_NAME);
 
@@ -56,110 +76,243 @@ InventoryItem* InventoryItem::deSerialize(std::istream &is)
                is>>material;
                u16 count;
                is>>count;
-               if(material > 255)
+               // Convert old materials
+               if(material <= 0xff)
+               {
+                       material = content_translate_from_19_to_internal(material);
+               }
+               if(material > MAX_CONTENT)
                        throw SerializationError("Too large material number");
-               return new MaterialItem(material, count);
+               return new MaterialItem(gamedef, material, count);
+       }
+       else if(name == "MaterialItem2")
+       {
+               u16 material;
+               is>>material;
+               u16 count;
+               is>>count;
+               if(material > MAX_CONTENT)
+                       throw SerializationError("Too large material number");
+               return new MaterialItem(gamedef, material, count);
        }
        else if(name == "MBOItem")
        {
                std::string inventorystring;
                std::getline(is, inventorystring, '|');
-               return new MapBlockObjectItem(inventorystring);
+               throw SerializationError("MBOItem not supported anymore");
+       }
+       else if(name == "CraftItem")
+       {
+               std::string subname;
+               std::getline(is, subname, ' ');
+               u16 count;
+               is>>count;
+               return new CraftItem(gamedef, subname, count);
+       }
+       else if(name == "ToolItem")
+       {
+               std::string toolname;
+               std::getline(is, toolname, ' ');
+               u16 wear;
+               is>>wear;
+               return new ToolItem(gamedef, toolname, wear);
        }
        else
        {
-               dstream<<"Unknown InventoryItem name=\""<<name<<"\""<<std::endl;
+               infostream<<"Unknown InventoryItem name=\""<<name<<"\""<<std::endl;
                throw SerializationError("Unknown InventoryItem name");
        }
 }
 
+std::string InventoryItem::getItemString() {
+       // Get item string
+       std::ostringstream os(std::ios_base::binary);
+       serialize(os);
+       return os.str();
+}
+
+ServerActiveObject* InventoryItem::createSAO(ServerEnvironment *env, u16 id, v3f pos)
+{
+       /*
+               Create an ItemSAO
+       */
+       pos.Y -= BS*0.25; // let it drop a bit
+       // Randomize a bit
+       pos.X += BS*0.2*(float)myrand_range(-1000,1000)/1000.0;
+       pos.Z += BS*0.2*(float)myrand_range(-1000,1000)/1000.0;
+       // Create object
+       ServerActiveObject *obj = new ItemSAO(env, pos, getItemString());
+       return obj;
+}
+
 /*
-       MapBlockObjectItem
+       MaterialItem
 */
+
 #ifndef SERVER
-video::ITexture * MapBlockObjectItem::getImage()
+video::ITexture * MaterialItem::getImage(ITextureSource *tsrc) const
 {
-       if(m_inventorystring.substr(0,3) == "Rat")
-               //return g_device->getVideoDriver()->getTexture("../data/rat.png");
-               return g_irrlicht->getTexture("../data/rat.png");
-       
-       if(m_inventorystring.substr(0,4) == "Sign")
-               //return g_device->getVideoDriver()->getTexture("../data/sign.png");
-               return g_irrlicht->getTexture("../data/sign.png");
-
-       return NULL;
+       return m_gamedef->getNodeDefManager()->get(m_content).inventory_texture;
 }
 #endif
-std::string MapBlockObjectItem::getText()
+
+bool MaterialItem::isCookable() const
 {
-       if(m_inventorystring.substr(0,3) == "Rat")
-               return "";
+       return item_material_is_cookable(m_content, m_gamedef);
+}
+
+InventoryItem *MaterialItem::createCookResult() const
+{
+       return item_material_create_cook_result(m_content, m_gamedef);
+}
+
+/*
+       ToolItem
+*/
+
+std::string ToolItem::getImageBasename() const
+{
+       return m_gamedef->getToolDefManager()->getImagename(m_toolname);
+}
+
+#ifndef SERVER
+video::ITexture * ToolItem::getImage(ITextureSource *tsrc) const
+{
+       if(tsrc == NULL)
+               return NULL;
+       
+       std::string basename = getImageBasename();
        
-       if(m_inventorystring.substr(0,4) == "Sign")
-               return "";
+       /*
+               Calculate a progress value with sane amount of
+               maximum states
+       */
+       u32 maxprogress = 30;
+       u32 toolprogress = (65535-m_wear)/(65535/maxprogress);
+       
+       float value_f = (float)toolprogress / (float)maxprogress;
+       std::ostringstream os;
+       os<<basename<<"^[progressbar"<<value_f;
 
-       return "obj";
+       return tsrc->getTextureRaw(os.str());
 }
 
-MapBlockObject * MapBlockObjectItem::createObject
-               (v3f pos, f32 player_yaw, f32 player_pitch)
+video::ITexture * ToolItem::getImageRaw(ITextureSource *tsrc) const
 {
-       std::istringstream is(m_inventorystring);
-       std::string name;
-       std::getline(is, name, ' ');
+       if(tsrc == NULL)
+               return NULL;
        
-       if(name == "None")
-       {
+       return tsrc->getTextureRaw(getImageBasename());
+}
+#endif
+
+/*
+       CraftItem
+*/
+
+#ifndef SERVER
+video::ITexture * CraftItem::getImage(ITextureSource *tsrc) const
+{
+       if(tsrc == NULL)
                return NULL;
-       }
-       else if(name == "Sign")
-       {
-               std::string text;
-               std::getline(is, text, '|');
-               SignObject *obj = new SignObject(NULL, -1, pos);
-               obj->setText(text);
-               obj->setYaw(-player_yaw);
-               return obj;
-       }
-       else if(name == "Rat")
-       {
-               RatObject *obj = new RatObject(NULL, -1, pos);
+       
+       std::string name = item_craft_get_image_name(m_subname, m_gamedef);
+
+       // Get such a texture
+       return tsrc->getTextureRaw(name);
+}
+#endif
+
+ServerActiveObject* CraftItem::createSAO(ServerEnvironment *env, u16 id, v3f pos)
+{
+       // Special cases
+       ServerActiveObject *obj = item_craft_create_object(m_subname, env, pos);
+       if(obj)
                return obj;
-       }
-       else
-       {
-               return NULL;
-       }
+       // Default
+       return InventoryItem::createSAO(env, id, pos);
+}
+
+u16 CraftItem::getDropCount() const
+{
+       // Special cases
+       s16 dc = item_craft_get_drop_count(m_subname, m_gamedef);
+       if(dc != -1)
+               return dc;
+       // Default
+       return InventoryItem::getDropCount();
+}
+
+bool CraftItem::isCookable() const
+{
+       return item_craft_is_cookable(m_subname, m_gamedef);
+}
+
+InventoryItem *CraftItem::createCookResult() const
+{
+       return item_craft_create_cook_result(m_subname, m_gamedef);
+}
+
+bool CraftItem::use(ServerEnvironment *env, ServerActiveObject *user)
+{
+       if(!item_craft_is_eatable(m_subname, m_gamedef))
+               return false;
+       
+       u16 result_count = getCount() - 1; // Eat one at a time
+       s16 hp_change = item_craft_eat_hp_change(m_subname, m_gamedef);
+       s16 hp = user->getHP();
+       hp += hp_change;
+       if(hp < 0)
+               hp = 0;
+       user->setHP(hp);
+       
+       if(result_count < 1)
+               return true;
+               
+       setCount(result_count);
+       return false;
 }
 
 /*
        Inventory
 */
 
-Inventory::Inventory(u32 size)
+InventoryList::InventoryList(std::string name, u32 size)
 {
+       m_name = name;
        m_size = size;
        clearItems();
+       //m_dirty = false;
 }
 
-Inventory::~Inventory()
+InventoryList::~InventoryList()
 {
        for(u32 i=0; i<m_items.size(); i++)
        {
-               delete m_items[i];
+               if(m_items[i])
+                       delete m_items[i];
        }
 }
 
-void Inventory::clearItems()
+void InventoryList::clearItems()
 {
+       for(u32 i=0; i<m_items.size(); i++)
+       {
+               if(m_items[i])
+                       delete m_items[i];
+       }
+
        m_items.clear();
+
        for(u32 i=0; i<m_size; i++)
        {
                m_items.push_back(NULL);
        }
+
+       //setDirty(true);
 }
 
-void Inventory::serialize(std::ostream &os)
+void InventoryList::serialize(std::ostream &os) const
 {
        //os.imbue(std::locale("C"));
        
@@ -178,10 +331,10 @@ void Inventory::serialize(std::ostream &os)
                os<<"\n";
        }
 
-       os<<"end\n";
+       os<<"EndInventoryList\n";
 }
 
-void Inventory::deSerialize(std::istream &is)
+void InventoryList::deSerialize(std::istream &is, IGameDef *gamedef)
 {
        //is.imbue(std::locale("C"));
 
@@ -199,7 +352,12 @@ void Inventory::deSerialize(std::istream &is)
                std::string name;
                std::getline(iss, name, ' ');
 
-               if(name == "end")
+               if(name == "EndInventoryList")
+               {
+                       break;
+               }
+               // This is a temporary backwards compatibility fix
+               else if(name == "end")
                {
                        break;
                }
@@ -207,7 +365,7 @@ void Inventory::deSerialize(std::istream &is)
                {
                        if(item_i > getSize() - 1)
                                throw SerializationError("too many items");
-                       InventoryItem *item = InventoryItem::deSerialize(iss);
+                       InventoryItem *item = InventoryItem::deSerialize(iss, gamedef);
                        m_items[item_i++] = item;
                }
                else if(name == "Empty")
@@ -223,8 +381,18 @@ void Inventory::deSerialize(std::istream &is)
        }
 }
 
-Inventory & Inventory::operator = (Inventory &other)
+InventoryList::InventoryList(const InventoryList &other)
+{
+       /*
+               Do this so that the items get cloned. Otherwise the pointers
+               in the array will just get copied.
+       */
+       *this = other;
+}
+
+InventoryList & InventoryList::operator = (const InventoryList &other)
 {
+       m_name = other.m_name;
        m_size = other.m_size;
        clearItems();
        for(u32 i=0; i<other.m_items.size(); i++)
@@ -235,16 +403,22 @@ Inventory & Inventory::operator = (Inventory &other)
                        m_items[i] = item->clone();
                }
        }
+       //setDirty(true);
 
        return *this;
 }
 
-u32 Inventory::getSize()
+const std::string &InventoryList::getName() const
+{
+       return m_name;
+}
+
+u32 InventoryList::getSize()
 {
        return m_items.size();
 }
 
-u32 Inventory::getUsedSlots()
+u32 InventoryList::getUsedSlots()
 {
        u32 num = 0;
        for(u32 i=0; i<m_items.size(); i++)
@@ -256,23 +430,36 @@ u32 Inventory::getUsedSlots()
        return num;
 }
 
-InventoryItem * Inventory::getItem(u32 i)
+u32 InventoryList::getFreeSlots()
+{
+       return getSize() - getUsedSlots();
+}
+
+const InventoryItem * InventoryList::getItem(u32 i) const
+{
+       if(i > m_items.size() - 1)
+               return NULL;
+       return m_items[i];
+}
+
+InventoryItem * InventoryList::getItem(u32 i)
 {
        if(i > m_items.size() - 1)
                return NULL;
        return m_items[i];
 }
 
-InventoryItem * Inventory::changeItem(u32 i, InventoryItem *newitem)
+InventoryItem * InventoryList::changeItem(u32 i, InventoryItem *newitem)
 {
        assert(i < m_items.size());
 
        InventoryItem *olditem = m_items[i];
        m_items[i] = newitem;
+       //setDirty(true);
        return olditem;
 }
 
-void Inventory::deleteItem(u32 i)
+void InventoryList::deleteItem(u32 i)
 {
        assert(i < m_items.size());
        InventoryItem *item = changeItem(i, NULL);
@@ -280,53 +467,163 @@ void Inventory::deleteItem(u32 i)
                delete item;
 }
 
-bool Inventory::addItem(InventoryItem *newitem)
+InventoryItem * InventoryList::addItem(InventoryItem *newitem)
 {
-       // If it is a MaterialItem, try to find an already existing one
-       // and just increment the counter
-       if(std::string("MaterialItem") == newitem->getName())
+       if(newitem == NULL)
+               return NULL;
+       
+       /*
+               First try to find if it could be added to some existing items
+       */
+       for(u32 i=0; i<m_items.size(); i++)
        {
-               u8 material = ((MaterialItem*)newitem)->getMaterial();
-               u8 count = ((MaterialItem*)newitem)->getCount();
-               for(u32 i=0; i<m_items.size(); i++)
-               {
-                       InventoryItem *item2 = m_items[i];
-                       if(item2 == NULL)
-                               continue;
-                       if(std::string("MaterialItem") != item2->getName())
-                               continue;
-                       // Found one. Check if it is of the right material and has
-                       // free space
-                       MaterialItem *mitem2 = (MaterialItem*)item2;
-                       if(mitem2->getMaterial() != material)
-                               continue;
-                       //TODO: Add all that can be added and add remaining part
-                       // to another place
-                       if(mitem2->freeSpace() < count)
-                               continue;
-                       // Add to the counter
-                       mitem2->add(count);
-                       // Dump the parameter
-                       delete newitem;
-                       return true;
-               }
+               // Ignore empty slots
+               if(m_items[i] == NULL)
+                       continue;
+               // Try adding
+               newitem = addItem(i, newitem);
+               if(newitem == NULL)
+                       return NULL; // All was eaten
        }
-       // Else find an empty position
+
+       /*
+               Then try to add it to empty slots
+       */
        for(u32 i=0; i<m_items.size(); i++)
        {
-               InventoryItem *item = m_items[i];
-               if(item != NULL)
+               // Ignore unempty slots
+               if(m_items[i] != NULL)
                        continue;
+               // Try adding
+               newitem = addItem(i, newitem);
+               if(newitem == NULL)
+                       return NULL; // All was eaten
+       }
+
+       // Return leftover
+       return newitem;
+}
+
+InventoryItem * InventoryList::addItem(u32 i, InventoryItem *newitem)
+{
+       if(newitem == NULL)
+               return NULL;
+       
+       //setDirty(true);
+       
+       // If it is an empty position, it's an easy job.
+       InventoryItem *to_item = getItem(i);
+       if(to_item == NULL)
+       {
                m_items[i] = newitem;
+               return NULL;
+       }
+       
+       // If not addable, return the item
+       if(newitem->addableTo(to_item) == false)
+               return newitem;
+       
+       // If the item fits fully in the slot, add counter and delete it
+       if(newitem->getCount() <= to_item->freeSpace())
+       {
+               to_item->add(newitem->getCount());
+               delete newitem;
+               return NULL;
+       }
+       // Else the item does not fit fully. Add all that fits and return
+       // the rest.
+       else
+       {
+               u16 freespace = to_item->freeSpace();
+               to_item->add(freespace);
+               newitem->remove(freespace);
+               return newitem;
+       }
+}
+
+bool InventoryList::itemFits(const u32 i, const InventoryItem *newitem)
+{
+       // If it is an empty position, it's an easy job.
+       const InventoryItem *to_item = getItem(i);
+       if(to_item == NULL)
+       {
                return true;
        }
-       // Failed
+       
+       // If not addable, fail
+       if(newitem->addableTo(to_item) == false)
+               return false;
+       
+       // If the item fits fully in the slot, pass
+       if(newitem->getCount() <= to_item->freeSpace())
+       {
+               return true;
+       }
+
+       return false;
+}
+
+bool InventoryList::roomForItem(const InventoryItem *item)
+{
+       for(u32 i=0; i<m_items.size(); i++)
+               if(itemFits(i, item))
+                       return true;
+       return false;
+}
+
+bool InventoryList::roomForCookedItem(const InventoryItem *item)
+{
+       if(!item)
+               return false;
+       const InventoryItem *cook = item->createCookResult();
+       if(!cook)
+               return false;
+       bool room = roomForItem(cook);
+       delete cook;
+       return room;
+}
+
+InventoryItem * InventoryList::takeItem(u32 i, u32 count)
+{
+       if(count == 0)
+               return NULL;
+       
+       //setDirty(true);
+
+       InventoryItem *item = getItem(i);
+       // If it is an empty position, return NULL
+       if(item == NULL)
+               return NULL;
+       
+       if(count >= item->getCount())
+       {
+               // Get the item by swapping NULL to its place
+               return changeItem(i, NULL);
+       }
+       else
+       {
+               InventoryItem *item2 = item->clone();
+               item->remove(count);
+               item2->setCount(count);
+               return item2;
+       }
+       
        return false;
 }
 
-void Inventory::print(std::ostream &o)
+void InventoryList::decrementMaterials(u16 count)
 {
-       o<<"Player inventory:"<<std::endl;
+       for(u32 i=0; i<m_items.size(); i++)
+       {
+               InventoryItem *item = takeItem(i, count);
+               if(item)
+                       delete item;
+       }
+}
+
+void InventoryList::print(std::ostream &o)
+{
+       o<<"InventoryList:"<<std::endl;
        for(u32 i=0; i<m_items.size(); i++)
        {
                InventoryItem *item = m_items[i];
@@ -338,5 +635,422 @@ void Inventory::print(std::ostream &o)
                }
        }
 }
+
+/*
+       Inventory
+*/
+
+Inventory::~Inventory()
+{
+       clear();
+}
+
+void Inventory::clear()
+{
+       for(u32 i=0; i<m_lists.size(); i++)
+       {
+               delete m_lists[i];
+       }
+       m_lists.clear();
+}
+
+Inventory::Inventory()
+{
+}
+
+Inventory::Inventory(const Inventory &other)
+{
+       *this = other;
+}
+
+Inventory & Inventory::operator = (const Inventory &other)
+{
+       clear();
+       for(u32 i=0; i<other.m_lists.size(); i++)
+       {
+               m_lists.push_back(new InventoryList(*other.m_lists[i]));
+       }
+       return *this;
+}
+
+void Inventory::serialize(std::ostream &os) const
+{
+       for(u32 i=0; i<m_lists.size(); i++)
+       {
+               InventoryList *list = m_lists[i];
+               os<<"List "<<list->getName()<<" "<<list->getSize()<<"\n";
+               list->serialize(os);
+       }
+
+       os<<"EndInventory\n";
+}
+
+void Inventory::deSerialize(std::istream &is, IGameDef *gamedef)
+{
+       clear();
+
+       for(;;)
+       {
+               std::string line;
+               std::getline(is, line, '\n');
+
+               std::istringstream iss(line);
+
+               std::string name;
+               std::getline(iss, name, ' ');
+
+               if(name == "EndInventory")
+               {
+                       break;
+               }
+               // This is a temporary backwards compatibility fix
+               else if(name == "end")
+               {
+                       break;
+               }
+               else if(name == "List")
+               {
+                       std::string listname;
+                       u32 listsize;
+
+                       std::getline(iss, listname, ' ');
+                       iss>>listsize;
+
+                       InventoryList *list = new InventoryList(listname, listsize);
+                       list->deSerialize(is, gamedef);
+
+                       m_lists.push_back(list);
+               }
+               else
+               {
+                       throw SerializationError("Unknown inventory identifier");
+               }
+       }
+}
+
+InventoryList * Inventory::addList(const std::string &name, u32 size)
+{
+       s32 i = getListIndex(name);
+       if(i != -1)
+       {
+               if(m_lists[i]->getSize() != size)
+               {
+                       delete m_lists[i];
+                       m_lists[i] = new InventoryList(name, size);
+               }
+               return m_lists[i];
+       }
+       else
+       {
+               m_lists.push_back(new InventoryList(name, size));
+               return m_lists.getLast();
+       }
+}
+
+InventoryList * Inventory::getList(const std::string &name)
+{
+       s32 i = getListIndex(name);
+       if(i == -1)
+               return NULL;
+       return m_lists[i];
+}
+
+const InventoryList * Inventory::getList(const std::string &name) const
+{
+       s32 i = getListIndex(name);
+       if(i == -1)
+               return NULL;
+       return m_lists[i];
+}
+
+const s32 Inventory::getListIndex(const std::string &name) const
+{
+       for(u32 i=0; i<m_lists.size(); i++)
+       {
+               if(m_lists[i]->getName() == name)
+                       return i;
+       }
+       return -1;
+}
+
+/*
+       InventoryAction
+*/
+
+InventoryAction * InventoryAction::deSerialize(std::istream &is)
+{
+       std::string type;
+       std::getline(is, type, ' ');
+
+       InventoryAction *a = NULL;
+
+       if(type == "Move")
+       {
+               a = new IMoveAction(is);
+       }
+
+       return a;
+}
+
+static std::string describeC(const struct InventoryContext *c)
+{
+       if(c->current_player == NULL)
+               return "current_player=NULL";
+       else
+               return std::string("current_player=") + c->current_player->getName();
+}
+
+IMoveAction::IMoveAction(std::istream &is)
+{
+       std::string ts;
+
+       std::getline(is, ts, ' ');
+       count = stoi(ts);
+
+       std::getline(is, from_inv, ' ');
+
+       std::getline(is, from_list, ' ');
+
+       std::getline(is, ts, ' ');
+       from_i = stoi(ts);
+
+       std::getline(is, to_inv, ' ');
+
+       std::getline(is, to_list, ' ');
+
+       std::getline(is, ts, ' ');
+       to_i = stoi(ts);
+}
+
+void IMoveAction::apply(InventoryContext *c, InventoryManager *mgr)
+{
+       Inventory *inv_from = mgr->getInventory(c, from_inv);
+       Inventory *inv_to = mgr->getInventory(c, to_inv);
+       
+       if(!inv_from){
+               infostream<<"IMoveAction::apply(): FAIL: source inventory not found: "
+                               <<"context=["<<describeC(c)<<"], from_inv=\""<<from_inv<<"\""
+                               <<", to_inv=\""<<to_inv<<"\""<<std::endl;
+               return;
+       }
+       if(!inv_to){
+               infostream<<"IMoveAction::apply(): FAIL: destination inventory not found: "
+                               "context=["<<describeC(c)<<"], from_inv=\""<<from_inv<<"\""
+                               <<", to_inv=\""<<to_inv<<"\""<<std::endl;
+               return;
+       }
+
+       InventoryList *list_from = inv_from->getList(from_list);
+       InventoryList *list_to = inv_to->getList(to_list);
+
+       /*
+               If a list doesn't exist or the source item doesn't exist
+       */
+       if(!list_from){
+               infostream<<"IMoveAction::apply(): FAIL: source list not found: "
+                               <<"context=["<<describeC(c)<<"], from_inv=\""<<from_inv<<"\""
+                               <<", from_list=\""<<from_list<<"\""<<std::endl;
+               return;
+       }
+       if(!list_to){
+               infostream<<"IMoveAction::apply(): FAIL: destination list not found: "
+                               <<"context=["<<describeC(c)<<"], to_inv=\""<<to_inv<<"\""
+                               <<", to_list=\""<<to_list<<"\""<<std::endl;
+               return;
+       }
+       if(list_from->getItem(from_i) == NULL)
+       {
+               infostream<<"IMoveAction::apply(): FAIL: source item not found: "
+                               <<"context=["<<describeC(c)<<"], from_inv=\""<<from_inv<<"\""
+                               <<", from_list=\""<<from_list<<"\""
+                               <<" from_i="<<from_i<<std::endl;
+               return;
+       }
+       /*
+               If the source and the destination slots are the same
+       */
+       if(inv_from == inv_to && list_from == list_to && from_i == to_i)
+       {
+               infostream<<"IMoveAction::apply(): FAIL: source and destination slots "
+                               <<"are the same: inv=\""<<from_inv<<"\" list=\""<<from_list
+                               <<"\" i="<<from_i<<std::endl;
+               return;
+       }
+       
+       // Take item from source list
+       InventoryItem *item1 = NULL;
+       if(count == 0)
+               item1 = list_from->changeItem(from_i, NULL);
+       else
+               item1 = list_from->takeItem(from_i, count);
+
+       // Try to add the item to destination list
+       InventoryItem *olditem = item1;
+       item1 = list_to->addItem(to_i, item1);
+
+       // If something is returned, the item was not fully added
+       if(item1 != NULL)
+       {
+               // If olditem is returned, nothing was added.
+               bool nothing_added = (item1 == olditem);
+               
+               // If something else is returned, part of the item was left unadded.
+               // Add the other part back to the source item
+               list_from->addItem(from_i, item1);
+
+               // If olditem is returned, nothing was added.
+               // Swap the items
+               if(nothing_added)
+               {
+                       // Take item from source list
+                       item1 = list_from->changeItem(from_i, NULL);
+                       // Adding was not possible, swap the items.
+                       InventoryItem *item2 = list_to->changeItem(to_i, item1);
+                       // Put item from destination list to the source list
+                       list_from->changeItem(from_i, item2);
+               }
+       }
+
+       mgr->inventoryModified(c, from_inv);
+       if(from_inv != to_inv)
+               mgr->inventoryModified(c, to_inv);
+       
+       infostream<<"IMoveAction::apply(): moved at "
+                       <<"["<<describeC(c)<<"]"
+                       <<" from inv=\""<<from_inv<<"\""
+                       <<" list=\""<<from_list<<"\""
+                       <<" i="<<from_i
+                       <<" to inv=\""<<to_inv<<"\""
+                       <<" list=\""<<to_list<<"\""
+                       <<" i="<<to_i
+                       <<std::endl;
+}
+
+/*
+       Craft checking system
+*/
+
+bool ItemSpec::checkItem(const InventoryItem *item) const
+{
+       if(type == ITEM_NONE)
+       {
+               // Has to be no item
+               if(item != NULL)
+                       return false;
+               return true;
+       }
+       
+       // There should be an item
+       if(item == NULL)
+               return false;
+
+       std::string itemname = item->getName();
+
+       if(type == ITEM_MATERIAL)
+       {
+               if(itemname != "MaterialItem")
+                       return false;
+               MaterialItem *mitem = (MaterialItem*)item;
+               if(mitem->getMaterial() != num)
+                       return false;
+       }
+       else if(type == ITEM_CRAFT)
+       {
+               if(itemname != "CraftItem")
+                       return false;
+               CraftItem *mitem = (CraftItem*)item;
+               if(mitem->getSubName() != name)
+                       return false;
+       }
+       else if(type == ITEM_TOOL)
+       {
+               // Not supported yet
+               assert(0);
+       }
+       else if(type == ITEM_MBO)
+       {
+               // Not supported yet
+               assert(0);
+       }
+       else
+       {
+               // Not supported yet
+               assert(0);
+       }
+       return true;
+}
+
+bool checkItemCombination(InventoryItem const * const *items, const ItemSpec *specs)
+{
+       u16 items_min_x = 100;
+       u16 items_max_x = 100;
+       u16 items_min_y = 100;
+       u16 items_max_y = 100;
+       for(u16 y=0; y<3; y++)
+       for(u16 x=0; x<3; x++)
+       {
+               if(items[y*3 + x] == NULL)
+                       continue;
+               if(items_min_x == 100 || x < items_min_x)
+                       items_min_x = x;
+               if(items_min_y == 100 || y < items_min_y)
+                       items_min_y = y;
+               if(items_max_x == 100 || x > items_max_x)
+                       items_max_x = x;
+               if(items_max_y == 100 || y > items_max_y)
+                       items_max_y = y;
+       }
+       // No items at all, just return false
+       if(items_min_x == 100)
+               return false;
+       
+       u16 items_w = items_max_x - items_min_x + 1;
+       u16 items_h = items_max_y - items_min_y + 1;
+
+       u16 specs_min_x = 100;
+       u16 specs_max_x = 100;
+       u16 specs_min_y = 100;
+       u16 specs_max_y = 100;
+       for(u16 y=0; y<3; y++)
+       for(u16 x=0; x<3; x++)
+       {
+               if(specs[y*3 + x].type == ITEM_NONE)
+                       continue;
+               if(specs_min_x == 100 || x < specs_min_x)
+                       specs_min_x = x;
+               if(specs_min_y == 100 || y < specs_min_y)
+                       specs_min_y = y;
+               if(specs_max_x == 100 || x > specs_max_x)
+                       specs_max_x = x;
+               if(specs_max_y == 100 || y > specs_max_y)
+                       specs_max_y = y;
+       }
+       // No specs at all, just return false
+       if(specs_min_x == 100)
+               return false;
+
+       u16 specs_w = specs_max_x - specs_min_x + 1;
+       u16 specs_h = specs_max_y - specs_min_y + 1;
+
+       // Different sizes
+       if(items_w != specs_w || items_h != specs_h)
+               return false;
+
+       for(u16 y=0; y<specs_h; y++)
+       for(u16 x=0; x<specs_w; x++)
+       {
+               u16 items_x = items_min_x + x;
+               u16 items_y = items_min_y + y;
+               u16 specs_x = specs_min_x + x;
+               u16 specs_y = specs_min_y + y;
+               const InventoryItem *item = items[items_y * 3 + items_x];
+               const ItemSpec &spec = specs[specs_y * 3 + specs_x];
+
+               if(spec.checkItem(item) == false)
+                       return false;
+       }
+
+       return true;
+}
        
 //END