source: dev/trunk/ab5.0/abdev/abdev/WebSearch.cpp @ 681

#include "stdafx.h"

#include "common.h"
#include "CIEsink.h"


#define ID_TIMER_POPUP_ANIMATION 100
#define ID_TIMER_IDLE 200

extern FWINLAYER pSetLayeredWindowAttributes;


LRESULT CALLBACK ResultListProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
    CResultList *pobj_ResultList;
    POINT pos;
    RECT rc;
    int iItem;

    switch(message){
        case WM_TIMER:
            if(wParam==ID_TIMER_POPUP_ANIMATION){
                pobj_ResultList=(CResultList *)GetWindowLongPtr(hwnd,GWLP_USERDATA);

                pSetLayeredWindowAttributes(hwnd, 0,(int)((double)255/(double)100*(double)(pobj_ResultList->iAnimeCount*10)), LWA_ALPHA);

                GetWindowRect(hwnd,&rc);
                rc.top++;
                SetWindowPos(hwnd,0,rc.left,rc.top,0,0,SWP_NOSIZE);

                pobj_ResultList->iAnimeCount+=1;
                if(pobj_ResultList->iAnimeCount>10){
                    KillTimer(hwnd,ID_TIMER_POPUP_ANIMATION);

                    SetTimer(hwnd,ID_TIMER_IDLE,100,NULL);
                }
            }
            else if(wParam==ID_TIMER_IDLE){
                InvalidateRect(hwnd,NULL,0);
            }
            return 0;
        case WM_PAINT:
            pobj_ResultList=(CResultList *)GetWindowLongPtr(hwnd,GWLP_USERDATA);

            RECT ClientRect;
            GetClientRect(hwnd,&ClientRect);

            //描画を開始
            HDC hdc;
            PAINTSTRUCT ps;
            hdc=BeginPaint(hwnd,&ps);

            //メモリデバイスコンテキストを生成
            HDC memdc;
            HBITMAP hMemBmp;
            memdc=CreateCompatibleDC(hdc);
            hMemBmp=CreateCompatibleBitmap(hdc,ClientRect.right,ClientRect.bottom);
            SelectObject(memdc,hMemBmp);

            //フォントをセット
            extern HFONT hStatusFont;
            HFONT hOldFont;
            hOldFont=(HFONT)SelectObject(memdc,hStatusFont);

            //ウィンドウサイズを取得（アイテム座標を取得）
            GetCursorPos(&pos);
            GetWindowRect(hwnd,&rc);
            rc.bottom=rc.top+LINK_ITEM_HEIGHT;

            //クライアント アイテム 座標を取得
            ClientRect.left+=10;
            ClientRect.bottom=ClientRect.top+LINK_ITEM_HEIGHT;

            //ブラシを生成
            HBRUSH hFaceBrush,hShadowBrush,hOldBrush;
            hFaceBrush=CreateSolidBrush(GetSysColor(COLOR_3DFACE));
            hShadowBrush=CreateSolidBrush(GetSysColor(COLOR_3DSHADOW));

            for(iItem=0;iItem<10;iItem++){
                if(rc.left<pos.x && pos.x<rc.right && rc.top<pos.y && pos.y<rc.bottom){

                    SetBkColor(memdc,GetSysColor(COLOR_3DSHADOW));

                    hOldBrush=(HBRUSH)SelectObject(memdc,hShadowBrush);
                }
                else{
                    extern HFONT hStatusFont;
                    hOldFont=(HFONT)SelectObject(memdc,hStatusFont);

                    SetBkColor(memdc,GetSysColor(COLOR_3DFACE));

                    hOldBrush=(HBRUSH)SelectObject(memdc,hFaceBrush);
                }
                SetTextColor(memdc,RGB(0,0,255));

                PatBlt(memdc,ClientRect.left-10,ClientRect.top,ClientRect.right,ClientRect.bottom,PATCOPY);
                SelectObject(memdc,hOldBrush);

                DrawText(memdc,pobj_ResultList->pobj_OneTab->lpszTitle[iItem],-1,&ClientRect,DT_LEFT|DT_VCENTER|DT_SINGLELINE);

                rc.top+=LINK_ITEM_HEIGHT;
                rc.bottom=rc.top+LINK_ITEM_HEIGHT;

                ClientRect.top+=LINK_ITEM_HEIGHT;
                ClientRect.bottom=ClientRect.top+LINK_ITEM_HEIGHT;
            }

            SelectObject(memdc,hOldFont);

            GetClientRect(hwnd,&ClientRect);
            BitBlt(hdc,0,0,ClientRect.right,ClientRect.bottom,memdc,0,0,SRCCOPY);

            EndPaint(hwnd,&ps);

            DeleteObject(hFaceBrush);
            DeleteObject(hShadowBrush);

            DeleteDC(memdc);
            DeleteObject(hMemBmp);
            break;

        case WM_LBUTTONDOWN:
            pobj_ResultList=(CResultList *)GetWindowLongPtr(hwnd,GWLP_USERDATA);

            GetCursorPos(&pos);
            GetWindowRect(hwnd,&rc);
            rc.bottom=rc.top+LINK_ITEM_HEIGHT;

            for(iItem=0;iItem<10;iItem++){
                if(rc.left<pos.x && pos.x<rc.right && rc.top<pos.y && pos.y<rc.bottom){
                    ShellExecute(hwnd,"open",pobj_ResultList->pobj_OneTab->lpszUrl[iItem],NULL,NULL,SW_SHOWNORMAL);
                    break;
                }

                rc.top+=LINK_ITEM_HEIGHT;
                rc.bottom=rc.top+LINK_ITEM_HEIGHT;
            }
            return 0;
    }
    return DefWindowProc(hwnd,message,wParam,lParam);
}

