/* Copyright (C) 2013
 * swift project Community / Contributors
 *
 * This file is part of swift project. It is subject to the license terms in the LICENSE file found in the top-level
 * directory of this distribution and at http://www.swift-project.org/license.html. No part of swift project,
 * including this file, may be copied, modified, propagated, or distributed except according to the terms
 * contained in the LICENSE file.
 */

#include "stylesheetutility.h"
#include <QCoreApplication>
#include <QDir>
#include <QTextStream>
#include <QDebug>
#include <QRegExp>
#include <QStyleOption>
#include <QStylePainter>
#include <QAbstractScrollArea>

namespace BlackGui
{

    CStyleSheetUtility::CStyleSheetUtility(QObject *parent) : QObject(parent)
    {
        this->read();
    }

    const QString &CStyleSheetUtility::fontStyleAsString(const QFont &font)
    {
        static const QString n("normal");
        static const QString i("italic");
        static const QString o("oblique");
        static const QString e;

        switch (font.style())
        {
        case QFont::StyleNormal: return n;
        case QFont::StyleItalic: return i;
        case QFont::StyleOblique: return o;
        default: return e;
        }
    }

    const QString &CStyleSheetUtility::fontWeightAsString(const QFont &font)
    {
        if (font.weight() < static_cast<int>(QFont::Normal))
        {
            static const QString l("light");
            return l;
        }
        else if (font.weight() < static_cast<int>(QFont::DemiBold))
        {
            static const QString n("normal");
            return n;
        }
        else if (font.weight() < static_cast<int>(QFont::Bold))
        {
            static const QString d("demibold");
            return d;
        }
        else if (font.weight() < static_cast<int>(QFont::Black))
        {
            static const QString b("bold");
            return b;
        }
        else
        {
            static const QString b("black");
            return b;
        }
    }

    QString CStyleSheetUtility::fontAsCombinedWeightStyle(const QFont &font)
    {
        QString w = fontWeightAsString(font);
        QString s = fontStyleAsString(font);
        if (w == s) return w; // avoid "normal" "normal"
        if (w.isEmpty() && s.isEmpty()) return "normal";
        if (w.isEmpty()) return s;
        if (s.isEmpty()) return w;
        if (s == "normal") return w;
        return w.append(" ").append(s);
    }

    QString CStyleSheetUtility::fontColor()
    {
        QString s = this->style(fileNameFonts()).toLower();
        if (!s.contains("color:")) return "red";
        QRegExp rx("color:\\s*(#*\\w+);");
        rx.indexIn(s);
        QString c = rx.cap(1);
        return c.isEmpty() ? "red" : c;
    }

    bool CStyleSheetUtility::read()
    {
        QDir directory(qssDirectory());
        if (!directory.exists()) { return false; }

        // ini file
        QString iniFile = directory.absolutePath().append("/").append(fileNameIniFile());
        m_iniFile.reset(new QSettings(iniFile, QSettings::IniFormat));

        // qss/css files
        directory.setNameFilters({"*.qss", "*.css"});
        directory.setFilter(QDir::Files | QDir::Hidden | QDir::NoSymLinks);

        QFileInfoList fileInfoList = directory.entryInfoList();

        for (int i = 0; i < fileInfoList.size(); ++i)
        {
            QFileInfo fileInfo = fileInfoList.at(i);
            QFile file(fileInfo.absoluteFilePath());
            if (file.open(QFile::QIODevice::ReadOnly | QIODevice::Text))
            {
                QTextStream in(&file);
                QString c = in.readAll();
                QString f = fileInfo.fileName().toLower();

                // keep even empty files as placeholders
                this->m_styleSheets.insert(f, c);
            }
            file.close();
        }
        emit this->styleSheetsChanged();
        return true;
    }

    QString CStyleSheetUtility::style(const QString &fileName) const
    {
        if (!this->containsStyle(fileName)) return QString();
        return this->m_styleSheets[fileName.toLower()].trimmed();
    }

    QString CStyleSheetUtility::styles(const QStringList &fileNames) const
    {
        QString style;
        for (const QString &fileName : fileNames)
        {
            if (!this->containsStyle(fileName)) { continue; }
            QString s = this->m_styleSheets[fileName.toLower()].trimmed();
            if (s.isEmpty()) continue;
            if (!style.isEmpty()) style.append("\n\n");
            style.append("/** file: ").append(fileName).append(" **/\n");
            style.append(s);
        }
        return style;
    }

    bool CStyleSheetUtility::containsStyle(const QString &fileName) const
    {
        if (fileName.isEmpty()) return false;
        return this->m_styleSheets.contains(fileName.toLower());
    }

    bool CStyleSheetUtility::updateFonts(const QFont &font)
    {
        QString fs;
        if (font.pixelSize() >= 0)
        {
            fs.append(font.pixelSize()).append("px");
        }
        else
        {
            fs.append(QString::number(font.pointSizeF())).append("pt");
        }
        return updateFonts(font.family(), fs, fontStyleAsString(font), fontWeightAsString(font), "white");
    }

    bool CStyleSheetUtility::updateFonts(const QString &fontFamily, const QString &fontSize, const QString &fontStyle, const QString &fontWeight, const QString &fontColor)
    {
        const QString indent("     ");
        QString fontStyleSheet;
        fontStyleSheet.append(indent).append("font-family: \"").append(fontFamily).append("\";\n");
        fontStyleSheet.append(indent).append("font-size: ").append(fontSize).append(";\n");
        fontStyleSheet.append(indent).append("font-style: ").append(fontStyle).append(";\n");
        fontStyleSheet.append(indent).append("font-weight: ").append(fontWeight).append(";\n");
        fontStyleSheet.append(indent).append("color: ").append(fontColor).append(";\n");

        QString qss("QWidget {\n");
        qss.append(fontStyleSheet);
        qss.append("}\n");

        QFile fontFile(qssDirectory().append("/").append(fileNameFonts()));
        bool ok = fontFile.open(QFile::Text | QFile::WriteOnly);
        if (ok)
        {
            QTextStream out(&fontFile);
            out << qss;
            fontFile.close();
            ok = this->read();
        }
        return ok;
    }

