/*********
*
* This file is part of BibleTime's source code, http://www.bibletime.info/.
*
* Copyright 1999-2008 by the BibleTime developers.
* The BibleTime source code is licensed under the GNU General Public License version 2.0.
*
**********/

#include "bibletime.h"

#include <QDebug>
#include <QList>
#include <QMdiSubWindow>
#include "backend/config/cbtconfig.h"
#include "backend/keys/cswordversekey.h"
#include "frontend/cmdiarea.h"

// Sword includes:
#include <versekey.h>
#include <listkey.h>


//helper function
void BibleTime::syncAllModulesByType(const CSwordModuleInfo::ModuleType type, const QString& key) {
    qDebug() << "Syncing modules by type to key" << key.toLatin1();
    foreach (QMdiSubWindow* w, m_mdi->usableWindowList()) {
        CDisplayWindow* d = dynamic_cast<CDisplayWindow*>(w->widget());
        if (d && d->modules().count() && d->modules().first()->type() == type) {
            d->lookupKey(key);
        }
    }
}

void BibleTime::closeAllModuleWindows() {
    qDebug() << "DBUS: close all windows now...";
    m_mdi->closeAllSubWindows();
}

void BibleTime::syncAllBibles(const QString& key) {
    qDebug() << "DBUS: syncing all bibles ...";
    syncAllModulesByType(CSwordModuleInfo::Bible, key);
}

void BibleTime::syncAllCommentaries(const QString& key) {
    qDebug() << "DBUS: syncing all commentaries ...";
    syncAllModulesByType(CSwordModuleInfo::Commentary, key);
}

void BibleTime::syncAllLexicons(const QString& key) {
    qDebug() << "DBUS: syncing all lexicons ...";
    syncAllModulesByType(CSwordModuleInfo::Lexicon, key);
}

void BibleTime::syncAllVerseBasedModules(const QString& key) {
    qDebug() << "DBUS: syncing all verse based modules ...";
    syncAllModulesByType(CSwordModuleInfo::Bible, key);
    syncAllModulesByType(CSwordModuleInfo::Commentary, key);
}

void BibleTime::openWindow(const QString& moduleName, const QString& key) {
    qDebug() << "DBUS: open window for module" << moduleName.toLatin1() << "and key" << key.toLatin1();
    CSwordModuleInfo* module = CPointers::backend()->findModuleByName(moduleName);
    if (module) {
        createReadDisplayWindow(module, key);
    }
}

void BibleTime::openDefaultBible(const QString& key) {
    qDebug() << "DBUS: open default bible ...";
    CSwordModuleInfo* mod = CBTConfig::get(CBTConfig::standardBible);
    if (mod) {
        openWindow(mod->name(), key);
    }
}

QStringList BibleTime::searchInModule(const QString& moduleName, const QString& searchText) {
    qDebug() << "DBUS: searchInModule" << moduleName.toLatin1();
    QStringList ret;
    CSwordModuleInfo* mod = CPointers::backend()->findModuleByName(moduleName);

    if (mod) {
        //mod->search(searchText, CSwordModuleSearch::multipleWords, sword::ListKey());
        sword::ListKey scope;
        mod->searchIndexed( searchText, scope );

        sword::ListKey result = mod->searchResult();
        const QString lead = QString("[%1] ").arg(moduleName);
        ;
        for ( int i = 0; i < result.Count(); ++i ) {
            sword::SWKey* key = result.getElement(i);
            Q_ASSERT(key);


            if (mod->type() == CSwordModuleInfo::Bible || mod->type() == CSwordModuleInfo::Commentary) {
                sword::VerseKey vk(key->getText());
                ret << lead + QString::fromUtf8( vk.getOSISRef() );
            }
            else {
                ret << lead + QString::fromUtf8( key->getText() );
            }
        }
    }

    return ret;

}

QStringList BibleTime::searchInOpenModules(const QString& searchText) {
    qDebug() << "DBUS: search in open modules ...";
    QStringList ret;
    foreach (QMdiSubWindow* subWindow,  m_mdi->subWindowList()) {
        if (CDisplayWindow* w = dynamic_cast<CDisplayWindow*>(subWindow->widget())) {
            QList<CSwordModuleInfo*> windowModules = w->modules();
            QList<CSwordModuleInfo*>::iterator end_it = windowModules.end();
            for (QList<CSwordModuleInfo*>::iterator it(windowModules.begin()); it != end_it; ++it) {
                ret += searchInModule((*it)->name(), searchText);
            }
        }
    }
    return ret;
}

QStringList BibleTime::searchInDefaultBible(const QString& searchText) {
    CSwordModuleInfo* bible = CBTConfig::get(CBTConfig::standardBible);
    return searchInModule(bible->name(), searchText);
}

QString BibleTime::getCurrentReference() {
    qDebug() << "BibleTime::getCurrentReference";
    QString ret = QString::null;

    QMdiSubWindow* activeSubWindow = m_mdi->activeSubWindow();
    if (!activeSubWindow) return ret;

    CDisplayWindow* w = dynamic_cast<CDisplayWindow*>(activeSubWindow->widget());

    if (w) {
        QString modType;
        Q_ASSERT(w->modules().first());
        switch (w->modules().first()->type()) {
            case CSwordModuleInfo::Bible:
                modType = "BIBLE";
                break;
            case CSwordModuleInfo::Commentary:
                modType = "COMMENTARY";
                break;
            case CSwordModuleInfo::GenericBook:
                modType = "BOOK";
                break;
            case CSwordModuleInfo::Lexicon:
                modType = "LEXICON";
                break;
            default:
                modType = "UNSUPPORTED";
                break;
        }

        ret.append("[").append(w->modules().first()->name()).append("] ");
        ret.append("[").append(modType).append("] ");

        CSwordVerseKey* vk = dynamic_cast<CSwordVerseKey*>( w->key() );
        if (vk) {
            ret.append( vk->getOSISRef() );
        }
        else {
            ret.append( w->key()->key() );
        }
    }

    return ret;
}

QStringList BibleTime::getModulesOfType(const QString& type) {
    QStringList ret;

    CSwordModuleInfo::ModuleType modType = CSwordModuleInfo::Unknown;
    if (type == "BIBLES") {
        modType = CSwordModuleInfo::Bible;
    }
    else if (type == "COMMENTARIES") {
        modType = CSwordModuleInfo::Commentary;
    }
    else if (type == "LEXICONS") {
        modType = CSwordModuleInfo::Lexicon;

    }
    else if (type == "BOOKS") {
        modType = CSwordModuleInfo::GenericBook;
    }

    QList<CSwordModuleInfo*> modList = CPointers::backend()->moduleList();
    for (QList<CSwordModuleInfo*>::iterator it( modList.begin() ); it != modList.end(); ++it) {
        if ((*it)->type() == modType) {
            ret.append( (*it)->name() );
        }
    }

    return ret;
}