CResultList::CResultList(COneTab *pot){
    pobj_OneTab=pot;
    iAnimeCount=0;

    hwnd=CreateWindowEx(0,"ResultList","ResultList",
        WS_POPUP|WS_CLIPCHILDREN|WS_VISIBLE|WS_BORDER,
        0,0,0,0,
        hOwner,0,hInst,0);

    //ウィンドウを半透明にする
    int lStyle;
    lStyle=GetWindowLongPtr(hwnd,GWL_EXSTYLE) | WS_EX_LAYERED;
    SetWindowLongPtr(hwnd,GWL_EXSTYLE,lStyle);
    pSetLayeredWindowAttributes(hwnd, 0, 0, LWA_ALPHA);

    SetWindowLongPtr(hwnd,GWLP_USERDATA,(long)this);
    SetTimer(hwnd,ID_TIMER_POPUP_ANIMATION,10,NULL);
    BringWindowToTop(hwnd);

    RECT rc;
    GetWindowRect(pobj_OneTab->hTabWnd,&rc);

    HDC hdc;
    hdc=GetDC(hwnd);

    extern HFONT hStatusFont;
    HFONT hOldFont;
    hOldFont=(HFONT)SelectObject(hdc,hStatusFont);


    //アイテム数を取得
    int iItem,iMaxWidth=0;
    for(iItem=0;iItem<10;iItem++){
        if(pobj_OneTab->lpszTitle[iItem]==0){
            break;
        }

        SIZE size;
        GetTextExtentPoint32(hdc,pobj_OneTab->lpszTitle[iItem],lstrlen(pobj_OneTab->lpszTitle[iItem]),&size);

        if(iMaxWidth<size.cx){
            //最大幅を取得
            iMaxWidth=size.cx;
        }
    }

    SelectObject(hdc,hOldFont);
    ReleaseDC(hwnd,hdc);

    MoveWindow(hwnd,rc.left,rc.top-iItem*LINK_ITEM_HEIGHT-10,iMaxWidth+20,iItem*LINK_ITEM_HEIGHT,1);
}
CResultList::~CResultList(){
    DestroyWindow(hwnd);
}



