Function lua_malloc

src/Chain/libraries/glua/lstate.cpp:375–427

FIXME: use memory page, and use best fit malloc strategy TODO: �ijɸ�����Ҫ�ֽ��������ڴ�أ���һ��ʼ����������ڴ�أ��ֳɶ������ʽ��С���ڴ�أ�

// FIXME: use memory page, and use best fit malloc strategy
// TODO: �ijɸ�����Ҫ�ֽ��������ڴ�أ���һ��ʼ����������ڴ�أ��ֳɶ������ʽ��С���ڴ�أ�
void *lua_malloc(lua_State *L, size_t size)
{
    size = align8(size);
    if (size > LUA_MALLOC_TOTAL_SIZE)
    {
        thinkyoung::lua::lib::notify_lua_state_stop(L);
        return nullptr;
    }
    if (L->malloced_buffers->size() < 1)
    {
        auto offset = L->malloc_pos;
        void *p = (void*)((intptr_t)(L->malloc_buffer) + offset);
        L->malloc_pos += size;
        L->malloced_buffers->push_back(std::make_pair(offset, size));
        return p;
    }
    std::pair<ptrdiff_t, ptrdiff_t> last_pair;
    auto begin = L->malloced_buffers->begin();
    for (auto it = begin; it != L->malloced_buffers->end(); ++it)
    {
        if (it == begin)
        {
            if (it->first > (ptrdiff_t)size)
            {
                // can alloc memory before first block
                ptrdiff_t offset = 0;
                void *p = L->malloc_buffer;
                L->malloced_buffers->insert(L->malloced_buffers->begin(), std::make_pair(offset, size));
                return p;
            }
            last_pair = *it;
            continue;
        }
        if (it->first >= last_pair.first + last_pair.second + (ptrdiff_t)size)
        {
            ptrdiff_t offset = last_pair.first + last_pair.second;
            void *p = (void*)((intptr_t)(L->malloc_buffer) + offset);
            L->malloced_buffers->insert(it, std::make_pair(offset, size));
            return p;
        }
        last_pair = *it;
    }
    if (L->malloc_pos + size > LUA_MALLOC_TOTAL_SIZE)
    {
        thinkyoung::lua::lib::notify_lua_state_stop(L);
        return nullptr;
    }
    ptrdiff_t offset = L->malloc_pos;
    void *p = (void*)((intptr_t)(L->malloc_buffer) + offset);
    L->malloced_buffers->push_back(std::make_pair(offset, size));
    L->malloc_pos += size;
    return p;
}

void *lua_calloc(lua_State *L, size_t element_count, size_t element_size)
{