/*
  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.
*/

#include <QDir>
#include <QDateTime>
#include <QFile>
#include <QTimer>
#include <QSettings>
#include <QHash>

#include <sys/stat.h>

#include "smdirmodel.h"
#include "smdirwatcher.h"
#include "smtreeitem.h"
#include "smglobals.h"
#include "helper.h"

SmDirModel::SmDirModel(const QStringList &headers, QObject *parent) : SmTreeModel(headers, parent), mHeaders(headers){
    mWatch = new SmDirWatcher(this);
    connect(mWatch, SIGNAL(dwEvent(QString,int)), this, SLOT(dirEvent(QString,int)));
    connect(mWatch, SIGNAL(needRefresh()), this, SLOT(populate()));
    mRunTimer = new QTimer(this);
    mRunTimer->setInterval(2000);
    connect(mRunTimer, SIGNAL(timeout()), mWatch, SLOT(start()));
    mRunTimer->start();
    readSettings();
}

SmDirModel::~SmDirModel(){
    delete mWatch;
    delete mRunTimer;
}

QVariant SmDirModel::data(const QModelIndex &index, int role) const{
    if(!index.isValid()){
        return QVariant();
    }
    SmTreeItem *i = itemAt(index);
    switch (role){
        case NameRole:
            return i->data(Name);
        case SizeRole:
            return i->data(Size);
        case TypeRole:
            return i->data(Type);
        case CreatedRole:
            return i->data(Created);
        case Md5sumRole:
            return i->data(Md5sum);
        case DurationRole:
            return i->data(Duration);
        case BitrateRole:
            return i->data(Bitrate);
        case FullPathRole:
            return i->data(FullPath);
        case Qt::DecorationRole: {
            if(index.column() == 0){
                QStringList mime = i->data(Type).toString().split('/');
                if(mime.at(0) == "inode"){
                    return mIcons.value("folder");
                }
                if(!mIcons.contains(mime.at(0))){
                    return mIcons.value("other");
                }
                return mIcons.value(mime.at(0).toLower());
            }
        }
        default:
            return SmTreeModel::data(index, role);
    }
}

bool SmDirModel::setData(const QModelIndex &index, const QVariant &value, int role){
    if(!index.isValid()){
        return false;
    }
    if(role == Qt::EditRole && index.column() == Name){
        QString newName = value.toString();
        if(newName.contains(QDir::separator())){
            return false;
        }
        SmTreeItem *i = itemAt(index);
        QString old = i->data(FullPath).toString();
        QString dir = fileInfo(index).absolutePath();
        QString newPath = QString("%1/%2").arg(dir).arg(newName);
        QFile::rename(old, newPath);
    }
    return SmTreeModel::setData(index, value, role);
}

bool SmDirModel::isDir(const QModelIndex &idx) const {
    if(!idx.isValid()){
        return false;
    }
    SmTreeItem *i = itemAt(idx);
    QFileInfo fi(i->data(FullPath).toString());
    return fi.isDir();
}

QFileInfo SmDirModel::fileInfo(const QModelIndex &idx) const {
    if(!idx.isValid()){
        return QFileInfo();
    }
    SmTreeItem *i = itemAt(idx);
    return QFileInfo(i->data(FullPath).toString());
}

void SmDirModel::setDir(const QString &dir){
    QFileInfo fi(dir);
    if(!fi.isDir()){
        return;
    }
    mCur = dir;
    populate();
    mWatch->setDir(dir);
}

void SmDirModel::dirEvent(const QString &file, int e){
    QFileInfo fi(file);
    const QList<QVariant> fData = fileData(fi);
    if(e == SmDirWatcher::Added){
        addRow(fData, rootIndex(), true);
    }
    QModelIndex idx = find(fData.at(Name), Name, rootIndex());
    if(e == SmDirWatcher::Deleted){
        removeRow(idx.row());
    }
    if(e == SmDirWatcher::Modified){
        for(int i = 0; i < mHeaders.count(); ++i){
            QModelIndex c = index(idx.row(), i, QModelIndex());
            setData(c, fData.at(i), Qt::EditRole);
        }
    }
}

void SmDirModel::readSettings(){
    const QHash<QString, QString> icons = SmGlobals::instance()->icons();
    QSettings s;
    QString iconName = s.value("ui/foldericon").toString();
    mIcons.insert("folder", QIcon(icons.value(iconName)));
    iconName = s.value("ui/movieicon").toString();
    mIcons.insert("video", QIcon(icons.value(iconName)));
    iconName = s.value("ui/pictureicon").toString();
    mIcons.insert("image", QIcon(icons.value(iconName)));
    iconName = s.value("ui/othericon").toString();
    mIcons.insert("other", QIcon(icons.value(iconName)));
}

void SmDirModel::refresh(){
    populate();
}

void SmDirModel::populate(){
    SmTreeItem *root = new SmTreeItem(mHeaders.size());
    QDir d = QDir(mCur);
    foreach(QFileInfo fi, d.entryInfoList()){
        if(fi.fileName() == "."){
            continue;
        }
        QList<QVariant> data = fileData(fi);
        SmTreeItem *n = new SmTreeItem(data, root);
        root->appendChild(n);
    }
    setRoot(root);
}

const QList<QVariant> SmDirModel::fileData(const QFileInfo &fi) const{
    QList<QVariant> data;
    data << fi.fileName() << fi.size();
    QString mime = Helper::mimeType(fi.absoluteFilePath());
    data << mime;
    data << fi.lastModified();
    QList<QVariant> si = QList<QVariant>() << QVariant() << QVariant();
    if(mime.startsWith("video")){
        si = Helper::duration(fi.absoluteFilePath());
    }
    data << Helper::md5Sum(fi.absoluteFilePath());
    data << si << fi.absoluteFilePath();
    return data;
}