LRESULT CALLBACK OneTabProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
    COneTab *pobj_OneTab;
    RECT rc;
    POINT pos;

    switch(message){
        case WM_CREATE:
            SetTimer(hwnd,0,100,NULL);
            return 0;
        case WM_TIMER:
            InvalidateRect(hwnd,NULL,0);
            return 0;
        case WM_PAINT:
            pobj_OneTab=(COneTab *)GetWindowLongPtr(hwnd,GWLP_USERDATA);

            HBRUSH hBrush,hOldBrush;

            HDC hdc;
            PAINTSTRUCT ps;
            hdc=BeginPaint(hwnd,&ps);

            GetCursorPos(&pos);
            GetWindowRect(hwnd,&rc);
            HFONT hOldFont;
            if(rc.left<=pos.x && pos.x<=rc.right && rc.top<=pos.y && pos.y<=rc.bottom){
                extern HFONT hStatusFont;
                hOldFont=(HFONT)SelectObject(hdc,hStatusFont);

                SetBkColor(hdc,GetSysColor(COLOR_3DSHADOW));

                hBrush=CreateSolidBrush(GetSysColor(COLOR_3DSHADOW));

                //リストを表示
                if(pobj_OneTab->pobj_ResultList==0){
                    pobj_OneTab->pobj_ResultList=new CResultList(pobj_OneTab);
                }
            }
            else{
                extern HFONT hStatusFont;
                hOldFont=(HFONT)SelectObject(hdc,hStatusFont);

                SetBkColor(hdc,GetSysColor(COLOR_3DFACE));

                hBrush=CreateSolidBrush(GetSysColor(COLOR_3DFACE));

                //リストを破棄
                if(pobj_OneTab->pobj_ResultList){
                    GetWindowRect(pobj_OneTab->pobj_ResultList->hwnd,&rc);
                    if(!(rc.left<=pos.x && pos.x<=rc.right && rc.top<=pos.y && pos.y<=rc.bottom)){
                        delete pobj_OneTab->pobj_ResultList;
                        pobj_OneTab->pobj_ResultList=0;
                    }
                }
            }
            SetTextColor(hdc,RGB(0,0,255));

            GetClientRect(hwnd,&rc);

            hOldBrush=(HBRUSH)SelectObject(hdc,hBrush);
            PatBlt(hdc,0,0,rc.right,rc.bottom,PATCOPY);
            SelectObject(hdc,hOldBrush);

            rc.left++;
            DrawText(hdc,pobj_OneTab->lpszString,-1,&rc,DT_CENTER|DT_VCENTER|DT_SINGLELINE);

            SelectObject(hdc,hOldFont);

            //左端の境界線
            HPEN hPen,hOldPen;
            hPen=CreatePen(PS_SOLID,0,GetSysColor(COLOR_3DSHADOW));
            hOldPen=(HPEN)SelectObject(hdc,hPen);
            MoveToEx(hdc,0,0,NULL);
            LineTo(hdc,0,rc.bottom-rc.top);
            SelectObject(hdc,hOldPen);
            DeleteObject(hPen);

            EndPaint(hwnd,&ps);

            DeleteObject(hBrush);
            return 0;
        case WM_LBUTTONDOWN:
            pobj_OneTab=(COneTab *)GetWindowLongPtr(hwnd,GWLP_USERDATA);

            ShellExecute(hwnd,"open",pobj_OneTab->lpszUrl[0],NULL,NULL,SW_SHOWNORMAL);
            return 0;

        case WM_COMMAND:
            break;
    }
    return DefWindowProc(hwnd,message,wParam,lParam);
}

COneTab::COneTab(int WndNum,char *str){
    //0で初期化
    memset(this,0,sizeof(COneTab));

    m_WndNum=WndNum;

    lpszString=(char *)malloc(lstrlen(str)+1);
    lstrcpy(lpszString,str);


    //Web検索をかける
    WebSearch();



    /////////////////////////////////
    // テキストアイテムの幅を取得
    /////////////////////////////////

    HDC hdc;
    SIZE size;
    hdc=GetDC(hOwner);

    extern HFONT hStatusFont;
    HFONT hOldFont;
    hOldFont=(HFONT)SelectObject(hdc,hStatusFont);

    GetTextExtentPoint32(hdc,lpszString,lstrlen(lpszString),&size);

    SelectObject(hdc,hOldFont);

    ReleaseDC(hOwner,hdc);
    iWindowWidth=size.cx+20;

    if(MdiInfo[WndNum]->pMdiTextEdit==0) return;
    hTabWnd=(HWND)SendMessage(MdiInfo[WndNum]->pMdiTextEdit->hEdit,WM_SEARCH_TAB_CREATE,(WPARAM)WndNum,(LPARAM)this);
}
COneTab::~COneTab(){
    free(lpszString);

    int i;
    for(i=0;i<10;i++){
        if(lpszTitle[i]) free(lpszTitle[i]);
        if(lpszUrl[i]) free(lpszUrl[i]);
    }

    if(MdiInfo[m_WndNum]->pMdiTextEdit)
        SendMessage(MdiInfo[m_WndNum]->pMdiTextEdit->hEdit,WM_SEARCH_TAB_CLOSE,0,(LPARAM)hTabWnd);
}

