ObjPush.h

/*	
    Copyright (C) <2012>  <huangweilook@21cn.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
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program.  If not, see <http://www.gnu.org/licenses/>.
*/	
#ifndef _OBJPUSH_H
#define _OBJPUSH_H
//调用lua函数时参数压栈的抽象
template<typename T>
class objPush
{
public:
	objPush(lua_State *L,const T arg)
	{
		lua_pushnumber(L,(lua_Number)arg);
	}
};

//对指针类型的特化
template<typename T>
class objPush<T*>
{
public:
	objPush(lua_State *L,T* arg)
	{
		if(!arg)
			lua_pushnil(L);
		else
		{
			if(!luaRegisterClass<typename pointerTraits<T>::PointeeType>::isRegister())
				lua_pushlightuserdata(L,(T*)arg);
			else
				objUserData<typename pointerTraits<T>::PointeeType>::NewObj(L,arg);
		}
	}
};

template<typename T>
class objPush<const T*>
{
public:
	objPush(lua_State *L,const T* arg)
	{
		if(!arg)
			lua_pushnil(L);
		else
		{
			if(!luaRegisterClass<typename pointerTraits<T>::PointeeType>::isRegister())
				lua_pushlightuserdata(L,(T*)arg);
			else
				objUserData<typename pointerTraits<T>::PointeeType>::NewObj(L,arg);
		}
	}
};

//字符串的特化
template<>
class objPush<const char *>
{
public:
	objPush(lua_State *L,const char *value)
	{
		lua_pushstring(L,value);
	}
};

template<>
class objPush<char*>
{
public:
	objPush(lua_State *L,char *value)
	{
		lua_pushstring(L,value);
	}
};


//对int64的特化成
template<>
class objPush<int64_t>
{
public:
	objPush(lua_State *L,int64_t value)
	{
		pushI64(L,value);
	}
};

//对std::string的特化
template<>
class objPush<std::string>
{
public:
	objPush(lua_State *L,const std::string &arg)
	{
		lua_pushstring(L,arg.c_str());
	}
};

//针对luaObject的特化
template<>
class objPush<luaObject>
{
public:
	objPush(lua_State *L,const luaObject arg)
	{
		lua_rawgeti(L,LUA_REGISTRYINDEX,arg.getIndex());
	}
};


//针对luatable的特化
template<>
class objPush<luatable>
{
public:
	objPush(lua_State *L,const luatable &arg)
	{
		lua_newtable(L);
		for(int i = 0; i < (int)arg.size(); ++i)
		{	
			if(arg[0].empty())
				lua_pushnil(L);
			else
				arg[i]._any_pusher->push(L,const_cast<any*>(&arg[i]));
			lua_rawseti(L,-2,i+1);
		}
	}
};

template<typename T>
void push_obj(lua_State *L,const T obj)
{
	objPush<T> _obj(L,obj);
}

template<typename T>
class concrete_any_pusher : public any_pusher
{
public:
	void push(lua_State *L,any *_any)
	{
		lua_pushnumber(L,any_cast<T>(*_any));
	}
};

template<typename T>
class concrete_any_pusher<T*> : public any_pusher
{
public:
	void push(lua_State *L,any *_any)
	{
		//是否注册的用户类型
		if(_any->luaRegisterClassName == "")
			objPush<void*> obj(L,any_cast<void*>(*_any));
		else
		{
			NewObj(L,any_cast<void*>(*_any),_any->luaRegisterClassName.c_str());
		}
	}
};

template<>
class concrete_any_pusher<bool> : public any_pusher
{
public:
	void push(lua_State *L,any *_any)
	{
		lua_pushboolean(L,any_cast<bool>(*_any));
	}
};

template<>
class concrete_any_pusher<std::string> : public any_pusher
{
public:
	void push(lua_State *L,any *_any)
	{
		lua_pushstring(L,any_cast<std::string>(*_any).c_str());
	}
};

template<>
class concrete_any_pusher<const char *> : public any_pusher
{
public:
	void push(lua_State *L,any *_any)
	{
		lua_pushstring(L,any_cast<const char *>(*_any));
	}
};

template<>
class concrete_any_pusher<char *> : public any_pusher
{
public:
	void push(lua_State *L,any *_any)
	{
		lua_pushstring(L,any_cast<char *>(*_any));
	}
};

template<>
class concrete_any_pusher<luaObject> : public any_pusher
{
public:
	void push(lua_State *L,any *_any)
	{
		objPush<luaObject> obj(L,any_cast<luaObject>(*_any));
	}
};

template<>
class concrete_any_pusher<luatable> : public any_pusher
{
public:
	void push(lua_State *L,any *_any)
	{
		objPush<luatable> obj(L,any_cast<luatable>(*_any));
	}
};

template<>
class concrete_any_pusher<int64_t> : public any_pusher
{
public:
	void push(lua_State *L,any *_any)
	{
		objPush<int64_t> obj(L,any_cast<int64_t>(*_any));
	}
};

template <typename T>
any_pusher *create_any_pusher()
{
	return new concrete_any_pusher<T>;
}


#endif