//////////////////////////////////////////////////////////////////////////////
//
// Copyright (c) 2004-2021 musikcube team
//
// All rights reserved.
//
// Redistribution and use in source and binary forms, with or without
// modification, are permitted provided that the following conditions are met:
//
//    * Redistributions of source code must retain the above copyright notice,
//      this list of conditions and the following disclaimer.
//
//    * Redistributions in binary form must reproduce the above copyright
//      notice, this list of conditions and the following disclaimer in the
//      documentation and/or other materials provided with the distribution.
//
//    * Neither the name of the author nor the names of other contributors may
//      be used to endorse or promote products derived from this software
//      without specific prior written permission.
//
// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
// AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
// IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
// ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
// LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
// CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
// SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
// INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
// CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
// ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
// POSSIBILITY OF SUCH DAMAGE.
//
//////////////////////////////////////////////////////////////////////////////

#include <stdafx.h>

#include <musikcore/library/query/DirectoryTrackListQuery.h>
#include <musikcore/support/Messages.h>
#include <musikcore/i18n/Locale.h>
#include <cursespp/Colors.h>
#include <cursespp/ToastOverlay.h>
#include <app/util/Hotkeys.h>
#include <app/util/Playback.h>
#include <app/util/Messages.h>
#include <app/overlay/PlayQueueOverlays.h>

#include <filesystem>

#include "DirectoryLayout.h"

namespace fs = std::filesystem;

using namespace musik;
using namespace musik::core::library::constants;
using namespace musik::core;
using namespace musik::core::audio;
using namespace musik::core::library::query;
using namespace musik::core::library;
using namespace musik::cube;
using namespace cursespp;

constexpr int kMaxCategoryWidth = 40;
constexpr int kMinListTitleHeight = 26;

DirectoryLayout::DirectoryLayout(
    musik::core::audio::PlaybackService& playback,
    ILibraryPtr library)
: LayoutBase()
, playback(playback)
, library(library)
, queryHash(0)
, hasSubdirectories(true) {
    this->InitializeWindows();
    this->library->Indexer()->Progress.connect(this, &DirectoryLayout::OnIndexerProgress);
    this->library->Indexer()->Finished.connect(this, &DirectoryLayout::OnIndexerProgress);
}

void DirectoryLayout::OnLayout() {
    int cx = this->GetWidth(), cy = this->GetHeight();
    int x = 0, y = 0;

    if (this->hasSubdirectories) {
        int directoryWidth = std::min(kMaxCategoryWidth, cx / 4);
        this->directoryList->Show();
        this->directoryList->MoveAndResize(x, y, directoryWidth, cy);
        this->trackList->MoveAndResize(x + directoryWidth, y, cx - directoryWidth, cy);
    }
    else {
        this->directoryList->Hide();
        this->trackList->MoveAndResize(x, y, cx, cy);
    }
}

void DirectoryLayout::InitializeWindows() {
    ScrollAdapterBase::ItemDecorator decorator =
        std::bind(
            &DirectoryLayout::ListItemDecorator,
            this,
            std::placeholders::_1,
            std::placeholders::_2,
            std::placeholders::_3,
            std::placeholders::_4);

    this->adapter = std::make_shared<DirectoryAdapter>();
    this->adapter->SetAllowEscapeRoot(false);
    this->adapter->SetItemDecorator(decorator);
    this->adapter->SetShowRootDirectory(true);

    this->directoryList.reset(new ListWindow());
    this->directoryList->SetFrameTitle(_TSTR("browse_title_directory"));
    this->directoryList->SetAdapter(this->adapter);
    this->directoryList->SetFocusOrder(0);

    this->trackList.reset(new TrackListView(this->playback, this->library));
    this->trackList->SetFrameTitle(_TSTR("browse_title_tracks"));
    this->trackList->SetFocusOrder(1);

    this->AddWindow(this->directoryList);
    this->AddWindow(this->trackList);

    this->directoryList->SelectionChanged.connect(
        this, &DirectoryLayout::OnDirectoryChanged);
}

void DirectoryLayout::SetDirectory(const std::string& directory) {
    this->SetFocus(this->directoryList);
    this->rootDirectory = directory;
    this->adapter->SetRootDirectory(directory);
    this->directoryList->SetSelectedIndex(0);
    this->UpdateTitle();
    this->Refresh(true);
}

std::string DirectoryLayout::GetDirectory() {
    return this->adapter->GetCurrentPath();
}

void DirectoryLayout::OnVisibilityChanged(bool visible) {
    LayoutBase::OnVisibilityChanged(visible);
    if (visible) {
        this->Refresh(true);
    }
}

void DirectoryLayout::OnIndexerProgress(int count) {
    this->Requery(true);
}