void COneTab::WebSearch(){
    //URLエンコード
    char *temporary;
    temporary=(char *)malloc(lstrlen(lpszString)*3+1024);
    wsprintf(temporary,"辞書 %s",lpszString);
    URLEncode(temporary);

    char *lpszTempUrl;
    lpszTempUrl=(char *)malloc(lstrlen(temporary)+1024);
    sprintf(lpszTempUrl,"http://www.activebasic.com/application_web_search/search.php?query=%s&type=web&utf_sw=1&start=1",temporary);

    free(temporary);


    HINTERNET hInternet;
    HINTERNET hNetFile;
    hInternet = InternetOpen("Agent", 0, NULL, NULL, 0);
    if(hInternet==0){
        return;
    }
    hNetFile = InternetOpenUrl(hInternet, lpszTempUrl, NULL, 0, 0, 0);
    if(hNetFile==0){
        InternetCloseHandle(hInternet);
        return;
    }

    /* オープンしたURLからデータを(1000バイトずつ)読み込む */
    DWORD dwReadSize;
    BOOL bResult;
    char *buffer;
    buffer=(char *)malloc(8192);
    buffer[0]=0;

    while(1){
        char temp3[1024];
        bResult = InternetReadFile(
            hNetFile,
            temp3,
            1000,
            &dwReadSize);

        /* 全て読み込んだらループを抜ける */
        if(bResult && (dwReadSize == 0)) break;

        temp3[dwReadSize]=0;
        lstrcat(buffer,temp3);
    }


    //UTF-8からShift-JISに変換
    char *temp2;
    temp2=(char *)malloc(8192);
    nkf.pSetNkfOption("-sx");   //Shift-JISに変換（xは半角カタカナを全角に変換しないオプション）
    nkf.pNkfConvert(temp2,buffer);
    free(buffer);


    InternetCloseHandle(hNetFile);
    InternetCloseHandle(hInternet);


    //タイトル・URLを取得
    int iItem;
    int i=0,i2;
    for(iItem=0;iItem<10;iItem++){
        lpszTitle[iItem]=(char *)malloc(lstrlen(temp2)+1);
        lpszUrl[iItem]=(char *)malloc(lstrlen(temp2)+1);
        for(i2=0;;i++,i2++){
            //タイトル
            if(temp2[i]=='\n'||temp2[i]=='\0'){
                lpszTitle[iItem][i2]=0;
                break;
            }
            lpszTitle[iItem][i2]=temp2[i];
        }
        if(temp2[i]){
            //URL
            for(i++,i2=0;;i++,i2++){
                if(temp2[i]=='\n'||temp2[i]=='\0'){
                    lpszUrl[iItem][i2]=0;
                    break;
                }
                lpszUrl[iItem][i2]=temp2[i];
            }
        }
        if(temp2[i]){
            //サマリー
            for(i++,i2=0;;i++,i2++){
                if(temp2[i]=='\n'||temp2[i]=='\0'){
                    break;
                }
            }
        }

        if(temp2[i]=='\0') break;
        i++;
    }


    free(temp2);


    free(lpszTempUrl);
}






LRESULT CALLBACK WebResultWndProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
    switch(message){
        case WM_COMMAND:
            break;
    }
    return DefWindowProc(hwnd,message,wParam,lParam);
}

CWebResult::CWebResult(HWND hParent){
    ppobj_OneTab=(COneTab **)malloc(1);
    iTabNum=0;

    hwnd=CreateWindowEx(0,"WebResult","WebResult",
        WS_CHILD|WS_CLIPCHILDREN|WS_VISIBLE,
        0,0,0,0,
        hParent,0,hInst,0);
}
CWebResult::~CWebResult(){
    int i;
    for(i=0;i<iTabNum;i++){
        delete ppobj_OneTab[i];
    }

    free(ppobj_OneTab);
    ppobj_OneTab=0;

    DestroyWindow(hwnd);
}

void CWebResult::resize(int x,int y,int cx,int cy){
    MoveWindow(hwnd,x,y,cx,cy,1);
}

void CWebResult::add(int WndNum,char *lpszSearchText){
    COneTab *pobj_temp_OneTab;
    pobj_temp_OneTab=new COneTab(WndNum,lpszSearchText);
    if(MdiInfo[WndNum]->pMdiTextEdit==0){
        delete pobj_temp_OneTab;
        return;
    }

    if(pobj_temp_OneTab->lpszTitle[0]){
        if(pobj_temp_OneTab->lpszTitle[0][0]=='\0'){
            delete pobj_temp_OneTab;
            return;
        }
    }
    else{
        delete pobj_temp_OneTab;
        return;
    }


    ppobj_OneTab=(COneTab **)realloc(ppobj_OneTab,(iTabNum+1)*sizeof(COneTab));

    //ローテーション
    int i;
    for(i=iTabNum-1;i>=0;i--){
        ppobj_OneTab[i+1]=ppobj_OneTab[i];
    }

    ppobj_OneTab[0]=pobj_temp_OneTab;
    iTabNum++;

    if(iTabNum==10){
        //古いアイテムを破棄
        delete ppobj_OneTab[iTabNum-1];
        iTabNum--;
    }

    int offset=0;
    for(i=0;i<iTabNum;i++){
        offset+=ppobj_OneTab[i]->iWindowWidth;
    }
    for(i=iTabNum-1;i>=0;i--){
        offset-=ppobj_OneTab[i]->iWindowWidth;
        MoveWindow(ppobj_OneTab[i]->hTabWnd,
            offset,
            0,
            ppobj_OneTab[i]->iWindowWidth,
            20,
            1);
    }
}
BOOL CWebResult::DuplicateCheck(char *str){
    int i;
    for(i=0;i<iTabNum;i++){
        if(lstrcmpi(ppobj_OneTab[i]->lpszString,str)==0){
            return 1;
        }
    }
    return 0;
}



