/*
    SPDX-FileCopyrightText: 1998-1999 Matthias Hölzer-Klüpfel <matthias@hoelzer-kluepfel.de>
    SPDX-FileCopyrightText: 2002-2003 Martin Willers <willers@xm-arts.de>
    SPDX-FileCopyrightText: 2007-2009 Stefan Böhmann <kde@hilefoks.org>

    SPDX-License-Identifier: GPL-2.0-or-later
*/
#include "toplevel.h"
#include "settings.h"
#include "timeedit.h"

#include <QAction>
#include <QActionGroup>
#include <QApplication>
#include <QBrush>
#include <QMenu>
#include <QPainter>
#include <QString>
#include <QTimer>

#include <KAboutData>
#include <KActionCollection>
#include <KConfigGroup>
#include <KHelpMenu>
#include <KIconLoader>
#include <KIconUtils>
#include <KNotification>
#include <KNotifyConfigWidget>
#include <KSharedConfig>

TopLevel::TopLevel(const KAboutData *aboutData, const QString &trayIcon, const QString &notificationIcon, QWidget *parent)
    : QSystemTrayIcon(parent)
    , m_popup()
    , m_trayIconName(trayIcon)
    , m_notificationIconName(notificationIcon)
    , m_runningTeaTime(0)
    , m_pausedRemainingTeaTime(0)
    , m_nextNotificationTime(0)
{
    repaintTrayIcon(); // Set initial icon
    KSharedConfigPtr config = KSharedConfig::openConfig();
    KConfigGroup tealistGroup(config, QStringLiteral("Tealist"));

    if (tealistGroup.exists()) {
        for (unsigned index = 0;; ++index) {
            const QString time = QString::asprintf("Tea%d Time", index);
            const QString key = QString::asprintf("Tea%d Name", index);
            if (tealistGroup.hasKey(time) && tealistGroup.hasKey(key)) {
                if (int temp = (tealistGroup.readEntry(time, QString())).toUInt()) {
                    m_tealist.append(Tea(tealistGroup.readEntry(key, i18n("Unknown Tea")), temp));
                }
            } else {
                break;
            }
        }
    }

    // If the list of teas is empty insert a set of default teas.
    if (m_tealist.isEmpty()) {
        m_tealist.append(Tea(i18n("Black Tea"), 180));
        m_tealist.append(Tea(i18n("Earl Grey"), 300));
        m_tealist.append(Tea(i18n("Fruit Tea"), 480));
        m_tealist.append(Tea(i18n("Green Tea"), 120));
    }

    m_teaActionGroup = new QActionGroup(this);
    m_actionCollection = new KActionCollection(this);

    // build the context menu
    action = m_actionCollection->addAction(QStringLiteral("resume"));
    action->setIcon(QIcon::fromTheme(QStringLiteral("media-playback-start")));
    action->setText(i18n("&Resume"));
    action->setEnabled(false);
    connect(action, &QAction::triggered, this, &TopLevel::resumeTea);

    action = m_actionCollection->addAction(QStringLiteral("pause"));
    action->setIcon(QIcon::fromTheme(QStringLiteral("media-playback-pause")));
    action->setText(i18n("&Pause"));
    action->setEnabled(false);
    connect(action, &QAction::triggered, this, &TopLevel::stopTea);

    action = m_actionCollection->addAction(QStringLiteral("stop"));
    action->setIcon(QIcon::fromTheme(QStringLiteral("edit-delete")));
    action->setText(i18n("&Stop"));
    action->setEnabled(false);
    connect(action, &QAction::triggered, this, &TopLevel::cancelTea);

    action = m_actionCollection->addAction(QStringLiteral("configure"));
    action->setIcon(QIcon::fromTheme(QStringLiteral("configure")));
    action->setText(i18n("&Configure..."));
    connect(action, &QAction::triggered, this, &TopLevel::showSettingsDialog);

    action = KStandardAction::configureNotifications(this, &TopLevel::configureNotifications, m_actionCollection);
    action = KStandardAction::quit(qApp, &QCoreApplication::quit, m_actionCollection);
    action->setShortcut(0);

    action = m_actionCollection->addAction(QStringLiteral("custom"));
    action->setText(i18n("&Custom..."));
    connect(action, &QAction::triggered, this, &TopLevel::showTimeEditDialog);

    m_helpMenu = new KHelpMenu(nullptr, *aboutData, false);

    setContextMenu(new QMenu);

    loadTeaMenuItems();
    contextMenu()->addSeparator();
    contextMenu()->addAction(m_actionCollection->action(QStringLiteral("resume")));
    contextMenu()->addAction(m_actionCollection->action(QStringLiteral("pause")));
    contextMenu()->addAction(m_actionCollection->action(QStringLiteral("stop")));
    contextMenu()->addSeparator();
    contextMenu()->addAction(m_actionCollection->action(QStringLiteral("custom")));
    contextMenu()->addSeparator();
    contextMenu()->addAction(m_actionCollection->action(QStringLiteral("configure")));
    contextMenu()->addAction(m_actionCollection->action(KStandardAction::name(KStandardAction::ConfigureNotifications)));
    contextMenu()->addMenu(m_helpMenu->menu());
    contextMenu()->addSeparator();
    contextMenu()->addAction(m_actionCollection->action(KStandardAction::name(KStandardAction::Quit)));

    m_timer = new QTimer(this);

    connect(m_timer, &QTimer::timeout, this, &TopLevel::teaTimeEvent);
    connect(contextMenu(), &QMenu::triggered, this, &TopLevel::slotRunTea);
    connect(this, &TopLevel::activated, this, &TopLevel::showPopup);

    loadConfig();
    checkState();
    show();
}

