TnbTmlDocuments.h

[詳解]

#pragma once
#include "TnbTmlValue.h"
#include "TnbTmlCalculator.h"
#include "TnbTmlResult.h"
#include "TnbStrVector.h"
 
 
 
//TNB Library
namespace TNB
{
 
 
 
class CTmlDocuments : public CTml, CCopyImpossible
{
public:
 
    struct TFileInfo
    {
        struct TFunc
        {
            CAscii          strFuncName;    
            CAsciiVector    strParamNames;  
            INT_PTR         iOffset;        
            INT_PTR         iLine;          
            TFunc(void) : iOffset(0), iLine(0){}
            TFunc(const TFunc& other)
                : strFuncName(other.strFuncName), strParamNames(other.strParamNames), iOffset(other.iOffset), iLine(other.iLine)
            {
            }
            TFunc& operator=(const TFunc& other)
            {
                strFuncName = other.strFuncName;
                strParamNames = other.strParamNames;
                iOffset = other.iOffset;
                iLine = other.iLine;
                return *this;
            }
        };
        CAscii          strName;    
        CAscii          abContents; 
        CVectorT<TFunc> atFunc;     
        TFileInfo(void) {}
        TFileInfo(const TFileInfo& other) : strName(other.strName), abContents(other.abContents), atFunc(other.atFunc)
        {
        }
        TFileInfo& operator=(const TFileInfo& other)
        {
            strName = other.strName;
            abContents = other.abContents;
            atFunc = other.atFunc;
            return *this;
        }
    };
 
 
    CTmlDocuments(void)
    {
    }
 
    void Empty(void)
    {
        m_aaFileInfo.RemoveAll();
        TTRACE0( "TML::CDocuments::初期化\n" );
    }
 
    INT_PTR GetLevel(void) const
    {
        return m_aaFileInfo.GetSize();
    }
 
    struct TFuncInfoRes
    {
        LPCSTR  lpszFuncAdds;                   
        CAscii  strFileName;                    
        INT_PTR iFuncLine;                      
        const CAsciiVector* pastrParamNames;    
        TFuncInfoRes(void) : lpszFuncAdds(NULL), iFuncLine(0), pastrParamNames(NULL)
        {
        }
        bool HasData(void) const
        {
            return lpszFuncAdds != NULL;
        }
    };
 
    TFuncInfoRes FindFunc(LPCSTR lpszFunc) const
    {
        INT_PTR iDim1 = m_aaFileInfo.GetSize();
        for( INT_PTR i = iDim1 - 1; i >= 0; i-- )
        {
            const CFileInfoArray& fiv = m_aaFileInfo.At(i);
            INT_PTR iDim2 = fiv.GetSize();
            for( INT_PTR j = 0; j < iDim2; j++ )
            {
                const TFileInfo& T = fiv.At(j);
                INT_PTR iDimF = T.atFunc.GetSize();
                for( INT_PTR f = 0; f < iDimF; f++ )
                {
                    const TFileInfo::TFunc& X = T.atFunc[f];
                    if ( X.strFuncName.Compare(lpszFunc) == 0 )
                    {
                        //あった
                        TFuncInfoRes t;
                        t.strFileName       = T.strName;
                        t.lpszFuncAdds      = T.abContents.begin();
                        t.lpszFuncAdds      += X.iOffset;
                        t.iFuncLine         = X.iLine;
                        t.pastrParamNames   = &X.strParamNames;
                        return t;
                    }
                }
            }
        }
        TFuncInfoRes t;
        return t;
    }
 
    const TFileInfo* FindFileName(LPCSTR lpszFile) const
    {
        INT_PTR iDim1 = m_aaFileInfo.GetSize();
        for( INT_PTR i = 0; i < iDim1; i++ )
        {
            const CFileInfoArray& fiv = m_aaFileInfo.At(i);
            INT_PTR iDim2 = fiv.GetSize();
            for( INT_PTR j = 0; j < iDim2; j++ )
            {
                const TFileInfo &T = fiv.At(j);
                if ( T.strName.Compare(lpszFile) == 0 )
                {
                    return &T;
                }
            }
        }
        return NULL;
    }
 
    void IncLevel(void)
    {
        CFileInfoArray A;
        m_aaFileInfo.Add(A);
        TTRACE1( "TML::CDocuments::レベル++ NowLvl=%d\n", GetLevel() );
    }
 
    bool DecLevel(void)
    {
        INT_PTR l = m_aaFileInfo.GetSize();
        if ( l <= 0 )
        {
            return false;
        }
        //
        m_aaFileInfo.SetSize( l - 1 );
        TTRACE1( "TML::CDocuments::レベル-- NowLvl=%d\n", GetLevel() );
        return true;
    }
 
    bool DecLevels(INT_PTR level)
    {
        while( level < GetLevel() )
        {
            if ( ! DecLevel() )
            {
                return false;
            }
        }
        return true;
    }
 
