/***************************************************************************
 *             __________               __   ___.
 *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
 *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
 *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
 *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
 *                     \/            \/     \/    \/            \/
 * $Id$
 *
 * Copyright (C) 2010 Robert Bieber
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version.
 *
 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
 * KIND, either express or implied.
 *
 ****************************************************************************/

#include <QPainter>
#include <QPainterPath>

#include "rbviewport.h"
#include "rbscreen.h"
#include "rbrenderinfo.h"
#include "parsetreemodel.h"
#include "tag_table.h"
#include "skin_parser.h"

RBViewport::RBViewport(skin_element* node, const RBRenderInfo& info)
    : QGraphicsItem(info.screen()), font(info.screen()->getFont(0)),
    foreground(info.screen()->foreground()),
    background(info.screen()->background()), textOffset(0,0),
    screen(info.screen()), textAlign(Left), showStatusBar(false),
    statusBarTexture(":/render/statusbar.png")
{
    if(!node->tag)
    {
        /* Default viewport takes up the entire screen */
        size = QRectF(0, 0, info.screen()->getWidth(),
                      info.screen()->getHeight());
        customUI = false;

        if(info.model()->rowCount(QModelIndex()) > 1)
        {
            /* If there is more than one viewport in the document */
            setVisible(false);
        }
        else
        {
            setVisible(true);
        }
    }
    else
    {
        int param = 0;
        QString ident;
        int x,y,w,h;
        /* Rendering one of the other types of viewport */
        switch(node->tag->name[1])
        {
        case '\0':
            customUI = false;
            param = 0;
            break;

        case 'l':
            /* A preloaded viewport definition */
            ident = node->params[0].data.text;
            customUI = false;
            if(!screen->viewPortDisplayed(ident))
                hide();
            info.screen()->loadViewport(ident, this);
            param = 1;
            break;

        case 'i':
            /* Custom UI Viewport */
            customUI = true;
            param = 1;
            if(node->params[0].type == skin_tag_parameter::DEFAULT)
            {
                setVisible(true);
            }
            else
            {
                hide();
                info.screen()->loadViewport(ident, this);
            }
            break;
        }
        /* Now we grab the info common to all viewports */
        x = node->params[param++].data.numeric;
        if(x < 0)
            x = info.screen()->boundingRect().right() + x;
        y = node->params[param++].data.numeric;
        if(y < 0)
            y = info.screen()->boundingRect().bottom() + y;

        if(node->params[param].type == skin_tag_parameter::DEFAULT)
            w = info.screen()->getWidth() - x;
        else
            w = node->params[param].data.numeric;
        if(w < 0)
            w = info.screen()->getWidth() + w - x;

        if(node->params[++param].type == skin_tag_parameter::DEFAULT)
            h = info.screen()->getHeight() - y;
        else
            h = node->params[param].data.numeric;
        if(h < 0)
            h = info.screen()->getHeight() + h - y;

        setPos(x, y);
        size = QRectF(0, 0, w, h);
    }

    debug = info.device()->data("showviewports").toBool();
    lineHeight = font->lineHeight();
}

RBViewport::~RBViewport()
{
}

QPainterPath RBViewport::shape() const
{
    QPainterPath retval;
    retval.addRect(size);
    return retval;
}

QRectF RBViewport::boundingRect() const
{
    return size;
}

void RBViewport::paint(QPainter *painter,
                       const QStyleOptionGraphicsItem *option, QWidget *widget)
{
    if(!screen->hasBackdrop() && background != screen->background())
    {
        painter->fillRect(size, QBrush(background));
    }

    painter->setBrush(Qt::NoBrush);
    painter->setPen(customUI ? Qt::blue : Qt::red);
    if(debug)
        painter->drawRect(size);

    if(showStatusBar)
        painter->fillRect(QRectF(0, 0, size.width(), 8), statusBarTexture);
}

void RBViewport::newLine()
{
    textOffset.setY(textOffset.y() + lineHeight);
    textOffset.setX(0);
    textAlign = Left;
    leftText.clear();
    rightText.clear();
    centerText.clear();
}

void RBViewport::write(QString text)
{
    if(textAlign == Left)
    {
        leftText.append(font->renderText(text, foreground, this));
        alignLeft();
    }
    else if(textAlign == Center)
    {
        centerText.append(font->renderText(text, foreground, this));
        alignCenter();
    }
    else if(textAlign == Right)
    {
        rightText.append(font->renderText(text, foreground, this));
        alignRight();
    }
}

void RBViewport::showPlaylist(const RBRenderInfo &info, int start,
                              skin_element *id3, skin_element *noId3)
{
    /* Determining whether ID3 info is available */
    skin_element* root = id3;

    /* The line will be a linked list */
    if(root->children_count > 0)
        root = root->children[0];

    int song = start + info.device()->data("pp").toInt();
    int numSongs = info.device()->data("pe").toInt();
    int halfWay = (numSongs - song) / 2 + 1 + song;

    while(song <= numSongs && textOffset.y() + lineHeight < size.height())
    {
        if(song == halfWay)
        {
            root = noId3;
            if(root->children_count > 0)
                root = root->children[0];
        }
        skin_element* current = root;
        while(current)
        {

            if(current->type == TEXT)
            {
                write(QString((char*)current->data));
            }

            if(current->type == TAG)
            {
                QString tag(current->tag->name);
                if(tag == "pp")
                {
                    write(QString::number(song));
                }
                else if(tag == "pt")
                {
                    write(QObject::tr("00:00"));
                }
                else if(tag[0] == 'i' || tag[0] == 'f')
                {
                    if(song == info.device()->data("pp").toInt())
                    {
                        write(info.device()->data(tag).toString());
                    }
                    else
                    {
                        /* If we're not on the current track, use the next
                         * track info
                         */
                        if(tag[0] == 'i')
                            tag = QString("I") + tag.right(1);
                        else
                            tag = QString("F") + tag.right(1);
                        write(info.device()->data(tag).toString());
                    }
                }
            }

            current = current->next;
        }
        newLine();
        song++;
    }
}

void RBViewport::alignLeft()
{
    int y = textOffset.y();
    int x = 0;

    for(int i = 0; i < leftText.count(); i++)
    {
        leftText[i]->setPos(x, y);
        x += leftText[i]->boundingRect().width();
    }
}

void RBViewport::alignCenter()
{
    int y = textOffset.y();
    int x = 0;
    int width = 0;

    for(int i = 0; i < centerText.count(); i++)
        width += centerText[i]->boundingRect().width();

    x = (size.width() - width) / 2;

    for(int i = 0; i < centerText.count(); i++)
    {
        centerText[i]->setPos(x, y);
        x += centerText[i]->boundingRect().width();
    }
}

void RBViewport::alignRight()
{

    int y = textOffset.y();
    int x = 0;
    int width = 0;

    for(int i = 0; i < rightText.count(); i++)
        width += rightText[i]->boundingRect().width();

    x = size.width() - width;

    for(int i = 0; i < rightText.count(); i++)
    {
        rightText[i]->setPos(x, y);
        x += rightText[i]->boundingRect().width();
    }

}