source: dev/trunk/ab5.0/abdev/abdev/nkf_class.cpp@ 829

#include "stdafx.h"

#include "common.h"

using namespace ActiveBasic::IDE;

HRESULT ApplyDialogTexture( HWND );

//文字コード変換用クラスライブラリ
CNkf nkf;

CNkf::CNkf()
{
    const std::string nkf32DllPath = ActiveBasic::Common::Environment::GetAbdevSystemDirPath() + "\\nkf32.dll";
    hLib = LoadLibrary( nkf32DllPath.c_str() );
    if( !hLib )
    {
        MessageBox( NULL, "nkf32.dll が見つかりません。", "エラー", MB_OK | MB_ICONEXCLAMATION );
    }

    pGetNkfVersion=(GetNkfVersion)GetProcAddress(hLib,"GetNkfVersion");
    pSetNkfOption=(SetNkfOption)GetProcAddress(hLib,"SetNkfOption");
    pNkfConvert=(NkfConvert)GetProcAddress(hLib,"NkfConvert");
    pNkfGetKanjiCode=(NkfGetKanjiCode)GetProcAddress(hLib,"NkfGetKanjiCode");
}

CNkf::~CNkf(){
    FreeLibrary(hLib);
}


char *CNkf::RestoreBuffer(char *buffer,int iCharCode){
    /////////////////////
    // 文字コードを復元
    // ※内部表現はShift-JIS
    /////////////////////
    extern HANDLE hHeap;
    char *pBuf;

    pBuf=(char *)HeapAlloc(hHeap,0,lstrlen(buffer)*2+1);

    switch(iCharCode){
        case NKF_SHIFT_JIS:
            lstrcpy(pBuf,buffer);
            break;
        case NKF_EUC:
            pSetNkfOption("-ex");
            pNkfConvert(pBuf,buffer);
            break;
        case NKF_ISO_2022_JP:
            pSetNkfOption("-jx");
            pNkfConvert(pBuf,buffer);
            break;
        case NKF_UTF_8:
            pSetNkfOption("-wx");
            pNkfConvert(pBuf,buffer);
            break;
    }

    return pBuf;
}

void CNkf::GetCharCodeName(int iCharCode,char *name){
    switch(iCharCode){
        case NKF_SHIFT_JIS:
            lstrcpy(name,"Shift-JIS");
            break;
        case NKF_EUC:
            lstrcpy(name,"EUC");
            break;
        case NKF_ISO_2022_JP:
            lstrcpy(name,"JIS");
            break;
        case NKF_UTF_8:
            lstrcpy(name,"UTF-8");
            break;
    }
}

char *CNkf::ToCRLF(int iLfCode,char *buffer){
    extern HANDLE hHeap;
    int i,i2;

    char *temp;
    temp=(char *)HeapAlloc(hHeap,0,lstrlen(buffer)*2+1);

    for(i=0,i2=0;;i++,i2++){
        if(buffer[i]=='\0'){
            temp[i2]=0;
            break;
        }
        if(iLfCode==LFCODE_LF){
            if(buffer[i]=='\n'){
                temp[i2++]='\r';
                temp[i2]='\n';
                continue;
            }
        }
        else if(iLfCode==LFCODE_CR){
            if(buffer[i]=='\r'){
                temp[i2++]='\r';
                temp[i2]='\n';
                continue;
            }
        }

        temp[i2]=buffer[i];
    }

    return temp;
}
void CNkf::ToLF(char *buffer){
    extern HANDLE hHeap;
    int i,i2;

    for(i=0,i2=0;;i++,i2++){
        if(buffer[i]=='\r'&&buffer[i+1]=='\n'){
            buffer[i2]='\n';
            i++;
            continue;
        }

        buffer[i2]=buffer[i];
        if(buffer[i]=='\0') break;
    }
}
void CNkf::ToCR(char *buffer){
    extern HANDLE hHeap;
    int i,i2;

    for(i=0,i2=0;;i++,i2++){
        if(buffer[i]=='\r'&&buffer[i+1]=='\n'){
            buffer[i2]='\r';
            i++;
            continue;
        }

        buffer[i2]=buffer[i];
        if(buffer[i]=='\0') break;
    }
}

void CNkf::GetLfCodeName(int iLfCode,char *name){
    switch(iLfCode){
        case LFCODE_CRLF:
            lstrcpy(name,"CRLF");
            break;
        case LFCODE_LF:
            lstrcpy(name,"LF");
            break;
        case LFCODE_CR:
            lstrcpy(name,"CR");
            break;
    }
}



INT_PTR CALLBACK nkfDlgCodeSave(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
    static int WndNum;
    HWND hList;

    switch(message){
        case WM_INITDIALOG:
            SetPosCenter(hwnd);

            WndNum=GetWndNum(GetWindow(hClient,GW_CHILD));
            if(WndNum==-1){
                //ウィンドウの取得に失敗
                EndDialog(hwnd,0);
                break;
            }
            if(!IS_DOCUMENT_TEXT(MdiInfo[WndNum]->DocType)){
                //テキストドキュメントでないとき
                EndDialog(hwnd,0);
                break;
            }

            hList=GetDlgItem(hwnd,IDC_LIST_CHARCODE);
            SendMessage(hList,LB_ADDSTRING,0,(LPARAM)"Shift-JIS");
            SendMessage(hList,LB_ADDSTRING,0,(LPARAM)"EUC");
            SendMessage(hList,LB_ADDSTRING,0,(LPARAM)"JIS");
            SendMessage(hList,LB_ADDSTRING,0,(LPARAM)"UTF-8");
            SendMessage(hList,LB_SETCURSEL,MdiInfo[WndNum]->pMdiTextEdit->iCharCode,0);

            hList=GetDlgItem(hwnd,IDC_LIST_LFCODE);
            SendMessage(hList,LB_ADDSTRING,0,(LPARAM)"CRLF(Windows)");
            SendMessage(hList,LB_ADDSTRING,0,(LPARAM)"LF(Unix)");
            SendMessage(hList,LB_ADDSTRING,0,(LPARAM)"CR(Macintosh)");
            SendMessage(hList,LB_SETCURSEL,MdiInfo[WndNum]->pMdiTextEdit->iLfCode,0);
            ApplyDialogTexture(hwnd);
            break;
        case WM_COMMAND:
            switch(LOWORD(wParam)){
                case IDOK:
                    //文字コードを取得
                    MdiInfo[WndNum]->pMdiTextEdit->iCharCode=
                        (int)SendDlgItemMessage(hwnd,IDC_LIST_CHARCODE,LB_GETCURSEL,0,0);

                    //改行コードを取得
                    MdiInfo[WndNum]->pMdiTextEdit->iLfCode=
                        (int)SendDlgItemMessage(hwnd,IDC_LIST_LFCODE,LB_GETCURSEL,0,0);

                    //保存
                    if(!SaveDocument(GetWindow(hClient,GW_CHILD),NULL)) return 0;

                    EndDialog(hwnd,1);
                    break;
                case IDCANCEL:
                    EndDialog(hwnd,0);
                    break;
            }
            break;
    }
    return 0;
}