    QString CStyleSheetUtility::fontStyle(const QString &combinedStyleAndWeight)
    {
        static const QString n("normal");
        QString c = combinedStyleAndWeight.toLower();
        foreach(QString s, fontStyles())
        {
            if (c.contains(s))
            {
                return s;
            }
        }
        return n;
    }

    QString CStyleSheetUtility::fontWeight(const QString &combinedStyleAndWeight)
    {
        static const QString n("normal");
        QString c = combinedStyleAndWeight.toLower();
        foreach(QString w, fontWeights())
        {
            if (c.contains(w))
            {
                return w;
            }
        }
        return n;
    }

    CStyleSheetUtility &CStyleSheetUtility::instance()
    {
        static CStyleSheetUtility r;
        return r;
    }

    const QString &CStyleSheetUtility::fileNameFonts()
    {
        static const QString f("fonts.qss");
        return f;
    }

    const QString &CStyleSheetUtility::fileNameSwiftStandardGui()
    {
        static const QString f("swiftstdgui.qss");
        return f;
    }

    const QString &CStyleSheetUtility::fileNameInfoBar()
    {
        static const QString f("infobar.qss");
        return f;
    }

    const QString &CStyleSheetUtility::fileNameNavigator()
    {
        static const QString f("navigator.qss");
        return f;
    }

    const QString &CStyleSheetUtility::fileNameDockWidgetTab()
    {
        static const QString f("dockwidgettab.qss");
        return f;
    }

    const QString &CStyleSheetUtility::fileNameStandardWidget()
    {
        static const QString f("stdwidget.qss");
        return f;
    }

    const QString &CStyleSheetUtility::fileNameTextMessage()
    {
        static const QString f("textmessage.css");
        return f;
    }

    const QString &CStyleSheetUtility::fileNameFilterDialog()
    {
        static const QString f("filterdialog.qss");
        return f;
    }

    const QString &CStyleSheetUtility::fileNameSwiftCore()
    {
        static const QString f("swiftcore.qss");
        return f;
    }

    const QString &CStyleSheetUtility::fileNameSwiftData()
    {
        static const QString f("swiftdata.qss");
        return f;
    }

    const QString &CStyleSheetUtility::fileNameSwiftLauncher()
    {
        static const QString f("swiftlauncher.qss");
        return f;
    }

    const QString &CStyleSheetUtility::fileNameIniFile()
    {
        static const QString f("gui.ini");
        return f;
    }

    const QStringList &CStyleSheetUtility::fontWeights()
    {
        static const QStringList w( {"bold", "semibold", "light", "black", "normal"});
        return w;
    }

    const QStringList &CStyleSheetUtility::fontStyles()
    {
        static const QStringList s( {"italic", "oblique", "normal"});
        return s;
    }

    const QString &CStyleSheetUtility::transparentBackgroundColor()
    {
        static const QString t = "background-color: transparent;";
        return t;
    }

    QString CStyleSheetUtility::qssDirectory()
    {
        QString dirPath = QCoreApplication::applicationDirPath();
        if (!dirPath.endsWith('/')) dirPath.append('/');
        dirPath.append("../qss");
        return dirPath;
    }

    bool CStyleSheetUtility::useStyleSheetInDerivedWidget(QWidget *usedWidget, QStyle::PrimitiveElement element)
    {
        Q_ASSERT(usedWidget);
        if (!usedWidget) { return false; }

        Q_ASSERT(usedWidget->style());
        QStyle *style = usedWidget->style();
        if (!style) { return false; }

        // 1) QStylePainter: modern version of
        //    usedWidget->style()->drawPrimitive(element, &opt, &p, usedWidget);
        // 2) With viewport based widgets viewport has to be used
        QAbstractScrollArea *sa = qobject_cast<QAbstractScrollArea *>(usedWidget);
        QStylePainter p(
            sa ? sa->viewport() :
            usedWidget);
        if (!p.isActive()) { return false; }

        QStyleOption opt;
        opt.initFrom(usedWidget);
        p.drawPrimitive(element, opt);
        return true;
    }

    QString CStyleSheetUtility::styleForIconCheckBox(const QString &checkedIcon, const QString &uncheckedIcon, const QString &width, const QString &height)
    {
        Q_ASSERT(!checkedIcon.isEmpty());
        Q_ASSERT(!uncheckedIcon.isEmpty());

        static const QString st = "QCheckBox::indicator { width: %1; height: %2; } QCheckBox::indicator:checked { image: url(%3); } QCheckBox::indicator:unchecked { image: url(%4); }";
        return st.arg(width).arg(height).arg(checkedIcon).arg(uncheckedIcon);
    }

    QString CStyleSheetUtility::concatStyles(const QString &style1, const QString &style2)
    {
        QString s1(style1.trimmed());
        QString s2(style2.trimmed());
        if (s1.isEmpty()) { return s2; }
        if (s2.isEmpty()) { return s1; }
        if (!s1.endsWith(";")) { s1 = s1.append("; "); }
        s1.append(s2);
        if (!s1.endsWith(";")) { s1 = s1.append(";"); }
        return s1;
    }
}