void DirectoryLayout::RequeryTrackList(ListWindow *view) {
    size_t selected = this->directoryList->GetSelectedIndex();
    std::string fullPath = "";

    if (selected == 0 && this->adapter->GetLeafAt(0) == "..") {
        return;
    }
    else if (selected == ListWindow::NO_SELECTION) {
        fullPath = this->rootDirectory; /* no sub directories */
    }
    else {
        fullPath = this->adapter->GetFullPathAt(selected);
    }

    if (fullPath.size()) {
        auto query = std::shared_ptr<TrackListQueryBase>(
            new DirectoryTrackListQuery(this->library, fullPath));

        auto hash = query->GetQueryHash();

        if (hash != this->queryHash) {
            this->queryHash = hash;
            this->trackList->Requery(query);
        }
    }
}

void DirectoryLayout::OnDirectoryChanged(
    ListWindow *view, size_t newIndex, size_t oldIndex)
{
    this->UpdateTitle();
    this->RequeryTrackList(view);
}

void DirectoryLayout::UpdateTitle() {
    std::string title = "";

    size_t selected = this->directoryList->GetSelectedIndex();
    if (selected != ListWindow::NO_SELECTION) {
        std::string fullPath = this->adapter->GetFullPathAt(selected);
        if (fullPath.size()) {
            title = u8fmt(_TSTR("browse_title_directory_tracks"), fullPath.c_str());
        }
    }

    this->trackList->SetFrameTitle(title);
}

void DirectoryLayout::Refresh(bool requery) {
    this->adapter->Refresh();
    this->hasSubdirectories = this->adapter->HasSubDirectories();
    if (requery) { this->Requery(); }
}

void DirectoryLayout::Requery(bool invalidate) {
    if (invalidate) {
        this->queryHash = 0;
    }
    this->RequeryTrackList(this->directoryList.get());
}

bool DirectoryLayout::IsParentSelected() {
    return
        this->directoryList->GetSelectedIndex() == 0 &&
        this->adapter->GetLeafAt(0) == "..";
}

bool DirectoryLayout::IsParentRoot() {
    std::string root = NormalizeDir(this->rootDirectory);
    return
        root == this->adapter->GetParentPath() ||
        root == this->adapter->GetCurrentPath();
}

void DirectoryLayout::PlayFromTop() {
    playback::PlayFromTop(*this->trackList, this->playback);
}

bool DirectoryLayout::KeyPress(const std::string& key) {
    if (key == "KEY_ENTER") {
        if (this->GetFocus() == this->directoryList) {
            if (!this->adapter->HasSubDirectories(this->directoryList->GetSelectedIndex())) {
                std::string message = u8fmt(
                    _TSTR("browse_no_subdirectories_toast"),
                    Hotkeys::Get(Hotkeys::ContextMenu).c_str());
                ToastOverlay::Show(message);
                return true;
            }

            size_t index = this->adapter->Select(this->directoryList.get());
            if (index == DirectoryAdapter::NO_INDEX) {
                index = IsParentRoot() ? 1 : 0;
            }

            this->directoryList->SetSelectedIndex(index);
            if (!this->directoryList->IsEntryVisible(index)) {
                this->directoryList->ScrollTo(index);
            }

            this->Requery();
        }
        return true;
    }
    else if (Hotkeys::Is(Hotkeys::ContextMenu, key)) {
        if (this->GetFocus() == this->directoryList) {
            size_t index = this->directoryList->GetSelectedIndex();
            if (index != DirectoryAdapter::NO_INDEX) {
                auto path = this->adapter->GetFullPathAt(index);
                if (path.size()) {
                    PlayQueueOverlays::ShowAddDirectoryOverlay(
                        Window::MessageQueue(), this->playback, this->library, path);
                }
            }
        }
        else {
            auto tracks = this->trackList->GetTrackList();
            auto index = this->trackList->GetSelectedTrackIndex();
            index = (index == ListWindow::NO_SELECTION) ? 0 : index;
            this->playback.Play(*tracks.get(), index);
        }
        return true;
    }
    else if (Hotkeys::Is(Hotkeys::ViewRefresh, key)) {
        this->queryHash = 0;
        this->Refresh();
        return true;
    }

    return LayoutBase::KeyPress(key);
}

Color DirectoryLayout::ListItemDecorator(
    ScrollableWindow* scrollable,
    size_t index,
    size_t line,
    IScrollAdapter::EntryPtr entry)
{
    if (scrollable == this->directoryList.get()) {
        if (this->directoryList->GetSelectedIndex() == index) {
            return Color::ListItemHighlighted;
        }
    }
    return Color::Default;
}