BOOL bSearchingWeb;
char *lpszRetrySearchStr;
void WebSearchThread(void *temp_str){
    char *str;
    str=(char *)malloc(lstrlen((char *)temp_str)+1);
    lstrcpy(str,(char *)temp_str);
    HeapDefaultFree(temp_str);

    int WndNum;
    WndNum=GetWndNum(GetWindow(hClient,GW_CHILD));
    if(bSearchingWeb){
        if(lpszRetrySearchStr) free(lpszRetrySearchStr);
        lpszRetrySearchStr=str;

        _endthread();
        return;
    }
    bSearchingWeb=1;


wait_repeat:
    Sleep(500);
    if(lpszRetrySearchStr){
        free(str);

        str=lpszRetrySearchStr;
        lpszRetrySearchStr=0;
        goto wait_repeat;
    }


    if(WndNum==-1){
        goto exit;
    }
    if(MdiInfo[WndNum]->pMdiTextEdit==0){
        goto exit;
    }

    //重複チェック
    if(MdiInfo[WndNum]->pMdiTextEdit->pobj_WebResult->DuplicateCheck(str)){
        goto exit;
    }



    MdiInfo[WndNum]->pMdiTextEdit->pobj_WebResult->add(WndNum,str);

exit:
    bSearchingWeb=0;

    free(str);


    if(lpszRetrySearchStr){
        str=lpszRetrySearchStr;
        lpszRetrySearchStr=0;
        goto wait_repeat;
    }


    _endthread();
}




////////////////////////////
// 以下、SideWeb
////////////////////////////

BEGIN_OBJECT_MAP(ObjectMap)
END_OBJECT_MAP()

HWND hNowIEWnd;
LRESULT CALLBACK SideWebProc (HWND hwnd, UINT iMsg, WPARAM wParam, LPARAM lParam)
{
    CComQIPtr<IWebBrowser2> pWB2 ;

    switch (iMsg)
    {
        case WM_CREATE :
        {
            AtlAxWinInit();
            hNowIEWnd = CreateWindow("AtlAxWin", "Shell.Explorer.2", WS_CHILD|WS_VISIBLE, 0,0,0,0, 
                        hwnd, (HMENU)0, hInst, NULL);
            if(!hNowIEWnd){
                MessageBox(hOwner,"IEコンポーネントの生成に失敗しました","lockey_browser",MB_OK|MB_ICONEXCLAMATION);
                PostQuitMessage(0);
                return 0;
            }

            // ActiveXコントロールのインターフェースを要求
            CComPtr<IUnknown>    punkIE;
            if (AtlAxGetControl(hNowIEWnd, &punkIE) == S_OK)
            {
                // IUnknownポインタからIWebBrowser2ポインタへキャスト
                pWB2 = punkIE;

                if(pWB2)
                {
                    // シンクオブジェクトの作成
                    CComObject<CIESink>* sink;
                    CComObject<CIESink>::CreateInstance(&sink);

                    // イベントをDispatchするよう、IEコントロールにお願い
                    HRESULT hr = sink->AdviseToIE(punkIE);
                    if(SUCCEEDED(hr))
                    {
                        //成功
                        return 0;
                    }
                }

                MessageBox(hOwner,"IEコンポーネントの生成に失敗しました","ProjectEditor",MB_OK|MB_ICONEXCLAMATION);
                PostQuitMessage(0);
                return 0;
            }

            return 0 ;
        }

        case WM_SIZE :
            MoveWindow(GetWindow(hwnd,GW_CHILD), 0, 0, LOWORD(lParam), HIWORD(lParam), 1) ;
            return 0 ;

        case WM_KEYDOWN:
        {
            // ActiveXコントロールのインターフェースを要求
            CComPtr<IUnknown>    punkIE;
            if (AtlAxGetControl(hNowIEWnd, &punkIE) == S_OK)
            {
                // IUnknownポインタからIWebBrowser2ポインタへキャスト
                pWB2 = punkIE;

                CComQIPtr<IOleInPlaceActiveObject, &IID_IOleInPlaceActiveObject> pIOIPAO(pWB2) ;

                if(pIOIPAO)
                {
                    MSG msg;
                    msg.message = iMsg;
                    msg.wParam = wParam;
                    msg.lParam = lParam;

                    pIOIPAO->TranslateAccelerator(&msg);
                }
 
                return 0 ;
            }
        }

        case WM_BROWS_GO:

            {
                // ActiveXコントロールのインターフェースを要求
                CComPtr<IUnknown>    punkIE;
                if (AtlAxGetControl(hNowIEWnd, &punkIE) == S_OK)
                {
                    // IUnknownポインタからIWebBrowser2ポインタへキャスト
                    pWB2 = punkIE;

                    // URLへ移動
                    CComVariant vempty, vUrl((char *)lParam);
                    pWB2->Navigate2 (&vUrl, &vempty, &vempty, &vempty, &vempty );
                }
            }

            return 0;

        case WM_BROWS_DESTROY:
            DestroyWindow(hwnd);
            return 0;

        case WM_DESTROY :
            {
                // ActiveXコントロールのインターフェースを要求
                CComPtr<IUnknown>    punkIE;
                if (AtlAxGetControl(hNowIEWnd, &punkIE) == S_OK)
                {
                    // IUnknownポインタからIWebBrowser2ポインタへキャスト
                    pWB2 = punkIE;

                    pWB2.Release();
                }

            }
            return 0 ;
    }

    return DefWindowProc (hwnd, iMsg, wParam, lParam) ;
}

