#include "RtfChar.h"
#include "RtfDocument.h"

CString RtfChar::renderRtfText( CString& sText, void* poDocument, RtfCharProperty* oCharProperty  )
{
    RtfDocument* oDocument = static_cast<RtfDocument*>(poDocument);
    CString sResult;

    int nCodePage = -1;
    //применяем параметры codepage от текущего шрифта todo associated fonts.
    //todooo разобраться со шрифтами и их подбором
    RtfFont oFont;
    if( NULL != oCharProperty && true == oDocument->m_oFontTable.GetFont( oCharProperty->m_nFont, oFont ) )
    {
        if( PROP_DEF != oFont.m_nCharset )
            nCodePage = RtfUtility::CharsetToCodepage( oFont.m_nCharset );
        else if( PROP_DEF != oFont.m_nCodePage )
            nCodePage = oFont.m_nCodePage;
    }

    //от настроек документа
    if( -1 == nCodePage && RtfDocumentProperty::cp_none != oDocument->m_oProperty.m_eCodePage )
    {
        switch ( oDocument->m_oProperty.m_eCodePage )
        {
        case RtfDocumentProperty::cp_ansi:
        {
            if( PROP_DEF != oDocument->m_oProperty.m_nAnsiCodePage )
                nCodePage = oDocument->m_oProperty.m_nAnsiCodePage;
            else
                nCodePage = CP_ACP;
            break;
        }
        case RtfDocumentProperty::cp_mac: nCodePage = CP_MACCP; break;
        case RtfDocumentProperty::cp_pc:  nCodePage = 437;      break;
        case RtfDocumentProperty::cp_pca: nCodePage = 850;      break;
        }
    }
    //если ничего нет ставим ANSI
    if( -1 == nCodePage )
        nCodePage = CP_ACP;

    std::wstring    unicodeStr (sText.GetBuffer(), sText.GetLength());
    std::string     ansiStr ;

	if (unicodeStr.empty())
	{
		return sResult;
	}

	ansiStr = RtfUtility::convert_string(unicodeStr.begin(), unicodeStr.end(), nCodePage);

    CString sTextBack  = RtfUtility::convert_string(ansiStr.begin(), ansiStr.end(), nCodePage);
    //обратное преобразование чтобы понять какие символы свонвертировались неправильно

    for( int i = 0; i < sText.GetLength() && i < sTextBack.GetLength() ; i++ )
    {
        bool bWriteUnicode = true;

        if(sTextBack[i] == sText[i] )
        {
            CString sUniChar; sUniChar.AppendChar( unicodeStr[i] );

            //делаем Ansi строку sUniChar
            // -> sTempAnsiChars
            std::string sTempAnsiChars = RtfUtility::convert_string(unicodeStr.begin()+i, unicodeStr.begin() + i + 1, nCodePage);

            for( int k = 0; k < sTempAnsiChars.length(); k++ )
            {
                unsigned char nCharCode = sTempAnsiChars[k];
                bWriteUnicode = false;

                if (nCharCode == 0x5c || nCharCode == 0x7b || nCharCode == 0x7d)
                {
                    sResult.AppendFormat( _T("\\'%x"), nCharCode );
                } else if (0x00 <= nCharCode && nCharCode - 1 < 0x10)
                {
                    sResult.AppendFormat(_T("\\'0%x"), nCharCode - 1 );
                } else if (0x10 <= nCharCode - 1 && nCharCode  < 0x20)
                {
                    sResult.AppendFormat(_T("\\'%x"), nCharCode - 1 );
                } else if ( 0x20 <= nCharCode && nCharCode < 0x80 )
                {
                    sResult.AppendChar( nCharCode );
                } else { // 0x80 <= nUnicode <= 0xff
                    sResult.AppendFormat( _T("\\'%x"), nCharCode );
                }
            }
        }
        if( true == bWriteUnicode )
        {
            int nUnicode = (int)unicodeStr[i];

            if (0 < nUnicode && nUnicode <= 0x8000)
            {
                sResult.AppendFormat(_T("\\u%d*"),nUnicode);
            } else if (0x8000 < nUnicode && nUnicode <= 0xffff) {
                sResult.AppendFormat(_T("\\u%d*"),nUnicode - 0x10000);
            } else {
                sResult.Append(_T("\\u9633*"));
            }
        }

    }
    return sResult;
}