TnbSingleton.h

[詳解]

#pragma once
#include "TnbSharedMemory.h"
#include "TnbStr.h"
 
 
 
//TNB Library
namespace TNB
{
 
 
 
#define SINGLETON_CONSTRUCTOR( CLS )                \
        public:                                     \
        static CLS * GetInstance(void)              \
        {                                           \
            return CSingletonT<CLS>::Get(_T(#CLS)); \
        }                                           \
        private:                                    \
        CCopyImpossible m_cCopyImpossible;          \
        friend class CSingletonT<CLS>;              \
        CLS(void)
 
 
 
template<typename TYP>
class CSingletonT
{
    CSingletonT(void);
    struct TInfo
    {
        LONG    isInit;     
        LONG    lRef;       
        TYP*    pType;      
    };
    class CDestory
    {
        TInfo*  m_pInfo;    
    public:
        CDestory(TInfo* P) : m_pInfo(P) {}
        ~CDestory(void)
        {
            if ( m_pInfo->pType != NULL )
            {
                delete m_pInfo->pType;
                m_pInfo->pType = NULL;
            }
        }
    };
 
public:
 
    static TYP* Get(LPCTSTR lpszName)
    {
        static CSharedMemoryManager s_cSharedMem(true);
        TInfo* pInfo = NULL;
        if ( ! s_cSharedMem.HasMemory() )
        {
            CStr str = CStr::Fmt(_T("_!Tnb1Ton_%08X_%s"), ::GetCurrentProcessId(), lpszName);
            int iRc = s_cSharedMem.Open(str, sizeof(TInfo));
            if ( iRc < 0 )
            {
                ASSERTLIB(false);
                return NULL;
            }
            pInfo = static_cast<TInfo*>(s_cSharedMem.Get());
            if ( iRc == 0 )
            {   //新規だ
                pInfo->pType = new TYP;
                static CDestory s_cDest(pInfo); //TYP削除用オブジェクト
                pInfo->lRef++;
                pInfo->isInit = 1;  //初期化済み
            }
            else
            {   //既存
                while ( pInfo->isInit != 1 )
                {
                    ::Sleep(1);
                }
                pInfo->lRef++;
            }
        }
        else
        {
            pInfo = static_cast<TInfo*>(s_cSharedMem.Get());
            while ( pInfo->isInit != 1 )
            {
                ::Sleep(1); 
            }
            pInfo->lRef++;
        }
        return pInfo->pType;
    }
};
 
 
 
};//TNB