CChildSideWeb::CChildSideWeb(HWND hParent,HWND hTab,char *title,char *site){
    hwnd=CreateWindowEx(WS_EX_CLIENTEDGE,"SideWeb","SideWeb",
        WS_CHILD|WS_CLIPCHILDREN,
        0,0,0,0,
        hParent,0,hInst,0);
    hIEWnd=hNowIEWnd;

    TC_ITEM tcItem;
    tcItem.mask=TCIF_TEXT;

    tcItem.pszText=title;
    TabCtrl_InsertItem(hTab,SendMessage(hTab,TCM_GETITEMCOUNT,0,0),&tcItem);

    //タイトル
    lpszTitle=(char *)malloc(lstrlen(title)+1);
    lstrcpy(lpszTitle,title);

    //サイト
    lpszSite=(char *)malloc(lstrlen(site)+1);
    lstrcpy(lpszSite,site);
}
CChildSideWeb::~CChildSideWeb(){
    free(lpszTitle);
    free(lpszSite);
    DestroyWindow(hwnd);
}


CSideWeb *pobj_SideWeb=0;

CSideWeb::CSideWeb(HWND hParent){
    lpszNowUrl=0;
    bShow=0;
/*
    TODO: ここをしっかりしないと動きませーん
    extern CComModule _Module;
    _Module.Init(ObjectMap, hInst);
*/

    //タブを生成
    extern HFONT hStatusFont;
    hTab=CreateWindowEx(0,WC_TABCONTROL,NULL,
        WS_CHILD|WS_CLIPCHILDREN|WS_CLIPSIBLINGS|WS_VISIBLE,
        0,0,0,0,
        hParent,0,hInst,0);
    SendMessage(hTab,WM_SETFONT,(long)hStatusFont,0);

    //→ボタンを生成
    hRightButton=CreateWindow("BUTTON","→",WS_CHILD|WS_VISIBLE,
        0,0,20,13,
        hParent,(HMENU)IDC_CLIP,hInst,0);
    SendMessage(hRightButton,WM_SETFONT,(long)hStatusFont,0);


    iChildSideWebNum=pobj_nv->pobj_DBDomain->iDomainNum+1;
    ppobj_ChildSideWeb=(CChildSideWeb **)malloc(iChildSideWebNum*sizeof(CChildSideWeb *));
    ppobj_ChildSideWeb[0]=new CChildSideWeb(hParent,hTab,"全般","");
    int i;
    for(i=0;i<pobj_nv->pobj_DBDomain->iDomainNum;i++){
        ppobj_ChildSideWeb[i+1]=new CChildSideWeb(hParent,hTab,
            pobj_nv->pobj_DBDomain->ppobj_Domain[i]->lpszName,
            pobj_nv->pobj_DBDomain->ppobj_Domain[i]->lpszDomain);
    }


    TabCtrl_SetCurSel(hTab,0);
    ShowWindow(ppobj_ChildSideWeb[0]->hwnd,SW_SHOW);
    hNowIEWnd=ppobj_ChildSideWeb[0]->hIEWnd;
}
CSideWeb::~CSideWeb(){
    int i;
    for(i=0;i<iChildSideWebNum;i++){
        delete ppobj_ChildSideWeb[i];
    }
    free(ppobj_ChildSideWeb);
    ppobj_ChildSideWeb=0;

    if(lpszNowUrl) free(lpszNowUrl);

    DestroyWindow(hTab);
    DestroyWindow(hRightButton);
}
void CSideWeb::resize(int x,int y,int cx,int cy){
    int iTabHeight=25;

    MoveWindow(hTab,x,y,cx-30,iTabHeight,1);

    SetWindowPos(hRightButton,NULL,x+cx-25,y+7,0,0,SWP_NOSIZE);

    int i;
    for(i=0;i<iChildSideWebNum;i++){
        MoveWindow(ppobj_ChildSideWeb[i]->hwnd,x,y+iTabHeight,cx,cy-iTabHeight,1);
    }

    m_Rect.left=x;
    m_Rect.top=y;
    m_Rect.right=x+cx;
    m_Rect.bottom=y+cy;
}

