#include "sequence.h"

#include "project/clip.h"

#include <QDebug>

Sequence::Sequence() {
    undo_pointer = -1;
    undo_add_current();
}

Sequence::~Sequence() {
    // dealloc all clips
    for (int i=0;i<clips.size();i++) {
        delete clips.at(i);
    }
}

void Sequence::add_clip(Clip* c) {
    c->id = clip_count();
    clips.append(c);
}

int Sequence::clip_count() {
    return clips.size();
}

Clip* Sequence::get_clip(int i) {
    return clips.at(i);
}

void Sequence::delete_clip(int i) {
	// remove any potential link references to clip
    for (int j=0;j<clip_count();j++) {
        Clip* c = get_clip(j);
        if (c != NULL) {
            for (int k=0;k<c->linked.size();k++) {
                if (c->linked[k] == clips[i]->id) {
                    c->linked.removeAt(k);
                    break;
                }
            }
        }
    }

	// finally remove from vector
    delete clips.at(i);
    clips[i] = NULL;
}

long Sequence::getEndFrame() {
    long end = 0;
    for (int j=0;j<clip_count();j++) {
        Clip* c = get_clip(j);
        if (c != NULL && c->timeline_out > end) {
            end = c->timeline_out;
        }
    }
    return end;
}

void Sequence::get_track_limits(int* video_tracks, int* audio_tracks) {
	int vt = 0;
	int at = 0;
	for (int j=0;j<clip_count();j++) {
        Clip* c = get_clip(j);
        if (c != NULL) {
            if (c->track < 0 && c->track < vt) { // video clip
                vt = c->track;
            } else if (c->track > at) {
                at = c->track;
            }
        }
	}
	if (video_tracks != NULL) *video_tracks = vt;
	if (audio_tracks != NULL) *audio_tracks = at;
}

//void Sequence::delete_area(long in, long out, int track) {

//}

Clip* Sequence::split_clip(Clip* pre, long frame) {
    if (pre->timeline_in < frame && pre->timeline_out > frame) { // guard against attempts to split at in/out points
        Clip* post = pre->copy();

        pre->timeline_out = frame;
        post->timeline_in = frame;
        post->clip_in = pre->clip_in + pre->getLength();

        add_clip(post);

        return post;
	}
    return NULL;
}

void Sequence::undo_add_current() {
    if (undo_stack.size() == UNDO_LIMIT) {
        delete undo_stack.at(0);
        undo_stack.removeFirst();
    } else {
        undo_pointer++;
        while (undo_stack.size() > undo_pointer+1) {
            delete undo_stack.last();
            undo_stack.removeLast();
        }
    }

    // copy clips
    QVector<Clip*>* copied_clips = new QVector<Clip*>();
    for (int i=0;i<clip_count();i++) {
        Clip* original = get_clip(i);
        if (original != NULL) {
            Clip* copy = original->copy();
            copy->linked = original->linked;
            copied_clips->append(copy);
        }
    }
    undo_stack.append(copied_clips);
}

void Sequence::set_undo() {
    qDebug() << "[INFO] Setting undo pointer to" << undo_pointer;

    for (int i=0;i<clip_count();i++) {
        delete clips.at(i);
    }
    clips.clear();

    QVector<Clip*>* copy_from_list = undo_stack.at(undo_pointer);
    for (int i=0;i<copy_from_list->size();i++) {
        Clip* original = copy_from_list->at(i);
        Clip* copy = original->copy();
        copy->linked = original->linked;
        add_clip(copy);
    }
}

void Sequence::undo() {
    if (undo_pointer > 0) {
        undo_pointer--;
        set_undo();
    } else {
        qDebug() << "[INFO] No more undos";
    }
}
void Sequence::redo() {
    if (undo_pointer == undo_stack.size() - 1) {
        qDebug() << "[INFO] No more redos";
    } else {
        undo_pointer++;
        set_undo();
    }
}

// static variable for the currently active sequence
Sequence* sequence = NULL;