root/trunk/examples/sumatrapdf/pdfviewer.d

import flowerd.dfl;
import dfl.all;
import flowerd.common;
import sumatra;
import tango.stdc.stringz;
import tango.sys.win32.Types;

class PDFControl : HElement
{
    this(HElement parent,HElement toolbar)
    {
        sumatra=new Sumatra;
        sumatra.onRepaint=&onRepaint;
        sumatra.onSetScrollbarSize=&onSetScrollbarSize;
        sumatra.onSetCursor=&onSetCursor;
        sumatra.onPageChanged=&onPageChanged;
        sumatra.onHandleLink=&onHandleLink;

        wrap=new HElement("div");
        wrap.className="sumatra";
        self=new HElement("div");
        super(self);
        if(toolbar) adopt(toolbar);
        sbh=new HScrollBar(new HElement("widget"));
        sbh.attribute("type","hscrollbar");
        sbv=new HScrollBar(new HElement("widget"));
        sbv.attribute("type","vscrollbar");
        wrap.adopt(self,wrap.children);
        wrap.adopt(sbv,wrap.children);
        wrap.adopt(sbh,wrap.children);
        parent.adopt(wrap,parent.children);

        sbv.handleEvent(delegate(HScroll p)
        {
            auto oo=cast(PDFControl)p.param;
            if(p.cmd==SCROLL_POS) oo.sumatra.scrollY(1,p.pos);
            else if(p.cmd==SCROLL_HOME) oo.sumatra.firstPage;
            else if(p.cmd==SCROLL_END) oo.sumatra.firstPage;
            else if(p.cmd==SCROLL_STEP_PLUS) oo.sumatra.scrollY(2,16);
            else if(p.cmd==SCROLL_STEP_MINUS) oo.sumatra.scrollY(2,-16);
            else if(p.cmd==SCROLL_PAGE_PLUS) oo.sumatra.nextPage;
            else if(p.cmd==SCROLL_PAGE_MINUS) oo.sumatra.prevPage;
            return false;
        },this);
        sbv.handleEvent(delegate(HFocus p)
        {
            if(p.cmd==(FOCUS_GOT|SINKING)) (cast(HElement)p.param).focus();
            return true;
        },self);
        sbv.handleEvent(delegate(HMouse p)
        {
            if(p.cmd==(MOUSE_WHEEL|SINKING))
            {
                auto oo=cast(PDFControl)p.param;
                if(p.alt_state&CONTROL_KEY_PRESSED)
                {
                    if(cast(int)p.button_state>0) oo.sumatra.zoomIn;
                    else oo.sumatra.zoomOut;
                }
                else oo.sumatra.scrollY(2,cast(int)p.button_state>0?-48:48);
                return true;
            }
            return false;
        },this);
        sbh.handleEvent(delegate(HScroll p)
        {
            auto oo=cast(PDFControl)p.param;
            if(p.cmd==SCROLL_POS) oo.sumatra.scrollX(1,p.pos);
            else if(p.cmd==SCROLL_HOME) oo.sumatra.scrollX(1,0);
            else if(p.cmd==SCROLL_END) oo.sumatra.scrollX(1,oo.sbh.getValue.max);
            else if(p.cmd==SCROLL_STEP_PLUS) oo.sumatra.scrollX(2,16);
            else if(p.cmd==SCROLL_STEP_MINUS) oo.sumatra.scrollX(2,-16);
            else if(p.cmd==SCROLL_PAGE_PLUS) oo.sumatra.scrollX(2,oo.sbh.getValue.page);
            else if(p.cmd==SCROLL_PAGE_MINUS) oo.sumatra.scrollX(2,-oo.sbh.getValue.page);
            return false;
        },this);
        sbh.handleEvent(delegate(HFocus p)
        {
            if(p.cmd==(FOCUS_GOT|SINKING)) (cast(HElement)p.param).focus();
            return true;
        },self);
        sbh.handleEvent(delegate(HMouse p)
        {
            if(p.cmd==(MOUSE_WHEEL|SINKING))
            {
                auto oo=cast(PDFControl)p.param;
                if(p.alt_state&CONTROL_KEY_PRESSED)
                {
                    if(cast(int)p.button_state>0) oo.sumatra.zoomIn;
                    else oo.sumatra.zoomOut;
                }
                else oo.sumatra.scrollX(2,cast(int)p.button_state>0?-48:48);
                return true;
            }
            return false;
        },this);

        handleEvent(&draw,this);
        handleEvent(&size,this);
        handleEvent(&key,this);
        handleEvent(&mouse,this);
        handleEvent(&mtimer);
        focusable=true;
    }