void CSideWeb::GoPage(char *lpszUrl){
    char *pTemp;
    pTemp=(char *)malloc(lstrlen(lpszUrl)+1);
    lstrcpy(pTemp,lpszUrl);

    if(lpszNowUrl) free(lpszNowUrl);
    lpszNowUrl=pTemp;

    int iTabPos;
    iTabPos=SendMessage(hTab,TCM_GETCURSEL,0,0);


    pTemp=(char *)malloc(lstrlen(lpszNowUrl)+1024);
    if(ppobj_ChildSideWeb[iTabPos]->lpszSite[0])
        sprintf(pTemp,"%s&site=%s",lpszNowUrl,ppobj_ChildSideWeb[iTabPos]->lpszSite);
    else lstrcpy(pTemp,lpszNowUrl);

    SendMessage(ppobj_ChildSideWeb[iTabPos]->hwnd,WM_BROWS_GO,0,(LPARAM)pTemp);

    free(pTemp);

    bShow=1;
    ActiveBasic::IDE::Program::mainFrame.Resized(); 
}

void CSideWeb::SelChangeEvent(){
    char temporary[MAX_PATH];

    int i;
    i=TabCtrl_GetCurSel(hTab);

    TC_ITEM tcItem;
    tcItem.mask=TCIF_TEXT;
    tcItem.pszText=temporary;
    tcItem.cchTextMax=MAX_PATH;
    TabCtrl_GetItem(hTab,i,&tcItem);

    for(i=0;i<iChildSideWebNum;i++){
        ShowWindow(ppobj_ChildSideWeb[i]->hwnd,SW_HIDE);
    }

    for(i=0;i<iChildSideWebNum;i++){
        if(lstrcmpi(temporary,ppobj_ChildSideWeb[i]->lpszTitle)==0){
            ShowWindow(ppobj_ChildSideWeb[i]->hwnd,SW_SHOW);
            hNowIEWnd=ppobj_ChildSideWeb[i]->hIEWnd;
            GoPage(lpszNowUrl);
            break;
        }
    }
}

void CSideWeb::GetRect(RECT *prc){
    *prc=m_Rect;
}





CWebStrings obj_WebStrings;

CWebStrings::CWebStrings(){
    buffer=(char *)malloc(1);
    buffer[0]=0;

    ppStr=(char **)malloc(1);
    iStrNum=0;
}
CWebStrings::~CWebStrings(){
    free(buffer);

    int i;
    for(i=0;i<iStrNum;i++){
        free(ppStr[i]);
    }
    free(ppStr);
}

void CWebStrings::add(char *query){
    //重複チェック
    int i;
    for(i=0;i<iStrNum;i++){
        if(lstrcmpi(ppStr[i],query)==0){
            return;
        }
    }

    ppStr=(char **)realloc(ppStr,(iStrNum+1)*sizeof(char *));
    ppStr[iStrNum]=(char *)malloc(lstrlen(query)+1);
    lstrcpy(ppStr[iStrNum],query);
    iStrNum++;
}

void CWebStrings::clear(){
    buffer[0]=0;

    int i;
    for(i=0;i<iStrNum;i++){
        free(ppStr[i]);
    }
    iStrNum=0;
}

char *CWebStrings::GetBuffer(){
    buffer[0]=0;
    int i;
    for(i=0;i<iStrNum;i++){
        buffer=(char *)realloc(buffer,lstrlen(buffer)+lstrlen(ppStr[i])+2);
        if(i) lstrcat(buffer," ");
        lstrcat(buffer,ppStr[i]);
    }
    return buffer;
}



//////////////////////////
// Web検索用ドメイン管理
//////////////////////////

CDomain::CDomain(char *name,char *domain){
    //表示名
    lpszName=(char *)HeapAlloc(hHeap,0,lstrlen(name)+1);
    lstrcpy(lpszName,name);

    //ドメイン
    lpszDomain=(char *)HeapAlloc(hHeap,0,lstrlen(domain)+1);
    lstrcpy(lpszDomain,domain);
}
CDomain::~CDomain(){
    HeapDefaultFree(lpszName);
    HeapDefaultFree(lpszDomain);
}


void CDBDomain::init(){
    int i;
    for(i=0;i<iDomainNum;i++){
        delete ppobj_Domain[i];
    }
    iDomainNum=0;
}
CDBDomain::CDBDomain(){
    ppobj_Domain=(CDomain **)HeapAlloc(hHeap,0,1);
    iDomainNum=0;

    m_hListView=0;
}
CDBDomain::~CDBDomain(){
    init();
    HeapDefaultFree(ppobj_Domain);
}

