Function tojsonstring_with_nested

src/Chain/libraries/glua/lauxlib.cpp:2794–2841

}

static const char *tojsonstring_with_nested(lua_State *L, int idx, size_t *len, std::list<const void*> &jsons)
{
    const void *addr = lua_topointer(L, idx);
    if (nullptr != addr && glua::util::find(jsons.begin(), jsons.end(), addr))
    {
        lua_pushfstring(L, "%p", addr);
        return lua_tolstring(L, -1, len);
    }
    if (!luaL_callmeta(L, idx, "__tojsonstring")) {  /* no metafield? */
        switch (lua_type(L, idx)) {
        case LUA_TNUMBER: {
            if (lua_isinteger(L, idx))
                lua_pushfstring(L, "%I", lua_tointeger(L, idx));
            else
                lua_pushfstring(L, "%f", lua_tonumber(L, idx));
            break;
        }
        case LUA_TSTRING:
            lua_pushvalue(L, idx);
            break;
        case LUA_TBOOLEAN:
            lua_pushstring(L, (lua_toboolean(L, idx) ? "true" : "false"));
            break;
        case LUA_TNIL:
            lua_pushliteral(L, "nil");
            break;
        case LUA_TTABLE:
        {
            jsons.push_back(addr);
            GluaTableMapP map = luaL_create_lua_table_map_in_memory_pool(L);
            luaL_traverse_table_with_nested(L, idx, lua_table_to_map_traverser_with_nested, map, jsons, 0);
            std::stringstream ss;
            luatablemap_to_json_stream(map, ss);
            if (len)
                *len = ss.str().size();
            lua_pushlstring(L, ss.str().c_str(), ss.str().size());
        }
        break;
        default:
			lua_pushfstring(L, "%s: %p", luaL_typename(L, idx),
				(intptr_t) 0);
            //lua_pushfstring(L, "%s: %p", luaL_typename(L, idx),
            //    lua_topointer(L, idx));
            break;
        }
    }
    return lua_tolstring(L, -1, len);
}

LUALIB_API const char *(luaL_tojsonstring)(lua_State *L, int idx, size_t *len)
{