    HElement wrap,self;
    HScrollBar sbh,sbv;
    Sumatra sumatra;
    int pagesize;

    bool mtimer(HTimer)
    {
        wrap.parent.update;
        return false;
    }

    int onHandleLink(int type,void* data)
    {
        if(type==1)
        {
            int page=cast(int)data;
            if(page>0 && page<sumatra.pages)
            {
                myform.hSmartGo(page);
                return 1;
            }
        }
        else if(type==2)
        {
            char[] uri=fromStringz(cast(char*)data).dup;
            msgBox(uri);
            return 1;
        }
        return 0;
    }

    int onPageChanged()
    {
        if(myform is null) return 0;
        myform.toolbar2.timer(1);
        return 1;
    }

    void onRepaint(bool now)
    {
        if(now) timer(1);
        else timer(400);
    }

    void onSetCursor(int type)
    {
        static int lastcursor=1;
        if(lastcursor!=type)
        {
            if(lastcursor==2) delClass("cursor_hand");
            else if(lastcursor==3) delClass("cursor_drag");

            if(type==2) addClass("cursor_hand");
            else if(type==3) addClass("cursor_drag");

            timer(1);
        }
        lastcursor=type;
    }

    void onSetScrollbarSize(int type,int pos,int min,int max,uint page)
    {
        static bool h,v;
        if(type==1)
        {
            sbh.setValue(pos,min,max,page,16);
            if(page>max)
            {
                sbh.style("height","0");
                timer(1);
                h=false;
            }
            else
            {
                if(h==false) sbh.style("height","max-intrinsic");
                h=true;
            }
        }
        else if(type==2)
        {
            sbv.setValue(pos,min,max,page,16);
            if(page>max)
            {
                pagesize=0;
                sbv.style("height","0");
                timer(1);
                v=false;
            }
            else
            {
                pagesize=page;
                if(v==false) sbv.style("height","max-intrinsic");
                v=true;
            }
        }
    }

    bool mouse(HMouse p)
    {
        if(p.cmd==MOUSE_WHEEL)
        {
            if(p.alt_state&CONTROL_KEY_PRESSED)
            {
                if(cast(int)p.button_state>0) sumatra.zoomIn;
                else sumatra.zoomOut;
            }
            else sumatra.scrollY(2,cast(int)p.button_state>0?-48:48);
            return true;
        }
        else if(p.cmd==MOUSE_MOVE)
        {
            sumatra.mouseMove(p.pos.x,p.pos.y,0);
            return true;
        }
        else if(p.cmd==MOUSE_DOWN && p.button_state==MAIN_MOUSE_BUTTON)
        {
            sumatra.mouseDown(p.pos.x,p.pos.y,p.alt_state&CONTROL_KEY_PRESSED?MK_CONTROL:0);
            capture(true);
            return true;
        }
        else if(p.cmd==MOUSE_UP && p.button_state==MAIN_MOUSE_BUTTON)
        {
            sumatra.mouseUp(p.pos.x,p.pos.y,p.alt_state&CONTROL_KEY_PRESSED?MK_CONTROL:0);
            capture(false);
            return true;
        }
        return false;
    }

