// MenuItem.cc for FbTk - Fluxbox Toolkit
// Copyright (c) 2003 - 2006 Henrik Kinnunen (fluxgen at fluxbox dot org)
//
// Permission is hereby granted, free of charge, to any person obtaining a
// copy of this software and associated documentation files (the "Software"),
// to deal in the Software without restriction, including without limitation
// the rights to use, copy, modify, merge, publish, distribute, sublicense,
// and/or sell copies of the Software, and to permit persons to whom the
// Software is furnished to do so, subject to the following conditions:
//
// The above copyright notice and this permission notice shall be included in
// all copies or substantial portions of the Software.
//
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
// THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
// DEALINGS IN THE SOFTWARE.

#include "MenuItem.hh"
#include "Command.hh"
#include "GContext.hh"
#include "MenuTheme.hh"
#include "PixmapWithMask.hh"
#include "Image.hh"
#include "App.hh"
#include "StringUtil.hh"
#include "Menu.hh"
#include <X11/keysym.h>

namespace FbTk {

void MenuItem::click(int button, int time, unsigned int mods) {
    if (m_command.get() != 0) {
        if (m_menu && m_close_on_click && (mods & ControlMask) == 0)
            m_menu->hide();
        // we need a local variable, since the command may destroy this object
        RefCount<Command<void> > tmp(m_command);
        tmp->execute();
    }
}

void MenuItem::drawLine(FbDrawable &draw,
                        const FbTk::ThemeProxy<MenuTheme> &theme, size_t size,
                        int text_x, int text_y, unsigned int width) const {

    unsigned int height = theme->itemHeight();
    int bevelW = theme->bevelWidth();

    int font_top = (height - theme->hiliteFont().height())/2;
    int underline_height = font_top + theme->hiliteFont().ascent() + 2;
    int bottom = height - bevelW - 1;

    text_y += bottom > underline_height ? underline_height : bottom;

    int text_w = theme->hiliteFont().textWidth(label());

    const FbString& visual = m_label.visual();
    BiDiString search_string(FbString(visual, 0, size > visual.size() ? visual.size() : size));
    int search_string_w = theme->hiliteFont().textWidth(search_string);

    // pay attention to the text justification
    switch(theme->hiliteFontJustify()) {
    case FbTk::LEFT:
        text_x += bevelW + height + 1;
        break;
    case FbTk::RIGHT:
        text_x += width - (height + bevelW + text_w);
        break;
    default: //center
        text_x += ((width + 1 - text_w) / 2);
        break;
    }

    // avoid drawing an ugly dot
    if (size != 0)
        draw.drawLine(theme->hiliteUnderlineGC().gc(),
                      text_x, text_y, text_x + search_string_w, text_y);

}

void MenuItem::draw(FbDrawable &draw,
                    const FbTk::ThemeProxy<MenuTheme> &theme,
                    bool highlight, bool draw_foreground, bool draw_background,
                    int x, int y,
                    unsigned int width, unsigned int height) const {

    // text and submenu icon are background
    // selected pixmaps are foreground

    Display *disp = App::instance()->display();
    //
    // Icon
    //
    if (draw_background) {
        if (icon() != 0) {
            // copy pixmap, so we don't resize the original
            FbPixmap tmp_pixmap, tmp_mask;
            tmp_pixmap.copy(icon()->pixmap());
            tmp_mask.copy(icon()->mask());

            // scale pixmap to right size
            if (height - 2*theme->bevelWidth() != tmp_pixmap.height()) {
                unsigned int scale_size = height - 2*theme->bevelWidth();
                tmp_pixmap.scale(scale_size, scale_size);
                tmp_mask.scale(scale_size, scale_size);
            }

            if (tmp_pixmap.drawable() != 0) {
                GC gc = theme->frameTextGC().gc();
                int icon_x = x + theme->bevelWidth();
                int icon_y = y + theme->bevelWidth();
                // enable clip mask
                XSetClipMask(disp, gc, tmp_mask.drawable());
                XSetClipOrigin(disp, gc, icon_x, icon_y);

                if (draw.depth() == tmp_pixmap.depth()) {
                    draw.copyArea(tmp_pixmap.drawable(),
                                  gc,
                                  0, 0,
                                  icon_x, icon_y,
                                  tmp_pixmap.width(), tmp_pixmap.height());
                } else { // TODO: wrong in soon-to-be-common circumstances
                    XGCValues backup;
                    XGetGCValues(draw.display(), gc, GCForeground|GCBackground,
                                 &backup);
                    XSetForeground(draw.display(), gc,
                                   Color("black", theme->screenNum()).pixel());
                    XSetBackground(draw.display(), gc,
                                   Color("white", theme->screenNum()).pixel());
                    XCopyPlane(draw.display(), tmp_pixmap.drawable(),
                               draw.drawable(), gc,
                               0, 0, tmp_pixmap.width(), tmp_pixmap.height(),
                               icon_x, icon_y, 1);
                    XSetForeground(draw.display(), gc, backup.foreground);
                    XSetBackground(draw.display(), gc, backup.background);
                }

                // restore clip mask
                XSetClipMask(disp, gc, None);
            }
        }
    }

    if (label().logical().empty())
        return;

    // text is background
    if (draw_background) {
        const GContext &tgc =
            (highlight ? theme->hiliteTextGC() :
             (isEnabled() ? theme->frameTextGC() : theme->disableTextGC() ) );
        const Font& font = (highlight ? theme->hiliteFont() : theme->frameFont());
        //
        // Text
        //
        int text_y = y, text_x = x;
        int text_w = font.textWidth(label());

        int height_offset = theme->itemHeight() - (font.height() + 2*theme->bevelWidth());
        text_y = y + theme->bevelWidth() + font.ascent() + height_offset/2;

        switch(highlight ? theme->hiliteFontJustify() : theme->frameFontJustify()) {
        case FbTk::LEFT:
            text_x = x + theme->bevelWidth() + height + 1;
            break;

        case FbTk::RIGHT:
            text_x = x +  width - (height + theme->bevelWidth() + text_w);
            break;
        default: //center
            text_x = x + ((width + 1 - text_w) / 2);
            break;
        }

        font.drawText(draw, theme->screenNum(), tgc.gc(), label(), text_x, text_y);
    }

    GC gc = (highlight) ? theme->hiliteTextGC().gc() :
        theme->frameTextGC().gc();
    int sel_x = x;
    int sel_y = y;
    unsigned int item_pm_height = theme->itemHeight();

    if (theme->bulletPos() == FbTk::RIGHT)
        sel_x += width - height - theme->bevelWidth();

    // selected pixmap is foreground
    if (draw_foreground && isToggleItem()) {

        //
        // ToggleItem
        //
        const PixmapWithMask *pm = 0;

        if (isSelected()) {
            if (highlight && theme->highlightSelectedPixmap().pixmap().drawable() != 0)
                pm = &theme->highlightSelectedPixmap();
            else
                pm = &theme->selectedPixmap();
        } else {
            if (highlight && theme->highlightUnselectedPixmap().pixmap().drawable() != 0)
                pm = &theme->highlightUnselectedPixmap();
            else
                pm = &theme->unselectedPixmap();
        }
        if (pm != 0 && pm->pixmap().drawable() != 0) {
            unsigned int selw = pm->width();
            unsigned int selh = pm->height();
            int offset_x = 0;
            int offset_y = 0;
            if (selw < item_pm_height)
                offset_x += (item_pm_height - selw) / 2;
            if (selh < item_pm_height)
                offset_y += (item_pm_height - selh) / 2;

            XSetClipMask(disp, gc, pm->mask().drawable());
            XSetClipOrigin(disp, gc, sel_x+offset_x, sel_y+offset_y);
            // copy bullet pixmap to drawable
            draw.copyArea(pm->pixmap().drawable(),
                          gc,
                          0, 0,
                          sel_x+offset_x, sel_y+offset_y,
                          selw,
                          selh);
            // disable clip mask
            XSetClipMask(disp, gc, None);
        } else if (isSelected()) {
            draw.fillRectangle(theme->hiliteGC().gc(),
                               sel_x+item_pm_height/4, sel_y+item_pm_height/4, item_pm_height/2, item_pm_height/2);
        }
    }

    //
    // Submenu (background)
    //
    if (draw_background && submenu()) {

        const PixmapWithMask *pm = 0;

        if (highlight && theme->highlightBulletPixmap().pixmap().drawable() != 0)
            pm = &theme->highlightBulletPixmap();
        else
            pm = &theme->bulletPixmap();

        if (pm && pm->pixmap().drawable() != 0) {
            unsigned int selw = pm->width();
            unsigned int selh = pm->height();

            int offset_x = 0;
            int offset_y = 0;
            if (selw < item_pm_height)
                offset_x += (item_pm_height - selw) / 2;
            if (selh < item_pm_height)
                offset_y += (item_pm_height - selh) / 2;

            XSetClipMask(disp, gc, pm->mask().drawable());
            XSetClipOrigin(disp, gc, sel_x+offset_x, sel_y+offset_y);
            // copy bullet pixmap to drawable
            draw.copyArea(pm->pixmap().drawable(),
                          gc,
                          0, 0,
                          sel_x+offset_x, sel_y+offset_y,
                          selw,
                          selh);
            // disable clip mask
            XSetClipMask(disp, gc, None);

        } else {
            unsigned int half_w = item_pm_height / 2, quarter_w = item_pm_height / 4;
            switch (theme->bullet()) {
            case MenuTheme::SQUARE:
                draw.drawRectangle(gc, sel_x+quarter_w, y+quarter_w, half_w, half_w);
                break;

            case MenuTheme::TRIANGLE:
                    draw.drawTriangle(gc, ((theme->bulletPos() == FbTk::RIGHT)?
                                           FbTk::FbDrawable::RIGHT:
                                           FbTk::FbDrawable::LEFT),
                                      sel_x, sel_y,
                                      item_pm_height,
                                      item_pm_height,
                                      300); // 33% triangle
                break;

            case MenuTheme::DIAMOND:
                XPoint dia[4];

                dia[0].x = sel_x + half_w - 3;
                dia[0].y = sel_y + half_w;
                dia[1].x = 3;
                dia[1].y = -3;
                dia[2].x = 3;
                dia[2].y = 3;
                dia[3].x = -3;
                dia[3].y = 3;

                draw.fillPolygon(gc, dia, 4, Convex,
                                 CoordModePrevious);
                break;
            default:
                break;
            }
        }
    }


}

void MenuItem::setIcon(const std::string &filename, int screen_num) {
    if (filename.empty()) {
        if (m_icon.get() != 0)
            m_icon.reset(0);
        return;
    }

    if (m_icon.get() == 0)
        m_icon.reset(new Icon);

    m_icon->filename = FbTk::StringUtil::expandFilename(filename);
    m_icon->pixmap.reset(Image::load(m_icon->filename.c_str(),
                         screen_num));
}

unsigned int MenuItem::height(const FbTk::ThemeProxy<MenuTheme> &theme) const {
    return std::max(theme->itemHeight(),
                    std::max(theme->frameFont().height() + 2*theme->bevelWidth(),
                             theme->hiliteFont().height() + 2*theme->bevelWidth()));
}

unsigned int MenuItem::width(const FbTk::ThemeProxy<MenuTheme> &theme) const {
    // textwidth + bevel width on each side of the text
    const unsigned int icon_width = height(theme);
    const unsigned int normal = 2 * (theme->bevelWidth() + icon_width) +
                                std::max(theme->frameFont().textWidth(label()),
                                         theme->hiliteFont().textWidth(label()));
    return m_icon.get() == 0 ? normal : normal + icon_width;
}

void MenuItem::updateTheme(const FbTk::ThemeProxy<MenuTheme> &theme) {
    if (m_icon.get() == 0)
        return;

    m_icon->pixmap.reset(Image::load(m_icon->filename.c_str(), theme->screenNum()));


}

void MenuItem::showSubmenu() {
    if (submenu() != 0)
        submenu()->show();
}

} // end namespace FbTk