Pool.h

//Copyright © 2014 SDXFramework
//[License]GNU Affero General Public License, version 3
//[Contact]http://sourceforge.jp/projects/dxframework/
#pragma once
#include <vector>

namespace SDX
{
class Pool
{
    //メモリプール
    static const int BS = 65536 * 4;//バッファサイズ、2のn乗にする
    //BSが大きいほど削除が早くなり、事前に確保するメモリの量が増える
    int index[7];// = { BS, BS, BS, BS, BS, BS, BS };
    std::vector<int*> poolS[7];

    //空き状況
    std::vector<int> emptyS[7];
public:
    Pool()
    {
        for (auto &it : index)
        {
            it = BS;
        }
        for (auto &it : emptyS)
        {
            it.reserve(BS);
        }
    }

    ~Pool()
    {
        //確保したメモリを解放
        for (auto &it : poolS)
        {
            for (auto &itt : it)
            {
                delete[] itt;
            }
        }
    }


    template< class T >
    T* Get()
    {
        int size = 0;
        int buff = 1;
        static const size_t tSize = sizeof(T);

        if ( tSize <= 4){}
        else if (tSize <= 8) { size = 1;; buff = 2; }
        else if (tSize <= 16) { size = 2; buff = 4; }
        else if (tSize <= 32) { size = 3; buff = 8; }
        else if (tSize <= 64) { size = 4; buff = 16; }
        else if (tSize <= 128) { size = 5; buff = 32; }
        else if (tSize <= 256) { size = 6; buff = 64; }
        else
        {
            //普通にnewする
            return new T();
        }

        if (emptyS[size].empty())
        {
            //大きさ+1して最後尾を返す
            index[size] += buff;
            if (index[size] >= BS)
            {
                //領域を増やす
                poolS[size].push_back(new int[BS]);
                index[size] = 0;
            }

            return new(&poolS[size][poolS[size].size() - 1][index[size]]) T();
        }
        else
        {
            //空きがある場合そこを使う
            int n = emptyS[size].back();
            emptyS[size].pop_back();
            return new(&poolS[size][n / BS][n % BS]) T();
        }
    }

    template< class T>
    T* Get(const T data)
    {
        int size = 0;
        int buff = 1;
        static const size_t tSize = sizeof(T);
        
        if (tSize <= 4){}
        else if (tSize <= 8) { size = 1;; buff = 2; }
        else if (tSize <= 16) { size = 2; buff = 4; }
        else if (tSize <= 32) { size = 3; buff = 8; }
        else if (tSize <= 64) { size = 4; buff = 16; }
        else if (tSize <= 128) { size = 5; buff = 32; }
        else if (tSize <= 256) { size = 6; buff = 64; }
        else
        {
            //普通にnewする
            return new T(data);
        }

        //大きさ+1して最後尾を返す
        if ( emptyS[size].empty() )
        {
            index[size] += buff;
            if (index[size] >= BS)
            {
                poolS[size].push_back(new int[BS]);
                index[size] = 0;
            }

            return new( &poolS[size][poolS[size].size()-1][index[size]]) T(data);
        }
        else
        {
            //空きがある場合
            int n = emptyS[size].back();
            emptyS[size].pop_back();
            return new(&poolS[size][n / BS][n % BS]) T(data);
        }
    }

    template< class T>
    void Destroy(T* pt)
    {
        int size = 0;
        int buff = 1;
        static const size_t tSize = sizeof(T);

        if (tSize <= 4) {}
        else if (tSize <= 8) { size = 1;; buff = 2; }
        else if (tSize <= 16) { size = 2; buff = 4; }
        else if (tSize <= 32) { size = 3; buff = 8; }
        else if (tSize <= 64) { size = 4; buff = 16; }
        else if (tSize <= 128) { size = 5; buff = 32; }
        else if (tSize <= 256) { size = 6; buff = 64; }
        else
        {
            //普通にdeleteする
            delete (void*)pt;
            return;
        }

        int n = -1;
        int a = 0;

        //最後まで探して無いなら空きリストには追加しない
        while( (unsigned int)a < poolS[size].size())
        {
            n = ((int*)pt - &poolS[size][a][0]);//0なら先頭要素削除
            //見つかったら再利用
            if ( n >= 0 && n < BS)
            {
                emptyS[size].push_back(n + a*BS);
                return;
            }
            ++a;
        }
    }

};

}