    CTmlResult Add(TFuncInfoRes& _tFuncInfo, LPCSTR lpszName, LPCSTR lpszData)
    {
        size_t l = m_aaFileInfo.GetSize();
        if ( l == 0 )
        {
            //マクロコンテンツレベルが異常です。
            CTmlResult r(Operation_Non, Result_InvalidMacroContentsLevel);
            return r;
        }
        if ( FindFileName(lpszName) != NULL )
        {
            //既に登録されている（二回同じインクルードファイル指定自体はエラーではない）。
            TTRACE1( "[%s]は既に登録されています。\n", lpszName );
            return Result_Nop;
        }
        // 情報構築
        TFileInfo tFileInfo;
        tFileInfo.strName = lpszName;
        tFileInfo.abContents = lpszData;
        //内容チェック
        CTmlResult r = m_AnalyzeFile(tFileInfo);
        if ( r.IsError() )
        {
            return r;
        }
        CFileInfoArray &A = m_aaFileInfo.Ref(l - 1);
        A.Add(tFileInfo);
        _tFuncInfo.strFileName      = lpszName;
        _tFuncInfo.lpszFuncAdds     = tFileInfo.abContents;
        _tFuncInfo.iFuncLine        = 1;
        _tFuncInfo.pastrParamNames  = NULL;
        return Result_Success;
    }
 
private:
    typedef CVectorT<TFileInfo> CFileInfoArray;         
    typedef CVectorT<CFileInfoArray> CFileInfoArrays;   
    CFileInfoArrays m_aaFileInfo;                       
 
    CTmlResult m_AnalyzeFile(TFileInfo& _tFileInfo)
    {
        CTmlResult res;
        CTmlGrammar gram(_tFileInfo.abContents.begin(), _tFileInfo.abContents.end(), 1);
        CStr strToken;
        CTmlGrammar::CParts parts;
        //
        while(true)
        {
            parts = gram.GetNextParts();
            if ( parts.GetKind() == CTmlGrammar::FINAL )
            {
                break;// 終わり
            }
            if ( parts.GetKind() == CTmlGrammar::ERROR_DEPTH )
            {
                res = Result_InvalidParenthesesPosition;// 括弧エラー
                break;
            }
            if ( parts.GetKind() == CTmlGrammar::OPEN_CHAR )
            {
                if ( ! gram.SkipoutBlock() )
                {
                    res = Result_NotCloseParentheses;//閉じてない
                    break;
                }
                continue;
            }
            if ( parts.GetKind() == CTmlGrammar::STRING )
            {
                continue;
            }
            if ( parts.GetKind() == CTmlGrammar::CLOSE_CHAR )
            {
                ASSERTLIB( false );
            }
            CAscii s = parts.GetString();
            if ( s == ";" )
            {
                continue;
            }
            if ( s == "}" )
            {
                //突然閉じた
                ASSERTLIB( false );
                continue;
            }
            if ( s.Compare("func") != 0 )
            {
                continue;
            }
            //
            parts = gram.GetNextParts();
            if ( parts.GetKind() != CTmlGrammar::TOKEN )
            {
                res = Result_NotName;
                break;
            }
            CAscii funcName = parts.GetString();
            parts = gram.GetNextParts();
            if ( parts.GetAt() != '(' )
            {
                res = Result_NotFoundParentheses;//関数名の後に ( がない
                break;
            }
            //
            TFileInfo::TFunc tFunc;
            tFunc.strFuncName = funcName;
            while(true)
            {
                parts = gram.PeekNextParts();
                if ( parts.GetKind() != CTmlGrammar::TOKEN )
                {
                    break;
                }
                gram.GetNextParts();
                CAscii s = parts.GetString();
                tFunc.strParamNames.Add(s);
                parts = gram.PeekNextParts();
                if ( parts.GetAt() != ',' )
                {
                    break;
                }
                gram.GetNextParts();
            }   
            if ( ! gram.SkipoutBlock() )
            {
                res = Result_NotCloseParentheses;//閉じてない
                break;
            }
            parts = gram.GetNextParts();
            if ( parts.GetAt() != '{' )
            {
                res = Result_NotFoundParentheses;// { がない
                break;
            }
            tFunc.iOffset   = gram.GetPos();
            tFunc.iLine     = gram.GetLine();
            if ( ! gram.SkipoutBlock() )
            {
                res = Result_NotCloseParentheses;//閉じてない
                break;
            }
            _tFileInfo.atFunc.Add(tFunc);
        }
        if ( res.IsError() )
        {
            CTmlResult r(Scene_Func, Operation_FindingFunc, res.GetResult());
            r.SetLine(_tFileInfo.strName, parts.GetLine());
            res = r;
        }
        return res;
    }
 
    friend class CTmlDocumentsTest;
};
 
 
 
}; // TNB