TopLevel::~TopLevel()
{
    delete m_helpMenu;
    delete m_timer;
    delete m_teaActionGroup;
}

void TopLevel::checkState()
{
    const bool state = m_runningTeaTime != 0;

    m_teaActionGroup->setEnabled(!state);
    m_actionCollection->action(QStringLiteral("stop"))->setEnabled(state);
    m_actionCollection->action(QStringLiteral("custom"))->setEnabled(!state);

    m_actionCollection->action(QStringLiteral("resume"))->setEnabled(false);
    m_actionCollection->action(QStringLiteral("pause"))->setEnabled(state && m_runningTeaTime > 0);

    if (m_pausedRemainingTeaTime > 0 && !state) {
        m_actionCollection->action(QStringLiteral("resume"))->setEnabled(true);
        m_actionCollection->action(QStringLiteral("stop"))->setEnabled(true);
    }

    if (!state && m_pausedRemainingTeaTime == 0) {
        setTooltipText(i18n("No steeping tea."));
    }
}

void TopLevel::setTeaList(const QList<Tea> &tealist)
{
    m_tealist = tealist;

    // Save list...
    KSharedConfigPtr config = KSharedConfig::openConfig();
    KConfigGroup tealistGroup(config, QStringLiteral("Tealist"));

    tealistGroup.deleteGroup();

    for (int i = 0; i < m_tealist.size(); ++i) {
        tealistGroup.writeEntry(QStringLiteral("Tea%1 Time").arg(i), m_tealist.at(i).time());
        tealistGroup.writeEntry(QStringLiteral("Tea%1 Name").arg(i), m_tealist.at(i).name());
    }
    tealistGroup.config()->sync();

    const auto actions = m_teaActionGroup->actions();
    for (QAction *a : actions) {
        m_teaActionGroup->removeAction(a);
    }

    contextMenu()->clear();

    loadTeaMenuItems();
    contextMenu()->addSeparator();
    contextMenu()->addAction(m_actionCollection->action(QStringLiteral("resume")));
    contextMenu()->addAction(m_actionCollection->action(QStringLiteral("pause")));
    contextMenu()->addAction(m_actionCollection->action(QStringLiteral("stop")));
    contextMenu()->addAction(m_actionCollection->action(QStringLiteral("custom")));
    contextMenu()->addSeparator();
    contextMenu()->addAction(m_actionCollection->action(QStringLiteral("configure")));
    contextMenu()->addAction(m_actionCollection->action(KStandardAction::name(KStandardAction::ConfigureNotifications)));
    contextMenu()->addMenu(m_helpMenu->menu());
    contextMenu()->addSeparator();
    contextMenu()->addAction(m_actionCollection->action(KStandardAction::name(KStandardAction::Quit)));

    connect(contextMenu(), &QMenu::triggered, this, &TopLevel::slotRunTea);

    loadConfig();
}

void TopLevel::loadTeaMenuItems()
{
    int i = 0;

    for (const Tea &t : std::as_const(m_tealist)) {
        QAction *a =
            contextMenu()->addAction(i18nc("%1 - name of the tea, %2 - the predefined time for "
                                           "the tea",
                                           "%1 (%2)",
                                           t.name(),
                                           t.timeToString()));

        a->setData(++i);
        m_teaActionGroup->addAction(a);
    }
}

void TopLevel::showSettingsDialog()
{
    SettingsDialog(this, m_tealist).exec();
}

void TopLevel::showTimeEditDialog()
{
    TimeEditDialog(this).exec();
}

void TopLevel::slotRunTea(QAction *a)
{
    int index = a->data().toInt();
    if (index <= 0) {
        return;
    }

    --index;

    if (index > m_tealist.size()) {
        return;
    }

    runTea(m_tealist.at(index));
}

void TopLevel::runTea(const Tea &tea)
{
    m_nextNotificationTime = 0;
    m_runningTea = tea;
    m_runningTeaTime = m_runningTea.time();

    checkState();
    repaintTrayIcon();

    m_timer->start(1000);
}

