/****************************************************************************

**

** Copyright (C) 2008-2010 Nokia Corporation and/or its subsidiary(-ies).

** All rights reserved.

** Contact: Nokia Corporation (developer.feedback@nokia.com)

**

** This file is part of the HbCore module of the UI Extensions for Mobile.

**

** GNU Lesser General Public License Usage

** This file may be used under the terms of the GNU Lesser General Public

** License version 2.1 as published by the Free Software Foundation and

** appearing in the file LICENSE.LGPL included in the packaging of this file.

** Please review the following information to ensure the GNU Lesser General

** Public License version 2.1 requirements will be met:

** http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.

**

** In addition, as a special exception, Nokia gives you certain additional

** rights.  These rights are described in the Nokia Qt LGPL Exception

** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.

**

** If you have questions regarding the use of this file, please contact

** Nokia at developer.feedback@nokia.com.

**

****************************************************************************/

#include "hbvgimageiconrenderer_p.h"

#include "hbeglstate_p.h"

#include "hbiconimpl_p.h"

#include <QtCore/qvarlengtharray.h>

HbVgImageIconRenderer::HbVgImageIconRenderer(VGImage img, const QSize &size, HbIconImpl *impl)

    : vgImage(img),

      iconMode(QIcon::Normal),

      specialCaseApplied(false),

      rendersize(size),

      opacityPaint(VG_INVALID_HANDLE),

      lastOpacity(1.0),

      iconImpl(impl)

{

}

HbVgImageIconRenderer::~HbVgImageIconRenderer()

{

    if (vgImage) {

        vgDestroyImage(vgImage);

    }

}

void HbVgImageIconRenderer::applyIconProperties()

{

    if (!specialCaseApplied) {

        VGImage tmpImage = vgImage;

        if (iconColor.isValid()) {

            tmpImage = vgCreateImage(VG_sARGB_8888_PRE,

                                     rendersize.width(), rendersize.height(),

                                     VG_IMAGE_QUALITY_NONANTIALIASED);

            VGfloat matrix[20] = {0, 0, 0, 0,

                                  0, 0, 0, 0,

                                  0, 0, 0, 0,

                                  0, 0, 0, 1,

                                  (VGfloat)iconColor.red() / 255.0, (VGfloat)iconColor.green() / 255.0, (VGfloat)iconColor.blue() / 255.0, 0

                                 };

            vgColorMatrix(tmpImage, vgImage, matrix);

        }

        if (iconMode == QIcon::Disabled) {

            VGImage modifiedVgImage = vgCreateImage(VG_sARGB_8888_PRE,

                                                    rendersize.width(), rendersize.height(),

                                                    VG_IMAGE_QUALITY_NONANTIALIASED);

            VGfloat matrix[20] = {0.1700, 0.1700, 0.1700, 0,

                                  0.5721, 0.5721, 0.5721, 0,

                                  0.0577, 0.0577, 0.0577, 0,

                                  0, 0, 0, 1,

                                  0, 0, 0, 0

                                 };

            vgColorMatrix(modifiedVgImage, tmpImage, matrix);

            if (tmpImage != vgImage) {

                vgDestroyImage(tmpImage);

            }

            vgDestroyImage(vgImage);

            vgImage = modifiedVgImage;

        } else if (tmpImage != vgImage) {

            vgDestroyImage(vgImage);

            vgImage = tmpImage;

        }

        specialCaseApplied = true;

    }

}

bool HbVgImageIconRenderer::draw(QPainter *painter, const QPointF &topLeft, const QPainterPath &clipPath)

