From bd55a58515db02ae1112a22604356d5a7f630aa1 Mon Sep 17 00:00:00 2001
From: cxj <chenxiaojie@lkgame.com>
Date: Wed, 1 Jul 2015 16:54:20 +0800
Subject: [PATCH] support sharedata serialization

---
 lualib-src/lua-seri.c | 24 ++++++++++++++++++++++--
 1 file changed, 22 insertions(+), 2 deletions(-)

diff --git a/lualib-src/lua-seri.c b/lualib-src/lua-seri.c
index 18b90d0d..6e118230 100644
--- a/lualib-src/lua-seri.c
+++ b/lualib-src/lua-seri.c
@@ -260,8 +260,28 @@ wb_table(lua_State *L, struct write_block *wb, int index, int depth) {
 	if (index < 0) {
 		index = lua_gettop(L) + index + 1;
 	}
-	int array_size = wb_table_array(L, wb, index, depth);
-	wb_table_hash(L, wb, index, depth, array_size);
+	if (luaL_getmetafield(L, index, "__pairs")) {
+		uint8_t n = COMBINE_TYPE(TYPE_TABLE, 0);
+		wb_push(wb, &n, 1);
+		lua_pushvalue(L, index);
+		lua_call(L, 1, 3);
+		while (1) {
+			lua_pushvalue(L, -2);
+			lua_pushvalue(L, -2);
+			lua_copy(L, -5, -3);
+			lua_call(L, 2, 2);
+			int type = lua_type(L, -2);
+			if (type == LUA_TNIL)
+				break;
+			pack_one(L, wb, -2, depth);
+			pack_one(L, wb, -1, depth);
+			lua_pop(L, 1);
+		}
+		wb_nil(wb);
+	} else {
+		int array_size = wb_table_array(L, wb, index, depth);
+		wb_table_hash(L, wb, index, depth, array_size);
+	}
 }
 
 static void