void TopLevel::repaintTrayIcon()
{
    QPixmap icon = QIcon::fromTheme(m_trayIconName).pixmap(KIconLoader::SizeLarge);
    if (m_runningTeaTime <= 0) {
        setIcon(icon);
        return;
    }

    if (m_usevisualize) {
        QPainter painter(&icon);
        painter.setRenderHint(QPainter::Antialiasing);

        const QRectF rectangle(1, icon.height() / 3 + 1, icon.width() / 1.5 - 2, icon.height() / 1.5 - 2);

        const int startAngle = 90 * 16;
        const int angleSpan = -(360 * 16.0 / m_runningTea.time() * m_runningTeaTime);

        painter.setBrush(QColor(0, 255, 0, 90));
        painter.drawPie(rectangle, startAngle, 360 * 16 + angleSpan);
        painter.setBrush(QColor(255, 0, 0, 90));
        painter.drawPie(rectangle, startAngle, angleSpan);

        setIcon(icon);
    } else {
        QPixmap overlayedIcon = KIconUtils::addOverlays(m_trayIconName, {QStringLiteral("alarm-symbolic")}).pixmap(KIconLoader::SizeLarge);
        setIcon(overlayedIcon);
    }
}

void TopLevel::teaTimeEvent()
{
    QString title = i18n("The Tea Cooker");

    if (m_runningTeaTime == 0) {
        m_timer->stop();
        m_pausedRemainingTeaTime = 0;

        QString content = i18n("%1 is now ready!", m_runningTea.name());

        // NOTICE Timeout is set t ~o24 days when no auto hide is request. Ok - nearly the same...
        if (m_usepopup) {
            showMessage(title, content, QSystemTrayIcon::Information, m_autohide ? m_autohidetime * 1000 : 2100000000);
        }

        KNotification::event(QStringLiteral("ready"), content);

        if (m_usereminder && m_remindertime > 0) {
            setTooltipText(content);

            m_timer->start(1000);
            m_nextNotificationTime -= m_remindertime;
            --m_runningTeaTime;
        }
        checkState();
        repaintTrayIcon();
    } else if (m_runningTeaTime < 0) {
        QString content = i18n("%1 is ready since %2!", m_runningTea.name(), Tea::int2time(m_runningTeaTime * -1, true));
        setTooltipText(content);

        if (m_runningTeaTime == m_nextNotificationTime) {
            if (m_usepopup) {
                showMessage(title, content, QSystemTrayIcon::Information, m_autohide ? m_autohidetime * 1000 : 2100000000);
            }

            KNotification::event(QLatin1String("reminder"), content);

            m_nextNotificationTime -= m_remindertime;
        }
        --m_runningTeaTime;
    } else {
        --m_runningTeaTime;
        setTooltipText(i18nc("%1 is the time, %2 is the name of the tea", "%1 left for %2.", Tea::int2time(m_runningTeaTime, true), m_runningTea.name()));
    }

    if (m_usevisualize) {
        repaintTrayIcon();
    }
}

void TopLevel::cancelTea()
{
    m_timer->stop();
    m_runningTeaTime = 0;
    m_pausedRemainingTeaTime = 0;

    checkState();
    repaintTrayIcon();
}

void TopLevel::stopTea()
{
    m_timer->stop();
    m_pausedRemainingTeaTime = m_runningTeaTime;
    m_runningTeaTime = 0;

    checkState();
}

void TopLevel::resumeTea()
{
    m_runningTeaTime = m_pausedRemainingTeaTime;
    m_pausedRemainingTeaTime = 0;

    checkState();

    m_timer->start(1000);
}

void TopLevel::configureNotifications()
{
    KNotifyConfigWidget::configure();
}

void TopLevel::loadConfig()
{
    KSharedConfigPtr config = KSharedConfig::openConfig();
    KConfigGroup generalGroup(config, QStringLiteral("General"));

    m_usepopup = generalGroup.readEntry("UsePopup", true);
    m_autohide = generalGroup.readEntry("PopupAutoHide", false);
    m_autohidetime = generalGroup.readEntry("PopupAutoHideTime", 30);
    m_usereminder = generalGroup.readEntry("UseReminder", false);
    m_remindertime = generalGroup.readEntry("ReminderTime", 60);
    m_usevisualize = generalGroup.readEntry("UseVisualize", true);
}

void TopLevel::showPopup(QSystemTrayIcon::ActivationReason reason)
{
    if (reason != QSystemTrayIcon::Trigger) {
        return;
    }
    if (m_popup) {
        m_popup->close();
    } else {
        m_popup = new KNotification(QStringLiteral("popup"), KNotification::Persistent, this);
        m_popup->setComponentName(QStringLiteral("kteatime"));
        m_popup->setTitle(i18n("The Tea Cooker"));
        m_popup->setText(toolTip());
        m_popup->setIconName(m_notificationIconName);
        m_popup->sendEvent();
    }
}

void TopLevel::setTooltipText(const QString &content)
{
    setToolTip(content);
    if (m_popup) {
        m_popup->setText(content);
    }
}
