// chinesecode.cpp : implementation file
//

#include "stdafx.h"
#include "練習.h"
#include "chinesecode.h"
#include <windows.h>

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// chinesecode dialog


chinesecode::chinesecode(CWnd* pParent /*=NULL*/)
	: CDialog(chinesecode::IDD, pParent)
{
	EnableAutomation();

	//{{AFX_DATA_INIT(chinesecode)
		// NOTE: the ClassWizard will add member initialization here
	//}}AFX_DATA_INIT
}


void chinesecode::OnFinalRelease()
{
	// When the last reference for an automation object is released
	// OnFinalRelease is called.  The base class will automatically
	// deletes the object.  Add additional cleanup required for your
	// object before calling the base class.

	CDialog::OnFinalRelease();
}

void chinesecode::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(chinesecode)
		// NOTE: the ClassWizard will add DDX and DDV calls here
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(chinesecode, CDialog)
	//{{AFX_MSG_MAP(chinesecode)
		// NOTE: the ClassWizard will add message map macros here
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

BEGIN_DISPATCH_MAP(chinesecode, CDialog)
	//{{AFX_DISPATCH_MAP(chinesecode)
		// NOTE - the ClassWizard will add and remove mapping macros here.
	//}}AFX_DISPATCH_MAP
END_DISPATCH_MAP()

// Note: we add support for IID_Ichinesecode to support typesafe binding
//  from VBA.  This IID must match the GUID that is attached to the 
//  dispinterface in the .ODL file.

// {B32B8012-CF8B-4CDD-B4F9-D68841062A21}
static const IID IID_Ichinesecode =
{ 0xb32b8012, 0xcf8b, 0x4cdd, { 0xb4, 0xf9, 0xd6, 0x88, 0x41, 0x6, 0x2a, 0x21 } };

BEGIN_INTERFACE_MAP(chinesecode, CDialog)
	INTERFACE_PART(chinesecode, IID_Ichinesecode, Dispatch)
END_INTERFACE_MAP()

/////////////////////////////////////////////////////////////////////////////
// chinesecode message handlers


void chinesecode::UTF_8ToUnicode(wchar_t* pOut,char *pText) 
{ 
    char* uchar = (char *)pOut; 
 
    uchar[1] = ((pText[0] & 0x0F) << 4) + ((pText[1] >> 2) & 0x0F); 
    uchar[0] = ((pText[1] & 0x03) << 6) + (pText[2] & 0x3F); 
 
    return; 
} 
 
void chinesecode::UnicodeToUTF_8(char* pOut,wchar_t* pText) 
{ 
    // 注意 WCHAR高低字的順序,低字節在前，高字節在后 
    char* pchar = (char *)pText; 
 
    pOut[0] = (0xE0 | ((pchar[1] & 0xF0) >> 4)); 
    pOut[1] = (0x80 | ((pchar[1] & 0x0F) << 2)) + ((pchar[0] & 0xC0) >> 6); 
    pOut[2] = (0x80 | (pchar[0] & 0x3F)); 
 
    return; 
} 
 
void chinesecode::UnicodeToGB2312(char* pOut,wchar_t uData) 
{ 
    WideCharToMultiByte(CP_ACP,NULL,&uData,1,pOut,sizeof(wchar_t),NULL,NULL);   //關鍵 DYM

    return; 
}      
 
void chinesecode::Gb2312ToUnicode(wchar_t* pOut,char *gbBuffer) 
{ 
    ::MultiByteToWideChar(CP_ACP,MB_PRECOMPOSED,gbBuffer,2,pOut,1);   //關鍵 DYM
    return ; 
} 
 
void chinesecode::GB2312ToUTF_8(char* pOut,char *pText, int pLen) 
{ 
    char buf[4]; 
    int nLength = pLen* 3; 
    char* rst = new char[nLength]; 
     
    memset(buf,0,4); 
    memset(rst,0,nLength); 
     
    int i = 0; 
    int j = 0;       
    while(i < pLen) 
    { 
            //如果是英文直接復制就可以 
            if( *(pText + i) >= 0) 
            { 
                    rst[j++] = pText[i++]; 
            } 
            else 
            { 
                    wchar_t pbuffer; 
                    Gb2312ToUnicode(&pbuffer,pText+i); 
                     
                    UnicodeToUTF_8(buf,&pbuffer); 
                     
                    unsigned short int tmp = 0; 
                    tmp = rst[j] = buf[0]; 
                    tmp = rst[j+1] = buf[1]; 
                    tmp = rst[j+2] = buf[2];     
                     
                    j += 3; 
                    i += 2; 
            } 
    } 
    rst[j] = '\0'; 
 
    //返回結果 
    strcpy(pOut, rst);              
    delete []rst;    
     
    return; 
} 
 
void chinesecode::UTF_8ToGB2312(char* pOut, char *pText, int pLen) 
{ 
    char * newBuf = new char[pLen]; 
    char Ctemp[4]; 
    memset(Ctemp,0,4); 
 
    int i =0; 
    int j = 0; 
     
    while(i < pLen) 
    { 
        if(pText[i] > 0) 
        { 
                newBuf[j++] = pText[i++];                        
        } 
        else                  
        { 
                WCHAR Wtemp; 
                UTF_8ToUnicode(&Wtemp,pText + i); 
         
                UnicodeToGB2312(Ctemp,Wtemp); 
             
                newBuf[j] = Ctemp[0]; 
                newBuf[j + 1] = Ctemp[1]; 
 
                i += 3;     
                j += 2;    
        } 
    } 
    newBuf[j] = '\0'; 
     
    //pOut = newBuf;
    strcpy(pOut, newBuf);

    delete []newBuf; 
     
    return;  
}