void CDBDomain::load(){
    char temporary[MAX_PATH],temp2[MAX_PATH];
    sprintf(temporary,"%sUserSetting\\domain.ini",pj_editor_Dir);

    char *buffer;
    buffer=ReadBuffer_NonErrMsg(temporary);
    if(buffer){
        int i;
        i=0;
        while(buffer[i]){
            //表示名
            i=GetOneParameter(buffer,i,temporary);
            if(temporary[0]=='\0') break;

            //ドメイン
            i=GetOneParameter(buffer,i,temp2);
            if(temp2[0]=='\0') break;

            if(buffer[i]=='\r'&&buffer[i+1]=='\n'){
                i+=2;
            }

            add(temporary,temp2);
        }
        HeapDefaultFree(buffer);
    }
    else{
        add("辞書","ja.wikipedia.org");
        add("MSDN","msdn.microsoft.com");
    }
}
void CDBDomain::save(){
    char temporary[MAX_PATH];
    sprintf(temporary,"%sUserSetting\\domain.ini",pj_editor_Dir);

    char *buffer;
    buffer=(char *)HeapAlloc(hHeap,0,iDomainNum*MAX_PATH*2+1);
    buffer[0]=0;

    int i;
    for(i=0;i<iDomainNum;i++){
        sprintf(buffer+lstrlen(buffer),"%s,%s\r\n",ppobj_Domain[i]->lpszName,ppobj_Domain[i]->lpszDomain);
    }

    WriteBuffer(temporary,buffer,lstrlen(buffer));

    HeapDefaultFree(buffer);
}

void CDBDomain::copy_get(CDBDomain *pobj_DBDomain){
    init();

    int i;
    for(i=0;i<pobj_DBDomain->iDomainNum;i++){
        add(pobj_DBDomain->ppobj_Domain[i]->lpszName,pobj_DBDomain->ppobj_Domain[i]->lpszDomain);
    }
}

void CDBDomain::SetListView(HWND hListView){
    m_hListView=hListView;

    int i;
    for(i=0;i<iDomainNum;i++){
        LV_ITEM item;

        item.mask=LVIF_TEXT;
        item.pszText=ppobj_Domain[i]->lpszName;
        item.iItem=i;
        item.iSubItem=0;
        ListView_InsertItem(m_hListView,&item);

        item.pszText=ppobj_Domain[i]->lpszDomain;
        item.iItem=i;
        item.iSubItem++;
        ListView_SetItem(m_hListView,&item);
    }
}

void CDBDomain::add(char *name,char *domain){
    ppobj_Domain=(CDomain **)HeapReAlloc(hHeap,0,ppobj_Domain,(iDomainNum+1)*sizeof(CDomain *));
    ppobj_Domain[iDomainNum]=new CDomain(name,domain);
    iDomainNum++;


    if(m_hListView){
        int i;
        i=ListView_GetItemCount(m_hListView);

        //リストビューに追加
        LV_ITEM item;
        item.mask=LVIF_TEXT;
        item.pszText=name;
        item.iItem=i;
        item.iSubItem=0;
        ListView_InsertItem(m_hListView,&item);

        item.pszText=domain;
        item.iItem=i;
        item.iSubItem++;
        ListView_SetItem(m_hListView,&item);
    }
}
void CDBDomain::del(char *name){
    int i;
    for(i=0;i<iDomainNum;i++){
        if(lstrcmp(ppobj_Domain[i]->lpszName,name)==0) break;
    }
    if(i==iDomainNum) return;

    if(m_hListView){
        //リストビューから削除
        ListView_DeleteItem(m_hListView,i);
    }

    delete ppobj_Domain[i];
    iDomainNum--;
    for(;i<iDomainNum;i++){
        ppobj_Domain[i]=ppobj_Domain[i+1];
    }
}
void CDBDomain::change(char *szBeforeName,char *name,char *domain){
    int i;
    for(i=0;i<iDomainNum;i++){
        if(lstrcmp(ppobj_Domain[i]->lpszName,szBeforeName)==0) break;
    }
    if(i==iDomainNum) return;

    ppobj_Domain[i]->lpszName=(char *)HeapReAlloc(hHeap,0,ppobj_Domain[i]->lpszName,lstrlen(name)+1);
    lstrcpy(ppobj_Domain[i]->lpszName,name);

    ppobj_Domain[i]->lpszDomain=(char *)HeapReAlloc(hHeap,0,ppobj_Domain[i]->lpszDomain,lstrlen(domain)+1);
    lstrcpy(ppobj_Domain[i]->lpszDomain,domain);


    if(m_hListView){
        //リストビューの設定
        ListView_SetItemText(m_hListView,i,0,name);
        ListView_SetItemText(m_hListView,i,1,domain);
    }
}