| 801 | } |
| 802 | |
| 803 | uint32_t GetUserType(lua_State* L, int user_data_index) |
| 804 | { |
| 805 | DM_LUA_STACK_CHECK(L, 0); |
| 806 | lua_pushvalue(L, user_data_index); |
| 807 | // [-1] user data |
| 808 | lua_Integer type_hash = 0; |
| 809 | if (lua_type(L, -1) == LUA_TUSERDATA) |
| 810 | { |
| 811 | if (lua_getmetatable(L, -1)) |
| 812 | { |
| 813 | // [-1] meta table |
| 814 | // [-2] user data |
| 815 | |
| 816 | lua_pushinteger(L, SCRIPT_METATABLE_TYPE_HASH_KEY); |
| 817 | // [-1] SCRIPT_METATABLE_TYPE_HASH_KEY |
| 818 | // [-2] meta table |
| 819 | // [-3] user data |
| 820 | |
| 821 | lua_rawget(L, -2); |
| 822 | // [-1] type hash |
| 823 | // [-2] meta table |
| 824 | // [-3] user data |
| 825 | |
| 826 | type_hash = lua_tointeger(L, -1); |
| 827 | lua_pop(L, 2); |
| 828 | // [-1] user data |
| 829 | } |
| 830 | } |
| 831 | lua_pop(L, 1); |
| 832 | return (uint32_t)type_hash; |
| 833 | } |
| 834 | |
| 835 | void* ToUserType(lua_State* L, int user_data_index, uint32_t type_hash) |
| 836 | { |