/*
 * SolWebBrowser.cpp 
 * Copyright (c) 2011 Antillia.com TOSHIYUKI ARAI. ALL RIGHTS RESERVED. 
 */



// SOL++2000 
// 2008/08/10
// 2008/09/16 Added an event handler for WM_BROWSER_DOCUMENTCOMPLETE from SOL::BrowserEvent class.
// 2009/10/04 Modified a value of DEFAULT_WIN_CLASS_STYLE of class Application in Main function 
//in the follwing way to avoid a window redrawing.
//
//     Application::DEFAULT_WIN_CLASS_STYLE = CS_DBLCLKS;

//2011/02/23 Updated to enable TAB key in HTMLView.
//2011/09/04 Fixed a bug in selChanged method. 

#include <sol\ApplicationView.h>
#include <sol\ole\HTMLView.h>
#include <sol\ExtendedCombobox.h>
#include <sol/Stdio.h>
#include <sol/Form.h>

#include "resource.h"

namespace SOL {

/**
 * class SolWebBrowser
 */
class SolWebBrowser :public ApplicationView {
private:
    Form form;
    HTMLView htmlView;
    ExtendedComboBox comboBox;

public:
    /**
     * Constructor
     */
    SolWebBrowser(Application& applet, const TCHAR* name, Args& args)
    :ApplicationView(applet, name, 
            args.set(XmNbackground, (ulong)(COLOR_BTNFACE+1))    )
    {

        Args ar;
        ar.set(XmNstyle, (ulong)CBS_DROPDOWN);
        ar.set(XmNheight, 100);
        comboBox.create(this, _T(""), ar);
        comboBox.addCallback(XmNselChangeCallback, this, (Callback)&SolWebBrowser::selChanged, NULL);

        ar.reset();
        
        ar.set(XmNstyle, WS_CHILD|WS_VISIBLE);
        htmlView.create(this, _T(""), ar);

        //2011/02/23
        addEventHandler(WM_KEYDOWN, this, (Handler)&SolWebBrowser::keyDown, NULL);

        addCallback(XmNmenuCallback, IDM_EXIT, this, (Callback)&SolWebBrowser::exit, NULL);

        addEventHandler(WM_SIZE, this, (Handler)&SolWebBrowser::size, NULL);
        addEventHandler(WM_CLOSE, this, (Handler)&SolWebBrowser::close, NULL);
        //208/09/16
        addEventHandler(WM_BROWSER_DOCUMENTCOMPLETE, this, (Handler)&SolWebBrowser::complete, NULL);

        addEventHandler(WM_NOTIFY, this,(Handler)&SolWebBrowser::notify, NULL);

        restorePlacement();
    }

private:
    /**
     * CBN_SELCHANGE callback.
     * Get a url (current selection) of comboBox and navigate to the url.
     */
    //2008/09/16
    void selChanged(Action& action) {
        COMBOBOXEXITEM ci;
        memset(&ci, 0, sizeof(ci));
        TCHAR url[1024];
        memset(url, (TCHAR)0, SizeOf(url)); // 2011/09/04 Modifed to use SizeOf instead of sizeof;

        ci.mask = CBEIF_TEXT;
        ci.pszText = url;
        ci.cchTextMax = SizeOf(url);        // 2011/09/04 Modified to use SizeOf instead of sizeof;
        ci.iItem = -1;
        
        comboBox.send(CBEM_GETITEM, 0, (LPARAM)&ci);
        htmlView.navigate(url);
        TCHAR caption[1024];
        _stprintf_s(caption, SizeOf(caption), _T("%s - SolWebBrowser"), (const TCHAR*)url);
        setText(caption);
    }

public:
    /**
     * WM_KEYDOWN event handler.
     */
    //2011/02/23 Added
    long keyDown(Event& event)
    {
        MSG msg;
        msg.message = event.getMessage();
        msg.lParam = event.getLParam();
        msg.wParam = event.getWParam();

        //Call HTMLView::transateAccelator
        htmlView.translateAccelator(&msg);
        return 0;
    }

public:
    /**
     * WM_SIZE event handler.
     */
    long size(Event& event)
    {
        LPARAM l = event.getLParam();

        int w=0;
        int h=30;
        comboBox.getSize(w, h);

        comboBox.reshape(0, 0, LOWORD(l), h);
        htmlView.reshape(0, h, LOWORD(l), HIWORD(l)-h);

        return 0;
    }

public:
    /**
     * Event handler for a user-defined WM_BROWSER_DOCUMENTCOMPLETE from SOL::BrowserEvent class.
     *
     */
    //2008/09/16
    long complete(Event& event)
    {
        //Implement your code to handle DISPID_COMPLETE
        String url = "";
        htmlView.getLocationURL(url);
        const TCHAR* curl = (const TCHAR*)url;
        
        if (curl && !(_stricmp(curl, _T("about:blank")) ==0 ||
            _stricmp(curl, _T("res://ieframe.dll/navcancl.htm")) ==0) ) {        
            comboBox.setText(curl);

            int e = comboBox.send(CB_FINDSTRINGEXACT, -1, (LPARAM)curl);
            if (e == CB_ERR) {
                //If comboBox has no entry for the curl, add it to the comboBox.
                COMBOBOXEXITEM cbei;
                memset(&cbei, 0, sizeof(cbei));
                cbei.mask = CBEIF_TEXT;

                cbei.iItem          = 0;
                cbei.pszText        = (TCHAR*)curl;
                cbei.cchTextMax     = strlen(curl);

                comboBox.send(CBEM_INSERTITEM, 0,(LPARAM)&cbei);
            }
        }
        return 0;
    }

public:
    long notify(Event& event) 
    {
        LPARAM lParam = event.getLParam();
    
        NMCOMBOBOXEX* nm = (NMCOMBOBOXEX*)lParam;
        if (nm->hdr.hwndFrom == comboBox.getWindow() &&
            nm->hdr.code==CBEN_ENDEDIT) {

            NMCBEENDEDIT* nme = (NMCBEENDEDIT*)nm;
            if (nme->iWhy == CBENF_RETURN) {
        
                TCHAR url[1024];
                memset(url, (TCHAR)0, SizeOf(url));
                comboBox.getText(url, SizeOf(url));
                if (strlen(url)>0) {
                    navigate(url);
                }
            }
        }
        return 0;
    }


public:
    long close(Event& event)
    {
        savePlacement();
        return defaultProc(event);
    }

public:
    void navigate(const TCHAR* url) {
        //If you change font size, call zoom method with some level(0,1,2,3,4)
        //htmlView.zoom(2);

        htmlView.navigate(url);
        TCHAR caption[1024];
        
        _stprintf_s(caption, SizeOf(caption), _T("%s - SolWebBrowser"), (const TCHAR*)url);
        setText(caption);
        comboBox.setText(url);
    }
};

}

//////////////////////////////////////
// SolWebBrowser.exe url
//
//    Program entry point.
void    Main(int argc, TCHAR** argv)
{
    OleInitialize(NULL);
    try {
        const TCHAR* url= _T("http://www.microsoft.com/");
        if (argc ==2) {
            //2009/10/19
            // If specified a url on command line, use it.
            url = argv[1];
        }
        const String appClass = "SolWebBrowser";

        Application applet(appClass, argc, argv);

        Args args;
        //2009/10/07
        //args.set(XmNstyle, WS_CLIPCHILDREN);
        args.set(XmNexStyle, WS_EX_CONTROLPARENT|WS_EX_TRANSPARENT);//WS_EX_TOPMOST);
        args.set(XmNclassStyle, CS_DBLCLKS);

        SolWebBrowser browser(applet, appClass, args);
        browser.realize();
        browser.navigate(url);

    
        applet.run();
    } catch (...) {

    }
    OleUninitialize();
}