{

    if ((iconColor.isValid()) || (iconMode != QIcon::Normal)) {

        applyIconProperties();

    }

    if (vgImage == VG_INVALID_HANDLE) {

        vgImage = vgImageCreator(iconImpl , painter);

    }

    if (vgImage != VG_INVALID_HANDLE) {

        QPainterPath oldPath;

        bool wasClipped = painter->hasClipping();

        if (!clipPath.isEmpty()) {

            if (!wasClipped) {

                painter->setClipping(true);

            }

            QPainterPath intersect(clipPath);

            oldPath = painter->clipPath();

            if (wasClipped) {

                intersect =  oldPath.intersected(clipPath);

                if (intersect.isEmpty()) {

                    return true;

                }

            }

            painter->setClipPath(intersect, Qt::ReplaceClip);

            painter->beginNativePainting();

        }

        VGint imageMode      = vgGeti(VG_IMAGE_MODE);

        VGint matrixMode     = vgGeti(VG_MATRIX_MODE);

        VGPaint oldFillPaint = VG_INVALID_HANDLE;

        VGPaint oldStrkPaint = VG_INVALID_HANDLE;

        VGint   blendMode    = 0;

        updatePainterTransformation(painter, topLeft);

        qreal opacity = painter->opacity();

        if (opacity != lastOpacity || iconMode == QIcon::Selected) {

            lastOpacity = opacity;

            if (opacityPaint == VG_INVALID_HANDLE) {

                opacityPaint = vgCreatePaint();

            }

            if (opacity != 1.0) {

                VGfloat opaquePaint[] = {1.0f, 1.0f, 1.0f, opacity};

                if (iconMode == QIcon::Selected) {

                    opaquePaint[0] = 0.54901f;

                    opaquePaint[1] = 0.54901f;

                    opaquePaint[2] = 0.72156f;

                    opaquePaint[3] = 0.81f * opaquePaint[3];

                }

                if (opacityPaint != VG_INVALID_HANDLE) {

                    vgSetParameteri(opacityPaint, VG_PAINT_TYPE, VG_PAINT_TYPE_COLOR);

                    vgSetParameterfv(opacityPaint, VG_PAINT_COLOR, 4, opaquePaint);

                }

            }

        }

        if ((iconMode == QIcon::Selected || opacity != 1.0) && opacityPaint != VG_INVALID_HANDLE) {

            oldFillPaint = vgGetPaint(VG_FILL_PATH);

            oldStrkPaint = vgGetPaint(VG_STROKE_PATH);

            blendMode = vgGeti(VG_BLEND_MODE);

            vgSeti(VG_BLEND_MODE, VG_BLEND_SRC_OVER);

            vgSetPaint(opacityPaint, VG_FILL_PATH | VG_STROKE_PATH);

        }

        if (opacity == 1.0) {

            vgSeti(VG_IMAGE_MODE, VG_DRAW_IMAGE_NORMAL);

        } else {

            vgSeti(VG_IMAGE_MODE, VG_DRAW_IMAGE_MULTIPLY);

        }

        vgDrawImage(vgImage);

        vgSeti(VG_MATRIX_MODE, matrixMode);

        vgSeti(VG_IMAGE_MODE, imageMode);

        if (oldFillPaint) {

            vgSetPaint(oldFillPaint, VG_FILL_PATH);

        }

        if (oldStrkPaint) {

            vgSetPaint(oldStrkPaint, VG_STROKE_PATH);

        }

        if (blendMode) {

            vgSeti(VG_BLEND_MODE, blendMode);

        }

        if (!clipPath.isEmpty()) {

            painter->endNativePainting();

            painter->setClipPath(oldPath);

            painter->setClipping(wasClipped);

        }

        return true;

    }

    return false;

}

void HbVgImageIconRenderer::updatePainterTransformation(QPainter *painter, const QPointF &pos)

{

    VGfloat devh = painter->device()->height();

    QTransform viewport(1.0f, 0.0f, 0.0f,

                        0.0f, -1.0f, 0.0f,

                        0.0f, devh, 1.0f);

    QTransform imageTransform = painter->transform() * viewport;

    imageTransform.translate(pos.x(), pos.y());

    VGfloat mat[9];

    vgSeti(VG_MATRIX_MODE, VG_MATRIX_IMAGE_USER_TO_SURFACE);

    mat[0] = imageTransform.m11();

    mat[1] = imageTransform.m12();

    mat[2] = imageTransform.m13();

    mat[3] = imageTransform.m21();

    mat[4] = imageTransform.m22();

    mat[5] = imageTransform.m23();

    mat[6] = imageTransform.m31();

    mat[7] = imageTransform.m32();

    mat[8] = imageTransform.m33();

    vgLoadMatrix(mat);

}