    bool key(HKey p)
    {
        if(p.cmd==KEY_DOWN)
        {
            auto k=p.key_code;
            if(k==8) //backspace
            {
                if(myform) myform.hBack;
                return true;
            }
            else if(k==32) //space
            {
                if(pagesize<=16) return false;
                if(p.alt_state&SHIFT_KEY_PRESSED) sumatra.scrollY(2,-(pagesize-16));
                else sumatra.scrollY(2,(pagesize-16));
            }
            else if(k==13) //enter
            {
                if(p.alt_state&CONTROL_KEY_PRESSED) sumatra.zoom=ZOOM_FIT_WIDTH;
                else if(p.alt_state&SHIFT_KEY_PRESSED) sumatra.zoom=ZOOM_FIT_PAGE;
                else sumatra.zoom=100;
                return true;
            }
            else if(k==187 || k==107) //plus
            {
                sumatra.zoomIn;
                return true;
            }
            else if(k==189 || k==109) //minus
            {
                sumatra.zoomOut;
                return true;
            }
            else if(k==33) //page up
            {
                sumatra.prevPage;
                return true;
            }
            else if(k==34) //page down
            {
                sumatra.nextPage;
                return true;
            }
            else if(k==38) //arrow up
            {
                sumatra.scrollY(2,-16);
                return true;
            }
            else if(k==40) //arrow down
            {
                sumatra.scrollY(2,16);
                return true;
            }
            else if(k==37) //arrow left
            {
                sumatra.scrollX(2,-16);
                return true;
            }
            else if(k==39) //arrow right
            {
                sumatra.scrollX(2,16);
                return true;
            }
            else if(k==36) //home
            {
                sumatra.firstPage;
                return true;
            }
            else if(k==35) //end
            {
                sumatra.lastPage;
                return true;
            }
        }
        return false;
    }

    void size(HSize p) // size
    {
        auto a=p.element.viewSize;
        sumatra.resize(a.cx,a.cy);
    }

    bool draw(HDraw p)
    {
        if(p.cmd==DRAW_CONTENT)
        {
            auto a=p.area;
            int w=a.right-a.left,h=a.bottom-a.top;
            sumatra.render(p.hdc,a.left,a.top,w,h);
            return true;
        }
        return false;
    }
}

class PdfForm : HLayoutForm
{
    this()
    {
        super();
        form.text="Sumatra PDF demo";
        form.size=Size(800,700);
        form.centerToScreen();

        setOption(HTMLAYOUT_FONT_SMOOTHING,3); // force ClearType

        HLayoutBase.handleEvent(&onDomReady);   //this handler is used for both
                                                //HLN_DOCUMENT_COMPLETE - document fully complete
                                                //HLN_DOCUMENT_LOADED - dom tree ready

        loadHTML("pdfviewer/index.html");
    }

    HElement right,mybutton,toolbar,toolbar2,forward,back,zoom,zoomin,zoomout,zoompage,zoomwidth,currentpage,go,pdf; //keep the references or the gc will collect the event handlers away
    PDFControl pdfcontrol;

    bool myTimer6(HTimer p)
    {
        currentpage.innerText=Int.toString(pdfcontrol.sumatra.page)~" / "~Int.toString(pdfcontrol.sumatra.pages);
        currentpage.update;
        return false;
    }

    bool onDomReady(HReady event)
    {
        if(event.event!=HLN_DOCUMENT_COMPLETE) return false;

        right=rootElement;
        (mybutton=right.getId("open")).handleEvent(delegate(HBehaviorEvent p)
        {
            if(p.cmd==BUTTON_CLICK)
            {
                auto dlg=new OpenFileDialog;
                dlg.showDialog();
                if(dlg.fileName.length)
                {
                    auto oo=(cast(PdfForm)p.param);
                    oo.pdfcontrol.sumatra.loadFile(dlg.fileName);
                    oo.pdfcontrol.sumatra.displayMode=DM_CONTINUOUS;
                    oo.pdfcontrol.sumatra.zoom=150;
                    oo.pdf.display="block";
                    oo.right.update;
                    auto s=oo.pdfcontrol.viewSize;
                    oo.pdfcontrol.sumatra.resize(s.cx,s.cy);
                }
                return true; //handled the event
            }
            return false; //call other handlers
        },this);

        toolbar=right.getId("toolbar");
        /*(toolbar=right.getId("toolbar")).handleEvent(delegate(HMouse p)
        {
            if(p.cmd==MOUSE_ENTER)
            {
                p.element.addClass("expanded");
                p.element.parent.update;
                return true;
            }
            else if(p.cmd==MOUSE_LEAVE)
            {
                p.element.delClass("expanded");
                p.element.parent.update;
                return true;
            }
            return false;
        });*/
        (toolbar2=toolbar.getId("toolbar2")).handleEvent(&myTimer6);
        (forward=toolbar.getId("forward")).handleEvent(delegate(HMouse p)
        {
            if(p.cmd==MOUSE_DOWN)
            {
                myform.hForward();
                return true;
            }
            return false;
        },this);
        (back=toolbar.getId("back")).handleEvent(delegate(HMouse p)
        {
            if(p.cmd==MOUSE_DOWN)
            {
                myform.hBack();
                return true;
            }
            return false;
        },this);
        /*(zoompage=toolbar.getId("zoompage")).handleEvent(delegate(HMouse p)
        {
            if(p.cmd==MOUSE_DOWN)
            {
                myform.pdfcontrol.sumatra.zoom(ZOOM_FIT_PAGE);
                return true;
            }
            return false;
        },this);*/
        (zoom=toolbar.getId("zoom")).handleEvent(delegate(HMouse p)
        {
            if(p.cmd==MOUSE_DOWN)
            {
                myform.pdfcontrol.sumatra.zoom(100);
                return true;
            }
            return false;
        },this);
        (zoomwidth=toolbar.getId("zoomwidth")).handleEvent(delegate(HMouse p)
        {
            if(p.cmd==MOUSE_DOWN)
            {
                myform.pdfcontrol.sumatra.zoom(ZOOM_FIT_WIDTH);
                return true;
            }
            return false;
        },this);
        (zoomin=toolbar.getId("zoomin")).handleEvent(delegate(HMouse p)
        {
            if(p.cmd==MOUSE_DOWN)
            {
                myform.pdfcontrol.sumatra.zoomIn;
                return true;
            }
            return false;
        },this);
        (zoomout=toolbar.getId("zoomout")).handleEvent(delegate(HMouse p)
        {
            if(p.cmd==MOUSE_DOWN)
            {
                myform.pdfcontrol.sumatra.zoomOut;
                return true;
            }
            return false;
        },this);
        (currentpage=toolbar.getId("currentpage")).handleEvent(delegate(HKey p)
        {
            if(p.cmd==KEY_CHAR && p.key_code==13)
            {
                uint page=0;
                try page=cast(uint)Int.toLong(p.element.innerText);
                catch(Object o) {}
                if(page>0 && page<=myform.pdfcontrol.sumatra.pages)
                {
                    myform.hSmartGo(page);
                    myform.right.focus;
                    return true;
                }
            }
            return false;
        },this);
        (go=toolbar.getId("go")).handleEvent(delegate(HMouse p)
        {
            if(p.cmd==MOUSE_DOWN)
            {
                uint page=0;
                try page=cast(uint)Int.toLong(myform.currentpage.innerText);
                catch(Object o) {}
                if(page>0 && page<=myform.pdfcontrol.sumatra.pages)
                {
                    myform.hSmartGo(page);
                    return true;
                }
            }
            return false;
        },this);
        pdf=right.getId("content_pdf");
        pdfcontrol=new PDFControl(pdf,toolbar);

        history=new History;

        return true;
    }

    void hSmartGo(uint v)
    {
        auto cv=myform.hCurrentValue;
        if(v!=cv) myform.hReplace(cv);
        myform.hGo(v,v!=cv);
    }

    alias GrowStack!(uint) History;

    History history;
    uint hpointer;

    void hBack()
    {
        if(hpointer>0)
        {
            hReplace(hCurrentValue);
            --hpointer;
            hGo(history[hpointer],0);
            forward.disabled=false;
            forward.update;
        }
        if(hpointer==0) back.disabled=true;
        else back.disabled=false;
        back.update;
    }

    void hForward()
    {
        if(hpointer<history.length-1)
        {
            hReplace(hCurrentValue);
            ++hpointer;
            hGo(history[hpointer],0);
            back.disabled=false;
            back.update;
        }
        if(hpointer==history.length-1) forward.disabled=true;
        else forward.disabled=false;
        forward.update;
    }

    void hReplace(uint val)
    {
        if(history.length==0) hAdd(val);
        else history[hpointer]=val;
    }

    void hAdd(uint val)
    {
        history.length=hpointer+1;
        history.push(val);
        hpointer=history.length-1;
        forward.disabled=true;
        forward.update;
        back.disabled=hpointer==0;
        back.update;
    }

    uint hCurrentValue()
    {
        auto v=pdfcontrol.sumatra.page;
        return v==-1?uint.max:pdfcontrol.sumatra.page;
    }

    void hGo(uint uval,int add)
    {
        if(add==1) hAdd(uval);
        pdfcontrol.sumatra.page=uval;
    }
}

PdfForm myform;

void main()
{
    htmlayout.capi.loadHTMLayout(); //load the dll
    loadSumatra(); //load sumatra
    myform=new PdfForm;
    Application.run(cast(Form)myform);
}